Commit | Line | Data |
---|---|---|
0db15b1e AH |
1 | /* |
2 | * db-export.c: Support for exporting data suitable for import to a database | |
3 | * Copyright (c) 2014, Intel Corporation. | |
4 | * | |
5 | * This program is free software; you can redistribute it and/or modify it | |
6 | * under the terms and conditions of the GNU General Public License, | |
7 | * version 2, as published by the Free Software Foundation. | |
8 | * | |
9 | * This program is distributed in the hope it will be useful, but WITHOUT | |
10 | * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
11 | * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for | |
12 | * more details. | |
13 | * | |
14 | */ | |
15 | ||
16 | #include <errno.h> | |
17 | ||
18 | #include "evsel.h" | |
19 | #include "machine.h" | |
20 | #include "thread.h" | |
21 | #include "comm.h" | |
22 | #include "symbol.h" | |
23 | #include "event.h" | |
758008b2 | 24 | #include "util.h" |
88f50d60 | 25 | #include "thread-stack.h" |
0a3eba3a | 26 | #include "callchain.h" |
451db126 | 27 | #include "call-path.h" |
0db15b1e AH |
28 | #include "db-export.h" |
29 | ||
758008b2 AH |
30 | struct deferred_export { |
31 | struct list_head node; | |
32 | struct comm *comm; | |
33 | }; | |
34 | ||
35 | static int db_export__deferred(struct db_export *dbe) | |
36 | { | |
37 | struct deferred_export *de; | |
38 | int err; | |
39 | ||
40 | while (!list_empty(&dbe->deferred)) { | |
41 | de = list_entry(dbe->deferred.next, struct deferred_export, | |
42 | node); | |
43 | err = dbe->export_comm(dbe, de->comm); | |
44 | list_del(&de->node); | |
45 | free(de); | |
46 | if (err) | |
47 | return err; | |
48 | } | |
49 | ||
50 | return 0; | |
51 | } | |
52 | ||
53 | static void db_export__free_deferred(struct db_export *dbe) | |
54 | { | |
55 | struct deferred_export *de; | |
56 | ||
57 | while (!list_empty(&dbe->deferred)) { | |
58 | de = list_entry(dbe->deferred.next, struct deferred_export, | |
59 | node); | |
60 | list_del(&de->node); | |
61 | free(de); | |
62 | } | |
63 | } | |
64 | ||
65 | static int db_export__defer_comm(struct db_export *dbe, struct comm *comm) | |
66 | { | |
67 | struct deferred_export *de; | |
68 | ||
69 | de = zalloc(sizeof(struct deferred_export)); | |
70 | if (!de) | |
71 | return -ENOMEM; | |
72 | ||
73 | de->comm = comm; | |
74 | list_add_tail(&de->node, &dbe->deferred); | |
75 | ||
76 | return 0; | |
77 | } | |
78 | ||
0db15b1e AH |
79 | int db_export__init(struct db_export *dbe) |
80 | { | |
81 | memset(dbe, 0, sizeof(struct db_export)); | |
758008b2 | 82 | INIT_LIST_HEAD(&dbe->deferred); |
0db15b1e AH |
83 | return 0; |
84 | } | |
85 | ||
758008b2 AH |
86 | int db_export__flush(struct db_export *dbe) |
87 | { | |
88 | return db_export__deferred(dbe); | |
89 | } | |
90 | ||
88f50d60 | 91 | void db_export__exit(struct db_export *dbe) |
0db15b1e | 92 | { |
758008b2 | 93 | db_export__free_deferred(dbe); |
88f50d60 AH |
94 | call_return_processor__free(dbe->crp); |
95 | dbe->crp = NULL; | |
0db15b1e AH |
96 | } |
97 | ||
98 | int db_export__evsel(struct db_export *dbe, struct perf_evsel *evsel) | |
99 | { | |
100 | if (evsel->db_id) | |
101 | return 0; | |
102 | ||
103 | evsel->db_id = ++dbe->evsel_last_db_id; | |
104 | ||
105 | if (dbe->export_evsel) | |
106 | return dbe->export_evsel(dbe, evsel); | |
107 | ||
108 | return 0; | |
109 | } | |
110 | ||
111 | int db_export__machine(struct db_export *dbe, struct machine *machine) | |
112 | { | |
113 | if (machine->db_id) | |
114 | return 0; | |
115 | ||
116 | machine->db_id = ++dbe->machine_last_db_id; | |
117 | ||
118 | if (dbe->export_machine) | |
119 | return dbe->export_machine(dbe, machine); | |
120 | ||
121 | return 0; | |
122 | } | |
123 | ||
124 | int db_export__thread(struct db_export *dbe, struct thread *thread, | |
125 | struct machine *machine, struct comm *comm) | |
126 | { | |
b91fc39f | 127 | struct thread *main_thread; |
0db15b1e AH |
128 | u64 main_thread_db_id = 0; |
129 | int err; | |
130 | ||
131 | if (thread->db_id) | |
132 | return 0; | |
133 | ||
134 | thread->db_id = ++dbe->thread_last_db_id; | |
135 | ||
136 | if (thread->pid_ != -1) { | |
0db15b1e AH |
137 | if (thread->pid_ == thread->tid) { |
138 | main_thread = thread; | |
139 | } else { | |
140 | main_thread = machine__findnew_thread(machine, | |
141 | thread->pid_, | |
142 | thread->pid_); | |
143 | if (!main_thread) | |
144 | return -ENOMEM; | |
145 | err = db_export__thread(dbe, main_thread, machine, | |
146 | comm); | |
147 | if (err) | |
b91fc39f | 148 | goto out_put; |
0db15b1e AH |
149 | if (comm) { |
150 | err = db_export__comm_thread(dbe, comm, thread); | |
151 | if (err) | |
b91fc39f | 152 | goto out_put; |
0db15b1e AH |
153 | } |
154 | } | |
155 | main_thread_db_id = main_thread->db_id; | |
b91fc39f ACM |
156 | if (main_thread != thread) |
157 | thread__put(main_thread); | |
0db15b1e AH |
158 | } |
159 | ||
160 | if (dbe->export_thread) | |
161 | return dbe->export_thread(dbe, thread, main_thread_db_id, | |
162 | machine); | |
163 | ||
164 | return 0; | |
b91fc39f ACM |
165 | |
166 | out_put: | |
167 | thread__put(main_thread); | |
168 | return err; | |
0db15b1e AH |
169 | } |
170 | ||
171 | int db_export__comm(struct db_export *dbe, struct comm *comm, | |
172 | struct thread *main_thread) | |
173 | { | |
174 | int err; | |
175 | ||
176 | if (comm->db_id) | |
177 | return 0; | |
178 | ||
179 | comm->db_id = ++dbe->comm_last_db_id; | |
180 | ||
181 | if (dbe->export_comm) { | |
758008b2 AH |
182 | if (main_thread->comm_set) |
183 | err = dbe->export_comm(dbe, comm); | |
184 | else | |
185 | err = db_export__defer_comm(dbe, comm); | |
0db15b1e AH |
186 | if (err) |
187 | return err; | |
188 | } | |
189 | ||
190 | return db_export__comm_thread(dbe, comm, main_thread); | |
191 | } | |
192 | ||
193 | int db_export__comm_thread(struct db_export *dbe, struct comm *comm, | |
194 | struct thread *thread) | |
195 | { | |
196 | u64 db_id; | |
197 | ||
198 | db_id = ++dbe->comm_thread_last_db_id; | |
199 | ||
200 | if (dbe->export_comm_thread) | |
201 | return dbe->export_comm_thread(dbe, db_id, comm, thread); | |
202 | ||
203 | return 0; | |
204 | } | |
205 | ||
206 | int db_export__dso(struct db_export *dbe, struct dso *dso, | |
207 | struct machine *machine) | |
208 | { | |
209 | if (dso->db_id) | |
210 | return 0; | |
211 | ||
212 | dso->db_id = ++dbe->dso_last_db_id; | |
213 | ||
214 | if (dbe->export_dso) | |
215 | return dbe->export_dso(dbe, dso, machine); | |
216 | ||
217 | return 0; | |
218 | } | |
219 | ||
220 | int db_export__symbol(struct db_export *dbe, struct symbol *sym, | |
221 | struct dso *dso) | |
222 | { | |
223 | u64 *sym_db_id = symbol__priv(sym); | |
224 | ||
225 | if (*sym_db_id) | |
226 | return 0; | |
227 | ||
228 | *sym_db_id = ++dbe->symbol_last_db_id; | |
229 | ||
230 | if (dbe->export_symbol) | |
231 | return dbe->export_symbol(dbe, sym, dso); | |
232 | ||
233 | return 0; | |
234 | } | |
235 | ||
0db15b1e AH |
236 | static int db_ids_from_al(struct db_export *dbe, struct addr_location *al, |
237 | u64 *dso_db_id, u64 *sym_db_id, u64 *offset) | |
238 | { | |
239 | int err; | |
240 | ||
241 | if (al->map) { | |
242 | struct dso *dso = al->map->dso; | |
243 | ||
244 | err = db_export__dso(dbe, dso, al->machine); | |
245 | if (err) | |
246 | return err; | |
247 | *dso_db_id = dso->db_id; | |
248 | ||
249 | if (!al->sym) { | |
250 | al->sym = symbol__new(al->addr, 0, 0, "unknown"); | |
251 | if (al->sym) | |
bd0a51dd | 252 | dso__insert_symbol(dso, al->map->type, al->sym); |
0db15b1e AH |
253 | } |
254 | ||
255 | if (al->sym) { | |
256 | u64 *db_id = symbol__priv(al->sym); | |
257 | ||
258 | err = db_export__symbol(dbe, al->sym, dso); | |
259 | if (err) | |
260 | return err; | |
261 | *sym_db_id = *db_id; | |
262 | *offset = al->addr - al->sym->start; | |
263 | } | |
264 | } | |
265 | ||
266 | return 0; | |
267 | } | |
268 | ||
0a3eba3a CP |
269 | static struct call_path *call_path_from_sample(struct db_export *dbe, |
270 | struct machine *machine, | |
271 | struct thread *thread, | |
272 | struct perf_sample *sample, | |
273 | struct perf_evsel *evsel) | |
274 | { | |
275 | u64 kernel_start = machine__kernel_start(machine); | |
276 | struct call_path *current = &dbe->cpr->call_path; | |
277 | enum chain_order saved_order = callchain_param.order; | |
278 | int err; | |
279 | ||
280 | if (!symbol_conf.use_callchain || !sample->callchain) | |
281 | return NULL; | |
282 | ||
283 | /* | |
284 | * Since the call path tree must be built starting with the root, we | |
285 | * must use ORDER_CALL for call chain resolution, in order to process | |
286 | * the callchain starting with the root node and ending with the leaf. | |
287 | */ | |
288 | callchain_param.order = ORDER_CALLER; | |
289 | err = thread__resolve_callchain(thread, &callchain_cursor, evsel, | |
fe176085 | 290 | sample, NULL, NULL, PERF_MAX_STACK_DEPTH); |
0a3eba3a CP |
291 | if (err) { |
292 | callchain_param.order = saved_order; | |
293 | return NULL; | |
294 | } | |
295 | callchain_cursor_commit(&callchain_cursor); | |
296 | ||
297 | while (1) { | |
298 | struct callchain_cursor_node *node; | |
299 | struct addr_location al; | |
300 | u64 dso_db_id = 0, sym_db_id = 0, offset = 0; | |
301 | ||
302 | memset(&al, 0, sizeof(al)); | |
303 | ||
304 | node = callchain_cursor_current(&callchain_cursor); | |
305 | if (!node) | |
306 | break; | |
307 | /* | |
308 | * Handle export of symbol and dso for this node by | |
309 | * constructing an addr_location struct and then passing it to | |
310 | * db_ids_from_al() to perform the export. | |
311 | */ | |
312 | al.sym = node->sym; | |
313 | al.map = node->map; | |
314 | al.machine = machine; | |
7a2544c0 | 315 | al.addr = node->ip; |
0a3eba3a | 316 | |
83302e79 CP |
317 | if (al.map && !al.sym) |
318 | al.sym = dso__find_symbol(al.map->dso, MAP__FUNCTION, | |
319 | al.addr); | |
320 | ||
0a3eba3a CP |
321 | db_ids_from_al(dbe, &al, &dso_db_id, &sym_db_id, &offset); |
322 | ||
323 | /* add node to the call path tree if it doesn't exist */ | |
324 | current = call_path__findnew(dbe->cpr, current, | |
325 | al.sym, node->ip, | |
326 | kernel_start); | |
327 | ||
328 | callchain_cursor_advance(&callchain_cursor); | |
329 | } | |
330 | ||
331 | /* Reset the callchain order to its prior value. */ | |
332 | callchain_param.order = saved_order; | |
333 | ||
334 | if (current == &dbe->cpr->call_path) { | |
335 | /* Bail because the callchain was empty. */ | |
336 | return NULL; | |
337 | } | |
338 | ||
339 | return current; | |
340 | } | |
341 | ||
f2bff007 AH |
342 | int db_export__branch_type(struct db_export *dbe, u32 branch_type, |
343 | const char *name) | |
344 | { | |
345 | if (dbe->export_branch_type) | |
346 | return dbe->export_branch_type(dbe, branch_type, name); | |
347 | ||
348 | return 0; | |
349 | } | |
350 | ||
0db15b1e AH |
351 | int db_export__sample(struct db_export *dbe, union perf_event *event, |
352 | struct perf_sample *sample, struct perf_evsel *evsel, | |
7327259d | 353 | struct addr_location *al) |
0db15b1e | 354 | { |
7327259d | 355 | struct thread* thread = al->thread; |
0db15b1e AH |
356 | struct export_sample es = { |
357 | .event = event, | |
358 | .sample = sample, | |
359 | .evsel = evsel, | |
0db15b1e AH |
360 | .al = al, |
361 | }; | |
362 | struct thread *main_thread; | |
363 | struct comm *comm = NULL; | |
364 | int err; | |
365 | ||
366 | err = db_export__evsel(dbe, evsel); | |
367 | if (err) | |
368 | return err; | |
369 | ||
370 | err = db_export__machine(dbe, al->machine); | |
371 | if (err) | |
372 | return err; | |
373 | ||
480ca357 | 374 | main_thread = thread__main_thread(al->machine, thread); |
0db15b1e AH |
375 | if (main_thread) |
376 | comm = machine__thread_exec_comm(al->machine, main_thread); | |
377 | ||
378 | err = db_export__thread(dbe, thread, al->machine, comm); | |
379 | if (err) | |
427cde32 | 380 | goto out_put; |
0db15b1e AH |
381 | |
382 | if (comm) { | |
383 | err = db_export__comm(dbe, comm, main_thread); | |
384 | if (err) | |
427cde32 | 385 | goto out_put; |
0db15b1e AH |
386 | es.comm_db_id = comm->db_id; |
387 | } | |
388 | ||
389 | es.db_id = ++dbe->sample_last_db_id; | |
390 | ||
391 | err = db_ids_from_al(dbe, al, &es.dso_db_id, &es.sym_db_id, &es.offset); | |
392 | if (err) | |
427cde32 | 393 | goto out_put; |
0db15b1e | 394 | |
0a3eba3a CP |
395 | if (dbe->cpr) { |
396 | struct call_path *cp = call_path_from_sample(dbe, al->machine, | |
397 | thread, sample, | |
398 | evsel); | |
568850ea | 399 | if (cp) { |
0a3eba3a | 400 | db_export__call_path(dbe, cp); |
568850ea CP |
401 | es.call_path_id = cp->db_id; |
402 | } | |
0a3eba3a CP |
403 | } |
404 | ||
0db15b1e AH |
405 | if ((evsel->attr.sample_type & PERF_SAMPLE_ADDR) && |
406 | sample_addr_correlates_sym(&evsel->attr)) { | |
407 | struct addr_location addr_al; | |
408 | ||
c2740a87 | 409 | thread__resolve(thread, &addr_al, sample); |
0db15b1e AH |
410 | err = db_ids_from_al(dbe, &addr_al, &es.addr_dso_db_id, |
411 | &es.addr_sym_db_id, &es.addr_offset); | |
412 | if (err) | |
427cde32 | 413 | goto out_put; |
88f50d60 AH |
414 | if (dbe->crp) { |
415 | err = thread_stack__process(thread, comm, sample, al, | |
416 | &addr_al, es.db_id, | |
417 | dbe->crp); | |
418 | if (err) | |
427cde32 | 419 | goto out_put; |
88f50d60 | 420 | } |
0db15b1e AH |
421 | } |
422 | ||
423 | if (dbe->export_sample) | |
427cde32 | 424 | err = dbe->export_sample(dbe, &es); |
0db15b1e | 425 | |
427cde32 AH |
426 | out_put: |
427 | thread__put(main_thread); | |
428 | return err; | |
0db15b1e | 429 | } |
f2bff007 AH |
430 | |
431 | static struct { | |
432 | u32 branch_type; | |
433 | const char *name; | |
434 | } branch_types[] = { | |
435 | {0, "no branch"}, | |
436 | {PERF_IP_FLAG_BRANCH | PERF_IP_FLAG_CALL, "call"}, | |
437 | {PERF_IP_FLAG_BRANCH | PERF_IP_FLAG_RETURN, "return"}, | |
438 | {PERF_IP_FLAG_BRANCH | PERF_IP_FLAG_CONDITIONAL, "conditional jump"}, | |
439 | {PERF_IP_FLAG_BRANCH, "unconditional jump"}, | |
440 | {PERF_IP_FLAG_BRANCH | PERF_IP_FLAG_CALL | PERF_IP_FLAG_INTERRUPT, | |
441 | "software interrupt"}, | |
442 | {PERF_IP_FLAG_BRANCH | PERF_IP_FLAG_RETURN | PERF_IP_FLAG_INTERRUPT, | |
443 | "return from interrupt"}, | |
444 | {PERF_IP_FLAG_BRANCH | PERF_IP_FLAG_CALL | PERF_IP_FLAG_SYSCALLRET, | |
445 | "system call"}, | |
446 | {PERF_IP_FLAG_BRANCH | PERF_IP_FLAG_RETURN | PERF_IP_FLAG_SYSCALLRET, | |
447 | "return from system call"}, | |
448 | {PERF_IP_FLAG_BRANCH | PERF_IP_FLAG_ASYNC, "asynchronous branch"}, | |
449 | {PERF_IP_FLAG_BRANCH | PERF_IP_FLAG_CALL | PERF_IP_FLAG_ASYNC | | |
450 | PERF_IP_FLAG_INTERRUPT, "hardware interrupt"}, | |
451 | {PERF_IP_FLAG_BRANCH | PERF_IP_FLAG_TX_ABORT, "transaction abort"}, | |
452 | {PERF_IP_FLAG_BRANCH | PERF_IP_FLAG_TRACE_BEGIN, "trace begin"}, | |
453 | {PERF_IP_FLAG_BRANCH | PERF_IP_FLAG_TRACE_END, "trace end"}, | |
454 | {0, NULL} | |
455 | }; | |
456 | ||
457 | int db_export__branch_types(struct db_export *dbe) | |
458 | { | |
459 | int i, err = 0; | |
460 | ||
461 | for (i = 0; branch_types[i].name ; i++) { | |
462 | err = db_export__branch_type(dbe, branch_types[i].branch_type, | |
463 | branch_types[i].name); | |
464 | if (err) | |
465 | break; | |
466 | } | |
467 | return err; | |
468 | } | |
88f50d60 AH |
469 | |
470 | int db_export__call_path(struct db_export *dbe, struct call_path *cp) | |
471 | { | |
472 | int err; | |
473 | ||
474 | if (cp->db_id) | |
475 | return 0; | |
476 | ||
477 | if (cp->parent) { | |
478 | err = db_export__call_path(dbe, cp->parent); | |
479 | if (err) | |
480 | return err; | |
481 | } | |
482 | ||
483 | cp->db_id = ++dbe->call_path_last_db_id; | |
484 | ||
485 | if (dbe->export_call_path) | |
486 | return dbe->export_call_path(dbe, cp); | |
487 | ||
488 | return 0; | |
489 | } | |
490 | ||
491 | int db_export__call_return(struct db_export *dbe, struct call_return *cr) | |
492 | { | |
493 | int err; | |
494 | ||
495 | if (cr->db_id) | |
496 | return 0; | |
497 | ||
498 | err = db_export__call_path(dbe, cr->cp); | |
499 | if (err) | |
500 | return err; | |
501 | ||
502 | cr->db_id = ++dbe->call_return_last_db_id; | |
503 | ||
504 | if (dbe->export_call_return) | |
505 | return dbe->export_call_return(dbe, cr); | |
506 | ||
507 | return 0; | |
508 | } |