|
Packit |
6c4009 |
/* Copyright (C) 1997-2018 Free Software Foundation, Inc.
|
|
Packit |
6c4009 |
This file is part of the GNU C Library.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
The GNU C Library is free software; you can redistribute it and/or
|
|
Packit |
6c4009 |
modify it under the terms of the GNU Lesser General Public
|
|
Packit |
6c4009 |
License as published by the Free Software Foundation; either
|
|
Packit |
6c4009 |
version 2.1 of the License, or (at your option) any later version.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
The GNU C Library is distributed in the hope that it will be useful,
|
|
Packit |
6c4009 |
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
Packit |
6c4009 |
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Packit |
6c4009 |
Lesser General Public License for more details.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
You should have received a copy of the GNU Lesser General Public
|
|
Packit |
6c4009 |
License along with the GNU C Library. If not, see
|
|
Packit |
6c4009 |
<http://www.gnu.org/licenses/>. */
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
#include <stdarg.h>
|
|
Packit |
6c4009 |
#include <sysdep.h>
|
|
Packit |
6c4009 |
#include <errno.h>
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* HPPA implements syscall() in 'C'; the assembler version would
|
|
Packit |
6c4009 |
typically be in syscall.S. Also note that we have INLINE_SYSCALL,
|
|
Packit |
6c4009 |
INTERNAL_SYSCALL, and all the generated pure assembly syscall wrappers.
|
|
Packit |
6c4009 |
How often the function is used is unknown. */
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
long int
|
|
Packit |
6c4009 |
syscall (long int __sysno, ...)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
/* FIXME: Keep this matching INLINE_SYSCALL for hppa */
|
|
Packit |
6c4009 |
va_list args;
|
|
Packit |
6c4009 |
long int arg0, arg1, arg2, arg3, arg4, arg5;
|
|
Packit |
6c4009 |
long int __sys_res;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Load varargs */
|
|
Packit |
6c4009 |
va_start (args, __sysno);
|
|
Packit |
6c4009 |
arg0 = va_arg (args, long int);
|
|
Packit |
6c4009 |
arg1 = va_arg (args, long int);
|
|
Packit |
6c4009 |
arg2 = va_arg (args, long int);
|
|
Packit |
6c4009 |
arg3 = va_arg (args, long int);
|
|
Packit |
6c4009 |
arg4 = va_arg (args, long int);
|
|
Packit |
6c4009 |
arg5 = va_arg (args, long int);
|
|
Packit |
6c4009 |
va_end (args);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
LOAD_ARGS_6 (arg0, arg1, arg2, arg3, arg4, arg5)
|
|
Packit |
6c4009 |
register unsigned long int __res asm("r28");
|
|
Packit |
6c4009 |
PIC_REG_DEF
|
|
Packit |
6c4009 |
LOAD_REGS_6
|
|
Packit |
6c4009 |
asm volatile (SAVE_ASM_PIC
|
|
Packit |
6c4009 |
" ble 0x100(%%sr2, %%r0) \n"
|
|
Packit |
6c4009 |
" copy %1, %%r20 \n"
|
|
Packit |
6c4009 |
LOAD_ASM_PIC
|
|
Packit |
6c4009 |
: "=r" (__res)
|
|
Packit |
6c4009 |
: "r" (__sysno) PIC_REG_USE ASM_ARGS_6
|
|
Packit |
6c4009 |
: "memory", CALL_CLOB_REGS CLOB_ARGS_6);
|
|
Packit |
6c4009 |
__sys_res = __res;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
if ((unsigned long int) __sys_res >= (unsigned long int) -4095)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
__set_errno (-__sys_res);
|
|
Packit |
6c4009 |
__sys_res = -1;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
return __sys_res;
|
|
Packit |
6c4009 |
}
|