asm.h revision 1.29
1/*	$NetBSD: asm.h,v 1.29 2025/01/04 19:02:51 martin Exp $ */
2/*
3 * Copyright (c) 1982, 1993
4 *	The Regents of the University of California.  All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 *    notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 *    notice, this list of conditions and the following disclaimer in the
13 *    documentation and/or other materials provided with the distribution.
14 * 3. Neither the name of the University nor the names of its contributors
15 *    may be used to endorse or promote products derived from this software
16 *    without specific prior written permission.
17 *
18 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
19 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
24 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
25 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
26 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
27 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
28 * SUCH DAMAGE.
29 *
30 *	@(#)DEFS.h	8.1 (Berkeley) 6/4/93
31 */
32
33#ifndef _VAX_ASM_H_
34#define _VAX_ASM_H_
35
36#define R0	0x001
37#define R1	0x002
38#define R2	0x004
39#define R3	0x008
40#define R4	0x010
41#define R5	0x020
42#define R6	0x040
43#define R7 	0x080
44#define R8	0x100
45#define R9	0x200
46#define R10	0x400
47#define R11	0x800
48
49#define _C_LABEL(x)	x
50
51#define	_ASM_LABEL(x)	x
52
53#ifdef __STDC__
54# define __CONCAT(x,y)	x ## y
55# define __STRING(x)	#x
56#else
57# define __CONCAT(x,y)	x/**/y
58# define __STRING(x)	"x"
59#endif
60
61/* let kernels and others override entrypoint alignment */
62#ifndef _ALIGN_TEXT
63# define _ALIGN_TEXT .p2align 2
64#endif
65
66#define	_ENTRY(x, regs) \
67	.text; _ALIGN_TEXT; .globl x; .type x@function; x: .word regs
68
69#ifdef GPROF
70# define _PROF_PROLOGUE	\
71	.data; 1:; .long 0; .text; moval 1b,%r0; jsb _ASM_LABEL(__mcount)
72#else
73# define _PROF_PROLOGUE
74#endif
75
76#define ENTRY(x, regs)		_ENTRY(_C_LABEL(x), regs); _PROF_PROLOGUE
77#define NENTRY(x, regs)		_ENTRY(_C_LABEL(x), regs)
78#define ASENTRY(x, regs)	_ENTRY(_ASM_LABEL(x), regs); _PROF_PROLOGUE
79#define END(x)			.size _C_LABEL(x),.-_C_LABEL(x)
80
81#define ALTENTRY(x)		.globl _C_LABEL(x); _C_LABEL(x):
82#ifdef _NETBSD_REVISIONID
83#define RCSID(x)	.pushsection ".ident","MS",@progbits,1;		\
84			.asciz "$" "NetBSD: " __FILE__ 			\
85			    " " _NETBSD_REVISIONID " $";		\
86			.popsection
87#else
88#define RCSID(x)	.pushsection ".ident","MS",@progbits,1;		\
89			.asciz x;					\
90			.popsection
91#endif
92
93#ifdef NO_KERNEL_RCSIDS
94#define __KERNEL_RCSID(_n, _s)  /* nothing */
95#else
96#define __KERNEL_RCSID(_n, _s)  RCSID(_s)
97#endif
98
99#define	WEAK_ALIAS(alias,sym)						\
100	.weak alias;							\
101	alias = sym
102
103/*
104 * STRONG_ALIAS: create a strong alias.
105 */
106#define STRONG_ALIAS(alias,sym)						\
107	.globl alias;							\
108	alias = sym
109
110#ifdef __STDC__
111#define	WARN_REFERENCES(sym,msg)					\
112	.pushsection .gnu.warning. ## sym;				\
113	.ascii msg;							\
114	.popsection
115#else
116#define	WARN_REFERENCES(sym,msg)					\
117	.pushsection .gnu.warning./**/sym;				\
118	.ascii msg;							\
119	.popsection
120#endif /* __STDC__ */
121
122.macro	polyf arg:req degree:req tbladdr:req
123	movf	\arg, %r1
124	movzwl	\degree, %r2
125	movab	\tbladdr, %r3
126
127	movf	(%r3)+, %r0
1281:
129	mulf2	%r1, %r0		/* result *= arg */
130	addf2	(%r3)+, %r0		/* result += c[n] */
131	sobgtr	%r2, 1b
132	clrf	%r1			/* r1 is 0 on finish */
133.endm
134
135.macro	polyd arg:req degree:req tbladdr:req
136	movd	\arg, %r4
137	movzwl	\degree, %r2
138	movab	\tbladdr, %r3
139
140	movd	(%r3)+,	%r0
1411:
142	muld2	%r4, %r0		/* result *= arg */
143	addd2	(%r3)+, %r0		/* result += c[n] */
144	sobgtr	%r2, 1b
145	clrq	%r4			/* r4, r5 are 0 on finish */
146.endm
147
148#endif /* !_VAX_ASM_H_ */
149