276 lines
7.4 KiB
C
276 lines
7.4 KiB
C
/* Copyright (C) 1992, 1995, 1996, 2000 Free Software Foundation, Inc.
|
|
This file is part of the GNU C Library.
|
|
Contributed by Brendan Kehoe (brendan@zen.org).
|
|
|
|
The GNU C Library is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU Library General Public License as
|
|
published by the Free Software Foundation; either version 2 of the
|
|
License, or (at your option) any later version.
|
|
|
|
The GNU C Library is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Library General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Library General Public
|
|
License along with the GNU C Library; see the file COPYING.LIB. If not,
|
|
write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
|
Boston, MA 02111-1307, USA. */
|
|
|
|
#include <sysdeps/unix/sysdep.h>
|
|
|
|
#ifdef __ASSEMBLER__
|
|
|
|
#ifdef __linux__
|
|
# include <alpha/regdef.h>
|
|
#else
|
|
# include <regdef.h>
|
|
#endif
|
|
|
|
#ifdef __STDC__
|
|
#define __LABEL(x) x##:
|
|
#else
|
|
#define __LABEL(x) x/**/:
|
|
#endif
|
|
|
|
#define LEAF(name, framesize) \
|
|
.globl name; \
|
|
.align 3; \
|
|
.ent name, 0; \
|
|
__LABEL(name) \
|
|
.frame sp, framesize, ra
|
|
|
|
#define ENTRY(name) \
|
|
.globl name; \
|
|
.align 3; \
|
|
.ent name, 0; \
|
|
__LABEL(name) \
|
|
.frame sp, 0, ra
|
|
|
|
/* Mark the end of function SYM. */
|
|
#undef END
|
|
#define END(sym) .end sym
|
|
|
|
/* Note that PSEUDO/PSEUDO_END use label number 1996---do not use a
|
|
label of that number between those two macros! */
|
|
|
|
#ifdef PROF
|
|
#define PSEUDO(name, syscall_name, args) \
|
|
.globl name; \
|
|
.align 3; \
|
|
.ent name,0; \
|
|
__LABEL(name) \
|
|
.frame sp, 0, ra; \
|
|
ldgp gp,0(pv); \
|
|
.set noat; \
|
|
lda AT,_mcount; \
|
|
jsr AT,(AT),_mcount; \
|
|
.set at; \
|
|
.prologue 1; \
|
|
ldiq v0, SYS_ify(syscall_name); \
|
|
.set noat; \
|
|
call_pal PAL_callsys; \
|
|
.set at; \
|
|
bne a3, 1996f; \
|
|
3:
|
|
#else
|
|
#define PSEUDO(name, syscall_name, args) \
|
|
.globl name; \
|
|
.align 3; \
|
|
.ent name,0; \
|
|
__LABEL(name) \
|
|
.frame sp, 0, ra \
|
|
.prologue 0; \
|
|
ldiq v0, SYS_ify(syscall_name); \
|
|
.set noat; \
|
|
call_pal PAL_callsys; \
|
|
.set at; \
|
|
bne a3, 1996f; \
|
|
3:
|
|
#endif
|
|
|
|
#undef PSEUDO_END
|
|
#ifdef PROF
|
|
#define PSEUDO_END(sym) \
|
|
1996: \
|
|
jmp zero, __syscall_error; \
|
|
END(sym)
|
|
#else
|
|
#define PSEUDO_END(sym) \
|
|
1996: \
|
|
br gp, 2f; \
|
|
2: ldgp gp, 0(gp); \
|
|
jmp zero, __syscall_error; \
|
|
END(sym)
|
|
#endif
|
|
|
|
#define r0 v0
|
|
#define r1 a4
|
|
|
|
#define MOVE(x,y) mov x,y
|
|
|
|
#else /* !ASSEMBLER */
|
|
|
|
/* Define a macro which expands inline into the wrapper code for a
|
|
system call. */
|
|
|
|
#undef INLINE_SYSCALL
|
|
#define INLINE_SYSCALL(name, nr, args...) INLINE_SYSCALL1(name, nr, args)
|
|
|
|
#define INLINE_SYSCALL1(name, nr, args...) \
|
|
({ \
|
|
long _sc_ret, _sc_err; \
|
|
inline_syscall##nr(name, args); \
|
|
if (_sc_err) \
|
|
{ \
|
|
__set_errno (_sc_ret); \
|
|
_sc_ret = -1L; \
|
|
} \
|
|
_sc_ret; \
|
|
})
|
|
|
|
#define inline_syscall_clobbers \
|
|
"$1", "$2", "$3", "$4", "$5", "$6", "$7", "$8", \
|
|
"$22", "$23", "$24", "$25", "$27", "$28", "memory"
|
|
|
|
/* It is moderately important optimization-wise to limit the lifetime
|
|
of the hard-register variables as much as possible. Thus we copy
|
|
in/out as close to the asm as possible. */
|
|
|
|
#define inline_syscall0(name) \
|
|
{ \
|
|
register long _sc_0 __asm__("$0"); \
|
|
register long _sc_19 __asm__("$19"); \
|
|
\
|
|
_sc_0 = __NR_##name; \
|
|
__asm__("callsys # %0 %1 <= %2" \
|
|
: "=r"(_sc_0), "=r"(_sc_19) \
|
|
: "0"(_sc_0) \
|
|
: inline_syscall_clobbers); \
|
|
_sc_ret = _sc_0, _sc_err = _sc_19; \
|
|
}
|
|
|
|
#define inline_syscall1(name,arg1) \
|
|
{ \
|
|
register long _sc_0 __asm__("$0"); \
|
|
register long _sc_16 __asm__("$16"); \
|
|
register long _sc_19 __asm__("$19"); \
|
|
\
|
|
_sc_0 = __NR_##name; \
|
|
_sc_16 = (long) (arg1); \
|
|
__asm__("callsys # %0 %1 <= %2 %3" \
|
|
: "=r"(_sc_0), "=r"(_sc_19) \
|
|
: "0"(_sc_0), "r"(_sc_16) \
|
|
: inline_syscall_clobbers); \
|
|
_sc_ret = _sc_0, _sc_err = _sc_19; \
|
|
}
|
|
|
|
#define inline_syscall2(name,arg1,arg2) \
|
|
{ \
|
|
register long _sc_0 __asm__("$0"); \
|
|
register long _sc_16 __asm__("$16"); \
|
|
register long _sc_17 __asm__("$17"); \
|
|
register long _sc_19 __asm__("$19"); \
|
|
\
|
|
_sc_0 = __NR_##name; \
|
|
_sc_16 = (long) (arg1); \
|
|
_sc_17 = (long) (arg2); \
|
|
__asm__("callsys # %0 %1 <= %2 %3 %4" \
|
|
: "=r"(_sc_0), "=r"(_sc_19) \
|
|
: "0"(_sc_0), "r"(_sc_16), "r"(_sc_17) \
|
|
: inline_syscall_clobbers); \
|
|
_sc_ret = _sc_0, _sc_err = _sc_19; \
|
|
}
|
|
|
|
#define inline_syscall3(name,arg1,arg2,arg3) \
|
|
{ \
|
|
register long _sc_0 __asm__("$0"); \
|
|
register long _sc_16 __asm__("$16"); \
|
|
register long _sc_17 __asm__("$17"); \
|
|
register long _sc_18 __asm__("$18"); \
|
|
register long _sc_19 __asm__("$19"); \
|
|
\
|
|
_sc_0 = __NR_##name; \
|
|
_sc_16 = (long) (arg1); \
|
|
_sc_17 = (long) (arg2); \
|
|
_sc_18 = (long) (arg3); \
|
|
__asm__("callsys # %0 %1 <= %2 %3 %4 %5" \
|
|
: "=r"(_sc_0), "=r"(_sc_19) \
|
|
: "0"(_sc_0), "r"(_sc_16), "r"(_sc_17), \
|
|
"r"(_sc_18) \
|
|
: inline_syscall_clobbers); \
|
|
_sc_ret = _sc_0, _sc_err = _sc_19; \
|
|
}
|
|
|
|
#define inline_syscall4(name,arg1,arg2,arg3,arg4) \
|
|
{ \
|
|
register long _sc_0 __asm__("$0"); \
|
|
register long _sc_16 __asm__("$16"); \
|
|
register long _sc_17 __asm__("$17"); \
|
|
register long _sc_18 __asm__("$18"); \
|
|
register long _sc_19 __asm__("$19"); \
|
|
\
|
|
_sc_0 = __NR_##name; \
|
|
_sc_16 = (long) (arg1); \
|
|
_sc_17 = (long) (arg2); \
|
|
_sc_18 = (long) (arg3); \
|
|
_sc_19 = (long) (arg4); \
|
|
__asm__("callsys # %0 %1 <= %2 %3 %4 %5 %6" \
|
|
: "=r"(_sc_0), "=r"(_sc_19) \
|
|
: "0"(_sc_0), "r"(_sc_16), "r"(_sc_17), \
|
|
"r"(_sc_18), "1"(_sc_19) \
|
|
: inline_syscall_clobbers); \
|
|
_sc_ret = _sc_0, _sc_err = _sc_19; \
|
|
}
|
|
|
|
#define inline_syscall5(name,arg1,arg2,arg3,arg4,arg5) \
|
|
{ \
|
|
register long _sc_0 __asm__("$0"); \
|
|
register long _sc_16 __asm__("$16"); \
|
|
register long _sc_17 __asm__("$17"); \
|
|
register long _sc_18 __asm__("$18"); \
|
|
register long _sc_19 __asm__("$19"); \
|
|
register long _sc_20 __asm__("$20"); \
|
|
\
|
|
_sc_0 = __NR_##name; \
|
|
_sc_16 = (long) (arg1); \
|
|
_sc_17 = (long) (arg2); \
|
|
_sc_18 = (long) (arg3); \
|
|
_sc_19 = (long) (arg4); \
|
|
_sc_20 = (long) (arg5); \
|
|
__asm__("callsys # %0 %1 <= %2 %3 %4 %5 %6 %7" \
|
|
: "=r"(_sc_0), "=r"(_sc_19) \
|
|
: "0"(_sc_0), "r"(_sc_16), "r"(_sc_17), \
|
|
"r"(_sc_18), "1"(_sc_19), "r"(_sc_20) \
|
|
: inline_syscall_clobbers); \
|
|
_sc_ret = _sc_0, _sc_err = _sc_19; \
|
|
}
|
|
|
|
#define inline_syscall6(name,arg1,arg2,arg3,arg4,arg5,arg6) \
|
|
{ \
|
|
register long _sc_0 __asm__("$0"); \
|
|
register long _sc_16 __asm__("$16"); \
|
|
register long _sc_17 __asm__("$17"); \
|
|
register long _sc_18 __asm__("$18"); \
|
|
register long _sc_19 __asm__("$19"); \
|
|
register long _sc_20 __asm__("$20"); \
|
|
register long _sc_21 __asm__("$21"); \
|
|
\
|
|
_sc_0 = __NR_##name; \
|
|
_sc_16 = (long) (arg1); \
|
|
_sc_17 = (long) (arg2); \
|
|
_sc_18 = (long) (arg3); \
|
|
_sc_19 = (long) (arg4); \
|
|
_sc_20 = (long) (arg5); \
|
|
_sc_21 = (long) (arg6); \
|
|
__asm__("callsys # %0 %1 <= %2 %3 %4 %5 %6 %7 %8" \
|
|
: "=r"(_sc_0), "=r"(_sc_19) \
|
|
: "0"(_sc_0), "r"(_sc_16), "r"(_sc_17), \
|
|
"r"(_sc_18), "1"(_sc_19), "r"(_sc_20), \
|
|
"r"(_sc_21) \
|
|
: inline_syscall_clobbers); \
|
|
_sc_ret = _sc_0, _sc_err = _sc_19; \
|
|
}
|
|
|
|
#endif /* ASSEMBLER */
|