1 #define _FILE_OFFSET_BITS 64
9 #include <linux/list.h>
10 #include <linux/kernel.h>
11 #include <linux/bitops.h>
12 #include <sys/utsname.h>
18 #include "trace-event.h"
26 static bool no_buildid_cache
= false;
28 static int trace_event_count
;
29 static struct perf_trace_event_type
*trace_events
;
31 static u32 header_argc
;
32 static const char **header_argv
;
34 int perf_header__push_event(u64 id
, const char *name
)
36 struct perf_trace_event_type
*nevents
;
38 if (strlen(name
) > MAX_EVENT_NAME
)
39 pr_warning("Event %s will be truncated\n", name
);
41 nevents
= realloc(trace_events
, (trace_event_count
+ 1) * sizeof(*trace_events
));
44 trace_events
= nevents
;
46 memset(&trace_events
[trace_event_count
], 0, sizeof(struct perf_trace_event_type
));
47 trace_events
[trace_event_count
].event_id
= id
;
48 strncpy(trace_events
[trace_event_count
].name
, name
, MAX_EVENT_NAME
- 1);
53 char *perf_header__find_event(u64 id
)
56 for (i
= 0 ; i
< trace_event_count
; i
++) {
57 if (trace_events
[i
].event_id
== id
)
58 return trace_events
[i
].name
;
65 * must be a numerical value to let the endianness
66 * determine the memory layout. That way we are able
67 * to detect endianness when reading the perf.data file
70 * we check for legacy (PERFFILE) format.
72 static const char *__perf_magic1
= "PERFFILE";
73 static const u64 __perf_magic2
= 0x32454c4946524550ULL
;
74 static const u64 __perf_magic2_sw
= 0x50455246494c4532ULL
;
76 #define PERF_MAGIC __perf_magic2
78 struct perf_file_attr
{
79 struct perf_event_attr attr
;
80 struct perf_file_section ids
;
83 void perf_header__set_feat(struct perf_header
*header
, int feat
)
85 set_bit(feat
, header
->adds_features
);
88 void perf_header__clear_feat(struct perf_header
*header
, int feat
)
90 clear_bit(feat
, header
->adds_features
);
93 bool perf_header__has_feat(const struct perf_header
*header
, int feat
)
95 return test_bit(feat
, header
->adds_features
);
98 static int do_write(int fd
, const void *buf
, size_t size
)
101 int ret
= write(fd
, buf
, size
);
113 #define NAME_ALIGN 64
115 static int write_padded(int fd
, const void *bf
, size_t count
,
116 size_t count_aligned
)
118 static const char zero_buf
[NAME_ALIGN
];
119 int err
= do_write(fd
, bf
, count
);
122 err
= do_write(fd
, zero_buf
, count_aligned
- count
);
127 static int do_write_string(int fd
, const char *str
)
132 olen
= strlen(str
) + 1;
133 len
= PERF_ALIGN(olen
, NAME_ALIGN
);
135 /* write len, incl. \0 */
136 ret
= do_write(fd
, &len
, sizeof(len
));
140 return write_padded(fd
, str
, olen
, len
);
143 static char *do_read_string(int fd
, struct perf_header
*ph
)
149 sz
= read(fd
, &len
, sizeof(len
));
150 if (sz
< (ssize_t
)sizeof(len
))
160 ret
= read(fd
, buf
, len
);
161 if (ret
== (ssize_t
)len
) {
163 * strings are padded by zeroes
164 * thus the actual strlen of buf
165 * may be less than len
175 perf_header__set_cmdline(int argc
, const char **argv
)
180 * If header_argv has already been set, do not override it.
181 * This allows a command to set the cmdline, parse args and
182 * then call another builtin function that implements a
183 * command -- e.g, cmd_kvm calling cmd_record.
188 header_argc
= (u32
)argc
;
190 /* do not include NULL termination */
191 header_argv
= calloc(argc
, sizeof(char *));
196 * must copy argv contents because it gets moved
197 * around during option parsing
199 for (i
= 0; i
< argc
; i
++)
200 header_argv
[i
] = argv
[i
];
205 #define dsos__for_each_with_build_id(pos, head) \
206 list_for_each_entry(pos, head, node) \
207 if (!pos->has_build_id) \
211 static int write_buildid(char *name
, size_t name_len
, u8
*build_id
,
212 pid_t pid
, u16 misc
, int fd
)
215 struct build_id_event b
;
219 len
= PERF_ALIGN(len
, NAME_ALIGN
);
221 memset(&b
, 0, sizeof(b
));
222 memcpy(&b
.build_id
, build_id
, BUILD_ID_SIZE
);
224 b
.header
.misc
= misc
;
225 b
.header
.size
= sizeof(b
) + len
;
227 err
= do_write(fd
, &b
, sizeof(b
));
231 return write_padded(fd
, name
, name_len
+ 1, len
);
234 static int __dsos__write_buildid_table(struct list_head
*head
, pid_t pid
,
239 dsos__for_each_with_build_id(pos
, head
) {
247 if (is_vdso_map(pos
->short_name
)) {
248 name
= (char *) VDSO__MAP_NAME
;
249 name_len
= sizeof(VDSO__MAP_NAME
) + 1;
251 name
= pos
->long_name
;
252 name_len
= pos
->long_name_len
+ 1;
255 err
= write_buildid(name
, name_len
, pos
->build_id
,
264 static int machine__write_buildid_table(struct machine
*machine
, int fd
)
267 u16 kmisc
= PERF_RECORD_MISC_KERNEL
,
268 umisc
= PERF_RECORD_MISC_USER
;
270 if (!machine__is_host(machine
)) {
271 kmisc
= PERF_RECORD_MISC_GUEST_KERNEL
;
272 umisc
= PERF_RECORD_MISC_GUEST_USER
;
275 err
= __dsos__write_buildid_table(&machine
->kernel_dsos
, machine
->pid
,
278 err
= __dsos__write_buildid_table(&machine
->user_dsos
,
279 machine
->pid
, umisc
, fd
);
283 static int dsos__write_buildid_table(struct perf_header
*header
, int fd
)
285 struct perf_session
*session
= container_of(header
,
286 struct perf_session
, header
);
288 int err
= machine__write_buildid_table(&session
->host_machine
, fd
);
293 for (nd
= rb_first(&session
->machines
); nd
; nd
= rb_next(nd
)) {
294 struct machine
*pos
= rb_entry(nd
, struct machine
, rb_node
);
295 err
= machine__write_buildid_table(pos
, fd
);
302 int build_id_cache__add_s(const char *sbuild_id
, const char *debugdir
,
303 const char *name
, bool is_kallsyms
, bool is_vdso
)
305 const size_t size
= PATH_MAX
;
306 char *realname
, *filename
= zalloc(size
),
307 *linkname
= zalloc(size
), *targetname
;
309 bool slash
= is_kallsyms
|| is_vdso
;
312 if (symbol_conf
.kptr_restrict
) {
313 pr_debug("Not caching a kptr_restrict'ed /proc/kallsyms\n");
316 realname
= (char *) name
;
318 realname
= realpath(name
, NULL
);
320 if (realname
== NULL
|| filename
== NULL
|| linkname
== NULL
)
323 len
= scnprintf(filename
, size
, "%s%s%s",
324 debugdir
, slash
? "/" : "",
325 is_vdso
? VDSO__MAP_NAME
: realname
);
326 if (mkdir_p(filename
, 0755))
329 snprintf(filename
+ len
, size
- len
, "/%s", sbuild_id
);
331 if (access(filename
, F_OK
)) {
333 if (copyfile("/proc/kallsyms", filename
))
335 } else if (link(realname
, filename
) && copyfile(name
, filename
))
339 len
= scnprintf(linkname
, size
, "%s/.build-id/%.2s",
340 debugdir
, sbuild_id
);
342 if (access(linkname
, X_OK
) && mkdir_p(linkname
, 0755))
345 snprintf(linkname
+ len
, size
- len
, "/%s", sbuild_id
+ 2);
346 targetname
= filename
+ strlen(debugdir
) - 5;
347 memcpy(targetname
, "../..", 5);
349 if (symlink(targetname
, linkname
) == 0)
359 static int build_id_cache__add_b(const u8
*build_id
, size_t build_id_size
,
360 const char *name
, const char *debugdir
,
361 bool is_kallsyms
, bool is_vdso
)
363 char sbuild_id
[BUILD_ID_SIZE
* 2 + 1];
365 build_id__sprintf(build_id
, build_id_size
, sbuild_id
);
367 return build_id_cache__add_s(sbuild_id
, debugdir
, name
,
368 is_kallsyms
, is_vdso
);
371 int build_id_cache__remove_s(const char *sbuild_id
, const char *debugdir
)
373 const size_t size
= PATH_MAX
;
374 char *filename
= zalloc(size
),
375 *linkname
= zalloc(size
);
378 if (filename
== NULL
|| linkname
== NULL
)
381 snprintf(linkname
, size
, "%s/.build-id/%.2s/%s",
382 debugdir
, sbuild_id
, sbuild_id
+ 2);
384 if (access(linkname
, F_OK
))
387 if (readlink(linkname
, filename
, size
- 1) < 0)
390 if (unlink(linkname
))
394 * Since the link is relative, we must make it absolute:
396 snprintf(linkname
, size
, "%s/.build-id/%.2s/%s",
397 debugdir
, sbuild_id
, filename
);
399 if (unlink(linkname
))
409 static int dso__cache_build_id(struct dso
*dso
, const char *debugdir
)
411 bool is_kallsyms
= dso
->kernel
&& dso
->long_name
[0] != '/';
412 bool is_vdso
= is_vdso_map(dso
->short_name
);
414 return build_id_cache__add_b(dso
->build_id
, sizeof(dso
->build_id
),
415 dso
->long_name
, debugdir
,
416 is_kallsyms
, is_vdso
);
419 static int __dsos__cache_build_ids(struct list_head
*head
, const char *debugdir
)
424 dsos__for_each_with_build_id(pos
, head
)
425 if (dso__cache_build_id(pos
, debugdir
))
431 static int machine__cache_build_ids(struct machine
*machine
, const char *debugdir
)
433 int ret
= __dsos__cache_build_ids(&machine
->kernel_dsos
, debugdir
);
434 ret
|= __dsos__cache_build_ids(&machine
->user_dsos
, debugdir
);
438 static int perf_session__cache_build_ids(struct perf_session
*session
)
442 char debugdir
[PATH_MAX
];
444 snprintf(debugdir
, sizeof(debugdir
), "%s", buildid_dir
);
446 if (mkdir(debugdir
, 0755) != 0 && errno
!= EEXIST
)
449 ret
= machine__cache_build_ids(&session
->host_machine
, debugdir
);
451 for (nd
= rb_first(&session
->machines
); nd
; nd
= rb_next(nd
)) {
452 struct machine
*pos
= rb_entry(nd
, struct machine
, rb_node
);
453 ret
|= machine__cache_build_ids(pos
, debugdir
);
458 static bool machine__read_build_ids(struct machine
*machine
, bool with_hits
)
460 bool ret
= __dsos__read_build_ids(&machine
->kernel_dsos
, with_hits
);
461 ret
|= __dsos__read_build_ids(&machine
->user_dsos
, with_hits
);
465 static bool perf_session__read_build_ids(struct perf_session
*session
, bool with_hits
)
468 bool ret
= machine__read_build_ids(&session
->host_machine
, with_hits
);
470 for (nd
= rb_first(&session
->machines
); nd
; nd
= rb_next(nd
)) {
471 struct machine
*pos
= rb_entry(nd
, struct machine
, rb_node
);
472 ret
|= machine__read_build_ids(pos
, with_hits
);
478 static int write_tracing_data(int fd
, struct perf_header
*h __maybe_unused
,
479 struct perf_evlist
*evlist
)
481 return read_tracing_data(fd
, &evlist
->entries
);
485 static int write_build_id(int fd
, struct perf_header
*h
,
486 struct perf_evlist
*evlist __maybe_unused
)
488 struct perf_session
*session
;
491 session
= container_of(h
, struct perf_session
, header
);
493 if (!perf_session__read_build_ids(session
, true))
496 err
= dsos__write_buildid_table(h
, fd
);
498 pr_debug("failed to write buildid table\n");
501 if (!no_buildid_cache
)
502 perf_session__cache_build_ids(session
);
507 static int write_hostname(int fd
, struct perf_header
*h __maybe_unused
,
508 struct perf_evlist
*evlist __maybe_unused
)
517 return do_write_string(fd
, uts
.nodename
);
520 static int write_osrelease(int fd
, struct perf_header
*h __maybe_unused
,
521 struct perf_evlist
*evlist __maybe_unused
)
530 return do_write_string(fd
, uts
.release
);
533 static int write_arch(int fd
, struct perf_header
*h __maybe_unused
,
534 struct perf_evlist
*evlist __maybe_unused
)
543 return do_write_string(fd
, uts
.machine
);
546 static int write_version(int fd
, struct perf_header
*h __maybe_unused
,
547 struct perf_evlist
*evlist __maybe_unused
)
549 return do_write_string(fd
, perf_version_string
);
552 static int write_cpudesc(int fd
, struct perf_header
*h __maybe_unused
,
553 struct perf_evlist
*evlist __maybe_unused
)
556 #define CPUINFO_PROC NULL
561 const char *search
= CPUINFO_PROC
;
568 file
= fopen("/proc/cpuinfo", "r");
572 while (getline(&buf
, &len
, file
) > 0) {
573 ret
= strncmp(buf
, search
, strlen(search
));
583 p
= strchr(buf
, ':');
584 if (p
&& *(p
+1) == ' ' && *(p
+2))
590 /* squash extra space characters (branding string) */
597 while (*q
&& isspace(*q
))
600 while ((*r
++ = *q
++));
604 ret
= do_write_string(fd
, s
);
611 static int write_nrcpus(int fd
, struct perf_header
*h __maybe_unused
,
612 struct perf_evlist
*evlist __maybe_unused
)
618 nr
= sysconf(_SC_NPROCESSORS_CONF
);
622 nrc
= (u32
)(nr
& UINT_MAX
);
624 nr
= sysconf(_SC_NPROCESSORS_ONLN
);
628 nra
= (u32
)(nr
& UINT_MAX
);
630 ret
= do_write(fd
, &nrc
, sizeof(nrc
));
634 return do_write(fd
, &nra
, sizeof(nra
));
637 static int write_event_desc(int fd
, struct perf_header
*h __maybe_unused
,
638 struct perf_evlist
*evlist
)
640 struct perf_evsel
*evsel
;
644 nre
= evlist
->nr_entries
;
647 * write number of events
649 ret
= do_write(fd
, &nre
, sizeof(nre
));
654 * size of perf_event_attr struct
656 sz
= (u32
)sizeof(evsel
->attr
);
657 ret
= do_write(fd
, &sz
, sizeof(sz
));
661 list_for_each_entry(evsel
, &evlist
->entries
, node
) {
663 ret
= do_write(fd
, &evsel
->attr
, sz
);
667 * write number of unique id per event
668 * there is one id per instance of an event
670 * copy into an nri to be independent of the
674 ret
= do_write(fd
, &nri
, sizeof(nri
));
679 * write event string as passed on cmdline
681 ret
= do_write_string(fd
, perf_evsel__name(evsel
));
685 * write unique ids for this event
687 ret
= do_write(fd
, evsel
->id
, evsel
->ids
* sizeof(u64
));
694 static int write_cmdline(int fd
, struct perf_header
*h __maybe_unused
,
695 struct perf_evlist
*evlist __maybe_unused
)
697 char buf
[MAXPATHLEN
];
703 * actual atual path to perf binary
705 sprintf(proc
, "/proc/%d/exe", getpid());
706 ret
= readlink(proc
, buf
, sizeof(buf
));
710 /* readlink() does not add null termination */
713 /* account for binary path */
716 ret
= do_write(fd
, &n
, sizeof(n
));
720 ret
= do_write_string(fd
, buf
);
724 for (i
= 0 ; i
< header_argc
; i
++) {
725 ret
= do_write_string(fd
, header_argv
[i
]);
732 #define CORE_SIB_FMT \
733 "/sys/devices/system/cpu/cpu%d/topology/core_siblings_list"
734 #define THRD_SIB_FMT \
735 "/sys/devices/system/cpu/cpu%d/topology/thread_siblings_list"
740 char **core_siblings
;
741 char **thread_siblings
;
744 static int build_cpu_topo(struct cpu_topo
*tp
, int cpu
)
747 char filename
[MAXPATHLEN
];
748 char *buf
= NULL
, *p
;
753 sprintf(filename
, CORE_SIB_FMT
, cpu
);
754 fp
= fopen(filename
, "r");
758 if (getline(&buf
, &len
, fp
) <= 0)
763 p
= strchr(buf
, '\n');
767 for (i
= 0; i
< tp
->core_sib
; i
++) {
768 if (!strcmp(buf
, tp
->core_siblings
[i
]))
771 if (i
== tp
->core_sib
) {
772 tp
->core_siblings
[i
] = buf
;
778 sprintf(filename
, THRD_SIB_FMT
, cpu
);
779 fp
= fopen(filename
, "r");
783 if (getline(&buf
, &len
, fp
) <= 0)
786 p
= strchr(buf
, '\n');
790 for (i
= 0; i
< tp
->thread_sib
; i
++) {
791 if (!strcmp(buf
, tp
->thread_siblings
[i
]))
794 if (i
== tp
->thread_sib
) {
795 tp
->thread_siblings
[i
] = buf
;
807 static void free_cpu_topo(struct cpu_topo
*tp
)
814 for (i
= 0 ; i
< tp
->core_sib
; i
++)
815 free(tp
->core_siblings
[i
]);
817 for (i
= 0 ; i
< tp
->thread_sib
; i
++)
818 free(tp
->thread_siblings
[i
]);
823 static struct cpu_topo
*build_cpu_topology(void)
832 ncpus
= sysconf(_SC_NPROCESSORS_CONF
);
836 nr
= (u32
)(ncpus
& UINT_MAX
);
838 sz
= nr
* sizeof(char *);
840 addr
= calloc(1, sizeof(*tp
) + 2 * sz
);
847 tp
->core_siblings
= addr
;
849 tp
->thread_siblings
= addr
;
851 for (i
= 0; i
< nr
; i
++) {
852 ret
= build_cpu_topo(tp
, i
);
863 static int write_cpu_topology(int fd
, struct perf_header
*h __maybe_unused
,
864 struct perf_evlist
*evlist __maybe_unused
)
870 tp
= build_cpu_topology();
874 ret
= do_write(fd
, &tp
->core_sib
, sizeof(tp
->core_sib
));
878 for (i
= 0; i
< tp
->core_sib
; i
++) {
879 ret
= do_write_string(fd
, tp
->core_siblings
[i
]);
883 ret
= do_write(fd
, &tp
->thread_sib
, sizeof(tp
->thread_sib
));
887 for (i
= 0; i
< tp
->thread_sib
; i
++) {
888 ret
= do_write_string(fd
, tp
->thread_siblings
[i
]);
899 static int write_total_mem(int fd
, struct perf_header
*h __maybe_unused
,
900 struct perf_evlist
*evlist __maybe_unused
)
908 fp
= fopen("/proc/meminfo", "r");
912 while (getline(&buf
, &len
, fp
) > 0) {
913 ret
= strncmp(buf
, "MemTotal:", 9);
918 n
= sscanf(buf
, "%*s %"PRIu64
, &mem
);
920 ret
= do_write(fd
, &mem
, sizeof(mem
));
927 static int write_topo_node(int fd
, int node
)
929 char str
[MAXPATHLEN
];
931 char *buf
= NULL
, *p
;
934 u64 mem_total
, mem_free
, mem
;
937 sprintf(str
, "/sys/devices/system/node/node%d/meminfo", node
);
938 fp
= fopen(str
, "r");
942 while (getline(&buf
, &len
, fp
) > 0) {
943 /* skip over invalid lines */
944 if (!strchr(buf
, ':'))
946 if (sscanf(buf
, "%*s %*d %s %"PRIu64
, field
, &mem
) != 2)
948 if (!strcmp(field
, "MemTotal:"))
950 if (!strcmp(field
, "MemFree:"))
956 ret
= do_write(fd
, &mem_total
, sizeof(u64
));
960 ret
= do_write(fd
, &mem_free
, sizeof(u64
));
965 sprintf(str
, "/sys/devices/system/node/node%d/cpulist", node
);
967 fp
= fopen(str
, "r");
971 if (getline(&buf
, &len
, fp
) <= 0)
974 p
= strchr(buf
, '\n');
978 ret
= do_write_string(fd
, buf
);
985 static int write_numa_topology(int fd
, struct perf_header
*h __maybe_unused
,
986 struct perf_evlist
*evlist __maybe_unused
)
991 struct cpu_map
*node_map
= NULL
;
996 fp
= fopen("/sys/devices/system/node/online", "r");
1000 if (getline(&buf
, &len
, fp
) <= 0)
1003 c
= strchr(buf
, '\n');
1007 node_map
= cpu_map__new(buf
);
1011 nr
= (u32
)node_map
->nr
;
1013 ret
= do_write(fd
, &nr
, sizeof(nr
));
1017 for (i
= 0; i
< nr
; i
++) {
1018 j
= (u32
)node_map
->map
[i
];
1019 ret
= do_write(fd
, &j
, sizeof(j
));
1023 ret
= write_topo_node(fd
, i
);
1037 * struct pmu_mappings {
1046 static int write_pmu_mappings(int fd
, struct perf_header
*h __maybe_unused
,
1047 struct perf_evlist
*evlist __maybe_unused
)
1049 struct perf_pmu
*pmu
= NULL
;
1050 off_t offset
= lseek(fd
, 0, SEEK_CUR
);
1053 /* write real pmu_num later */
1054 do_write(fd
, &pmu_num
, sizeof(pmu_num
));
1056 while ((pmu
= perf_pmu__scan(pmu
))) {
1060 do_write(fd
, &pmu
->type
, sizeof(pmu
->type
));
1061 do_write_string(fd
, pmu
->name
);
1064 if (pwrite(fd
, &pmu_num
, sizeof(pmu_num
), offset
) != sizeof(pmu_num
)) {
1066 lseek(fd
, offset
, SEEK_SET
);
1074 * default get_cpuid(): nothing gets recorded
1075 * actual implementation must be in arch/$(ARCH)/util/header.c
1077 int __attribute__ ((weak
)) get_cpuid(char *buffer __maybe_unused
,
1078 size_t sz __maybe_unused
)
1083 static int write_cpuid(int fd
, struct perf_header
*h __maybe_unused
,
1084 struct perf_evlist
*evlist __maybe_unused
)
1089 ret
= get_cpuid(buffer
, sizeof(buffer
));
1095 return do_write_string(fd
, buffer
);
1098 static int write_branch_stack(int fd __maybe_unused
,
1099 struct perf_header
*h __maybe_unused
,
1100 struct perf_evlist
*evlist __maybe_unused
)
1105 static void print_hostname(struct perf_header
*ph
, int fd
, FILE *fp
)
1107 char *str
= do_read_string(fd
, ph
);
1108 fprintf(fp
, "# hostname : %s\n", str
);
1112 static void print_osrelease(struct perf_header
*ph
, int fd
, FILE *fp
)
1114 char *str
= do_read_string(fd
, ph
);
1115 fprintf(fp
, "# os release : %s\n", str
);
1119 static void print_arch(struct perf_header
*ph
, int fd
, FILE *fp
)
1121 char *str
= do_read_string(fd
, ph
);
1122 fprintf(fp
, "# arch : %s\n", str
);
1126 static void print_cpudesc(struct perf_header
*ph
, int fd
, FILE *fp
)
1128 char *str
= do_read_string(fd
, ph
);
1129 fprintf(fp
, "# cpudesc : %s\n", str
);
1133 static void print_nrcpus(struct perf_header
*ph
, int fd
, FILE *fp
)
1138 ret
= read(fd
, &nr
, sizeof(nr
));
1139 if (ret
!= (ssize_t
)sizeof(nr
))
1140 nr
= -1; /* interpreted as error */
1145 fprintf(fp
, "# nrcpus online : %u\n", nr
);
1147 ret
= read(fd
, &nr
, sizeof(nr
));
1148 if (ret
!= (ssize_t
)sizeof(nr
))
1149 nr
= -1; /* interpreted as error */
1154 fprintf(fp
, "# nrcpus avail : %u\n", nr
);
1157 static void print_version(struct perf_header
*ph
, int fd
, FILE *fp
)
1159 char *str
= do_read_string(fd
, ph
);
1160 fprintf(fp
, "# perf version : %s\n", str
);
1164 static void print_cmdline(struct perf_header
*ph
, int fd
, FILE *fp
)
1170 ret
= read(fd
, &nr
, sizeof(nr
));
1171 if (ret
!= (ssize_t
)sizeof(nr
))
1177 fprintf(fp
, "# cmdline : ");
1179 for (i
= 0; i
< nr
; i
++) {
1180 str
= do_read_string(fd
, ph
);
1181 fprintf(fp
, "%s ", str
);
1187 static void print_cpu_topology(struct perf_header
*ph
, int fd
, FILE *fp
)
1193 ret
= read(fd
, &nr
, sizeof(nr
));
1194 if (ret
!= (ssize_t
)sizeof(nr
))
1200 for (i
= 0; i
< nr
; i
++) {
1201 str
= do_read_string(fd
, ph
);
1202 fprintf(fp
, "# sibling cores : %s\n", str
);
1206 ret
= read(fd
, &nr
, sizeof(nr
));
1207 if (ret
!= (ssize_t
)sizeof(nr
))
1213 for (i
= 0; i
< nr
; i
++) {
1214 str
= do_read_string(fd
, ph
);
1215 fprintf(fp
, "# sibling threads : %s\n", str
);
1220 static void free_event_desc(struct perf_evsel
*events
)
1222 struct perf_evsel
*evsel
;
1227 for (evsel
= events
; evsel
->attr
.size
; evsel
++) {
1237 static struct perf_evsel
*
1238 read_event_desc(struct perf_header
*ph
, int fd
)
1240 struct perf_evsel
*evsel
, *events
= NULL
;
1243 u32 nre
, sz
, nr
, i
, j
;
1247 /* number of events */
1248 ret
= read(fd
, &nre
, sizeof(nre
));
1249 if (ret
!= (ssize_t
)sizeof(nre
))
1253 nre
= bswap_32(nre
);
1255 ret
= read(fd
, &sz
, sizeof(sz
));
1256 if (ret
!= (ssize_t
)sizeof(sz
))
1262 /* buffer to hold on file attr struct */
1267 /* the last event terminates with evsel->attr.size == 0: */
1268 events
= calloc(nre
+ 1, sizeof(*events
));
1272 msz
= sizeof(evsel
->attr
);
1276 for (i
= 0, evsel
= events
; i
< nre
; evsel
++, i
++) {
1280 * must read entire on-file attr struct to
1281 * sync up with layout.
1283 ret
= read(fd
, buf
, sz
);
1284 if (ret
!= (ssize_t
)sz
)
1288 perf_event__attr_swap(buf
);
1290 memcpy(&evsel
->attr
, buf
, msz
);
1292 ret
= read(fd
, &nr
, sizeof(nr
));
1293 if (ret
!= (ssize_t
)sizeof(nr
))
1299 evsel
->name
= do_read_string(fd
, ph
);
1304 id
= calloc(nr
, sizeof(*id
));
1310 for (j
= 0 ; j
< nr
; j
++) {
1311 ret
= read(fd
, id
, sizeof(*id
));
1312 if (ret
!= (ssize_t
)sizeof(*id
))
1315 *id
= bswap_64(*id
);
1325 free_event_desc(events
);
1330 static void print_event_desc(struct perf_header
*ph
, int fd
, FILE *fp
)
1332 struct perf_evsel
*evsel
, *events
= read_event_desc(ph
, fd
);
1337 fprintf(fp
, "# event desc: not available or unable to read\n");
1341 for (evsel
= events
; evsel
->attr
.size
; evsel
++) {
1342 fprintf(fp
, "# event : name = %s, ", evsel
->name
);
1344 fprintf(fp
, "type = %d, config = 0x%"PRIx64
1345 ", config1 = 0x%"PRIx64
", config2 = 0x%"PRIx64
,
1347 (u64
)evsel
->attr
.config
,
1348 (u64
)evsel
->attr
.config1
,
1349 (u64
)evsel
->attr
.config2
);
1351 fprintf(fp
, ", excl_usr = %d, excl_kern = %d",
1352 evsel
->attr
.exclude_user
,
1353 evsel
->attr
.exclude_kernel
);
1355 fprintf(fp
, ", excl_host = %d, excl_guest = %d",
1356 evsel
->attr
.exclude_host
,
1357 evsel
->attr
.exclude_guest
);
1359 fprintf(fp
, ", precise_ip = %d", evsel
->attr
.precise_ip
);
1362 fprintf(fp
, ", id = {");
1363 for (j
= 0, id
= evsel
->id
; j
< evsel
->ids
; j
++, id
++) {
1366 fprintf(fp
, " %"PRIu64
, *id
);
1374 free_event_desc(events
);
1377 static void print_total_mem(struct perf_header
*h __maybe_unused
, int fd
,
1383 ret
= read(fd
, &mem
, sizeof(mem
));
1384 if (ret
!= sizeof(mem
))
1388 mem
= bswap_64(mem
);
1390 fprintf(fp
, "# total memory : %"PRIu64
" kB\n", mem
);
1393 fprintf(fp
, "# total memory : unknown\n");
1396 static void print_numa_topology(struct perf_header
*h __maybe_unused
, int fd
,
1402 uint64_t mem_total
, mem_free
;
1405 ret
= read(fd
, &nr
, sizeof(nr
));
1406 if (ret
!= (ssize_t
)sizeof(nr
))
1412 for (i
= 0; i
< nr
; i
++) {
1415 ret
= read(fd
, &c
, sizeof(c
));
1416 if (ret
!= (ssize_t
)sizeof(c
))
1422 ret
= read(fd
, &mem_total
, sizeof(u64
));
1423 if (ret
!= sizeof(u64
))
1426 ret
= read(fd
, &mem_free
, sizeof(u64
));
1427 if (ret
!= sizeof(u64
))
1430 if (h
->needs_swap
) {
1431 mem_total
= bswap_64(mem_total
);
1432 mem_free
= bswap_64(mem_free
);
1435 fprintf(fp
, "# node%u meminfo : total = %"PRIu64
" kB,"
1436 " free = %"PRIu64
" kB\n",
1441 str
= do_read_string(fd
, h
);
1442 fprintf(fp
, "# node%u cpu list : %s\n", c
, str
);
1447 fprintf(fp
, "# numa topology : not available\n");
1450 static void print_cpuid(struct perf_header
*ph
, int fd
, FILE *fp
)
1452 char *str
= do_read_string(fd
, ph
);
1453 fprintf(fp
, "# cpuid : %s\n", str
);
1457 static void print_branch_stack(struct perf_header
*ph __maybe_unused
,
1458 int fd __maybe_unused
,
1461 fprintf(fp
, "# contains samples with branch stack\n");
1464 static void print_pmu_mappings(struct perf_header
*ph
, int fd
, FILE *fp
)
1466 const char *delimiter
= "# pmu mappings: ";
1472 ret
= read(fd
, &pmu_num
, sizeof(pmu_num
));
1473 if (ret
!= sizeof(pmu_num
))
1477 pmu_num
= bswap_32(pmu_num
);
1480 fprintf(fp
, "# pmu mappings: not available\n");
1485 if (read(fd
, &type
, sizeof(type
)) != sizeof(type
))
1488 type
= bswap_32(type
);
1490 name
= do_read_string(fd
, ph
);
1494 fprintf(fp
, "%s%s = %" PRIu32
, delimiter
, name
, type
);
1504 fprintf(fp
, "# pmu mappings: unable to read\n");
1507 static int __event_process_build_id(struct build_id_event
*bev
,
1509 struct perf_session
*session
)
1512 struct list_head
*head
;
1513 struct machine
*machine
;
1516 enum dso_kernel_type dso_type
;
1518 machine
= perf_session__findnew_machine(session
, bev
->pid
);
1522 misc
= bev
->header
.misc
& PERF_RECORD_MISC_CPUMODE_MASK
;
1525 case PERF_RECORD_MISC_KERNEL
:
1526 dso_type
= DSO_TYPE_KERNEL
;
1527 head
= &machine
->kernel_dsos
;
1529 case PERF_RECORD_MISC_GUEST_KERNEL
:
1530 dso_type
= DSO_TYPE_GUEST_KERNEL
;
1531 head
= &machine
->kernel_dsos
;
1533 case PERF_RECORD_MISC_USER
:
1534 case PERF_RECORD_MISC_GUEST_USER
:
1535 dso_type
= DSO_TYPE_USER
;
1536 head
= &machine
->user_dsos
;
1542 dso
= __dsos__findnew(head
, filename
);
1544 char sbuild_id
[BUILD_ID_SIZE
* 2 + 1];
1546 dso__set_build_id(dso
, &bev
->build_id
);
1548 if (filename
[0] == '[')
1549 dso
->kernel
= dso_type
;
1551 build_id__sprintf(dso
->build_id
, sizeof(dso
->build_id
),
1553 pr_debug("build id event received for %s: %s\n",
1554 dso
->long_name
, sbuild_id
);
1562 static int perf_header__read_build_ids_abi_quirk(struct perf_header
*header
,
1563 int input
, u64 offset
, u64 size
)
1565 struct perf_session
*session
= container_of(header
, struct perf_session
, header
);
1567 struct perf_event_header header
;
1568 u8 build_id
[PERF_ALIGN(BUILD_ID_SIZE
, sizeof(u64
))];
1571 struct build_id_event bev
;
1572 char filename
[PATH_MAX
];
1573 u64 limit
= offset
+ size
;
1575 while (offset
< limit
) {
1578 if (read(input
, &old_bev
, sizeof(old_bev
)) != sizeof(old_bev
))
1581 if (header
->needs_swap
)
1582 perf_event_header__bswap(&old_bev
.header
);
1584 len
= old_bev
.header
.size
- sizeof(old_bev
);
1585 if (read(input
, filename
, len
) != len
)
1588 bev
.header
= old_bev
.header
;
1591 * As the pid is the missing value, we need to fill
1592 * it properly. The header.misc value give us nice hint.
1594 bev
.pid
= HOST_KERNEL_ID
;
1595 if (bev
.header
.misc
== PERF_RECORD_MISC_GUEST_USER
||
1596 bev
.header
.misc
== PERF_RECORD_MISC_GUEST_KERNEL
)
1597 bev
.pid
= DEFAULT_GUEST_KERNEL_ID
;
1599 memcpy(bev
.build_id
, old_bev
.build_id
, sizeof(bev
.build_id
));
1600 __event_process_build_id(&bev
, filename
, session
);
1602 offset
+= bev
.header
.size
;
1608 static int perf_header__read_build_ids(struct perf_header
*header
,
1609 int input
, u64 offset
, u64 size
)
1611 struct perf_session
*session
= container_of(header
, struct perf_session
, header
);
1612 struct build_id_event bev
;
1613 char filename
[PATH_MAX
];
1614 u64 limit
= offset
+ size
, orig_offset
= offset
;
1617 while (offset
< limit
) {
1620 if (read(input
, &bev
, sizeof(bev
)) != sizeof(bev
))
1623 if (header
->needs_swap
)
1624 perf_event_header__bswap(&bev
.header
);
1626 len
= bev
.header
.size
- sizeof(bev
);
1627 if (read(input
, filename
, len
) != len
)
1630 * The a1645ce1 changeset:
1632 * "perf: 'perf kvm' tool for monitoring guest performance from host"
1634 * Added a field to struct build_id_event that broke the file
1637 * Since the kernel build-id is the first entry, process the
1638 * table using the old format if the well known
1639 * '[kernel.kallsyms]' string for the kernel build-id has the
1640 * first 4 characters chopped off (where the pid_t sits).
1642 if (memcmp(filename
, "nel.kallsyms]", 13) == 0) {
1643 if (lseek(input
, orig_offset
, SEEK_SET
) == (off_t
)-1)
1645 return perf_header__read_build_ids_abi_quirk(header
, input
, offset
, size
);
1648 __event_process_build_id(&bev
, filename
, session
);
1650 offset
+= bev
.header
.size
;
1657 static int process_tracing_data(struct perf_file_section
*section
1659 struct perf_header
*ph __maybe_unused
,
1660 int feat __maybe_unused
, int fd
, void *data
)
1662 trace_report(fd
, data
, false);
1666 static int process_build_id(struct perf_file_section
*section
,
1667 struct perf_header
*ph
,
1668 int feat __maybe_unused
, int fd
,
1669 void *data __maybe_unused
)
1671 if (perf_header__read_build_ids(ph
, fd
, section
->offset
, section
->size
))
1672 pr_debug("Failed to read buildids, continuing...\n");
1676 static struct perf_evsel
*
1677 perf_evlist__find_by_index(struct perf_evlist
*evlist
, int idx
)
1679 struct perf_evsel
*evsel
;
1681 list_for_each_entry(evsel
, &evlist
->entries
, node
) {
1682 if (evsel
->idx
== idx
)
1690 perf_evlist__set_event_name(struct perf_evlist
*evlist
, struct perf_evsel
*event
)
1692 struct perf_evsel
*evsel
;
1697 evsel
= perf_evlist__find_by_index(evlist
, event
->idx
);
1704 evsel
->name
= strdup(event
->name
);
1708 process_event_desc(struct perf_file_section
*section __maybe_unused
,
1709 struct perf_header
*header
, int feat __maybe_unused
, int fd
,
1710 void *data __maybe_unused
)
1712 struct perf_session
*session
= container_of(header
, struct perf_session
, header
);
1713 struct perf_evsel
*evsel
, *events
= read_event_desc(header
, fd
);
1718 for (evsel
= events
; evsel
->attr
.size
; evsel
++)
1719 perf_evlist__set_event_name(session
->evlist
, evsel
);
1721 free_event_desc(events
);
1726 struct feature_ops
{
1727 int (*write
)(int fd
, struct perf_header
*h
, struct perf_evlist
*evlist
);
1728 void (*print
)(struct perf_header
*h
, int fd
, FILE *fp
);
1729 int (*process
)(struct perf_file_section
*section
,
1730 struct perf_header
*h
, int feat
, int fd
, void *data
);
1735 #define FEAT_OPA(n, func) \
1736 [n] = { .name = #n, .write = write_##func, .print = print_##func }
1737 #define FEAT_OPP(n, func) \
1738 [n] = { .name = #n, .write = write_##func, .print = print_##func, \
1739 .process = process_##func }
1740 #define FEAT_OPF(n, func) \
1741 [n] = { .name = #n, .write = write_##func, .print = print_##func, \
1744 /* feature_ops not implemented: */
1745 #define print_tracing_data NULL
1746 #define print_build_id NULL
1748 static const struct feature_ops feat_ops
[HEADER_LAST_FEATURE
] = {
1749 FEAT_OPP(HEADER_TRACING_DATA
, tracing_data
),
1750 FEAT_OPP(HEADER_BUILD_ID
, build_id
),
1751 FEAT_OPA(HEADER_HOSTNAME
, hostname
),
1752 FEAT_OPA(HEADER_OSRELEASE
, osrelease
),
1753 FEAT_OPA(HEADER_VERSION
, version
),
1754 FEAT_OPA(HEADER_ARCH
, arch
),
1755 FEAT_OPA(HEADER_NRCPUS
, nrcpus
),
1756 FEAT_OPA(HEADER_CPUDESC
, cpudesc
),
1757 FEAT_OPA(HEADER_CPUID
, cpuid
),
1758 FEAT_OPA(HEADER_TOTAL_MEM
, total_mem
),
1759 FEAT_OPP(HEADER_EVENT_DESC
, event_desc
),
1760 FEAT_OPA(HEADER_CMDLINE
, cmdline
),
1761 FEAT_OPF(HEADER_CPU_TOPOLOGY
, cpu_topology
),
1762 FEAT_OPF(HEADER_NUMA_TOPOLOGY
, numa_topology
),
1763 FEAT_OPA(HEADER_BRANCH_STACK
, branch_stack
),
1764 FEAT_OPA(HEADER_PMU_MAPPINGS
, pmu_mappings
),
1767 struct header_print_data
{
1769 bool full
; /* extended list of headers */
1772 static int perf_file_section__fprintf_info(struct perf_file_section
*section
,
1773 struct perf_header
*ph
,
1774 int feat
, int fd
, void *data
)
1776 struct header_print_data
*hd
= data
;
1778 if (lseek(fd
, section
->offset
, SEEK_SET
) == (off_t
)-1) {
1779 pr_debug("Failed to lseek to %" PRIu64
" offset for feature "
1780 "%d, continuing...\n", section
->offset
, feat
);
1783 if (feat
>= HEADER_LAST_FEATURE
) {
1784 pr_warning("unknown feature %d\n", feat
);
1787 if (!feat_ops
[feat
].print
)
1790 if (!feat_ops
[feat
].full_only
|| hd
->full
)
1791 feat_ops
[feat
].print(ph
, fd
, hd
->fp
);
1793 fprintf(hd
->fp
, "# %s info available, use -I to display\n",
1794 feat_ops
[feat
].name
);
1799 int perf_header__fprintf_info(struct perf_session
*session
, FILE *fp
, bool full
)
1801 struct header_print_data hd
;
1802 struct perf_header
*header
= &session
->header
;
1803 int fd
= session
->fd
;
1807 perf_header__process_sections(header
, fd
, &hd
,
1808 perf_file_section__fprintf_info
);
1812 static int do_write_feat(int fd
, struct perf_header
*h
, int type
,
1813 struct perf_file_section
**p
,
1814 struct perf_evlist
*evlist
)
1819 if (perf_header__has_feat(h
, type
)) {
1820 if (!feat_ops
[type
].write
)
1823 (*p
)->offset
= lseek(fd
, 0, SEEK_CUR
);
1825 err
= feat_ops
[type
].write(fd
, h
, evlist
);
1827 pr_debug("failed to write feature %d\n", type
);
1829 /* undo anything written */
1830 lseek(fd
, (*p
)->offset
, SEEK_SET
);
1834 (*p
)->size
= lseek(fd
, 0, SEEK_CUR
) - (*p
)->offset
;
1840 static int perf_header__adds_write(struct perf_header
*header
,
1841 struct perf_evlist
*evlist
, int fd
)
1844 struct perf_file_section
*feat_sec
, *p
;
1850 nr_sections
= bitmap_weight(header
->adds_features
, HEADER_FEAT_BITS
);
1854 feat_sec
= p
= calloc(sizeof(*feat_sec
), nr_sections
);
1855 if (feat_sec
== NULL
)
1858 sec_size
= sizeof(*feat_sec
) * nr_sections
;
1860 sec_start
= header
->data_offset
+ header
->data_size
;
1861 lseek(fd
, sec_start
+ sec_size
, SEEK_SET
);
1863 for_each_set_bit(feat
, header
->adds_features
, HEADER_FEAT_BITS
) {
1864 if (do_write_feat(fd
, header
, feat
, &p
, evlist
))
1865 perf_header__clear_feat(header
, feat
);
1868 lseek(fd
, sec_start
, SEEK_SET
);
1870 * may write more than needed due to dropped feature, but
1871 * this is okay, reader will skip the mising entries
1873 err
= do_write(fd
, feat_sec
, sec_size
);
1875 pr_debug("failed to write feature section\n");
1880 int perf_header__write_pipe(int fd
)
1882 struct perf_pipe_file_header f_header
;
1885 f_header
= (struct perf_pipe_file_header
){
1886 .magic
= PERF_MAGIC
,
1887 .size
= sizeof(f_header
),
1890 err
= do_write(fd
, &f_header
, sizeof(f_header
));
1892 pr_debug("failed to write perf pipe header\n");
1899 int perf_session__write_header(struct perf_session
*session
,
1900 struct perf_evlist
*evlist
,
1901 int fd
, bool at_exit
)
1903 struct perf_file_header f_header
;
1904 struct perf_file_attr f_attr
;
1905 struct perf_header
*header
= &session
->header
;
1906 struct perf_evsel
*evsel
, *pair
= NULL
;
1909 lseek(fd
, sizeof(f_header
), SEEK_SET
);
1911 if (session
->evlist
!= evlist
)
1912 pair
= perf_evlist__first(session
->evlist
);
1914 list_for_each_entry(evsel
, &evlist
->entries
, node
) {
1915 evsel
->id_offset
= lseek(fd
, 0, SEEK_CUR
);
1916 err
= do_write(fd
, evsel
->id
, evsel
->ids
* sizeof(u64
));
1919 pr_debug("failed to write perf header\n");
1922 if (session
->evlist
!= evlist
) {
1923 err
= do_write(fd
, pair
->id
, pair
->ids
* sizeof(u64
));
1926 evsel
->ids
+= pair
->ids
;
1927 pair
= perf_evsel__next(pair
);
1931 header
->attr_offset
= lseek(fd
, 0, SEEK_CUR
);
1933 list_for_each_entry(evsel
, &evlist
->entries
, node
) {
1934 f_attr
= (struct perf_file_attr
){
1935 .attr
= evsel
->attr
,
1937 .offset
= evsel
->id_offset
,
1938 .size
= evsel
->ids
* sizeof(u64
),
1941 err
= do_write(fd
, &f_attr
, sizeof(f_attr
));
1943 pr_debug("failed to write perf header attribute\n");
1948 header
->event_offset
= lseek(fd
, 0, SEEK_CUR
);
1949 header
->event_size
= trace_event_count
* sizeof(struct perf_trace_event_type
);
1951 err
= do_write(fd
, trace_events
, header
->event_size
);
1953 pr_debug("failed to write perf header events\n");
1958 header
->data_offset
= lseek(fd
, 0, SEEK_CUR
);
1961 err
= perf_header__adds_write(header
, evlist
, fd
);
1966 f_header
= (struct perf_file_header
){
1967 .magic
= PERF_MAGIC
,
1968 .size
= sizeof(f_header
),
1969 .attr_size
= sizeof(f_attr
),
1971 .offset
= header
->attr_offset
,
1972 .size
= evlist
->nr_entries
* sizeof(f_attr
),
1975 .offset
= header
->data_offset
,
1976 .size
= header
->data_size
,
1979 .offset
= header
->event_offset
,
1980 .size
= header
->event_size
,
1984 memcpy(&f_header
.adds_features
, &header
->adds_features
, sizeof(header
->adds_features
));
1986 lseek(fd
, 0, SEEK_SET
);
1987 err
= do_write(fd
, &f_header
, sizeof(f_header
));
1989 pr_debug("failed to write perf header\n");
1992 lseek(fd
, header
->data_offset
+ header
->data_size
, SEEK_SET
);
1998 static int perf_header__getbuffer64(struct perf_header
*header
,
1999 int fd
, void *buf
, size_t size
)
2001 if (readn(fd
, buf
, size
) <= 0)
2004 if (header
->needs_swap
)
2005 mem_bswap_64(buf
, size
);
2010 int perf_header__process_sections(struct perf_header
*header
, int fd
,
2012 int (*process
)(struct perf_file_section
*section
,
2013 struct perf_header
*ph
,
2014 int feat
, int fd
, void *data
))
2016 struct perf_file_section
*feat_sec
, *sec
;
2022 nr_sections
= bitmap_weight(header
->adds_features
, HEADER_FEAT_BITS
);
2026 feat_sec
= sec
= calloc(sizeof(*feat_sec
), nr_sections
);
2030 sec_size
= sizeof(*feat_sec
) * nr_sections
;
2032 lseek(fd
, header
->data_offset
+ header
->data_size
, SEEK_SET
);
2034 err
= perf_header__getbuffer64(header
, fd
, feat_sec
, sec_size
);
2038 for_each_set_bit(feat
, header
->adds_features
, HEADER_LAST_FEATURE
) {
2039 err
= process(sec
++, header
, feat
, fd
, data
);
2049 static const int attr_file_abi_sizes
[] = {
2050 [0] = PERF_ATTR_SIZE_VER0
,
2051 [1] = PERF_ATTR_SIZE_VER1
,
2052 [2] = PERF_ATTR_SIZE_VER2
,
2053 [3] = PERF_ATTR_SIZE_VER3
,
2058 * In the legacy file format, the magic number is not used to encode endianness.
2059 * hdr_sz was used to encode endianness. But given that hdr_sz can vary based
2060 * on ABI revisions, we need to try all combinations for all endianness to
2061 * detect the endianness.
2063 static int try_all_file_abis(uint64_t hdr_sz
, struct perf_header
*ph
)
2065 uint64_t ref_size
, attr_size
;
2068 for (i
= 0 ; attr_file_abi_sizes
[i
]; i
++) {
2069 ref_size
= attr_file_abi_sizes
[i
]
2070 + sizeof(struct perf_file_section
);
2071 if (hdr_sz
!= ref_size
) {
2072 attr_size
= bswap_64(hdr_sz
);
2073 if (attr_size
!= ref_size
)
2076 ph
->needs_swap
= true;
2078 pr_debug("ABI%d perf.data file detected, need_swap=%d\n",
2083 /* could not determine endianness */
2087 #define PERF_PIPE_HDR_VER0 16
2089 static const size_t attr_pipe_abi_sizes
[] = {
2090 [0] = PERF_PIPE_HDR_VER0
,
2095 * In the legacy pipe format, there is an implicit assumption that endiannesss
2096 * between host recording the samples, and host parsing the samples is the
2097 * same. This is not always the case given that the pipe output may always be
2098 * redirected into a file and analyzed on a different machine with possibly a
2099 * different endianness and perf_event ABI revsions in the perf tool itself.
2101 static int try_all_pipe_abis(uint64_t hdr_sz
, struct perf_header
*ph
)
2106 for (i
= 0 ; attr_pipe_abi_sizes
[i
]; i
++) {
2107 if (hdr_sz
!= attr_pipe_abi_sizes
[i
]) {
2108 attr_size
= bswap_64(hdr_sz
);
2109 if (attr_size
!= hdr_sz
)
2112 ph
->needs_swap
= true;
2114 pr_debug("Pipe ABI%d perf.data file detected\n", i
);
2120 static int check_magic_endian(u64 magic
, uint64_t hdr_sz
,
2121 bool is_pipe
, struct perf_header
*ph
)
2125 /* check for legacy format */
2126 ret
= memcmp(&magic
, __perf_magic1
, sizeof(magic
));
2128 pr_debug("legacy perf.data format\n");
2130 return try_all_pipe_abis(hdr_sz
, ph
);
2132 return try_all_file_abis(hdr_sz
, ph
);
2135 * the new magic number serves two purposes:
2136 * - unique number to identify actual perf.data files
2137 * - encode endianness of file
2140 /* check magic number with one endianness */
2141 if (magic
== __perf_magic2
)
2144 /* check magic number with opposite endianness */
2145 if (magic
!= __perf_magic2_sw
)
2148 ph
->needs_swap
= true;
2153 int perf_file_header__read(struct perf_file_header
*header
,
2154 struct perf_header
*ph
, int fd
)
2158 lseek(fd
, 0, SEEK_SET
);
2160 ret
= readn(fd
, header
, sizeof(*header
));
2164 if (check_magic_endian(header
->magic
,
2165 header
->attr_size
, false, ph
) < 0) {
2166 pr_debug("magic/endian check failed\n");
2170 if (ph
->needs_swap
) {
2171 mem_bswap_64(header
, offsetof(struct perf_file_header
,
2175 if (header
->size
!= sizeof(*header
)) {
2176 /* Support the previous format */
2177 if (header
->size
== offsetof(typeof(*header
), adds_features
))
2178 bitmap_zero(header
->adds_features
, HEADER_FEAT_BITS
);
2181 } else if (ph
->needs_swap
) {
2183 * feature bitmap is declared as an array of unsigned longs --
2184 * not good since its size can differ between the host that
2185 * generated the data file and the host analyzing the file.
2187 * We need to handle endianness, but we don't know the size of
2188 * the unsigned long where the file was generated. Take a best
2189 * guess at determining it: try 64-bit swap first (ie., file
2190 * created on a 64-bit host), and check if the hostname feature
2191 * bit is set (this feature bit is forced on as of fbe96f2).
2192 * If the bit is not, undo the 64-bit swap and try a 32-bit
2193 * swap. If the hostname bit is still not set (e.g., older data
2194 * file), punt and fallback to the original behavior --
2195 * clearing all feature bits and setting buildid.
2197 mem_bswap_64(&header
->adds_features
,
2198 BITS_TO_U64(HEADER_FEAT_BITS
));
2200 if (!test_bit(HEADER_HOSTNAME
, header
->adds_features
)) {
2202 mem_bswap_64(&header
->adds_features
,
2203 BITS_TO_U64(HEADER_FEAT_BITS
));
2206 mem_bswap_32(&header
->adds_features
,
2207 BITS_TO_U32(HEADER_FEAT_BITS
));
2210 if (!test_bit(HEADER_HOSTNAME
, header
->adds_features
)) {
2211 bitmap_zero(header
->adds_features
, HEADER_FEAT_BITS
);
2212 set_bit(HEADER_BUILD_ID
, header
->adds_features
);
2216 memcpy(&ph
->adds_features
, &header
->adds_features
,
2217 sizeof(ph
->adds_features
));
2219 ph
->event_offset
= header
->event_types
.offset
;
2220 ph
->event_size
= header
->event_types
.size
;
2221 ph
->data_offset
= header
->data
.offset
;
2222 ph
->data_size
= header
->data
.size
;
2226 static int perf_file_section__process(struct perf_file_section
*section
,
2227 struct perf_header
*ph
,
2228 int feat
, int fd
, void *data
)
2230 if (lseek(fd
, section
->offset
, SEEK_SET
) == (off_t
)-1) {
2231 pr_debug("Failed to lseek to %" PRIu64
" offset for feature "
2232 "%d, continuing...\n", section
->offset
, feat
);
2236 if (feat
>= HEADER_LAST_FEATURE
) {
2237 pr_debug("unknown feature %d, continuing...\n", feat
);
2241 if (!feat_ops
[feat
].process
)
2244 return feat_ops
[feat
].process(section
, ph
, feat
, fd
, data
);
2247 static int perf_file_header__read_pipe(struct perf_pipe_file_header
*header
,
2248 struct perf_header
*ph
, int fd
,
2253 ret
= readn(fd
, header
, sizeof(*header
));
2257 if (check_magic_endian(header
->magic
, header
->size
, true, ph
) < 0) {
2258 pr_debug("endian/magic failed\n");
2263 header
->size
= bswap_64(header
->size
);
2265 if (repipe
&& do_write(STDOUT_FILENO
, header
, sizeof(*header
)) < 0)
2271 static int perf_header__read_pipe(struct perf_session
*session
, int fd
)
2273 struct perf_header
*header
= &session
->header
;
2274 struct perf_pipe_file_header f_header
;
2276 if (perf_file_header__read_pipe(&f_header
, header
, fd
,
2277 session
->repipe
) < 0) {
2278 pr_debug("incompatible file format\n");
2287 static int read_attr(int fd
, struct perf_header
*ph
,
2288 struct perf_file_attr
*f_attr
)
2290 struct perf_event_attr
*attr
= &f_attr
->attr
;
2292 size_t our_sz
= sizeof(f_attr
->attr
);
2295 memset(f_attr
, 0, sizeof(*f_attr
));
2297 /* read minimal guaranteed structure */
2298 ret
= readn(fd
, attr
, PERF_ATTR_SIZE_VER0
);
2300 pr_debug("cannot read %d bytes of header attr\n",
2301 PERF_ATTR_SIZE_VER0
);
2305 /* on file perf_event_attr size */
2313 sz
= PERF_ATTR_SIZE_VER0
;
2314 } else if (sz
> our_sz
) {
2315 pr_debug("file uses a more recent and unsupported ABI"
2316 " (%zu bytes extra)\n", sz
- our_sz
);
2319 /* what we have not yet read and that we know about */
2320 left
= sz
- PERF_ATTR_SIZE_VER0
;
2323 ptr
+= PERF_ATTR_SIZE_VER0
;
2325 ret
= readn(fd
, ptr
, left
);
2327 /* read perf_file_section, ids are read in caller */
2328 ret
= readn(fd
, &f_attr
->ids
, sizeof(f_attr
->ids
));
2330 return ret
<= 0 ? -1 : 0;
2333 static int perf_evsel__prepare_tracepoint_event(struct perf_evsel
*evsel
,
2334 struct pevent
*pevent
)
2336 struct event_format
*event
;
2339 /* already prepared */
2340 if (evsel
->tp_format
)
2343 event
= pevent_find_event(pevent
, evsel
->attr
.config
);
2348 snprintf(bf
, sizeof(bf
), "%s:%s", event
->system
, event
->name
);
2349 evsel
->name
= strdup(bf
);
2350 if (evsel
->name
== NULL
)
2354 evsel
->tp_format
= event
;
2358 static int perf_evlist__prepare_tracepoint_events(struct perf_evlist
*evlist
,
2359 struct pevent
*pevent
)
2361 struct perf_evsel
*pos
;
2363 list_for_each_entry(pos
, &evlist
->entries
, node
) {
2364 if (pos
->attr
.type
== PERF_TYPE_TRACEPOINT
&&
2365 perf_evsel__prepare_tracepoint_event(pos
, pevent
))
2372 int perf_session__read_header(struct perf_session
*session
, int fd
)
2374 struct perf_header
*header
= &session
->header
;
2375 struct perf_file_header f_header
;
2376 struct perf_file_attr f_attr
;
2378 int nr_attrs
, nr_ids
, i
, j
;
2380 session
->evlist
= perf_evlist__new(NULL
, NULL
);
2381 if (session
->evlist
== NULL
)
2384 if (session
->fd_pipe
)
2385 return perf_header__read_pipe(session
, fd
);
2387 if (perf_file_header__read(&f_header
, header
, fd
) < 0)
2390 nr_attrs
= f_header
.attrs
.size
/ f_header
.attr_size
;
2391 lseek(fd
, f_header
.attrs
.offset
, SEEK_SET
);
2393 for (i
= 0; i
< nr_attrs
; i
++) {
2394 struct perf_evsel
*evsel
;
2397 if (read_attr(fd
, header
, &f_attr
) < 0)
2400 if (header
->needs_swap
)
2401 perf_event__attr_swap(&f_attr
.attr
);
2403 tmp
= lseek(fd
, 0, SEEK_CUR
);
2404 evsel
= perf_evsel__new(&f_attr
.attr
, i
);
2407 goto out_delete_evlist
;
2409 * Do it before so that if perf_evsel__alloc_id fails, this
2410 * entry gets purged too at perf_evlist__delete().
2412 perf_evlist__add(session
->evlist
, evsel
);
2414 nr_ids
= f_attr
.ids
.size
/ sizeof(u64
);
2416 * We don't have the cpu and thread maps on the header, so
2417 * for allocating the perf_sample_id table we fake 1 cpu and
2418 * hattr->ids threads.
2420 if (perf_evsel__alloc_id(evsel
, 1, nr_ids
))
2421 goto out_delete_evlist
;
2423 lseek(fd
, f_attr
.ids
.offset
, SEEK_SET
);
2425 for (j
= 0; j
< nr_ids
; j
++) {
2426 if (perf_header__getbuffer64(header
, fd
, &f_id
, sizeof(f_id
)))
2429 perf_evlist__id_add(session
->evlist
, evsel
, 0, j
, f_id
);
2432 lseek(fd
, tmp
, SEEK_SET
);
2435 symbol_conf
.nr_events
= nr_attrs
;
2437 if (f_header
.event_types
.size
) {
2438 lseek(fd
, f_header
.event_types
.offset
, SEEK_SET
);
2439 trace_events
= malloc(f_header
.event_types
.size
);
2440 if (trace_events
== NULL
)
2442 if (perf_header__getbuffer64(header
, fd
, trace_events
,
2443 f_header
.event_types
.size
))
2445 trace_event_count
= f_header
.event_types
.size
/ sizeof(struct perf_trace_event_type
);
2448 perf_header__process_sections(header
, fd
, &session
->pevent
,
2449 perf_file_section__process
);
2451 lseek(fd
, header
->data_offset
, SEEK_SET
);
2453 if (perf_evlist__prepare_tracepoint_events(session
->evlist
,
2455 goto out_delete_evlist
;
2463 perf_evlist__delete(session
->evlist
);
2464 session
->evlist
= NULL
;
2468 int perf_event__synthesize_attr(struct perf_tool
*tool
,
2469 struct perf_event_attr
*attr
, u32 ids
, u64
*id
,
2470 perf_event__handler_t process
)
2472 union perf_event
*ev
;
2476 size
= sizeof(struct perf_event_attr
);
2477 size
= PERF_ALIGN(size
, sizeof(u64
));
2478 size
+= sizeof(struct perf_event_header
);
2479 size
+= ids
* sizeof(u64
);
2486 ev
->attr
.attr
= *attr
;
2487 memcpy(ev
->attr
.id
, id
, ids
* sizeof(u64
));
2489 ev
->attr
.header
.type
= PERF_RECORD_HEADER_ATTR
;
2490 ev
->attr
.header
.size
= (u16
)size
;
2492 if (ev
->attr
.header
.size
== size
)
2493 err
= process(tool
, ev
, NULL
, NULL
);
2502 int perf_event__synthesize_attrs(struct perf_tool
*tool
,
2503 struct perf_session
*session
,
2504 perf_event__handler_t process
)
2506 struct perf_evsel
*evsel
;
2509 list_for_each_entry(evsel
, &session
->evlist
->entries
, node
) {
2510 err
= perf_event__synthesize_attr(tool
, &evsel
->attr
, evsel
->ids
,
2511 evsel
->id
, process
);
2513 pr_debug("failed to create perf header attribute\n");
2521 int perf_event__process_attr(union perf_event
*event
,
2522 struct perf_evlist
**pevlist
)
2525 struct perf_evsel
*evsel
;
2526 struct perf_evlist
*evlist
= *pevlist
;
2528 if (evlist
== NULL
) {
2529 *pevlist
= evlist
= perf_evlist__new(NULL
, NULL
);
2534 evsel
= perf_evsel__new(&event
->attr
.attr
, evlist
->nr_entries
);
2538 perf_evlist__add(evlist
, evsel
);
2540 ids
= event
->header
.size
;
2541 ids
-= (void *)&event
->attr
.id
- (void *)event
;
2542 n_ids
= ids
/ sizeof(u64
);
2544 * We don't have the cpu and thread maps on the header, so
2545 * for allocating the perf_sample_id table we fake 1 cpu and
2546 * hattr->ids threads.
2548 if (perf_evsel__alloc_id(evsel
, 1, n_ids
))
2551 for (i
= 0; i
< n_ids
; i
++) {
2552 perf_evlist__id_add(evlist
, evsel
, 0, i
, event
->attr
.id
[i
]);
2558 int perf_event__synthesize_event_type(struct perf_tool
*tool
,
2559 u64 event_id
, char *name
,
2560 perf_event__handler_t process
,
2561 struct machine
*machine
)
2563 union perf_event ev
;
2567 memset(&ev
, 0, sizeof(ev
));
2569 ev
.event_type
.event_type
.event_id
= event_id
;
2570 memset(ev
.event_type
.event_type
.name
, 0, MAX_EVENT_NAME
);
2571 strncpy(ev
.event_type
.event_type
.name
, name
, MAX_EVENT_NAME
- 1);
2573 ev
.event_type
.header
.type
= PERF_RECORD_HEADER_EVENT_TYPE
;
2574 size
= strlen(ev
.event_type
.event_type
.name
);
2575 size
= PERF_ALIGN(size
, sizeof(u64
));
2576 ev
.event_type
.header
.size
= sizeof(ev
.event_type
) -
2577 (sizeof(ev
.event_type
.event_type
.name
) - size
);
2579 err
= process(tool
, &ev
, NULL
, machine
);
2584 int perf_event__synthesize_event_types(struct perf_tool
*tool
,
2585 perf_event__handler_t process
,
2586 struct machine
*machine
)
2588 struct perf_trace_event_type
*type
;
2591 for (i
= 0; i
< trace_event_count
; i
++) {
2592 type
= &trace_events
[i
];
2594 err
= perf_event__synthesize_event_type(tool
, type
->event_id
,
2595 type
->name
, process
,
2598 pr_debug("failed to create perf header event type\n");
2606 int perf_event__process_event_type(struct perf_tool
*tool __maybe_unused
,
2607 union perf_event
*event
)
2609 if (perf_header__push_event(event
->event_type
.event_type
.event_id
,
2610 event
->event_type
.event_type
.name
) < 0)
2616 int perf_event__synthesize_tracing_data(struct perf_tool
*tool
, int fd
,
2617 struct perf_evlist
*evlist
,
2618 perf_event__handler_t process
)
2620 union perf_event ev
;
2621 struct tracing_data
*tdata
;
2622 ssize_t size
= 0, aligned_size
= 0, padding
;
2623 int err __maybe_unused
= 0;
2626 * We are going to store the size of the data followed
2627 * by the data contents. Since the fd descriptor is a pipe,
2628 * we cannot seek back to store the size of the data once
2629 * we know it. Instead we:
2631 * - write the tracing data to the temp file
2632 * - get/write the data size to pipe
2633 * - write the tracing data from the temp file
2636 tdata
= tracing_data_get(&evlist
->entries
, fd
, true);
2640 memset(&ev
, 0, sizeof(ev
));
2642 ev
.tracing_data
.header
.type
= PERF_RECORD_HEADER_TRACING_DATA
;
2644 aligned_size
= PERF_ALIGN(size
, sizeof(u64
));
2645 padding
= aligned_size
- size
;
2646 ev
.tracing_data
.header
.size
= sizeof(ev
.tracing_data
);
2647 ev
.tracing_data
.size
= aligned_size
;
2649 process(tool
, &ev
, NULL
, NULL
);
2652 * The put function will copy all the tracing data
2653 * stored in temp file to the pipe.
2655 tracing_data_put(tdata
);
2657 write_padded(fd
, NULL
, 0, padding
);
2659 return aligned_size
;
2662 int perf_event__process_tracing_data(union perf_event
*event
,
2663 struct perf_session
*session
)
2665 ssize_t size_read
, padding
, size
= event
->tracing_data
.size
;
2666 off_t offset
= lseek(session
->fd
, 0, SEEK_CUR
);
2669 /* setup for reading amidst mmap */
2670 lseek(session
->fd
, offset
+ sizeof(struct tracing_data_event
),
2673 size_read
= trace_report(session
->fd
, &session
->pevent
,
2675 padding
= PERF_ALIGN(size_read
, sizeof(u64
)) - size_read
;
2677 if (read(session
->fd
, buf
, padding
) < 0)
2678 die("reading input file");
2679 if (session
->repipe
) {
2680 int retw
= write(STDOUT_FILENO
, buf
, padding
);
2681 if (retw
<= 0 || retw
!= padding
)
2682 die("repiping tracing data padding");
2685 if (size_read
+ padding
!= size
)
2686 die("tracing data size mismatch");
2688 perf_evlist__prepare_tracepoint_events(session
->evlist
,
2691 return size_read
+ padding
;
2694 int perf_event__synthesize_build_id(struct perf_tool
*tool
,
2695 struct dso
*pos
, u16 misc
,
2696 perf_event__handler_t process
,
2697 struct machine
*machine
)
2699 union perf_event ev
;
2706 memset(&ev
, 0, sizeof(ev
));
2708 len
= pos
->long_name_len
+ 1;
2709 len
= PERF_ALIGN(len
, NAME_ALIGN
);
2710 memcpy(&ev
.build_id
.build_id
, pos
->build_id
, sizeof(pos
->build_id
));
2711 ev
.build_id
.header
.type
= PERF_RECORD_HEADER_BUILD_ID
;
2712 ev
.build_id
.header
.misc
= misc
;
2713 ev
.build_id
.pid
= machine
->pid
;
2714 ev
.build_id
.header
.size
= sizeof(ev
.build_id
) + len
;
2715 memcpy(&ev
.build_id
.filename
, pos
->long_name
, pos
->long_name_len
);
2717 err
= process(tool
, &ev
, NULL
, machine
);
2722 int perf_event__process_build_id(struct perf_tool
*tool __maybe_unused
,
2723 union perf_event
*event
,
2724 struct perf_session
*session
)
2726 __event_process_build_id(&event
->build_id
,
2727 event
->build_id
.filename
,
2732 void disable_buildid_cache(void)
2734 no_buildid_cache
= true;