1/* Assembler macros for m68k.
2   Copyright (C) 1998 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#include_next <sysdep.h>
21
22#ifdef __ASSEMBLER__
23
24/* Syntactic details of assembler.  */
25
26#ifdef HAVE_ELF
27
28/* ELF uses byte-counts for .align, most others use log2 of count of bytes.  */
29#define ALIGNARG(log2) 1<<log2
30/* For ELF we need the `.type' directive to make shared libs work right.  */
31#define ASM_TYPE_DIRECTIVE(name,typearg) .type name,typearg
32#define ASM_SIZE_DIRECTIVE(name) .size name,.-name
33
34#else
35
36#define ALIGNARG(log2) log2
37#define ASM_TYPE_DIRECTIVE(name,type)	/* Nothing is specified.  */
38#define ASM_SIZE_DIRECTIVE(name)	/* Nothing is specified.  */
39
40#endif
41
42
43/* Define an entry point visible from C.
44
45   There is currently a bug in gdb which prevents us from specifying
46   incomplete stabs information.  Fake some entries here which specify
47   the current source file.  */
48#define	ENTRY(name)							      \
49  .globl C_SYMBOL_NAME(name);						      \
50  ASM_TYPE_DIRECTIVE (C_SYMBOL_NAME(name),@function);			      \
51  .align ALIGNARG(2);							      \
52  C_LABEL(name)								      \
53  CALL_MCOUNT
54
55#undef END
56#define END(name) ASM_SIZE_DIRECTIVE(name)
57
58
59/* If compiled for profiling, call `_mcount' at the start of each function.  */
60#ifdef	PROF
61/* The mcount code relies on a normal frame pointer being on the stack
62   to locate our caller, so push one just for its benefit.  */
63#define CALL_MCOUNT \
64  move.l %fp, -(%sp); move.l %sp, %fp;					      \
65  jbsr JUMPTARGET (mcount);						      \
66  move.l (%sp)+, %fp;
67#else
68#define CALL_MCOUNT		/* Do nothing.  */
69#endif
70
71/* Since C identifiers are not normally prefixed with an underscore
72   on this system, the asm identifier `syscall_error' intrudes on the
73   C name space.  Make sure we use an innocuous name.  */
74#define	syscall_error	__syscall_error
75#define mcount		_mcount
76
77#define	PSEUDO(name, syscall_name, args)				      \
78  .globl syscall_error;							      \
79  ENTRY (name)								      \
80    DO_CALL (syscall_name, args);					      \
81    jcc JUMPTARGET(syscall_error)
82
83#undef PSEUDO_END
84#define PSEUDO_END(name)						      \
85  END (name)
86
87#ifdef PIC
88#define JUMPTARGET(name)	name##@PLTPC
89#else
90#define JUMPTARGET(name)	name
91#endif
92
93#endif	/* __ASSEMBLER__ */
94