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
 20static 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
 38static 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
 43int 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
105out:
106	fputc('\n', fp);
107	return ++printed;
108}
109
110#ifndef PYTHON_PERF
111int sample__fprintf_callchain(struct perf_sample *sample, int left_alignment,
112			      unsigned int print_opts, struct callchain_cursor *cursor,
113			      struct strlist *bt_stop_list, FILE *fp)
114{
115	int printed = 0;
116	struct callchain_cursor_node *node;
117	int print_ip = print_opts & EVSEL__PRINT_IP;
118	int print_sym = print_opts & EVSEL__PRINT_SYM;
119	int print_dso = print_opts & EVSEL__PRINT_DSO;
120	int print_dsoff = print_opts & EVSEL__PRINT_DSOFF;
121	int print_symoffset = print_opts & EVSEL__PRINT_SYMOFFSET;
122	int print_oneline = print_opts & EVSEL__PRINT_ONELINE;
123	int print_srcline = print_opts & EVSEL__PRINT_SRCLINE;
124	int print_unknown_as_addr = print_opts & EVSEL__PRINT_UNKNOWN_AS_ADDR;
125	int print_arrow = print_opts & EVSEL__PRINT_CALLCHAIN_ARROW;
126	int print_skip_ignored = print_opts & EVSEL__PRINT_SKIP_IGNORED;
127	char s = print_oneline ? ' ' : '\t';
128	bool first = true;
129
130	if (cursor == NULL)
131		return fprintf(fp, "<not enough memory for the callchain cursor>%s", print_oneline ? "" : "\n");
132
133	if (sample->callchain) {
134		callchain_cursor_commit(cursor);
135
136		while (1) {
137			struct symbol *sym;
138			struct map *map;
139			u64 addr = 0;
140
141			node = callchain_cursor_current(cursor);
142			if (!node)
143				break;
144
145			sym = node->ms.sym;
146			map = node->ms.map;
147
148			if (sym && sym->ignore && print_skip_ignored)
149				goto next;
150
151			printed += fprintf(fp, "%-*.*s", left_alignment, left_alignment, " ");
152
153			if (print_arrow && !first)
154				printed += fprintf(fp, " <-");
155
156			if (map)
157				addr = map__map_ip(map, node->ip);
158
159			if (print_ip)
160				printed += fprintf(fp, "%c%16" PRIx64, s, node->ip);
161
162			if (print_sym) {
163				struct addr_location node_al;
164
165				addr_location__init(&node_al);
166				printed += fprintf(fp, " ");
167				node_al.addr = addr;
168				node_al.map  = map__get(map);
169
170				if (print_symoffset) {
171					printed += __symbol__fprintf_symname_offs(sym, &node_al,
172										  print_unknown_as_addr,
173										  true, fp);
174				} else {
175					printed += __symbol__fprintf_symname(sym, &node_al,
176									     print_unknown_as_addr, fp);
177				}
178				addr_location__exit(&node_al);
179			}
180
181			if (print_dso && (!sym || !sym->inlined))
182				printed += map__fprintf_dsoname_dsoff(map, print_dsoff, addr, fp);
183
184			if (print_srcline)
185				printed += map__fprintf_srcline(map, addr, "\n  ", fp);
186
187			if (sym && sym->inlined)
188				printed += fprintf(fp, " (inlined)");
189
190			if (!print_oneline)
191				printed += fprintf(fp, "\n");
192
193			/* Add srccode here too? */
194			if (bt_stop_list && sym &&
195			    strlist__has_entry(bt_stop_list, sym->name)) {
196				break;
197			}
198
199			first = false;
200next:
201			callchain_cursor_advance(cursor);
202		}
203	}
204
205	return printed;
206}
207
208int sample__fprintf_sym(struct perf_sample *sample, struct addr_location *al,
209			int left_alignment, unsigned int print_opts,
210			struct callchain_cursor *cursor, struct strlist *bt_stop_list, FILE *fp)
211{
212	int printed = 0;
213	int print_ip = print_opts & EVSEL__PRINT_IP;
214	int print_sym = print_opts & EVSEL__PRINT_SYM;
215	int print_dso = print_opts & EVSEL__PRINT_DSO;
216	int print_dsoff = print_opts & EVSEL__PRINT_DSOFF;
217	int print_symoffset = print_opts & EVSEL__PRINT_SYMOFFSET;
218	int print_srcline = print_opts & EVSEL__PRINT_SRCLINE;
219	int print_unknown_as_addr = print_opts & EVSEL__PRINT_UNKNOWN_AS_ADDR;
220
221	if (cursor != NULL) {
222		printed += sample__fprintf_callchain(sample, left_alignment, print_opts,
223						     cursor, bt_stop_list, fp);
224	} else {
225		printed += fprintf(fp, "%-*.*s", left_alignment, left_alignment, " ");
226
227		if (print_ip)
228			printed += fprintf(fp, "%16" PRIx64, sample->ip);
229
230		if (print_sym) {
231			printed += fprintf(fp, " ");
232			if (print_symoffset) {
233				printed += __symbol__fprintf_symname_offs(al->sym, al,
234									  print_unknown_as_addr,
235									  true, fp);
236			} else {
237				printed += __symbol__fprintf_symname(al->sym, al,
238								     print_unknown_as_addr, fp);
239			}
240		}
241
242		if (print_dso)
243			printed += map__fprintf_dsoname_dsoff(al->map, print_dsoff, al->addr, fp);
244
245		if (print_srcline)
246			printed += map__fprintf_srcline(al->map, al->addr, "\n  ", fp);
247	}
248
249	return printed;
250}
251#endif /* PYTHON_PERF */