Blame view

kernel/timer.c 40.9 KB
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1
2
3
  /*
   *  linux/kernel/timer.c
   *
8524070b7   John Stultz   Move timekeeping ...
4
   *  Kernel internal timers, basic process system calls
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
   *
   *  Copyright (C) 1991, 1992  Linus Torvalds
   *
   *  1997-01-28  Modified by Finn Arne Gangstad to make timers scale better.
   *
   *  1997-09-10  Updated NTP code according to technical memorandum Jan '96
   *              "A Kernel Model for Precision Timekeeping" by Dave Mills
   *  1998-12-24  Fixed a xtime SMP race (we need the xtime_lock rw spinlock to
   *              serialize accesses to xtime/lost_ticks).
   *                              Copyright (C) 1998  Andrea Arcangeli
   *  1999-03-10  Improved NTP compatibility by Ulrich Windl
   *  2002-05-31	Move sys_sysinfo here and make its locking sane, Robert Love
   *  2000-10-05  Implemented scalable SMP per-CPU timer handling.
   *                              Copyright (C) 2000, 2001, 2002  Ingo Molnar
   *              Designed by David S. Miller, Alexey Kuznetsov and Ingo Molnar
   */
  
  #include <linux/kernel_stat.h>
  #include <linux/module.h>
  #include <linux/interrupt.h>
  #include <linux/percpu.h>
  #include <linux/init.h>
  #include <linux/mm.h>
  #include <linux/swap.h>
  #include <linux/notifier.h>
  #include <linux/thread_info.h>
  #include <linux/time.h>
  #include <linux/jiffies.h>
  #include <linux/posix-timers.h>
  #include <linux/cpu.h>
  #include <linux/syscalls.h>
97a41e261   Adrian Bunk   [PATCH] kernel/: ...
36
  #include <linux/delay.h>
79bf2bb33   Thomas Gleixner   [PATCH] tick-mana...
37
  #include <linux/tick.h>
82f67cd9f   Ingo Molnar   [PATCH] Add debug...
38
  #include <linux/kallsyms.h>
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
39
40
41
42
43
44
  
  #include <asm/uaccess.h>
  #include <asm/unistd.h>
  #include <asm/div64.h>
  #include <asm/timex.h>
  #include <asm/io.h>
ecea8d19c   Thomas Gleixner   [PATCH] jiffies_6...
45
46
47
  u64 jiffies_64 __cacheline_aligned_in_smp = INITIAL_JIFFIES;
  
  EXPORT_SYMBOL(jiffies_64);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
48
49
50
  /*
   * per-CPU timer vector definitions:
   */
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
  #define TVN_BITS (CONFIG_BASE_SMALL ? 4 : 6)
  #define TVR_BITS (CONFIG_BASE_SMALL ? 6 : 8)
  #define TVN_SIZE (1 << TVN_BITS)
  #define TVR_SIZE (1 << TVR_BITS)
  #define TVN_MASK (TVN_SIZE - 1)
  #define TVR_MASK (TVR_SIZE - 1)
  
  typedef struct tvec_s {
  	struct list_head vec[TVN_SIZE];
  } tvec_t;
  
  typedef struct tvec_root_s {
  	struct list_head vec[TVR_SIZE];
  } tvec_root_t;
  
  struct tvec_t_base_s {
3691c5199   Oleg Nesterov   [PATCH] kill __in...
67
68
  	spinlock_t lock;
  	struct timer_list *running_timer;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
69
  	unsigned long timer_jiffies;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
70
71
72
73
74
  	tvec_root_t tv1;
  	tvec_t tv2;
  	tvec_t tv3;
  	tvec_t tv4;
  	tvec_t tv5;
6e453a675   Venki Pallipadi   Add support for d...
75
  } ____cacheline_aligned;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
76
77
  
  typedef struct tvec_t_base_s tvec_base_t;
ba6edfcd1   Andrew Morton   [PATCH] timer ini...
78

3691c5199   Oleg Nesterov   [PATCH] kill __in...
79
80
  tvec_base_t boot_tvec_bases;
  EXPORT_SYMBOL(boot_tvec_bases);
51d8c5edd   Josh Triplett   [PATCH] timer: Fi...
81
  static DEFINE_PER_CPU(tvec_base_t *, tvec_bases) = &boot_tvec_bases;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
82

6e453a675   Venki Pallipadi   Add support for d...
83
84
85
86
87
88
89
90
91
92
  /*
   * Note that all tvec_bases is 2 byte aligned and lower bit of
   * base in timer_list is guaranteed to be zero. Use the LSB for
   * the new flag to indicate whether the timer is deferrable
   */
  #define TBASE_DEFERRABLE_FLAG		(0x1)
  
  /* Functions below help us manage 'deferrable' flag */
  static inline unsigned int tbase_get_deferrable(tvec_base_t *base)
  {
e9910846f   akpm@linux-foundation.org   timer: revert par...
93
  	return ((unsigned int)(unsigned long)base & TBASE_DEFERRABLE_FLAG);
6e453a675   Venki Pallipadi   Add support for d...
94
95
96
97
  }
  
  static inline tvec_base_t *tbase_get_base(tvec_base_t *base)
  {
e9910846f   akpm@linux-foundation.org   timer: revert par...
98
  	return ((tvec_base_t *)((unsigned long)base & ~TBASE_DEFERRABLE_FLAG));
6e453a675   Venki Pallipadi   Add support for d...
99
100
101
102
  }
  
  static inline void timer_set_deferrable(struct timer_list *timer)
  {
e9910846f   akpm@linux-foundation.org   timer: revert par...
103
  	timer->base = ((tvec_base_t *)((unsigned long)(timer->base) |
6819457d2   Thomas Gleixner   timer.c: cleanup ...
104
  				       TBASE_DEFERRABLE_FLAG));
6e453a675   Venki Pallipadi   Add support for d...
105
106
107
108
109
  }
  
  static inline void
  timer_set_base(struct timer_list *timer, tvec_base_t *new_base)
  {
e9910846f   akpm@linux-foundation.org   timer: revert par...
110
  	timer->base = (tvec_base_t *)((unsigned long)(new_base) |
6819457d2   Thomas Gleixner   timer.c: cleanup ...
111
  				      tbase_get_deferrable(timer->base));
6e453a675   Venki Pallipadi   Add support for d...
112
  }
