m2-internship/libunwind-eh_elf
1
0
Fork 0
mirror of https://github.com/tobast/libunwind-eh_elf.git synced 2024-11-26 17:17:39 +01:00
Code Issues Releases Activity

Remove perf-tuning code, make it fit in 80 columns.

Browse source 
(Logical change 1.195)
This commit is contained in:
mostang.com!davidm 2004-03-31 00:41:59 +00:00
parent 3be31f5dcb
commit 50160e1df1
1 changed files with 4 additions and 200 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

204
src/ia64/getcontext-ia64.S
View file

@ -39,89 +39,6 @@ WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */
.global _Uia64_getcontext
.proc _Uia64_getcontext
_Uia64_getcontext:
#if 0
add r16 = 0x000, r32
add r17 = 0x080, r32
add r18 = 0x100, r32
add r19 = 0x180, r32
add r20 = 0x200, r32
add r21 = 0x280, r32
add r22 = 0x300, r32
add r23 = 0x380, r32
;;
ld8 r16 = [r16]
ld8 r17 = [r17]
ld8 r18 = [r18]
ld8 r19 = [r19]
ld8 r20 = [r20]
ld8 r21 = [r21]
ld8 r22 = [r22]
ld8 r23 = [r23]
;;
add r16 = r16, r17
add r18 = r18, r19
add r20 = r20, r21
add r22 = r22, r23
;;
add r16 = r16, r18
add r20 = r20, r22
;;
add r8 = r16, r20
br.ret.sptk.many rp
#elif 0
add r2 = GR(1), r32;; st8 [r2] = r0
add r2 = SC_FLAGS, r32;;st8 [r2] = r0
add r2 = SC_PR, r32;; st8 [r2] = r0
add r2 = GR(12), r32;; st8 [r2] = r0
add r2 = FR(2), r32;; stf.spill [r2] = f0
add r2 = FR(16), r32;; stf.spill [r2] = f0
add r2 = FR(24), r32;; stf.spill [r2] = f0
add r2 = FR(31), r32;; stf.spill [r2] = f0
add r2 = GR(4), r32;; st8 [r2] = r0
add r2 = GR(5), r32;; st8 [r2] = r0
add r2 = GR(7), r32;; st8 [r2] = r0
add r2 = GR(6), r32;; st8 [r2] = r0
add r2 = BR(0), r32;; st8 [r2] = r0 // 2 cycles
add r2 = BR(1), r32;; st8 [r2] = r0 // 2 cycles
add r2 = BR(2), r32;; st8 [r2] = r0 // 2 cycles
add r2 = BR(4), r32;; st8 [r2] = r0 // 2 cycles
add r2 = BR(3), r32;; st8 [r2] = r0 // 2 cycles
add r2 = BR(5), r32;; st8 [r2] = r0 // 2 cycles
add r2 = SC_PFS, r32;; st8 [r2] = r0 // 2 cycles
add r2 = SC_LC, r32;; st8 [r2] = r0 // 2 cycles
add r2 = SC_UNAT, r32;; st8 [r2] = r0 // 5 cycles
add r2 = SC_BSP, r32;; st8 [r2] = r0 // 12 cycles
add r2 = SC_FPSR, r32;; st8 [r2] = r0 // 12 cycles
add r2 = FR(3), r32;; stf.spill [r2] = f0
add r2 = FR(4), r32;; stf.spill [r2] = f0
add r2 = FR(5), r32;; stf.spill [r2] = f0
add r2 = SC_RNAT, r32;; st8 [r2] = r0 // 5 cycles
add r2 = FR(17), r32;; stf.spill [r2] = f0
add r2 = FR(18), r32;; stf.spill [r2] = f0
add r2 = FR(19), r32;; stf.spill [r2] = f0
add r2 = FR(20), r32;; stf.spill [r2] = f0
add r2 = FR(21), r32;; stf.spill [r2] = f0
add r2 = SC_NAT, r32;; st8 [r2] = r0 // last GR spill + 9 cycles
add r2 = FR(22), r32;; stf.spill [r2] = f0
add r2 = FR(23), r32;; stf.spill [r2] = f0
add r2 = FR(25), r32;; stf.spill [r2] = f0
add r2 = FR(26), r32;; stf.spill [r2] = f0
add r2 = FR(27), r32;; stf.spill [r2] = f0
add r2 = FR(28), r32;; stf.spill [r2] = f0
add r2 = FR(29), r32;; stf.spill [r2] = f0
add r2 = FR(30), r32;; stf.spill [r2] = f0
br.ret.sptk.many rp
#elif 1
.prologue
alloc rPFS = ar.pfs, 1, 0, 0, 0 // M2
mov rPR = pr // I0, 2 cycles
@ -135,17 +52,17 @@ _Uia64_getcontext:
dep.z rFLAGS = -1, IA64_SC_FLAG_SYNCHRONOUS_BIT, 1 // I0, 1 cycle
;;
mov.m rRSC = ar.rsc // M2, 12 cycles
mov.m rRSC = ar.rsc // M2, 12 cyc.
st8 [r2] = rFLAGS, (SC_PR - SC_FLAGS) // M3
add r3 = FR(2), in0
;;
mov.m rBSP = ar.bsp // M2, 12 cycles
mov.m rBSP = ar.bsp // M2, 12 cyc.
st8 [r2] = rPR, (GR(12) - SC_PR) // M3
add r8 = FR(16), in0
;;
mov.m rFPSR = ar.fpsr // M2, 12 cycles
mov.m rFPSR = ar.fpsr // M2, 12 cyc.
st8.spill [r2] = r12, (GR(4) - GR(12)) // M3
add r9 = FR(24), in0
;;
@ -190,7 +107,7 @@ _Uia64_getcontext:
mov.i rLC = ar.lc // I0, 2 cycles
;;
mov.m ar.rsc = rTMP // put RSE into lazy mode // M2, ?? cycles
mov.m ar.rsc = rTMP // put RSE into lazy mode // M2, ? cycles
st8 [r2] = rB3, (BR(5) - BR(3)) // M3, bank 0
extr.u rPOS = rPOS, 3, 6 // get NaT bitnr for r0 // I0
;;
@ -253,117 +170,4 @@ _Uia64_getcontext:
stf.spill [r9] = f30 // M2
mov r8 = 0
br.ret.sptk.many rp
#elif 0
.prologue
alloc rPFS = ar.pfs, 1, 0, 0, 0
add r3 = SC_MASK, r32
;;
st8 [r3] = r0 // clear sc->sc_mask
flushrs // save dirty partition on rbs
mov.m rFPSR = ar.fpsr
mov.m rRSC = ar.rsc
add r2 = SC_GR+1*8, r32
;;
mov.m rBSP = ar.bsp
.save ar.unat, rUNAT
mov.m rUNAT = ar.unat
.body
add r3 = SC_GR+4*8, r32
;;
.mem.offset 0,0; st8.spill [r2] = r1, (5*8 - 1*8)
.mem.offset 8,0; st8.spill [r3] = r4, 16
;;
.mem.offset 0,0; st8.spill [r2] = r5, 16
.mem.offset 8,0; st8.spill [r3] = r6, 48
and rTMP = ~0x3, rRSC
;;
.mem.offset 0,0; st8.spill [r2] = r7, (SC_FR+2*16-(SC_GR+7*8))
.mem.offset 8,0; st8.spill [r3] = sp, (SC_FR+3*16-(SC_GR+12*8))
;;
mov.m ar.rsc = rTMP // put RSE into enforced lazy mode
mov.m rNAT = ar.unat
mov.i rLC = ar.lc
;;
mov.m rRNAT = ar.rnat
mov.m ar.rsc = rRSC // restore RSE mode
mov rPR = pr
/*
* Rotate NaT bits by rPOS positions to the right:
*/
stf.spill [r2] = f2, 32
stf.spill [r3] = f3, 32
add rPOS = SC_GR, r32 // rPOS <- &sc_gr[0]
;;
stf.spill [r2] = f4, (16*16-4*16)
stf.spill [r3] = f5, (17*16-5*16)
extr.u rPOS = rPOS, 3, 6 // get NaT bit number for r0
;;
stf.spill [r2] = f16, 32
stf.spill [r3] = f17, 32
sub rCPOS = 64, rPOS
;;
stf.spill [r2] = f18, 32
stf.spill [r3] = f19, 32
shr.u rTMP = rNAT, rPOS
;;
stf.spill [r2] = f20, 32
stf.spill [r3] = f21, 32
shl rNAT = rNAT, rCPOS
;;
stf.spill [r2] = f22, 32
stf.spill [r3] = f23, 32
or rNAT = rNAT, rTMP
;;
stf.spill [r2] = f24, 32
stf.spill [r3] = f25, 32
mov r8 = 0
;;
stf.spill [r2] = f26, 32
stf.spill [r3] = f27, 32
mov r9 = 1
;;
stf.spill [r2] = f28, 32
stf.spill [r3] = f29, 32
mov rB0 = b0
;;
stf.spill [r2] = f30, 32
stf.spill [r3] = f31, 32
mov rB1 = b1
;;
mov ar.unat = rUNAT // done with integer regs; restore caller's UNaT
add r2 = SC_NAT, r32
add r3 = SC_BSP, r32
;;
st8 [r2] = rNAT, (SC_RNAT-SC_NAT)
st8 [r3] = rBSP, (SC_UNAT-SC_BSP)
mov rB2 = b2
;;
st8 [r2] = rRNAT, (SC_FPSR-SC_RNAT)
st8 [r3] = rUNAT, (SC_PFS-SC_UNAT)
mov rB3 = b3
;;
st8 [r2] = rFPSR, (SC_LC-SC_FPSR)
st8 [r3] = rPFS, (SC_PR-SC_PFS)
mov rB4 = b4
;;
st8 [r2] = rLC, (SC_BR+0*8-SC_LC)
st8 [r3] = rPR, (SC_BR+1*8-SC_PR)
mov rB5 = b5
;;
st8 [r2] = rB0, 16
st8 [r3] = rB1, 16
;;
st8 [r2] = rB2, 16
st8 [r3] = rB3, 16
;;
st8 [r2] = rB4
st8 [r3] = rB5
br.ret.sptk.many rp
#endif
.endp _Uia64_getcontext