ports/sysdeps/mips/tls-macros.h

   1 /* Macros to support TLS testing in times of missing compiler support.  */
   2
   3 #include <sys/cdefs.h>
   4 #include <sys/asm.h>
   5
   6 #define __STRING2(X) __STRING(X)
   7 #define ADDU __STRING2(PTR_ADDU)
   8 #define ADDIU __STRING2(PTR_ADDIU)
   9 #define LW __STRING2(PTR_L)
  10
  11 /* Load the GOT pointer, which may not be in $28 in a non-PIC
  12    (abicalls pic0) function.  */
  13 #ifndef __PIC__
  14 # if _MIPS_SIM != _ABI64
  15 #  define LOAD_GP "move %[tmp], $28\n\tla $28, __gnu_local_gp\n\t"
  16 # else
  17 #  define LOAD_GP "move %[tmp], $28\n\tdla $28, __gnu_local_gp\n\t"
  18 # endif
  19 # define UNLOAD_GP "\n\tmove $28, %[tmp]"
  20 #else
  21 # define LOAD_GP
  22 # define UNLOAD_GP
  23 #endif
  24
  25 # define TLS_GD(x)                                      \
  26   ({ void *__result, *__tmp;                            \
  27      extern void *__tls_get_addr (void *);              \
  28      asm (LOAD_GP ADDIU " %0, $28, %%tlsgd(" #x ")"     \
  29           UNLOAD_GP                                     \
  30           : "=r" (__result), [tmp] "=&r" (__tmp));      \
  31      (int *)__tls_get_addr (__result); })
  32 # define TLS_LD(x)                                      \
  33   ({ void *__result, *__tmp;                            \
  34      extern void *__tls_get_addr (void *);              \
  35      asm (LOAD_GP ADDIU " %0, $28, %%tlsldm(" #x ")"    \
  36           UNLOAD_GP                                     \
  37           : "=r" (__result), [tmp] "=&r" (__tmp));      \
  38      __result = __tls_get_addr (__result);              \
  39      asm ("lui $3,%%dtprel_hi(" #x ")\n\t"              \
  40           "addiu $3,$3,%%dtprel_lo(" #x ")\n\t"         \
  41           ADDU " %0,%0,$3"                              \
  42           : "+r" (__result) : : "$3");                  \
  43      __result; })
  44 # define TLS_IE(x)                                      \
  45   ({ void *__result, *__tmp;                            \
  46      asm (".set push\n\t.set mips32r2\n\t"              \
  47           "rdhwr\t%0,$29\n\t.set pop"                   \
  48           : "=v" (__result));                           \
  49      asm (LOAD_GP LW " $3,%%gottprel(" #x ")($28)\n\t"  \
  50           ADDU " %0,%0,$3"                              \
  51           UNLOAD_GP                                     \
  52           : "+r" (__result), [tmp] "=&r" (__tmp)        \
  53           : : "$3");                                    \
  54      __result; })
  55 # define TLS_LE(x)                                      \
  56   ({ void *__result;                                    \
  57      asm (".set push\n\t.set mips32r2\n\t"              \
  58           "rdhwr\t%0,$29\n\t.set pop"                   \
  59           : "=v" (__result));                           \
  60      asm ("lui $3,%%tprel_hi(" #x ")\n\t"               \
  61           "addiu $3,$3,%%tprel_lo(" #x ")\n\t"          \
  62           ADDU " %0,%0,$3"                              \
  63           : "+r" (__result) : : "$3");                  \
  64      __result; })