nptl/tst-cancel11.c

   1 /* Copyright (C) 2003 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3    Contributed by Ulrich Drepper <drepper@redhat.com>, 2003.
   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, see
  17    <http://www.gnu.org/licenses/>.  */
  18
  19 #include <errno.h>
  20 #include <pthread.h>
  21 #include <stdio.h>
  22 #include <stdlib.h>
  23 #include <string.h>
  24 #include <unistd.h>
  25
  26
  27 static pthread_barrier_t bar;
  28 static int fd[2];
  29
  30
  31 static void
  32 cleanup (void *arg)
  33 {
  34   static int ncall;
  35
  36   if (++ncall != 1)
  37     {
  38       puts ("second call to cleanup");
  39       exit (1);
  40     }
  41
  42   printf ("cleanup call #%d\n", ncall);
  43 }
  44
  45
  46 static void *
  47 tf (void *arg)
  48 {
  49   pthread_cleanup_push (cleanup, NULL);
  50
  51   int e = pthread_barrier_wait (&bar);
  52   if (e != 0 && e != PTHREAD_BARRIER_SERIAL_THREAD)
  53     {
  54       puts ("tf: 1st barrier_wait failed");
  55       exit (1);
  56     }
  57
  58   /* This call should block and be cancelable.  */
  59   char buf[20];
  60   read (fd[0], buf, sizeof (buf));
  61
  62   pthread_cleanup_pop (0);
  63
  64   return NULL;
  65 }
  66
  67
  68 static int
  69 do_test (void)
  70 {
  71   pthread_t th;
  72
  73   if (pthread_barrier_init (&bar, NULL, 2) != 0)
  74     {
  75       puts ("barrier_init failed");
  76       exit (1);
  77     }
  78
  79   if (pipe (fd) != 0)
  80     {
  81       puts ("pipe failed");
  82       exit (1);
  83     }
  84
  85   if (pthread_create (&th, NULL, tf, NULL) != 0)
  86     {
  87       puts ("create failed");
  88       exit (1);
  89     }
  90
  91   int e = pthread_barrier_wait (&bar);
  92   if (e != 0 && e != PTHREAD_BARRIER_SERIAL_THREAD)
  93     {
  94       puts ("1st barrier_wait failed");
  95       exit (1);
  96     }
  97
  98   if (pthread_cancel (th) != 0)
  99     {
 100       puts ("1st cancel failed");
 101       exit (1);
 102     }
 103
 104   void *r;
 105   if (pthread_join (th, &r) != 0)
 106     {
 107       puts ("join failed");
 108       exit (1);
 109     }
 110
 111   if (r != PTHREAD_CANCELED)
 112     {
 113       puts ("thread not canceled");
 114       exit (1);
 115     }
 116
 117   return 0;
 118 }
 119
 120
 121 #define TEST_FUNCTION do_test ()
 122 #include "../test-skeleton.c"