sysdeps/unix/sysv/linux/hppa/sysdep.c

   1 /* Copyright (C) 1997, 1998, 2001, 2003, 2007
   2    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 <stdarg.h>
  21 #include <sysdep.h>
  22 #include <errno.h>
  23
  24 extern int __syscall_error(int err_no);
  25 extern long int syscall (long int __sysno, ...) __THROW;
  26
  27 /* This routine is jumped to by all the syscall handlers, to stash
  28    an error number into errno.  */
  29 int
  30 __syscall_error (int err_no)
  31 {
  32   __set_errno (err_no);
  33   return -1;
  34 }
  35
  36
  37 /* HPPA implements syscall() in 'C'; the assembler version would
  38    typically be in syscall.S. Also note that we have INLINE_SYSCALL,
  39    INTERNAL_SYSCALL, and all the generated pure assembly syscall wrappers.
  40    How often the function is used is unknown. */
  41
  42 long int
  43 syscall (long int __sysno, ...)
  44 {
  45   /* FIXME: Keep this matching INLINE_SYSCALL for hppa */
  46   va_list args;
  47   long int arg0, arg1, arg2, arg3, arg4, arg5;
  48   long int __sys_res;
  49
  50   /* Load varargs */
  51   va_start (args, __sysno);
  52   arg0 = va_arg (args, long int);
  53   arg1 = va_arg (args, long int);
  54   arg2 = va_arg (args, long int);
  55   arg3 = va_arg (args, long int);
  56   arg4 = va_arg (args, long int);
  57   arg5 = va_arg (args, long int);
  58   va_end (args);
  59
  60   {
  61     register unsigned long int __res asm("r28");
  62     PIC_REG_DEF
  63     LOAD_ARGS_6 (arg0, arg1, arg2, arg3, arg4, arg5)
  64     asm volatile (SAVE_ASM_PIC
  65                   "     ble  0x100(%%sr2, %%r0) \n"
  66                   "     copy %1, %%r20          \n"
  67                   LOAD_ASM_PIC
  68                   : "=r" (__res)
  69                   : "r" (__sysno) PIC_REG_USE ASM_ARGS_6
  70                   : "memory", CALL_CLOB_REGS CLOB_ARGS_6);
  71     __sys_res = __res;
  72   }
  73   if ((unsigned long int) __sys_res >= (unsigned long int) -4095)
  74     {
  75       __set_errno (-__sys_res);
  76       __sys_res = -1;
  77     }
  78   return __sys_res;
  79 }
  80