mirror of
				https://sourceware.org/git/glibc.git
				synced 2025-10-31 22:10:34 +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"
 |