setjmp.S revision 1.1 1 /* $NetBSD: setjmp.S,v 1.1 2018/08/16 18:17:47 jmcneill Exp $ */
2
3 /*
4 * Copyright (c) 2006 - 2008, Intel Corporation. All rights reserved.
5 * This program and the accompanying materials are licensed and made
6 available
7 * under the terms and conditions of the BSD License which accompanies
8 this
9 * distribution. The full text of the license may be found at
10 * http://opensource.org/licenses/bsd-license.php.
11 *
12 * THE PROGRAM IS DISTRIBUTED UNDER THE BSD LICENSE ON AN "AS IS"
13 BASIS,
14 * WITHOUT WARRANTIES OR REPRESENTATIONS OF ANY KIND, EITHER EXPRESS OR
15 * IMPLIED.
16 */
17 .text
18 .globl setjmp
19 .type setjmp, @function
20 setjmp:
21 alloc loc0 = ar.pfs, 1, 2, 1, 0
22 ;;
23 mov r14 = ar.unat
24 mov r15 = ar.bsp
25 add r10 = 0x10*20, in0
26 ;;
27 stf.spill.nta [in0] = f2, 0x10
28 st8.spill.nta [r10] = r4, 8
29 mov r21 = b1
30 ;;
31 stf.spill.nta [in0] = f3, 0x10
32 st8.spill.nta [r10] = r5, 8
33 mov r22 = b2
34 ;;
35 stf.spill.nta [in0] = f4, 0x10
36 st8.spill.nta [r10] = r6, 8
37 mov r23 = b3
38 ;;
39 stf.spill.nta [in0] = f5, 0x10
40 st8.spill.nta [r10] = r7, 8
41 mov r24 = b4
42 ;;
43 stf.spill.nta [in0] = f16, 0x10
44 st8.spill.nta [r10] = sp, 8
45 mov r25 = b5
46 ;;
47 stf.spill.nta [in0] = f17, 0x10
48 st8.nta [r10] = loc1, 8
49 mov r16 = pr
50 ;;
51 stf.spill.nta [in0] = f18, 0x10
52 st8.nta [r10] = r21, 8
53 mov r17 = ar.lc
54 ;;
55 stf.spill.nta [in0] = f19, 0x10
56 st8.nta [r10] = r22, 8
57 ;;
58 stf.spill.nta [in0] = f20, 0x10
59 st8.nta [r10] = r23, 8
60 ;;
61 stf.spill.nta [in0] = f21, 0x10
62 st8.nta [r10] = r24, 8
63 ;;
64 stf.spill.nta [in0] = f22, 0x10
65 st8.nta [r10] = r25, 8
66 ;;
67 stf.spill.nta [in0] = f23, 0x10
68 mov r18 = ar.unat
69 ;;
70 stf.spill.nta [in0] = f24, 0x10
71 st8.nta [r10] = r14, 8
72 ;;
73 stf.spill.nta [in0] = f25, 0x10
74 st8.nta [r10] = r18, 8
75 ;;
76 stf.spill.nta [in0] = f26, 0x10
77 st8.nta [r10] = loc0, 8
78 ;;
79 stf.spill.nta [in0] = f27, 0x10
80 st8.nta [r10] = r15, 8
81 mov r8 = 0
82 ;;
83 stf.spill.nta [in0] = f28, 0x10
84 mov r19 = ar.fpsr
85 ;;
86 stf.spill.nta [in0] = f29, 0x10
87 st8.nta [r10] = r16, 8
88 mov ar.pfs = loc0
89 ;;
90 stf.spill.nta [in0] = f30, 0x10
91 st8.nta [r10] = r17, 8
92 mov b0 = loc1
93 ;;
94 stf.spill.nta [in0] = f31, 0x10
95 st8.nta [r10] = r19
96 ;;
97 mov ar.unat = r14
98 br.ret.sptk b0
99 ;;
100
101 .globl longjmp
102 .type longjmp, @function
103 .regstk 2, 0, 0, 0
104 longjmp:
105 add r10 = 0x10*20 + 8*14, in0
106 movl r2 = ~((((1<<14) - 1) << 16) | 3)
107 ;;
108 ld8.nt1 r14 = [r10], -8*2
109 mov r15 = ar.bspstore
110 ;;
111 ld8.nt1 r17 = [r10], -8
112 mov r16 = ar.rsc
113 cmp.leu p6 = r14, r15
114 ;;
115 ld8.nt1 r18 = [r10], -8
116 ld8.nt1 r25 = [r10], -8
117 and r2 = r16, r2
118 ;;
119 ldf.fill.nt1 f2 = [in0], 0x10
120 ld8.nt1 r24 = [r10], -8
121 mov b5 = r25
122 ;;
123 mov ar.rsc = r2
124 ld8.nt1 r23 = [r10], -8
125 mov b4 = r24
126 ;;
127 ldf.fill.nt1 f3 = [in0], 0x10
128 mov ar.unat = r17
129 (p6) br.spnt.many _skip_flushrs
130 ;;
131 flushrs
132 mov r15 = ar.bsp
133 ;;
134 _skip_flushrs:
135 mov r31 = ar.rnat
136 loadrs
137 ;;
138 ldf.fill.nt1 f4 = [in0], 0x10
139 ld8.nt1 r22 = [r10], -8
140 dep r2 = -1, r14, 3, 6
141 ;;
142 ldf.fill.nt1 f5 = [in0], 0x10
143 ld8.nt1 r21 = [r10], -8
144 cmp.ltu p6 = r2, r15
145 ;;
146 ld8.nt1 r20 = [r10], -0x10
147 (p6) ld8.nta r31 = [r2]
148 mov b3 = r23
149 ;;
150 ldf.fill.nt1 f16 = [in0], 0x10
151 ld8.fill.nt1 r7 = [r10], -8
152 mov b2 = r22
153 ;;
154 ldf.fill.nt1 f17 = [in0], 0x10
155 ld8.fill.nt1 r6 = [r10], -8
156 mov b1 = r21
157 ;;
158 ldf.fill.nt1 f18 = [in0], 0x10
159 ld8.fill.nt1 r5 = [r10], -8
160 mov b0 = r20
161 ;;
162 ldf.fill.nt1 f19 = [in0], 0x10
163 ld8.fill.nt1 r4 = [r10], 8*13
164 ;;
165 ldf.fill.nt1 f20 = [in0], 0x10
166 ld8.nt1 r19 = [r10], 0x10
167 ;;
168 ldf.fill.nt1 f21 = [in0], 0x10
169 ld8.nt1 r26 = [r10], 8
170 mov ar.pfs = r19
171 ;;
172 ldf.fill.nt1 f22 = [in0], 0x10
173 ld8.nt1 r27 = [r10], 8
174 mov pr = r26, -1
175 ;;
176 ldf.fill.nt1 f23 = [in0], 0x10
177 ld8.nt1 r28 = [r10], -17*8 - 0x10
178 mov ar.lc = r27
179 ;;
180 ldf.fill.nt1 f24 = [in0], 0x10
181 ldf.fill.nt1 f25 = [in0], 0x10
182 mov r8 = in1
183 ;;
184 ldf.fill.nt1 f26 = [in0], 0x10
185 ldf.fill.nt1 f31 = [r10], -0x10
186 ;;
187 ldf.fill.nt1 f27 = [in0], 0x10
188 ldf.fill.nt1 f30 = [r10], -0x10
189 ;;
190 ldf.fill.nt1 f28 = [in0]
191 ldf.fill.nt1 f29 = [r10], 0x10*3 + 8*4
192 ;;
193 ld8.fill.nt1 sp = [r10]
194 mov ar.unat = r18
195 ;;
196 mov ar.bspstore = r14
197 mov ar.rnat = r31
198 ;;
199 invala
200 mov ar.rsc = r16
201 br.ret.sptk b0
202