1 /* This testcase is part of GDB, the GNU debugger. 2 3 Copyright 2009-2023 Free Software Foundation, Inc. 4 5 This program is free software; you can redistribute it and/or modify 6 it under the terms of the GNU General Public License as published by 7 the Free Software Foundation; either version 3 of the License, or 8 (at your option) any later version. 9 10 This program is distributed in the hope that it will be useful, 11 but WITHOUT ANY WARRANTY; without even the implied warranty of 12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13 GNU General Public License for more details. 14 15 You should have received a copy of the GNU General Public License 16 along with this program. If not, see <http://www.gnu.org/licenses/>. */ 17 18 #include <pthread.h> 19 #include <unistd.h> 20 #include <stdlib.h> 21 #include <stdio.h> 22 #include <string.h> 23 #include <assert.h> 24 25 static const char *image; 26 static volatile pthread_t main_thread; 27 static pthread_barrier_t barrier; 28 static char *argv1 = "go away"; 29 30 static void * 31 thread_execler (void *arg) 32 { 33 int i; 34 35 pthread_barrier_wait (&barrier); 36 37 i = pthread_join (main_thread, NULL); 38 assert (i == 0); 39 40 /* Exec ourselves again. */ 41 if (execl (image, image, argv1, NULL) == -1) /* break-here */ 42 { 43 perror ("execl"); 44 abort (); 45 } 46 47 return NULL; 48 } 49 50 static void * 51 just_loop (void *arg) 52 { 53 unsigned int i; 54 55 pthread_barrier_wait (&barrier); 56 57 for (i = 1; i > 0; i++) 58 usleep (1); 59 60 return NULL; 61 } 62 63 #define THREADS 5 64 65 pthread_t loop_thread[THREADS]; 66 67 int 68 main (int argc, char **argv) 69 { 70 pthread_t thread; 71 int i, t; 72 73 image = argv[0]; 74 75 /* Pass "inf" as argument to keep re-execing ad infinitum, which can 76 be useful for manual testing. Passing any other argument exits 77 immediately (and that's what the execl above does by 78 default). */ 79 if (argc == 2 && strcmp (argv[1], "inf") == 0) 80 argv1 = argv[1]; 81 else if (argc > 1) 82 exit (0); 83 84 main_thread = pthread_self (); 85 86 pthread_barrier_init (&barrier, NULL, 2 + THREADS); 87 88 i = pthread_create (&thread, NULL, thread_execler, NULL); 89 assert (i == 0); 90 91 for (t = 0; t < THREADS; t++) 92 { 93 i = pthread_create (&loop_thread[t], NULL, just_loop, NULL); 94 assert (i == 0); 95 } 96 97 pthread_barrier_wait (&barrier); 98 99 pthread_exit (NULL); 100 /* NOTREACHED */ 101 return 0; 102 } 103