source: branches/libc-0.6/src/emx/include/386/asm.h

Last change on this file was 2150, checked in by bird, 20 years ago

o Shopped missing math stuff from GLIBC.

  • Property cvs2svn:cvs-rev set to 1.2
  • Property svn:eol-style set to native
  • Property svn:executable set to *
  • Property svn:keywords set to Author Date Id Revision
File size: 5.5 KB
Line 
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; \
491: \
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_ */
Note: See TracBrowser for help on using the repository browser.