blob: cd11e084e5fb274dfdd3e12d921f9b398f8c43d5 [file] [log] [blame]
yuezonghe824eb0c2024-06-27 02:32:26 -07001/* Copyright (C) 1997, 1998, 2001, 2003 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Lesser General Public
6 License as published by the Free Software Foundation; either
7 version 2.1 of the License, or (at your option) any later version.
8
9 The GNU C Library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 Lesser General Public License for more details.
13
14 You should have received a copy of the GNU Lesser General Public
15 License along with the GNU C Library; if not, write to the Free
16 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
17 02111-1307 USA. */
18
19#include <stdarg.h>
20#include <errno.h>
21#include <sys/syscall.h>
22#include <unistd.h>
23
24/* HPPA implements syscall() in 'C'; the assembler version would
25 typically be in syscall.S. Also note that we have INLINE_SYSCALL,
26 INTERNAL_SYSCALL, and all the generated pure assembly syscall wrappers.
27 How often the function is used is unknown. */
28
29long int
30syscall (long int __sysno, ...)
31{
32 /* FIXME: Keep this matching INLINE_SYSCALL for hppa */
33 va_list args;
34 long int arg0, arg1, arg2, arg3, arg4, arg5;
35 long int __sys_res;
36
37 /* Load varargs */
38 va_start (args, __sysno);
39 arg0 = va_arg (args, long int);
40 arg1 = va_arg (args, long int);
41 arg2 = va_arg (args, long int);
42 arg3 = va_arg (args, long int);
43 arg4 = va_arg (args, long int);
44 arg5 = va_arg (args, long int);
45 va_end (args);
46
47 {
48 register unsigned long int __res __asm__("r28");
49 K_LOAD_ARGS_6 (arg0, arg1, arg2, arg3, arg4, arg5)
50 __asm__ __volatile__ (K_STW_ASM_PIC
51 " ble 0x100(%%sr2, %%r0) \n"
52 " copy %1, %%r20 \n"
53 K_LDW_ASM_PIC
54 : "=r" (__res)
55 : "r" (__sysno) K_ASM_ARGS_6
56 : "memory", K_CALL_CLOB_REGS K_CLOB_ARGS_6);
57 __sys_res = __res;
58 }
59 if ((unsigned long int) __sys_res >= (unsigned long int) -4095)
60 {
61 __set_errno (-__sys_res);
62 __sys_res = -1;
63 }
64 return __sys_res;
65}