4c36a5dec   Arjan van de Ven   [PATCH] round_jif...
113
114
115
116
117
  /**
   * __round_jiffies - function to round jiffies to a full second
   * @j: the time in (absolute) jiffies that should be rounded
   * @cpu: the processor number on which the timeout will happen
   *
72fd4a35a   Robert P. J. Day   [PATCH] Numerous ...
118
   * __round_jiffies() rounds an absolute time in the future (in jiffies)
4c36a5dec   Arjan van de Ven   [PATCH] round_jif...
119
120
121
122
123
124
125
126
127
128
129
130
   * up or down to (approximately) full seconds. This is useful for timers
   * for which the exact time they fire does not matter too much, as long as
   * they fire approximately every X seconds.
   *
   * By rounding these timers to whole seconds, all such timers will fire
   * at the same time, rather than at various times spread out. The goal
   * of this is to have the CPU wake up less, which saves power.
   *
   * The exact rounding is skewed for each processor to avoid all
   * processors firing at the exact same time, which could lead
   * to lock contention or spurious cache line bouncing.
   *
72fd4a35a   Robert P. J. Day   [PATCH] Numerous ...
131
   * The return value is the rounded version of the @j parameter.
4c36a5dec   Arjan van de Ven   [PATCH] round_jif...
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
   */
  unsigned long __round_jiffies(unsigned long j, int cpu)
  {
  	int rem;
  	unsigned long original = j;
  
  	/*
  	 * We don't want all cpus firing their timers at once hitting the
  	 * same lock or cachelines, so we skew each extra cpu with an extra
  	 * 3 jiffies. This 3 jiffies came originally from the mm/ code which
  	 * already did this.
  	 * The skew is done by adding 3*cpunr, then round, then subtract this
  	 * extra offset again.
  	 */
  	j += cpu * 3;
  
  	rem = j % HZ;
  
  	/*
  	 * If the target jiffie is just after a whole second (which can happen
  	 * due to delays of the timer irq, long irq off times etc etc) then
  	 * we should round down to the whole second, not up. Use 1/4th second
  	 * as cutoff for this rounding as an extreme upper bound for this.
  	 */
  	if (rem < HZ/4) /* round down */
  		j = j - rem;
  	else /* round up */
  		j = j - rem + HZ;
  
  	/* now that we have rounded, subtract the extra skew again */
  	j -= cpu * 3;
  
  	if (j <= jiffies) /* rounding ate our timeout entirely; */
  		return original;
  	return j;
  }
  EXPORT_SYMBOL_GPL(__round_jiffies);
  
  /**
   * __round_jiffies_relative - function to round jiffies to a full second
   * @j: the time in (relative) jiffies that should be rounded
   * @cpu: the processor number on which the timeout will happen
   *
72fd4a35a   Robert P. J. Day   [PATCH] Numerous ...
175
   * __round_jiffies_relative() rounds a time delta  in the future (in jiffies)
4c36a5dec   Arjan van de Ven   [PATCH] round_jif...
176
177
178
179
180
181
182
183
184
185
186
187
   * up or down to (approximately) full seconds. This is useful for timers
   * for which the exact time they fire does not matter too much, as long as
   * they fire approximately every X seconds.
   *
   * By rounding these timers to whole seconds, all such timers will fire
   * at the same time, rather than at various times spread out. The goal
   * of this is to have the CPU wake up less, which saves power.
   *
   * The exact rounding is skewed for each processor to avoid all
   * processors firing at the exact same time, which could lead
   * to lock contention or spurious cache line bouncing.
   *
72fd4a35a   Robert P. J. Day   [PATCH] Numerous ...
188
   * The return value is the rounded version of the @j parameter.
4c36a5dec   Arjan van de Ven   [PATCH] round_jif...
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
   */
  unsigned long __round_jiffies_relative(unsigned long j, int cpu)
  {
  	/*
  	 * In theory the following code can skip a jiffy in case jiffies
  	 * increments right between the addition and the later subtraction.
  	 * However since the entire point of this function is to use approximate
  	 * timeouts, it's entirely ok to not handle that.
  	 */
  	return  __round_jiffies(j + jiffies, cpu) - jiffies;
  }
  EXPORT_SYMBOL_GPL(__round_jiffies_relative);
  
  /**
   * round_jiffies - function to round jiffies to a full second
   * @j: the time in (absolute) jiffies that should be rounded
   *
72fd4a35a   Robert P. J. Day   [PATCH] Numerous ...
206
   * round_jiffies() rounds an absolute time in the future (in jiffies)
4c36a5dec   Arjan van de Ven   [PATCH] round_jif...
207
208
209
210
211
212
213
214
   * up or down to (approximately) full seconds. This is useful for timers
   * for which the exact time they fire does not matter too much, as long as
   * they fire approximately every X seconds.
   *
   * By rounding these timers to whole seconds, all such timers will fire
   * at the same time, rather than at various times spread out. The goal
   * of this is to have the CPU wake up less, which saves power.
   *
72fd4a35a   Robert P. J. Day   [PATCH] Numerous ...
215
   * The return value is the rounded version of the @j parameter.
4c36a5dec   Arjan van de Ven   [PATCH] round_jif...
216
217
218
219
220
221
222
223
224
225
226
   */
  unsigned long round_jiffies(unsigned long j)
  {
  	return __round_jiffies(j, raw_smp_processor_id());
  }
  EXPORT_SYMBOL_GPL(round_jiffies);
  
  /**
   * round_jiffies_relative - function to round jiffies to a full second
   * @j: the time in (relative) jiffies that should be rounded
   *
72fd4a35a   Robert P. J. Day   [PATCH] Numerous ...
227
   * round_jiffies_relative() rounds a time delta  in the future (in jiffies)
4c36a5dec   Arjan van de Ven   [PATCH] round_jif...
228
229
230
231
232
233
234
235
   * up or down to (approximately) full seconds. This is useful for timers
   * for which the exact time they fire does not matter too much, as long as
   * they fire approximately every X seconds.
   *
   * By rounding these timers to whole seconds, all such timers will fire
   * at the same time, rather than at various times spread out. The goal
   * of this is to have the CPU wake up less, which saves power.
   *
72fd4a35a   Robert P. J. Day   [PATCH] Numerous ...
236
   * The return value is the rounded version of the @j parameter.
4c36a5dec   Arjan van de Ven   [PATCH] round_jif...
237
238
239
240
241
242
   */
  unsigned long round_jiffies_relative(unsigned long j)
  {
  	return __round_jiffies_relative(j, raw_smp_processor_id());
  }
  EXPORT_SYMBOL_GPL(round_jiffies_relative);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
243
244
245
246
  static inline void set_running_timer(tvec_base_t *base,
  					struct timer_list *timer)
  {
  #ifdef CONFIG_SMP
3691c5199   Oleg Nesterov   [PATCH] kill __in...
247
  	base->running_timer = timer;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
248
249
  #endif
  }
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
  static void internal_add_timer(tvec_base_t *base, struct timer_list *timer)
  {
  	unsigned long expires = timer->expires;
  	unsigned long idx = expires - base->timer_jiffies;
  	struct list_head *vec;
  
  	if (idx < TVR_SIZE) {
  		int i = expires & TVR_MASK;
  		vec = base->tv1.vec + i;
  	} else if (idx < 1 << (TVR_BITS + TVN_BITS)) {
  		int i = (expires >> TVR_BITS) & TVN_MASK;
  		vec = base->tv2.vec + i;
  	} else if (idx < 1 << (TVR_BITS + 2 * TVN_BITS)) {
  		int i = (expires >> (TVR_BITS + TVN_BITS)) & TVN_MASK;
  		vec = base->tv3.vec + i;
  	} else if (idx < 1 << (TVR_BITS + 3 * TVN_BITS)) {
  		int i = (expires >> (TVR_BITS + 2 * TVN_BITS)) & TVN_MASK;
  		vec = base->tv4.vec + i;
  	} else if ((signed long) idx < 0) {
  		/*
  		 * Can happen if you add a timer with expires == jiffies,
  		 * or you set a timer to go off in the past
  		 */
  		vec = base->tv1.vec + (base->timer_jiffies & TVR_MASK);
  	} else {
  		int i;
  		/* If the timeout is larger than 0xffffffff on 64-bit
  		 * architectures then we use the maximum timeout:
  		 */
  		if (idx > 0xffffffffUL) {
  			idx = 0xffffffffUL;
  			expires = idx + base->timer_jiffies;
  		}
  		i = (expires >> (TVR_BITS + 3 * TVN_BITS)) & TVN_MASK;
  		vec = base->tv5.vec + i;
  	}
  	/*
  	 * Timers are FIFO:
  	 */
  	list_add_tail(&timer->entry, vec);
  }
82f67cd9f   Ingo Molnar   [PATCH] Add debug...
291
292
293
294
295
296
297
298
299
300
  #ifdef CONFIG_TIMER_STATS
  void __timer_stats_timer_set_start_info(struct timer_list *timer, void *addr)
  {
  	if (timer->start_site)
  		return;
  
  	timer->start_site = addr;
  	memcpy(timer->start_comm, current->comm, TASK_COMM_LEN);
  	timer->start_pid = current->pid;
  }
c5c061b8f   Venki Pallipadi   Add a flag to ind...
301
302
303
304
305
306
307
308
309
310
311
312
313
314
  
  static void timer_stats_account_timer(struct timer_list *timer)
  {
  	unsigned int flag = 0;
  
  	if (unlikely(tbase_get_deferrable(timer->base)))
  		flag |= TIMER_STATS_FLAG_DEFERRABLE;
  
  	timer_stats_update_stats(timer, timer->start_pid, timer->start_site,
  				 timer->function, timer->start_comm, flag);
  }
  
  #else
  static void timer_stats_account_timer(struct timer_list *timer) {}
82f67cd9f   Ingo Molnar   [PATCH] Add debug...
315
  #endif
2aae4a108   Rolf Eike Beer   [PATCH] Fix kerne...
316
  /**
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
317
318
319
320
321
322
323
324
325
   * init_timer - initialize a timer.
   * @timer: the timer to be initialized
   *
   * init_timer() must be done to a timer prior calling *any* of the
   * other timer functions.
   */
  void fastcall init_timer(struct timer_list *timer)
  {
  	timer->entry.next = NULL;
bfe5d8341   Paul Mackerras   [PATCH] Define __...
326
  	timer->base = __raw_get_cpu_var(tvec_bases);
82f67cd9f   Ingo Molnar   [PATCH] Add debug...
327
328
329
330
331
  #ifdef CONFIG_TIMER_STATS
  	timer->start_site = NULL;
  	timer->start_pid = -1;
  	memset(timer->start_comm, 0, TASK_COMM_LEN);
  #endif
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
332
333
  }
  EXPORT_SYMBOL(init_timer);
6e453a675   Venki Pallipadi   Add support for d...
334
335
336
337
338
339
  void fastcall init_timer_deferrable(struct timer_list *timer)
  {
  	init_timer(timer);
  	timer_set_deferrable(timer);
  }
  EXPORT_SYMBOL(init_timer_deferrable);
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
340
  static inline void detach_timer(struct timer_list *timer,
82f67cd9f   Ingo Molnar   [PATCH] Add debug...
341
  				int clear_pending)
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
342
343
344
345
346
347
348
349
350
351
  {
  	struct list_head *entry = &timer->entry;
  
  	__list_del(entry->prev, entry->next);
  	if (clear_pending)
  		entry->next = NULL;
  	entry->prev = LIST_POISON2;
  }
  
  /*
3691c5199   Oleg Nesterov   [PATCH] kill __in...
352
   * We are using hashed locking: holding per_cpu(tvec_bases).lock
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
353
354
355
356
357
358
359
360
361
362
   * means that all timers which are tied to this base via timer->base are
   * locked, and the base itself is locked too.
   *
   * So __run_timers/migrate_timers can safely modify all timers which could
   * be found on ->tvX lists.
   *
   * When the timer's base is locked, and the timer removed from list, it is
   * possible to set timer->base = NULL and drop the lock: the timer remains
   * locked.
   */
3691c5199   Oleg Nesterov   [PATCH] kill __in...
363
  static tvec_base_t *lock_timer_base(struct timer_list *timer,
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
364
  					unsigned long *flags)
