l4/pkg/uclibc/lib/contrib/uclibc/test/nptl/tst-signal1.c

   1 /* Copyright (C) 2002, 2003, 2004 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3    Contributed by Ulrich Drepper <drepper@redhat.com>, 2002.
   4
   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.
   9
  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.
  14
  15    You should have received a copy of the GNU Lesser General Public
  16    License along with the GNU C Library; if not, write to the Free
  17    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  18    02111-1307 USA.  */
  19
  20 #include <errno.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>
  27 #include <sys/mman.h>
  28 #include <sys/wait.h>
  29
  30
  31 static sigset_t ss;
  32 static pthread_barrier_t *b;
  33
  34
  35 static void *
  36 tf (void *arg)
  37 {
  38   sigdelset (&ss, SIGINT);
  39
  40   if (pthread_sigmask (SIG_SETMASK, &ss, NULL) != 0)
  41     {
  42       puts ("2nd pthread_sigmask failed");
  43       exit (1);
  44     }
  45
  46   pthread_barrier_wait (b);
  47
  48   int sig;
  49   int res = sigwait (&ss, &sig);
  50   if (res == 0)
  51     {
  52       printf ("sigwait returned successfully with signal %d\n", sig);
  53       exit (1);
  54     }
  55
  56   printf ("sigwait returned with %s (%d)\n", strerror (res), res);
  57
  58   return NULL;
  59 }
  60
  61
  62 static void
  63 receiver (void)
  64 {
  65   pthread_t th;
  66
  67   /* Make sure the process doesn't run forever.  */
  68   alarm (10);
  69
  70   sigfillset (&ss);
  71
  72   if (pthread_sigmask (SIG_SETMASK, &ss, NULL) != 0)
  73     {
  74       puts ("1st pthread_sigmask failed");
  75       exit (1);
  76     }
  77
  78   if (pthread_create (&th, NULL, tf, NULL) != 0)
  79     {
  80       puts ("pthread_create failed");
  81       exit (1);
  82     }
  83
  84   if (pthread_join (th, NULL) == 0)
  85     {
  86       puts ("thread joined?!");
  87       exit (1);
  88     }
  89
  90   _exit (0);
  91 }
  92
  93
  94 static int
  95 do_test (void)
  96 {
  97   char tmp[] = "/tmp/tst-signal1-XXXXXX";
  98
  99   int fd = mkstemp (tmp);
 100   if (fd == -1)
 101     {
 102       puts ("mkstemp failed");
 103       exit (1);
 104     }
 105
 106   unlink (tmp);
 107
 108   int i;
 109   for (i = 0; i < 20; ++i)
 110     write (fd, "foobar xyzzy", 12);
 111
 112   b = mmap (NULL, sizeof (pthread_barrier_t), PROT_READ | PROT_WRITE,
 113             MAP_SHARED, fd, 0);
 114   if (b == MAP_FAILED)
 115     {
 116       puts ("mmap failed");
 117       exit (1);
 118     }
 119
 120   pthread_barrierattr_t ba;
 121   if (pthread_barrierattr_init (&ba) != 0)
 122     {
 123       puts ("barrierattr_init failed");
 124       exit (1);
 125     }
 126
 127   if (pthread_barrierattr_setpshared (&ba, PTHREAD_PROCESS_SHARED) != 0)
 128     {
 129       puts ("barrierattr_setpshared failed");
 130       exit (1);
 131     }
 132
 133   if (pthread_barrier_init (b, &ba, 2) != 0)
 134     {
 135       puts ("barrier_init failed");
 136       exit (1);
 137     }
 138
 139   if (pthread_barrierattr_destroy (&ba) != 0)
 140     {
 141       puts ("barrierattr_destroy failed");
 142       exit (1);
 143     }
 144
 145   pid_t pid = fork ();
 146   if (pid == -1)
 147     {
 148       puts ("fork failed");
 149       exit (1);
 150     }
 151
 152   if (pid == 0)
 153     receiver ();
 154
 155   pthread_barrier_wait (b);
 156
 157   /* Wait a bit more.  */
 158   struct timespec ts = { .tv_sec = 0, .tv_nsec = 10000000 };
 159   nanosleep (&ts, NULL);
 160
 161   /* Send the signal.  */
 162   puts ("sending the signal now");
 163   kill (pid, SIGINT);
 164
 165   /* Wait for the process to terminate.  */
 166   int status;
 167   if (TEMP_FAILURE_RETRY (waitpid (pid, &status, 0)) != pid)
 168     {
 169       puts ("wrong child reported terminated");
 170       exit (1);
 171     }
 172
 173   if (!WIFSIGNALED (status))
 174     {
 175       puts ("child wasn't signalled");
 176       exit (1);
 177     }
 178
 179   if (WTERMSIG (status) != SIGINT)
 180     {
 181       puts ("child not terminated with SIGINT");
 182       exit (1);
 183     }
 184
 185   return 0;
 186 }
 187
 188 #define TEST_FUNCTION do_test ()
 189 #include "../test-skeleton.c"