1/* Copyright (C) 1999-2016 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, see
16 <http://www.gnu.org/licenses/>. */
17
18#include <errno.h>
19#include <time.h>
20#include <sys/time.h>
21#include <libc-internal.h>
22#include <ldsodefs.h>
23
24
25#if HP_TIMING_AVAIL && !defined HANDLED_CPUTIME
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. */
29static hp_timing_t freq;
30
31
32/* This function is defined in the thread library. */
33extern void __pthread_clock_settime (clockid_t clock_id, hp_timing_t offset)
34 __attribute__ ((__weak__));
35
36
37static int
38hp_timing_settime (clockid_t clock_id, const struct timespec *tp)
39{
40 hp_timing_t tsc;
41 hp_timing_t usertime;
42
43 /* First thing is to get the current time. */
44 HP_TIMING_NOW (tsc);
45
46 if (__glibc_unlikely (freq == 0))
47 {
48 /* This can only happen if we haven't initialized the `freq'
49 variable yet. Do this now. We don't have to protect this
50 code against multiple execution since all of them should lead
51 to the same result. */
52 freq = __get_clockfreq ();
53 if (__glibc_unlikely (freq == 0))
54 /* Something went wrong. */
55 return -1;
56 }
57
58 /* Convert the user-provided time into CPU ticks. */
59 usertime = tp->tv_sec * freq + (tp->tv_nsec * freq) / 1000000000ull;
60
61 /* Determine the offset and use it as the new base value. */
62 if (clock_id == CLOCK_PROCESS_CPUTIME_ID
63 || __pthread_clock_settime == NULL)
64 GL(dl_cpuclock_offset) = tsc - usertime;
65 else
66 __pthread_clock_settime (clock_id, tsc - usertime);
67
68 return 0;
69}
70#endif
71
72
73/* Set CLOCK to value TP. */
74int
75__clock_settime (clockid_t clock_id, const struct timespec *tp)
76{
77 int retval;
78
79 /* Make sure the time cvalue is OK. */
80 if (tp->tv_nsec < 0 || tp->tv_nsec >= 1000000000)
81 {
82 __set_errno (EINVAL);
83 return -1;
84 }
85
86 switch (clock_id)
87 {
88#define HANDLE_REALTIME \
89 do { \
90 struct timeval tv; \
91 TIMESPEC_TO_TIMEVAL (&tv, tp); \
92 \
93 retval = settimeofday (&tv, NULL); \
94 } while (0)
95
96#ifdef SYSDEP_SETTIME
97 SYSDEP_SETTIME;
98#endif
99
100#ifndef HANDLED_REALTIME
101 case CLOCK_REALTIME:
102 HANDLE_REALTIME;
103 break;
104#endif
105
106 default:
107#ifdef SYSDEP_SETTIME_CPU
108 SYSDEP_SETTIME_CPU;
109#endif
110#ifndef HANDLED_CPUTIME
111# if HP_TIMING_AVAIL
112 if (CPUCLOCK_WHICH (clock_id) == CLOCK_PROCESS_CPUTIME_ID
113 || CPUCLOCK_WHICH (clock_id) == CLOCK_THREAD_CPUTIME_ID)
114 retval = hp_timing_settime (clock_id, tp);
115 else
116# endif
117 {
118 __set_errno (EINVAL);
119 retval = -1;
120 }
121#endif
122 break;
123 }
124
125 return retval;
126}
127weak_alias (__clock_settime, clock_settime)
128