time.c 12.3 KB
Newer Older
Linus Torvalds's avatar
Linus Torvalds committed
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
/*
 * linux/arch/ia64/kernel/time.c
 *
 * Copyright (C) 1998-2003 Hewlett-Packard Co
 *	Stephane Eranian <eranian@hpl.hp.com>
 *	David Mosberger <davidm@hpl.hp.com>
 * Copyright (C) 1999 Don Dugger <don.dugger@intel.com>
 * Copyright (C) 1999-2000 VA Linux Systems
 * Copyright (C) 1999-2000 Walt Drummond <drummond@valinux.com>
 */

#include <linux/cpu.h>
#include <linux/init.h>
#include <linux/kernel.h>
#include <linux/module.h>
#include <linux/profile.h>
#include <linux/sched.h>
#include <linux/time.h>
#include <linux/interrupt.h>
#include <linux/efi.h>
#include <linux/timex.h>
22
#include <linux/timekeeper_internal.h>
23
#include <linux/platform_device.h>
Linus Torvalds's avatar
Linus Torvalds committed
24
25
26
27

#include <asm/machvec.h>
#include <asm/delay.h>
#include <asm/hw_irq.h>
28
#include <asm/paravirt.h>
Linus Torvalds's avatar
Linus Torvalds committed
29
30
31
32
#include <asm/ptrace.h>
#include <asm/sal.h>
#include <asm/sections.h>

33
34
#include "fsyscall_gtod_data.h"

35
static cycle_t itc_get_cycles(struct clocksource *cs);
36

37
struct fsyscall_gtod_data_t fsyscall_gtod_data;
38
39
40

struct itc_jitter_data_t itc_jitter_data;

Ashok Raj's avatar
Ashok Raj committed
41
volatile int time_keeper_id = 0; /* smp_processor_id() of time-keeper */
Linus Torvalds's avatar
Linus Torvalds committed
42
43
44
45
46
47
48
49

#ifdef CONFIG_IA64_DEBUG_IRQ

unsigned long last_cli_ip;
EXPORT_SYMBOL(last_cli_ip);

#endif

50
51
52
53
54
55
56
57
58
#ifdef CONFIG_PARAVIRT
/* We need to define a real function for sched_clock, to override the
   weak default version */
unsigned long long sched_clock(void)
{
        return paravirt_sched_clock();
}
#endif

59
60
#ifdef CONFIG_PARAVIRT
static void
61
paravirt_clocksource_resume(struct clocksource *cs)
62
63
64
65
66
67
{
	if (pv_time_ops.clocksource_resume)
		pv_time_ops.clocksource_resume();
}
#endif

68
static struct clocksource clocksource_itc = {
Li Zefan's avatar
Li Zefan committed
69
70
71
72
73
	.name           = "itc",
	.rating         = 350,
	.read           = itc_get_cycles,
	.mask           = CLOCKSOURCE_MASK(64),
	.flags          = CLOCK_SOURCE_IS_CONTINUOUS,
74
75
76
#ifdef CONFIG_PARAVIRT
	.resume		= paravirt_clocksource_resume,
#endif
Linus Torvalds's avatar
Linus Torvalds committed
77
};
78
static struct clocksource *itc_clocksource;
Linus Torvalds's avatar
Linus Torvalds committed
79

80
#ifdef CONFIG_VIRT_CPU_ACCOUNTING_NATIVE
81
82
83
84
85

#include <linux/kernel_stat.h>

extern cputime_t cycle_to_cputime(u64 cyc);

86
void vtime_account_user(struct task_struct *tsk)
87
88
89
90
91
92
93
94
95
96
97
{
	cputime_t delta_utime;
	struct thread_info *ti = task_thread_info(tsk);

	if (ti->ac_utime) {
		delta_utime = cycle_to_cputime(ti->ac_utime);
		account_user_time(tsk, delta_utime, delta_utime);
		ti->ac_utime = 0;
	}
}

98
99
100
101
102
/*
 * Called from the context switch with interrupts disabled, to charge all
 * accumulated times to the current process, and to prepare accounting on
 * the next process.
 */
103
void arch_vtime_task_switch(struct task_struct *prev)
104
105
{
	struct thread_info *pi = task_thread_info(prev);
106
	struct thread_info *ni = task_thread_info(current);
107

108
	pi->ac_stamp = ni->ac_stamp;
109
110
111
112
113
114
115
	ni->ac_stime = ni->ac_utime = 0;
}

/*
 * Account time for a transition between system, hard irq or soft irq state.
 * Note that this function is called with interrupts enabled.
 */
