1aaf045f7SSteven Rostedt /* 2aaf045f7SSteven Rostedt * Copyright (C) 2009, Steven Rostedt <srostedt@redhat.com> 3aaf045f7SSteven Rostedt * 4aaf045f7SSteven Rostedt * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 5aaf045f7SSteven Rostedt * 6aaf045f7SSteven Rostedt * This program is free software; you can redistribute it and/or modify 7aaf045f7SSteven Rostedt * it under the terms of the GNU General Public License as published by 8aaf045f7SSteven Rostedt * the Free Software Foundation; version 2 of the License (not later!) 9aaf045f7SSteven Rostedt * 10aaf045f7SSteven Rostedt * This program is distributed in the hope that it will be useful, 11aaf045f7SSteven Rostedt * but WITHOUT ANY WARRANTY; without even the implied warranty of 12aaf045f7SSteven Rostedt * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13aaf045f7SSteven Rostedt * GNU General Public License for more details. 14aaf045f7SSteven Rostedt * 15aaf045f7SSteven Rostedt * You should have received a copy of the GNU General Public License 16aaf045f7SSteven Rostedt * along with this program; if not, write to the Free Software 17aaf045f7SSteven Rostedt * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA 18aaf045f7SSteven Rostedt * 19aaf045f7SSteven Rostedt * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 20aaf045f7SSteven Rostedt */ 21aaf045f7SSteven Rostedt #include <stdio.h> 22aaf045f7SSteven Rostedt #include <stdlib.h> 23aaf045f7SSteven Rostedt #include <string.h> 24aaf045f7SSteven Rostedt #include <ctype.h> 25aaf045f7SSteven Rostedt #include <errno.h> 26aaf045f7SSteven Rostedt 271ef2ed10SFrederic Weisbecker #include "../perf.h" 28ea4010d1SSteven Rostedt #include "util.h" 29ea4010d1SSteven Rostedt #include "trace-event.h" 30ea4010d1SSteven Rostedt 31aaf045f7SSteven Rostedt int header_page_size_size; 32aaf045f7SSteven Rostedt int header_page_ts_size; 33aaf045f7SSteven Rostedt int header_page_data_offset; 34aaf045f7SSteven Rostedt 35aaf045f7SSteven Rostedt struct pevent *perf_pevent; 36aaf045f7SSteven Rostedt static struct pevent *pevent; 37aaf045f7SSteven Rostedt 38aaf045f7SSteven Rostedt bool latency_format; 39aaf045f7SSteven Rostedt 40aaf045f7SSteven Rostedt int read_trace_init(int file_bigendian, int host_bigendian) 417397d80dSTom Zanussi { 42aaf045f7SSteven Rostedt if (pevent) 43aaf045f7SSteven Rostedt return 0; 44aaf045f7SSteven Rostedt 45aaf045f7SSteven Rostedt perf_pevent = pevent_alloc(); 46aaf045f7SSteven Rostedt pevent = perf_pevent; 47aaf045f7SSteven Rostedt 484dc1024aSSteven Rostedt pevent_set_flag(pevent, PEVENT_NSEC_OUTPUT); 49aaf045f7SSteven Rostedt pevent_set_file_bigendian(pevent, file_bigendian); 50aaf045f7SSteven Rostedt pevent_set_host_bigendian(pevent, host_bigendian); 51aaf045f7SSteven Rostedt 52aaf045f7SSteven Rostedt return 0; 537397d80dSTom Zanussi } 547397d80dSTom Zanussi 55aaf045f7SSteven Rostedt static int get_common_field(struct scripting_context *context, 56aaf045f7SSteven Rostedt int *offset, int *size, const char *type) 577397d80dSTom Zanussi { 58aaf045f7SSteven Rostedt struct event_format *event; 59aaf045f7SSteven Rostedt struct format_field *field; 60aaf045f7SSteven Rostedt 61aaf045f7SSteven Rostedt if (!*size) { 62aaf045f7SSteven Rostedt if (!pevent->events) 63aaf045f7SSteven Rostedt return 0; 64aaf045f7SSteven Rostedt 65aaf045f7SSteven Rostedt event = pevent->events[0]; 66aaf045f7SSteven Rostedt field = pevent_find_common_field(event, type); 67aaf045f7SSteven Rostedt if (!field) 68aaf045f7SSteven Rostedt return 0; 69aaf045f7SSteven Rostedt *offset = field->offset; 70aaf045f7SSteven Rostedt *size = field->size; 71aaf045f7SSteven Rostedt } 72aaf045f7SSteven Rostedt 73aaf045f7SSteven Rostedt return pevent_read_number(pevent, context->event_data + *offset, *size); 747397d80dSTom Zanussi } 757397d80dSTom Zanussi 767397d80dSTom Zanussi int common_lock_depth(struct scripting_context *context) 777397d80dSTom Zanussi { 78aaf045f7SSteven Rostedt static int offset; 79aaf045f7SSteven Rostedt static int size; 80aaf045f7SSteven Rostedt int ret; 81aaf045f7SSteven Rostedt 82aaf045f7SSteven Rostedt ret = get_common_field(context, &size, &offset, 83aaf045f7SSteven Rostedt "common_lock_depth"); 84aaf045f7SSteven Rostedt if (ret < 0) 85aaf045f7SSteven Rostedt return -1; 86aaf045f7SSteven Rostedt 87aaf045f7SSteven Rostedt return ret; 88aaf045f7SSteven Rostedt } 89aaf045f7SSteven Rostedt 90aaf045f7SSteven Rostedt int common_flags(struct scripting_context *context) 91aaf045f7SSteven Rostedt { 92aaf045f7SSteven Rostedt static int offset; 93aaf045f7SSteven Rostedt static int size; 94aaf045f7SSteven Rostedt int ret; 95aaf045f7SSteven Rostedt 96aaf045f7SSteven Rostedt ret = get_common_field(context, &size, &offset, 97aaf045f7SSteven Rostedt "common_flags"); 98aaf045f7SSteven Rostedt if (ret < 0) 99aaf045f7SSteven Rostedt return -1; 100aaf045f7SSteven Rostedt 101aaf045f7SSteven Rostedt return ret; 102aaf045f7SSteven Rostedt } 103aaf045f7SSteven Rostedt 104aaf045f7SSteven Rostedt int common_pc(struct scripting_context *context) 105aaf045f7SSteven Rostedt { 106aaf045f7SSteven Rostedt static int offset; 107aaf045f7SSteven Rostedt static int size; 108aaf045f7SSteven Rostedt int ret; 109aaf045f7SSteven Rostedt 110aaf045f7SSteven Rostedt ret = get_common_field(context, &size, &offset, 111aaf045f7SSteven Rostedt "common_preempt_count"); 112aaf045f7SSteven Rostedt if (ret < 0) 113aaf045f7SSteven Rostedt return -1; 114aaf045f7SSteven Rostedt 115aaf045f7SSteven Rostedt return ret; 116aaf045f7SSteven Rostedt } 117aaf045f7SSteven Rostedt 118aaf045f7SSteven Rostedt unsigned long long 119aaf045f7SSteven Rostedt raw_field_value(struct event_format *event, const char *name, void *data) 120aaf045f7SSteven Rostedt { 121aaf045f7SSteven Rostedt struct format_field *field; 122aaf045f7SSteven Rostedt unsigned long long val; 123aaf045f7SSteven Rostedt 124aaf045f7SSteven Rostedt field = pevent_find_any_field(event, name); 125aaf045f7SSteven Rostedt if (!field) 126aaf045f7SSteven Rostedt return 0ULL; 127aaf045f7SSteven Rostedt 128aaf045f7SSteven Rostedt pevent_read_number_field(field, data, &val); 129aaf045f7SSteven Rostedt 130aaf045f7SSteven Rostedt return val; 131aaf045f7SSteven Rostedt } 132aaf045f7SSteven Rostedt 133aaf045f7SSteven Rostedt void *raw_field_ptr(struct event_format *event, const char *name, void *data) 134aaf045f7SSteven Rostedt { 135aaf045f7SSteven Rostedt struct format_field *field; 136aaf045f7SSteven Rostedt 137aaf045f7SSteven Rostedt field = pevent_find_any_field(event, name); 138aaf045f7SSteven Rostedt if (!field) 139aaf045f7SSteven Rostedt return NULL; 140aaf045f7SSteven Rostedt 141aaf045f7SSteven Rostedt if (field->flags & FIELD_IS_DYNAMIC) { 142aaf045f7SSteven Rostedt int offset; 143aaf045f7SSteven Rostedt 144aaf045f7SSteven Rostedt offset = *(int *)(data + field->offset); 145aaf045f7SSteven Rostedt offset &= 0xffff; 146aaf045f7SSteven Rostedt 147aaf045f7SSteven Rostedt return data + offset; 148aaf045f7SSteven Rostedt } 149aaf045f7SSteven Rostedt 150aaf045f7SSteven Rostedt return data + field->offset; 151aaf045f7SSteven Rostedt } 152aaf045f7SSteven Rostedt 153aaf045f7SSteven Rostedt int trace_parse_common_type(void *data) 154aaf045f7SSteven Rostedt { 1551c698186SSteven Rostedt struct pevent_record record; 156aaf045f7SSteven Rostedt 157aaf045f7SSteven Rostedt record.data = data; 158aaf045f7SSteven Rostedt return pevent_data_type(pevent, &record); 159aaf045f7SSteven Rostedt } 160aaf045f7SSteven Rostedt 161aaf045f7SSteven Rostedt int trace_parse_common_pid(void *data) 162aaf045f7SSteven Rostedt { 1631c698186SSteven Rostedt struct pevent_record record; 164aaf045f7SSteven Rostedt 165aaf045f7SSteven Rostedt record.data = data; 166aaf045f7SSteven Rostedt return pevent_data_pid(pevent, &record); 167aaf045f7SSteven Rostedt } 168aaf045f7SSteven Rostedt 169aaf045f7SSteven Rostedt unsigned long long read_size(void *ptr, int size) 170aaf045f7SSteven Rostedt { 171aaf045f7SSteven Rostedt return pevent_read_number(pevent, ptr, size); 172aaf045f7SSteven Rostedt } 173aaf045f7SSteven Rostedt 174aaf045f7SSteven Rostedt struct event_format *trace_find_event(int type) 175aaf045f7SSteven Rostedt { 176aaf045f7SSteven Rostedt return pevent_find_event(pevent, type); 177aaf045f7SSteven Rostedt } 178aaf045f7SSteven Rostedt 179aaf045f7SSteven Rostedt 180aaf045f7SSteven Rostedt void print_trace_event(int cpu, void *data, int size) 181aaf045f7SSteven Rostedt { 182aaf045f7SSteven Rostedt struct event_format *event; 1831c698186SSteven Rostedt struct pevent_record record; 184aaf045f7SSteven Rostedt struct trace_seq s; 185aaf045f7SSteven Rostedt int type; 186aaf045f7SSteven Rostedt 187aaf045f7SSteven Rostedt type = trace_parse_common_type(data); 188aaf045f7SSteven Rostedt 189aaf045f7SSteven Rostedt event = trace_find_event(type); 190aaf045f7SSteven Rostedt if (!event) { 191aaf045f7SSteven Rostedt warning("ug! no event found for type %d", type); 192aaf045f7SSteven Rostedt return; 193aaf045f7SSteven Rostedt } 194aaf045f7SSteven Rostedt 195aaf045f7SSteven Rostedt memset(&record, 0, sizeof(record)); 196aaf045f7SSteven Rostedt record.cpu = cpu; 197aaf045f7SSteven Rostedt record.size = size; 198aaf045f7SSteven Rostedt record.data = data; 199aaf045f7SSteven Rostedt 200aaf045f7SSteven Rostedt trace_seq_init(&s); 201aaf045f7SSteven Rostedt pevent_print_event(pevent, &s, &record); 202aaf045f7SSteven Rostedt trace_seq_do_printf(&s); 203aaf045f7SSteven Rostedt printf("\n"); 204aaf045f7SSteven Rostedt } 205aaf045f7SSteven Rostedt 206aaf045f7SSteven Rostedt void print_event(int cpu, void *data, int size, unsigned long long nsecs, 207aaf045f7SSteven Rostedt char *comm) 208aaf045f7SSteven Rostedt { 2091c698186SSteven Rostedt struct pevent_record record; 210aaf045f7SSteven Rostedt struct trace_seq s; 211aaf045f7SSteven Rostedt int pid; 212aaf045f7SSteven Rostedt 213aaf045f7SSteven Rostedt pevent->latency_format = latency_format; 214aaf045f7SSteven Rostedt 215aaf045f7SSteven Rostedt record.ts = nsecs; 216aaf045f7SSteven Rostedt record.cpu = cpu; 217aaf045f7SSteven Rostedt record.size = size; 218aaf045f7SSteven Rostedt record.data = data; 219aaf045f7SSteven Rostedt pid = pevent_data_pid(pevent, &record); 220aaf045f7SSteven Rostedt 221aaf045f7SSteven Rostedt if (!pevent_pid_is_registered(pevent, pid)) 222aaf045f7SSteven Rostedt pevent_register_comm(pevent, comm, pid); 223aaf045f7SSteven Rostedt 224aaf045f7SSteven Rostedt trace_seq_init(&s); 225aaf045f7SSteven Rostedt pevent_print_event(pevent, &s, &record); 226aaf045f7SSteven Rostedt trace_seq_do_printf(&s); 227aaf045f7SSteven Rostedt printf("\n"); 228aaf045f7SSteven Rostedt } 229aaf045f7SSteven Rostedt 230aaf045f7SSteven Rostedt void parse_proc_kallsyms(char *file, unsigned int size __unused) 231aaf045f7SSteven Rostedt { 232aaf045f7SSteven Rostedt unsigned long long addr; 233aaf045f7SSteven Rostedt char *func; 234aaf045f7SSteven Rostedt char *line; 235aaf045f7SSteven Rostedt char *next = NULL; 236aaf045f7SSteven Rostedt char *addr_str; 237aaf045f7SSteven Rostedt char *mod; 238aaf045f7SSteven Rostedt char ch; 239aaf045f7SSteven Rostedt 240aaf045f7SSteven Rostedt line = strtok_r(file, "\n", &next); 241aaf045f7SSteven Rostedt while (line) { 242aaf045f7SSteven Rostedt mod = NULL; 243aaf045f7SSteven Rostedt sscanf(line, "%as %c %as\t[%as", 244aaf045f7SSteven Rostedt (float *)(void *)&addr_str, /* workaround gcc warning */ 245aaf045f7SSteven Rostedt &ch, (float *)(void *)&func, (float *)(void *)&mod); 246aaf045f7SSteven Rostedt addr = strtoull(addr_str, NULL, 16); 247aaf045f7SSteven Rostedt free(addr_str); 248aaf045f7SSteven Rostedt 249aaf045f7SSteven Rostedt /* truncate the extra ']' */ 250aaf045f7SSteven Rostedt if (mod) 251aaf045f7SSteven Rostedt mod[strlen(mod) - 1] = 0; 252aaf045f7SSteven Rostedt 253aaf045f7SSteven Rostedt pevent_register_function(pevent, func, addr, mod); 254aaf045f7SSteven Rostedt free(func); 255aaf045f7SSteven Rostedt free(mod); 256aaf045f7SSteven Rostedt 257aaf045f7SSteven Rostedt line = strtok_r(NULL, "\n", &next); 258aaf045f7SSteven Rostedt } 259aaf045f7SSteven Rostedt } 260aaf045f7SSteven Rostedt 261aaf045f7SSteven Rostedt void parse_ftrace_printk(char *file, unsigned int size __unused) 262aaf045f7SSteven Rostedt { 263aaf045f7SSteven Rostedt unsigned long long addr; 264aaf045f7SSteven Rostedt char *printk; 265aaf045f7SSteven Rostedt char *line; 266aaf045f7SSteven Rostedt char *next = NULL; 267aaf045f7SSteven Rostedt char *addr_str; 268aaf045f7SSteven Rostedt char *fmt; 269aaf045f7SSteven Rostedt 270aaf045f7SSteven Rostedt line = strtok_r(file, "\n", &next); 271aaf045f7SSteven Rostedt while (line) { 272aaf045f7SSteven Rostedt addr_str = strtok_r(line, ":", &fmt); 273aaf045f7SSteven Rostedt if (!addr_str) { 274aaf045f7SSteven Rostedt warning("printk format with empty entry"); 275aaf045f7SSteven Rostedt break; 276aaf045f7SSteven Rostedt } 277aaf045f7SSteven Rostedt addr = strtoull(addr_str, NULL, 16); 278aaf045f7SSteven Rostedt /* fmt still has a space, skip it */ 279aaf045f7SSteven Rostedt printk = strdup(fmt+1); 280aaf045f7SSteven Rostedt line = strtok_r(NULL, "\n", &next); 281aaf045f7SSteven Rostedt pevent_register_print_string(pevent, printk, addr); 282aaf045f7SSteven Rostedt } 283aaf045f7SSteven Rostedt } 284aaf045f7SSteven Rostedt 285aaf045f7SSteven Rostedt int parse_ftrace_file(char *buf, unsigned long size) 286aaf045f7SSteven Rostedt { 287aaf045f7SSteven Rostedt return pevent_parse_event(pevent, buf, size, "ftrace"); 288aaf045f7SSteven Rostedt } 289aaf045f7SSteven Rostedt 290aaf045f7SSteven Rostedt int parse_event_file(char *buf, unsigned long size, char *sys) 291aaf045f7SSteven Rostedt { 292aaf045f7SSteven Rostedt return pevent_parse_event(pevent, buf, size, sys); 293aaf045f7SSteven Rostedt } 294aaf045f7SSteven Rostedt 295aaf045f7SSteven Rostedt struct event_format *trace_find_next_event(struct event_format *event) 296aaf045f7SSteven Rostedt { 297aaf045f7SSteven Rostedt static int idx; 298aaf045f7SSteven Rostedt 299aaf045f7SSteven Rostedt if (!pevent->events) 300aaf045f7SSteven Rostedt return NULL; 301aaf045f7SSteven Rostedt 302aaf045f7SSteven Rostedt if (!event) { 303aaf045f7SSteven Rostedt idx = 0; 304aaf045f7SSteven Rostedt return pevent->events[0]; 305aaf045f7SSteven Rostedt } 306aaf045f7SSteven Rostedt 307aaf045f7SSteven Rostedt if (idx < pevent->nr_events && event == pevent->events[idx]) { 308aaf045f7SSteven Rostedt idx++; 309aaf045f7SSteven Rostedt if (idx == pevent->nr_events) 310aaf045f7SSteven Rostedt return NULL; 311aaf045f7SSteven Rostedt return pevent->events[idx]; 312aaf045f7SSteven Rostedt } 313aaf045f7SSteven Rostedt 314aaf045f7SSteven Rostedt for (idx = 1; idx < pevent->nr_events; idx++) { 315aaf045f7SSteven Rostedt if (event == pevent->events[idx - 1]) 316aaf045f7SSteven Rostedt return pevent->events[idx]; 317aaf045f7SSteven Rostedt } 318aaf045f7SSteven Rostedt return NULL; 319aaf045f7SSteven Rostedt } 320aaf045f7SSteven Rostedt 321aaf045f7SSteven Rostedt struct flag { 322aaf045f7SSteven Rostedt const char *name; 323aaf045f7SSteven Rostedt unsigned long long value; 324aaf045f7SSteven Rostedt }; 325aaf045f7SSteven Rostedt 326aaf045f7SSteven Rostedt static const struct flag flags[] = { 327aaf045f7SSteven Rostedt { "HI_SOFTIRQ", 0 }, 328aaf045f7SSteven Rostedt { "TIMER_SOFTIRQ", 1 }, 329aaf045f7SSteven Rostedt { "NET_TX_SOFTIRQ", 2 }, 330aaf045f7SSteven Rostedt { "NET_RX_SOFTIRQ", 3 }, 331aaf045f7SSteven Rostedt { "BLOCK_SOFTIRQ", 4 }, 332aaf045f7SSteven Rostedt { "BLOCK_IOPOLL_SOFTIRQ", 5 }, 333aaf045f7SSteven Rostedt { "TASKLET_SOFTIRQ", 6 }, 334aaf045f7SSteven Rostedt { "SCHED_SOFTIRQ", 7 }, 335aaf045f7SSteven Rostedt { "HRTIMER_SOFTIRQ", 8 }, 336aaf045f7SSteven Rostedt { "RCU_SOFTIRQ", 9 }, 337aaf045f7SSteven Rostedt 338aaf045f7SSteven Rostedt { "HRTIMER_NORESTART", 0 }, 339aaf045f7SSteven Rostedt { "HRTIMER_RESTART", 1 }, 340aaf045f7SSteven Rostedt }; 341aaf045f7SSteven Rostedt 342aaf045f7SSteven Rostedt unsigned long long eval_flag(const char *flag) 343aaf045f7SSteven Rostedt { 344aaf045f7SSteven Rostedt int i; 345aaf045f7SSteven Rostedt 346aaf045f7SSteven Rostedt /* 347aaf045f7SSteven Rostedt * Some flags in the format files do not get converted. 348aaf045f7SSteven Rostedt * If the flag is not numeric, see if it is something that 349aaf045f7SSteven Rostedt * we already know about. 350aaf045f7SSteven Rostedt */ 351aaf045f7SSteven Rostedt if (isdigit(flag[0])) 352aaf045f7SSteven Rostedt return strtoull(flag, NULL, 0); 353aaf045f7SSteven Rostedt 354aaf045f7SSteven Rostedt for (i = 0; i < (int)(sizeof(flags)/sizeof(flags[0])); i++) 355aaf045f7SSteven Rostedt if (strcmp(flags[i].name, flag) == 0) 356aaf045f7SSteven Rostedt return flags[i].value; 357aaf045f7SSteven Rostedt 358aaf045f7SSteven Rostedt return 0; 3597397d80dSTom Zanussi } 360