asm.h revision 1.19 1 1.19 joerg /* $NetBSD: asm.h,v 1.19 2013/09/12 15:36:17 joerg Exp $ */
2 1.3 deraadt
3 1.1 pk /*
4 1.1 pk * Copyright (c) 1994 Allen Briggs
5 1.1 pk * All rights reserved.
6 1.1 pk *
7 1.1 pk * Gleaned from locore.s and sun3 asm.h which had the following copyrights:
8 1.1 pk * locore.s:
9 1.1 pk * Copyright (c) 1988 University of Utah.
10 1.1 pk * Copyright (c) 1982, 1990 The Regents of the University of California.
11 1.1 pk * sun3/include/asm.h:
12 1.1 pk * Copyright (c) 1993 Adam Glass
13 1.1 pk * Copyright (c) 1990 The Regents of the University of California.
14 1.1 pk *
15 1.1 pk * Redistribution and use in source and binary forms, with or without
16 1.1 pk * modification, are permitted provided that the following conditions
17 1.1 pk * are met:
18 1.1 pk * 1. Redistributions of source code must retain the above copyright
19 1.1 pk * notice, this list of conditions and the following disclaimer.
20 1.1 pk * 2. Redistributions in binary form must reproduce the above copyright
21 1.1 pk * notice, this list of conditions and the following disclaimer in the
22 1.1 pk * documentation and/or other materials provided with the distribution.
23 1.1 pk * 3. All advertising materials mentioning features or use of this software
24 1.1 pk * must display the following acknowledgement:
25 1.1 pk * This product includes software developed by the University of
26 1.1 pk * California, Berkeley and its contributors.
27 1.1 pk * 4. Neither the name of the University nor the names of its contributors
28 1.1 pk * may be used to endorse or promote products derived from this software
29 1.1 pk * without specific prior written permission.
30 1.1 pk *
31 1.1 pk * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
32 1.1 pk * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
33 1.1 pk * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
34 1.1 pk * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
35 1.1 pk * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
36 1.1 pk * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
37 1.1 pk * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
38 1.1 pk * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
39 1.1 pk * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
40 1.1 pk * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
41 1.1 pk * SUCH DAMAGE.
42 1.1 pk */
43 1.1 pk
44 1.1 pk #ifndef _ASM_H_
45 1.1 pk #define _ASM_H_
46 1.1 pk
47 1.14 mrg /* Pull in CCFSZ, CC64FSZ, and BIAS from frame.h */
48 1.14 mrg #ifndef _LOCORE
49 1.14 mrg #define _LOCORE
50 1.14 mrg #endif
51 1.14 mrg #include <machine/frame.h>
52 1.14 mrg
53 1.6 tv #ifdef __ELF__
54 1.6 tv #define _C_LABEL(name) name
55 1.6 tv #else
56 1.1 pk #ifdef __STDC__
57 1.1 pk #define _C_LABEL(name) _ ## name
58 1.1 pk #else
59 1.1 pk #define _C_LABEL(name) _/**/name
60 1.6 tv #endif
61 1.1 pk #endif
62 1.1 pk #define _ASM_LABEL(name) name
63 1.1 pk
64 1.19 joerg #ifdef __PIC__
65 1.1 pk /*
66 1.1 pk * PIC_PROLOGUE() is akin to the compiler generated function prologue for
67 1.1 pk * PIC code. It leaves the address of the Global Offset Table in DEST,
68 1.14 mrg * clobbering register TMP in the process.
69 1.14 mrg *
70 1.14 mrg * We can use two code sequences. We can read the %pc or use the call
71 1.14 mrg * instruction that saves the pc in %o7. Call requires the branch unit and
72 1.14 mrg * IEU1, and clobbers %o7 which needs to be restored. This instruction
73 1.14 mrg * sequence takes about 4 cycles due to instruction interdependence. Reading
74 1.14 mrg * the pc takes 4 cycles to dispatch and is always dispatched alone. That
75 1.14 mrg * sequence takes 7 cycles.
76 1.1 pk */
77 1.14 mrg #ifdef __arch64__
78 1.14 mrg #define PIC_PROLOGUE(dest,tmp) \
79 1.14 mrg mov %o7, tmp; \
80 1.14 mrg sethi %hi(_GLOBAL_OFFSET_TABLE_-4),dest; \
81 1.14 mrg call 0f; \
82 1.14 mrg or dest,%lo(_GLOBAL_OFFSET_TABLE_+4),dest; \
83 1.14 mrg 0: \
84 1.14 mrg add dest,%o7,dest; \
85 1.14 mrg mov tmp, %o7
86 1.14 mrg #else
87 1.1 pk #define PIC_PROLOGUE(dest,tmp) \
88 1.1 pk mov %o7,tmp; 3: call 4f; nop; 4: \
89 1.7 tv sethi %hi(_C_LABEL(_GLOBAL_OFFSET_TABLE_)-(3b-.)),dest; \
90 1.7 tv or dest,%lo(_C_LABEL(_GLOBAL_OFFSET_TABLE_)-(3b-.)),dest; \
91 1.1 pk add dest,%o7,dest; mov tmp,%o7
92 1.14 mrg #endif
93 1.1 pk
94 1.1 pk /*
95 1.1 pk * PICCY_SET() does the equivalent of a `set var, %dest' instruction in
96 1.1 pk * a PIC-like way, but without involving the Global Offset Table. This
97 1.1 pk * only works for VARs defined in the same file *and* in the text segment.
98 1.1 pk */
99 1.14 mrg #ifdef __arch64__
100 1.14 mrg #define PICCY_SET(var,dest,tmp) \
101 1.14 mrg 3: rd %pc, tmp; add tmp,(var-3b),dest
102 1.14 mrg #else
103 1.1 pk #define PICCY_SET(var,dest,tmp) \
104 1.1 pk mov %o7,tmp; 3: call 4f; nop; 4: \
105 1.1 pk add %o7,(var-3b),dest; mov tmp,%o7
106 1.14 mrg #endif
107 1.1 pk #else
108 1.1 pk #define PIC_PROLOGUE(dest,tmp)
109 1.1 pk #define PICCY_OFFSET(var,dest,tmp)
110 1.1 pk #endif
111 1.1 pk
112 1.1 pk #define FTYPE(x) .type x,@function
113 1.1 pk #define OTYPE(x) .type x,@object
114 1.1 pk
115 1.1 pk #define _ENTRY(name) \
116 1.1 pk .align 4; .globl name; .proc 1; FTYPE(name); name:
117 1.1 pk
118 1.4 jtc #ifdef GPROF
119 1.12 thorpej /* see _MCOUNT_ENTRY in profile.h */
120 1.12 thorpej #ifdef __ELF__
121 1.14 mrg #ifdef __arch64__
122 1.14 mrg #define _PROF_PROLOGUE \
123 1.14 mrg .data; .align 8; 1: .uaword 0; .uaword 0; \
124 1.14 mrg .text; save %sp,-CC64FSZ,%sp; sethi %hi(1b),%o0; call _mcount; \
125 1.14 mrg or %o0,%lo(1b),%o0; restore
126 1.14 mrg #else
127 1.2 pk #define _PROF_PROLOGUE \
128 1.1 pk .data; .align 4; 1: .long 0; \
129 1.12 thorpej .text; save %sp,-96,%sp; sethi %hi(1b),%o0; call _mcount; \
130 1.12 thorpej or %o0,%lo(1b),%o0; restore
131 1.14 mrg #endif
132 1.14 mrg #else
133 1.14 mrg #ifdef __arch64__
134 1.14 mrg #define _PROF_PROLOGUE \
135 1.14 mrg .data; .align 8; 1: .uaword 0; .uaword 0; \
136 1.14 mrg .text; save %sp,-CC64FSZ,%sp; sethi %hi(1b),%o0; call mcount; \
137 1.14 mrg or %o0,%lo(1b),%o0; restore
138 1.12 thorpej #else
139 1.12 thorpej #define _PROF_PROLOGUE \
140 1.12 thorpej .data; .align 4; 1: .long 0; \
141 1.1 pk .text; save %sp,-96,%sp; sethi %hi(1b),%o0; call mcount; \
142 1.1 pk or %o0,%lo(1b),%o0; restore
143 1.12 thorpej #endif
144 1.14 mrg #endif
145 1.1 pk #else
146 1.2 pk #define _PROF_PROLOGUE
147 1.1 pk #endif
148 1.1 pk
149 1.2 pk #define ENTRY(name) _ENTRY(_C_LABEL(name)); _PROF_PROLOGUE
150 1.13 thorpej #define ENTRY_NOPROFILE(name) _ENTRY(_C_LABEL(name))
151 1.2 pk #define ASENTRY(name) _ENTRY(_ASM_LABEL(name)); _PROF_PROLOGUE
152 1.1 pk #define FUNC(name) ASENTRY(name)
153 1.10 chs #define RODATA(name) .align 4; .text; .globl _C_LABEL(name); \
154 1.10 chs OTYPE(_C_LABEL(name)); _C_LABEL(name):
155 1.1 pk
156 1.1 pk
157 1.1 pk #define ASMSTR .asciz
158 1.5 christos
159 1.15 uwe #ifdef __ELF__
160 1.15 uwe #define RCSID(name) .pushsection ".ident"; .asciz name; .popsection
161 1.15 uwe #else
162 1.5 christos #define RCSID(name) .asciz name
163 1.15 uwe #endif
164 1.15 uwe
165 1.15 uwe #ifdef NO_KERNEL_RCSIDS
166 1.15 uwe #define __KERNEL_RCSID(_n, _s) /* nothing */
167 1.15 uwe #else
168 1.15 uwe #define __KERNEL_RCSID(_n, _s) RCSID(_s)
169 1.15 uwe #endif
170 1.11 kleink
171 1.11 kleink #ifdef __ELF__
172 1.11 kleink #define WEAK_ALIAS(alias,sym) \
173 1.11 kleink .weak alias; \
174 1.11 kleink alias = sym
175 1.11 kleink #endif
176 1.16 christos /*
177 1.16 christos * STRONG_ALIAS: create a strong alias.
178 1.16 christos */
179 1.16 christos #define STRONG_ALIAS(alias,sym) \
180 1.16 christos .globl alias; \
181 1.16 christos alias = sym
182 1.8 thorpej
183 1.14 mrg /*
184 1.14 mrg * WARN_REFERENCES: create a warning if the specified symbol is referenced.
185 1.14 mrg */
186 1.14 mrg #ifdef __ELF__
187 1.14 mrg #ifdef __STDC__
188 1.18 joerg #define WARN_REFERENCES(sym,msg) \
189 1.18 joerg .pushsection .gnu.warning. ## sym; \
190 1.18 joerg .ascii msg; \
191 1.18 joerg .popsection
192 1.14 mrg #else
193 1.18 joerg #define WARN_REFERENCES(sym,msg) \
194 1.18 joerg .pushsection .gnu.warning./**/sym; \
195 1.18 joerg .ascii msg; \
196 1.18 joerg .popsection
197 1.14 mrg #endif /* __STDC__ */
198 1.14 mrg #else
199 1.8 thorpej #ifdef __STDC__
200 1.9 thorpej #define __STRING(x) #x
201 1.8 thorpej #define WARN_REFERENCES(sym,msg) \
202 1.9 thorpej .stabs msg ## ,30,0,0,0 ; \
203 1.9 thorpej .stabs __STRING(_ ## sym) ## ,1,0,0,0
204 1.8 thorpej #else
205 1.9 thorpej #define __STRING(x) "x"
206 1.8 thorpej #define WARN_REFERENCES(sym,msg) \
207 1.8 thorpej .stabs msg,30,0,0,0 ; \
208 1.9 thorpej .stabs __STRING(_/**/sym),1,0,0,0
209 1.8 thorpej #endif /* __STDC__ */
210 1.14 mrg #endif /* __ELF__ */
211 1.1 pk
212 1.17 matt #ifdef __arch64__
213 1.17 matt #define INCR64X(what,r0,r1) \
214 1.17 matt sethi %hi(what), r0; \
215 1.17 matt ldx [r0 + %lo(what)], r1; \
216 1.17 matt inc r1; \
217 1.17 matt stx r1, [r0 + %lo(what)]
218 1.17 matt #define INCR64(what) INCR64X(what,%o0,%o1)
219 1.17 matt #else
220 1.17 matt #define INCR64X(what,r0,r1,r2) \
221 1.17 matt sethi %hi(what), r2; \
222 1.17 matt ldd [r2 + %lo(what)], r0; \
223 1.17 matt inccc r1; \
224 1.17 matt addx r0, 0, r0; \
225 1.17 matt std r0, [r2 + %lo(what)]
226 1.17 matt #define INCR64(what) INCR64X(what,%o0,%o1,%l7)
227 1.17 matt #endif
228 1.17 matt
229 1.1 pk #endif /* _ASM_H_ */
230