Commit | Line | Data |
---|---|---|
ec87ee20 | 1 | /* |
51533b61 MS |
2 | * linux/arch/cris/kernel/fasttimer.c |
3 | * | |
4 | * Fast timers for ETRAX FS | |
51533b61 | 5 | * |
ec87ee20 | 6 | * Copyright (C) 2000-2006 Axis Communications AB, Lund, Sweden |
51533b61 MS |
7 | */ |
8 | ||
9 | #include <linux/errno.h> | |
10 | #include <linux/sched.h> | |
11 | #include <linux/kernel.h> | |
12 | #include <linux/param.h> | |
13 | #include <linux/string.h> | |
14 | #include <linux/vmalloc.h> | |
15 | #include <linux/interrupt.h> | |
16 | #include <linux/time.h> | |
17 | #include <linux/delay.h> | |
18 | ||
19 | #include <asm/irq.h> | |
51533b61 | 20 | |
ec87ee20 JN |
21 | #include <hwregs/reg_map.h> |
22 | #include <hwregs/reg_rdwr.h> | |
23 | #include <hwregs/timer_defs.h> | |
51533b61 MS |
24 | #include <asm/fasttimer.h> |
25 | #include <linux/proc_fs.h> | |
26 | ||
27 | /* | |
28 | * timer0 is running at 100MHz and generating jiffies timer ticks | |
29 | * at 100 or 1000 HZ. | |
30 | * fasttimer gives an API that gives timers that expire "between" the jiffies | |
31 | * giving microsecond resolution (10 ns). | |
32 | * fasttimer uses reg_timer_rw_trig register to get interrupt when | |
33 | * r_time reaches a certain value. | |
34 | */ | |
35 | ||
36 | ||
37 | #define DEBUG_LOG_INCLUDED | |
38 | #define FAST_TIMER_LOG | |
ec87ee20 | 39 | /* #define FAST_TIMER_TEST */ |
51533b61 MS |
40 | |
41 | #define FAST_TIMER_SANITY_CHECKS | |
42 | ||
43 | #ifdef FAST_TIMER_SANITY_CHECKS | |
f64dd219 | 44 | static int sanity_failed; |
51533b61 MS |
45 | #endif |
46 | ||
47 | #define D1(x) | |
48 | #define D2(x) | |
49 | #define DP(x) | |
50 | ||
ec87ee20 JN |
51 | static unsigned int fast_timer_running; |
52 | static unsigned int fast_timers_added; | |
53 | static unsigned int fast_timers_started; | |
54 | static unsigned int fast_timers_expired; | |
55 | static unsigned int fast_timers_deleted; | |
56 | static unsigned int fast_timer_is_init; | |
57 | static unsigned int fast_timer_ints; | |
51533b61 MS |
58 | |
59 | struct fast_timer *fast_timer_list = NULL; | |
60 | ||
61 | #ifdef DEBUG_LOG_INCLUDED | |
62 | #define DEBUG_LOG_MAX 128 | |
63 | static const char * debug_log_string[DEBUG_LOG_MAX]; | |
64 | static unsigned long debug_log_value[DEBUG_LOG_MAX]; | |
ec87ee20 JN |
65 | static unsigned int debug_log_cnt; |
66 | static unsigned int debug_log_cnt_wrapped; | |
51533b61 MS |
67 | |
68 | #define DEBUG_LOG(string, value) \ | |
69 | { \ | |
70 | unsigned long log_flags; \ | |
71 | local_irq_save(log_flags); \ | |
72 | debug_log_string[debug_log_cnt] = (string); \ | |
73 | debug_log_value[debug_log_cnt] = (unsigned long)(value); \ | |
74 | if (++debug_log_cnt >= DEBUG_LOG_MAX) \ | |
75 | { \ | |
76 | debug_log_cnt = debug_log_cnt % DEBUG_LOG_MAX; \ | |
77 | debug_log_cnt_wrapped = 1; \ | |
78 | } \ | |
79 | local_irq_restore(log_flags); \ | |
80 | } | |
81 | #else | |
82 | #define DEBUG_LOG(string, value) | |
83 | #endif | |
84 | ||
85 | ||
86 | #define NUM_TIMER_STATS 16 | |
87 | #ifdef FAST_TIMER_LOG | |
88 | struct fast_timer timer_added_log[NUM_TIMER_STATS]; | |
89 | struct fast_timer timer_started_log[NUM_TIMER_STATS]; | |
90 | struct fast_timer timer_expired_log[NUM_TIMER_STATS]; | |
91 | #endif | |
92 | ||
93 | int timer_div_settings[NUM_TIMER_STATS]; | |
94 | int timer_delay_settings[NUM_TIMER_STATS]; | |
95 | ||
ec87ee20 | 96 | struct work_struct fast_work; |
51533b61 MS |
97 | |
98 | static void | |
ec87ee20 | 99 | timer_trig_handler(struct work_struct *work); |
51533b61 MS |
100 | |
101 | ||
102 | ||
103 | /* Not true gettimeofday, only checks the jiffies (uptime) + useconds */ | |
ec87ee20 | 104 | inline void do_gettimeofday_fast(struct fasttime_t *tv) |
51533b61 | 105 | { |
ec87ee20 JN |
106 | tv->tv_jiff = jiffies; |
107 | tv->tv_usec = GET_JIFFIES_USEC(); | |
51533b61 MS |
108 | } |
109 | ||
ec87ee20 | 110 | inline int fasttime_cmp(struct fasttime_t *t0, struct fasttime_t *t1) |
51533b61 | 111 | { |
ec87ee20 JN |
112 | /* Compare jiffies. Takes care of wrapping */ |
113 | if (time_before(t0->tv_jiff, t1->tv_jiff)) | |
114 | return -1; | |
115 | else if (time_after(t0->tv_jiff, t1->tv_jiff)) | |
116 | return 1; | |
117 | ||
118 | /* Compare us */ | |
119 | if (t0->tv_usec < t1->tv_usec) | |
120 | return -1; | |
121 | else if (t0->tv_usec > t1->tv_usec) | |
122 | return 1; | |
123 | return 0; | |
51533b61 MS |
124 | } |
125 | ||
126 | /* Called with ints off */ | |
ec87ee20 | 127 | inline void start_timer_trig(unsigned long delay_us) |
51533b61 MS |
128 | { |
129 | reg_timer_rw_ack_intr ack_intr = { 0 }; | |
130 | reg_timer_rw_intr_mask intr_mask; | |
131 | reg_timer_rw_trig trig; | |
132 | reg_timer_rw_trig_cfg trig_cfg = { 0 }; | |
ec87ee20 JN |
133 | reg_timer_r_time r_time0; |
134 | reg_timer_r_time r_time1; | |
135 | unsigned char trig_wrap; | |
136 | unsigned char time_wrap; | |
51533b61 | 137 | |
ec87ee20 | 138 | r_time0 = REG_RD(timer, regi_timer0, r_time); |
51533b61 MS |
139 | |
140 | D1(printk("start_timer_trig : %d us freq: %i div: %i\n", | |
141 | delay_us, freq_index, div)); | |
142 | /* Clear trig irq */ | |
ec87ee20 | 143 | intr_mask = REG_RD(timer, regi_timer0, rw_intr_mask); |
51533b61 | 144 | intr_mask.trig = 0; |
ec87ee20 | 145 | REG_WR(timer, regi_timer0, rw_intr_mask, intr_mask); |
51533b61 | 146 | |
ec87ee20 JN |
147 | /* Set timer values and check if trigger wraps. */ |
148 | /* r_time is 100MHz (10 ns resolution) */ | |
149 | trig_wrap = (trig = r_time0 + delay_us*(1000/10)) < r_time0; | |
51533b61 MS |
150 | |
151 | timer_div_settings[fast_timers_started % NUM_TIMER_STATS] = trig; | |
152 | timer_delay_settings[fast_timers_started % NUM_TIMER_STATS] = delay_us; | |
153 | ||
154 | /* Ack interrupt */ | |
155 | ack_intr.trig = 1; | |
ec87ee20 | 156 | REG_WR(timer, regi_timer0, rw_ack_intr, ack_intr); |
51533b61 MS |
157 | |
158 | /* Start timer */ | |
ec87ee20 | 159 | REG_WR(timer, regi_timer0, rw_trig, trig); |
51533b61 | 160 | trig_cfg.tmr = regk_timer_time; |
ec87ee20 | 161 | REG_WR(timer, regi_timer0, rw_trig_cfg, trig_cfg); |
51533b61 MS |
162 | |
163 | /* Check if we have already passed the trig time */ | |
ec87ee20 JN |
164 | r_time1 = REG_RD(timer, regi_timer0, r_time); |
165 | time_wrap = r_time1 < r_time0; | |
166 | ||
167 | if ((trig_wrap && !time_wrap) || (r_time1 < trig)) { | |
51533b61 | 168 | /* No, Enable trig irq */ |
ec87ee20 | 169 | intr_mask = REG_RD(timer, regi_timer0, rw_intr_mask); |
51533b61 | 170 | intr_mask.trig = 1; |
ec87ee20 | 171 | REG_WR(timer, regi_timer0, rw_intr_mask, intr_mask); |
51533b61 MS |
172 | fast_timers_started++; |
173 | fast_timer_running = 1; | |
ec87ee20 | 174 | } else { |
51533b61 MS |
175 | /* We have passed the time, disable trig point, ack intr */ |
176 | trig_cfg.tmr = regk_timer_off; | |
ec87ee20 JN |
177 | REG_WR(timer, regi_timer0, rw_trig_cfg, trig_cfg); |
178 | REG_WR(timer, regi_timer0, rw_ack_intr, ack_intr); | |
179 | /* call the int routine */ | |
180 | INIT_WORK(&fast_work, timer_trig_handler); | |
181 | schedule_work(&fast_work); | |
51533b61 MS |
182 | } |
183 | ||
184 | } | |
185 | ||
186 | /* In version 1.4 this function takes 27 - 50 us */ | |
187 | void start_one_shot_timer(struct fast_timer *t, | |
188 | fast_timer_function_type *function, | |
189 | unsigned long data, | |
190 | unsigned long delay_us, | |
191 | const char *name) | |
192 | { | |
193 | unsigned long flags; | |
194 | struct fast_timer *tmp; | |
195 | ||
196 | D1(printk("sft %s %d us\n", name, delay_us)); | |
197 | ||
198 | local_irq_save(flags); | |
199 | ||
200 | do_gettimeofday_fast(&t->tv_set); | |
201 | tmp = fast_timer_list; | |
202 | ||
f64dd219 JN |
203 | #ifdef FAST_TIMER_SANITY_CHECKS |
204 | /* Check so this is not in the list already... */ | |
ec87ee20 JN |
205 | while (tmp != NULL) { |
206 | if (tmp == t) { | |
207 | printk(KERN_DEBUG | |
208 | "timer name: %s data: 0x%08lX already " | |
209 | "in list!\n", name, data); | |
210 | sanity_failed++; | |
211 | goto done; | |
212 | } else | |
f64dd219 JN |
213 | tmp = tmp->next; |
214 | } | |
215 | tmp = fast_timer_list; | |
216 | #endif | |
51533b61 MS |
217 | |
218 | t->delay_us = delay_us; | |
219 | t->function = function; | |
220 | t->data = data; | |
221 | t->name = name; | |
222 | ||
223 | t->tv_expires.tv_usec = t->tv_set.tv_usec + delay_us % 1000000; | |
ec87ee20 JN |
224 | t->tv_expires.tv_jiff = t->tv_set.tv_jiff + delay_us / 1000000 / HZ; |
225 | if (t->tv_expires.tv_usec > 1000000) { | |
51533b61 | 226 | t->tv_expires.tv_usec -= 1000000; |
ec87ee20 | 227 | t->tv_expires.tv_jiff += HZ; |
51533b61 MS |
228 | } |
229 | #ifdef FAST_TIMER_LOG | |
230 | timer_added_log[fast_timers_added % NUM_TIMER_STATS] = *t; | |
231 | #endif | |
232 | fast_timers_added++; | |
233 | ||
234 | /* Check if this should timeout before anything else */ | |
ec87ee20 | 235 | if (tmp == NULL || fasttime_cmp(&t->tv_expires, &tmp->tv_expires) < 0) { |
51533b61 MS |
236 | /* Put first in list and modify the timer value */ |
237 | t->prev = NULL; | |
238 | t->next = fast_timer_list; | |
239 | if (fast_timer_list) | |
51533b61 | 240 | fast_timer_list->prev = t; |
51533b61 MS |
241 | fast_timer_list = t; |
242 | #ifdef FAST_TIMER_LOG | |
243 | timer_started_log[fast_timers_started % NUM_TIMER_STATS] = *t; | |
244 | #endif | |
245 | start_timer_trig(delay_us); | |
246 | } else { | |
247 | /* Put in correct place in list */ | |
248 | while (tmp->next && | |
ec87ee20 | 249 | fasttime_cmp(&t->tv_expires, &tmp->next->tv_expires) > 0) |
51533b61 | 250 | tmp = tmp->next; |
51533b61 MS |
251 | /* Insert t after tmp */ |
252 | t->prev = tmp; | |
253 | t->next = tmp->next; | |
254 | if (tmp->next) | |
255 | { | |
256 | tmp->next->prev = t; | |
257 | } | |
258 | tmp->next = t; | |
259 | } | |
260 | ||
261 | D2(printk("start_one_shot_timer: %d us done\n", delay_us)); | |
262 | ||
ec87ee20 | 263 | done: |
51533b61 MS |
264 | local_irq_restore(flags); |
265 | } /* start_one_shot_timer */ | |
266 | ||
267 | static inline int fast_timer_pending (const struct fast_timer * t) | |
268 | { | |
269 | return (t->next != NULL) || (t->prev != NULL) || (t == fast_timer_list); | |
270 | } | |
271 | ||
272 | static inline int detach_fast_timer (struct fast_timer *t) | |
273 | { | |
274 | struct fast_timer *next, *prev; | |
275 | if (!fast_timer_pending(t)) | |
276 | return 0; | |
277 | next = t->next; | |
278 | prev = t->prev; | |
279 | if (next) | |
280 | next->prev = prev; | |
281 | if (prev) | |
282 | prev->next = next; | |
283 | else | |
284 | fast_timer_list = next; | |
285 | fast_timers_deleted++; | |
286 | return 1; | |
287 | } | |
288 | ||
289 | int del_fast_timer(struct fast_timer * t) | |
290 | { | |
291 | unsigned long flags; | |
292 | int ret; | |
293 | ||
294 | local_irq_save(flags); | |
295 | ret = detach_fast_timer(t); | |
296 | t->next = t->prev = NULL; | |
297 | local_irq_restore(flags); | |
298 | return ret; | |
299 | } /* del_fast_timer */ | |
300 | ||
301 | ||
302 | /* Interrupt routines or functions called in interrupt context */ | |
303 | ||
304 | /* Timer interrupt handler for trig interrupts */ | |
305 | ||
306 | static irqreturn_t | |
ec87ee20 | 307 | timer_trig_interrupt(int irq, void *dev_id) |
51533b61 MS |
308 | { |
309 | reg_timer_r_masked_intr masked_intr; | |
51533b61 | 310 | /* Check if the timer interrupt is for us (a trig int) */ |
ec87ee20 | 311 | masked_intr = REG_RD(timer, regi_timer0, r_masked_intr); |
51533b61 MS |
312 | if (!masked_intr.trig) |
313 | return IRQ_NONE; | |
ec87ee20 | 314 | timer_trig_handler(NULL); |
51533b61 MS |
315 | return IRQ_HANDLED; |
316 | } | |
317 | ||
ec87ee20 | 318 | static void timer_trig_handler(struct work_struct *work) |
51533b61 MS |
319 | { |
320 | reg_timer_rw_ack_intr ack_intr = { 0 }; | |
321 | reg_timer_rw_intr_mask intr_mask; | |
322 | reg_timer_rw_trig_cfg trig_cfg = { 0 }; | |
323 | struct fast_timer *t; | |
324 | unsigned long flags; | |
325 | ||
ec87ee20 JN |
326 | /* We keep interrupts disabled not only when we modify the |
327 | * fast timer list, but any time we hold a reference to a | |
328 | * timer in the list, since del_fast_timer may be called | |
329 | * from (another) interrupt context. Thus, the only time | |
330 | * when interrupts are enabled is when calling the timer | |
331 | * callback function. | |
332 | */ | |
51533b61 MS |
333 | local_irq_save(flags); |
334 | ||
335 | /* Clear timer trig interrupt */ | |
ec87ee20 | 336 | intr_mask = REG_RD(timer, regi_timer0, rw_intr_mask); |
51533b61 | 337 | intr_mask.trig = 0; |
ec87ee20 | 338 | REG_WR(timer, regi_timer0, rw_intr_mask, intr_mask); |
51533b61 MS |
339 | |
340 | /* First stop timer, then ack interrupt */ | |
341 | /* Stop timer */ | |
342 | trig_cfg.tmr = regk_timer_off; | |
ec87ee20 | 343 | REG_WR(timer, regi_timer0, rw_trig_cfg, trig_cfg); |
51533b61 MS |
344 | |
345 | /* Ack interrupt */ | |
346 | ack_intr.trig = 1; | |
ec87ee20 | 347 | REG_WR(timer, regi_timer0, rw_ack_intr, ack_intr); |
51533b61 MS |
348 | |
349 | fast_timer_running = 0; | |
350 | fast_timer_ints++; | |
351 | ||
ec87ee20 JN |
352 | fast_timer_function_type *f; |
353 | unsigned long d; | |
51533b61 MS |
354 | |
355 | t = fast_timer_list; | |
ec87ee20 JN |
356 | while (t) { |
357 | struct fasttime_t tv; | |
51533b61 MS |
358 | |
359 | /* Has it really expired? */ | |
360 | do_gettimeofday_fast(&tv); | |
ec87ee20 JN |
361 | D1(printk(KERN_DEBUG |
362 | "t: %is %06ius\n", tv.tv_jiff, tv.tv_usec)); | |
51533b61 | 363 | |
ec87ee20 | 364 | if (fasttime_cmp(&t->tv_expires, &tv) <= 0) { |
51533b61 MS |
365 | /* Yes it has expired */ |
366 | #ifdef FAST_TIMER_LOG | |
367 | timer_expired_log[fast_timers_expired % NUM_TIMER_STATS] = *t; | |
368 | #endif | |
369 | fast_timers_expired++; | |
370 | ||
371 | /* Remove this timer before call, since it may reuse the timer */ | |
51533b61 | 372 | if (t->prev) |
51533b61 | 373 | t->prev->next = t->next; |
51533b61 | 374 | else |
51533b61 | 375 | fast_timer_list = t->next; |
51533b61 | 376 | if (t->next) |
51533b61 | 377 | t->next->prev = t->prev; |
51533b61 MS |
378 | t->prev = NULL; |
379 | t->next = NULL; | |
51533b61 | 380 | |
ec87ee20 JN |
381 | /* Save function callback data before enabling |
382 | * interrupts, since the timer may be removed and we | |
383 | * don't know how it was allocated (e.g. ->function | |
384 | * and ->data may become overwritten after deletion | |
385 | * if the timer was stack-allocated). | |
386 | */ | |
387 | f = t->function; | |
388 | d = t->data; | |
389 | ||
390 | if (f != NULL) { | |
391 | /* Run the callback function with interrupts | |
392 | * enabled. */ | |
393 | local_irq_restore(flags); | |
394 | f(d); | |
395 | local_irq_save(flags); | |
396 | } else | |
51533b61 | 397 | DEBUG_LOG("!trimertrig %i function==NULL!\n", fast_timer_ints); |
ec87ee20 | 398 | } else { |
51533b61 MS |
399 | /* Timer is to early, let's set it again using the normal routines */ |
400 | D1(printk(".\n")); | |
401 | } | |
402 | ||
ec87ee20 JN |
403 | t = fast_timer_list; |
404 | if (t != NULL) { | |
51533b61 | 405 | /* Start next timer.. */ |
ec87ee20 JN |
406 | long us = 0; |
407 | struct fasttime_t tv; | |
51533b61 MS |
408 | |
409 | do_gettimeofday_fast(&tv); | |
ec87ee20 JN |
410 | |
411 | /* time_after_eq takes care of wrapping */ | |
412 | if (time_after_eq(t->tv_expires.tv_jiff, tv.tv_jiff)) | |
413 | us = ((t->tv_expires.tv_jiff - tv.tv_jiff) * | |
414 | 1000000 / HZ + t->tv_expires.tv_usec - | |
415 | tv.tv_usec); | |
416 | ||
417 | if (us > 0) { | |
418 | if (!fast_timer_running) { | |
51533b61 MS |
419 | #ifdef FAST_TIMER_LOG |
420 | timer_started_log[fast_timers_started % NUM_TIMER_STATS] = *t; | |
421 | #endif | |
422 | start_timer_trig(us); | |
423 | } | |
51533b61 | 424 | break; |
ec87ee20 | 425 | } else { |
51533b61 MS |
426 | /* Timer already expired, let's handle it better late than never. |
427 | * The normal loop handles it | |
428 | */ | |
429 | D1(printk("e! %d\n", us)); | |
430 | } | |
431 | } | |
51533b61 MS |
432 | } |
433 | ||
ec87ee20 JN |
434 | local_irq_restore(flags); |
435 | ||
436 | if (!t) | |
51533b61 | 437 | D1(printk("ttrig stop!\n")); |
51533b61 MS |
438 | } |
439 | ||
440 | static void wake_up_func(unsigned long data) | |
441 | { | |
51533b61 | 442 | wait_queue_head_t *sleep_wait_p = (wait_queue_head_t*)data; |
51533b61 MS |
443 | wake_up(sleep_wait_p); |
444 | } | |
445 | ||
446 | ||
447 | /* Useful API */ | |
448 | ||
449 | void schedule_usleep(unsigned long us) | |
450 | { | |
451 | struct fast_timer t; | |
51533b61 MS |
452 | wait_queue_head_t sleep_wait; |
453 | init_waitqueue_head(&sleep_wait); | |
51533b61 MS |
454 | |
455 | D1(printk("schedule_usleep(%d)\n", us)); | |
51533b61 MS |
456 | start_one_shot_timer(&t, wake_up_func, (unsigned long)&sleep_wait, us, |
457 | "usleep"); | |
ec87ee20 JN |
458 | /* Uninterruptible sleep on the fast timer. (The condition is |
459 | * somewhat redundant since the timer is what wakes us up.) */ | |
460 | wait_event(sleep_wait, !fast_timer_pending(&t)); | |
461 | ||
51533b61 | 462 | D1(printk("done schedule_usleep(%d)\n", us)); |
51533b61 MS |
463 | } |
464 | ||
465 | #ifdef CONFIG_PROC_FS | |
466 | static int proc_fasttimer_read(char *buf, char **start, off_t offset, int len | |
7a3e965a | 467 | ,int *eof, void *data_unused); |
51533b61 MS |
468 | #endif /* CONFIG_PROC_FS */ |
469 | ||
470 | #ifdef CONFIG_PROC_FS | |
471 | ||
472 | /* This value is very much based on testing */ | |
473 | #define BIG_BUF_SIZE (500 + NUM_TIMER_STATS * 300) | |
474 | ||
475 | static int proc_fasttimer_read(char *buf, char **start, off_t offset, int len | |
7a3e965a | 476 | ,int *eof, void *data_unused) |
51533b61 MS |
477 | { |
478 | unsigned long flags; | |
479 | int i = 0; | |
480 | int num_to_show; | |
ec87ee20 | 481 | struct fasttime_t tv; |
51533b61 MS |
482 | struct fast_timer *t, *nextt; |
483 | static char *bigbuf = NULL; | |
484 | static unsigned long used; | |
485 | ||
ec87ee20 JN |
486 | if (!bigbuf) { |
487 | bigbuf = vmalloc(BIG_BUF_SIZE); | |
488 | if (!bigbuf) { | |
489 | used = 0; | |
490 | if (buf) | |
491 | buf[0] = '\0'; | |
492 | return 0; | |
493 | } | |
494 | } | |
495 | ||
496 | if (!offset || !used) { | |
51533b61 MS |
497 | do_gettimeofday_fast(&tv); |
498 | ||
499 | used = 0; | |
500 | used += sprintf(bigbuf + used, "Fast timers added: %i\n", | |
501 | fast_timers_added); | |
502 | used += sprintf(bigbuf + used, "Fast timers started: %i\n", | |
503 | fast_timers_started); | |
504 | used += sprintf(bigbuf + used, "Fast timer interrupts: %i\n", | |
505 | fast_timer_ints); | |
506 | used += sprintf(bigbuf + used, "Fast timers expired: %i\n", | |
507 | fast_timers_expired); | |
508 | used += sprintf(bigbuf + used, "Fast timers deleted: %i\n", | |
509 | fast_timers_deleted); | |
510 | used += sprintf(bigbuf + used, "Fast timer running: %s\n", | |
511 | fast_timer_running ? "yes" : "no"); | |
512 | used += sprintf(bigbuf + used, "Current time: %lu.%06lu\n", | |
ec87ee20 | 513 | (unsigned long)tv.tv_jiff, |
51533b61 MS |
514 | (unsigned long)tv.tv_usec); |
515 | #ifdef FAST_TIMER_SANITY_CHECKS | |
516 | used += sprintf(bigbuf + used, "Sanity failed: %i\n", | |
517 | sanity_failed); | |
518 | #endif | |
519 | used += sprintf(bigbuf + used, "\n"); | |
520 | ||
521 | #ifdef DEBUG_LOG_INCLUDED | |
522 | { | |
523 | int end_i = debug_log_cnt; | |
524 | i = 0; | |
525 | ||
ec87ee20 | 526 | if (debug_log_cnt_wrapped) |
51533b61 | 527 | i = debug_log_cnt; |
51533b61 MS |
528 | |
529 | while ((i != end_i || (debug_log_cnt_wrapped && !used)) && | |
530 | used+100 < BIG_BUF_SIZE) | |
531 | { | |
532 | used += sprintf(bigbuf + used, debug_log_string[i], | |
533 | debug_log_value[i]); | |
534 | i = (i+1) % DEBUG_LOG_MAX; | |
535 | } | |
536 | } | |
537 | used += sprintf(bigbuf + used, "\n"); | |
538 | #endif | |
539 | ||
540 | num_to_show = (fast_timers_started < NUM_TIMER_STATS ? fast_timers_started: | |
541 | NUM_TIMER_STATS); | |
542 | used += sprintf(bigbuf + used, "Timers started: %i\n", fast_timers_started); | |
543 | for (i = 0; i < num_to_show && (used+100 < BIG_BUF_SIZE) ; i++) | |
544 | { | |
545 | int cur = (fast_timers_started - i - 1) % NUM_TIMER_STATS; | |
546 | ||
547 | #if 1 //ndef FAST_TIMER_LOG | |
548 | used += sprintf(bigbuf + used, "div: %i delay: %i" | |
549 | "\n", | |
550 | timer_div_settings[cur], | |
551 | timer_delay_settings[cur] | |
552 | ); | |
553 | #endif | |
554 | #ifdef FAST_TIMER_LOG | |
555 | t = &timer_started_log[cur]; | |
556 | used += sprintf(bigbuf + used, "%-14s s: %6lu.%06lu e: %6lu.%06lu " | |
557 | "d: %6li us data: 0x%08lX" | |
558 | "\n", | |
559 | t->name, | |
ec87ee20 | 560 | (unsigned long)t->tv_set.tv_jiff, |
51533b61 | 561 | (unsigned long)t->tv_set.tv_usec, |
ec87ee20 | 562 | (unsigned long)t->tv_expires.tv_jiff, |
51533b61 MS |
563 | (unsigned long)t->tv_expires.tv_usec, |
564 | t->delay_us, | |
565 | t->data | |
566 | ); | |
567 | #endif | |
568 | } | |
569 | used += sprintf(bigbuf + used, "\n"); | |
570 | ||
571 | #ifdef FAST_TIMER_LOG | |
572 | num_to_show = (fast_timers_added < NUM_TIMER_STATS ? fast_timers_added: | |
573 | NUM_TIMER_STATS); | |
574 | used += sprintf(bigbuf + used, "Timers added: %i\n", fast_timers_added); | |
575 | for (i = 0; i < num_to_show && (used+100 < BIG_BUF_SIZE); i++) | |
576 | { | |
577 | t = &timer_added_log[(fast_timers_added - i - 1) % NUM_TIMER_STATS]; | |
578 | used += sprintf(bigbuf + used, "%-14s s: %6lu.%06lu e: %6lu.%06lu " | |
579 | "d: %6li us data: 0x%08lX" | |
580 | "\n", | |
581 | t->name, | |
ec87ee20 | 582 | (unsigned long)t->tv_set.tv_jiff, |
51533b61 | 583 | (unsigned long)t->tv_set.tv_usec, |
ec87ee20 | 584 | (unsigned long)t->tv_expires.tv_jiff, |
51533b61 MS |
585 | (unsigned long)t->tv_expires.tv_usec, |
586 | t->delay_us, | |
587 | t->data | |
588 | ); | |
589 | } | |
590 | used += sprintf(bigbuf + used, "\n"); | |
591 | ||
592 | num_to_show = (fast_timers_expired < NUM_TIMER_STATS ? fast_timers_expired: | |
593 | NUM_TIMER_STATS); | |
594 | used += sprintf(bigbuf + used, "Timers expired: %i\n", fast_timers_expired); | |
595 | for (i = 0; i < num_to_show && (used+100 < BIG_BUF_SIZE); i++) | |
596 | { | |
597 | t = &timer_expired_log[(fast_timers_expired - i - 1) % NUM_TIMER_STATS]; | |
598 | used += sprintf(bigbuf + used, "%-14s s: %6lu.%06lu e: %6lu.%06lu " | |
599 | "d: %6li us data: 0x%08lX" | |
600 | "\n", | |
601 | t->name, | |
ec87ee20 | 602 | (unsigned long)t->tv_set.tv_jiff, |
51533b61 | 603 | (unsigned long)t->tv_set.tv_usec, |
ec87ee20 | 604 | (unsigned long)t->tv_expires.tv_jiff, |
51533b61 MS |
605 | (unsigned long)t->tv_expires.tv_usec, |
606 | t->delay_us, | |
607 | t->data | |
608 | ); | |
609 | } | |
610 | used += sprintf(bigbuf + used, "\n"); | |
611 | #endif | |
612 | ||
613 | used += sprintf(bigbuf + used, "Active timers:\n"); | |
614 | local_irq_save(flags); | |
51533b61 MS |
615 | t = fast_timer_list; |
616 | while (t != NULL && (used+100 < BIG_BUF_SIZE)) | |
617 | { | |
618 | nextt = t->next; | |
619 | local_irq_restore(flags); | |
620 | used += sprintf(bigbuf + used, "%-14s s: %6lu.%06lu e: %6lu.%06lu " | |
ec87ee20 JN |
621 | "d: %6li us data: 0x%08lX" |
622 | /* " func: 0x%08lX" */ | |
623 | "\n", | |
624 | t->name, | |
625 | (unsigned long)t->tv_set.tv_jiff, | |
626 | (unsigned long)t->tv_set.tv_usec, | |
627 | (unsigned long)t->tv_expires.tv_jiff, | |
628 | (unsigned long)t->tv_expires.tv_usec, | |
51533b61 MS |
629 | t->delay_us, |
630 | t->data | |
631 | /* , t->function */ | |
632 | ); | |
ec87ee20 | 633 | local_irq_save(flags); |
51533b61 MS |
634 | if (t->next != nextt) |
635 | { | |
636 | printk("timer removed!\n"); | |
637 | } | |
638 | t = nextt; | |
639 | } | |
640 | local_irq_restore(flags); | |
641 | } | |
642 | ||
643 | if (used - offset < len) | |
644 | { | |
645 | len = used - offset; | |
646 | } | |
647 | ||
648 | memcpy(buf, bigbuf + offset, len); | |
649 | *start = buf; | |
51533b61 | 650 | *eof = 1; |
51533b61 MS |
651 | |
652 | return len; | |
653 | } | |
654 | #endif /* PROC_FS */ | |
655 | ||
656 | #ifdef FAST_TIMER_TEST | |
657 | static volatile unsigned long i = 0; | |
658 | static volatile int num_test_timeout = 0; | |
659 | static struct fast_timer tr[10]; | |
660 | static int exp_num[10]; | |
661 | ||
ec87ee20 | 662 | static struct fasttime_t tv_exp[100]; |
51533b61 MS |
663 | |
664 | static void test_timeout(unsigned long data) | |
665 | { | |
666 | do_gettimeofday_fast(&tv_exp[data]); | |
667 | exp_num[data] = num_test_timeout; | |
668 | ||
669 | num_test_timeout++; | |
670 | } | |
671 | ||
672 | static void test_timeout1(unsigned long data) | |
673 | { | |
674 | do_gettimeofday_fast(&tv_exp[data]); | |
675 | exp_num[data] = num_test_timeout; | |
676 | if (data < 7) | |
677 | { | |
678 | start_one_shot_timer(&tr[i], test_timeout1, i, 1000, "timeout1"); | |
679 | i++; | |
680 | } | |
681 | num_test_timeout++; | |
682 | } | |
683 | ||
684 | DP( | |
685 | static char buf0[2000]; | |
686 | static char buf1[2000]; | |
687 | static char buf2[2000]; | |
688 | static char buf3[2000]; | |
689 | static char buf4[2000]; | |
690 | ); | |
691 | ||
692 | static char buf5[6000]; | |
693 | static int j_u[1000]; | |
694 | ||
695 | static void fast_timer_test(void) | |
696 | { | |
697 | int prev_num; | |
698 | int j; | |
699 | ||
ec87ee20 | 700 | struct fasttime_t tv, tv0, tv1, tv2; |
51533b61 MS |
701 | |
702 | printk("fast_timer_test() start\n"); | |
703 | do_gettimeofday_fast(&tv); | |
704 | ||
705 | for (j = 0; j < 1000; j++) | |
706 | { | |
707 | j_u[j] = GET_JIFFIES_USEC(); | |
708 | } | |
709 | for (j = 0; j < 100; j++) | |
710 | { | |
711 | do_gettimeofday_fast(&tv_exp[j]); | |
712 | } | |
ec87ee20 | 713 | printk(KERN_DEBUG "fast_timer_test() %is %06i\n", tv.tv_jiff, tv.tv_usec); |
51533b61 MS |
714 | |
715 | for (j = 0; j < 1000; j++) | |
716 | { | |
ec87ee20 JN |
717 | printk(KERN_DEBUG "%i %i %i %i %i\n", |
718 | j_u[j], j_u[j+1], j_u[j+2], j_u[j+3], j_u[j+4]); | |
51533b61 MS |
719 | j += 4; |
720 | } | |
721 | for (j = 0; j < 100; j++) | |
722 | { | |
ec87ee20 JN |
723 | printk(KERN_DEBUG "%i.%i %i.%i %i.%i %i.%i %i.%i\n", |
724 | tv_exp[j].tv_jiff, tv_exp[j].tv_usec, | |
725 | tv_exp[j+1].tv_jiff, tv_exp[j+1].tv_usec, | |
726 | tv_exp[j+2].tv_jiff, tv_exp[j+2].tv_usec, | |
727 | tv_exp[j+3].tv_jiff, tv_exp[j+3].tv_usec, | |
728 | tv_exp[j+4].tv_jiff, tv_exp[j+4].tv_usec); | |
51533b61 MS |
729 | j += 4; |
730 | } | |
731 | do_gettimeofday_fast(&tv0); | |
732 | start_one_shot_timer(&tr[i], test_timeout, i, 50000, "test0"); | |
733 | DP(proc_fasttimer_read(buf0, NULL, 0, 0, 0)); | |
734 | i++; | |
735 | start_one_shot_timer(&tr[i], test_timeout, i, 70000, "test1"); | |
736 | DP(proc_fasttimer_read(buf1, NULL, 0, 0, 0)); | |
737 | i++; | |
738 | start_one_shot_timer(&tr[i], test_timeout, i, 40000, "test2"); | |
739 | DP(proc_fasttimer_read(buf2, NULL, 0, 0, 0)); | |
740 | i++; | |
741 | start_one_shot_timer(&tr[i], test_timeout, i, 60000, "test3"); | |
742 | DP(proc_fasttimer_read(buf3, NULL, 0, 0, 0)); | |
743 | i++; | |
744 | start_one_shot_timer(&tr[i], test_timeout1, i, 55000, "test4xx"); | |
745 | DP(proc_fasttimer_read(buf4, NULL, 0, 0, 0)); | |
746 | i++; | |
747 | do_gettimeofday_fast(&tv1); | |
748 | ||
749 | proc_fasttimer_read(buf5, NULL, 0, 0, 0); | |
750 | ||
751 | prev_num = num_test_timeout; | |
752 | while (num_test_timeout < i) | |
753 | { | |
754 | if (num_test_timeout != prev_num) | |
51533b61 | 755 | prev_num = num_test_timeout; |
51533b61 MS |
756 | } |
757 | do_gettimeofday_fast(&tv2); | |
ec87ee20 JN |
758 | printk(KERN_INFO "Timers started %is %06i\n", |
759 | tv0.tv_jiff, tv0.tv_usec); | |
760 | printk(KERN_INFO "Timers started at %is %06i\n", | |
761 | tv1.tv_jiff, tv1.tv_usec); | |
762 | printk(KERN_INFO "Timers done %is %06i\n", | |
763 | tv2.tv_jiff, tv2.tv_usec); | |
51533b61 MS |
764 | DP(printk("buf0:\n"); |
765 | printk(buf0); | |
766 | printk("buf1:\n"); | |
767 | printk(buf1); | |
768 | printk("buf2:\n"); | |
769 | printk(buf2); | |
770 | printk("buf3:\n"); | |
771 | printk(buf3); | |
772 | printk("buf4:\n"); | |
773 | printk(buf4); | |
774 | ); | |
775 | printk("buf5:\n"); | |
776 | printk(buf5); | |
777 | ||
778 | printk("timers set:\n"); | |
779 | for(j = 0; j<i; j++) | |
780 | { | |
781 | struct fast_timer *t = &tr[j]; | |
782 | printk("%-10s set: %6is %06ius exp: %6is %06ius " | |
783 | "data: 0x%08X func: 0x%08X\n", | |
784 | t->name, | |
ec87ee20 | 785 | t->tv_set.tv_jiff, |
51533b61 | 786 | t->tv_set.tv_usec, |
ec87ee20 | 787 | t->tv_expires.tv_jiff, |
51533b61 MS |
788 | t->tv_expires.tv_usec, |
789 | t->data, | |
790 | t->function | |
791 | ); | |
792 | ||
793 | printk(" del: %6ius did exp: %6is %06ius as #%i error: %6li\n", | |
794 | t->delay_us, | |
ec87ee20 | 795 | tv_exp[j].tv_jiff, |
51533b61 MS |
796 | tv_exp[j].tv_usec, |
797 | exp_num[j], | |
ec87ee20 JN |
798 | (tv_exp[j].tv_jiff - t->tv_expires.tv_jiff) * |
799 | 1000000 + tv_exp[j].tv_usec - | |
800 | t->tv_expires.tv_usec); | |
51533b61 MS |
801 | } |
802 | proc_fasttimer_read(buf5, NULL, 0, 0, 0); | |
803 | printk("buf5 after all done:\n"); | |
804 | printk(buf5); | |
805 | printk("fast_timer_test() done\n"); | |
806 | } | |
807 | #endif | |
808 | ||
809 | ||
ec87ee20 | 810 | int fast_timer_init(void) |
51533b61 MS |
811 | { |
812 | /* For some reason, request_irq() hangs when called froom time_init() */ | |
813 | if (!fast_timer_is_init) | |
814 | { | |
815 | printk("fast_timer_init()\n"); | |
816 | ||
817 | #ifdef CONFIG_PROC_FS | |
e784788d | 818 | create_proc_read_entry("fasttimer", 0, NULL, proc_fasttimer_read, NULL); |
51533b61 | 819 | #endif /* PROC_FS */ |
ec87ee20 JN |
820 | if (request_irq(TIMER0_INTR_VECT, timer_trig_interrupt, |
821 | IRQF_SHARED | IRQF_DISABLED, | |
822 | "fast timer int", &fast_timer_list)) | |
823 | printk(KERN_ERR "err: fasttimer irq\n"); | |
51533b61 MS |
824 | fast_timer_is_init = 1; |
825 | #ifdef FAST_TIMER_TEST | |
826 | printk("do test\n"); | |
827 | fast_timer_test(); | |
828 | #endif | |
829 | } | |
ec87ee20 | 830 | return 0; |
51533b61 | 831 | } |
ec87ee20 | 832 | __initcall(fast_timer_init); |