1 /* Copyright (C) 2001, 2002 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by David Mosberger-Tang <davidm@hpl.hp.com>.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, write to the Free
17 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
23 #include "ucontext_i.h"
25 /* __getcontext (ucontext_t *ucp)
27 Saves the machine context in UCP such that when it is activated,
28 it appears as if __getcontext() returned again. The only difference
29 is that on a first return, r9 contains 1 and on a subsequent
30 return, it contains 0.
32 This implementation in intended to be used for *synchronous* context
33 switches only. Therefore, it does not have to save anything
34 other than the PRESERVED state. */
39 alloc r11 = ar.pfs, 1, 0, 4, 0
41 // sigprocmask (SIG_BLOCK, NULL, &sc->sc_mask):
46 flushrs // save dirty partition on rbs
50 mov out3 = 8 // sizeof kernel sigset_t
51 DO_CALL(__NR_rt_sigprocmask)
55 add r2 = SC_GR+1*8, r32
62 add r3 = SC_GR+4*8, r32
65 .mem.offset 0,0; st8.spill [r2] = r1, (5*8 - 1*8)
66 .mem.offset 8,0; st8.spill [r3] = r4, 16
69 .mem.offset 0,0; st8.spill [r2] = r5, 16
70 .mem.offset 8,0; st8.spill [r3] = r6, 48
73 .mem.offset 0,0; st8.spill [r2] = r7, (SC_FR+2*16-(SC_GR+7*8))
74 .mem.offset 8,0; st8.spill [r3] = sp, (SC_FR+3*16-(SC_GR+12*8))
76 mov.m ar.rsc = rTMP // put RSE into enforced lazy mode
81 mov.m ar.rsc = rRSC // restore RSE mode
85 * Rotate NaT bits by rPOS positions to the right:
87 stf.spill [r2] = f2, 32
88 stf.spill [r3] = f3, 32
89 add rPOS = SC_GR, r32 // rPOS <- &sc_gr[0]
91 stf.spill [r2] = f4, (16*16-4*16)
92 stf.spill [r3] = f5, (17*16-5*16)
93 extr.u rPOS = rPOS, 3, 6 // get NaT bit number for r0
95 stf.spill [r2] = f16, 32
96 stf.spill [r3] = f17, 32
99 stf.spill [r2] = f18, 32
100 stf.spill [r3] = f19, 32
101 shr.u rTMP = rNAT, rPOS
103 stf.spill [r2] = f20, 32
104 stf.spill [r3] = f21, 32
105 shl rNAT = rNAT, rCPOS
107 stf.spill [r2] = f22, 32
108 stf.spill [r3] = f23, 32
111 stf.spill [r2] = f24, 32
112 stf.spill [r3] = f25, 32
115 stf.spill [r2] = f26, 32
116 stf.spill [r3] = f27, 32
119 stf.spill [r2] = f28, 32
120 stf.spill [r3] = f29, 32
123 stf.spill [r2] = f30, 32
124 stf.spill [r3] = f31, 32
127 mov ar.unat = rUNAT // we're done spilling integer regs; restore caller's UNaT
131 st8 [r2] = rNAT, (SC_RNAT-SC_NAT)
132 st8 [r3] = rBSP, (SC_UNAT-SC_BSP)
135 st8 [r2] = rRNAT, (SC_FPSR-SC_RNAT)
136 st8 [r3] = rUNAT, (SC_PFS-SC_UNAT)
139 st8 [r2] = rFPSR, (SC_LC-SC_FPSR)
140 st8 [r3] = rPFS, (SC_PR-SC_PFS)
143 st8 [r2] = rLC, (SC_BR+0*8-SC_LC)
144 st8 [r3] = rPR, (SC_BR+1*8-SC_PR)
158 weak_alias (__getcontext, getcontext)