]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - gdb/testsuite/gdb.base/interrupt-daemon-attach.c
Update copyright year range in all GDB files
[thirdparty/binutils-gdb.git] / gdb / testsuite / gdb.base / interrupt-daemon-attach.c
CommitLineData
92137da0
RO
1/* This testcase is part of GDB, the GNU debugger.
2
3666a048 3 Copyright 2017-2021 Free Software Foundation, Inc.
92137da0
RO
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 <stdlib.h>
19#include <unistd.h>
20
21/* GDB reads this to figure out the child's PID. */
22pid_t child_pid;
23
24void
25marker (void)
26{
27}
28
29int
30main ()
31{
32 /* Don't let the test case run forever. */
33 alarm (60);
34
35 child_pid = fork ();
36
37 switch (child_pid)
38 {
39 case -1:
40 return 1;
41
42 case 0:
43 break;
44
45 default:
933aebfa 46 /* In parent process. */
92137da0
RO
47 while (1)
48 {
49 marker ();
50 usleep (1000);
51 }
52 }
53
933aebfa
AH
54 /* In child process. */
55
56 /* Alarms are not inherited by child processes. Set the alarm again to stop
57 the test case running forever. */
58 alarm (60);
59
92137da0
RO
60 /* Detach from controlling terminal. */
61 if (setsid () == (pid_t) -1)
62 return 1;
63
933aebfa
AH
64 while (1)
65 usleep (1000);
92137da0
RO
66
67 return 0;
68}