2 * Infrastructure for profiling code inserted by 'gcc -pg'.
4 * Copyright (C) 2007-2008 Steven Rostedt <srostedt@redhat.com>
5 * Copyright (C) 2004-2008 Ingo Molnar <mingo@redhat.com>
7 * Originally ported from the -rt patch by:
8 * Copyright (C) 2007 Arnaldo Carvalho de Melo <acme@redhat.com>
10 * Based on code in the latency_tracer, that is:
12 * Copyright (C) 2004-2006 Ingo Molnar
13 * Copyright (C) 2004 William Lee Irwin III
16 #include <linux/stop_machine.h>
17 #include <linux/clocksource.h>
18 #include <linux/kallsyms.h>
19 #include <linux/seq_file.h>
20 #include <linux/suspend.h>
21 #include <linux/debugfs.h>
22 #include <linux/hardirq.h>
23 #include <linux/kthread.h>
24 #include <linux/uaccess.h>
25 #include <linux/bsearch.h>
26 #include <linux/module.h>
27 #include <linux/ftrace.h>
28 #include <linux/sysctl.h>
29 #include <linux/slab.h>
30 #include <linux/ctype.h>
31 #include <linux/sort.h>
32 #include <linux/list.h>
33 #include <linux/hash.h>
34 #include <linux/rcupdate.h>
36 #include <trace/events/sched.h>
38 #include <asm/setup.h>
40 #include "trace_output.h"
41 #include "trace_stat.h"
43 #define FTRACE_WARN_ON(cond) \
51 #define FTRACE_WARN_ON_ONCE(cond) \
54 if (WARN_ON_ONCE(___r)) \
59 /* hash bits for specific function selection */
60 #define FTRACE_HASH_BITS 7
61 #define FTRACE_FUNC_HASHSIZE (1 << FTRACE_HASH_BITS)
62 #define FTRACE_HASH_DEFAULT_BITS 10
63 #define FTRACE_HASH_MAX_BITS 12
65 #define FL_GLOBAL_CONTROL_MASK (FTRACE_OPS_FL_GLOBAL | FTRACE_OPS_FL_CONTROL)
67 /* ftrace_enabled is a method to turn ftrace on or off */
68 int ftrace_enabled __read_mostly
;
69 static int last_ftrace_enabled
;
71 /* Quick disabling of function tracer. */
72 int function_trace_stop
;
74 /* List for set_ftrace_pid's pids. */
75 LIST_HEAD(ftrace_pids
);
77 struct list_head list
;
82 * ftrace_disabled is set when an anomaly is discovered.
83 * ftrace_disabled is much stronger than ftrace_enabled.
85 static int ftrace_disabled __read_mostly
;
87 static DEFINE_MUTEX(ftrace_lock
);
89 static struct ftrace_ops ftrace_list_end __read_mostly
= {
93 static struct ftrace_ops
*ftrace_global_list __read_mostly
= &ftrace_list_end
;
94 static struct ftrace_ops
*ftrace_control_list __read_mostly
= &ftrace_list_end
;
95 static struct ftrace_ops
*ftrace_ops_list __read_mostly
= &ftrace_list_end
;
96 ftrace_func_t ftrace_trace_function __read_mostly
= ftrace_stub
;
97 static ftrace_func_t __ftrace_trace_function_delay __read_mostly
= ftrace_stub
;
98 ftrace_func_t __ftrace_trace_function __read_mostly
= ftrace_stub
;
99 ftrace_func_t ftrace_pid_function __read_mostly
= ftrace_stub
;
100 static struct ftrace_ops global_ops
;
101 static struct ftrace_ops control_ops
;
104 ftrace_ops_list_func(unsigned long ip
, unsigned long parent_ip
);
107 * Traverse the ftrace_global_list, invoking all entries. The reason that we
108 * can use rcu_dereference_raw() is that elements removed from this list
109 * are simply leaked, so there is no need to interact with a grace-period
110 * mechanism. The rcu_dereference_raw() calls are needed to handle
111 * concurrent insertions into the ftrace_global_list.
113 * Silly Alpha and silly pointer-speculation compiler optimizations!
115 static void ftrace_global_list_func(unsigned long ip
,
116 unsigned long parent_ip
)
118 struct ftrace_ops
*op
;
120 if (unlikely(trace_recursion_test(TRACE_GLOBAL_BIT
)))
123 trace_recursion_set(TRACE_GLOBAL_BIT
);
124 op
= rcu_dereference_raw(ftrace_global_list
); /*see above*/
125 while (op
!= &ftrace_list_end
) {
126 op
->func(ip
, parent_ip
);
127 op
= rcu_dereference_raw(op
->next
); /*see above*/
129 trace_recursion_clear(TRACE_GLOBAL_BIT
);
132 static void ftrace_pid_func(unsigned long ip
, unsigned long parent_ip
)
134 if (!test_tsk_trace_trace(current
))
137 ftrace_pid_function(ip
, parent_ip
);
140 static void set_ftrace_pid_function(ftrace_func_t func
)
142 /* do not set ftrace_pid_function to itself! */
143 if (func
!= ftrace_pid_func
)
144 ftrace_pid_function
= func
;
148 * clear_ftrace_function - reset the ftrace function
150 * This NULLs the ftrace function and in essence stops
151 * tracing. There may be lag
153 void clear_ftrace_function(void)
155 ftrace_trace_function
= ftrace_stub
;
156 __ftrace_trace_function
= ftrace_stub
;
157 __ftrace_trace_function_delay
= ftrace_stub
;
158 ftrace_pid_function
= ftrace_stub
;
161 #ifndef CONFIG_HAVE_FUNCTION_TRACE_MCOUNT_TEST
163 * For those archs that do not test ftrace_trace_stop in their
164 * mcount call site, we need to do it from C.
166 static void ftrace_test_stop_func(unsigned long ip
, unsigned long parent_ip
)
168 if (function_trace_stop
)
171 __ftrace_trace_function(ip
, parent_ip
);
175 static void control_ops_disable_all(struct ftrace_ops
*ops
)
179 for_each_possible_cpu(cpu
)
180 *per_cpu_ptr(ops
->disabled
, cpu
) = 1;
183 static int control_ops_alloc(struct ftrace_ops
*ops
)
185 int __percpu
*disabled
;
187 disabled
= alloc_percpu(int);
191 ops
->disabled
= disabled
;
192 control_ops_disable_all(ops
);
196 static void control_ops_free(struct ftrace_ops
*ops
)
198 free_percpu(ops
->disabled
);
201 static void update_global_ops(void)
206 * If there's only one function registered, then call that
207 * function directly. Otherwise, we need to iterate over the
208 * registered callers.
210 if (ftrace_global_list
== &ftrace_list_end
||
211 ftrace_global_list
->next
== &ftrace_list_end
)
212 func
= ftrace_global_list
->func
;
214 func
= ftrace_global_list_func
;
216 /* If we filter on pids, update to use the pid function */
217 if (!list_empty(&ftrace_pids
)) {
218 set_ftrace_pid_function(func
);
219 func
= ftrace_pid_func
;
222 global_ops
.func
= func
;
225 static void update_ftrace_function(void)
232 * If we are at the end of the list and this ops is
233 * not dynamic, then have the mcount trampoline call
234 * the function directly
236 if (ftrace_ops_list
== &ftrace_list_end
||
237 (ftrace_ops_list
->next
== &ftrace_list_end
&&
238 !(ftrace_ops_list
->flags
& FTRACE_OPS_FL_DYNAMIC
)))
239 func
= ftrace_ops_list
->func
;
241 func
= ftrace_ops_list_func
;
243 #ifdef CONFIG_HAVE_FUNCTION_TRACE_MCOUNT_TEST
244 ftrace_trace_function
= func
;
246 #ifdef CONFIG_DYNAMIC_FTRACE
247 /* do not update till all functions have been modified */
248 __ftrace_trace_function_delay
= func
;
250 __ftrace_trace_function
= func
;
252 ftrace_trace_function
=
253 (func
== ftrace_stub
) ? func
: ftrace_test_stop_func
;
257 static void add_ftrace_ops(struct ftrace_ops
**list
, struct ftrace_ops
*ops
)
261 * We are entering ops into the list but another
262 * CPU might be walking that list. We need to make sure
263 * the ops->next pointer is valid before another CPU sees
264 * the ops pointer included into the list.
266 rcu_assign_pointer(*list
, ops
);
269 static int remove_ftrace_ops(struct ftrace_ops
**list
, struct ftrace_ops
*ops
)
271 struct ftrace_ops
**p
;
274 * If we are removing the last function, then simply point
275 * to the ftrace_stub.
277 if (*list
== ops
&& ops
->next
== &ftrace_list_end
) {
278 *list
= &ftrace_list_end
;
282 for (p
= list
; *p
!= &ftrace_list_end
; p
= &(*p
)->next
)
293 static void add_ftrace_list_ops(struct ftrace_ops
**list
,
294 struct ftrace_ops
*main_ops
,
295 struct ftrace_ops
*ops
)
297 int first
= *list
== &ftrace_list_end
;
298 add_ftrace_ops(list
, ops
);
300 add_ftrace_ops(&ftrace_ops_list
, main_ops
);
303 static int remove_ftrace_list_ops(struct ftrace_ops
**list
,
304 struct ftrace_ops
*main_ops
,
305 struct ftrace_ops
*ops
)
307 int ret
= remove_ftrace_ops(list
, ops
);
308 if (!ret
&& *list
== &ftrace_list_end
)
309 ret
= remove_ftrace_ops(&ftrace_ops_list
, main_ops
);
313 static int __register_ftrace_function(struct ftrace_ops
*ops
)
315 if (unlikely(ftrace_disabled
))
318 if (FTRACE_WARN_ON(ops
== &global_ops
))
321 if (WARN_ON(ops
->flags
& FTRACE_OPS_FL_ENABLED
))
324 /* We don't support both control and global flags set. */
325 if ((ops
->flags
& FL_GLOBAL_CONTROL_MASK
) == FL_GLOBAL_CONTROL_MASK
)
328 if (!core_kernel_data((unsigned long)ops
))
329 ops
->flags
|= FTRACE_OPS_FL_DYNAMIC
;
331 if (ops
->flags
& FTRACE_OPS_FL_GLOBAL
) {
332 add_ftrace_list_ops(&ftrace_global_list
, &global_ops
, ops
);
333 ops
->flags
|= FTRACE_OPS_FL_ENABLED
;
334 } else if (ops
->flags
& FTRACE_OPS_FL_CONTROL
) {
335 if (control_ops_alloc(ops
))
337 add_ftrace_list_ops(&ftrace_control_list
, &control_ops
, ops
);
339 add_ftrace_ops(&ftrace_ops_list
, ops
);
342 update_ftrace_function();
347 static int __unregister_ftrace_function(struct ftrace_ops
*ops
)
354 if (WARN_ON(!(ops
->flags
& FTRACE_OPS_FL_ENABLED
)))
357 if (FTRACE_WARN_ON(ops
== &global_ops
))
360 if (ops
->flags
& FTRACE_OPS_FL_GLOBAL
) {
361 ret
= remove_ftrace_list_ops(&ftrace_global_list
,
364 ops
->flags
&= ~FTRACE_OPS_FL_ENABLED
;
365 } else if (ops
->flags
& FTRACE_OPS_FL_CONTROL
) {
366 ret
= remove_ftrace_list_ops(&ftrace_control_list
,
370 * The ftrace_ops is now removed from the list,
371 * so there'll be no new users. We must ensure
372 * all current users are done before we free
376 control_ops_free(ops
);
379 ret
= remove_ftrace_ops(&ftrace_ops_list
, ops
);
385 update_ftrace_function();
388 * Dynamic ops may be freed, we must make sure that all
389 * callers are done before leaving this function.
391 if (ops
->flags
& FTRACE_OPS_FL_DYNAMIC
)
397 static void ftrace_update_pid_func(void)
399 /* Only do something if we are tracing something */
400 if (ftrace_trace_function
== ftrace_stub
)
403 update_ftrace_function();
406 #ifdef CONFIG_FUNCTION_PROFILER
407 struct ftrace_profile
{
408 struct hlist_node node
;
410 unsigned long counter
;
411 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
412 unsigned long long time
;
413 unsigned long long time_squared
;
417 struct ftrace_profile_page
{
418 struct ftrace_profile_page
*next
;
420 struct ftrace_profile records
[];
423 struct ftrace_profile_stat
{
425 struct hlist_head
*hash
;
426 struct ftrace_profile_page
*pages
;
427 struct ftrace_profile_page
*start
;
428 struct tracer_stat stat
;
431 #define PROFILE_RECORDS_SIZE \
432 (PAGE_SIZE - offsetof(struct ftrace_profile_page, records))
434 #define PROFILES_PER_PAGE \
435 (PROFILE_RECORDS_SIZE / sizeof(struct ftrace_profile))
437 static int ftrace_profile_bits __read_mostly
;
438 static int ftrace_profile_enabled __read_mostly
;
440 /* ftrace_profile_lock - synchronize the enable and disable of the profiler */
441 static DEFINE_MUTEX(ftrace_profile_lock
);
443 static DEFINE_PER_CPU(struct ftrace_profile_stat
, ftrace_profile_stats
);
445 #define FTRACE_PROFILE_HASH_SIZE 1024 /* must be power of 2 */
448 function_stat_next(void *v
, int idx
)
450 struct ftrace_profile
*rec
= v
;
451 struct ftrace_profile_page
*pg
;
453 pg
= (struct ftrace_profile_page
*)((unsigned long)rec
& PAGE_MASK
);
459 if ((void *)rec
>= (void *)&pg
->records
[pg
->index
]) {
463 rec
= &pg
->records
[0];
471 static void *function_stat_start(struct tracer_stat
*trace
)
473 struct ftrace_profile_stat
*stat
=
474 container_of(trace
, struct ftrace_profile_stat
, stat
);
476 if (!stat
|| !stat
->start
)
479 return function_stat_next(&stat
->start
->records
[0], 0);
482 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
483 /* function graph compares on total time */
484 static int function_stat_cmp(void *p1
, void *p2
)
486 struct ftrace_profile
*a
= p1
;
487 struct ftrace_profile
*b
= p2
;
489 if (a
->time
< b
->time
)
491 if (a
->time
> b
->time
)
497 /* not function graph compares against hits */
498 static int function_stat_cmp(void *p1
, void *p2
)
500 struct ftrace_profile
*a
= p1
;
501 struct ftrace_profile
*b
= p2
;
503 if (a
->counter
< b
->counter
)
505 if (a
->counter
> b
->counter
)
512 static int function_stat_headers(struct seq_file
*m
)
514 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
515 seq_printf(m
, " Function "
518 "--- ---- --- ---\n");
520 seq_printf(m
, " Function Hit\n"
526 static int function_stat_show(struct seq_file
*m
, void *v
)
528 struct ftrace_profile
*rec
= v
;
529 char str
[KSYM_SYMBOL_LEN
];
531 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
532 static struct trace_seq s
;
533 unsigned long long avg
;
534 unsigned long long stddev
;
536 mutex_lock(&ftrace_profile_lock
);
538 /* we raced with function_profile_reset() */
539 if (unlikely(rec
->counter
== 0)) {
544 kallsyms_lookup(rec
->ip
, NULL
, NULL
, NULL
, str
);
545 seq_printf(m
, " %-30.30s %10lu", str
, rec
->counter
);
547 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
550 do_div(avg
, rec
->counter
);
552 /* Sample standard deviation (s^2) */
553 if (rec
->counter
<= 1)
556 stddev
= rec
->time_squared
- rec
->counter
* avg
* avg
;
558 * Divide only 1000 for ns^2 -> us^2 conversion.
559 * trace_print_graph_duration will divide 1000 again.
561 do_div(stddev
, (rec
->counter
- 1) * 1000);
565 trace_print_graph_duration(rec
->time
, &s
);
566 trace_seq_puts(&s
, " ");
567 trace_print_graph_duration(avg
, &s
);
568 trace_seq_puts(&s
, " ");
569 trace_print_graph_duration(stddev
, &s
);
570 trace_print_seq(m
, &s
);
574 mutex_unlock(&ftrace_profile_lock
);
579 static void ftrace_profile_reset(struct ftrace_profile_stat
*stat
)
581 struct ftrace_profile_page
*pg
;
583 pg
= stat
->pages
= stat
->start
;
586 memset(pg
->records
, 0, PROFILE_RECORDS_SIZE
);
591 memset(stat
->hash
, 0,
592 FTRACE_PROFILE_HASH_SIZE
* sizeof(struct hlist_head
));
595 int ftrace_profile_pages_init(struct ftrace_profile_stat
*stat
)
597 struct ftrace_profile_page
*pg
;
602 /* If we already allocated, do nothing */
606 stat
->pages
= (void *)get_zeroed_page(GFP_KERNEL
);
610 #ifdef CONFIG_DYNAMIC_FTRACE
611 functions
= ftrace_update_tot_cnt
;
614 * We do not know the number of functions that exist because
615 * dynamic tracing is what counts them. With past experience
616 * we have around 20K functions. That should be more than enough.
617 * It is highly unlikely we will execute every function in
623 pg
= stat
->start
= stat
->pages
;
625 pages
= DIV_ROUND_UP(functions
, PROFILES_PER_PAGE
);
627 for (i
= 0; i
< pages
; i
++) {
628 pg
->next
= (void *)get_zeroed_page(GFP_KERNEL
);
639 unsigned long tmp
= (unsigned long)pg
;
645 free_page((unsigned long)stat
->pages
);
652 static int ftrace_profile_init_cpu(int cpu
)
654 struct ftrace_profile_stat
*stat
;
657 stat
= &per_cpu(ftrace_profile_stats
, cpu
);
660 /* If the profile is already created, simply reset it */
661 ftrace_profile_reset(stat
);
666 * We are profiling all functions, but usually only a few thousand
667 * functions are hit. We'll make a hash of 1024 items.
669 size
= FTRACE_PROFILE_HASH_SIZE
;
671 stat
->hash
= kzalloc(sizeof(struct hlist_head
) * size
, GFP_KERNEL
);
676 if (!ftrace_profile_bits
) {
679 for (; size
; size
>>= 1)
680 ftrace_profile_bits
++;
683 /* Preallocate the function profiling pages */
684 if (ftrace_profile_pages_init(stat
) < 0) {
693 static int ftrace_profile_init(void)
698 for_each_online_cpu(cpu
) {
699 ret
= ftrace_profile_init_cpu(cpu
);
707 /* interrupts must be disabled */
708 static struct ftrace_profile
*
709 ftrace_find_profiled_func(struct ftrace_profile_stat
*stat
, unsigned long ip
)
711 struct ftrace_profile
*rec
;
712 struct hlist_head
*hhd
;
713 struct hlist_node
*n
;
716 key
= hash_long(ip
, ftrace_profile_bits
);
717 hhd
= &stat
->hash
[key
];
719 if (hlist_empty(hhd
))
722 hlist_for_each_entry_rcu(rec
, n
, hhd
, node
) {
730 static void ftrace_add_profile(struct ftrace_profile_stat
*stat
,
731 struct ftrace_profile
*rec
)
735 key
= hash_long(rec
->ip
, ftrace_profile_bits
);
736 hlist_add_head_rcu(&rec
->node
, &stat
->hash
[key
]);
740 * The memory is already allocated, this simply finds a new record to use.
742 static struct ftrace_profile
*
743 ftrace_profile_alloc(struct ftrace_profile_stat
*stat
, unsigned long ip
)
745 struct ftrace_profile
*rec
= NULL
;
747 /* prevent recursion (from NMIs) */
748 if (atomic_inc_return(&stat
->disabled
) != 1)
752 * Try to find the function again since an NMI
753 * could have added it
755 rec
= ftrace_find_profiled_func(stat
, ip
);
759 if (stat
->pages
->index
== PROFILES_PER_PAGE
) {
760 if (!stat
->pages
->next
)
762 stat
->pages
= stat
->pages
->next
;
765 rec
= &stat
->pages
->records
[stat
->pages
->index
++];
767 ftrace_add_profile(stat
, rec
);
770 atomic_dec(&stat
->disabled
);
776 function_profile_call(unsigned long ip
, unsigned long parent_ip
)
778 struct ftrace_profile_stat
*stat
;
779 struct ftrace_profile
*rec
;
782 if (!ftrace_profile_enabled
)
785 local_irq_save(flags
);
787 stat
= &__get_cpu_var(ftrace_profile_stats
);
788 if (!stat
->hash
|| !ftrace_profile_enabled
)
791 rec
= ftrace_find_profiled_func(stat
, ip
);
793 rec
= ftrace_profile_alloc(stat
, ip
);
800 local_irq_restore(flags
);
803 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
804 static int profile_graph_entry(struct ftrace_graph_ent
*trace
)
806 function_profile_call(trace
->func
, 0);
810 static void profile_graph_return(struct ftrace_graph_ret
*trace
)
812 struct ftrace_profile_stat
*stat
;
813 unsigned long long calltime
;
814 struct ftrace_profile
*rec
;
817 local_irq_save(flags
);
818 stat
= &__get_cpu_var(ftrace_profile_stats
);
819 if (!stat
->hash
|| !ftrace_profile_enabled
)
822 /* If the calltime was zero'd ignore it */
823 if (!trace
->calltime
)
826 calltime
= trace
->rettime
- trace
->calltime
;
828 if (!(trace_flags
& TRACE_ITER_GRAPH_TIME
)) {
831 index
= trace
->depth
;
833 /* Append this call time to the parent time to subtract */
835 current
->ret_stack
[index
- 1].subtime
+= calltime
;
837 if (current
->ret_stack
[index
].subtime
< calltime
)
838 calltime
-= current
->ret_stack
[index
].subtime
;
843 rec
= ftrace_find_profiled_func(stat
, trace
->func
);
845 rec
->time
+= calltime
;
846 rec
->time_squared
+= calltime
* calltime
;
850 local_irq_restore(flags
);
853 static int register_ftrace_profiler(void)
855 return register_ftrace_graph(&profile_graph_return
,
856 &profile_graph_entry
);
859 static void unregister_ftrace_profiler(void)
861 unregister_ftrace_graph();
864 static struct ftrace_ops ftrace_profile_ops __read_mostly
= {
865 .func
= function_profile_call
,
868 static int register_ftrace_profiler(void)
870 return register_ftrace_function(&ftrace_profile_ops
);
873 static void unregister_ftrace_profiler(void)
875 unregister_ftrace_function(&ftrace_profile_ops
);
877 #endif /* CONFIG_FUNCTION_GRAPH_TRACER */
880 ftrace_profile_write(struct file
*filp
, const char __user
*ubuf
,
881 size_t cnt
, loff_t
*ppos
)
886 ret
= kstrtoul_from_user(ubuf
, cnt
, 10, &val
);
892 mutex_lock(&ftrace_profile_lock
);
893 if (ftrace_profile_enabled
^ val
) {
895 ret
= ftrace_profile_init();
901 ret
= register_ftrace_profiler();
906 ftrace_profile_enabled
= 1;
908 ftrace_profile_enabled
= 0;
910 * unregister_ftrace_profiler calls stop_machine
911 * so this acts like an synchronize_sched.
913 unregister_ftrace_profiler();
917 mutex_unlock(&ftrace_profile_lock
);
925 ftrace_profile_read(struct file
*filp
, char __user
*ubuf
,
926 size_t cnt
, loff_t
*ppos
)
928 char buf
[64]; /* big enough to hold a number */
931 r
= sprintf(buf
, "%u\n", ftrace_profile_enabled
);
932 return simple_read_from_buffer(ubuf
, cnt
, ppos
, buf
, r
);
935 static const struct file_operations ftrace_profile_fops
= {
936 .open
= tracing_open_generic
,
937 .read
= ftrace_profile_read
,
938 .write
= ftrace_profile_write
,
939 .llseek
= default_llseek
,
942 /* used to initialize the real stat files */
943 static struct tracer_stat function_stats __initdata
= {
945 .stat_start
= function_stat_start
,
946 .stat_next
= function_stat_next
,
947 .stat_cmp
= function_stat_cmp
,
948 .stat_headers
= function_stat_headers
,
949 .stat_show
= function_stat_show
952 static __init
void ftrace_profile_debugfs(struct dentry
*d_tracer
)
954 struct ftrace_profile_stat
*stat
;
955 struct dentry
*entry
;
960 for_each_possible_cpu(cpu
) {
961 stat
= &per_cpu(ftrace_profile_stats
, cpu
);
963 /* allocate enough for function name + cpu number */
964 name
= kmalloc(32, GFP_KERNEL
);
967 * The files created are permanent, if something happens
968 * we still do not free memory.
971 "Could not allocate stat file for cpu %d\n",
975 stat
->stat
= function_stats
;
976 snprintf(name
, 32, "function%d", cpu
);
977 stat
->stat
.name
= name
;
978 ret
= register_stat_tracer(&stat
->stat
);
981 "Could not register function stat for cpu %d\n",
988 entry
= debugfs_create_file("function_profile_enabled", 0644,
989 d_tracer
, NULL
, &ftrace_profile_fops
);
991 pr_warning("Could not create debugfs "
992 "'function_profile_enabled' entry\n");
995 #else /* CONFIG_FUNCTION_PROFILER */
996 static __init
void ftrace_profile_debugfs(struct dentry
*d_tracer
)
999 #endif /* CONFIG_FUNCTION_PROFILER */
1001 static struct pid
* const ftrace_swapper_pid
= &init_struct_pid
;
1003 #ifdef CONFIG_DYNAMIC_FTRACE
1005 #ifndef CONFIG_FTRACE_MCOUNT_RECORD
1006 # error Dynamic ftrace depends on MCOUNT_RECORD
1009 static struct hlist_head ftrace_func_hash
[FTRACE_FUNC_HASHSIZE
] __read_mostly
;
1011 struct ftrace_func_probe
{
1012 struct hlist_node node
;
1013 struct ftrace_probe_ops
*ops
;
1014 unsigned long flags
;
1017 struct rcu_head rcu
;
1020 struct ftrace_func_entry
{
1021 struct hlist_node hlist
;
1025 struct ftrace_hash
{
1026 unsigned long size_bits
;
1027 struct hlist_head
*buckets
;
1028 unsigned long count
;
1029 struct rcu_head rcu
;
1033 * We make these constant because no one should touch them,
1034 * but they are used as the default "empty hash", to avoid allocating
1035 * it all the time. These are in a read only section such that if
1036 * anyone does try to modify it, it will cause an exception.
1038 static const struct hlist_head empty_buckets
[1];
1039 static const struct ftrace_hash empty_hash
= {
1040 .buckets
= (struct hlist_head
*)empty_buckets
,
1042 #define EMPTY_HASH ((struct ftrace_hash *)&empty_hash)
1044 static struct ftrace_ops global_ops
= {
1045 .func
= ftrace_stub
,
1046 .notrace_hash
= EMPTY_HASH
,
1047 .filter_hash
= EMPTY_HASH
,
1050 static DEFINE_MUTEX(ftrace_regex_lock
);
1052 struct ftrace_page
{
1053 struct ftrace_page
*next
;
1054 struct dyn_ftrace
*records
;
1059 static struct ftrace_page
*ftrace_new_pgs
;
1061 #define ENTRY_SIZE sizeof(struct dyn_ftrace)
1062 #define ENTRIES_PER_PAGE (PAGE_SIZE / ENTRY_SIZE)
1064 /* estimate from running different kernels */
1065 #define NR_TO_INIT 10000
1067 static struct ftrace_page
*ftrace_pages_start
;
1068 static struct ftrace_page
*ftrace_pages
;
1070 static bool ftrace_hash_empty(struct ftrace_hash
*hash
)
1072 return !hash
|| !hash
->count
;
1075 static struct ftrace_func_entry
*
1076 ftrace_lookup_ip(struct ftrace_hash
*hash
, unsigned long ip
)
1079 struct ftrace_func_entry
*entry
;
1080 struct hlist_head
*hhd
;
1081 struct hlist_node
*n
;
1083 if (ftrace_hash_empty(hash
))
1086 if (hash
->size_bits
> 0)
1087 key
= hash_long(ip
, hash
->size_bits
);
1091 hhd
= &hash
->buckets
[key
];
1093 hlist_for_each_entry_rcu(entry
, n
, hhd
, hlist
) {
1094 if (entry
->ip
== ip
)
1100 static void __add_hash_entry(struct ftrace_hash
*hash
,
1101 struct ftrace_func_entry
*entry
)
1103 struct hlist_head
*hhd
;
1106 if (hash
->size_bits
)
1107 key
= hash_long(entry
->ip
, hash
->size_bits
);
1111 hhd
= &hash
->buckets
[key
];
1112 hlist_add_head(&entry
->hlist
, hhd
);
1116 static int add_hash_entry(struct ftrace_hash
*hash
, unsigned long ip
)
1118 struct ftrace_func_entry
*entry
;
1120 entry
= kmalloc(sizeof(*entry
), GFP_KERNEL
);
1125 __add_hash_entry(hash
, entry
);
1131 free_hash_entry(struct ftrace_hash
*hash
,
1132 struct ftrace_func_entry
*entry
)
1134 hlist_del(&entry
->hlist
);
1140 remove_hash_entry(struct ftrace_hash
*hash
,
1141 struct ftrace_func_entry
*entry
)
1143 hlist_del(&entry
->hlist
);
1147 static void ftrace_hash_clear(struct ftrace_hash
*hash
)
1149 struct hlist_head
*hhd
;
1150 struct hlist_node
*tp
, *tn
;
1151 struct ftrace_func_entry
*entry
;
1152 int size
= 1 << hash
->size_bits
;
1158 for (i
= 0; i
< size
; i
++) {
1159 hhd
= &hash
->buckets
[i
];
1160 hlist_for_each_entry_safe(entry
, tp
, tn
, hhd
, hlist
)
1161 free_hash_entry(hash
, entry
);
1163 FTRACE_WARN_ON(hash
->count
);
1166 static void free_ftrace_hash(struct ftrace_hash
*hash
)
1168 if (!hash
|| hash
== EMPTY_HASH
)
1170 ftrace_hash_clear(hash
);
1171 kfree(hash
->buckets
);
1175 static void __free_ftrace_hash_rcu(struct rcu_head
*rcu
)
1177 struct ftrace_hash
*hash
;
1179 hash
= container_of(rcu
, struct ftrace_hash
, rcu
);
1180 free_ftrace_hash(hash
);
1183 static void free_ftrace_hash_rcu(struct ftrace_hash
*hash
)
1185 if (!hash
|| hash
== EMPTY_HASH
)
1187 call_rcu_sched(&hash
->rcu
, __free_ftrace_hash_rcu
);
1190 void ftrace_free_filter(struct ftrace_ops
*ops
)
1192 free_ftrace_hash(ops
->filter_hash
);
1193 free_ftrace_hash(ops
->notrace_hash
);
1196 static struct ftrace_hash
*alloc_ftrace_hash(int size_bits
)
1198 struct ftrace_hash
*hash
;
1201 hash
= kzalloc(sizeof(*hash
), GFP_KERNEL
);
1205 size
= 1 << size_bits
;
1206 hash
->buckets
= kcalloc(size
, sizeof(*hash
->buckets
), GFP_KERNEL
);
1208 if (!hash
->buckets
) {
1213 hash
->size_bits
= size_bits
;
1218 static struct ftrace_hash
*
1219 alloc_and_copy_ftrace_hash(int size_bits
, struct ftrace_hash
*hash
)
1221 struct ftrace_func_entry
*entry
;
1222 struct ftrace_hash
*new_hash
;
1223 struct hlist_node
*tp
;
1228 new_hash
= alloc_ftrace_hash(size_bits
);
1233 if (ftrace_hash_empty(hash
))
1236 size
= 1 << hash
->size_bits
;
1237 for (i
= 0; i
< size
; i
++) {
1238 hlist_for_each_entry(entry
, tp
, &hash
->buckets
[i
], hlist
) {
1239 ret
= add_hash_entry(new_hash
, entry
->ip
);
1245 FTRACE_WARN_ON(new_hash
->count
!= hash
->count
);
1250 free_ftrace_hash(new_hash
);
1255 ftrace_hash_rec_disable(struct ftrace_ops
*ops
, int filter_hash
);
1257 ftrace_hash_rec_enable(struct ftrace_ops
*ops
, int filter_hash
);
1260 ftrace_hash_move(struct ftrace_ops
*ops
, int enable
,
1261 struct ftrace_hash
**dst
, struct ftrace_hash
*src
)
1263 struct ftrace_func_entry
*entry
;
1264 struct hlist_node
*tp
, *tn
;
1265 struct hlist_head
*hhd
;
1266 struct ftrace_hash
*old_hash
;
1267 struct ftrace_hash
*new_hash
;
1269 int size
= src
->count
;
1275 * Remove the current set, update the hash and add
1278 ftrace_hash_rec_disable(ops
, enable
);
1281 * If the new source is empty, just free dst and assign it
1285 free_ftrace_hash_rcu(*dst
);
1286 rcu_assign_pointer(*dst
, EMPTY_HASH
);
1287 /* still need to update the function records */
1293 * Make the hash size about 1/2 the # found
1295 for (size
/= 2; size
; size
>>= 1)
1298 /* Don't allocate too much */
1299 if (bits
> FTRACE_HASH_MAX_BITS
)
1300 bits
= FTRACE_HASH_MAX_BITS
;
1303 new_hash
= alloc_ftrace_hash(bits
);
1307 size
= 1 << src
->size_bits
;
1308 for (i
= 0; i
< size
; i
++) {
1309 hhd
= &src
->buckets
[i
];
1310 hlist_for_each_entry_safe(entry
, tp
, tn
, hhd
, hlist
) {
1312 key
= hash_long(entry
->ip
, bits
);
1315 remove_hash_entry(src
, entry
);
1316 __add_hash_entry(new_hash
, entry
);
1321 rcu_assign_pointer(*dst
, new_hash
);
1322 free_ftrace_hash_rcu(old_hash
);
1327 * Enable regardless of ret:
1328 * On success, we enable the new hash.
1329 * On failure, we re-enable the original hash.
1331 ftrace_hash_rec_enable(ops
, enable
);
1337 * Test the hashes for this ops to see if we want to call
1338 * the ops->func or not.
1340 * It's a match if the ip is in the ops->filter_hash or
1341 * the filter_hash does not exist or is empty,
1343 * the ip is not in the ops->notrace_hash.
1345 * This needs to be called with preemption disabled as
1346 * the hashes are freed with call_rcu_sched().
1349 ftrace_ops_test(struct ftrace_ops
*ops
, unsigned long ip
)
1351 struct ftrace_hash
*filter_hash
;
1352 struct ftrace_hash
*notrace_hash
;
1355 filter_hash
= rcu_dereference_raw(ops
->filter_hash
);
1356 notrace_hash
= rcu_dereference_raw(ops
->notrace_hash
);
1358 if ((ftrace_hash_empty(filter_hash
) ||
1359 ftrace_lookup_ip(filter_hash
, ip
)) &&
1360 (ftrace_hash_empty(notrace_hash
) ||
1361 !ftrace_lookup_ip(notrace_hash
, ip
)))
1370 * This is a double for. Do not use 'break' to break out of the loop,
1371 * you must use a goto.
1373 #define do_for_each_ftrace_rec(pg, rec) \
1374 for (pg = ftrace_pages_start; pg; pg = pg->next) { \
1376 for (_____i = 0; _____i < pg->index; _____i++) { \
1377 rec = &pg->records[_____i];
1379 #define while_for_each_ftrace_rec() \
1384 static int ftrace_cmp_recs(const void *a
, const void *b
)
1386 const struct dyn_ftrace
*key
= a
;
1387 const struct dyn_ftrace
*rec
= b
;
1389 if (key
->flags
< rec
->ip
)
1391 if (key
->ip
>= rec
->ip
+ MCOUNT_INSN_SIZE
)
1396 static unsigned long ftrace_location_range(unsigned long start
, unsigned long end
)
1398 struct ftrace_page
*pg
;
1399 struct dyn_ftrace
*rec
;
1400 struct dyn_ftrace key
;
1403 key
.flags
= end
; /* overload flags, as it is unsigned long */
1405 for (pg
= ftrace_pages_start
; pg
; pg
= pg
->next
) {
1406 if (end
< pg
->records
[0].ip
||
1407 start
>= (pg
->records
[pg
->index
- 1].ip
+ MCOUNT_INSN_SIZE
))
1409 rec
= bsearch(&key
, pg
->records
, pg
->index
,
1410 sizeof(struct dyn_ftrace
),
1420 * ftrace_location - return true if the ip giving is a traced location
1421 * @ip: the instruction pointer to check
1423 * Returns rec->ip if @ip given is a pointer to a ftrace location.
1424 * That is, the instruction that is either a NOP or call to
1425 * the function tracer. It checks the ftrace internal tables to
1426 * determine if the address belongs or not.
1428 unsigned long ftrace_location(unsigned long ip
)
1430 return ftrace_location_range(ip
, ip
);
1434 * ftrace_text_reserved - return true if range contains an ftrace location
1435 * @start: start of range to search
1436 * @end: end of range to search (inclusive). @end points to the last byte to check.
1438 * Returns 1 if @start and @end contains a ftrace location.
1439 * That is, the instruction that is either a NOP or call to
1440 * the function tracer. It checks the ftrace internal tables to
1441 * determine if the address belongs or not.
1443 int ftrace_text_reserved(void *start
, void *end
)
1447 ret
= ftrace_location_range((unsigned long)start
,
1448 (unsigned long)end
);
1453 static void __ftrace_hash_rec_update(struct ftrace_ops
*ops
,
1457 struct ftrace_hash
*hash
;
1458 struct ftrace_hash
*other_hash
;
1459 struct ftrace_page
*pg
;
1460 struct dyn_ftrace
*rec
;
1464 /* Only update if the ops has been registered */
1465 if (!(ops
->flags
& FTRACE_OPS_FL_ENABLED
))
1469 * In the filter_hash case:
1470 * If the count is zero, we update all records.
1471 * Otherwise we just update the items in the hash.
1473 * In the notrace_hash case:
1474 * We enable the update in the hash.
1475 * As disabling notrace means enabling the tracing,
1476 * and enabling notrace means disabling, the inc variable
1480 hash
= ops
->filter_hash
;
1481 other_hash
= ops
->notrace_hash
;
1482 if (ftrace_hash_empty(hash
))
1486 hash
= ops
->notrace_hash
;
1487 other_hash
= ops
->filter_hash
;
1489 * If the notrace hash has no items,
1490 * then there's nothing to do.
1492 if (ftrace_hash_empty(hash
))
1496 do_for_each_ftrace_rec(pg
, rec
) {
1497 int in_other_hash
= 0;
1503 * Only the filter_hash affects all records.
1504 * Update if the record is not in the notrace hash.
1506 if (!other_hash
|| !ftrace_lookup_ip(other_hash
, rec
->ip
))
1509 in_hash
= !!ftrace_lookup_ip(hash
, rec
->ip
);
1510 in_other_hash
= !!ftrace_lookup_ip(other_hash
, rec
->ip
);
1515 if (filter_hash
&& in_hash
&& !in_other_hash
)
1517 else if (!filter_hash
&& in_hash
&&
1518 (in_other_hash
|| ftrace_hash_empty(other_hash
)))
1526 if (FTRACE_WARN_ON((rec
->flags
& ~FTRACE_FL_MASK
) == FTRACE_REF_MAX
))
1529 if (FTRACE_WARN_ON((rec
->flags
& ~FTRACE_FL_MASK
) == 0))
1534 /* Shortcut, if we handled all records, we are done. */
1535 if (!all
&& count
== hash
->count
)
1537 } while_for_each_ftrace_rec();
1540 static void ftrace_hash_rec_disable(struct ftrace_ops
*ops
,
1543 __ftrace_hash_rec_update(ops
, filter_hash
, 0);
1546 static void ftrace_hash_rec_enable(struct ftrace_ops
*ops
,
1549 __ftrace_hash_rec_update(ops
, filter_hash
, 1);
1552 static void print_ip_ins(const char *fmt
, unsigned char *p
)
1556 printk(KERN_CONT
"%s", fmt
);
1558 for (i
= 0; i
< MCOUNT_INSN_SIZE
; i
++)
1559 printk(KERN_CONT
"%s%02x", i
? ":" : "", p
[i
]);
1563 * ftrace_bug - report and shutdown function tracer
1564 * @failed: The failed type (EFAULT, EINVAL, EPERM)
1565 * @ip: The address that failed
1567 * The arch code that enables or disables the function tracing
1568 * can call ftrace_bug() when it has detected a problem in
1569 * modifying the code. @failed should be one of either:
1570 * EFAULT - if the problem happens on reading the @ip address
1571 * EINVAL - if what is read at @ip is not what was expected
1572 * EPERM - if the problem happens on writting to the @ip address
1574 void ftrace_bug(int failed
, unsigned long ip
)
1578 FTRACE_WARN_ON_ONCE(1);
1579 pr_info("ftrace faulted on modifying ");
1583 FTRACE_WARN_ON_ONCE(1);
1584 pr_info("ftrace failed to modify ");
1586 print_ip_ins(" actual: ", (unsigned char *)ip
);
1587 printk(KERN_CONT
"\n");
1590 FTRACE_WARN_ON_ONCE(1);
1591 pr_info("ftrace faulted on writing ");
1595 FTRACE_WARN_ON_ONCE(1);
1596 pr_info("ftrace faulted on unknown error ");
1601 static int ftrace_check_record(struct dyn_ftrace
*rec
, int enable
, int update
)
1603 unsigned long flag
= 0UL;
1606 * If we are updating calls:
1608 * If the record has a ref count, then we need to enable it
1609 * because someone is using it.
1611 * Otherwise we make sure its disabled.
1613 * If we are disabling calls, then disable all records that
1616 if (enable
&& (rec
->flags
& ~FTRACE_FL_MASK
))
1617 flag
= FTRACE_FL_ENABLED
;
1619 /* If the state of this record hasn't changed, then do nothing */
1620 if ((rec
->flags
& FTRACE_FL_ENABLED
) == flag
)
1621 return FTRACE_UPDATE_IGNORE
;
1625 rec
->flags
|= FTRACE_FL_ENABLED
;
1626 return FTRACE_UPDATE_MAKE_CALL
;
1630 rec
->flags
&= ~FTRACE_FL_ENABLED
;
1632 return FTRACE_UPDATE_MAKE_NOP
;
1636 * ftrace_update_record, set a record that now is tracing or not
1637 * @rec: the record to update
1638 * @enable: set to 1 if the record is tracing, zero to force disable
1640 * The records that represent all functions that can be traced need
1641 * to be updated when tracing has been enabled.
1643 int ftrace_update_record(struct dyn_ftrace
*rec
, int enable
)
1645 return ftrace_check_record(rec
, enable
, 1);
1649 * ftrace_test_record, check if the record has been enabled or not
1650 * @rec: the record to test
1651 * @enable: set to 1 to check if enabled, 0 if it is disabled
1653 * The arch code may need to test if a record is already set to
1654 * tracing to determine how to modify the function code that it
1657 int ftrace_test_record(struct dyn_ftrace
*rec
, int enable
)
1659 return ftrace_check_record(rec
, enable
, 0);
1663 __ftrace_replace_code(struct dyn_ftrace
*rec
, int enable
)
1665 unsigned long ftrace_addr
;
1668 ftrace_addr
= (unsigned long)FTRACE_ADDR
;
1670 ret
= ftrace_update_record(rec
, enable
);
1673 case FTRACE_UPDATE_IGNORE
:
1676 case FTRACE_UPDATE_MAKE_CALL
:
1677 return ftrace_make_call(rec
, ftrace_addr
);
1679 case FTRACE_UPDATE_MAKE_NOP
:
1680 return ftrace_make_nop(NULL
, rec
, ftrace_addr
);
1683 return -1; /* unknow ftrace bug */
1686 void __weak
ftrace_replace_code(int enable
)
1688 struct dyn_ftrace
*rec
;
1689 struct ftrace_page
*pg
;
1692 if (unlikely(ftrace_disabled
))
1695 do_for_each_ftrace_rec(pg
, rec
) {
1696 failed
= __ftrace_replace_code(rec
, enable
);
1698 ftrace_bug(failed
, rec
->ip
);
1699 /* Stop processing */
1702 } while_for_each_ftrace_rec();
1705 struct ftrace_rec_iter
{
1706 struct ftrace_page
*pg
;
1711 * ftrace_rec_iter_start, start up iterating over traced functions
1713 * Returns an iterator handle that is used to iterate over all
1714 * the records that represent address locations where functions
1717 * May return NULL if no records are available.
1719 struct ftrace_rec_iter
*ftrace_rec_iter_start(void)
1722 * We only use a single iterator.
1723 * Protected by the ftrace_lock mutex.
1725 static struct ftrace_rec_iter ftrace_rec_iter
;
1726 struct ftrace_rec_iter
*iter
= &ftrace_rec_iter
;
1728 iter
->pg
= ftrace_pages_start
;
1731 /* Could have empty pages */
1732 while (iter
->pg
&& !iter
->pg
->index
)
1733 iter
->pg
= iter
->pg
->next
;
1742 * ftrace_rec_iter_next, get the next record to process.
1743 * @iter: The handle to the iterator.
1745 * Returns the next iterator after the given iterator @iter.
1747 struct ftrace_rec_iter
*ftrace_rec_iter_next(struct ftrace_rec_iter
*iter
)
1751 if (iter
->index
>= iter
->pg
->index
) {
1752 iter
->pg
= iter
->pg
->next
;
1755 /* Could have empty pages */
1756 while (iter
->pg
&& !iter
->pg
->index
)
1757 iter
->pg
= iter
->pg
->next
;
1767 * ftrace_rec_iter_record, get the record at the iterator location
1768 * @iter: The current iterator location
1770 * Returns the record that the current @iter is at.
1772 struct dyn_ftrace
*ftrace_rec_iter_record(struct ftrace_rec_iter
*iter
)
1774 return &iter
->pg
->records
[iter
->index
];
1778 ftrace_code_disable(struct module
*mod
, struct dyn_ftrace
*rec
)
1785 if (unlikely(ftrace_disabled
))
1788 ret
= ftrace_make_nop(mod
, rec
, MCOUNT_ADDR
);
1790 ftrace_bug(ret
, ip
);
1797 * archs can override this function if they must do something
1798 * before the modifying code is performed.
1800 int __weak
ftrace_arch_code_modify_prepare(void)
1806 * archs can override this function if they must do something
1807 * after the modifying code is performed.
1809 int __weak
ftrace_arch_code_modify_post_process(void)
1814 void ftrace_modify_all_code(int command
)
1816 if (command
& FTRACE_UPDATE_CALLS
)
1817 ftrace_replace_code(1);
1818 else if (command
& FTRACE_DISABLE_CALLS
)
1819 ftrace_replace_code(0);
1821 if (command
& FTRACE_UPDATE_TRACE_FUNC
)
1822 ftrace_update_ftrace_func(ftrace_trace_function
);
1824 if (command
& FTRACE_START_FUNC_RET
)
1825 ftrace_enable_ftrace_graph_caller();
1826 else if (command
& FTRACE_STOP_FUNC_RET
)
1827 ftrace_disable_ftrace_graph_caller();
1830 static int __ftrace_modify_code(void *data
)
1832 int *command
= data
;
1834 ftrace_modify_all_code(*command
);
1840 * ftrace_run_stop_machine, go back to the stop machine method
1841 * @command: The command to tell ftrace what to do
1843 * If an arch needs to fall back to the stop machine method, the
1844 * it can call this function.
1846 void ftrace_run_stop_machine(int command
)
1848 stop_machine(__ftrace_modify_code
, &command
, NULL
);
1852 * arch_ftrace_update_code, modify the code to trace or not trace
1853 * @command: The command that needs to be done
1855 * Archs can override this function if it does not need to
1856 * run stop_machine() to modify code.
1858 void __weak
arch_ftrace_update_code(int command
)
1860 ftrace_run_stop_machine(command
);
1863 static void ftrace_run_update_code(int command
)
1867 ret
= ftrace_arch_code_modify_prepare();
1868 FTRACE_WARN_ON(ret
);
1872 * Do not call function tracer while we update the code.
1873 * We are in stop machine.
1875 function_trace_stop
++;
1878 * By default we use stop_machine() to modify the code.
1879 * But archs can do what ever they want as long as it
1880 * is safe. The stop_machine() is the safest, but also
1881 * produces the most overhead.
1883 arch_ftrace_update_code(command
);
1885 #ifndef CONFIG_HAVE_FUNCTION_TRACE_MCOUNT_TEST
1887 * For archs that call ftrace_test_stop_func(), we must
1888 * wait till after we update all the function callers
1889 * before we update the callback. This keeps different
1890 * ops that record different functions from corrupting
1893 __ftrace_trace_function
= __ftrace_trace_function_delay
;
1895 function_trace_stop
--;
1897 ret
= ftrace_arch_code_modify_post_process();
1898 FTRACE_WARN_ON(ret
);
1901 static ftrace_func_t saved_ftrace_func
;
1902 static int ftrace_start_up
;
1903 static int global_start_up
;
1905 static void ftrace_startup_enable(int command
)
1907 if (saved_ftrace_func
!= ftrace_trace_function
) {
1908 saved_ftrace_func
= ftrace_trace_function
;
1909 command
|= FTRACE_UPDATE_TRACE_FUNC
;
1912 if (!command
|| !ftrace_enabled
)
1915 ftrace_run_update_code(command
);
1918 static int ftrace_startup(struct ftrace_ops
*ops
, int command
)
1920 bool hash_enable
= true;
1922 if (unlikely(ftrace_disabled
))
1926 command
|= FTRACE_UPDATE_CALLS
;
1928 /* ops marked global share the filter hashes */
1929 if (ops
->flags
& FTRACE_OPS_FL_GLOBAL
) {
1931 /* Don't update hash if global is already set */
1932 if (global_start_up
)
1933 hash_enable
= false;
1937 ops
->flags
|= FTRACE_OPS_FL_ENABLED
;
1939 ftrace_hash_rec_enable(ops
, 1);
1941 ftrace_startup_enable(command
);
1946 static void ftrace_shutdown(struct ftrace_ops
*ops
, int command
)
1948 bool hash_disable
= true;
1950 if (unlikely(ftrace_disabled
))
1955 * Just warn in case of unbalance, no need to kill ftrace, it's not
1956 * critical but the ftrace_call callers may be never nopped again after
1957 * further ftrace uses.
1959 WARN_ON_ONCE(ftrace_start_up
< 0);
1961 if (ops
->flags
& FTRACE_OPS_FL_GLOBAL
) {
1964 WARN_ON_ONCE(global_start_up
< 0);
1965 /* Don't update hash if global still has users */
1966 if (global_start_up
) {
1967 WARN_ON_ONCE(!ftrace_start_up
);
1968 hash_disable
= false;
1973 ftrace_hash_rec_disable(ops
, 1);
1975 if (ops
!= &global_ops
|| !global_start_up
)
1976 ops
->flags
&= ~FTRACE_OPS_FL_ENABLED
;
1978 command
|= FTRACE_UPDATE_CALLS
;
1980 if (saved_ftrace_func
!= ftrace_trace_function
) {
1981 saved_ftrace_func
= ftrace_trace_function
;
1982 command
|= FTRACE_UPDATE_TRACE_FUNC
;
1985 if (!command
|| !ftrace_enabled
)
1988 ftrace_run_update_code(command
);
1991 static void ftrace_startup_sysctl(void)
1993 if (unlikely(ftrace_disabled
))
1996 /* Force update next time */
1997 saved_ftrace_func
= NULL
;
1998 /* ftrace_start_up is true if we want ftrace running */
1999 if (ftrace_start_up
)
2000 ftrace_run_update_code(FTRACE_UPDATE_CALLS
);
2003 static void ftrace_shutdown_sysctl(void)
2005 if (unlikely(ftrace_disabled
))
2008 /* ftrace_start_up is true if ftrace is running */
2009 if (ftrace_start_up
)
2010 ftrace_run_update_code(FTRACE_DISABLE_CALLS
);
2013 static cycle_t ftrace_update_time
;
2014 static unsigned long ftrace_update_cnt
;
2015 unsigned long ftrace_update_tot_cnt
;
2017 static int ops_traces_mod(struct ftrace_ops
*ops
)
2019 struct ftrace_hash
*hash
;
2021 hash
= ops
->filter_hash
;
2022 return ftrace_hash_empty(hash
);
2025 static int ftrace_update_code(struct module
*mod
)
2027 struct ftrace_page
*pg
;
2028 struct dyn_ftrace
*p
;
2029 cycle_t start
, stop
;
2030 unsigned long ref
= 0;
2034 * When adding a module, we need to check if tracers are
2035 * currently enabled and if they are set to trace all functions.
2036 * If they are, we need to enable the module functions as well
2037 * as update the reference counts for those function records.
2040 struct ftrace_ops
*ops
;
2042 for (ops
= ftrace_ops_list
;
2043 ops
!= &ftrace_list_end
; ops
= ops
->next
) {
2044 if (ops
->flags
& FTRACE_OPS_FL_ENABLED
&&
2045 ops_traces_mod(ops
))
2050 start
= ftrace_now(raw_smp_processor_id());
2051 ftrace_update_cnt
= 0;
2053 for (pg
= ftrace_new_pgs
; pg
; pg
= pg
->next
) {
2055 for (i
= 0; i
< pg
->index
; i
++) {
2056 /* If something went wrong, bail without enabling anything */
2057 if (unlikely(ftrace_disabled
))
2060 p
= &pg
->records
[i
];
2064 * Do the initial record conversion from mcount jump
2065 * to the NOP instructions.
2067 if (!ftrace_code_disable(mod
, p
))
2070 ftrace_update_cnt
++;
2073 * If the tracing is enabled, go ahead and enable the record.
2075 * The reason not to enable the record immediatelly is the
2076 * inherent check of ftrace_make_nop/ftrace_make_call for
2077 * correct previous instructions. Making first the NOP
2078 * conversion puts the module to the correct state, thus
2079 * passing the ftrace_make_call check.
2081 if (ftrace_start_up
&& ref
) {
2082 int failed
= __ftrace_replace_code(p
, 1);
2084 ftrace_bug(failed
, p
->ip
);
2089 ftrace_new_pgs
= NULL
;
2091 stop
= ftrace_now(raw_smp_processor_id());
2092 ftrace_update_time
= stop
- start
;
2093 ftrace_update_tot_cnt
+= ftrace_update_cnt
;
2098 static int ftrace_allocate_records(struct ftrace_page
*pg
, int count
)
2103 if (WARN_ON(!count
))
2106 order
= get_count_order(DIV_ROUND_UP(count
, ENTRIES_PER_PAGE
));
2109 * We want to fill as much as possible. No more than a page
2112 while ((PAGE_SIZE
<< order
) / ENTRY_SIZE
>= count
+ ENTRIES_PER_PAGE
)
2116 pg
->records
= (void *)__get_free_pages(GFP_KERNEL
| __GFP_ZERO
, order
);
2119 /* if we can't allocate this size, try something smaller */
2126 cnt
= (PAGE_SIZE
<< order
) / ENTRY_SIZE
;
2135 static struct ftrace_page
*
2136 ftrace_allocate_pages(unsigned long num_to_init
)
2138 struct ftrace_page
*start_pg
;
2139 struct ftrace_page
*pg
;
2146 start_pg
= pg
= kzalloc(sizeof(*pg
), GFP_KERNEL
);
2151 * Try to allocate as much as possible in one continues
2152 * location that fills in all of the space. We want to
2153 * waste as little space as possible.
2156 cnt
= ftrace_allocate_records(pg
, num_to_init
);
2164 pg
->next
= kzalloc(sizeof(*pg
), GFP_KERNEL
);
2175 order
= get_count_order(pg
->size
/ ENTRIES_PER_PAGE
);
2176 free_pages((unsigned long)pg
->records
, order
);
2177 start_pg
= pg
->next
;
2181 pr_info("ftrace: FAILED to allocate memory for functions\n");
2185 static int __init
ftrace_dyn_table_alloc(unsigned long num_to_init
)
2190 pr_info("ftrace: No functions to be traced?\n");
2194 cnt
= num_to_init
/ ENTRIES_PER_PAGE
;
2195 pr_info("ftrace: allocating %ld entries in %d pages\n",
2196 num_to_init
, cnt
+ 1);
2201 #define FTRACE_BUFF_MAX (KSYM_SYMBOL_LEN+4) /* room for wildcards */
2203 struct ftrace_iterator
{
2206 struct ftrace_page
*pg
;
2207 struct dyn_ftrace
*func
;
2208 struct ftrace_func_probe
*probe
;
2209 struct trace_parser parser
;
2210 struct ftrace_hash
*hash
;
2211 struct ftrace_ops
*ops
;
2218 t_hash_next(struct seq_file
*m
, loff_t
*pos
)
2220 struct ftrace_iterator
*iter
= m
->private;
2221 struct hlist_node
*hnd
= NULL
;
2222 struct hlist_head
*hhd
;
2228 hnd
= &iter
->probe
->node
;
2230 if (iter
->hidx
>= FTRACE_FUNC_HASHSIZE
)
2233 hhd
= &ftrace_func_hash
[iter
->hidx
];
2235 if (hlist_empty(hhd
)) {
2251 if (WARN_ON_ONCE(!hnd
))
2254 iter
->probe
= hlist_entry(hnd
, struct ftrace_func_probe
, node
);
2259 static void *t_hash_start(struct seq_file
*m
, loff_t
*pos
)
2261 struct ftrace_iterator
*iter
= m
->private;
2265 if (!(iter
->flags
& FTRACE_ITER_DO_HASH
))
2268 if (iter
->func_pos
> *pos
)
2272 for (l
= 0; l
<= (*pos
- iter
->func_pos
); ) {
2273 p
= t_hash_next(m
, &l
);
2280 /* Only set this if we have an item */
2281 iter
->flags
|= FTRACE_ITER_HASH
;
2287 t_hash_show(struct seq_file
*m
, struct ftrace_iterator
*iter
)
2289 struct ftrace_func_probe
*rec
;
2292 if (WARN_ON_ONCE(!rec
))
2295 if (rec
->ops
->print
)
2296 return rec
->ops
->print(m
, rec
->ip
, rec
->ops
, rec
->data
);
2298 seq_printf(m
, "%ps:%ps", (void *)rec
->ip
, (void *)rec
->ops
->func
);
2301 seq_printf(m
, ":%p", rec
->data
);
2308 t_next(struct seq_file
*m
, void *v
, loff_t
*pos
)
2310 struct ftrace_iterator
*iter
= m
->private;
2311 struct ftrace_ops
*ops
= iter
->ops
;
2312 struct dyn_ftrace
*rec
= NULL
;
2314 if (unlikely(ftrace_disabled
))
2317 if (iter
->flags
& FTRACE_ITER_HASH
)
2318 return t_hash_next(m
, pos
);
2321 iter
->pos
= iter
->func_pos
= *pos
;
2323 if (iter
->flags
& FTRACE_ITER_PRINTALL
)
2324 return t_hash_start(m
, pos
);
2327 if (iter
->idx
>= iter
->pg
->index
) {
2328 if (iter
->pg
->next
) {
2329 iter
->pg
= iter
->pg
->next
;
2334 rec
= &iter
->pg
->records
[iter
->idx
++];
2335 if (((iter
->flags
& FTRACE_ITER_FILTER
) &&
2336 !(ftrace_lookup_ip(ops
->filter_hash
, rec
->ip
))) ||
2338 ((iter
->flags
& FTRACE_ITER_NOTRACE
) &&
2339 !ftrace_lookup_ip(ops
->notrace_hash
, rec
->ip
)) ||
2341 ((iter
->flags
& FTRACE_ITER_ENABLED
) &&
2342 !(rec
->flags
& ~FTRACE_FL_MASK
))) {
2350 return t_hash_start(m
, pos
);
2357 static void reset_iter_read(struct ftrace_iterator
*iter
)
2361 iter
->flags
&= ~(FTRACE_ITER_PRINTALL
& FTRACE_ITER_HASH
);
2364 static void *t_start(struct seq_file
*m
, loff_t
*pos
)
2366 struct ftrace_iterator
*iter
= m
->private;
2367 struct ftrace_ops
*ops
= iter
->ops
;
2371 mutex_lock(&ftrace_lock
);
2373 if (unlikely(ftrace_disabled
))
2377 * If an lseek was done, then reset and start from beginning.
2379 if (*pos
< iter
->pos
)
2380 reset_iter_read(iter
);
2383 * For set_ftrace_filter reading, if we have the filter
2384 * off, we can short cut and just print out that all
2385 * functions are enabled.
2387 if (iter
->flags
& FTRACE_ITER_FILTER
&&
2388 ftrace_hash_empty(ops
->filter_hash
)) {
2390 return t_hash_start(m
, pos
);
2391 iter
->flags
|= FTRACE_ITER_PRINTALL
;
2392 /* reset in case of seek/pread */
2393 iter
->flags
&= ~FTRACE_ITER_HASH
;
2397 if (iter
->flags
& FTRACE_ITER_HASH
)
2398 return t_hash_start(m
, pos
);
2401 * Unfortunately, we need to restart at ftrace_pages_start
2402 * every time we let go of the ftrace_mutex. This is because
2403 * those pointers can change without the lock.
2405 iter
->pg
= ftrace_pages_start
;
2407 for (l
= 0; l
<= *pos
; ) {
2408 p
= t_next(m
, p
, &l
);
2414 return t_hash_start(m
, pos
);
2419 static void t_stop(struct seq_file
*m
, void *p
)
2421 mutex_unlock(&ftrace_lock
);
2424 static int t_show(struct seq_file
*m
, void *v
)
2426 struct ftrace_iterator
*iter
= m
->private;
2427 struct dyn_ftrace
*rec
;
2429 if (iter
->flags
& FTRACE_ITER_HASH
)
2430 return t_hash_show(m
, iter
);
2432 if (iter
->flags
& FTRACE_ITER_PRINTALL
) {
2433 seq_printf(m
, "#### all functions enabled ####\n");
2442 seq_printf(m
, "%ps", (void *)rec
->ip
);
2443 if (iter
->flags
& FTRACE_ITER_ENABLED
)
2444 seq_printf(m
, " (%ld)",
2445 rec
->flags
& ~FTRACE_FL_MASK
);
2446 seq_printf(m
, "\n");
2451 static const struct seq_operations show_ftrace_seq_ops
= {
2459 ftrace_avail_open(struct inode
*inode
, struct file
*file
)
2461 struct ftrace_iterator
*iter
;
2463 if (unlikely(ftrace_disabled
))
2466 iter
= __seq_open_private(file
, &show_ftrace_seq_ops
, sizeof(*iter
));
2468 iter
->pg
= ftrace_pages_start
;
2469 iter
->ops
= &global_ops
;
2472 return iter
? 0 : -ENOMEM
;
2476 ftrace_enabled_open(struct inode
*inode
, struct file
*file
)
2478 struct ftrace_iterator
*iter
;
2480 if (unlikely(ftrace_disabled
))
2483 iter
= __seq_open_private(file
, &show_ftrace_seq_ops
, sizeof(*iter
));
2485 iter
->pg
= ftrace_pages_start
;
2486 iter
->flags
= FTRACE_ITER_ENABLED
;
2487 iter
->ops
= &global_ops
;
2490 return iter
? 0 : -ENOMEM
;
2493 static void ftrace_filter_reset(struct ftrace_hash
*hash
)
2495 mutex_lock(&ftrace_lock
);
2496 ftrace_hash_clear(hash
);
2497 mutex_unlock(&ftrace_lock
);
2501 * ftrace_regex_open - initialize function tracer filter files
2502 * @ops: The ftrace_ops that hold the hash filters
2503 * @flag: The type of filter to process
2504 * @inode: The inode, usually passed in to your open routine
2505 * @file: The file, usually passed in to your open routine
2507 * ftrace_regex_open() initializes the filter files for the
2508 * @ops. Depending on @flag it may process the filter hash or
2509 * the notrace hash of @ops. With this called from the open
2510 * routine, you can use ftrace_filter_write() for the write
2511 * routine if @flag has FTRACE_ITER_FILTER set, or
2512 * ftrace_notrace_write() if @flag has FTRACE_ITER_NOTRACE set.
2513 * ftrace_regex_lseek() should be used as the lseek routine, and
2514 * release must call ftrace_regex_release().
2517 ftrace_regex_open(struct ftrace_ops
*ops
, int flag
,
2518 struct inode
*inode
, struct file
*file
)
2520 struct ftrace_iterator
*iter
;
2521 struct ftrace_hash
*hash
;
2524 if (unlikely(ftrace_disabled
))
2527 iter
= kzalloc(sizeof(*iter
), GFP_KERNEL
);
2531 if (trace_parser_get_init(&iter
->parser
, FTRACE_BUFF_MAX
)) {
2536 if (flag
& FTRACE_ITER_NOTRACE
)
2537 hash
= ops
->notrace_hash
;
2539 hash
= ops
->filter_hash
;
2544 if (file
->f_mode
& FMODE_WRITE
) {
2545 mutex_lock(&ftrace_lock
);
2546 iter
->hash
= alloc_and_copy_ftrace_hash(FTRACE_HASH_DEFAULT_BITS
, hash
);
2547 mutex_unlock(&ftrace_lock
);
2550 trace_parser_put(&iter
->parser
);
2556 mutex_lock(&ftrace_regex_lock
);
2558 if ((file
->f_mode
& FMODE_WRITE
) &&
2559 (file
->f_flags
& O_TRUNC
))
2560 ftrace_filter_reset(iter
->hash
);
2562 if (file
->f_mode
& FMODE_READ
) {
2563 iter
->pg
= ftrace_pages_start
;
2565 ret
= seq_open(file
, &show_ftrace_seq_ops
);
2567 struct seq_file
*m
= file
->private_data
;
2571 free_ftrace_hash(iter
->hash
);
2572 trace_parser_put(&iter
->parser
);
2576 file
->private_data
= iter
;
2577 mutex_unlock(&ftrace_regex_lock
);
2583 ftrace_filter_open(struct inode
*inode
, struct file
*file
)
2585 return ftrace_regex_open(&global_ops
,
2586 FTRACE_ITER_FILTER
| FTRACE_ITER_DO_HASH
,
2591 ftrace_notrace_open(struct inode
*inode
, struct file
*file
)
2593 return ftrace_regex_open(&global_ops
, FTRACE_ITER_NOTRACE
,
2598 ftrace_regex_lseek(struct file
*file
, loff_t offset
, int origin
)
2602 if (file
->f_mode
& FMODE_READ
)
2603 ret
= seq_lseek(file
, offset
, origin
);
2605 file
->f_pos
= ret
= 1;
2610 static int ftrace_match(char *str
, char *regex
, int len
, int type
)
2617 if (strcmp(str
, regex
) == 0)
2620 case MATCH_FRONT_ONLY
:
2621 if (strncmp(str
, regex
, len
) == 0)
2624 case MATCH_MIDDLE_ONLY
:
2625 if (strstr(str
, regex
))
2628 case MATCH_END_ONLY
:
2630 if (slen
>= len
&& memcmp(str
+ slen
- len
, regex
, len
) == 0)
2639 enter_record(struct ftrace_hash
*hash
, struct dyn_ftrace
*rec
, int not)
2641 struct ftrace_func_entry
*entry
;
2644 entry
= ftrace_lookup_ip(hash
, rec
->ip
);
2646 /* Do nothing if it doesn't exist */
2650 free_hash_entry(hash
, entry
);
2652 /* Do nothing if it exists */
2656 ret
= add_hash_entry(hash
, rec
->ip
);
2662 ftrace_match_record(struct dyn_ftrace
*rec
, char *mod
,
2663 char *regex
, int len
, int type
)
2665 char str
[KSYM_SYMBOL_LEN
];
2668 kallsyms_lookup(rec
->ip
, NULL
, NULL
, &modname
, str
);
2671 /* module lookup requires matching the module */
2672 if (!modname
|| strcmp(modname
, mod
))
2675 /* blank search means to match all funcs in the mod */
2680 return ftrace_match(str
, regex
, len
, type
);
2684 match_records(struct ftrace_hash
*hash
, char *buff
,
2685 int len
, char *mod
, int not)
2687 unsigned search_len
= 0;
2688 struct ftrace_page
*pg
;
2689 struct dyn_ftrace
*rec
;
2690 int type
= MATCH_FULL
;
2691 char *search
= buff
;
2696 type
= filter_parse_regex(buff
, len
, &search
, ¬);
2697 search_len
= strlen(search
);
2700 mutex_lock(&ftrace_lock
);
2702 if (unlikely(ftrace_disabled
))
2705 do_for_each_ftrace_rec(pg
, rec
) {
2706 if (ftrace_match_record(rec
, mod
, search
, search_len
, type
)) {
2707 ret
= enter_record(hash
, rec
, not);
2714 } while_for_each_ftrace_rec();
2716 mutex_unlock(&ftrace_lock
);
2722 ftrace_match_records(struct ftrace_hash
*hash
, char *buff
, int len
)
2724 return match_records(hash
, buff
, len
, NULL
, 0);
2728 ftrace_match_module_records(struct ftrace_hash
*hash
, char *buff
, char *mod
)
2732 /* blank or '*' mean the same */
2733 if (strcmp(buff
, "*") == 0)
2736 /* handle the case of 'dont filter this module' */
2737 if (strcmp(buff
, "!") == 0 || strcmp(buff
, "!*") == 0) {
2742 return match_records(hash
, buff
, strlen(buff
), mod
, not);
2746 * We register the module command as a template to show others how
2747 * to register the a command as well.
2751 ftrace_mod_callback(struct ftrace_hash
*hash
,
2752 char *func
, char *cmd
, char *param
, int enable
)
2758 * cmd == 'mod' because we only registered this func
2759 * for the 'mod' ftrace_func_command.
2760 * But if you register one func with multiple commands,
2761 * you can tell which command was used by the cmd
2765 /* we must have a module name */
2769 mod
= strsep(¶m
, ":");
2773 ret
= ftrace_match_module_records(hash
, func
, mod
);
2782 static struct ftrace_func_command ftrace_mod_cmd
= {
2784 .func
= ftrace_mod_callback
,
2787 static int __init
ftrace_mod_cmd_init(void)
2789 return register_ftrace_command(&ftrace_mod_cmd
);
2791 device_initcall(ftrace_mod_cmd_init
);
2794 function_trace_probe_call(unsigned long ip
, unsigned long parent_ip
)
2796 struct ftrace_func_probe
*entry
;
2797 struct hlist_head
*hhd
;
2798 struct hlist_node
*n
;
2801 key
= hash_long(ip
, FTRACE_HASH_BITS
);
2803 hhd
= &ftrace_func_hash
[key
];
2805 if (hlist_empty(hhd
))
2809 * Disable preemption for these calls to prevent a RCU grace
2810 * period. This syncs the hash iteration and freeing of items
2811 * on the hash. rcu_read_lock is too dangerous here.
2813 preempt_disable_notrace();
2814 hlist_for_each_entry_rcu(entry
, n
, hhd
, node
) {
2815 if (entry
->ip
== ip
)
2816 entry
->ops
->func(ip
, parent_ip
, &entry
->data
);
2818 preempt_enable_notrace();
2821 static struct ftrace_ops trace_probe_ops __read_mostly
=
2823 .func
= function_trace_probe_call
,
2826 static int ftrace_probe_registered
;
2828 static void __enable_ftrace_function_probe(void)
2833 if (ftrace_probe_registered
)
2836 for (i
= 0; i
< FTRACE_FUNC_HASHSIZE
; i
++) {
2837 struct hlist_head
*hhd
= &ftrace_func_hash
[i
];
2841 /* Nothing registered? */
2842 if (i
== FTRACE_FUNC_HASHSIZE
)
2845 ret
= __register_ftrace_function(&trace_probe_ops
);
2847 ret
= ftrace_startup(&trace_probe_ops
, 0);
2849 ftrace_probe_registered
= 1;
2852 static void __disable_ftrace_function_probe(void)
2857 if (!ftrace_probe_registered
)
2860 for (i
= 0; i
< FTRACE_FUNC_HASHSIZE
; i
++) {
2861 struct hlist_head
*hhd
= &ftrace_func_hash
[i
];
2866 /* no more funcs left */
2867 ret
= __unregister_ftrace_function(&trace_probe_ops
);
2869 ftrace_shutdown(&trace_probe_ops
, 0);
2871 ftrace_probe_registered
= 0;
2875 static void ftrace_free_entry_rcu(struct rcu_head
*rhp
)
2877 struct ftrace_func_probe
*entry
=
2878 container_of(rhp
, struct ftrace_func_probe
, rcu
);
2880 if (entry
->ops
->free
)
2881 entry
->ops
->free(&entry
->data
);
2887 register_ftrace_function_probe(char *glob
, struct ftrace_probe_ops
*ops
,
2890 struct ftrace_func_probe
*entry
;
2891 struct ftrace_page
*pg
;
2892 struct dyn_ftrace
*rec
;
2898 type
= filter_parse_regex(glob
, strlen(glob
), &search
, ¬);
2899 len
= strlen(search
);
2901 /* we do not support '!' for function probes */
2905 mutex_lock(&ftrace_lock
);
2907 if (unlikely(ftrace_disabled
))
2910 do_for_each_ftrace_rec(pg
, rec
) {
2912 if (!ftrace_match_record(rec
, NULL
, search
, len
, type
))
2915 entry
= kmalloc(sizeof(*entry
), GFP_KERNEL
);
2917 /* If we did not process any, then return error */
2928 * The caller might want to do something special
2929 * for each function we find. We call the callback
2930 * to give the caller an opportunity to do so.
2932 if (ops
->callback
) {
2933 if (ops
->callback(rec
->ip
, &entry
->data
) < 0) {
2934 /* caller does not like this func */
2941 entry
->ip
= rec
->ip
;
2943 key
= hash_long(entry
->ip
, FTRACE_HASH_BITS
);
2944 hlist_add_head_rcu(&entry
->node
, &ftrace_func_hash
[key
]);
2946 } while_for_each_ftrace_rec();
2947 __enable_ftrace_function_probe();
2950 mutex_unlock(&ftrace_lock
);
2956 PROBE_TEST_FUNC
= 1,
2961 __unregister_ftrace_function_probe(char *glob
, struct ftrace_probe_ops
*ops
,
2962 void *data
, int flags
)
2964 struct ftrace_func_probe
*entry
;
2965 struct hlist_node
*n
, *tmp
;
2966 char str
[KSYM_SYMBOL_LEN
];
2967 int type
= MATCH_FULL
;
2971 if (glob
&& (strcmp(glob
, "*") == 0 || !strlen(glob
)))
2976 type
= filter_parse_regex(glob
, strlen(glob
), &search
, ¬);
2977 len
= strlen(search
);
2979 /* we do not support '!' for function probes */
2984 mutex_lock(&ftrace_lock
);
2985 for (i
= 0; i
< FTRACE_FUNC_HASHSIZE
; i
++) {
2986 struct hlist_head
*hhd
= &ftrace_func_hash
[i
];
2988 hlist_for_each_entry_safe(entry
, n
, tmp
, hhd
, node
) {
2990 /* break up if statements for readability */
2991 if ((flags
& PROBE_TEST_FUNC
) && entry
->ops
!= ops
)
2994 if ((flags
& PROBE_TEST_DATA
) && entry
->data
!= data
)
2997 /* do this last, since it is the most expensive */
2999 kallsyms_lookup(entry
->ip
, NULL
, NULL
,
3001 if (!ftrace_match(str
, glob
, len
, type
))
3005 hlist_del(&entry
->node
);
3006 call_rcu(&entry
->rcu
, ftrace_free_entry_rcu
);
3009 __disable_ftrace_function_probe();
3010 mutex_unlock(&ftrace_lock
);
3014 unregister_ftrace_function_probe(char *glob
, struct ftrace_probe_ops
*ops
,
3017 __unregister_ftrace_function_probe(glob
, ops
, data
,
3018 PROBE_TEST_FUNC
| PROBE_TEST_DATA
);
3022 unregister_ftrace_function_probe_func(char *glob
, struct ftrace_probe_ops
*ops
)
3024 __unregister_ftrace_function_probe(glob
, ops
, NULL
, PROBE_TEST_FUNC
);
3027 void unregister_ftrace_function_probe_all(char *glob
)
3029 __unregister_ftrace_function_probe(glob
, NULL
, NULL
, 0);
3032 static LIST_HEAD(ftrace_commands
);
3033 static DEFINE_MUTEX(ftrace_cmd_mutex
);
3035 int register_ftrace_command(struct ftrace_func_command
*cmd
)
3037 struct ftrace_func_command
*p
;
3040 mutex_lock(&ftrace_cmd_mutex
);
3041 list_for_each_entry(p
, &ftrace_commands
, list
) {
3042 if (strcmp(cmd
->name
, p
->name
) == 0) {
3047 list_add(&cmd
->list
, &ftrace_commands
);
3049 mutex_unlock(&ftrace_cmd_mutex
);
3054 int unregister_ftrace_command(struct ftrace_func_command
*cmd
)
3056 struct ftrace_func_command
*p
, *n
;
3059 mutex_lock(&ftrace_cmd_mutex
);
3060 list_for_each_entry_safe(p
, n
, &ftrace_commands
, list
) {
3061 if (strcmp(cmd
->name
, p
->name
) == 0) {
3063 list_del_init(&p
->list
);
3068 mutex_unlock(&ftrace_cmd_mutex
);
3073 static int ftrace_process_regex(struct ftrace_hash
*hash
,
3074 char *buff
, int len
, int enable
)
3076 char *func
, *command
, *next
= buff
;
3077 struct ftrace_func_command
*p
;
3080 func
= strsep(&next
, ":");
3083 ret
= ftrace_match_records(hash
, func
, len
);
3093 command
= strsep(&next
, ":");
3095 mutex_lock(&ftrace_cmd_mutex
);
3096 list_for_each_entry(p
, &ftrace_commands
, list
) {
3097 if (strcmp(p
->name
, command
) == 0) {
3098 ret
= p
->func(hash
, func
, command
, next
, enable
);
3103 mutex_unlock(&ftrace_cmd_mutex
);
3109 ftrace_regex_write(struct file
*file
, const char __user
*ubuf
,
3110 size_t cnt
, loff_t
*ppos
, int enable
)
3112 struct ftrace_iterator
*iter
;
3113 struct trace_parser
*parser
;
3119 mutex_lock(&ftrace_regex_lock
);
3122 if (unlikely(ftrace_disabled
))
3125 if (file
->f_mode
& FMODE_READ
) {
3126 struct seq_file
*m
= file
->private_data
;
3129 iter
= file
->private_data
;
3131 parser
= &iter
->parser
;
3132 read
= trace_get_user(parser
, ubuf
, cnt
, ppos
);
3134 if (read
>= 0 && trace_parser_loaded(parser
) &&
3135 !trace_parser_cont(parser
)) {
3136 ret
= ftrace_process_regex(iter
->hash
, parser
->buffer
,
3137 parser
->idx
, enable
);
3138 trace_parser_clear(parser
);
3145 mutex_unlock(&ftrace_regex_lock
);
3151 ftrace_filter_write(struct file
*file
, const char __user
*ubuf
,
3152 size_t cnt
, loff_t
*ppos
)
3154 return ftrace_regex_write(file
, ubuf
, cnt
, ppos
, 1);
3158 ftrace_notrace_write(struct file
*file
, const char __user
*ubuf
,
3159 size_t cnt
, loff_t
*ppos
)
3161 return ftrace_regex_write(file
, ubuf
, cnt
, ppos
, 0);
3165 ftrace_set_regex(struct ftrace_ops
*ops
, unsigned char *buf
, int len
,
3166 int reset
, int enable
)
3168 struct ftrace_hash
**orig_hash
;
3169 struct ftrace_hash
*hash
;
3172 /* All global ops uses the global ops filters */
3173 if (ops
->flags
& FTRACE_OPS_FL_GLOBAL
)
3176 if (unlikely(ftrace_disabled
))
3180 orig_hash
= &ops
->filter_hash
;
3182 orig_hash
= &ops
->notrace_hash
;
3184 hash
= alloc_and_copy_ftrace_hash(FTRACE_HASH_DEFAULT_BITS
, *orig_hash
);
3188 mutex_lock(&ftrace_regex_lock
);
3190 ftrace_filter_reset(hash
);
3191 if (buf
&& !ftrace_match_records(hash
, buf
, len
)) {
3193 goto out_regex_unlock
;
3196 mutex_lock(&ftrace_lock
);
3197 ret
= ftrace_hash_move(ops
, enable
, orig_hash
, hash
);
3198 if (!ret
&& ops
->flags
& FTRACE_OPS_FL_ENABLED
3200 ftrace_run_update_code(FTRACE_UPDATE_CALLS
);
3202 mutex_unlock(&ftrace_lock
);
3205 mutex_unlock(&ftrace_regex_lock
);
3207 free_ftrace_hash(hash
);
3212 * ftrace_set_filter - set a function to filter on in ftrace
3213 * @ops - the ops to set the filter with
3214 * @buf - the string that holds the function filter text.
3215 * @len - the length of the string.
3216 * @reset - non zero to reset all filters before applying this filter.
3218 * Filters denote which functions should be enabled when tracing is enabled.
3219 * If @buf is NULL and reset is set, all functions will be enabled for tracing.
3221 int ftrace_set_filter(struct ftrace_ops
*ops
, unsigned char *buf
,
3224 return ftrace_set_regex(ops
, buf
, len
, reset
, 1);
3226 EXPORT_SYMBOL_GPL(ftrace_set_filter
);
3229 * ftrace_set_notrace - set a function to not trace in ftrace
3230 * @ops - the ops to set the notrace filter with
3231 * @buf - the string that holds the function notrace text.
3232 * @len - the length of the string.
3233 * @reset - non zero to reset all filters before applying this filter.
3235 * Notrace Filters denote which functions should not be enabled when tracing
3236 * is enabled. If @buf is NULL and reset is set, all functions will be enabled
3239 int ftrace_set_notrace(struct ftrace_ops
*ops
, unsigned char *buf
,
3242 return ftrace_set_regex(ops
, buf
, len
, reset
, 0);
3244 EXPORT_SYMBOL_GPL(ftrace_set_notrace
);
3246 * ftrace_set_filter - set a function to filter on in ftrace
3247 * @ops - the ops to set the filter with
3248 * @buf - the string that holds the function filter text.
3249 * @len - the length of the string.
3250 * @reset - non zero to reset all filters before applying this filter.
3252 * Filters denote which functions should be enabled when tracing is enabled.
3253 * If @buf is NULL and reset is set, all functions will be enabled for tracing.
3255 void ftrace_set_global_filter(unsigned char *buf
, int len
, int reset
)
3257 ftrace_set_regex(&global_ops
, buf
, len
, reset
, 1);
3259 EXPORT_SYMBOL_GPL(ftrace_set_global_filter
);
3262 * ftrace_set_notrace - set a function to not trace in ftrace
3263 * @ops - the ops to set the notrace filter with
3264 * @buf - the string that holds the function notrace text.
3265 * @len - the length of the string.
3266 * @reset - non zero to reset all filters before applying this filter.
3268 * Notrace Filters denote which functions should not be enabled when tracing
3269 * is enabled. If @buf is NULL and reset is set, all functions will be enabled
3272 void ftrace_set_global_notrace(unsigned char *buf
, int len
, int reset
)
3274 ftrace_set_regex(&global_ops
, buf
, len
, reset
, 0);
3276 EXPORT_SYMBOL_GPL(ftrace_set_global_notrace
);
3279 * command line interface to allow users to set filters on boot up.
3281 #define FTRACE_FILTER_SIZE COMMAND_LINE_SIZE
3282 static char ftrace_notrace_buf
[FTRACE_FILTER_SIZE
] __initdata
;
3283 static char ftrace_filter_buf
[FTRACE_FILTER_SIZE
] __initdata
;
3285 static int __init
set_ftrace_notrace(char *str
)
3287 strncpy(ftrace_notrace_buf
, str
, FTRACE_FILTER_SIZE
);
3290 __setup("ftrace_notrace=", set_ftrace_notrace
);
3292 static int __init
set_ftrace_filter(char *str
)
3294 strncpy(ftrace_filter_buf
, str
, FTRACE_FILTER_SIZE
);
3297 __setup("ftrace_filter=", set_ftrace_filter
);
3299 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
3300 static char ftrace_graph_buf
[FTRACE_FILTER_SIZE
] __initdata
;
3301 static int ftrace_set_func(unsigned long *array
, int *idx
, char *buffer
);
3303 static int __init
set_graph_function(char *str
)
3305 strlcpy(ftrace_graph_buf
, str
, FTRACE_FILTER_SIZE
);
3308 __setup("ftrace_graph_filter=", set_graph_function
);
3310 static void __init
set_ftrace_early_graph(char *buf
)
3316 func
= strsep(&buf
, ",");
3317 /* we allow only one expression at a time */
3318 ret
= ftrace_set_func(ftrace_graph_funcs
, &ftrace_graph_count
,
3321 printk(KERN_DEBUG
"ftrace: function %s not "
3322 "traceable\n", func
);
3325 #endif /* CONFIG_FUNCTION_GRAPH_TRACER */
3328 ftrace_set_early_filter(struct ftrace_ops
*ops
, char *buf
, int enable
)
3333 func
= strsep(&buf
, ",");
3334 ftrace_set_regex(ops
, func
, strlen(func
), 0, enable
);
3338 static void __init
set_ftrace_early_filters(void)
3340 if (ftrace_filter_buf
[0])
3341 ftrace_set_early_filter(&global_ops
, ftrace_filter_buf
, 1);
3342 if (ftrace_notrace_buf
[0])
3343 ftrace_set_early_filter(&global_ops
, ftrace_notrace_buf
, 0);
3344 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
3345 if (ftrace_graph_buf
[0])
3346 set_ftrace_early_graph(ftrace_graph_buf
);
3347 #endif /* CONFIG_FUNCTION_GRAPH_TRACER */
3350 int ftrace_regex_release(struct inode
*inode
, struct file
*file
)
3352 struct seq_file
*m
= (struct seq_file
*)file
->private_data
;
3353 struct ftrace_iterator
*iter
;
3354 struct ftrace_hash
**orig_hash
;
3355 struct trace_parser
*parser
;
3359 mutex_lock(&ftrace_regex_lock
);
3360 if (file
->f_mode
& FMODE_READ
) {
3363 seq_release(inode
, file
);
3365 iter
= file
->private_data
;
3367 parser
= &iter
->parser
;
3368 if (trace_parser_loaded(parser
)) {
3369 parser
->buffer
[parser
->idx
] = 0;
3370 ftrace_match_records(iter
->hash
, parser
->buffer
, parser
->idx
);
3373 trace_parser_put(parser
);
3375 if (file
->f_mode
& FMODE_WRITE
) {
3376 filter_hash
= !!(iter
->flags
& FTRACE_ITER_FILTER
);
3379 orig_hash
= &iter
->ops
->filter_hash
;
3381 orig_hash
= &iter
->ops
->notrace_hash
;
3383 mutex_lock(&ftrace_lock
);
3384 ret
= ftrace_hash_move(iter
->ops
, filter_hash
,
3385 orig_hash
, iter
->hash
);
3386 if (!ret
&& (iter
->ops
->flags
& FTRACE_OPS_FL_ENABLED
)
3388 ftrace_run_update_code(FTRACE_UPDATE_CALLS
);
3390 mutex_unlock(&ftrace_lock
);
3392 free_ftrace_hash(iter
->hash
);
3395 mutex_unlock(&ftrace_regex_lock
);
3399 static const struct file_operations ftrace_avail_fops
= {
3400 .open
= ftrace_avail_open
,
3402 .llseek
= seq_lseek
,
3403 .release
= seq_release_private
,
3406 static const struct file_operations ftrace_enabled_fops
= {
3407 .open
= ftrace_enabled_open
,
3409 .llseek
= seq_lseek
,
3410 .release
= seq_release_private
,
3413 static const struct file_operations ftrace_filter_fops
= {
3414 .open
= ftrace_filter_open
,
3416 .write
= ftrace_filter_write
,
3417 .llseek
= ftrace_regex_lseek
,
3418 .release
= ftrace_regex_release
,
3421 static const struct file_operations ftrace_notrace_fops
= {
3422 .open
= ftrace_notrace_open
,
3424 .write
= ftrace_notrace_write
,
3425 .llseek
= ftrace_regex_lseek
,
3426 .release
= ftrace_regex_release
,
3429 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
3431 static DEFINE_MUTEX(graph_lock
);
3433 int ftrace_graph_count
;
3434 int ftrace_graph_filter_enabled
;
3435 unsigned long ftrace_graph_funcs
[FTRACE_GRAPH_MAX_FUNCS
] __read_mostly
;
3438 __g_next(struct seq_file
*m
, loff_t
*pos
)
3440 if (*pos
>= ftrace_graph_count
)
3442 return &ftrace_graph_funcs
[*pos
];
3446 g_next(struct seq_file
*m
, void *v
, loff_t
*pos
)
3449 return __g_next(m
, pos
);
3452 static void *g_start(struct seq_file
*m
, loff_t
*pos
)
3454 mutex_lock(&graph_lock
);
3456 /* Nothing, tell g_show to print all functions are enabled */
3457 if (!ftrace_graph_filter_enabled
&& !*pos
)
3460 return __g_next(m
, pos
);
3463 static void g_stop(struct seq_file
*m
, void *p
)
3465 mutex_unlock(&graph_lock
);
3468 static int g_show(struct seq_file
*m
, void *v
)
3470 unsigned long *ptr
= v
;
3475 if (ptr
== (unsigned long *)1) {
3476 seq_printf(m
, "#### all functions enabled ####\n");
3480 seq_printf(m
, "%ps\n", (void *)*ptr
);
3485 static const struct seq_operations ftrace_graph_seq_ops
= {
3493 ftrace_graph_open(struct inode
*inode
, struct file
*file
)
3497 if (unlikely(ftrace_disabled
))
3500 mutex_lock(&graph_lock
);
3501 if ((file
->f_mode
& FMODE_WRITE
) &&
3502 (file
->f_flags
& O_TRUNC
)) {
3503 ftrace_graph_filter_enabled
= 0;
3504 ftrace_graph_count
= 0;
3505 memset(ftrace_graph_funcs
, 0, sizeof(ftrace_graph_funcs
));
3507 mutex_unlock(&graph_lock
);
3509 if (file
->f_mode
& FMODE_READ
)
3510 ret
= seq_open(file
, &ftrace_graph_seq_ops
);
3516 ftrace_graph_release(struct inode
*inode
, struct file
*file
)
3518 if (file
->f_mode
& FMODE_READ
)
3519 seq_release(inode
, file
);
3524 ftrace_set_func(unsigned long *array
, int *idx
, char *buffer
)
3526 struct dyn_ftrace
*rec
;
3527 struct ftrace_page
*pg
;
3536 type
= filter_parse_regex(buffer
, strlen(buffer
), &search
, ¬);
3537 if (!not && *idx
>= FTRACE_GRAPH_MAX_FUNCS
)
3540 search_len
= strlen(search
);
3542 mutex_lock(&ftrace_lock
);
3544 if (unlikely(ftrace_disabled
)) {
3545 mutex_unlock(&ftrace_lock
);
3549 do_for_each_ftrace_rec(pg
, rec
) {
3551 if (ftrace_match_record(rec
, NULL
, search
, search_len
, type
)) {
3552 /* if it is in the array */
3554 for (i
= 0; i
< *idx
; i
++) {
3555 if (array
[i
] == rec
->ip
) {
3564 array
[(*idx
)++] = rec
->ip
;
3565 if (*idx
>= FTRACE_GRAPH_MAX_FUNCS
)
3570 array
[i
] = array
[--(*idx
)];
3576 } while_for_each_ftrace_rec();
3578 mutex_unlock(&ftrace_lock
);
3583 ftrace_graph_filter_enabled
= 1;
3588 ftrace_graph_write(struct file
*file
, const char __user
*ubuf
,
3589 size_t cnt
, loff_t
*ppos
)
3591 struct trace_parser parser
;
3597 mutex_lock(&graph_lock
);
3599 if (trace_parser_get_init(&parser
, FTRACE_BUFF_MAX
)) {
3604 read
= trace_get_user(&parser
, ubuf
, cnt
, ppos
);
3606 if (read
>= 0 && trace_parser_loaded((&parser
))) {
3607 parser
.buffer
[parser
.idx
] = 0;
3609 /* we allow only one expression at a time */
3610 ret
= ftrace_set_func(ftrace_graph_funcs
, &ftrace_graph_count
,
3619 trace_parser_put(&parser
);
3621 mutex_unlock(&graph_lock
);
3626 static const struct file_operations ftrace_graph_fops
= {
3627 .open
= ftrace_graph_open
,
3629 .write
= ftrace_graph_write
,
3630 .release
= ftrace_graph_release
,
3631 .llseek
= seq_lseek
,
3633 #endif /* CONFIG_FUNCTION_GRAPH_TRACER */
3635 static __init
int ftrace_init_dyn_debugfs(struct dentry
*d_tracer
)
3638 trace_create_file("available_filter_functions", 0444,
3639 d_tracer
, NULL
, &ftrace_avail_fops
);
3641 trace_create_file("enabled_functions", 0444,
3642 d_tracer
, NULL
, &ftrace_enabled_fops
);
3644 trace_create_file("set_ftrace_filter", 0644, d_tracer
,
3645 NULL
, &ftrace_filter_fops
);
3647 trace_create_file("set_ftrace_notrace", 0644, d_tracer
,
3648 NULL
, &ftrace_notrace_fops
);
3650 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
3651 trace_create_file("set_graph_function", 0444, d_tracer
,
3653 &ftrace_graph_fops
);
3654 #endif /* CONFIG_FUNCTION_GRAPH_TRACER */
3659 static int ftrace_cmp_ips(const void *a
, const void *b
)
3661 const unsigned long *ipa
= a
;
3662 const unsigned long *ipb
= b
;
3671 static void ftrace_swap_ips(void *a
, void *b
, int size
)
3673 unsigned long *ipa
= a
;
3674 unsigned long *ipb
= b
;
3682 static int ftrace_process_locs(struct module
*mod
,
3683 unsigned long *start
,
3686 struct ftrace_page
*start_pg
;
3687 struct ftrace_page
*pg
;
3688 struct dyn_ftrace
*rec
;
3689 unsigned long count
;
3692 unsigned long flags
= 0; /* Shut up gcc */
3695 count
= end
- start
;
3700 sort(start
, count
, sizeof(*start
),
3701 ftrace_cmp_ips
, ftrace_swap_ips
);
3703 start_pg
= ftrace_allocate_pages(count
);
3707 mutex_lock(&ftrace_lock
);
3710 * Core and each module needs their own pages, as
3711 * modules will free them when they are removed.
3712 * Force a new page to be allocated for modules.
3715 WARN_ON(ftrace_pages
|| ftrace_pages_start
);
3716 /* First initialization */
3717 ftrace_pages
= ftrace_pages_start
= start_pg
;
3722 if (WARN_ON(ftrace_pages
->next
)) {
3723 /* Hmm, we have free pages? */
3724 while (ftrace_pages
->next
)
3725 ftrace_pages
= ftrace_pages
->next
;
3728 ftrace_pages
->next
= start_pg
;
3734 addr
= ftrace_call_adjust(*p
++);
3736 * Some architecture linkers will pad between
3737 * the different mcount_loc sections of different
3738 * object files to satisfy alignments.
3739 * Skip any NULL pointers.
3744 if (pg
->index
== pg
->size
) {
3745 /* We should have allocated enough */
3746 if (WARN_ON(!pg
->next
))
3751 rec
= &pg
->records
[pg
->index
++];
3755 /* We should have used all pages */
3758 /* Assign the last page to ftrace_pages */
3761 /* These new locations need to be initialized */
3762 ftrace_new_pgs
= start_pg
;
3765 * We only need to disable interrupts on start up
3766 * because we are modifying code that an interrupt
3767 * may execute, and the modification is not atomic.
3768 * But for modules, nothing runs the code we modify
3769 * until we are finished with it, and there's no
3770 * reason to cause large interrupt latencies while we do it.
3773 local_irq_save(flags
);
3774 ftrace_update_code(mod
);
3776 local_irq_restore(flags
);
3779 mutex_unlock(&ftrace_lock
);
3784 #ifdef CONFIG_MODULES
3786 #define next_to_ftrace_page(p) container_of(p, struct ftrace_page, next)
3788 void ftrace_release_mod(struct module
*mod
)
3790 struct dyn_ftrace
*rec
;
3791 struct ftrace_page
**last_pg
;
3792 struct ftrace_page
*pg
;
3795 mutex_lock(&ftrace_lock
);
3797 if (ftrace_disabled
)
3801 * Each module has its own ftrace_pages, remove
3802 * them from the list.
3804 last_pg
= &ftrace_pages_start
;
3805 for (pg
= ftrace_pages_start
; pg
; pg
= *last_pg
) {
3806 rec
= &pg
->records
[0];
3807 if (within_module_core(rec
->ip
, mod
)) {
3809 * As core pages are first, the first
3810 * page should never be a module page.
3812 if (WARN_ON(pg
== ftrace_pages_start
))
3815 /* Check if we are deleting the last page */
3816 if (pg
== ftrace_pages
)
3817 ftrace_pages
= next_to_ftrace_page(last_pg
);
3819 *last_pg
= pg
->next
;
3820 order
= get_count_order(pg
->size
/ ENTRIES_PER_PAGE
);
3821 free_pages((unsigned long)pg
->records
, order
);
3824 last_pg
= &pg
->next
;
3827 mutex_unlock(&ftrace_lock
);
3830 static void ftrace_init_module(struct module
*mod
,
3831 unsigned long *start
, unsigned long *end
)
3833 if (ftrace_disabled
|| start
== end
)
3835 ftrace_process_locs(mod
, start
, end
);
3838 static int ftrace_module_notify(struct notifier_block
*self
,
3839 unsigned long val
, void *data
)
3841 struct module
*mod
= data
;
3844 case MODULE_STATE_COMING
:
3845 ftrace_init_module(mod
, mod
->ftrace_callsites
,
3846 mod
->ftrace_callsites
+
3847 mod
->num_ftrace_callsites
);
3849 case MODULE_STATE_GOING
:
3850 ftrace_release_mod(mod
);
3857 static int ftrace_module_notify(struct notifier_block
*self
,
3858 unsigned long val
, void *data
)
3862 #endif /* CONFIG_MODULES */
3864 struct notifier_block ftrace_module_nb
= {
3865 .notifier_call
= ftrace_module_notify
,
3869 extern unsigned long __start_mcount_loc
[];
3870 extern unsigned long __stop_mcount_loc
[];
3872 void __init
ftrace_init(void)
3874 unsigned long count
, addr
, flags
;
3877 /* Keep the ftrace pointer to the stub */
3878 addr
= (unsigned long)ftrace_stub
;
3880 local_irq_save(flags
);
3881 ftrace_dyn_arch_init(&addr
);
3882 local_irq_restore(flags
);
3884 /* ftrace_dyn_arch_init places the return code in addr */
3888 count
= __stop_mcount_loc
- __start_mcount_loc
;
3890 ret
= ftrace_dyn_table_alloc(count
);
3894 last_ftrace_enabled
= ftrace_enabled
= 1;
3896 ret
= ftrace_process_locs(NULL
,
3900 ret
= register_module_notifier(&ftrace_module_nb
);
3902 pr_warning("Failed to register trace ftrace module notifier\n");
3904 set_ftrace_early_filters();
3908 ftrace_disabled
= 1;
3913 static struct ftrace_ops global_ops
= {
3914 .func
= ftrace_stub
,
3917 static int __init
ftrace_nodyn_init(void)
3922 device_initcall(ftrace_nodyn_init
);
3924 static inline int ftrace_init_dyn_debugfs(struct dentry
*d_tracer
) { return 0; }
3925 static inline void ftrace_startup_enable(int command
) { }
3926 /* Keep as macros so we do not need to define the commands */
3927 # define ftrace_startup(ops, command) \
3929 (ops)->flags |= FTRACE_OPS_FL_ENABLED; \
3932 # define ftrace_shutdown(ops, command) do { } while (0)
3933 # define ftrace_startup_sysctl() do { } while (0)
3934 # define ftrace_shutdown_sysctl() do { } while (0)
3937 ftrace_ops_test(struct ftrace_ops
*ops
, unsigned long ip
)
3942 #endif /* CONFIG_DYNAMIC_FTRACE */
3945 ftrace_ops_control_func(unsigned long ip
, unsigned long parent_ip
)
3947 struct ftrace_ops
*op
;
3949 if (unlikely(trace_recursion_test(TRACE_CONTROL_BIT
)))
3953 * Some of the ops may be dynamically allocated,
3954 * they must be freed after a synchronize_sched().
3956 preempt_disable_notrace();
3957 trace_recursion_set(TRACE_CONTROL_BIT
);
3958 op
= rcu_dereference_raw(ftrace_control_list
);
3959 while (op
!= &ftrace_list_end
) {
3960 if (!ftrace_function_local_disabled(op
) &&
3961 ftrace_ops_test(op
, ip
))
3962 op
->func(ip
, parent_ip
);
3964 op
= rcu_dereference_raw(op
->next
);
3966 trace_recursion_clear(TRACE_CONTROL_BIT
);
3967 preempt_enable_notrace();
3970 static struct ftrace_ops control_ops
= {
3971 .func
= ftrace_ops_control_func
,
3975 ftrace_ops_list_func(unsigned long ip
, unsigned long parent_ip
)
3977 struct ftrace_ops
*op
;
3979 if (unlikely(trace_recursion_test(TRACE_INTERNAL_BIT
)))
3982 trace_recursion_set(TRACE_INTERNAL_BIT
);
3984 * Some of the ops may be dynamically allocated,
3985 * they must be freed after a synchronize_sched().
3987 preempt_disable_notrace();
3988 op
= rcu_dereference_raw(ftrace_ops_list
);
3989 while (op
!= &ftrace_list_end
) {
3990 if (ftrace_ops_test(op
, ip
))
3991 op
->func(ip
, parent_ip
);
3992 op
= rcu_dereference_raw(op
->next
);
3994 preempt_enable_notrace();
3995 trace_recursion_clear(TRACE_INTERNAL_BIT
);
3998 static void clear_ftrace_swapper(void)
4000 struct task_struct
*p
;
4004 for_each_online_cpu(cpu
) {
4006 clear_tsk_trace_trace(p
);
4011 static void set_ftrace_swapper(void)
4013 struct task_struct
*p
;
4017 for_each_online_cpu(cpu
) {
4019 set_tsk_trace_trace(p
);
4024 static void clear_ftrace_pid(struct pid
*pid
)
4026 struct task_struct
*p
;
4029 do_each_pid_task(pid
, PIDTYPE_PID
, p
) {
4030 clear_tsk_trace_trace(p
);
4031 } while_each_pid_task(pid
, PIDTYPE_PID
, p
);
4037 static void set_ftrace_pid(struct pid
*pid
)
4039 struct task_struct
*p
;
4042 do_each_pid_task(pid
, PIDTYPE_PID
, p
) {
4043 set_tsk_trace_trace(p
);
4044 } while_each_pid_task(pid
, PIDTYPE_PID
, p
);
4048 static void clear_ftrace_pid_task(struct pid
*pid
)
4050 if (pid
== ftrace_swapper_pid
)
4051 clear_ftrace_swapper();
4053 clear_ftrace_pid(pid
);
4056 static void set_ftrace_pid_task(struct pid
*pid
)
4058 if (pid
== ftrace_swapper_pid
)
4059 set_ftrace_swapper();
4061 set_ftrace_pid(pid
);
4064 static int ftrace_pid_add(int p
)
4067 struct ftrace_pid
*fpid
;
4070 mutex_lock(&ftrace_lock
);
4073 pid
= ftrace_swapper_pid
;
4075 pid
= find_get_pid(p
);
4082 list_for_each_entry(fpid
, &ftrace_pids
, list
)
4083 if (fpid
->pid
== pid
)
4088 fpid
= kmalloc(sizeof(*fpid
), GFP_KERNEL
);
4092 list_add(&fpid
->list
, &ftrace_pids
);
4095 set_ftrace_pid_task(pid
);
4097 ftrace_update_pid_func();
4098 ftrace_startup_enable(0);
4100 mutex_unlock(&ftrace_lock
);
4104 if (pid
!= ftrace_swapper_pid
)
4108 mutex_unlock(&ftrace_lock
);
4112 static void ftrace_pid_reset(void)
4114 struct ftrace_pid
*fpid
, *safe
;
4116 mutex_lock(&ftrace_lock
);
4117 list_for_each_entry_safe(fpid
, safe
, &ftrace_pids
, list
) {
4118 struct pid
*pid
= fpid
->pid
;
4120 clear_ftrace_pid_task(pid
);
4122 list_del(&fpid
->list
);
4126 ftrace_update_pid_func();
4127 ftrace_startup_enable(0);
4129 mutex_unlock(&ftrace_lock
);
4132 static void *fpid_start(struct seq_file
*m
, loff_t
*pos
)
4134 mutex_lock(&ftrace_lock
);
4136 if (list_empty(&ftrace_pids
) && (!*pos
))
4139 return seq_list_start(&ftrace_pids
, *pos
);
4142 static void *fpid_next(struct seq_file
*m
, void *v
, loff_t
*pos
)
4147 return seq_list_next(v
, &ftrace_pids
, pos
);
4150 static void fpid_stop(struct seq_file
*m
, void *p
)
4152 mutex_unlock(&ftrace_lock
);
4155 static int fpid_show(struct seq_file
*m
, void *v
)
4157 const struct ftrace_pid
*fpid
= list_entry(v
, struct ftrace_pid
, list
);
4159 if (v
== (void *)1) {
4160 seq_printf(m
, "no pid\n");
4164 if (fpid
->pid
== ftrace_swapper_pid
)
4165 seq_printf(m
, "swapper tasks\n");
4167 seq_printf(m
, "%u\n", pid_vnr(fpid
->pid
));
4172 static const struct seq_operations ftrace_pid_sops
= {
4173 .start
= fpid_start
,
4180 ftrace_pid_open(struct inode
*inode
, struct file
*file
)
4184 if ((file
->f_mode
& FMODE_WRITE
) &&
4185 (file
->f_flags
& O_TRUNC
))
4188 if (file
->f_mode
& FMODE_READ
)
4189 ret
= seq_open(file
, &ftrace_pid_sops
);
4195 ftrace_pid_write(struct file
*filp
, const char __user
*ubuf
,
4196 size_t cnt
, loff_t
*ppos
)
4202 if (cnt
>= sizeof(buf
))
4205 if (copy_from_user(&buf
, ubuf
, cnt
))
4211 * Allow "echo > set_ftrace_pid" or "echo -n '' > set_ftrace_pid"
4212 * to clean the filter quietly.
4214 tmp
= strstrip(buf
);
4215 if (strlen(tmp
) == 0)
4218 ret
= strict_strtol(tmp
, 10, &val
);
4222 ret
= ftrace_pid_add(val
);
4224 return ret
? ret
: cnt
;
4228 ftrace_pid_release(struct inode
*inode
, struct file
*file
)
4230 if (file
->f_mode
& FMODE_READ
)
4231 seq_release(inode
, file
);
4236 static const struct file_operations ftrace_pid_fops
= {
4237 .open
= ftrace_pid_open
,
4238 .write
= ftrace_pid_write
,
4240 .llseek
= seq_lseek
,
4241 .release
= ftrace_pid_release
,
4244 static __init
int ftrace_init_debugfs(void)
4246 struct dentry
*d_tracer
;
4248 d_tracer
= tracing_init_dentry();
4252 ftrace_init_dyn_debugfs(d_tracer
);
4254 trace_create_file("set_ftrace_pid", 0644, d_tracer
,
4255 NULL
, &ftrace_pid_fops
);
4257 ftrace_profile_debugfs(d_tracer
);
4261 fs_initcall(ftrace_init_debugfs
);
4264 * ftrace_kill - kill ftrace
4266 * This function should be used by panic code. It stops ftrace
4267 * but in a not so nice way. If you need to simply kill ftrace
4268 * from a non-atomic section, use ftrace_kill.
4270 void ftrace_kill(void)
4272 ftrace_disabled
= 1;
4274 clear_ftrace_function();
4278 * Test if ftrace is dead or not.
4280 int ftrace_is_dead(void)
4282 return ftrace_disabled
;
4286 * register_ftrace_function - register a function for profiling
4287 * @ops - ops structure that holds the function for profiling.
4289 * Register a function to be called by all functions in the
4292 * Note: @ops->func and all the functions it calls must be labeled
4293 * with "notrace", otherwise it will go into a
4296 int register_ftrace_function(struct ftrace_ops
*ops
)
4300 mutex_lock(&ftrace_lock
);
4302 ret
= __register_ftrace_function(ops
);
4304 ret
= ftrace_startup(ops
, 0);
4306 mutex_unlock(&ftrace_lock
);
4310 EXPORT_SYMBOL_GPL(register_ftrace_function
);
4313 * unregister_ftrace_function - unregister a function for profiling.
4314 * @ops - ops structure that holds the function to unregister
4316 * Unregister a function that was added to be called by ftrace profiling.
4318 int unregister_ftrace_function(struct ftrace_ops
*ops
)
4322 mutex_lock(&ftrace_lock
);
4323 ret
= __unregister_ftrace_function(ops
);
4325 ftrace_shutdown(ops
, 0);
4326 mutex_unlock(&ftrace_lock
);
4330 EXPORT_SYMBOL_GPL(unregister_ftrace_function
);
4333 ftrace_enable_sysctl(struct ctl_table
*table
, int write
,
4334 void __user
*buffer
, size_t *lenp
,
4339 mutex_lock(&ftrace_lock
);
4341 if (unlikely(ftrace_disabled
))
4344 ret
= proc_dointvec(table
, write
, buffer
, lenp
, ppos
);
4346 if (ret
|| !write
|| (last_ftrace_enabled
== !!ftrace_enabled
))
4349 last_ftrace_enabled
= !!ftrace_enabled
;
4351 if (ftrace_enabled
) {
4353 ftrace_startup_sysctl();
4355 /* we are starting ftrace again */
4356 if (ftrace_ops_list
!= &ftrace_list_end
) {
4357 if (ftrace_ops_list
->next
== &ftrace_list_end
)
4358 ftrace_trace_function
= ftrace_ops_list
->func
;
4360 ftrace_trace_function
= ftrace_ops_list_func
;
4364 /* stopping ftrace calls (just send to ftrace_stub) */
4365 ftrace_trace_function
= ftrace_stub
;
4367 ftrace_shutdown_sysctl();
4371 mutex_unlock(&ftrace_lock
);
4375 #ifdef CONFIG_FUNCTION_GRAPH_TRACER
4377 static int ftrace_graph_active
;
4378 static struct notifier_block ftrace_suspend_notifier
;
4380 int ftrace_graph_entry_stub(struct ftrace_graph_ent
*trace
)
4385 /* The callbacks that hook a function */
4386 trace_func_graph_ret_t ftrace_graph_return
=
4387 (trace_func_graph_ret_t
)ftrace_stub
;
4388 trace_func_graph_ent_t ftrace_graph_entry
= ftrace_graph_entry_stub
;
4390 /* Try to assign a return stack array on FTRACE_RETSTACK_ALLOC_SIZE tasks. */
4391 static int alloc_retstack_tasklist(struct ftrace_ret_stack
**ret_stack_list
)
4395 unsigned long flags
;
4396 int start
= 0, end
= FTRACE_RETSTACK_ALLOC_SIZE
;
4397 struct task_struct
*g
, *t
;
4399 for (i
= 0; i
< FTRACE_RETSTACK_ALLOC_SIZE
; i
++) {
4400 ret_stack_list
[i
] = kmalloc(FTRACE_RETFUNC_DEPTH
4401 * sizeof(struct ftrace_ret_stack
),
4403 if (!ret_stack_list
[i
]) {
4411 read_lock_irqsave(&tasklist_lock
, flags
);
4412 do_each_thread(g
, t
) {
4418 if (t
->ret_stack
== NULL
) {
4419 atomic_set(&t
->tracing_graph_pause
, 0);
4420 atomic_set(&t
->trace_overrun
, 0);
4421 t
->curr_ret_stack
= -1;
4422 /* Make sure the tasks see the -1 first: */
4424 t
->ret_stack
= ret_stack_list
[start
++];
4426 } while_each_thread(g
, t
);
4429 read_unlock_irqrestore(&tasklist_lock
, flags
);
4431 for (i
= start
; i
< end
; i
++)
4432 kfree(ret_stack_list
[i
]);
4437 ftrace_graph_probe_sched_switch(void *ignore
,
4438 struct task_struct
*prev
, struct task_struct
*next
)
4440 unsigned long long timestamp
;
4444 * Does the user want to count the time a function was asleep.
4445 * If so, do not update the time stamps.
4447 if (trace_flags
& TRACE_ITER_SLEEP_TIME
)
4450 timestamp
= trace_clock_local();
4452 prev
->ftrace_timestamp
= timestamp
;
4454 /* only process tasks that we timestamped */
4455 if (!next
->ftrace_timestamp
)
4459 * Update all the counters in next to make up for the
4460 * time next was sleeping.
4462 timestamp
-= next
->ftrace_timestamp
;
4464 for (index
= next
->curr_ret_stack
; index
>= 0; index
--)
4465 next
->ret_stack
[index
].calltime
+= timestamp
;
4468 /* Allocate a return stack for each task */
4469 static int start_graph_tracing(void)
4471 struct ftrace_ret_stack
**ret_stack_list
;
4474 ret_stack_list
= kmalloc(FTRACE_RETSTACK_ALLOC_SIZE
*
4475 sizeof(struct ftrace_ret_stack
*),
4478 if (!ret_stack_list
)
4481 /* The cpu_boot init_task->ret_stack will never be freed */
4482 for_each_online_cpu(cpu
) {
4483 if (!idle_task(cpu
)->ret_stack
)
4484 ftrace_graph_init_idle_task(idle_task(cpu
), cpu
);
4488 ret
= alloc_retstack_tasklist(ret_stack_list
);
4489 } while (ret
== -EAGAIN
);
4492 ret
= register_trace_sched_switch(ftrace_graph_probe_sched_switch
, NULL
);
4494 pr_info("ftrace_graph: Couldn't activate tracepoint"
4495 " probe to kernel_sched_switch\n");
4498 kfree(ret_stack_list
);
4503 * Hibernation protection.
4504 * The state of the current task is too much unstable during
4505 * suspend/restore to disk. We want to protect against that.
4508 ftrace_suspend_notifier_call(struct notifier_block
*bl
, unsigned long state
,
4512 case PM_HIBERNATION_PREPARE
:
4513 pause_graph_tracing();
4516 case PM_POST_HIBERNATION
:
4517 unpause_graph_tracing();
4523 int register_ftrace_graph(trace_func_graph_ret_t retfunc
,
4524 trace_func_graph_ent_t entryfunc
)
4528 mutex_lock(&ftrace_lock
);
4530 /* we currently allow only one tracer registered at a time */
4531 if (ftrace_graph_active
) {
4536 ftrace_suspend_notifier
.notifier_call
= ftrace_suspend_notifier_call
;
4537 register_pm_notifier(&ftrace_suspend_notifier
);
4539 ftrace_graph_active
++;
4540 ret
= start_graph_tracing();
4542 ftrace_graph_active
--;
4546 ftrace_graph_return
= retfunc
;
4547 ftrace_graph_entry
= entryfunc
;
4549 ret
= ftrace_startup(&global_ops
, FTRACE_START_FUNC_RET
);
4552 mutex_unlock(&ftrace_lock
);
4556 void unregister_ftrace_graph(void)
4558 mutex_lock(&ftrace_lock
);
4560 if (unlikely(!ftrace_graph_active
))
4563 ftrace_graph_active
--;
4564 ftrace_graph_return
= (trace_func_graph_ret_t
)ftrace_stub
;
4565 ftrace_graph_entry
= ftrace_graph_entry_stub
;
4566 ftrace_shutdown(&global_ops
, FTRACE_STOP_FUNC_RET
);
4567 unregister_pm_notifier(&ftrace_suspend_notifier
);
4568 unregister_trace_sched_switch(ftrace_graph_probe_sched_switch
, NULL
);
4571 mutex_unlock(&ftrace_lock
);
4574 static DEFINE_PER_CPU(struct ftrace_ret_stack
*, idle_ret_stack
);
4577 graph_init_task(struct task_struct
*t
, struct ftrace_ret_stack
*ret_stack
)
4579 atomic_set(&t
->tracing_graph_pause
, 0);
4580 atomic_set(&t
->trace_overrun
, 0);
4581 t
->ftrace_timestamp
= 0;
4582 /* make curr_ret_stack visible before we add the ret_stack */
4584 t
->ret_stack
= ret_stack
;
4588 * Allocate a return stack for the idle task. May be the first
4589 * time through, or it may be done by CPU hotplug online.
4591 void ftrace_graph_init_idle_task(struct task_struct
*t
, int cpu
)
4593 t
->curr_ret_stack
= -1;
4595 * The idle task has no parent, it either has its own
4596 * stack or no stack at all.
4599 WARN_ON(t
->ret_stack
!= per_cpu(idle_ret_stack
, cpu
));
4601 if (ftrace_graph_active
) {
4602 struct ftrace_ret_stack
*ret_stack
;
4604 ret_stack
= per_cpu(idle_ret_stack
, cpu
);
4606 ret_stack
= kmalloc(FTRACE_RETFUNC_DEPTH
4607 * sizeof(struct ftrace_ret_stack
),
4611 per_cpu(idle_ret_stack
, cpu
) = ret_stack
;
4613 graph_init_task(t
, ret_stack
);
4617 /* Allocate a return stack for newly created task */
4618 void ftrace_graph_init_task(struct task_struct
*t
)
4620 /* Make sure we do not use the parent ret_stack */
4621 t
->ret_stack
= NULL
;
4622 t
->curr_ret_stack
= -1;
4624 if (ftrace_graph_active
) {
4625 struct ftrace_ret_stack
*ret_stack
;
4627 ret_stack
= kmalloc(FTRACE_RETFUNC_DEPTH
4628 * sizeof(struct ftrace_ret_stack
),
4632 graph_init_task(t
, ret_stack
);
4636 void ftrace_graph_exit_task(struct task_struct
*t
)
4638 struct ftrace_ret_stack
*ret_stack
= t
->ret_stack
;
4640 t
->ret_stack
= NULL
;
4641 /* NULL must become visible to IRQs before we free it: */
4647 void ftrace_graph_stop(void)