14ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm/* libunwind - a platform-independent unwind library 24ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm Copyright (C) 2004 Hewlett-Packard Co 34ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm Contributed by David Mosberger-Tang <davidm@hpl.hp.com> 44ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 54ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidmThis file is part of libunwind. 64ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 74ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidmPermission is hereby granted, free of charge, to any person obtaining 84ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidma copy of this software and associated documentation files (the 94ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm"Software"), to deal in the Software without restriction, including 104ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidmwithout limitation the rights to use, copy, modify, merge, publish, 114ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidmdistribute, sublicense, and/or sell copies of the Software, and to 124ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidmpermit persons to whom the Software is furnished to do so, subject to 134ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidmthe following conditions: 144ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 154ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidmThe above copyright notice and this permission notice shall be 164ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidmincluded in all copies or substantial portions of the Software. 174ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 184ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidmTHE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 194ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidmEXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF 204ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidmMERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND 214ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidmNONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE 224ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidmLIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION 234ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidmOF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION 244ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidmWITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */ 254ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 264ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm#include "ucontext_i.h" 274ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 284ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm#define GR(n) (SC_GR + (n)*8) 294ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm#define BR(n) (SC_BR + (n)*8) 304ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm#define FR(n) (SC_FR + (n)*16) 314ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 324ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm/* This should be compatible to the libc's getcontext(), except that 334ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm the sc->sc_mask field is always cleared and that the name is 344ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm prefixed with _Uia64_ so we don't step on the application's 354ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm name-space. */ 364ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 374ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm .align 32 384ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm .protected _Uia64_getcontext 394ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm .global _Uia64_getcontext 404ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm .proc _Uia64_getcontext 414ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm_Uia64_getcontext: 424ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm .prologue 434ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm alloc rPFS = ar.pfs, 1, 0, 0, 0 // M2 444ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov rPR = pr // I0, 2 cycles 454ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm add r2 = GR(1), in0 // I1 464ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 474ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 484ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm .save ar.unat, rUNAT 494ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov.m rUNAT = ar.unat // M2, 5 cycles 504ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm .body 514ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8.spill [r2] = r1, (SC_FLAGS - GR(1)) // M3 524ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm dep.z rFLAGS = -1, IA64_SC_FLAG_SYNCHRONOUS_BIT, 1 // I0, 1 cycle 534ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 544ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 554ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov.m rRSC = ar.rsc // M2, 12 cyc. 564ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8 [r2] = rFLAGS, (SC_PR - SC_FLAGS) // M3 574ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm add r3 = FR(2), in0 584ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 594ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 604ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov.m rBSP = ar.bsp // M2, 12 cyc. 614ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8 [r2] = rPR, (GR(12) - SC_PR) // M3 624ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm add r8 = FR(16), in0 634ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 644ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 654ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov.m rFPSR = ar.fpsr // M2, 12 cyc. 664ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8.spill [r2] = r12, (GR(4) - GR(12)) // M3 674ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm add r9 = FR(24), in0 684ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 694ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 704ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r3] = f2 // M2 714ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r8] = f16 // M3 724ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm add r3 = GR(7), in0 734ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 744ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 754ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm flushrs // M0 764ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r9] = f24, (FR(31) - FR(24)) // M2 774ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov rB0 = b0 // I0, 2 cycles 784ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 794ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 804ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r9] = f31 // M2 814ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8.spill [r2] = r4, (GR(5) - GR(4)) // M3, bank 1 824ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov rB1 = b1 // I0, 2 cycles 834ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 844ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 854ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm.mem.offset 0,0; st8.spill [r2] = r5, (GR(6) - GR(5)) // M4, bank 0 864ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm.mem.offset 8,0; st8.spill [r3] = r7, (BR(0) - GR(7)) // M3, bank 0 874ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov rB2 = b2 // I0, 2 cycles 884ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 894ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 904ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8.spill [r2] = r6, (BR(1) - GR(6)) // M2, bank 1 914ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8 [r3] = rB0, (BR(4) - BR(0)) // M3, bank 1 924ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov rB4 = b4 // I0, 2 cycles 934ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 944ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 954ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov.m rNAT = ar.unat // M2, 5 cycles 964ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8 [r2] = rB1, (BR(2) - BR(1)) // M3, bank 0 974ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov rB3 = b3 984ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 994ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 1004ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8 [r2] = rB2, (BR(3) - BR(2)) // M2, bank 1 1014ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8 [r3] = rB4, (SC_LC - BR(4)) // M3, bank 1 1024ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov rB5 = b5 // I0, 2 cycles 1034ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 1044ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 1054ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm and rTMP = ~0x3, rRSC // M0 1064ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm add rPOS = GR(0), in0 // rPOS <- &sc_gr[0] // M1 1074ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov.i rLC = ar.lc // I0, 2 cycles 1084ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 1094ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 1104ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov.m ar.rsc = rTMP // put RSE into lazy mode // M2, ? cycles 1114ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8 [r2] = rB3, (BR(5) - BR(3)) // M3, bank 0 1124ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm extr.u rPOS = rPOS, 3, 6 // get NaT bitnr for r0 // I0 1134ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 1144ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 1154ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov.m rRNAT = ar.rnat // M2, 5 cycles 1164ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8 [r2] = rB5, (SC_PFS - BR(5)) // M3, bank 0 1174ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm sub rCPOS = 64, rPOS // I0 1184ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 1194ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 1204ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8 [r2] = rPFS, (SC_UNAT - SC_PFS) // M2 1214ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8 [r3] = rLC, (SC_BSP - SC_LC) // M3 1224ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm shr.u rTMP = rNAT, rPOS // I0, 3 cycles 1234ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 1244ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 1254ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8 [r2] = rUNAT, (SC_FPSR - SC_UNAT) // M2 1264ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8 [r3] = rBSP // M3 1274ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm add r8 = FR(3), in0 1284ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 1294ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 1304ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8 [r2] = rFPSR, (SC_RNAT - SC_FPSR) // M2 1314ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r8] = f3, (FR(4) - FR(3)) // M3 1324ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm add r9 = FR(5), in0 1334ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 1344ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 1354ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r8] = f4, (FR(17) - FR(4)) // M2 1364ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r9] = f5, (FR(19) - FR(5)) // M3 1374ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm shl rNAT = rNAT, rCPOS // I0, 3 cycles 1384ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 1394ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 1404ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8 [r2] = rRNAT, (SC_NAT - SC_RNAT) // M2 1414ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r8] = f17, (FR(18) - FR(17)) // M3 1424ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm nop.i 0 1434ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 1444ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 1454ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r8] = f18, (FR(20) - FR(18)) // M2 1464ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r9] = f19, (FR(21) - FR(19)) // M3 1474ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm nop.i 0 1484ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 1494ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 1504ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r8] = f20, (FR(22) - FR(20)) // M2 1514ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r9] = f21, (FR(23) - FR(21)) // M3 1524ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm or rNAT = rNAT, rTMP // I0 1534ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 1544ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm 1554ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm st8 [r2] = rNAT // M2 1564ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r8] = f22, (FR(25) - FR(22)) // M3 1574ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 1584ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r9] = f23, (FR(26) - FR(23)) // M2 1594ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r8] = f25, (FR(27) - FR(25)) // M3 1604ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 1614ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r9] = f26, (FR(28) - FR(26)) // M2 1624ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r8] = f27, (FR(29) - FR(27)) // M3 1634ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 1644ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov.m ar.rsc = rRSC // restore RSE mode // M2 1654ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r9] = f28, (FR(30) - FR(28)) // M3 1664ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 1674ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov.m ar.unat = rUNAT // restore caller's UNaT // M2 1684ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r8] = f29 // M3 1694ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm ;; 1704ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm stf.spill [r9] = f30 // M2 1714ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm mov r8 = 0 1724ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm br.ret.sptk.many rp 1734ba03baf6aa8bf98d2dea8db775aefbb73a44216homeip.net!davidm .endp _Uia64_getcontext 17457e569646368cb730f028ecf1732143474e3e642Jan Kratochvil#ifdef __linux__ 17557e569646368cb730f028ecf1732143474e3e642Jan Kratochvil /* We do not need executable stack. */ 17657e569646368cb730f028ecf1732143474e3e642Jan Kratochvil .section .note.GNU-stack,"",@progbits 17757e569646368cb730f028ecf1732143474e3e642Jan Kratochvil#endif 178