89e7e374d   Josh Triplett   [PATCH] timer: ad...
365
  	__acquires(timer->base->lock)
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
366
  {
3691c5199   Oleg Nesterov   [PATCH] kill __in...
367
  	tvec_base_t *base;
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
368
369
  
  	for (;;) {
6e453a675   Venki Pallipadi   Add support for d...
370
371
  		tvec_base_t *prelock_base = timer->base;
  		base = tbase_get_base(prelock_base);
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
372
373
  		if (likely(base != NULL)) {
  			spin_lock_irqsave(&base->lock, *flags);
6e453a675   Venki Pallipadi   Add support for d...
374
  			if (likely(prelock_base == timer->base))
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
375
376
377
378
379
380
381
  				return base;
  			/* The timer has migrated to another CPU */
  			spin_unlock_irqrestore(&base->lock, *flags);
  		}
  		cpu_relax();
  	}
  }
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
382
383
  int __mod_timer(struct timer_list *timer, unsigned long expires)
  {
3691c5199   Oleg Nesterov   [PATCH] kill __in...
384
  	tvec_base_t *base, *new_base;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
385
386
  	unsigned long flags;
  	int ret = 0;
82f67cd9f   Ingo Molnar   [PATCH] Add debug...
387
  	timer_stats_timer_set_start_info(timer);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
388
  	BUG_ON(!timer->function);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
389

55c888d6d   Oleg Nesterov   [PATCH] timers fi...
390
391
392
393
394
395
  	base = lock_timer_base(timer, &flags);
  
  	if (timer_pending(timer)) {
  		detach_timer(timer, 0);
  		ret = 1;
  	}
a4a6198b8   Jan Beulich   [PATCH] tvec_base...
396
  	new_base = __get_cpu_var(tvec_bases);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
397

3691c5199   Oleg Nesterov   [PATCH] kill __in...
398
  	if (base != new_base) {
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
399
  		/*
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
400
401
402
403
404
  		 * We are trying to schedule the timer on the local CPU.
  		 * However we can't change timer's base while it is running,
  		 * otherwise del_timer_sync() can't detect that the timer's
  		 * handler yet has not finished. This also guarantees that
  		 * the timer is serialized wrt itself.
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
405
  		 */
a2c348fe0   Oleg Nesterov   [PATCH] __mod_tim...
406
  		if (likely(base->running_timer != timer)) {
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
407
  			/* See the comment in lock_timer_base() */
6e453a675   Venki Pallipadi   Add support for d...
408
  			timer_set_base(timer, NULL);
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
409
  			spin_unlock(&base->lock);
a2c348fe0   Oleg Nesterov   [PATCH] __mod_tim...
410
411
  			base = new_base;
  			spin_lock(&base->lock);
6e453a675   Venki Pallipadi   Add support for d...
412
  			timer_set_base(timer, base);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
413
414
  		}
  	}
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
415
  	timer->expires = expires;
a2c348fe0   Oleg Nesterov   [PATCH] __mod_tim...
416
417
  	internal_add_timer(base, timer);
  	spin_unlock_irqrestore(&base->lock, flags);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
418
419
420
421
422
  
  	return ret;
  }
  
  EXPORT_SYMBOL(__mod_timer);
2aae4a108   Rolf Eike Beer   [PATCH] Fix kerne...
423
  /**
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
424
425
426
427
428
429
430
431
   * add_timer_on - start a timer on a particular CPU
   * @timer: the timer to be added
   * @cpu: the CPU to start it on
   *
   * This is not very scalable on SMP. Double adds are not possible.
   */
  void add_timer_on(struct timer_list *timer, int cpu)
  {
a4a6198b8   Jan Beulich   [PATCH] tvec_base...
432
  	tvec_base_t *base = per_cpu(tvec_bases, cpu);
6819457d2   Thomas Gleixner   timer.c: cleanup ...
433
  	unsigned long flags;
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
434

82f67cd9f   Ingo Molnar   [PATCH] Add debug...
435
  	timer_stats_timer_set_start_info(timer);
6819457d2   Thomas Gleixner   timer.c: cleanup ...
436
  	BUG_ON(timer_pending(timer) || !timer->function);
3691c5199   Oleg Nesterov   [PATCH] kill __in...
437
  	spin_lock_irqsave(&base->lock, flags);
6e453a675   Venki Pallipadi   Add support for d...
438
  	timer_set_base(timer, base);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
439
  	internal_add_timer(base, timer);
3691c5199   Oleg Nesterov   [PATCH] kill __in...
440
  	spin_unlock_irqrestore(&base->lock, flags);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
441
  }
2aae4a108   Rolf Eike Beer   [PATCH] Fix kerne...
442
  /**
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
443
444
   * mod_timer - modify a timer's timeout
   * @timer: the timer to be modified
2aae4a108   Rolf Eike Beer   [PATCH] Fix kerne...
445
   * @expires: new timeout in jiffies
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
446
   *
72fd4a35a   Robert P. J. Day   [PATCH] Numerous ...
447
   * mod_timer() is a more efficient way to update the expire field of an
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
   * active timer (if the timer is inactive it will be activated)
   *
   * mod_timer(timer, expires) is equivalent to:
   *
   *     del_timer(timer); timer->expires = expires; add_timer(timer);
   *
   * Note that if there are multiple unserialized concurrent users of the
   * same timer, then mod_timer() is the only safe way to modify the timeout,
   * since add_timer() cannot modify an already running timer.
   *
   * The function returns whether it has modified a pending timer or not.
   * (ie. mod_timer() of an inactive timer returns 0, mod_timer() of an
   * active timer returns 1.)
   */
  int mod_timer(struct timer_list *timer, unsigned long expires)
  {
  	BUG_ON(!timer->function);
82f67cd9f   Ingo Molnar   [PATCH] Add debug...
465
  	timer_stats_timer_set_start_info(timer);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
466
467
468
469
470
471
472
473
474
475
476
477
  	/*
  	 * This is a common optimization triggered by the
  	 * networking code - if the timer is re-modified
  	 * to be the same thing then just return:
  	 */
  	if (timer->expires == expires && timer_pending(timer))
  		return 1;
  
  	return __mod_timer(timer, expires);
  }
  
  EXPORT_SYMBOL(mod_timer);
2aae4a108   Rolf Eike Beer   [PATCH] Fix kerne...
478
  /**
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
479
480
481
482
483
484
485
486
487
488
489
490
   * del_timer - deactive a timer.
   * @timer: the timer to be deactivated
   *
   * del_timer() deactivates a timer - this works on both active and inactive
   * timers.
   *
   * The function returns whether it has deactivated a pending timer or not.
   * (ie. del_timer() of an inactive timer returns 0, del_timer() of an
   * active timer returns 1.)
   */
  int del_timer(struct timer_list *timer)
  {
3691c5199   Oleg Nesterov   [PATCH] kill __in...
491
  	tvec_base_t *base;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
492
  	unsigned long flags;
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
493
  	int ret = 0;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
494

82f67cd9f   Ingo Molnar   [PATCH] Add debug...
495
  	timer_stats_timer_clear_start_info(timer);
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
496
497
498
499
500
501
  	if (timer_pending(timer)) {
  		base = lock_timer_base(timer, &flags);
  		if (timer_pending(timer)) {
  			detach_timer(timer, 1);
  			ret = 1;
  		}
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
502
  		spin_unlock_irqrestore(&base->lock, flags);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
503
  	}
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
504

55c888d6d   Oleg Nesterov   [PATCH] timers fi...
505
  	return ret;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
506
507
508
509
510
  }
  
  EXPORT_SYMBOL(del_timer);
  
  #ifdef CONFIG_SMP
2aae4a108   Rolf Eike Beer   [PATCH] Fix kerne...
511
512
513
514
  /**
   * try_to_del_timer_sync - Try to deactivate a timer
   * @timer: timer do del
   *
fd450b731   Oleg Nesterov   [PATCH] timers: i...
515
516
517
518
519
520
521
   * This function tries to deactivate a timer. Upon successful (ret >= 0)
   * exit the timer is not queued and the handler is not running on any CPU.
   *
   * It must not be called from interrupt contexts.
   */
  int try_to_del_timer_sync(struct timer_list *timer)
  {
3691c5199   Oleg Nesterov   [PATCH] kill __in...
522
  	tvec_base_t *base;
fd450b731   Oleg Nesterov   [PATCH] timers: i...
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
  	unsigned long flags;
  	int ret = -1;
  
  	base = lock_timer_base(timer, &flags);
  
  	if (base->running_timer == timer)
  		goto out;
  
  	ret = 0;
  	if (timer_pending(timer)) {
  		detach_timer(timer, 1);
  		ret = 1;
  	}
  out:
  	spin_unlock_irqrestore(&base->lock, flags);
  
  	return ret;
  }
e19dff1fd   David Howells   [AF_RXRPC]: Make ...
541
  EXPORT_SYMBOL(try_to_del_timer_sync);
