libpthread/nptl/sysdeps/unix/sysv/linux/lowlevellock.c

   1 /* low level locking for pthread library.  Generic futex-using version.
   2    Copyright (C) 2003, 2007 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4    Contributed by Paul Mackerras <paulus@au.ibm.com>, 2003.
   5
   6    The GNU C Library is free software; you can redistribute it and/or
   7    modify it under the terms of the GNU Lesser General Public
   8    License as published by the Free Software Foundation; either
   9    version 2.1 of the License, or (at your option) any later version.
  10
  11    The GNU C Library is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14    Lesser General Public License for more details.
  15
  16    You should have received a copy of the GNU Lesser General Public
  17    License along with the GNU C Library; if not, write to the Free
  18    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  19    02111-1307 USA.  */
  20
  21 #include <errno.h>
  22 #include <sysdep.h>
  23 #include <lowlevellock.h>
  24 #include <sys/time.h>
  25 #include <tls.h>
  26 #include <tcb-offsets.h>
  27
  28
  29 void
  30 __lll_lock_wait_private (int *futex)
  31 {
  32   if (*futex == 2)
  33     lll_futex_wait (futex, 2, LLL_PRIVATE);
  34
  35   while (atomic_exchange_acq (futex, 2) != 0)
  36     lll_futex_wait (futex, 2, LLL_PRIVATE);
  37 }
  38
  39
  40 /* These functions don't get included in libc.so  */
  41 #ifdef IS_IN_libpthread
  42 void
  43 __lll_lock_wait (int *futex, int private)
  44 {
  45   if (*futex == 2)
  46     lll_futex_wait (futex, 2, private);
  47
  48   while (atomic_exchange_acq (futex, 2) != 0)
  49     lll_futex_wait (futex, 2, private);
  50 }
  51
  52
  53 int
  54 __lll_timedlock_wait (int *futex, const struct timespec *abstime, int private)
  55 {
  56   /* Reject invalid timeouts.  */
  57   if (abstime->tv_nsec < 0 || abstime->tv_nsec >= 1000000000)
  58     return EINVAL;
  59
  60   /* Try locking.  */
  61   while (atomic_exchange_acq (futex, 2) != 0)
  62     {
  63       struct timeval tv;
  64
  65       /* Get the current time.  */
  66       (void) gettimeofday (&tv, NULL);
  67
  68       /* Compute relative timeout.  */
  69       struct timespec rt;
  70       rt.tv_sec = abstime->tv_sec - tv.tv_sec;
  71       rt.tv_nsec = abstime->tv_nsec - tv.tv_usec * 1000;
  72       if (rt.tv_nsec < 0)
  73         {
  74           rt.tv_nsec += 1000000000;
  75           --rt.tv_sec;
  76         }
  77
  78       if (rt.tv_sec < 0)
  79         return ETIMEDOUT;
  80
  81       /* Wait.  */
  82       lll_futex_timed_wait (futex, 2, &rt, private);
  83     }
  84
  85   return 0;
  86 }
  87
  88
  89 int
  90 __lll_timedwait_tid (int *tidp, const struct timespec *abstime)
  91 {
  92   int tid;
  93
  94   if (abstime->tv_nsec < 0 || abstime->tv_nsec >= 1000000000)
  95     return EINVAL;
  96
  97   /* Repeat until thread terminated.  */
  98   while ((tid = *tidp) != 0)
  99     {
 100       struct timeval tv;
 101       struct timespec rt;
 102
 103       /* Get the current time.  */
 104       (void) __gettimeofday (&tv, NULL);
 105
 106       /* Compute relative timeout.  */
 107       rt.tv_sec = abstime->tv_sec - tv.tv_sec;
 108       rt.tv_nsec = abstime->tv_nsec - tv.tv_usec * 1000;
 109       if (rt.tv_nsec < 0)
 110         {
 111           rt.tv_nsec += 1000000000;
 112           --rt.tv_sec;
 113         }
 114
 115       /* Already timed out?  */
 116       if (rt.tv_sec < 0)
 117         return ETIMEDOUT;
 118
 119       /* Wait until thread terminates.  The kernel so far does not use
 120          the private futex operations for this.  */
 121       if (lll_futex_timed_wait (tidp, tid, &rt, LLL_SHARED) == -ETIMEDOUT)
 122         return ETIMEDOUT;
 123     }
 124
 125   return 0;
 126 }
 127 #endif