[PATCH 3/6] Split sparc out of main Linux kernel-features.h.
[glibc.git] / nptl / tst-cancel7.c
blob53577a99b725d718f934fed2249347ad54276ae1
1 /* Copyright (C) 2002-2014 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by Jakub Jelinek <jakub@redhat.com>, 2002.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library 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 GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>. */
19 #include <errno.h>
20 #include <fcntl.h>
21 #include <pthread.h>
22 #include <signal.h>
23 #include <stdio.h>
24 #include <stdlib.h>
25 #include <string.h>
26 #include <unistd.h>
28 const char *command;
29 const char *pidfile;
30 char pidfilename[] = "/tmp/tst-cancel7-XXXXXX";
32 static void *
33 tf (void *arg)
35 const char *args = " --direct --pidfile ";
36 char *cmd = alloca (strlen (command) + strlen (args)
37 + strlen (pidfilename) + 1);
39 strcpy (stpcpy (stpcpy (cmd, command), args), pidfilename);
40 system (cmd);
41 /* This call should never return. */
42 return NULL;
46 static void
47 sl (void)
49 FILE *f = fopen (pidfile, "w");
50 if (f == NULL)
51 exit (1);
53 fprintf (f, "%lld\n", (long long) getpid ());
54 fflush (f);
56 struct flock fl =
58 .l_type = F_WRLCK,
59 .l_start = 0,
60 .l_whence = SEEK_SET,
61 .l_len = 1
63 if (fcntl (fileno (f), F_SETLK, &fl) != 0)
64 exit (1);
66 sigset_t ss;
67 sigfillset (&ss);
68 sigsuspend (&ss);
69 exit (0);
73 static void
74 do_prepare (int argc, char *argv[])
76 if (command == NULL)
77 command = argv[0];
79 if (pidfile)
80 sl ();
82 int fd = mkstemp (pidfilename);
83 if (fd == -1)
85 puts ("mkstemp failed");
86 exit (1);
89 write (fd, " ", 1);
90 close (fd);
94 static int
95 do_test (void)
97 pthread_t th;
98 if (pthread_create (&th, NULL, tf, NULL) != 0)
100 puts ("pthread_create failed");
101 return 1;
105 sleep (1);
106 while (access (pidfilename, R_OK) != 0);
108 if (pthread_cancel (th) != 0)
110 puts ("pthread_cancel failed");
111 return 1;
114 void *r;
115 if (pthread_join (th, &r) != 0)
117 puts ("pthread_join failed");
118 return 1;
121 sleep (1);
123 FILE *f = fopen (pidfilename, "r+");
124 if (f == NULL)
126 puts ("no pidfile");
127 return 1;
130 long long ll;
131 if (fscanf (f, "%lld\n", &ll) != 1)
133 puts ("could not read pid");
134 unlink (pidfilename);
135 return 1;
138 struct flock fl =
140 .l_type = F_WRLCK,
141 .l_start = 0,
142 .l_whence = SEEK_SET,
143 .l_len = 1
145 if (fcntl (fileno (f), F_GETLK, &fl) != 0)
147 puts ("F_GETLK failed");
148 unlink (pidfilename);
149 return 1;
152 if (fl.l_type != F_UNLCK)
154 printf ("child %lld still running\n", (long long) fl.l_pid);
155 if (fl.l_pid == ll)
156 kill (fl.l_pid, SIGKILL);
158 unlink (pidfilename);
159 return 1;
162 fclose (f);
164 unlink (pidfilename);
166 return r != PTHREAD_CANCELED;
169 static void
170 do_cleanup (void)
172 FILE *f = fopen (pidfilename, "r+");
173 long long ll;
175 if (f != NULL && fscanf (f, "%lld\n", &ll) == 1)
177 struct flock fl =
179 .l_type = F_WRLCK,
180 .l_start = 0,
181 .l_whence = SEEK_SET,
182 .l_len = 1
184 if (fcntl (fileno (f), F_GETLK, &fl) == 0 && fl.l_type != F_UNLCK
185 && fl.l_pid == ll)
186 kill (fl.l_pid, SIGKILL);
188 fclose (f);
191 unlink (pidfilename);
194 #define OPT_COMMAND 10000
195 #define OPT_PIDFILE 10001
196 #define CMDLINE_OPTIONS \
197 { "command", required_argument, NULL, OPT_COMMAND }, \
198 { "pidfile", required_argument, NULL, OPT_PIDFILE },
199 #define CMDLINE_PROCESS \
200 case OPT_COMMAND: \
201 command = optarg; \
202 break; \
203 case OPT_PIDFILE: \
204 pidfile = optarg; \
205 break;
206 #define CLEANUP_HANDLER do_cleanup ()
207 #define PREPARE(argc, argv) do_prepare (argc, argv)
208 #define TEST_FUNCTION do_test ()
209 #define TIMEOUT 5
210 #include "../test-skeleton.c"