Merge branch 'upstream-fixes' into upstream
[linux-2.6] / arch / arm / mach-s3c2410 / time.c
1 /* linux/arch/arm/mach-s3c2410/time.c
2  *
3  * Copyright (C) 2003-2005 Simtec Electronics
4  *      Ben Dooks, <ben@simtec.co.uk>
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  */
20
21 #include <linux/kernel.h>
22 #include <linux/sched.h>
23 #include <linux/init.h>
24 #include <linux/interrupt.h>
25 #include <linux/irq.h>
26 #include <linux/err.h>
27 #include <linux/clk.h>
28
29 #include <asm/system.h>
30 #include <asm/leds.h>
31 #include <asm/mach-types.h>
32
33 #include <asm/io.h>
34 #include <asm/irq.h>
35 #include <asm/arch/map.h>
36 #include <asm/arch/regs-timer.h>
37 #include <asm/arch/regs-irq.h>
38 #include <asm/mach/time.h>
39
40 #include "clock.h"
41 #include "cpu.h"
42
43 static unsigned long timer_startval;
44 static unsigned long timer_usec_ticks;
45
46 #define TIMER_USEC_SHIFT 16
47
48 /* we use the shifted arithmetic to work out the ratio of timer ticks
49  * to usecs, as often the peripheral clock is not a nice even multiple
50  * of 1MHz.
51  *
52  * shift of 14 and 15 are too low for the 12MHz, 16 seems to be ok
53  * for the current HZ value of 200 without producing overflows.
54  *
55  * Original patch by Dimitry Andric, updated by Ben Dooks
56 */
57
58
59 /* timer_mask_usec_ticks
60  *
61  * given a clock and divisor, make the value to pass into timer_ticks_to_usec
62  * to scale the ticks into usecs
63 */
64
65 static inline unsigned long
66 timer_mask_usec_ticks(unsigned long scaler, unsigned long pclk)
67 {
68         unsigned long den = pclk / 1000;
69
70         return ((1000 << TIMER_USEC_SHIFT) * scaler + (den >> 1)) / den;
71 }
72
73 /* timer_ticks_to_usec
74  *
75  * convert timer ticks to usec.
76 */
77
78 static inline unsigned long timer_ticks_to_usec(unsigned long ticks)
79 {
80         unsigned long res;
81
82         res = ticks * timer_usec_ticks;
83         res += 1 << (TIMER_USEC_SHIFT - 4);     /* round up slightly */
84
85         return res >> TIMER_USEC_SHIFT;
86 }
87
88 /***
89  * Returns microsecond  since last clock interrupt.  Note that interrupts
90  * will have been disabled by do_gettimeoffset()
91  * IRQs are disabled before entering here from do_gettimeofday()
92  */
93
94 #define SRCPND_TIMER4 (1<<(IRQ_TIMER4 - IRQ_EINT0))
95
96 static unsigned long s3c2410_gettimeoffset (void)
97 {
98         unsigned long tdone;
99         unsigned long irqpend;
100         unsigned long tval;
101
102         /* work out how many ticks have gone since last timer interrupt */
103
104         tval =  __raw_readl(S3C2410_TCNTO(4));
105         tdone = timer_startval - tval;
106
107         /* check to see if there is an interrupt pending */
108
109         irqpend = __raw_readl(S3C2410_SRCPND);
110         if (irqpend & SRCPND_TIMER4) {
111                 /* re-read the timer, and try and fix up for the missed
112                  * interrupt. Note, the interrupt may go off before the
113                  * timer has re-loaded from wrapping.
114                  */
115
116                 tval =  __raw_readl(S3C2410_TCNTO(4));
117                 tdone = timer_startval - tval;
118
119                 if (tval != 0)
120                         tdone += timer_startval;
121         }
122
123         return timer_ticks_to_usec(tdone);
124 }
125
126
127 /*
128  * IRQ handler for the timer
129  */
130 static irqreturn_t
131 s3c2410_timer_interrupt(int irq, void *dev_id, struct pt_regs *regs)
132 {
133         write_seqlock(&xtime_lock);
134         timer_tick(regs);
135         write_sequnlock(&xtime_lock);
136         return IRQ_HANDLED;
137 }
138
139 static struct irqaction s3c2410_timer_irq = {
140         .name           = "S3C2410 Timer Tick",
141         .flags          = IRQF_DISABLED | IRQF_TIMER,
142         .handler        = s3c2410_timer_interrupt,
143 };
144
145 #define use_tclk1_12() ( \
146         machine_is_bast()       || \
147         machine_is_vr1000()     || \
148         machine_is_anubis()     || \
149         machine_is_osiris() )
150
151 /*
152  * Set up timer interrupt, and return the current time in seconds.
153  *
154  * Currently we only use timer4, as it is the only timer which has no
155  * other function that can be exploited externally
156  */
157 static void s3c2410_timer_setup (void)
158 {
159         unsigned long tcon;
160         unsigned long tcnt;
161         unsigned long tcfg1;
162         unsigned long tcfg0;
163
164         tcnt = 0xffff;  /* default value for tcnt */
165
166         /* read the current timer configuration bits */
167
168         tcon = __raw_readl(S3C2410_TCON);
169         tcfg1 = __raw_readl(S3C2410_TCFG1);
170         tcfg0 = __raw_readl(S3C2410_TCFG0);
171
172         /* configure the system for whichever machine is in use */
173
174         if (use_tclk1_12()) {
175                 /* timer is at 12MHz, scaler is 1 */
176                 timer_usec_ticks = timer_mask_usec_ticks(1, 12000000);
177                 tcnt = 12000000 / HZ;
178
179                 tcfg1 &= ~S3C2410_TCFG1_MUX4_MASK;
180                 tcfg1 |= S3C2410_TCFG1_MUX4_TCLK1;
181         } else {
182                 unsigned long pclk;
183                 struct clk *clk;
184
185                 /* for the h1940 (and others), we use the pclk from the core
186                  * to generate the timer values. since values around 50 to
187                  * 70MHz are not values we can directly generate the timer
188                  * value from, we need to pre-scale and divide before using it.
189                  *
190                  * for instance, using 50.7MHz and dividing by 6 gives 8.45MHz
191                  * (8.45 ticks per usec)
192                  */
193
194                 /* this is used as default if no other timer can be found */
195
196                 clk = clk_get(NULL, "timers");
197                 if (IS_ERR(clk))
198                         panic("failed to get clock for system timer");
199
200                 clk_enable(clk);
201
202                 pclk = clk_get_rate(clk);
203
204                 /* configure clock tick */
205
206                 timer_usec_ticks = timer_mask_usec_ticks(6, pclk);
207
208                 tcfg1 &= ~S3C2410_TCFG1_MUX4_MASK;
209                 tcfg1 |= S3C2410_TCFG1_MUX4_DIV2;
210
211                 tcfg0 &= ~S3C2410_TCFG_PRESCALER1_MASK;
212                 tcfg0 |= ((6 - 1) / 2) << S3C2410_TCFG_PRESCALER1_SHIFT;
213
214                 tcnt = (pclk / 6) / HZ;
215         }
216
217         /* timers reload after counting zero, so reduce the count by 1 */
218
219         tcnt--;
220
221         printk("timer tcon=%08lx, tcnt %04lx, tcfg %08lx,%08lx, usec %08lx\n",
222                tcon, tcnt, tcfg0, tcfg1, timer_usec_ticks);
223
224         /* check to see if timer is within 16bit range... */
225         if (tcnt > 0xffff) {
226                 panic("setup_timer: HZ is too small, cannot configure timer!");
227                 return;
228         }
229
230         __raw_writel(tcfg1, S3C2410_TCFG1);
231         __raw_writel(tcfg0, S3C2410_TCFG0);
232
233         timer_startval = tcnt;
234         __raw_writel(tcnt, S3C2410_TCNTB(4));
235
236         /* ensure timer is stopped... */
237
238         tcon &= ~(7<<20);
239         tcon |= S3C2410_TCON_T4RELOAD;
240         tcon |= S3C2410_TCON_T4MANUALUPD;
241
242         __raw_writel(tcon, S3C2410_TCON);
243         __raw_writel(tcnt, S3C2410_TCNTB(4));
244         __raw_writel(tcnt, S3C2410_TCMPB(4));
245
246         /* start the timer running */
247         tcon |= S3C2410_TCON_T4START;
248         tcon &= ~S3C2410_TCON_T4MANUALUPD;
249         __raw_writel(tcon, S3C2410_TCON);
250 }
251
252 static void __init s3c2410_timer_init (void)
253 {
254         s3c2410_timer_setup();
255         setup_irq(IRQ_TIMER4, &s3c2410_timer_irq);
256 }
257
258 struct sys_timer s3c24xx_timer = {
259         .init           = s3c2410_timer_init,
260         .offset         = s3c2410_gettimeoffset,
261         .resume         = s3c2410_timer_setup
262 };