mirror of
				https://sourceware.org/git/glibc.git
				synced 2025-11-03 20:53:13 +03:00 
			
		
		
		
	
		
			
				
	
	
		
			31 lines
		
	
	
		
			511 B
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			31 lines
		
	
	
		
			511 B
		
	
	
	
		
			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"
 |