sysdeps/unix/clock_settime.c

   1 /* Copyright (C) 1999, 2000, 2001 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3
   4    The GNU C Library is free software; you can redistribute it and/or
   5    modify it under the terms of the GNU Lesser General Public
   6    License as published by the Free Software Foundation; either
   7    version 2.1 of the License, or (at your option) any later version.
   8
   9    The GNU C Library is distributed in the hope that it will be useful,
  10    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12    Lesser General Public License for more details.
  13
  14    You should have received a copy of the GNU Lesser General Public
  15    License along with the GNU C Library; if not, write to the Free
  16    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  17    02111-1307 USA.  */
  18
  19 #include <errno.h>
  20 #include <time.h>
  21 #include <sys/time.h>
  22 #include <libc-internal.h>
  23
  24
  25 #if HP_TIMING_AVAIL
  26 /* Clock frequency of the processor.  We make it a 64-bit variable
  27    because some jokers are already playing with processors with more
  28    than 4GHz.  */
  29 static hp_timing_t freq;
  30
  31
  32 /* We need the starting time for the process.  */
  33 extern hp_timing_t _dl_cpuclock_offset;
  34
  35
  36 /* This function is defined in the thread library.  */
  37 extern void __pthread_clock_settime (hp_timing_t offset)
  38      __attribute__ ((__weak__));
  39 #endif
  40
  41
  42 /* Set CLOCK to value TP.  */
  43 int
  44 clock_settime (clockid_t clock_id, const struct timespec *tp)
  45 {
  46   struct timeval tv;
  47   int retval;
  48
  49   /* Make sure the time cvalue is OK.  */
  50   if (tp->tv_nsec < 0 || tp->tv_nsec >= 1000000000)
  51     {
  52       __set_errno (EINVAL);
  53       return -1;
  54     }
  55
  56   switch (clock_id)
  57     {
  58     case CLOCK_REALTIME:
  59       TIMESPEC_TO_TIMEVAL (&tv, tp);
  60
  61       retval = settimeofday (&tv, NULL);
  62       break;
  63
  64 #if HP_TIMING_AVAIL
  65     case CLOCK_PROCESS_CPUTIME_ID:
  66     case CLOCK_THREAD_CPUTIME_ID:
  67       {
  68         hp_timing_t tsc;
  69         hp_timing_t usertime;
  70
  71         /* First thing is to get the current time.  */
  72         HP_TIMING_NOW (tsc);
  73
  74         if (__builtin_expect (freq == 0, 0))
  75           {
  76             /* This can only happen if we haven't initialized the `freq'
  77                variable yet.  Do this now. We don't have to protect this
  78                code against multiple execution since all of them should
  79                lead to the same result.  */
  80             freq = __get_clockfreq ();
  81             if (__builtin_expect (freq == 0, 0))
  82               {
  83                 /* Something went wrong.  */
  84                 retval = -1;
  85                 break;
  86               }
  87           }
  88
  89         /* Convert the user-provided time into CPU ticks.  */
  90         usertime = tp->tv_sec * freq + (tp->tv_nsec * freq) / 1000000000ull;
  91
  92         /* Determine the offset and use it as the new base value.  */
  93         if (clock_id != CLOCK_THREAD_CPUTIME_ID
  94             || __pthread_clock_settime == NULL)
  95           _dl_cpuclock_offset = tsc - usertime;
  96         else
  97           __pthread_clock_settime (tsc - usertime);
  98
  99         retval = 0;
 100       }
 101       break;
 102 #endif
 103
 104     default:
 105       __set_errno (EINVAL);
 106       retval = -1;
 107       break;
 108     }
 109
 110   return retval;
 111 }