2aae4a108   Rolf Eike Beer   [PATCH] Fix kerne...
542
  /**
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
543
544
545
546
547
548
549
   * del_timer_sync - deactivate a timer and wait for the handler to finish.
   * @timer: the timer to be deactivated
   *
   * This function only differs from del_timer() on SMP: besides deactivating
   * the timer it also makes sure the handler has finished executing on other
   * CPUs.
   *
72fd4a35a   Robert P. J. Day   [PATCH] Numerous ...
550
   * Synchronization rules: Callers must prevent restarting of the timer,
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
551
552
   * otherwise this function is meaningless. It must not be called from
   * interrupt contexts. The caller must not hold locks which would prevent
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
553
554
555
   * completion of the timer's handler. The timer's handler must not call
   * add_timer_on(). Upon exit the timer is not queued and the handler is
   * not running on any CPU.
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
556
557
   *
   * The function returns whether it has deactivated a pending timer or not.
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
558
559
560
   */
  int del_timer_sync(struct timer_list *timer)
  {
fd450b731   Oleg Nesterov   [PATCH] timers: i...
561
562
563
564
  	for (;;) {
  		int ret = try_to_del_timer_sync(timer);
  		if (ret >= 0)
  			return ret;
a0009652a   Andrew Morton   [PATCH] del_timer...
565
  		cpu_relax();
fd450b731   Oleg Nesterov   [PATCH] timers: i...
566
  	}
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
567
  }
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
568

55c888d6d   Oleg Nesterov   [PATCH] timers fi...
569
  EXPORT_SYMBOL(del_timer_sync);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
570
571
572
573
574
  #endif
  
  static int cascade(tvec_base_t *base, tvec_t *tv, int index)
  {
  	/* cascade all the timers from tv up one level */
3439dd86e   Porpoise   [PATCH] When CONF...
575
576
577
578
  	struct timer_list *timer, *tmp;
  	struct list_head tv_list;
  
  	list_replace_init(tv->vec + index, &tv_list);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
579

1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
580
  	/*
3439dd86e   Porpoise   [PATCH] When CONF...
581
582
  	 * We are removing _all_ timers from the list, so we
  	 * don't have to detach them individually.
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
583
  	 */
3439dd86e   Porpoise   [PATCH] When CONF...
584
  	list_for_each_entry_safe(timer, tmp, &tv_list, entry) {
6e453a675   Venki Pallipadi   Add support for d...
585
  		BUG_ON(tbase_get_base(timer->base) != base);
3439dd86e   Porpoise   [PATCH] When CONF...
586
  		internal_add_timer(base, timer);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
587
  	}
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
588
589
590
  
  	return index;
  }
2aae4a108   Rolf Eike Beer   [PATCH] Fix kerne...
591
592
593
  #define INDEX(N) ((base->timer_jiffies >> (TVR_BITS + (N) * TVN_BITS)) & TVN_MASK)
  
  /**
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
594
595
596
597
598
599
   * __run_timers - run all expired timers (if any) on this CPU.
   * @base: the timer vector to be processed.
   *
   * This function cascades all vectors and executes all expired timer
   * vectors.
   */
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
600
601
602
  static inline void __run_timers(tvec_base_t *base)
  {
  	struct timer_list *timer;
3691c5199   Oleg Nesterov   [PATCH] kill __in...
603
  	spin_lock_irq(&base->lock);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
604
  	while (time_after_eq(jiffies, base->timer_jiffies)) {
626ab0e69   Oleg Nesterov   [PATCH] list: use...
605
  		struct list_head work_list;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
606
  		struct list_head *head = &work_list;
6819457d2   Thomas Gleixner   timer.c: cleanup ...
607
  		int index = base->timer_jiffies & TVR_MASK;
626ab0e69   Oleg Nesterov   [PATCH] list: use...
608

1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
609
610
611
612
613
614
615
616
  		/*
  		 * Cascade timers:
  		 */
  		if (!index &&
  			(!cascade(base, &base->tv2, INDEX(0))) &&
  				(!cascade(base, &base->tv3, INDEX(1))) &&
  					!cascade(base, &base->tv4, INDEX(2)))
  			cascade(base, &base->tv5, INDEX(3));
626ab0e69   Oleg Nesterov   [PATCH] list: use...
617
618
  		++base->timer_jiffies;
  		list_replace_init(base->tv1.vec + index, &work_list);
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
619
  		while (!list_empty(head)) {
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
620
621
  			void (*fn)(unsigned long);
  			unsigned long data;
b5e618181   Pavel Emelianov   Introduce a handy...
622
  			timer = list_first_entry(head, struct timer_list,entry);
6819457d2   Thomas Gleixner   timer.c: cleanup ...
623
624
  			fn = timer->function;
  			data = timer->data;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
625

82f67cd9f   Ingo Molnar   [PATCH] Add debug...
626
  			timer_stats_account_timer(timer);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
627
  			set_running_timer(base, timer);
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
628
  			detach_timer(timer, 1);
3691c5199   Oleg Nesterov   [PATCH] kill __in...
629
  			spin_unlock_irq(&base->lock);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
630
  			{
be5b4fbd0   Jesper Juhl   [PATCH] preempt_c...
631
  				int preempt_count = preempt_count();
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
632
633
  				fn(data);
  				if (preempt_count != preempt_count()) {
be5b4fbd0   Jesper Juhl   [PATCH] preempt_c...
634
635
636
637
638
639
  					printk(KERN_WARNING "huh, entered %p "
  					       "with preempt_count %08x, exited"
  					       " with %08x?
  ",
  					       fn, preempt_count,
  					       preempt_count());
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
640
641
642
  					BUG();
  				}
  			}
3691c5199   Oleg Nesterov   [PATCH] kill __in...
643
  			spin_lock_irq(&base->lock);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
644
645
646
  		}
  	}
  	set_running_timer(base, NULL);
3691c5199   Oleg Nesterov   [PATCH] kill __in...
647
  	spin_unlock_irq(&base->lock);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
648
  }
fd064b9b7   Thomas Gleixner   [PATCH] Extend ne...
649
  #if defined(CONFIG_NO_IDLE_HZ) || defined(CONFIG_NO_HZ)
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
650
651
652
653
654
  /*
   * Find out when the next timer event is due to happen. This
   * is used on S/390 to stop all activity when a cpus is idle.
   * This functions needs to be called disabled.
   */
1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
655
  static unsigned long __next_timer_interrupt(tvec_base_t *base)
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
656
  {
1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
657
  	unsigned long timer_jiffies = base->timer_jiffies;
eaad084bb   Thomas Gleixner   NOHZ: prevent mul...
658
  	unsigned long expires = timer_jiffies + NEXT_TIMER_MAX_DELTA;
1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
659
  	int index, slot, array, found = 0;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
660
  	struct timer_list *nte;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
661
  	tvec_t *varray[4];
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
662
663
  
  	/* Look for timer events in tv1. */
1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
664
  	index = slot = timer_jiffies & TVR_MASK;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
665
  	do {
1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
666
  		list_for_each_entry(nte, base->tv1.vec + slot, entry) {
6819457d2   Thomas Gleixner   timer.c: cleanup ...
667
668
  			if (tbase_get_deferrable(nte->base))
  				continue;
6e453a675   Venki Pallipadi   Add support for d...
669

1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
670
  			found = 1;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
671
  			expires = nte->expires;
1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
672
673
674
675
  			/* Look at the cascade bucket(s)? */
  			if (!index || slot < index)
  				goto cascade;
  			return expires;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
676
  		}
1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
677
678
679
680
681
682
683
684
  		slot = (slot + 1) & TVR_MASK;
  	} while (slot != index);
  
  cascade:
  	/* Calculate the next cascade event */
  	if (index)
  		timer_jiffies += TVR_SIZE - index;
  	timer_jiffies >>= TVR_BITS;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
685
686
687
688
689
690
  
  	/* Check tv2-tv5. */
  	varray[0] = &base->tv2;
  	varray[1] = &base->tv3;
  	varray[2] = &base->tv4;
  	varray[3] = &base->tv5;
1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
691
692
693
694
695
  
  	for (array = 0; array < 4; array++) {
  		tvec_t *varp = varray[array];
  
  		index = slot = timer_jiffies & TVN_MASK;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
696
  		do {
1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
697
698
  			list_for_each_entry(nte, varp->vec + slot, entry) {
  				found = 1;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
699
700
  				if (time_before(nte->expires, expires))
  					expires = nte->expires;
1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
  			}
  			/*
  			 * Do we still search for the first timer or are
  			 * we looking up the cascade buckets ?
  			 */
  			if (found) {
  				/* Look at the cascade bucket(s)? */
  				if (!index || slot < index)
  					break;
  				return expires;
  			}
  			slot = (slot + 1) & TVN_MASK;
  		} while (slot != index);
  
  		if (index)
  			timer_jiffies += TVN_SIZE - index;
  		timer_jiffies >>= TVN_BITS;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
718
  	}
1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
719
720
  	return expires;
  }
69239749e   Tony Lindgren   [PATCH] fix next_...
721

