1 | /*-
|
---|
2 | * Copyright (c) 1990 The Regents of the University of California.
|
---|
3 | * All rights reserved.
|
---|
4 | *
|
---|
5 | * This code is derived from software contributed to Berkeley by
|
---|
6 | * William Jolitz.
|
---|
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 the University of
|
---|
19 | * California, Berkeley and its contributors.
|
---|
20 | * 4. Neither the name of the University nor the names of its contributors
|
---|
21 | * may be used to endorse or promote products derived from this software
|
---|
22 | * without specific prior written permission.
|
---|
23 | *
|
---|
24 | * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
|
---|
25 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
---|
26 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
---|
27 | * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
|
---|
28 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
---|
29 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
---|
30 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
---|
31 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
---|
32 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
---|
33 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
---|
34 | * SUCH DAMAGE.
|
---|
35 | *
|
---|
36 | * from: @(#)DEFS.h 5.1 (Berkeley) 4/23/90
|
---|
37 | * $FreeBSD: src/sys/i386/include/asm.h,v 1.10 2002/09/23 07:27:45 peter Exp $
|
---|
38 | */
|
---|
39 |
|
---|
40 | #ifndef _MACHINE_ASM_H_
|
---|
41 | #define _MACHINE_ASM_H_
|
---|
42 |
|
---|
43 | #include <sys/cdefs.h>
|
---|
44 |
|
---|
45 | #ifdef PIC
|
---|
46 | #define PIC_PROLOGUE \
|
---|
47 | pushl %ebx; \
|
---|
48 | call 1f; \
|
---|
49 | 1: \
|
---|
50 | popl %ebx; \
|
---|
51 | addl $_GLOBAL_OFFSET_TABLE_+[.-1b],%ebx
|
---|
52 | #define PIC_EPILOGUE \
|
---|
53 | popl %ebx
|
---|
54 | #define PIC_PLT(x) x@PLT
|
---|
55 | #define PIC_GOT(x) x@GOT(%ebx)
|
---|
56 | #else
|
---|
57 | #define PIC_PROLOGUE
|
---|
58 | #define PIC_EPILOGUE
|
---|
59 | #define PIC_PLT(x) x
|
---|
60 | #define PIC_GOT(x) x
|
---|
61 | #endif
|
---|
62 |
|
---|
63 | /*
|
---|
64 | * CNAME and HIDENAME manage the relationship between symbol names in C
|
---|
65 | * and the equivalent assembly language names. CNAME is given a name as
|
---|
66 | * it would be used in a C program. It expands to the equivalent assembly
|
---|
67 | * language name. HIDENAME is given an assembly-language name, and expands
|
---|
68 | * to a possibly-modified form that will be invisible to C programs.
|
---|
69 | */
|
---|
70 | #define CNAME(csym) __CONCAT(_,csym) /* bird, we need underscore */
|
---|
71 | #define STDCNAME(csym) __CONCAT(__std_,csym) /* bird, same as _STD() */
|
---|
72 | #define HIDENAME(asmsym) __CONCAT(.,asmsym)
|
---|
73 |
|
---|
74 | /* XXX should use .p2align 4,0x90 for -m486. */
|
---|
75 | /*#define _START_ENTRY .text; .p2align 2,0x90*/
|
---|
76 | #define _START_ENTRY .text; .p2align 4,0xcc /* bird */
|
---|
77 |
|
---|
78 | #define _ENTRY(x) _START_ENTRY; \
|
---|
79 | .globl CNAME(x); .type CNAME(x),@function; CNAME(x):
|
---|
80 |
|
---|
81 | #ifdef PROF
|
---|
82 | #define ALTENTRY(x) _ENTRY(x); \
|
---|
83 | pushl %ebp; movl %esp,%ebp; \
|
---|
84 | call PIC_PLT(HIDENAME(mcount)); \
|
---|
85 | popl %ebp; \
|
---|
86 | jmp 9f
|
---|
87 | #define ENTRY(x) _ENTRY(x); \
|
---|
88 | pushl %ebp; movl %esp,%ebp; \
|
---|
89 | call PIC_PLT(HIDENAME(mcount)); \
|
---|
90 | popl %ebp; \
|
---|
91 | 9:
|
---|
92 | #else
|
---|
93 | #define ALTENTRY(x) _ENTRY(x)
|
---|
94 | #define ENTRY(x) _ENTRY(x)
|
---|
95 | #endif
|
---|
96 | #define STDENTRY(x) ENTRY(__CONCAT(_std_,x)) /* libc */
|
---|
97 |
|
---|
98 |
|
---|
99 | #define RCSID(x) .text; .asciz x
|
---|
100 |
|
---|
101 | #undef __FBSDID
|
---|
102 | #if !defined(lint) && !defined(STRIP_FBSDID)
|
---|
103 | #define __FBSDID(s) .ident s
|
---|
104 | #else
|
---|
105 | #define __FBSDID(s) /* nothing */
|
---|
106 | #endif /* not lint and not STRIP_FBSDID */
|
---|
107 |
|
---|
108 | #ifdef _ARCH_INDIRECT
|
---|
109 | /*
|
---|
110 | * Generate code to select between the generic functions and _ARCH_INDIRECT
|
---|
111 | * specific ones.
|
---|
112 | * XXX nested __CONCATs don't work with non-ANSI cpp's.
|
---|
113 | */
|
---|
114 | #define ANAME(x) CNAME(__CONCAT(__CONCAT(__,_ARCH_INDIRECT),x))
|
---|
115 | #define ASELNAME(x) CNAME(__CONCAT(__arch_select_,x))
|
---|
116 | #define AVECNAME(x) CNAME(__CONCAT(__arch_,x))
|
---|
117 | #define GNAME(x) CNAME(__CONCAT(__generic_,x))
|
---|
118 |
|
---|
119 | /* Don't bother profiling this. */
|
---|
120 | #ifdef PIC
|
---|
121 | #define ARCH_DISPATCH(x) \
|
---|
122 | _START_ENTRY; \
|
---|
123 | .globl CNAME(x); .type CNAME(x),@function; CNAME(x): ; \
|
---|
124 | PIC_PROLOGUE; \
|
---|
125 | movl PIC_GOT(AVECNAME(x)),%eax; \
|
---|
126 | PIC_EPILOGUE; \
|
---|
127 | jmpl *(%eax)
|
---|
128 |
|
---|
129 | #define ARCH_SELECT(x) _START_ENTRY; \
|
---|
130 | .type ASELNAME(x),@function; \
|
---|
131 | ASELNAME(x): \
|
---|
132 | PIC_PROLOGUE; \
|
---|
133 | call PIC_PLT(CNAME(__get_hw_float)); \
|
---|
134 | testl %eax,%eax; \
|
---|
135 | movl PIC_GOT(ANAME(x)),%eax; \
|
---|
136 | jne 8f; \
|
---|
137 | movl PIC_GOT(GNAME(x)),%eax; \
|
---|
138 | 8: \
|
---|
139 | movl PIC_GOT(AVECNAME(x)),%edx; \
|
---|
140 | movl %eax,(%edx); \
|
---|
141 | PIC_EPILOGUE; \
|
---|
142 | jmpl *%eax
|
---|
143 | #else /* !PIC */
|
---|
144 | #define ARCH_DISPATCH(x) \
|
---|
145 | _START_ENTRY; \
|
---|
146 | .globl CNAME(x); .type CNAME(x),@function; CNAME(x): ; \
|
---|
147 | jmpl *AVECNAME(x)
|
---|
148 |
|
---|
149 | #define ARCH_SELECT(x) _START_ENTRY; \
|
---|
150 | .type ASELNAME(x),@function; \
|
---|
151 | ASELNAME(x): \
|
---|
152 | call CNAME(__get_hw_float); \
|
---|
153 | testl %eax,%eax; \
|
---|
154 | movl $ANAME(x),%eax; \
|
---|
155 | jne 8f; \
|
---|
156 | movl $GNAME(x),%eax; \
|
---|
157 | 8: \
|
---|
158 | movl %eax,AVECNAME(x); \
|
---|
159 | jmpl *%eax
|
---|
160 | #endif /* PIC */
|
---|
161 |
|
---|
162 | #define ARCH_VECTOR(x) .data; .p2align 2; \
|
---|
163 | .globl AVECNAME(x); \
|
---|
164 | .type AVECNAME(x),@object; \
|
---|
165 | .size AVECNAME(x),4; \
|
---|
166 | AVECNAME(x): .long ASELNAME(x)
|
---|
167 |
|
---|
168 | #undef _ENTRY
|
---|
169 | #define _ENTRY(x) ARCH_VECTOR(x); ARCH_SELECT(x); ARCH_DISPATCH(x); \
|
---|
170 | _START_ENTRY; \
|
---|
171 | .globl ANAME(x); .type ANAME(x),@function; ANAME(x):
|
---|
172 |
|
---|
173 | #endif /* _ARCH_INDIRECT */
|
---|
174 |
|
---|
175 | #endif /* !_MACHINE_ASM_H_ */
|
---|