116
static cputime_t vtime_delta(struct task_struct *tsk)
117
118
119
120
121
{
	struct thread_info *ti = task_thread_info(tsk);
	cputime_t delta_stime;
	__u64 now;

122
123
	WARN_ON_ONCE(!irqs_disabled());

124
125
126
127
128
129
	now = ia64_get_itc();

	delta_stime = cycle_to_cputime(ti->ac_stime + (now - ti->ac_stamp));
	ti->ac_stime = 0;
	ti->ac_stamp = now;

130
131
132
	return delta_stime;
}

133
void vtime_account_system(struct task_struct *tsk)
134
135
136
137
138
{
	cputime_t delta = vtime_delta(tsk);

	account_system_time(tsk, 0, delta, delta);
}
139
EXPORT_SYMBOL_GPL(vtime_account_system);
140

141
void vtime_account_idle(struct task_struct *tsk)
142
143
{
	account_idle_time(vtime_delta(tsk));
144
145
}

146
#endif /* CONFIG_VIRT_CPU_ACCOUNTING_NATIVE */
147

Linus Torvalds's avatar
Linus Torvalds committed
148
static irqreturn_t
149
timer_interrupt (int irq, void *dev_id)
Linus Torvalds's avatar
Linus Torvalds committed
150
151
152
{
	unsigned long new_itm;

153
	if (cpu_is_offline(smp_processor_id())) {
Linus Torvalds's avatar
Linus Torvalds committed
154
155
156
		return IRQ_HANDLED;
	}

157
	platform_timer_interrupt(irq, dev_id);
Linus Torvalds's avatar
Linus Torvalds committed
158
159
160
161
162
163
164

	new_itm = local_cpu_data->itm_next;

	if (!time_after(ia64_get_itc(), new_itm))
		printk(KERN_ERR "Oops: timer tick before it's due (itc=%lx,itm=%lx)\n",
		       ia64_get_itc(), new_itm);

165
	profile_tick(CPU_PROFILING);
Linus Torvalds's avatar
Linus Torvalds committed
166

167
168
169
	if (paravirt_do_steal_accounting(&new_itm))
		goto skip_process_time_accounting;

Linus Torvalds's avatar
Linus Torvalds committed
170
	while (1) {
171
		update_process_times(user_mode(get_irq_regs()));
Linus Torvalds's avatar
Linus Torvalds committed
172
173
174

		new_itm += local_cpu_data->itm_delta;

175
176
177
178
		if (smp_processor_id() == time_keeper_id)
			xtime_update(1);

		local_cpu_data->itm_next = new_itm;
Linus Torvalds's avatar
Linus Torvalds committed
179
180
181

		if (time_after(new_itm, ia64_get_itc()))
			break;
182
183
184
185
186
187

		/*
		 * Allow IPIs to interrupt the timer loop.
		 */
		local_irq_enable();
		local_irq_disable();
Linus Torvalds's avatar
Linus Torvalds committed
188
189
	}

190
191
skip_process_time_accounting:

Linus Torvalds's avatar
Linus Torvalds committed
192
193
194
195
196
197
	do {
		/*
		 * If we're too close to the next clock tick for
		 * comfort, we increase the safety margin by
		 * intentionally dropping the next tick(s).  We do NOT
		 * update itm.next because that would force us to call
198
		 * xtime_update() which in turn would let our clock run
Linus Torvalds's avatar
Linus Torvalds committed
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
		 * too fast (with the potentially devastating effect
		 * of losing monotony of time).
		 */
		while (!time_after(new_itm, ia64_get_itc() + local_cpu_data->itm_delta/2))
			new_itm += local_cpu_data->itm_delta;
		ia64_set_itm(new_itm);
		/* double check, in case we got hit by a (slow) PMI: */
	} while (time_after_eq(ia64_get_itc(), new_itm));
	return IRQ_HANDLED;
}

/*
 * Encapsulate access to the itm structure for SMP.
 */
void
ia64_cpu_local_tick (void)
{
	int cpu = smp_processor_id();
	unsigned long shift = 0, delta;

	/* arrange for the cycle counter to generate a timer interrupt: */
	ia64_set_itv(IA64_TIMER_VECTOR);

	delta = local_cpu_data->itm_delta;
	/*
	 * Stagger the timer tick for each CPU so they don't occur all at (almost) the
	 * same time:
	 */
	if (cpu) {
		unsigned long hi = 1UL << ia64_fls(cpu);
		shift = (2*(cpu - hi) + 1) * delta/hi/2;
	}
	local_cpu_data->itm_next = ia64_get_itc() + delta + shift;
	ia64_set_itm(local_cpu_data->itm_next);
}

static int nojitter;

static int __init nojitter_setup(char *str)
{
	nojitter = 1;
	printk("Jitter checking for ITC timers disabled\n");
	return 1;
}

__setup("nojitter", nojitter_setup);


