linuxthreads/tst-cancel1.c

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