nptl/tst-cancel1.c

   1 /* Copyright (C) 2002, 2003 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 <pthread.h>
  21 #include <signal.h>
  22 #include <stdio.h>
  23 #include <stdlib.h>
  24 #include <string.h>
  25
  26
  27 static pthread_mutex_t m1 = PTHREAD_MUTEX_INITIALIZER;
  28 static pthread_mutex_t m2 = PTHREAD_MUTEX_INITIALIZER;
  29
  30 static int cntr;
  31
  32
  33 static void
  34 cleanup (void *arg)
  35 {
  36   if (arg != (void *) 42l)
  37     cntr = 42;
  38   else
  39     cntr = 1;
  40 }
  41
  42
  43 static void *
  44 tf (void *arg)
  45 {
  46   /* Ignore all signals.  This must not have any effect on delivering
  47      the cancellation signal.  */
  48   sigset_t ss;
  49
  50   sigfillset (&ss);
  51
  52   if (pthread_sigmask (SIG_BLOCK, &ss, NULL) != 0)
  53     {
  54       puts ("pthread_sigmask failed");
  55       exit (1);
  56     }
  57
  58   pthread_cleanup_push (cleanup, (void *) 42l);
  59
  60   int err = pthread_setcanceltype (PTHREAD_CANCEL_ASYNCHRONOUS, NULL);
  61   if (err != 0)
  62     {
  63       printf ("setcanceltype failed: %s\n", strerror (err));
  64       exit (1);
  65     }
  66
  67   err = pthread_mutex_unlock (&m2);
  68   if (err != 0)
  69     {
  70       printf ("child: mutex_unlock failed: %s\n", strerror (err));
  71       exit (1);
  72     }
  73
  74   err = pthread_mutex_lock (&m1);
  75   if (err != 0)
  76     {
  77       printf ("child: 1st mutex_lock failed: %s\n", strerror (err));
  78       exit (1);
  79     }
  80
  81   /* We should never come here.  */
  82
  83   pthread_cleanup_pop (0);
  84
  85   return NULL;
  86 }
  87
  88
  89 static int
  90 do_test (void)
  91 {
  92   int err;
  93   pthread_t th;
  94   int result = 0;
  95   void *retval;
  96
  97   /* Get the mutexes.  */
  98   err = pthread_mutex_lock (&m1);
  99   if (err != 0)
 100     {
 101       printf ("parent: 1st mutex_lock failed: %s\n", strerror (err));
 102       return 1;
 103     }
 104   err = pthread_mutex_lock (&m2);
 105   if (err != 0)
 106     {
 107       printf ("parent: 2nd mutex_lock failed: %s\n", strerror (err));
 108       return 1;
 109     }
 110
 111   err = pthread_create (&th, NULL, tf, NULL);
 112   if (err != 0)
 113     {
 114       printf ("create failed: %s\n", strerror (err));
 115       return 1;
 116     }
 117
 118   err = pthread_mutex_lock (&m2);
 119   if (err != 0)
 120     {
 121       printf ("parent: 3rd mutex_lock failed: %s\n", strerror (err));
 122       return 1;
 123     }
 124
 125   err = pthread_cancel (th);
 126   if (err != 0)
 127     {
 128       printf ("cancel failed: %s\n", strerror (err));
 129       return 1;
 130     }
 131
 132   err = pthread_join (th, &retval);
 133   if (err != 0)
 134     {
 135       printf ("join failed: %s\n", strerror (err));
 136       return 1;
 137     }
 138
 139   if (retval != PTHREAD_CANCELED)
 140     {
 141       printf ("wrong return value: %p\n", retval);
 142       result = 1;
 143     }
 144
 145   if (cntr == 42)
 146     {
 147       puts ("cleanup handler called with wrong argument");
 148       result = 1;
 149     }
 150   else if (cntr != 1)
 151     {
 152       puts ("cleanup handling not called");
 153       result = 1;
 154     }
 155
 156   return result;
 157 }
 158
 159
 160 #define TEST_FUNCTION do_test ()
 161 #include "../test-skeleton.c"