sysdeps/pthread/tst-cancel1.c

   1 /* Copyright (C) 2002-2024 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3
   4    The GNU C Library is free software; you can redistribute it and/or
   5    modify it under the terms of the GNU Lesser General Public
   6    License as published by the Free Software Foundation; either
   7    version 2.1 of the License, or (at your option) any later version.
   8
   9    The GNU C Library is distributed in the hope that it will be useful,
  10    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12    Lesser General Public License for more details.
  13
  14    You should have received a copy of the GNU Lesser General Public
  15    License along with the GNU C Library; if not, see
  16    <https://www.gnu.org/licenses/>.  */
  17
  18 #include <pthread.h>
  19 #include <signal.h>
  20 #include <stdio.h>
  21 #include <stdlib.h>
  22 #include <string.h>
  23
  24
  25 static pthread_mutex_t m1 = PTHREAD_MUTEX_INITIALIZER;
  26 static pthread_mutex_t m2 = PTHREAD_MUTEX_INITIALIZER;
  27
  28 static int cntr;
  29
  30
  31 static void
  32 cleanup (void *arg)
  33 {
  34   if (arg != (void *) 42l)
  35     cntr = 42;
  36   else
  37     cntr = 1;
  38 }
  39
  40
  41 static void *
  42 tf (void *arg)
  43 {
  44   /* Ignore all signals.  This must not have any effect on delivering
  45      the cancellation signal.  */
  46   sigset_t ss;
  47
  48   sigfillset (&ss);
  49
  50   if (pthread_sigmask (SIG_BLOCK, &ss, NULL) != 0)
  51     {
  52       puts ("pthread_sigmask failed");
  53       exit (1);
  54     }
  55
  56   pthread_cleanup_push (cleanup, (void *) 42l);
  57
  58   int err = pthread_setcanceltype (PTHREAD_CANCEL_ASYNCHRONOUS, NULL);
  59   if (err != 0)
  60     {
  61       printf ("setcanceltype failed: %s\n", strerror (err));
  62       exit (1);
  63     }
  64   /* The following code is not standard compliant: the mutex functions
  65      must not be called with asynchronous cancellation enabled.  */
  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"