/* 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;

}