2 * Copyright (C) 2008,2009, Steven Rostedt <srostedt@redhat.com>
4 * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
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!)
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.
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
19 * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
28 #include <sys/types.h>
36 #include <linux/list.h>
37 #include <linux/kernel.h>
40 #include "trace-event.h"
41 #include <api/fs/debugfs.h>
52 unsigned char str[] = { 0x1, 0x2, 0x3, 0x4, 0x0, 0x0, 0x0, 0x0};
55 ptr = (unsigned int *)(void *)str;
56 return *ptr == 0x01020304;
59 /* unfortunately, you can not stat debugfs or proc files for size */
60 static int record_file(const char *file, ssize_t hdr_sz)
62 unsigned long long size = 0;
63 char buf[BUFSIZ], *sizep;
64 off_t hdr_pos = lseek(output_fd, 0, SEEK_CUR);
68 fd = open(file, O_RDONLY);
70 pr_debug("Can't read '%s'", file);
74 /* put in zeros for file size, then fill true size later */
76 if (write(output_fd, &size, hdr_sz) != hdr_sz)
81 r = read(fd, buf, BUFSIZ);
84 if (write(output_fd, buf, r) != r)
89 /* ugh, handle big-endian hdr_size == 4 */
92 sizep += sizeof(u64) - hdr_sz;
94 if (hdr_sz && pwrite(output_fd, sizep, hdr_sz, hdr_pos) < 0) {
95 pr_debug("writing file size failed\n");
105 static int record_header_files(void)
111 path = get_tracing_file("events/header_page");
113 pr_debug("can't get tracing/events/header_page");
117 if (stat(path, &st) < 0) {
118 pr_debug("can't read '%s'", path);
122 if (write(output_fd, "header_page", 12) != 12) {
123 pr_debug("can't write header_page\n");
127 if (record_file(path, 8) < 0) {
128 pr_debug("can't record header_page file\n");
132 put_tracing_file(path);
134 path = get_tracing_file("events/header_event");
136 pr_debug("can't get tracing/events/header_event");
141 if (stat(path, &st) < 0) {
142 pr_debug("can't read '%s'", path);
146 if (write(output_fd, "header_event", 13) != 13) {
147 pr_debug("can't write header_event\n");
151 if (record_file(path, 8) < 0) {
152 pr_debug("can't record header_event file\n");
158 put_tracing_file(path);
162 static bool name_in_tp_list(char *sys, struct tracepoint_path *tps)
165 if (!strcmp(sys, tps->name))
173 static int copy_event_system(const char *sys, struct tracepoint_path *tps)
185 pr_debug("can't read directory '%s'", sys);
189 while ((dent = readdir(dir))) {
190 if (dent->d_type != DT_DIR ||
191 strcmp(dent->d_name, ".") == 0 ||
192 strcmp(dent->d_name, "..") == 0 ||
193 !name_in_tp_list(dent->d_name, tps))
195 if (asprintf(&format, "%s/%s/format", sys, dent->d_name) < 0) {
199 ret = stat(format, &st);
206 if (write(output_fd, &count, 4) != 4) {
208 pr_debug("can't write count\n");
213 while ((dent = readdir(dir))) {
214 if (dent->d_type != DT_DIR ||
215 strcmp(dent->d_name, ".") == 0 ||
216 strcmp(dent->d_name, "..") == 0 ||
217 !name_in_tp_list(dent->d_name, tps))
219 if (asprintf(&format, "%s/%s/format", sys, dent->d_name) < 0) {
223 ret = stat(format, &st);
226 err = record_file(format, 8);
240 static int record_ftrace_files(struct tracepoint_path *tps)
245 path = get_tracing_file("events/ftrace");
247 pr_debug("can't get tracing/events/ftrace");
251 ret = copy_event_system(path, tps);
253 put_tracing_file(path);
258 static bool system_in_tp_list(char *sys, struct tracepoint_path *tps)
261 if (!strcmp(sys, tps->system))
269 static int record_event_files(struct tracepoint_path *tps)
280 path = get_tracing_file("events");
282 pr_debug("can't get tracing/events");
289 pr_debug("can't read directory '%s'", path);
293 while ((dent = readdir(dir))) {
294 if (dent->d_type != DT_DIR ||
295 strcmp(dent->d_name, ".") == 0 ||
296 strcmp(dent->d_name, "..") == 0 ||
297 strcmp(dent->d_name, "ftrace") == 0 ||
298 !system_in_tp_list(dent->d_name, tps))
303 if (write(output_fd, &count, 4) != 4) {
305 pr_debug("can't write count\n");
310 while ((dent = readdir(dir))) {
311 if (dent->d_type != DT_DIR ||
312 strcmp(dent->d_name, ".") == 0 ||
313 strcmp(dent->d_name, "..") == 0 ||
314 strcmp(dent->d_name, "ftrace") == 0 ||
315 !system_in_tp_list(dent->d_name, tps))
317 if (asprintf(&sys, "%s/%s", path, dent->d_name) < 0) {
321 ret = stat(sys, &st);
323 ssize_t size = strlen(dent->d_name) + 1;
325 if (write(output_fd, dent->d_name, size) != size ||
326 copy_event_system(sys, tps) < 0) {
337 put_tracing_file(path);
342 static int record_proc_kallsyms(void)
345 const char *path = "/proc/kallsyms";
349 ret = stat(path, &st);
353 if (write(output_fd, &size, 4) != 4)
357 return record_file(path, 4);
360 static int record_ftrace_printk(void)
367 path = get_tracing_file("printk_formats");
369 pr_debug("can't get tracing/printk_formats");
373 ret = stat(path, &st);
377 if (write(output_fd, &size, 4) != 4)
381 err = record_file(path, 4);
384 put_tracing_file(path);
389 put_tracepoints_path(struct tracepoint_path *tps)
392 struct tracepoint_path *t = tps;
401 static struct tracepoint_path *
402 get_tracepoints_path(struct list_head *pattrs)
404 struct tracepoint_path path, *ppath = &path;
405 struct perf_evsel *pos;
406 int nr_tracepoints = 0;
408 list_for_each_entry(pos, pattrs, node) {
409 if (pos->attr.type != PERF_TYPE_TRACEPOINT)
414 ppath->next = tracepoint_name_to_path(pos->name);
418 if (strchr(pos->name, ':') == NULL)
425 ppath->next = tracepoint_id_to_path(pos->attr.config);
428 pr_debug("No memory to alloc tracepoints list\n");
429 put_tracepoints_path(&path);
436 return nr_tracepoints > 0 ? path.next : NULL;
439 bool have_tracepoints(struct list_head *pattrs)
441 struct perf_evsel *pos;
443 list_for_each_entry(pos, pattrs, node)
444 if (pos->attr.type == PERF_TYPE_TRACEPOINT)
450 static int tracing_data_header(void)
455 /* just guessing this is someone's birthday.. ;) */
459 memcpy(buf + 3, "tracing", 7);
461 if (write(output_fd, buf, 10) != 10)
464 size = strlen(VERSION) + 1;
465 if (write(output_fd, VERSION, size) != size)
474 if (write(output_fd, buf, 1) != 1)
477 /* save size of long */
478 buf[0] = sizeof(long);
479 if (write(output_fd, buf, 1) != 1)
483 if (write(output_fd, &page_size, 4) != 4)
489 struct tracing_data *tracing_data_get(struct list_head *pattrs,
492 struct tracepoint_path *tps;
493 struct tracing_data *tdata;
498 tps = get_tracepoints_path(pattrs);
502 tdata = malloc(sizeof(*tdata));
512 snprintf(tdata->temp_file, sizeof(tdata->temp_file),
514 if (!mkstemp(tdata->temp_file)) {
515 pr_debug("Can't make temp file");
519 temp_fd = open(tdata->temp_file, O_RDWR);
521 pr_debug("Can't read '%s'", tdata->temp_file);
526 * Set the temp file the default output, so all the
527 * tracing data are stored into it.
532 err = tracing_data_header();
535 err = record_header_files();
538 err = record_ftrace_files(tps);
541 err = record_event_files(tps);
544 err = record_proc_kallsyms();
547 err = record_ftrace_printk();
551 * All tracing data are stored by now, we can restore
552 * the default output file in case we used temp file.
555 tdata->size = lseek(output_fd, 0, SEEK_CUR);
563 put_tracepoints_path(tps);
567 int tracing_data_put(struct tracing_data *tdata)
572 err = record_file(tdata->temp_file, 0);
573 unlink(tdata->temp_file);
580 int read_tracing_data(int fd, struct list_head *pattrs)
583 struct tracing_data *tdata;
586 * We work over the real file, so we can write data
587 * directly, no temp file is needed.
589 tdata = tracing_data_get(pattrs, fd, false);
593 err = tracing_data_put(tdata);