about summary refs log tree commit diff
path: root/sysdeps/powerpc/tst-tlsopt-powerpc.c
blob: c9a14cbfdc79476b673a3411435970ad779d98c6 (plain) (blame)
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
50
51
52
/* glibc 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);


#define TEST_FUNCTION do_test ()
static int
do_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;
}

#include "../../test-skeleton.c"