what the heck one last one before i go take a nap...
[dragonfly.git] / sys / i386 / include / asm.h
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.7 2000/01/25 09:01:55 bde Exp $
38  * $DragonFly: src/sys/i386/include/Attic/asm.h,v 1.2 2003/06/17 04:28:35 dillon Exp $
39  */
40
41 #ifndef _MACHINE_ASM_H_
42 #define _MACHINE_ASM_H_
43
44 #include <sys/cdefs.h>
45
46 #ifdef PIC
47 #define PIC_PROLOGUE    \
48         pushl   %ebx;   \
49         call    1f;     \
50 1:                      \
51         popl    %ebx;   \
52         addl    $_GLOBAL_OFFSET_TABLE_+[.-1b],%ebx
53 #define PIC_EPILOGUE    \
54         popl    %ebx
55 #define PIC_PLT(x)      x@PLT
56 #define PIC_GOT(x)      x@GOT(%ebx)
57 #define PIC_GOTOFF(x)   x@GOTOFF(%ebx)
58 #else
59 #define PIC_PROLOGUE
60 #define PIC_EPILOGUE
61 #define PIC_PLT(x)      x
62 #define PIC_GOT(x)      x
63 #define PIC_GOTOFF(x)   x
64 #endif
65
66 /*
67  * CNAME and HIDENAME manage the relationship between symbol names in C
68  * and the equivalent assembly language names.  CNAME is given a name as
69  * it would be used in a C program.  It expands to the equivalent assembly
70  * language name.  HIDENAME is given an assembly-language name, and expands
71  * to a possibly-modified form that will be invisible to C programs.
72  */
73 #ifdef __ELF__
74 #define CNAME(csym)             csym
75 #define HIDENAME(asmsym)        __CONCAT(.,asmsym)
76 #else
77 #define CNAME(csym)             __CONCAT(_,csym)
78 #define HIDENAME(asmsym)        asmsym
79 #endif
80
81 /* XXX should use .p2align 4,0x90 for -m486. */
82 #define _START_ENTRY    .text; .p2align 2,0x90
83
84 #define _ENTRY(x)       _START_ENTRY; \
85                         .globl CNAME(x); .type CNAME(x),@function; CNAME(x):
86
87 #ifdef PROF
88 #define ALTENTRY(x)     _ENTRY(x); \
89                         pushl %ebp; movl %esp,%ebp; \
90                         call PIC_PLT(HIDENAME(mcount)); \
91                         popl %ebp; \
92                         jmp 9f
93 #define ENTRY(x)        _ENTRY(x); \
94                         pushl %ebp; movl %esp,%ebp; \
95                         call PIC_PLT(HIDENAME(mcount)); \
96                         popl %ebp; \
97                         9:
98 #else
99 #define ALTENTRY(x)     _ENTRY(x)
100 #define ENTRY(x)        _ENTRY(x)
101 #endif
102
103 #define RCSID(x)        .text; .asciz x
104
105 #ifdef _ARCH_INDIRECT
106 /*
107  * Generate code to select between the generic functions and _ARCH_INDIRECT
108  * specific ones.
109  * XXX nested __CONCATs don't work with non-ANSI cpp's.
110  */
111 #define ANAME(x)        CNAME(__CONCAT(__CONCAT(__,_ARCH_INDIRECT),x))
112 #define ASELNAME(x)     CNAME(__CONCAT(__arch_select_,x))
113 #define AVECNAME(x)     CNAME(__CONCAT(__arch_,x))
114 #define GNAME(x)        CNAME(__CONCAT(__generic_,x))
115
116 /* Don't bother profiling this. */
117 #ifdef PIC
118 #define ARCH_DISPATCH(x) \
119                         _START_ENTRY; \
120                         .globl CNAME(x); .type CNAME(x),@function; CNAME(x): ; \
121                         PIC_PROLOGUE; \
122                         movl PIC_GOT(AVECNAME(x)),%eax; \
123                         PIC_EPILOGUE; \
124                         jmpl *(%eax)
125
126 #define ARCH_SELECT(x)  _START_ENTRY; \
127                         .type ASELNAME(x),@function; \
128                         ASELNAME(x): \
129                         PIC_PROLOGUE; \
130                         call PIC_PLT(CNAME(__get_hw_float)); \
131                         testl %eax,%eax; \
132                         movl PIC_GOT(ANAME(x)),%eax; \
133                         jne 8f; \
134                         movl PIC_GOT(GNAME(x)),%eax; \
135                         8: \
136                         movl PIC_GOT(AVECNAME(x)),%edx; \
137                         movl %eax,(%edx); \
138                         PIC_EPILOGUE; \
139                         jmpl *%eax
140 #else /* !PIC */
141 #define ARCH_DISPATCH(x) \
142                         _START_ENTRY; \
143                         .globl CNAME(x); .type CNAME(x),@function; CNAME(x): ; \
144                         jmpl *AVECNAME(x)
145
146 #define ARCH_SELECT(x)  _START_ENTRY; \
147                         .type ASELNAME(x),@function; \
148                         ASELNAME(x): \
149                         call CNAME(__get_hw_float); \
150                         testl %eax,%eax; \
151                         movl $ANAME(x),%eax; \
152                         jne 8f; \
153                         movl $GNAME(x),%eax; \
154                         8: \
155                         movl %eax,AVECNAME(x); \
156                         jmpl *%eax
157 #endif /* PIC */
158
159 #define ARCH_VECTOR(x)  .data; .p2align 2; \
160                         .globl AVECNAME(x); \
161                         .type AVECNAME(x),@object; \
162                         .size AVECNAME(x),4; \
163                         AVECNAME(x): .long ASELNAME(x)
164
165 #undef _ENTRY
166 #define _ENTRY(x)       ARCH_VECTOR(x); ARCH_SELECT(x); ARCH_DISPATCH(x); \
167                         _START_ENTRY; \
168                         .globl ANAME(x); .type ANAME(x),@function; ANAME(x):
169
170 #endif /* _ARCH_INDIRECT */
171
172 #endif /* !_MACHINE_ASM_H_ */