sysdeps/unix/sysv/linux/sh/sysdep.h

   1 /* Copyright (C) 1992,1993,1995,1996,1997,1998,1999,2000,2002,2003,2004
   2         Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4    Contributed by Ulrich Drepper, <drepper@gnu.ai.mit.edu>, August 1995.
   5    Changed by Kaz Kojima, <kkojima@rr.iij4u.or.jp>.
   6
   7    The GNU C Library is free software; you can redistribute it and/or
   8    modify it under the terms of the GNU Lesser General Public
   9    License as published by the Free Software Foundation; either
  10    version 2.1 of the License, or (at your option) any later version.
  11
  12    The GNU C Library is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15    Lesser General Public License for more details.
  16
  17    You should have received a copy of the GNU Lesser General Public
  18    License along with the GNU C Library; if not, write to the Free
  19    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  20    02111-1307 USA.  */
  21
  22 #ifndef _LINUX_SH_SYSDEP_H
  23 #define _LINUX_SH_SYSDEP_H 1
  24
  25 /* There is some commonality.  */
  26 #include <sysdeps/unix/sh/sysdep.h>
  27
  28 /* For Linux we can use the system call table in the header file
  29         /usr/include/asm/unistd.h
  30    of the kernel.  But these symbols do not follow the SYS_* syntax
  31    so we have to redefine the `SYS_ify' macro here.  */
  32 #undef SYS_ify
  33 #define SYS_ify(syscall_name)   (__NR_##syscall_name)
  34
  35
  36 #ifdef __ASSEMBLER__
  37
  38 /* Linux uses a negative return value to indicate syscall errors,
  39    unlike most Unices, which use the condition codes' carry flag.
  40
  41    Since version 2.1 the return value of a system call might be
  42    negative even if the call succeeded.  E.g., the `lseek' system call
  43    might return a large offset.  Therefore we must not anymore test
  44    for < 0, but test for a real error by making sure the value in R0
  45    is a real error number.  Linus said he will make sure the no syscall
  46    returns a value in -1 .. -4095 as a valid result so we can savely
  47    test with -4095.  */
  48
  49 #define _IMM1 #-1
  50 #define _IMM12 #-12
  51 #undef  PSEUDO
  52 #define PSEUDO(name, syscall_name, args) \
  53  .text; \
  54  ENTRY (name); \
  55     DO_CALL (syscall_name, args); \
  56     mov r0,r1; \
  57     mov _IMM12,r2; \
  58     shad r2,r1; \
  59     not r1,r1; \
  60     tst r1,r1; \
  61     bf .Lpseudo_end; \
  62     SYSCALL_ERROR_HANDLER; \
  63  .Lpseudo_end:
  64
  65 #undef  PSEUDO_END
  66 #define PSEUDO_END(name) \
  67   END (name)
  68
  69 #undef  PSEUDO_NOERRNO
  70 #define PSEUDO_NOERRNO(name, syscall_name, args) \
  71  .text; \
  72  ENTRY (name); \
  73     DO_CALL (syscall_name, args)
  74
  75 #undef  PSEUDO_END_NOERRNO
  76 #define PSEUDO_END_NOERRNO(name) \
  77   END (name)
  78
  79 #define ret_NOERRNO ret
  80
  81 #define PSEUDO_ERRVAL(name, syscall_name, args) \
  82  .text; \
  83  ENTRY (name); \
  84     DO_CALL (syscall_name, args);
  85
  86 #undef  PSEUDO_END_ERRVAL
  87 #define PSEUDO_END_ERRVAL(name) \
  88   END (name)
  89
  90 #define ret_ERRVAL ret
  91
  92 #ifndef PIC
  93 # define SYSCALL_ERROR_HANDLER  \
  94         mov.l 0f,r1; \
  95         jmp @r1; \
  96          mov r0,r4; \
  97         .align 2; \
  98      0: .long __syscall_error
  99 #else
 100 # if RTLD_PRIVATE_ERRNO
 101 #  define SYSCALL_ERROR_HANDLER \
 102         neg r0,r1; \
 103         mov.l 0f,r12; \
 104         mova 0f,r0; \
 105         add r0,r12; \
 106         mov.l 1f,r0; \
 107         mov.l r1,@(r0,r12)
 108         bra .Lpseudo_end; \
 109          mov _IMM1,r0; \
 110         .align 2; \
 111      0: .long _GLOBAL_OFFSET_TABLE_; \
 112      1: .long rtld_errno@GOTOFF
 113
 114 # elif defined _LIBC_REENTRANT
 115
 116 #  if USE___THREAD
 117 #   ifndef NOT_IN_libc
 118 #    define SYSCALL_ERROR_ERRNO __libc_errno
 119 #   else
 120 #    define SYSCALL_ERROR_ERRNO errno
 121 #   endif
 122 #   define SYSCALL_ERROR_HANDLER \
 123         neg r0,r1; \
 124         mov r12,r2; \
 125         mov.l 0f,r12; \
 126         mova 0f,r0; \
 127         add r0,r12; \
 128         mov.l 1f,r0; \
 129         stc gbr, r4; \
 130         mov.l @(r0,r12),r0; \
 131         mov r2,r12; \
 132         add r4,r0; \
 133         mov.l r1,@r0; \
 134         bra .Lpseudo_end; \
 135          mov _IMM1,r0; \
 136         .align 2; \
 137      0: .long _GLOBAL_OFFSET_TABLE_; \
 138      1: .long SYSCALL_ERROR_ERRNO@GOTTPOFF
 139 #  else
 140 #   define SYSCALL_ERROR_HANDLER \
 141         neg r0,r1; \
 142         mov.l r14,@-r15; \
 143         mov.l r12,@-r15; \
 144         mov.l r1,@-r15; \
 145         mov.l 0f,r12; \
 146         mova 0f,r0; \
 147         add r0,r12; \
 148         sts.l pr,@-r15; \
 149         mov r15,r14; \
 150         mov.l 1f,r1; \
 151         bsrf r1; \
 152          nop; \
 153      2: mov r14,r15; \
 154         lds.l @r15+,pr; \
 155         mov.l @r15+,r1; \
 156         mov.l r1,@r0; \
 157         mov.l @r15+,r12; \
 158         mov.l @r15+,r14; \
 159         bra .Lpseudo_end; \
 160          mov _IMM1,r0; \
 161         .align 2; \
 162      0: .long _GLOBAL_OFFSET_TABLE_; \
 163      1: .long PLTJMP(C_SYMBOL_NAME(__errno_location))-(2b-.)
 164 /* A quick note: it is assumed that the call to `__errno_location' does
 165    not modify the stack!  */
 166 #  endif
 167 # else
 168 /* Store (-r0) into errno through the GOT.  */
 169 #  define SYSCALL_ERROR_HANDLER                                               \
 170         neg r0,r1; \
 171         mov r12,r2; \
 172         mov.l 0f,r12; \
 173         mova 0f,r0; \
 174         add r0,r12; \
 175         mov.l 1f,r0; \
 176         mov.l @(r0,r12),r0; \
 177         mov r2,r12; \
 178         mov.l r1,@r0; \
 179         bra .Lpseudo_end; \
 180          mov _IMM1,r0; \
 181         .align 2; \
 182      0: .long _GLOBAL_OFFSET_TABLE_; \
 183      1: .long errno@GOT
 184 # endif /* _LIBC_REENTRANT */
 185 #endif  /* PIC */
 186
 187 # ifdef NEED_SYSCALL_INST_PAD
 188 #  define SYSCALL_INST_PAD \
 189         or r0,r0; or r0,r0; or r0,r0; or r0,r0; or r0,r0
 190 # else
 191 #  define SYSCALL_INST_PAD
 192 # endif
 193
 194 #define SYSCALL_INST0   trapa #0x10
 195 #define SYSCALL_INST1   trapa #0x11
 196 #define SYSCALL_INST2   trapa #0x12
 197 #define SYSCALL_INST3   trapa #0x13
 198 #define SYSCALL_INST4   trapa #0x14
 199 #define SYSCALL_INST5   mov.l @(0,r15),r0; trapa #0x15
 200 #define SYSCALL_INST6   mov.l @(0,r15),r0; mov.l @(4,r15),r1; trapa #0x16
 201
 202 #undef  DO_CALL
 203 #define DO_CALL(syscall_name, args)     \
 204     mov.l 1f,r3;                        \
 205     SYSCALL_INST##args;                 \
 206     SYSCALL_INST_PAD;                   \
 207     bra 2f;                             \
 208      nop;                               \
 209     .align 2;                           \
 210  1: .long SYS_ify (syscall_name);       \
 211  2:
 212
 213 #else /* not __ASSEMBLER__ */
 214
 215 #define SYSCALL_INST_STR0       "trapa #0x10\n\t"
 216 #define SYSCALL_INST_STR1       "trapa #0x11\n\t"
 217 #define SYSCALL_INST_STR2       "trapa #0x12\n\t"
 218 #define SYSCALL_INST_STR3       "trapa #0x13\n\t"
 219 #define SYSCALL_INST_STR4       "trapa #0x14\n\t"
 220 #define SYSCALL_INST_STR5       "trapa #0x15\n\t"
 221 #define SYSCALL_INST_STR6       "trapa #0x16\n\t"
 222
 223 # ifdef NEED_SYSCALL_INST_PAD
 224 #  define SYSCALL_INST_PAD "\
 225         or r0,r0; or r0,r0; or r0,r0; or r0,r0; or r0,r0"
 226 # else
 227 #  define SYSCALL_INST_PAD
 228 # endif
 229
 230 #define ASMFMT_0
 231 #define ASMFMT_1 \
 232         , "r" (r4)
 233 #define ASMFMT_2 \
 234         , "r" (r4), "r" (r5)
 235 #define ASMFMT_3 \
 236         , "r" (r4), "r" (r5), "r" (r6)
 237 #define ASMFMT_4 \
 238         , "r" (r4), "r" (r5), "r" (r6), "r" (r7)
 239 #define ASMFMT_5 \
 240         , "r" (r4), "r" (r5), "r" (r6), "r" (r7), "0" (r0)
 241 #define ASMFMT_6 \
 242         , "r" (r4), "r" (r5), "r" (r6), "r" (r7), "0" (r0), "r" (r1)
 243 #define ASMFMT_7 \
 244         , "r" (r4), "r" (r5), "r" (r6), "r" (r7), "0" (r0), "r" (r1), "r" (r2)
 245
 246 #define SUBSTITUTE_ARGS_0()
 247 #define SUBSTITUTE_ARGS_1(arg1) \
 248         long int _arg1 = (long int) (arg1);                                   \
 249         register long int r4 asm ("%r4") = (long int) (_arg1)
 250 #define SUBSTITUTE_ARGS_2(arg1, arg2) \
 251         long int _arg1 = (long int) (arg1);                                   \
 252         long int _arg2 = (long int) (arg2);                                   \
 253         register long int r4 asm ("%r4") = (long int) (_arg1);                \
 254         register long int r5 asm ("%r5") = (long int) (_arg2)
 255 #define SUBSTITUTE_ARGS_3(arg1, arg2, arg3) \
 256         long int _arg1 = (long int) (arg1);                                   \
 257         long int _arg2 = (long int) (arg2);                                   \
 258         long int _arg3 = (long int) (arg3);                                   \
 259         register long int r4 asm ("%r4") = (long int) (_arg1);                \
 260         register long int r5 asm ("%r5") = (long int) (_arg2);                \
 261         register long int r6 asm ("%r6") = (long int) (_arg3)
 262 #define SUBSTITUTE_ARGS_4(arg1, arg2, arg3, arg4) \
 263         long int _arg1 = (long int) (arg1);                                   \
 264         long int _arg2 = (long int) (arg2);                                   \
 265         long int _arg3 = (long int) (arg3);                                   \
 266         long int _arg4 = (long int) (arg4);                                   \
 267         register long int r4 asm ("%r4") = (long int) (_arg1);                \
 268         register long int r5 asm ("%r5") = (long int) (_arg2);                \
 269         register long int r6 asm ("%r6") = (long int) (_arg3);                \
 270         register long int r7 asm ("%r7") = (long int) (_arg4)
 271 #define SUBSTITUTE_ARGS_5(arg1, arg2, arg3, arg4, arg5) \
 272         long int _arg1 = (long int) (arg1);                                   \
 273         long int _arg2 = (long int) (arg2);                                   \
 274         long int _arg3 = (long int) (arg3);                                   \
 275         long int _arg4 = (long int) (arg4);                                   \
 276         long int _arg5 = (long int) (arg5);                                   \
 277         register long int r4 asm ("%r4") = (long int) (_arg1);                \
 278         register long int r5 asm ("%r5") = (long int) (_arg2);                \
 279         register long int r6 asm ("%r6") = (long int) (_arg3);                \
 280         register long int r7 asm ("%r7") = (long int) (_arg4);                \
 281         register long int r0 asm ("%r0") = (long int) (_arg5)
 282 #define SUBSTITUTE_ARGS_6(arg1, arg2, arg3, arg4, arg5, arg6) \
 283         long int _arg1 = (long int) (arg1);                                   \
 284         long int _arg2 = (long int) (arg2);                                   \
 285         long int _arg3 = (long int) (arg3);                                   \
 286         long int _arg4 = (long int) (arg4);                                   \
 287         long int _arg5 = (long int) (arg5);                                   \
 288         long int _arg6 = (long int) (arg6);                                   \
 289         register long int r4 asm ("%r4") = (long int)(_arg1);                 \
 290         register long int r5 asm ("%r5") = (long int) (_arg2);                \
 291         register long int r6 asm ("%r6") = (long int) (_arg3);                \
 292         register long int r7 asm ("%r7") = (long int) (_arg4);                \
 293         register long int r0 asm ("%r0") = (long int) (_arg5);                \
 294         register long int r1 asm ("%r1") = (long int) (_arg6)
 295 #define SUBSTITUTE_ARGS_7(arg1, arg2, arg3, arg4, arg5, arg6, arg7) \
 296         long int _arg1 = (long int) (arg1);                                   \
 297         long int _arg2 = (long int) (arg2);                                   \
 298         long int _arg3 = (long int) (arg3);                                   \
 299         long int _arg4 = (long int) (arg4);                                   \
 300         long int _arg5 = (long int) (arg5);                                   \
 301         long int _arg6 = (long int) (arg6);                                   \
 302         long int _arg7 = (long int) (arg7);                                   \
 303         register long int r4 asm ("%r4") = (long int) (_arg1);                \
 304         register long int r5 asm ("%r5") = (long int) (_arg2);                \
 305         register long int r6 asm ("%r6") = (long int) (_arg3);                \
 306         register long int r7 asm ("%r7") = (long int) (_arg4);                \
 307         register long int r0 asm ("%r0") = (long int) (_arg5);                \
 308         register long int r1 asm ("%r1") = (long int) (_arg6);                \
 309         register long int r2 asm ("%r2") = (long int) (_arg7)
 310
 311 #undef INLINE_SYSCALL
 312 #define INLINE_SYSCALL(name, nr, args...) \
 313   ({                                                                          \
 314     unsigned int resultvar = INTERNAL_SYSCALL (name, , nr, args);             \
 315     if (__builtin_expect (INTERNAL_SYSCALL_ERROR_P (resultvar, ), 0))         \
 316       {                                                                       \
 317         __set_errno (INTERNAL_SYSCALL_ERRNO (resultvar, ));                   \
 318         resultvar = 0xffffffff;                                               \
 319       }                                                                       \
 320     (int) resultvar; })
 321
 322 #undef INTERNAL_SYSCALL
 323 #define INTERNAL_SYSCALL(name, err, nr, args...) \
 324   ({                                                                          \
 325     unsigned long int resultvar;                                              \
 326     register long int r3 asm ("%r3") = SYS_ify (name);                        \
 327     SUBSTITUTE_ARGS_##nr(args);                                               \
 328                                                                               \
 329     asm volatile (SYSCALL_INST_STR##nr SYSCALL_INST_PAD                       \
 330                   : "=z" (resultvar)                                          \
 331                   : "r" (r3) ASMFMT_##nr                                      \
 332                   : "memory");                                                \
 333                                                                               \
 334     (int) resultvar; })
 335
 336 /* The _NCS variant allows non-constant syscall numbers.  */
 337 #define INTERNAL_SYSCALL_NCS(name, err, nr, args...) \
 338   ({                                                                          \
 339     unsigned long int resultvar;                                              \
 340     register long int r3 asm ("%r3") = (name);                                \
 341     SUBSTITUTE_ARGS_##nr(args);                                               \
 342                                                                               \
 343     asm volatile (SYSCALL_INST_STR##nr SYSCALL_INST_PAD                       \
 344                   : "=z" (resultvar)                                          \
 345                   : "r" (r3) ASMFMT_##nr                                      \
 346                   : "memory");                                                \
 347                                                                               \
 348     (int) resultvar; })
 349
 350 #undef INTERNAL_SYSCALL_DECL
 351 #define INTERNAL_SYSCALL_DECL(err) do { } while (0)
 352
 353 #undef INTERNAL_SYSCALL_ERROR_P
 354 #define INTERNAL_SYSCALL_ERROR_P(val, err) \
 355   ((unsigned int) (val) >= 0xfffff001u)
 356
 357 #undef INTERNAL_SYSCALL_ERRNO
 358 #define INTERNAL_SYSCALL_ERRNO(val, err)        (-(val))
 359
 360 #endif  /* __ASSEMBLER__ */
 361
 362 #endif /* linux/sh/sysdep.h */