nptl/tst-mutex5.c

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