nptl/tst-cond15.c

   1 /* Copyright (C) 2004 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3    Contributed by Ulrich Drepper <drepper@redhat.com>, 2004.
   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 <stdio.h>
  23 #include <stdlib.h>
  24 #include <string.h>
  25 #include <unistd.h>
  26 #include <sys/time.h>
  27
  28
  29 static pthread_cond_t cond = PTHREAD_COND_INITIALIZER;
  30 static pthread_mutex_t mut = PTHREAD_RECURSIVE_MUTEX_INITIALIZER_NP;
  31 static pthread_mutex_t mut2 = PTHREAD_MUTEX_INITIALIZER;
  32
  33 static void *
  34 tf (void *p)
  35 {
  36   if (pthread_mutex_lock (&mut) != 0)
  37     {
  38       printf ("%s: 1st mutex_lock failed\n", __func__);
  39       exit (1);
  40     }
  41   if (pthread_mutex_lock (&mut) != 0)
  42     {
  43       printf ("%s: 2nd mutex_lock failed\n", __func__);
  44       exit (1);
  45     }
  46   if (pthread_mutex_lock (&mut) != 0)
  47     {
  48       printf ("%s: 3rd mutex_lock failed\n", __func__);
  49       exit (1);
  50     }
  51
  52   if (pthread_mutex_unlock (&mut2) != 0)
  53     {
  54       printf ("%s: mutex_unlock failed\n", __func__);
  55       exit (1);
  56     }
  57
  58   struct timeval tv;
  59   gettimeofday (&tv, NULL);
  60   struct timespec ts;
  61   TIMEVAL_TO_TIMESPEC (&tv, &ts);
  62   ts.tv_sec += p == NULL ? 100 : 1;
  63
  64   int err = pthread_cond_timedwait (&cond, &mut, &ts);
  65   if ((err != 0 && p == NULL) || (err != ETIMEDOUT && p != NULL))
  66     {
  67       printf ("%s: cond_wait failed\n", __func__);
  68       exit (1);
  69     }
  70
  71   if (pthread_mutex_unlock (&mut) != 0)
  72     {
  73       printf ("%s: 1st mutex_unlock failed\n", __func__);
  74       exit (1);
  75     }
  76   if (pthread_mutex_unlock (&mut) != 0)
  77     {
  78       printf ("%s: 2nd mutex_unlock failed\n", __func__);
  79       exit (1);
  80     }
  81   if (pthread_mutex_unlock (&mut) != 0)
  82     {
  83       printf ("%s: 3rd mutex_unlock failed\n", __func__);
  84       exit (1);
  85     }
  86
  87   puts ("child: done");
  88
  89   return NULL;
  90 }
  91
  92
  93 static int
  94 do_test (void)
  95 {
  96   if (pthread_mutex_lock (&mut2) != 0)
  97     {
  98       puts ("1st mutex_lock failed");
  99       return 1;
 100     }
 101
 102   puts ("parent: create 1st child");
 103
 104   pthread_t th;
 105   int err = pthread_create (&th, NULL, tf, NULL);
 106   if (err != 0)
 107     {
 108       printf ("parent: cannot 1st create thread: %s\n", strerror (err));
 109       return 1;
 110     }
 111
 112   /* We have to synchronize with the child.  */
 113   if (pthread_mutex_lock (&mut2) != 0)
 114     {
 115       puts ("2nd mutex_lock failed");
 116       return 1;
 117     }
 118
 119   /* Give the child to reach to pthread_cond_wait.  */
 120   sleep (1);
 121
 122   if (pthread_cond_signal (&cond) != 0)
 123     {
 124       puts ("cond_signal failed");
 125       return 1;
 126     }
 127
 128   err = pthread_join (th, NULL);
 129   if (err != 0)
 130     {
 131       printf ("parent: failed to join: %s\n", strerror (err));
 132       return 1;
 133     }
 134
 135
 136   puts ("parent: create 2nd child");
 137
 138   err = pthread_create (&th, NULL, tf, (void *) 1l);
 139   if (err != 0)
 140     {
 141       printf ("parent: cannot 2nd create thread: %s\n", strerror (err));
 142       return 1;
 143     }
 144
 145   err = pthread_join (th, NULL);
 146   if (err != 0)
 147     {
 148       printf ("parent: failed to join: %s\n", strerror (err));
 149       return 1;
 150     }
 151
 152   puts ("done");
 153
 154   return 0;
 155 }
 156
 157
 158 #define TEST_FUNCTION do_test ()
 159 #define TIMEOUT 6
 160 #include "../test-skeleton.c"