1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
722
723
724
725
726
727
728
729
730
  /*
   * Check, if the next hrtimer event is before the next timer wheel
   * event:
   */
  static unsigned long cmp_next_hrtimer_event(unsigned long now,
  					    unsigned long expires)
  {
  	ktime_t hr_delta = hrtimer_get_next_event();
  	struct timespec tsdelta;
9501b6cf5   Thomas Gleixner   [PATCH] dynticks:...
731
  	unsigned long delta;
1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
732
733
734
  
  	if (hr_delta.tv64 == KTIME_MAX)
  		return expires;
0662b7132   Zachary Amsden   [PATCH] Fix a NO_...
735

9501b6cf5   Thomas Gleixner   [PATCH] dynticks:...
736
737
738
739
740
  	/*
  	 * Expired timer available, let it expire in the next tick
  	 */
  	if (hr_delta.tv64 <= 0)
  		return now + 1;
69239749e   Tony Lindgren   [PATCH] fix next_...
741

1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
742
  	tsdelta = ktime_to_timespec(hr_delta);
9501b6cf5   Thomas Gleixner   [PATCH] dynticks:...
743
  	delta = timespec_to_jiffies(&tsdelta);
eaad084bb   Thomas Gleixner   NOHZ: prevent mul...
744
745
746
747
748
749
750
  
  	/*
  	 * Limit the delta to the max value, which is checked in
  	 * tick_nohz_stop_sched_tick():
  	 */
  	if (delta > NEXT_TIMER_MAX_DELTA)
  		delta = NEXT_TIMER_MAX_DELTA;
9501b6cf5   Thomas Gleixner   [PATCH] dynticks:...
751
752
753
754
755
756
757
758
759
  	/*
  	 * Take rounding errors in to account and make sure, that it
  	 * expires in the next tick. Otherwise we go into an endless
  	 * ping pong due to tick_nohz_stop_sched_tick() retriggering
  	 * the timer softirq
  	 */
  	if (delta < 1)
  		delta = 1;
  	now += delta;
1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
760
761
  	if (time_before(now, expires))
  		return now;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
762
763
  	return expires;
  }
1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
764
765
766
  
  /**
   * next_timer_interrupt - return the jiffy of the next pending timer
05fb6bf0b   Randy Dunlap   [PATCH] kernel-do...
767
   * @now: current time (in jiffies)
1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
768
   */
fd064b9b7   Thomas Gleixner   [PATCH] Extend ne...
769
  unsigned long get_next_timer_interrupt(unsigned long now)
1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
770
771
  {
  	tvec_base_t *base = __get_cpu_var(tvec_bases);
fd064b9b7   Thomas Gleixner   [PATCH] Extend ne...
772
  	unsigned long expires;
1cfd68496   Thomas Gleixner   [PATCH] Fix casca...
773
774
775
776
777
778
779
780
781
782
  
  	spin_lock(&base->lock);
  	expires = __next_timer_interrupt(base);
  	spin_unlock(&base->lock);
  
  	if (time_before_eq(expires, now))
  		return now;
  
  	return cmp_next_hrtimer_event(now, expires);
  }
fd064b9b7   Thomas Gleixner   [PATCH] Extend ne...
783
784
785
786
787
788
789
  
  #ifdef CONFIG_NO_IDLE_HZ
  unsigned long next_timer_interrupt(void)
  {
  	return get_next_timer_interrupt(jiffies);
  }
  #endif
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
790
  #endif
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
  /*
   * Called from the timer interrupt handler to charge one tick to the current 
   * process.  user_tick is 1 if the tick is user time, 0 for system.
   */
  void update_process_times(int user_tick)
  {
  	struct task_struct *p = current;
  	int cpu = smp_processor_id();
  
  	/* Note: this timer irq context must be accounted for as well. */
  	if (user_tick)
  		account_user_time(p, jiffies_to_cputime(1));
  	else
  		account_system_time(p, HARDIRQ_OFFSET, jiffies_to_cputime(1));
  	run_local_timers();
  	if (rcu_pending(cpu))
  		rcu_check_callbacks(cpu, user_tick);
  	scheduler_tick();
6819457d2   Thomas Gleixner   timer.c: cleanup ...
809
  	run_posix_cpu_timers(p);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
810
811
812
813
814
815
816
  }
  
  /*
   * Nr of active tasks - counted in fixed-point numbers
   */
  static unsigned long count_active_tasks(void)
  {
db1b1fefc   Jack Steiner   [PATCH] sched: re...
817
  	return nr_active() * FIXED_1;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
  }
  
  /*
   * Hmm.. Changed this, as the GNU make sources (load.c) seems to
   * imply that avenrun[] is the standard name for this kind of thing.
   * Nothing else seems to be standardized: the fractional size etc
   * all seem to differ on different machines.
   *
   * Requires xtime_lock to access.
   */
  unsigned long avenrun[3];
  
  EXPORT_SYMBOL(avenrun);
  
  /*
   * calc_load - given tick count, update the avenrun load estimates.
   * This is called while holding a write_lock on xtime_lock.
   */
  static inline void calc_load(unsigned long ticks)
  {
  	unsigned long active_tasks; /* fixed-point */
  	static int count = LOAD_FREQ;
cd7175edf   Eric Dumazet   [PATCH] Optimize ...
840
841
842
843
844
845
846
847
848
  	count -= ticks;
  	if (unlikely(count < 0)) {
  		active_tasks = count_active_tasks();
  		do {
  			CALC_LOAD(avenrun[0], EXP_1, active_tasks);
  			CALC_LOAD(avenrun[1], EXP_5, active_tasks);
  			CALC_LOAD(avenrun[2], EXP_15, active_tasks);
  			count += LOAD_FREQ;
  		} while (count < 0);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
849
850
  	}
  }
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
851
  /*
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
852
853
854
855
   * This function runs timers and the timer-tq in bottom half context.
   */
  static void run_timer_softirq(struct softirq_action *h)
  {
a4a6198b8   Jan Beulich   [PATCH] tvec_base...
856
  	tvec_base_t *base = __get_cpu_var(tvec_bases);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
857

82f67cd9f   Ingo Molnar   [PATCH] Add debug...
858
  	hrtimer_run_queues();
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
859
860
861
862
863
864
865
866
867
868
  	if (time_after_eq(jiffies, base->timer_jiffies))
  		__run_timers(base);
  }
  
  /*
   * Called by the local, per-CPU timer interrupt on SMP.
   */
  void run_local_timers(void)
  {
  	raise_softirq(TIMER_SOFTIRQ);
6687a97d4   Ingo Molnar   [PATCH] timer-irq...
869
  	softlockup_tick();
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
870
871
872
873
874
875
  }
  
  /*
   * Called by the timer interrupt. xtime_lock must already be taken
   * by the timer IRQ!
   */
3171a0305   Atsushi Nemoto   [PATCH] simplify ...
876
  static inline void update_times(unsigned long ticks)
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
877
  {
ad596171e   John Stultz   [PATCH] Time: Use...
878
  	update_wall_time();
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
879
880
  	calc_load(ticks);
  }
6819457d2   Thomas Gleixner   timer.c: cleanup ...
881

1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
882
883
884
885
886
  /*
   * The 64-bit jiffies value is not atomic - you MUST NOT read it
   * without sampling the sequence number in xtime_lock.
   * jiffies is defined in the linker script...
   */
