File: mod-tlsopt-powerpc.c

package info (click to toggle)
glibc 2.31-13%2Bdeb11u3
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 278,368 kB
  • sloc: ansic: 1,025,361; asm: 256,790; makefile: 12,097; sh: 10,548; python: 9,618; cpp: 5,233; awk: 1,956; perl: 514; yacc: 290; pascal: 182; sed: 73
file content (49 lines) | stat: -rw-r--r-- 1,135 bytes parent folder | download | duplicates (12)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
/* shared library to test for __tls_get_addr optimization.  */
#include <stdio.h>

#include "../../elf/tls-macros.h"
#include "dl-tls.h"

/* common 'int' variable in TLS.  */
COMMON_INT_DEF(foo);


int
tls_get_addr_opt_test (void)
{
  int result = 0;

  /* Get variable using general dynamic model.  */
  int *ap = TLS_GD (foo);
  if (*ap != 0)
    {
      printf ("foo = %d\n", *ap);
      result = 1;
    }

  tls_index *tls_arg;
#ifdef __powerpc64__
  register unsigned long thread_pointer __asm__ ("r13");
  asm ("addi %0,2,foo@got@tlsgd" : "=r" (tls_arg));
#else
  register unsigned long thread_pointer __asm__ ("r2");
  asm ("bcl 20,31,1f\n1:\t"
       "mflr %0\n\t"
       "addis %0,%0,_GLOBAL_OFFSET_TABLE_-1b@ha\n\t"
       "addi %0,%0,_GLOBAL_OFFSET_TABLE_-1b@l\n\t"
       "addi %0,%0,foo@got@tlsgd" : "=b" (tls_arg));
#endif

  if (tls_arg->ti_module != 0)
    {
      printf ("tls_index not optimized, binutils too old?\n");
      result = 1;
    }
  else if (tls_arg->ti_offset + thread_pointer != (unsigned long) ap)
    {
      printf ("tls_index->ti_offset wrong value\n");
      result = 1;
    }

  return result;
}