xref: /linux/kernel/trace/trace_output.c (revision 9ffc93f203c18a70623f21950f1dd473c9ec48cd)
1 /*
2  * trace_output.c
3  *
4  * Copyright (C) 2008 Red Hat Inc, Steven Rostedt <srostedt@redhat.com>
5  *
6  */
7 
8 #include <linux/module.h>
9 #include <linux/mutex.h>
10 #include <linux/ftrace.h>
11 
12 #include "trace_output.h"
13 
14 /* must be a power of 2 */
15 #define EVENT_HASHSIZE	128
16 
17 DECLARE_RWSEM(trace_event_mutex);
18 
19 static struct hlist_head event_hash[EVENT_HASHSIZE] __read_mostly;
20 
21 static int next_event_type = __TRACE_LAST_TYPE + 1;
22 
23 int trace_print_seq(struct seq_file *m, struct trace_seq *s)
24 {
25 	int len = s->len >= PAGE_SIZE ? PAGE_SIZE - 1 : s->len;
26 	int ret;
27 
28 	ret = seq_write(m, s->buffer, len);
29 
30 	/*
31 	 * Only reset this buffer if we successfully wrote to the
32 	 * seq_file buffer.
33 	 */
34 	if (!ret)
35 		trace_seq_init(s);
36 
37 	return ret;
38 }
39 
40 enum print_line_t trace_print_bprintk_msg_only(struct trace_iterator *iter)
41 {
42 	struct trace_seq *s = &iter->seq;
43 	struct trace_entry *entry = iter->ent;
44 	struct bprint_entry *field;
45 	int ret;
46 
47 	trace_assign_type(field, entry);
48 
49 	ret = trace_seq_bprintf(s, field->fmt, field->buf);
50 	if (!ret)
51 		return TRACE_TYPE_PARTIAL_LINE;
52 
53 	return TRACE_TYPE_HANDLED;
54 }
55 
56 enum print_line_t trace_print_printk_msg_only(struct trace_iterator *iter)
57 {
58 	struct trace_seq *s = &iter->seq;
59 	struct trace_entry *entry = iter->ent;
60 	struct print_entry *field;
61 	int ret;
62 
63 	trace_assign_type(field, entry);
64 
65 	ret = trace_seq_printf(s, "%s", field->buf);
66 	if (!ret)
67 		return TRACE_TYPE_PARTIAL_LINE;
68 
69 	return TRACE_TYPE_HANDLED;
70 }
71 
72 /**
73  * trace_seq_printf - sequence printing of trace information
74  * @s: trace sequence descriptor
75  * @fmt: printf format string
76  *
77  * It returns 0 if the trace oversizes the buffer's free
78  * space, 1 otherwise.
79  *
80  * The tracer may use either sequence operations or its own
81  * copy to user routines. To simplify formating of a trace
82  * trace_seq_printf is used to store strings into a special
83  * buffer (@s). Then the output may be either used by
84  * the sequencer or pulled into another buffer.
85  */
86 int
87 trace_seq_printf(struct trace_seq *s, const char *fmt, ...)
88 {
89 	int len = (PAGE_SIZE - 1) - s->len;
90 	va_list ap;
91 	int ret;
92 
93 	if (s->full || !len)
94 		return 0;
95 
96 	va_start(ap, fmt);
97 	ret = vsnprintf(s->buffer + s->len, len, fmt, ap);
98 	va_end(ap);
99 
100 	/* If we can't write it all, don't bother writing anything */
101 	if (ret >= len) {
102 		s->full = 1;
103 		return 0;
104 	}
105 
106 	s->len += ret;
107 
108 	return 1;
109 }
110 EXPORT_SYMBOL_GPL(trace_seq_printf);
111 
112 /**
113  * trace_seq_vprintf - sequence printing of trace information
114  * @s: trace sequence descriptor
115  * @fmt: printf format string
116  *
117  * The tracer may use either sequence operations or its own
118  * copy to user routines. To simplify formating of a trace
119  * trace_seq_printf is used to store strings into a special
120  * buffer (@s). Then the output may be either used by
121  * the sequencer or pulled into another buffer.
122  */
123 int
124 trace_seq_vprintf(struct trace_seq *s, const char *fmt, va_list args)
125 {
126 	int len = (PAGE_SIZE - 1) - s->len;
127 	int ret;
128 
129 	if (s->full || !len)
130 		return 0;
131 
132 	ret = vsnprintf(s->buffer + s->len, len, fmt, args);
133 
134 	/* If we can't write it all, don't bother writing anything */
135 	if (ret >= len) {
136 		s->full = 1;
137 		return 0;
138 	}
139 
140 	s->len += ret;
141 
142 	return len;
143 }
144 EXPORT_SYMBOL_GPL(trace_seq_vprintf);
145 
146 int trace_seq_bprintf(struct trace_seq *s, const char *fmt, const u32 *binary)
147 {
148 	int len = (PAGE_SIZE - 1) - s->len;
149 	int ret;
150 
151 	if (s->full || !len)
152 		return 0;
153 
154 	ret = bstr_printf(s->buffer + s->len, len, fmt, binary);
155 
156 	/* If we can't write it all, don't bother writing anything */
157 	if (ret >= len) {
158 		s->full = 1;
159 		return 0;
160 	}
161 
162 	s->len += ret;
163 
164 	return len;
165 }
166 
167 /**
168  * trace_seq_puts - trace sequence printing of simple string
169  * @s: trace sequence descriptor
170  * @str: simple string to record
171  *
172  * The tracer may use either the sequence operations or its own
173  * copy to user routines. This function records a simple string
174  * into a special buffer (@s) for later retrieval by a sequencer
175  * or other mechanism.
176  */
177 int trace_seq_puts(struct trace_seq *s, const char *str)
178 {
179 	int len = strlen(str);
180 
181 	if (s->full)
182 		return 0;
183 
184 	if (len > ((PAGE_SIZE - 1) - s->len)) {
185 		s->full = 1;
186 		return 0;
187 	}
188 
189 	memcpy(s->buffer + s->len, str, len);
190 	s->len += len;
191 
192 	return len;
193 }
194 
195 int trace_seq_putc(struct trace_seq *s, unsigned char c)
196 {
197 	if (s->full)
198 		return 0;
199 
200 	if (s->len >= (PAGE_SIZE - 1)) {
201 		s->full = 1;
202 		return 0;
203 	}
204 
205 	s->buffer[s->len++] = c;
206 
207 	return 1;
208 }
209 EXPORT_SYMBOL(trace_seq_putc);
210 
211 int trace_seq_putmem(struct trace_seq *s, const void *mem, size_t len)
212 {
213 	if (s->full)
214 		return 0;
215 
216 	if (len > ((PAGE_SIZE - 1) - s->len)) {
217 		s->full = 1;
218 		return 0;
219 	}
220 
221 	memcpy(s->buffer + s->len, mem, len);
222 	s->len += len;
223 
224 	return len;
225 }
226 
227 int trace_seq_putmem_hex(struct trace_seq *s, const void *mem, size_t len)
228 {
229 	unsigned char hex[HEX_CHARS];
230 	const unsigned char *data = mem;
231 	int i, j;
232 
233 	if (s->full)
234 		return 0;
235 
236 #ifdef __BIG_ENDIAN
237 	for (i = 0, j = 0; i < len; i++) {
238 #else
239 	for (i = len-1, j = 0; i >= 0; i--) {
240 #endif
241 		hex[j++] = hex_asc_hi(data[i]);
242 		hex[j++] = hex_asc_lo(data[i]);
243 	}
244 	hex[j++] = ' ';
245 
246 	return trace_seq_putmem(s, hex, j);
247 }
248 
249 void *trace_seq_reserve(struct trace_seq *s, size_t len)
250 {
251 	void *ret;
252 
253 	if (s->full)
254 		return NULL;
255 
256 	if (len > ((PAGE_SIZE - 1) - s->len)) {
257 		s->full = 1;
258 		return NULL;
259 	}
260 
261 	ret = s->buffer + s->len;
262 	s->len += len;
263 
264 	return ret;
265 }
266 
267 int trace_seq_path(struct trace_seq *s, const struct path *path)
268 {
269 	unsigned char *p;
270 
271 	if (s->full)
272 		return 0;
273 
274 	if (s->len >= (PAGE_SIZE - 1)) {
275 		s->full = 1;
276 		return 0;
277 	}
278 
279 	p = d_path(path, s->buffer + s->len, PAGE_SIZE - s->len);
280 	if (!IS_ERR(p)) {
281 		p = mangle_path(s->buffer + s->len, p, "\n");
282 		if (p) {
283 			s->len = p - s->buffer;
284 			return 1;
285 		}
286 	} else {
287 		s->buffer[s->len++] = '?';
288 		return 1;
289 	}
290 
291 	s->full = 1;
292 	return 0;
293 }
294 
295 const char *
296 ftrace_print_flags_seq(struct trace_seq *p, const char *delim,
297 		       unsigned long flags,
298 		       const struct trace_print_flags *flag_array)
299 {
300 	unsigned long mask;
301 	const char *str;
302 	const char *ret = p->buffer + p->len;
303 	int i, first = 1;
304 
305 	for (i = 0;  flag_array[i].name && flags; i++) {
306 
307 		mask = flag_array[i].mask;
308 		if ((flags & mask) != mask)
309 			continue;
310 
311 		str = flag_array[i].name;
312 		flags &= ~mask;
313 		if (!first && delim)
314 			trace_seq_puts(p, delim);
315 		else
316 			first = 0;
317 		trace_seq_puts(p, str);
318 	}
319 
320 	/* check for left over flags */
321 	if (flags) {
322 		if (!first && delim)
323 			trace_seq_puts(p, delim);
324 		trace_seq_printf(p, "0x%lx", flags);
325 	}
326 
327 	trace_seq_putc(p, 0);
328 
329 	return ret;
330 }
331 EXPORT_SYMBOL(ftrace_print_flags_seq);
332 
333 const char *
334 ftrace_print_symbols_seq(struct trace_seq *p, unsigned long val,
335 			 const struct trace_print_flags *symbol_array)
336 {
337 	int i;
338 	const char *ret = p->buffer + p->len;
339 
340 	for (i = 0;  symbol_array[i].name; i++) {
341 
342 		if (val != symbol_array[i].mask)
343 			continue;
344 
345 		trace_seq_puts(p, symbol_array[i].name);
346 		break;
347 	}
348 
349 	if (ret == (const char *)(p->buffer + p->len))
350 		trace_seq_printf(p, "0x%lx", val);
351 
352 	trace_seq_putc(p, 0);
353 
354 	return ret;
355 }
356 EXPORT_SYMBOL(ftrace_print_symbols_seq);
357 
358 #if BITS_PER_LONG == 32
359 const char *
360 ftrace_print_symbols_seq_u64(struct trace_seq *p, unsigned long long val,
361 			 const struct trace_print_flags_u64 *symbol_array)
362 {
363 	int i;
364 	const char *ret = p->buffer + p->len;
365 
366 	for (i = 0;  symbol_array[i].name; i++) {
367 
368 		if (val != symbol_array[i].mask)
369 			continue;
370 
371 		trace_seq_puts(p, symbol_array[i].name);
372 		break;
373 	}
374 
375 	if (ret == (const char *)(p->buffer + p->len))
376 		trace_seq_printf(p, "0x%llx", val);
377 
378 	trace_seq_putc(p, 0);
379 
380 	return ret;
381 }
382 EXPORT_SYMBOL(ftrace_print_symbols_seq_u64);
383 #endif
384 
385 const char *
386 ftrace_print_hex_seq(struct trace_seq *p, const unsigned char *buf, int buf_len)
387 {
388 	int i;
389 	const char *ret = p->buffer + p->len;
390 
391 	for (i = 0; i < buf_len; i++)
392 		trace_seq_printf(p, "%s%2.2x", i == 0 ? "" : " ", buf[i]);
393 
394 	trace_seq_putc(p, 0);
395 
396 	return ret;
397 }
398 EXPORT_SYMBOL(ftrace_print_hex_seq);
399 
400 #ifdef CONFIG_KRETPROBES
401 static inline const char *kretprobed(const char *name)
402 {
403 	static const char tramp_name[] = "kretprobe_trampoline";
404 	int size = sizeof(tramp_name);
405 
406 	if (strncmp(tramp_name, name, size) == 0)
407 		return "[unknown/kretprobe'd]";
408 	return name;
409 }
410 #else
411 static inline const char *kretprobed(const char *name)
412 {
413 	return name;
414 }
415 #endif /* CONFIG_KRETPROBES */
416 
417 static int
418 seq_print_sym_short(struct trace_seq *s, const char *fmt, unsigned long address)
419 {
420 #ifdef CONFIG_KALLSYMS
421 	char str[KSYM_SYMBOL_LEN];
422 	const char *name;
423 
424 	kallsyms_lookup(address, NULL, NULL, NULL, str);
425 
426 	name = kretprobed(str);
427 
428 	return trace_seq_printf(s, fmt, name);
429 #endif
430 	return 1;
431 }
432 
433 static int
434 seq_print_sym_offset(struct trace_seq *s, const char *fmt,
435 		     unsigned long address)
436 {
437 #ifdef CONFIG_KALLSYMS
438 	char str[KSYM_SYMBOL_LEN];
439 	const char *name;
440 
441 	sprint_symbol(str, address);
442 	name = kretprobed(str);
443 
444 	return trace_seq_printf(s, fmt, name);
445 #endif
446 	return 1;
447 }
448 
449 #ifndef CONFIG_64BIT
450 # define IP_FMT "%08lx"
451 #else
452 # define IP_FMT "%016lx"
453 #endif
454 
455 int seq_print_user_ip(struct trace_seq *s, struct mm_struct *mm,
456 		      unsigned long ip, unsigned long sym_flags)
457 {
458 	struct file *file = NULL;
459 	unsigned long vmstart = 0;
460 	int ret = 1;
461 
462 	if (s->full)
463 		return 0;
464 
465 	if (mm) {
466 		const struct vm_area_struct *vma;
467 
468 		down_read(&mm->mmap_sem);
469 		vma = find_vma(mm, ip);
470 		if (vma) {
471 			file = vma->vm_file;
472 			vmstart = vma->vm_start;
473 		}
474 		if (file) {
475 			ret = trace_seq_path(s, &file->f_path);
476 			if (ret)
477 				ret = trace_seq_printf(s, "[+0x%lx]",
478 						       ip - vmstart);
479 		}
480 		up_read(&mm->mmap_sem);
481 	}
482 	if (ret && ((sym_flags & TRACE_ITER_SYM_ADDR) || !file))
483 		ret = trace_seq_printf(s, " <" IP_FMT ">", ip);
484 	return ret;
485 }
486 
487 int
488 seq_print_userip_objs(const struct userstack_entry *entry, struct trace_seq *s,
489 		      unsigned long sym_flags)
490 {
491 	struct mm_struct *mm = NULL;
492 	int ret = 1;
493 	unsigned int i;
494 
495 	if (trace_flags & TRACE_ITER_SYM_USEROBJ) {
496 		struct task_struct *task;
497 		/*
498 		 * we do the lookup on the thread group leader,
499 		 * since individual threads might have already quit!
500 		 */
501 		rcu_read_lock();
502 		task = find_task_by_vpid(entry->tgid);
503 		if (task)
504 			mm = get_task_mm(task);
505 		rcu_read_unlock();
506 	}
507 
508 	for (i = 0; i < FTRACE_STACK_ENTRIES; i++) {
509 		unsigned long ip = entry->caller[i];
510 
511 		if (ip == ULONG_MAX || !ret)
512 			break;
513 		if (ret)
514 			ret = trace_seq_puts(s, " => ");
515 		if (!ip) {
516 			if (ret)
517 				ret = trace_seq_puts(s, "??");
518 			if (ret)
519 				ret = trace_seq_puts(s, "\n");
520 			continue;
521 		}
522 		if (!ret)
523 			break;
524 		if (ret)
525 			ret = seq_print_user_ip(s, mm, ip, sym_flags);
526 		ret = trace_seq_puts(s, "\n");
527 	}
528 
529 	if (mm)
530 		mmput(mm);
531 	return ret;
532 }
533 
534 int
535 seq_print_ip_sym(struct trace_seq *s, unsigned long ip, unsigned long sym_flags)
536 {
537 	int ret;
538 
539 	if (!ip)
540 		return trace_seq_printf(s, "0");
541 
542 	if (sym_flags & TRACE_ITER_SYM_OFFSET)
543 		ret = seq_print_sym_offset(s, "%s", ip);
544 	else
545 		ret = seq_print_sym_short(s, "%s", ip);
546 
547 	if (!ret)
548 		return 0;
549 
550 	if (sym_flags & TRACE_ITER_SYM_ADDR)
551 		ret = trace_seq_printf(s, " <" IP_FMT ">", ip);
552 	return ret;
553 }
554 
555 /**
556  * trace_print_lat_fmt - print the irq, preempt and lockdep fields
557  * @s: trace seq struct to write to
558  * @entry: The trace entry field from the ring buffer
559  *
560  * Prints the generic fields of irqs off, in hard or softirq, preempt
561  * count.
562  */
563 int trace_print_lat_fmt(struct trace_seq *s, struct trace_entry *entry)
564 {
565 	char hardsoft_irq;
566 	char need_resched;
567 	char irqs_off;
568 	int hardirq;
569 	int softirq;
570 	int ret;
571 
572 	hardirq = entry->flags & TRACE_FLAG_HARDIRQ;
573 	softirq = entry->flags & TRACE_FLAG_SOFTIRQ;
574 
575 	irqs_off =
576 		(entry->flags & TRACE_FLAG_IRQS_OFF) ? 'd' :
577 		(entry->flags & TRACE_FLAG_IRQS_NOSUPPORT) ? 'X' :
578 		'.';
579 	need_resched =
580 		(entry->flags & TRACE_FLAG_NEED_RESCHED) ? 'N' : '.';
581 	hardsoft_irq =
582 		(hardirq && softirq) ? 'H' :
583 		hardirq ? 'h' :
584 		softirq ? 's' :
585 		'.';
586 
587 	if (!trace_seq_printf(s, "%c%c%c",
588 			      irqs_off, need_resched, hardsoft_irq))
589 		return 0;
590 
591 	if (entry->preempt_count)
592 		ret = trace_seq_printf(s, "%x", entry->preempt_count);
593 	else
594 		ret = trace_seq_putc(s, '.');
595 
596 	return ret;
597 }
598 
599 static int
600 lat_print_generic(struct trace_seq *s, struct trace_entry *entry, int cpu)
601 {
602 	char comm[TASK_COMM_LEN];
603 
604 	trace_find_cmdline(entry->pid, comm);
605 
606 	if (!trace_seq_printf(s, "%8.8s-%-5d %3d",
607 			      comm, entry->pid, cpu))
608 		return 0;
609 
610 	return trace_print_lat_fmt(s, entry);
611 }
612 
613 static unsigned long preempt_mark_thresh = 100;
614 
615 static int
616 lat_print_timestamp(struct trace_seq *s, u64 abs_usecs,
617 		    unsigned long rel_usecs)
618 {
619 	return trace_seq_printf(s, " %4lldus%c: ", abs_usecs,
620 				rel_usecs > preempt_mark_thresh ? '!' :
621 				  rel_usecs > 1 ? '+' : ' ');
622 }
623 
624 int trace_print_context(struct trace_iterator *iter)
625 {
626 	struct trace_seq *s = &iter->seq;
627 	struct trace_entry *entry = iter->ent;
628 	unsigned long long t = ns2usecs(iter->ts);
629 	unsigned long usec_rem = do_div(t, USEC_PER_SEC);
630 	unsigned long secs = (unsigned long)t;
631 	char comm[TASK_COMM_LEN];
632 	int ret;
633 
634 	trace_find_cmdline(entry->pid, comm);
635 
636 	ret = trace_seq_printf(s, "%16s-%-5d [%03d] ",
637 			       comm, entry->pid, iter->cpu);
638 	if (!ret)
639 		return 0;
640 
641 	if (trace_flags & TRACE_ITER_IRQ_INFO) {
642 		ret = trace_print_lat_fmt(s, entry);
643 		if (!ret)
644 			return 0;
645 	}
646 
647 	return trace_seq_printf(s, " %5lu.%06lu: ",
648 				secs, usec_rem);
649 }
650 
651 int trace_print_lat_context(struct trace_iterator *iter)
652 {
653 	u64 next_ts;
654 	int ret;
655 	struct trace_seq *s = &iter->seq;
656 	struct trace_entry *entry = iter->ent,
657 			   *next_entry = trace_find_next_entry(iter, NULL,
658 							       &next_ts);
659 	unsigned long verbose = (trace_flags & TRACE_ITER_VERBOSE);
660 	unsigned long abs_usecs = ns2usecs(iter->ts - iter->tr->time_start);
661 	unsigned long rel_usecs;
662 
663 	if (!next_entry)
664 		next_ts = iter->ts;
665 	rel_usecs = ns2usecs(next_ts - iter->ts);
666 
667 	if (verbose) {
668 		char comm[TASK_COMM_LEN];
669 
670 		trace_find_cmdline(entry->pid, comm);
671 
672 		ret = trace_seq_printf(s, "%16s %5d %3d %d %08x %08lx [%08llx]"
673 				       " %ld.%03ldms (+%ld.%03ldms): ", comm,
674 				       entry->pid, iter->cpu, entry->flags,
675 				       entry->preempt_count, iter->idx,
676 				       ns2usecs(iter->ts),
677 				       abs_usecs / USEC_PER_MSEC,
678 				       abs_usecs % USEC_PER_MSEC,
679 				       rel_usecs / USEC_PER_MSEC,
680 				       rel_usecs % USEC_PER_MSEC);
681 	} else {
682 		ret = lat_print_generic(s, entry, iter->cpu);
683 		if (ret)
684 			ret = lat_print_timestamp(s, abs_usecs, rel_usecs);
685 	}
686 
687 	return ret;
688 }
689 
690 static const char state_to_char[] = TASK_STATE_TO_CHAR_STR;
691 
692 static int task_state_char(unsigned long state)
693 {
694 	int bit = state ? __ffs(state) + 1 : 0;
695 
696 	return bit < sizeof(state_to_char) - 1 ? state_to_char[bit] : '?';
697 }
698 
699 /**
700  * ftrace_find_event - find a registered event
701  * @type: the type of event to look for
702  *
703  * Returns an event of type @type otherwise NULL
704  * Called with trace_event_read_lock() held.
705  */
706 struct trace_event *ftrace_find_event(int type)
707 {
708 	struct trace_event *event;
709 	struct hlist_node *n;
710 	unsigned key;
711 
712 	key = type & (EVENT_HASHSIZE - 1);
713 
714 	hlist_for_each_entry(event, n, &event_hash[key], node) {
715 		if (event->type == type)
716 			return event;
717 	}
718 
719 	return NULL;
720 }
721 
722 static LIST_HEAD(ftrace_event_list);
723 
724 static int trace_search_list(struct list_head **list)
725 {
726 	struct trace_event *e;
727 	int last = __TRACE_LAST_TYPE;
728 
729 	if (list_empty(&ftrace_event_list)) {
730 		*list = &ftrace_event_list;
731 		return last + 1;
732 	}
733 
734 	/*
735 	 * We used up all possible max events,
736 	 * lets see if somebody freed one.
737 	 */
738 	list_for_each_entry(e, &ftrace_event_list, list) {
739 		if (e->type != last + 1)
740 			break;
741 		last++;
742 	}
743 
744 	/* Did we used up all 65 thousand events??? */
745 	if ((last + 1) > FTRACE_MAX_EVENT)
746 		return 0;
747 
748 	*list = &e->list;
749 	return last + 1;
750 }
751 
752 void trace_event_read_lock(void)
753 {
754 	down_read(&trace_event_mutex);
755 }
756 
757 void trace_event_read_unlock(void)
758 {
759 	up_read(&trace_event_mutex);
760 }
761 
762 /**
763  * register_ftrace_event - register output for an event type
764  * @event: the event type to register
765  *
766  * Event types are stored in a hash and this hash is used to
767  * find a way to print an event. If the @event->type is set
768  * then it will use that type, otherwise it will assign a
769  * type to use.
770  *
771  * If you assign your own type, please make sure it is added
772  * to the trace_type enum in trace.h, to avoid collisions
773  * with the dynamic types.
774  *
775  * Returns the event type number or zero on error.
776  */
777 int register_ftrace_event(struct trace_event *event)
778 {
779 	unsigned key;
780 	int ret = 0;
781 
782 	down_write(&trace_event_mutex);
783 
784 	if (WARN_ON(!event))
785 		goto out;
786 
787 	if (WARN_ON(!event->funcs))
788 		goto out;
789 
790 	INIT_LIST_HEAD(&event->list);
791 
792 	if (!event->type) {
793 		struct list_head *list = NULL;
794 
795 		if (next_event_type > FTRACE_MAX_EVENT) {
796 
797 			event->type = trace_search_list(&list);
798 			if (!event->type)
799 				goto out;
800 
801 		} else {
802 
803 			event->type = next_event_type++;
804 			list = &ftrace_event_list;
805 		}
806 
807 		if (WARN_ON(ftrace_find_event(event->type)))
808 			goto out;
809 
810 		list_add_tail(&event->list, list);
811 
812 	} else if (event->type > __TRACE_LAST_TYPE) {
813 		printk(KERN_WARNING "Need to add type to trace.h\n");
814 		WARN_ON(1);
815 		goto out;
816 	} else {
817 		/* Is this event already used */
818 		if (ftrace_find_event(event->type))
819 			goto out;
820 	}
821 
822 	if (event->funcs->trace == NULL)
823 		event->funcs->trace = trace_nop_print;
824 	if (event->funcs->raw == NULL)
825 		event->funcs->raw = trace_nop_print;
826 	if (event->funcs->hex == NULL)
827 		event->funcs->hex = trace_nop_print;
828 	if (event->funcs->binary == NULL)
829 		event->funcs->binary = trace_nop_print;
830 
831 	key = event->type & (EVENT_HASHSIZE - 1);
832 
833 	hlist_add_head(&event->node, &event_hash[key]);
834 
835 	ret = event->type;
836  out:
837 	up_write(&trace_event_mutex);
838 
839 	return ret;
840 }
841 EXPORT_SYMBOL_GPL(register_ftrace_event);
842 
843 /*
844  * Used by module code with the trace_event_mutex held for write.
845  */
846 int __unregister_ftrace_event(struct trace_event *event)
847 {
848 	hlist_del(&event->node);
849 	list_del(&event->list);
850 	return 0;
851 }
852 
853 /**
854  * unregister_ftrace_event - remove a no longer used event
855  * @event: the event to remove
856  */
857 int unregister_ftrace_event(struct trace_event *event)
858 {
859 	down_write(&trace_event_mutex);
860 	__unregister_ftrace_event(event);
861 	up_write(&trace_event_mutex);
862 
863 	return 0;
864 }
865 EXPORT_SYMBOL_GPL(unregister_ftrace_event);
866 
867 /*
868  * Standard events
869  */
870 
871 enum print_line_t trace_nop_print(struct trace_iterator *iter, int flags,
872 				  struct trace_event *event)
873 {
874 	if (!trace_seq_printf(&iter->seq, "type: %d\n", iter->ent->type))
875 		return TRACE_TYPE_PARTIAL_LINE;
876 
877 	return TRACE_TYPE_HANDLED;
878 }
879 
880 /* TRACE_FN */
881 static enum print_line_t trace_fn_trace(struct trace_iterator *iter, int flags,
882 					struct trace_event *event)
883 {
884 	struct ftrace_entry *field;
885 	struct trace_seq *s = &iter->seq;
886 
887 	trace_assign_type(field, iter->ent);
888 
889 	if (!seq_print_ip_sym(s, field->ip, flags))
890 		goto partial;
891 
892 	if ((flags & TRACE_ITER_PRINT_PARENT) && field->parent_ip) {
893 		if (!trace_seq_printf(s, " <-"))
894 			goto partial;
895 		if (!seq_print_ip_sym(s,
896 				      field->parent_ip,
897 				      flags))
898 			goto partial;
899 	}
900 	if (!trace_seq_printf(s, "\n"))
901 		goto partial;
902 
903 	return TRACE_TYPE_HANDLED;
904 
905  partial:
906 	return TRACE_TYPE_PARTIAL_LINE;
907 }
908 
909 static enum print_line_t trace_fn_raw(struct trace_iterator *iter, int flags,
910 				      struct trace_event *event)
911 {
912 	struct ftrace_entry *field;
913 
914 	trace_assign_type(field, iter->ent);
915 
916 	if (!trace_seq_printf(&iter->seq, "%lx %lx\n",
917 			      field->ip,
918 			      field->parent_ip))
919 		return TRACE_TYPE_PARTIAL_LINE;
920 
921 	return TRACE_TYPE_HANDLED;
922 }
923 
924 static enum print_line_t trace_fn_hex(struct trace_iterator *iter, int flags,
925 				      struct trace_event *event)
926 {
927 	struct ftrace_entry *field;
928 	struct trace_seq *s = &iter->seq;
929 
930 	trace_assign_type(field, iter->ent);
931 
932 	SEQ_PUT_HEX_FIELD_RET(s, field->ip);
933 	SEQ_PUT_HEX_FIELD_RET(s, field->parent_ip);
934 
935 	return TRACE_TYPE_HANDLED;
936 }
937 
938 static enum print_line_t trace_fn_bin(struct trace_iterator *iter, int flags,
939 				      struct trace_event *event)
940 {
941 	struct ftrace_entry *field;
942 	struct trace_seq *s = &iter->seq;
943 
944 	trace_assign_type(field, iter->ent);
945 
946 	SEQ_PUT_FIELD_RET(s, field->ip);
947 	SEQ_PUT_FIELD_RET(s, field->parent_ip);
948 
949 	return TRACE_TYPE_HANDLED;
950 }
951 
952 static struct trace_event_functions trace_fn_funcs = {
953 	.trace		= trace_fn_trace,
954 	.raw		= trace_fn_raw,
955 	.hex		= trace_fn_hex,
956 	.binary		= trace_fn_bin,
957 };
958 
959 static struct trace_event trace_fn_event = {
960 	.type		= TRACE_FN,
961 	.funcs		= &trace_fn_funcs,
962 };
963 
964 /* TRACE_CTX an TRACE_WAKE */
965 static enum print_line_t trace_ctxwake_print(struct trace_iterator *iter,
966 					     char *delim)
967 {
968 	struct ctx_switch_entry *field;
969 	char comm[TASK_COMM_LEN];
970 	int S, T;
971 
972 
973 	trace_assign_type(field, iter->ent);
974 
975 	T = task_state_char(field->next_state);
976 	S = task_state_char(field->prev_state);
977 	trace_find_cmdline(field->next_pid, comm);
978 	if (!trace_seq_printf(&iter->seq,
979 			      " %5d:%3d:%c %s [%03d] %5d:%3d:%c %s\n",
980 			      field->prev_pid,
981 			      field->prev_prio,
982 			      S, delim,
983 			      field->next_cpu,
984 			      field->next_pid,
985 			      field->next_prio,
986 			      T, comm))
987 		return TRACE_TYPE_PARTIAL_LINE;
988 
989 	return TRACE_TYPE_HANDLED;
990 }
991 
992 static enum print_line_t trace_ctx_print(struct trace_iterator *iter, int flags,
993 					 struct trace_event *event)
994 {
995 	return trace_ctxwake_print(iter, "==>");
996 }
997 
998 static enum print_line_t trace_wake_print(struct trace_iterator *iter,
999 					  int flags, struct trace_event *event)
1000 {
1001 	return trace_ctxwake_print(iter, "  +");
1002 }
1003 
1004 static int trace_ctxwake_raw(struct trace_iterator *iter, char S)
1005 {
1006 	struct ctx_switch_entry *field;
1007 	int T;
1008 
1009 	trace_assign_type(field, iter->ent);
1010 
1011 	if (!S)
1012 		S = task_state_char(field->prev_state);
1013 	T = task_state_char(field->next_state);
1014 	if (!trace_seq_printf(&iter->seq, "%d %d %c %d %d %d %c\n",
1015 			      field->prev_pid,
1016 			      field->prev_prio,
1017 			      S,
1018 			      field->next_cpu,
1019 			      field->next_pid,
1020 			      field->next_prio,
1021 			      T))
1022 		return TRACE_TYPE_PARTIAL_LINE;
1023 
1024 	return TRACE_TYPE_HANDLED;
1025 }
1026 
1027 static enum print_line_t trace_ctx_raw(struct trace_iterator *iter, int flags,
1028 				       struct trace_event *event)
1029 {
1030 	return trace_ctxwake_raw(iter, 0);
1031 }
1032 
1033 static enum print_line_t trace_wake_raw(struct trace_iterator *iter, int flags,
1034 					struct trace_event *event)
1035 {
1036 	return trace_ctxwake_raw(iter, '+');
1037 }
1038 
1039 
1040 static int trace_ctxwake_hex(struct trace_iterator *iter, char S)
1041 {
1042 	struct ctx_switch_entry *field;
1043 	struct trace_seq *s = &iter->seq;
1044 	int T;
1045 
1046 	trace_assign_type(field, iter->ent);
1047 
1048 	if (!S)
1049 		S = task_state_char(field->prev_state);
1050 	T = task_state_char(field->next_state);
1051 
1052 	SEQ_PUT_HEX_FIELD_RET(s, field->prev_pid);
1053 	SEQ_PUT_HEX_FIELD_RET(s, field->prev_prio);
1054 	SEQ_PUT_HEX_FIELD_RET(s, S);
1055 	SEQ_PUT_HEX_FIELD_RET(s, field->next_cpu);
1056 	SEQ_PUT_HEX_FIELD_RET(s, field->next_pid);
1057 	SEQ_PUT_HEX_FIELD_RET(s, field->next_prio);
1058 	SEQ_PUT_HEX_FIELD_RET(s, T);
1059 
1060 	return TRACE_TYPE_HANDLED;
1061 }
1062 
1063 static enum print_line_t trace_ctx_hex(struct trace_iterator *iter, int flags,
1064 				       struct trace_event *event)
1065 {
1066 	return trace_ctxwake_hex(iter, 0);
1067 }
1068 
1069 static enum print_line_t trace_wake_hex(struct trace_iterator *iter, int flags,
1070 					struct trace_event *event)
1071 {
1072 	return trace_ctxwake_hex(iter, '+');
1073 }
1074 
1075 static enum print_line_t trace_ctxwake_bin(struct trace_iterator *iter,
1076 					   int flags, struct trace_event *event)
1077 {
1078 	struct ctx_switch_entry *field;
1079 	struct trace_seq *s = &iter->seq;
1080 
1081 	trace_assign_type(field, iter->ent);
1082 
1083 	SEQ_PUT_FIELD_RET(s, field->prev_pid);
1084 	SEQ_PUT_FIELD_RET(s, field->prev_prio);
1085 	SEQ_PUT_FIELD_RET(s, field->prev_state);
1086 	SEQ_PUT_FIELD_RET(s, field->next_pid);
1087 	SEQ_PUT_FIELD_RET(s, field->next_prio);
1088 	SEQ_PUT_FIELD_RET(s, field->next_state);
1089 
1090 	return TRACE_TYPE_HANDLED;
1091 }
1092 
1093 static struct trace_event_functions trace_ctx_funcs = {
1094 	.trace		= trace_ctx_print,
1095 	.raw		= trace_ctx_raw,
1096 	.hex		= trace_ctx_hex,
1097 	.binary		= trace_ctxwake_bin,
1098 };
1099 
1100 static struct trace_event trace_ctx_event = {
1101 	.type		= TRACE_CTX,
1102 	.funcs		= &trace_ctx_funcs,
1103 };
1104 
1105 static struct trace_event_functions trace_wake_funcs = {
1106 	.trace		= trace_wake_print,
1107 	.raw		= trace_wake_raw,
1108 	.hex		= trace_wake_hex,
1109 	.binary		= trace_ctxwake_bin,
1110 };
1111 
1112 static struct trace_event trace_wake_event = {
1113 	.type		= TRACE_WAKE,
1114 	.funcs		= &trace_wake_funcs,
1115 };
1116 
1117 /* TRACE_STACK */
1118 
1119 static enum print_line_t trace_stack_print(struct trace_iterator *iter,
1120 					   int flags, struct trace_event *event)
1121 {
1122 	struct stack_entry *field;
1123 	struct trace_seq *s = &iter->seq;
1124 	unsigned long *p;
1125 	unsigned long *end;
1126 
1127 	trace_assign_type(field, iter->ent);
1128 	end = (unsigned long *)((long)iter->ent + iter->ent_size);
1129 
1130 	if (!trace_seq_puts(s, "<stack trace>\n"))
1131 		goto partial;
1132 
1133 	for (p = field->caller; p && *p != ULONG_MAX && p < end; p++) {
1134 		if (!trace_seq_puts(s, " => "))
1135 			goto partial;
1136 
1137 		if (!seq_print_ip_sym(s, *p, flags))
1138 			goto partial;
1139 		if (!trace_seq_puts(s, "\n"))
1140 			goto partial;
1141 	}
1142 
1143 	return TRACE_TYPE_HANDLED;
1144 
1145  partial:
1146 	return TRACE_TYPE_PARTIAL_LINE;
1147 }
1148 
1149 static struct trace_event_functions trace_stack_funcs = {
1150 	.trace		= trace_stack_print,
1151 };
1152 
1153 static struct trace_event trace_stack_event = {
1154 	.type		= TRACE_STACK,
1155 	.funcs		= &trace_stack_funcs,
1156 };
1157 
1158 /* TRACE_USER_STACK */
1159 static enum print_line_t trace_user_stack_print(struct trace_iterator *iter,
1160 						int flags, struct trace_event *event)
1161 {
1162 	struct userstack_entry *field;
1163 	struct trace_seq *s = &iter->seq;
1164 
1165 	trace_assign_type(field, iter->ent);
1166 
1167 	if (!trace_seq_puts(s, "<user stack trace>\n"))
1168 		goto partial;
1169 
1170 	if (!seq_print_userip_objs(field, s, flags))
1171 		goto partial;
1172 
1173 	return TRACE_TYPE_HANDLED;
1174 
1175  partial:
1176 	return TRACE_TYPE_PARTIAL_LINE;
1177 }
1178 
1179 static struct trace_event_functions trace_user_stack_funcs = {
1180 	.trace		= trace_user_stack_print,
1181 };
1182 
1183 static struct trace_event trace_user_stack_event = {
1184 	.type		= TRACE_USER_STACK,
1185 	.funcs		= &trace_user_stack_funcs,
1186 };
1187 
1188 /* TRACE_BPRINT */
1189 static enum print_line_t
1190 trace_bprint_print(struct trace_iterator *iter, int flags,
1191 		   struct trace_event *event)
1192 {
1193 	struct trace_entry *entry = iter->ent;
1194 	struct trace_seq *s = &iter->seq;
1195 	struct bprint_entry *field;
1196 
1197 	trace_assign_type(field, entry);
1198 
1199 	if (!seq_print_ip_sym(s, field->ip, flags))
1200 		goto partial;
1201 
1202 	if (!trace_seq_puts(s, ": "))
1203 		goto partial;
1204 
1205 	if (!trace_seq_bprintf(s, field->fmt, field->buf))
1206 		goto partial;
1207 
1208 	return TRACE_TYPE_HANDLED;
1209 
1210  partial:
1211 	return TRACE_TYPE_PARTIAL_LINE;
1212 }
1213 
1214 
1215 static enum print_line_t
1216 trace_bprint_raw(struct trace_iterator *iter, int flags,
1217 		 struct trace_event *event)
1218 {
1219 	struct bprint_entry *field;
1220 	struct trace_seq *s = &iter->seq;
1221 
1222 	trace_assign_type(field, iter->ent);
1223 
1224 	if (!trace_seq_printf(s, ": %lx : ", field->ip))
1225 		goto partial;
1226 
1227 	if (!trace_seq_bprintf(s, field->fmt, field->buf))
1228 		goto partial;
1229 
1230 	return TRACE_TYPE_HANDLED;
1231 
1232  partial:
1233 	return TRACE_TYPE_PARTIAL_LINE;
1234 }
1235 
1236 static struct trace_event_functions trace_bprint_funcs = {
1237 	.trace		= trace_bprint_print,
1238 	.raw		= trace_bprint_raw,
1239 };
1240 
1241 static struct trace_event trace_bprint_event = {
1242 	.type		= TRACE_BPRINT,
1243 	.funcs		= &trace_bprint_funcs,
1244 };
1245 
1246 /* TRACE_PRINT */
1247 static enum print_line_t trace_print_print(struct trace_iterator *iter,
1248 					   int flags, struct trace_event *event)
1249 {
1250 	struct print_entry *field;
1251 	struct trace_seq *s = &iter->seq;
1252 
1253 	trace_assign_type(field, iter->ent);
1254 
1255 	if (!seq_print_ip_sym(s, field->ip, flags))
1256 		goto partial;
1257 
1258 	if (!trace_seq_printf(s, ": %s", field->buf))
1259 		goto partial;
1260 
1261 	return TRACE_TYPE_HANDLED;
1262 
1263  partial:
1264 	return TRACE_TYPE_PARTIAL_LINE;
1265 }
1266 
1267 static enum print_line_t trace_print_raw(struct trace_iterator *iter, int flags,
1268 					 struct trace_event *event)
1269 {
1270 	struct print_entry *field;
1271 
1272 	trace_assign_type(field, iter->ent);
1273 
1274 	if (!trace_seq_printf(&iter->seq, "# %lx %s", field->ip, field->buf))
1275 		goto partial;
1276 
1277 	return TRACE_TYPE_HANDLED;
1278 
1279  partial:
1280 	return TRACE_TYPE_PARTIAL_LINE;
1281 }
1282 
1283 static struct trace_event_functions trace_print_funcs = {
1284 	.trace		= trace_print_print,
1285 	.raw		= trace_print_raw,
1286 };
1287 
1288 static struct trace_event trace_print_event = {
1289 	.type	 	= TRACE_PRINT,
1290 	.funcs		= &trace_print_funcs,
1291 };
1292 
1293 
1294 static struct trace_event *events[] __initdata = {
1295 	&trace_fn_event,
1296 	&trace_ctx_event,
1297 	&trace_wake_event,
1298 	&trace_stack_event,
1299 	&trace_user_stack_event,
1300 	&trace_bprint_event,
1301 	&trace_print_event,
1302 	NULL
1303 };
1304 
1305 __init static int init_events(void)
1306 {
1307 	struct trace_event *event;
1308 	int i, ret;
1309 
1310 	for (i = 0; events[i]; i++) {
1311 		event = events[i];
1312 
1313 		ret = register_ftrace_event(event);
1314 		if (!ret) {
1315 			printk(KERN_WARNING "event %d failed to register\n",
1316 			       event->type);
1317 			WARN_ON_ONCE(1);
1318 		}
1319 	}
1320 
1321 	return 0;
1322 }
1323 device_initcall(init_events);
1324