1 #include <linux/types.h>
10 static pid_t
event__synthesize_comm(pid_t pid
, int full
,
11 event__handler_t process
,
12 struct perf_session
*session
)
15 char filename
[PATH_MAX
];
20 struct dirent dirent
, *next
;
23 snprintf(filename
, sizeof(filename
), "/proc/%d/status", pid
);
25 fp
= fopen(filename
, "r");
29 * We raced with a task exiting - just return:
31 pr_debug("couldn't open %s\n", filename
);
35 memset(&ev
.comm
, 0, sizeof(ev
.comm
));
36 while (!ev
.comm
.comm
[0] || !ev
.comm
.pid
) {
37 if (fgets(bf
, sizeof(bf
), fp
) == NULL
)
40 if (memcmp(bf
, "Name:", 5) == 0) {
42 while (*name
&& isspace(*name
))
44 size
= strlen(name
) - 1;
45 memcpy(ev
.comm
.comm
, name
, size
++);
46 } else if (memcmp(bf
, "Tgid:", 5) == 0) {
48 while (*tgids
&& isspace(*tgids
))
50 tgid
= ev
.comm
.pid
= atoi(tgids
);
54 ev
.comm
.header
.type
= PERF_RECORD_COMM
;
55 size
= ALIGN(size
, sizeof(u64
));
56 ev
.comm
.header
.size
= sizeof(ev
.comm
) - (sizeof(ev
.comm
.comm
) - size
);
61 process(&ev
, session
);
65 snprintf(filename
, sizeof(filename
), "/proc/%d/task", pid
);
67 tasks
= opendir(filename
);
71 while (!readdir_r(tasks
, &dirent
, &next
) && next
) {
73 pid
= strtol(dirent
.d_name
, &end
, 10);
79 process(&ev
, session
);
88 pr_warning("couldn't get COMM and pgid, malformed %s\n", filename
);
92 static int event__synthesize_mmap_events(pid_t pid
, pid_t tgid
,
93 event__handler_t process
,
94 struct perf_session
*session
)
96 char filename
[PATH_MAX
];
99 snprintf(filename
, sizeof(filename
), "/proc/%d/maps", pid
);
101 fp
= fopen(filename
, "r");
104 * We raced with a task exiting - just return:
106 pr_debug("couldn't open %s\n", filename
);
111 char bf
[BUFSIZ
], *pbf
= bf
;
114 .type
= PERF_RECORD_MMAP
,
115 .misc
= 0, /* Just like the kernel, see kernel/perf_event.c __perf_event_mmap */
120 if (fgets(bf
, sizeof(bf
), fp
) == NULL
)
123 /* 00400000-0040c000 r-xp 00000000 fd:01 41038 /bin/cat */
124 n
= hex2u64(pbf
, &ev
.mmap
.start
);
128 n
= hex2u64(pbf
, &ev
.mmap
.len
);
132 if (*pbf
== 'x') { /* vm_exec */
133 char *execname
= strchr(bf
, '/');
136 if (execname
== NULL
)
137 execname
= strstr(bf
, "[vdso]");
139 if (execname
== NULL
)
142 size
= strlen(execname
);
143 execname
[size
- 1] = '\0'; /* Remove \n */
144 memcpy(ev
.mmap
.filename
, execname
, size
);
145 size
= ALIGN(size
, sizeof(u64
));
146 ev
.mmap
.len
-= ev
.mmap
.start
;
147 ev
.mmap
.header
.size
= (sizeof(ev
.mmap
) -
148 (sizeof(ev
.mmap
.filename
) - size
));
152 process(&ev
, session
);
160 int event__synthesize_modules(event__handler_t process
,
161 struct perf_session
*session
)
165 for (nd
= rb_first(&session
->kmaps
.maps
[MAP__FUNCTION
]);
166 nd
; nd
= rb_next(nd
)) {
169 struct map
*pos
= rb_entry(nd
, struct map
, rb_node
);
171 if (pos
->dso
->kernel
)
174 size
= ALIGN(pos
->dso
->long_name_len
+ 1, sizeof(u64
));
175 memset(&ev
, 0, sizeof(ev
));
176 ev
.mmap
.header
.misc
= 1; /* kernel uses 0 for user space maps, see kernel/perf_event.c __perf_event_mmap */
177 ev
.mmap
.header
.type
= PERF_RECORD_MMAP
;
178 ev
.mmap
.header
.size
= (sizeof(ev
.mmap
) -
179 (sizeof(ev
.mmap
.filename
) - size
));
180 ev
.mmap
.start
= pos
->start
;
181 ev
.mmap
.len
= pos
->end
- pos
->start
;
183 memcpy(ev
.mmap
.filename
, pos
->dso
->long_name
,
184 pos
->dso
->long_name_len
+ 1);
185 process(&ev
, session
);
191 int event__synthesize_thread(pid_t pid
, event__handler_t process
,
192 struct perf_session
*session
)
194 pid_t tgid
= event__synthesize_comm(pid
, 1, process
, session
);
197 return event__synthesize_mmap_events(pid
, tgid
, process
, session
);
200 void event__synthesize_threads(event__handler_t process
,
201 struct perf_session
*session
)
204 struct dirent dirent
, *next
;
206 proc
= opendir("/proc");
208 while (!readdir_r(proc
, &dirent
, &next
) && next
) {
210 pid_t pid
= strtol(dirent
.d_name
, &end
, 10);
212 if (*end
) /* only interested in proper numerical dirents */
215 event__synthesize_thread(pid
, process
, session
);
221 struct process_symbol_args
{
226 static int find_symbol_cb(void *arg
, const char *name
, char type
, u64 start
)
228 struct process_symbol_args
*args
= arg
;
230 if (!symbol_type__is_a(type
, MAP__FUNCTION
) || strcmp(name
, args
->name
))
237 int event__synthesize_kernel_mmap(event__handler_t process
,
238 struct perf_session
*session
,
239 const char *symbol_name
)
244 .type
= PERF_RECORD_MMAP
,
245 .misc
= 1, /* kernel uses 0 for user space maps, see kernel/perf_event.c __perf_event_mmap */
249 * We should get this from /sys/kernel/sections/.text, but till that is
250 * available use this, and after it is use this as a fallback for older
253 struct process_symbol_args args
= { .name
= symbol_name
, };
255 if (kallsyms__parse("/proc/kallsyms", &args
, find_symbol_cb
) <= 0)
258 size
= snprintf(ev
.mmap
.filename
, sizeof(ev
.mmap
.filename
),
259 "[kernel.kallsyms.%s]", symbol_name
) + 1;
260 size
= ALIGN(size
, sizeof(u64
));
261 ev
.mmap
.header
.size
= (sizeof(ev
.mmap
) - (sizeof(ev
.mmap
.filename
) - size
));
262 ev
.mmap
.pgoff
= args
.start
;
263 ev
.mmap
.start
= session
->vmlinux_maps
[MAP__FUNCTION
]->start
;
264 ev
.mmap
.len
= session
->vmlinux_maps
[MAP__FUNCTION
]->end
- ev
.mmap
.start
;
266 return process(&ev
, session
);
269 static void thread__comm_adjust(struct thread
*self
)
271 char *comm
= self
->comm
;
273 if (!symbol_conf
.col_width_list_str
&& !symbol_conf
.field_sep
&&
274 (!symbol_conf
.comm_list
||
275 strlist__has_entry(symbol_conf
.comm_list
, comm
))) {
276 unsigned int slen
= strlen(comm
);
278 if (slen
> comms__col_width
) {
279 comms__col_width
= slen
;
280 threads__col_width
= slen
+ 6;
285 static int thread__set_comm_adjust(struct thread
*self
, const char *comm
)
287 int ret
= thread__set_comm(self
, comm
);
292 thread__comm_adjust(self
);
297 int event__process_comm(event_t
*self
, struct perf_session
*session
)
299 struct thread
*thread
= perf_session__findnew(session
, self
->comm
.pid
);
301 dump_printf(": %s:%d\n", self
->comm
.comm
, self
->comm
.pid
);
303 if (thread
== NULL
|| thread__set_comm_adjust(thread
, self
->comm
.comm
)) {
304 dump_printf("problem processing PERF_RECORD_COMM, skipping event.\n");
311 int event__process_lost(event_t
*self
, struct perf_session
*session
)
313 dump_printf(": id:%Ld: lost:%Ld\n", self
->lost
.id
, self
->lost
.lost
);
314 session
->events_stats
.lost
+= self
->lost
.lost
;
318 int event__process_mmap(event_t
*self
, struct perf_session
*session
)
320 struct thread
*thread
;
323 dump_printf(" %d/%d: [%#Lx(%#Lx) @ %#Lx]: %s\n",
324 self
->mmap
.pid
, self
->mmap
.tid
, self
->mmap
.start
,
325 self
->mmap
.len
, self
->mmap
.pgoff
, self
->mmap
.filename
);
327 if (self
->mmap
.pid
== 0) {
328 static const char kmmap_prefix
[] = "[kernel.kallsyms.";
330 if (self
->mmap
.filename
[0] == '/') {
331 char short_module_name
[1024];
332 char *name
= strrchr(self
->mmap
.filename
, '/'), *dot
;
338 dot
= strrchr(name
, '.');
342 snprintf(short_module_name
, sizeof(short_module_name
),
343 "[%.*s]", (int)(dot
- name
), name
);
344 strxfrchar(short_module_name
, '-', '_');
346 map
= perf_session__new_module_map(session
,
352 name
= strdup(self
->mmap
.filename
);
356 dso__set_long_name(map
->dso
, name
);
357 map
->end
= map
->start
+ self
->mmap
.len
;
358 } else if (memcmp(self
->mmap
.filename
, kmmap_prefix
,
359 sizeof(kmmap_prefix
) - 1) == 0) {
360 const char *symbol_name
= (self
->mmap
.filename
+
361 sizeof(kmmap_prefix
) - 1);
363 * Should be there already, from the build-id table in
366 struct dso
*kernel
= __dsos__findnew(&dsos__kernel
,
367 "[kernel.kallsyms]");
371 if (__map_groups__create_kernel_maps(&session
->kmaps
,
372 session
->vmlinux_maps
,
376 session
->vmlinux_maps
[MAP__FUNCTION
]->start
= self
->mmap
.start
;
377 session
->vmlinux_maps
[MAP__FUNCTION
]->end
= self
->mmap
.start
+ self
->mmap
.len
;
379 perf_session__set_kallsyms_ref_reloc_sym(session
, symbol_name
,
385 thread
= perf_session__findnew(session
, self
->mmap
.pid
);
386 map
= map__new(&self
->mmap
, MAP__FUNCTION
,
387 session
->cwd
, session
->cwdlen
);
389 if (thread
== NULL
|| map
== NULL
)
392 thread__insert_map(thread
, map
);
396 dump_printf("problem processing PERF_RECORD_MMAP, skipping event.\n");
400 int event__process_task(event_t
*self
, struct perf_session
*session
)
402 struct thread
*thread
= perf_session__findnew(session
, self
->fork
.pid
);
403 struct thread
*parent
= perf_session__findnew(session
, self
->fork
.ppid
);
405 dump_printf("(%d:%d):(%d:%d)\n", self
->fork
.pid
, self
->fork
.tid
,
406 self
->fork
.ppid
, self
->fork
.ptid
);
408 * A thread clone will have the same PID for both parent and child.
410 if (thread
== parent
)
413 if (self
->header
.type
== PERF_RECORD_EXIT
)
416 if (thread
== NULL
|| parent
== NULL
||
417 thread__fork(thread
, parent
) < 0) {
418 dump_printf("problem processing PERF_RECORD_FORK, skipping event.\n");
425 void thread__find_addr_location(struct thread
*self
,
426 struct perf_session
*session
, u8 cpumode
,
427 enum map_type type
, u64 addr
,
428 struct addr_location
*al
,
429 symbol_filter_t filter
)
431 struct map_groups
*mg
= &self
->mg
;
436 if (cpumode
& PERF_RECORD_MISC_KERNEL
) {
438 mg
= &session
->kmaps
;
439 } else if (cpumode
& PERF_RECORD_MISC_USER
)
448 al
->map
= map_groups__find(mg
, type
, al
->addr
);
449 if (al
->map
== NULL
) {
451 * If this is outside of all known maps, and is a negative
452 * address, try to look it up in the kernel dso, as it might be
453 * a vsyscall or vdso (which executes in user-mode).
455 * XXX This is nasty, we should have a symbol list in the
456 * "[vdso]" dso, but for now lets use the old trick of looking
457 * in the whole kernel symbol list.
459 if ((long long)al
->addr
< 0 && mg
!= &session
->kmaps
) {
460 mg
= &session
->kmaps
;
465 al
->addr
= al
->map
->map_ip(al
->map
, al
->addr
);
466 al
->sym
= map__find_symbol(al
->map
, session
, al
->addr
, filter
);
470 static void dso__calc_col_width(struct dso
*self
)
472 if (!symbol_conf
.col_width_list_str
&& !symbol_conf
.field_sep
&&
473 (!symbol_conf
.dso_list
||
474 strlist__has_entry(symbol_conf
.dso_list
, self
->name
))) {
475 unsigned int slen
= strlen(self
->name
);
476 if (slen
> dsos__col_width
)
477 dsos__col_width
= slen
;
480 self
->slen_calculated
= 1;
483 int event__preprocess_sample(const event_t
*self
, struct perf_session
*session
,
484 struct addr_location
*al
, symbol_filter_t filter
)
486 u8 cpumode
= self
->header
.misc
& PERF_RECORD_MISC_CPUMODE_MASK
;
487 struct thread
*thread
= perf_session__findnew(session
, self
->ip
.pid
);
492 if (symbol_conf
.comm_list
&&
493 !strlist__has_entry(symbol_conf
.comm_list
, thread
->comm
))
496 dump_printf(" ... thread: %s:%d\n", thread
->comm
, thread
->pid
);
498 thread__find_addr_location(thread
, session
, cpumode
, MAP__FUNCTION
,
499 self
->ip
.ip
, al
, filter
);
500 dump_printf(" ...... dso: %s\n",
501 al
->map
? al
->map
->dso
->long_name
:
502 al
->level
== 'H' ? "[hypervisor]" : "<not found>");
504 * We have to do this here as we may have a dso with no symbol hit that
505 * has a name longer than the ones with symbols sampled.
507 if (al
->map
&& !sort_dso
.elide
&& !al
->map
->dso
->slen_calculated
)
508 dso__calc_col_width(al
->map
->dso
);
510 if (symbol_conf
.dso_list
&&
511 (!al
->map
|| !al
->map
->dso
||
512 !(strlist__has_entry(symbol_conf
.dso_list
, al
->map
->dso
->short_name
) ||
513 (al
->map
->dso
->short_name
!= al
->map
->dso
->long_name
&&
514 strlist__has_entry(symbol_conf
.dso_list
, al
->map
->dso
->long_name
)))))
517 if (symbol_conf
.sym_list
&& al
->sym
&&
518 !strlist__has_entry(symbol_conf
.sym_list
, al
->sym
->name
))
521 al
->filtered
= false;
529 int event__parse_sample(event_t
*event
, u64 type
, struct sample_data
*data
)
531 u64
*array
= event
->sample
.array
;
533 if (type
& PERF_SAMPLE_IP
) {
534 data
->ip
= event
->ip
.ip
;
538 if (type
& PERF_SAMPLE_TID
) {
539 u32
*p
= (u32
*)array
;
545 if (type
& PERF_SAMPLE_TIME
) {
550 if (type
& PERF_SAMPLE_ADDR
) {
555 if (type
& PERF_SAMPLE_ID
) {
560 if (type
& PERF_SAMPLE_STREAM_ID
) {
561 data
->stream_id
= *array
;
565 if (type
& PERF_SAMPLE_CPU
) {
566 u32
*p
= (u32
*)array
;
571 if (type
& PERF_SAMPLE_PERIOD
) {
572 data
->period
= *array
;
576 if (type
& PERF_SAMPLE_READ
) {
577 pr_debug("PERF_SAMPLE_READ is unsuported for now\n");
581 if (type
& PERF_SAMPLE_CALLCHAIN
) {
582 data
->callchain
= (struct ip_callchain
*)array
;
583 array
+= 1 + data
->callchain
->nr
;
586 if (type
& PERF_SAMPLE_RAW
) {
587 u32
*p
= (u32
*)array
;