]> git.kernelconcepts.de Git - karo-tx-linux.git/blob - kernel/trace/ftrace.c
w1: omap-hdq: fix error return code in omap_hdq_probe()
[karo-tx-linux.git] / kernel / trace / ftrace.c
1 /*
2  * Infrastructure for profiling code inserted by 'gcc -pg'.
3  *
4  * Copyright (C) 2007-2008 Steven Rostedt <srostedt@redhat.com>
5  * Copyright (C) 2004-2008 Ingo Molnar <mingo@redhat.com>
6  *
7  * Originally ported from the -rt patch by:
8  *   Copyright (C) 2007 Arnaldo Carvalho de Melo <acme@redhat.com>
9  *
10  * Based on code in the latency_tracer, that is:
11  *
12  *  Copyright (C) 2004-2006 Ingo Molnar
13  *  Copyright (C) 2004 Nadia Yvette Chambers
14  */
15
16 #include <linux/stop_machine.h>
17 #include <linux/clocksource.h>
18 #include <linux/sched/task.h>
19 #include <linux/kallsyms.h>
20 #include <linux/seq_file.h>
21 #include <linux/suspend.h>
22 #include <linux/tracefs.h>
23 #include <linux/hardirq.h>
24 #include <linux/kthread.h>
25 #include <linux/uaccess.h>
26 #include <linux/bsearch.h>
27 #include <linux/module.h>
28 #include <linux/ftrace.h>
29 #include <linux/sysctl.h>
30 #include <linux/slab.h>
31 #include <linux/ctype.h>
32 #include <linux/sort.h>
33 #include <linux/list.h>
34 #include <linux/hash.h>
35 #include <linux/rcupdate.h>
36
37 #include <trace/events/sched.h>
38
39 #include <asm/sections.h>
40 #include <asm/setup.h>
41
42 #include "trace_output.h"
43 #include "trace_stat.h"
44
45 #define FTRACE_WARN_ON(cond)                    \
46         ({                                      \
47                 int ___r = cond;                \
48                 if (WARN_ON(___r))              \
49                         ftrace_kill();          \
50                 ___r;                           \
51         })
52
53 #define FTRACE_WARN_ON_ONCE(cond)               \
54         ({                                      \
55                 int ___r = cond;                \
56                 if (WARN_ON_ONCE(___r))         \
57                         ftrace_kill();          \
58                 ___r;                           \
59         })
60
61 /* hash bits for specific function selection */
62 #define FTRACE_HASH_BITS 7
63 #define FTRACE_FUNC_HASHSIZE (1 << FTRACE_HASH_BITS)
64 #define FTRACE_HASH_DEFAULT_BITS 10
65 #define FTRACE_HASH_MAX_BITS 12
66
67 #ifdef CONFIG_DYNAMIC_FTRACE
68 #define INIT_OPS_HASH(opsname)  \
69         .func_hash              = &opsname.local_hash,                  \
70         .local_hash.regex_lock  = __MUTEX_INITIALIZER(opsname.local_hash.regex_lock),
71 #define ASSIGN_OPS_HASH(opsname, val) \
72         .func_hash              = val, \
73         .local_hash.regex_lock  = __MUTEX_INITIALIZER(opsname.local_hash.regex_lock),
74 #else
75 #define INIT_OPS_HASH(opsname)
76 #define ASSIGN_OPS_HASH(opsname, val)
77 #endif
78
79 static struct ftrace_ops ftrace_list_end __read_mostly = {
80         .func           = ftrace_stub,
81         .flags          = FTRACE_OPS_FL_RECURSION_SAFE | FTRACE_OPS_FL_STUB,
82         INIT_OPS_HASH(ftrace_list_end)
83 };
84
85 /* ftrace_enabled is a method to turn ftrace on or off */
86 int ftrace_enabled __read_mostly;
87 static int last_ftrace_enabled;
88
89 /* Current function tracing op */
90 struct ftrace_ops *function_trace_op __read_mostly = &ftrace_list_end;
91 /* What to set function_trace_op to */
92 static struct ftrace_ops *set_function_trace_op;
93
94 static bool ftrace_pids_enabled(struct ftrace_ops *ops)
95 {
96         struct trace_array *tr;
97
98         if (!(ops->flags & FTRACE_OPS_FL_PID) || !ops->private)
99                 return false;
100
101         tr = ops->private;
102
103         return tr->function_pids != NULL;
104 }
105
106 static void ftrace_update_trampoline(struct ftrace_ops *ops);
107
108 /*
109  * ftrace_disabled is set when an anomaly is discovered.
110  * ftrace_disabled is much stronger than ftrace_enabled.
111  */
112 static int ftrace_disabled __read_mostly;
113
114 static DEFINE_MUTEX(ftrace_lock);
115
116 static struct ftrace_ops *ftrace_ops_list __read_mostly = &ftrace_list_end;
117 ftrace_func_t ftrace_trace_function __read_mostly = ftrace_stub;
118 static struct ftrace_ops global_ops;
119
120 #if ARCH_SUPPORTS_FTRACE_OPS
121 static void ftrace_ops_list_func(unsigned long ip, unsigned long parent_ip,
122                                  struct ftrace_ops *op, struct pt_regs *regs);
123 #else
124 /* See comment below, where ftrace_ops_list_func is defined */
125 static void ftrace_ops_no_ops(unsigned long ip, unsigned long parent_ip);
126 #define ftrace_ops_list_func ((ftrace_func_t)ftrace_ops_no_ops)
127 #endif
128
129 /*
130  * Traverse the ftrace_global_list, invoking all entries.  The reason that we
131  * can use rcu_dereference_raw_notrace() is that elements removed from this list
132  * are simply leaked, so there is no need to interact with a grace-period
133  * mechanism.  The rcu_dereference_raw_notrace() calls are needed to handle
134  * concurrent insertions into the ftrace_global_list.
135  *
136  * Silly Alpha and silly pointer-speculation compiler optimizations!
137  */
138 #define do_for_each_ftrace_op(op, list)                 \
139         op = rcu_dereference_raw_notrace(list);                 \
140         do
141
142 /*
143  * Optimized for just a single item in the list (as that is the normal case).
144  */
145 #define while_for_each_ftrace_op(op)                            \
146         while (likely(op = rcu_dereference_raw_notrace((op)->next)) &&  \
147                unlikely((op) != &ftrace_list_end))
148
149 static inline void ftrace_ops_init(struct ftrace_ops *ops)
150 {
151 #ifdef CONFIG_DYNAMIC_FTRACE
152         if (!(ops->flags & FTRACE_OPS_FL_INITIALIZED)) {
153                 mutex_init(&ops->local_hash.regex_lock);
154                 ops->func_hash = &ops->local_hash;
155                 ops->flags |= FTRACE_OPS_FL_INITIALIZED;
156         }
157 #endif
158 }
159
160 /**
161  * ftrace_nr_registered_ops - return number of ops registered
162  *
163  * Returns the number of ftrace_ops registered and tracing functions
164  */
165 int ftrace_nr_registered_ops(void)
166 {
167         struct ftrace_ops *ops;
168         int cnt = 0;
169
170         mutex_lock(&ftrace_lock);
171
172         for (ops = ftrace_ops_list;
173              ops != &ftrace_list_end; ops = ops->next)
174                 cnt++;
175
176         mutex_unlock(&ftrace_lock);
177
178         return cnt;
179 }
180
181 static void ftrace_pid_func(unsigned long ip, unsigned long parent_ip,
182                             struct ftrace_ops *op, struct pt_regs *regs)
183 {
184         struct trace_array *tr = op->private;
185
186         if (tr && this_cpu_read(tr->trace_buffer.data->ftrace_ignore_pid))
187                 return;
188
189         op->saved_func(ip, parent_ip, op, regs);
190 }
191
192 /**
193  * clear_ftrace_function - reset the ftrace function
194  *
195  * This NULLs the ftrace function and in essence stops
196  * tracing.  There may be lag
197  */
198 void clear_ftrace_function(void)
199 {
200         ftrace_trace_function = ftrace_stub;
201 }
202
203 static void per_cpu_ops_disable_all(struct ftrace_ops *ops)
204 {
205         int cpu;
206
207         for_each_possible_cpu(cpu)
208                 *per_cpu_ptr(ops->disabled, cpu) = 1;
209 }
210
211 static int per_cpu_ops_alloc(struct ftrace_ops *ops)
212 {
213         int __percpu *disabled;
214
215         if (WARN_ON_ONCE(!(ops->flags & FTRACE_OPS_FL_PER_CPU)))
216                 return -EINVAL;
217
218         disabled = alloc_percpu(int);
219         if (!disabled)
220                 return -ENOMEM;
221
222         ops->disabled = disabled;
223         per_cpu_ops_disable_all(ops);
224         return 0;
225 }
226
227 static void ftrace_sync(struct work_struct *work)
228 {
229         /*
230          * This function is just a stub to implement a hard force
231          * of synchronize_sched(). This requires synchronizing
232          * tasks even in userspace and idle.
233          *
234          * Yes, function tracing is rude.
235          */
236 }
237
238 static void ftrace_sync_ipi(void *data)
239 {
240         /* Probably not needed, but do it anyway */
241         smp_rmb();
242 }
243
244 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
245 static void update_function_graph_func(void);
246
247 /* Both enabled by default (can be cleared by function_graph tracer flags */
248 static bool fgraph_sleep_time = true;
249 static bool fgraph_graph_time = true;
250
251 #else
252 static inline void update_function_graph_func(void) { }
253 #endif
254
255
256 static ftrace_func_t ftrace_ops_get_list_func(struct ftrace_ops *ops)
257 {
258         /*
259          * If this is a dynamic, RCU, or per CPU ops, or we force list func,
260          * then it needs to call the list anyway.
261          */
262         if (ops->flags & (FTRACE_OPS_FL_DYNAMIC | FTRACE_OPS_FL_PER_CPU |
263                           FTRACE_OPS_FL_RCU) || FTRACE_FORCE_LIST_FUNC)
264                 return ftrace_ops_list_func;
265
266         return ftrace_ops_get_func(ops);
267 }
268
269 static void update_ftrace_function(void)
270 {
271         ftrace_func_t func;
272
273         /*
274          * Prepare the ftrace_ops that the arch callback will use.
275          * If there's only one ftrace_ops registered, the ftrace_ops_list
276          * will point to the ops we want.
277          */
278         set_function_trace_op = ftrace_ops_list;
279
280         /* If there's no ftrace_ops registered, just call the stub function */
281         if (ftrace_ops_list == &ftrace_list_end) {
282                 func = ftrace_stub;
283
284         /*
285          * If we are at the end of the list and this ops is
286          * recursion safe and not dynamic and the arch supports passing ops,
287          * then have the mcount trampoline call the function directly.
288          */
289         } else if (ftrace_ops_list->next == &ftrace_list_end) {
290                 func = ftrace_ops_get_list_func(ftrace_ops_list);
291
292         } else {
293                 /* Just use the default ftrace_ops */
294                 set_function_trace_op = &ftrace_list_end;
295                 func = ftrace_ops_list_func;
296         }
297
298         update_function_graph_func();
299
300         /* If there's no change, then do nothing more here */
301         if (ftrace_trace_function == func)
302                 return;
303
304         /*
305          * If we are using the list function, it doesn't care
306          * about the function_trace_ops.
307          */
308         if (func == ftrace_ops_list_func) {
309                 ftrace_trace_function = func;
310                 /*
311                  * Don't even bother setting function_trace_ops,
312                  * it would be racy to do so anyway.
313                  */
314                 return;
315         }
316
317 #ifndef CONFIG_DYNAMIC_FTRACE
318         /*
319          * For static tracing, we need to be a bit more careful.
320          * The function change takes affect immediately. Thus,
321          * we need to coorditate the setting of the function_trace_ops
322          * with the setting of the ftrace_trace_function.
323          *
324          * Set the function to the list ops, which will call the
325          * function we want, albeit indirectly, but it handles the
326          * ftrace_ops and doesn't depend on function_trace_op.
327          */
328         ftrace_trace_function = ftrace_ops_list_func;
329         /*
330          * Make sure all CPUs see this. Yes this is slow, but static
331          * tracing is slow and nasty to have enabled.
332          */
333         schedule_on_each_cpu(ftrace_sync);
334         /* Now all cpus are using the list ops. */
335         function_trace_op = set_function_trace_op;
336         /* Make sure the function_trace_op is visible on all CPUs */
337         smp_wmb();
338         /* Nasty way to force a rmb on all cpus */
339         smp_call_function(ftrace_sync_ipi, NULL, 1);
340         /* OK, we are all set to update the ftrace_trace_function now! */
341 #endif /* !CONFIG_DYNAMIC_FTRACE */
342
343         ftrace_trace_function = func;
344 }
345
346 int using_ftrace_ops_list_func(void)
347 {
348         return ftrace_trace_function == ftrace_ops_list_func;
349 }
350
351 static void add_ftrace_ops(struct ftrace_ops **list, struct ftrace_ops *ops)
352 {
353         ops->next = *list;
354         /*
355          * We are entering ops into the list but another
356          * CPU might be walking that list. We need to make sure
357          * the ops->next pointer is valid before another CPU sees
358          * the ops pointer included into the list.
359          */
360         rcu_assign_pointer(*list, ops);
361 }
362
363 static int remove_ftrace_ops(struct ftrace_ops **list, struct ftrace_ops *ops)
364 {
365         struct ftrace_ops **p;
366
367         /*
368          * If we are removing the last function, then simply point
369          * to the ftrace_stub.
370          */
371         if (*list == ops && ops->next == &ftrace_list_end) {
372                 *list = &ftrace_list_end;
373                 return 0;
374         }
375
376         for (p = list; *p != &ftrace_list_end; p = &(*p)->next)
377                 if (*p == ops)
378                         break;
379
380         if (*p != ops)
381                 return -1;
382
383         *p = (*p)->next;
384         return 0;
385 }
386
387 static void ftrace_update_trampoline(struct ftrace_ops *ops);
388
389 static int __register_ftrace_function(struct ftrace_ops *ops)
390 {
391         if (ops->flags & FTRACE_OPS_FL_DELETED)
392                 return -EINVAL;
393
394         if (WARN_ON(ops->flags & FTRACE_OPS_FL_ENABLED))
395                 return -EBUSY;
396
397 #ifndef CONFIG_DYNAMIC_FTRACE_WITH_REGS
398         /*
399          * If the ftrace_ops specifies SAVE_REGS, then it only can be used
400          * if the arch supports it, or SAVE_REGS_IF_SUPPORTED is also set.
401          * Setting SAVE_REGS_IF_SUPPORTED makes SAVE_REGS irrelevant.
402          */
403         if (ops->flags & FTRACE_OPS_FL_SAVE_REGS &&
404             !(ops->flags & FTRACE_OPS_FL_SAVE_REGS_IF_SUPPORTED))
405                 return -EINVAL;
406
407         if (ops->flags & FTRACE_OPS_FL_SAVE_REGS_IF_SUPPORTED)
408                 ops->flags |= FTRACE_OPS_FL_SAVE_REGS;
409 #endif
410
411         if (!core_kernel_data((unsigned long)ops))
412                 ops->flags |= FTRACE_OPS_FL_DYNAMIC;
413
414         if (ops->flags & FTRACE_OPS_FL_PER_CPU) {
415                 if (per_cpu_ops_alloc(ops))
416                         return -ENOMEM;
417         }
418
419         add_ftrace_ops(&ftrace_ops_list, ops);
420
421         /* Always save the function, and reset at unregistering */
422         ops->saved_func = ops->func;
423
424         if (ftrace_pids_enabled(ops))
425                 ops->func = ftrace_pid_func;
426
427         ftrace_update_trampoline(ops);
428
429         if (ftrace_enabled)
430                 update_ftrace_function();
431
432         return 0;
433 }
434
435 static int __unregister_ftrace_function(struct ftrace_ops *ops)
436 {
437         int ret;
438
439         if (WARN_ON(!(ops->flags & FTRACE_OPS_FL_ENABLED)))
440                 return -EBUSY;
441
442         ret = remove_ftrace_ops(&ftrace_ops_list, ops);
443
444         if (ret < 0)
445                 return ret;
446
447         if (ftrace_enabled)
448                 update_ftrace_function();
449
450         ops->func = ops->saved_func;
451
452         return 0;
453 }
454
455 static void ftrace_update_pid_func(void)
456 {
457         struct ftrace_ops *op;
458
459         /* Only do something if we are tracing something */
460         if (ftrace_trace_function == ftrace_stub)
461                 return;
462
463         do_for_each_ftrace_op(op, ftrace_ops_list) {
464                 if (op->flags & FTRACE_OPS_FL_PID) {
465                         op->func = ftrace_pids_enabled(op) ?
466                                 ftrace_pid_func : op->saved_func;
467                         ftrace_update_trampoline(op);
468                 }
469         } while_for_each_ftrace_op(op);
470
471         update_ftrace_function();
472 }
473
474 #ifdef CONFIG_FUNCTION_PROFILER
475 struct ftrace_profile {
476         struct hlist_node               node;
477         unsigned long                   ip;
478         unsigned long                   counter;
479 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
480         unsigned long long              time;
481         unsigned long long              time_squared;
482 #endif
483 };
484
485 struct ftrace_profile_page {
486         struct ftrace_profile_page      *next;
487         unsigned long                   index;
488         struct ftrace_profile           records[];
489 };
490
491 struct ftrace_profile_stat {
492         atomic_t                        disabled;
493         struct hlist_head               *hash;
494         struct ftrace_profile_page      *pages;
495         struct ftrace_profile_page      *start;
496         struct tracer_stat              stat;
497 };
498
499 #define PROFILE_RECORDS_SIZE                                            \
500         (PAGE_SIZE - offsetof(struct ftrace_profile_page, records))
501
502 #define PROFILES_PER_PAGE                                       \
503         (PROFILE_RECORDS_SIZE / sizeof(struct ftrace_profile))
504
505 static int ftrace_profile_enabled __read_mostly;
506
507 /* ftrace_profile_lock - synchronize the enable and disable of the profiler */
508 static DEFINE_MUTEX(ftrace_profile_lock);
509
510 static DEFINE_PER_CPU(struct ftrace_profile_stat, ftrace_profile_stats);
511
512 #define FTRACE_PROFILE_HASH_BITS 10
513 #define FTRACE_PROFILE_HASH_SIZE (1 << FTRACE_PROFILE_HASH_BITS)
514
515 static void *
516 function_stat_next(void *v, int idx)
517 {
518         struct ftrace_profile *rec = v;
519         struct ftrace_profile_page *pg;
520
521         pg = (struct ftrace_profile_page *)((unsigned long)rec & PAGE_MASK);
522
523  again:
524         if (idx != 0)
525                 rec++;
526
527         if ((void *)rec >= (void *)&pg->records[pg->index]) {
528                 pg = pg->next;
529                 if (!pg)
530                         return NULL;
531                 rec = &pg->records[0];
532                 if (!rec->counter)
533                         goto again;
534         }
535
536         return rec;
537 }
538
539 static void *function_stat_start(struct tracer_stat *trace)
540 {
541         struct ftrace_profile_stat *stat =
542                 container_of(trace, struct ftrace_profile_stat, stat);
543
544         if (!stat || !stat->start)
545                 return NULL;
546
547         return function_stat_next(&stat->start->records[0], 0);
548 }
549
550 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
551 /* function graph compares on total time */
552 static int function_stat_cmp(void *p1, void *p2)
553 {
554         struct ftrace_profile *a = p1;
555         struct ftrace_profile *b = p2;
556
557         if (a->time < b->time)
558                 return -1;
559         if (a->time > b->time)
560                 return 1;
561         else
562                 return 0;
563 }
564 #else
565 /* not function graph compares against hits */
566 static int function_stat_cmp(void *p1, void *p2)
567 {
568         struct ftrace_profile *a = p1;
569         struct ftrace_profile *b = p2;
570
571         if (a->counter < b->counter)
572                 return -1;
573         if (a->counter > b->counter)
574                 return 1;
575         else
576                 return 0;
577 }
578 #endif
579
580 static int function_stat_headers(struct seq_file *m)
581 {
582 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
583         seq_puts(m, "  Function                               "
584                  "Hit    Time            Avg             s^2\n"
585                     "  --------                               "
586                  "---    ----            ---             ---\n");
587 #else
588         seq_puts(m, "  Function                               Hit\n"
589                     "  --------                               ---\n");
590 #endif
591         return 0;
592 }
593
594 static int function_stat_show(struct seq_file *m, void *v)
595 {
596         struct ftrace_profile *rec = v;
597         char str[KSYM_SYMBOL_LEN];
598         int ret = 0;
599 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
600         static struct trace_seq s;
601         unsigned long long avg;
602         unsigned long long stddev;
603 #endif
604         mutex_lock(&ftrace_profile_lock);
605
606         /* we raced with function_profile_reset() */
607         if (unlikely(rec->counter == 0)) {
608                 ret = -EBUSY;
609                 goto out;
610         }
611
612 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
613         avg = rec->time;
614         do_div(avg, rec->counter);
615         if (tracing_thresh && (avg < tracing_thresh))
616                 goto out;
617 #endif
618
619         kallsyms_lookup(rec->ip, NULL, NULL, NULL, str);
620         seq_printf(m, "  %-30.30s  %10lu", str, rec->counter);
621
622 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
623         seq_puts(m, "    ");
624
625         /* Sample standard deviation (s^2) */
626         if (rec->counter <= 1)
627                 stddev = 0;
628         else {
629                 /*
630                  * Apply Welford's method:
631                  * s^2 = 1 / (n * (n-1)) * (n * \Sum (x_i)^2 - (\Sum x_i)^2)
632                  */
633                 stddev = rec->counter * rec->time_squared -
634                          rec->time * rec->time;
635
636                 /*
637                  * Divide only 1000 for ns^2 -> us^2 conversion.
638                  * trace_print_graph_duration will divide 1000 again.
639                  */
640                 do_div(stddev, rec->counter * (rec->counter - 1) * 1000);
641         }
642
643         trace_seq_init(&s);
644         trace_print_graph_duration(rec->time, &s);
645         trace_seq_puts(&s, "    ");
646         trace_print_graph_duration(avg, &s);
647         trace_seq_puts(&s, "    ");
648         trace_print_graph_duration(stddev, &s);
649         trace_print_seq(m, &s);
650 #endif
651         seq_putc(m, '\n');
652 out:
653         mutex_unlock(&ftrace_profile_lock);
654
655         return ret;
656 }
657
658 static void ftrace_profile_reset(struct ftrace_profile_stat *stat)
659 {
660         struct ftrace_profile_page *pg;
661
662         pg = stat->pages = stat->start;
663
664         while (pg) {
665                 memset(pg->records, 0, PROFILE_RECORDS_SIZE);
666                 pg->index = 0;
667                 pg = pg->next;
668         }
669
670         memset(stat->hash, 0,
671                FTRACE_PROFILE_HASH_SIZE * sizeof(struct hlist_head));
672 }
673
674 int ftrace_profile_pages_init(struct ftrace_profile_stat *stat)
675 {
676         struct ftrace_profile_page *pg;
677         int functions;
678         int pages;
679         int i;
680
681         /* If we already allocated, do nothing */
682         if (stat->pages)
683                 return 0;
684
685         stat->pages = (void *)get_zeroed_page(GFP_KERNEL);
686         if (!stat->pages)
687                 return -ENOMEM;
688
689 #ifdef CONFIG_DYNAMIC_FTRACE
690         functions = ftrace_update_tot_cnt;
691 #else
692         /*
693          * We do not know the number of functions that exist because
694          * dynamic tracing is what counts them. With past experience
695          * we have around 20K functions. That should be more than enough.
696          * It is highly unlikely we will execute every function in
697          * the kernel.
698          */
699         functions = 20000;
700 #endif
701
702         pg = stat->start = stat->pages;
703
704         pages = DIV_ROUND_UP(functions, PROFILES_PER_PAGE);
705
706         for (i = 1; i < pages; i++) {
707                 pg->next = (void *)get_zeroed_page(GFP_KERNEL);
708                 if (!pg->next)
709                         goto out_free;
710                 pg = pg->next;
711         }
712
713         return 0;
714
715  out_free:
716         pg = stat->start;
717         while (pg) {
718                 unsigned long tmp = (unsigned long)pg;
719
720                 pg = pg->next;
721                 free_page(tmp);
722         }
723
724         stat->pages = NULL;
725         stat->start = NULL;
726
727         return -ENOMEM;
728 }
729
730 static int ftrace_profile_init_cpu(int cpu)
731 {
732         struct ftrace_profile_stat *stat;
733         int size;
734
735         stat = &per_cpu(ftrace_profile_stats, cpu);
736
737         if (stat->hash) {
738                 /* If the profile is already created, simply reset it */
739                 ftrace_profile_reset(stat);
740                 return 0;
741         }
742
743         /*
744          * We are profiling all functions, but usually only a few thousand
745          * functions are hit. We'll make a hash of 1024 items.
746          */
747         size = FTRACE_PROFILE_HASH_SIZE;
748
749         stat->hash = kzalloc(sizeof(struct hlist_head) * size, GFP_KERNEL);
750
751         if (!stat->hash)
752                 return -ENOMEM;
753
754         /* Preallocate the function profiling pages */
755         if (ftrace_profile_pages_init(stat) < 0) {
756                 kfree(stat->hash);
757                 stat->hash = NULL;
758                 return -ENOMEM;
759         }
760
761         return 0;
762 }
763
764 static int ftrace_profile_init(void)
765 {
766         int cpu;
767         int ret = 0;
768
769         for_each_possible_cpu(cpu) {
770                 ret = ftrace_profile_init_cpu(cpu);
771                 if (ret)
772                         break;
773         }
774
775         return ret;
776 }
777
778 /* interrupts must be disabled */
779 static struct ftrace_profile *
780 ftrace_find_profiled_func(struct ftrace_profile_stat *stat, unsigned long ip)
781 {
782         struct ftrace_profile *rec;
783         struct hlist_head *hhd;
784         unsigned long key;
785
786         key = hash_long(ip, FTRACE_PROFILE_HASH_BITS);
787         hhd = &stat->hash[key];
788
789         if (hlist_empty(hhd))
790                 return NULL;
791
792         hlist_for_each_entry_rcu_notrace(rec, hhd, node) {
793                 if (rec->ip == ip)
794                         return rec;
795         }
796
797         return NULL;
798 }
799
800 static void ftrace_add_profile(struct ftrace_profile_stat *stat,
801                                struct ftrace_profile *rec)
802 {
803         unsigned long key;
804
805         key = hash_long(rec->ip, FTRACE_PROFILE_HASH_BITS);
806         hlist_add_head_rcu(&rec->node, &stat->hash[key]);
807 }
808
809 /*
810  * The memory is already allocated, this simply finds a new record to use.
811  */
812 static struct ftrace_profile *
813 ftrace_profile_alloc(struct ftrace_profile_stat *stat, unsigned long ip)
814 {
815         struct ftrace_profile *rec = NULL;
816
817         /* prevent recursion (from NMIs) */
818         if (atomic_inc_return(&stat->disabled) != 1)
819                 goto out;
820
821         /*
822          * Try to find the function again since an NMI
823          * could have added it
824          */
825         rec = ftrace_find_profiled_func(stat, ip);
826         if (rec)
827                 goto out;
828
829         if (stat->pages->index == PROFILES_PER_PAGE) {
830                 if (!stat->pages->next)
831                         goto out;
832                 stat->pages = stat->pages->next;
833         }
834
835         rec = &stat->pages->records[stat->pages->index++];
836         rec->ip = ip;
837         ftrace_add_profile(stat, rec);
838
839  out:
840         atomic_dec(&stat->disabled);
841
842         return rec;
843 }
844
845 static void
846 function_profile_call(unsigned long ip, unsigned long parent_ip,
847                       struct ftrace_ops *ops, struct pt_regs *regs)
848 {
849         struct ftrace_profile_stat *stat;
850         struct ftrace_profile *rec;
851         unsigned long flags;
852
853         if (!ftrace_profile_enabled)
854                 return;
855
856         local_irq_save(flags);
857
858         stat = this_cpu_ptr(&ftrace_profile_stats);
859         if (!stat->hash || !ftrace_profile_enabled)
860                 goto out;
861
862         rec = ftrace_find_profiled_func(stat, ip);
863         if (!rec) {
864                 rec = ftrace_profile_alloc(stat, ip);
865                 if (!rec)
866                         goto out;
867         }
868
869         rec->counter++;
870  out:
871         local_irq_restore(flags);
872 }
873
874 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
875 static int profile_graph_entry(struct ftrace_graph_ent *trace)
876 {
877         int index = trace->depth;
878
879         function_profile_call(trace->func, 0, NULL, NULL);
880
881         if (index >= 0 && index < FTRACE_RETFUNC_DEPTH)
882                 current->ret_stack[index].subtime = 0;
883
884         return 1;
885 }
886
887 static void profile_graph_return(struct ftrace_graph_ret *trace)
888 {
889         struct ftrace_profile_stat *stat;
890         unsigned long long calltime;
891         struct ftrace_profile *rec;
892         unsigned long flags;
893
894         local_irq_save(flags);
895         stat = this_cpu_ptr(&ftrace_profile_stats);
896         if (!stat->hash || !ftrace_profile_enabled)
897                 goto out;
898
899         /* If the calltime was zero'd ignore it */
900         if (!trace->calltime)
901                 goto out;
902
903         calltime = trace->rettime - trace->calltime;
904
905         if (!fgraph_graph_time) {
906                 int index;
907
908                 index = trace->depth;
909
910                 /* Append this call time to the parent time to subtract */
911                 if (index)
912                         current->ret_stack[index - 1].subtime += calltime;
913
914                 if (current->ret_stack[index].subtime < calltime)
915                         calltime -= current->ret_stack[index].subtime;
916                 else
917                         calltime = 0;
918         }
919
920         rec = ftrace_find_profiled_func(stat, trace->func);
921         if (rec) {
922                 rec->time += calltime;
923                 rec->time_squared += calltime * calltime;
924         }
925
926  out:
927         local_irq_restore(flags);
928 }
929
930 static int register_ftrace_profiler(void)
931 {
932         return register_ftrace_graph(&profile_graph_return,
933                                      &profile_graph_entry);
934 }
935
936 static void unregister_ftrace_profiler(void)
937 {
938         unregister_ftrace_graph();
939 }
940 #else
941 static struct ftrace_ops ftrace_profile_ops __read_mostly = {
942         .func           = function_profile_call,
943         .flags          = FTRACE_OPS_FL_RECURSION_SAFE | FTRACE_OPS_FL_INITIALIZED,
944         INIT_OPS_HASH(ftrace_profile_ops)
945 };
946
947 static int register_ftrace_profiler(void)
948 {
949         return register_ftrace_function(&ftrace_profile_ops);
950 }
951
952 static void unregister_ftrace_profiler(void)
953 {
954         unregister_ftrace_function(&ftrace_profile_ops);
955 }
956 #endif /* CONFIG_FUNCTION_GRAPH_TRACER */
957
958 static ssize_t
959 ftrace_profile_write(struct file *filp, const char __user *ubuf,
960                      size_t cnt, loff_t *ppos)
961 {
962         unsigned long val;
963         int ret;
964
965         ret = kstrtoul_from_user(ubuf, cnt, 10, &val);
966         if (ret)
967                 return ret;
968
969         val = !!val;
970
971         mutex_lock(&ftrace_profile_lock);
972         if (ftrace_profile_enabled ^ val) {
973                 if (val) {
974                         ret = ftrace_profile_init();
975                         if (ret < 0) {
976                                 cnt = ret;
977                                 goto out;
978                         }
979
980                         ret = register_ftrace_profiler();
981                         if (ret < 0) {
982                                 cnt = ret;
983                                 goto out;
984                         }
985                         ftrace_profile_enabled = 1;
986                 } else {
987                         ftrace_profile_enabled = 0;
988                         /*
989                          * unregister_ftrace_profiler calls stop_machine
990                          * so this acts like an synchronize_sched.
991                          */
992                         unregister_ftrace_profiler();
993                 }
994         }
995  out:
996         mutex_unlock(&ftrace_profile_lock);
997
998         *ppos += cnt;
999
1000         return cnt;
1001 }
1002
1003 static ssize_t
1004 ftrace_profile_read(struct file *filp, char __user *ubuf,
1005                      size_t cnt, loff_t *ppos)
1006 {
1007         char buf[64];           /* big enough to hold a number */
1008         int r;
1009
1010         r = sprintf(buf, "%u\n", ftrace_profile_enabled);
1011         return simple_read_from_buffer(ubuf, cnt, ppos, buf, r);
1012 }
1013
1014 static const struct file_operations ftrace_profile_fops = {
1015         .open           = tracing_open_generic,
1016         .read           = ftrace_profile_read,
1017         .write          = ftrace_profile_write,
1018         .llseek         = default_llseek,
1019 };
1020
1021 /* used to initialize the real stat files */
1022 static struct tracer_stat function_stats __initdata = {
1023         .name           = "functions",
1024         .stat_start     = function_stat_start,
1025         .stat_next      = function_stat_next,
1026         .stat_cmp       = function_stat_cmp,
1027         .stat_headers   = function_stat_headers,
1028         .stat_show      = function_stat_show
1029 };
1030
1031 static __init void ftrace_profile_tracefs(struct dentry *d_tracer)
1032 {
1033         struct ftrace_profile_stat *stat;
1034         struct dentry *entry;
1035         char *name;
1036         int ret;
1037         int cpu;
1038
1039         for_each_possible_cpu(cpu) {
1040                 stat = &per_cpu(ftrace_profile_stats, cpu);
1041
1042                 name = kasprintf(GFP_KERNEL, "function%d", cpu);
1043                 if (!name) {
1044                         /*
1045                          * The files created are permanent, if something happens
1046                          * we still do not free memory.
1047                          */
1048                         WARN(1,
1049                              "Could not allocate stat file for cpu %d\n",
1050                              cpu);
1051                         return;
1052                 }
1053                 stat->stat = function_stats;
1054                 stat->stat.name = name;
1055                 ret = register_stat_tracer(&stat->stat);
1056                 if (ret) {
1057                         WARN(1,
1058                              "Could not register function stat for cpu %d\n",
1059                              cpu);
1060                         kfree(name);
1061                         return;
1062                 }
1063         }
1064
1065         entry = tracefs_create_file("function_profile_enabled", 0644,
1066                                     d_tracer, NULL, &ftrace_profile_fops);
1067         if (!entry)
1068                 pr_warn("Could not create tracefs 'function_profile_enabled' entry\n");
1069 }
1070
1071 #else /* CONFIG_FUNCTION_PROFILER */
1072 static __init void ftrace_profile_tracefs(struct dentry *d_tracer)
1073 {
1074 }
1075 #endif /* CONFIG_FUNCTION_PROFILER */
1076
1077 static struct pid * const ftrace_swapper_pid = &init_struct_pid;
1078
1079 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
1080 static int ftrace_graph_active;
1081 #else
1082 # define ftrace_graph_active 0
1083 #endif
1084
1085 #ifdef CONFIG_DYNAMIC_FTRACE
1086
1087 static struct ftrace_ops *removed_ops;
1088
1089 /*
1090  * Set when doing a global update, like enabling all recs or disabling them.
1091  * It is not set when just updating a single ftrace_ops.
1092  */
1093 static bool update_all_ops;
1094
1095 #ifndef CONFIG_FTRACE_MCOUNT_RECORD
1096 # error Dynamic ftrace depends on MCOUNT_RECORD
1097 #endif
1098
1099 struct ftrace_func_entry {
1100         struct hlist_node hlist;
1101         unsigned long ip;
1102 };
1103
1104 struct ftrace_func_probe {
1105         struct ftrace_probe_ops *probe_ops;
1106         struct ftrace_ops       ops;
1107         struct trace_array      *tr;
1108         struct list_head        list;
1109         void                    *data;
1110         int                     ref;
1111 };
1112
1113 /*
1114  * We make these constant because no one should touch them,
1115  * but they are used as the default "empty hash", to avoid allocating
1116  * it all the time. These are in a read only section such that if
1117  * anyone does try to modify it, it will cause an exception.
1118  */
1119 static const struct hlist_head empty_buckets[1];
1120 static const struct ftrace_hash empty_hash = {
1121         .buckets = (struct hlist_head *)empty_buckets,
1122 };
1123 #define EMPTY_HASH      ((struct ftrace_hash *)&empty_hash)
1124
1125 static struct ftrace_ops global_ops = {
1126         .func                           = ftrace_stub,
1127         .local_hash.notrace_hash        = EMPTY_HASH,
1128         .local_hash.filter_hash         = EMPTY_HASH,
1129         INIT_OPS_HASH(global_ops)
1130         .flags                          = FTRACE_OPS_FL_RECURSION_SAFE |
1131                                           FTRACE_OPS_FL_INITIALIZED |
1132                                           FTRACE_OPS_FL_PID,
1133 };
1134
1135 /*
1136  * This is used by __kernel_text_address() to return true if the
1137  * address is on a dynamically allocated trampoline that would
1138  * not return true for either core_kernel_text() or
1139  * is_module_text_address().
1140  */
1141 bool is_ftrace_trampoline(unsigned long addr)
1142 {
1143         struct ftrace_ops *op;
1144         bool ret = false;
1145
1146         /*
1147          * Some of the ops may be dynamically allocated,
1148          * they are freed after a synchronize_sched().
1149          */
1150         preempt_disable_notrace();
1151
1152         do_for_each_ftrace_op(op, ftrace_ops_list) {
1153                 /*
1154                  * This is to check for dynamically allocated trampolines.
1155                  * Trampolines that are in kernel text will have
1156                  * core_kernel_text() return true.
1157                  */
1158                 if (op->trampoline && op->trampoline_size)
1159                         if (addr >= op->trampoline &&
1160                             addr < op->trampoline + op->trampoline_size) {
1161                                 ret = true;
1162                                 goto out;
1163                         }
1164         } while_for_each_ftrace_op(op);
1165
1166  out:
1167         preempt_enable_notrace();
1168
1169         return ret;
1170 }
1171
1172 struct ftrace_page {
1173         struct ftrace_page      *next;
1174         struct dyn_ftrace       *records;
1175         int                     index;
1176         int                     size;
1177 };
1178
1179 #define ENTRY_SIZE sizeof(struct dyn_ftrace)
1180 #define ENTRIES_PER_PAGE (PAGE_SIZE / ENTRY_SIZE)
1181
1182 /* estimate from running different kernels */
1183 #define NR_TO_INIT              10000
1184
1185 static struct ftrace_page       *ftrace_pages_start;
1186 static struct ftrace_page       *ftrace_pages;
1187
1188 static __always_inline unsigned long
1189 ftrace_hash_key(struct ftrace_hash *hash, unsigned long ip)
1190 {
1191         if (hash->size_bits > 0)
1192                 return hash_long(ip, hash->size_bits);
1193
1194         return 0;
1195 }
1196
1197 /* Only use this function if ftrace_hash_empty() has already been tested */
1198 static __always_inline struct ftrace_func_entry *
1199 __ftrace_lookup_ip(struct ftrace_hash *hash, unsigned long ip)
1200 {
1201         unsigned long key;
1202         struct ftrace_func_entry *entry;
1203         struct hlist_head *hhd;
1204
1205         key = ftrace_hash_key(hash, ip);
1206         hhd = &hash->buckets[key];
1207
1208         hlist_for_each_entry_rcu_notrace(entry, hhd, hlist) {
1209                 if (entry->ip == ip)
1210                         return entry;
1211         }
1212         return NULL;
1213 }
1214
1215 /**
1216  * ftrace_lookup_ip - Test to see if an ip exists in an ftrace_hash
1217  * @hash: The hash to look at
1218  * @ip: The instruction pointer to test
1219  *
1220  * Search a given @hash to see if a given instruction pointer (@ip)
1221  * exists in it.
1222  *
1223  * Returns the entry that holds the @ip if found. NULL otherwise.
1224  */
1225 struct ftrace_func_entry *
1226 ftrace_lookup_ip(struct ftrace_hash *hash, unsigned long ip)
1227 {
1228         if (ftrace_hash_empty(hash))
1229                 return NULL;
1230
1231         return __ftrace_lookup_ip(hash, ip);
1232 }
1233
1234 static void __add_hash_entry(struct ftrace_hash *hash,
1235                              struct ftrace_func_entry *entry)
1236 {
1237         struct hlist_head *hhd;
1238         unsigned long key;
1239
1240         key = ftrace_hash_key(hash, entry->ip);
1241         hhd = &hash->buckets[key];
1242         hlist_add_head(&entry->hlist, hhd);
1243         hash->count++;
1244 }
1245
1246 static int add_hash_entry(struct ftrace_hash *hash, unsigned long ip)
1247 {
1248         struct ftrace_func_entry *entry;
1249
1250         entry = kmalloc(sizeof(*entry), GFP_KERNEL);
1251         if (!entry)
1252                 return -ENOMEM;
1253
1254         entry->ip = ip;
1255         __add_hash_entry(hash, entry);
1256
1257         return 0;
1258 }
1259
1260 static void
1261 free_hash_entry(struct ftrace_hash *hash,
1262                   struct ftrace_func_entry *entry)
1263 {
1264         hlist_del(&entry->hlist);
1265         kfree(entry);
1266         hash->count--;
1267 }
1268
1269 static void
1270 remove_hash_entry(struct ftrace_hash *hash,
1271                   struct ftrace_func_entry *entry)
1272 {
1273         hlist_del_rcu(&entry->hlist);
1274         hash->count--;
1275 }
1276
1277 static void ftrace_hash_clear(struct ftrace_hash *hash)
1278 {
1279         struct hlist_head *hhd;
1280         struct hlist_node *tn;
1281         struct ftrace_func_entry *entry;
1282         int size = 1 << hash->size_bits;
1283         int i;
1284
1285         if (!hash->count)
1286                 return;
1287
1288         for (i = 0; i < size; i++) {
1289                 hhd = &hash->buckets[i];
1290                 hlist_for_each_entry_safe(entry, tn, hhd, hlist)
1291                         free_hash_entry(hash, entry);
1292         }
1293         FTRACE_WARN_ON(hash->count);
1294 }
1295
1296 static void free_ftrace_mod(struct ftrace_mod_load *ftrace_mod)
1297 {
1298         list_del(&ftrace_mod->list);
1299         kfree(ftrace_mod->module);
1300         kfree(ftrace_mod->func);
1301         kfree(ftrace_mod);
1302 }
1303
1304 static void clear_ftrace_mod_list(struct list_head *head)
1305 {
1306         struct ftrace_mod_load *p, *n;
1307
1308         /* stack tracer isn't supported yet */
1309         if (!head)
1310                 return;
1311
1312         mutex_lock(&ftrace_lock);
1313         list_for_each_entry_safe(p, n, head, list)
1314                 free_ftrace_mod(p);
1315         mutex_unlock(&ftrace_lock);
1316 }
1317
1318 static void free_ftrace_hash(struct ftrace_hash *hash)
1319 {
1320         if (!hash || hash == EMPTY_HASH)
1321                 return;
1322         ftrace_hash_clear(hash);
1323         kfree(hash->buckets);
1324         kfree(hash);
1325 }
1326
1327 static void __free_ftrace_hash_rcu(struct rcu_head *rcu)
1328 {
1329         struct ftrace_hash *hash;
1330
1331         hash = container_of(rcu, struct ftrace_hash, rcu);
1332         free_ftrace_hash(hash);
1333 }
1334
1335 static void free_ftrace_hash_rcu(struct ftrace_hash *hash)
1336 {
1337         if (!hash || hash == EMPTY_HASH)
1338                 return;
1339         call_rcu_sched(&hash->rcu, __free_ftrace_hash_rcu);
1340 }
1341
1342 void ftrace_free_filter(struct ftrace_ops *ops)
1343 {
1344         ftrace_ops_init(ops);
1345         free_ftrace_hash(ops->func_hash->filter_hash);
1346         free_ftrace_hash(ops->func_hash->notrace_hash);
1347 }
1348
1349 static struct ftrace_hash *alloc_ftrace_hash(int size_bits)
1350 {
1351         struct ftrace_hash *hash;
1352         int size;
1353
1354         hash = kzalloc(sizeof(*hash), GFP_KERNEL);
1355         if (!hash)
1356                 return NULL;
1357
1358         size = 1 << size_bits;
1359         hash->buckets = kcalloc(size, sizeof(*hash->buckets), GFP_KERNEL);
1360
1361         if (!hash->buckets) {
1362                 kfree(hash);
1363                 return NULL;
1364         }
1365
1366         hash->size_bits = size_bits;
1367
1368         return hash;
1369 }
1370
1371
1372 static int ftrace_add_mod(struct trace_array *tr,
1373                           const char *func, const char *module,
1374                           int enable)
1375 {
1376         struct ftrace_mod_load *ftrace_mod;
1377         struct list_head *mod_head = enable ? &tr->mod_trace : &tr->mod_notrace;
1378
1379         ftrace_mod = kzalloc(sizeof(*ftrace_mod), GFP_KERNEL);
1380         if (!ftrace_mod)
1381                 return -ENOMEM;
1382
1383         ftrace_mod->func = kstrdup(func, GFP_KERNEL);
1384         ftrace_mod->module = kstrdup(module, GFP_KERNEL);
1385         ftrace_mod->enable = enable;
1386
1387         if (!ftrace_mod->func || !ftrace_mod->module)
1388                 goto out_free;
1389
1390         list_add(&ftrace_mod->list, mod_head);
1391
1392         return 0;
1393
1394  out_free:
1395         free_ftrace_mod(ftrace_mod);
1396
1397         return -ENOMEM;
1398 }
1399
1400 static struct ftrace_hash *
1401 alloc_and_copy_ftrace_hash(int size_bits, struct ftrace_hash *hash)
1402 {
1403         struct ftrace_func_entry *entry;
1404         struct ftrace_hash *new_hash;
1405         int size;
1406         int ret;
1407         int i;
1408
1409         new_hash = alloc_ftrace_hash(size_bits);
1410         if (!new_hash)
1411                 return NULL;
1412
1413         if (hash)
1414                 new_hash->flags = hash->flags;
1415
1416         /* Empty hash? */
1417         if (ftrace_hash_empty(hash))
1418                 return new_hash;
1419
1420         size = 1 << hash->size_bits;
1421         for (i = 0; i < size; i++) {
1422                 hlist_for_each_entry(entry, &hash->buckets[i], hlist) {
1423                         ret = add_hash_entry(new_hash, entry->ip);
1424                         if (ret < 0)
1425                                 goto free_hash;
1426                 }
1427         }
1428
1429         FTRACE_WARN_ON(new_hash->count != hash->count);
1430
1431         return new_hash;
1432
1433  free_hash:
1434         free_ftrace_hash(new_hash);
1435         return NULL;
1436 }
1437
1438 static void
1439 ftrace_hash_rec_disable_modify(struct ftrace_ops *ops, int filter_hash);
1440 static void
1441 ftrace_hash_rec_enable_modify(struct ftrace_ops *ops, int filter_hash);
1442
1443 static int ftrace_hash_ipmodify_update(struct ftrace_ops *ops,
1444                                        struct ftrace_hash *new_hash);
1445
1446 static struct ftrace_hash *
1447 __ftrace_hash_move(struct ftrace_hash *src)
1448 {
1449         struct ftrace_func_entry *entry;
1450         struct hlist_node *tn;
1451         struct hlist_head *hhd;
1452         struct ftrace_hash *new_hash;
1453         int size = src->count;
1454         int bits = 0;
1455         int i;
1456
1457         /*
1458          * If the new source is empty, just return the empty_hash.
1459          */
1460         if (ftrace_hash_empty(src))
1461                 return EMPTY_HASH;
1462
1463         /*
1464          * Make the hash size about 1/2 the # found
1465          */
1466         for (size /= 2; size; size >>= 1)
1467                 bits++;
1468
1469         /* Don't allocate too much */
1470         if (bits > FTRACE_HASH_MAX_BITS)
1471                 bits = FTRACE_HASH_MAX_BITS;
1472
1473         new_hash = alloc_ftrace_hash(bits);
1474         if (!new_hash)
1475                 return NULL;
1476
1477         new_hash->flags = src->flags;
1478
1479         size = 1 << src->size_bits;
1480         for (i = 0; i < size; i++) {
1481                 hhd = &src->buckets[i];
1482                 hlist_for_each_entry_safe(entry, tn, hhd, hlist) {
1483                         remove_hash_entry(src, entry);
1484                         __add_hash_entry(new_hash, entry);
1485                 }
1486         }
1487
1488         return new_hash;
1489 }
1490
1491 static int
1492 ftrace_hash_move(struct ftrace_ops *ops, int enable,
1493                  struct ftrace_hash **dst, struct ftrace_hash *src)
1494 {
1495         struct ftrace_hash *new_hash;
1496         int ret;
1497
1498         /* Reject setting notrace hash on IPMODIFY ftrace_ops */
1499         if (ops->flags & FTRACE_OPS_FL_IPMODIFY && !enable)
1500                 return -EINVAL;
1501
1502         new_hash = __ftrace_hash_move(src);
1503         if (!new_hash)
1504                 return -ENOMEM;
1505
1506         /* Make sure this can be applied if it is IPMODIFY ftrace_ops */
1507         if (enable) {
1508                 /* IPMODIFY should be updated only when filter_hash updating */
1509                 ret = ftrace_hash_ipmodify_update(ops, new_hash);
1510                 if (ret < 0) {
1511                         free_ftrace_hash(new_hash);
1512                         return ret;
1513                 }
1514         }
1515
1516         /*
1517          * Remove the current set, update the hash and add
1518          * them back.
1519          */
1520         ftrace_hash_rec_disable_modify(ops, enable);
1521
1522         rcu_assign_pointer(*dst, new_hash);
1523
1524         ftrace_hash_rec_enable_modify(ops, enable);
1525
1526         return 0;
1527 }
1528
1529 static bool hash_contains_ip(unsigned long ip,
1530                              struct ftrace_ops_hash *hash)
1531 {
1532         /*
1533          * The function record is a match if it exists in the filter
1534          * hash and not in the notrace hash. Note, an emty hash is
1535          * considered a match for the filter hash, but an empty
1536          * notrace hash is considered not in the notrace hash.
1537          */
1538         return (ftrace_hash_empty(hash->filter_hash) ||
1539                 __ftrace_lookup_ip(hash->filter_hash, ip)) &&
1540                 (ftrace_hash_empty(hash->notrace_hash) ||
1541                  !__ftrace_lookup_ip(hash->notrace_hash, ip));
1542 }
1543
1544 /*
1545  * Test the hashes for this ops to see if we want to call
1546  * the ops->func or not.
1547  *
1548  * It's a match if the ip is in the ops->filter_hash or
1549  * the filter_hash does not exist or is empty,
1550  *  AND
1551  * the ip is not in the ops->notrace_hash.
1552  *
1553  * This needs to be called with preemption disabled as
1554  * the hashes are freed with call_rcu_sched().
1555  */
1556 static int
1557 ftrace_ops_test(struct ftrace_ops *ops, unsigned long ip, void *regs)
1558 {
1559         struct ftrace_ops_hash hash;
1560         int ret;
1561
1562 #ifdef CONFIG_DYNAMIC_FTRACE_WITH_REGS
1563         /*
1564          * There's a small race when adding ops that the ftrace handler
1565          * that wants regs, may be called without them. We can not
1566          * allow that handler to be called if regs is NULL.
1567          */
1568         if (regs == NULL && (ops->flags & FTRACE_OPS_FL_SAVE_REGS))
1569                 return 0;
1570 #endif
1571
1572         hash.filter_hash = rcu_dereference_raw_notrace(ops->func_hash->filter_hash);
1573         hash.notrace_hash = rcu_dereference_raw_notrace(ops->func_hash->notrace_hash);
1574
1575         if (hash_contains_ip(ip, &hash))
1576                 ret = 1;
1577         else
1578                 ret = 0;
1579
1580         return ret;
1581 }
1582
1583 /*
1584  * This is a double for. Do not use 'break' to break out of the loop,
1585  * you must use a goto.
1586  */
1587 #define do_for_each_ftrace_rec(pg, rec)                                 \
1588         for (pg = ftrace_pages_start; pg; pg = pg->next) {              \
1589                 int _____i;                                             \
1590                 for (_____i = 0; _____i < pg->index; _____i++) {        \
1591                         rec = &pg->records[_____i];
1592
1593 #define while_for_each_ftrace_rec()             \
1594                 }                               \
1595         }
1596
1597
1598 static int ftrace_cmp_recs(const void *a, const void *b)
1599 {
1600         const struct dyn_ftrace *key = a;
1601         const struct dyn_ftrace *rec = b;
1602
1603         if (key->flags < rec->ip)
1604                 return -1;
1605         if (key->ip >= rec->ip + MCOUNT_INSN_SIZE)
1606                 return 1;
1607         return 0;
1608 }
1609
1610 /**
1611  * ftrace_location_range - return the first address of a traced location
1612  *      if it touches the given ip range
1613  * @start: start of range to search.
1614  * @end: end of range to search (inclusive). @end points to the last byte
1615  *      to check.
1616  *
1617  * Returns rec->ip if the related ftrace location is a least partly within
1618  * the given address range. That is, the first address of the instruction
1619  * that is either a NOP or call to the function tracer. It checks the ftrace
1620  * internal tables to determine if the address belongs or not.
1621  */
1622 unsigned long ftrace_location_range(unsigned long start, unsigned long end)
1623 {
1624         struct ftrace_page *pg;
1625         struct dyn_ftrace *rec;
1626         struct dyn_ftrace key;
1627
1628         key.ip = start;
1629         key.flags = end;        /* overload flags, as it is unsigned long */
1630
1631         for (pg = ftrace_pages_start; pg; pg = pg->next) {
1632                 if (end < pg->records[0].ip ||
1633                     start >= (pg->records[pg->index - 1].ip + MCOUNT_INSN_SIZE))
1634                         continue;
1635                 rec = bsearch(&key, pg->records, pg->index,
1636                               sizeof(struct dyn_ftrace),
1637                               ftrace_cmp_recs);
1638                 if (rec)
1639                         return rec->ip;
1640         }
1641
1642         return 0;
1643 }
1644
1645 /**
1646  * ftrace_location - return true if the ip giving is a traced location
1647  * @ip: the instruction pointer to check
1648  *
1649  * Returns rec->ip if @ip given is a pointer to a ftrace location.
1650  * That is, the instruction that is either a NOP or call to
1651  * the function tracer. It checks the ftrace internal tables to
1652  * determine if the address belongs or not.
1653  */
1654 unsigned long ftrace_location(unsigned long ip)
1655 {
1656         return ftrace_location_range(ip, ip);
1657 }
1658
1659 /**
1660  * ftrace_text_reserved - return true if range contains an ftrace location
1661  * @start: start of range to search
1662  * @end: end of range to search (inclusive). @end points to the last byte to check.
1663  *
1664  * Returns 1 if @start and @end contains a ftrace location.
1665  * That is, the instruction that is either a NOP or call to
1666  * the function tracer. It checks the ftrace internal tables to
1667  * determine if the address belongs or not.
1668  */
1669 int ftrace_text_reserved(const void *start, const void *end)
1670 {
1671         unsigned long ret;
1672
1673         ret = ftrace_location_range((unsigned long)start,
1674                                     (unsigned long)end);
1675
1676         return (int)!!ret;
1677 }
1678
1679 /* Test if ops registered to this rec needs regs */
1680 static bool test_rec_ops_needs_regs(struct dyn_ftrace *rec)
1681 {
1682         struct ftrace_ops *ops;
1683         bool keep_regs = false;
1684
1685         for (ops = ftrace_ops_list;
1686              ops != &ftrace_list_end; ops = ops->next) {
1687                 /* pass rec in as regs to have non-NULL val */
1688                 if (ftrace_ops_test(ops, rec->ip, rec)) {
1689                         if (ops->flags & FTRACE_OPS_FL_SAVE_REGS) {
1690                                 keep_regs = true;
1691                                 break;
1692                         }
1693                 }
1694         }
1695
1696         return  keep_regs;
1697 }
1698
1699 static bool __ftrace_hash_rec_update(struct ftrace_ops *ops,
1700                                      int filter_hash,
1701                                      bool inc)
1702 {
1703         struct ftrace_hash *hash;
1704         struct ftrace_hash *other_hash;
1705         struct ftrace_page *pg;
1706         struct dyn_ftrace *rec;
1707         bool update = false;
1708         int count = 0;
1709         int all = false;
1710
1711         /* Only update if the ops has been registered */
1712         if (!(ops->flags & FTRACE_OPS_FL_ENABLED))
1713                 return false;
1714
1715         /*
1716          * In the filter_hash case:
1717          *   If the count is zero, we update all records.
1718          *   Otherwise we just update the items in the hash.
1719          *
1720          * In the notrace_hash case:
1721          *   We enable the update in the hash.
1722          *   As disabling notrace means enabling the tracing,
1723          *   and enabling notrace means disabling, the inc variable
1724          *   gets inversed.
1725          */
1726         if (filter_hash) {
1727                 hash = ops->func_hash->filter_hash;
1728                 other_hash = ops->func_hash->notrace_hash;
1729                 if (ftrace_hash_empty(hash))
1730                         all = true;
1731         } else {
1732                 inc = !inc;
1733                 hash = ops->func_hash->notrace_hash;
1734                 other_hash = ops->func_hash->filter_hash;
1735                 /*
1736                  * If the notrace hash has no items,
1737                  * then there's nothing to do.
1738                  */
1739                 if (ftrace_hash_empty(hash))
1740                         return false;
1741         }
1742
1743         do_for_each_ftrace_rec(pg, rec) {
1744                 int in_other_hash = 0;
1745                 int in_hash = 0;
1746                 int match = 0;
1747
1748                 if (rec->flags & FTRACE_FL_DISABLED)
1749                         continue;
1750
1751                 if (all) {
1752                         /*
1753                          * Only the filter_hash affects all records.
1754                          * Update if the record is not in the notrace hash.
1755                          */
1756                         if (!other_hash || !ftrace_lookup_ip(other_hash, rec->ip))
1757                                 match = 1;
1758                 } else {
1759                         in_hash = !!ftrace_lookup_ip(hash, rec->ip);
1760                         in_other_hash = !!ftrace_lookup_ip(other_hash, rec->ip);
1761
1762                         /*
1763                          * If filter_hash is set, we want to match all functions
1764                          * that are in the hash but not in the other hash.
1765                          *
1766                          * If filter_hash is not set, then we are decrementing.
1767                          * That means we match anything that is in the hash
1768                          * and also in the other_hash. That is, we need to turn
1769                          * off functions in the other hash because they are disabled
1770                          * by this hash.
1771                          */
1772                         if (filter_hash && in_hash && !in_other_hash)
1773                                 match = 1;
1774                         else if (!filter_hash && in_hash &&
1775                                  (in_other_hash || ftrace_hash_empty(other_hash)))
1776                                 match = 1;
1777                 }
1778                 if (!match)
1779                         continue;
1780
1781                 if (inc) {
1782                         rec->flags++;
1783                         if (FTRACE_WARN_ON(ftrace_rec_count(rec) == FTRACE_REF_MAX))
1784                                 return false;
1785
1786                         /*
1787                          * If there's only a single callback registered to a
1788                          * function, and the ops has a trampoline registered
1789                          * for it, then we can call it directly.
1790                          */
1791                         if (ftrace_rec_count(rec) == 1 && ops->trampoline)
1792                                 rec->flags |= FTRACE_FL_TRAMP;
1793                         else
1794                                 /*
1795                                  * If we are adding another function callback
1796                                  * to this function, and the previous had a
1797                                  * custom trampoline in use, then we need to go
1798                                  * back to the default trampoline.
1799                                  */
1800                                 rec->flags &= ~FTRACE_FL_TRAMP;
1801
1802                         /*
1803                          * If any ops wants regs saved for this function
1804                          * then all ops will get saved regs.
1805                          */
1806                         if (ops->flags & FTRACE_OPS_FL_SAVE_REGS)
1807                                 rec->flags |= FTRACE_FL_REGS;
1808                 } else {
1809                         if (FTRACE_WARN_ON(ftrace_rec_count(rec) == 0))
1810                                 return false;
1811                         rec->flags--;
1812
1813                         /*
1814                          * If the rec had REGS enabled and the ops that is
1815                          * being removed had REGS set, then see if there is
1816                          * still any ops for this record that wants regs.
1817                          * If not, we can stop recording them.
1818                          */
1819                         if (ftrace_rec_count(rec) > 0 &&
1820                             rec->flags & FTRACE_FL_REGS &&
1821                             ops->flags & FTRACE_OPS_FL_SAVE_REGS) {
1822                                 if (!test_rec_ops_needs_regs(rec))
1823                                         rec->flags &= ~FTRACE_FL_REGS;
1824                         }
1825
1826                         /*
1827                          * If the rec had TRAMP enabled, then it needs to
1828                          * be cleared. As TRAMP can only be enabled iff
1829                          * there is only a single ops attached to it.
1830                          * In otherwords, always disable it on decrementing.
1831                          * In the future, we may set it if rec count is
1832                          * decremented to one, and the ops that is left
1833                          * has a trampoline.
1834                          */
1835                         rec->flags &= ~FTRACE_FL_TRAMP;
1836
1837                         /*
1838                          * flags will be cleared in ftrace_check_record()
1839                          * if rec count is zero.
1840                          */
1841                 }
1842                 count++;
1843
1844                 /* Must match FTRACE_UPDATE_CALLS in ftrace_modify_all_code() */
1845                 update |= ftrace_test_record(rec, 1) != FTRACE_UPDATE_IGNORE;
1846
1847                 /* Shortcut, if we handled all records, we are done. */
1848                 if (!all && count == hash->count)
1849                         return update;
1850         } while_for_each_ftrace_rec();
1851
1852         return update;
1853 }
1854
1855 static bool ftrace_hash_rec_disable(struct ftrace_ops *ops,
1856                                     int filter_hash)
1857 {
1858         return __ftrace_hash_rec_update(ops, filter_hash, 0);
1859 }
1860
1861 static bool ftrace_hash_rec_enable(struct ftrace_ops *ops,
1862                                    int filter_hash)
1863 {
1864         return __ftrace_hash_rec_update(ops, filter_hash, 1);
1865 }
1866
1867 static void ftrace_hash_rec_update_modify(struct ftrace_ops *ops,
1868                                           int filter_hash, int inc)
1869 {
1870         struct ftrace_ops *op;
1871
1872         __ftrace_hash_rec_update(ops, filter_hash, inc);
1873
1874         if (ops->func_hash != &global_ops.local_hash)
1875                 return;
1876
1877         /*
1878          * If the ops shares the global_ops hash, then we need to update
1879          * all ops that are enabled and use this hash.
1880          */
1881         do_for_each_ftrace_op(op, ftrace_ops_list) {
1882                 /* Already done */
1883                 if (op == ops)
1884                         continue;
1885                 if (op->func_hash == &global_ops.local_hash)
1886                         __ftrace_hash_rec_update(op, filter_hash, inc);
1887         } while_for_each_ftrace_op(op);
1888 }
1889
1890 static void ftrace_hash_rec_disable_modify(struct ftrace_ops *ops,
1891                                            int filter_hash)
1892 {
1893         ftrace_hash_rec_update_modify(ops, filter_hash, 0);
1894 }
1895
1896 static void ftrace_hash_rec_enable_modify(struct ftrace_ops *ops,
1897                                           int filter_hash)
1898 {
1899         ftrace_hash_rec_update_modify(ops, filter_hash, 1);
1900 }
1901
1902 /*
1903  * Try to update IPMODIFY flag on each ftrace_rec. Return 0 if it is OK
1904  * or no-needed to update, -EBUSY if it detects a conflict of the flag
1905  * on a ftrace_rec, and -EINVAL if the new_hash tries to trace all recs.
1906  * Note that old_hash and new_hash has below meanings
1907  *  - If the hash is NULL, it hits all recs (if IPMODIFY is set, this is rejected)
1908  *  - If the hash is EMPTY_HASH, it hits nothing
1909  *  - Anything else hits the recs which match the hash entries.
1910  */
1911 static int __ftrace_hash_update_ipmodify(struct ftrace_ops *ops,
1912                                          struct ftrace_hash *old_hash,
1913                                          struct ftrace_hash *new_hash)
1914 {
1915         struct ftrace_page *pg;
1916         struct dyn_ftrace *rec, *end = NULL;
1917         int in_old, in_new;
1918
1919         /* Only update if the ops has been registered */
1920         if (!(ops->flags & FTRACE_OPS_FL_ENABLED))
1921                 return 0;
1922
1923         if (!(ops->flags & FTRACE_OPS_FL_IPMODIFY))
1924                 return 0;
1925
1926         /*
1927          * Since the IPMODIFY is a very address sensitive action, we do not
1928          * allow ftrace_ops to set all functions to new hash.
1929          */
1930         if (!new_hash || !old_hash)
1931                 return -EINVAL;
1932
1933         /* Update rec->flags */
1934         do_for_each_ftrace_rec(pg, rec) {
1935
1936                 if (rec->flags & FTRACE_FL_DISABLED)
1937                         continue;
1938
1939                 /* We need to update only differences of filter_hash */
1940                 in_old = !!ftrace_lookup_ip(old_hash, rec->ip);
1941                 in_new = !!ftrace_lookup_ip(new_hash, rec->ip);
1942                 if (in_old == in_new)
1943                         continue;
1944
1945                 if (in_new) {
1946                         /* New entries must ensure no others are using it */
1947                         if (rec->flags & FTRACE_FL_IPMODIFY)
1948                                 goto rollback;
1949                         rec->flags |= FTRACE_FL_IPMODIFY;
1950                 } else /* Removed entry */
1951                         rec->flags &= ~FTRACE_FL_IPMODIFY;
1952         } while_for_each_ftrace_rec();
1953
1954         return 0;
1955
1956 rollback:
1957         end = rec;
1958
1959         /* Roll back what we did above */
1960         do_for_each_ftrace_rec(pg, rec) {
1961
1962                 if (rec->flags & FTRACE_FL_DISABLED)
1963                         continue;
1964
1965                 if (rec == end)
1966                         goto err_out;
1967
1968                 in_old = !!ftrace_lookup_ip(old_hash, rec->ip);
1969                 in_new = !!ftrace_lookup_ip(new_hash, rec->ip);
1970                 if (in_old == in_new)
1971                         continue;
1972
1973                 if (in_new)
1974                         rec->flags &= ~FTRACE_FL_IPMODIFY;
1975                 else
1976                         rec->flags |= FTRACE_FL_IPMODIFY;
1977         } while_for_each_ftrace_rec();
1978
1979 err_out:
1980         return -EBUSY;
1981 }
1982
1983 static int ftrace_hash_ipmodify_enable(struct ftrace_ops *ops)
1984 {
1985         struct ftrace_hash *hash = ops->func_hash->filter_hash;
1986
1987         if (ftrace_hash_empty(hash))
1988                 hash = NULL;
1989
1990         return __ftrace_hash_update_ipmodify(ops, EMPTY_HASH, hash);
1991 }
1992
1993 /* Disabling always succeeds */
1994 static void ftrace_hash_ipmodify_disable(struct ftrace_ops *ops)
1995 {
1996         struct ftrace_hash *hash = ops->func_hash->filter_hash;
1997
1998         if (ftrace_hash_empty(hash))
1999                 hash = NULL;
2000
2001         __ftrace_hash_update_ipmodify(ops, hash, EMPTY_HASH);
2002 }
2003
2004 static int ftrace_hash_ipmodify_update(struct ftrace_ops *ops,
2005                                        struct ftrace_hash *new_hash)
2006 {
2007         struct ftrace_hash *old_hash = ops->func_hash->filter_hash;
2008
2009         if (ftrace_hash_empty(old_hash))
2010                 old_hash = NULL;
2011
2012         if (ftrace_hash_empty(new_hash))
2013                 new_hash = NULL;
2014
2015         return __ftrace_hash_update_ipmodify(ops, old_hash, new_hash);
2016 }
2017
2018 static void print_ip_ins(const char *fmt, const unsigned char *p)
2019 {
2020         int i;
2021
2022         printk(KERN_CONT "%s", fmt);
2023
2024         for (i = 0; i < MCOUNT_INSN_SIZE; i++)
2025                 printk(KERN_CONT "%s%02x", i ? ":" : "", p[i]);
2026 }
2027
2028 static struct ftrace_ops *
2029 ftrace_find_tramp_ops_any(struct dyn_ftrace *rec);
2030 static struct ftrace_ops *
2031 ftrace_find_tramp_ops_next(struct dyn_ftrace *rec, struct ftrace_ops *ops);
2032
2033 enum ftrace_bug_type ftrace_bug_type;
2034 const void *ftrace_expected;
2035
2036 static void print_bug_type(void)
2037 {
2038         switch (ftrace_bug_type) {
2039         case FTRACE_BUG_UNKNOWN:
2040                 break;
2041         case FTRACE_BUG_INIT:
2042                 pr_info("Initializing ftrace call sites\n");
2043                 break;
2044         case FTRACE_BUG_NOP:
2045                 pr_info("Setting ftrace call site to NOP\n");
2046                 break;
2047         case FTRACE_BUG_CALL:
2048                 pr_info("Setting ftrace call site to call ftrace function\n");
2049                 break;
2050         case FTRACE_BUG_UPDATE:
2051                 pr_info("Updating ftrace call site to call a different ftrace function\n");
2052                 break;
2053         }
2054 }
2055
2056 /**
2057  * ftrace_bug - report and shutdown function tracer
2058  * @failed: The failed type (EFAULT, EINVAL, EPERM)
2059  * @rec: The record that failed
2060  *
2061  * The arch code that enables or disables the function tracing
2062  * can call ftrace_bug() when it has detected a problem in
2063  * modifying the code. @failed should be one of either:
2064  * EFAULT - if the problem happens on reading the @ip address
2065  * EINVAL - if what is read at @ip is not what was expected
2066  * EPERM - if the problem happens on writting to the @ip address
2067  */
2068 void ftrace_bug(int failed, struct dyn_ftrace *rec)
2069 {
2070         unsigned long ip = rec ? rec->ip : 0;
2071
2072         switch (failed) {
2073         case -EFAULT:
2074                 FTRACE_WARN_ON_ONCE(1);
2075                 pr_info("ftrace faulted on modifying ");
2076                 print_ip_sym(ip);
2077                 break;
2078         case -EINVAL:
2079                 FTRACE_WARN_ON_ONCE(1);
2080                 pr_info("ftrace failed to modify ");
2081                 print_ip_sym(ip);
2082                 print_ip_ins(" actual:   ", (unsigned char *)ip);
2083                 pr_cont("\n");
2084                 if (ftrace_expected) {
2085                         print_ip_ins(" expected: ", ftrace_expected);
2086                         pr_cont("\n");
2087                 }
2088                 break;
2089         case -EPERM:
2090                 FTRACE_WARN_ON_ONCE(1);
2091                 pr_info("ftrace faulted on writing ");
2092                 print_ip_sym(ip);
2093                 break;
2094         default:
2095                 FTRACE_WARN_ON_ONCE(1);
2096                 pr_info("ftrace faulted on unknown error ");
2097                 print_ip_sym(ip);
2098         }
2099         print_bug_type();
2100         if (rec) {
2101                 struct ftrace_ops *ops = NULL;
2102
2103                 pr_info("ftrace record flags: %lx\n", rec->flags);
2104                 pr_cont(" (%ld)%s", ftrace_rec_count(rec),
2105                         rec->flags & FTRACE_FL_REGS ? " R" : "  ");
2106                 if (rec->flags & FTRACE_FL_TRAMP_EN) {
2107                         ops = ftrace_find_tramp_ops_any(rec);
2108                         if (ops) {
2109                                 do {
2110                                         pr_cont("\ttramp: %pS (%pS)",
2111                                                 (void *)ops->trampoline,
2112                                                 (void *)ops->func);
2113                                         ops = ftrace_find_tramp_ops_next(rec, ops);
2114                                 } while (ops);
2115                         } else
2116                                 pr_cont("\ttramp: ERROR!");
2117
2118                 }
2119                 ip = ftrace_get_addr_curr(rec);
2120                 pr_cont("\n expected tramp: %lx\n", ip);
2121         }
2122 }
2123
2124 static int ftrace_check_record(struct dyn_ftrace *rec, int enable, int update)
2125 {
2126         unsigned long flag = 0UL;
2127
2128         ftrace_bug_type = FTRACE_BUG_UNKNOWN;
2129
2130         if (rec->flags & FTRACE_FL_DISABLED)
2131                 return FTRACE_UPDATE_IGNORE;
2132
2133         /*
2134          * If we are updating calls:
2135          *
2136          *   If the record has a ref count, then we need to enable it
2137          *   because someone is using it.
2138          *
2139          *   Otherwise we make sure its disabled.
2140          *
2141          * If we are disabling calls, then disable all records that
2142          * are enabled.
2143          */
2144         if (enable && ftrace_rec_count(rec))
2145                 flag = FTRACE_FL_ENABLED;
2146
2147         /*
2148          * If enabling and the REGS flag does not match the REGS_EN, or
2149          * the TRAMP flag doesn't match the TRAMP_EN, then do not ignore
2150          * this record. Set flags to fail the compare against ENABLED.
2151          */
2152         if (flag) {
2153                 if (!(rec->flags & FTRACE_FL_REGS) != 
2154                     !(rec->flags & FTRACE_FL_REGS_EN))
2155                         flag |= FTRACE_FL_REGS;
2156
2157                 if (!(rec->flags & FTRACE_FL_TRAMP) != 
2158                     !(rec->flags & FTRACE_FL_TRAMP_EN))
2159                         flag |= FTRACE_FL_TRAMP;
2160         }
2161
2162         /* If the state of this record hasn't changed, then do nothing */
2163         if ((rec->flags & FTRACE_FL_ENABLED) == flag)
2164                 return FTRACE_UPDATE_IGNORE;
2165
2166         if (flag) {
2167                 /* Save off if rec is being enabled (for return value) */
2168                 flag ^= rec->flags & FTRACE_FL_ENABLED;
2169
2170                 if (update) {
2171                         rec->flags |= FTRACE_FL_ENABLED;
2172                         if (flag & FTRACE_FL_REGS) {
2173                                 if (rec->flags & FTRACE_FL_REGS)
2174                                         rec->flags |= FTRACE_FL_REGS_EN;
2175                                 else
2176                                         rec->flags &= ~FTRACE_FL_REGS_EN;
2177                         }
2178                         if (flag & FTRACE_FL_TRAMP) {
2179                                 if (rec->flags & FTRACE_FL_TRAMP)
2180                                         rec->flags |= FTRACE_FL_TRAMP_EN;
2181                                 else
2182                                         rec->flags &= ~FTRACE_FL_TRAMP_EN;
2183                         }
2184                 }
2185
2186                 /*
2187                  * If this record is being updated from a nop, then
2188                  *   return UPDATE_MAKE_CALL.
2189                  * Otherwise,
2190                  *   return UPDATE_MODIFY_CALL to tell the caller to convert
2191                  *   from the save regs, to a non-save regs function or
2192                  *   vice versa, or from a trampoline call.
2193                  */
2194                 if (flag & FTRACE_FL_ENABLED) {
2195                         ftrace_bug_type = FTRACE_BUG_CALL;
2196                         return FTRACE_UPDATE_MAKE_CALL;
2197                 }
2198
2199                 ftrace_bug_type = FTRACE_BUG_UPDATE;
2200                 return FTRACE_UPDATE_MODIFY_CALL;
2201         }
2202
2203         if (update) {
2204                 /* If there's no more users, clear all flags */
2205                 if (!ftrace_rec_count(rec))
2206                         rec->flags = 0;
2207                 else
2208                         /*
2209                          * Just disable the record, but keep the ops TRAMP
2210                          * and REGS states. The _EN flags must be disabled though.
2211                          */
2212                         rec->flags &= ~(FTRACE_FL_ENABLED | FTRACE_FL_TRAMP_EN |
2213                                         FTRACE_FL_REGS_EN);
2214         }
2215
2216         ftrace_bug_type = FTRACE_BUG_NOP;
2217         return FTRACE_UPDATE_MAKE_NOP;
2218 }
2219
2220 /**
2221  * ftrace_update_record, set a record that now is tracing or not
2222  * @rec: the record to update
2223  * @enable: set to 1 if the record is tracing, zero to force disable
2224  *
2225  * The records that represent all functions that can be traced need
2226  * to be updated when tracing has been enabled.
2227  */
2228 int ftrace_update_record(struct dyn_ftrace *rec, int enable)
2229 {
2230         return ftrace_check_record(rec, enable, 1);
2231 }
2232
2233 /**
2234  * ftrace_test_record, check if the record has been enabled or not
2235  * @rec: the record to test
2236  * @enable: set to 1 to check if enabled, 0 if it is disabled
2237  *
2238  * The arch code may need to test if a record is already set to
2239  * tracing to determine how to modify the function code that it
2240  * represents.
2241  */
2242 int ftrace_test_record(struct dyn_ftrace *rec, int enable)
2243 {
2244         return ftrace_check_record(rec, enable, 0);
2245 }
2246
2247 static struct ftrace_ops *
2248 ftrace_find_tramp_ops_any(struct dyn_ftrace *rec)
2249 {
2250         struct ftrace_ops *op;
2251         unsigned long ip = rec->ip;
2252
2253         do_for_each_ftrace_op(op, ftrace_ops_list) {
2254
2255                 if (!op->trampoline)
2256                         continue;
2257
2258                 if (hash_contains_ip(ip, op->func_hash))
2259                         return op;
2260         } while_for_each_ftrace_op(op);
2261
2262         return NULL;
2263 }
2264
2265 static struct ftrace_ops *
2266 ftrace_find_tramp_ops_next(struct dyn_ftrace *rec,
2267                            struct ftrace_ops *op)
2268 {
2269         unsigned long ip = rec->ip;
2270
2271         while_for_each_ftrace_op(op) {
2272
2273                 if (!op->trampoline)
2274                         continue;
2275
2276                 if (hash_contains_ip(ip, op->func_hash))
2277                         return op;
2278         } 
2279
2280         return NULL;
2281 }
2282
2283 static struct ftrace_ops *
2284 ftrace_find_tramp_ops_curr(struct dyn_ftrace *rec)
2285 {
2286         struct ftrace_ops *op;
2287         unsigned long ip = rec->ip;
2288
2289         /*
2290          * Need to check removed ops first.
2291          * If they are being removed, and this rec has a tramp,
2292          * and this rec is in the ops list, then it would be the
2293          * one with the tramp.
2294          */
2295         if (removed_ops) {
2296                 if (hash_contains_ip(ip, &removed_ops->old_hash))
2297                         return removed_ops;
2298         }
2299
2300         /*
2301          * Need to find the current trampoline for a rec.
2302          * Now, a trampoline is only attached to a rec if there
2303          * was a single 'ops' attached to it. But this can be called
2304          * when we are adding another op to the rec or removing the
2305          * current one. Thus, if the op is being added, we can
2306          * ignore it because it hasn't attached itself to the rec
2307          * yet.
2308          *
2309          * If an ops is being modified (hooking to different functions)
2310          * then we don't care about the new functions that are being
2311          * added, just the old ones (that are probably being removed).
2312          *
2313          * If we are adding an ops to a function that already is using
2314          * a trampoline, it needs to be removed (trampolines are only
2315          * for single ops connected), then an ops that is not being
2316          * modified also needs to be checked.
2317          */
2318         do_for_each_ftrace_op(op, ftrace_ops_list) {
2319
2320                 if (!op->trampoline)
2321                         continue;
2322
2323                 /*
2324                  * If the ops is being added, it hasn't gotten to
2325                  * the point to be removed from this tree yet.
2326                  */
2327                 if (op->flags & FTRACE_OPS_FL_ADDING)
2328                         continue;
2329
2330
2331                 /*
2332                  * If the ops is being modified and is in the old
2333                  * hash, then it is probably being removed from this
2334                  * function.
2335                  */
2336                 if ((op->flags & FTRACE_OPS_FL_MODIFYING) &&
2337                     hash_contains_ip(ip, &op->old_hash))
2338                         return op;
2339                 /*
2340                  * If the ops is not being added or modified, and it's
2341                  * in its normal filter hash, then this must be the one
2342                  * we want!
2343                  */
2344                 if (!(op->flags & FTRACE_OPS_FL_MODIFYING) &&
2345                     hash_contains_ip(ip, op->func_hash))
2346                         return op;
2347
2348         } while_for_each_ftrace_op(op);
2349
2350         return NULL;
2351 }
2352
2353 static struct ftrace_ops *
2354 ftrace_find_tramp_ops_new(struct dyn_ftrace *rec)
2355 {
2356         struct ftrace_ops *op;
2357         unsigned long ip = rec->ip;
2358
2359         do_for_each_ftrace_op(op, ftrace_ops_list) {
2360                 /* pass rec in as regs to have non-NULL val */
2361                 if (hash_contains_ip(ip, op->func_hash))
2362                         return op;
2363         } while_for_each_ftrace_op(op);
2364
2365         return NULL;
2366 }
2367
2368 /**
2369  * ftrace_get_addr_new - Get the call address to set to
2370  * @rec:  The ftrace record descriptor
2371  *
2372  * If the record has the FTRACE_FL_REGS set, that means that it
2373  * wants to convert to a callback that saves all regs. If FTRACE_FL_REGS
2374  * is not not set, then it wants to convert to the normal callback.
2375  *
2376  * Returns the address of the trampoline to set to
2377  */
2378 unsigned long ftrace_get_addr_new(struct dyn_ftrace *rec)
2379 {
2380         struct ftrace_ops *ops;
2381
2382         /* Trampolines take precedence over regs */
2383         if (rec->flags & FTRACE_FL_TRAMP) {
2384                 ops = ftrace_find_tramp_ops_new(rec);
2385                 if (FTRACE_WARN_ON(!ops || !ops->trampoline)) {
2386                         pr_warn("Bad trampoline accounting at: %p (%pS) (%lx)\n",
2387                                 (void *)rec->ip, (void *)rec->ip, rec->flags);
2388                         /* Ftrace is shutting down, return anything */
2389                         return (unsigned long)FTRACE_ADDR;
2390                 }
2391                 return ops->trampoline;
2392         }
2393
2394         if (rec->flags & FTRACE_FL_REGS)
2395                 return (unsigned long)FTRACE_REGS_ADDR;
2396         else
2397                 return (unsigned long)FTRACE_ADDR;
2398 }
2399
2400 /**
2401  * ftrace_get_addr_curr - Get the call address that is already there
2402  * @rec:  The ftrace record descriptor
2403  *
2404  * The FTRACE_FL_REGS_EN is set when the record already points to
2405  * a function that saves all the regs. Basically the '_EN' version
2406  * represents the current state of the function.
2407  *
2408  * Returns the address of the trampoline that is currently being called
2409  */
2410 unsigned long ftrace_get_addr_curr(struct dyn_ftrace *rec)
2411 {
2412         struct ftrace_ops *ops;
2413
2414         /* Trampolines take precedence over regs */
2415         if (rec->flags & FTRACE_FL_TRAMP_EN) {
2416                 ops = ftrace_find_tramp_ops_curr(rec);
2417                 if (FTRACE_WARN_ON(!ops)) {
2418                         pr_warn("Bad trampoline accounting at: %p (%pS)\n",
2419                                 (void *)rec->ip, (void *)rec->ip);
2420                         /* Ftrace is shutting down, return anything */
2421                         return (unsigned long)FTRACE_ADDR;
2422                 }
2423                 return ops->trampoline;
2424         }
2425
2426         if (rec->flags & FTRACE_FL_REGS_EN)
2427                 return (unsigned long)FTRACE_REGS_ADDR;
2428         else
2429                 return (unsigned long)FTRACE_ADDR;
2430 }
2431
2432 static int
2433 __ftrace_replace_code(struct dyn_ftrace *rec, int enable)
2434 {
2435         unsigned long ftrace_old_addr;
2436         unsigned long ftrace_addr;
2437         int ret;
2438
2439         ftrace_addr = ftrace_get_addr_new(rec);
2440
2441         /* This needs to be done before we call ftrace_update_record */
2442         ftrace_old_addr = ftrace_get_addr_curr(rec);
2443
2444         ret = ftrace_update_record(rec, enable);
2445
2446         ftrace_bug_type = FTRACE_BUG_UNKNOWN;
2447
2448         switch (ret) {
2449         case FTRACE_UPDATE_IGNORE:
2450                 return 0;
2451
2452         case FTRACE_UPDATE_MAKE_CALL:
2453                 ftrace_bug_type = FTRACE_BUG_CALL;
2454                 return ftrace_make_call(rec, ftrace_addr);
2455
2456         case FTRACE_UPDATE_MAKE_NOP:
2457                 ftrace_bug_type = FTRACE_BUG_NOP;
2458                 return ftrace_make_nop(NULL, rec, ftrace_old_addr);
2459
2460         case FTRACE_UPDATE_MODIFY_CALL:
2461                 ftrace_bug_type = FTRACE_BUG_UPDATE;
2462                 return ftrace_modify_call(rec, ftrace_old_addr, ftrace_addr);
2463         }
2464
2465         return -1; /* unknow ftrace bug */
2466 }
2467
2468 void __weak ftrace_replace_code(int enable)
2469 {
2470         struct dyn_ftrace *rec;
2471         struct ftrace_page *pg;
2472         int failed;
2473
2474         if (unlikely(ftrace_disabled))
2475                 return;
2476
2477         do_for_each_ftrace_rec(pg, rec) {
2478
2479                 if (rec->flags & FTRACE_FL_DISABLED)
2480                         continue;
2481
2482                 failed = __ftrace_replace_code(rec, enable);
2483                 if (failed) {
2484                         ftrace_bug(failed, rec);
2485                         /* Stop processing */
2486                         return;
2487                 }
2488         } while_for_each_ftrace_rec();
2489 }
2490
2491 struct ftrace_rec_iter {
2492         struct ftrace_page      *pg;
2493         int                     index;
2494 };
2495
2496 /**
2497  * ftrace_rec_iter_start, start up iterating over traced functions
2498  *
2499  * Returns an iterator handle that is used to iterate over all
2500  * the records that represent address locations where functions
2501  * are traced.
2502  *
2503  * May return NULL if no records are available.
2504  */
2505 struct ftrace_rec_iter *ftrace_rec_iter_start(void)
2506 {
2507         /*
2508          * We only use a single iterator.
2509          * Protected by the ftrace_lock mutex.
2510          */
2511         static struct ftrace_rec_iter ftrace_rec_iter;
2512         struct ftrace_rec_iter *iter = &ftrace_rec_iter;
2513
2514         iter->pg = ftrace_pages_start;
2515         iter->index = 0;
2516
2517         /* Could have empty pages */
2518         while (iter->pg && !iter->pg->index)
2519                 iter->pg = iter->pg->next;
2520
2521         if (!iter->pg)
2522                 return NULL;
2523
2524         return iter;
2525 }
2526
2527 /**
2528  * ftrace_rec_iter_next, get the next record to process.
2529  * @iter: The handle to the iterator.
2530  *
2531  * Returns the next iterator after the given iterator @iter.
2532  */
2533 struct ftrace_rec_iter *ftrace_rec_iter_next(struct ftrace_rec_iter *iter)
2534 {
2535         iter->index++;
2536
2537         if (iter->index >= iter->pg->index) {
2538                 iter->pg = iter->pg->next;
2539                 iter->index = 0;
2540
2541                 /* Could have empty pages */
2542                 while (iter->pg && !iter->pg->index)
2543                         iter->pg = iter->pg->next;
2544         }
2545
2546         if (!iter->pg)
2547                 return NULL;
2548
2549         return iter;
2550 }
2551
2552 /**
2553  * ftrace_rec_iter_record, get the record at the iterator location
2554  * @iter: The current iterator location
2555  *
2556  * Returns the record that the current @iter is at.
2557  */
2558 struct dyn_ftrace *ftrace_rec_iter_record(struct ftrace_rec_iter *iter)
2559 {
2560         return &iter->pg->records[iter->index];
2561 }
2562
2563 static int
2564 ftrace_code_disable(struct module *mod, struct dyn_ftrace *rec)
2565 {
2566         int ret;
2567
2568         if (unlikely(ftrace_disabled))
2569                 return 0;
2570
2571         ret = ftrace_make_nop(mod, rec, MCOUNT_ADDR);
2572         if (ret) {
2573                 ftrace_bug_type = FTRACE_BUG_INIT;
2574                 ftrace_bug(ret, rec);
2575                 return 0;
2576         }
2577         return 1;
2578 }
2579
2580 /*
2581  * archs can override this function if they must do something
2582  * before the modifying code is performed.
2583  */
2584 int __weak ftrace_arch_code_modify_prepare(void)
2585 {
2586         return 0;
2587 }
2588
2589 /*
2590  * archs can override this function if they must do something
2591  * after the modifying code is performed.
2592  */
2593 int __weak ftrace_arch_code_modify_post_process(void)
2594 {
2595         return 0;
2596 }
2597
2598 void ftrace_modify_all_code(int command)
2599 {
2600         int update = command & FTRACE_UPDATE_TRACE_FUNC;
2601         int err = 0;
2602
2603         /*
2604          * If the ftrace_caller calls a ftrace_ops func directly,
2605          * we need to make sure that it only traces functions it
2606          * expects to trace. When doing the switch of functions,
2607          * we need to update to the ftrace_ops_list_func first
2608          * before the transition between old and new calls are set,
2609          * as the ftrace_ops_list_func will check the ops hashes
2610          * to make sure the ops are having the right functions
2611          * traced.
2612          */
2613         if (update) {
2614                 err = ftrace_update_ftrace_func(ftrace_ops_list_func);
2615                 if (FTRACE_WARN_ON(err))
2616                         return;
2617         }
2618
2619         if (command & FTRACE_UPDATE_CALLS)
2620                 ftrace_replace_code(1);
2621         else if (command & FTRACE_DISABLE_CALLS)
2622                 ftrace_replace_code(0);
2623
2624         if (update && ftrace_trace_function != ftrace_ops_list_func) {
2625                 function_trace_op = set_function_trace_op;
2626                 smp_wmb();
2627                 /* If irqs are disabled, we are in stop machine */
2628                 if (!irqs_disabled())
2629                         smp_call_function(ftrace_sync_ipi, NULL, 1);
2630                 err = ftrace_update_ftrace_func(ftrace_trace_function);
2631                 if (FTRACE_WARN_ON(err))
2632                         return;
2633         }
2634
2635         if (command & FTRACE_START_FUNC_RET)
2636                 err = ftrace_enable_ftrace_graph_caller();
2637         else if (command & FTRACE_STOP_FUNC_RET)
2638                 err = ftrace_disable_ftrace_graph_caller();
2639         FTRACE_WARN_ON(err);
2640 }
2641
2642 static int __ftrace_modify_code(void *data)
2643 {
2644         int *command = data;
2645
2646         ftrace_modify_all_code(*command);
2647
2648         return 0;
2649 }
2650
2651 /**
2652  * ftrace_run_stop_machine, go back to the stop machine method
2653  * @command: The command to tell ftrace what to do
2654  *
2655  * If an arch needs to fall back to the stop machine method, the
2656  * it can call this function.
2657  */
2658 void ftrace_run_stop_machine(int command)
2659 {
2660         stop_machine(__ftrace_modify_code, &command, NULL);
2661 }
2662
2663 /**
2664  * arch_ftrace_update_code, modify the code to trace or not trace
2665  * @command: The command that needs to be done
2666  *
2667  * Archs can override this function if it does not need to
2668  * run stop_machine() to modify code.
2669  */
2670 void __weak arch_ftrace_update_code(int command)
2671 {
2672         ftrace_run_stop_machine(command);
2673 }
2674
2675 static void ftrace_run_update_code(int command)
2676 {
2677         int ret;
2678
2679         ret = ftrace_arch_code_modify_prepare();
2680         FTRACE_WARN_ON(ret);
2681         if (ret)
2682                 return;
2683
2684         /*
2685          * By default we use stop_machine() to modify the code.
2686          * But archs can do what ever they want as long as it
2687          * is safe. The stop_machine() is the safest, but also
2688          * produces the most overhead.
2689          */
2690         arch_ftrace_update_code(command);
2691
2692         ret = ftrace_arch_code_modify_post_process();
2693         FTRACE_WARN_ON(ret);
2694 }
2695
2696 static void ftrace_run_modify_code(struct ftrace_ops *ops, int command,
2697                                    struct ftrace_ops_hash *old_hash)
2698 {
2699         ops->flags |= FTRACE_OPS_FL_MODIFYING;
2700         ops->old_hash.filter_hash = old_hash->filter_hash;
2701         ops->old_hash.notrace_hash = old_hash->notrace_hash;
2702         ftrace_run_update_code(command);
2703         ops->old_hash.filter_hash = NULL;
2704         ops->old_hash.notrace_hash = NULL;
2705         ops->flags &= ~FTRACE_OPS_FL_MODIFYING;
2706 }
2707
2708 static ftrace_func_t saved_ftrace_func;
2709 static int ftrace_start_up;
2710
2711 void __weak arch_ftrace_trampoline_free(struct ftrace_ops *ops)
2712 {
2713 }
2714
2715 static void per_cpu_ops_free(struct ftrace_ops *ops)
2716 {
2717         free_percpu(ops->disabled);
2718 }
2719
2720 static void ftrace_startup_enable(int command)
2721 {
2722         if (saved_ftrace_func != ftrace_trace_function) {
2723                 saved_ftrace_func = ftrace_trace_function;
2724                 command |= FTRACE_UPDATE_TRACE_FUNC;
2725         }
2726
2727         if (!command || !ftrace_enabled)
2728                 return;
2729
2730         ftrace_run_update_code(command);
2731 }
2732
2733 static void ftrace_startup_all(int command)
2734 {
2735         update_all_ops = true;
2736         ftrace_startup_enable(command);
2737         update_all_ops = false;
2738 }
2739
2740 static int ftrace_startup(struct ftrace_ops *ops, int command)
2741 {
2742         int ret;
2743
2744         if (unlikely(ftrace_disabled))
2745                 return -ENODEV;
2746
2747         ret = __register_ftrace_function(ops);
2748         if (ret)
2749                 return ret;
2750
2751         ftrace_start_up++;
2752
2753         /*
2754          * Note that ftrace probes uses this to start up
2755          * and modify functions it will probe. But we still
2756          * set the ADDING flag for modification, as probes
2757          * do not have trampolines. If they add them in the
2758          * future, then the probes will need to distinguish
2759          * between adding and updating probes.
2760          */
2761         ops->flags |= FTRACE_OPS_FL_ENABLED | FTRACE_OPS_FL_ADDING;
2762
2763         ret = ftrace_hash_ipmodify_enable(ops);
2764         if (ret < 0) {
2765                 /* Rollback registration process */
2766                 __unregister_ftrace_function(ops);
2767                 ftrace_start_up--;
2768                 ops->flags &= ~FTRACE_OPS_FL_ENABLED;
2769                 return ret;
2770         }
2771
2772         if (ftrace_hash_rec_enable(ops, 1))
2773                 command |= FTRACE_UPDATE_CALLS;
2774
2775         ftrace_startup_enable(command);
2776
2777         ops->flags &= ~FTRACE_OPS_FL_ADDING;
2778
2779         return 0;
2780 }
2781
2782 static int ftrace_shutdown(struct ftrace_ops *ops, int command)
2783 {
2784         int ret;
2785
2786         if (unlikely(ftrace_disabled))
2787                 return -ENODEV;
2788
2789         ret = __unregister_ftrace_function(ops);
2790         if (ret)
2791                 return ret;
2792
2793         ftrace_start_up--;
2794         /*
2795          * Just warn in case of unbalance, no need to kill ftrace, it's not
2796          * critical but the ftrace_call callers may be never nopped again after
2797          * further ftrace uses.
2798          */
2799         WARN_ON_ONCE(ftrace_start_up < 0);
2800
2801         /* Disabling ipmodify never fails */
2802         ftrace_hash_ipmodify_disable(ops);
2803
2804         if (ftrace_hash_rec_disable(ops, 1))
2805                 command |= FTRACE_UPDATE_CALLS;
2806
2807         ops->flags &= ~FTRACE_OPS_FL_ENABLED;
2808
2809         if (saved_ftrace_func != ftrace_trace_function) {
2810                 saved_ftrace_func = ftrace_trace_function;
2811                 command |= FTRACE_UPDATE_TRACE_FUNC;
2812         }
2813
2814         if (!command || !ftrace_enabled) {
2815                 /*
2816                  * If these are per_cpu ops, they still need their
2817                  * per_cpu field freed. Since, function tracing is
2818                  * not currently active, we can just free them
2819                  * without synchronizing all CPUs.
2820                  */
2821                 if (ops->flags & FTRACE_OPS_FL_PER_CPU)
2822                         per_cpu_ops_free(ops);
2823                 return 0;
2824         }
2825
2826         /*
2827          * If the ops uses a trampoline, then it needs to be
2828          * tested first on update.
2829          */
2830         ops->flags |= FTRACE_OPS_FL_REMOVING;
2831         removed_ops = ops;
2832
2833         /* The trampoline logic checks the old hashes */
2834         ops->old_hash.filter_hash = ops->func_hash->filter_hash;
2835         ops->old_hash.notrace_hash = ops->func_hash->notrace_hash;
2836
2837         ftrace_run_update_code(command);
2838
2839         /*
2840          * If there's no more ops registered with ftrace, run a
2841          * sanity check to make sure all rec flags are cleared.
2842          */
2843         if (ftrace_ops_list == &ftrace_list_end) {
2844                 struct ftrace_page *pg;
2845                 struct dyn_ftrace *rec;
2846
2847                 do_for_each_ftrace_rec(pg, rec) {
2848                         if (FTRACE_WARN_ON_ONCE(rec->flags & ~FTRACE_FL_DISABLED))
2849                                 pr_warn("  %pS flags:%lx\n",
2850                                         (void *)rec->ip, rec->flags);
2851                 } while_for_each_ftrace_rec();
2852         }
2853
2854         ops->old_hash.filter_hash = NULL;
2855         ops->old_hash.notrace_hash = NULL;
2856
2857         removed_ops = NULL;
2858         ops->flags &= ~FTRACE_OPS_FL_REMOVING;
2859
2860         /*
2861          * Dynamic ops may be freed, we must make sure that all
2862          * callers are done before leaving this function.
2863          * The same goes for freeing the per_cpu data of the per_cpu
2864          * ops.
2865          */
2866         if (ops->flags & (FTRACE_OPS_FL_DYNAMIC | FTRACE_OPS_FL_PER_CPU)) {
2867                 /*
2868                  * We need to do a hard force of sched synchronization.
2869                  * This is because we use preempt_disable() to do RCU, but
2870                  * the function tracers can be called where RCU is not watching
2871                  * (like before user_exit()). We can not rely on the RCU
2872                  * infrastructure to do the synchronization, thus we must do it
2873                  * ourselves.
2874                  */
2875                 schedule_on_each_cpu(ftrace_sync);
2876
2877                 /*
2878                  * When the kernel is preeptive, tasks can be preempted
2879                  * while on a ftrace trampoline. Just scheduling a task on
2880                  * a CPU is not good enough to flush them. Calling
2881                  * synchornize_rcu_tasks() will wait for those tasks to
2882                  * execute and either schedule voluntarily or enter user space.
2883                  */
2884                 if (IS_ENABLED(CONFIG_PREEMPT))
2885                         synchronize_rcu_tasks();
2886
2887                 arch_ftrace_trampoline_free(ops);
2888
2889                 if (ops->flags & FTRACE_OPS_FL_PER_CPU)
2890                         per_cpu_ops_free(ops);
2891         }
2892
2893         return 0;
2894 }
2895
2896 static void ftrace_startup_sysctl(void)
2897 {
2898         int command;
2899
2900         if (unlikely(ftrace_disabled))
2901                 return;
2902
2903         /* Force update next time */
2904         saved_ftrace_func = NULL;
2905         /* ftrace_start_up is true if we want ftrace running */
2906         if (ftrace_start_up) {
2907                 command = FTRACE_UPDATE_CALLS;
2908                 if (ftrace_graph_active)
2909                         command |= FTRACE_START_FUNC_RET;
2910                 ftrace_startup_enable(command);
2911         }
2912 }
2913
2914 static void ftrace_shutdown_sysctl(void)
2915 {
2916         int command;
2917
2918         if (unlikely(ftrace_disabled))
2919                 return;
2920
2921         /* ftrace_start_up is true if ftrace is running */
2922         if (ftrace_start_up) {
2923                 command = FTRACE_DISABLE_CALLS;
2924                 if (ftrace_graph_active)
2925                         command |= FTRACE_STOP_FUNC_RET;
2926                 ftrace_run_update_code(command);
2927         }
2928 }
2929
2930 static u64              ftrace_update_time;
2931 unsigned long           ftrace_update_tot_cnt;
2932
2933 static inline int ops_traces_mod(struct ftrace_ops *ops)
2934 {
2935         /*
2936          * Filter_hash being empty will default to trace module.
2937          * But notrace hash requires a test of individual module functions.
2938          */
2939         return ftrace_hash_empty(ops->func_hash->filter_hash) &&
2940                 ftrace_hash_empty(ops->func_hash->notrace_hash);
2941 }
2942
2943 /*
2944  * Check if the current ops references the record.
2945  *
2946  * If the ops traces all functions, then it was already accounted for.
2947  * If the ops does not trace the current record function, skip it.
2948  * If the ops ignores the function via notrace filter, skip it.
2949  */
2950 static inline bool
2951 ops_references_rec(struct ftrace_ops *ops, struct dyn_ftrace *rec)
2952 {
2953         /* If ops isn't enabled, ignore it */
2954         if (!(ops->flags & FTRACE_OPS_FL_ENABLED))
2955                 return 0;
2956
2957         /* If ops traces all then it includes this function */
2958         if (ops_traces_mod(ops))
2959                 return 1;
2960
2961         /* The function must be in the filter */
2962         if (!ftrace_hash_empty(ops->func_hash->filter_hash) &&
2963             !__ftrace_lookup_ip(ops->func_hash->filter_hash, rec->ip))
2964                 return 0;
2965
2966         /* If in notrace hash, we ignore it too */
2967         if (ftrace_lookup_ip(ops->func_hash->notrace_hash, rec->ip))
2968                 return 0;
2969
2970         return 1;
2971 }
2972
2973 static int ftrace_update_code(struct module *mod, struct ftrace_page *new_pgs)
2974 {
2975         struct ftrace_page *pg;
2976         struct dyn_ftrace *p;
2977         u64 start, stop;
2978         unsigned long update_cnt = 0;
2979         unsigned long rec_flags = 0;
2980         int i;
2981
2982         start = ftrace_now(raw_smp_processor_id());
2983
2984         /*
2985          * When a module is loaded, this function is called to convert
2986          * the calls to mcount in its text to nops, and also to create
2987          * an entry in the ftrace data. Now, if ftrace is activated
2988          * after this call, but before the module sets its text to
2989          * read-only, the modification of enabling ftrace can fail if
2990          * the read-only is done while ftrace is converting the calls.
2991          * To prevent this, the module's records are set as disabled
2992          * and will be enabled after the call to set the module's text
2993          * to read-only.
2994          */
2995         if (mod)
2996                 rec_flags |= FTRACE_FL_DISABLED;
2997
2998         for (pg = new_pgs; pg; pg = pg->next) {
2999
3000                 for (i = 0; i < pg->index; i++) {
3001
3002                         /* If something went wrong, bail without enabling anything */
3003                         if (unlikely(ftrace_disabled))
3004                                 return -1;
3005
3006                         p = &pg->records[i];
3007                         p->flags = rec_flags;
3008
3009                         /*
3010                          * Do the initial record conversion from mcount jump
3011                          * to the NOP instructions.
3012                          */
3013                         if (!ftrace_code_disable(mod, p))
3014                                 break;
3015
3016                         update_cnt++;
3017                 }
3018         }
3019
3020         stop = ftrace_now(raw_smp_processor_id());
3021         ftrace_update_time = stop - start;
3022         ftrace_update_tot_cnt += update_cnt;
3023
3024         return 0;
3025 }
3026
3027 static int ftrace_allocate_records(struct ftrace_page *pg, int count)
3028 {
3029         int order;
3030         int cnt;
3031
3032         if (WARN_ON(!count))
3033                 return -EINVAL;
3034
3035         order = get_count_order(DIV_ROUND_UP(count, ENTRIES_PER_PAGE));
3036
3037         /*
3038          * We want to fill as much as possible. No more than a page
3039          * may be empty.
3040          */
3041         while ((PAGE_SIZE << order) / ENTRY_SIZE >= count + ENTRIES_PER_PAGE)
3042                 order--;
3043
3044  again:
3045         pg->records = (void *)__get_free_pages(GFP_KERNEL | __GFP_ZERO, order);
3046
3047         if (!pg->records) {
3048                 /* if we can't allocate this size, try something smaller */
3049                 if (!order)
3050                         return -ENOMEM;
3051                 order >>= 1;
3052                 goto again;
3053         }
3054
3055         cnt = (PAGE_SIZE << order) / ENTRY_SIZE;
3056         pg->size = cnt;
3057
3058         if (cnt > count)
3059                 cnt = count;
3060
3061         return cnt;
3062 }
3063
3064 static struct ftrace_page *
3065 ftrace_allocate_pages(unsigned long num_to_init)
3066 {
3067         struct ftrace_page *start_pg;
3068         struct ftrace_page *pg;
3069         int order;
3070         int cnt;
3071
3072         if (!num_to_init)
3073                 return 0;
3074
3075         start_pg = pg = kzalloc(sizeof(*pg), GFP_KERNEL);
3076         if (!pg)
3077                 return NULL;
3078
3079         /*
3080          * Try to allocate as much as possible in one continues
3081          * location that fills in all of the space. We want to
3082          * waste as little space as possible.
3083          */
3084         for (;;) {
3085                 cnt = ftrace_allocate_records(pg, num_to_init);
3086                 if (cnt < 0)
3087                         goto free_pages;
3088
3089                 num_to_init -= cnt;
3090                 if (!num_to_init)
3091                         break;
3092
3093                 pg->next = kzalloc(sizeof(*pg), GFP_KERNEL);
3094                 if (!pg->next)
3095                         goto free_pages;
3096
3097                 pg = pg->next;
3098         }
3099
3100         return start_pg;
3101
3102  free_pages:
3103         pg = start_pg;
3104         while (pg) {
3105                 order = get_count_order(pg->size / ENTRIES_PER_PAGE);
3106                 free_pages((unsigned long)pg->records, order);
3107                 start_pg = pg->next;
3108                 kfree(pg);
3109                 pg = start_pg;
3110         }
3111         pr_info("ftrace: FAILED to allocate memory for functions\n");
3112         return NULL;
3113 }
3114
3115 #define FTRACE_BUFF_MAX (KSYM_SYMBOL_LEN+4) /* room for wildcards */
3116
3117 struct ftrace_iterator {
3118         loff_t                          pos;
3119         loff_t                          func_pos;
3120         loff_t                          mod_pos;
3121         struct ftrace_page              *pg;
3122         struct dyn_ftrace               *func;
3123         struct ftrace_func_probe        *probe;
3124         struct ftrace_func_entry        *probe_entry;
3125         struct trace_parser             parser;
3126         struct ftrace_hash              *hash;
3127         struct ftrace_ops               *ops;
3128         struct trace_array              *tr;
3129         struct list_head                *mod_list;
3130         int                             pidx;
3131         int                             idx;
3132         unsigned                        flags;
3133 };
3134
3135 static void *
3136 t_probe_next(struct seq_file *m, loff_t *pos)
3137 {
3138         struct ftrace_iterator *iter = m->private;
3139         struct trace_array *tr = iter->ops->private;
3140         struct list_head *func_probes;
3141         struct ftrace_hash *hash;
3142         struct list_head *next;
3143         struct hlist_node *hnd = NULL;
3144         struct hlist_head *hhd;
3145         int size;
3146
3147         (*pos)++;
3148         iter->pos = *pos;
3149
3150         if (!tr)
3151                 return NULL;
3152
3153         func_probes = &tr->func_probes;
3154         if (list_empty(func_probes))
3155                 return NULL;
3156
3157         if (!iter->probe) {
3158                 next = func_probes->next;
3159                 iter->probe = list_entry(next, struct ftrace_func_probe, list);
3160         }
3161
3162         if (iter->probe_entry)
3163                 hnd = &iter->probe_entry->hlist;
3164
3165         hash = iter->probe->ops.func_hash->filter_hash;
3166         size = 1 << hash->size_bits;
3167
3168  retry:
3169         if (iter->pidx >= size) {
3170                 if (iter->probe->list.next == func_probes)
3171                         return NULL;
3172                 next = iter->probe->list.next;
3173                 iter->probe = list_entry(next, struct ftrace_func_probe, list);
3174                 hash = iter->probe->ops.func_hash->filter_hash;
3175                 size = 1 << hash->size_bits;
3176                 iter->pidx = 0;
3177         }
3178
3179         hhd = &hash->buckets[iter->pidx];
3180
3181         if (hlist_empty(hhd)) {
3182                 iter->pidx++;
3183                 hnd = NULL;
3184                 goto retry;
3185         }
3186
3187         if (!hnd)
3188                 hnd = hhd->first;
3189         else {
3190                 hnd = hnd->next;
3191                 if (!hnd) {
3192                         iter->pidx++;
3193                         goto retry;
3194                 }
3195         }
3196
3197         if (WARN_ON_ONCE(!hnd))
3198                 return NULL;
3199
3200         iter->probe_entry = hlist_entry(hnd, struct ftrace_func_entry, hlist);
3201
3202         return iter;
3203 }
3204
3205 static void *t_probe_start(struct seq_file *m, loff_t *pos)
3206 {
3207         struct ftrace_iterator *iter = m->private;
3208         void *p = NULL;
3209         loff_t l;
3210
3211         if (!(iter->flags & FTRACE_ITER_DO_PROBES))
3212                 return NULL;
3213
3214         if (iter->mod_pos > *pos)
3215                 return NULL;
3216
3217         iter->probe = NULL;
3218         iter->probe_entry = NULL;
3219         iter->pidx = 0;
3220         for (l = 0; l <= (*pos - iter->mod_pos); ) {
3221                 p = t_probe_next(m, &l);
3222                 if (!p)
3223                         break;
3224         }
3225         if (!p)
3226                 return NULL;
3227
3228         /* Only set this if we have an item */
3229         iter->flags |= FTRACE_ITER_PROBE;
3230
3231         return iter;
3232 }
3233
3234 static int
3235 t_probe_show(struct seq_file *m, struct ftrace_iterator *iter)
3236 {
3237         struct ftrace_func_entry *probe_entry;
3238         struct ftrace_probe_ops *probe_ops;
3239         struct ftrace_func_probe *probe;
3240
3241         probe = iter->probe;
3242         probe_entry = iter->probe_entry;
3243
3244         if (WARN_ON_ONCE(!probe || !probe_entry))
3245                 return -EIO;
3246
3247         probe_ops = probe->probe_ops;
3248
3249         if (probe_ops->print)
3250                 return probe_ops->print(m, probe_entry->ip, probe_ops, probe->data);
3251
3252         seq_printf(m, "%ps:%ps\n", (void *)probe_entry->ip,
3253                    (void *)probe_ops->func);
3254
3255         return 0;
3256 }
3257
3258 static void *
3259 t_mod_next(struct seq_file *m, loff_t *pos)
3260 {
3261         struct ftrace_iterator *iter = m->private;
3262         struct trace_array *tr = iter->tr;
3263
3264         (*pos)++;
3265         iter->pos = *pos;
3266
3267         iter->mod_list = iter->mod_list->next;
3268
3269         if (iter->mod_list == &tr->mod_trace ||
3270             iter->mod_list == &tr->mod_notrace) {
3271                 iter->flags &= ~FTRACE_ITER_MOD;
3272                 return NULL;
3273         }
3274
3275         iter->mod_pos = *pos;
3276
3277         return iter;
3278 }
3279
3280 static void *t_mod_start(struct seq_file *m, loff_t *pos)
3281 {
3282         struct ftrace_iterator *iter = m->private;
3283         void *p = NULL;
3284         loff_t l;
3285
3286         if (iter->func_pos > *pos)
3287                 return NULL;
3288
3289         iter->mod_pos = iter->func_pos;
3290
3291         /* probes are only available if tr is set */
3292         if (!iter->tr)
3293                 return NULL;
3294
3295         for (l = 0; l <= (*pos - iter->func_pos); ) {
3296                 p = t_mod_next(m, &l);
3297                 if (!p)
3298                         break;
3299         }
3300         if (!p) {
3301                 iter->flags &= ~FTRACE_ITER_MOD;
3302                 return t_probe_start(m, pos);
3303         }
3304
3305         /* Only set this if we have an item */
3306         iter->flags |= FTRACE_ITER_MOD;
3307
3308         return iter;
3309 }
3310
3311 static int
3312 t_mod_show(struct seq_file *m, struct ftrace_iterator *iter)
3313 {
3314         struct ftrace_mod_load *ftrace_mod;
3315         struct trace_array *tr = iter->tr;
3316
3317         if (WARN_ON_ONCE(!iter->mod_list) ||
3318                          iter->mod_list == &tr->mod_trace ||
3319                          iter->mod_list == &tr->mod_notrace)
3320                 return -EIO;
3321
3322         ftrace_mod = list_entry(iter->mod_list, struct ftrace_mod_load, list);
3323
3324         if (ftrace_mod->func)
3325                 seq_printf(m, "%s", ftrace_mod->func);
3326         else
3327                 seq_putc(m, '*');
3328
3329         seq_printf(m, ":mod:%s\n", ftrace_mod->module);
3330
3331         return 0;
3332 }
3333
3334 static void *
3335 t_func_next(struct seq_file *m, loff_t *pos)
3336 {
3337         struct ftrace_iterator *iter = m->private;
3338         struct dyn_ftrace *rec = NULL;
3339
3340         (*pos)++;
3341
3342  retry:
3343         if (iter->idx >= iter->pg->index) {
3344                 if (iter->pg->next) {
3345                         iter->pg = iter->pg->next;
3346                         iter->idx = 0;
3347                         goto retry;
3348                 }
3349         } else {
3350                 rec = &iter->pg->records[iter->idx++];
3351                 if (((iter->flags & (FTRACE_ITER_FILTER | FTRACE_ITER_NOTRACE)) &&
3352                      !ftrace_lookup_ip(iter->hash, rec->ip)) ||
3353
3354                     ((iter->flags & FTRACE_ITER_ENABLED) &&
3355                      !(rec->flags & FTRACE_FL_ENABLED))) {
3356
3357                         rec = NULL;
3358                         goto retry;
3359                 }
3360         }
3361
3362         if (!rec)
3363                 return NULL;
3364
3365         iter->pos = iter->func_pos = *pos;
3366         iter->func = rec;
3367
3368         return iter;
3369 }
3370
3371 static void *
3372 t_next(struct seq_file *m, void *v, loff_t *pos)
3373 {
3374         struct ftrace_iterator *iter = m->private;
3375         loff_t l = *pos; /* t_probe_start() must use original pos */
3376         void *ret;
3377
3378         if (unlikely(ftrace_disabled))
3379                 return NULL;
3380
3381         if (iter->flags & FTRACE_ITER_PROBE)
3382                 return t_probe_next(m, pos);
3383
3384         if (iter->flags & FTRACE_ITER_MOD)
3385                 return t_mod_next(m, pos);
3386
3387         if (iter->flags & FTRACE_ITER_PRINTALL) {
3388                 /* next must increment pos, and t_probe_start does not */
3389                 (*pos)++;
3390                 return t_mod_start(m, &l);
3391         }
3392
3393         ret = t_func_next(m, pos);
3394
3395         if (!ret)
3396                 return t_mod_start(m, &l);
3397
3398         return ret;
3399 }
3400
3401 static void reset_iter_read(struct ftrace_iterator *iter)
3402 {
3403         iter->pos = 0;
3404         iter->func_pos = 0;
3405         iter->flags &= ~(FTRACE_ITER_PRINTALL | FTRACE_ITER_PROBE | FTRACE_ITER_MOD);
3406 }
3407
3408 static void *t_start(struct seq_file *m, loff_t *pos)
3409 {
3410         struct ftrace_iterator *iter = m->private;
3411         void *p = NULL;
3412         loff_t l;
3413
3414         mutex_lock(&ftrace_lock);
3415
3416         if (unlikely(ftrace_disabled))
3417                 return NULL;
3418
3419         /*
3420          * If an lseek was done, then reset and start from beginning.
3421          */
3422         if (*pos < iter->pos)
3423                 reset_iter_read(iter);
3424
3425         /*
3426          * For set_ftrace_filter reading, if we have the filter
3427          * off, we can short cut and just print out that all
3428          * functions are enabled.
3429          */
3430         if ((iter->flags & (FTRACE_ITER_FILTER | FTRACE_ITER_NOTRACE)) &&
3431             ftrace_hash_empty(iter->hash)) {
3432                 iter->func_pos = 1; /* Account for the message */
3433                 if (*pos > 0)
3434                         return t_mod_start(m, pos);
3435                 iter->flags |= FTRACE_ITER_PRINTALL;
3436                 /* reset in case of seek/pread */
3437                 iter->flags &= ~FTRACE_ITER_PROBE;
3438                 return iter;
3439         }
3440
3441         if (iter->flags & FTRACE_ITER_MOD)
3442                 return t_mod_start(m, pos);
3443
3444         /*
3445          * Unfortunately, we need to restart at ftrace_pages_start
3446          * every time we let go of the ftrace_mutex. This is because
3447          * those pointers can change without the lock.
3448          */
3449         iter->pg = ftrace_pages_start;
3450         iter->idx = 0;
3451         for (l = 0; l <= *pos; ) {
3452                 p = t_func_next(m, &l);
3453                 if (!p)
3454                         break;
3455         }
3456
3457         if (!p)
3458                 return t_mod_start(m, pos);
3459
3460         return iter;
3461 }
3462
3463 static void t_stop(struct seq_file *m, void *p)
3464 {
3465         mutex_unlock(&ftrace_lock);
3466 }
3467
3468 void * __weak
3469 arch_ftrace_trampoline_func(struct ftrace_ops *ops, struct dyn_ftrace *rec)
3470 {
3471         return NULL;
3472 }
3473
3474 static void add_trampoline_func(struct seq_file *m, struct ftrace_ops *ops,
3475                                 struct dyn_ftrace *rec)
3476 {
3477         void *ptr;
3478
3479         ptr = arch_ftrace_trampoline_func(ops, rec);
3480         if (ptr)
3481                 seq_printf(m, " ->%pS", ptr);
3482 }
3483
3484 static int t_show(struct seq_file *m, void *v)
3485 {
3486         struct ftrace_iterator *iter = m->private;
3487         struct dyn_ftrace *rec;
3488
3489         if (iter->flags & FTRACE_ITER_PROBE)
3490                 return t_probe_show(m, iter);
3491
3492         if (iter->flags & FTRACE_ITER_MOD)
3493                 return t_mod_show(m, iter);
3494
3495         if (iter->flags & FTRACE_ITER_PRINTALL) {
3496                 if (iter->flags & FTRACE_ITER_NOTRACE)
3497                         seq_puts(m, "#### no functions disabled ####\n");
3498                 else
3499                         seq_puts(m, "#### all functions enabled ####\n");
3500                 return 0;
3501         }
3502
3503         rec = iter->func;
3504
3505         if (!rec)
3506                 return 0;
3507
3508         seq_printf(m, "%ps", (void *)rec->ip);
3509         if (iter->flags & FTRACE_ITER_ENABLED) {
3510                 struct ftrace_ops *ops;
3511
3512                 seq_printf(m, " (%ld)%s%s",
3513                            ftrace_rec_count(rec),
3514                            rec->flags & FTRACE_FL_REGS ? " R" : "  ",
3515                            rec->flags & FTRACE_FL_IPMODIFY ? " I" : "  ");
3516                 if (rec->flags & FTRACE_FL_TRAMP_EN) {
3517                         ops = ftrace_find_tramp_ops_any(rec);
3518                         if (ops) {
3519                                 do {
3520                                         seq_printf(m, "\ttramp: %pS (%pS)",
3521                                                    (void *)ops->trampoline,
3522                                                    (void *)ops->func);
3523                                         add_trampoline_func(m, ops, rec);
3524                                         ops = ftrace_find_tramp_ops_next(rec, ops);
3525                                 } while (ops);
3526                         } else
3527                                 seq_puts(m, "\ttramp: ERROR!");
3528                 } else {
3529                         add_trampoline_func(m, NULL, rec);
3530                 }
3531         }       
3532
3533         seq_putc(m, '\n');
3534
3535         return 0;
3536 }
3537
3538 static const struct seq_operations show_ftrace_seq_ops = {
3539         .start = t_start,
3540         .next = t_next,
3541         .stop = t_stop,
3542         .show = t_show,
3543 };
3544
3545 static int
3546 ftrace_avail_open(struct inode *inode, struct file *file)
3547 {
3548         struct ftrace_iterator *iter;
3549
3550         if (unlikely(ftrace_disabled))
3551                 return -ENODEV;
3552
3553         iter = __seq_open_private(file, &show_ftrace_seq_ops, sizeof(*iter));
3554         if (!iter)
3555                 return -ENOMEM;
3556
3557         iter->pg = ftrace_pages_start;
3558         iter->ops = &global_ops;
3559
3560         return 0;
3561 }
3562
3563 static int
3564 ftrace_enabled_open(struct inode *inode, struct file *file)
3565 {
3566         struct ftrace_iterator *iter;
3567
3568         iter = __seq_open_private(file, &show_ftrace_seq_ops, sizeof(*iter));
3569         if (!iter)
3570                 return -ENOMEM;
3571
3572         iter->pg = ftrace_pages_start;
3573         iter->flags = FTRACE_ITER_ENABLED;
3574         iter->ops = &global_ops;
3575
3576         return 0;
3577 }
3578
3579 /**
3580  * ftrace_regex_open - initialize function tracer filter files
3581  * @ops: The ftrace_ops that hold the hash filters
3582  * @flag: The type of filter to process
3583  * @inode: The inode, usually passed in to your open routine
3584  * @file: The file, usually passed in to your open routine
3585  *
3586  * ftrace_regex_open() initializes the filter files for the
3587  * @ops. Depending on @flag it may process the filter hash or
3588  * the notrace hash of @ops. With this called from the open
3589  * routine, you can use ftrace_filter_write() for the write
3590  * routine if @flag has FTRACE_ITER_FILTER set, or
3591  * ftrace_notrace_write() if @flag has FTRACE_ITER_NOTRACE set.
3592  * tracing_lseek() should be used as the lseek routine, and
3593  * release must call ftrace_regex_release().
3594  */
3595 int
3596 ftrace_regex_open(struct ftrace_ops *ops, int flag,
3597                   struct inode *inode, struct file *file)
3598 {
3599         struct ftrace_iterator *iter;
3600         struct ftrace_hash *hash;
3601         struct list_head *mod_head;
3602         struct trace_array *tr = ops->private;
3603         int ret = 0;
3604
3605         ftrace_ops_init(ops);
3606
3607         if (unlikely(ftrace_disabled))
3608                 return -ENODEV;
3609
3610         iter = kzalloc(sizeof(*iter), GFP_KERNEL);
3611         if (!iter)
3612                 return -ENOMEM;
3613
3614         if (trace_parser_get_init(&iter->parser, FTRACE_BUFF_MAX)) {
3615                 kfree(iter);
3616                 return -ENOMEM;
3617         }
3618
3619         iter->ops = ops;
3620         iter->flags = flag;
3621         iter->tr = tr;
3622
3623         mutex_lock(&ops->func_hash->regex_lock);
3624
3625         if (flag & FTRACE_ITER_NOTRACE) {
3626                 hash = ops->func_hash->notrace_hash;
3627                 mod_head = tr ? &tr->mod_notrace : NULL;
3628         } else {
3629                 hash = ops->func_hash->filter_hash;
3630                 mod_head = tr ? &tr->mod_trace : NULL;
3631         }
3632
3633         iter->mod_list = mod_head;
3634
3635         if (file->f_mode & FMODE_WRITE) {
3636                 const int size_bits = FTRACE_HASH_DEFAULT_BITS;
3637
3638                 if (file->f_flags & O_TRUNC) {
3639                         iter->hash = alloc_ftrace_hash(size_bits);
3640                         clear_ftrace_mod_list(mod_head);
3641                 } else {
3642                         iter->hash = alloc_and_copy_ftrace_hash(size_bits, hash);
3643                 }
3644
3645                 if (!iter->hash) {
3646                         trace_parser_put(&iter->parser);
3647                         kfree(iter);
3648                         ret = -ENOMEM;
3649                         goto out_unlock;
3650                 }
3651         } else
3652                 iter->hash = hash;
3653
3654         if (file->f_mode & FMODE_READ) {
3655                 iter->pg = ftrace_pages_start;
3656
3657                 ret = seq_open(file, &show_ftrace_seq_ops);
3658                 if (!ret) {
3659                         struct seq_file *m = file->private_data;
3660                         m->private = iter;
3661                 } else {
3662                         /* Failed */
3663                         free_ftrace_hash(iter->hash);
3664                         trace_parser_put(&iter->parser);
3665                         kfree(iter);
3666                 }
3667         } else
3668                 file->private_data = iter;
3669
3670  out_unlock:
3671         mutex_unlock(&ops->func_hash->regex_lock);
3672
3673         return ret;
3674 }
3675
3676 static int
3677 ftrace_filter_open(struct inode *inode, struct file *file)
3678 {
3679         struct ftrace_ops *ops = inode->i_private;
3680
3681         return ftrace_regex_open(ops,
3682                         FTRACE_ITER_FILTER | FTRACE_ITER_DO_PROBES,
3683                         inode, file);
3684 }
3685
3686 static int
3687 ftrace_notrace_open(struct inode *inode, struct file *file)
3688 {
3689         struct ftrace_ops *ops = inode->i_private;
3690
3691         return ftrace_regex_open(ops, FTRACE_ITER_NOTRACE,
3692                                  inode, file);
3693 }
3694
3695 /* Type for quick search ftrace basic regexes (globs) from filter_parse_regex */
3696 struct ftrace_glob {
3697         char *search;
3698         unsigned len;
3699         int type;
3700 };
3701
3702 /*
3703  * If symbols in an architecture don't correspond exactly to the user-visible
3704  * name of what they represent, it is possible to define this function to
3705  * perform the necessary adjustments.
3706 */
3707 char * __weak arch_ftrace_match_adjust(char *str, const char *search)
3708 {
3709         return str;
3710 }
3711
3712 static int ftrace_match(char *str, struct ftrace_glob *g)
3713 {
3714         int matched = 0;
3715         int slen;
3716
3717         str = arch_ftrace_match_adjust(str, g->search);
3718
3719         switch (g->type) {
3720         case MATCH_FULL:
3721                 if (strcmp(str, g->search) == 0)
3722                         matched = 1;
3723                 break;
3724         case MATCH_FRONT_ONLY:
3725                 if (strncmp(str, g->search, g->len) == 0)
3726                         matched = 1;
3727                 break;
3728         case MATCH_MIDDLE_ONLY:
3729                 if (strstr(str, g->search))
3730                         matched = 1;
3731                 break;
3732         case MATCH_END_ONLY:
3733                 slen = strlen(str);
3734                 if (slen >= g->len &&
3735                     memcmp(str + slen - g->len, g->search, g->len) == 0)
3736                         matched = 1;
3737                 break;
3738         case MATCH_GLOB:
3739                 if (glob_match(g->search, str))
3740                         matched = 1;
3741                 break;
3742         }
3743
3744         return matched;
3745 }
3746
3747 static int
3748 enter_record(struct ftrace_hash *hash, struct dyn_ftrace *rec, int clear_filter)
3749 {
3750         struct ftrace_func_entry *entry;
3751         int ret = 0;
3752
3753         entry = ftrace_lookup_ip(hash, rec->ip);
3754         if (clear_filter) {
3755                 /* Do nothing if it doesn't exist */
3756                 if (!entry)
3757                         return 0;
3758
3759                 free_hash_entry(hash, entry);
3760         } else {
3761                 /* Do nothing if it exists */
3762                 if (entry)
3763                         return 0;
3764
3765                 ret = add_hash_entry(hash, rec->ip);
3766         }
3767         return ret;
3768 }
3769
3770 static int
3771 ftrace_match_record(struct dyn_ftrace *rec, struct ftrace_glob *func_g,
3772                 struct ftrace_glob *mod_g, int exclude_mod)
3773 {
3774         char str[KSYM_SYMBOL_LEN];
3775         char *modname;
3776
3777         kallsyms_lookup(rec->ip, NULL, NULL, &modname, str);
3778
3779         if (mod_g) {
3780                 int mod_matches = (modname) ? ftrace_match(modname, mod_g) : 0;
3781
3782                 /* blank module name to match all modules */
3783                 if (!mod_g->len) {
3784                         /* blank module globbing: modname xor exclude_mod */
3785                         if (!exclude_mod != !modname)
3786                                 goto func_match;
3787                         return 0;
3788                 }
3789
3790                 /*
3791                  * exclude_mod is set to trace everything but the given
3792                  * module. If it is set and the module matches, then
3793                  * return 0. If it is not set, and the module doesn't match
3794                  * also return 0. Otherwise, check the function to see if
3795                  * that matches.
3796                  */
3797                 if (!mod_matches == !exclude_mod)
3798                         return 0;
3799 func_match:
3800                 /* blank search means to match all funcs in the mod */
3801                 if (!func_g->len)
3802                         return 1;
3803         }
3804
3805         return ftrace_match(str, func_g);
3806 }
3807
3808 static int
3809 match_records(struct ftrace_hash *hash, char *func, int len, char *mod)
3810 {
3811         struct ftrace_page *pg;
3812         struct dyn_ftrace *rec;
3813         struct ftrace_glob func_g = { .type = MATCH_FULL };
3814         struct ftrace_glob mod_g = { .type = MATCH_FULL };
3815         struct ftrace_glob *mod_match = (mod) ? &mod_g : NULL;
3816         int exclude_mod = 0;
3817         int found = 0;
3818         int ret;
3819         int clear_filter = 0;
3820
3821         if (func) {
3822                 func_g.type = filter_parse_regex(func, len, &func_g.search,
3823                                                  &clear_filter);
3824                 func_g.len = strlen(func_g.search);
3825         }
3826
3827         if (mod) {
3828                 mod_g.type = filter_parse_regex(mod, strlen(mod),
3829                                 &mod_g.search, &exclude_mod);
3830                 mod_g.len = strlen(mod_g.search);
3831         }
3832
3833         mutex_lock(&ftrace_lock);
3834
3835         if (unlikely(ftrace_disabled))
3836                 goto out_unlock;
3837
3838         do_for_each_ftrace_rec(pg, rec) {
3839
3840                 if (rec->flags & FTRACE_FL_DISABLED)
3841                         continue;
3842
3843                 if (ftrace_match_record(rec, &func_g, mod_match, exclude_mod)) {
3844                         ret = enter_record(hash, rec, clear_filter);
3845                         if (ret < 0) {
3846                                 found = ret;
3847                                 goto out_unlock;
3848                         }
3849                         found = 1;
3850                 }
3851         } while_for_each_ftrace_rec();
3852  out_unlock:
3853         mutex_unlock(&ftrace_lock);
3854
3855         return found;
3856 }
3857
3858 static int
3859 ftrace_match_records(struct ftrace_hash *hash, char *buff, int len)
3860 {
3861         return match_records(hash, buff, len, NULL);
3862 }
3863
3864 static void ftrace_ops_update_code(struct ftrace_ops *ops,
3865                                    struct ftrace_ops_hash *old_hash)
3866 {
3867         struct ftrace_ops *op;
3868
3869         if (!ftrace_enabled)
3870                 return;
3871
3872         if (ops->flags & FTRACE_OPS_FL_ENABLED) {
3873                 ftrace_run_modify_code(ops, FTRACE_UPDATE_CALLS, old_hash);
3874                 return;
3875         }
3876
3877         /*
3878          * If this is the shared global_ops filter, then we need to
3879          * check if there is another ops that shares it, is enabled.
3880          * If so, we still need to run the modify code.
3881          */
3882         if (ops->func_hash != &global_ops.local_hash)
3883                 return;
3884
3885         do_for_each_ftrace_op(op, ftrace_ops_list) {
3886                 if (op->func_hash == &global_ops.local_hash &&
3887                     op->flags & FTRACE_OPS_FL_ENABLED) {
3888                         ftrace_run_modify_code(op, FTRACE_UPDATE_CALLS, old_hash);
3889                         /* Only need to do this once */
3890                         return;
3891                 }
3892         } while_for_each_ftrace_op(op);
3893 }
3894
3895 static int ftrace_hash_move_and_update_ops(struct ftrace_ops *ops,
3896                                            struct ftrace_hash **orig_hash,
3897                                            struct ftrace_hash *hash,
3898                                            int enable)
3899 {
3900         struct ftrace_ops_hash old_hash_ops;
3901         struct ftrace_hash *old_hash;
3902         int ret;
3903
3904         old_hash = *orig_hash;
3905         old_hash_ops.filter_hash = ops->func_hash->filter_hash;
3906         old_hash_ops.notrace_hash = ops->func_hash->notrace_hash;
3907         ret = ftrace_hash_move(ops, enable, orig_hash, hash);
3908         if (!ret) {
3909                 ftrace_ops_update_code(ops, &old_hash_ops);
3910                 free_ftrace_hash_rcu(old_hash);
3911         }
3912         return ret;
3913 }
3914
3915 static bool module_exists(const char *module)
3916 {
3917         /* All modules have the symbol __this_module */
3918         const char this_mod[] = "__this_module";
3919         const int modname_size = MAX_PARAM_PREFIX_LEN + sizeof(this_mod) + 1;
3920         char modname[modname_size + 1];
3921         unsigned long val;
3922         int n;
3923
3924         n = snprintf(modname, modname_size + 1, "%s:%s", module, this_mod);
3925
3926         if (n > modname_size)
3927                 return false;
3928
3929         val = module_kallsyms_lookup_name(modname);
3930         return val != 0;
3931 }
3932
3933 static int cache_mod(struct trace_array *tr,
3934                      const char *func, char *module, int enable)
3935 {
3936         struct ftrace_mod_load *ftrace_mod, *n;
3937         struct list_head *head = enable ? &tr->mod_trace : &tr->mod_notrace;
3938         int ret;
3939
3940         mutex_lock(&ftrace_lock);
3941
3942         /* We do not cache inverse filters */
3943         if (func[0] == '!') {
3944                 func++;
3945                 ret = -EINVAL;
3946
3947                 /* Look to remove this hash */
3948                 list_for_each_entry_safe(ftrace_mod, n, head, list) {
3949                         if (strcmp(ftrace_mod->module, module) != 0)
3950                                 continue;
3951
3952                         /* no func matches all */
3953                         if (strcmp(func, "*") == 0 ||
3954                             (ftrace_mod->func &&
3955                              strcmp(ftrace_mod->func, func) == 0)) {
3956                                 ret = 0;
3957                                 free_ftrace_mod(ftrace_mod);
3958                                 continue;
3959                         }
3960                 }
3961                 goto out;
3962         }
3963
3964         ret = -EINVAL;
3965         /* We only care about modules that have not been loaded yet */
3966         if (module_exists(module))
3967                 goto out;
3968
3969         /* Save this string off, and execute it when the module is loaded */
3970         ret = ftrace_add_mod(tr, func, module, enable);
3971  out:
3972         mutex_unlock(&ftrace_lock);
3973
3974         return ret;
3975 }
3976
3977 static int
3978 ftrace_set_regex(struct ftrace_ops *ops, unsigned char *buf, int len,
3979                  int reset, int enable);
3980
3981 #ifdef CONFIG_MODULES
3982 static void process_mod_list(struct list_head *head, struct ftrace_ops *ops,
3983                              char *mod, bool enable)
3984 {
3985         struct ftrace_mod_load *ftrace_mod, *n;
3986         struct ftrace_hash **orig_hash, *new_hash;
3987         LIST_HEAD(process_mods);
3988         char *func;
3989         int ret;
3990
3991         mutex_lock(&ops->func_hash->regex_lock);
3992
3993         if (enable)
3994                 orig_hash = &ops->func_hash->filter_hash;
3995         else
3996                 orig_hash = &ops->func_hash->notrace_hash;
3997
3998         new_hash = alloc_and_copy_ftrace_hash(FTRACE_HASH_DEFAULT_BITS,
3999                                               *orig_hash);
4000         if (!new_hash)
4001                 goto out; /* warn? */
4002
4003         mutex_lock(&ftrace_lock);
4004
4005         list_for_each_entry_safe(ftrace_mod, n, head, list) {
4006
4007                 if (strcmp(ftrace_mod->module, mod) != 0)
4008                         continue;
4009
4010                 if (ftrace_mod->func)
4011                         func = kstrdup(ftrace_mod->func, GFP_KERNEL);
4012                 else
4013                         func = kstrdup("*", GFP_KERNEL);
4014
4015                 if (!func) /* warn? */
4016                         continue;
4017
4018                 list_del(&ftrace_mod->list);
4019                 list_add(&ftrace_mod->list, &process_mods);
4020
4021                 /* Use the newly allocated func, as it may be "*" */
4022                 kfree(ftrace_mod->func);
4023                 ftrace_mod->func = func;
4024         }
4025
4026         mutex_unlock(&ftrace_lock);
4027
4028         list_for_each_entry_safe(ftrace_mod, n, &process_mods, list) {
4029
4030                 func = ftrace_mod->func;
4031
4032                 /* Grabs ftrace_lock, which is why we have this extra step */
4033                 match_records(new_hash, func, strlen(func), mod);
4034                 free_ftrace_mod(ftrace_mod);
4035         }
4036
4037         if (enable && list_empty(head))
4038                 new_hash->flags &= ~FTRACE_HASH_FL_MOD;
4039
4040         mutex_lock(&ftrace_lock);
4041
4042         ret = ftrace_hash_move_and_update_ops(ops, orig_hash,
4043                                               new_hash, enable);
4044         mutex_unlock(&ftrace_lock);
4045
4046  out:
4047         mutex_unlock(&ops->func_hash->regex_lock);
4048
4049         free_ftrace_hash(new_hash);
4050 }
4051
4052 static void process_cached_mods(const char *mod_name)
4053 {
4054         struct trace_array *tr;
4055         char *mod;
4056
4057         mod = kstrdup(mod_name, GFP_KERNEL);
4058         if (!mod)
4059                 return;
4060
4061         mutex_lock(&trace_types_lock);
4062         list_for_each_entry(tr, &ftrace_trace_arrays, list) {
4063                 if (!list_empty(&tr->mod_trace))
4064                         process_mod_list(&tr->mod_trace, tr->ops, mod, true);
4065                 if (!list_empty(&tr->mod_notrace))
4066                         process_mod_list(&tr->mod_notrace, tr->ops, mod, false);
4067         }
4068         mutex_unlock(&trace_types_lock);
4069
4070         kfree(mod);
4071 }
4072 #endif
4073
4074 /*
4075  * We register the module command as a template to show others how
4076  * to register the a command as well.
4077  */
4078
4079 static int
4080 ftrace_mod_callback(struct trace_array *tr, struct ftrace_hash *hash,
4081                     char *func_orig, char *cmd, char *module, int enable)
4082 {
4083         char *func;
4084         int ret;
4085
4086         /* match_records() modifies func, and we need the original */
4087         func = kstrdup(func_orig, GFP_KERNEL);
4088         if (!func)
4089                 return -ENOMEM;
4090
4091         /*
4092          * cmd == 'mod' because we only registered this func
4093          * for the 'mod' ftrace_func_command.
4094          * But if you register one func with multiple commands,
4095          * you can tell which command was used by the cmd
4096          * parameter.
4097          */
4098         ret = match_records(hash, func, strlen(func), module);
4099         kfree(func);
4100
4101         if (!ret)
4102                 return cache_mod(tr, func_orig, module, enable);
4103         if (ret < 0)
4104                 return ret;
4105         return 0;
4106 }
4107
4108 static struct ftrace_func_command ftrace_mod_cmd = {
4109         .name                   = "mod",
4110         .func                   = ftrace_mod_callback,
4111 };
4112
4113 static int __init ftrace_mod_cmd_init(void)
4114 {
4115         return register_ftrace_command(&ftrace_mod_cmd);
4116 }
4117 core_initcall(ftrace_mod_cmd_init);
4118
4119 static void function_trace_probe_call(unsigned long ip, unsigned long parent_ip,
4120                                       struct ftrace_ops *op, struct pt_regs *pt_regs)
4121 {
4122         struct ftrace_probe_ops *probe_ops;
4123         struct ftrace_func_probe *probe;
4124
4125         probe = container_of(op, struct ftrace_func_probe, ops);
4126         probe_ops = probe->probe_ops;
4127
4128         /*
4129          * Disable preemption for these calls to prevent a RCU grace
4130          * period. This syncs the hash iteration and freeing of items
4131          * on the hash. rcu_read_lock is too dangerous here.
4132          */
4133         preempt_disable_notrace();
4134         probe_ops->func(ip, parent_ip, probe->tr, probe_ops, probe->data);
4135         preempt_enable_notrace();
4136 }
4137
4138 struct ftrace_func_map {
4139         struct ftrace_func_entry        entry;
4140         void                            *data;
4141 };
4142
4143 struct ftrace_func_mapper {
4144         struct ftrace_hash              hash;
4145 };
4146
4147 /**
4148  * allocate_ftrace_func_mapper - allocate a new ftrace_func_mapper
4149  *
4150  * Returns a ftrace_func_mapper descriptor that can be used to map ips to data.
4151  */
4152 struct ftrace_func_mapper *allocate_ftrace_func_mapper(void)
4153 {
4154         struct ftrace_hash *hash;
4155
4156         /*
4157          * The mapper is simply a ftrace_hash, but since the entries
4158          * in the hash are not ftrace_func_entry type, we define it
4159          * as a separate structure.
4160          */
4161         hash = alloc_ftrace_hash(FTRACE_HASH_DEFAULT_BITS);
4162         return (struct ftrace_func_mapper *)hash;
4163 }
4164
4165 /**
4166  * ftrace_func_mapper_find_ip - Find some data mapped to an ip
4167  * @mapper: The mapper that has the ip maps
4168  * @ip: the instruction pointer to find the data for
4169  *
4170  * Returns the data mapped to @ip if found otherwise NULL. The return
4171  * is actually the address of the mapper data pointer. The address is
4172  * returned for use cases where the data is no bigger than a long, and
4173  * the user can use the data pointer as its data instead of having to
4174  * allocate more memory for the reference.
4175  */
4176 void **ftrace_func_mapper_find_ip(struct ftrace_func_mapper *mapper,
4177                                   unsigned long ip)
4178 {
4179         struct ftrace_func_entry *entry;
4180         struct ftrace_func_map *map;
4181
4182         entry = ftrace_lookup_ip(&mapper->hash, ip);
4183         if (!entry)
4184                 return NULL;
4185
4186         map = (struct ftrace_func_map *)entry;
4187         return &map->data;
4188 }
4189
4190 /**
4191  * ftrace_func_mapper_add_ip - Map some data to an ip
4192  * @mapper: The mapper that has the ip maps
4193  * @ip: The instruction pointer address to map @data to
4194  * @data: The data to map to @ip
4195  *
4196  * Returns 0 on succes otherwise an error.
4197  */
4198 int ftrace_func_mapper_add_ip(struct ftrace_func_mapper *mapper,
4199                               unsigned long ip, void *data)
4200 {
4201         struct ftrace_func_entry *entry;
4202         struct ftrace_func_map *map;
4203
4204         entry = ftrace_lookup_ip(&mapper->hash, ip);
4205         if (entry)
4206                 return -EBUSY;
4207
4208         map = kmalloc(sizeof(*map), GFP_KERNEL);
4209         if (!map)
4210                 return -ENOMEM;
4211
4212         map->entry.ip = ip;
4213         map->data = data;
4214
4215         __add_hash_entry(&mapper->hash, &map->entry);
4216
4217         return 0;
4218 }
4219
4220 /**
4221  * ftrace_func_mapper_remove_ip - Remove an ip from the mapping
4222  * @mapper: The mapper that has the ip maps
4223  * @ip: The instruction pointer address to remove the data from
4224  *
4225  * Returns the data if it is found, otherwise NULL.
4226  * Note, if the data pointer is used as the data itself, (see 
4227  * ftrace_func_mapper_find_ip(), then the return value may be meaningless,
4228  * if the data pointer was set to zero.
4229  */
4230 void *ftrace_func_mapper_remove_ip(struct ftrace_func_mapper *mapper,
4231                                    unsigned long ip)
4232 {
4233         struct ftrace_func_entry *entry;
4234         struct ftrace_func_map *map;
4235         void *data;
4236
4237         entry = ftrace_lookup_ip(&mapper->hash, ip);
4238         if (!entry)
4239                 return NULL;
4240
4241         map = (struct ftrace_func_map *)entry;
4242         data = map->data;
4243
4244         remove_hash_entry(&mapper->hash, entry);
4245         kfree(entry);
4246
4247         return data;
4248 }
4249
4250 /**
4251  * free_ftrace_func_mapper - free a mapping of ips and data
4252  * @mapper: The mapper that has the ip maps
4253  * @free_func: A function to be called on each data item.
4254  *
4255  * This is used to free the function mapper. The @free_func is optional
4256  * and can be used if the data needs to be freed as well.
4257  */
4258 void free_ftrace_func_mapper(struct ftrace_func_mapper *mapper,
4259                              ftrace_mapper_func free_func)
4260 {
4261         struct ftrace_func_entry *entry;
4262         struct ftrace_func_map *map;
4263         struct hlist_head *hhd;
4264         int size = 1 << mapper->hash.size_bits;
4265         int i;
4266
4267         if (free_func && mapper->hash.count) {
4268                 for (i = 0; i < size; i++) {
4269                         hhd = &mapper->hash.buckets[i];
4270                         hlist_for_each_entry(entry, hhd, hlist) {
4271                                 map = (struct ftrace_func_map *)entry;
4272                                 free_func(map);
4273                         }
4274                 }
4275         }
4276         free_ftrace_hash(&mapper->hash);
4277 }
4278
4279 static void release_probe(struct ftrace_func_probe *probe)
4280 {
4281         struct ftrace_probe_ops *probe_ops;
4282
4283         mutex_lock(&ftrace_lock);
4284
4285         WARN_ON(probe->ref <= 0);
4286
4287         /* Subtract the ref that was used to protect this instance */
4288         probe->ref--;
4289
4290         if (!probe->ref) {
4291                 probe_ops = probe->probe_ops;
4292                 /*
4293                  * Sending zero as ip tells probe_ops to free
4294                  * the probe->data itself
4295                  */
4296                 if (probe_ops->free)
4297                         probe_ops->free(probe_ops, probe->tr, 0, probe->data);
4298                 list_del(&probe->list);
4299                 kfree(probe);
4300         }
4301         mutex_unlock(&ftrace_lock);
4302 }
4303
4304 static void acquire_probe_locked(struct ftrace_func_probe *probe)
4305 {
4306         /*
4307          * Add one ref to keep it from being freed when releasing the
4308          * ftrace_lock mutex.
4309          */
4310         probe->ref++;
4311 }
4312
4313 int
4314 register_ftrace_function_probe(char *glob, struct trace_array *tr,
4315                                struct ftrace_probe_ops *probe_ops,
4316                                void *data)
4317 {
4318         struct ftrace_func_entry *entry;
4319         struct ftrace_func_probe *probe;
4320         struct ftrace_hash **orig_hash;
4321         struct ftrace_hash *old_hash;
4322         struct ftrace_hash *hash;
4323         int count = 0;
4324         int size;
4325         int ret;
4326         int i;
4327
4328         if (WARN_ON(!tr))
4329                 return -EINVAL;
4330
4331         /* We do not support '!' for function probes */
4332         if (WARN_ON(glob[0] == '!'))
4333                 return -EINVAL;
4334
4335
4336         mutex_lock(&ftrace_lock);
4337         /* Check if the probe_ops is already registered */
4338         list_for_each_entry(probe, &tr->func_probes, list) {
4339                 if (probe->probe_ops == probe_ops)
4340                         break;
4341         }
4342         if (&probe->list == &tr->func_probes) {
4343                 probe = kzalloc(sizeof(*probe), GFP_KERNEL);
4344                 if (!probe) {
4345                         mutex_unlock(&ftrace_lock);
4346                         return -ENOMEM;
4347                 }
4348                 probe->probe_ops = probe_ops;
4349                 probe->ops.func = function_trace_probe_call;
4350                 probe->tr = tr;
4351                 ftrace_ops_init(&probe->ops);
4352                 list_add(&probe->list, &tr->func_probes);
4353         }
4354
4355         acquire_probe_locked(probe);
4356
4357         mutex_unlock(&ftrace_lock);
4358
4359         mutex_lock(&probe->ops.func_hash->regex_lock);
4360
4361         orig_hash = &probe->ops.func_hash->filter_hash;
4362         old_hash = *orig_hash;
4363         hash = alloc_and_copy_ftrace_hash(FTRACE_HASH_DEFAULT_BITS, old_hash);
4364
4365         ret = ftrace_match_records(hash, glob, strlen(glob));
4366
4367         /* Nothing found? */
4368         if (!ret)
4369                 ret = -EINVAL;
4370
4371         if (ret < 0)
4372                 goto out;
4373
4374         size = 1 << hash->size_bits;
4375         for (i = 0; i < size; i++) {
4376                 hlist_for_each_entry(entry, &hash->buckets[i], hlist) {
4377                         if (ftrace_lookup_ip(old_hash, entry->ip))
4378                                 continue;
4379                         /*
4380                          * The caller might want to do something special
4381                          * for each function we find. We call the callback
4382                          * to give the caller an opportunity to do so.
4383                          */
4384                         if (probe_ops->init) {
4385                                 ret = probe_ops->init(probe_ops, tr,
4386                                                       entry->ip, data,
4387                                                       &probe->data);
4388                                 if (ret < 0) {
4389                                         if (probe_ops->free && count)
4390                                                 probe_ops->free(probe_ops, tr,
4391                                                                 0, probe->data);
4392                                         probe->data = NULL;
4393                                         goto out;
4394                                 }
4395                         }
4396                         count++;
4397                 }
4398         }
4399
4400         mutex_lock(&ftrace_lock);
4401
4402         if (!count) {
4403                 /* Nothing was added? */
4404                 ret = -EINVAL;
4405                 goto out_unlock;
4406         }
4407
4408         ret = ftrace_hash_move_and_update_ops(&probe->ops, orig_hash,
4409                                               hash, 1);
4410         if (ret < 0)
4411                 goto err_unlock;
4412
4413         /* One ref for each new function traced */
4414         probe->ref += count;
4415
4416         if (!(probe->ops.flags & FTRACE_OPS_FL_ENABLED))
4417                 ret = ftrace_startup(&probe->ops, 0);
4418
4419  out_unlock:
4420         mutex_unlock(&ftrace_lock);
4421
4422         if (!ret)
4423                 ret = count;
4424  out:
4425         mutex_unlock(&probe->ops.func_hash->regex_lock);
4426         free_ftrace_hash(hash);
4427
4428         release_probe(probe);
4429
4430         return ret;
4431
4432  err_unlock:
4433         if (!probe_ops->free || !count)
4434                 goto out_unlock;
4435
4436         /* Failed to do the move, need to call the free functions */
4437         for (i = 0; i < size; i++) {
4438                 hlist_for_each_entry(entry, &hash->buckets[i], hlist) {
4439                         if (ftrace_lookup_ip(old_hash, entry->ip))
4440                                 continue;
4441                         probe_ops->free(probe_ops, tr, entry->ip, probe->data);
4442                 }
4443         }
4444         goto out_unlock;
4445 }
4446
4447 int
4448 unregister_ftrace_function_probe_func(char *glob, struct trace_array *tr,
4449                                       struct ftrace_probe_ops *probe_ops)
4450 {
4451         struct ftrace_ops_hash old_hash_ops;
4452         struct ftrace_func_entry *entry;
4453         struct ftrace_func_probe *probe;
4454         struct ftrace_glob func_g;
4455         struct ftrace_hash **orig_hash;
4456         struct ftrace_hash *old_hash;
4457         struct ftrace_hash *hash = NULL;
4458         struct hlist_node *tmp;
4459         struct hlist_head hhd;
4460         char str[KSYM_SYMBOL_LEN];
4461         int count = 0;
4462         int i, ret = -ENODEV;
4463         int size;
4464
4465         if (!glob || !strlen(glob) || !strcmp(glob, "*"))
4466                 func_g.search = NULL;
4467         else {
4468                 int not;
4469
4470                 func_g.type = filter_parse_regex(glob, strlen(glob),
4471                                                  &func_g.search, &not);
4472                 func_g.len = strlen(func_g.search);
4473                 func_g.search = glob;
4474
4475                 /* we do not support '!' for function probes */
4476                 if (WARN_ON(not))
4477                         return -EINVAL;
4478         }
4479
4480         mutex_lock(&ftrace_lock);
4481         /* Check if the probe_ops is already registered */
4482         list_for_each_entry(probe, &tr->func_probes, list) {
4483                 if (probe->probe_ops == probe_ops)
4484                         break;
4485         }
4486         if (&probe->list == &tr->func_probes)
4487                 goto err_unlock_ftrace;
4488
4489         ret = -EINVAL;
4490         if (!(probe->ops.flags & FTRACE_OPS_FL_INITIALIZED))
4491                 goto err_unlock_ftrace;
4492
4493         acquire_probe_locked(probe);
4494
4495         mutex_unlock(&ftrace_lock);
4496
4497         mutex_lock(&probe->ops.func_hash->regex_lock);
4498
4499         orig_hash = &probe->ops.func_hash->filter_hash;
4500         old_hash = *orig_hash;
4501
4502         if (ftrace_hash_empty(old_hash))
4503                 goto out_unlock;
4504
4505         old_hash_ops.filter_hash = old_hash;
4506         /* Probes only have filters */
4507         old_hash_ops.notrace_hash = NULL;
4508
4509         ret = -ENOMEM;
4510         hash = alloc_and_copy_ftrace_hash(FTRACE_HASH_DEFAULT_BITS, old_hash);
4511         if (!hash)
4512                 goto out_unlock;
4513
4514         INIT_HLIST_HEAD(&hhd);
4515
4516         size = 1 << hash->size_bits;
4517         for (i = 0; i < size; i++) {
4518                 hlist_for_each_entry_safe(entry, tmp, &hash->buckets[i], hlist) {
4519
4520                         if (func_g.search) {
4521                                 kallsyms_lookup(entry->ip, NULL, NULL,
4522                                                 NULL, str);
4523                                 if (!ftrace_match(str, &func_g))
4524                                         continue;
4525                         }
4526                         count++;
4527                         remove_hash_entry(hash, entry);
4528                         hlist_add_head(&entry->hlist, &hhd);
4529                 }
4530         }
4531
4532         /* Nothing found? */
4533         if (!count) {
4534                 ret = -EINVAL;
4535                 goto out_unlock;
4536         }
4537
4538         mutex_lock(&ftrace_lock);
4539
4540         WARN_ON(probe->ref < count);
4541
4542         probe->ref -= count;
4543
4544         if (ftrace_hash_empty(hash))
4545                 ftrace_shutdown(&probe->ops, 0);
4546
4547         ret = ftrace_hash_move_and_update_ops(&probe->ops, orig_hash,
4548                                               hash, 1);
4549
4550         /* still need to update the function call sites */
4551         if (ftrace_enabled && !ftrace_hash_empty(hash))
4552                 ftrace_run_modify_code(&probe->ops, FTRACE_UPDATE_CALLS,
4553                                        &old_hash_ops);
4554         synchronize_sched();
4555
4556         hlist_for_each_entry_safe(entry, tmp, &hhd, hlist) {
4557                 hlist_del(&entry->hlist);
4558                 if (probe_ops->free)
4559                         probe_ops->free(probe_ops, tr, entry->ip, probe->data);
4560                 kfree(entry);
4561         }
4562         mutex_unlock(&ftrace_lock);
4563
4564  out_unlock:
4565         mutex_unlock(&probe->ops.func_hash->regex_lock);
4566         free_ftrace_hash(hash);
4567
4568         release_probe(probe);
4569
4570         return ret;
4571
4572  err_unlock_ftrace:
4573         mutex_unlock(&ftrace_lock);
4574         return ret;
4575 }
4576
4577 void clear_ftrace_function_probes(struct trace_array *tr)
4578 {
4579         struct ftrace_func_probe *probe, *n;
4580
4581         list_for_each_entry_safe(probe, n, &tr->func_probes, list)
4582                 unregister_ftrace_function_probe_func(NULL, tr, probe->probe_ops);
4583 }
4584
4585 static LIST_HEAD(ftrace_commands);
4586 static DEFINE_MUTEX(ftrace_cmd_mutex);
4587
4588 /*
4589  * Currently we only register ftrace commands from __init, so mark this
4590  * __init too.
4591  */
4592 __init int register_ftrace_command(struct ftrace_func_command *cmd)
4593 {
4594         struct ftrace_func_command *p;
4595         int ret = 0;
4596
4597         mutex_lock(&ftrace_cmd_mutex);
4598         list_for_each_entry(p, &ftrace_commands, list) {
4599                 if (strcmp(cmd->name, p->name) == 0) {
4600                         ret = -EBUSY;
4601                         goto out_unlock;
4602                 }
4603         }
4604         list_add(&cmd->list, &ftrace_commands);
4605  out_unlock:
4606         mutex_unlock(&ftrace_cmd_mutex);
4607
4608         return ret;
4609 }
4610
4611 /*
4612  * Currently we only unregister ftrace commands from __init, so mark
4613  * this __init too.
4614  */
4615 __init int unregister_ftrace_command(struct ftrace_func_command *cmd)
4616 {
4617         struct ftrace_func_command *p, *n;
4618         int ret = -ENODEV;
4619
4620         mutex_lock(&ftrace_cmd_mutex);
4621         list_for_each_entry_safe(p, n, &ftrace_commands, list) {
4622                 if (strcmp(cmd->name, p->name) == 0) {
4623                         ret = 0;
4624                         list_del_init(&p->list);
4625                         goto out_unlock;
4626                 }
4627         }
4628  out_unlock:
4629         mutex_unlock(&ftrace_cmd_mutex);
4630
4631         return ret;
4632 }
4633
4634 static int ftrace_process_regex(struct ftrace_iterator *iter,
4635                                 char *buff, int len, int enable)
4636 {
4637         struct ftrace_hash *hash = iter->hash;
4638         struct trace_array *tr = iter->ops->private;
4639         char *func, *command, *next = buff;
4640         struct ftrace_func_command *p;
4641         int ret = -EINVAL;
4642
4643         func = strsep(&next, ":");
4644
4645         if (!next) {
4646                 ret = ftrace_match_records(hash, func, len);
4647                 if (!ret)
4648                         ret = -EINVAL;
4649                 if (ret < 0)
4650                         return ret;
4651                 return 0;
4652         }
4653
4654         /* command found */
4655
4656         command = strsep(&next, ":");
4657
4658         mutex_lock(&ftrace_cmd_mutex);
4659         list_for_each_entry(p, &ftrace_commands, list) {
4660                 if (strcmp(p->name, command) == 0) {
4661                         ret = p->func(tr, hash, func, command, next, enable);
4662                         goto out_unlock;
4663                 }
4664         }
4665  out_unlock:
4666         mutex_unlock(&ftrace_cmd_mutex);
4667
4668         return ret;
4669 }
4670
4671 static ssize_t
4672 ftrace_regex_write(struct file *file, const char __user *ubuf,
4673                    size_t cnt, loff_t *ppos, int enable)
4674 {
4675         struct ftrace_iterator *iter;
4676         struct trace_parser *parser;
4677         ssize_t ret, read;
4678
4679         if (!cnt)
4680                 return 0;
4681
4682         if (file->f_mode & FMODE_READ) {
4683                 struct seq_file *m = file->private_data;
4684                 iter = m->private;
4685         } else
4686                 iter = file->private_data;
4687
4688         if (unlikely(ftrace_disabled))
4689                 return -ENODEV;
4690
4691         /* iter->hash is a local copy, so we don't need regex_lock */
4692
4693         parser = &iter->parser;
4694         read = trace_get_user(parser, ubuf, cnt, ppos);
4695
4696         if (read >= 0 && trace_parser_loaded(parser) &&
4697             !trace_parser_cont(parser)) {
4698                 ret = ftrace_process_regex(iter, parser->buffer,
4699                                            parser->idx, enable);
4700                 trace_parser_clear(parser);
4701                 if (ret < 0)
4702                         goto out;
4703         }
4704
4705         ret = read;
4706  out:
4707         return ret;
4708 }
4709
4710 ssize_t
4711 ftrace_filter_write(struct file *file, const char __user *ubuf,
4712                     size_t cnt, loff_t *ppos)
4713 {
4714         return ftrace_regex_write(file, ubuf, cnt, ppos, 1);
4715 }
4716
4717 ssize_t
4718 ftrace_notrace_write(struct file *file, const char __user *ubuf,
4719                      size_t cnt, loff_t *ppos)
4720 {
4721         return ftrace_regex_write(file, ubuf, cnt, ppos, 0);
4722 }
4723
4724 static int
4725 ftrace_match_addr(struct ftrace_hash *hash, unsigned long ip, int remove)
4726 {
4727         struct ftrace_func_entry *entry;
4728
4729         if (!ftrace_location(ip))
4730                 return -EINVAL;
4731
4732         if (remove) {
4733                 entry = ftrace_lookup_ip(hash, ip);
4734                 if (!entry)
4735                         return -ENOENT;
4736                 free_hash_entry(hash, entry);
4737                 return 0;
4738         }
4739
4740         return add_hash_entry(hash, ip);
4741 }
4742
4743 static int
4744 ftrace_set_hash(struct ftrace_ops *ops, unsigned char *buf, int len,
4745                 unsigned long ip, int remove, int reset, int enable)
4746 {
4747         struct ftrace_hash **orig_hash;
4748         struct ftrace_hash *hash;
4749         int ret;
4750
4751         if (unlikely(ftrace_disabled))
4752                 return -ENODEV;
4753
4754         mutex_lock(&ops->func_hash->regex_lock);
4755
4756         if (enable)
4757                 orig_hash = &ops->func_hash->filter_hash;
4758         else
4759                 orig_hash = &ops->func_hash->notrace_hash;
4760
4761         if (reset)
4762                 hash = alloc_ftrace_hash(FTRACE_HASH_DEFAULT_BITS);
4763         else
4764                 hash = alloc_and_copy_ftrace_hash(FTRACE_HASH_DEFAULT_BITS, *orig_hash);
4765
4766         if (!hash) {
4767                 ret = -ENOMEM;
4768                 goto out_regex_unlock;
4769         }
4770
4771         if (buf && !ftrace_match_records(hash, buf, len)) {
4772                 ret = -EINVAL;
4773                 goto out_regex_unlock;
4774         }
4775         if (ip) {
4776                 ret = ftrace_match_addr(hash, ip, remove);
4777                 if (ret < 0)
4778                         goto out_regex_unlock;
4779         }
4780
4781         mutex_lock(&ftrace_lock);
4782         ret = ftrace_hash_move_and_update_ops(ops, orig_hash, hash, enable);
4783         mutex_unlock(&ftrace_lock);
4784
4785  out_regex_unlock:
4786         mutex_unlock(&ops->func_hash->regex_lock);
4787
4788         free_ftrace_hash(hash);
4789         return ret;
4790 }
4791
4792 static int
4793 ftrace_set_addr(struct ftrace_ops *ops, unsigned long ip, int remove,
4794                 int reset, int enable)
4795 {
4796         return ftrace_set_hash(ops, 0, 0, ip, remove, reset, enable);
4797 }
4798
4799 /**
4800  * ftrace_set_filter_ip - set a function to filter on in ftrace by address
4801  * @ops - the ops to set the filter with
4802  * @ip - the address to add to or remove from the filter.
4803  * @remove - non zero to remove the ip from the filter
4804  * @reset - non zero to reset all filters before applying this filter.
4805  *
4806  * Filters denote which functions should be enabled when tracing is enabled
4807  * If @ip is NULL, it failes to update filter.
4808  */
4809 int ftrace_set_filter_ip(struct ftrace_ops *ops, unsigned long ip,
4810                          int remove, int reset)
4811 {
4812         ftrace_ops_init(ops);
4813         return ftrace_set_addr(ops, ip, remove, reset, 1);
4814 }
4815 EXPORT_SYMBOL_GPL(ftrace_set_filter_ip);
4816
4817 /**
4818  * ftrace_ops_set_global_filter - setup ops to use global filters
4819  * @ops - the ops which will use the global filters
4820  *
4821  * ftrace users who need global function trace filtering should call this.
4822  * It can set the global filter only if ops were not initialized before.
4823  */
4824 void ftrace_ops_set_global_filter(struct ftrace_ops *ops)
4825 {
4826         if (ops->flags & FTRACE_OPS_FL_INITIALIZED)
4827                 return;
4828
4829         ftrace_ops_init(ops);
4830         ops->func_hash = &global_ops.local_hash;
4831 }
4832 EXPORT_SYMBOL_GPL(ftrace_ops_set_global_filter);
4833
4834 static int
4835 ftrace_set_regex(struct ftrace_ops *ops, unsigned char *buf, int len,
4836                  int reset, int enable)
4837 {
4838         return ftrace_set_hash(ops, buf, len, 0, 0, reset, enable);
4839 }
4840
4841 /**
4842  * ftrace_set_filter - set a function to filter on in ftrace
4843  * @ops - the ops to set the filter with
4844  * @buf - the string that holds the function filter text.
4845  * @len - the length of the string.
4846  * @reset - non zero to reset all filters before applying this filter.
4847  *
4848  * Filters denote which functions should be enabled when tracing is enabled.
4849  * If @buf is NULL and reset is set, all functions will be enabled for tracing.
4850  */
4851 int ftrace_set_filter(struct ftrace_ops *ops, unsigned char *buf,
4852                        int len, int reset)
4853 {
4854         ftrace_ops_init(ops);
4855         return ftrace_set_regex(ops, buf, len, reset, 1);
4856 }
4857 EXPORT_SYMBOL_GPL(ftrace_set_filter);
4858
4859 /**
4860  * ftrace_set_notrace - set a function to not trace in ftrace
4861  * @ops - the ops to set the notrace filter with
4862  * @buf - the string that holds the function notrace text.
4863  * @len - the length of the string.
4864  * @reset - non zero to reset all filters before applying this filter.
4865  *
4866  * Notrace Filters denote which functions should not be enabled when tracing
4867  * is enabled. If @buf is NULL and reset is set, all functions will be enabled
4868  * for tracing.
4869  */
4870 int ftrace_set_notrace(struct ftrace_ops *ops, unsigned char *buf,
4871                         int len, int reset)
4872 {
4873         ftrace_ops_init(ops);
4874         return ftrace_set_regex(ops, buf, len, reset, 0);
4875 }
4876 EXPORT_SYMBOL_GPL(ftrace_set_notrace);
4877 /**
4878  * ftrace_set_global_filter - set a function to filter on with global tracers
4879  * @buf - the string that holds the function filter text.
4880  * @len - the length of the string.
4881  * @reset - non zero to reset all filters before applying this filter.
4882  *
4883  * Filters denote which functions should be enabled when tracing is enabled.
4884  * If @buf is NULL and reset is set, all functions will be enabled for tracing.
4885  */
4886 void ftrace_set_global_filter(unsigned char *buf, int len, int reset)
4887 {
4888         ftrace_set_regex(&global_ops, buf, len, reset, 1);
4889 }
4890 EXPORT_SYMBOL_GPL(ftrace_set_global_filter);
4891
4892 /**
4893  * ftrace_set_global_notrace - set a function to not trace with global tracers
4894  * @buf - the string that holds the function notrace text.
4895  * @len - the length of the string.
4896  * @reset - non zero to reset all filters before applying this filter.
4897  *
4898  * Notrace Filters denote which functions should not be enabled when tracing
4899  * is enabled. If @buf is NULL and reset is set, all functions will be enabled
4900  * for tracing.
4901  */
4902 void ftrace_set_global_notrace(unsigned char *buf, int len, int reset)
4903 {
4904         ftrace_set_regex(&global_ops, buf, len, reset, 0);
4905 }
4906 EXPORT_SYMBOL_GPL(ftrace_set_global_notrace);
4907
4908 /*
4909  * command line interface to allow users to set filters on boot up.
4910  */
4911 #define FTRACE_FILTER_SIZE              COMMAND_LINE_SIZE
4912 static char ftrace_notrace_buf[FTRACE_FILTER_SIZE] __initdata;
4913 static char ftrace_filter_buf[FTRACE_FILTER_SIZE] __initdata;
4914
4915 /* Used by function selftest to not test if filter is set */
4916 bool ftrace_filter_param __initdata;
4917
4918 static int __init set_ftrace_notrace(char *str)
4919 {
4920         ftrace_filter_param = true;
4921         strlcpy(ftrace_notrace_buf, str, FTRACE_FILTER_SIZE);
4922         return 1;
4923 }
4924 __setup("ftrace_notrace=", set_ftrace_notrace);
4925
4926 static int __init set_ftrace_filter(char *str)
4927 {
4928         ftrace_filter_param = true;
4929         strlcpy(ftrace_filter_buf, str, FTRACE_FILTER_SIZE);
4930         return 1;
4931 }
4932 __setup("ftrace_filter=", set_ftrace_filter);
4933
4934 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
4935 static char ftrace_graph_buf[FTRACE_FILTER_SIZE] __initdata;
4936 static char ftrace_graph_notrace_buf[FTRACE_FILTER_SIZE] __initdata;
4937 static int ftrace_graph_set_hash(struct ftrace_hash *hash, char *buffer);
4938
4939 static unsigned long save_global_trampoline;
4940 static unsigned long save_global_flags;
4941
4942 static int __init set_graph_function(char *str)
4943 {
4944         strlcpy(ftrace_graph_buf, str, FTRACE_FILTER_SIZE);
4945         return 1;
4946 }
4947 __setup("ftrace_graph_filter=", set_graph_function);
4948
4949 static int __init set_graph_notrace_function(char *str)
4950 {
4951         strlcpy(ftrace_graph_notrace_buf, str, FTRACE_FILTER_SIZE);
4952         return 1;
4953 }
4954 __setup("ftrace_graph_notrace=", set_graph_notrace_function);
4955
4956 static int __init set_graph_max_depth_function(char *str)
4957 {
4958         if (!str)
4959                 return 0;
4960         fgraph_max_depth = simple_strtoul(str, NULL, 0);
4961         return 1;
4962 }
4963 __setup("ftrace_graph_max_depth=", set_graph_max_depth_function);
4964
4965 static void __init set_ftrace_early_graph(char *buf, int enable)
4966 {
4967         int ret;
4968         char *func;
4969         struct ftrace_hash *hash;
4970
4971         hash = alloc_ftrace_hash(FTRACE_HASH_DEFAULT_BITS);
4972         if (WARN_ON(!hash))
4973                 return;
4974
4975         while (buf) {
4976                 func = strsep(&buf, ",");
4977                 /* we allow only one expression at a time */
4978                 ret = ftrace_graph_set_hash(hash, func);
4979                 if (ret)
4980                         printk(KERN_DEBUG "ftrace: function %s not "
4981                                           "traceable\n", func);
4982         }
4983
4984         if (enable)
4985                 ftrace_graph_hash = hash;
4986         else
4987                 ftrace_graph_notrace_hash = hash;
4988 }
4989 #endif /* CONFIG_FUNCTION_GRAPH_TRACER */
4990
4991 void __init
4992 ftrace_set_early_filter(struct ftrace_ops *ops, char *buf, int enable)
4993 {
4994         char *func;
4995
4996         ftrace_ops_init(ops);
4997
4998         while (buf) {
4999                 func = strsep(&buf, ",");
5000                 ftrace_set_regex(ops, func, strlen(func), 0, enable);
5001         }
5002 }
5003
5004 static void __init set_ftrace_early_filters(void)
5005 {
5006         if (ftrace_filter_buf[0])
5007                 ftrace_set_early_filter(&global_ops, ftrace_filter_buf, 1);
5008         if (ftrace_notrace_buf[0])
5009                 ftrace_set_early_filter(&global_ops, ftrace_notrace_buf, 0);
5010 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
5011         if (ftrace_graph_buf[0])
5012                 set_ftrace_early_graph(ftrace_graph_buf, 1);
5013         if (ftrace_graph_notrace_buf[0])
5014                 set_ftrace_early_graph(ftrace_graph_notrace_buf, 0);
5015 #endif /* CONFIG_FUNCTION_GRAPH_TRACER */
5016 }
5017
5018 int ftrace_regex_release(struct inode *inode, struct file *file)
5019 {
5020         struct seq_file *m = (struct seq_file *)file->private_data;
5021         struct ftrace_iterator *iter;
5022         struct ftrace_hash **orig_hash;
5023         struct trace_parser *parser;
5024         int filter_hash;
5025         int ret;
5026
5027         if (file->f_mode & FMODE_READ) {
5028                 iter = m->private;
5029                 seq_release(inode, file);
5030         } else
5031                 iter = file->private_data;
5032
5033         parser = &iter->parser;
5034         if (trace_parser_loaded(parser)) {
5035                 parser->buffer[parser->idx] = 0;
5036                 ftrace_match_records(iter->hash, parser->buffer, parser->idx);
5037         }
5038
5039         trace_parser_put(parser);
5040
5041         mutex_lock(&iter->ops->func_hash->regex_lock);
5042
5043         if (file->f_mode & FMODE_WRITE) {
5044                 filter_hash = !!(iter->flags & FTRACE_ITER_FILTER);
5045
5046                 if (filter_hash) {
5047                         orig_hash = &iter->ops->func_hash->filter_hash;
5048                         if (iter->tr && !list_empty(&iter->tr->mod_trace))
5049                                 iter->hash->flags |= FTRACE_HASH_FL_MOD;
5050                 } else
5051                         orig_hash = &iter->ops->func_hash->notrace_hash;
5052
5053                 mutex_lock(&ftrace_lock);
5054                 ret = ftrace_hash_move_and_update_ops(iter->ops, orig_hash,
5055                                                       iter->hash, filter_hash);
5056                 mutex_unlock(&ftrace_lock);
5057         } else {
5058                 /* For read only, the hash is the ops hash */
5059                 iter->hash = NULL;
5060         }
5061
5062         mutex_unlock(&iter->ops->func_hash->regex_lock);
5063         free_ftrace_hash(iter->hash);
5064         kfree(iter);
5065
5066         return 0;
5067 }
5068
5069 static const struct file_operations ftrace_avail_fops = {
5070         .open = ftrace_avail_open,
5071         .read = seq_read,
5072         .llseek = seq_lseek,
5073         .release = seq_release_private,
5074 };
5075
5076 static const struct file_operations ftrace_enabled_fops = {
5077         .open = ftrace_enabled_open,
5078         .read = seq_read,
5079         .llseek = seq_lseek,
5080         .release = seq_release_private,
5081 };
5082
5083 static const struct file_operations ftrace_filter_fops = {
5084         .open = ftrace_filter_open,
5085         .read = seq_read,
5086         .write = ftrace_filter_write,
5087         .llseek = tracing_lseek,
5088         .release = ftrace_regex_release,
5089 };
5090
5091 static const struct file_operations ftrace_notrace_fops = {
5092         .open = ftrace_notrace_open,
5093         .read = seq_read,
5094         .write = ftrace_notrace_write,
5095         .llseek = tracing_lseek,
5096         .release = ftrace_regex_release,
5097 };
5098
5099 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
5100
5101 static DEFINE_MUTEX(graph_lock);
5102
5103 struct ftrace_hash *ftrace_graph_hash = EMPTY_HASH;
5104 struct ftrace_hash *ftrace_graph_notrace_hash = EMPTY_HASH;
5105
5106 enum graph_filter_type {
5107         GRAPH_FILTER_NOTRACE    = 0,
5108         GRAPH_FILTER_FUNCTION,
5109 };
5110
5111 #define FTRACE_GRAPH_EMPTY      ((void *)1)
5112
5113 struct ftrace_graph_data {
5114         struct ftrace_hash              *hash;
5115         struct ftrace_func_entry        *entry;
5116         int                             idx;   /* for hash table iteration */
5117         enum graph_filter_type          type;
5118         struct ftrace_hash              *new_hash;
5119         const struct seq_operations     *seq_ops;
5120         struct trace_parser             parser;
5121 };
5122
5123 static void *
5124 __g_next(struct seq_file *m, loff_t *pos)
5125 {
5126         struct ftrace_graph_data *fgd = m->private;
5127         struct ftrace_func_entry *entry = fgd->entry;
5128         struct hlist_head *head;
5129         int i, idx = fgd->idx;
5130
5131         if (*pos >= fgd->hash->count)
5132                 return NULL;
5133
5134         if (entry) {
5135                 hlist_for_each_entry_continue(entry, hlist) {
5136                         fgd->entry = entry;
5137                         return entry;
5138                 }
5139
5140                 idx++;
5141         }
5142
5143         for (i = idx; i < 1 << fgd->hash->size_bits; i++) {
5144                 head = &fgd->hash->buckets[i];
5145                 hlist_for_each_entry(entry, head, hlist) {
5146                         fgd->entry = entry;
5147                         fgd->idx = i;
5148                         return entry;
5149                 }
5150         }
5151         return NULL;
5152 }
5153
5154 static void *
5155 g_next(struct seq_file *m, void *v, loff_t *pos)
5156 {
5157         (*pos)++;
5158         return __g_next(m, pos);
5159 }
5160
5161 static void *g_start(struct seq_file *m, loff_t *pos)
5162 {
5163         struct ftrace_graph_data *fgd = m->private;
5164
5165         mutex_lock(&graph_lock);
5166
5167         if (fgd->type == GRAPH_FILTER_FUNCTION)
5168                 fgd->hash = rcu_dereference_protected(ftrace_graph_hash,
5169                                         lockdep_is_held(&graph_lock));
5170         else
5171                 fgd->hash = rcu_dereference_protected(ftrace_graph_notrace_hash,
5172                                         lockdep_is_held(&graph_lock));
5173
5174         /* Nothing, tell g_show to print all functions are enabled */
5175         if (ftrace_hash_empty(fgd->hash) && !*pos)
5176                 return FTRACE_GRAPH_EMPTY;
5177
5178         fgd->idx = 0;
5179         fgd->entry = NULL;
5180         return __g_next(m, pos);
5181 }
5182
5183 static void g_stop(struct seq_file *m, void *p)
5184 {
5185         mutex_unlock(&graph_lock);
5186 }
5187
5188 static int g_show(struct seq_file *m, void *v)
5189 {
5190         struct ftrace_func_entry *entry = v;
5191
5192         if (!entry)
5193                 return 0;
5194
5195         if (entry == FTRACE_GRAPH_EMPTY) {
5196                 struct ftrace_graph_data *fgd = m->private;
5197
5198                 if (fgd->type == GRAPH_FILTER_FUNCTION)
5199                         seq_puts(m, "#### all functions enabled ####\n");
5200                 else
5201                         seq_puts(m, "#### no functions disabled ####\n");
5202                 return 0;
5203         }
5204
5205         seq_printf(m, "%ps\n", (void *)entry->ip);
5206
5207         return 0;
5208 }
5209
5210 static const struct seq_operations ftrace_graph_seq_ops = {
5211         .start = g_start,
5212         .next = g_next,
5213         .stop = g_stop,
5214         .show = g_show,
5215 };
5216
5217 static int
5218 __ftrace_graph_open(struct inode *inode, struct file *file,
5219                     struct ftrace_graph_data *fgd)
5220 {
5221         int ret = 0;
5222         struct ftrace_hash *new_hash = NULL;
5223
5224         if (file->f_mode & FMODE_WRITE) {
5225                 const int size_bits = FTRACE_HASH_DEFAULT_BITS;
5226
5227                 if (trace_parser_get_init(&fgd->parser, FTRACE_BUFF_MAX))
5228                         return -ENOMEM;
5229
5230                 if (file->f_flags & O_TRUNC)
5231                         new_hash = alloc_ftrace_hash(size_bits);
5232                 else
5233                         new_hash = alloc_and_copy_ftrace_hash(size_bits,
5234                                                               fgd->hash);
5235                 if (!new_hash) {
5236                         ret = -ENOMEM;
5237                         goto out;
5238                 }
5239         }
5240
5241         if (file->f_mode & FMODE_READ) {
5242                 ret = seq_open(file, &ftrace_graph_seq_ops);
5243                 if (!ret) {
5244                         struct seq_file *m = file->private_data;
5245                         m->private = fgd;
5246                 } else {
5247                         /* Failed */
5248                         free_ftrace_hash(new_hash);
5249                         new_hash = NULL;
5250                 }
5251         } else
5252                 file->private_data = fgd;
5253
5254 out:
5255         if (ret < 0 && file->f_mode & FMODE_WRITE)
5256                 trace_parser_put(&fgd->parser);
5257
5258         fgd->new_hash = new_hash;
5259
5260         /*
5261          * All uses of fgd->hash must be taken with the graph_lock
5262          * held. The graph_lock is going to be released, so force
5263          * fgd->hash to be reinitialized when it is taken again.
5264          */
5265         fgd->hash = NULL;
5266
5267         return ret;
5268 }
5269
5270 static int
5271 ftrace_graph_open(struct inode *inode, struct file *file)
5272 {
5273         struct ftrace_graph_data *fgd;
5274         int ret;
5275
5276         if (unlikely(ftrace_disabled))
5277                 return -ENODEV;
5278
5279         fgd = kmalloc(sizeof(*fgd), GFP_KERNEL);
5280         if (fgd == NULL)
5281                 return -ENOMEM;
5282
5283         mutex_lock(&graph_lock);
5284
5285         fgd->hash = rcu_dereference_protected(ftrace_graph_hash,
5286                                         lockdep_is_held(&graph_lock));
5287         fgd->type = GRAPH_FILTER_FUNCTION;
5288         fgd->seq_ops = &ftrace_graph_seq_ops;
5289
5290         ret = __ftrace_graph_open(inode, file, fgd);
5291         if (ret < 0)
5292                 kfree(fgd);
5293
5294         mutex_unlock(&graph_lock);
5295         return ret;
5296 }
5297
5298 static int
5299 ftrace_graph_notrace_open(struct inode *inode, struct file *file)
5300 {
5301         struct ftrace_graph_data *fgd;
5302         int ret;
5303
5304         if (unlikely(ftrace_disabled))
5305                 return -ENODEV;
5306
5307         fgd = kmalloc(sizeof(*fgd), GFP_KERNEL);
5308         if (fgd == NULL)
5309                 return -ENOMEM;
5310
5311         mutex_lock(&graph_lock);
5312
5313         fgd->hash = rcu_dereference_protected(ftrace_graph_notrace_hash,
5314                                         lockdep_is_held(&graph_lock));
5315         fgd->type = GRAPH_FILTER_NOTRACE;
5316         fgd->seq_ops = &ftrace_graph_seq_ops;
5317
5318         ret = __ftrace_graph_open(inode, file, fgd);
5319         if (ret < 0)
5320                 kfree(fgd);
5321
5322         mutex_unlock(&graph_lock);
5323         return ret;
5324 }
5325
5326 static int
5327 ftrace_graph_release(struct inode *inode, struct file *file)
5328 {
5329         struct ftrace_graph_data *fgd;
5330         struct ftrace_hash *old_hash, *new_hash;
5331         struct trace_parser *parser;
5332         int ret = 0;
5333
5334         if (file->f_mode & FMODE_READ) {
5335                 struct seq_file *m = file->private_data;
5336
5337                 fgd = m->private;
5338                 seq_release(inode, file);
5339         } else {
5340                 fgd = file->private_data;
5341         }
5342
5343
5344         if (file->f_mode & FMODE_WRITE) {
5345
5346                 parser = &fgd->parser;
5347
5348                 if (trace_parser_loaded((parser))) {
5349                         parser->buffer[parser->idx] = 0;
5350                         ret = ftrace_graph_set_hash(fgd->new_hash,
5351                                                     parser->buffer);
5352                 }
5353
5354                 trace_parser_put(parser);
5355
5356                 new_hash = __ftrace_hash_move(fgd->new_hash);
5357                 if (!new_hash) {
5358                         ret = -ENOMEM;
5359                         goto out;
5360                 }
5361
5362                 mutex_lock(&graph_lock);
5363
5364                 if (fgd->type == GRAPH_FILTER_FUNCTION) {
5365                         old_hash = rcu_dereference_protected(ftrace_graph_hash,
5366                                         lockdep_is_held(&graph_lock));
5367                         rcu_assign_pointer(ftrace_graph_hash, new_hash);
5368                 } else {
5369                         old_hash = rcu_dereference_protected(ftrace_graph_notrace_hash,
5370                                         lockdep_is_held(&graph_lock));
5371                         rcu_assign_pointer(ftrace_graph_notrace_hash, new_hash);
5372                 }
5373
5374                 mutex_unlock(&graph_lock);
5375
5376                 /* Wait till all users are no longer using the old hash */
5377                 synchronize_sched();
5378
5379                 free_ftrace_hash(old_hash);
5380         }
5381
5382  out:
5383         free_ftrace_hash(fgd->new_hash);
5384         kfree(fgd);
5385
5386         return ret;
5387 }
5388
5389 static int
5390 ftrace_graph_set_hash(struct ftrace_hash *hash, char *buffer)
5391 {
5392         struct ftrace_glob func_g;
5393         struct dyn_ftrace *rec;
5394         struct ftrace_page *pg;
5395         struct ftrace_func_entry *entry;
5396         int fail = 1;
5397         int not;
5398
5399         /* decode regex */
5400         func_g.type = filter_parse_regex(buffer, strlen(buffer),
5401                                          &func_g.search, &not);
5402
5403         func_g.len = strlen(func_g.search);
5404
5405         mutex_lock(&ftrace_lock);
5406
5407         if (unlikely(ftrace_disabled)) {
5408                 mutex_unlock(&ftrace_lock);
5409                 return -ENODEV;
5410         }
5411
5412         do_for_each_ftrace_rec(pg, rec) {
5413
5414                 if (rec->flags & FTRACE_FL_DISABLED)
5415                         continue;
5416
5417                 if (ftrace_match_record(rec, &func_g, NULL, 0)) {
5418                         entry = ftrace_lookup_ip(hash, rec->ip);
5419
5420                         if (!not) {
5421                                 fail = 0;
5422
5423                                 if (entry)
5424                                         continue;
5425                                 if (add_hash_entry(hash, rec->ip) < 0)
5426                                         goto out;
5427                         } else {
5428                                 if (entry) {
5429                                         free_hash_entry(hash, entry);
5430                                         fail = 0;
5431                                 }
5432                         }
5433                 }
5434         } while_for_each_ftrace_rec();
5435 out:
5436         mutex_unlock(&ftrace_lock);
5437
5438         if (fail)
5439                 return -EINVAL;
5440
5441         return 0;
5442 }
5443
5444 static ssize_t
5445 ftrace_graph_write(struct file *file, const char __user *ubuf,
5446                    size_t cnt, loff_t *ppos)
5447 {
5448         ssize_t read, ret = 0;
5449         struct ftrace_graph_data *fgd = file->private_data;
5450         struct trace_parser *parser;
5451
5452         if (!cnt)
5453                 return 0;
5454
5455         /* Read mode uses seq functions */
5456         if (file->f_mode & FMODE_READ) {
5457                 struct seq_file *m = file->private_data;
5458                 fgd = m->private;
5459         }
5460
5461         parser = &fgd->parser;
5462
5463         read = trace_get_user(parser, ubuf, cnt, ppos);
5464
5465         if (read >= 0 && trace_parser_loaded(parser) &&
5466             !trace_parser_cont(parser)) {
5467
5468                 ret = ftrace_graph_set_hash(fgd->new_hash,
5469                                             parser->buffer);
5470                 trace_parser_clear(parser);
5471         }
5472
5473         if (!ret)
5474                 ret = read;
5475
5476         return ret;
5477 }
5478
5479 static const struct file_operations ftrace_graph_fops = {
5480         .open           = ftrace_graph_open,
5481         .read           = seq_read,
5482         .write          = ftrace_graph_write,
5483         .llseek         = tracing_lseek,
5484         .release        = ftrace_graph_release,
5485 };
5486
5487 static const struct file_operations ftrace_graph_notrace_fops = {
5488         .open           = ftrace_graph_notrace_open,
5489         .read           = seq_read,
5490         .write          = ftrace_graph_write,
5491         .llseek         = tracing_lseek,
5492         .release        = ftrace_graph_release,
5493 };
5494 #endif /* CONFIG_FUNCTION_GRAPH_TRACER */
5495
5496 void ftrace_create_filter_files(struct ftrace_ops *ops,
5497                                 struct dentry *parent)
5498 {
5499
5500         trace_create_file("set_ftrace_filter", 0644, parent,
5501                           ops, &ftrace_filter_fops);
5502
5503         trace_create_file("set_ftrace_notrace", 0644, parent,
5504                           ops, &ftrace_notrace_fops);
5505 }
5506
5507 /*
5508  * The name "destroy_filter_files" is really a misnomer. Although
5509  * in the future, it may actualy delete the files, but this is
5510  * really intended to make sure the ops passed in are disabled
5511  * and that when this function returns, the caller is free to
5512  * free the ops.
5513  *
5514  * The "destroy" name is only to match the "create" name that this
5515  * should be paired with.
5516  */
5517 void ftrace_destroy_filter_files(struct ftrace_ops *ops)
5518 {
5519         mutex_lock(&ftrace_lock);
5520         if (ops->flags & FTRACE_OPS_FL_ENABLED)
5521                 ftrace_shutdown(ops, 0);
5522         ops->flags |= FTRACE_OPS_FL_DELETED;
5523         mutex_unlock(&ftrace_lock);
5524 }
5525
5526 static __init int ftrace_init_dyn_tracefs(struct dentry *d_tracer)
5527 {
5528
5529         trace_create_file("available_filter_functions", 0444,
5530                         d_tracer, NULL, &ftrace_avail_fops);
5531
5532         trace_create_file("enabled_functions", 0444,
5533                         d_tracer, NULL, &ftrace_enabled_fops);
5534
5535         ftrace_create_filter_files(&global_ops, d_tracer);
5536
5537 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
5538         trace_create_file("set_graph_function", 0444, d_tracer,
5539                                     NULL,
5540                                     &ftrace_graph_fops);
5541         trace_create_file("set_graph_notrace", 0444, d_tracer,
5542                                     NULL,
5543                                     &ftrace_graph_notrace_fops);
5544 #endif /* CONFIG_FUNCTION_GRAPH_TRACER */
5545
5546         return 0;
5547 }
5548
5549 static int ftrace_cmp_ips(const void *a, const void *b)
5550 {
5551         const unsigned long *ipa = a;
5552         const unsigned long *ipb = b;
5553
5554         if (*ipa > *ipb)
5555                 return 1;
5556         if (*ipa < *ipb)
5557                 return -1;
5558         return 0;
5559 }
5560
5561 static int ftrace_process_locs(struct module *mod,
5562                                unsigned long *start,
5563                                unsigned long *end)
5564 {
5565         struct ftrace_page *start_pg;
5566         struct ftrace_page *pg;
5567         struct dyn_ftrace *rec;
5568         unsigned long count;
5569         unsigned long *p;
5570         unsigned long addr;
5571         unsigned long flags = 0; /* Shut up gcc */
5572         int ret = -ENOMEM;
5573
5574         count = end - start;
5575
5576         if (!count)
5577                 return 0;
5578
5579         sort(start, count, sizeof(*start),
5580              ftrace_cmp_ips, NULL);
5581
5582         start_pg = ftrace_allocate_pages(count);
5583         if (!start_pg)
5584                 return -ENOMEM;
5585
5586         mutex_lock(&ftrace_lock);
5587
5588         /*
5589          * Core and each module needs their own pages, as
5590          * modules will free them when they are removed.
5591          * Force a new page to be allocated for modules.
5592          */
5593         if (!mod) {
5594                 WARN_ON(ftrace_pages || ftrace_pages_start);
5595                 /* First initialization */
5596                 ftrace_pages = ftrace_pages_start = start_pg;
5597         } else {
5598                 if (!ftrace_pages)
5599                         goto out;
5600
5601                 if (WARN_ON(ftrace_pages->next)) {
5602                         /* Hmm, we have free pages? */
5603                         while (ftrace_pages->next)
5604                                 ftrace_pages = ftrace_pages->next;
5605                 }
5606
5607                 ftrace_pages->next = start_pg;
5608         }
5609
5610         p = start;
5611         pg = start_pg;
5612         while (p < end) {
5613                 addr = ftrace_call_adjust(*p++);
5614                 /*
5615                  * Some architecture linkers will pad between
5616                  * the different mcount_loc sections of different
5617                  * object files to satisfy alignments.
5618                  * Skip any NULL pointers.
5619                  */
5620                 if (!addr)
5621                         continue;
5622
5623                 if (pg->index == pg->size) {
5624                         /* We should have allocated enough */
5625                         if (WARN_ON(!pg->next))
5626                                 break;
5627                         pg = pg->next;
5628                 }
5629
5630                 rec = &pg->records[pg->index++];
5631                 rec->ip = addr;
5632         }
5633
5634         /* We should have used all pages */
5635         WARN_ON(pg->next);
5636
5637         /* Assign the last page to ftrace_pages */
5638         ftrace_pages = pg;
5639
5640         /*
5641          * We only need to disable interrupts on start up
5642          * because we are modifying code that an interrupt
5643          * may execute, and the modification is not atomic.
5644          * But for modules, nothing runs the code we modify
5645          * until we are finished with it, and there's no
5646          * reason to cause large interrupt latencies while we do it.
5647          */
5648         if (!mod)
5649                 local_irq_save(flags);
5650         ftrace_update_code(mod, start_pg);
5651         if (!mod)
5652                 local_irq_restore(flags);
5653         ret = 0;
5654  out:
5655         mutex_unlock(&ftrace_lock);
5656
5657         return ret;
5658 }
5659
5660 #ifdef CONFIG_MODULES
5661
5662 #define next_to_ftrace_page(p) container_of(p, struct ftrace_page, next)
5663
5664 static int referenced_filters(struct dyn_ftrace *rec)
5665 {
5666         struct ftrace_ops *ops;
5667         int cnt = 0;
5668
5669         for (ops = ftrace_ops_list; ops != &ftrace_list_end; ops = ops->next) {
5670                 if (ops_references_rec(ops, rec))
5671                     cnt++;
5672         }
5673
5674         return cnt;
5675 }
5676
5677 void ftrace_release_mod(struct module *mod)
5678 {
5679         struct dyn_ftrace *rec;
5680         struct ftrace_page **last_pg;
5681         struct ftrace_page *pg;
5682         int order;
5683
5684         mutex_lock(&ftrace_lock);
5685
5686         if (ftrace_disabled)
5687                 goto out_unlock;
5688
5689         /*
5690          * Each module has its own ftrace_pages, remove
5691          * them from the list.
5692          */
5693         last_pg = &ftrace_pages_start;
5694         for (pg = ftrace_pages_start; pg; pg = *last_pg) {
5695                 rec = &pg->records[0];
5696                 if (within_module_core(rec->ip, mod)) {
5697                         /*
5698                          * As core pages are first, the first
5699                          * page should never be a module page.
5700                          */
5701                         if (WARN_ON(pg == ftrace_pages_start))
5702                                 goto out_unlock;
5703
5704                         /* Check if we are deleting the last page */
5705                         if (pg == ftrace_pages)
5706                                 ftrace_pages = next_to_ftrace_page(last_pg);
5707
5708                         ftrace_update_tot_cnt -= pg->index;
5709                         *last_pg = pg->next;
5710                         order = get_count_order(pg->size / ENTRIES_PER_PAGE);
5711                         free_pages((unsigned long)pg->records, order);
5712                         kfree(pg);
5713                 } else
5714                         last_pg = &pg->next;
5715         }
5716  out_unlock:
5717         mutex_unlock(&ftrace_lock);
5718 }
5719
5720 void ftrace_module_enable(struct module *mod)
5721 {
5722         struct dyn_ftrace *rec;
5723         struct ftrace_page *pg;
5724
5725         mutex_lock(&ftrace_lock);
5726
5727         if (ftrace_disabled)
5728                 goto out_unlock;
5729
5730         /*
5731          * If the tracing is enabled, go ahead and enable the record.
5732          *
5733          * The reason not to enable the record immediatelly is the
5734          * inherent check of ftrace_make_nop/ftrace_make_call for
5735          * correct previous instructions.  Making first the NOP
5736          * conversion puts the module to the correct state, thus
5737          * passing the ftrace_make_call check.
5738          *
5739          * We also delay this to after the module code already set the
5740          * text to read-only, as we now need to set it back to read-write
5741          * so that we can modify the text.
5742          */
5743         if (ftrace_start_up)
5744                 ftrace_arch_code_modify_prepare();
5745
5746         do_for_each_ftrace_rec(pg, rec) {
5747                 int cnt;
5748                 /*
5749                  * do_for_each_ftrace_rec() is a double loop.
5750                  * module text shares the pg. If a record is
5751                  * not part of this module, then skip this pg,
5752                  * which the "break" will do.
5753                  */
5754                 if (!within_module_core(rec->ip, mod))
5755                         break;
5756
5757                 cnt = 0;
5758
5759                 /*
5760                  * When adding a module, we need to check if tracers are
5761                  * currently enabled and if they are, and can trace this record,
5762                  * we need to enable the module functions as well as update the
5763                  * reference counts for those function records.
5764                  */
5765                 if (ftrace_start_up)
5766                         cnt += referenced_filters(rec);
5767
5768                 /* This clears FTRACE_FL_DISABLED */
5769                 rec->flags = cnt;
5770
5771                 if (ftrace_start_up && cnt) {
5772                         int failed = __ftrace_replace_code(rec, 1);
5773                         if (failed) {
5774                                 ftrace_bug(failed, rec);
5775                                 goto out_loop;
5776                         }
5777                 }
5778
5779         } while_for_each_ftrace_rec();
5780
5781  out_loop:
5782         if (ftrace_start_up)
5783                 ftrace_arch_code_modify_post_process();
5784
5785  out_unlock:
5786         mutex_unlock(&ftrace_lock);
5787
5788         process_cached_mods(mod->name);
5789 }
5790
5791 void ftrace_module_init(struct module *mod)
5792 {
5793         if (ftrace_disabled || !mod->num_ftrace_callsites)
5794                 return;
5795
5796         ftrace_process_locs(mod, mod->ftrace_callsites,
5797                             mod->ftrace_callsites + mod->num_ftrace_callsites);
5798 }
5799 #endif /* CONFIG_MODULES */
5800
5801 void __init ftrace_free_init_mem(void)
5802 {
5803         unsigned long start = (unsigned long)(&__init_begin);
5804         unsigned long end = (unsigned long)(&__init_end);
5805         struct ftrace_page **last_pg = &ftrace_pages_start;
5806         struct ftrace_page *pg;
5807         struct dyn_ftrace *rec;
5808         struct dyn_ftrace key;
5809         int order;
5810
5811         key.ip = start;
5812         key.flags = end;        /* overload flags, as it is unsigned long */
5813
5814         mutex_lock(&ftrace_lock);
5815
5816         for (pg = ftrace_pages_start; pg; last_pg = &pg->next, pg = *last_pg) {
5817                 if (end < pg->records[0].ip ||
5818                     start >= (pg->records[pg->index - 1].ip + MCOUNT_INSN_SIZE))
5819                         continue;
5820  again:
5821                 rec = bsearch(&key, pg->records, pg->index,
5822                               sizeof(struct dyn_ftrace),
5823                               ftrace_cmp_recs);
5824                 if (!rec)
5825                         continue;
5826                 pg->index--;
5827                 ftrace_update_tot_cnt--;
5828                 if (!pg->index) {
5829                         *last_pg = pg->next;
5830                         order = get_count_order(pg->size / ENTRIES_PER_PAGE);
5831                         free_pages((unsigned long)pg->records, order);
5832                         kfree(pg);
5833                         pg = container_of(last_pg, struct ftrace_page, next);
5834                         if (!(*last_pg))
5835                                 ftrace_pages = pg;
5836                         continue;
5837                 }
5838                 memmove(rec, rec + 1,
5839                         (pg->index - (rec - pg->records)) * sizeof(*rec));
5840                 /* More than one function may be in this block */
5841                 goto again;
5842         }
5843         mutex_unlock(&ftrace_lock);
5844 }
5845
5846 void __init ftrace_init(void)
5847 {
5848         extern unsigned long __start_mcount_loc[];
5849         extern unsigned long __stop_mcount_loc[];
5850         unsigned long count, flags;
5851         int ret;
5852
5853         local_irq_save(flags);
5854         ret = ftrace_dyn_arch_init();
5855         local_irq_restore(flags);
5856         if (ret)
5857                 goto failed;
5858
5859         count = __stop_mcount_loc - __start_mcount_loc;
5860         if (!count) {
5861                 pr_info("ftrace: No functions to be traced?\n");
5862                 goto failed;
5863         }
5864
5865         pr_info("ftrace: allocating %ld entries in %ld pages\n",
5866                 count, count / ENTRIES_PER_PAGE + 1);
5867
5868         last_ftrace_enabled = ftrace_enabled = 1;
5869
5870         ret = ftrace_process_locs(NULL,
5871                                   __start_mcount_loc,
5872                                   __stop_mcount_loc);
5873
5874         set_ftrace_early_filters();
5875
5876         return;
5877  failed:
5878         ftrace_disabled = 1;
5879 }
5880
5881 /* Do nothing if arch does not support this */
5882 void __weak arch_ftrace_update_trampoline(struct ftrace_ops *ops)
5883 {
5884 }
5885
5886 static void ftrace_update_trampoline(struct ftrace_ops *ops)
5887 {
5888         arch_ftrace_update_trampoline(ops);
5889 }
5890
5891 void ftrace_init_trace_array(struct trace_array *tr)
5892 {
5893         INIT_LIST_HEAD(&tr->func_probes);
5894         INIT_LIST_HEAD(&tr->mod_trace);
5895         INIT_LIST_HEAD(&tr->mod_notrace);
5896 }
5897 #else
5898
5899 static struct ftrace_ops global_ops = {
5900         .func                   = ftrace_stub,
5901         .flags                  = FTRACE_OPS_FL_RECURSION_SAFE |
5902                                   FTRACE_OPS_FL_INITIALIZED |
5903                                   FTRACE_OPS_FL_PID,
5904 };
5905
5906 static int __init ftrace_nodyn_init(void)
5907 {
5908         ftrace_enabled = 1;
5909         return 0;
5910 }
5911 core_initcall(ftrace_nodyn_init);
5912
5913 static inline int ftrace_init_dyn_tracefs(struct dentry *d_tracer) { return 0; }
5914 static inline void ftrace_startup_enable(int command) { }
5915 static inline void ftrace_startup_all(int command) { }
5916 /* Keep as macros so we do not need to define the commands */
5917 # define ftrace_startup(ops, command)                                   \
5918         ({                                                              \
5919                 int ___ret = __register_ftrace_function(ops);           \
5920                 if (!___ret)                                            \
5921                         (ops)->flags |= FTRACE_OPS_FL_ENABLED;          \
5922                 ___ret;                                                 \
5923         })
5924 # define ftrace_shutdown(ops, command)                                  \
5925         ({                                                              \
5926                 int ___ret = __unregister_ftrace_function(ops);         \
5927                 if (!___ret)                                            \
5928                         (ops)->flags &= ~FTRACE_OPS_FL_ENABLED;         \
5929                 ___ret;                                                 \
5930         })
5931
5932 # define ftrace_startup_sysctl()        do { } while (0)
5933 # define ftrace_shutdown_sysctl()       do { } while (0)
5934
5935 static inline int
5936 ftrace_ops_test(struct ftrace_ops *ops, unsigned long ip, void *regs)
5937 {
5938         return 1;
5939 }
5940
5941 static void ftrace_update_trampoline(struct ftrace_ops *ops)
5942 {
5943 }
5944
5945 #endif /* CONFIG_DYNAMIC_FTRACE */
5946
5947 __init void ftrace_init_global_array_ops(struct trace_array *tr)
5948 {
5949         tr->ops = &global_ops;
5950         tr->ops->private = tr;
5951         ftrace_init_trace_array(tr);
5952 }
5953
5954 void ftrace_init_array_ops(struct trace_array *tr, ftrace_func_t func)
5955 {
5956         /* If we filter on pids, update to use the pid function */
5957         if (tr->flags & TRACE_ARRAY_FL_GLOBAL) {
5958                 if (WARN_ON(tr->ops->func != ftrace_stub))
5959                         printk("ftrace ops had %pS for function\n",
5960                                tr->ops->func);
5961         }
5962         tr->ops->func = func;
5963         tr->ops->private = tr;
5964 }
5965
5966 void ftrace_reset_array_ops(struct trace_array *tr)
5967 {
5968         tr->ops->func = ftrace_stub;
5969 }
5970
5971 static inline void
5972 __ftrace_ops_list_func(unsigned long ip, unsigned long parent_ip,
5973                        struct ftrace_ops *ignored, struct pt_regs *regs)
5974 {
5975         struct ftrace_ops *op;
5976         int bit;
5977
5978         bit = trace_test_and_set_recursion(TRACE_LIST_START, TRACE_LIST_MAX);
5979         if (bit < 0)
5980                 return;
5981
5982         /*
5983          * Some of the ops may be dynamically allocated,
5984          * they must be freed after a synchronize_sched().
5985          */
5986         preempt_disable_notrace();
5987
5988         do_for_each_ftrace_op(op, ftrace_ops_list) {
5989                 /*
5990                  * Check the following for each ops before calling their func:
5991                  *  if RCU flag is set, then rcu_is_watching() must be true
5992                  *  if PER_CPU is set, then ftrace_function_local_disable()
5993                  *                          must be false
5994                  *  Otherwise test if the ip matches the ops filter
5995                  *
5996                  * If any of the above fails then the op->func() is not executed.
5997                  */
5998                 if ((!(op->flags & FTRACE_OPS_FL_RCU) || rcu_is_watching()) &&
5999                     (!(op->flags & FTRACE_OPS_FL_PER_CPU) ||
6000                      !ftrace_function_local_disabled(op)) &&
6001                     ftrace_ops_test(op, ip, regs)) {
6002                     
6003                         if (FTRACE_WARN_ON(!op->func)) {
6004                                 pr_warn("op=%p %pS\n", op, op);
6005                                 goto out;
6006                         }
6007                         op->func(ip, parent_ip, op, regs);
6008                 }
6009         } while_for_each_ftrace_op(op);
6010 out:
6011         preempt_enable_notrace();
6012         trace_clear_recursion(bit);
6013 }
6014
6015 /*
6016  * Some archs only support passing ip and parent_ip. Even though
6017  * the list function ignores the op parameter, we do not want any
6018  * C side effects, where a function is called without the caller
6019  * sending a third parameter.
6020  * Archs are to support both the regs and ftrace_ops at the same time.
6021  * If they support ftrace_ops, it is assumed they support regs.
6022  * If call backs want to use regs, they must either check for regs
6023  * being NULL, or CONFIG_DYNAMIC_FTRACE_WITH_REGS.
6024  * Note, CONFIG_DYNAMIC_FTRACE_WITH_REGS expects a full regs to be saved.
6025  * An architecture can pass partial regs with ftrace_ops and still
6026  * set the ARCH_SUPPORTS_FTRACE_OPS.
6027  */
6028 #if ARCH_SUPPORTS_FTRACE_OPS
6029 static void ftrace_ops_list_func(unsigned long ip, unsigned long parent_ip,
6030                                  struct ftrace_ops *op, struct pt_regs *regs)
6031 {
6032         __ftrace_ops_list_func(ip, parent_ip, NULL, regs);
6033 }
6034 #else
6035 static void ftrace_ops_no_ops(unsigned long ip, unsigned long parent_ip)
6036 {
6037         __ftrace_ops_list_func(ip, parent_ip, NULL, NULL);
6038 }
6039 #endif
6040
6041 /*
6042  * If there's only one function registered but it does not support
6043  * recursion, needs RCU protection and/or requires per cpu handling, then
6044  * this function will be called by the mcount trampoline.
6045  */
6046 static void ftrace_ops_assist_func(unsigned long ip, unsigned long parent_ip,
6047                                    struct ftrace_ops *op, struct pt_regs *regs)
6048 {
6049         int bit;
6050
6051         if ((op->flags & FTRACE_OPS_FL_RCU) && !rcu_is_watching())
6052                 return;
6053
6054         bit = trace_test_and_set_recursion(TRACE_LIST_START, TRACE_LIST_MAX);
6055         if (bit < 0)
6056                 return;
6057
6058         preempt_disable_notrace();
6059
6060         if (!(op->flags & FTRACE_OPS_FL_PER_CPU) ||
6061             !ftrace_function_local_disabled(op)) {
6062                 op->func(ip, parent_ip, op, regs);
6063         }
6064
6065         preempt_enable_notrace();
6066         trace_clear_recursion(bit);
6067 }
6068
6069 /**
6070  * ftrace_ops_get_func - get the function a trampoline should call
6071  * @ops: the ops to get the function for
6072  *
6073  * Normally the mcount trampoline will call the ops->func, but there
6074  * are times that it should not. For example, if the ops does not
6075  * have its own recursion protection, then it should call the
6076  * ftrace_ops_assist_func() instead.
6077  *
6078  * Returns the function that the trampoline should call for @ops.
6079  */
6080 ftrace_func_t ftrace_ops_get_func(struct ftrace_ops *ops)
6081 {
6082         /*
6083          * If the function does not handle recursion, needs to be RCU safe,
6084          * or does per cpu logic, then we need to call the assist handler.
6085          */
6086         if (!(ops->flags & FTRACE_OPS_FL_RECURSION_SAFE) ||
6087             ops->flags & (FTRACE_OPS_FL_RCU | FTRACE_OPS_FL_PER_CPU))
6088                 return ftrace_ops_assist_func;
6089
6090         return ops->func;
6091 }
6092
6093 static void
6094 ftrace_filter_pid_sched_switch_probe(void *data, bool preempt,
6095                     struct task_struct *prev, struct task_struct *next)
6096 {
6097         struct trace_array *tr = data;
6098         struct trace_pid_list *pid_list;
6099
6100         pid_list = rcu_dereference_sched(tr->function_pids);
6101
6102         this_cpu_write(tr->trace_buffer.data->ftrace_ignore_pid,
6103                        trace_ignore_this_task(pid_list, next));
6104 }
6105
6106 static void
6107 ftrace_pid_follow_sched_process_fork(void *data,
6108                                      struct task_struct *self,
6109                                      struct task_struct *task)
6110 {
6111         struct trace_pid_list *pid_list;
6112         struct trace_array *tr = data;
6113
6114         pid_list = rcu_dereference_sched(tr->function_pids);
6115         trace_filter_add_remove_task(pid_list, self, task);
6116 }
6117
6118 static void
6119 ftrace_pid_follow_sched_process_exit(void *data, struct task_struct *task)
6120 {
6121         struct trace_pid_list *pid_list;
6122         struct trace_array *tr = data;
6123
6124         pid_list = rcu_dereference_sched(tr->function_pids);
6125         trace_filter_add_remove_task(pid_list, NULL, task);
6126 }
6127
6128 void ftrace_pid_follow_fork(struct trace_array *tr, bool enable)
6129 {
6130         if (enable) {
6131                 register_trace_sched_process_fork(ftrace_pid_follow_sched_process_fork,
6132                                                   tr);
6133                 register_trace_sched_process_exit(ftrace_pid_follow_sched_process_exit,
6134                                                   tr);
6135         } else {
6136                 unregister_trace_sched_process_fork(ftrace_pid_follow_sched_process_fork,
6137                                                     tr);
6138                 unregister_trace_sched_process_exit(ftrace_pid_follow_sched_process_exit,
6139                                                     tr);
6140         }
6141 }
6142
6143 static void clear_ftrace_pids(struct trace_array *tr)
6144 {
6145         struct trace_pid_list *pid_list;
6146         int cpu;
6147
6148         pid_list = rcu_dereference_protected(tr->function_pids,
6149                                              lockdep_is_held(&ftrace_lock));
6150         if (!pid_list)
6151                 return;
6152
6153         unregister_trace_sched_switch(ftrace_filter_pid_sched_switch_probe, tr);
6154
6155         for_each_possible_cpu(cpu)
6156                 per_cpu_ptr(tr->trace_buffer.data, cpu)->ftrace_ignore_pid = false;
6157
6158         rcu_assign_pointer(tr->function_pids, NULL);
6159
6160         /* Wait till all users are no longer using pid filtering */
6161         synchronize_sched();
6162
6163         trace_free_pid_list(pid_list);
6164 }
6165
6166 void ftrace_clear_pids(struct trace_array *tr)
6167 {
6168         mutex_lock(&ftrace_lock);
6169
6170         clear_ftrace_pids(tr);
6171
6172         mutex_unlock(&ftrace_lock);
6173 }
6174
6175 static void ftrace_pid_reset(struct trace_array *tr)
6176 {
6177         mutex_lock(&ftrace_lock);
6178         clear_ftrace_pids(tr);
6179
6180         ftrace_update_pid_func();
6181         ftrace_startup_all(0);
6182
6183         mutex_unlock(&ftrace_lock);
6184 }
6185
6186 /* Greater than any max PID */
6187 #define FTRACE_NO_PIDS          (void *)(PID_MAX_LIMIT + 1)
6188
6189 static void *fpid_start(struct seq_file *m, loff_t *pos)
6190         __acquires(RCU)
6191 {
6192         struct trace_pid_list *pid_list;
6193         struct trace_array *tr = m->private;
6194
6195         mutex_lock(&ftrace_lock);
6196         rcu_read_lock_sched();
6197
6198         pid_list = rcu_dereference_sched(tr->function_pids);
6199
6200         if (!pid_list)
6201                 return !(*pos) ? FTRACE_NO_PIDS : NULL;
6202
6203         return trace_pid_start(pid_list, pos);
6204 }
6205
6206 static void *fpid_next(struct seq_file *m, void *v, loff_t *pos)
6207 {
6208         struct trace_array *tr = m->private;
6209         struct trace_pid_list *pid_list = rcu_dereference_sched(tr->function_pids);
6210
6211         if (v == FTRACE_NO_PIDS)
6212                 return NULL;
6213
6214         return trace_pid_next(pid_list, v, pos);
6215 }
6216
6217 static void fpid_stop(struct seq_file *m, void *p)
6218         __releases(RCU)
6219 {
6220         rcu_read_unlock_sched();
6221         mutex_unlock(&ftrace_lock);
6222 }
6223
6224 static int fpid_show(struct seq_file *m, void *v)
6225 {
6226         if (v == FTRACE_NO_PIDS) {
6227                 seq_puts(m, "no pid\n");
6228                 return 0;
6229         }
6230
6231         return trace_pid_show(m, v);
6232 }
6233
6234 static const struct seq_operations ftrace_pid_sops = {
6235         .start = fpid_start,
6236         .next = fpid_next,
6237         .stop = fpid_stop,
6238         .show = fpid_show,
6239 };
6240
6241 static int
6242 ftrace_pid_open(struct inode *inode, struct file *file)
6243 {
6244         struct trace_array *tr = inode->i_private;
6245         struct seq_file *m;
6246         int ret = 0;
6247
6248         if (trace_array_get(tr) < 0)
6249                 return -ENODEV;
6250
6251         if ((file->f_mode & FMODE_WRITE) &&
6252             (file->f_flags & O_TRUNC))
6253                 ftrace_pid_reset(tr);
6254
6255         ret = seq_open(file, &ftrace_pid_sops);
6256         if (ret < 0) {
6257                 trace_array_put(tr);
6258         } else {
6259                 m = file->private_data;
6260                 /* copy tr over to seq ops */
6261                 m->private = tr;
6262         }
6263
6264         return ret;
6265 }
6266
6267 static void ignore_task_cpu(void *data)
6268 {
6269         struct trace_array *tr = data;
6270         struct trace_pid_list *pid_list;
6271
6272         /*
6273          * This function is called by on_each_cpu() while the
6274          * event_mutex is held.
6275          */
6276         pid_list = rcu_dereference_protected(tr->function_pids,
6277                                              mutex_is_locked(&ftrace_lock));
6278
6279         this_cpu_write(tr->trace_buffer.data->ftrace_ignore_pid,
6280                        trace_ignore_this_task(pid_list, current));
6281 }
6282
6283 static ssize_t
6284 ftrace_pid_write(struct file *filp, const char __user *ubuf,
6285                    size_t cnt, loff_t *ppos)
6286 {
6287         struct seq_file *m = filp->private_data;
6288         struct trace_array *tr = m->private;
6289         struct trace_pid_list *filtered_pids = NULL;
6290         struct trace_pid_list *pid_list;
6291         ssize_t ret;
6292
6293         if (!cnt)
6294                 return 0;
6295
6296         mutex_lock(&ftrace_lock);
6297
6298         filtered_pids = rcu_dereference_protected(tr->function_pids,
6299                                              lockdep_is_held(&ftrace_lock));
6300
6301         ret = trace_pid_write(filtered_pids, &pid_list, ubuf, cnt);
6302         if (ret < 0)
6303                 goto out;
6304
6305         rcu_assign_pointer(tr->function_pids, pid_list);
6306
6307         if (filtered_pids) {
6308                 synchronize_sched();
6309                 trace_free_pid_list(filtered_pids);
6310         } else if (pid_list) {
6311                 /* Register a probe to set whether to ignore the tracing of a task */
6312                 register_trace_sched_switch(ftrace_filter_pid_sched_switch_probe, tr);
6313         }
6314
6315         /*
6316          * Ignoring of pids is done at task switch. But we have to
6317          * check for those tasks that are currently running.
6318          * Always do this in case a pid was appended or removed.
6319          */
6320         on_each_cpu(ignore_task_cpu, tr, 1);
6321
6322         ftrace_update_pid_func();
6323         ftrace_startup_all(0);
6324  out:
6325         mutex_unlock(&ftrace_lock);
6326
6327         if (ret > 0)
6328                 *ppos += ret;
6329
6330         return ret;
6331 }
6332
6333 static int
6334 ftrace_pid_release(struct inode *inode, struct file *file)
6335 {
6336         struct trace_array *tr = inode->i_private;
6337
6338         trace_array_put(tr);
6339
6340         return seq_release(inode, file);
6341 }
6342
6343 static const struct file_operations ftrace_pid_fops = {
6344         .open           = ftrace_pid_open,
6345         .write          = ftrace_pid_write,
6346         .read           = seq_read,
6347         .llseek         = tracing_lseek,
6348         .release        = ftrace_pid_release,
6349 };
6350
6351 void ftrace_init_tracefs(struct trace_array *tr, struct dentry *d_tracer)
6352 {
6353         trace_create_file("set_ftrace_pid", 0644, d_tracer,
6354                             tr, &ftrace_pid_fops);
6355 }
6356
6357 void __init ftrace_init_tracefs_toplevel(struct trace_array *tr,
6358                                          struct dentry *d_tracer)
6359 {
6360         /* Only the top level directory has the dyn_tracefs and profile */
6361         WARN_ON(!(tr->flags & TRACE_ARRAY_FL_GLOBAL));
6362
6363         ftrace_init_dyn_tracefs(d_tracer);
6364         ftrace_profile_tracefs(d_tracer);
6365 }
6366
6367 /**
6368  * ftrace_kill - kill ftrace
6369  *
6370  * This function should be used by panic code. It stops ftrace
6371  * but in a not so nice way. If you need to simply kill ftrace
6372  * from a non-atomic section, use ftrace_kill.
6373  */
6374 void ftrace_kill(void)
6375 {
6376         ftrace_disabled = 1;
6377         ftrace_enabled = 0;
6378         clear_ftrace_function();
6379 }
6380
6381 /**
6382  * Test if ftrace is dead or not.
6383  */
6384 int ftrace_is_dead(void)
6385 {
6386         return ftrace_disabled;
6387 }
6388
6389 /**
6390  * register_ftrace_function - register a function for profiling
6391  * @ops - ops structure that holds the function for profiling.
6392  *
6393  * Register a function to be called by all functions in the
6394  * kernel.
6395  *
6396  * Note: @ops->func and all the functions it calls must be labeled
6397  *       with "notrace", otherwise it will go into a
6398  *       recursive loop.
6399  */
6400 int register_ftrace_function(struct ftrace_ops *ops)
6401 {
6402         int ret = -1;
6403
6404         ftrace_ops_init(ops);
6405
6406         mutex_lock(&ftrace_lock);
6407
6408         ret = ftrace_startup(ops, 0);
6409
6410         mutex_unlock(&ftrace_lock);
6411
6412         return ret;
6413 }
6414 EXPORT_SYMBOL_GPL(register_ftrace_function);
6415
6416 /**
6417  * unregister_ftrace_function - unregister a function for profiling.
6418  * @ops - ops structure that holds the function to unregister
6419  *
6420  * Unregister a function that was added to be called by ftrace profiling.
6421  */
6422 int unregister_ftrace_function(struct ftrace_ops *ops)
6423 {
6424         int ret;
6425
6426         mutex_lock(&ftrace_lock);
6427         ret = ftrace_shutdown(ops, 0);
6428         mutex_unlock(&ftrace_lock);
6429
6430         return ret;
6431 }
6432 EXPORT_SYMBOL_GPL(unregister_ftrace_function);
6433
6434 int
6435 ftrace_enable_sysctl(struct ctl_table *table, int write,
6436                      void __user *buffer, size_t *lenp,
6437                      loff_t *ppos)
6438 {
6439         int ret = -ENODEV;
6440
6441         mutex_lock(&ftrace_lock);
6442
6443         if (unlikely(ftrace_disabled))
6444                 goto out;
6445
6446         ret = proc_dointvec(table, write, buffer, lenp, ppos);
6447
6448         if (ret || !write || (last_ftrace_enabled == !!ftrace_enabled))
6449                 goto out;
6450
6451         last_ftrace_enabled = !!ftrace_enabled;
6452
6453         if (ftrace_enabled) {
6454
6455                 /* we are starting ftrace again */
6456                 if (ftrace_ops_list != &ftrace_list_end)
6457                         update_ftrace_function();
6458
6459                 ftrace_startup_sysctl();
6460
6461         } else {
6462                 /* stopping ftrace calls (just send to ftrace_stub) */
6463                 ftrace_trace_function = ftrace_stub;
6464
6465                 ftrace_shutdown_sysctl();
6466         }
6467
6468  out:
6469         mutex_unlock(&ftrace_lock);
6470         return ret;
6471 }
6472
6473 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
6474
6475 static struct ftrace_ops graph_ops = {
6476         .func                   = ftrace_stub,
6477         .flags                  = FTRACE_OPS_FL_RECURSION_SAFE |
6478                                    FTRACE_OPS_FL_INITIALIZED |
6479                                    FTRACE_OPS_FL_PID |
6480                                    FTRACE_OPS_FL_STUB,
6481 #ifdef FTRACE_GRAPH_TRAMP_ADDR
6482         .trampoline             = FTRACE_GRAPH_TRAMP_ADDR,
6483         /* trampoline_size is only needed for dynamically allocated tramps */
6484 #endif
6485         ASSIGN_OPS_HASH(graph_ops, &global_ops.local_hash)
6486 };
6487
6488 void ftrace_graph_sleep_time_control(bool enable)
6489 {
6490         fgraph_sleep_time = enable;
6491 }
6492
6493 void ftrace_graph_graph_time_control(bool enable)
6494 {
6495         fgraph_graph_time = enable;
6496 }
6497
6498 int ftrace_graph_entry_stub(struct ftrace_graph_ent *trace)
6499 {
6500         return 0;
6501 }
6502
6503 /* The callbacks that hook a function */
6504 trace_func_graph_ret_t ftrace_graph_return =
6505                         (trace_func_graph_ret_t)ftrace_stub;
6506 trace_func_graph_ent_t ftrace_graph_entry = ftrace_graph_entry_stub;
6507 static trace_func_graph_ent_t __ftrace_graph_entry = ftrace_graph_entry_stub;
6508
6509 /* Try to assign a return stack array on FTRACE_RETSTACK_ALLOC_SIZE tasks. */
6510 static int alloc_retstack_tasklist(struct ftrace_ret_stack **ret_stack_list)
6511 {
6512         int i;
6513         int ret = 0;
6514         int start = 0, end = FTRACE_RETSTACK_ALLOC_SIZE;
6515         struct task_struct *g, *t;
6516
6517         for (i = 0; i < FTRACE_RETSTACK_ALLOC_SIZE; i++) {
6518                 ret_stack_list[i] = kmalloc(FTRACE_RETFUNC_DEPTH
6519                                         * sizeof(struct ftrace_ret_stack),
6520                                         GFP_KERNEL);
6521                 if (!ret_stack_list[i]) {
6522                         start = 0;
6523                         end = i;
6524                         ret = -ENOMEM;
6525                         goto free;
6526                 }
6527         }
6528
6529         read_lock(&tasklist_lock);
6530         do_each_thread(g, t) {
6531                 if (start == end) {
6532                         ret = -EAGAIN;
6533                         goto unlock;
6534                 }
6535
6536                 if (t->ret_stack == NULL) {
6537                         atomic_set(&t->tracing_graph_pause, 0);
6538                         atomic_set(&t->trace_overrun, 0);
6539                         t->curr_ret_stack = -1;
6540                         /* Make sure the tasks see the -1 first: */
6541                         smp_wmb();
6542                         t->ret_stack = ret_stack_list[start++];
6543                 }
6544         } while_each_thread(g, t);
6545
6546 unlock:
6547         read_unlock(&tasklist_lock);
6548 free:
6549         for (i = start; i < end; i++)
6550                 kfree(ret_stack_list[i]);
6551         return ret;
6552 }
6553
6554 static void
6555 ftrace_graph_probe_sched_switch(void *ignore, bool preempt,
6556                         struct task_struct *prev, struct task_struct *next)
6557 {
6558         unsigned long long timestamp;
6559         int index;
6560
6561         /*
6562          * Does the user want to count the time a function was asleep.
6563          * If so, do not update the time stamps.
6564          */
6565         if (fgraph_sleep_time)
6566                 return;
6567
6568         timestamp = trace_clock_local();
6569
6570         prev->ftrace_timestamp = timestamp;
6571
6572         /* only process tasks that we timestamped */
6573         if (!next->ftrace_timestamp)
6574                 return;
6575
6576         /*
6577          * Update all the counters in next to make up for the
6578          * time next was sleeping.
6579          */
6580         timestamp -= next->ftrace_timestamp;
6581
6582         for (index = next->curr_ret_stack; index >= 0; index--)
6583                 next->ret_stack[index].calltime += timestamp;
6584 }
6585
6586 /* Allocate a return stack for each task */
6587 static int start_graph_tracing(void)
6588 {
6589         struct ftrace_ret_stack **ret_stack_list;
6590         int ret, cpu;
6591
6592         ret_stack_list = kmalloc(FTRACE_RETSTACK_ALLOC_SIZE *
6593                                 sizeof(struct ftrace_ret_stack *),
6594                                 GFP_KERNEL);
6595
6596         if (!ret_stack_list)
6597                 return -ENOMEM;
6598
6599         /* The cpu_boot init_task->ret_stack will never be freed */
6600         for_each_online_cpu(cpu) {
6601                 if (!idle_task(cpu)->ret_stack)
6602                         ftrace_graph_init_idle_task(idle_task(cpu), cpu);
6603         }
6604
6605         do {
6606                 ret = alloc_retstack_tasklist(ret_stack_list);
6607         } while (ret == -EAGAIN);
6608
6609         if (!ret) {
6610                 ret = register_trace_sched_switch(ftrace_graph_probe_sched_switch, NULL);
6611                 if (ret)
6612                         pr_info("ftrace_graph: Couldn't activate tracepoint"
6613                                 " probe to kernel_sched_switch\n");
6614         }
6615
6616         kfree(ret_stack_list);
6617         return ret;
6618 }
6619
6620 /*
6621  * Hibernation protection.
6622  * The state of the current task is too much unstable during
6623  * suspend/restore to disk. We want to protect against that.
6624  */
6625 static int
6626 ftrace_suspend_notifier_call(struct notifier_block *bl, unsigned long state,
6627                                                         void *unused)
6628 {
6629         switch (state) {
6630         case PM_HIBERNATION_PREPARE:
6631                 pause_graph_tracing();
6632                 break;
6633
6634         case PM_POST_HIBERNATION:
6635                 unpause_graph_tracing();
6636                 break;
6637         }
6638         return NOTIFY_DONE;
6639 }
6640
6641 static int ftrace_graph_entry_test(struct ftrace_graph_ent *trace)
6642 {
6643         if (!ftrace_ops_test(&global_ops, trace->func, NULL))
6644                 return 0;
6645         return __ftrace_graph_entry(trace);
6646 }
6647
6648 /*
6649  * The function graph tracer should only trace the functions defined
6650  * by set_ftrace_filter and set_ftrace_notrace. If another function
6651  * tracer ops is registered, the graph tracer requires testing the
6652  * function against the global ops, and not just trace any function
6653  * that any ftrace_ops registered.
6654  */
6655 static void update_function_graph_func(void)
6656 {
6657         struct ftrace_ops *op;
6658         bool do_test = false;
6659
6660         /*
6661          * The graph and global ops share the same set of functions
6662          * to test. If any other ops is on the list, then
6663          * the graph tracing needs to test if its the function
6664          * it should call.
6665          */
6666         do_for_each_ftrace_op(op, ftrace_ops_list) {
6667                 if (op != &global_ops && op != &graph_ops &&
6668                     op != &ftrace_list_end) {
6669                         do_test = true;
6670                         /* in double loop, break out with goto */
6671                         goto out;
6672                 }
6673         } while_for_each_ftrace_op(op);
6674  out:
6675         if (do_test)
6676                 ftrace_graph_entry = ftrace_graph_entry_test;
6677         else
6678                 ftrace_graph_entry = __ftrace_graph_entry;
6679 }
6680
6681 static struct notifier_block ftrace_suspend_notifier = {
6682         .notifier_call = ftrace_suspend_notifier_call,
6683 };
6684
6685 int register_ftrace_graph(trace_func_graph_ret_t retfunc,
6686                         trace_func_graph_ent_t entryfunc)
6687 {
6688         int ret = 0;
6689
6690         mutex_lock(&ftrace_lock);
6691
6692         /* we currently allow only one tracer registered at a time */
6693         if (ftrace_graph_active) {
6694                 ret = -EBUSY;
6695                 goto out;
6696         }
6697
6698         register_pm_notifier(&ftrace_suspend_notifier);
6699
6700         ftrace_graph_active++;
6701         ret = start_graph_tracing();
6702         if (ret) {
6703                 ftrace_graph_active--;
6704                 goto out;
6705         }
6706
6707         ftrace_graph_return = retfunc;
6708
6709         /*
6710          * Update the indirect function to the entryfunc, and the
6711          * function that gets called to the entry_test first. Then
6712          * call the update fgraph entry function to determine if
6713          * the entryfunc should be called directly or not.
6714          */
6715         __ftrace_graph_entry = entryfunc;
6716         ftrace_graph_entry = ftrace_graph_entry_test;
6717         update_function_graph_func();
6718
6719         ret = ftrace_startup(&graph_ops, FTRACE_START_FUNC_RET);
6720 out:
6721         mutex_unlock(&ftrace_lock);
6722         return ret;
6723 }
6724
6725 void unregister_ftrace_graph(void)
6726 {
6727         mutex_lock(&ftrace_lock);
6728
6729         if (unlikely(!ftrace_graph_active))
6730                 goto out;
6731
6732         ftrace_graph_active--;
6733         ftrace_graph_return = (trace_func_graph_ret_t)ftrace_stub;
6734         ftrace_graph_entry = ftrace_graph_entry_stub;
6735         __ftrace_graph_entry = ftrace_graph_entry_stub;
6736         ftrace_shutdown(&graph_ops, FTRACE_STOP_FUNC_RET);
6737         unregister_pm_notifier(&ftrace_suspend_notifier);
6738         unregister_trace_sched_switch(ftrace_graph_probe_sched_switch, NULL);
6739
6740 #ifdef CONFIG_DYNAMIC_FTRACE
6741         /*
6742          * Function graph does not allocate the trampoline, but
6743          * other global_ops do. We need to reset the ALLOC_TRAMP flag
6744          * if one was used.
6745          */
6746         global_ops.trampoline = save_global_trampoline;
6747         if (save_global_flags & FTRACE_OPS_FL_ALLOC_TRAMP)
6748                 global_ops.flags |= FTRACE_OPS_FL_ALLOC_TRAMP;
6749 #endif
6750
6751  out:
6752         mutex_unlock(&ftrace_lock);
6753 }
6754
6755 static DEFINE_PER_CPU(struct ftrace_ret_stack *, idle_ret_stack);
6756
6757 static void
6758 graph_init_task(struct task_struct *t, struct ftrace_ret_stack *ret_stack)
6759 {
6760         atomic_set(&t->tracing_graph_pause, 0);
6761         atomic_set(&t->trace_overrun, 0);
6762         t->ftrace_timestamp = 0;
6763         /* make curr_ret_stack visible before we add the ret_stack */
6764         smp_wmb();
6765         t->ret_stack = ret_stack;
6766 }
6767
6768 /*
6769  * Allocate a return stack for the idle task. May be the first
6770  * time through, or it may be done by CPU hotplug online.
6771  */
6772 void ftrace_graph_init_idle_task(struct task_struct *t, int cpu)
6773 {
6774         t->curr_ret_stack = -1;
6775         /*
6776          * The idle task has no parent, it either has its own
6777          * stack or no stack at all.
6778          */
6779         if (t->ret_stack)
6780                 WARN_ON(t->ret_stack != per_cpu(idle_ret_stack, cpu));
6781
6782         if (ftrace_graph_active) {
6783                 struct ftrace_ret_stack *ret_stack;
6784
6785                 ret_stack = per_cpu(idle_ret_stack, cpu);
6786                 if (!ret_stack) {
6787                         ret_stack = kmalloc(FTRACE_RETFUNC_DEPTH
6788                                             * sizeof(struct ftrace_ret_stack),
6789                                             GFP_KERNEL);
6790                         if (!ret_stack)
6791                                 return;
6792                         per_cpu(idle_ret_stack, cpu) = ret_stack;
6793                 }
6794                 graph_init_task(t, ret_stack);
6795         }
6796 }
6797
6798 /* Allocate a return stack for newly created task */
6799 void ftrace_graph_init_task(struct task_struct *t)
6800 {
6801         /* Make sure we do not use the parent ret_stack */
6802         t->ret_stack = NULL;
6803         t->curr_ret_stack = -1;
6804
6805         if (ftrace_graph_active) {
6806                 struct ftrace_ret_stack *ret_stack;
6807
6808                 ret_stack = kmalloc(FTRACE_RETFUNC_DEPTH
6809                                 * sizeof(struct ftrace_ret_stack),
6810                                 GFP_KERNEL);
6811                 if (!ret_stack)
6812                         return;
6813                 graph_init_task(t, ret_stack);
6814         }
6815 }
6816
6817 void ftrace_graph_exit_task(struct task_struct *t)
6818 {
6819         struct ftrace_ret_stack *ret_stack = t->ret_stack;
6820
6821         t->ret_stack = NULL;
6822         /* NULL must become visible to IRQs before we free it: */
6823         barrier();
6824
6825         kfree(ret_stack);
6826 }
6827 #endif