a4536e1e3e2ab7f0e298322e2217474a2f05579d
[cascardo/linux.git] / kernel / time / timer_list.c
1 /*
2  * kernel/time/timer_list.c
3  *
4  * List pending timers
5  *
6  * Copyright(C) 2006, Red Hat, Inc., Ingo Molnar
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License version 2 as
10  * published by the Free Software Foundation.
11  */
12
13 #include <linux/proc_fs.h>
14 #include <linux/module.h>
15 #include <linux/spinlock.h>
16 #include <linux/sched.h>
17 #include <linux/seq_file.h>
18 #include <linux/kallsyms.h>
19
20 #include <asm/uaccess.h>
21
22 #include "tick-internal.h"
23
24 struct timer_list_iter {
25         int cpu;
26         bool second_pass;
27         u64 now;
28 };
29
30 typedef void (*print_fn_t)(struct seq_file *m, unsigned int *classes);
31
32 /*
33  * This allows printing both to /proc/timer_list and
34  * to the console (on SysRq-Q):
35  */
36 __printf(2, 3)
37 static void SEQ_printf(struct seq_file *m, const char *fmt, ...)
38 {
39         va_list args;
40
41         va_start(args, fmt);
42
43         if (m)
44                 seq_vprintf(m, fmt, args);
45         else
46                 vprintk(fmt, args);
47
48         va_end(args);
49 }
50
51 static void print_name_offset(struct seq_file *m, void *sym)
52 {
53         char symname[KSYM_NAME_LEN];
54
55         if (lookup_symbol_name((unsigned long)sym, symname) < 0)
56                 SEQ_printf(m, "<%pK>", sym);
57         else
58                 SEQ_printf(m, "%s", symname);
59 }
60
61 static void
62 print_timer(struct seq_file *m, struct hrtimer *taddr, struct hrtimer *timer,
63             int idx, u64 now)
64 {
65 #ifdef CONFIG_TIMER_STATS
66         char tmp[TASK_COMM_LEN + 1];
67 #endif
68         SEQ_printf(m, " #%d: ", idx);
69         print_name_offset(m, taddr);
70         SEQ_printf(m, ", ");
71         print_name_offset(m, timer->function);
72         SEQ_printf(m, ", S:%02lx", timer->state);
73 #ifdef CONFIG_TIMER_STATS
74         SEQ_printf(m, ", ");
75         print_name_offset(m, timer->start_site);
76         memcpy(tmp, timer->start_comm, TASK_COMM_LEN);
77         tmp[TASK_COMM_LEN] = 0;
78         SEQ_printf(m, ", %s/%d", tmp, timer->start_pid);
79 #endif
80         SEQ_printf(m, "\n");
81         SEQ_printf(m, " # expires at %Lu-%Lu nsecs [in %Ld to %Ld nsecs]\n",
82                 (unsigned long long)ktime_to_ns(hrtimer_get_softexpires(timer)),
83                 (unsigned long long)ktime_to_ns(hrtimer_get_expires(timer)),
84                 (long long)(ktime_to_ns(hrtimer_get_softexpires(timer)) - now),
85                 (long long)(ktime_to_ns(hrtimer_get_expires(timer)) - now));
86 }
87
88 static void
89 print_active_timers(struct seq_file *m, struct hrtimer_clock_base *base,
90                     u64 now)
91 {
92         struct hrtimer *timer, tmp;
93         unsigned long next = 0, i;
94         struct timerqueue_node *curr;
95         unsigned long flags;
96
97 next_one:
98         i = 0;
99         raw_spin_lock_irqsave(&base->cpu_base->lock, flags);
100
101         curr = timerqueue_getnext(&base->active);
102         /*
103          * Crude but we have to do this O(N*N) thing, because
104          * we have to unlock the base when printing:
105          */
106         while (curr && i < next) {
107                 curr = timerqueue_iterate_next(curr);
108                 i++;
109         }
110
111         if (curr) {
112
113                 timer = container_of(curr, struct hrtimer, node);
114                 tmp = *timer;
115                 raw_spin_unlock_irqrestore(&base->cpu_base->lock, flags);
116
117                 print_timer(m, timer, &tmp, i, now);
118                 next++;
119                 goto next_one;
120         }
121         raw_spin_unlock_irqrestore(&base->cpu_base->lock, flags);
122 }
123
124 static void
125 print_base(struct seq_file *m, struct hrtimer_clock_base *base, u64 now)
126 {
127         SEQ_printf(m, "  .base:       %pK\n", base);
128         SEQ_printf(m, "  .index:      %d\n", base->index);
129
130         SEQ_printf(m, "  .resolution: %u nsecs\n", (unsigned) hrtimer_resolution);
131
132         SEQ_printf(m,   "  .get_time:   ");
133         print_name_offset(m, base->get_time);
134         SEQ_printf(m,   "\n");
135 #ifdef CONFIG_HIGH_RES_TIMERS
136         SEQ_printf(m, "  .offset:     %Lu nsecs\n",
137                    (unsigned long long) ktime_to_ns(base->offset));
138 #endif
139         SEQ_printf(m,   "active timers:\n");
140         print_active_timers(m, base, now);
141 }
142
143 static void print_cpu(struct seq_file *m, int cpu, u64 now)
144 {
145         struct hrtimer_cpu_base *cpu_base = &per_cpu(hrtimer_bases, cpu);
146         int i;
147
148         SEQ_printf(m, "cpu: %d\n", cpu);
149         for (i = 0; i < HRTIMER_MAX_CLOCK_BASES; i++) {
150                 SEQ_printf(m, " clock %d:\n", i);
151                 print_base(m, cpu_base->clock_base + i, now);
152         }
153 #define P(x) \
154         SEQ_printf(m, "  .%-15s: %Lu\n", #x, \
155                    (unsigned long long)(cpu_base->x))
156 #define P_ns(x) \
157         SEQ_printf(m, "  .%-15s: %Lu nsecs\n", #x, \
158                    (unsigned long long)(ktime_to_ns(cpu_base->x)))
159
160 #ifdef CONFIG_HIGH_RES_TIMERS
161         P_ns(expires_next);
162         P(hres_active);
163         P(nr_events);
164         P(nr_retries);
165         P(nr_hangs);
166         P(max_hang_time);
167 #endif
168 #undef P
169 #undef P_ns
170
171 #ifdef CONFIG_TICK_ONESHOT
172 # define P(x) \
173         SEQ_printf(m, "  .%-15s: %Lu\n", #x, \
174                    (unsigned long long)(ts->x))
175 # define P_ns(x) \
176         SEQ_printf(m, "  .%-15s: %Lu nsecs\n", #x, \
177                    (unsigned long long)(ktime_to_ns(ts->x)))
178         {
179                 struct tick_sched *ts = tick_get_tick_sched(cpu);
180                 P(nohz_mode);
181                 P_ns(last_tick);
182                 P(tick_stopped);
183                 P(idle_jiffies);
184                 P(idle_calls);
185                 P(idle_sleeps);
186                 P_ns(idle_entrytime);
187                 P_ns(idle_waketime);
188                 P_ns(idle_exittime);
189                 P_ns(idle_sleeptime);
190                 P_ns(iowait_sleeptime);
191                 P(last_jiffies);
192                 P(next_timer);
193                 P_ns(idle_expires);
194                 SEQ_printf(m, "jiffies: %Lu\n",
195                            (unsigned long long)jiffies);
196         }
197 #endif
198
199 #undef P
200 #undef P_ns
201         SEQ_printf(m, "\n");
202 }
203
204 #ifdef CONFIG_GENERIC_CLOCKEVENTS
205 static void
206 print_tickdevice(struct seq_file *m, struct tick_device *td, int cpu)
207 {
208         struct clock_event_device *dev = td->evtdev;
209
210         SEQ_printf(m, "Tick Device: mode:     %d\n", td->mode);
211         if (cpu < 0)
212                 SEQ_printf(m, "Broadcast device\n");
213         else
214                 SEQ_printf(m, "Per CPU device: %d\n", cpu);
215
216         SEQ_printf(m, "Clock Event Device: ");
217         if (!dev) {
218                 SEQ_printf(m, "<NULL>\n");
219                 return;
220         }
221         SEQ_printf(m, "%s\n", dev->name);
222         SEQ_printf(m, " max_delta_ns:   %llu\n",
223                    (unsigned long long) dev->max_delta_ns);
224         SEQ_printf(m, " min_delta_ns:   %llu\n",
225                    (unsigned long long) dev->min_delta_ns);
226         SEQ_printf(m, " mult:           %u\n", dev->mult);
227         SEQ_printf(m, " shift:          %u\n", dev->shift);
228         SEQ_printf(m, " mode:           %d\n", dev->mode);
229         SEQ_printf(m, " next_event:     %Ld nsecs\n",
230                    (unsigned long long) ktime_to_ns(dev->next_event));
231
232         SEQ_printf(m, " set_next_event: ");
233         print_name_offset(m, dev->set_next_event);
234         SEQ_printf(m, "\n");
235
236         if (dev->set_mode) {
237                 SEQ_printf(m, " set_mode:       ");
238                 print_name_offset(m, dev->set_mode);
239                 SEQ_printf(m, "\n");
240         } else {
241                 if (dev->set_state_shutdown) {
242                         SEQ_printf(m, " shutdown: ");
243                         print_name_offset(m, dev->set_state_shutdown);
244                         SEQ_printf(m, "\n");
245                 }
246
247                 if (dev->set_state_periodic) {
248                         SEQ_printf(m, " periodic: ");
249                         print_name_offset(m, dev->set_state_periodic);
250                         SEQ_printf(m, "\n");
251                 }
252
253                 if (dev->set_state_oneshot) {
254                         SEQ_printf(m, " oneshot:  ");
255                         print_name_offset(m, dev->set_state_oneshot);
256                         SEQ_printf(m, "\n");
257                 }
258
259                 if (dev->set_state_oneshot_stopped) {
260                         SEQ_printf(m, " oneshot stopped: ");
261                         print_name_offset(m, dev->set_state_oneshot_stopped);
262                         SEQ_printf(m, "\n");
263                 }
264
265                 if (dev->tick_resume) {
266                         SEQ_printf(m, " resume:   ");
267                         print_name_offset(m, dev->tick_resume);
268                         SEQ_printf(m, "\n");
269                 }
270         }
271
272         SEQ_printf(m, " event_handler:  ");
273         print_name_offset(m, dev->event_handler);
274         SEQ_printf(m, "\n");
275         SEQ_printf(m, " retries:        %lu\n", dev->retries);
276         SEQ_printf(m, "\n");
277 }
278
279 static void timer_list_show_tickdevices_header(struct seq_file *m)
280 {
281 #ifdef CONFIG_GENERIC_CLOCKEVENTS_BROADCAST
282         print_tickdevice(m, tick_get_broadcast_device(), -1);
283         SEQ_printf(m, "tick_broadcast_mask: %*pb\n",
284                    cpumask_pr_args(tick_get_broadcast_mask()));
285 #ifdef CONFIG_TICK_ONESHOT
286         SEQ_printf(m, "tick_broadcast_oneshot_mask: %*pb\n",
287                    cpumask_pr_args(tick_get_broadcast_oneshot_mask()));
288 #endif
289         SEQ_printf(m, "\n");
290 #endif
291 }
292 #endif
293
294 static inline void timer_list_header(struct seq_file *m, u64 now)
295 {
296         SEQ_printf(m, "Timer List Version: v0.8\n");
297         SEQ_printf(m, "HRTIMER_MAX_CLOCK_BASES: %d\n", HRTIMER_MAX_CLOCK_BASES);
298         SEQ_printf(m, "now at %Ld nsecs\n", (unsigned long long)now);
299         SEQ_printf(m, "\n");
300 }
301
302 static int timer_list_show(struct seq_file *m, void *v)
303 {
304         struct timer_list_iter *iter = v;
305
306         if (iter->cpu == -1 && !iter->second_pass)
307                 timer_list_header(m, iter->now);
308         else if (!iter->second_pass)
309                 print_cpu(m, iter->cpu, iter->now);
310 #ifdef CONFIG_GENERIC_CLOCKEVENTS
311         else if (iter->cpu == -1 && iter->second_pass)
312                 timer_list_show_tickdevices_header(m);
313         else
314                 print_tickdevice(m, tick_get_device(iter->cpu), iter->cpu);
315 #endif
316         return 0;
317 }
318
319 void sysrq_timer_list_show(void)
320 {
321         u64 now = ktime_to_ns(ktime_get());
322         int cpu;
323
324         timer_list_header(NULL, now);
325
326         for_each_online_cpu(cpu)
327                 print_cpu(NULL, cpu, now);
328
329 #ifdef CONFIG_GENERIC_CLOCKEVENTS
330         timer_list_show_tickdevices_header(NULL);
331         for_each_online_cpu(cpu)
332                 print_tickdevice(NULL, tick_get_device(cpu), cpu);
333 #endif
334         return;
335 }
336
337 static void *move_iter(struct timer_list_iter *iter, loff_t offset)
338 {
339         for (; offset; offset--) {
340                 iter->cpu = cpumask_next(iter->cpu, cpu_online_mask);
341                 if (iter->cpu >= nr_cpu_ids) {
342 #ifdef CONFIG_GENERIC_CLOCKEVENTS
343                         if (!iter->second_pass) {
344                                 iter->cpu = -1;
345                                 iter->second_pass = true;
346                         } else
347                                 return NULL;
348 #else
349                         return NULL;
350 #endif
351                 }
352         }
353         return iter;
354 }
355
356 static void *timer_list_start(struct seq_file *file, loff_t *offset)
357 {
358         struct timer_list_iter *iter = file->private;
359
360         if (!*offset)
361                 iter->now = ktime_to_ns(ktime_get());
362         iter->cpu = -1;
363         iter->second_pass = false;
364         return move_iter(iter, *offset);
365 }
366
367 static void *timer_list_next(struct seq_file *file, void *v, loff_t *offset)
368 {
369         struct timer_list_iter *iter = file->private;
370         ++*offset;
371         return move_iter(iter, 1);
372 }
373
374 static void timer_list_stop(struct seq_file *seq, void *v)
375 {
376 }
377
378 static const struct seq_operations timer_list_sops = {
379         .start = timer_list_start,
380         .next = timer_list_next,
381         .stop = timer_list_stop,
382         .show = timer_list_show,
383 };
384
385 static int timer_list_open(struct inode *inode, struct file *filp)
386 {
387         return seq_open_private(filp, &timer_list_sops,
388                         sizeof(struct timer_list_iter));
389 }
390
391 static const struct file_operations timer_list_fops = {
392         .open           = timer_list_open,
393         .read           = seq_read,
394         .llseek         = seq_lseek,
395         .release        = seq_release_private,
396 };
397
398 static int __init init_timer_list_procfs(void)
399 {
400         struct proc_dir_entry *pe;
401
402         pe = proc_create("timer_list", 0444, NULL, &timer_list_fops);
403         if (!pe)
404                 return -ENOMEM;
405         return 0;
406 }
407 __initcall(init_timer_list_procfs);