| 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_ */ |