nptl/tst-rwlock6.c

   1 /* Copyright (C) 2002, 2003 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 <errno.h>
  21 #include <pthread.h>
  22 #include <stdlib.h>
  23 #include <stdio.h>
  24 #include <string.h>
  25 #include <sys/time.h>
  26
  27
  28 static int kind[] =
  29   {
  30     PTHREAD_RWLOCK_PREFER_READER_NP,
  31     PTHREAD_RWLOCK_PREFER_WRITER_NONRECURSIVE_NP,
  32     PTHREAD_RWLOCK_PREFER_WRITER_NP,
  33   };
  34
  35
  36 static void *
  37 tf (void *arg)
  38 {
  39   pthread_rwlock_t *r = arg;
  40
  41   /* Timeout: 0.3 secs.  */
  42   struct timeval tv;
  43   (void) gettimeofday (&tv, NULL);
  44
  45   struct timespec ts;
  46   TIMEVAL_TO_TIMESPEC (&tv, &ts);
  47   ts.tv_nsec += 300000000;
  48   if (ts.tv_nsec >= 1000000000)
  49     {
  50       ts.tv_nsec -= 1000000000;
  51       ++ts.tv_sec;
  52     }
  53
  54   int err = pthread_rwlock_timedrdlock (r, &ts);
  55   if (err == 0)
  56     {
  57       puts ("rwlock_timedrdlock returned");
  58       pthread_exit ((void *) 1l);
  59     }
  60
  61   if (err != ETIMEDOUT)
  62     {
  63       printf ("err = %s (%d), expected %s (%d)\n",
  64               strerror (err), err, strerror (ETIMEDOUT), ETIMEDOUT);
  65       pthread_exit ((void *) 1l);
  66     }
  67
  68   struct timeval tv2;
  69   (void) gettimeofday (&tv2, NULL);
  70
  71   timersub (&tv2, &tv, &tv);
  72
  73   if (tv.tv_usec < 200000)
  74     {
  75       puts ("timeout too short");
  76       pthread_exit ((void *) 1l);
  77     }
  78
  79   (void) gettimeofday (&tv, NULL);
  80   TIMEVAL_TO_TIMESPEC (&tv, &ts);
  81   ts.tv_sec += 10;
  82   /* Note that the following operation makes ts invalid.  */
  83   ts.tv_nsec += 1000000000;
  84
  85   err = pthread_rwlock_timedrdlock (r, &ts);
  86   if (err == 0)
  87     {
  88       puts ("2nd timedrdlock succeeded");
  89       pthread_exit ((void *) 1l);
  90     }
  91   if (err != EINVAL)
  92     {
  93       puts ("2nd timedrdlock did not return EINVAL");
  94       pthread_exit ((void *) 1l);
  95     }
  96
  97   return NULL;
  98 }
  99
 100
 101 static int
 102 do_test (void)
 103 {
 104   int cnt;
 105   for (cnt = 0; cnt < sizeof (kind) / sizeof (kind[0]); ++cnt)
 106     {
 107       pthread_rwlock_t r;
 108       pthread_rwlockattr_t a;
 109
 110       if (pthread_rwlockattr_init (&a) != 0)
 111         {
 112           printf ("round %d: rwlockattr_t failed\n", cnt);
 113           exit (1);
 114         }
 115
 116       if (pthread_rwlockattr_setkind_np (&a, kind[cnt]) != 0)
 117         {
 118           printf ("round %d: rwlockattr_setkind failed\n", cnt);
 119           exit (1);
 120         }
 121
 122       if (pthread_rwlock_init (&r, &a) != 0)
 123         {
 124           printf ("round %d: rwlock_init failed\n", cnt);
 125           exit (1);
 126         }
 127
 128       if (pthread_rwlockattr_destroy (&a) != 0)
 129         {
 130           printf ("round %d: rwlockattr_destroy failed\n", cnt);
 131           exit (1);
 132         }
 133
 134       struct timeval tv;
 135       (void) gettimeofday (&tv, NULL);
 136
 137       struct timespec ts;
 138       TIMEVAL_TO_TIMESPEC (&tv, &ts);
 139
 140       ++ts.tv_sec;
 141
 142       /* Get a write lock.  */
 143       if (pthread_rwlock_timedwrlock (&r, &ts) != 0)
 144         {
 145           printf ("round %d: rwlock_wrlock failed\n", cnt);
 146           exit (1);
 147         }
 148
 149       (void) gettimeofday (&tv, NULL);
 150       TIMEVAL_TO_TIMESPEC (&tv, &ts);
 151       ++ts.tv_sec;
 152       int e = pthread_rwlock_timedrdlock (&r, &ts);
 153       if (e == 0)
 154         {
 155           puts ("timedrdlock succeeded");
 156           exit (1);
 157         }
 158       if (e != EDEADLK)
 159         {
 160           puts ("timedrdlock did not return EDEADLK");
 161           exit (1);
 162         }
 163
 164       (void) gettimeofday (&tv, NULL);
 165       TIMEVAL_TO_TIMESPEC (&tv, &ts);
 166       ++ts.tv_sec;
 167       e = pthread_rwlock_timedwrlock (&r, &ts);
 168       if (e == 0)
 169         {
 170           puts ("2nd timedwrlock succeeded");
 171           exit (1);
 172         }
 173       if (e != EDEADLK)
 174         {
 175           puts ("2nd timedwrlock did not return EDEADLK");
 176           exit (1);
 177         }
 178
 179       pthread_t th;
 180       if (pthread_create (&th, NULL, tf, &r) != 0)
 181         {
 182           printf ("round %d: create failed\n", cnt);
 183           exit (1);
 184         }
 185
 186       void *status;
 187       if (pthread_join (th, &status) != 0)
 188         {
 189           printf ("round %d: join failed\n", cnt);
 190           exit (1);
 191         }
 192       if (status != NULL)
 193         {
 194           printf ("failure in round %d\n", cnt);
 195           exit (1);
 196         }
 197
 198       if (pthread_rwlock_destroy (&r) != 0)
 199         {
 200           printf ("round %d: rwlock_destroy failed\n", cnt);
 201           exit (1);
 202         }
 203     }
 204
 205   return 0;
 206 }
 207
 208 #define TEST_FUNCTION do_test ()
 209 #include "../test-skeleton.c"