]> git.proxmox.com Git - mirror_ubuntu-jammy-kernel.git/blame - kernel/timer.c
[PATCH] clocksource: Remove the update callback
[mirror_ubuntu-jammy-kernel.git] / kernel / timer.c
CommitLineData
1da177e4
LT
1/*
2 * linux/kernel/timer.c
3 *
4 * Kernel internal timers, kernel timekeeping, basic process system calls
5 *
6 * Copyright (C) 1991, 1992 Linus Torvalds
7 *
8 * 1997-01-28 Modified by Finn Arne Gangstad to make timers scale better.
9 *
10 * 1997-09-10 Updated NTP code according to technical memorandum Jan '96
11 * "A Kernel Model for Precision Timekeeping" by Dave Mills
12 * 1998-12-24 Fixed a xtime SMP race (we need the xtime_lock rw spinlock to
13 * serialize accesses to xtime/lost_ticks).
14 * Copyright (C) 1998 Andrea Arcangeli
15 * 1999-03-10 Improved NTP compatibility by Ulrich Windl
16 * 2002-05-31 Move sys_sysinfo here and make its locking sane, Robert Love
17 * 2000-10-05 Implemented scalable SMP per-CPU timer handling.
18 * Copyright (C) 2000, 2001, 2002 Ingo Molnar
19 * Designed by David S. Miller, Alexey Kuznetsov and Ingo Molnar
20 */
21
22#include <linux/kernel_stat.h>
23#include <linux/module.h>
24#include <linux/interrupt.h>
25#include <linux/percpu.h>
26#include <linux/init.h>
27#include <linux/mm.h>
28#include <linux/swap.h>
29#include <linux/notifier.h>
30#include <linux/thread_info.h>
31#include <linux/time.h>
32#include <linux/jiffies.h>
33#include <linux/posix-timers.h>
34#include <linux/cpu.h>
35#include <linux/syscalls.h>
97a41e26 36#include <linux/delay.h>
1da177e4
LT
37
38#include <asm/uaccess.h>
39#include <asm/unistd.h>
40#include <asm/div64.h>
41#include <asm/timex.h>
42#include <asm/io.h>
43
ecea8d19
TG
44u64 jiffies_64 __cacheline_aligned_in_smp = INITIAL_JIFFIES;
45
46EXPORT_SYMBOL(jiffies_64);
47
1da177e4
LT
48/*
49 * per-CPU timer vector definitions:
50 */
1da177e4
LT
51#define TVN_BITS (CONFIG_BASE_SMALL ? 4 : 6)
52#define TVR_BITS (CONFIG_BASE_SMALL ? 6 : 8)
53#define TVN_SIZE (1 << TVN_BITS)
54#define TVR_SIZE (1 << TVR_BITS)
55#define TVN_MASK (TVN_SIZE - 1)
56#define TVR_MASK (TVR_SIZE - 1)
57
58typedef struct tvec_s {
59 struct list_head vec[TVN_SIZE];
60} tvec_t;
61
62typedef struct tvec_root_s {
63 struct list_head vec[TVR_SIZE];
64} tvec_root_t;
65
66struct tvec_t_base_s {
3691c519
ON
67 spinlock_t lock;
68 struct timer_list *running_timer;
1da177e4 69 unsigned long timer_jiffies;
1da177e4
LT
70 tvec_root_t tv1;
71 tvec_t tv2;
72 tvec_t tv3;
73 tvec_t tv4;
74 tvec_t tv5;
75} ____cacheline_aligned_in_smp;
76
77typedef struct tvec_t_base_s tvec_base_t;
ba6edfcd 78
3691c519
ON
79tvec_base_t boot_tvec_bases;
80EXPORT_SYMBOL(boot_tvec_bases);
51d8c5ed 81static DEFINE_PER_CPU(tvec_base_t *, tvec_bases) = &boot_tvec_bases;
1da177e4 82
4c36a5de
AV
83/**
84 * __round_jiffies - function to round jiffies to a full second
85 * @j: the time in (absolute) jiffies that should be rounded
86 * @cpu: the processor number on which the timeout will happen
87 *
72fd4a35 88 * __round_jiffies() rounds an absolute time in the future (in jiffies)
4c36a5de
AV
89 * up or down to (approximately) full seconds. This is useful for timers
90 * for which the exact time they fire does not matter too much, as long as
91 * they fire approximately every X seconds.
92 *
93 * By rounding these timers to whole seconds, all such timers will fire
94 * at the same time, rather than at various times spread out. The goal
95 * of this is to have the CPU wake up less, which saves power.
96 *
97 * The exact rounding is skewed for each processor to avoid all
98 * processors firing at the exact same time, which could lead
99 * to lock contention or spurious cache line bouncing.
100 *
72fd4a35 101 * The return value is the rounded version of the @j parameter.
4c36a5de
AV
102 */
103unsigned long __round_jiffies(unsigned long j, int cpu)
104{
105 int rem;
106 unsigned long original = j;
107
108 /*
109 * We don't want all cpus firing their timers at once hitting the
110 * same lock or cachelines, so we skew each extra cpu with an extra
111 * 3 jiffies. This 3 jiffies came originally from the mm/ code which
112 * already did this.
113 * The skew is done by adding 3*cpunr, then round, then subtract this
114 * extra offset again.
115 */
116 j += cpu * 3;
117
118 rem = j % HZ;
119
120 /*
121 * If the target jiffie is just after a whole second (which can happen
122 * due to delays of the timer irq, long irq off times etc etc) then
123 * we should round down to the whole second, not up. Use 1/4th second
124 * as cutoff for this rounding as an extreme upper bound for this.
125 */
126 if (rem < HZ/4) /* round down */
127 j = j - rem;
128 else /* round up */
129 j = j - rem + HZ;
130
131 /* now that we have rounded, subtract the extra skew again */
132 j -= cpu * 3;
133
134 if (j <= jiffies) /* rounding ate our timeout entirely; */
135 return original;
136 return j;
137}
138EXPORT_SYMBOL_GPL(__round_jiffies);
139
140/**
141 * __round_jiffies_relative - function to round jiffies to a full second
142 * @j: the time in (relative) jiffies that should be rounded
143 * @cpu: the processor number on which the timeout will happen
144 *
72fd4a35 145 * __round_jiffies_relative() rounds a time delta in the future (in jiffies)
4c36a5de
AV
146 * up or down to (approximately) full seconds. This is useful for timers
147 * for which the exact time they fire does not matter too much, as long as
148 * they fire approximately every X seconds.
149 *
150 * By rounding these timers to whole seconds, all such timers will fire
151 * at the same time, rather than at various times spread out. The goal
152 * of this is to have the CPU wake up less, which saves power.
153 *
154 * The exact rounding is skewed for each processor to avoid all
155 * processors firing at the exact same time, which could lead
156 * to lock contention or spurious cache line bouncing.
157 *
72fd4a35 158 * The return value is the rounded version of the @j parameter.
4c36a5de
AV
159 */
160unsigned long __round_jiffies_relative(unsigned long j, int cpu)
161{
162 /*
163 * In theory the following code can skip a jiffy in case jiffies
164 * increments right between the addition and the later subtraction.
165 * However since the entire point of this function is to use approximate
166 * timeouts, it's entirely ok to not handle that.
167 */
168 return __round_jiffies(j + jiffies, cpu) - jiffies;
169}
170EXPORT_SYMBOL_GPL(__round_jiffies_relative);
171
172/**
173 * round_jiffies - function to round jiffies to a full second
174 * @j: the time in (absolute) jiffies that should be rounded
175 *
72fd4a35 176 * round_jiffies() rounds an absolute time in the future (in jiffies)
4c36a5de
AV
177 * up or down to (approximately) full seconds. This is useful for timers
178 * for which the exact time they fire does not matter too much, as long as
179 * they fire approximately every X seconds.
180 *
181 * By rounding these timers to whole seconds, all such timers will fire
182 * at the same time, rather than at various times spread out. The goal
183 * of this is to have the CPU wake up less, which saves power.
184 *
72fd4a35 185 * The return value is the rounded version of the @j parameter.
4c36a5de
AV
186 */
187unsigned long round_jiffies(unsigned long j)
188{
189 return __round_jiffies(j, raw_smp_processor_id());
190}
191EXPORT_SYMBOL_GPL(round_jiffies);
192
193/**
194 * round_jiffies_relative - function to round jiffies to a full second
195 * @j: the time in (relative) jiffies that should be rounded
196 *
72fd4a35 197 * round_jiffies_relative() rounds a time delta in the future (in jiffies)
4c36a5de
AV
198 * up or down to (approximately) full seconds. This is useful for timers
199 * for which the exact time they fire does not matter too much, as long as
200 * they fire approximately every X seconds.
201 *
202 * By rounding these timers to whole seconds, all such timers will fire
203 * at the same time, rather than at various times spread out. The goal
204 * of this is to have the CPU wake up less, which saves power.
205 *
72fd4a35 206 * The return value is the rounded version of the @j parameter.
4c36a5de
AV
207 */
208unsigned long round_jiffies_relative(unsigned long j)
209{
210 return __round_jiffies_relative(j, raw_smp_processor_id());
211}
212EXPORT_SYMBOL_GPL(round_jiffies_relative);
213
214
1da177e4
LT
215static inline void set_running_timer(tvec_base_t *base,
216 struct timer_list *timer)
217{
218#ifdef CONFIG_SMP
3691c519 219 base->running_timer = timer;
1da177e4
LT
220#endif
221}
222
1da177e4
LT
223static void internal_add_timer(tvec_base_t *base, struct timer_list *timer)
224{
225 unsigned long expires = timer->expires;
226 unsigned long idx = expires - base->timer_jiffies;
227 struct list_head *vec;
228
229 if (idx < TVR_SIZE) {
230 int i = expires & TVR_MASK;
231 vec = base->tv1.vec + i;
232 } else if (idx < 1 << (TVR_BITS + TVN_BITS)) {
233 int i = (expires >> TVR_BITS) & TVN_MASK;
234 vec = base->tv2.vec + i;
235 } else if (idx < 1 << (TVR_BITS + 2 * TVN_BITS)) {
236 int i = (expires >> (TVR_BITS + TVN_BITS)) & TVN_MASK;
237 vec = base->tv3.vec + i;
238 } else if (idx < 1 << (TVR_BITS + 3 * TVN_BITS)) {
239 int i = (expires >> (TVR_BITS + 2 * TVN_BITS)) & TVN_MASK;
240 vec = base->tv4.vec + i;
241 } else if ((signed long) idx < 0) {
242 /*
243 * Can happen if you add a timer with expires == jiffies,
244 * or you set a timer to go off in the past
245 */
246 vec = base->tv1.vec + (base->timer_jiffies & TVR_MASK);
247 } else {
248 int i;
249 /* If the timeout is larger than 0xffffffff on 64-bit
250 * architectures then we use the maximum timeout:
251 */
252 if (idx > 0xffffffffUL) {
253 idx = 0xffffffffUL;
254 expires = idx + base->timer_jiffies;
255 }
256 i = (expires >> (TVR_BITS + 3 * TVN_BITS)) & TVN_MASK;
257 vec = base->tv5.vec + i;
258 }
259 /*
260 * Timers are FIFO:
261 */
262 list_add_tail(&timer->entry, vec);
263}
264
2aae4a10 265/**
55c888d6
ON
266 * init_timer - initialize a timer.
267 * @timer: the timer to be initialized
268 *
269 * init_timer() must be done to a timer prior calling *any* of the
270 * other timer functions.
271 */
272void fastcall init_timer(struct timer_list *timer)
273{
274 timer->entry.next = NULL;
bfe5d834 275 timer->base = __raw_get_cpu_var(tvec_bases);
55c888d6
ON
276}
277EXPORT_SYMBOL(init_timer);
278
279static inline void detach_timer(struct timer_list *timer,
280 int clear_pending)
281{
282 struct list_head *entry = &timer->entry;
283
284 __list_del(entry->prev, entry->next);
285 if (clear_pending)
286 entry->next = NULL;
287 entry->prev = LIST_POISON2;
288}
289
290/*
3691c519 291 * We are using hashed locking: holding per_cpu(tvec_bases).lock
55c888d6
ON
292 * means that all timers which are tied to this base via timer->base are
293 * locked, and the base itself is locked too.
294 *
295 * So __run_timers/migrate_timers can safely modify all timers which could
296 * be found on ->tvX lists.
297 *
298 * When the timer's base is locked, and the timer removed from list, it is
299 * possible to set timer->base = NULL and drop the lock: the timer remains
300 * locked.
301 */
3691c519 302static tvec_base_t *lock_timer_base(struct timer_list *timer,
55c888d6 303 unsigned long *flags)
89e7e374 304 __acquires(timer->base->lock)
55c888d6 305{
3691c519 306 tvec_base_t *base;
55c888d6
ON
307
308 for (;;) {
309 base = timer->base;
310 if (likely(base != NULL)) {
311 spin_lock_irqsave(&base->lock, *flags);
312 if (likely(base == timer->base))
313 return base;
314 /* The timer has migrated to another CPU */
315 spin_unlock_irqrestore(&base->lock, *flags);
316 }
317 cpu_relax();
318 }
319}
320
1da177e4
LT
321int __mod_timer(struct timer_list *timer, unsigned long expires)
322{
3691c519 323 tvec_base_t *base, *new_base;
1da177e4
LT
324 unsigned long flags;
325 int ret = 0;
326
327 BUG_ON(!timer->function);
1da177e4 328
55c888d6
ON
329 base = lock_timer_base(timer, &flags);
330
331 if (timer_pending(timer)) {
332 detach_timer(timer, 0);
333 ret = 1;
334 }
335
a4a6198b 336 new_base = __get_cpu_var(tvec_bases);
1da177e4 337
3691c519 338 if (base != new_base) {
1da177e4 339 /*
55c888d6
ON
340 * We are trying to schedule the timer on the local CPU.
341 * However we can't change timer's base while it is running,
342 * otherwise del_timer_sync() can't detect that the timer's
343 * handler yet has not finished. This also guarantees that
344 * the timer is serialized wrt itself.
1da177e4 345 */
a2c348fe 346 if (likely(base->running_timer != timer)) {
55c888d6
ON
347 /* See the comment in lock_timer_base() */
348 timer->base = NULL;
349 spin_unlock(&base->lock);
a2c348fe
ON
350 base = new_base;
351 spin_lock(&base->lock);
352 timer->base = base;
1da177e4
LT
353 }
354 }
355
1da177e4 356 timer->expires = expires;
a2c348fe
ON
357 internal_add_timer(base, timer);
358 spin_unlock_irqrestore(&base->lock, flags);
1da177e4
LT
359
360 return ret;
361}
362
363EXPORT_SYMBOL(__mod_timer);
364
2aae4a10 365/**
1da177e4
LT
366 * add_timer_on - start a timer on a particular CPU
367 * @timer: the timer to be added
368 * @cpu: the CPU to start it on
369 *
370 * This is not very scalable on SMP. Double adds are not possible.
371 */
372void add_timer_on(struct timer_list *timer, int cpu)
373{
a4a6198b 374 tvec_base_t *base = per_cpu(tvec_bases, cpu);
1da177e4 375 unsigned long flags;
55c888d6 376
1da177e4 377 BUG_ON(timer_pending(timer) || !timer->function);
3691c519
ON
378 spin_lock_irqsave(&base->lock, flags);
379 timer->base = base;
1da177e4 380 internal_add_timer(base, timer);
3691c519 381 spin_unlock_irqrestore(&base->lock, flags);
1da177e4
LT
382}
383
384
2aae4a10 385/**
1da177e4
LT
386 * mod_timer - modify a timer's timeout
387 * @timer: the timer to be modified
2aae4a10 388 * @expires: new timeout in jiffies
1da177e4 389 *
72fd4a35 390 * mod_timer() is a more efficient way to update the expire field of an
1da177e4
LT
391 * active timer (if the timer is inactive it will be activated)
392 *
393 * mod_timer(timer, expires) is equivalent to:
394 *
395 * del_timer(timer); timer->expires = expires; add_timer(timer);
396 *
397 * Note that if there are multiple unserialized concurrent users of the
398 * same timer, then mod_timer() is the only safe way to modify the timeout,
399 * since add_timer() cannot modify an already running timer.
400 *
401 * The function returns whether it has modified a pending timer or not.
402 * (ie. mod_timer() of an inactive timer returns 0, mod_timer() of an
403 * active timer returns 1.)
404 */
405int mod_timer(struct timer_list *timer, unsigned long expires)
406{
407 BUG_ON(!timer->function);
408
1da177e4
LT
409 /*
410 * This is a common optimization triggered by the
411 * networking code - if the timer is re-modified
412 * to be the same thing then just return:
413 */
414 if (timer->expires == expires && timer_pending(timer))
415 return 1;
416
417 return __mod_timer(timer, expires);
418}
419
420EXPORT_SYMBOL(mod_timer);
421
2aae4a10 422/**
1da177e4
LT
423 * del_timer - deactive a timer.
424 * @timer: the timer to be deactivated
425 *
426 * del_timer() deactivates a timer - this works on both active and inactive
427 * timers.
428 *
429 * The function returns whether it has deactivated a pending timer or not.
430 * (ie. del_timer() of an inactive timer returns 0, del_timer() of an
431 * active timer returns 1.)
432 */
433int del_timer(struct timer_list *timer)
434{
3691c519 435 tvec_base_t *base;
1da177e4 436 unsigned long flags;
55c888d6 437 int ret = 0;
1da177e4 438
55c888d6
ON
439 if (timer_pending(timer)) {
440 base = lock_timer_base(timer, &flags);
441 if (timer_pending(timer)) {
442 detach_timer(timer, 1);
443 ret = 1;
444 }
1da177e4 445 spin_unlock_irqrestore(&base->lock, flags);
1da177e4 446 }
1da177e4 447
55c888d6 448 return ret;
1da177e4
LT
449}
450
451EXPORT_SYMBOL(del_timer);
452
453#ifdef CONFIG_SMP
2aae4a10
REB
454/**
455 * try_to_del_timer_sync - Try to deactivate a timer
456 * @timer: timer do del
457 *
fd450b73
ON
458 * This function tries to deactivate a timer. Upon successful (ret >= 0)
459 * exit the timer is not queued and the handler is not running on any CPU.
460 *
461 * It must not be called from interrupt contexts.
462 */
463int try_to_del_timer_sync(struct timer_list *timer)
464{
3691c519 465 tvec_base_t *base;
fd450b73
ON
466 unsigned long flags;
467 int ret = -1;
468
469 base = lock_timer_base(timer, &flags);
470
471 if (base->running_timer == timer)
472 goto out;
473
474 ret = 0;
475 if (timer_pending(timer)) {
476 detach_timer(timer, 1);
477 ret = 1;
478 }
479out:
480 spin_unlock_irqrestore(&base->lock, flags);
481
482 return ret;
483}
484
2aae4a10 485/**
1da177e4
LT
486 * del_timer_sync - deactivate a timer and wait for the handler to finish.
487 * @timer: the timer to be deactivated
488 *
489 * This function only differs from del_timer() on SMP: besides deactivating
490 * the timer it also makes sure the handler has finished executing on other
491 * CPUs.
492 *
72fd4a35 493 * Synchronization rules: Callers must prevent restarting of the timer,
1da177e4
LT
494 * otherwise this function is meaningless. It must not be called from
495 * interrupt contexts. The caller must not hold locks which would prevent
55c888d6
ON
496 * completion of the timer's handler. The timer's handler must not call
497 * add_timer_on(). Upon exit the timer is not queued and the handler is
498 * not running on any CPU.
1da177e4
LT
499 *
500 * The function returns whether it has deactivated a pending timer or not.
1da177e4
LT
501 */
502int del_timer_sync(struct timer_list *timer)
503{
fd450b73
ON
504 for (;;) {
505 int ret = try_to_del_timer_sync(timer);
506 if (ret >= 0)
507 return ret;
a0009652 508 cpu_relax();
fd450b73 509 }
1da177e4 510}
1da177e4 511
55c888d6 512EXPORT_SYMBOL(del_timer_sync);
1da177e4
LT
513#endif
514
515static int cascade(tvec_base_t *base, tvec_t *tv, int index)
516{
517 /* cascade all the timers from tv up one level */
3439dd86
P
518 struct timer_list *timer, *tmp;
519 struct list_head tv_list;
520
521 list_replace_init(tv->vec + index, &tv_list);
1da177e4 522
1da177e4 523 /*
3439dd86
P
524 * We are removing _all_ timers from the list, so we
525 * don't have to detach them individually.
1da177e4 526 */
3439dd86
P
527 list_for_each_entry_safe(timer, tmp, &tv_list, entry) {
528 BUG_ON(timer->base != base);
529 internal_add_timer(base, timer);
1da177e4 530 }
1da177e4
LT
531
532 return index;
533}
534
2aae4a10
REB
535#define INDEX(N) ((base->timer_jiffies >> (TVR_BITS + (N) * TVN_BITS)) & TVN_MASK)
536
537/**
1da177e4
LT
538 * __run_timers - run all expired timers (if any) on this CPU.
539 * @base: the timer vector to be processed.
540 *
541 * This function cascades all vectors and executes all expired timer
542 * vectors.
543 */
1da177e4
LT
544static inline void __run_timers(tvec_base_t *base)
545{
546 struct timer_list *timer;
547
3691c519 548 spin_lock_irq(&base->lock);
1da177e4 549 while (time_after_eq(jiffies, base->timer_jiffies)) {
626ab0e6 550 struct list_head work_list;
1da177e4
LT
551 struct list_head *head = &work_list;
552 int index = base->timer_jiffies & TVR_MASK;
626ab0e6 553
1da177e4
LT
554 /*
555 * Cascade timers:
556 */
557 if (!index &&
558 (!cascade(base, &base->tv2, INDEX(0))) &&
559 (!cascade(base, &base->tv3, INDEX(1))) &&
560 !cascade(base, &base->tv4, INDEX(2)))
561 cascade(base, &base->tv5, INDEX(3));
626ab0e6
ON
562 ++base->timer_jiffies;
563 list_replace_init(base->tv1.vec + index, &work_list);
55c888d6 564 while (!list_empty(head)) {
1da177e4
LT
565 void (*fn)(unsigned long);
566 unsigned long data;
567
568 timer = list_entry(head->next,struct timer_list,entry);
569 fn = timer->function;
570 data = timer->data;
571
1da177e4 572 set_running_timer(base, timer);
55c888d6 573 detach_timer(timer, 1);
3691c519 574 spin_unlock_irq(&base->lock);
1da177e4 575 {
be5b4fbd 576 int preempt_count = preempt_count();
1da177e4
LT
577 fn(data);
578 if (preempt_count != preempt_count()) {
be5b4fbd
JJ
579 printk(KERN_WARNING "huh, entered %p "
580 "with preempt_count %08x, exited"
581 " with %08x?\n",
582 fn, preempt_count,
583 preempt_count());
1da177e4
LT
584 BUG();
585 }
586 }
3691c519 587 spin_lock_irq(&base->lock);
1da177e4
LT
588 }
589 }
590 set_running_timer(base, NULL);
3691c519 591 spin_unlock_irq(&base->lock);
1da177e4
LT
592}
593
594#ifdef CONFIG_NO_IDLE_HZ
595/*
596 * Find out when the next timer event is due to happen. This
597 * is used on S/390 to stop all activity when a cpus is idle.
598 * This functions needs to be called disabled.
599 */
600unsigned long next_timer_interrupt(void)
601{
602 tvec_base_t *base;
603 struct list_head *list;
604 struct timer_list *nte;
605 unsigned long expires;
69239749
TL
606 unsigned long hr_expires = MAX_JIFFY_OFFSET;
607 ktime_t hr_delta;
1da177e4
LT
608 tvec_t *varray[4];
609 int i, j;
610
69239749
TL
611 hr_delta = hrtimer_get_next_event();
612 if (hr_delta.tv64 != KTIME_MAX) {
613 struct timespec tsdelta;
614 tsdelta = ktime_to_timespec(hr_delta);
615 hr_expires = timespec_to_jiffies(&tsdelta);
616 if (hr_expires < 3)
617 return hr_expires + jiffies;
618 }
619 hr_expires += jiffies;
620
a4a6198b 621 base = __get_cpu_var(tvec_bases);
3691c519 622 spin_lock(&base->lock);
1da177e4 623 expires = base->timer_jiffies + (LONG_MAX >> 1);
53f087fe 624 list = NULL;
1da177e4
LT
625
626 /* Look for timer events in tv1. */
627 j = base->timer_jiffies & TVR_MASK;
628 do {
629 list_for_each_entry(nte, base->tv1.vec + j, entry) {
630 expires = nte->expires;
631 if (j < (base->timer_jiffies & TVR_MASK))
632 list = base->tv2.vec + (INDEX(0));
633 goto found;
634 }
635 j = (j + 1) & TVR_MASK;
636 } while (j != (base->timer_jiffies & TVR_MASK));
637
638 /* Check tv2-tv5. */
639 varray[0] = &base->tv2;
640 varray[1] = &base->tv3;
641 varray[2] = &base->tv4;
642 varray[3] = &base->tv5;
643 for (i = 0; i < 4; i++) {
644 j = INDEX(i);
645 do {
646 if (list_empty(varray[i]->vec + j)) {
647 j = (j + 1) & TVN_MASK;
648 continue;
649 }
650 list_for_each_entry(nte, varray[i]->vec + j, entry)
651 if (time_before(nte->expires, expires))
652 expires = nte->expires;
653 if (j < (INDEX(i)) && i < 3)
654 list = varray[i + 1]->vec + (INDEX(i + 1));
655 goto found;
656 } while (j != (INDEX(i)));
657 }
658found:
659 if (list) {
660 /*
661 * The search wrapped. We need to look at the next list
662 * from next tv element that would cascade into tv element
663 * where we found the timer element.
664 */
665 list_for_each_entry(nte, list, entry) {
666 if (time_before(nte->expires, expires))
667 expires = nte->expires;
668 }
669 }
3691c519 670 spin_unlock(&base->lock);
69239749 671
0662b713
ZA
672 /*
673 * It can happen that other CPUs service timer IRQs and increment
674 * jiffies, but we have not yet got a local timer tick to process
675 * the timer wheels. In that case, the expiry time can be before
676 * jiffies, but since the high-resolution timer here is relative to
677 * jiffies, the default expression when high-resolution timers are
678 * not active,
679 *
680 * time_before(MAX_JIFFY_OFFSET + jiffies, expires)
681 *
682 * would falsely evaluate to true. If that is the case, just
683 * return jiffies so that we can immediately fire the local timer
684 */
685 if (time_before(expires, jiffies))
686 return jiffies;
687
69239749
TL
688 if (time_before(hr_expires, expires))
689 return hr_expires;
690
1da177e4
LT
691 return expires;
692}
693#endif
694
695/******************************************************************/
696
1da177e4
LT
697/*
698 * The current time
699 * wall_to_monotonic is what we need to add to xtime (or xtime corrected
700 * for sub jiffie times) to get to monotonic time. Monotonic is pegged
701 * at zero at system boot time, so wall_to_monotonic will be negative,
702 * however, we will ALWAYS keep the tv_nsec part positive so we can use
703 * the usual normalization.
704 */
705struct timespec xtime __attribute__ ((aligned (16)));
706struct timespec wall_to_monotonic __attribute__ ((aligned (16)));
707
708EXPORT_SYMBOL(xtime);
709
726c14bf 710
ad596171
JS
711/* XXX - all of this timekeeping code should be later moved to time.c */
712#include <linux/clocksource.h>
713static struct clocksource *clock; /* pointer to current clocksource */
cf3c769b
JS
714
715#ifdef CONFIG_GENERIC_TIME
716/**
717 * __get_nsec_offset - Returns nanoseconds since last call to periodic_hook
718 *
719 * private function, must hold xtime_lock lock when being
720 * called. Returns the number of nanoseconds since the
721 * last call to update_wall_time() (adjusted by NTP scaling)
722 */
723static inline s64 __get_nsec_offset(void)
724{
725 cycle_t cycle_now, cycle_delta;
726 s64 ns_offset;
727
728 /* read clocksource: */
a2752549 729 cycle_now = clocksource_read(clock);
cf3c769b
JS
730
731 /* calculate the delta since the last update_wall_time: */
19923c19 732 cycle_delta = (cycle_now - clock->cycle_last) & clock->mask;
cf3c769b
JS
733
734 /* convert to nanoseconds: */
735 ns_offset = cyc2ns(clock, cycle_delta);
736
737 return ns_offset;
738}
739
740/**
741 * __get_realtime_clock_ts - Returns the time of day in a timespec
742 * @ts: pointer to the timespec to be set
743 *
744 * Returns the time of day in a timespec. Used by
745 * do_gettimeofday() and get_realtime_clock_ts().
746 */
747static inline void __get_realtime_clock_ts(struct timespec *ts)
748{
749 unsigned long seq;
750 s64 nsecs;
751
752 do {
753 seq = read_seqbegin(&xtime_lock);
754
755 *ts = xtime;
756 nsecs = __get_nsec_offset();
757
758 } while (read_seqretry(&xtime_lock, seq));
759
760 timespec_add_ns(ts, nsecs);
761}
762
763/**
a2752549 764 * getnstimeofday - Returns the time of day in a timespec
cf3c769b
JS
765 * @ts: pointer to the timespec to be set
766 *
767 * Returns the time of day in a timespec.
768 */
769void getnstimeofday(struct timespec *ts)
770{
771 __get_realtime_clock_ts(ts);
772}
773
774EXPORT_SYMBOL(getnstimeofday);
775
776/**
777 * do_gettimeofday - Returns the time of day in a timeval
778 * @tv: pointer to the timeval to be set
779 *
780 * NOTE: Users should be converted to using get_realtime_clock_ts()
781 */
782void do_gettimeofday(struct timeval *tv)
783{
784 struct timespec now;
785
786 __get_realtime_clock_ts(&now);
787 tv->tv_sec = now.tv_sec;
788 tv->tv_usec = now.tv_nsec/1000;
789}
790
791EXPORT_SYMBOL(do_gettimeofday);
792/**
793 * do_settimeofday - Sets the time of day
794 * @tv: pointer to the timespec variable containing the new time
795 *
796 * Sets the time of day to the new time and update NTP and notify hrtimers
797 */
798int do_settimeofday(struct timespec *tv)
799{
800 unsigned long flags;
801 time_t wtm_sec, sec = tv->tv_sec;
802 long wtm_nsec, nsec = tv->tv_nsec;
803
804 if ((unsigned long)tv->tv_nsec >= NSEC_PER_SEC)
805 return -EINVAL;
806
807 write_seqlock_irqsave(&xtime_lock, flags);
808
809 nsec -= __get_nsec_offset();
810
811 wtm_sec = wall_to_monotonic.tv_sec + (xtime.tv_sec - sec);
812 wtm_nsec = wall_to_monotonic.tv_nsec + (xtime.tv_nsec - nsec);
813
814 set_normalized_timespec(&xtime, sec, nsec);
815 set_normalized_timespec(&wall_to_monotonic, wtm_sec, wtm_nsec);
816
e154ff3d 817 clock->error = 0;
cf3c769b
JS
818 ntp_clear();
819
820 write_sequnlock_irqrestore(&xtime_lock, flags);
821
822 /* signal hrtimers about time change */
823 clock_was_set();
824
825 return 0;
826}
827
828EXPORT_SYMBOL(do_settimeofday);
829
830/**
831 * change_clocksource - Swaps clocksources if a new one is available
832 *
833 * Accumulates current time interval and initializes new clocksource
834 */
835static int change_clocksource(void)
836{
837 struct clocksource *new;
838 cycle_t now;
839 u64 nsec;
a2752549 840 new = clocksource_get_next();
cf3c769b 841 if (clock != new) {
a2752549 842 now = clocksource_read(new);
cf3c769b
JS
843 nsec = __get_nsec_offset();
844 timespec_add_ns(&xtime, nsec);
845
846 clock = new;
19923c19 847 clock->cycle_last = now;
cf3c769b 848 printk(KERN_INFO "Time: %s clocksource has been installed.\n",
f5f1a24a 849 clock->name);
cf3c769b 850 return 1;
cf3c769b
JS
851 }
852 return 0;
853}
854#else
f5f1a24a
DW
855static inline int change_clocksource(void)
856{
857 return 0;
858}
cf3c769b
JS
859#endif
860
861/**
862 * timeofday_is_continuous - check to see if timekeeping is free running
863 */
864int timekeeping_is_continuous(void)
865{
866 unsigned long seq;
867 int ret;
868
869 do {
870 seq = read_seqbegin(&xtime_lock);
871
73b08d2a 872 ret = clock->flags & CLOCK_SOURCE_IS_CONTINUOUS;
cf3c769b
JS
873
874 } while (read_seqretry(&xtime_lock, seq));
875
876 return ret;
877}
878
411187fb
JS
879/**
880 * read_persistent_clock - Return time in seconds from the persistent clock.
881 *
882 * Weak dummy function for arches that do not yet support it.
883 * Returns seconds from epoch using the battery backed persistent clock.
884 * Returns zero if unsupported.
885 *
886 * XXX - Do be sure to remove it once all arches implement it.
887 */
888unsigned long __attribute__((weak)) read_persistent_clock(void)
889{
890 return 0;
891}
892
1da177e4 893/*
ad596171 894 * timekeeping_init - Initializes the clocksource and common timekeeping values
1da177e4 895 */
ad596171 896void __init timekeeping_init(void)
1da177e4 897{
ad596171 898 unsigned long flags;
411187fb 899 unsigned long sec = read_persistent_clock();
ad596171
JS
900
901 write_seqlock_irqsave(&xtime_lock, flags);
b0ee7556
RZ
902
903 ntp_clear();
904
a2752549 905 clock = clocksource_get_next();
f4304ab2 906 clocksource_calculate_interval(clock, NTP_INTERVAL_LENGTH);
19923c19 907 clock->cycle_last = clocksource_read(clock);
b0ee7556 908
411187fb
JS
909 xtime.tv_sec = sec;
910 xtime.tv_nsec = 0;
911 set_normalized_timespec(&wall_to_monotonic,
912 -xtime.tv_sec, -xtime.tv_nsec);
913
ad596171
JS
914 write_sequnlock_irqrestore(&xtime_lock, flags);
915}
916
917
411187fb 918/* flag for if timekeeping is suspended */
3e143475 919static int timekeeping_suspended;
411187fb
JS
920/* time in seconds when suspend began */
921static unsigned long timekeeping_suspend_time;
922
2aae4a10 923/**
ad596171
JS
924 * timekeeping_resume - Resumes the generic timekeeping subsystem.
925 * @dev: unused
926 *
927 * This is for the generic clocksource timekeeping.
8ef38609 928 * xtime/wall_to_monotonic/jiffies/etc are
ad596171
JS
929 * still managed by arch specific suspend/resume code.
930 */
931static int timekeeping_resume(struct sys_device *dev)
932{
933 unsigned long flags;
411187fb 934 unsigned long now = read_persistent_clock();
ad596171
JS
935
936 write_seqlock_irqsave(&xtime_lock, flags);
411187fb
JS
937
938 if (now && (now > timekeeping_suspend_time)) {
939 unsigned long sleep_length = now - timekeeping_suspend_time;
940
941 xtime.tv_sec += sleep_length;
942 wall_to_monotonic.tv_sec -= sleep_length;
943 }
944 /* re-base the last cycle value */
19923c19 945 clock->cycle_last = clocksource_read(clock);
3e143475
JS
946 clock->error = 0;
947 timekeeping_suspended = 0;
948 write_sequnlock_irqrestore(&xtime_lock, flags);
411187fb
JS
949
950 touch_softlockup_watchdog();
951 hrtimer_notify_resume();
952
3e143475
JS
953 return 0;
954}
955
956static int timekeeping_suspend(struct sys_device *dev, pm_message_t state)
957{
958 unsigned long flags;
959
960 write_seqlock_irqsave(&xtime_lock, flags);
961 timekeeping_suspended = 1;
411187fb 962 timekeeping_suspend_time = read_persistent_clock();
ad596171
JS
963 write_sequnlock_irqrestore(&xtime_lock, flags);
964 return 0;
965}
966
967/* sysfs resume/suspend bits for timekeeping */
968static struct sysdev_class timekeeping_sysclass = {
969 .resume = timekeeping_resume,
3e143475 970 .suspend = timekeeping_suspend,
ad596171
JS
971 set_kset_name("timekeeping"),
972};
973
974static struct sys_device device_timer = {
975 .id = 0,
976 .cls = &timekeeping_sysclass,
977};
978
979static int __init timekeeping_init_device(void)
980{
981 int error = sysdev_class_register(&timekeeping_sysclass);
982 if (!error)
983 error = sysdev_register(&device_timer);
984 return error;
985}
986
987device_initcall(timekeeping_init_device);
988
19923c19 989/*
e154ff3d 990 * If the error is already larger, we look ahead even further
19923c19
RZ
991 * to compensate for late or lost adjustments.
992 */
f5f1a24a
DW
993static __always_inline int clocksource_bigadjust(s64 error, s64 *interval,
994 s64 *offset)
19923c19 995{
e154ff3d
RZ
996 s64 tick_error, i;
997 u32 look_ahead, adj;
998 s32 error2, mult;
19923c19
RZ
999
1000 /*
e154ff3d
RZ
1001 * Use the current error value to determine how much to look ahead.
1002 * The larger the error the slower we adjust for it to avoid problems
1003 * with losing too many ticks, otherwise we would overadjust and
1004 * produce an even larger error. The smaller the adjustment the
1005 * faster we try to adjust for it, as lost ticks can do less harm
1006 * here. This is tuned so that an error of about 1 msec is adusted
1007 * within about 1 sec (or 2^20 nsec in 2^SHIFT_HZ ticks).
19923c19 1008 */
e154ff3d
RZ
1009 error2 = clock->error >> (TICK_LENGTH_SHIFT + 22 - 2 * SHIFT_HZ);
1010 error2 = abs(error2);
1011 for (look_ahead = 0; error2 > 0; look_ahead++)
1012 error2 >>= 2;
19923c19
RZ
1013
1014 /*
e154ff3d
RZ
1015 * Now calculate the error in (1 << look_ahead) ticks, but first
1016 * remove the single look ahead already included in the error.
19923c19 1017 */
f5f1a24a
DW
1018 tick_error = current_tick_length() >>
1019 (TICK_LENGTH_SHIFT - clock->shift + 1);
e154ff3d
RZ
1020 tick_error -= clock->xtime_interval >> 1;
1021 error = ((error - tick_error) >> look_ahead) + tick_error;
1022
1023 /* Finally calculate the adjustment shift value. */
1024 i = *interval;
1025 mult = 1;
1026 if (error < 0) {
1027 error = -error;
1028 *interval = -*interval;
1029 *offset = -*offset;
1030 mult = -1;
19923c19 1031 }
e154ff3d
RZ
1032 for (adj = 0; error > i; adj++)
1033 error >>= 1;
19923c19
RZ
1034
1035 *interval <<= adj;
1036 *offset <<= adj;
e154ff3d 1037 return mult << adj;
19923c19
RZ
1038}
1039
1040/*
1041 * Adjust the multiplier to reduce the error value,
1042 * this is optimized for the most common adjustments of -1,0,1,
1043 * for other values we can do a bit more work.
1044 */
1045static void clocksource_adjust(struct clocksource *clock, s64 offset)
1046{
1047 s64 error, interval = clock->cycle_interval;
1048 int adj;
1049
1050 error = clock->error >> (TICK_LENGTH_SHIFT - clock->shift - 1);
1051 if (error > interval) {
e154ff3d
RZ
1052 error >>= 2;
1053 if (likely(error <= interval))
1054 adj = 1;
1055 else
1056 adj = clocksource_bigadjust(error, &interval, &offset);
19923c19 1057 } else if (error < -interval) {
e154ff3d
RZ
1058 error >>= 2;
1059 if (likely(error >= -interval)) {
1060 adj = -1;
1061 interval = -interval;
1062 offset = -offset;
1063 } else
1064 adj = clocksource_bigadjust(error, &interval, &offset);
19923c19
RZ
1065 } else
1066 return;
1067
1068 clock->mult += adj;
1069 clock->xtime_interval += interval;
1070 clock->xtime_nsec -= offset;
f5f1a24a
DW
1071 clock->error -= (interval - offset) <<
1072 (TICK_LENGTH_SHIFT - clock->shift);
19923c19
RZ
1073}
1074
2aae4a10 1075/**
ad596171
JS
1076 * update_wall_time - Uses the current clocksource to increment the wall time
1077 *
1078 * Called from the timer interrupt, must hold a write on xtime_lock.
1079 */
1080static void update_wall_time(void)
1081{
19923c19 1082 cycle_t offset;
ad596171 1083
3e143475
JS
1084 /* Make sure we're fully resumed: */
1085 if (unlikely(timekeeping_suspended))
1086 return;
5eb6d205 1087
19923c19
RZ
1088#ifdef CONFIG_GENERIC_TIME
1089 offset = (clocksource_read(clock) - clock->cycle_last) & clock->mask;
1090#else
1091 offset = clock->cycle_interval;
1092#endif
3e143475 1093 clock->xtime_nsec += (s64)xtime.tv_nsec << clock->shift;
ad596171
JS
1094
1095 /* normally this loop will run just once, however in the
1096 * case of lost or late ticks, it will accumulate correctly.
1097 */
19923c19 1098 while (offset >= clock->cycle_interval) {
ad596171 1099 /* accumulate one interval */
19923c19
RZ
1100 clock->xtime_nsec += clock->xtime_interval;
1101 clock->cycle_last += clock->cycle_interval;
1102 offset -= clock->cycle_interval;
1103
1104 if (clock->xtime_nsec >= (u64)NSEC_PER_SEC << clock->shift) {
1105 clock->xtime_nsec -= (u64)NSEC_PER_SEC << clock->shift;
1106 xtime.tv_sec++;
1107 second_overflow();
1108 }
ad596171 1109
5eb6d205 1110 /* interpolator bits */
19923c19 1111 time_interpolator_update(clock->xtime_interval
5eb6d205 1112 >> clock->shift);
5eb6d205
JS
1113
1114 /* accumulate error between NTP and clock interval */
19923c19
RZ
1115 clock->error += current_tick_length();
1116 clock->error -= clock->xtime_interval << (TICK_LENGTH_SHIFT - clock->shift);
1117 }
5eb6d205 1118
19923c19
RZ
1119 /* correct the clock when NTP error is too big */
1120 clocksource_adjust(clock, offset);
5eb6d205 1121
5eb6d205 1122 /* store full nanoseconds into xtime */
e154ff3d 1123 xtime.tv_nsec = (s64)clock->xtime_nsec >> clock->shift;
19923c19 1124 clock->xtime_nsec -= (s64)xtime.tv_nsec << clock->shift;
cf3c769b
JS
1125
1126 /* check to see if there is a new clocksource to use */
1127 if (change_clocksource()) {
19923c19
RZ
1128 clock->error = 0;
1129 clock->xtime_nsec = 0;
f4304ab2 1130 clocksource_calculate_interval(clock, NTP_INTERVAL_LENGTH);
cf3c769b 1131 }
1da177e4
LT
1132}
1133
1134/*
1135 * Called from the timer interrupt handler to charge one tick to the current
1136 * process. user_tick is 1 if the tick is user time, 0 for system.
1137 */
1138void update_process_times(int user_tick)
1139{
1140 struct task_struct *p = current;
1141 int cpu = smp_processor_id();
1142
1143 /* Note: this timer irq context must be accounted for as well. */
1144 if (user_tick)
1145 account_user_time(p, jiffies_to_cputime(1));
1146 else
1147 account_system_time(p, HARDIRQ_OFFSET, jiffies_to_cputime(1));
1148 run_local_timers();
1149 if (rcu_pending(cpu))
1150 rcu_check_callbacks(cpu, user_tick);
1151 scheduler_tick();
1152 run_posix_cpu_timers(p);
1153}
1154
1155/*
1156 * Nr of active tasks - counted in fixed-point numbers
1157 */
1158static unsigned long count_active_tasks(void)
1159{
db1b1fef 1160 return nr_active() * FIXED_1;
1da177e4
LT
1161}
1162
1163/*
1164 * Hmm.. Changed this, as the GNU make sources (load.c) seems to
1165 * imply that avenrun[] is the standard name for this kind of thing.
1166 * Nothing else seems to be standardized: the fractional size etc
1167 * all seem to differ on different machines.
1168 *
1169 * Requires xtime_lock to access.
1170 */
1171unsigned long avenrun[3];
1172
1173EXPORT_SYMBOL(avenrun);
1174
1175/*
1176 * calc_load - given tick count, update the avenrun load estimates.
1177 * This is called while holding a write_lock on xtime_lock.
1178 */
1179static inline void calc_load(unsigned long ticks)
1180{
1181 unsigned long active_tasks; /* fixed-point */
1182 static int count = LOAD_FREQ;
1183
cd7175ed
ED
1184 count -= ticks;
1185 if (unlikely(count < 0)) {
1186 active_tasks = count_active_tasks();
1187 do {
1188 CALC_LOAD(avenrun[0], EXP_1, active_tasks);
1189 CALC_LOAD(avenrun[1], EXP_5, active_tasks);
1190 CALC_LOAD(avenrun[2], EXP_15, active_tasks);
1191 count += LOAD_FREQ;
1192 } while (count < 0);
1da177e4
LT
1193 }
1194}
1195
1da177e4
LT
1196/*
1197 * This read-write spinlock protects us from races in SMP while
1198 * playing with xtime and avenrun.
1199 */
5809f9d4 1200__attribute__((weak)) __cacheline_aligned_in_smp DEFINE_SEQLOCK(xtime_lock);
1da177e4
LT
1201
1202EXPORT_SYMBOL(xtime_lock);
1da177e4
LT
1203
1204/*
1205 * This function runs timers and the timer-tq in bottom half context.
1206 */
1207static void run_timer_softirq(struct softirq_action *h)
1208{
a4a6198b 1209 tvec_base_t *base = __get_cpu_var(tvec_bases);
1da177e4 1210
c0a31329 1211 hrtimer_run_queues();
1da177e4
LT
1212 if (time_after_eq(jiffies, base->timer_jiffies))
1213 __run_timers(base);
1214}
1215
1216/*
1217 * Called by the local, per-CPU timer interrupt on SMP.
1218 */
1219void run_local_timers(void)
1220{
1221 raise_softirq(TIMER_SOFTIRQ);
6687a97d 1222 softlockup_tick();
1da177e4
LT
1223}
1224
1225/*
1226 * Called by the timer interrupt. xtime_lock must already be taken
1227 * by the timer IRQ!
1228 */
3171a030 1229static inline void update_times(unsigned long ticks)
1da177e4 1230{
ad596171 1231 update_wall_time();
1da177e4
LT
1232 calc_load(ticks);
1233}
1234
1235/*
1236 * The 64-bit jiffies value is not atomic - you MUST NOT read it
1237 * without sampling the sequence number in xtime_lock.
1238 * jiffies is defined in the linker script...
1239 */
1240
3171a030 1241void do_timer(unsigned long ticks)
1da177e4 1242{
3171a030
AN
1243 jiffies_64 += ticks;
1244 update_times(ticks);
1da177e4
LT
1245}
1246
1247#ifdef __ARCH_WANT_SYS_ALARM
1248
1249/*
1250 * For backwards compatibility? This can be done in libc so Alpha
1251 * and all newer ports shouldn't need it.
1252 */
1253asmlinkage unsigned long sys_alarm(unsigned int seconds)
1254{
c08b8a49 1255 return alarm_setitimer(seconds);
1da177e4
LT
1256}
1257
1258#endif
1259
1260#ifndef __alpha__
1261
1262/*
1263 * The Alpha uses getxpid, getxuid, and getxgid instead. Maybe this
1264 * should be moved into arch/i386 instead?
1265 */
1266
1267/**
1268 * sys_getpid - return the thread group id of the current process
1269 *
1270 * Note, despite the name, this returns the tgid not the pid. The tgid and
1271 * the pid are identical unless CLONE_THREAD was specified on clone() in
1272 * which case the tgid is the same in all threads of the same group.
1273 *
1274 * This is SMP safe as current->tgid does not change.
1275 */
1276asmlinkage long sys_getpid(void)
1277{
1278 return current->tgid;
1279}
1280
1281/*
6997a6fa
KK
1282 * Accessing ->real_parent is not SMP-safe, it could
1283 * change from under us. However, we can use a stale
1284 * value of ->real_parent under rcu_read_lock(), see
1285 * release_task()->call_rcu(delayed_put_task_struct).
1da177e4
LT
1286 */
1287asmlinkage long sys_getppid(void)
1288{
1289 int pid;
1da177e4 1290
6997a6fa
KK
1291 rcu_read_lock();
1292 pid = rcu_dereference(current->real_parent)->tgid;
1293 rcu_read_unlock();
1da177e4 1294
1da177e4
LT
1295 return pid;
1296}
1297
1298asmlinkage long sys_getuid(void)
1299{
1300 /* Only we change this so SMP safe */
1301 return current->uid;
1302}
1303
1304asmlinkage long sys_geteuid(void)
1305{
1306 /* Only we change this so SMP safe */
1307 return current->euid;
1308}
1309
1310asmlinkage long sys_getgid(void)
1311{
1312 /* Only we change this so SMP safe */
1313 return current->gid;
1314}
1315
1316asmlinkage long sys_getegid(void)
1317{
1318 /* Only we change this so SMP safe */
1319 return current->egid;
1320}
1321
1322#endif
1323
1324static void process_timeout(unsigned long __data)
1325{
36c8b586 1326 wake_up_process((struct task_struct *)__data);
1da177e4
LT
1327}
1328
1329/**
1330 * schedule_timeout - sleep until timeout
1331 * @timeout: timeout value in jiffies
1332 *
1333 * Make the current task sleep until @timeout jiffies have
1334 * elapsed. The routine will return immediately unless
1335 * the current task state has been set (see set_current_state()).
1336 *
1337 * You can set the task state as follows -
1338 *
1339 * %TASK_UNINTERRUPTIBLE - at least @timeout jiffies are guaranteed to
1340 * pass before the routine returns. The routine will return 0
1341 *
1342 * %TASK_INTERRUPTIBLE - the routine may return early if a signal is
1343 * delivered to the current task. In this case the remaining time
1344 * in jiffies will be returned, or 0 if the timer expired in time
1345 *
1346 * The current task state is guaranteed to be TASK_RUNNING when this
1347 * routine returns.
1348 *
1349 * Specifying a @timeout value of %MAX_SCHEDULE_TIMEOUT will schedule
1350 * the CPU away without a bound on the timeout. In this case the return
1351 * value will be %MAX_SCHEDULE_TIMEOUT.
1352 *
1353 * In all cases the return value is guaranteed to be non-negative.
1354 */
1355fastcall signed long __sched schedule_timeout(signed long timeout)
1356{
1357 struct timer_list timer;
1358 unsigned long expire;
1359
1360 switch (timeout)
1361 {
1362 case MAX_SCHEDULE_TIMEOUT:
1363 /*
1364 * These two special cases are useful to be comfortable
1365 * in the caller. Nothing more. We could take
1366 * MAX_SCHEDULE_TIMEOUT from one of the negative value
1367 * but I' d like to return a valid offset (>=0) to allow
1368 * the caller to do everything it want with the retval.
1369 */
1370 schedule();
1371 goto out;
1372 default:
1373 /*
1374 * Another bit of PARANOID. Note that the retval will be
1375 * 0 since no piece of kernel is supposed to do a check
1376 * for a negative retval of schedule_timeout() (since it
1377 * should never happens anyway). You just have the printk()
1378 * that will tell you if something is gone wrong and where.
1379 */
5b149bcc 1380 if (timeout < 0) {
1da177e4 1381 printk(KERN_ERR "schedule_timeout: wrong timeout "
5b149bcc
AM
1382 "value %lx\n", timeout);
1383 dump_stack();
1da177e4
LT
1384 current->state = TASK_RUNNING;
1385 goto out;
1386 }
1387 }
1388
1389 expire = timeout + jiffies;
1390
a8db2db1
ON
1391 setup_timer(&timer, process_timeout, (unsigned long)current);
1392 __mod_timer(&timer, expire);
1da177e4
LT
1393 schedule();
1394 del_singleshot_timer_sync(&timer);
1395
1396 timeout = expire - jiffies;
1397
1398 out:
1399 return timeout < 0 ? 0 : timeout;
1400}
1da177e4
LT
1401EXPORT_SYMBOL(schedule_timeout);
1402
8a1c1757
AM
1403/*
1404 * We can use __set_current_state() here because schedule_timeout() calls
1405 * schedule() unconditionally.
1406 */
64ed93a2
NA
1407signed long __sched schedule_timeout_interruptible(signed long timeout)
1408{
a5a0d52c
AM
1409 __set_current_state(TASK_INTERRUPTIBLE);
1410 return schedule_timeout(timeout);
64ed93a2
NA
1411}
1412EXPORT_SYMBOL(schedule_timeout_interruptible);
1413
1414signed long __sched schedule_timeout_uninterruptible(signed long timeout)
1415{
a5a0d52c
AM
1416 __set_current_state(TASK_UNINTERRUPTIBLE);
1417 return schedule_timeout(timeout);
64ed93a2
NA
1418}
1419EXPORT_SYMBOL(schedule_timeout_uninterruptible);
1420
1da177e4
LT
1421/* Thread ID - the internal kernel "pid" */
1422asmlinkage long sys_gettid(void)
1423{
1424 return current->pid;
1425}
1426
2aae4a10 1427/**
d4d23add 1428 * do_sysinfo - fill in sysinfo struct
2aae4a10 1429 * @info: pointer to buffer to fill
1da177e4 1430 */
d4d23add 1431int do_sysinfo(struct sysinfo *info)
1da177e4 1432{
1da177e4
LT
1433 unsigned long mem_total, sav_total;
1434 unsigned int mem_unit, bitcount;
1435 unsigned long seq;
1436
d4d23add 1437 memset(info, 0, sizeof(struct sysinfo));
1da177e4
LT
1438
1439 do {
1440 struct timespec tp;
1441 seq = read_seqbegin(&xtime_lock);
1442
1443 /*
1444 * This is annoying. The below is the same thing
1445 * posix_get_clock_monotonic() does, but it wants to
1446 * take the lock which we want to cover the loads stuff
1447 * too.
1448 */
1449
1450 getnstimeofday(&tp);
1451 tp.tv_sec += wall_to_monotonic.tv_sec;
1452 tp.tv_nsec += wall_to_monotonic.tv_nsec;
1453 if (tp.tv_nsec - NSEC_PER_SEC >= 0) {
1454 tp.tv_nsec = tp.tv_nsec - NSEC_PER_SEC;
1455 tp.tv_sec++;
1456 }
d4d23add 1457 info->uptime = tp.tv_sec + (tp.tv_nsec ? 1 : 0);
1da177e4 1458
d4d23add
KM
1459 info->loads[0] = avenrun[0] << (SI_LOAD_SHIFT - FSHIFT);
1460 info->loads[1] = avenrun[1] << (SI_LOAD_SHIFT - FSHIFT);
1461 info->loads[2] = avenrun[2] << (SI_LOAD_SHIFT - FSHIFT);
1da177e4 1462
d4d23add 1463 info->procs = nr_threads;
1da177e4
LT
1464 } while (read_seqretry(&xtime_lock, seq));
1465
d4d23add
KM
1466 si_meminfo(info);
1467 si_swapinfo(info);
1da177e4
LT
1468
1469 /*
1470 * If the sum of all the available memory (i.e. ram + swap)
1471 * is less than can be stored in a 32 bit unsigned long then
1472 * we can be binary compatible with 2.2.x kernels. If not,
1473 * well, in that case 2.2.x was broken anyways...
1474 *
1475 * -Erik Andersen <andersee@debian.org>
1476 */
1477
d4d23add
KM
1478 mem_total = info->totalram + info->totalswap;
1479 if (mem_total < info->totalram || mem_total < info->totalswap)
1da177e4
LT
1480 goto out;
1481 bitcount = 0;
d4d23add 1482 mem_unit = info->mem_unit;
1da177e4
LT
1483 while (mem_unit > 1) {
1484 bitcount++;
1485 mem_unit >>= 1;
1486 sav_total = mem_total;
1487 mem_total <<= 1;
1488 if (mem_total < sav_total)
1489 goto out;
1490 }
1491
1492 /*
1493 * If mem_total did not overflow, multiply all memory values by
d4d23add 1494 * info->mem_unit and set it to 1. This leaves things compatible
1da177e4
LT
1495 * with 2.2.x, and also retains compatibility with earlier 2.4.x
1496 * kernels...
1497 */
1498
d4d23add
KM
1499 info->mem_unit = 1;
1500 info->totalram <<= bitcount;
1501 info->freeram <<= bitcount;
1502 info->sharedram <<= bitcount;
1503 info->bufferram <<= bitcount;
1504 info->totalswap <<= bitcount;
1505 info->freeswap <<= bitcount;
1506 info->totalhigh <<= bitcount;
1507 info->freehigh <<= bitcount;
1508
1509out:
1510 return 0;
1511}
1512
1513asmlinkage long sys_sysinfo(struct sysinfo __user *info)
1514{
1515 struct sysinfo val;
1516
1517 do_sysinfo(&val);
1da177e4 1518
1da177e4
LT
1519 if (copy_to_user(info, &val, sizeof(struct sysinfo)))
1520 return -EFAULT;
1521
1522 return 0;
1523}
1524
d730e882
IM
1525/*
1526 * lockdep: we want to track each per-CPU base as a separate lock-class,
1527 * but timer-bases are kmalloc()-ed, so we need to attach separate
1528 * keys to them:
1529 */
1530static struct lock_class_key base_lock_keys[NR_CPUS];
1531
a4a6198b 1532static int __devinit init_timers_cpu(int cpu)
1da177e4
LT
1533{
1534 int j;
1535 tvec_base_t *base;
ba6edfcd 1536 static char __devinitdata tvec_base_done[NR_CPUS];
55c888d6 1537
ba6edfcd 1538 if (!tvec_base_done[cpu]) {
a4a6198b
JB
1539 static char boot_done;
1540
a4a6198b 1541 if (boot_done) {
ba6edfcd
AM
1542 /*
1543 * The APs use this path later in boot
1544 */
a4a6198b
JB
1545 base = kmalloc_node(sizeof(*base), GFP_KERNEL,
1546 cpu_to_node(cpu));
1547 if (!base)
1548 return -ENOMEM;
1549 memset(base, 0, sizeof(*base));
ba6edfcd 1550 per_cpu(tvec_bases, cpu) = base;
a4a6198b 1551 } else {
ba6edfcd
AM
1552 /*
1553 * This is for the boot CPU - we use compile-time
1554 * static initialisation because per-cpu memory isn't
1555 * ready yet and because the memory allocators are not
1556 * initialised either.
1557 */
a4a6198b 1558 boot_done = 1;
ba6edfcd 1559 base = &boot_tvec_bases;
a4a6198b 1560 }
ba6edfcd
AM
1561 tvec_base_done[cpu] = 1;
1562 } else {
1563 base = per_cpu(tvec_bases, cpu);
a4a6198b 1564 }
ba6edfcd 1565
3691c519 1566 spin_lock_init(&base->lock);
d730e882
IM
1567 lockdep_set_class(&base->lock, base_lock_keys + cpu);
1568
1da177e4
LT
1569 for (j = 0; j < TVN_SIZE; j++) {
1570 INIT_LIST_HEAD(base->tv5.vec + j);
1571 INIT_LIST_HEAD(base->tv4.vec + j);
1572 INIT_LIST_HEAD(base->tv3.vec + j);
1573 INIT_LIST_HEAD(base->tv2.vec + j);
1574 }
1575 for (j = 0; j < TVR_SIZE; j++)
1576 INIT_LIST_HEAD(base->tv1.vec + j);
1577
1578 base->timer_jiffies = jiffies;
a4a6198b 1579 return 0;
1da177e4
LT
1580}
1581
1582#ifdef CONFIG_HOTPLUG_CPU
55c888d6 1583static void migrate_timer_list(tvec_base_t *new_base, struct list_head *head)
1da177e4
LT
1584{
1585 struct timer_list *timer;
1586
1587 while (!list_empty(head)) {
1588 timer = list_entry(head->next, struct timer_list, entry);
55c888d6 1589 detach_timer(timer, 0);
3691c519 1590 timer->base = new_base;
1da177e4 1591 internal_add_timer(new_base, timer);
1da177e4 1592 }
1da177e4
LT
1593}
1594
1595static void __devinit migrate_timers(int cpu)
1596{
1597 tvec_base_t *old_base;
1598 tvec_base_t *new_base;
1599 int i;
1600
1601 BUG_ON(cpu_online(cpu));
a4a6198b
JB
1602 old_base = per_cpu(tvec_bases, cpu);
1603 new_base = get_cpu_var(tvec_bases);
1da177e4
LT
1604
1605 local_irq_disable();
3691c519
ON
1606 spin_lock(&new_base->lock);
1607 spin_lock(&old_base->lock);
1608
1609 BUG_ON(old_base->running_timer);
1da177e4 1610
1da177e4 1611 for (i = 0; i < TVR_SIZE; i++)
55c888d6
ON
1612 migrate_timer_list(new_base, old_base->tv1.vec + i);
1613 for (i = 0; i < TVN_SIZE; i++) {
1614 migrate_timer_list(new_base, old_base->tv2.vec + i);
1615 migrate_timer_list(new_base, old_base->tv3.vec + i);
1616 migrate_timer_list(new_base, old_base->tv4.vec + i);
1617 migrate_timer_list(new_base, old_base->tv5.vec + i);
1618 }
1619
3691c519
ON
1620 spin_unlock(&old_base->lock);
1621 spin_unlock(&new_base->lock);
1da177e4
LT
1622 local_irq_enable();
1623 put_cpu_var(tvec_bases);
1da177e4
LT
1624}
1625#endif /* CONFIG_HOTPLUG_CPU */
1626
8c78f307 1627static int __cpuinit timer_cpu_notify(struct notifier_block *self,
1da177e4
LT
1628 unsigned long action, void *hcpu)
1629{
1630 long cpu = (long)hcpu;
1631 switch(action) {
1632 case CPU_UP_PREPARE:
a4a6198b
JB
1633 if (init_timers_cpu(cpu) < 0)
1634 return NOTIFY_BAD;
1da177e4
LT
1635 break;
1636#ifdef CONFIG_HOTPLUG_CPU
1637 case CPU_DEAD:
1638 migrate_timers(cpu);
1639 break;
1640#endif
1641 default:
1642 break;
1643 }
1644 return NOTIFY_OK;
1645}
1646
8c78f307 1647static struct notifier_block __cpuinitdata timers_nb = {
1da177e4
LT
1648 .notifier_call = timer_cpu_notify,
1649};
1650
1651
1652void __init init_timers(void)
1653{
07dccf33 1654 int err = timer_cpu_notify(&timers_nb, (unsigned long)CPU_UP_PREPARE,
1da177e4 1655 (void *)(long)smp_processor_id());
07dccf33
AM
1656
1657 BUG_ON(err == NOTIFY_BAD);
1da177e4
LT
1658 register_cpu_notifier(&timers_nb);
1659 open_softirq(TIMER_SOFTIRQ, run_timer_softirq, NULL);
1660}
1661
1662#ifdef CONFIG_TIME_INTERPOLATION
1663
67890d70
CL
1664struct time_interpolator *time_interpolator __read_mostly;
1665static struct time_interpolator *time_interpolator_list __read_mostly;
1da177e4
LT
1666static DEFINE_SPINLOCK(time_interpolator_lock);
1667
3db5db4f 1668static inline cycles_t time_interpolator_get_cycles(unsigned int src)
1da177e4
LT
1669{
1670 unsigned long (*x)(void);
1671
1672 switch (src)
1673 {
1674 case TIME_SOURCE_FUNCTION:
1675 x = time_interpolator->addr;
1676 return x();
1677
1678 case TIME_SOURCE_MMIO64 :
685db65e 1679 return readq_relaxed((void __iomem *)time_interpolator->addr);
1da177e4
LT
1680
1681 case TIME_SOURCE_MMIO32 :
685db65e 1682 return readl_relaxed((void __iomem *)time_interpolator->addr);
1da177e4
LT
1683
1684 default: return get_cycles();
1685 }
1686}
1687
486d46ae 1688static inline u64 time_interpolator_get_counter(int writelock)
1da177e4
LT
1689{
1690 unsigned int src = time_interpolator->source;
1691
1692 if (time_interpolator->jitter)
1693 {
3db5db4f
HD
1694 cycles_t lcycle;
1695 cycles_t now;
1da177e4
LT
1696
1697 do {
1698 lcycle = time_interpolator->last_cycle;
1699 now = time_interpolator_get_cycles(src);
1700 if (lcycle && time_after(lcycle, now))
1701 return lcycle;
486d46ae
AW
1702
1703 /* When holding the xtime write lock, there's no need
1704 * to add the overhead of the cmpxchg. Readers are
1705 * force to retry until the write lock is released.
1706 */
1707 if (writelock) {
1708 time_interpolator->last_cycle = now;
1709 return now;
1710 }
1da177e4
LT
1711 /* Keep track of the last timer value returned. The use of cmpxchg here
1712 * will cause contention in an SMP environment.
1713 */
1714 } while (unlikely(cmpxchg(&time_interpolator->last_cycle, lcycle, now) != lcycle));
1715 return now;
1716 }
1717 else
1718 return time_interpolator_get_cycles(src);
1719}
1720
1721void time_interpolator_reset(void)
1722{
1723 time_interpolator->offset = 0;
486d46ae 1724 time_interpolator->last_counter = time_interpolator_get_counter(1);
1da177e4
LT
1725}
1726
1727#define GET_TI_NSECS(count,i) (((((count) - i->last_counter) & (i)->mask) * (i)->nsec_per_cyc) >> (i)->shift)
1728
1729unsigned long time_interpolator_get_offset(void)
1730{
1731 /* If we do not have a time interpolator set up then just return zero */
1732 if (!time_interpolator)
1733 return 0;
1734
1735 return time_interpolator->offset +
486d46ae 1736 GET_TI_NSECS(time_interpolator_get_counter(0), time_interpolator);
1da177e4
LT
1737}
1738
1739#define INTERPOLATOR_ADJUST 65536
1740#define INTERPOLATOR_MAX_SKIP 10*INTERPOLATOR_ADJUST
1741
4c7ee8de 1742void time_interpolator_update(long delta_nsec)
1da177e4
LT
1743{
1744 u64 counter;
1745 unsigned long offset;
1746
1747 /* If there is no time interpolator set up then do nothing */
1748 if (!time_interpolator)
1749 return;
1750
a5a0d52c
AM
1751 /*
1752 * The interpolator compensates for late ticks by accumulating the late
1753 * time in time_interpolator->offset. A tick earlier than expected will
1754 * lead to a reset of the offset and a corresponding jump of the clock
1755 * forward. Again this only works if the interpolator clock is running
1756 * slightly slower than the regular clock and the tuning logic insures
1757 * that.
1758 */
1da177e4 1759
486d46ae 1760 counter = time_interpolator_get_counter(1);
a5a0d52c
AM
1761 offset = time_interpolator->offset +
1762 GET_TI_NSECS(counter, time_interpolator);
1da177e4
LT
1763
1764 if (delta_nsec < 0 || (unsigned long) delta_nsec < offset)
1765 time_interpolator->offset = offset - delta_nsec;
1766 else {
1767 time_interpolator->skips++;
1768 time_interpolator->ns_skipped += delta_nsec - offset;
1769 time_interpolator->offset = 0;
1770 }
1771 time_interpolator->last_counter = counter;
1772
1773 /* Tuning logic for time interpolator invoked every minute or so.
1774 * Decrease interpolator clock speed if no skips occurred and an offset is carried.
1775 * Increase interpolator clock speed if we skip too much time.
1776 */
1777 if (jiffies % INTERPOLATOR_ADJUST == 0)
1778 {
b20367a6 1779 if (time_interpolator->skips == 0 && time_interpolator->offset > tick_nsec)
1da177e4
LT
1780 time_interpolator->nsec_per_cyc--;
1781 if (time_interpolator->ns_skipped > INTERPOLATOR_MAX_SKIP && time_interpolator->offset == 0)
1782 time_interpolator->nsec_per_cyc++;
1783 time_interpolator->skips = 0;
1784 time_interpolator->ns_skipped = 0;
1785 }
1786}
1787
1788static inline int
1789is_better_time_interpolator(struct time_interpolator *new)
1790{
1791 if (!time_interpolator)
1792 return 1;
1793 return new->frequency > 2*time_interpolator->frequency ||
1794 (unsigned long)new->drift < (unsigned long)time_interpolator->drift;
1795}
1796
1797void
1798register_time_interpolator(struct time_interpolator *ti)
1799{
1800 unsigned long flags;
1801
1802 /* Sanity check */
9f31252c 1803 BUG_ON(ti->frequency == 0 || ti->mask == 0);
1da177e4
LT
1804
1805 ti->nsec_per_cyc = ((u64)NSEC_PER_SEC << ti->shift) / ti->frequency;
1806 spin_lock(&time_interpolator_lock);
1807 write_seqlock_irqsave(&xtime_lock, flags);
1808 if (is_better_time_interpolator(ti)) {
1809 time_interpolator = ti;
1810 time_interpolator_reset();
1811 }
1812 write_sequnlock_irqrestore(&xtime_lock, flags);
1813
1814 ti->next = time_interpolator_list;
1815 time_interpolator_list = ti;
1816 spin_unlock(&time_interpolator_lock);
1817}
1818
1819void
1820unregister_time_interpolator(struct time_interpolator *ti)
1821{
1822 struct time_interpolator *curr, **prev;
1823 unsigned long flags;
1824
1825 spin_lock(&time_interpolator_lock);
1826 prev = &time_interpolator_list;
1827 for (curr = *prev; curr; curr = curr->next) {
1828 if (curr == ti) {
1829 *prev = curr->next;
1830 break;
1831 }
1832 prev = &curr->next;
1833 }
1834
1835 write_seqlock_irqsave(&xtime_lock, flags);
1836 if (ti == time_interpolator) {
1837 /* we lost the best time-interpolator: */
1838 time_interpolator = NULL;
1839 /* find the next-best interpolator */
1840 for (curr = time_interpolator_list; curr; curr = curr->next)
1841 if (is_better_time_interpolator(curr))
1842 time_interpolator = curr;
1843 time_interpolator_reset();
1844 }
1845 write_sequnlock_irqrestore(&xtime_lock, flags);
1846 spin_unlock(&time_interpolator_lock);
1847}
1848#endif /* CONFIG_TIME_INTERPOLATION */
1849
1850/**
1851 * msleep - sleep safely even with waitqueue interruptions
1852 * @msecs: Time in milliseconds to sleep for
1853 */
1854void msleep(unsigned int msecs)
1855{
1856 unsigned long timeout = msecs_to_jiffies(msecs) + 1;
1857
75bcc8c5
NA
1858 while (timeout)
1859 timeout = schedule_timeout_uninterruptible(timeout);
1da177e4
LT
1860}
1861
1862EXPORT_SYMBOL(msleep);
1863
1864/**
96ec3efd 1865 * msleep_interruptible - sleep waiting for signals
1da177e4
LT
1866 * @msecs: Time in milliseconds to sleep for
1867 */
1868unsigned long msleep_interruptible(unsigned int msecs)
1869{
1870 unsigned long timeout = msecs_to_jiffies(msecs) + 1;
1871
75bcc8c5
NA
1872 while (timeout && !signal_pending(current))
1873 timeout = schedule_timeout_interruptible(timeout);
1da177e4
LT
1874 return jiffies_to_msecs(timeout);
1875}
1876
1877EXPORT_SYMBOL(msleep_interruptible);