Linux 4.6-rc6
[linux/fpc-iii.git] / arch / x86 / entry / vdso / vclock_gettime.c
blob03c3eb77bfcebce765b838271b6d7789365ff3de
1 /*
2 * Copyright 2006 Andi Kleen, SUSE Labs.
3 * Subject to the GNU Public License, v.2
5 * Fast user context implementation of clock_gettime, gettimeofday, and time.
7 * 32 Bit compat layer by Stefani Seibold <stefani@seibold.net>
8 * sponsored by Rohde & Schwarz GmbH & Co. KG Munich/Germany
10 * The code should have no internal unresolved relocations.
11 * Check with readelf after changing.
14 #include <uapi/linux/time.h>
15 #include <asm/vgtod.h>
16 #include <asm/hpet.h>
17 #include <asm/vvar.h>
18 #include <asm/unistd.h>
19 #include <asm/msr.h>
20 #include <asm/pvclock.h>
21 #include <linux/math64.h>
22 #include <linux/time.h>
23 #include <linux/kernel.h>
25 #define gtod (&VVAR(vsyscall_gtod_data))
27 extern int __vdso_clock_gettime(clockid_t clock, struct timespec *ts);
28 extern int __vdso_gettimeofday(struct timeval *tv, struct timezone *tz);
29 extern time_t __vdso_time(time_t *t);
31 #ifdef CONFIG_HPET_TIMER
32 extern u8 hpet_page
33 __attribute__((visibility("hidden")));
35 static notrace cycle_t vread_hpet(void)
37 return *(const volatile u32 *)(&hpet_page + HPET_COUNTER);
39 #endif
41 #ifdef CONFIG_PARAVIRT_CLOCK
42 extern u8 pvclock_page
43 __attribute__((visibility("hidden")));
44 #endif
46 #ifndef BUILD_VDSO32
48 notrace static long vdso_fallback_gettime(long clock, struct timespec *ts)
50 long ret;
51 asm("syscall" : "=a" (ret) :
52 "0" (__NR_clock_gettime), "D" (clock), "S" (ts) : "memory");
53 return ret;
56 notrace static long vdso_fallback_gtod(struct timeval *tv, struct timezone *tz)
58 long ret;
60 asm("syscall" : "=a" (ret) :
61 "0" (__NR_gettimeofday), "D" (tv), "S" (tz) : "memory");
62 return ret;
66 #else
68 notrace static long vdso_fallback_gettime(long clock, struct timespec *ts)
70 long ret;
72 asm(
73 "mov %%ebx, %%edx \n"
74 "mov %2, %%ebx \n"
75 "call __kernel_vsyscall \n"
76 "mov %%edx, %%ebx \n"
77 : "=a" (ret)
78 : "0" (__NR_clock_gettime), "g" (clock), "c" (ts)
79 : "memory", "edx");
80 return ret;
83 notrace static long vdso_fallback_gtod(struct timeval *tv, struct timezone *tz)
85 long ret;
87 asm(
88 "mov %%ebx, %%edx \n"
89 "mov %2, %%ebx \n"
90 "call __kernel_vsyscall \n"
91 "mov %%edx, %%ebx \n"
92 : "=a" (ret)
93 : "0" (__NR_gettimeofday), "g" (tv), "c" (tz)
94 : "memory", "edx");
95 return ret;
98 #endif
100 #ifdef CONFIG_PARAVIRT_CLOCK
101 static notrace const struct pvclock_vsyscall_time_info *get_pvti0(void)
103 return (const struct pvclock_vsyscall_time_info *)&pvclock_page;
106 static notrace cycle_t vread_pvclock(int *mode)
108 const struct pvclock_vcpu_time_info *pvti = &get_pvti0()->pvti;
109 cycle_t ret;
110 u64 tsc, pvti_tsc;
111 u64 last, delta, pvti_system_time;
112 u32 version, pvti_tsc_to_system_mul, pvti_tsc_shift;
115 * Note: The kernel and hypervisor must guarantee that cpu ID
116 * number maps 1:1 to per-CPU pvclock time info.
118 * Because the hypervisor is entirely unaware of guest userspace
119 * preemption, it cannot guarantee that per-CPU pvclock time
120 * info is updated if the underlying CPU changes or that that
121 * version is increased whenever underlying CPU changes.
123 * On KVM, we are guaranteed that pvti updates for any vCPU are
124 * atomic as seen by *all* vCPUs. This is an even stronger
125 * guarantee than we get with a normal seqlock.
127 * On Xen, we don't appear to have that guarantee, but Xen still
128 * supplies a valid seqlock using the version field.
130 * We only do pvclock vdso timing at all if
131 * PVCLOCK_TSC_STABLE_BIT is set, and we interpret that bit to
132 * mean that all vCPUs have matching pvti and that the TSC is
133 * synced, so we can just look at vCPU 0's pvti.
136 do {
137 version = pvti->version;
139 smp_rmb();
141 if (unlikely(!(pvti->flags & PVCLOCK_TSC_STABLE_BIT))) {
142 *mode = VCLOCK_NONE;
143 return 0;
146 tsc = rdtsc_ordered();
147 pvti_tsc_to_system_mul = pvti->tsc_to_system_mul;
148 pvti_tsc_shift = pvti->tsc_shift;
149 pvti_system_time = pvti->system_time;
150 pvti_tsc = pvti->tsc_timestamp;
152 /* Make sure that the version double-check is last. */
153 smp_rmb();
154 } while (unlikely((version & 1) || version != pvti->version));
156 delta = tsc - pvti_tsc;
157 ret = pvti_system_time +
158 pvclock_scale_delta(delta, pvti_tsc_to_system_mul,
159 pvti_tsc_shift);
161 /* refer to vread_tsc() comment for rationale */
162 last = gtod->cycle_last;
164 if (likely(ret >= last))
165 return ret;
167 return last;
169 #endif
171 notrace static cycle_t vread_tsc(void)
173 cycle_t ret = (cycle_t)rdtsc_ordered();
174 u64 last = gtod->cycle_last;
176 if (likely(ret >= last))
177 return ret;
180 * GCC likes to generate cmov here, but this branch is extremely
181 * predictable (it's just a function of time and the likely is
182 * very likely) and there's a data dependence, so force GCC
183 * to generate a branch instead. I don't barrier() because
184 * we don't actually need a barrier, and if this function
185 * ever gets inlined it will generate worse code.
187 asm volatile ("");
188 return last;
191 notrace static inline u64 vgetsns(int *mode)
193 u64 v;
194 cycles_t cycles;
196 if (gtod->vclock_mode == VCLOCK_TSC)
197 cycles = vread_tsc();
198 #ifdef CONFIG_HPET_TIMER
199 else if (gtod->vclock_mode == VCLOCK_HPET)
200 cycles = vread_hpet();
201 #endif
202 #ifdef CONFIG_PARAVIRT_CLOCK
203 else if (gtod->vclock_mode == VCLOCK_PVCLOCK)
204 cycles = vread_pvclock(mode);
205 #endif
206 else
207 return 0;
208 v = (cycles - gtod->cycle_last) & gtod->mask;
209 return v * gtod->mult;
212 /* Code size doesn't matter (vdso is 4k anyway) and this is faster. */
213 notrace static int __always_inline do_realtime(struct timespec *ts)
215 unsigned long seq;
216 u64 ns;
217 int mode;
219 do {
220 seq = gtod_read_begin(gtod);
221 mode = gtod->vclock_mode;
222 ts->tv_sec = gtod->wall_time_sec;
223 ns = gtod->wall_time_snsec;
224 ns += vgetsns(&mode);
225 ns >>= gtod->shift;
226 } while (unlikely(gtod_read_retry(gtod, seq)));
228 ts->tv_sec += __iter_div_u64_rem(ns, NSEC_PER_SEC, &ns);
229 ts->tv_nsec = ns;
231 return mode;
234 notrace static int __always_inline do_monotonic(struct timespec *ts)
236 unsigned long seq;
237 u64 ns;
238 int mode;
240 do {
241 seq = gtod_read_begin(gtod);
242 mode = gtod->vclock_mode;
243 ts->tv_sec = gtod->monotonic_time_sec;
244 ns = gtod->monotonic_time_snsec;
245 ns += vgetsns(&mode);
246 ns >>= gtod->shift;
247 } while (unlikely(gtod_read_retry(gtod, seq)));
249 ts->tv_sec += __iter_div_u64_rem(ns, NSEC_PER_SEC, &ns);
250 ts->tv_nsec = ns;
252 return mode;
255 notrace static void do_realtime_coarse(struct timespec *ts)
257 unsigned long seq;
258 do {
259 seq = gtod_read_begin(gtod);
260 ts->tv_sec = gtod->wall_time_coarse_sec;
261 ts->tv_nsec = gtod->wall_time_coarse_nsec;
262 } while (unlikely(gtod_read_retry(gtod, seq)));
265 notrace static void do_monotonic_coarse(struct timespec *ts)
267 unsigned long seq;
268 do {
269 seq = gtod_read_begin(gtod);
270 ts->tv_sec = gtod->monotonic_time_coarse_sec;
271 ts->tv_nsec = gtod->monotonic_time_coarse_nsec;
272 } while (unlikely(gtod_read_retry(gtod, seq)));
275 notrace int __vdso_clock_gettime(clockid_t clock, struct timespec *ts)
277 switch (clock) {
278 case CLOCK_REALTIME:
279 if (do_realtime(ts) == VCLOCK_NONE)
280 goto fallback;
281 break;
282 case CLOCK_MONOTONIC:
283 if (do_monotonic(ts) == VCLOCK_NONE)
284 goto fallback;
285 break;
286 case CLOCK_REALTIME_COARSE:
287 do_realtime_coarse(ts);
288 break;
289 case CLOCK_MONOTONIC_COARSE:
290 do_monotonic_coarse(ts);
291 break;
292 default:
293 goto fallback;
296 return 0;
297 fallback:
298 return vdso_fallback_gettime(clock, ts);
300 int clock_gettime(clockid_t, struct timespec *)
301 __attribute__((weak, alias("__vdso_clock_gettime")));
303 notrace int __vdso_gettimeofday(struct timeval *tv, struct timezone *tz)
305 if (likely(tv != NULL)) {
306 if (unlikely(do_realtime((struct timespec *)tv) == VCLOCK_NONE))
307 return vdso_fallback_gtod(tv, tz);
308 tv->tv_usec /= 1000;
310 if (unlikely(tz != NULL)) {
311 tz->tz_minuteswest = gtod->tz_minuteswest;
312 tz->tz_dsttime = gtod->tz_dsttime;
315 return 0;
317 int gettimeofday(struct timeval *, struct timezone *)
318 __attribute__((weak, alias("__vdso_gettimeofday")));
321 * This will break when the xtime seconds get inaccurate, but that is
322 * unlikely
324 notrace time_t __vdso_time(time_t *t)
326 /* This is atomic on x86 so we don't need any locks. */
327 time_t result = ACCESS_ONCE(gtod->wall_time_sec);
329 if (t)
330 *t = result;
331 return result;
333 int time(time_t *t)
334 __attribute__((weak, alias("__vdso_time")));