[S390] single-step cleanup
[linux-2.6] / arch / avr32 / kernel / time.c
1 /*
2  * Copyright (C) 2004-2007 Atmel Corporation
3  *
4  * Based on MIPS implementation arch/mips/kernel/time.c
5  *   Copyright 2001 MontaVista Software Inc.
6  *
7  * This program is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License version 2 as
9  * published by the Free Software Foundation.
10  */
11
12 #include <linux/clk.h>
13 #include <linux/clocksource.h>
14 #include <linux/time.h>
15 #include <linux/module.h>
16 #include <linux/interrupt.h>
17 #include <linux/irq.h>
18 #include <linux/kernel_stat.h>
19 #include <linux/errno.h>
20 #include <linux/init.h>
21 #include <linux/profile.h>
22 #include <linux/sysdev.h>
23 #include <linux/err.h>
24
25 #include <asm/div64.h>
26 #include <asm/sysreg.h>
27 #include <asm/io.h>
28 #include <asm/sections.h>
29
30 /* how many counter cycles in a jiffy? */
31 static u32 cycles_per_jiffy;
32
33 /* the count value for the next timer interrupt */
34 static u32 expirelo;
35
36 cycle_t __weak read_cycle_count(void)
37 {
38         return (cycle_t)sysreg_read(COUNT);
39 }
40
41 struct clocksource __weak clocksource_avr32 = {
42         .name           = "avr32",
43         .rating         = 350,
44         .read           = read_cycle_count,
45         .mask           = CLOCKSOURCE_MASK(32),
46         .shift          = 16,
47         .flags          = CLOCK_SOURCE_IS_CONTINUOUS,
48 };
49
50 irqreturn_t __weak timer_interrupt(int irq, void *dev_id);
51
52 struct irqaction timer_irqaction = {
53         .handler        = timer_interrupt,
54         .flags          = IRQF_DISABLED,
55         .name           = "timer",
56 };
57
58 /*
59  * By default we provide the null RTC ops
60  */
61 static unsigned long null_rtc_get_time(void)
62 {
63         return mktime(2007, 1, 1, 0, 0, 0);
64 }
65
66 static int null_rtc_set_time(unsigned long sec)
67 {
68         return 0;
69 }
70
71 static unsigned long (*rtc_get_time)(void) = null_rtc_get_time;
72 static int (*rtc_set_time)(unsigned long) = null_rtc_set_time;
73
74 static void avr32_timer_ack(void)
75 {
76         u32 count;
77
78         /* Ack this timer interrupt and set the next one */
79         expirelo += cycles_per_jiffy;
80         /* setting COMPARE to 0 stops the COUNT-COMPARE */
81         if (expirelo == 0) {
82                 sysreg_write(COMPARE, expirelo + 1);
83         } else {
84                 sysreg_write(COMPARE, expirelo);
85         }
86
87         /* Check to see if we have missed any timer interrupts */
88         count = sysreg_read(COUNT);
89         if ((count - expirelo) < 0x7fffffff) {
90                 expirelo = count + cycles_per_jiffy;
91                 sysreg_write(COMPARE, expirelo);
92         }
93 }
94
95 int __weak avr32_hpt_init(void)
96 {
97         int ret;
98         unsigned long mult, shift, count_hz;
99
100         count_hz = clk_get_rate(boot_cpu_data.clk);
101         shift = clocksource_avr32.shift;
102         mult = clocksource_hz2mult(count_hz, shift);
103         clocksource_avr32.mult = mult;
104
105         {
106                 u64 tmp;
107
108                 tmp = TICK_NSEC;
109                 tmp <<= shift;
110                 tmp += mult / 2;
111                 do_div(tmp, mult);
112
113                 cycles_per_jiffy = tmp;
114         }
115
116         ret = setup_irq(0, &timer_irqaction);
117         if (ret) {
118                 pr_debug("timer: could not request IRQ 0: %d\n", ret);
119                 return -ENODEV;
120         }
121
122         printk(KERN_INFO "timer: AT32AP COUNT-COMPARE at irq 0, "
123                         "%lu.%03lu MHz\n",
124                         ((count_hz + 500) / 1000) / 1000,
125                         ((count_hz + 500) / 1000) % 1000);
126
127         return 0;
128 }
129
130 /*
131  * Taken from MIPS c0_hpt_timer_init().
132  *
133  * The reason COUNT is written twice is probably to make sure we don't get any
134  * timer interrupts while we are messing with the counter.
135  */
136 int __weak avr32_hpt_start(void)
137 {
138         u32 count = sysreg_read(COUNT);
139         expirelo = (count / cycles_per_jiffy + 1) * cycles_per_jiffy;
140         sysreg_write(COUNT, expirelo - cycles_per_jiffy);
141         sysreg_write(COMPARE, expirelo);
142         sysreg_write(COUNT, count);
143
144         return 0;
145 }
146
147 /*
148  * local_timer_interrupt() does profiling and process accounting on a
149  * per-CPU basis.
150  *
151  * In UP mode, it is invoked from the (global) timer_interrupt.
152  */
153 void local_timer_interrupt(int irq, void *dev_id)
154 {
155         if (current->pid)
156                 profile_tick(CPU_PROFILING);
157         update_process_times(user_mode(get_irq_regs()));
158 }
159
160 irqreturn_t __weak timer_interrupt(int irq, void *dev_id)
161 {
162         /* ack timer interrupt and try to set next interrupt */
163         avr32_timer_ack();
164
165         /*
166          * Call the generic timer interrupt handler
167          */
168         write_seqlock(&xtime_lock);
169         do_timer(1);
170         write_sequnlock(&xtime_lock);
171
172         /*
173          * In UP mode, we call local_timer_interrupt() to do profiling
174          * and process accounting.
175          *
176          * SMP is not supported yet.
177          */
178         local_timer_interrupt(irq, dev_id);
179
180         return IRQ_HANDLED;
181 }
182
183 void __init time_init(void)
184 {
185         int ret;
186
187         /*
188          * Make sure we don't get any COMPARE interrupts before we can
189          * handle them.
190          */
191         sysreg_write(COMPARE, 0);
192
193         xtime.tv_sec = rtc_get_time();
194         xtime.tv_nsec = 0;
195
196         set_normalized_timespec(&wall_to_monotonic,
197                                 -xtime.tv_sec, -xtime.tv_nsec);
198
199         ret = avr32_hpt_init();
200         if (ret) {
201                 pr_debug("timer: failed setup: %d\n", ret);
202                 return;
203         }
204
205         ret = clocksource_register(&clocksource_avr32);
206         if (ret)
207                 pr_debug("timer: could not register clocksource: %d\n", ret);
208
209         ret = avr32_hpt_start();
210         if (ret) {
211                 pr_debug("timer: failed starting: %d\n", ret);
212                 return;
213         }
214 }
215
216 static struct sysdev_class timer_class = {
217         .name = "timer",
218 };
219
220 static struct sys_device timer_device = {
221         .id     = 0,
222         .cls    = &timer_class,
223 };
224
225 static int __init init_timer_sysfs(void)
226 {
227         int err = sysdev_class_register(&timer_class);
228         if (!err)
229                 err = sysdev_register(&timer_device);
230         return err;
231 }
232
233 device_initcall(init_timer_sysfs);