1 | /* Assembler macros for i386. |
---|
2 | Copyright (C) 1991, 92, 93, 95, 96, 98 Free Software Foundation, Inc. |
---|
3 | This file is part of the GNU C Library. |
---|
4 | |
---|
5 | The GNU C Library is free software; you can redistribute it and/or |
---|
6 | modify it under the terms of the GNU Lesser General Public |
---|
7 | License as published by the Free Software Foundation; either |
---|
8 | version 2.1 of the License, or (at your option) any later version. |
---|
9 | |
---|
10 | The GNU C Library is distributed in the hope that it will be useful, |
---|
11 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
---|
12 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
---|
13 | Lesser General Public License for more details. |
---|
14 | |
---|
15 | You should have received a copy of the GNU Lesser General Public |
---|
16 | License along with the GNU C Library; if not, write to the Free |
---|
17 | Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA |
---|
18 | 02111-1307 USA. */ |
---|
19 | |
---|
20 | #define NO_UNDERSCORES |
---|
21 | |
---|
22 | #include <generic-sysdep.h> |
---|
23 | |
---|
24 | #ifdef __ASSEMBLER__ |
---|
25 | |
---|
26 | /* Syntactic details of assembler. */ |
---|
27 | |
---|
28 | #ifdef HAVE_ELF |
---|
29 | |
---|
30 | /* ELF uses byte-counts for .align, most others use log2 of count of bytes. */ |
---|
31 | #define ALIGNARG(log2) 1<<log2 |
---|
32 | /* For ELF we need the `.type' directive to make shared libs work right. */ |
---|
33 | #define ASM_TYPE_DIRECTIVE(name,typearg) .type name,typearg; |
---|
34 | #define ASM_SIZE_DIRECTIVE(name) .size name,.-name; |
---|
35 | |
---|
36 | /* In ELF C symbols are asm symbols. */ |
---|
37 | #undef NO_UNDERSCORES |
---|
38 | #define NO_UNDERSCORES |
---|
39 | |
---|
40 | #else |
---|
41 | |
---|
42 | #define ALIGNARG(log2) log2 |
---|
43 | #define ASM_TYPE_DIRECTIVE(name,type) /* Nothing is specified. */ |
---|
44 | #define ASM_SIZE_DIRECTIVE(name) /* Nothing is specified. */ |
---|
45 | |
---|
46 | #endif |
---|
47 | |
---|
48 | |
---|
49 | /* Define an entry point visible from C. |
---|
50 | |
---|
51 | There is currently a bug in gdb which prevents us from specifying |
---|
52 | incomplete stabs information. Fake some entries here which specify |
---|
53 | the current source file. */ |
---|
54 | #define ENTRY(name) \ |
---|
55 | STABS_CURRENT_FILE1("") \ |
---|
56 | STABS_CURRENT_FILE(name) \ |
---|
57 | ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(name); \ |
---|
58 | ASM_TYPE_DIRECTIVE (C_SYMBOL_NAME(name),@function) \ |
---|
59 | .align ALIGNARG(4); \ |
---|
60 | STABS_FUN(name) \ |
---|
61 | C_LABEL(name) \ |
---|
62 | CALL_MCOUNT |
---|
63 | |
---|
64 | #undef END |
---|
65 | #define END(name) \ |
---|
66 | ASM_SIZE_DIRECTIVE(name) \ |
---|
67 | STABS_FUN_END(name) |
---|
68 | |
---|
69 | /* Remove the following two lines once the gdb bug is fixed. */ |
---|
70 | #define STABS_CURRENT_FILE(name) \ |
---|
71 | STABS_CURRENT_FILE1 (#name) |
---|
72 | #define STABS_CURRENT_FILE1(name) \ |
---|
73 | 1: .stabs name,100,0,0,1b; |
---|
74 | /* Emit stabs definition lines. We use F(0,1) and define t(0,1) as `int', |
---|
75 | the same way gcc does it. */ |
---|
76 | #define STABS_FUN(name) STABS_FUN2(name, name##:F(0,1)) |
---|
77 | #define STABS_FUN2(name, namestr) \ |
---|
78 | .stabs "int:t(0,1)=r(0,1);-2147483648;2147483647;",128,0,0,0; \ |
---|
79 | .stabs #namestr,36,0,0,name; |
---|
80 | #define STABS_FUN_END(name) \ |
---|
81 | 1: .stabs "",36,0,0,1b-name; |
---|
82 | |
---|
83 | /* If compiled for profiling, call `mcount' at the start of each function. */ |
---|
84 | #ifdef PROF |
---|
85 | /* The mcount code relies on a normal frame pointer being on the stack |
---|
86 | to locate our caller, so push one just for its benefit. */ |
---|
87 | #define CALL_MCOUNT \ |
---|
88 | pushl %ebp; movl %esp, %ebp; call JUMPTARGET(mcount); popl %ebp; |
---|
89 | #else |
---|
90 | #define CALL_MCOUNT /* Do nothing. */ |
---|
91 | #endif |
---|
92 | |
---|
93 | #ifdef NO_UNDERSCORES |
---|
94 | /* Since C identifiers are not normally prefixed with an underscore |
---|
95 | on this system, the asm identifier `syscall_error' intrudes on the |
---|
96 | C name space. Make sure we use an innocuous name. */ |
---|
97 | #define syscall_error __syscall_error |
---|
98 | #define mcount _mcount |
---|
99 | #endif |
---|
100 | |
---|
101 | #define PSEUDO(name, syscall_name, args) \ |
---|
102 | lose: SYSCALL_PIC_SETUP \ |
---|
103 | jmp JUMPTARGET(syscall_error) \ |
---|
104 | .globl syscall_error; \ |
---|
105 | ENTRY (name) \ |
---|
106 | DO_CALL (syscall_name, args); \ |
---|
107 | jb lose |
---|
108 | |
---|
109 | #undef PSEUDO_END |
---|
110 | #define PSEUDO_END(name) \ |
---|
111 | END (name) |
---|
112 | |
---|
113 | #ifdef PIC |
---|
114 | #define JUMPTARGET(name) name##@PLT |
---|
115 | #define SYSCALL_PIC_SETUP \ |
---|
116 | pushl %ebx; \ |
---|
117 | call 0f; \ |
---|
118 | 0: popl %ebx; \ |
---|
119 | addl $_GLOBAL_OFFSET_TABLE+[.-0b], %ebx; |
---|
120 | #else |
---|
121 | #define JUMPTARGET(name) name |
---|
122 | #define SYSCALL_PIC_SETUP /* Nothing. */ |
---|
123 | #endif |
---|
124 | |
---|
125 | /* Local label name for asm code. */ |
---|
126 | #ifndef L |
---|
127 | #define L(name) name |
---|
128 | #endif |
---|
129 | |
---|
130 | #endif /* __ASSEMBLER__ */ |
---|