Loading...
1// SPDX-License-Identifier: GPL-2.0-only
2/*
3 * Copyright (C) 2008,2009, Steven Rostedt <srostedt@redhat.com>
4 */
5#include <dirent.h>
6#include <mntent.h>
7#include <stdio.h>
8#include <stdlib.h>
9#include <string.h>
10#include <stdarg.h>
11#include <sys/types.h>
12#include <sys/stat.h>
13#include <sys/wait.h>
14#include <fcntl.h>
15#include <unistd.h>
16#include <errno.h>
17#include <stdbool.h>
18#include <linux/list.h>
19#include <linux/kernel.h>
20#include <linux/zalloc.h>
21#include <internal/lib.h> // page_size
22#include <sys/param.h>
23
24#include "trace-event.h"
25#include "tracepoint.h"
26#include <api/fs/tracing_path.h>
27#include "evsel.h"
28#include "debug.h"
29#include "util.h"
30
31#define VERSION "0.6"
32#define MAX_EVENT_LENGTH 512
33
34static int output_fd;
35
36struct tracepoint_path {
37 char *system;
38 char *name;
39 struct tracepoint_path *next;
40};
41
42/* unfortunately, you can not stat debugfs or proc files for size */
43static int record_file(const char *file, ssize_t hdr_sz)
44{
45 unsigned long long size = 0;
46 char buf[BUFSIZ], *sizep;
47 off_t hdr_pos = lseek(output_fd, 0, SEEK_CUR);
48 int r, fd;
49 int err = -EIO;
50
51 fd = open(file, O_RDONLY);
52 if (fd < 0) {
53 pr_debug("Can't read '%s'", file);
54 return -errno;
55 }
56
57 /* put in zeros for file size, then fill true size later */
58 if (hdr_sz) {
59 if (write(output_fd, &size, hdr_sz) != hdr_sz)
60 goto out;
61 }
62
63 do {
64 r = read(fd, buf, BUFSIZ);
65 if (r > 0) {
66 size += r;
67 if (write(output_fd, buf, r) != r)
68 goto out;
69 }
70 } while (r > 0);
71
72 /* ugh, handle big-endian hdr_size == 4 */
73 sizep = (char*)&size;
74 if (host_is_bigendian())
75 sizep += sizeof(u64) - hdr_sz;
76
77 if (hdr_sz && pwrite(output_fd, sizep, hdr_sz, hdr_pos) < 0) {
78 pr_debug("writing file size failed\n");
79 goto out;
80 }
81
82 err = 0;
83out:
84 close(fd);
85 return err;
86}
87
88static int record_header_files(void)
89{
90 char *path = get_events_file("header_page");
91 struct stat st;
92 int err = -EIO;
93
94 if (!path) {
95 pr_debug("can't get tracing/events/header_page");
96 return -ENOMEM;
97 }
98
99 if (stat(path, &st) < 0) {
100 pr_debug("can't read '%s'", path);
101 goto out;
102 }
103
104 if (write(output_fd, "header_page", 12) != 12) {
105 pr_debug("can't write header_page\n");
106 goto out;
107 }
108
109 if (record_file(path, 8) < 0) {
110 pr_debug("can't record header_page file\n");
111 goto out;
112 }
113
114 put_events_file(path);
115
116 path = get_events_file("header_event");
117 if (!path) {
118 pr_debug("can't get tracing/events/header_event");
119 err = -ENOMEM;
120 goto out;
121 }
122
123 if (stat(path, &st) < 0) {
124 pr_debug("can't read '%s'", path);
125 goto out;
126 }
127
128 if (write(output_fd, "header_event", 13) != 13) {
129 pr_debug("can't write header_event\n");
130 goto out;
131 }
132
133 if (record_file(path, 8) < 0) {
134 pr_debug("can't record header_event file\n");
135 goto out;
136 }
137
138 err = 0;
139out:
140 put_events_file(path);
141 return err;
142}
143
144static bool name_in_tp_list(char *sys, struct tracepoint_path *tps)
145{
146 while (tps) {
147 if (!strcmp(sys, tps->name))
148 return true;
149 tps = tps->next;
150 }
151
152 return false;
153}
154
155#define for_each_event_tps(dir, dent, tps) \
156 while ((dent = readdir(dir))) \
157 if (dent->d_type == DT_DIR && \
158 (strcmp(dent->d_name, ".")) && \
159 (strcmp(dent->d_name, ".."))) \
160
161static int copy_event_system(const char *sys, struct tracepoint_path *tps)
162{
163 struct dirent *dent;
164 struct stat st;
165 char *format;
166 DIR *dir;
167 int count = 0;
168 int ret;
169 int err;
170
171 dir = opendir(sys);
172 if (!dir) {
173 pr_debug("can't read directory '%s'", sys);
174 return -errno;
175 }
176
177 for_each_event_tps(dir, dent, tps) {
178 if (!name_in_tp_list(dent->d_name, tps))
179 continue;
180
181 if (asprintf(&format, "%s/%s/format", sys, dent->d_name) < 0) {
182 err = -ENOMEM;
183 goto out;
184 }
185 ret = stat(format, &st);
186 free(format);
187 if (ret < 0)
188 continue;
189 count++;
190 }
191
192 if (write(output_fd, &count, 4) != 4) {
193 err = -EIO;
194 pr_debug("can't write count\n");
195 goto out;
196 }
197
198 rewinddir(dir);
199 for_each_event_tps(dir, dent, tps) {
200 if (!name_in_tp_list(dent->d_name, tps))
201 continue;
202
203 if (asprintf(&format, "%s/%s/format", sys, dent->d_name) < 0) {
204 err = -ENOMEM;
205 goto out;
206 }
207 ret = stat(format, &st);
208
209 if (ret >= 0) {
210 err = record_file(format, 8);
211 if (err) {
212 free(format);
213 goto out;
214 }
215 }
216 free(format);
217 }
218 err = 0;
219out:
220 closedir(dir);
221 return err;
222}
223
224static int record_ftrace_files(struct tracepoint_path *tps)
225{
226 char *path;
227 int ret;
228
229 path = get_events_file("ftrace");
230 if (!path) {
231 pr_debug("can't get tracing/events/ftrace");
232 return -ENOMEM;
233 }
234
235 ret = copy_event_system(path, tps);
236
237 put_tracing_file(path);
238
239 return ret;
240}
241
242static bool system_in_tp_list(char *sys, struct tracepoint_path *tps)
243{
244 while (tps) {
245 if (!strcmp(sys, tps->system))
246 return true;
247 tps = tps->next;
248 }
249
250 return false;
251}
252
253static int record_event_files(struct tracepoint_path *tps)
254{
255 struct dirent *dent;
256 struct stat st;
257 char *path;
258 char *sys;
259 DIR *dir;
260 int count = 0;
261 int ret;
262 int err;
263
264 path = get_tracing_file("events");
265 if (!path) {
266 pr_debug("can't get tracing/events");
267 return -ENOMEM;
268 }
269
270 dir = opendir(path);
271 if (!dir) {
272 err = -errno;
273 pr_debug("can't read directory '%s'", path);
274 goto out;
275 }
276
277 for_each_event_tps(dir, dent, tps) {
278 if (strcmp(dent->d_name, "ftrace") == 0 ||
279 !system_in_tp_list(dent->d_name, tps))
280 continue;
281
282 count++;
283 }
284
285 if (write(output_fd, &count, 4) != 4) {
286 err = -EIO;
287 pr_debug("can't write count\n");
288 goto out;
289 }
290
291 rewinddir(dir);
292 for_each_event_tps(dir, dent, tps) {
293 if (strcmp(dent->d_name, "ftrace") == 0 ||
294 !system_in_tp_list(dent->d_name, tps))
295 continue;
296
297 if (asprintf(&sys, "%s/%s", path, dent->d_name) < 0) {
298 err = -ENOMEM;
299 goto out;
300 }
301 ret = stat(sys, &st);
302 if (ret >= 0) {
303 ssize_t size = strlen(dent->d_name) + 1;
304
305 if (write(output_fd, dent->d_name, size) != size ||
306 copy_event_system(sys, tps) < 0) {
307 err = -EIO;
308 free(sys);
309 goto out;
310 }
311 }
312 free(sys);
313 }
314 err = 0;
315out:
316 if (dir)
317 closedir(dir);
318 put_tracing_file(path);
319
320 return err;
321}
322
323static int record_proc_kallsyms(void)
324{
325 unsigned long long size = 0;
326 /*
327 * Just to keep older perf.data file parsers happy, record a zero
328 * sized kallsyms file, i.e. do the same thing that was done when
329 * /proc/kallsyms (or something specified via --kallsyms, in a
330 * different path) couldn't be read.
331 */
332 return write(output_fd, &size, 4) != 4 ? -EIO : 0;
333}
334
335static int record_ftrace_printk(void)
336{
337 unsigned int size;
338 char *path;
339 struct stat st;
340 int ret, err = 0;
341
342 path = get_tracing_file("printk_formats");
343 if (!path) {
344 pr_debug("can't get tracing/printk_formats");
345 return -ENOMEM;
346 }
347
348 ret = stat(path, &st);
349 if (ret < 0) {
350 /* not found */
351 size = 0;
352 if (write(output_fd, &size, 4) != 4)
353 err = -EIO;
354 goto out;
355 }
356 err = record_file(path, 4);
357
358out:
359 put_tracing_file(path);
360 return err;
361}
362
363static int record_saved_cmdline(void)
364{
365 unsigned long long size;
366 char *path;
367 struct stat st;
368 int ret, err = 0;
369
370 path = get_tracing_file("saved_cmdlines");
371 if (!path) {
372 pr_debug("can't get tracing/saved_cmdline");
373 return -ENOMEM;
374 }
375
376 ret = stat(path, &st);
377 if (ret < 0) {
378 /* not found */
379 size = 0;
380 if (write(output_fd, &size, 8) != 8)
381 err = -EIO;
382 goto out;
383 }
384 err = record_file(path, 8);
385
386out:
387 put_tracing_file(path);
388 return err;
389}
390
391static void
392put_tracepoints_path(struct tracepoint_path *tps)
393{
394 while (tps) {
395 struct tracepoint_path *t = tps;
396
397 tps = tps->next;
398 zfree(&t->name);
399 zfree(&t->system);
400 free(t);
401 }
402}
403
404static struct tracepoint_path *tracepoint_id_to_path(u64 config)
405{
406 struct tracepoint_path *path = NULL;
407 DIR *sys_dir, *evt_dir;
408 struct dirent *sys_dirent, *evt_dirent;
409 char id_buf[24];
410 int fd;
411 u64 id;
412 char evt_path[MAXPATHLEN];
413 char *dir_path;
414
415 sys_dir = tracing_events__opendir();
416 if (!sys_dir)
417 return NULL;
418
419 for_each_subsystem(sys_dir, sys_dirent) {
420 dir_path = get_events_file(sys_dirent->d_name);
421 if (!dir_path)
422 continue;
423 evt_dir = opendir(dir_path);
424 if (!evt_dir)
425 goto next;
426
427 for_each_event(dir_path, evt_dir, evt_dirent) {
428
429 scnprintf(evt_path, MAXPATHLEN, "%s/%s/id", dir_path,
430 evt_dirent->d_name);
431 fd = open(evt_path, O_RDONLY);
432 if (fd < 0)
433 continue;
434 if (read(fd, id_buf, sizeof(id_buf)) < 0) {
435 close(fd);
436 continue;
437 }
438 close(fd);
439 id = atoll(id_buf);
440 if (id == config) {
441 put_events_file(dir_path);
442 closedir(evt_dir);
443 closedir(sys_dir);
444 path = zalloc(sizeof(*path));
445 if (!path)
446 return NULL;
447 if (asprintf(&path->system, "%.*s",
448 MAX_EVENT_LENGTH, sys_dirent->d_name) < 0) {
449 free(path);
450 return NULL;
451 }
452 if (asprintf(&path->name, "%.*s",
453 MAX_EVENT_LENGTH, evt_dirent->d_name) < 0) {
454 zfree(&path->system);
455 free(path);
456 return NULL;
457 }
458 return path;
459 }
460 }
461 closedir(evt_dir);
462next:
463 put_events_file(dir_path);
464 }
465
466 closedir(sys_dir);
467 return NULL;
468}
469
470char *tracepoint_id_to_name(u64 config)
471{
472 struct tracepoint_path *path = tracepoint_id_to_path(config);
473 char *buf = NULL;
474
475 if (path && asprintf(&buf, "%s:%s", path->system, path->name) < 0)
476 buf = NULL;
477
478 put_tracepoints_path(path);
479 return buf;
480}
481
482static struct tracepoint_path *tracepoint_name_to_path(const char *name)
483{
484 struct tracepoint_path *path = zalloc(sizeof(*path));
485 char *str = strchr(name, ':');
486
487 if (path == NULL || str == NULL) {
488 free(path);
489 return NULL;
490 }
491
492 path->system = strndup(name, str - name);
493 path->name = strdup(str+1);
494
495 if (path->system == NULL || path->name == NULL) {
496 zfree(&path->system);
497 zfree(&path->name);
498 zfree(&path);
499 }
500
501 return path;
502}
503
504static struct tracepoint_path *
505get_tracepoints_path(struct list_head *pattrs)
506{
507 struct tracepoint_path path, *ppath = &path;
508 struct evsel *pos;
509 int nr_tracepoints = 0;
510
511 list_for_each_entry(pos, pattrs, core.node) {
512 if (pos->core.attr.type != PERF_TYPE_TRACEPOINT)
513 continue;
514 ++nr_tracepoints;
515
516 if (pos->name) {
517 ppath->next = tracepoint_name_to_path(pos->name);
518 if (ppath->next)
519 goto next;
520
521 if (strchr(pos->name, ':') == NULL)
522 goto try_id;
523
524 goto error;
525 }
526
527try_id:
528 ppath->next = tracepoint_id_to_path(pos->core.attr.config);
529 if (!ppath->next) {
530error:
531 pr_debug("No memory to alloc tracepoints list\n");
532 put_tracepoints_path(path.next);
533 return NULL;
534 }
535next:
536 ppath = ppath->next;
537 }
538
539 return nr_tracepoints > 0 ? path.next : NULL;
540}
541
542bool have_tracepoints(struct list_head *pattrs)
543{
544 struct evsel *pos;
545
546 list_for_each_entry(pos, pattrs, core.node)
547 if (pos->core.attr.type == PERF_TYPE_TRACEPOINT)
548 return true;
549
550 return false;
551}
552
553static int tracing_data_header(void)
554{
555 char buf[20];
556 ssize_t size;
557
558 /* just guessing this is someone's birthday.. ;) */
559 buf[0] = 23;
560 buf[1] = 8;
561 buf[2] = 68;
562 memcpy(buf + 3, "tracing", 7);
563
564 if (write(output_fd, buf, 10) != 10)
565 return -1;
566
567 size = strlen(VERSION) + 1;
568 if (write(output_fd, VERSION, size) != size)
569 return -1;
570
571 /* save endian */
572 if (host_is_bigendian())
573 buf[0] = 1;
574 else
575 buf[0] = 0;
576
577 if (write(output_fd, buf, 1) != 1)
578 return -1;
579
580 /* save size of long */
581 buf[0] = sizeof(long);
582 if (write(output_fd, buf, 1) != 1)
583 return -1;
584
585 /* save page_size */
586 if (write(output_fd, &page_size, 4) != 4)
587 return -1;
588
589 return 0;
590}
591
592struct tracing_data *tracing_data_get(struct list_head *pattrs,
593 int fd, bool temp)
594{
595 struct tracepoint_path *tps;
596 struct tracing_data *tdata;
597 int err;
598
599 output_fd = fd;
600
601 tps = get_tracepoints_path(pattrs);
602 if (!tps)
603 return NULL;
604
605 tdata = malloc(sizeof(*tdata));
606 if (!tdata)
607 return NULL;
608
609 tdata->temp = temp;
610 tdata->size = 0;
611
612 if (temp) {
613 int temp_fd;
614
615 snprintf(tdata->temp_file, sizeof(tdata->temp_file),
616 "/tmp/perf-XXXXXX");
617 if (!mkstemp(tdata->temp_file)) {
618 pr_debug("Can't make temp file");
619 free(tdata);
620 return NULL;
621 }
622
623 temp_fd = open(tdata->temp_file, O_RDWR);
624 if (temp_fd < 0) {
625 pr_debug("Can't read '%s'", tdata->temp_file);
626 free(tdata);
627 return NULL;
628 }
629
630 /*
631 * Set the temp file the default output, so all the
632 * tracing data are stored into it.
633 */
634 output_fd = temp_fd;
635 }
636
637 err = tracing_data_header();
638 if (err)
639 goto out;
640 err = record_header_files();
641 if (err)
642 goto out;
643 err = record_ftrace_files(tps);
644 if (err)
645 goto out;
646 err = record_event_files(tps);
647 if (err)
648 goto out;
649 err = record_proc_kallsyms();
650 if (err)
651 goto out;
652 err = record_ftrace_printk();
653 if (err)
654 goto out;
655 err = record_saved_cmdline();
656
657out:
658 /*
659 * All tracing data are stored by now, we can restore
660 * the default output file in case we used temp file.
661 */
662 if (temp) {
663 tdata->size = lseek(output_fd, 0, SEEK_CUR);
664 close(output_fd);
665 output_fd = fd;
666 }
667
668 if (err)
669 zfree(&tdata);
670
671 put_tracepoints_path(tps);
672 return tdata;
673}
674
675int tracing_data_put(struct tracing_data *tdata)
676{
677 int err = 0;
678
679 if (tdata->temp) {
680 err = record_file(tdata->temp_file, 0);
681 unlink(tdata->temp_file);
682 }
683
684 free(tdata);
685 return err;
686}
687
688int read_tracing_data(int fd, struct list_head *pattrs)
689{
690 int err;
691 struct tracing_data *tdata;
692
693 /*
694 * We work over the real file, so we can write data
695 * directly, no temp file is needed.
696 */
697 tdata = tracing_data_get(pattrs, fd, false);
698 if (!tdata)
699 return -ENOMEM;
700
701 err = tracing_data_put(tdata);
702 return err;
703}
1/*
2 * Copyright (C) 2008,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#define _GNU_SOURCE
22#include <dirent.h>
23#include <mntent.h>
24#include <stdio.h>
25#include <stdlib.h>
26#include <string.h>
27#include <stdarg.h>
28#include <sys/types.h>
29#include <sys/stat.h>
30#include <sys/wait.h>
31#include <pthread.h>
32#include <fcntl.h>
33#include <unistd.h>
34#include <ctype.h>
35#include <errno.h>
36#include <stdbool.h>
37#include <linux/list.h>
38#include <linux/kernel.h>
39
40#include "../perf.h"
41#include "trace-event.h"
42#include "debugfs.h"
43#include "evsel.h"
44
45#define VERSION "0.5"
46
47#define _STR(x) #x
48#define STR(x) _STR(x)
49#define MAX_PATH 256
50
51#define TRACE_CTRL "tracing_on"
52#define TRACE "trace"
53#define AVAILABLE "available_tracers"
54#define CURRENT "current_tracer"
55#define ITER_CTRL "trace_options"
56#define MAX_LATENCY "tracing_max_latency"
57
58unsigned int page_size;
59
60static const char *output_file = "trace.info";
61static int output_fd;
62
63struct event_list {
64 struct event_list *next;
65 const char *event;
66};
67
68struct events {
69 struct events *sibling;
70 struct events *children;
71 struct events *next;
72 char *name;
73};
74
75
76
77static void die(const char *fmt, ...)
78{
79 va_list ap;
80 int ret = errno;
81
82 if (errno)
83 perror("trace-cmd");
84 else
85 ret = -1;
86
87 va_start(ap, fmt);
88 fprintf(stderr, " ");
89 vfprintf(stderr, fmt, ap);
90 va_end(ap);
91
92 fprintf(stderr, "\n");
93 exit(ret);
94}
95
96void *malloc_or_die(unsigned int size)
97{
98 void *data;
99
100 data = malloc(size);
101 if (!data)
102 die("malloc");
103 return data;
104}
105
106static const char *find_debugfs(void)
107{
108 const char *path = debugfs_mount(NULL);
109
110 if (!path)
111 die("Your kernel not support debugfs filesystem");
112
113 return path;
114}
115
116/*
117 * Finds the path to the debugfs/tracing
118 * Allocates the string and stores it.
119 */
120static const char *find_tracing_dir(void)
121{
122 static char *tracing;
123 static int tracing_found;
124 const char *debugfs;
125
126 if (tracing_found)
127 return tracing;
128
129 debugfs = find_debugfs();
130
131 tracing = malloc_or_die(strlen(debugfs) + 9);
132
133 sprintf(tracing, "%s/tracing", debugfs);
134
135 tracing_found = 1;
136 return tracing;
137}
138
139static char *get_tracing_file(const char *name)
140{
141 const char *tracing;
142 char *file;
143
144 tracing = find_tracing_dir();
145 if (!tracing)
146 return NULL;
147
148 file = malloc_or_die(strlen(tracing) + strlen(name) + 2);
149
150 sprintf(file, "%s/%s", tracing, name);
151 return file;
152}
153
154static void put_tracing_file(char *file)
155{
156 free(file);
157}
158
159static ssize_t calc_data_size;
160
161static ssize_t write_or_die(const void *buf, size_t len)
162{
163 int ret;
164
165 if (calc_data_size) {
166 calc_data_size += len;
167 return len;
168 }
169
170 ret = write(output_fd, buf, len);
171 if (ret < 0)
172 die("writing to '%s'", output_file);
173
174 return ret;
175}
176
177int bigendian(void)
178{
179 unsigned char str[] = { 0x1, 0x2, 0x3, 0x4, 0x0, 0x0, 0x0, 0x0};
180 unsigned int *ptr;
181
182 ptr = (unsigned int *)(void *)str;
183 return *ptr == 0x01020304;
184}
185
186/* unfortunately, you can not stat debugfs or proc files for size */
187static void record_file(const char *file, size_t hdr_sz)
188{
189 unsigned long long size = 0;
190 char buf[BUFSIZ], *sizep;
191 off_t hdr_pos = lseek(output_fd, 0, SEEK_CUR);
192 int r, fd;
193
194 fd = open(file, O_RDONLY);
195 if (fd < 0)
196 die("Can't read '%s'", file);
197
198 /* put in zeros for file size, then fill true size later */
199 write_or_die(&size, hdr_sz);
200
201 do {
202 r = read(fd, buf, BUFSIZ);
203 if (r > 0) {
204 size += r;
205 write_or_die(buf, r);
206 }
207 } while (r > 0);
208 close(fd);
209
210 /* ugh, handle big-endian hdr_size == 4 */
211 sizep = (char*)&size;
212 if (bigendian())
213 sizep += sizeof(u64) - hdr_sz;
214
215 if (pwrite(output_fd, sizep, hdr_sz, hdr_pos) < 0)
216 die("writing to %s", output_file);
217}
218
219static void read_header_files(void)
220{
221 char *path;
222 struct stat st;
223
224 path = get_tracing_file("events/header_page");
225 if (stat(path, &st) < 0)
226 die("can't read '%s'", path);
227
228 write_or_die("header_page", 12);
229 record_file(path, 8);
230 put_tracing_file(path);
231
232 path = get_tracing_file("events/header_event");
233 if (stat(path, &st) < 0)
234 die("can't read '%s'", path);
235
236 write_or_die("header_event", 13);
237 record_file(path, 8);
238 put_tracing_file(path);
239}
240
241static bool name_in_tp_list(char *sys, struct tracepoint_path *tps)
242{
243 while (tps) {
244 if (!strcmp(sys, tps->name))
245 return true;
246 tps = tps->next;
247 }
248
249 return false;
250}
251
252static void copy_event_system(const char *sys, struct tracepoint_path *tps)
253{
254 struct dirent *dent;
255 struct stat st;
256 char *format;
257 DIR *dir;
258 int count = 0;
259 int ret;
260
261 dir = opendir(sys);
262 if (!dir)
263 die("can't read directory '%s'", sys);
264
265 while ((dent = readdir(dir))) {
266 if (dent->d_type != DT_DIR ||
267 strcmp(dent->d_name, ".") == 0 ||
268 strcmp(dent->d_name, "..") == 0 ||
269 !name_in_tp_list(dent->d_name, tps))
270 continue;
271 format = malloc_or_die(strlen(sys) + strlen(dent->d_name) + 10);
272 sprintf(format, "%s/%s/format", sys, dent->d_name);
273 ret = stat(format, &st);
274 free(format);
275 if (ret < 0)
276 continue;
277 count++;
278 }
279
280 write_or_die(&count, 4);
281
282 rewinddir(dir);
283 while ((dent = readdir(dir))) {
284 if (dent->d_type != DT_DIR ||
285 strcmp(dent->d_name, ".") == 0 ||
286 strcmp(dent->d_name, "..") == 0 ||
287 !name_in_tp_list(dent->d_name, tps))
288 continue;
289 format = malloc_or_die(strlen(sys) + strlen(dent->d_name) + 10);
290 sprintf(format, "%s/%s/format", sys, dent->d_name);
291 ret = stat(format, &st);
292
293 if (ret >= 0)
294 record_file(format, 8);
295
296 free(format);
297 }
298 closedir(dir);
299}
300
301static void read_ftrace_files(struct tracepoint_path *tps)
302{
303 char *path;
304
305 path = get_tracing_file("events/ftrace");
306
307 copy_event_system(path, tps);
308
309 put_tracing_file(path);
310}
311
312static bool system_in_tp_list(char *sys, struct tracepoint_path *tps)
313{
314 while (tps) {
315 if (!strcmp(sys, tps->system))
316 return true;
317 tps = tps->next;
318 }
319
320 return false;
321}
322
323static void read_event_files(struct tracepoint_path *tps)
324{
325 struct dirent *dent;
326 struct stat st;
327 char *path;
328 char *sys;
329 DIR *dir;
330 int count = 0;
331 int ret;
332
333 path = get_tracing_file("events");
334
335 dir = opendir(path);
336 if (!dir)
337 die("can't read directory '%s'", path);
338
339 while ((dent = readdir(dir))) {
340 if (dent->d_type != DT_DIR ||
341 strcmp(dent->d_name, ".") == 0 ||
342 strcmp(dent->d_name, "..") == 0 ||
343 strcmp(dent->d_name, "ftrace") == 0 ||
344 !system_in_tp_list(dent->d_name, tps))
345 continue;
346 count++;
347 }
348
349 write_or_die(&count, 4);
350
351 rewinddir(dir);
352 while ((dent = readdir(dir))) {
353 if (dent->d_type != DT_DIR ||
354 strcmp(dent->d_name, ".") == 0 ||
355 strcmp(dent->d_name, "..") == 0 ||
356 strcmp(dent->d_name, "ftrace") == 0 ||
357 !system_in_tp_list(dent->d_name, tps))
358 continue;
359 sys = malloc_or_die(strlen(path) + strlen(dent->d_name) + 2);
360 sprintf(sys, "%s/%s", path, dent->d_name);
361 ret = stat(sys, &st);
362 if (ret >= 0) {
363 write_or_die(dent->d_name, strlen(dent->d_name) + 1);
364 copy_event_system(sys, tps);
365 }
366 free(sys);
367 }
368
369 closedir(dir);
370 put_tracing_file(path);
371}
372
373static void read_proc_kallsyms(void)
374{
375 unsigned int size;
376 const char *path = "/proc/kallsyms";
377 struct stat st;
378 int ret;
379
380 ret = stat(path, &st);
381 if (ret < 0) {
382 /* not found */
383 size = 0;
384 write_or_die(&size, 4);
385 return;
386 }
387 record_file(path, 4);
388}
389
390static void read_ftrace_printk(void)
391{
392 unsigned int size;
393 char *path;
394 struct stat st;
395 int ret;
396
397 path = get_tracing_file("printk_formats");
398 ret = stat(path, &st);
399 if (ret < 0) {
400 /* not found */
401 size = 0;
402 write_or_die(&size, 4);
403 goto out;
404 }
405 record_file(path, 4);
406
407out:
408 put_tracing_file(path);
409}
410
411static struct tracepoint_path *
412get_tracepoints_path(struct list_head *pattrs)
413{
414 struct tracepoint_path path, *ppath = &path;
415 struct perf_evsel *pos;
416 int nr_tracepoints = 0;
417
418 list_for_each_entry(pos, pattrs, node) {
419 if (pos->attr.type != PERF_TYPE_TRACEPOINT)
420 continue;
421 ++nr_tracepoints;
422 ppath->next = tracepoint_id_to_path(pos->attr.config);
423 if (!ppath->next)
424 die("%s\n", "No memory to alloc tracepoints list");
425 ppath = ppath->next;
426 }
427
428 return nr_tracepoints > 0 ? path.next : NULL;
429}
430
431bool have_tracepoints(struct list_head *pattrs)
432{
433 struct perf_evsel *pos;
434
435 list_for_each_entry(pos, pattrs, node)
436 if (pos->attr.type == PERF_TYPE_TRACEPOINT)
437 return true;
438
439 return false;
440}
441
442int read_tracing_data(int fd, struct list_head *pattrs)
443{
444 char buf[BUFSIZ];
445 struct tracepoint_path *tps = get_tracepoints_path(pattrs);
446
447 /*
448 * What? No tracepoints? No sense writing anything here, bail out.
449 */
450 if (tps == NULL)
451 return -1;
452
453 output_fd = fd;
454
455 buf[0] = 23;
456 buf[1] = 8;
457 buf[2] = 68;
458 memcpy(buf + 3, "tracing", 7);
459
460 write_or_die(buf, 10);
461
462 write_or_die(VERSION, strlen(VERSION) + 1);
463
464 /* save endian */
465 if (bigendian())
466 buf[0] = 1;
467 else
468 buf[0] = 0;
469
470 write_or_die(buf, 1);
471
472 /* save size of long */
473 buf[0] = sizeof(long);
474 write_or_die(buf, 1);
475
476 /* save page_size */
477 page_size = sysconf(_SC_PAGESIZE);
478 write_or_die(&page_size, 4);
479
480 read_header_files();
481 read_ftrace_files(tps);
482 read_event_files(tps);
483 read_proc_kallsyms();
484 read_ftrace_printk();
485
486 return 0;
487}
488
489ssize_t read_tracing_data_size(int fd, struct list_head *pattrs)
490{
491 ssize_t size;
492 int err = 0;
493
494 calc_data_size = 1;
495 err = read_tracing_data(fd, pattrs);
496 size = calc_data_size - 1;
497 calc_data_size = 0;
498
499 if (err < 0)
500 return err;
501
502 return size;
503}