kernel/trace/trace_output.c

   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, 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;
 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 (p->len && delim)
 314                         trace_seq_puts(p, delim);
 315                 trace_seq_puts(p, str);
 316         }
 317
 318         /* check for left over flags */
 319         if (flags) {
 320                 if (p->len && delim)
 321                         trace_seq_puts(p, delim);
 322                 trace_seq_printf(p, "0x%lx", flags);
 323         }
 324
 325         trace_seq_putc(p, 0);
 326
 327         return ret;
 328 }
 329 EXPORT_SYMBOL(ftrace_print_flags_seq);
 330
 331 const char *
 332 ftrace_print_symbols_seq(struct trace_seq *p, unsigned long val,
 333                          const struct trace_print_flags *symbol_array)
 334 {
 335         int i;
 336         const char *ret = p->buffer + p->len;
 337
 338         for (i = 0;  symbol_array[i].name; i++) {
 339
 340                 if (val != symbol_array[i].mask)
 341                         continue;
 342
 343                 trace_seq_puts(p, symbol_array[i].name);
 344                 break;
 345         }
 346
 347         if (!p->len)
 348                 trace_seq_printf(p, "0x%lx", val);
 349
 350         trace_seq_putc(p, 0);
 351
 352         return ret;
 353 }
 354 EXPORT_SYMBOL(ftrace_print_symbols_seq);
 355
 356 #if BITS_PER_LONG == 32
 357 const char *
 358 ftrace_print_symbols_seq_u64(struct trace_seq *p, unsigned long long val,
 359                          const struct trace_print_flags_u64 *symbol_array)
 360 {
 361         int i;
 362         const char *ret = p->buffer + p->len;
 363
 364         for (i = 0;  symbol_array[i].name; i++) {
 365
 366                 if (val != symbol_array[i].mask)
 367                         continue;
 368
 369                 trace_seq_puts(p, symbol_array[i].name);
 370                 break;
 371         }
 372
 373         if (!p->len)
 374                 trace_seq_printf(p, "0x%llx", val);
 375
 376         trace_seq_putc(p, 0);
 377
 378         return ret;
 379 }
 380 EXPORT_SYMBOL(ftrace_print_symbols_seq_u64);
 381 #endif
 382
 383 const char *
 384 ftrace_print_hex_seq(struct trace_seq *p, const unsigned char *buf, int buf_len)
 385 {
 386         int i;
 387         const char *ret = p->buffer + p->len;
 388
 389         for (i = 0; i < buf_len; i++)
 390                 trace_seq_printf(p, "%s%2.2x", i == 0 ? "" : " ", buf[i]);
 391
 392         trace_seq_putc(p, 0);
 393
 394         return ret;
 395 }
 396 EXPORT_SYMBOL(ftrace_print_hex_seq);
 397
 398 #ifdef CONFIG_KRETPROBES
 399 static inline const char *kretprobed(const char *name)
 400 {
 401         static const char tramp_name[] = "kretprobe_trampoline";
 402         int size = sizeof(tramp_name);
 403
 404         if (strncmp(tramp_name, name, size) == 0)
 405                 return "[unknown/kretprobe'd]";
 406         return name;
 407 }
 408 #else
 409 static inline const char *kretprobed(const char *name)
 410 {
 411         return name;
 412 }
 413 #endif /* CONFIG_KRETPROBES */
 414
 415 static int
 416 seq_print_sym_short(struct trace_seq *s, const char *fmt, unsigned long address)
 417 {
 418 #ifdef CONFIG_KALLSYMS
 419         char str[KSYM_SYMBOL_LEN];
 420         const char *name;
 421
 422         kallsyms_lookup(address, NULL, NULL, NULL, str);
 423
 424         name = kretprobed(str);
 425
 426         return trace_seq_printf(s, fmt, name);
 427 #endif
 428         return 1;
 429 }
 430
 431 static int
 432 seq_print_sym_offset(struct trace_seq *s, const char *fmt,
 433                      unsigned long address)
 434 {
 435 #ifdef CONFIG_KALLSYMS
 436         char str[KSYM_SYMBOL_LEN];
 437         const char *name;
 438
 439         sprint_symbol(str, address);
 440         name = kretprobed(str);
 441
 442         return trace_seq_printf(s, fmt, name);
 443 #endif
 444         return 1;
 445 }
 446
 447 #ifndef CONFIG_64BIT
 448 # define IP_FMT "%08lx"
 449 #else
 450 # define IP_FMT "%016lx"
 451 #endif
 452
 453 int seq_print_user_ip(struct trace_seq *s, struct mm_struct *mm,
 454                       unsigned long ip, unsigned long sym_flags)
 455 {
 456         struct file *file = NULL;
 457         unsigned long vmstart = 0;
 458         int ret = 1;
 459
 460         if (s->full)
 461                 return 0;
 462
 463         if (mm) {
 464                 const struct vm_area_struct *vma;
 465
 466                 down_read(&mm->mmap_sem);
 467                 vma = find_vma(mm, ip);
 468                 if (vma) {
 469                         file = vma->vm_file;
 470                         vmstart = vma->vm_start;
 471                 }
 472                 if (file) {
 473                         ret = trace_seq_path(s, &file->f_path);
 474                         if (ret)
 475                                 ret = trace_seq_printf(s, "[+0x%lx]",
 476                                                        ip - vmstart);
 477                 }
 478                 up_read(&mm->mmap_sem);
 479         }
 480         if (ret && ((sym_flags & TRACE_ITER_SYM_ADDR) || !file))
 481                 ret = trace_seq_printf(s, " <" IP_FMT ">", ip);
 482         return ret;
 483 }
 484
 485 int
 486 seq_print_userip_objs(const struct userstack_entry *entry, struct trace_seq *s,
 487                       unsigned long sym_flags)
 488 {
 489         struct mm_struct *mm = NULL;
 490         int ret = 1;
 491         unsigned int i;
 492
 493         if (trace_flags & TRACE_ITER_SYM_USEROBJ) {
 494                 struct task_struct *task;
 495                 /*
 496                  * we do the lookup on the thread group leader,
 497                  * since individual threads might have already quit!
 498                  */
 499                 rcu_read_lock();
 500                 task = find_task_by_vpid(entry->tgid);
 501                 if (task)
 502                         mm = get_task_mm(task);
 503                 rcu_read_unlock();
 504         }
 505
 506         for (i = 0; i < FTRACE_STACK_ENTRIES; i++) {
 507                 unsigned long ip = entry->caller[i];
 508
 509                 if (ip == ULONG_MAX || !ret)
 510                         break;
 511                 if (ret)
 512                         ret = trace_seq_puts(s, " => ");
 513                 if (!ip) {
 514                         if (ret)
 515                                 ret = trace_seq_puts(s, "??");
 516                         if (ret)
 517                                 ret = trace_seq_puts(s, "\n");
 518                         continue;
 519                 }
 520                 if (!ret)
 521                         break;
 522                 if (ret)
 523                         ret = seq_print_user_ip(s, mm, ip, sym_flags);
 524                 ret = trace_seq_puts(s, "\n");
 525         }
 526
 527         if (mm)
 528                 mmput(mm);
 529         return ret;
 530 }
 531
 532 int
 533 seq_print_ip_sym(struct trace_seq *s, unsigned long ip, unsigned long sym_flags)
 534 {
 535         int ret;
 536
 537         if (!ip)
 538                 return trace_seq_printf(s, "0");
 539
 540         if (sym_flags & TRACE_ITER_SYM_OFFSET)
 541                 ret = seq_print_sym_offset(s, "%s", ip);
 542         else
 543                 ret = seq_print_sym_short(s, "%s", ip);
 544
 545         if (!ret)
 546                 return 0;
 547
 548         if (sym_flags & TRACE_ITER_SYM_ADDR)
 549                 ret = trace_seq_printf(s, " <" IP_FMT ">", ip);
 550         return ret;
 551 }
 552
 553 /**
 554  * trace_print_lat_fmt - print the irq, preempt and lockdep fields
 555  * @s: trace seq struct to write to
 556  * @entry: The trace entry field from the ring buffer
 557  *
 558  * Prints the generic fields of irqs off, in hard or softirq, preempt
 559  * count.
 560  */
 561 int trace_print_lat_fmt(struct trace_seq *s, struct trace_entry *entry)
 562 {
 563         char hardsoft_irq;
 564         char need_resched;
 565         char irqs_off;
 566         int hardirq;
 567         int softirq;
 568         int ret;
 569
 570         hardirq = entry->flags & TRACE_FLAG_HARDIRQ;
 571         softirq = entry->flags & TRACE_FLAG_SOFTIRQ;
 572
 573         irqs_off =
 574                 (entry->flags & TRACE_FLAG_IRQS_OFF) ? 'd' :
 575                 (entry->flags & TRACE_FLAG_IRQS_NOSUPPORT) ? 'X' :
 576                 '.';
 577         need_resched =
 578                 (entry->flags & TRACE_FLAG_NEED_RESCHED) ? 'N' : '.';
 579         hardsoft_irq =
 580                 (hardirq && softirq) ? 'H' :
 581                 hardirq ? 'h' :
 582                 softirq ? 's' :
 583                 '.';
 584
 585         if (!trace_seq_printf(s, "%c%c%c",
 586                               irqs_off, need_resched, hardsoft_irq))
 587                 return 0;
 588
 589         if (entry->preempt_count)
 590                 ret = trace_seq_printf(s, "%x", entry->preempt_count);
 591         else
 592                 ret = trace_seq_putc(s, '.');
 593
 594         return ret;
 595 }
 596
 597 static int
 598 lat_print_generic(struct trace_seq *s, struct trace_entry *entry, int cpu)
 599 {
 600         char comm[TASK_COMM_LEN];
 601
 602         trace_find_cmdline(entry->pid, comm);
 603
 604         if (!trace_seq_printf(s, "%8.8s-%-5d %3d",
 605                               comm, entry->pid, cpu))
 606                 return 0;
 607
 608         return trace_print_lat_fmt(s, entry);
 609 }
 610
 611 static unsigned long preempt_mark_thresh = 100;
 612
 613 static int
 614 lat_print_timestamp(struct trace_seq *s, u64 abs_usecs,
 615                     unsigned long rel_usecs)
 616 {
 617         return trace_seq_printf(s, " %4lldus%c: ", abs_usecs,
 618                                 rel_usecs > preempt_mark_thresh ? '!' :
 619                                   rel_usecs > 1 ? '+' : ' ');
 620 }
 621
 622 int trace_print_context(struct trace_iterator *iter)
 623 {
 624         struct trace_seq *s = &iter->seq;
 625         struct trace_entry *entry = iter->ent;
 626         unsigned long long t = ns2usecs(iter->ts);
 627         unsigned long usec_rem = do_div(t, USEC_PER_SEC);
 628         unsigned long secs = (unsigned long)t;
 629         char comm[TASK_COMM_LEN];
 630
 631         trace_find_cmdline(entry->pid, comm);
 632
 633         return trace_seq_printf(s, "%16s-%-5d [%03d] %5lu.%06lu: ",
 634                                 comm, entry->pid, iter->cpu, secs, usec_rem);
 635 }
 636
 637 int trace_print_lat_context(struct trace_iterator *iter)
 638 {
 639         u64 next_ts;
 640         int ret;
 641         /* trace_find_next_entry will reset ent_size */
 642         int ent_size = iter->ent_size;
 643         struct trace_seq *s = &iter->seq;
 644         struct trace_entry *entry = iter->ent,
 645                            *next_entry = trace_find_next_entry(iter, NULL,
 646                                                                &next_ts);
 647         unsigned long verbose = (trace_flags & TRACE_ITER_VERBOSE);
 648         unsigned long abs_usecs = ns2usecs(iter->ts - iter->tr->time_start);
 649         unsigned long rel_usecs;
 650
 651         /* Restore the original ent_size */
 652         iter->ent_size = ent_size;
 653
 654         if (!next_entry)
 655                 next_ts = iter->ts;
 656         rel_usecs = ns2usecs(next_ts - iter->ts);
 657
 658         if (verbose) {
 659                 char comm[TASK_COMM_LEN];
 660
 661                 trace_find_cmdline(entry->pid, comm);
 662
 663                 ret = trace_seq_printf(s, "%16s %5d %3d %d %08x %08lx [%08llx]"
 664                                        " %ld.%03ldms (+%ld.%03ldms): ", comm,
 665                                        entry->pid, iter->cpu, entry->flags,
 666                                        entry->preempt_count, iter->idx,
 667                                        ns2usecs(iter->ts),
 668                                        abs_usecs / USEC_PER_MSEC,
 669                                        abs_usecs % USEC_PER_MSEC,
 670                                        rel_usecs / USEC_PER_MSEC,
 671                                        rel_usecs % USEC_PER_MSEC);
 672         } else {
 673                 ret = lat_print_generic(s, entry, iter->cpu);
 674                 if (ret)
 675                         ret = lat_print_timestamp(s, abs_usecs, rel_usecs);
 676         }
 677
 678         return ret;
 679 }
 680
 681 static const char state_to_char[] = TASK_STATE_TO_CHAR_STR;
 682
 683 static int task_state_char(unsigned long state)
 684 {
 685         int bit = state ? __ffs(state) + 1 : 0;
 686
 687         return bit < sizeof(state_to_char) - 1 ? state_to_char[bit] : '?';
 688 }
 689
 690 /**
 691  * ftrace_find_event - find a registered event
 692  * @type: the type of event to look for
 693  *
 694  * Returns an event of type @type otherwise NULL
 695  * Called with trace_event_read_lock() held.
 696  */
 697 struct trace_event *ftrace_find_event(int type)
 698 {
 699         struct trace_event *event;
 700         struct hlist_node *n;
 701         unsigned key;
 702
 703         key = type & (EVENT_HASHSIZE - 1);
 704
 705         hlist_for_each_entry(event, n, &event_hash[key], node) {
 706                 if (event->type == type)
 707                         return event;
 708         }
 709
 710         return NULL;
 711 }
 712
 713 static LIST_HEAD(ftrace_event_list);
 714
 715 static int trace_search_list(struct list_head **list)
 716 {
 717         struct trace_event *e;
 718         int last = __TRACE_LAST_TYPE;
 719
 720         if (list_empty(&ftrace_event_list)) {
 721                 *list = &ftrace_event_list;
 722                 return last + 1;
 723         }
 724
 725         /*
 726          * We used up all possible max events,
 727          * lets see if somebody freed one.
 728          */
 729         list_for_each_entry(e, &ftrace_event_list, list) {
 730                 if (e->type != last + 1)
 731                         break;
 732                 last++;
 733         }
 734
 735         /* Did we used up all 65 thousand events??? */
 736         if ((last + 1) > FTRACE_MAX_EVENT)
 737                 return 0;
 738
 739         *list = &e->list;
 740         return last + 1;
 741 }
 742
 743 void trace_event_read_lock(void)
 744 {
 745         down_read(&trace_event_mutex);
 746 }
 747
 748 void trace_event_read_unlock(void)
 749 {
 750         up_read(&trace_event_mutex);
 751 }
 752
 753 /**
 754  * register_ftrace_event - register output for an event type
 755  * @event: the event type to register
 756  *
 757  * Event types are stored in a hash and this hash is used to
 758  * find a way to print an event. If the @event->type is set
 759  * then it will use that type, otherwise it will assign a
 760  * type to use.
 761  *
 762  * If you assign your own type, please make sure it is added
 763  * to the trace_type enum in trace.h, to avoid collisions
 764  * with the dynamic types.
 765  *
 766  * Returns the event type number or zero on error.
 767  */
 768 int register_ftrace_event(struct trace_event *event)
 769 {
 770         unsigned key;
 771         int ret = 0;
 772
 773         down_write(&trace_event_mutex);
 774
 775         if (WARN_ON(!event))
 776                 goto out;
 777
 778         if (WARN_ON(!event->funcs))
 779                 goto out;
 780
 781         INIT_LIST_HEAD(&event->list);
 782
 783         if (!event->type) {
 784                 struct list_head *list = NULL;
 785
 786                 if (next_event_type > FTRACE_MAX_EVENT) {
 787
 788                         event->type = trace_search_list(&list);
 789                         if (!event->type)
 790                                 goto out;
 791
 792                 } else {
 793
 794                         event->type = next_event_type++;
 795                         list = &ftrace_event_list;
 796                 }
 797
 798                 if (WARN_ON(ftrace_find_event(event->type)))
 799                         goto out;
 800
 801                 list_add_tail(&event->list, list);
 802
 803         } else if (event->type > __TRACE_LAST_TYPE) {
 804                 printk(KERN_WARNING "Need to add type to trace.h\n");
 805                 WARN_ON(1);
 806                 goto out;
 807         } else {
 808                 /* Is this event already used */
 809                 if (ftrace_find_event(event->type))
 810                         goto out;
 811         }
 812
 813         if (event->funcs->trace == NULL)
 814                 event->funcs->trace = trace_nop_print;
 815         if (event->funcs->raw == NULL)
 816                 event->funcs->raw = trace_nop_print;
 817         if (event->funcs->hex == NULL)
 818                 event->funcs->hex = trace_nop_print;
 819         if (event->funcs->binary == NULL)
 820                 event->funcs->binary = trace_nop_print;
 821
 822         key = event->type & (EVENT_HASHSIZE - 1);
 823
 824         hlist_add_head(&event->node, &event_hash[key]);
 825
 826         ret = event->type;
 827  out:
 828         up_write(&trace_event_mutex);
 829
 830         return ret;
 831 }
 832 EXPORT_SYMBOL_GPL(register_ftrace_event);
 833
 834 /*
 835  * Used by module code with the trace_event_mutex held for write.
 836  */
 837 int __unregister_ftrace_event(struct trace_event *event)
 838 {
 839         hlist_del(&event->node);
 840         list_del(&event->list);
 841         return 0;
 842 }
 843
 844 /**
 845  * unregister_ftrace_event - remove a no longer used event
 846  * @event: the event to remove
 847  */
 848 int unregister_ftrace_event(struct trace_event *event)
 849 {
 850         down_write(&trace_event_mutex);
 851         __unregister_ftrace_event(event);
 852         up_write(&trace_event_mutex);
 853
 854         return 0;
 855 }
 856 EXPORT_SYMBOL_GPL(unregister_ftrace_event);
 857
 858 /*
 859  * Standard events
 860  */
 861
 862 enum print_line_t trace_nop_print(struct trace_iterator *iter, int flags,
 863                                   struct trace_event *event)
 864 {
 865         if (!trace_seq_printf(&iter->seq, "type: %d\n", iter->ent->type))
 866                 return TRACE_TYPE_PARTIAL_LINE;
 867
 868         return TRACE_TYPE_HANDLED;
 869 }
 870
 871 /* TRACE_FN */
 872 static enum print_line_t trace_fn_trace(struct trace_iterator *iter, int flags,
 873                                         struct trace_event *event)
 874 {
 875         struct ftrace_entry *field;
 876         struct trace_seq *s = &iter->seq;
 877
 878         trace_assign_type(field, iter->ent);
 879
 880         if (!seq_print_ip_sym(s, field->ip, flags))
 881                 goto partial;
 882
 883         if ((flags & TRACE_ITER_PRINT_PARENT) && field->parent_ip) {
 884                 if (!trace_seq_printf(s, " <-"))
 885                         goto partial;
 886                 if (!seq_print_ip_sym(s,
 887                                       field->parent_ip,
 888                                       flags))
 889                         goto partial;
 890         }
 891         if (!trace_seq_printf(s, "\n"))
 892                 goto partial;
 893
 894         return TRACE_TYPE_HANDLED;
 895
 896  partial:
 897         return TRACE_TYPE_PARTIAL_LINE;
 898 }
 899
 900 static enum print_line_t trace_fn_raw(struct trace_iterator *iter, int flags,
 901                                       struct trace_event *event)
 902 {
 903         struct ftrace_entry *field;
 904
 905         trace_assign_type(field, iter->ent);
 906
 907         if (!trace_seq_printf(&iter->seq, "%lx %lx\n",
 908                               field->ip,
 909                               field->parent_ip))
 910                 return TRACE_TYPE_PARTIAL_LINE;
 911
 912         return TRACE_TYPE_HANDLED;
 913 }
 914
 915 static enum print_line_t trace_fn_hex(struct trace_iterator *iter, int flags,
 916                                       struct trace_event *event)
 917 {
 918         struct ftrace_entry *field;
 919         struct trace_seq *s = &iter->seq;
 920
 921         trace_assign_type(field, iter->ent);
 922
 923         SEQ_PUT_HEX_FIELD_RET(s, field->ip);
 924         SEQ_PUT_HEX_FIELD_RET(s, field->parent_ip);
 925
 926         return TRACE_TYPE_HANDLED;
 927 }
 928
 929 static enum print_line_t trace_fn_bin(struct trace_iterator *iter, int flags,
 930                                       struct trace_event *event)
 931 {
 932         struct ftrace_entry *field;
 933         struct trace_seq *s = &iter->seq;
 934
 935         trace_assign_type(field, iter->ent);
 936
 937         SEQ_PUT_FIELD_RET(s, field->ip);
 938         SEQ_PUT_FIELD_RET(s, field->parent_ip);
 939
 940         return TRACE_TYPE_HANDLED;
 941 }
 942
 943 static struct trace_event_functions trace_fn_funcs = {
 944         .trace          = trace_fn_trace,
 945         .raw            = trace_fn_raw,
 946         .hex            = trace_fn_hex,
 947         .binary         = trace_fn_bin,
 948 };
 949
 950 static struct trace_event trace_fn_event = {
 951         .type           = TRACE_FN,
 952         .funcs          = &trace_fn_funcs,
 953 };
 954
 955 /* TRACE_CTX an TRACE_WAKE */
 956 static enum print_line_t trace_ctxwake_print(struct trace_iterator *iter,
 957                                              char *delim)
 958 {
 959         struct ctx_switch_entry *field;
 960         char comm[TASK_COMM_LEN];
 961         int S, T;
 962
 963
 964         trace_assign_type(field, iter->ent);
 965
 966         T = task_state_char(field->next_state);
 967         S = task_state_char(field->prev_state);
 968         trace_find_cmdline(field->next_pid, comm);
 969         if (!trace_seq_printf(&iter->seq,
 970                               " %5d:%3d:%c %s [%03d] %5d:%3d:%c %s\n",
 971                               field->prev_pid,
 972                               field->prev_prio,
 973                               S, delim,
 974                               field->next_cpu,
 975                               field->next_pid,
 976                               field->next_prio,
 977                               T, comm))
 978                 return TRACE_TYPE_PARTIAL_LINE;
 979
 980         return TRACE_TYPE_HANDLED;
 981 }
 982
 983 static enum print_line_t trace_ctx_print(struct trace_iterator *iter, int flags,
 984                                          struct trace_event *event)
 985 {
 986         return trace_ctxwake_print(iter, "==>");
 987 }
 988
 989 static enum print_line_t trace_wake_print(struct trace_iterator *iter,
 990                                           int flags, struct trace_event *event)
 991 {
 992         return trace_ctxwake_print(iter, "  +");
 993 }
 994
 995 static int trace_ctxwake_raw(struct trace_iterator *iter, char S)
 996 {
 997         struct ctx_switch_entry *field;
 998         int T;
 999
1000         trace_assign_type(field, iter->ent);
1001
1002         if (!S)
1003                 S = task_state_char(field->prev_state);
1004         T = task_state_char(field->next_state);
1005         if (!trace_seq_printf(&iter->seq, "%d %d %c %d %d %d %c\n",
1006                               field->prev_pid,
1007                               field->prev_prio,
1008                               S,
1009                               field->next_cpu,
1010                               field->next_pid,
1011                               field->next_prio,
1012                               T))
1013                 return TRACE_TYPE_PARTIAL_LINE;
1014
1015         return TRACE_TYPE_HANDLED;
1016 }
1017
1018 static enum print_line_t trace_ctx_raw(struct trace_iterator *iter, int flags,
1019                                        struct trace_event *event)
1020 {
1021         return trace_ctxwake_raw(iter, 0);
1022 }
1023
1024 static enum print_line_t trace_wake_raw(struct trace_iterator *iter, int flags,
1025                                         struct trace_event *event)
1026 {
1027         return trace_ctxwake_raw(iter, '+');
1028 }
1029
1030
1031 static int trace_ctxwake_hex(struct trace_iterator *iter, char S)
1032 {
1033         struct ctx_switch_entry *field;
1034         struct trace_seq *s = &iter->seq;
1035         int T;
1036
1037         trace_assign_type(field, iter->ent);
1038
1039         if (!S)
1040                 S = task_state_char(field->prev_state);
1041         T = task_state_char(field->next_state);
1042
1043         SEQ_PUT_HEX_FIELD_RET(s, field->prev_pid);
1044         SEQ_PUT_HEX_FIELD_RET(s, field->prev_prio);
1045         SEQ_PUT_HEX_FIELD_RET(s, S);
1046         SEQ_PUT_HEX_FIELD_RET(s, field->next_cpu);
1047         SEQ_PUT_HEX_FIELD_RET(s, field->next_pid);
1048         SEQ_PUT_HEX_FIELD_RET(s, field->next_prio);
1049         SEQ_PUT_HEX_FIELD_RET(s, T);
1050
1051         return TRACE_TYPE_HANDLED;
1052 }
1053
1054 static enum print_line_t trace_ctx_hex(struct trace_iterator *iter, int flags,
1055                                        struct trace_event *event)
1056 {
1057         return trace_ctxwake_hex(iter, 0);
1058 }
1059
1060 static enum print_line_t trace_wake_hex(struct trace_iterator *iter, int flags,
1061                                         struct trace_event *event)
1062 {
1063         return trace_ctxwake_hex(iter, '+');
1064 }
1065
1066 static enum print_line_t trace_ctxwake_bin(struct trace_iterator *iter,
1067                                            int flags, struct trace_event *event)
1068 {
1069         struct ctx_switch_entry *field;
1070         struct trace_seq *s = &iter->seq;
1071
1072         trace_assign_type(field, iter->ent);
1073
1074         SEQ_PUT_FIELD_RET(s, field->prev_pid);
1075         SEQ_PUT_FIELD_RET(s, field->prev_prio);
1076         SEQ_PUT_FIELD_RET(s, field->prev_state);
1077         SEQ_PUT_FIELD_RET(s, field->next_pid);
1078         SEQ_PUT_FIELD_RET(s, field->next_prio);
1079         SEQ_PUT_FIELD_RET(s, field->next_state);
1080
1081         return TRACE_TYPE_HANDLED;
1082 }
1083
1084 static struct trace_event_functions trace_ctx_funcs = {
1085         .trace          = trace_ctx_print,
1086         .raw            = trace_ctx_raw,
1087         .hex            = trace_ctx_hex,
1088         .binary         = trace_ctxwake_bin,
1089 };
1090
1091 static struct trace_event trace_ctx_event = {
1092         .type           = TRACE_CTX,
1093         .funcs          = &trace_ctx_funcs,
1094 };
1095
1096 static struct trace_event_functions trace_wake_funcs = {
1097         .trace          = trace_wake_print,
1098         .raw            = trace_wake_raw,
1099         .hex            = trace_wake_hex,
1100         .binary         = trace_ctxwake_bin,
1101 };
1102
1103 static struct trace_event trace_wake_event = {
1104         .type           = TRACE_WAKE,
1105         .funcs          = &trace_wake_funcs,
1106 };
1107
1108 /* TRACE_STACK */
1109
1110 static enum print_line_t trace_stack_print(struct trace_iterator *iter,
1111                                            int flags, struct trace_event *event)
1112 {
1113         struct stack_entry *field;
1114         struct trace_seq *s = &iter->seq;
1115         unsigned long *p;
1116         unsigned long *end;
1117
1118         trace_assign_type(field, iter->ent);
1119         end = (unsigned long *)((long)iter->ent + iter->ent_size);
1120
1121         if (!trace_seq_puts(s, "<stack trace>\n"))
1122                 goto partial;
1123
1124         for (p = field->caller; p && *p != ULONG_MAX && p < end; p++) {
1125                 if (!trace_seq_puts(s, " => "))
1126                         goto partial;
1127
1128                 if (!seq_print_ip_sym(s, *p, flags))
1129                         goto partial;
1130                 if (!trace_seq_puts(s, "\n"))
1131                         goto partial;
1132         }
1133
1134         return TRACE_TYPE_HANDLED;
1135
1136  partial:
1137         return TRACE_TYPE_PARTIAL_LINE;
1138 }
1139
1140 static struct trace_event_functions trace_stack_funcs = {
1141         .trace          = trace_stack_print,
1142 };
1143
1144 static struct trace_event trace_stack_event = {
1145         .type           = TRACE_STACK,
1146         .funcs          = &trace_stack_funcs,
1147 };
1148
1149 /* TRACE_USER_STACK */
1150 static enum print_line_t trace_user_stack_print(struct trace_iterator *iter,
1151                                                 int flags, struct trace_event *event)
1152 {
1153         struct userstack_entry *field;
1154         struct trace_seq *s = &iter->seq;
1155
1156         trace_assign_type(field, iter->ent);
1157
1158         if (!trace_seq_puts(s, "<user stack trace>\n"))
1159                 goto partial;
1160
1161         if (!seq_print_userip_objs(field, s, flags))
1162                 goto partial;
1163
1164         return TRACE_TYPE_HANDLED;
1165
1166  partial:
1167         return TRACE_TYPE_PARTIAL_LINE;
1168 }
1169
1170 static struct trace_event_functions trace_user_stack_funcs = {
1171         .trace          = trace_user_stack_print,
1172 };
1173
1174 static struct trace_event trace_user_stack_event = {
1175         .type           = TRACE_USER_STACK,
1176         .funcs          = &trace_user_stack_funcs,
1177 };
1178
1179 /* TRACE_BPRINT */
1180 static enum print_line_t
1181 trace_bprint_print(struct trace_iterator *iter, int flags,
1182                    struct trace_event *event)
1183 {
1184         struct trace_entry *entry = iter->ent;
1185         struct trace_seq *s = &iter->seq;
1186         struct bprint_entry *field;
1187
1188         trace_assign_type(field, entry);
1189
1190         if (!seq_print_ip_sym(s, field->ip, flags))
1191                 goto partial;
1192
1193         if (!trace_seq_puts(s, ": "))
1194                 goto partial;
1195
1196         if (!trace_seq_bprintf(s, field->fmt, field->buf))
1197                 goto partial;
1198
1199         return TRACE_TYPE_HANDLED;
1200
1201  partial:
1202         return TRACE_TYPE_PARTIAL_LINE;
1203 }
1204
1205
1206 static enum print_line_t
1207 trace_bprint_raw(struct trace_iterator *iter, int flags,
1208                  struct trace_event *event)
1209 {
1210         struct bprint_entry *field;
1211         struct trace_seq *s = &iter->seq;
1212
1213         trace_assign_type(field, iter->ent);
1214
1215         if (!trace_seq_printf(s, ": %lx : ", field->ip))
1216                 goto partial;
1217
1218         if (!trace_seq_bprintf(s, field->fmt, field->buf))
1219                 goto partial;
1220
1221         return TRACE_TYPE_HANDLED;
1222
1223  partial:
1224         return TRACE_TYPE_PARTIAL_LINE;
1225 }
1226
1227 static struct trace_event_functions trace_bprint_funcs = {
1228         .trace          = trace_bprint_print,
1229         .raw            = trace_bprint_raw,
1230 };
1231
1232 static struct trace_event trace_bprint_event = {
1233         .type           = TRACE_BPRINT,
1234         .funcs          = &trace_bprint_funcs,
1235 };
1236
1237 /* TRACE_PRINT */
1238 static enum print_line_t trace_print_print(struct trace_iterator *iter,
1239                                            int flags, struct trace_event *event)
1240 {
1241         struct print_entry *field;
1242         struct trace_seq *s = &iter->seq;
1243
1244         trace_assign_type(field, iter->ent);
1245
1246         if (!seq_print_ip_sym(s, field->ip, flags))
1247                 goto partial;
1248
1249         if (!trace_seq_printf(s, ": %s", field->buf))
1250                 goto partial;
1251
1252         return TRACE_TYPE_HANDLED;
1253
1254  partial:
1255         return TRACE_TYPE_PARTIAL_LINE;
1256 }
1257
1258 static enum print_line_t trace_print_raw(struct trace_iterator *iter, int flags,
1259                                          struct trace_event *event)
1260 {
1261         struct print_entry *field;
1262
1263         trace_assign_type(field, iter->ent);
1264
1265         if (!trace_seq_printf(&iter->seq, "# %lx %s", field->ip, field->buf))
1266                 goto partial;
1267
1268         return TRACE_TYPE_HANDLED;
1269
1270  partial:
1271         return TRACE_TYPE_PARTIAL_LINE;
1272 }
1273
1274 static struct trace_event_functions trace_print_funcs = {
1275         .trace          = trace_print_print,
1276         .raw            = trace_print_raw,
1277 };
1278
1279 static struct trace_event trace_print_event = {
1280         .type           = TRACE_PRINT,
1281         .funcs          = &trace_print_funcs,
1282 };
1283
1284
1285 static struct trace_event *events[] __initdata = {
1286         &trace_fn_event,
1287         &trace_ctx_event,
1288         &trace_wake_event,
1289         &trace_stack_event,
1290         &trace_user_stack_event,
1291         &trace_bprint_event,
1292         &trace_print_event,
1293         NULL
1294 };
1295
1296 __init static int init_events(void)
1297 {
1298         struct trace_event *event;
1299         int i, ret;
1300
1301         for (i = 0; events[i]; i++) {
1302                 event = events[i];
1303
1304                 ret = register_ftrace_event(event);
1305                 if (!ret) {
1306                         printk(KERN_WARNING "event %d failed to register\n",
1307                                event->type);
1308                         WARN_ON_ONCE(1);
1309                 }
1310         }
1311
1312         return 0;
1313 }
1314 device_initcall(init_events);