247
void ia64_init_itm(void)
Linus Torvalds's avatar
Linus Torvalds committed
248
249
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
{
	unsigned long platform_base_freq, itc_freq;
	struct pal_freq_ratio itc_ratio, proc_ratio;
	long status, platform_base_drift, itc_drift;

	/*
	 * According to SAL v2.6, we need to use a SAL call to determine the platform base
	 * frequency and then a PAL call to determine the frequency ratio between the ITC
	 * and the base frequency.
	 */
	status = ia64_sal_freq_base(SAL_FREQ_BASE_PLATFORM,
				    &platform_base_freq, &platform_base_drift);
	if (status != 0) {
		printk(KERN_ERR "SAL_FREQ_BASE_PLATFORM failed: %s\n", ia64_sal_strerror(status));
	} else {
		status = ia64_pal_freq_ratios(&proc_ratio, NULL, &itc_ratio);
		if (status != 0)
			printk(KERN_ERR "PAL_FREQ_RATIOS failed with status=%ld\n", status);
	}
	if (status != 0) {
		/* invent "random" values */
		printk(KERN_ERR
		       "SAL/PAL failed to obtain frequency info---inventing reasonable values\n");
		platform_base_freq = 100000000;
		platform_base_drift = -1;	/* no drift info */
		itc_ratio.num = 3;
		itc_ratio.den = 1;
	}
	if (platform_base_freq < 40000000) {
		printk(KERN_ERR "Platform base frequency %lu bogus---resetting to 75MHz!\n",
		       platform_base_freq);
		platform_base_freq = 75000000;
		platform_base_drift = -1;
	}
	if (!proc_ratio.den)
		proc_ratio.den = 1;	/* avoid division by zero */
	if (!itc_ratio.den)
		itc_ratio.den = 1;	/* avoid division by zero */

	itc_freq = (platform_base_freq*itc_ratio.num)/itc_ratio.den;

	local_cpu_data->itm_delta = (itc_freq + HZ/2) / HZ;
290
	printk(KERN_DEBUG "CPU %d: base freq=%lu.%03luMHz, ITC ratio=%u/%u, "
Linus Torvalds's avatar
Linus Torvalds committed
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
	       "ITC freq=%lu.%03luMHz", smp_processor_id(),
	       platform_base_freq / 1000000, (platform_base_freq / 1000) % 1000,
	       itc_ratio.num, itc_ratio.den, itc_freq / 1000000, (itc_freq / 1000) % 1000);

	if (platform_base_drift != -1) {
		itc_drift = platform_base_drift*itc_ratio.num/itc_ratio.den;
		printk("+/-%ldppm\n", itc_drift);
	} else {
		itc_drift = -1;
		printk("\n");
	}

	local_cpu_data->proc_freq = (platform_base_freq*proc_ratio.num)/proc_ratio.den;
	local_cpu_data->itc_freq = itc_freq;
	local_cpu_data->cyc_per_usec = (itc_freq + USEC_PER_SEC/2) / USEC_PER_SEC;
	local_cpu_data->nsec_per_cyc = ((NSEC_PER_SEC<<IA64_NSEC_PER_CYC_SHIFT)
					+ itc_freq/2)/itc_freq;

	if (!(sal_platform_features & IA64_SAL_PLATFORM_FEATURE_ITC_DRIFT)) {
#ifdef CONFIG_SMP
		/* On IA64 in an SMP configuration ITCs are never accurately synchronized.
		 * Jitter compensation requires a cmpxchg which may limit
		 * the scalability of the syscalls for retrieving time.
		 * The ITC synchronization is usually successful to within a few
		 * ITC ticks but this is not a sure thing. If you need to improve
		 * timer performance in SMP situations then boot the kernel with the
		 * "nojitter" option. However, doing so may result in time fluctuating (maybe
		 * even going backward) if the ITC offsets between the individual CPUs
		 * are too large.
		 */
321
322
		if (!nojitter)
			itc_jitter_data.itc_jitter = 1;
Linus Torvalds's avatar
Linus Torvalds committed
323
#endif
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
	} else
		/*
		 * ITC is drifty and we have not synchronized the ITCs in smpboot.c.
		 * ITC values may fluctuate significantly between processors.
		 * Clock should not be used for hrtimers. Mark itc as only
		 * useful for boot and testing.
		 *
		 * Note that jitter compensation is off! There is no point of
		 * synchronizing ITCs since they may be large differentials
		 * that change over time.
		 *
		 * The only way to fix this would be to repeatedly sync the
		 * ITCs. Until that time we have to avoid ITC.
		 */
		clocksource_itc.rating = 50;
Linus Torvalds's avatar
Linus Torvalds committed
339

340
341
342
343
344
	paravirt_init_missing_ticks_accounting(smp_processor_id());

	/* avoid softlock up message when cpu is unplug and plugged again. */
	touch_softlockup_watchdog();

Linus Torvalds's avatar
Linus Torvalds committed
345
346
	/* Setup the CPU local timer tick */
	ia64_cpu_local_tick();
347
348

	if (!itc_clocksource) {
349
350
		clocksource_register_hz(&clocksource_itc,
						local_cpu_data->itc_freq);
351
352
		itc_clocksource = &clocksource_itc;
	}
Linus Torvalds's avatar
Linus Torvalds committed
353
354
}

