asm.h revision 24965
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 * $Id: asm.h,v 1.2 1997/03/09 13:57:32 bde Exp $ 38 */ 39 40#include <sys/cdefs.h> 41 42#ifdef PIC 43#define PIC_PROLOGUE \ 44 pushl %ebx; \ 45 call 1f; \ 461: \ 47 popl %ebx; \ 48 addl $_GLOBAL_OFFSET_TABLE_+[.-1b],%ebx 49#define PIC_EPILOGUE \ 50 popl %ebx 51#define PIC_PLT(x) x@PLT 52#define PIC_GOT(x) x@GOT(%ebx) 53#define PIC_GOTOFF(x) x@GOTOFF(%ebx) 54#else 55#define PIC_PROLOGUE 56#define PIC_EPILOGUE 57#define PIC_PLT(x) x 58#define PIC_GOT(x) x 59#define PIC_GOTOFF(x) x 60#endif 61 62/* 63 * CNAME and HIDENAME manage the relationship between symbol names in C 64 * and the equivalent assembly language names. CNAME is given a name as 65 * it would be used in a C program. It expands to the equivalent assembly 66 * language name. HIDENAME is given an assembly-language name, and expands 67 * to a possibly-modified form that will be invisible to C programs. 68 */ 69#if defined(__ELF__) /* { */ 70#define CNAME(csym) csym 71#define HIDENAME(asmsym) __CONCAT(.,asmsym) 72#else /* } { */ 73#define CNAME(csym) __CONCAT(_,csym) 74#define HIDENAME(asmsym) asmsym 75#endif /* } */ 76 77 78/* XXX should use align 4,0x90 for -m486. */ 79#define _START_ENTRY .text; .align 2,0x90; 80#if 0 81/* Data is not used, except perhaps by non-g prof, which we don't support. */ 82#define _MID_ENTRY .data; .align 2; 8:; .long 0; \ 83 .text; lea 8b,%eax; 84#else 85#define _MID_ENTRY 86#endif 87 88#ifdef PROF 89 90#define ALTENTRY(x) _START_ENTRY \ 91 .globl CNAME(x); .type CNAME(x),@function; CNAME(x):; \ 92 _MID_ENTRY \ 93 call HIDENAME(mcount); jmp 9f 94 95#define ENTRY(x) _START_ENTRY \ 96 .globl CNAME(x); .type CNAME(x),@function; CNAME(x):; \ 97 _MID_ENTRY \ 98 call HIDENAME(mcount); 9: 99 100 101#define ALTASENTRY(x) _START_ENTRY \ 102 .globl x; .type x,@function; x:; \ 103 _MID_ENTRY \ 104 call HIDENAME(mcount); jmp 9f 105 106#define ASENTRY(x) _START_ENTRY \ 107 .globl x; .type x,@function; x:; \ 108 _MID_ENTRY \ 109 call HIDENAME(mcount); 9: 110 111#else /* !PROF */ 112 113#define ENTRY(x) _START_ENTRY .globl CNAME(x); .type CNAME(x),@function; \ 114 CNAME(x): 115#define ALTENTRY(x) ENTRY(x) 116 117#define ASENTRY(x) _START_ENTRY .globl x; .type x,@function; x: 118#define ALTASENTRY(x) ASENTRY(x) 119 120#endif 121 122#ifdef _ARCH_INDIRECT 123/* 124 * Generate code to select between the generic functions and _ARCH_INDIRECT 125 * specific ones. 126 * XXX nested __CONCATs don't work with non-ANSI cpp's. 127 */ 128#undef ENTRY 129#define ANAME(x) CNAME(__CONCAT(__CONCAT(__,_ARCH_INDIRECT),x)) 130#define ASELNAME(x) CNAME(__CONCAT(__arch_select_,x)) 131#define AVECNAME(x) CNAME(__CONCAT(__arch_,x)) 132#define GNAME(x) CNAME(__CONCAT(__generic_,x)) 133 134/* Don't bother profiling this. */ 135#ifdef PIC 136#define ARCH_DISPATCH(x) \ 137 _START_ENTRY; \ 138 .globl CNAME(x); .type CNAME(x),@function; CNAME(x): ; \ 139 PIC_PROLOGUE; \ 140 movl PIC_GOT(AVECNAME(x)),%eax; \ 141 PIC_EPILOGUE; \ 142 jmpl *(%eax) 143 144#define ARCH_SELECT(x) _START_ENTRY; \ 145 .type ASELNAME(x),@function; \ 146 ASELNAME(x): \ 147 PIC_PROLOGUE; \ 148 call PIC_PLT(CNAME(__get_hw_float)); \ 149 testl %eax,%eax; \ 150 movl PIC_GOT(ANAME(x)),%eax; \ 151 jne 8f; \ 152 movl PIC_GOT(GNAME(x)),%eax; \ 153 8: \ 154 movl PIC_GOT(AVECNAME(x)),%edx; \ 155 movl %eax,(%edx); \ 156 PIC_EPILOGUE; \ 157 jmpl *%eax 158#else /* !PIC */ 159#define ARCH_DISPATCH(x) \ 160 _START_ENTRY; \ 161 .globl CNAME(x); .type CNAME(x),@function; CNAME(x): ; \ 162 jmpl *AVECNAME(x) 163 164#define ARCH_SELECT(x) _START_ENTRY; \ 165 .type ASELNAME(x),@function; \ 166 ASELNAME(x): \ 167 call CNAME(__get_hw_float); \ 168 testl %eax,%eax; \ 169 movl $ANAME(x),%eax; \ 170 jne 8f; \ 171 movl $GNAME(x),%eax; \ 172 8: \ 173 movl %eax,AVECNAME(x); \ 174 jmpl *%eax 175#endif /* PIC */ 176 177#define ARCH_VECTOR(x) .data; .align 2; \ 178 .globl AVECNAME(x); \ 179 .type AVECNAME(x),@object; \ 180 .size AVECNAME(x),4; \ 181 AVECNAME(x): .long ASELNAME(x) 182 183#ifdef PROF 184 185#define ALTENTRY(x) ENTRY(x); jmp 9f 186#define ENTRY(x) ARCH_VECTOR(x); ARCH_SELECT(x); ARCH_DISPATCH(x); \ 187 _START_ENTRY; \ 188 .globl ANAME(x); .type ANAME(x),@function; ANAME(x):; \ 189 call HIDENAME(mcount); 9: 190 191#else /* !PROF */ 192 193#define ALTENTRY(x) ENTRY(x) 194#define ENTRY(x) ARCH_VECTOR(x); ARCH_SELECT(x); ARCH_DISPATCH(x); \ 195 _START_ENTRY; \ 196 .globl ANAME(x); .type ANAME(x),@function; ANAME(x): 197 198#endif /* PROF */ 199 200#endif /* _ARCH_INDIRECT */ 201 202#ifndef RCSID 203#define RCSID(a) 204#endif 205