xref: /netbsd-src/sys/arch/m68k/include/asm.h (revision 3dc08fb5f4d7b90747a75b174b7d0c0370c06766)
1 /*	$NetBSD: asm.h,v 1.37 2025/01/06 10:46:44 martin Exp $	*/
2 
3 /*-
4  * Copyright (c) 1997 The NetBSD Foundation, Inc.
5  * All rights reserved.
6  *
7  * This code is derived from software contributed to The NetBSD Foundation
8  * by Jason R. Thorpe.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29  * POSSIBILITY OF SUCH DAMAGE.
30  */
31 
32 /*
33  * Copyright (c) 1994 Allen Briggs
34  * All rights reserved.
35  *
36  * Gleaned from locore.s and sun3 asm.h which had the following copyrights:
37  * locore.s:
38  * Copyright (c) 1988 University of Utah.
39  * Copyright (c) 1982, 1990 The Regents of the University of California.
40  * sun3/include/asm.h:
41  * Copyright (c) 1993 Adam Glass
42  * Copyright (c) 1990 The Regents of the University of California.
43  *
44  * Redistribution and use in source and binary forms, with or without
45  * modification, are permitted provided that the following conditions
46  * are met:
47  * 1. Redistributions of source code must retain the above copyright
48  *    notice, this list of conditions and the following disclaimer.
49  * 2. Redistributions in binary form must reproduce the above copyright
50  *    notice, this list of conditions and the following disclaimer in the
51  *    documentation and/or other materials provided with the distribution.
52  * 3. All advertising materials mentioning features or use of this software
53  *    must display the following acknowledgement:
54  *	This product includes software developed by the University of
55  *	California, Berkeley and its contributors.
56  * 4. Neither the name of the University nor the names of its contributors
57  *    may be used to endorse or promote products derived from this software
58  *    without specific prior written permission.
59  *
60  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
61  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
62  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
63  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
64  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
65  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
66  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
67  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
68  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
69  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
70  * SUCH DAMAGE.
71  */
72 
73 #ifndef _M68K_ASM_H_
74 #define _M68K_ASM_H_
75 
76 #define __IMMEDIATE		#
77 
78 #ifdef __PIC__
79 #define PIC_PLT(name)		name@PLTPC
80 #ifdef __mcoldfire__
81 #define LEA_LCL(name,reg) \
82 	movl	__IMMEDIATE name - .,reg ; \
83 	lea	(-6,%pc,reg),reg
84 #define GOT_SETUP(reg) \
85 	movl	__IMMEDIATE _GLOBAL_OFFSET_TABLE_@GOTPC,reg ; \
86 	lea	(-6,%pc,reg),reg
87 #else
88 #define LEA_LCL(name,reg)	lea	(name,%pc),reg
89 #define GOT_SETUP(reg)		lea	(_GLOBAL_OFFSET_TABLE_@GOTPC,%pc),reg
90 #endif
91 #else
92 #define PIC_PLT(name)		name
93 #define LEA_LCL(name,reg)	movl	__IMMEDIATE name,reg
94 #define GOT_SETUP(reg)		/* nothing */
95 #endif
96 
97 #if __STDC__
98 # define _C_LABEL(name)	name
99 #else
100 # define _C_LABEL(name)	name
101 #endif /* __STDC__ */
102 
103 #define	_ASM_LABEL(name)	name
104 
105 #define	_ENTRY(name) \
106 	.text; .even; .globl name; .type name,@function; name:
107 #define	END(name)	.size name,.-name
108 
109 #define	MCOUNT_ENTRY	__mcount
110 
111 #ifdef GPROF
112 #define _PROF_PROLOG	link %a6,#0; jbsr MCOUNT_ENTRY; unlk %a6
113 #else
114 #define _PROF_PROLOG
115 #endif
116 
117 #define ENTRY(name)		_ENTRY(_C_LABEL(name)) _PROF_PROLOG
118 #define	ASENTRY(name)		_ENTRY(_ASM_LABEL(name)) _PROF_PROLOG
119 
120 #define	ENTRY_NOPROFILE(name)	_ENTRY(_C_LABEL(name))
121 #define	ASENTRY_NOPROFILE(name)	_ENTRY(_ASM_LABEL(name))
122 
123 /*
124  * The m68k ALTENTRY macro is very different than the traditional
125  * implementation used by other NetBSD ports.  Usually ALTENTRY
126  * simply provides an alternate function entry point.  The m68k
127  * definition takes a second argument and jumps inside the second
128  * function when profiling is enabled.
129  *
130  * The m68k behavior is similar to the ENTRY2 macro found in
131  * solaris' asm_linkage.h.
132  *
133  * Providing ENTRY2 and changing all the code that uses ALTENTRY
134  * to use it would be a desirable change.
135  */
136 #ifdef PROF
137 #define ALTENTRY(name, rname)	ENTRY(name); jra rname+12
138 #else
139 #define ALTENTRY(name, rname)	_ENTRY(_C_LABEL(name))
140 #endif
141 
142 #ifdef _NETBSD_REVISIONID
143 #define RCSID(x)	.pushsection ".ident","MS",@progbits,1;		\
144 			.asciz x;					\
145 			.ascii "$"; .ascii "NetBSD: "; .ascii __FILE__;	\
146 			.ascii " "; .ascii _NETBSD_REVISIONID;		\
147 			.asciz " $";					\
148 			.popsection
149 #else
150 #define RCSID(x)	.pushsection ".ident","MS",@progbits,1;		\
151 			.asciz x;					\
152 			.popsection
153 #endif
154 
155 /*
156  * Global variables of whatever sort.
157  */
158 #define	GLOBAL(x)					\
159 		.globl	_C_LABEL(x)		;	\
160 	_C_LABEL(x):
161 
162 #define	ASGLOBAL(x)					\
163 		.globl	_ASM_LABEL(x)		;	\
164 	_ASM_LABEL(x):
165 
166 /*
167  * ...and local variables.
168  */
169 #define	LOCAL(x)					\
170 	_C_LABEL(x):
171 
172 #define	ASLOCAL(x)					\
173 	_ASM_LABEL(x):
174 
175 /*
176  * Items in the BSS segment.
177  */
178 #define	BSS(name, size)					\
179 	.comm	_C_LABEL(name),size
180 
181 #define	ASBSS(name, size)				\
182 	.comm	_ASM_LABEL(name),size
183 
184 /*
185  * Need a better place for these but these are common across
186  * all m68k ports so let's define just once.
187  */
188 #ifdef __mcoldfire__
189 #define INTERRUPT_SAVEREG	lea -16(%sp),%sp; moveml #0xC0C0,(%sp)
190 #define INTERRUPT_RESTOREREG	moveml (%sp),#0x0303; lea 16(%sp),%sp
191 #else
192 #define INTERRUPT_SAVEREG	moveml	#0xC0C0,-(%sp)
193 #define INTERRUPT_RESTOREREG	moveml	(%sp)+,#0x0303
194 #endif
195 
196 #ifdef _KERNEL
197 /*
198  * Shorthand for calling panic().
199  * Note the side-effect: it uses up the 9: label, so be careful!
200  */
201 #define	PANIC(x)					\
202 		pea	9f			;	\
203 		jbsr	_C_LABEL(panic)		;	\
204 	9:	.asciz	x			;	\
205 		.even
206 
207 /* 64-bit counter increments */
208 #define CPUINFO_INCREMENT(n)					\
209 	lea	_C_LABEL(cpu_info_store)+(n)+4,%a1;		\
210 	addq.l	#1,(%a1);					\
211 	clr.l	%d0;		/* doesn't change CCR[X] */	\
212 	move.l	-(%a1),%d1;	/* doesn't change CCR[X] */	\
213 	addx.l	%d0,%d1;					\
214 	move.l	%d1,(%a1)
215 
216 /* 64-bit counter increments */
217 #define CPUINFO_ADD(n, addend)					\
218 	lea	_C_LABEL(cpu_info_store)+(n)+4,%a1;		\
219 	add.l	addend,(%a1);					\
220 	clr.l	%d0;		/* doesn't change CCR[X] */	\
221 	move.l	-(%a1),%d1;	/* doesn't change CCR[X] */	\
222 	addx.l	%d0,%d1;					\
223 	move.l	%d1,(%a1)
224 
225 #endif /* _KERNEL */
226 
227 /*
228  * Shorthand for defining vectors for the vector table.
229  */
230 #define	VECTOR(x)					\
231 	.long	_C_LABEL(x)
232 
233 #define	ASVECTOR(x)					\
234 	.long	_ASM_LABEL(x)
235 
236 #define	VECTOR_UNUSED					\
237 	.long	0
238 
239 #define	WEAK_ALIAS(alias,sym)						\
240 	.weak alias;							\
241 	alias = sym
242 
243 /*
244  * STRONG_ALIAS: create a strong alias.
245  */
246 #define STRONG_ALIAS(alias,sym)						\
247 	.globl alias;							\
248 	alias = sym
249 
250 #ifdef __STDC__
251 #define	WARN_REFERENCES(sym,msg)					\
252 	.pushsection .gnu.warning. ## sym;				\
253 	.ascii msg;							\
254 	.popsection
255 #else
256 #define	WARN_REFERENCES(sym,msg)					\
257 	.pushsection .gnu.warning./**/sym;				\
258 	.ascii msg;							\
259 	.popsection
260 #endif /* __STDC__ */
261 
262 /*
263  * Macros to hide shortcomings in the 68010.
264  */
265 #ifdef __mc68010__
266 #define	EXTBL(reg)					\
267 	extw	reg		;			\
268 	extl	reg
269 #else	/* __mc68010__ */
270 #define	EXTBL(reg)					\
271 	extbl	reg
272 #endif	/* __mc68010__ */
273 
274 #endif /* _M68K_ASM_H_ */
275