1 // SPDX-License-Identifier: GPL-2.0
2 #include <inttypes.h>
3 #include <stdio.h>
4 #include <stdbool.h>
5 #include "util/evlist.h"
6 #include "evsel.h"
7 #include "util/evsel_fprintf.h"
8 #include "util/event.h"
9 #include "callchain.h"
10 #include "map.h"
11 #include "strlist.h"
12 #include "symbol.h"
13 #include "srcline.h"
14 #include "dso.h"
15
16 #ifdef HAVE_LIBTRACEEVENT
17 #include <traceevent/event-parse.h>
18 #endif
19
comma_fprintf(FILE * fp,bool * first,const char * fmt,...)20 static int comma_fprintf(FILE *fp, bool *first, const char *fmt, ...)
21 {
22 va_list args;
23 int ret = 0;
24
25 if (!*first) {
26 ret += fprintf(fp, ",");
27 } else {
28 ret += fprintf(fp, ":");
29 *first = false;
30 }
31
32 va_start(args, fmt);
33 ret += vfprintf(fp, fmt, args);
34 va_end(args);
35 return ret;
36 }
37
__print_attr__fprintf(FILE * fp,const char * name,const char * val,void * priv)38 static int __print_attr__fprintf(FILE *fp, const char *name, const char *val, void *priv)
39 {
40 return comma_fprintf(fp, (bool *)priv, " %s: %s", name, val);
41 }
42
evsel__fprintf(struct evsel * evsel,struct perf_attr_details * details,FILE * fp)43 int evsel__fprintf(struct evsel *evsel, struct perf_attr_details *details, FILE *fp)
44 {
45 bool first = true;
46 int printed = 0;
47
48 if (details->event_group) {
49 struct evsel *pos;
50
51 if (!evsel__is_group_leader(evsel))
52 return 0;
53
54 if (evsel->core.nr_members > 1)
55 printed += fprintf(fp, "%s{", evsel->group_name ?: "");
56
57 printed += fprintf(fp, "%s", evsel__name(evsel));
58 for_each_group_member(pos, evsel)
59 printed += fprintf(fp, ",%s", evsel__name(pos));
60
61 if (evsel->core.nr_members > 1)
62 printed += fprintf(fp, "}");
63 goto out;
64 }
65
66 printed += fprintf(fp, "%s", evsel__name(evsel));
67
68 if (details->verbose) {
69 printed += perf_event_attr__fprintf(fp, &evsel->core.attr,
70 __print_attr__fprintf, &first);
71 } else if (details->freq) {
72 const char *term = "sample_freq";
73
74 if (!evsel->core.attr.freq)
75 term = "sample_period";
76
77 printed += comma_fprintf(fp, &first, " %s=%" PRIu64,
78 term, (u64)evsel->core.attr.sample_freq);
79 }
80
81 #ifdef HAVE_LIBTRACEEVENT
82 if (details->trace_fields) {
83 struct tep_format_field *field;
84
85 if (evsel->core.attr.type != PERF_TYPE_TRACEPOINT) {
86 printed += comma_fprintf(fp, &first, " (not a tracepoint)");
87 goto out;
88 }
89
90 field = evsel->tp_format->format.fields;
91 if (field == NULL) {
92 printed += comma_fprintf(fp, &first, " (no trace field)");
93 goto out;
94 }
95
96 printed += comma_fprintf(fp, &first, " trace_fields: %s", field->name);
97
98 field = field->next;
99 while (field) {
100 printed += comma_fprintf(fp, &first, "%s", field->name);
101 field = field->next;
102 }
103 }
104 #endif
105 out:
106 fputc('\n', fp);
107 return ++printed;
108 }
109
sample__fprintf_callchain(struct perf_sample * sample,int left_alignment,unsigned int print_opts,struct callchain_cursor * cursor,struct strlist * bt_stop_list,FILE * fp)110 int sample__fprintf_callchain(struct perf_sample *sample, int left_alignment,
111 unsigned int print_opts, struct callchain_cursor *cursor,
112 struct strlist *bt_stop_list, FILE *fp)
113 {
114 int printed = 0;
115 struct callchain_cursor_node *node;
116 int print_ip = print_opts & EVSEL__PRINT_IP;
117 int print_sym = print_opts & EVSEL__PRINT_SYM;
118 int print_dso = print_opts & EVSEL__PRINT_DSO;
119 int print_dsoff = print_opts & EVSEL__PRINT_DSOFF;
120 int print_symoffset = print_opts & EVSEL__PRINT_SYMOFFSET;
121 int print_oneline = print_opts & EVSEL__PRINT_ONELINE;
122 int print_srcline = print_opts & EVSEL__PRINT_SRCLINE;
123 int print_unknown_as_addr = print_opts & EVSEL__PRINT_UNKNOWN_AS_ADDR;
124 int print_arrow = print_opts & EVSEL__PRINT_CALLCHAIN_ARROW;
125 int print_skip_ignored = print_opts & EVSEL__PRINT_SKIP_IGNORED;
126 char s = print_oneline ? ' ' : '\t';
127 bool first = true;
128
129 if (cursor == NULL)
130 return fprintf(fp, "<not enough memory for the callchain cursor>%s", print_oneline ? "" : "\n");
131
132 if (sample->callchain) {
133 callchain_cursor_commit(cursor);
134
135 while (1) {
136 struct symbol *sym;
137 struct map *map;
138 u64 addr = 0;
139
140 node = callchain_cursor_current(cursor);
141 if (!node)
142 break;
143
144 sym = node->ms.sym;
145 map = node->ms.map;
146
147 if (sym && sym->ignore && print_skip_ignored)
148 goto next;
149
150 printed += fprintf(fp, "%-*.*s", left_alignment, left_alignment, " ");
151
152 if (print_arrow && !first)
153 printed += fprintf(fp, " <-");
154
155 if (map)
156 addr = map__map_ip(map, node->ip);
157
158 if (print_ip)
159 printed += fprintf(fp, "%c%16" PRIx64, s, node->ip);
160
161 if (print_sym) {
162 struct addr_location node_al;
163
164 addr_location__init(&node_al);
165 printed += fprintf(fp, " ");
166 node_al.addr = addr;
167 node_al.map = map__get(map);
168
169 if (print_symoffset) {
170 printed += __symbol__fprintf_symname_offs(sym, &node_al,
171 print_unknown_as_addr,
172 true, fp);
173 } else {
174 printed += __symbol__fprintf_symname(sym, &node_al,
175 print_unknown_as_addr, fp);
176 }
177 addr_location__exit(&node_al);
178 }
179
180 if (print_dso && (!sym || !sym->inlined))
181 printed += map__fprintf_dsoname_dsoff(map, print_dsoff, addr, fp);
182
183 if (print_srcline)
184 printed += map__fprintf_srcline(map, addr, "\n ", fp);
185
186 if (sym && sym->inlined)
187 printed += fprintf(fp, " (inlined)");
188
189 if (!print_oneline)
190 printed += fprintf(fp, "\n");
191
192 /* Add srccode here too? */
193 if (bt_stop_list && sym &&
194 strlist__has_entry(bt_stop_list, sym->name)) {
195 break;
196 }
197
198 first = false;
199 next:
200 callchain_cursor_advance(cursor);
201 }
202 }
203
204 return printed;
205 }
206
sample__fprintf_sym(struct perf_sample * sample,struct addr_location * al,int left_alignment,unsigned int print_opts,struct callchain_cursor * cursor,struct strlist * bt_stop_list,FILE * fp)207 int sample__fprintf_sym(struct perf_sample *sample, struct addr_location *al,
208 int left_alignment, unsigned int print_opts,
209 struct callchain_cursor *cursor, struct strlist *bt_stop_list, FILE *fp)
210 {
211 int printed = 0;
212 int print_ip = print_opts & EVSEL__PRINT_IP;
213 int print_sym = print_opts & EVSEL__PRINT_SYM;
214 int print_dso = print_opts & EVSEL__PRINT_DSO;
215 int print_dsoff = print_opts & EVSEL__PRINT_DSOFF;
216 int print_symoffset = print_opts & EVSEL__PRINT_SYMOFFSET;
217 int print_srcline = print_opts & EVSEL__PRINT_SRCLINE;
218 int print_unknown_as_addr = print_opts & EVSEL__PRINT_UNKNOWN_AS_ADDR;
219
220 if (cursor != NULL) {
221 printed += sample__fprintf_callchain(sample, left_alignment, print_opts,
222 cursor, bt_stop_list, fp);
223 } else {
224 printed += fprintf(fp, "%-*.*s", left_alignment, left_alignment, " ");
225
226 if (print_ip)
227 printed += fprintf(fp, "%16" PRIx64, sample->ip);
228
229 if (print_sym) {
230 printed += fprintf(fp, " ");
231 if (print_symoffset) {
232 printed += __symbol__fprintf_symname_offs(al->sym, al,
233 print_unknown_as_addr,
234 true, fp);
235 } else {
236 printed += __symbol__fprintf_symname(al->sym, al,
237 print_unknown_as_addr, fp);
238 }
239 }
240
241 if (print_dso)
242 printed += map__fprintf_dsoname_dsoff(al->map, print_dsoff, al->addr, fp);
243
244 if (print_srcline)
245 printed += map__fprintf_srcline(al->map, al->addr, "\n ", fp);
246 }
247
248 return printed;
249 }
250