asm.h revision 1.36 1 /* $NetBSD: asm.h,v 1.36 2011/02/07 06:37:01 matt Exp $ */
2
3 /*
4 * Copyright (C) 1995, 1996 Wolfgang Solfrank.
5 * Copyright (C) 1995, 1996 TooLs GmbH.
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed by TooLs GmbH.
19 * 4. The name of TooLs GmbH may not be used to endorse or promote products
20 * derived from this software without specific prior written permission.
21 *
22 * THIS SOFTWARE IS PROVIDED BY TOOLS GMBH ``AS IS'' AND ANY EXPRESS OR
23 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
24 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
25 * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
26 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
27 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
28 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
29 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
30 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
31 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 */
33
34 #ifndef _PPC_ASM_H_
35 #define _PPC_ASM_H_
36
37 #ifdef _LP64
38
39 /* ppc64 is always PIC, r2 is always the TOC */
40
41 #define PIC_PLT(x) .x
42
43 #else
44
45 #ifdef PIC
46 #define PIC_PROLOGUE XXX
47 #define PIC_EPILOGUE XXX
48 #define PIC_PLT(x) x+32768@plt
49 #ifdef __STDC__
50 #define PIC_TOCNAME(name) .LCTOC_##name
51 #else
52 #define PIC_TOCNAME(name) .LCTOC_/**/name
53 #endif
54 #define PIC_TOCSETUP(name, reg) \
55 .pushsection ".got2","aw" ;\
56 PIC_TOCNAME(name) = . + 32768 ;\
57 .popsection ;\
58 bcl 20,31,1001f ;\
59 1001: mflr reg ;\
60 addis reg,reg,PIC_TOCNAME(name)-1001b@ha ;\
61 addi reg,reg,PIC_TOCNAME(name)-1001b@l
62 #define PIC_GOTSETUP(reg) \
63 bcl 20,31,2002f ;\
64 2002: mflr reg ;\
65 addis reg,reg,_GLOBAL_OFFSET_TABLE_-2002b@ha ;\
66 addi reg,reg,_GLOBAL_OFFSET_TABLE_-2002b@l
67 #ifdef __STDC__
68 #define PIC_GOT(x) XXX
69 #define PIC_GOTOFF(x) XXX
70 #else /* not __STDC__ */
71 #define PIC_GOT(x) XXX
72 #define PIC_GOTOFF(x) XXX
73 #endif /* __STDC__ */
74 #else
75 #define PIC_PROLOGUE
76 #define PIC_EPILOGUE
77 #define PIC_PLT(x) x
78 #define PIC_GOT(x) x
79 #define PIC_GOTOFF(x) x
80 #define PIC_GOTSETUP(r)
81 #define PIC_TOCSETUP(n, r)
82 #endif
83
84 #endif
85
86 #define _C_LABEL(x) x
87 #define _ASM_LABEL(x) x
88
89 #define _GLOBAL(x) \
90 .data; .align 2; .globl x; x:
91
92 #ifdef GPROF
93 # define _PROF_PROLOGUE mflr 0; stw 0,4(1); bl _mcount
94 #else
95 # define _PROF_PROLOGUE
96 #endif
97
98 #ifdef _LP64
99
100 #define SF_HEADER_SZ 48
101 #define SF_PARAM_SZ 64
102 #define SF_SZ (SF_HEADER_SZ + SF_PARAM_SZ)
103
104 #define SF_SP 0
105 #define SF_CR 8
106 #define SF_LR 16
107 #define SF_PARAM SF_HEADER_SZ
108
109 #define ENTRY(y) \
110 .globl y; \
111 .section ".opd","aw"; \
112 .align 3; \
113 y: .quad .y,.TOC.@tocbase,0; \
114 .previous; \
115 .size y,24; \
116 .type .y,@function; \
117 .globl .y; \
118 .align 3; \
119 .y:
120
121 #define CALL(y) \
122 bl .y; \
123 nop
124
125 #define ENTRY_NOPROFILE(y) ENTRY(y)
126 #define ASENTRY(y) ENTRY(y)
127 #else
128
129 #define _ENTRY(x) \
130 .text; .align 2; .globl x; .type x,@function; x:
131
132 #define ENTRY(y) _ENTRY(_C_LABEL(y)); _PROF_PROLOGUE
133 #define END(y) .size _C_LABEL(y),.-_C_LABEL(y)
134
135 #define ENTRY_NOPROFILE(y) _ENTRY(_C_LABEL(y))
136
137 #define CALL(y) \
138 bl y
139
140 #define ASENTRY(y) _ENTRY(_ASM_LABEL(y)); _PROF_PROLOGUE
141 #endif
142
143 #define GLOBAL(y) _GLOBAL(_C_LABEL(y))
144
145 #define ASMSTR .asciz
146
147 #undef __RCSID
148 #define RCSID(x) __RCSID(x)
149 #define __RCSID(x) .pushsection .ident; .asciz x; .popsection
150
151 #ifdef __ELF__
152 #define WEAK_ALIAS(alias,sym) \
153 .weak alias; \
154 alias = sym
155 #endif
156 /*
157 * STRONG_ALIAS: create a strong alias.
158 */
159 #define STRONG_ALIAS(alias,sym) \
160 .globl alias; \
161 alias = sym
162
163 #ifdef __STDC__
164 #define WARN_REFERENCES(sym,msg) \
165 .pushsection .gnu.warning. ## sym; \
166 .ascii msg; \
167 .popsection
168 #else
169 #define WARN_REFERENCES(sym,msg) \
170 .pushsection .gnu.warning./**/sym; \
171 .ascii msg; \
172 .popsection
173 #endif /* __STDC__ */
174
175 #ifdef _KERNEL
176 /*
177 * Get cpu_info pointer for current processor. Always in SPRG0. *ALWAYS*
178 */
179 #define GET_CPUINFO(r) mfsprg r,0
180 /*
181 * IN:
182 * R4[er] = first free byte beyond end/esym.
183 *
184 * OUT:
185 * R1[sp] = new kernel stack
186 * R4[er] = kernelend
187 */
188
189 #ifdef CI_INTSTK
190 #define INIT_CPUINFO_INTSTK(er,tmp1) \
191 addi er,er,INTSTK; \
192 stptr er,CI_INTSTK(tmp1)
193 #else
194 #define INIT_CPUINFO_INTSTK(er,tmp1) /* nothing */
195 #endif
196
197 /*
198 * We use lis/ori instead of lis/addi in case tmp2 is r0.
199 */
200 #define INIT_CPUINFO(er,sp,tmp1,tmp2) \
201 li tmp1,PAGE_MASK; \
202 add er,er,tmp1; \
203 andc er,er,tmp1; /* page align */ \
204 lis tmp1,_C_LABEL(cpu_info)@ha; \
205 addi tmp1,tmp1,_C_LABEL(cpu_info)@l; \
206 mtsprg0 tmp1; /* save for later use */ \
207 INIT_CPUINFO_INTSTK(er,tmp1); \
208 lis tmp2,_C_LABEL(emptyidlespin)@h; \
209 ori tmp2,tmp2,_C_LABEL(emptyidlespin)@l; \
210 stptr tmp2,CI_IDLESPIN(tmp1); \
211 li tmp2,-1; \
212 stint tmp2,CI_IDEPTH(tmp1); \
213 li tmp2,0; \
214 lis tmp1,_C_LABEL(lwp0)@h; \
215 ori tmp1,tmp1,_C_LABEL(lwp0)@l; \
216 stptr er,L_PCB(tmp1); /* XXXuvm_lwp_getuarea */ \
217 addi er,er,USPACE; /* stackpointer for lwp0 */ \
218 addi sp,er,-FRAMELEN-CALLFRAMELEN; /* stackpointer for lwp0 */ \
219 stptr sp,L_MD_UTF(tmp1); /* save in lwp0.l_md.md_utf */ \
220 /* er = end of mem reserved for kernel */ \
221 li tmp2,0; \
222 stptr tmp2,-CALLFRAMELEN(er); /* end of stack chain */ \
223 stptru tmp2,-CALLFRAMELEN(sp) /* end of stack chain */
224
225 #endif
226
227 /* Condition Register Bit Fields */
228
229 #if defined(_REGNAMES)
230 #if defined(_KERNEL) || defined(_STANDALONE)
231 #define cr0 0
232 #define cr1 1
233 #define cr2 2
234 #define cr3 3
235 #define cr4 4
236 #define cr5 5
237 #define cr6 6
238 #define cr7 7
239 #endif
240
241 /* General Purpose Registers (GPRs) */
242
243 #if defined(_KERNEL) || defined(_STANDALONE)
244 #define r0 0
245 #define r1 1
246 #define r2 2
247 #define r3 3
248 #define r4 4
249 #define r5 5
250 #define r6 6
251 #define r7 7
252 #define r8 8
253 #define r9 9
254 #define r10 10
255 #define r11 11
256 #define r12 12
257 #define r13 13
258 #define r14 14
259 #define r15 15
260 #define r16 16
261 #define r17 17
262 #define r18 18
263 #define r19 19
264 #define r20 20
265 #define r21 21
266 #define r22 22
267 #define r23 23
268 #define r24 24
269 #define r25 25
270 #define r26 26
271 #define r27 27
272 #define r28 28
273 #define r29 29
274 #define r30 30
275 #define r31 31
276 #endif
277
278 /* Floating Point Registers (FPRs) */
279
280 #if defined(_KERNEL) || defined(_STANDALONE)
281 #define fr0 0
282 #define fr1 1
283 #define fr2 2
284 #define fr3 3
285 #define fr4 4
286 #define fr5 5
287 #define fr6 6
288 #define fr7 7
289 #define fr8 8
290 #define fr9 9
291 #define fr10 10
292 #define fr11 11
293 #define fr12 12
294 #define fr13 13
295 #define fr14 14
296 #define fr15 15
297 #define fr16 16
298 #define fr17 17
299 #define fr18 18
300 #define fr19 19
301 #define fr20 20
302 #define fr21 21
303 #define fr22 22
304 #define fr23 23
305 #define fr24 24
306 #define fr25 25
307 #define fr26 26
308 #define fr27 27
309 #define fr28 28
310 #define fr29 29
311 #define fr30 30
312 #define fr31 31
313 #endif
314 #endif /* _REGNAMES */
315
316 /*
317 * Add some psuedo instructions to made sharing of assembly versions of
318 * ILP32 and LP64 code possible.
319 */
320 #define ldint lwz /* not needed but for completeness */
321 #define ldintu lwzu /* not needed but for completeness */
322 #define stint stw /* not needed but for completeness */
323 #define stintu stwu /* not needed but for completeness */
324
325 #ifndef _LP64
326
327 #define ldlong lwz /* load "C" long */
328 #define ldlongu lwzu /* load "C" long with udpate */
329 #define stlong stw /* load "C" long */
330 #define stlongu stwu /* load "C" long with udpate */
331 #define ldptr lwz /* load "C" pointer */
332 #define ldptru lwzu /* load "C" pointer with udpate */
333 #define stptr stw /* load "C" pointer */
334 #define stptru stwu /* load "C" pointer with udpate */
335 #define ldreg lwz /* load PPC general register */
336 #define ldregu lwzu /* load PPC general register with udpate */
337 #define streg stw /* load PPC general register */
338 #define stregu stwu /* load PPC general register with udpate */
339 #define SZREG 4 /* 4 byte registers */
340
341 #define lptrarx lwarx /* load "C" pointer with reservation */
342 #define llongarx lwarx /* load "C" long with reservation */
343 #define lregarx lwarx /* load PPC general register with reservation */
344
345 #define stptrcx stwcx /* store "C" pointer conditional */
346 #define stlongcx stwcx /* store "C" long conditional */
347 #define stregcx stwcx /* store PPC general register conditional */
348
349 #define clrrptri clrrwi /* clear right "C" pointer immediate */
350 #define clrrlongi clrrwi /* clear right "C" long immediate */
351 #define clrrregi clrrwi /* clear right PPC general register immediate */
352
353 #else
354
355 #define ldlong ld /* load "C" long */
356 #define ldlongu ldu /* load "C" long with update */
357 #define stlong std /* store "C" long */
358 #define stlongu stdu /* store "C" long with update */
359 #define ldptr ld /* load "C" pointer */
360 #define ldptru ldu /* load "C" pointer with update */
361 #define stptr std /* store "C" pointer */
362 #define stptru stdu /* store "C" pointer with update */
363 #define ldreg ld /* load PPC general register */
364 #define ldregu ldu /* load PPC general register with update */
365 #define streg std /* store PPC general register */
366 #define stregu stdu /* store PPC general register with update */
367 /* redefined this to force an error on PPC64 to catch their use. */
368 #define lmw lmd /* load multiple PPC general registers */
369 #define stmw stmd /* store multiple PPC general registers */
370 #define SZREG 8 /* 8 byte registers */
371
372 #define lptrarx ldarx /* load "C" pointer with reservation */
373 #define llongarx ldarx /* load "C" long with reservation */
374 #define lregarx ldarx /* load PPC general register with reservation */
375
376 #define stptrcx stdcx /* store "C" pointer conditional */
377 #define stlongcx stdcx /* store "C" long conditional */
378 #define stregax stdcx /* store PPC general register conditional */
379
380 #define clrrptri clrrdi /* clear right "C" pointer immediate */
381 #define clrrlongi clrrdi /* clear right "C" long immediate */
382 #define clrrregi clrrdi /* clear right PPC general register immediate */
383
384 #endif
385
386 #ifdef _LOCORE
387 .macro stmd r,dst
388 i = 0
389 .rept 32-\r
390 std i+\r, i*8+\dst
391 i = i + 1
392 .endr
393 .endm
394
395 .macro lmd r,dst
396 i = 0
397 .rept 32-\r
398 ld i+\r, i*8+\dst
399 i = i + 1
400 .endr
401 .endm
402 #endif
403
404 #endif /* !_PPC_ASM_H_ */
405