355
static cycle_t itc_get_cycles(struct clocksource *cs)
356
{
357
	unsigned long lcycle, now, ret;
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380

	if (!itc_jitter_data.itc_jitter)
		return get_cycles();

	lcycle = itc_jitter_data.itc_lastcycle;
	now = get_cycles();
	if (lcycle && time_after(lcycle, now))
		return lcycle;

	/*
	 * Keep track of the last timer value returned.
	 * In an SMP environment, you could lose out in contention of
	 * cmpxchg. If so, your cmpxchg returns new value which the
	 * winner of contention updated to. Use the new value instead.
	 */
	ret = cmpxchg(&itc_jitter_data.itc_lastcycle, lcycle, now);
	if (unlikely(ret != lcycle))
		return ret;

	return now;
}


Linus Torvalds's avatar
Linus Torvalds committed
381
382
static struct irqaction timer_irqaction = {
	.handler =	timer_interrupt,
Bernhard Walle's avatar
Bernhard Walle committed
383
	.flags =	IRQF_DISABLED | IRQF_IRQPOLL,
Linus Torvalds's avatar
Linus Torvalds committed
384
385
386
	.name =		"timer"
};

387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
static struct platform_device rtc_efi_dev = {
	.name = "rtc-efi",
	.id = -1,
};

static int __init rtc_init(void)
{
	if (platform_device_register(&rtc_efi_dev) < 0)
		printk(KERN_ERR "unable to register rtc device...\n");

	/* not necessarily an error */
	return 0;
}
module_init(rtc_init);

402
403
404
405
406
void read_persistent_clock(struct timespec *ts)
{
	efi_gettimeofday(ts);
}

Linus Torvalds's avatar
Linus Torvalds committed
407
408
409
410
411
412
void __init
time_init (void)
{
	register_percpu_irq(IA64_TIMER_VECTOR, &timer_irqaction);
	ia64_init_itm();
}
413

414
415
416
417
418
419
420
/*
 * Generic udelay assumes that if preemption is allowed and the thread
 * migrates to another CPU, that the ITC values are synchronized across
 * all CPUs.
 */
static void
ia64_itc_udelay (unsigned long usecs)
421
{
422
423
	unsigned long start = ia64_get_itc();
	unsigned long end = start + usecs*local_cpu_data->cyc_per_usec;
424

425
426
427
	while (time_before(ia64_get_itc(), end))
		cpu_relax();
}
428

429
void (*ia64_udelay)(unsigned long usecs) = &ia64_itc_udelay;
430

431
432
433
434
void
udelay (unsigned long usecs)
{
	(*ia64_udelay)(usecs);
435
436
}
EXPORT_SYMBOL(udelay);
Tony Luck's avatar
Tony Luck committed
437

438
439
440
441
442
/* IA64 doesn't cache the timezone */
void update_vsyscall_tz(void)
{
}

443
void update_vsyscall_old(struct timespec *wall, struct timespec *wtm,
444
			struct clocksource *c, u32 mult)
445
{
446
	write_seqcount_begin(&fsyscall_gtod_data.seq);
447
448
449

        /* copy fsyscall clock data */
        fsyscall_gtod_data.clk_mask = c->mask;
450
        fsyscall_gtod_data.clk_mult = mult;
451
        fsyscall_gtod_data.clk_shift = c->shift;
452
        fsyscall_gtod_data.clk_fsys_mmio = c->archdata.fsys_mmio;
453
454
455
456
457
        fsyscall_gtod_data.clk_cycle_last = c->cycle_last;

	/* copy kernel time structures */
        fsyscall_gtod_data.wall_time.tv_sec = wall->tv_sec;
        fsyscall_gtod_data.wall_time.tv_nsec = wall->tv_nsec;
458
	fsyscall_gtod_data.monotonic_time.tv_sec = wtm->tv_sec
459
							+ wall->tv_sec;
460
	fsyscall_gtod_data.monotonic_time.tv_nsec = wtm->tv_nsec
461
462
463
464
465
466
467
468
							+ wall->tv_nsec;

	/* normalize */
	while (fsyscall_gtod_data.monotonic_time.tv_nsec >= NSEC_PER_SEC) {
		fsyscall_gtod_data.monotonic_time.tv_nsec -= NSEC_PER_SEC;
		fsyscall_gtod_data.monotonic_time.tv_sec++;
	}

469
	write_seqcount_end(&fsyscall_gtod_data.seq);
470
471
}