summaryrefslogtreecommitdiff
path: root/ANDROID_3.4.5/arch/m68k/fpsp040/x_snan.S
diff options
context:
space:
mode:
authorSrikant Patnaik2015-01-11 12:28:04 +0530
committerSrikant Patnaik2015-01-11 12:28:04 +0530
commit871480933a1c28f8a9fed4c4d34d06c439a7a422 (patch)
tree8718f573808810c2a1e8cb8fb6ac469093ca2784 /ANDROID_3.4.5/arch/m68k/fpsp040/x_snan.S
parent9d40ac5867b9aefe0722bc1f110b965ff294d30d (diff)
downloadFOSSEE-netbook-kernel-source-871480933a1c28f8a9fed4c4d34d06c439a7a422.tar.gz
FOSSEE-netbook-kernel-source-871480933a1c28f8a9fed4c4d34d06c439a7a422.tar.bz2
FOSSEE-netbook-kernel-source-871480933a1c28f8a9fed4c4d34d06c439a7a422.zip
Moved, renamed, and deleted files
The original directory structure was scattered and unorganized. Changes are basically to make it look like kernel structure.
Diffstat (limited to 'ANDROID_3.4.5/arch/m68k/fpsp040/x_snan.S')
-rw-r--r--ANDROID_3.4.5/arch/m68k/fpsp040/x_snan.S276
1 files changed, 0 insertions, 276 deletions
diff --git a/ANDROID_3.4.5/arch/m68k/fpsp040/x_snan.S b/ANDROID_3.4.5/arch/m68k/fpsp040/x_snan.S
deleted file mode 100644
index 4ed76641..00000000
--- a/ANDROID_3.4.5/arch/m68k/fpsp040/x_snan.S
+++ /dev/null
@@ -1,276 +0,0 @@
-|
-| x_snan.sa 3.3 7/1/91
-|
-| fpsp_snan --- FPSP handler for signalling NAN exception
-|
-| SNAN for float -> integer conversions (integer conversion of
-| an SNAN) is a non-maskable run-time exception.
-|
-| For trap disabled the 040 does the following:
-| If the dest data format is s, d, or x, then the SNAN bit in the NAN
-| is set to one and the resulting non-signaling NAN (truncated if
-| necessary) is transferred to the dest. If the dest format is b, w,
-| or l, then garbage is written to the dest (actually the upper 32 bits
-| of the mantissa are sent to the integer unit).
-|
-| For trap enabled the 040 does the following:
-| If the inst is move_out, then the results are the same as for trap
-| disabled with the exception posted. If the instruction is not move_
-| out, the dest. is not modified, and the exception is posted.
-|
-
-| Copyright (C) Motorola, Inc. 1990
-| All Rights Reserved
-|
-| For details on the license for this file, please see the
-| file, README, in this same directory.
-
-X_SNAN: |idnt 2,1 | Motorola 040 Floating Point Software Package
-
- |section 8
-
-#include "fpsp.h"
-
- |xref get_fline
- |xref mem_write
- |xref real_snan
- |xref real_inex
- |xref fpsp_done
- |xref reg_dest
-
- .global fpsp_snan
-fpsp_snan:
- link %a6,#-LOCAL_SIZE
- fsave -(%a7)
- moveml %d0-%d1/%a0-%a1,USER_DA(%a6)
- fmovemx %fp0-%fp3,USER_FP0(%a6)
- fmoveml %fpcr/%fpsr/%fpiar,USER_FPCR(%a6)
-
-|
-| Check if trap enabled
-|
- btstb #snan_bit,FPCR_ENABLE(%a6)
- bnes ena |If enabled, then branch
-
- bsrl move_out |else SNAN disabled
-|
-| It is possible to have an inex1 exception with the
-| snan. If the inex enable bit is set in the FPCR, and either
-| inex2 or inex1 occurred, we must clean up and branch to the
-| real inex handler.
-|
-ck_inex:
- moveb FPCR_ENABLE(%a6),%d0
- andb FPSR_EXCEPT(%a6),%d0
- andib #0x3,%d0
- beq end_snan
-|
-| Inexact enabled and reported, and we must take an inexact exception.
-|
-take_inex:
- moveb #INEX_VEC,EXC_VEC+1(%a6)
- moveml USER_DA(%a6),%d0-%d1/%a0-%a1
- fmovemx USER_FP0(%a6),%fp0-%fp3
- fmoveml USER_FPCR(%a6),%fpcr/%fpsr/%fpiar
- frestore (%a7)+
- unlk %a6
- bral real_inex
-|
-| SNAN is enabled. Check if inst is move_out.
-| Make any corrections to the 040 output as necessary.
-|
-ena:
- btstb #5,CMDREG1B(%a6) |if set, inst is move out
- beq not_out
-
- bsrl move_out
-
-report_snan:
- moveb (%a7),VER_TMP(%a6)
- cmpib #VER_40,(%a7) |test for orig unimp frame
- bnes ck_rev
- moveql #13,%d0 |need to zero 14 lwords
- bras rep_con
-ck_rev:
- moveql #11,%d0 |need to zero 12 lwords
-rep_con:
- clrl (%a7)
-loop1:
- clrl -(%a7) |clear and dec a7
- dbra %d0,loop1
- moveb VER_TMP(%a6),(%a7) |format a busy frame
- moveb #BUSY_SIZE-4,1(%a7)
- movel USER_FPSR(%a6),FPSR_SHADOW(%a6)
- orl #sx_mask,E_BYTE(%a6)
- moveml USER_DA(%a6),%d0-%d1/%a0-%a1
- fmovemx USER_FP0(%a6),%fp0-%fp3
- fmoveml USER_FPCR(%a6),%fpcr/%fpsr/%fpiar
- frestore (%a7)+
- unlk %a6
- bral real_snan
-|
-| Exit snan handler by expanding the unimp frame into a busy frame
-|
-end_snan:
- bclrb #E1,E_BYTE(%a6)
-
- moveb (%a7),VER_TMP(%a6)
- cmpib #VER_40,(%a7) |test for orig unimp frame
- bnes ck_rev2
- moveql #13,%d0 |need to zero 14 lwords
- bras rep_con2
-ck_rev2:
- moveql #11,%d0 |need to zero 12 lwords
-rep_con2:
- clrl (%a7)
-loop2:
- clrl -(%a7) |clear and dec a7
- dbra %d0,loop2
- moveb VER_TMP(%a6),(%a7) |format a busy frame
- moveb #BUSY_SIZE-4,1(%a7) |write busy size
- movel USER_FPSR(%a6),FPSR_SHADOW(%a6)
- orl #sx_mask,E_BYTE(%a6)
- moveml USER_DA(%a6),%d0-%d1/%a0-%a1
- fmovemx USER_FP0(%a6),%fp0-%fp3
- fmoveml USER_FPCR(%a6),%fpcr/%fpsr/%fpiar
- frestore (%a7)+
- unlk %a6
- bral fpsp_done
-
-|
-| Move_out
-|
-move_out:
- movel EXC_EA(%a6),%a0 |get <ea> from exc frame
-
- bfextu CMDREG1B(%a6){#3:#3},%d0 |move rx field to d0{2:0}
- cmpil #0,%d0 |check for long
- beqs sto_long |branch if move_out long
-
- cmpil #4,%d0 |check for word
- beqs sto_word |branch if move_out word
-
- cmpil #6,%d0 |check for byte
- beqs sto_byte |branch if move_out byte
-
-|
-| Not byte, word or long
-|
- rts
-|
-| Get the 32 most significant bits of etemp mantissa
-|
-sto_long:
- movel ETEMP_HI(%a6),%d1
- movel #4,%d0 |load byte count
-|
-| Set signalling nan bit
-|
- bsetl #30,%d1
-|
-| Store to the users destination address
-|
- tstl %a0 |check if <ea> is 0
- beqs wrt_dn |destination is a data register
-
- movel %d1,-(%a7) |move the snan onto the stack
- movel %a0,%a1 |load dest addr into a1
- movel %a7,%a0 |load src addr of snan into a0
- bsrl mem_write |write snan to user memory
- movel (%a7)+,%d1 |clear off stack
- rts
-|
-| Get the 16 most significant bits of etemp mantissa
-|
-sto_word:
- movel ETEMP_HI(%a6),%d1
- movel #2,%d0 |load byte count
-|
-| Set signalling nan bit
-|
- bsetl #30,%d1
-|
-| Store to the users destination address
-|
- tstl %a0 |check if <ea> is 0
- beqs wrt_dn |destination is a data register
-
- movel %d1,-(%a7) |move the snan onto the stack
- movel %a0,%a1 |load dest addr into a1
- movel %a7,%a0 |point to low word
- bsrl mem_write |write snan to user memory
- movel (%a7)+,%d1 |clear off stack
- rts
-|
-| Get the 8 most significant bits of etemp mantissa
-|
-sto_byte:
- movel ETEMP_HI(%a6),%d1
- movel #1,%d0 |load byte count
-|
-| Set signalling nan bit
-|
- bsetl #30,%d1
-|
-| Store to the users destination address
-|
- tstl %a0 |check if <ea> is 0
- beqs wrt_dn |destination is a data register
- movel %d1,-(%a7) |move the snan onto the stack
- movel %a0,%a1 |load dest addr into a1
- movel %a7,%a0 |point to source byte
- bsrl mem_write |write snan to user memory
- movel (%a7)+,%d1 |clear off stack
- rts
-
-|
-| wrt_dn --- write to a data register
-|
-| We get here with D1 containing the data to write and D0 the
-| number of bytes to write: 1=byte,2=word,4=long.
-|
-wrt_dn:
- movel %d1,L_SCR1(%a6) |data
- movel %d0,-(%a7) |size
- bsrl get_fline |returns fline word in d0
- movel %d0,%d1
- andil #0x7,%d1 |d1 now holds register number
- movel (%sp)+,%d0 |get original size
- cmpil #4,%d0
- beqs wrt_long
- cmpil #2,%d0
- bnes wrt_byte
-wrt_word:
- orl #0x8,%d1
- bral reg_dest
-wrt_long:
- orl #0x10,%d1
- bral reg_dest
-wrt_byte:
- bral reg_dest
-|
-| Check if it is a src nan or dst nan
-|
-not_out:
- movel DTAG(%a6),%d0
- bfextu %d0{#0:#3},%d0 |isolate dtag in lsbs
-
- cmpib #3,%d0 |check for nan in destination
- bnes issrc |destination nan has priority
-dst_nan:
- btstb #6,FPTEMP_HI(%a6) |check if dest nan is an snan
- bnes issrc |no, so check source for snan
- movew FPTEMP_EX(%a6),%d0
- bras cont
-issrc:
- movew ETEMP_EX(%a6),%d0
-cont:
- btstl #15,%d0 |test for sign of snan
- beqs clr_neg
- bsetb #neg_bit,FPSR_CC(%a6)
- bra report_snan
-clr_neg:
- bclrb #neg_bit,FPSR_CC(%a6)
- bra report_snan
-
- |end