~ [ source navigation ] ~ [ diff markup ] ~ [ identifier search ] ~

TOMOYO Linux Cross Reference
Linux/tools/perf/util/annotate.c

Version: ~ [ linux-6.2-rc3 ] ~ [ linux-6.1.5 ] ~ [ linux-6.0.19 ] ~ [ linux-5.19.17 ] ~ [ linux-5.18.19 ] ~ [ linux-5.17.15 ] ~ [ linux-5.16.20 ] ~ [ linux-5.15.87 ] ~ [ linux-5.14.21 ] ~ [ linux-5.13.19 ] ~ [ linux-5.12.19 ] ~ [ linux-5.11.22 ] ~ [ linux-5.10.162 ] ~ [ linux-5.9.16 ] ~ [ linux-5.8.18 ] ~ [ linux-5.7.19 ] ~ [ linux-5.6.19 ] ~ [ linux-5.5.19 ] ~ [ linux-5.4.228 ] ~ [ linux-5.3.18 ] ~ [ linux-5.2.21 ] ~ [ linux-5.1.21 ] ~ [ linux-5.0.21 ] ~ [ linux-4.20.17 ] ~ [ linux-4.19.269 ] ~ [ linux-4.18.20 ] ~ [ linux-4.17.19 ] ~ [ linux-4.16.18 ] ~ [ linux-4.15.18 ] ~ [ linux-4.14.302 ] ~ [ linux-4.13.16 ] ~ [ linux-4.12.14 ] ~ [ linux-4.11.12 ] ~ [ linux-4.10.17 ] ~ [ linux-4.9.337 ] ~ [ linux-4.8.17 ] ~ [ linux-4.7.10 ] ~ [ linux-4.6.7 ] ~ [ linux-4.5.7 ] ~ [ linux-4.4.302 ] ~ [ linux-4.3.6 ] ~ [ linux-4.2.8 ] ~ [ linux-4.1.52 ] ~ [ linux-4.0.9 ] ~ [ linux-3.10.108 ] ~ [ linux-2.6.32.71 ] ~ [ linux-2.6.0 ] ~ [ linux-2.4.37.11 ] ~ [ unix-v6-master ] ~ [ ccs-tools-1.8.9 ] ~ [ policy-sample ] ~
Architecture: ~ [ i386 ] ~ [ alpha ] ~ [ m68k ] ~ [ mips ] ~ [ ppc ] ~ [ sparc ] ~ [ sparc64 ] ~

  1 /*
  2  * Copyright (C) 2011, Red Hat Inc, Arnaldo Carvalho de Melo <acme@redhat.com>
  3  *
  4  * Parts came from builtin-annotate.c, see those files for further
  5  * copyright notes.
  6  *
  7  * Released under the GPL v2. (and only v2, not any later version)
  8  */
  9 
 10 #include "util.h"
 11 #include "ui/ui.h"
 12 #include "sort.h"
 13 #include "build-id.h"
 14 #include "color.h"
 15 #include "cache.h"
 16 #include "symbol.h"
 17 #include "debug.h"
 18 #include "annotate.h"
 19 #include "evsel.h"
 20 #include <regex.h>
 21 #include <pthread.h>
 22 #include <linux/bitops.h>
 23 
 24 const char      *disassembler_style;
 25 const char      *objdump_path;
 26 static regex_t   file_lineno;
 27 
 28 static struct ins *ins__find(const char *name);
 29 static int disasm_line__parse(char *line, char **namep, char **rawp);
 30 
 31 static void ins__delete(struct ins_operands *ops)
 32 {
 33         if (ops == NULL)
 34                 return;
 35         zfree(&ops->source.raw);
 36         zfree(&ops->source.name);
 37         zfree(&ops->target.raw);
 38         zfree(&ops->target.name);
 39 }
 40 
 41 static int ins__raw_scnprintf(struct ins *ins, char *bf, size_t size,
 42                               struct ins_operands *ops)
 43 {
 44         return scnprintf(bf, size, "%-6.6s %s", ins->name, ops->raw);
 45 }
 46 
 47 int ins__scnprintf(struct ins *ins, char *bf, size_t size,
 48                   struct ins_operands *ops)
 49 {
 50         if (ins->ops->scnprintf)
 51                 return ins->ops->scnprintf(ins, bf, size, ops);
 52 
 53         return ins__raw_scnprintf(ins, bf, size, ops);
 54 }
 55 
 56 static int call__parse(struct ins_operands *ops)
 57 {
 58         char *endptr, *tok, *name;
 59 
 60         ops->target.addr = strtoull(ops->raw, &endptr, 16);
 61 
 62         name = strchr(endptr, '<');
 63         if (name == NULL)
 64                 goto indirect_call;
 65 
 66         name++;
 67 
 68         tok = strchr(name, '>');
 69         if (tok == NULL)
 70                 return -1;
 71 
 72         *tok = '\0';
 73         ops->target.name = strdup(name);
 74         *tok = '>';
 75 
 76         return ops->target.name == NULL ? -1 : 0;
 77 
 78 indirect_call:
 79         tok = strchr(endptr, '(');
 80         if (tok != NULL) {
 81                 ops->target.addr = 0;
 82                 return 0;
 83         }
 84 
 85         tok = strchr(endptr, '*');
 86         if (tok == NULL)
 87                 return -1;
 88 
 89         ops->target.addr = strtoull(tok + 1, NULL, 16);
 90         return 0;
 91 }
 92 
 93 static int call__scnprintf(struct ins *ins, char *bf, size_t size,
 94                            struct ins_operands *ops)
 95 {
 96         if (ops->target.name)
 97                 return scnprintf(bf, size, "%-6.6s %s", ins->name, ops->target.name);
 98 
 99         if (ops->target.addr == 0)
100                 return ins__raw_scnprintf(ins, bf, size, ops);
101 
102         return scnprintf(bf, size, "%-6.6s *%" PRIx64, ins->name, ops->target.addr);
103 }
104 
105 static struct ins_ops call_ops = {
106         .parse     = call__parse,
107         .scnprintf = call__scnprintf,
108 };
109 
110 bool ins__is_call(const struct ins *ins)
111 {
112         return ins->ops == &call_ops;
113 }
114 
115 static int jump__parse(struct ins_operands *ops)
116 {
117         const char *s = strchr(ops->raw, '+');
118 
119         ops->target.addr = strtoull(ops->raw, NULL, 16);
120 
121         if (s++ != NULL)
122                 ops->target.offset = strtoull(s, NULL, 16);
123         else
124                 ops->target.offset = UINT64_MAX;
125 
126         return 0;
127 }
128 
129 static int jump__scnprintf(struct ins *ins, char *bf, size_t size,
130                            struct ins_operands *ops)
131 {
132         return scnprintf(bf, size, "%-6.6s %" PRIx64, ins->name, ops->target.offset);
133 }
134 
135 static struct ins_ops jump_ops = {
136         .parse     = jump__parse,
137         .scnprintf = jump__scnprintf,
138 };
139 
140 bool ins__is_jump(const struct ins *ins)
141 {
142         return ins->ops == &jump_ops;
143 }
144 
145 static int comment__symbol(char *raw, char *comment, u64 *addrp, char **namep)
146 {
147         char *endptr, *name, *t;
148 
149         if (strstr(raw, "(%rip)") == NULL)
150                 return 0;
151 
152         *addrp = strtoull(comment, &endptr, 16);
153         name = strchr(endptr, '<');
154         if (name == NULL)
155                 return -1;
156 
157         name++;
158 
159         t = strchr(name, '>');
160         if (t == NULL)
161                 return 0;
162 
163         *t = '\0';
164         *namep = strdup(name);
165         *t = '>';
166 
167         return 0;
168 }
169 
170 static int lock__parse(struct ins_operands *ops)
171 {
172         char *name;
173 
174         ops->locked.ops = zalloc(sizeof(*ops->locked.ops));
175         if (ops->locked.ops == NULL)
176                 return 0;
177 
178         if (disasm_line__parse(ops->raw, &name, &ops->locked.ops->raw) < 0)
179                 goto out_free_ops;
180 
181         ops->locked.ins = ins__find(name);
182         free(name);
183 
184         if (ops->locked.ins == NULL)
185                 goto out_free_ops;
186 
187         if (!ops->locked.ins->ops)
188                 return 0;
189 
190         if (ops->locked.ins->ops->parse &&
191             ops->locked.ins->ops->parse(ops->locked.ops) < 0)
192                 goto out_free_ops;
193 
194         return 0;
195 
196 out_free_ops:
197         zfree(&ops->locked.ops);
198         return 0;
199 }
200 
201 static int lock__scnprintf(struct ins *ins, char *bf, size_t size,
202                            struct ins_operands *ops)
203 {
204         int printed;
205 
206         if (ops->locked.ins == NULL)
207                 return ins__raw_scnprintf(ins, bf, size, ops);
208 
209         printed = scnprintf(bf, size, "%-6.6s ", ins->name);
210         return printed + ins__scnprintf(ops->locked.ins, bf + printed,
211                                         size - printed, ops->locked.ops);
212 }
213 
214 static void lock__delete(struct ins_operands *ops)
215 {
216         struct ins *ins = ops->locked.ins;
217 
218         if (ins && ins->ops->free)
219                 ins->ops->free(ops->locked.ops);
220         else
221                 ins__delete(ops->locked.ops);
222 
223         zfree(&ops->locked.ops);
224         zfree(&ops->target.raw);
225         zfree(&ops->target.name);
226 }
227 
228 static struct ins_ops lock_ops = {
229         .free      = lock__delete,
230         .parse     = lock__parse,
231         .scnprintf = lock__scnprintf,
232 };
233 
234 static int mov__parse(struct ins_operands *ops)
235 {
236         char *s = strchr(ops->raw, ','), *target, *comment, prev;
237 
238         if (s == NULL)
239                 return -1;
240 
241         *s = '\0';
242         ops->source.raw = strdup(ops->raw);
243         *s = ',';
244 
245         if (ops->source.raw == NULL)
246                 return -1;
247 
248         target = ++s;
249         comment = strchr(s, '#');
250 
251         if (comment != NULL)
252                 s = comment - 1;
253         else
254                 s = strchr(s, '\0') - 1;
255 
256         while (s > target && isspace(s[0]))
257                 --s;
258         s++;
259         prev = *s;
260         *s = '\0';
261 
262         ops->target.raw = strdup(target);
263         *s = prev;
264 
265         if (ops->target.raw == NULL)
266                 goto out_free_source;
267 
268         if (comment == NULL)
269                 return 0;
270 
271         while (comment[0] != '\0' && isspace(comment[0]))
272                 ++comment;
273 
274         comment__symbol(ops->source.raw, comment, &ops->source.addr, &ops->source.name);
275         comment__symbol(ops->target.raw, comment, &ops->target.addr, &ops->target.name);
276 
277         return 0;
278 
279 out_free_source:
280         zfree(&ops->source.raw);
281         return -1;
282 }
283 
284 static int mov__scnprintf(struct ins *ins, char *bf, size_t size,
285                            struct ins_operands *ops)
286 {
287         return scnprintf(bf, size, "%-6.6s %s,%s", ins->name,
288                          ops->source.name ?: ops->source.raw,
289                          ops->target.name ?: ops->target.raw);
290 }
291 
292 static struct ins_ops mov_ops = {
293         .parse     = mov__parse,
294         .scnprintf = mov__scnprintf,
295 };
296 
297 static int dec__parse(struct ins_operands *ops)
298 {
299         char *target, *comment, *s, prev;
300 
301         target = s = ops->raw;
302 
303         while (s[0] != '\0' && !isspace(s[0]))
304                 ++s;
305         prev = *s;
306         *s = '\0';
307 
308         ops->target.raw = strdup(target);
309         *s = prev;
310 
311         if (ops->target.raw == NULL)
312                 return -1;
313 
314         comment = strchr(s, '#');
315         if (comment == NULL)
316                 return 0;
317 
318         while (comment[0] != '\0' && isspace(comment[0]))
319                 ++comment;
320 
321         comment__symbol(ops->target.raw, comment, &ops->target.addr, &ops->target.name);
322 
323         return 0;
324 }
325 
326 static int dec__scnprintf(struct ins *ins, char *bf, size_t size,
327                            struct ins_operands *ops)
328 {
329         return scnprintf(bf, size, "%-6.6s %s", ins->name,
330                          ops->target.name ?: ops->target.raw);
331 }
332 
333 static struct ins_ops dec_ops = {
334         .parse     = dec__parse,
335         .scnprintf = dec__scnprintf,
336 };
337 
338 static int nop__scnprintf(struct ins *ins __maybe_unused, char *bf, size_t size,
339                           struct ins_operands *ops __maybe_unused)
340 {
341         return scnprintf(bf, size, "%-6.6s", "nop");
342 }
343 
344 static struct ins_ops nop_ops = {
345         .scnprintf = nop__scnprintf,
346 };
347 
348 /*
349  * Must be sorted by name!
350  */
351 static struct ins instructions[] = {
352         { .name = "add",   .ops  = &mov_ops, },
353         { .name = "addl",  .ops  = &mov_ops, },
354         { .name = "addq",  .ops  = &mov_ops, },
355         { .name = "addw",  .ops  = &mov_ops, },
356         { .name = "and",   .ops  = &mov_ops, },
357         { .name = "bts",   .ops  = &mov_ops, },
358         { .name = "call",  .ops  = &call_ops, },
359         { .name = "callq", .ops  = &call_ops, },
360         { .name = "cmp",   .ops  = &mov_ops, },
361         { .name = "cmpb",  .ops  = &mov_ops, },
362         { .name = "cmpl",  .ops  = &mov_ops, },
363         { .name = "cmpq",  .ops  = &mov_ops, },
364         { .name = "cmpw",  .ops  = &mov_ops, },
365         { .name = "cmpxch", .ops  = &mov_ops, },
366         { .name = "dec",   .ops  = &dec_ops, },
367         { .name = "decl",  .ops  = &dec_ops, },
368         { .name = "imul",  .ops  = &mov_ops, },
369         { .name = "inc",   .ops  = &dec_ops, },
370         { .name = "incl",  .ops  = &dec_ops, },
371         { .name = "ja",    .ops  = &jump_ops, },
372         { .name = "jae",   .ops  = &jump_ops, },
373         { .name = "jb",    .ops  = &jump_ops, },
374         { .name = "jbe",   .ops  = &jump_ops, },
375         { .name = "jc",    .ops  = &jump_ops, },
376         { .name = "jcxz",  .ops  = &jump_ops, },
377         { .name = "je",    .ops  = &jump_ops, },
378         { .name = "jecxz", .ops  = &jump_ops, },
379         { .name = "jg",    .ops  = &jump_ops, },
380         { .name = "jge",   .ops  = &jump_ops, },
381         { .name = "jl",    .ops  = &jump_ops, },
382         { .name = "jle",   .ops  = &jump_ops, },
383         { .name = "jmp",   .ops  = &jump_ops, },
384         { .name = "jmpq",  .ops  = &jump_ops, },
385         { .name = "jna",   .ops  = &jump_ops, },
386         { .name = "jnae",  .ops  = &jump_ops, },
387         { .name = "jnb",   .ops  = &jump_ops, },
388         { .name = "jnbe",  .ops  = &jump_ops, },
389         { .name = "jnc",   .ops  = &jump_ops, },
390         { .name = "jne",   .ops  = &jump_ops, },
391         { .name = "jng",   .ops  = &jump_ops, },
392         { .name = "jnge",  .ops  = &jump_ops, },
393         { .name = "jnl",   .ops  = &jump_ops, },
394         { .name = "jnle",  .ops  = &jump_ops, },
395         { .name = "jno",   .ops  = &jump_ops, },
396         { .name = "jnp",   .ops  = &jump_ops, },
397         { .name = "jns",   .ops  = &jump_ops, },
398         { .name = "jnz",   .ops  = &jump_ops, },
399         { .name = "jo",    .ops  = &jump_ops, },
400         { .name = "jp",    .ops  = &jump_ops, },
401         { .name = "jpe",   .ops  = &jump_ops, },
402         { .name = "jpo",   .ops  = &jump_ops, },
403         { .name = "jrcxz", .ops  = &jump_ops, },
404         { .name = "js",    .ops  = &jump_ops, },
405         { .name = "jz",    .ops  = &jump_ops, },
406         { .name = "lea",   .ops  = &mov_ops, },
407         { .name = "lock",  .ops  = &lock_ops, },
408         { .name = "mov",   .ops  = &mov_ops, },
409         { .name = "movb",  .ops  = &mov_ops, },
410         { .name = "movdqa",.ops  = &mov_ops, },
411         { .name = "movl",  .ops  = &mov_ops, },
412         { .name = "movq",  .ops  = &mov_ops, },
413         { .name = "movslq", .ops  = &mov_ops, },
414         { .name = "movzbl", .ops  = &mov_ops, },
415         { .name = "movzwl", .ops  = &mov_ops, },
416         { .name = "nop",   .ops  = &nop_ops, },
417         { .name = "nopl",  .ops  = &nop_ops, },
418         { .name = "nopw",  .ops  = &nop_ops, },
419         { .name = "or",    .ops  = &mov_ops, },
420         { .name = "orl",   .ops  = &mov_ops, },
421         { .name = "test",  .ops  = &mov_ops, },
422         { .name = "testb", .ops  = &mov_ops, },
423         { .name = "testl", .ops  = &mov_ops, },
424         { .name = "xadd",  .ops  = &mov_ops, },
425         { .name = "xbeginl", .ops  = &jump_ops, },
426         { .name = "xbeginq", .ops  = &jump_ops, },
427 };
428 
429 static int ins__cmp(const void *name, const void *insp)
430 {
431         const struct ins *ins = insp;
432 
433         return strcmp(name, ins->name);
434 }
435 
436 static struct ins *ins__find(const char *name)
437 {
438         const int nmemb = ARRAY_SIZE(instructions);
439 
440         return bsearch(name, instructions, nmemb, sizeof(struct ins), ins__cmp);
441 }
442 
443 int symbol__annotate_init(struct map *map __maybe_unused, struct symbol *sym)
444 {
445         struct annotation *notes = symbol__annotation(sym);
446         pthread_mutex_init(&notes->lock, NULL);
447         return 0;
448 }
449 
450 int symbol__alloc_hist(struct symbol *sym)
451 {
452         struct annotation *notes = symbol__annotation(sym);
453         const size_t size = symbol__size(sym);
454         size_t sizeof_sym_hist;
455 
456         /* Check for overflow when calculating sizeof_sym_hist */
457         if (size > (SIZE_MAX - sizeof(struct sym_hist)) / sizeof(u64))
458                 return -1;
459 
460         sizeof_sym_hist = (sizeof(struct sym_hist) + size * sizeof(u64));
461 
462         /* Check for overflow in zalloc argument */
463         if (sizeof_sym_hist > (SIZE_MAX - sizeof(*notes->src))
464                                 / symbol_conf.nr_events)
465                 return -1;
466 
467         notes->src = zalloc(sizeof(*notes->src) + symbol_conf.nr_events * sizeof_sym_hist);
468         if (notes->src == NULL)
469                 return -1;
470         notes->src->sizeof_sym_hist = sizeof_sym_hist;
471         notes->src->nr_histograms   = symbol_conf.nr_events;
472         INIT_LIST_HEAD(&notes->src->source);
473         return 0;
474 }
475 
476 /* The cycles histogram is lazily allocated. */
477 static int symbol__alloc_hist_cycles(struct symbol *sym)
478 {
479         struct annotation *notes = symbol__annotation(sym);
480         const size_t size = symbol__size(sym);
481 
482         notes->src->cycles_hist = calloc(size, sizeof(struct cyc_hist));
483         if (notes->src->cycles_hist == NULL)
484                 return -1;
485         return 0;
486 }
487 
488 void symbol__annotate_zero_histograms(struct symbol *sym)
489 {
490         struct annotation *notes = symbol__annotation(sym);
491 
492         pthread_mutex_lock(&notes->lock);
493         if (notes->src != NULL) {
494                 memset(notes->src->histograms, 0,
495                        notes->src->nr_histograms * notes->src->sizeof_sym_hist);
496                 if (notes->src->cycles_hist)
497                         memset(notes->src->cycles_hist, 0,
498                                 symbol__size(sym) * sizeof(struct cyc_hist));
499         }
500         pthread_mutex_unlock(&notes->lock);
501 }
502 
503 static int __symbol__account_cycles(struct annotation *notes,
504                                     u64 start,
505                                     unsigned offset, unsigned cycles,
506                                     unsigned have_start)
507 {
508         struct cyc_hist *ch;
509 
510         ch = notes->src->cycles_hist;
511         /*
512          * For now we can only account one basic block per
513          * final jump. But multiple could be overlapping.
514          * Always account the longest one. So when
515          * a shorter one has been already seen throw it away.
516          *
517          * We separately always account the full cycles.
518          */
519         ch[offset].num_aggr++;
520         ch[offset].cycles_aggr += cycles;
521 
522         if (!have_start && ch[offset].have_start)
523                 return 0;
524         if (ch[offset].num) {
525                 if (have_start && (!ch[offset].have_start ||
526                                    ch[offset].start > start)) {
527                         ch[offset].have_start = 0;
528                         ch[offset].cycles = 0;
529                         ch[offset].num = 0;
530                         if (ch[offset].reset < 0xffff)
531                                 ch[offset].reset++;
532                 } else if (have_start &&
533                            ch[offset].start < start)
534                         return 0;
535         }
536         ch[offset].have_start = have_start;
537         ch[offset].start = start;
538         ch[offset].cycles += cycles;
539         ch[offset].num++;
540         return 0;
541 }
542 
543 static int __symbol__inc_addr_samples(struct symbol *sym, struct map *map,
544                                       struct annotation *notes, int evidx, u64 addr)
545 {
546         unsigned offset;
547         struct sym_hist *h;
548 
549         pr_debug3("%s: addr=%#" PRIx64 "\n", __func__, map->unmap_ip(map, addr));
550 
551         if (addr < sym->start || addr >= sym->end) {
552                 pr_debug("%s(%d): ERANGE! sym->name=%s, start=%#" PRIx64 ", addr=%#" PRIx64 ", end=%#" PRIx64 "\n",
553                        __func__, __LINE__, sym->name, sym->start, addr, sym->end);
554                 return -ERANGE;
555         }
556 
557         offset = addr - sym->start;
558         h = annotation__histogram(notes, evidx);
559         h->sum++;
560         h->addr[offset]++;
561 
562         pr_debug3("%#" PRIx64 " %s: period++ [addr: %#" PRIx64 ", %#" PRIx64
563                   ", evidx=%d] => %" PRIu64 "\n", sym->start, sym->name,
564                   addr, addr - sym->start, evidx, h->addr[offset]);
565         return 0;
566 }
567 
568 static struct annotation *symbol__get_annotation(struct symbol *sym, bool cycles)
569 {
570         struct annotation *notes = symbol__annotation(sym);
571 
572         if (notes->src == NULL) {
573                 if (symbol__alloc_hist(sym) < 0)
574                         return NULL;
575         }
576         if (!notes->src->cycles_hist && cycles) {
577                 if (symbol__alloc_hist_cycles(sym) < 0)
578                         return NULL;
579         }
580         return notes;
581 }
582 
583 static int symbol__inc_addr_samples(struct symbol *sym, struct map *map,
584                                     int evidx, u64 addr)
585 {
586         struct annotation *notes;
587 
588         if (sym == NULL)
589                 return 0;
590         notes = symbol__get_annotation(sym, false);
591         if (notes == NULL)
592                 return -ENOMEM;
593         return __symbol__inc_addr_samples(sym, map, notes, evidx, addr);
594 }
595 
596 static int symbol__account_cycles(u64 addr, u64 start,
597                                   struct symbol *sym, unsigned cycles)
598 {
599         struct annotation *notes;
600         unsigned offset;
601 
602         if (sym == NULL)
603                 return 0;
604         notes = symbol__get_annotation(sym, true);
605         if (notes == NULL)
606                 return -ENOMEM;
607         if (addr < sym->start || addr >= sym->end)
608                 return -ERANGE;
609 
610         if (start) {
611                 if (start < sym->start || start >= sym->end)
612                         return -ERANGE;
613                 if (start >= addr)
614                         start = 0;
615         }
616         offset = addr - sym->start;
617         return __symbol__account_cycles(notes,
618                                         start ? start - sym->start : 0,
619                                         offset, cycles,
620                                         !!start);
621 }
622 
623 int addr_map_symbol__account_cycles(struct addr_map_symbol *ams,
624                                     struct addr_map_symbol *start,
625                                     unsigned cycles)
626 {
627         u64 saddr = 0;
628         int err;
629 
630         if (!cycles)
631                 return 0;
632 
633         /*
634          * Only set start when IPC can be computed. We can only
635          * compute it when the basic block is completely in a single
636          * function.
637          * Special case the case when the jump is elsewhere, but
638          * it starts on the function start.
639          */
640         if (start &&
641                 (start->sym == ams->sym ||
642                  (ams->sym &&
643                    start->addr == ams->sym->start + ams->map->start)))
644                 saddr = start->al_addr;
645         if (saddr == 0)
646                 pr_debug2("BB with bad start: addr %"PRIx64" start %"PRIx64" sym %"PRIx64" saddr %"PRIx64"\n",
647                         ams->addr,
648                         start ? start->addr : 0,
649                         ams->sym ? ams->sym->start + ams->map->start : 0,
650                         saddr);
651         err = symbol__account_cycles(ams->al_addr, saddr, ams->sym, cycles);
652         if (err)
653                 pr_debug2("account_cycles failed %d\n", err);
654         return err;
655 }
656 
657 int addr_map_symbol__inc_samples(struct addr_map_symbol *ams, int evidx)
658 {
659         return symbol__inc_addr_samples(ams->sym, ams->map, evidx, ams->al_addr);
660 }
661 
662 int hist_entry__inc_addr_samples(struct hist_entry *he, int evidx, u64 ip)
663 {
664         return symbol__inc_addr_samples(he->ms.sym, he->ms.map, evidx, ip);
665 }
666 
667 static void disasm_line__init_ins(struct disasm_line *dl)
668 {
669         dl->ins = ins__find(dl->name);
670 
671         if (dl->ins == NULL)
672                 return;
673 
674         if (!dl->ins->ops)
675                 return;
676 
677         if (dl->ins->ops->parse && dl->ins->ops->parse(&dl->ops) < 0)
678                 dl->ins = NULL;
679 }
680 
681 static int disasm_line__parse(char *line, char **namep, char **rawp)
682 {
683         char *name = line, tmp;
684 
685         while (isspace(name[0]))
686                 ++name;
687 
688         if (name[0] == '\0')
689                 return -1;
690 
691         *rawp = name + 1;
692 
693         while ((*rawp)[0] != '\0' && !isspace((*rawp)[0]))
694                 ++*rawp;
695 
696         tmp = (*rawp)[0];
697         (*rawp)[0] = '\0';
698         *namep = strdup(name);
699 
700         if (*namep == NULL)
701                 goto out_free_name;
702 
703         (*rawp)[0] = tmp;
704 
705         if ((*rawp)[0] != '\0') {
706                 (*rawp)++;
707                 while (isspace((*rawp)[0]))
708                         ++(*rawp);
709         }
710 
711         return 0;
712 
713 out_free_name:
714         zfree(namep);
715         return -1;
716 }
717 
718 static struct disasm_line *disasm_line__new(s64 offset, char *line,
719                                         size_t privsize, int line_nr)
720 {
721         struct disasm_line *dl = zalloc(sizeof(*dl) + privsize);
722 
723         if (dl != NULL) {
724                 dl->offset = offset;
725                 dl->line = strdup(line);
726                 dl->line_nr = line_nr;
727                 if (dl->line == NULL)
728                         goto out_delete;
729 
730                 if (offset != -1) {
731                         if (disasm_line__parse(dl->line, &dl->name, &dl->ops.raw) < 0)
732                                 goto out_free_line;
733 
734                         disasm_line__init_ins(dl);
735                 }
736         }
737 
738         return dl;
739 
740 out_free_line:
741         zfree(&dl->line);
742 out_delete:
743         free(dl);
744         return NULL;
745 }
746 
747 void disasm_line__free(struct disasm_line *dl)
748 {
749         zfree(&dl->line);
750         zfree(&dl->name);
751         if (dl->ins && dl->ins->ops->free)
752                 dl->ins->ops->free(&dl->ops);
753         else
754                 ins__delete(&dl->ops);
755         free(dl);
756 }
757 
758 int disasm_line__scnprintf(struct disasm_line *dl, char *bf, size_t size, bool raw)
759 {
760         if (raw || !dl->ins)
761                 return scnprintf(bf, size, "%-6.6s %s", dl->name, dl->ops.raw);
762 
763         return ins__scnprintf(dl->ins, bf, size, &dl->ops);
764 }
765 
766 static void disasm__add(struct list_head *head, struct disasm_line *line)
767 {
768         list_add_tail(&line->node, head);
769 }
770 
771 struct disasm_line *disasm__get_next_ip_line(struct list_head *head, struct disasm_line *pos)
772 {
773         list_for_each_entry_continue(pos, head, node)
774                 if (pos->offset >= 0)
775                         return pos;
776 
777         return NULL;
778 }
779 
780 double disasm__calc_percent(struct annotation *notes, int evidx, s64 offset,
781                             s64 end, const char **path, u64 *nr_samples)
782 {
783         struct source_line *src_line = notes->src->lines;
784         double percent = 0.0;
785         *nr_samples = 0;
786 
787         if (src_line) {
788                 size_t sizeof_src_line = sizeof(*src_line) +
789                                 sizeof(src_line->samples) * (src_line->nr_pcnt - 1);
790 
791                 while (offset < end) {
792                         src_line = (void *)notes->src->lines +
793                                         (sizeof_src_line * offset);
794 
795                         if (*path == NULL)
796                                 *path = src_line->path;
797 
798                         percent += src_line->samples[evidx].percent;
799                         *nr_samples += src_line->samples[evidx].nr;
800                         offset++;
801                 }
802         } else {
803                 struct sym_hist *h = annotation__histogram(notes, evidx);
804                 unsigned int hits = 0;
805 
806                 while (offset < end)
807                         hits += h->addr[offset++];
808 
809                 if (h->sum) {
810                         *nr_samples = hits;
811                         percent = 100.0 * hits / h->sum;
812                 }
813         }
814 
815         return percent;
816 }
817 
818 static int disasm_line__print(struct disasm_line *dl, struct symbol *sym, u64 start,
819                       struct perf_evsel *evsel, u64 len, int min_pcnt, int printed,
820                       int max_lines, struct disasm_line *queue)
821 {
822         static const char *prev_line;
823         static const char *prev_color;
824 
825         if (dl->offset != -1) {
826                 const char *path = NULL;
827                 u64 nr_samples;
828                 double percent, max_percent = 0.0;
829                 double *ppercents = &percent;
830                 u64 *psamples = &nr_samples;
831                 int i, nr_percent = 1;
832                 const char *color;
833                 struct annotation *notes = symbol__annotation(sym);
834                 s64 offset = dl->offset;
835                 const u64 addr = start + offset;
836                 struct disasm_line *next;
837 
838                 next = disasm__get_next_ip_line(&notes->src->source, dl);
839 
840                 if (perf_evsel__is_group_event(evsel)) {
841                         nr_percent = evsel->nr_members;
842                         ppercents = calloc(nr_percent, sizeof(double));
843                         psamples = calloc(nr_percent, sizeof(u64));
844                         if (ppercents == NULL || psamples == NULL) {
845                                 return -1;
846                         }
847                 }
848 
849                 for (i = 0; i < nr_percent; i++) {
850                         percent = disasm__calc_percent(notes,
851                                         notes->src->lines ? i : evsel->idx + i,
852                                         offset,
853                                         next ? next->offset : (s64) len,
854                                         &path, &nr_samples);
855 
856                         ppercents[i] = percent;
857                         psamples[i] = nr_samples;
858                         if (percent > max_percent)
859                                 max_percent = percent;
860                 }
861 
862                 if (max_percent < min_pcnt)
863                         return -1;
864 
865                 if (max_lines && printed >= max_lines)
866                         return 1;
867 
868                 if (queue != NULL) {
869                         list_for_each_entry_from(queue, &notes->src->source, node) {
870                                 if (queue == dl)
871                                         break;
872                                 disasm_line__print(queue, sym, start, evsel, len,
873                                                     0, 0, 1, NULL);
874                         }
875                 }
876 
877                 color = get_percent_color(max_percent);
878 
879                 /*
880                  * Also color the filename and line if needed, with
881                  * the same color than the percentage. Don't print it
882                  * twice for close colored addr with the same filename:line
883                  */
884                 if (path) {
885                         if (!prev_line || strcmp(prev_line, path)
886                                        || color != prev_color) {
887                                 color_fprintf(stdout, color, " %s", path);
888                                 prev_line = path;
889                                 prev_color = color;
890                         }
891                 }
892 
893                 for (i = 0; i < nr_percent; i++) {
894                         percent = ppercents[i];
895                         nr_samples = psamples[i];
896                         color = get_percent_color(percent);
897 
898                         if (symbol_conf.show_total_period)
899                                 color_fprintf(stdout, color, " %7" PRIu64,
900                                               nr_samples);
901                         else
902                                 color_fprintf(stdout, color, " %7.2f", percent);
903                 }
904 
905                 printf(" :      ");
906                 color_fprintf(stdout, PERF_COLOR_MAGENTA, "  %" PRIx64 ":", addr);
907                 color_fprintf(stdout, PERF_COLOR_BLUE, "%s\n", dl->line);
908 
909                 if (ppercents != &percent)
910                         free(ppercents);
911 
912                 if (psamples != &nr_samples)
913                         free(psamples);
914 
915         } else if (max_lines && printed >= max_lines)
916                 return 1;
917         else {
918                 int width = 8;
919 
920                 if (queue)
921                         return -1;
922 
923                 if (perf_evsel__is_group_event(evsel))
924                         width *= evsel->nr_members;
925 
926                 if (!*dl->line)
927                         printf(" %*s:\n", width, " ");
928                 else
929                         printf(" %*s:   %s\n", width, " ", dl->line);
930         }
931 
932         return 0;
933 }
934 
935 /*
936  * symbol__parse_objdump_line() parses objdump output (with -d --no-show-raw)
937  * which looks like following
938  *
939  *  0000000000415500 <_init>:
940  *    415500:       sub    $0x8,%rsp
941  *    415504:       mov    0x2f5ad5(%rip),%rax        # 70afe0 <_DYNAMIC+0x2f8>
942  *    41550b:       test   %rax,%rax
943  *    41550e:       je     415515 <_init+0x15>
944  *    415510:       callq  416e70 <__gmon_start__@plt>
945  *    415515:       add    $0x8,%rsp
946  *    415519:       retq
947  *
948  * it will be parsed and saved into struct disasm_line as
949  *  <offset>       <name>  <ops.raw>
950  *
951  * The offset will be a relative offset from the start of the symbol and -1
952  * means that it's not a disassembly line so should be treated differently.
953  * The ops.raw part will be parsed further according to type of the instruction.
954  */
955 static int symbol__parse_objdump_line(struct symbol *sym, struct map *map,
956                                       FILE *file, size_t privsize,
957                                       int *line_nr)
958 {
959         struct annotation *notes = symbol__annotation(sym);
960         struct disasm_line *dl;
961         char *line = NULL, *parsed_line, *tmp, *tmp2, *c;
962         size_t line_len;
963         s64 line_ip, offset = -1;
964         regmatch_t match[2];
965 
966         if (getline(&line, &line_len, file) < 0)
967                 return -1;
968 
969         if (!line)
970                 return -1;
971 
972         while (line_len != 0 && isspace(line[line_len - 1]))
973                 line[--line_len] = '\0';
974 
975         c = strchr(line, '\n');
976         if (c)
977                 *c = 0;
978 
979         line_ip = -1;
980         parsed_line = line;
981 
982         /* /filename:linenr ? Save line number and ignore. */
983         if (regexec(&file_lineno, line, 2, match, 0) == 0) {
984                 *line_nr = atoi(line + match[1].rm_so);
985                 return 0;
986         }
987 
988         /*
989          * Strip leading spaces:
990          */
991         tmp = line;
992         while (*tmp) {
993                 if (*tmp != ' ')
994                         break;
995                 tmp++;
996         }
997 
998         if (*tmp) {
999                 /*
1000                  * Parse hexa addresses followed by ':'
1001                  */
1002                 line_ip = strtoull(tmp, &tmp2, 16);
1003                 if (*tmp2 != ':' || tmp == tmp2 || tmp2[1] == '\0')
1004                         line_ip = -1;
1005         }
1006 
1007         if (line_ip != -1) {
1008                 u64 start = map__rip_2objdump(map, sym->start),
1009                     end = map__rip_2objdump(map, sym->end);
1010 
1011                 offset = line_ip - start;
1012                 if ((u64)line_ip < start || (u64)line_ip >= end)
1013                         offset = -1;
1014                 else
1015                         parsed_line = tmp2 + 1;
1016         }
1017 
1018         dl = disasm_line__new(offset, parsed_line, privsize, *line_nr);
1019         free(line);
1020         (*line_nr)++;
1021 
1022         if (dl == NULL)
1023                 return -1;
1024 
1025         if (dl->ops.target.offset == UINT64_MAX)
1026                 dl->ops.target.offset = dl->ops.target.addr -
1027                                         map__rip_2objdump(map, sym->start);
1028 
1029         /* kcore has no symbols, so add the call target name */
1030         if (dl->ins && ins__is_call(dl->ins) && !dl->ops.target.name) {
1031                 struct addr_map_symbol target = {
1032                         .map = map,
1033                         .addr = dl->ops.target.addr,
1034                 };
1035 
1036                 if (!map_groups__find_ams(&target, NULL) &&
1037                     target.sym->start == target.al_addr)
1038                         dl->ops.target.name = strdup(target.sym->name);
1039         }
1040 
1041         disasm__add(&notes->src->source, dl);
1042 
1043         return 0;
1044 }
1045 
1046 static __attribute__((constructor)) void symbol__init_regexpr(void)
1047 {
1048         regcomp(&file_lineno, "^/[^:]+:([0-9]+)", REG_EXTENDED);
1049 }
1050 
1051 static void delete_last_nop(struct symbol *sym)
1052 {
1053         struct annotation *notes = symbol__annotation(sym);
1054         struct list_head *list = &notes->src->source;
1055         struct disasm_line *dl;
1056 
1057         while (!list_empty(list)) {
1058                 dl = list_entry(list->prev, struct disasm_line, node);
1059 
1060                 if (dl->ins && dl->ins->ops) {
1061                         if (dl->ins->ops != &nop_ops)
1062                                 return;
1063                 } else {
1064                         if (!strstr(dl->line, " nop ") &&
1065                             !strstr(dl->line, " nopl ") &&
1066                             !strstr(dl->line, " nopw "))
1067                                 return;
1068                 }
1069 
1070                 list_del(&dl->node);
1071                 disasm_line__free(dl);
1072         }
1073 }
1074 
1075 int symbol__annotate(struct symbol *sym, struct map *map, size_t privsize)
1076 {
1077         struct dso *dso = map->dso;
1078         char *filename = dso__build_id_filename(dso, NULL, 0);
1079         bool free_filename = true;
1080         char *command;
1081         FILE *file;
1082         int err = 0;
1083         char symfs_filename[PATH_MAX];
1084         struct kcore_extract kce;
1085         bool delete_extract = false;
1086         int lineno = 0;
1087         int nline;
1088 
1089         if (filename)
1090                 symbol__join_symfs(symfs_filename, filename);
1091 
1092         if (filename == NULL) {
1093                 if (dso->has_build_id) {
1094                         pr_err("Can't annotate %s: not enough memory\n",
1095                                sym->name);
1096                         return -ENOMEM;
1097                 }
1098                 goto fallback;
1099         } else if (dso__is_kcore(dso)) {
1100                 goto fallback;
1101         } else if (readlink(symfs_filename, command, sizeof(command)) < 0 ||
1102                    strstr(command, "[kernel.kallsyms]") ||
1103                    access(symfs_filename, R_OK)) {
1104                 free(filename);
1105 fallback:
1106                 /*
1107                  * If we don't have build-ids or the build-id file isn't in the
1108                  * cache, or is just a kallsyms file, well, lets hope that this
1109                  * DSO is the same as when 'perf record' ran.
1110                  */
1111                 filename = (char *)dso->long_name;
1112                 symbol__join_symfs(symfs_filename, filename);
1113                 free_filename = false;
1114         }
1115 
1116         if (dso->symtab_type == DSO_BINARY_TYPE__KALLSYMS &&
1117             !dso__is_kcore(dso)) {
1118                 char bf[BUILD_ID_SIZE * 2 + 16] = " with build id ";
1119                 char *build_id_msg = NULL;
1120 
1121                 if (dso->annotate_warned)
1122                         goto out_free_filename;
1123 
1124                 if (dso->has_build_id) {
1125                         build_id__sprintf(dso->build_id,
1126                                           sizeof(dso->build_id), bf + 15);
1127                         build_id_msg = bf;
1128                 }
1129                 err = -ENOENT;
1130                 dso->annotate_warned = 1;
1131                 pr_err("Can't annotate %s:\n\n"
1132                        "No vmlinux file%s\nwas found in the path.\n\n"
1133                        "Note that annotation using /proc/kcore requires CAP_SYS_RAWIO capability.\n\n"
1134                        "Please use:\n\n"
1135                        "  perf buildid-cache -vu vmlinux\n\n"
1136                        "or:\n\n"
1137                        "  --vmlinux vmlinux\n",
1138                        sym->name, build_id_msg ?: "");
1139                 goto out_free_filename;
1140         }
1141 
1142         pr_debug("%s: filename=%s, sym=%s, start=%#" PRIx64 ", end=%#" PRIx64 "\n", __func__,
1143                  filename, sym->name, map->unmap_ip(map, sym->start),
1144                  map->unmap_ip(map, sym->end));
1145 
1146         pr_debug("annotating [%p] %30s : [%p] %30s\n",
1147                  dso, dso->long_name, sym, sym->name);
1148 
1149         if (dso__is_kcore(dso)) {
1150                 kce.kcore_filename = symfs_filename;
1151                 kce.addr = map__rip_2objdump(map, sym->start);
1152                 kce.offs = sym->start;
1153                 kce.len = sym->end - sym->start;
1154                 if (!kcore_extract__create(&kce)) {
1155                         delete_extract = true;
1156                         strlcpy(symfs_filename, kce.extract_filename,
1157                                 sizeof(symfs_filename));
1158                         if (free_filename) {
1159                                 free(filename);
1160                                 free_filename = false;
1161                         }
1162                         filename = symfs_filename;
1163                 }
1164         } else if (dso__needs_decompress(dso)) {
1165                 char tmp[PATH_MAX];
1166                 struct kmod_path m;
1167                 int fd;
1168                 bool ret;
1169 
1170                 if (kmod_path__parse_ext(&m, symfs_filename))
1171                         goto out_free_filename;
1172 
1173                 snprintf(tmp, PATH_MAX, "/tmp/perf-kmod-XXXXXX");
1174 
1175                 fd = mkstemp(tmp);
1176                 if (fd < 0) {
1177                         free(m.ext);
1178                         goto out_free_filename;
1179                 }
1180 
1181                 ret = decompress_to_file(m.ext, symfs_filename, fd);
1182 
1183                 if (ret)
1184                         pr_err("Cannot decompress %s %s\n", m.ext, symfs_filename);
1185 
1186                 free(m.ext);
1187                 close(fd);
1188 
1189                 if (!ret)
1190                         goto out_free_filename;
1191 
1192                 strcpy(symfs_filename, tmp);
1193         }
1194 
1195         err = asprintf(&command,
1196                  "%s %s%s --start-address=0x%016" PRIx64
1197                  " --stop-address=0x%016" PRIx64
1198                  " -l -d %s %s -C %s 2>/dev/null|grep -v %s|expand",
1199                  objdump_path ? objdump_path : "objdump",
1200                  disassembler_style ? "-M " : "",
1201                  disassembler_style ? disassembler_style : "",
1202                  map__rip_2objdump(map, sym->start),
1203                  map__rip_2objdump(map, sym->end),
1204                  symbol_conf.annotate_asm_raw ? "" : "--no-show-raw",
1205                  symbol_conf.annotate_src ? "-S" : "",
1206                  symfs_filename, filename);
1207 
1208         if (err < 0) {
1209                 pr_err("Failure allocating memory for the command to run\n");
1210                 goto out_remove_tmp;
1211         }
1212 
1213         pr_debug("Executing: %s\n", command);
1214 
1215         file = popen(command, "r");
1216         if (!file) {
1217                 pr_err("Failure running %s\n", command);
1218                 /*
1219                  * If we were using debug info should retry with
1220                  * original binary.
1221                  */
1222                 goto out_free_command;
1223         }
1224 
1225         nline = 0;
1226         while (!feof(file)) {
1227                 if (symbol__parse_objdump_line(sym, map, file, privsize,
1228                             &lineno) < 0)
1229                         break;
1230                 nline++;
1231         }
1232 
1233         if (nline == 0)
1234                 pr_err("No output from %s\n", command);
1235 
1236         /*
1237          * kallsyms does not have symbol sizes so there may a nop at the end.
1238          * Remove it.
1239          */
1240         if (dso__is_kcore(dso))
1241                 delete_last_nop(sym);
1242 
1243         pclose(file);
1244 
1245 out_free_command:
1246         free(command);
1247 
1248 out_remove_tmp:
1249         if (dso__needs_decompress(dso))
1250                 unlink(symfs_filename);
1251 out_free_filename:
1252         if (delete_extract)
1253                 kcore_extract__delete(&kce);
1254         if (free_filename)
1255                 free(filename);
1256         return err;
1257 }
1258 
1259 static void insert_source_line(struct rb_root *root, struct source_line *src_line)
1260 {
1261         struct source_line *iter;
1262         struct rb_node **p = &root->rb_node;
1263         struct rb_node *parent = NULL;
1264         int i, ret;
1265 
1266         while (*p != NULL) {
1267                 parent = *p;
1268                 iter = rb_entry(parent, struct source_line, node);
1269 
1270                 ret = strcmp(iter->path, src_line->path);
1271                 if (ret == 0) {
1272                         for (i = 0; i < src_line->nr_pcnt; i++)
1273                                 iter->samples[i].percent_sum += src_line->samples[i].percent;
1274                         return;
1275                 }
1276 
1277                 if (ret < 0)
1278                         p = &(*p)->rb_left;
1279                 else
1280                         p = &(*p)->rb_right;
1281         }
1282 
1283         for (i = 0; i < src_line->nr_pcnt; i++)
1284                 src_line->samples[i].percent_sum = src_line->samples[i].percent;
1285 
1286         rb_link_node(&src_line->node, parent, p);
1287         rb_insert_color(&src_line->node, root);
1288 }
1289 
1290 static int cmp_source_line(struct source_line *a, struct source_line *b)
1291 {
1292         int i;
1293 
1294         for (i = 0; i < a->nr_pcnt; i++) {
1295                 if (a->samples[i].percent_sum == b->samples[i].percent_sum)
1296                         continue;
1297                 return a->samples[i].percent_sum > b->samples[i].percent_sum;
1298         }
1299 
1300         return 0;
1301 }
1302 
1303 static void __resort_source_line(struct rb_root *root, struct source_line *src_line)
1304 {
1305         struct source_line *iter;
1306         struct rb_node **p = &root->rb_node;
1307         struct rb_node *parent = NULL;
1308 
1309         while (*p != NULL) {
1310                 parent = *p;
1311                 iter = rb_entry(parent, struct source_line, node);
1312 
1313                 if (cmp_source_line(src_line, iter))
1314                         p = &(*p)->rb_left;
1315                 else
1316                         p = &(*p)->rb_right;
1317         }
1318 
1319         rb_link_node(&src_line->node, parent, p);
1320         rb_insert_color(&src_line->node, root);
1321 }
1322 
1323 static void resort_source_line(struct rb_root *dest_root, struct rb_root *src_root)
1324 {
1325         struct source_line *src_line;
1326         struct rb_node *node;
1327 
1328         node = rb_first(src_root);
1329         while (node) {
1330                 struct rb_node *next;
1331 
1332                 src_line = rb_entry(node, struct source_line, node);
1333                 next = rb_next(node);
1334                 rb_erase(node, src_root);
1335 
1336                 __resort_source_line(dest_root, src_line);
1337                 node = next;
1338         }
1339 }
1340 
1341 static void symbol__free_source_line(struct symbol *sym, int len)
1342 {
1343         struct annotation *notes = symbol__annotation(sym);
1344         struct source_line *src_line = notes->src->lines;
1345         size_t sizeof_src_line;
1346         int i;
1347 
1348         sizeof_src_line = sizeof(*src_line) +
1349                           (sizeof(src_line->samples) * (src_line->nr_pcnt - 1));
1350 
1351         for (i = 0; i < len; i++) {
1352                 free_srcline(src_line->path);
1353                 src_line = (void *)src_line + sizeof_src_line;
1354         }
1355 
1356         zfree(&notes->src->lines);
1357 }
1358 
1359 /* Get the filename:line for the colored entries */
1360 static int symbol__get_source_line(struct symbol *sym, struct map *map,
1361                                    struct perf_evsel *evsel,
1362                                    struct rb_root *root, int len)
1363 {
1364         u64 start;
1365         int i, k;
1366         int evidx = evsel->idx;
1367         struct source_line *src_line;
1368         struct annotation *notes = symbol__annotation(sym);
1369         struct sym_hist *h = annotation__histogram(notes, evidx);
1370         struct rb_root tmp_root = RB_ROOT;
1371         int nr_pcnt = 1;
1372         u64 h_sum = h->sum;
1373         size_t sizeof_src_line = sizeof(struct source_line);
1374 
1375         if (perf_evsel__is_group_event(evsel)) {
1376                 for (i = 1; i < evsel->nr_members; i++) {
1377                         h = annotation__histogram(notes, evidx + i);
1378                         h_sum += h->sum;
1379                 }
1380                 nr_pcnt = evsel->nr_members;
1381                 sizeof_src_line += (nr_pcnt - 1) * sizeof(src_line->samples);
1382         }
1383 
1384         if (!h_sum)
1385                 return 0;
1386 
1387         src_line = notes->src->lines = calloc(len, sizeof_src_line);
1388         if (!notes->src->lines)
1389                 return -1;
1390 
1391         start = map__rip_2objdump(map, sym->start);
1392 
1393         for (i = 0; i < len; i++) {
1394                 u64 offset;
1395                 double percent_max = 0.0;
1396 
1397                 src_line->nr_pcnt = nr_pcnt;
1398 
1399                 for (k = 0; k < nr_pcnt; k++) {
1400                         h = annotation__histogram(notes, evidx + k);
1401                         src_line->samples[k].percent = 100.0 * h->addr[i] / h->sum;
1402 
1403                         if (src_line->samples[k].percent > percent_max)
1404                                 percent_max = src_line->samples[k].percent;
1405                 }
1406 
1407                 if (percent_max <= 0.5)
1408                         goto next;
1409 
1410                 offset = start + i;
1411                 src_line->path = get_srcline(map->dso, offset, NULL, false);
1412                 insert_source_line(&tmp_root, src_line);
1413 
1414         next:
1415                 src_line = (void *)src_line + sizeof_src_line;
1416         }
1417 
1418         resort_source_line(root, &tmp_root);
1419         return 0;
1420 }
1421 
1422 static void print_summary(struct rb_root *root, const char *filename)
1423 {
1424         struct source_line *src_line;
1425         struct rb_node *node;
1426 
1427         printf("\nSorted summary for file %s\n", filename);
1428         printf("----------------------------------------------\n\n");
1429 
1430         if (RB_EMPTY_ROOT(root)) {
1431                 printf(" Nothing higher than %1.1f%%\n", MIN_GREEN);
1432                 return;
1433         }
1434 
1435         node = rb_first(root);
1436         while (node) {
1437                 double percent, percent_max = 0.0;
1438                 const char *color;
1439                 char *path;
1440                 int i;
1441 
1442                 src_line = rb_entry(node, struct source_line, node);
1443                 for (i = 0; i < src_line->nr_pcnt; i++) {
1444                         percent = src_line->samples[i].percent_sum;
1445                         color = get_percent_color(percent);
1446                         color_fprintf(stdout, color, " %7.2f", percent);
1447 
1448                         if (percent > percent_max)
1449                                 percent_max = percent;
1450                 }
1451 
1452                 path = src_line->path;
1453                 color = get_percent_color(percent_max);
1454                 color_fprintf(stdout, color, " %s\n", path);
1455 
1456                 node = rb_next(node);
1457         }
1458 }
1459 
1460 static void symbol__annotate_hits(struct symbol *sym, struct perf_evsel *evsel)
1461 {
1462         struct annotation *notes = symbol__annotation(sym);
1463         struct sym_hist *h = annotation__histogram(notes, evsel->idx);
1464         u64 len = symbol__size(sym), offset;
1465 
1466         for (offset = 0; offset < len; ++offset)
1467                 if (h->addr[offset] != 0)
1468                         printf("%*" PRIx64 ": %" PRIu64 "\n", BITS_PER_LONG / 2,
1469                                sym->start + offset, h->addr[offset]);
1470         printf("%*s: %" PRIu64 "\n", BITS_PER_LONG / 2, "h->sum", h->sum);
1471 }
1472 
1473 int symbol__annotate_printf(struct symbol *sym, struct map *map,
1474                             struct perf_evsel *evsel, bool full_paths,
1475                             int min_pcnt, int max_lines, int context)
1476 {
1477         struct dso *dso = map->dso;
1478         char *filename;
1479         const char *d_filename;
1480         const char *evsel_name = perf_evsel__name(evsel);
1481         struct annotation *notes = symbol__annotation(sym);
1482         struct disasm_line *pos, *queue = NULL;
1483         u64 start = map__rip_2objdump(map, sym->start);
1484         int printed = 2, queue_len = 0;
1485         int more = 0;
1486         u64 len;
1487         int width = 8;
1488         int namelen, evsel_name_len, graph_dotted_len;
1489 
1490         filename = strdup(dso->long_name);
1491         if (!filename)
1492                 return -ENOMEM;
1493 
1494         if (full_paths)
1495                 d_filename = filename;
1496         else
1497                 d_filename = basename(filename);
1498 
1499         len = symbol__size(sym);
1500         namelen = strlen(d_filename);
1501         evsel_name_len = strlen(evsel_name);
1502 
1503         if (perf_evsel__is_group_event(evsel))
1504                 width *= evsel->nr_members;
1505 
1506         printf(" %-*.*s|        Source code & Disassembly of %s for %s\n",
1507                width, width, "Percent", d_filename, evsel_name);
1508 
1509         graph_dotted_len = width + namelen + evsel_name_len;
1510         printf("-%-*.*s-----------------------------------------\n",
1511                graph_dotted_len, graph_dotted_len, graph_dotted_line);
1512 
1513         if (verbose)
1514                 symbol__annotate_hits(sym, evsel);
1515 
1516         list_for_each_entry(pos, &notes->src->source, node) {
1517                 if (context && queue == NULL) {
1518                         queue = pos;
1519                         queue_len = 0;
1520                 }
1521 
1522                 switch (disasm_line__print(pos, sym, start, evsel, len,
1523                                             min_pcnt, printed, max_lines,
1524                                             queue)) {
1525                 case 0:
1526                         ++printed;
1527                         if (context) {
1528                                 printed += queue_len;
1529                                 queue = NULL;
1530                                 queue_len = 0;
1531                         }
1532                         break;
1533                 case 1:
1534                         /* filtered by max_lines */
1535                         ++more;
1536                         break;
1537                 case -1:
1538                 default:
1539                         /*
1540                          * Filtered by min_pcnt or non IP lines when
1541                          * context != 0
1542                          */
1543                         if (!context)
1544                                 break;
1545                         if (queue_len == context)
1546                                 queue = list_entry(queue->node.next, typeof(*queue), node);
1547                         else
1548                                 ++queue_len;
1549                         break;
1550                 }
1551         }
1552 
1553         free(filename);
1554 
1555         return more;
1556 }
1557 
1558 void symbol__annotate_zero_histogram(struct symbol *sym, int evidx)
1559 {
1560         struct annotation *notes = symbol__annotation(sym);
1561         struct sym_hist *h = annotation__histogram(notes, evidx);
1562 
1563         memset(h, 0, notes->src->sizeof_sym_hist);
1564 }
1565 
1566 void symbol__annotate_decay_histogram(struct symbol *sym, int evidx)
1567 {
1568         struct annotation *notes = symbol__annotation(sym);
1569         struct sym_hist *h = annotation__histogram(notes, evidx);
1570         int len = symbol__size(sym), offset;
1571 
1572         h->sum = 0;
1573         for (offset = 0; offset < len; ++offset) {
1574                 h->addr[offset] = h->addr[offset] * 7 / 8;
1575                 h->sum += h->addr[offset];
1576         }
1577 }
1578 
1579 void disasm__purge(struct list_head *head)
1580 {
1581         struct disasm_line *pos, *n;
1582 
1583         list_for_each_entry_safe(pos, n, head, node) {
1584                 list_del(&pos->node);
1585                 disasm_line__free(pos);
1586         }
1587 }
1588 
1589 static size_t disasm_line__fprintf(struct disasm_line *dl, FILE *fp)
1590 {
1591         size_t printed;
1592 
1593         if (dl->offset == -1)
1594                 return fprintf(fp, "%s\n", dl->line);
1595 
1596         printed = fprintf(fp, "%#" PRIx64 " %s", dl->offset, dl->name);
1597 
1598         if (dl->ops.raw[0] != '\0') {
1599                 printed += fprintf(fp, "%.*s %s\n", 6 - (int)printed, " ",
1600                                    dl->ops.raw);
1601         }
1602 
1603         return printed + fprintf(fp, "\n");
1604 }
1605 
1606 size_t disasm__fprintf(struct list_head *head, FILE *fp)
1607 {
1608         struct disasm_line *pos;
1609         size_t printed = 0;
1610 
1611         list_for_each_entry(pos, head, node)
1612                 printed += disasm_line__fprintf(pos, fp);
1613 
1614         return printed;
1615 }
1616 
1617 int symbol__tty_annotate(struct symbol *sym, struct map *map,
1618                          struct perf_evsel *evsel, bool print_lines,
1619                          bool full_paths, int min_pcnt, int max_lines)
1620 {
1621         struct dso *dso = map->dso;
1622         struct rb_root source_line = RB_ROOT;
1623         u64 len;
1624 
1625         if (symbol__annotate(sym, map, 0) < 0)
1626                 return -1;
1627 
1628         len = symbol__size(sym);
1629 
1630         if (print_lines) {
1631                 srcline_full_filename = full_paths;
1632                 symbol__get_source_line(sym, map, evsel, &source_line, len);
1633                 print_summary(&source_line, dso->long_name);
1634         }
1635 
1636         symbol__annotate_printf(sym, map, evsel, full_paths,
1637                                 min_pcnt, max_lines, 0);
1638         if (print_lines)
1639                 symbol__free_source_line(sym, len);
1640 
1641         disasm__purge(&symbol__annotation(sym)->src->source);
1642 
1643         return 0;
1644 }
1645 
1646 int hist_entry__annotate(struct hist_entry *he, size_t privsize)
1647 {
1648         return symbol__annotate(he->ms.sym, he->ms.map, privsize);
1649 }
1650 
1651 bool ui__has_annotation(void)
1652 {
1653         return use_browser == 1 && sort__has_sym;
1654 }
1655 

~ [ source navigation ] ~ [ diff markup ] ~ [ identifier search ] ~

kernel.org | git.kernel.org | LWN.net | Project Home | Wiki (Japanese) | Wiki (English) | SVN repository | Mail admin

Linux® is a registered trademark of Linus Torvalds in the United States and other countries.
TOMOYO® is a registered trademark of NTT DATA CORPORATION.

osdn.jp