tools/perf/util/trace-event-read.c

   1 /*
   2  * Copyright (C) 2009, Steven Rostedt <srostedt@redhat.com>
   3  *
   4  * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; version 2 of the License (not later!)
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program; if not, write to the Free Software
  17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  18  *
  19  * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  20  */
  21 #include <dirent.h>
  22 #include <stdio.h>
  23 #include <stdlib.h>
  24 #include <string.h>
  25 #include <getopt.h>
  26 #include <stdarg.h>
  27 #include <sys/types.h>
  28 #include <sys/stat.h>
  29 #include <sys/wait.h>
  30 #include <sys/mman.h>
  31 #include <pthread.h>
  32 #include <fcntl.h>
  33 #include <unistd.h>
  34 #include <errno.h>
  35
  36 #include "../perf.h"
  37 #include "util.h"
  38 #include "trace-event.h"
  39
  40 static int input_fd;
  41
  42 static ssize_t trace_data_size;
  43 static bool repipe;
  44
  45 static int __do_read(int fd, void *buf, int size)
  46 {
  47         int rsize = size;
  48
  49         while (size) {
  50                 int ret = read(fd, buf, size);
  51
  52                 if (ret <= 0)
  53                         return -1;
  54
  55                 if (repipe) {
  56                         int retw = write(STDOUT_FILENO, buf, ret);
  57
  58                         if (retw <= 0 || retw != ret) {
  59                                 pr_debug("repiping input file");
  60                                 return -1;
  61                         }
  62                 }
  63
  64                 size -= ret;
  65                 buf += ret;
  66         }
  67
  68         return rsize;
  69 }
  70
  71 static int do_read(void *data, int size)
  72 {
  73         int r;
  74
  75         r = __do_read(input_fd, data, size);
  76         if (r <= 0) {
  77                 pr_debug("reading input file (size expected=%d received=%d)",
  78                          size, r);
  79                 return -1;
  80         }
  81
  82         trace_data_size += r;
  83
  84         return r;
  85 }
  86
  87 /* If it fails, the next read will report it */
  88 static void skip(int size)
  89 {
  90         char buf[BUFSIZ];
  91         int r;
  92
  93         while (size) {
  94                 r = size > BUFSIZ ? BUFSIZ : size;
  95                 do_read(buf, r);
  96                 size -= r;
  97         };
  98 }
  99
 100 static unsigned int read4(struct pevent *pevent)
 101 {
 102         unsigned int data;
 103
 104         if (do_read(&data, 4) < 0)
 105                 return 0;
 106         return __data2host4(pevent, data);
 107 }
 108
 109 static unsigned long long read8(struct pevent *pevent)
 110 {
 111         unsigned long long data;
 112
 113         if (do_read(&data, 8) < 0)
 114                 return 0;
 115         return __data2host8(pevent, data);
 116 }
 117
 118 static char *read_string(void)
 119 {
 120         char buf[BUFSIZ];
 121         char *str = NULL;
 122         int size = 0;
 123         off_t r;
 124         char c;
 125
 126         for (;;) {
 127                 r = read(input_fd, &c, 1);
 128                 if (r < 0) {
 129                         pr_debug("reading input file");
 130                         goto out;
 131                 }
 132
 133                 if (!r) {
 134                         pr_debug("no data");
 135                         goto out;
 136                 }
 137
 138                 if (repipe) {
 139                         int retw = write(STDOUT_FILENO, &c, 1);
 140
 141                         if (retw <= 0 || retw != r) {
 142                                 pr_debug("repiping input file string");
 143                                 goto out;
 144                         }
 145                 }
 146
 147                 buf[size++] = c;
 148
 149                 if (!c)
 150                         break;
 151         }
 152
 153         trace_data_size += size;
 154
 155         str = malloc(size);
 156         if (str)
 157                 memcpy(str, buf, size);
 158 out:
 159         return str;
 160 }
 161
 162 static int read_proc_kallsyms(struct pevent *pevent)
 163 {
 164         unsigned int size;
 165         char *buf;
 166
 167         size = read4(pevent);
 168         if (!size)
 169                 return 0;
 170
 171         buf = malloc(size + 1);
 172         if (buf == NULL)
 173                 return -1;
 174
 175         if (do_read(buf, size) < 0) {
 176                 free(buf);
 177                 return -1;
 178         }
 179         buf[size] = '\0';
 180
 181         parse_proc_kallsyms(pevent, buf, size);
 182
 183         free(buf);
 184         return 0;
 185 }
 186
 187 static int read_ftrace_printk(struct pevent *pevent)
 188 {
 189         unsigned int size;
 190         char *buf;
 191
 192         /* it can have 0 size */
 193         size = read4(pevent);
 194         if (!size)
 195                 return 0;
 196
 197         buf = malloc(size);
 198         if (buf == NULL)
 199                 return -1;
 200
 201         if (do_read(buf, size) < 0) {
 202                 free(buf);
 203                 return -1;
 204         }
 205
 206         parse_ftrace_printk(pevent, buf, size);
 207
 208         free(buf);
 209         return 0;
 210 }
 211
 212 static int read_header_files(struct pevent *pevent)
 213 {
 214         unsigned long long size;
 215         char *header_event;
 216         char buf[BUFSIZ];
 217         int ret = 0;
 218
 219         if (do_read(buf, 12) < 0)
 220                 return -1;
 221
 222         if (memcmp(buf, "header_page", 12) != 0) {
 223                 pr_debug("did not read header page");
 224                 return -1;
 225         }
 226
 227         size = read8(pevent);
 228         skip(size);
 229
 230         if (do_read(buf, 13) < 0)
 231                 return -1;
 232
 233         if (memcmp(buf, "header_event", 13) != 0) {
 234                 pr_debug("did not read header event");
 235                 return -1;
 236         }
 237
 238         size = read8(pevent);
 239         header_event = malloc(size);
 240         if (header_event == NULL)
 241                 return -1;
 242
 243         if (do_read(header_event, size) < 0)
 244                 ret = -1;
 245
 246         free(header_event);
 247         return ret;
 248 }
 249
 250 static int read_ftrace_file(struct pevent *pevent, unsigned long long size)
 251 {
 252         char *buf;
 253
 254         buf = malloc(size);
 255         if (buf == NULL)
 256                 return -1;
 257
 258         if (do_read(buf, size) < 0) {
 259                 free(buf);
 260                 return -1;
 261         }
 262
 263         parse_ftrace_file(pevent, buf, size);
 264         free(buf);
 265         return 0;
 266 }
 267
 268 static int read_event_file(struct pevent *pevent, char *sys,
 269                             unsigned long long size)
 270 {
 271         char *buf;
 272
 273         buf = malloc(size);
 274         if (buf == NULL)
 275                 return -1;
 276
 277         if (do_read(buf, size) < 0) {
 278                 free(buf);
 279                 return -1;
 280         }
 281
 282         parse_event_file(pevent, buf, size, sys);
 283         free(buf);
 284         return 0;
 285 }
 286
 287 static int read_ftrace_files(struct pevent *pevent)
 288 {
 289         unsigned long long size;
 290         int count;
 291         int i;
 292         int ret;
 293
 294         count = read4(pevent);
 295
 296         for (i = 0; i < count; i++) {
 297                 size = read8(pevent);
 298                 ret = read_ftrace_file(pevent, size);
 299                 if (ret)
 300                         return ret;
 301         }
 302         return 0;
 303 }
 304
 305 static int read_event_files(struct pevent *pevent)
 306 {
 307         unsigned long long size;
 308         char *sys;
 309         int systems;
 310         int count;
 311         int i,x;
 312         int ret;
 313
 314         systems = read4(pevent);
 315
 316         for (i = 0; i < systems; i++) {
 317                 sys = read_string();
 318                 if (sys == NULL)
 319                         return -1;
 320
 321                 count = read4(pevent);
 322
 323                 for (x=0; x < count; x++) {
 324                         size = read8(pevent);
 325                         ret = read_event_file(pevent, sys, size);
 326                         if (ret)
 327                                 return ret;
 328                 }
 329         }
 330         return 0;
 331 }
 332
 333 ssize_t trace_report(int fd, struct pevent **ppevent, bool __repipe)
 334 {
 335         char buf[BUFSIZ];
 336         char test[] = { 23, 8, 68 };
 337         char *version;
 338         int show_version = 0;
 339         int show_funcs = 0;
 340         int show_printk = 0;
 341         ssize_t size = -1;
 342         int file_bigendian;
 343         int host_bigendian;
 344         int file_long_size;
 345         int file_page_size;
 346         struct pevent *pevent;
 347         int err;
 348
 349         *ppevent = NULL;
 350
 351         repipe = __repipe;
 352         input_fd = fd;
 353
 354         if (do_read(buf, 3) < 0)
 355                 return -1;
 356         if (memcmp(buf, test, 3) != 0) {
 357                 pr_debug("no trace data in the file");
 358                 return -1;
 359         }
 360
 361         if (do_read(buf, 7) < 0)
 362                 return -1;
 363         if (memcmp(buf, "tracing", 7) != 0) {
 364                 pr_debug("not a trace file (missing 'tracing' tag)");
 365                 return -1;
 366         }
 367
 368         version = read_string();
 369         if (version == NULL)
 370                 return -1;
 371         if (show_version)
 372                 printf("version = %s\n", version);
 373         free(version);
 374
 375         if (do_read(buf, 1) < 0)
 376                 return -1;
 377         file_bigendian = buf[0];
 378         host_bigendian = bigendian();
 379
 380         pevent = read_trace_init(file_bigendian, host_bigendian);
 381         if (pevent == NULL) {
 382                 pr_debug("read_trace_init failed");
 383                 goto out;
 384         }
 385
 386         if (do_read(buf, 1) < 0)
 387                 goto out;
 388         file_long_size = buf[0];
 389
 390         file_page_size = read4(pevent);
 391         if (!file_page_size)
 392                 goto out;
 393
 394         pevent_set_long_size(pevent, file_long_size);
 395         pevent_set_page_size(pevent, file_page_size);
 396
 397         err = read_header_files(pevent);
 398         if (err)
 399                 goto out;
 400         err = read_ftrace_files(pevent);
 401         if (err)
 402                 goto out;
 403         err = read_event_files(pevent);
 404         if (err)
 405                 goto out;
 406         err = read_proc_kallsyms(pevent);
 407         if (err)
 408                 goto out;
 409         err = read_ftrace_printk(pevent);
 410         if (err)
 411                 goto out;
 412
 413         size = trace_data_size;
 414         repipe = false;
 415
 416         if (show_funcs) {
 417                 pevent_print_funcs(pevent);
 418         } else if (show_printk) {
 419                 pevent_print_printk(pevent);
 420         }
 421
 422         *ppevent = pevent;
 423         pevent = NULL;
 424
 425 out:
 426         if (pevent)
 427                 pevent_free(pevent);
 428         return size;
 429 }