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

   1 /* Copyright (C) 1992,1993,1995,1996,1997,1998,1999,2000,2002,2003,2004,
   2    2005,2006    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 #include <tls.h>
  28
  29 /* For Linux we can use the system call table in the header file
  30         /usr/include/asm/unistd.h
  31    of the kernel.  But these symbols do not follow the SYS_* syntax
  32    so we have to redefine the `SYS_ify' macro here.  */
  33 #undef SYS_ify
  34 #define SYS_ify(syscall_name)   (__NR_##syscall_name)
  35
  36
  37 #ifdef __ASSEMBLER__
  38
  39 /* Linux uses a negative return value to indicate syscall errors,
  40    unlike most Unices, which use the condition codes' carry flag.
  41
  42    Since version 2.1 the return value of a system call might be
  43    negative even if the call succeeded.  E.g., the `lseek' system call
  44    might return a large offset.  Therefore we must not anymore test
  45    for < 0, but test for a real error by making sure the value in R0
  46    is a real error number.  Linus said he will make sure the no syscall
  47    returns a value in -1 .. -4095 as a valid result so we can savely
  48    test with -4095.  */
  49
  50 #define _IMM1 #-1
  51 #define _IMM12 #-12
  52 #undef  PSEUDO
  53 #define PSEUDO(name, syscall_name, args) \
  54  .text; \
  55  ENTRY (name); \
  56     DO_CALL (syscall_name, args); \
  57     mov r0,r1; \
  58     mov _IMM12,r2; \
  59     shad r2,r1; \
  60     not r1,r1; \
  61     tst r1,r1; \
  62     bf .Lpseudo_end; \
  63     SYSCALL_ERROR_HANDLER; \
  64  .Lpseudo_end:
  65
  66 #undef  PSEUDO_END
  67 #define PSEUDO_END(name) \
  68   END (name)
  69
  70 #undef  PSEUDO_NOERRNO
  71 #define PSEUDO_NOERRNO(name, syscall_name, args) \
  72  .text; \
  73  ENTRY (name); \
  74     DO_CALL (syscall_name, args)
  75
  76 #undef  PSEUDO_END_NOERRNO
  77 #define PSEUDO_END_NOERRNO(name) \
  78   END (name)
  79
  80 #define ret_NOERRNO ret
  81
  82 #define PSEUDO_ERRVAL(name, syscall_name, args) \
  83  .text; \
  84  ENTRY (name); \
  85     DO_CALL (syscall_name, args);
  86
  87 #undef  PSEUDO_END_ERRVAL
  88 #define PSEUDO_END_ERRVAL(name) \
  89   END (name)
  90
  91 #define ret_ERRVAL ret
  92
  93 #ifndef PIC
  94 # define SYSCALL_ERROR_HANDLER  \
  95         mov.l 0f,r1; \
  96         jmp @r1; \
  97          mov r0,r4; \
  98         .align 2; \
  99      0: .long __syscall_error
 100 #else
 101 # if RTLD_PRIVATE_ERRNO
 102 #  define SYSCALL_ERROR_HANDLER \
 103         neg r0,r1; \
 104         mov.l 0f,r12; \
 105         mova 0f,r0; \
 106         add r0,r12; \
 107         mov.l 1f,r0; \
 108         mov.l r1,@(r0,r12); \
 109         bra .Lpseudo_end; \
 110          mov _IMM1,r0; \
 111         .align 2; \
 112      0: .long _GLOBAL_OFFSET_TABLE_; \
 113      1: .long rtld_errno@GOTOFF
 114
 115 # elif defined _LIBC_REENTRANT
 116
 117 #  if USE___THREAD
 118 #   ifndef NOT_IN_libc
 119 #    define SYSCALL_ERROR_ERRNO __libc_errno
 120 #   else
 121 #    define SYSCALL_ERROR_ERRNO errno
 122 #   endif
 123 #   define SYSCALL_ERROR_HANDLER \
 124         neg r0,r1; \
 125         mov r12,r2; \
 126         mov.l 0f,r12; \
 127         mova 0f,r0; \
 128         add r0,r12; \
 129         mov.l 1f,r0; \
 130         stc gbr, r4; \
 131         mov.l @(r0,r12),r0; \
 132         mov r2,r12; \
 133         add r4,r0; \
 134         mov.l r1,@r0; \
 135         bra .Lpseudo_end; \
 136          mov _IMM1,r0; \
 137         .align 2; \
 138      0: .long _GLOBAL_OFFSET_TABLE_; \
 139      1: .long SYSCALL_ERROR_ERRNO@GOTTPOFF
 140 #  else
 141 #   define SYSCALL_ERROR_HANDLER \
 142         neg r0,r1; \
 143         mov.l r14,@-r15; \
 144         cfi_adjust_cfa_offset (4); \
 145         cfi_rel_offset (r14, 0); \
 146         mov.l r12,@-r15; \
 147         cfi_adjust_cfa_offset (4); \
 148         cfi_rel_offset (r12, 0); \
 149         mov.l r1,@-r15; \
 150         cfi_adjust_cfa_offset (4); \
 151         cfi_rel_offset (r1, 0); \
 152         mov.l 0f,r12; \
 153         mova 0f,r0; \
 154         add r0,r12; \
 155         sts.l pr,@-r15; \
 156         cfi_adjust_cfa_offset (4); \
 157         cfi_rel_offset (pr, 0); \
 158         mov r15,r14; \
 159         cfi_def_cfa_register (r14); \
 160         mov.l 1f,r1; \
 161         bsrf r1; \
 162          nop; \
 163      2: mov r14,r15; \
 164         lds.l @r15+,pr; \
 165         mov.l @r15+,r1; \
 166         mov.l r1,@r0; \
 167         mov.l @r15+,r12; \
 168         mov.l @r15+,r14; \
 169         bra .Lpseudo_end; \
 170          mov _IMM1,r0; \
 171         .align 2; \
 172      0: .long _GLOBAL_OFFSET_TABLE_; \
 173      1: .long PLTJMP(C_SYMBOL_NAME(__errno_location))-(2b-.)
 174 /* A quick note: it is assumed that the call to `__errno_location' does
 175    not modify the stack!  */
 176 #  endif
 177 # else
 178 /* Store (-r0) into errno through the GOT.  */
 179 #  define SYSCALL_ERROR_HANDLER                                               \
 180         neg r0,r1; \
 181         mov r12,r2; \
 182         mov.l 0f,r12; \
 183         mova 0f,r0; \
 184         add r0,r12; \
 185         mov.l 1f,r0; \
 186         mov.l @(r0,r12),r0; \
 187         mov r2,r12; \
 188         mov.l r1,@r0; \
 189         bra .Lpseudo_end; \
 190          mov _IMM1,r0; \
 191         .align 2; \
 192      0: .long _GLOBAL_OFFSET_TABLE_; \
 193      1: .long errno@GOT
 194 # endif /* _LIBC_REENTRANT */
 195 #endif  /* PIC */
 196
 197 # ifdef NEED_SYSCALL_INST_PAD
 198 #  define SYSCALL_INST_PAD \
 199         or r0,r0; or r0,r0; or r0,r0; or r0,r0; or r0,r0
 200 # else
 201 #  define SYSCALL_INST_PAD
 202 # endif
 203
 204 #define SYSCALL_INST0   trapa #0x10
 205 #define SYSCALL_INST1   trapa #0x11
 206 #define SYSCALL_INST2   trapa #0x12
 207 #define SYSCALL_INST3   trapa #0x13
 208 #define SYSCALL_INST4   trapa #0x14
 209 #define SYSCALL_INST5   mov.l @(0,r15),r0; trapa #0x15
 210 #define SYSCALL_INST6   mov.l @(0,r15),r0; mov.l @(4,r15),r1; trapa #0x16
 211
 212 #undef  DO_CALL
 213 #define DO_CALL(syscall_name, args)     \
 214     mov.l 1f,r3;                        \
 215     SYSCALL_INST##args;                 \
 216     SYSCALL_INST_PAD;                   \
 217     bra 2f;                             \
 218      nop;                               \
 219     .align 2;                           \
 220  1: .long SYS_ify (syscall_name);       \
 221  2:
 222
 223 #else /* not __ASSEMBLER__ */
 224
 225 #define SYSCALL_INST_STR0       "trapa #0x10\n\t"
 226 #define SYSCALL_INST_STR1       "trapa #0x11\n\t"
 227 #define SYSCALL_INST_STR2       "trapa #0x12\n\t"
 228 #define SYSCALL_INST_STR3       "trapa #0x13\n\t"
 229 #define SYSCALL_INST_STR4       "trapa #0x14\n\t"
 230 #define SYSCALL_INST_STR5       "trapa #0x15\n\t"
 231 #define SYSCALL_INST_STR6       "trapa #0x16\n\t"
 232
 233 # ifdef NEED_SYSCALL_INST_PAD
 234 #  define SYSCALL_INST_PAD "\
 235         or r0,r0; or r0,r0; or r0,r0; or r0,r0; or r0,r0"
 236 # else
 237 #  define SYSCALL_INST_PAD
 238 # endif
 239
 240 #define ASMFMT_0
 241 #define ASMFMT_1 \
 242         , "r" (r4)
 243 #define ASMFMT_2 \
 244         , "r" (r4), "r" (r5)
 245 #define ASMFMT_3 \
 246         , "r" (r4), "r" (r5), "r" (r6)
 247 #define ASMFMT_4 \
 248         , "r" (r4), "r" (r5), "r" (r6), "r" (r7)
 249 #define ASMFMT_5 \
 250         , "r" (r4), "r" (r5), "r" (r6), "r" (r7), "0" (r0)
 251 #define ASMFMT_6 \
 252         , "r" (r4), "r" (r5), "r" (r6), "r" (r7), "0" (r0), "r" (r1)
 253 #define ASMFMT_7 \
 254         , "r" (r4), "r" (r5), "r" (r6), "r" (r7), "0" (r0), "r" (r1), "r" (r2)
 255
 256 #define SUBSTITUTE_ARGS_0()
 257 #define SUBSTITUTE_ARGS_1(arg1) \
 258         long int _arg1 = (long int) (arg1);                                   \
 259         register long int r4 asm ("%r4") = (long int) (_arg1)
 260 #define SUBSTITUTE_ARGS_2(arg1, arg2) \
 261         long int _arg1 = (long int) (arg1);                                   \
 262         long int _arg2 = (long int) (arg2);                                   \
 263         register long int r4 asm ("%r4") = (long int) (_arg1);                \
 264         register long int r5 asm ("%r5") = (long int) (_arg2)
 265 #define SUBSTITUTE_ARGS_3(arg1, arg2, arg3) \
 266         long int _arg1 = (long int) (arg1);                                   \
 267         long int _arg2 = (long int) (arg2);                                   \
 268         long int _arg3 = (long int) (arg3);                                   \
 269         register long int r4 asm ("%r4") = (long int) (_arg1);                \
 270         register long int r5 asm ("%r5") = (long int) (_arg2);                \
 271         register long int r6 asm ("%r6") = (long int) (_arg3)
 272 #define SUBSTITUTE_ARGS_4(arg1, arg2, arg3, arg4) \
 273         long int _arg1 = (long int) (arg1);                                   \
 274         long int _arg2 = (long int) (arg2);                                   \
 275         long int _arg3 = (long int) (arg3);                                   \
 276         long int _arg4 = (long int) (arg4);                                   \
 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 #define SUBSTITUTE_ARGS_5(arg1, arg2, arg3, arg4, arg5) \
 282         long int _arg1 = (long int) (arg1);                                   \
 283         long int _arg2 = (long int) (arg2);                                   \
 284         long int _arg3 = (long int) (arg3);                                   \
 285         long int _arg4 = (long int) (arg4);                                   \
 286         long int _arg5 = (long int) (arg5);                                   \
 287         register long int r4 asm ("%r4") = (long int) (_arg1);                \
 288         register long int r5 asm ("%r5") = (long int) (_arg2);                \
 289         register long int r6 asm ("%r6") = (long int) (_arg3);                \
 290         register long int r7 asm ("%r7") = (long int) (_arg4);                \
 291         register long int r0 asm ("%r0") = (long int) (_arg5)
 292 #define SUBSTITUTE_ARGS_6(arg1, arg2, arg3, arg4, arg5, arg6) \
 293         long int _arg1 = (long int) (arg1);                                   \
 294         long int _arg2 = (long int) (arg2);                                   \
 295         long int _arg3 = (long int) (arg3);                                   \
 296         long int _arg4 = (long int) (arg4);                                   \
 297         long int _arg5 = (long int) (arg5);                                   \
 298         long int _arg6 = (long int) (arg6);                                   \
 299         register long int r4 asm ("%r4") = (long int)(_arg1);                 \
 300         register long int r5 asm ("%r5") = (long int) (_arg2);                \
 301         register long int r6 asm ("%r6") = (long int) (_arg3);                \
 302         register long int r7 asm ("%r7") = (long int) (_arg4);                \
 303         register long int r0 asm ("%r0") = (long int) (_arg5);                \
 304         register long int r1 asm ("%r1") = (long int) (_arg6)
 305 #define SUBSTITUTE_ARGS_7(arg1, arg2, arg3, arg4, arg5, arg6, arg7) \
 306         long int _arg1 = (long int) (arg1);                                   \
 307         long int _arg2 = (long int) (arg2);                                   \
 308         long int _arg3 = (long int) (arg3);                                   \
 309         long int _arg4 = (long int) (arg4);                                   \
 310         long int _arg5 = (long int) (arg5);                                   \
 311         long int _arg6 = (long int) (arg6);                                   \
 312         long int _arg7 = (long int) (arg7);                                   \
 313         register long int r4 asm ("%r4") = (long int) (_arg1);                \
 314         register long int r5 asm ("%r5") = (long int) (_arg2);                \
 315         register long int r6 asm ("%r6") = (long int) (_arg3);                \
 316         register long int r7 asm ("%r7") = (long int) (_arg4);                \
 317         register long int r0 asm ("%r0") = (long int) (_arg5);                \
 318         register long int r1 asm ("%r1") = (long int) (_arg6);                \
 319         register long int r2 asm ("%r2") = (long int) (_arg7)
 320
 321 #undef INLINE_SYSCALL
 322 #define INLINE_SYSCALL(name, nr, args...) \
 323   ({                                                                          \
 324     unsigned int resultvar = INTERNAL_SYSCALL (name, , nr, args);             \
 325     if (__builtin_expect (INTERNAL_SYSCALL_ERROR_P (resultvar, ), 0))         \
 326       {                                                                       \
 327         __set_errno (INTERNAL_SYSCALL_ERRNO (resultvar, ));                   \
 328         resultvar = 0xffffffff;                                               \
 329       }                                                                       \
 330     (int) resultvar; })
 331
 332 #undef INTERNAL_SYSCALL
 333 #define INTERNAL_SYSCALL(name, err, nr, args...) \
 334   ({                                                                          \
 335     unsigned long int resultvar;                                              \
 336     register long int r3 asm ("%r3") = SYS_ify (name);                        \
 337     SUBSTITUTE_ARGS_##nr(args);                                               \
 338                                                                               \
 339     asm volatile (SYSCALL_INST_STR##nr SYSCALL_INST_PAD                       \
 340                   : "=z" (resultvar)                                          \
 341                   : "r" (r3) ASMFMT_##nr                                      \
 342                   : "memory");                                                \
 343                                                                               \
 344     (int) resultvar; })
 345
 346 /* The _NCS variant allows non-constant syscall numbers.  */
 347 #define INTERNAL_SYSCALL_NCS(name, err, nr, args...) \
 348   ({                                                                          \
 349     unsigned long int resultvar;                                              \
 350     register long int r3 asm ("%r3") = (name);                                \
 351     SUBSTITUTE_ARGS_##nr(args);                                               \
 352                                                                               \
 353     asm volatile (SYSCALL_INST_STR##nr SYSCALL_INST_PAD                       \
 354                   : "=z" (resultvar)                                          \
 355                   : "r" (r3) ASMFMT_##nr                                      \
 356                   : "memory");                                                \
 357                                                                               \
 358     (int) resultvar; })
 359
 360 #undef INTERNAL_SYSCALL_DECL
 361 #define INTERNAL_SYSCALL_DECL(err) do { } while (0)
 362
 363 #undef INTERNAL_SYSCALL_ERROR_P
 364 #define INTERNAL_SYSCALL_ERROR_P(val, err) \
 365   ((unsigned int) (val) >= 0xfffff001u)
 366
 367 #undef INTERNAL_SYSCALL_ERRNO
 368 #define INTERNAL_SYSCALL_ERRNO(val, err)        (-(val))
 369
 370 #endif  /* __ASSEMBLER__ */
 371
 372 /* Pointer mangling support.  */
 373 #if defined NOT_IN_libc && defined IS_IN_rtld
 374 /* We cannot use the thread descriptor because in ld.so we use setjmp
 375    earlier than the descriptor is initialized.  Using a global variable
 376    is too complicated here since we have no PC-relative addressing mode.  */
 377 #else
 378 # ifdef __ASSEMBLER__
 379 #  define PTR_MANGLE(reg, tmp) \
 380      stc gbr,tmp; mov.l @(POINTER_GUARD,tmp),tmp; xor tmp,reg
 381 #  define PTR_MANGLE2(reg, tmp) xor tmp,reg
 382 #  define PTR_DEMANGLE(reg, tmp)        PTR_MANGLE (reg, tmp)
 383 #  define PTR_DEMANGLE2(reg, tmp)       PTR_MANGLE2 (reg, tmp)
 384 # else
 385 #  define PTR_MANGLE(var) \
 386      (var) = (void *) ((uintptr_t) (var) ^ THREAD_GET_POINTER_GUARD ())
 387 #  define PTR_DEMANGLE(var)     PTR_MANGLE (var)
 388 # endif
 389 #endif
 390
 391 #endif /* linux/sh/sysdep.h */