1/*-
2 * SPDX-License-Identifier: BSD-4-Clause
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 * $NetBSD: asm.h,v 1.6.18.1 2000/07/25 08:37:14 kleink Exp $
34 */
35
36#ifndef _MACHINE_ASM_H_
37#define _MACHINE_ASM_H_
38
39#include <sys/cdefs.h>
40
41#if defined(PIC) && !defined(__powerpc64__)
42#define PIC_PROLOGUE XXX
43#define PIC_EPILOGUE XXX
44#define PIC_PLT(x) x@plt
45#ifdef __STDC__
46#define PIC_GOT(x) XXX
47#else /* not __STDC__ */
48#define PIC_GOT(x) XXX
49#endif /* __STDC__ */
50#else
51#define PIC_PROLOGUE
52#define PIC_EPILOGUE
53#define PIC_PLT(x) x
54#define PIC_GOT(x) x
55#endif
56
57#define CNAME(csym) csym
58#define ASMNAME(asmsym) asmsym
59#ifdef __powerpc64__
60#define HIDENAME(asmsym) __CONCAT(_,asmsym)
61#else
62#define HIDENAME(asmsym) __CONCAT(.,asmsym)
63#endif
64
65#if !defined(_CALL_ELF) || _CALL_ELF == 1
66#ifdef _KERNEL
67/* ELFv1 kernel uses global dot symbols */
68#define DOT_LABEL(name) __CONCAT(.,name)
69#define TYPE_ENTRY(name) .size name,24; \
70 .type DOT_LABEL(name),@function; \
71 .globl DOT_LABEL(name);
72#define END_SIZE(name) .size DOT_LABEL(name),.-DOT_LABEL(name);
73#else /* !_KERNEL */
74/* ELFv1 user code uses local function entry points */
75#define DOT_LABEL(name) __CONCAT(.L.,name)
76#define TYPE_ENTRY(name) .type name,@function;
77#define END_SIZE(name) .size name,.-DOT_LABEL(name);
78#endif /* _KERNEL */
79#else
80/* ELFv2 doesn't have any of this complication */
81#define DOT_LABEL(name) name
82#define TYPE_ENTRY(name) .type name,@function;
83#define END_SIZE(name) .size name,.-DOT_LABEL(name);
84#endif
85
86#define _GLOBAL(name) \
87 .data; \
88 .p2align 2; \
89 .globl name; \
90 name:
91
92#ifdef __powerpc64__
93#define TOC_NAME_FOR_REF(name) __CONCAT(.L,name)
94#define TOC_REF(name) TOC_NAME_FOR_REF(name)@toc
95#define TOC_ENTRY(name) \
96 .section ".toc","aw"; \
97 TOC_NAME_FOR_REF(name): \
98 .tc name[TC],name
99#endif
100
101#ifdef __powerpc64__
102
103#if !defined(_CALL_ELF) || _CALL_ELF == 1
104#define _ENTRY(name) \
105 .section ".text"; \
106 .p2align 2; \
107 .globl name; \
108 .section ".opd","aw"; \
109 .p2align 3; \
110name: \
111 .quad DOT_LABEL(name),.TOC.@tocbase,0; \
112 .previous; \
113 .p2align 4; \
114 TYPE_ENTRY(name) \
115DOT_LABEL(name): \
116 .cfi_startproc
117#define _NAKED_ENTRY(name) _ENTRY(name)
118#else
119#define _ENTRY(name) \
120 .text; \
121 .p2align 4; \
122 .globl name; \
123 .type name,@function; \
124name: \
125 .cfi_startproc; \
126 addis %r2, %r12, (.TOC.-name)@ha; \
127 addi %r2, %r2, (.TOC.-name)@l; \
128 .localentry name, .-name;
129
130/* "Naked" function entry. No TOC prologue for ELFv2. */
131#define _NAKED_ENTRY(name) \
132 .text; \
133 .p2align 4; \
134 .globl name; \
135 .type name,@function; \
136name: \
137 .cfi_startproc; \
138 .localentry name, .-name;
139#endif
140
141#define _END(name) \
142 .cfi_endproc; \
143 .long 0; \
144 .byte 0,0,0,0,0,0,0,0; \
145 END_SIZE(name)
146
147#define LOAD_ADDR(reg, var) \
148 lis reg, var@highest; \
149 ori reg, reg, var@higher; \
150 rldicr reg, reg, 32, 31; \
151 oris reg, reg, var@h; \
152 ori reg, reg, var@l;
153#else /* !__powerpc64__ */
154#define _ENTRY(name) \
155 .text; \
156 .p2align 4; \
157 .globl name; \
158 .type name,@function; \
159name: \
160 .cfi_startproc
161#define _END(name) \
162 .cfi_endproc; \
163 .size name, . - name
164
165#define _NAKED_ENTRY(name) _ENTRY(name)
166
167#define LOAD_ADDR(reg, var) \
168 lis reg, var@ha; \
169 ori reg, reg, var@l;
170#endif /* __powerpc64__ */
171
172#if defined(PROF) || (defined(_KERNEL) && defined(GPROF))
173# ifdef __powerpc64__
174# define _PROF_PROLOGUE mflr 0; \
175 std 3,48(1); \
176 std 4,56(1); \
177 std 5,64(1); \
178 std 0,16(1); \
179 stdu 1,-112(1); \
180 bl _mcount; \
181 nop; \
182 ld 0,112+16(1); \
183 ld 3,112+48(1); \
184 ld 4,112+56(1); \
185 ld 5,112+64(1); \
186 mtlr 0; \
187 addi 1,1,112
188# else
189# define _PROF_PROLOGUE mflr 0; stw 0,4(1); bl _mcount
190# endif
191#else
192# define _PROF_PROLOGUE
193#endif
194
195#define ASEND(y) _END(ASMNAME(y))
196#define ASENTRY(y) _ENTRY(ASMNAME(y)); _PROF_PROLOGUE
197#define END(y) _END(CNAME(y))
198#define ENTRY(y) _ENTRY(CNAME(y)); _PROF_PROLOGUE
199#define GLOBAL(y) _GLOBAL(CNAME(y))
200
201#define ASENTRY_NOPROF(y) _ENTRY(ASMNAME(y))
202#define ENTRY_NOPROF(y) _ENTRY(CNAME(y))
203
204/* Load NIA without affecting branch prediction */
205#define LOAD_LR_NIA bcl 20, 31, .+4
206
207/*
208 * Magic sequence to return to native endian.
209 * Overwrites r0 and r11.
210 *
211 * The encoding of the instruction "tdi 0, %r0, 0x48" in opposite endian
212 * happens to be "b . + 8". This is useful because we can write a sequence
213 * of instructions that can execute in either endian.
214 *
215 * Use a sequence of handcoded instructions that switches contexts to the
216 * instruction following the sequence, but with the correct PSL_LE bit.
217 *
218 * The same sequence works for both BE and LE because the xori will flip
219 * the bit to the other state, and the code only runs when running in the
220 * wrong endian.
221 *
222 * This sequence is NMI-reentrant.
223 *
224 * Do not change the length of this sequence without looking at the users,
225 * this is used in size-constrained places like the reset vector!
226 */
227#define RETURN_TO_NATIVE_ENDIAN \
228 tdi 0, %r0, 0x48; /* Endian swapped: b . + 8 */\
229 b 1f; /* Will fall through to here if correct */\
230 .long 0xa600607d; /* mfmsr %r11 */\
231 .long 0x00000038; /* li %r0, 0 */\
232 .long 0x6401617d; /* mtmsrd %r0, 1 (L=1 EE,RI bits only) */\
233 .long 0x01006b69; /* xori %r11, %r11, 0x1 (PSL_LE) */\
234 .long 0xa602087c; /* mflr %r0 */\
235 .long 0x05009f42; /* LOAD_LR_NIA */\
236 .long 0xa6037b7d; /* 0: mtsrr1 %r11 */\
237 .long 0xa602687d; /* mflr %r11 */\
238 .long 0x18006b39; /* addi %r11, %r11, (1f - 0b) */\
239 .long 0xa6037a7d; /* mtsrr0 %r11 */\
240 .long 0xa603087c; /* mtlr %r0 */\
241 .long 0x2400004c; /* rfid */\
2421: /* RETURN_TO_NATIVE_ENDIAN */
243
244#define ASMSTR .asciz
245
246#define RCSID(x) .text; .asciz x
247
248#undef __FBSDID
249#if !defined(lint) && !defined(STRIP_FBSDID)
250#define __FBSDID(s) .ident s
251#else
252#define __FBSDID(s) /* nothing */
253#endif /* not lint and not STRIP_FBSDID */
254
255#define WEAK_REFERENCE(sym, alias) \
256 .weak alias; \
257 .equ alias,sym
258
259#ifdef __STDC__
260#define WARN_REFERENCES(_sym,_msg) \
261 .section .gnu.warning. ## _sym ; .ascii _msg ; .text
262#else
263#define WARN_REFERENCES(_sym,_msg) \
264 .section .gnu.warning./**/_sym ; .ascii _msg ; .text
265#endif /* __STDC__ */
266
267#endif /* !_MACHINE_ASM_H_ */