xref: /netbsd-src/external/gpl3/gdb.old/dist/gdb/testsuite/gdb.threads/vfork-follow-child-exec.c (revision 2dd295436a0082eb4f8d294f4aa73c223413d0f2)
1 /* This testcase is part of GDB, the GNU debugger.
2 
3    Copyright 2019-2020 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 <stdio.h>
19 #include <unistd.h>
20 #include <pthread.h>
21 #include <string.h>
22 #include <stdlib.h>
23 
24 static char *program_name;
25 
26 static void *
27 f (void *arg)
28 {
29   int res = vfork ();
30 
31   if (res == -1)
32     {
33       perror ("vfork");
34       return NULL;
35     }
36   else if (res == 0)
37     {
38       /* Child.  */
39       execl (program_name, program_name, "1", NULL);
40       perror ("exec");
41       abort ();
42     }
43   else
44     {
45       /* Parent.  */
46       return NULL;
47     }
48 }
49 
50 int
51 main (int argc, char **argv)
52 {
53   pthread_t tid;
54 
55   if (argc > 1)
56     {
57       /* Getting here via execl.  */
58       return 0;
59     }
60 
61   program_name = argv[0];
62 
63   pthread_create (&tid, NULL, f, NULL);
64   pthread_join (tid, NULL);
65   return 0;
66 }
67