3171a0305   Atsushi Nemoto   [PATCH] simplify ...
887
  void do_timer(unsigned long ticks)
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
888
  {
3171a0305   Atsushi Nemoto   [PATCH] simplify ...
889
890
  	jiffies_64 += ticks;
  	update_times(ticks);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
891
892
893
894
895
896
897
898
899
900
  }
  
  #ifdef __ARCH_WANT_SYS_ALARM
  
  /*
   * For backwards compatibility?  This can be done in libc so Alpha
   * and all newer ports shouldn't need it.
   */
  asmlinkage unsigned long sys_alarm(unsigned int seconds)
  {
c08b8a491   Thomas Gleixner   [PATCH] sys_alarm...
901
  	return alarm_setitimer(seconds);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
  }
  
  #endif
  
  #ifndef __alpha__
  
  /*
   * The Alpha uses getxpid, getxuid, and getxgid instead.  Maybe this
   * should be moved into arch/i386 instead?
   */
  
  /**
   * sys_getpid - return the thread group id of the current process
   *
   * Note, despite the name, this returns the tgid not the pid.  The tgid and
   * the pid are identical unless CLONE_THREAD was specified on clone() in
   * which case the tgid is the same in all threads of the same group.
   *
   * This is SMP safe as current->tgid does not change.
   */
  asmlinkage long sys_getpid(void)
  {
  	return current->tgid;
  }
  
  /*
6997a6faa   Kirill Korotaev   [PATCH] sys_getpp...
928
929
930
931
   * Accessing ->real_parent is not SMP-safe, it could
   * change from under us. However, we can use a stale
   * value of ->real_parent under rcu_read_lock(), see
   * release_task()->call_rcu(delayed_put_task_struct).
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
932
933
934
935
   */
  asmlinkage long sys_getppid(void)
  {
  	int pid;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
936

6997a6faa   Kirill Korotaev   [PATCH] sys_getpp...
937
938
939
  	rcu_read_lock();
  	pid = rcu_dereference(current->real_parent)->tgid;
  	rcu_read_unlock();
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
940

1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
  	return pid;
  }
  
  asmlinkage long sys_getuid(void)
  {
  	/* Only we change this so SMP safe */
  	return current->uid;
  }
  
  asmlinkage long sys_geteuid(void)
  {
  	/* Only we change this so SMP safe */
  	return current->euid;
  }
  
  asmlinkage long sys_getgid(void)
  {
  	/* Only we change this so SMP safe */
  	return current->gid;
  }
  
  asmlinkage long sys_getegid(void)
  {
  	/* Only we change this so SMP safe */
  	return  current->egid;
  }
  
  #endif
  
  static void process_timeout(unsigned long __data)
  {
36c8b5868   Ingo Molnar   [PATCH] sched: cl...
972
  	wake_up_process((struct task_struct *)__data);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025
  }
  
  /**
   * schedule_timeout - sleep until timeout
   * @timeout: timeout value in jiffies
   *
   * Make the current task sleep until @timeout jiffies have
   * elapsed. The routine will return immediately unless
   * the current task state has been set (see set_current_state()).
   *
   * You can set the task state as follows -
   *
   * %TASK_UNINTERRUPTIBLE - at least @timeout jiffies are guaranteed to
   * pass before the routine returns. The routine will return 0
   *
   * %TASK_INTERRUPTIBLE - the routine may return early if a signal is
   * delivered to the current task. In this case the remaining time
   * in jiffies will be returned, or 0 if the timer expired in time
   *
   * The current task state is guaranteed to be TASK_RUNNING when this
   * routine returns.
   *
   * Specifying a @timeout value of %MAX_SCHEDULE_TIMEOUT will schedule
   * the CPU away without a bound on the timeout. In this case the return
   * value will be %MAX_SCHEDULE_TIMEOUT.
   *
   * In all cases the return value is guaranteed to be non-negative.
   */
  fastcall signed long __sched schedule_timeout(signed long timeout)
  {
  	struct timer_list timer;
  	unsigned long expire;
  
  	switch (timeout)
  	{
  	case MAX_SCHEDULE_TIMEOUT:
  		/*
  		 * These two special cases are useful to be comfortable
  		 * in the caller. Nothing more. We could take
  		 * MAX_SCHEDULE_TIMEOUT from one of the negative value
  		 * but I' d like to return a valid offset (>=0) to allow
  		 * the caller to do everything it want with the retval.
  		 */
  		schedule();
  		goto out;
  	default:
  		/*
  		 * Another bit of PARANOID. Note that the retval will be
  		 * 0 since no piece of kernel is supposed to do a check
  		 * for a negative retval of schedule_timeout() (since it
  		 * should never happens anyway). You just have the printk()
  		 * that will tell you if something is gone wrong and where.
  		 */
5b149bcc2   Andrew Morton   [PATCH] schedule_...
1026
  		if (timeout < 0) {
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1027
  			printk(KERN_ERR "schedule_timeout: wrong timeout "
5b149bcc2   Andrew Morton   [PATCH] schedule_...
1028
1029
1030
  				"value %lx
  ", timeout);
  			dump_stack();
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1031
1032
1033
1034
1035
1036
  			current->state = TASK_RUNNING;
  			goto out;
  		}
  	}
  
  	expire = timeout + jiffies;
a8db2db1e   Oleg Nesterov   [PATCH] introduce...
1037
1038
  	setup_timer(&timer, process_timeout, (unsigned long)current);
  	__mod_timer(&timer, expire);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1039
1040
1041
1042
1043
1044
1045
1046
  	schedule();
  	del_singleshot_timer_sync(&timer);
  
  	timeout = expire - jiffies;
  
   out:
  	return timeout < 0 ? 0 : timeout;
  }
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1047
  EXPORT_SYMBOL(schedule_timeout);
8a1c17574   Andrew Morton   [PATCH] schedule_...
1048
1049
1050
1051
  /*
   * We can use __set_current_state() here because schedule_timeout() calls
   * schedule() unconditionally.
   */
64ed93a26   Nishanth Aravamudan   [PATCH] add sched...
1052
1053
  signed long __sched schedule_timeout_interruptible(signed long timeout)
  {
a5a0d52c7   Andrew Morton   [PATCH] ntp white...
1054
1055
  	__set_current_state(TASK_INTERRUPTIBLE);
  	return schedule_timeout(timeout);
64ed93a26   Nishanth Aravamudan   [PATCH] add sched...
1056
1057
1058
1059
1060
  }
  EXPORT_SYMBOL(schedule_timeout_interruptible);
  
  signed long __sched schedule_timeout_uninterruptible(signed long timeout)
  {
a5a0d52c7   Andrew Morton   [PATCH] ntp white...
1061
1062
  	__set_current_state(TASK_UNINTERRUPTIBLE);
  	return schedule_timeout(timeout);
64ed93a26   Nishanth Aravamudan   [PATCH] add sched...
1063
1064
  }
  EXPORT_SYMBOL(schedule_timeout_uninterruptible);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1065
1066
1067
1068
1069
  /* Thread ID - the internal kernel "pid" */
  asmlinkage long sys_gettid(void)
  {
  	return current->pid;
  }
2aae4a108   Rolf Eike Beer   [PATCH] Fix kerne...
1070
  /**
d4d23add3   Kyle McMartin   [PATCH] Common co...
1071
   * do_sysinfo - fill in sysinfo struct
2aae4a108   Rolf Eike Beer   [PATCH] Fix kerne...
1072
   * @info: pointer to buffer to fill
6819457d2   Thomas Gleixner   timer.c: cleanup ...
1073
   */
d4d23add3   Kyle McMartin   [PATCH] Common co...
1074
  int do_sysinfo(struct sysinfo *info)
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1075
  {
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1076
1077
1078
  	unsigned long mem_total, sav_total;
  	unsigned int mem_unit, bitcount;
  	unsigned long seq;
d4d23add3   Kyle McMartin   [PATCH] Common co...
1079
  	memset(info, 0, sizeof(struct sysinfo));
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089
1090
1091
1092
1093
1094
  
  	do {
  		struct timespec tp;
  		seq = read_seqbegin(&xtime_lock);
  
  		/*
  		 * This is annoying.  The below is the same thing
  		 * posix_get_clock_monotonic() does, but it wants to
  		 * take the lock which we want to cover the loads stuff
  		 * too.
  		 */
  
  		getnstimeofday(&tp);
  		tp.tv_sec += wall_to_monotonic.tv_sec;
  		tp.tv_nsec += wall_to_monotonic.tv_nsec;
d62141414   Tomas Janousek   Use boot based ti...
1095
  		monotonic_to_bootbased(&tp);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1096
1097
1098
1099
  		if (tp.tv_nsec - NSEC_PER_SEC >= 0) {
  			tp.tv_nsec = tp.tv_nsec - NSEC_PER_SEC;
  			tp.tv_sec++;
  		}
d4d23add3   Kyle McMartin   [PATCH] Common co...
1100
  		info->uptime = tp.tv_sec + (tp.tv_nsec ? 1 : 0);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1101

d4d23add3   Kyle McMartin   [PATCH] Common co...
1102
1103
1104
  		info->loads[0] = avenrun[0] << (SI_LOAD_SHIFT - FSHIFT);
  		info->loads[1] = avenrun[1] << (SI_LOAD_SHIFT - FSHIFT);
  		info->loads[2] = avenrun[2] << (SI_LOAD_SHIFT - FSHIFT);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1105

d4d23add3   Kyle McMartin   [PATCH] Common co...
1106
  		info->procs = nr_threads;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1107
  	} while (read_seqretry(&xtime_lock, seq));
d4d23add3   Kyle McMartin   [PATCH] Common co...
1108
1109
  	si_meminfo(info);
  	si_swapinfo(info);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1110
1111
1112
1113
1114
1115
1116
1117
1118
  
  	/*
  	 * If the sum of all the available memory (i.e. ram + swap)
  	 * is less than can be stored in a 32 bit unsigned long then
  	 * we can be binary compatible with 2.2.x kernels.  If not,
  	 * well, in that case 2.2.x was broken anyways...
  	 *
  	 *  -Erik Andersen <andersee@debian.org>
  	 */
d4d23add3   Kyle McMartin   [PATCH] Common co...
1119
1120
  	mem_total = info->totalram + info->totalswap;
  	if (mem_total < info->totalram || mem_total < info->totalswap)
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1121
1122
  		goto out;
  	bitcount = 0;
d4d23add3   Kyle McMartin   [PATCH] Common co...
1123
  	mem_unit = info->mem_unit;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1124
1125
1126
1127
1128
1129
1130
1131
1132
1133
1134
  	while (mem_unit > 1) {
  		bitcount++;
  		mem_unit >>= 1;
  		sav_total = mem_total;
  		mem_total <<= 1;
  		if (mem_total < sav_total)
  			goto out;
  	}
  
  	/*
  	 * If mem_total did not overflow, multiply all memory values by
d4d23add3   Kyle McMartin   [PATCH] Common co...
1135
  	 * info->mem_unit and set it to 1.  This leaves things compatible
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1136
1137
1138
  	 * with 2.2.x, and also retains compatibility with earlier 2.4.x
  	 * kernels...
  	 */
d4d23add3   Kyle McMartin   [PATCH] Common co...
1139
1140
1141
1142
1143
1144
1145
1146
1147
1148
1149
1150
1151
1152
1153
1154
1155
1156
1157
  	info->mem_unit = 1;
  	info->totalram <<= bitcount;
  	info->freeram <<= bitcount;
  	info->sharedram <<= bitcount;
  	info->bufferram <<= bitcount;
  	info->totalswap <<= bitcount;
  	info->freeswap <<= bitcount;
  	info->totalhigh <<= bitcount;
  	info->freehigh <<= bitcount;
  
  out:
  	return 0;
  }
  
  asmlinkage long sys_sysinfo(struct sysinfo __user *info)
  {
  	struct sysinfo val;
  
  	do_sysinfo(&val);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1158

1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1159
1160
1161
1162
1163
  	if (copy_to_user(info, &val, sizeof(struct sysinfo)))
  		return -EFAULT;
  
  	return 0;
  }
d730e882a   Ingo Molnar   [PATCH] lockdep: ...
1164
1165
1166
1167
1168
1169
  /*
   * lockdep: we want to track each per-CPU base as a separate lock-class,
   * but timer-bases are kmalloc()-ed, so we need to attach separate
   * keys to them:
   */
  static struct lock_class_key base_lock_keys[NR_CPUS];
a4a6198b8   Jan Beulich   [PATCH] tvec_base...
1170
  static int __devinit init_timers_cpu(int cpu)
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1171
1172
1173
  {
  	int j;
  	tvec_base_t *base;
ba6edfcd1   Andrew Morton   [PATCH] timer ini...
1174
  	static char __devinitdata tvec_base_done[NR_CPUS];
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
1175

ba6edfcd1   Andrew Morton   [PATCH] timer ini...
1176
  	if (!tvec_base_done[cpu]) {
a4a6198b8   Jan Beulich   [PATCH] tvec_base...
1177
  		static char boot_done;
a4a6198b8   Jan Beulich   [PATCH] tvec_base...
1178
  		if (boot_done) {
ba6edfcd1   Andrew Morton   [PATCH] timer ini...
1179
1180
1181
  			/*
  			 * The APs use this path later in boot
  			 */
94f6030ca   Christoph Lameter   Slab allocators: ...
1182
1183
  			base = kmalloc_node(sizeof(*base),
  						GFP_KERNEL | __GFP_ZERO,
a4a6198b8   Jan Beulich   [PATCH] tvec_base...
1184
1185
1186
  						cpu_to_node(cpu));
  			if (!base)
  				return -ENOMEM;
6e453a675   Venki Pallipadi   Add support for d...
1187
1188
1189
1190
1191
1192
1193
  
  			/* Make sure that tvec_base is 2 byte aligned */
  			if (tbase_get_deferrable(base)) {
  				WARN_ON(1);
  				kfree(base);
  				return -ENOMEM;
  			}
ba6edfcd1   Andrew Morton   [PATCH] timer ini...
1194
  			per_cpu(tvec_bases, cpu) = base;
a4a6198b8   Jan Beulich   [PATCH] tvec_base...
1195
  		} else {
ba6edfcd1   Andrew Morton   [PATCH] timer ini...
1196
1197
1198
1199
1200
1201
  			/*
  			 * This is for the boot CPU - we use compile-time
  			 * static initialisation because per-cpu memory isn't
  			 * ready yet and because the memory allocators are not
  			 * initialised either.
  			 */
a4a6198b8   Jan Beulich   [PATCH] tvec_base...
1202
  			boot_done = 1;
ba6edfcd1   Andrew Morton   [PATCH] timer ini...
1203
  			base = &boot_tvec_bases;
a4a6198b8   Jan Beulich   [PATCH] tvec_base...
1204
  		}
ba6edfcd1   Andrew Morton   [PATCH] timer ini...
1205
1206
1207
  		tvec_base_done[cpu] = 1;
  	} else {
  		base = per_cpu(tvec_bases, cpu);
a4a6198b8   Jan Beulich   [PATCH] tvec_base...
1208
  	}
ba6edfcd1   Andrew Morton   [PATCH] timer ini...
1209

3691c5199   Oleg Nesterov   [PATCH] kill __in...
1210
  	spin_lock_init(&base->lock);
d730e882a   Ingo Molnar   [PATCH] lockdep: ...
1211
  	lockdep_set_class(&base->lock, base_lock_keys + cpu);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1212
1213
1214
1215
1216
1217
1218
1219
1220
1221
  	for (j = 0; j < TVN_SIZE; j++) {
  		INIT_LIST_HEAD(base->tv5.vec + j);
  		INIT_LIST_HEAD(base->tv4.vec + j);
  		INIT_LIST_HEAD(base->tv3.vec + j);
  		INIT_LIST_HEAD(base->tv2.vec + j);
  	}
  	for (j = 0; j < TVR_SIZE; j++)
  		INIT_LIST_HEAD(base->tv1.vec + j);
  
  	base->timer_jiffies = jiffies;
a4a6198b8   Jan Beulich   [PATCH] tvec_base...
1222
  	return 0;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1223
1224
1225
  }
  
  #ifdef CONFIG_HOTPLUG_CPU
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
1226
  static void migrate_timer_list(tvec_base_t *new_base, struct list_head *head)
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1227
1228
1229
1230
  {
  	struct timer_list *timer;
  
  	while (!list_empty(head)) {
b5e618181   Pavel Emelianov   Introduce a handy...
1231
  		timer = list_first_entry(head, struct timer_list, entry);
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
1232
  		detach_timer(timer, 0);
6e453a675   Venki Pallipadi   Add support for d...
1233
  		timer_set_base(timer, new_base);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1234
  		internal_add_timer(new_base, timer);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1235
  	}
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1236
1237
1238
1239
1240
1241
1242
1243
1244
  }
  
  static void __devinit migrate_timers(int cpu)
  {
  	tvec_base_t *old_base;
  	tvec_base_t *new_base;
  	int i;
  
  	BUG_ON(cpu_online(cpu));
a4a6198b8   Jan Beulich   [PATCH] tvec_base...
1245
1246
  	old_base = per_cpu(tvec_bases, cpu);
  	new_base = get_cpu_var(tvec_bases);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1247
1248
  
  	local_irq_disable();
e81ce1f7e   Heiko Carstens   [PATCH] timer/hrt...
1249
1250
  	double_spin_lock(&new_base->lock, &old_base->lock,
  			 smp_processor_id() < cpu);
3691c5199   Oleg Nesterov   [PATCH] kill __in...
1251
1252
  
  	BUG_ON(old_base->running_timer);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1253

1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1254
  	for (i = 0; i < TVR_SIZE; i++)
55c888d6d   Oleg Nesterov   [PATCH] timers fi...
1255
1256
1257
1258
1259
1260
1261
  		migrate_timer_list(new_base, old_base->tv1.vec + i);
  	for (i = 0; i < TVN_SIZE; i++) {
  		migrate_timer_list(new_base, old_base->tv2.vec + i);
  		migrate_timer_list(new_base, old_base->tv3.vec + i);
  		migrate_timer_list(new_base, old_base->tv4.vec + i);
  		migrate_timer_list(new_base, old_base->tv5.vec + i);
  	}
e81ce1f7e   Heiko Carstens   [PATCH] timer/hrt...
1262
1263
  	double_spin_unlock(&new_base->lock, &old_base->lock,
  			   smp_processor_id() < cpu);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1264
1265
  	local_irq_enable();
  	put_cpu_var(tvec_bases);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1266
1267
  }
  #endif /* CONFIG_HOTPLUG_CPU */
8c78f3075   Chandra Seetharaman   [PATCH] cpu hotpl...
1268
  static int __cpuinit timer_cpu_notify(struct notifier_block *self,
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1269
1270
1271
1272
1273
  				unsigned long action, void *hcpu)
  {
  	long cpu = (long)hcpu;
  	switch(action) {
  	case CPU_UP_PREPARE:
8bb784428   Rafael J. Wysocki   Add suspend-relat...
1274
  	case CPU_UP_PREPARE_FROZEN:
a4a6198b8   Jan Beulich   [PATCH] tvec_base...
1275
1276
  		if (init_timers_cpu(cpu) < 0)
  			return NOTIFY_BAD;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1277
1278
1279
  		break;
  #ifdef CONFIG_HOTPLUG_CPU
  	case CPU_DEAD:
8bb784428   Rafael J. Wysocki   Add suspend-relat...
1280
  	case CPU_DEAD_FROZEN:
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1281
1282
1283
1284
1285
1286
1287
1288
  		migrate_timers(cpu);
  		break;
  #endif
  	default:
  		break;
  	}
  	return NOTIFY_OK;
  }
8c78f3075   Chandra Seetharaman   [PATCH] cpu hotpl...
1289
  static struct notifier_block __cpuinitdata timers_nb = {
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1290
1291
1292
1293
1294
1295
  	.notifier_call	= timer_cpu_notify,
  };
  
  
  void __init init_timers(void)
  {
07dccf334   Akinobu Mita   [PATCH] check ret...
1296
  	int err = timer_cpu_notify(&timers_nb, (unsigned long)CPU_UP_PREPARE,
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1297
  				(void *)(long)smp_processor_id());
07dccf334   Akinobu Mita   [PATCH] check ret...
1298

82f67cd9f   Ingo Molnar   [PATCH] Add debug...
1299
  	init_timer_stats();
07dccf334   Akinobu Mita   [PATCH] check ret...
1300
  	BUG_ON(err == NOTIFY_BAD);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1301
1302
1303
1304
1305
  	register_cpu_notifier(&timers_nb);
  	open_softirq(TIMER_SOFTIRQ, run_timer_softirq, NULL);
  }
  
  #ifdef CONFIG_TIME_INTERPOLATION
67890d708   Christoph Lameter   [PATCH] time_inte...
1306
1307
  struct time_interpolator *time_interpolator __read_mostly;
  static struct time_interpolator *time_interpolator_list __read_mostly;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1308
  static DEFINE_SPINLOCK(time_interpolator_lock);
3db5db4fc   Helge Deller   [PATCH] use cycle...
1309
  static inline cycles_t time_interpolator_get_cycles(unsigned int src)
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1310
1311
1312
1313
1314
1315
1316
1317
1318
1319
  {
  	unsigned long (*x)(void);
  
  	switch (src)
  	{
  		case TIME_SOURCE_FUNCTION:
  			x = time_interpolator->addr;
  			return x();
  
  		case TIME_SOURCE_MMIO64	:
685db65e4   Christoph Lameter   [PATCH] time_inte...
1320
  			return readq_relaxed((void __iomem *)time_interpolator->addr);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1321
1322
  
  		case TIME_SOURCE_MMIO32	:
685db65e4   Christoph Lameter   [PATCH] time_inte...
1323
  			return readl_relaxed((void __iomem *)time_interpolator->addr);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1324
1325
1326
1327
  
  		default: return get_cycles();
  	}
  }
486d46aef   Alex Williamson   [PATCH] optimize ...
1328
  static inline u64 time_interpolator_get_counter(int writelock)
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1329
1330
1331
1332
1333
  {
  	unsigned int src = time_interpolator->source;
  
  	if (time_interpolator->jitter)
  	{
3db5db4fc   Helge Deller   [PATCH] use cycle...
1334
1335
  		cycles_t lcycle;
  		cycles_t now;
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1336
1337
1338
1339
1340
1341
  
  		do {
  			lcycle = time_interpolator->last_cycle;
  			now = time_interpolator_get_cycles(src);
  			if (lcycle && time_after(lcycle, now))
  				return lcycle;
486d46aef   Alex Williamson   [PATCH] optimize ...
1342
1343
1344
1345
1346
1347
1348
1349
1350
  
  			/* When holding the xtime write lock, there's no need
  			 * to add the overhead of the cmpxchg.  Readers are
  			 * force to retry until the write lock is released.
  			 */
  			if (writelock) {
  				time_interpolator->last_cycle = now;
  				return now;
  			}
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1351
1352
1353
1354
1355
1356
1357
1358
1359
1360
1361
1362
1363
  			/* Keep track of the last timer value returned. The use of cmpxchg here
  			 * will cause contention in an SMP environment.
  			 */
  		} while (unlikely(cmpxchg(&time_interpolator->last_cycle, lcycle, now) != lcycle));
  		return now;
  	}
  	else
  		return time_interpolator_get_cycles(src);
  }
  
  void time_interpolator_reset(void)
  {
  	time_interpolator->offset = 0;
486d46aef   Alex Williamson   [PATCH] optimize ...
1364
  	time_interpolator->last_counter = time_interpolator_get_counter(1);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1365
1366
1367
1368
1369
1370
1371
1372
1373
1374
1375
  }
  
  #define GET_TI_NSECS(count,i) (((((count) - i->last_counter) & (i)->mask) * (i)->nsec_per_cyc) >> (i)->shift)
  
  unsigned long time_interpolator_get_offset(void)
  {
  	/* If we do not have a time interpolator set up then just return zero */
  	if (!time_interpolator)
  		return 0;
  
  	return time_interpolator->offset +
486d46aef   Alex Williamson   [PATCH] optimize ...
1376
  		GET_TI_NSECS(time_interpolator_get_counter(0), time_interpolator);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1377
1378
1379
1380
  }
  
  #define INTERPOLATOR_ADJUST 65536
  #define INTERPOLATOR_MAX_SKIP 10*INTERPOLATOR_ADJUST
4c7ee8de9   John Stultz   [PATCH] NTP: Move...
1381
  void time_interpolator_update(long delta_nsec)
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1382
1383
1384
1385
1386
1387
1388
  {
  	u64 counter;
  	unsigned long offset;
  
  	/* If there is no time interpolator set up then do nothing */
  	if (!time_interpolator)
  		return;
a5a0d52c7   Andrew Morton   [PATCH] ntp white...
1389
1390
1391
1392
1393
1394
1395
1396
  	/*
  	 * The interpolator compensates for late ticks by accumulating the late
  	 * time in time_interpolator->offset. A tick earlier than expected will
  	 * lead to a reset of the offset and a corresponding jump of the clock
  	 * forward. Again this only works if the interpolator clock is running
  	 * slightly slower than the regular clock and the tuning logic insures
  	 * that.
  	 */
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1397

486d46aef   Alex Williamson   [PATCH] optimize ...
1398
  	counter = time_interpolator_get_counter(1);
a5a0d52c7   Andrew Morton   [PATCH] ntp white...
1399
1400
  	offset = time_interpolator->offset +
  			GET_TI_NSECS(counter, time_interpolator);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1401
1402
1403
1404
1405
1406
1407
1408
1409
1410
1411
1412
1413
1414
1415
1416
  
  	if (delta_nsec < 0 || (unsigned long) delta_nsec < offset)
  		time_interpolator->offset = offset - delta_nsec;
  	else {
  		time_interpolator->skips++;
  		time_interpolator->ns_skipped += delta_nsec - offset;
  		time_interpolator->offset = 0;
  	}
  	time_interpolator->last_counter = counter;
  
  	/* Tuning logic for time interpolator invoked every minute or so.
  	 * Decrease interpolator clock speed if no skips occurred and an offset is carried.
  	 * Increase interpolator clock speed if we skip too much time.
  	 */
  	if (jiffies % INTERPOLATOR_ADJUST == 0)
  	{
b20367a6c   Jordan Hargrave   [PATCH] x86_64: F...
1417
  		if (time_interpolator->skips == 0 && time_interpolator->offset > tick_nsec)
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433
1434
1435
1436
1437
1438
1439
1440
  			time_interpolator->nsec_per_cyc--;
  		if (time_interpolator->ns_skipped > INTERPOLATOR_MAX_SKIP && time_interpolator->offset == 0)
  			time_interpolator->nsec_per_cyc++;
  		time_interpolator->skips = 0;
  		time_interpolator->ns_skipped = 0;
  	}
  }
  
  static inline int
  is_better_time_interpolator(struct time_interpolator *new)
  {
  	if (!time_interpolator)
  		return 1;
  	return new->frequency > 2*time_interpolator->frequency ||
  	    (unsigned long)new->drift < (unsigned long)time_interpolator->drift;
  }
  
  void
  register_time_interpolator(struct time_interpolator *ti)
  {
  	unsigned long flags;
  
  	/* Sanity check */
9f31252cb   Eric Sesterhenn   BUG_ON() Conversi...
1441
  	BUG_ON(ti->frequency == 0 || ti->mask == 0);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1442
1443
1444
1445
1446
1447
1448
1449
1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462
1463
1464
1465
1466
1467
1468
1469
1470
1471
1472
1473
1474
1475
1476
1477
1478
1479
1480
1481
1482
1483
1484
1485
1486
1487
1488
1489
1490
1491
1492
1493
1494
  
  	ti->nsec_per_cyc = ((u64)NSEC_PER_SEC << ti->shift) / ti->frequency;
  	spin_lock(&time_interpolator_lock);
  	write_seqlock_irqsave(&xtime_lock, flags);
  	if (is_better_time_interpolator(ti)) {
  		time_interpolator = ti;
  		time_interpolator_reset();
  	}
  	write_sequnlock_irqrestore(&xtime_lock, flags);
  
  	ti->next = time_interpolator_list;
  	time_interpolator_list = ti;
  	spin_unlock(&time_interpolator_lock);
  }
  
  void
  unregister_time_interpolator(struct time_interpolator *ti)
  {
  	struct time_interpolator *curr, **prev;
  	unsigned long flags;
  
  	spin_lock(&time_interpolator_lock);
  	prev = &time_interpolator_list;
  	for (curr = *prev; curr; curr = curr->next) {
  		if (curr == ti) {
  			*prev = curr->next;
  			break;
  		}
  		prev = &curr->next;
  	}
  
  	write_seqlock_irqsave(&xtime_lock, flags);
  	if (ti == time_interpolator) {
  		/* we lost the best time-interpolator: */
  		time_interpolator = NULL;
  		/* find the next-best interpolator */
  		for (curr = time_interpolator_list; curr; curr = curr->next)
  			if (is_better_time_interpolator(curr))
  				time_interpolator = curr;
  		time_interpolator_reset();
  	}
  	write_sequnlock_irqrestore(&xtime_lock, flags);
  	spin_unlock(&time_interpolator_lock);
  }
  #endif /* CONFIG_TIME_INTERPOLATION */
  
  /**
   * msleep - sleep safely even with waitqueue interruptions
   * @msecs: Time in milliseconds to sleep for
   */
  void msleep(unsigned int msecs)
  {
  	unsigned long timeout = msecs_to_jiffies(msecs) + 1;
75bcc8c5e   Nishanth Aravamudan   [PATCH] kernel: f...
1495
1496
  	while (timeout)
  		timeout = schedule_timeout_uninterruptible(timeout);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1497
1498
1499
1500
1501
  }
  
  EXPORT_SYMBOL(msleep);
  
  /**
96ec3efdc   Domen Puncer   [PATCH] kernel/ti...
1502
   * msleep_interruptible - sleep waiting for signals
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1503
1504
1505
1506
1507
   * @msecs: Time in milliseconds to sleep for
   */
  unsigned long msleep_interruptible(unsigned int msecs)
  {
  	unsigned long timeout = msecs_to_jiffies(msecs) + 1;
75bcc8c5e   Nishanth Aravamudan   [PATCH] kernel: f...
1508
1509
  	while (timeout && !signal_pending(current))
  		timeout = schedule_timeout_interruptible(timeout);
1da177e4c   Linus Torvalds   Linux-2.6.12-rc2
1510
1511
1512
1513
  	return jiffies_to_msecs(timeout);
  }
  
  EXPORT_SYMBOL(msleep_interruptible);