nptl/tst-mutex5.c

   1 /* Copyright (C) 2002, 2003, 2004 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 <stdio.h>
  23 #include <time.h>
  24 #include <unistd.h>
  25 #include <sys/time.h>
  26
  27
  28 #ifndef TYPE
  29 # define TYPE PTHREAD_MUTEX_NORMAL
  30 #endif
  31
  32
  33 static int
  34 do_test (void)
  35 {
  36   pthread_mutex_t m;
  37   struct timespec ts;
  38   struct timeval tv;
  39   struct timeval tv2;
  40   int err;
  41   pthread_mutexattr_t a;
  42
  43   if (pthread_mutexattr_init (&a) != 0)
  44     {
  45       puts ("mutexattr_init failed");
  46       return 1;
  47     }
  48
  49   if (pthread_mutexattr_settype (&a, TYPE) != 0)
  50     {
  51       puts ("mutexattr_settype failed");
  52       return 1;
  53     }
  54
  55   if (pthread_mutex_init (&m, &a) != 0)
  56     {
  57       puts ("mutex_init failed");
  58       return 1;
  59     }
  60
  61   if (pthread_mutexattr_destroy (&a) != 0)
  62     {
  63       puts ("mutexattr_destroy failed");
  64       return 1;
  65     }
  66
  67   if (pthread_mutex_lock (&m) != 0)
  68     {
  69       puts ("mutex_lock failed");
  70       return 1;
  71     }
  72
  73   if (pthread_mutex_trylock (&m) == 0)
  74     {
  75       puts ("mutex_trylock succeeded");
  76       return 1;
  77     }
  78
  79   gettimeofday (&tv, NULL);
  80   TIMEVAL_TO_TIMESPEC (&tv, &ts);
  81
  82   ts.tv_sec += 2;       /* Wait 2 seconds.  */
  83
  84   err = pthread_mutex_timedlock (&m, &ts);
  85   if (err == 0)
  86     {
  87       puts ("timedlock succeeded");
  88       return 1;
  89     }
  90   else if (err != ETIMEDOUT)
  91     {
  92       printf ("timedlock error != ETIMEDOUT: %d\n", err);
  93       return 1;
  94     }
  95   else
  96     {
  97       int clk_tck = sysconf (_SC_CLK_TCK);
  98
  99       gettimeofday (&tv2, NULL);
 100
 101       tv2.tv_sec -= tv.tv_sec;
 102       tv2.tv_usec -= tv.tv_usec;
 103       if (tv2.tv_usec < 0)
 104         {
 105           tv2.tv_usec += 1000000;
 106           tv2.tv_sec -= 1;
 107         }
 108
 109       /* Be a bit tolerant, add one CLK_TCK.  */
 110       tv2.tv_usec += 1000000 / clk_tck;
 111       if (tv2.tv_usec >= 1000000)
 112         {
 113           tv2.tv_usec -= 1000000;
 114           ++tv2.tv_sec;
 115         }
 116
 117       if (tv2.tv_sec < 2)
 118         {
 119           printf ("premature timeout: %ld.%06ld difference\n",
 120                   tv2.tv_sec, tv2.tv_usec);
 121           return 1;
 122         }
 123     }
 124
 125   (void) gettimeofday (&tv, NULL);
 126   TIMEVAL_TO_TIMESPEC (&tv, &ts);
 127
 128   ts.tv_sec += 2;       /* Wait 2 seconds.  */
 129   /* The following makes the ts value invalid.  */
 130   ts.tv_nsec += 1000000000;
 131
 132   err = pthread_mutex_timedlock (&m, &ts);
 133   if (err == 0)
 134     {
 135       puts ("2nd timedlock succeeded");
 136       return 1;
 137     }
 138   else if (err != EINVAL)
 139     {
 140       printf ("2nd timedlock error != EINVAL: %d\n", err);
 141       return 1;
 142     }
 143
 144   if (pthread_mutex_unlock (&m) != 0)
 145     {
 146       puts ("mutex_unlock failed");
 147       return 1;
 148     }
 149
 150   (void) gettimeofday (&tv, NULL);
 151   TIMEVAL_TO_TIMESPEC (&tv, &ts);
 152
 153   ts.tv_sec += 2;       /* Wait 2 seconds.  */
 154   if (pthread_mutex_timedlock (&m, &ts) != 0)
 155     {
 156       puts ("3rd timedlock failed");
 157     }
 158
 159   (void) gettimeofday (&tv2, NULL);
 160
 161   /* Check that timedlock didn't delay.  We use a limit of 0.1 secs.  */
 162   timersub (&tv2, &tv, &tv2);
 163   if (tv2.tv_sec > 0 || tv2.tv_usec > 100000)
 164     {
 165       puts ("3rd timedlock didn't return right away");
 166       return 1;
 167     }
 168
 169   if (pthread_mutex_unlock (&m) != 0)
 170     {
 171       puts ("final mutex_unlock failed");
 172       return 1;
 173     }
 174
 175   if (pthread_mutex_destroy (&m) != 0)
 176     {
 177       puts ("mutex_destroy failed");
 178       return 1;
 179     }
 180
 181   return 0;
 182 }
 183
 184 #define TIMEOUT 4
 185 #define TEST_FUNCTION do_test ()
 186 #include "../test-skeleton.c"