iomd_clock.c revision 1.23 1 /* $NetBSD: iomd_clock.c,v 1.23 2008/01/05 00:31:54 ad Exp $ */
2
3 /*
4 * Copyright (c) 1994-1997 Mark Brinicombe.
5 * Copyright (c) 1994 Brini.
6 * All rights reserved.
7 *
8 * This code is derived from software written for Brini by Mark Brinicombe
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by Mark Brinicombe.
21 * 4. The name of the company nor the name of the author may be used to
22 * endorse or promote products derived from this software without specific
23 * prior written permission.
24 *
25 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
26 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
27 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
28 * IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
29 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
30 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
31 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35 * SUCH DAMAGE.
36 *
37 * RiscBSD kernel project
38 *
39 * clock.c
40 *
41 * Timer related machine specific code
42 *
43 * Created : 29/09/94
44 */
45
46 /* Include header files */
47
48 #include <sys/param.h>
49
50 __KERNEL_RCSID(0, "$NetBSD: iomd_clock.c,v 1.23 2008/01/05 00:31:54 ad Exp $");
51
52 #include <sys/systm.h>
53 #include <sys/kernel.h>
54 #include <sys/time.h>
55 #include <sys/timetc.h>
56 #include <sys/device.h>
57 #include <sys/intr.h>
58
59 #include <dev/clock_subr.h>
60
61 #include <arm/cpufunc.h>
62
63 #include <arm/iomd/iomdvar.h>
64 #include <arm/iomd/iomdreg.h>
65
66 struct clock_softc {
67 struct device sc_dev;
68 bus_space_tag_t sc_iot;
69 bus_space_handle_t sc_ioh;
70 };
71
72 #define TIMER_FREQUENCY 2000000 /* 2MHz clock */
73 #define TICKS_PER_MICROSECOND (TIMER_FREQUENCY / 1000000)
74
75 static void *clockirq;
76 static void *statclockirq;
77 static struct clock_softc *clock_sc;
78 static int timer0_count;
79
80 static int clockmatch(struct device *parent, struct cfdata *cf, void *aux);
81 static void clockattach(struct device *parent, struct device *self, void *aux);
82 #ifdef DIAGNOSTIC
83 static void checkdelay(void);
84 #endif
85
86 static u_int iomd_timecounter0_get(struct timecounter *tc);
87
88
89 static volatile uint32_t timer0_lastcount;
90 static volatile uint32_t timer0_offset;
91 static volatile int timer0_ticked;
92 /* TODO: Get IRQ status */
93
94 static struct simplelock tmr_lock = SIMPLELOCK_INITIALIZER; /* protect TC timer variables */
95
96
97 static struct timecounter iomd_timecounter = {
98 iomd_timecounter0_get,
99 0, /* No poll_pps */
100 ~0, /* 32bit accuracy */
101 TIMER_FREQUENCY,
102 "iomd_timer0",
103 100
104 };
105
106 int clockhandler(void *);
107 int statclockhandler(void *);
108
109 CFATTACH_DECL(clock, sizeof(struct clock_softc),
110 clockmatch, clockattach, NULL, NULL);
111
112 /*
113 * int clockmatch(struct device *parent, void *match, void *aux)
114 *
115 * Just return ok for this if it is device 0
116 */
117
118 static int
119 clockmatch(struct device *parent, struct cfdata *cf, void *aux)
120 {
121 struct clk_attach_args *ca = aux;
122
123 if (strcmp(ca->ca_name, "clk") == 0)
124 return(1);
125 return(0);
126 }
127
128
129 /*
130 * void clockattach(struct device *parent, struct device *dev, void *aux)
131 *
132 * Map the IOMD and identify it.
133 * Then configure the child devices based on the IOMD ID.
134 */
135
136 static void
137 clockattach(struct device *parent, struct device *self, void *aux)
138 {
139 struct clock_softc *sc = (struct clock_softc *)self;
140 struct clk_attach_args *ca = aux;
141
142 sc->sc_iot = ca->ca_iot;
143 sc->sc_ioh = ca->ca_ioh; /* This is a handle for the whole IOMD */
144
145 clock_sc = sc;
146
147 /* Cannot do anything until cpu_initclocks() has been called */
148
149 printf("\n");
150 }
151
152
153 static void
154 tickle_tc(void)
155 {
156 if (timer0_count &&
157 timecounter->tc_get_timecount == iomd_timecounter0_get) {
158 simple_lock(&tmr_lock);
159 if (timer0_ticked)
160 timer0_ticked = 0;
161 else {
162 timer0_offset += timer0_count;
163 timer0_lastcount = 0;
164 }
165 simple_unlock(&tmr_lock);
166 }
167
168 }
169
170
171 /*
172 * int clockhandler(struct clockframe *frame)
173 *
174 * Function called by timer 0 interrupts. This just calls
175 * hardclock(). Eventually the irqhandler can call hardclock() directly
176 * but for now we use this function so that we can debug IRQ's
177 */
178
179 int
180 clockhandler(void *cookie)
181 {
182 struct clockframe *frame = cookie;
183 tickle_tc();
184
185 hardclock(frame);
186 return 0; /* Pass the interrupt on down the chain */
187 }
188
189
190 /*
191 * int statclockhandler(struct clockframe *frame)
192 *
193 * Function called by timer 1 interrupts. This just calls
194 * statclock(). Eventually the irqhandler can call statclock() directly
195 * but for now we use this function so that we can debug IRQ's
196 */
197
198 int
199 statclockhandler(void *cookie)
200 {
201 struct clockframe *frame = cookie;
202
203 statclock(frame);
204 return 0; /* Pass the interrupt on down the chain */
205 }
206
207
208 /*
209 * void setstatclockrate(int newhz)
210 *
211 * Set the stat clock rate. The stat clock uses timer1
212 */
213
214 void
215 setstatclockrate(int newhz)
216 {
217 int count;
218
219 count = TIMER_FREQUENCY / newhz;
220
221 printf("Setting statclock to %dHz (%d ticks)\n", newhz, count);
222
223 bus_space_write_1(clock_sc->sc_iot, clock_sc->sc_ioh,
224 IOMD_T1LOW, (count >> 0) & 0xff);
225 bus_space_write_1(clock_sc->sc_iot, clock_sc->sc_ioh,
226 IOMD_T1HIGH, (count >> 8) & 0xff);
227
228 /* reload the counter */
229
230 bus_space_write_1(clock_sc->sc_iot, clock_sc->sc_ioh,
231 IOMD_T1GO, 0);
232 }
233
234
235 #ifdef DIAGNOSTIC
236 static void
237 checkdelay(void)
238 {
239 struct timeval start, end, diff;
240
241 microtime(&start);
242 delay(10000);
243 microtime(&end);
244 timersub(&end, &start, &diff);
245 if (diff.tv_sec > 0)
246 return;
247 if (diff.tv_usec > 10000)
248 return;
249 printf("WARNING: delay(10000) took %ld us\n", diff.tv_usec);
250 }
251 #endif
252
253 /*
254 * void cpu_initclocks(void)
255 *
256 * Initialise the clocks.
257 * This sets up the two timers in the IOMD and installs the IRQ handlers
258 *
259 * NOTE: Currently only timer 0 is setup and the IRQ handler is not installed
260 */
261
262 void
263 cpu_initclocks(void)
264 {
265 /*
266 * Load timer 0 with count down value
267 * This timer generates 100Hz interrupts for the system clock
268 */
269
270 printf("clock: hz=%d stathz = %d profhz = %d\n", hz, stathz, profhz);
271
272 timer0_count = TIMER_FREQUENCY / hz;
273
274 bus_space_write_1(clock_sc->sc_iot, clock_sc->sc_ioh,
275 IOMD_T0LOW, (timer0_count >> 0) & 0xff);
276 bus_space_write_1(clock_sc->sc_iot, clock_sc->sc_ioh,
277 IOMD_T0HIGH, (timer0_count >> 8) & 0xff);
278
279 /* reload the counter */
280
281 bus_space_write_1(clock_sc->sc_iot, clock_sc->sc_ioh,
282 IOMD_T0GO, 0);
283
284 clockirq = intr_claim(IRQ_TIMER0, IPL_CLOCK, "tmr0 hard clk",
285 clockhandler, 0);
286
287 if (clockirq == NULL)
288 panic("%s: Cannot installer timer 0 IRQ handler",
289 clock_sc->sc_dev.dv_xname);
290
291 if (stathz) {
292 setstatclockrate(stathz);
293 statclockirq = intr_claim(IRQ_TIMER1, IPL_CLOCK,
294 "tmr1 stat clk", statclockhandler, 0);
295 if (statclockirq == NULL)
296 panic("%s: Cannot installer timer 1 IRQ handler",
297 clock_sc->sc_dev.dv_xname);
298 }
299 #ifdef DIAGNOSTIC
300 checkdelay();
301 #endif
302 tc_init(&iomd_timecounter);
303 }
304
305
306
307 static u_int iomd_timecounter0_get(struct timecounter *tc)
308 {
309 int s;
310 u_int tm;
311
312 /*
313 * Latch the current value of the timer and then read it.
314 * This garentees an atmoic reading of the time.
315 */
316 s = splhigh();
317 bus_space_write_1(clock_sc->sc_iot, clock_sc->sc_ioh,
318 IOMD_T0LATCH, 0);
319
320 tm = bus_space_read_1(clock_sc->sc_iot, clock_sc->sc_ioh,
321 IOMD_T0LOW);
322 tm += (bus_space_read_1(clock_sc->sc_iot, clock_sc->sc_ioh,
323 IOMD_T0HIGH) << 8);
324 splx(s);
325 simple_lock(&tmr_lock);
326
327 tm = timer0_count - tm;
328
329
330 if (timer0_count &&
331 (tm < timer0_lastcount || (!timer0_ticked && false/* XXX: clkintr_pending */))) {
332 timer0_ticked = 1;
333 timer0_offset += timer0_count;
334 }
335
336 timer0_lastcount = tm;
337 tm += timer0_offset;
338
339 simple_unlock(&tmr_lock);
340 return tm;
341 }
342
343
344
345 /*
346 * Estimated loop for n microseconds
347 */
348
349 /* Need to re-write this to use the timers */
350
351 /* One day soon I will actually do this */
352
353 int delaycount = 100;
354
355 void
356 delay(u_int n)
357 {
358 volatile u_int n2;
359 volatile u_int i;
360
361 if (n == 0) return;
362 n2 = n;
363 while (n2-- > 0) {
364 if (cputype == CPU_ID_SA110) /* XXX - Seriously gross hack */
365 for (i = delaycount; --i;);
366 else
367 for (i = 8; --i;);
368 }
369 }
370
371 /* End of iomd_clock.c */
372