[glibc.git] / elf / tst-tls13.c

/* Check unloading modules with data in static TLS block.  */
#include <dlfcn.h>
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>


static int
do_test (void)
{
  for (int i = 0; i < 1000;)
    {
      printf ("round %d\n",++i);

      void *h = dlopen ("$ORIGIN/tst-tlsmod13a.so", RTLD_LAZY);
      if (h == NULL)
	{
	  printf ("cannot load: %s\n", dlerror ());
	  exit (1);
	}

      dlclose (h);
    }

  return 0;
}

#define TEST_FUNCTION do_test ()
#define TIMEOUT 3
#include "../test-skeleton.c"
Commit	Line	Data
669863e2 UD	1	/* Check unloading modules with data in static TLS block. */
	2	#include <dlfcn.h>
	3	#include <stdio.h>
	4	#include <stdlib.h>
285a709a	5	#include <unistd.h>
669863e2 UD	6
	7
	8	static int
	9	do_test (void)
	10	{
285a709a	11	for (int i = 0; i < 1000;)
669863e2 UD	12	{
	13	printf ("round %d\n",++i);
	14
285a709a	15	void *h = dlopen ("$ORIGIN/tst-tlsmod13a.so", RTLD_LAZY);
669863e2 UD	16	if (h == NULL)
	17	{
	18	printf ("cannot load: %s\n", dlerror ());
	19	exit (1);
	20	}
	21
	22	dlclose (h);
	23	}
	24
	25	return 0;
	26	}
	27
	28	#define TEST_FUNCTION do_test ()
dd0b7b19	29	#define TIMEOUT 3
669863e2	30	#include "../test-skeleton.c"