libc/sysdeps/linux/hppa/syscall.c

   1 /* 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
  29 long int
  30 syscall (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 }