nptl/tst-cond18.c

   1 /* Copyright (C) 2004-2018 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3    Contributed by Jakub Jelinek <jakub@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, see
  17    <http://www.gnu.org/licenses/>.  */
  18
  19 #include <errno.h>
  20 #include <limits.h>
  21 #include <fcntl.h>
  22 #include <pthread.h>
  23 #include <stdbool.h>
  24 #include <stdlib.h>
  25 #include <stdio.h>
  26 #include <unistd.h>
  27
  28 pthread_cond_t cv = PTHREAD_COND_INITIALIZER;
  29 pthread_mutex_t lock = PTHREAD_MUTEX_INITIALIZER;
  30 bool exiting;
  31 int fd, spins, nn;
  32 enum { count = 8 };             /* Number of worker threads.  */
  33
  34 void *
  35 tf (void *id)
  36 {
  37   pthread_mutex_lock (&lock);
  38
  39   if ((long) id == 0)
  40     {
  41       while (!exiting)
  42         {
  43           if ((spins++ % 1000) == 0)
  44             write (fd, ".", 1);
  45           pthread_mutex_unlock (&lock);
  46
  47           pthread_mutex_lock (&lock);
  48           int njobs = rand () % (count + 1);
  49           nn = njobs;
  50           if ((rand () % 30) == 0)
  51             pthread_cond_broadcast (&cv);
  52           else
  53             while (njobs--)
  54               pthread_cond_signal (&cv);
  55         }
  56
  57       pthread_cond_broadcast (&cv);
  58     }
  59   else
  60     {
  61       while (!exiting)
  62         {
  63           while (!nn && !exiting)
  64             pthread_cond_wait (&cv, &lock);
  65           --nn;
  66           pthread_mutex_unlock (&lock);
  67
  68           pthread_mutex_lock (&lock);
  69         }
  70     }
  71
  72   pthread_mutex_unlock (&lock);
  73   return NULL;
  74 }
  75
  76 int
  77 do_test (void)
  78 {
  79   fd = open ("/dev/null", O_WRONLY);
  80   if (fd < 0)
  81     {
  82       printf ("couldn't open /dev/null, %m\n");
  83       return 1;
  84     }
  85
  86   pthread_t th[count + 1];
  87   pthread_attr_t attr;
  88   int i, ret, sz;
  89   pthread_attr_init (&attr);
  90   sz = sysconf (_SC_PAGESIZE);
  91   if (sz < PTHREAD_STACK_MIN)
  92           sz = PTHREAD_STACK_MIN;
  93   pthread_attr_setstacksize (&attr, sz);
  94
  95   for (i = 0; i <= count; ++i)
  96     if ((ret = pthread_create (&th[i], &attr, tf, (void *) (long) i)) != 0)
  97       {
  98         errno = ret;
  99         printf ("pthread_create %d failed: %m\n", i);
 100         return 1;
 101       }
 102
 103   struct timespec ts = { .tv_sec = 20, .tv_nsec = 0 };
 104   while (nanosleep (&ts, &ts) != 0);
 105
 106   pthread_mutex_lock (&lock);
 107   exiting = true;
 108   pthread_mutex_unlock (&lock);
 109
 110   for (i = 0; i < count; ++i)
 111     pthread_join (th[i], NULL);
 112
 113   close (fd);
 114   return 0;
 115 }
 116
 117 #define TEST_FUNCTION do_test ()
 118 #define TIMEOUT 40
 119 #include "../test-skeleton.c"