Linux Audio

Check our new training course

Loading...
v5.4
   1// SPDX-License-Identifier: GPL-2.0
   2#include <errno.h>
   3#include <inttypes.h>
   4#include <linux/err.h>
   5#include <linux/kernel.h>
   6#include <linux/zalloc.h>
   7#include <api/fs/fs.h>
   8
   9#include <byteswap.h>
  10#include <unistd.h>
  11#include <sys/types.h>
  12#include <sys/mman.h>
  13#include <perf/cpumap.h>
  14
  15#include "map_symbol.h"
  16#include "branch.h"
  17#include "debug.h"
  18#include "evlist.h"
  19#include "evsel.h"
  20#include "memswap.h"
  21#include "map.h"
  22#include "symbol.h"
  23#include "session.h"
  24#include "tool.h"
  25#include "perf_regs.h"
  26#include "asm/bug.h"
  27#include "auxtrace.h"
  28#include "thread.h"
  29#include "thread-stack.h"
  30#include "sample-raw.h"
  31#include "stat.h"
  32#include "ui/progress.h"
  33#include "../perf.h"
  34#include "arch/common.h"
  35#include <internal/lib.h>
  36#include <linux/err.h>
  37
  38#ifdef HAVE_ZSTD_SUPPORT
  39static int perf_session__process_compressed_event(struct perf_session *session,
  40						  union perf_event *event, u64 file_offset)
  41{
  42	void *src;
  43	size_t decomp_size, src_size;
  44	u64 decomp_last_rem = 0;
  45	size_t mmap_len, decomp_len = session->header.env.comp_mmap_len;
  46	struct decomp *decomp, *decomp_last = session->decomp_last;
  47
  48	if (decomp_last) {
  49		decomp_last_rem = decomp_last->size - decomp_last->head;
  50		decomp_len += decomp_last_rem;
  51	}
  52
  53	mmap_len = sizeof(struct decomp) + decomp_len;
  54	decomp = mmap(NULL, mmap_len, PROT_READ|PROT_WRITE,
  55		      MAP_ANONYMOUS|MAP_PRIVATE, -1, 0);
  56	if (decomp == MAP_FAILED) {
  57		pr_err("Couldn't allocate memory for decompression\n");
  58		return -1;
  59	}
  60
  61	decomp->file_pos = file_offset;
  62	decomp->mmap_len = mmap_len;
  63	decomp->head = 0;
  64
  65	if (decomp_last_rem) {
  66		memcpy(decomp->data, &(decomp_last->data[decomp_last->head]), decomp_last_rem);
  67		decomp->size = decomp_last_rem;
  68	}
  69
  70	src = (void *)event + sizeof(struct perf_record_compressed);
  71	src_size = event->pack.header.size - sizeof(struct perf_record_compressed);
  72
  73	decomp_size = zstd_decompress_stream(&(session->zstd_data), src, src_size,
  74				&(decomp->data[decomp_last_rem]), decomp_len - decomp_last_rem);
  75	if (!decomp_size) {
  76		munmap(decomp, mmap_len);
  77		pr_err("Couldn't decompress data\n");
  78		return -1;
  79	}
  80
  81	decomp->size += decomp_size;
 
 
  82
  83	if (session->decomp == NULL) {
  84		session->decomp = decomp;
  85		session->decomp_last = decomp;
  86	} else {
  87		session->decomp_last->next = decomp;
  88		session->decomp_last = decomp;
  89	}
  90
  91	pr_debug("decomp (B): %ld to %ld\n", src_size, decomp_size);
 
  92
  93	return 0;
  94}
  95#else /* !HAVE_ZSTD_SUPPORT */
  96#define perf_session__process_compressed_event perf_session__process_compressed_event_stub
  97#endif
  98
  99static int perf_session__deliver_event(struct perf_session *session,
 100				       union perf_event *event,
 101				       struct perf_tool *tool,
 102				       u64 file_offset);
 
 
 
 
 
 
 103
 104static int perf_session__open(struct perf_session *session)
 105{
 106	struct perf_data *data = session->data;
 107
 108	if (perf_session__read_header(session) < 0) {
 109		pr_err("incompatible file format (rerun with -v to learn more)\n");
 110		return -1;
 
 111	}
 112
 113	if (perf_data__is_pipe(data))
 114		return 0;
 115
 116	if (perf_header__has_feat(&session->header, HEADER_STAT))
 117		return 0;
 118
 119	if (!perf_evlist__valid_sample_type(session->evlist)) {
 120		pr_err("non matching sample_type\n");
 121		return -1;
 122	}
 123
 124	if (!perf_evlist__valid_sample_id_all(session->evlist)) {
 125		pr_err("non matching sample_id_all\n");
 126		return -1;
 127	}
 128
 129	if (!perf_evlist__valid_read_format(session->evlist)) {
 130		pr_err("non matching read_format\n");
 131		return -1;
 132	}
 133
 
 134	return 0;
 
 
 
 
 
 135}
 136
 137void perf_session__set_id_hdr_size(struct perf_session *session)
 138{
 139	u16 id_hdr_size = perf_evlist__id_hdr_size(session->evlist);
 
 
 140
 141	machines__set_id_hdr_size(&session->machines, id_hdr_size);
 142}
 143
 144int perf_session__create_kernel_maps(struct perf_session *session)
 145{
 146	int ret = machine__create_kernel_maps(&session->machines.host);
 147
 148	if (ret >= 0)
 149		ret = machines__create_guest_kernel_maps(&session->machines);
 150	return ret;
 151}
 152
 153static void perf_session__destroy_kernel_maps(struct perf_session *session)
 154{
 155	machines__destroy_kernel_maps(&session->machines);
 156}
 157
 158static bool perf_session__has_comm_exec(struct perf_session *session)
 159{
 160	struct evsel *evsel;
 161
 162	evlist__for_each_entry(session->evlist, evsel) {
 163		if (evsel->core.attr.comm_exec)
 164			return true;
 165	}
 
 166
 167	return false;
 
 
 
 
 
 168}
 169
 170static void perf_session__set_comm_exec(struct perf_session *session)
 171{
 172	bool comm_exec = perf_session__has_comm_exec(session);
 173
 174	machines__set_comm_exec(&session->machines, comm_exec);
 
 
 175}
 176
 177static int ordered_events__deliver_event(struct ordered_events *oe,
 178					 struct ordered_event *event)
 179{
 180	struct perf_session *session = container_of(oe, struct perf_session,
 181						    ordered_events);
 182
 183	return perf_session__deliver_event(session, event->event,
 184					   session->tool, event->file_offset);
 185}
 186
 187struct perf_session *perf_session__new(struct perf_data *data,
 188				       bool repipe, struct perf_tool *tool)
 
 189{
 190	int ret = -ENOMEM;
 191	struct perf_session *session = zalloc(sizeof(*session));
 192
 193	if (!session)
 194		goto out;
 195
 196	session->repipe = repipe;
 197	session->tool   = tool;
 198	INIT_LIST_HEAD(&session->auxtrace_index);
 199	machines__init(&session->machines);
 200	ordered_events__init(&session->ordered_events,
 201			     ordered_events__deliver_event, NULL);
 202
 203	perf_env__init(&session->header.env);
 204	if (data) {
 205		ret = perf_data__open(data);
 206		if (ret < 0)
 207			goto out_delete;
 208
 209		session->data = data;
 210
 211		if (perf_data__is_read(data)) {
 212			ret = perf_session__open(session);
 213			if (ret < 0)
 214				goto out_delete;
 215
 216			/*
 217			 * set session attributes that are present in perf.data
 218			 * but not in pipe-mode.
 219			 */
 220			if (!data->is_pipe) {
 221				perf_session__set_id_hdr_size(session);
 222				perf_session__set_comm_exec(session);
 223			}
 224
 225			perf_evlist__init_trace_event_sample_raw(session->evlist);
 226
 227			/* Open the directory data. */
 228			if (data->is_dir) {
 229				ret = perf_data__open_dir(data);
 230			if (ret)
 231				goto out_delete;
 232			}
 233		}
 234	} else  {
 235		session->machines.host.env = &perf_env;
 236	}
 237
 238	session->machines.host.single_address_space =
 239		perf_env__single_address_space(session->machines.host.env);
 240
 241	if (!data || perf_data__is_write(data)) {
 
 
 
 
 242		/*
 243		 * In O_RDONLY mode this will be performed when reading the
 244		 * kernel MMAP event, in perf_event__process_mmap().
 245		 */
 246		if (perf_session__create_kernel_maps(session) < 0)
 247			pr_warning("Cannot read kernel map\n");
 248	}
 249
 250	/*
 251	 * In pipe-mode, evlist is empty until PERF_RECORD_HEADER_ATTR is
 252	 * processed, so perf_evlist__sample_id_all is not meaningful here.
 253	 */
 254	if ((!data || !data->is_pipe) && tool && tool->ordering_requires_timestamps &&
 255	    tool->ordered_events && !perf_evlist__sample_id_all(session->evlist)) {
 256		dump_printf("WARNING: No sample_id_all support, falling back to unordered processing\n");
 257		tool->ordered_events = false;
 258	}
 259
 260	return session;
 261
 262 out_delete:
 263	perf_session__delete(session);
 264 out:
 265	return ERR_PTR(ret);
 266}
 267
 268static void perf_session__delete_threads(struct perf_session *session)
 269{
 270	machine__delete_threads(&session->machines.host);
 271}
 272
 273static void perf_session__release_decomp_events(struct perf_session *session)
 274{
 275	struct decomp *next, *decomp;
 276	size_t mmap_len;
 277	next = session->decomp;
 278	do {
 279		decomp = next;
 280		if (decomp == NULL)
 281			break;
 282		next = decomp->next;
 283		mmap_len = decomp->mmap_len;
 284		munmap(decomp, mmap_len);
 285	} while (1);
 286}
 287
 288void perf_session__delete(struct perf_session *session)
 289{
 290	if (session == NULL)
 291		return;
 292	auxtrace__free(session);
 293	auxtrace_index__free(&session->auxtrace_index);
 294	perf_session__destroy_kernel_maps(session);
 295	perf_session__delete_threads(session);
 296	perf_session__release_decomp_events(session);
 297	perf_env__exit(&session->header.env);
 298	machines__exit(&session->machines);
 299	if (session->data)
 300		perf_data__close(session->data);
 301	free(session);
 302}
 303
 304static int process_event_synth_tracing_data_stub(struct perf_session *session
 305						 __maybe_unused,
 306						 union perf_event *event
 307						 __maybe_unused)
 308{
 309	dump_printf(": unhandled!\n");
 310	return 0;
 311}
 312
 313static int process_event_synth_attr_stub(struct perf_tool *tool __maybe_unused,
 314					 union perf_event *event __maybe_unused,
 315					 struct evlist **pevlist
 316					 __maybe_unused)
 317{
 318	dump_printf(": unhandled!\n");
 319	return 0;
 320}
 321
 322static int process_event_synth_event_update_stub(struct perf_tool *tool __maybe_unused,
 323						 union perf_event *event __maybe_unused,
 324						 struct evlist **pevlist
 325						 __maybe_unused)
 326{
 327	if (dump_trace)
 328		perf_event__fprintf_event_update(event, stdout);
 329
 330	dump_printf(": unhandled!\n");
 331	return 0;
 
 332}
 333
 334static int process_event_sample_stub(struct perf_tool *tool __maybe_unused,
 335				     union perf_event *event __maybe_unused,
 336				     struct perf_sample *sample __maybe_unused,
 337				     struct evsel *evsel __maybe_unused,
 338				     struct machine *machine __maybe_unused)
 339{
 340	dump_printf(": unhandled!\n");
 341	return 0;
 
 
 
 
 
 342}
 343
 344static int process_event_stub(struct perf_tool *tool __maybe_unused,
 345			      union perf_event *event __maybe_unused,
 346			      struct perf_sample *sample __maybe_unused,
 347			      struct machine *machine __maybe_unused)
 348{
 349	dump_printf(": unhandled!\n");
 
 
 350	return 0;
 351}
 352
 353static int process_finished_round_stub(struct perf_tool *tool __maybe_unused,
 354				       union perf_event *event __maybe_unused,
 355				       struct ordered_events *oe __maybe_unused)
 
 356{
 357	dump_printf(": unhandled!\n");
 358	return 0;
 359}
 360
 361static int process_finished_round(struct perf_tool *tool,
 362				  union perf_event *event,
 363				  struct ordered_events *oe);
 364
 365static int skipn(int fd, off_t n)
 366{
 367	char buf[4096];
 368	ssize_t ret;
 369
 370	while (n > 0) {
 371		ret = read(fd, buf, min(n, (off_t)sizeof(buf)));
 372		if (ret <= 0)
 373			return ret;
 374		n -= ret;
 375	}
 376
 377	return 0;
 378}
 
 379
 380static s64 process_event_auxtrace_stub(struct perf_session *session __maybe_unused,
 381				       union perf_event *event)
 382{
 383	dump_printf(": unhandled!\n");
 384	if (perf_data__is_pipe(session->data))
 385		skipn(perf_data__fd(session->data), event->auxtrace.size);
 386	return event->auxtrace.size;
 387}
 388
 389static int process_event_op2_stub(struct perf_session *session __maybe_unused,
 390				  union perf_event *event __maybe_unused)
 391{
 392	dump_printf(": unhandled!\n");
 393	return 0;
 394}
 
 
 
 
 
 
 
 395
 
 
 
 
 
 
 
 
 
 
 396
 397static
 398int process_event_thread_map_stub(struct perf_session *session __maybe_unused,
 399				  union perf_event *event __maybe_unused)
 400{
 401	if (dump_trace)
 402		perf_event__fprintf_thread_map(event, stdout);
 403
 404	dump_printf(": unhandled!\n");
 405	return 0;
 406}
 407
 408static
 409int process_event_cpu_map_stub(struct perf_session *session __maybe_unused,
 410			       union perf_event *event __maybe_unused)
 411{
 412	if (dump_trace)
 413		perf_event__fprintf_cpu_map(event, stdout);
 414
 415	dump_printf(": unhandled!\n");
 416	return 0;
 417}
 418
 419static
 420int process_event_stat_config_stub(struct perf_session *session __maybe_unused,
 421				   union perf_event *event __maybe_unused)
 
 422{
 423	if (dump_trace)
 424		perf_event__fprintf_stat_config(event, stdout);
 425
 426	dump_printf(": unhandled!\n");
 427	return 0;
 428}
 429
 430static int process_stat_stub(struct perf_session *perf_session __maybe_unused,
 431			     union perf_event *event)
 
 432{
 433	if (dump_trace)
 434		perf_event__fprintf_stat(event, stdout);
 435
 436	dump_printf(": unhandled!\n");
 437	return 0;
 438}
 439
 440static int process_stat_round_stub(struct perf_session *perf_session __maybe_unused,
 441				   union perf_event *event)
 
 442{
 443	if (dump_trace)
 444		perf_event__fprintf_stat_round(event, stdout);
 445
 446	dump_printf(": unhandled!\n");
 447	return 0;
 448}
 449
 450static int perf_session__process_compressed_event_stub(struct perf_session *session __maybe_unused,
 451						       union perf_event *event __maybe_unused,
 452						       u64 file_offset __maybe_unused)
 453{
 454       dump_printf(": unhandled!\n");
 455       return 0;
 456}
 457
 458void perf_tool__fill_defaults(struct perf_tool *tool)
 459{
 460	if (tool->sample == NULL)
 461		tool->sample = process_event_sample_stub;
 462	if (tool->mmap == NULL)
 463		tool->mmap = process_event_stub;
 464	if (tool->mmap2 == NULL)
 465		tool->mmap2 = process_event_stub;
 466	if (tool->comm == NULL)
 467		tool->comm = process_event_stub;
 468	if (tool->namespaces == NULL)
 469		tool->namespaces = process_event_stub;
 470	if (tool->fork == NULL)
 471		tool->fork = process_event_stub;
 472	if (tool->exit == NULL)
 473		tool->exit = process_event_stub;
 474	if (tool->lost == NULL)
 475		tool->lost = perf_event__process_lost;
 476	if (tool->lost_samples == NULL)
 477		tool->lost_samples = perf_event__process_lost_samples;
 478	if (tool->aux == NULL)
 479		tool->aux = perf_event__process_aux;
 480	if (tool->itrace_start == NULL)
 481		tool->itrace_start = perf_event__process_itrace_start;
 482	if (tool->context_switch == NULL)
 483		tool->context_switch = perf_event__process_switch;
 484	if (tool->ksymbol == NULL)
 485		tool->ksymbol = perf_event__process_ksymbol;
 486	if (tool->bpf == NULL)
 487		tool->bpf = perf_event__process_bpf;
 488	if (tool->read == NULL)
 489		tool->read = process_event_sample_stub;
 490	if (tool->throttle == NULL)
 491		tool->throttle = process_event_stub;
 492	if (tool->unthrottle == NULL)
 493		tool->unthrottle = process_event_stub;
 494	if (tool->attr == NULL)
 495		tool->attr = process_event_synth_attr_stub;
 496	if (tool->event_update == NULL)
 497		tool->event_update = process_event_synth_event_update_stub;
 498	if (tool->tracing_data == NULL)
 499		tool->tracing_data = process_event_synth_tracing_data_stub;
 500	if (tool->build_id == NULL)
 501		tool->build_id = process_event_op2_stub;
 502	if (tool->finished_round == NULL) {
 503		if (tool->ordered_events)
 504			tool->finished_round = process_finished_round;
 505		else
 506			tool->finished_round = process_finished_round_stub;
 507	}
 508	if (tool->id_index == NULL)
 509		tool->id_index = process_event_op2_stub;
 510	if (tool->auxtrace_info == NULL)
 511		tool->auxtrace_info = process_event_op2_stub;
 512	if (tool->auxtrace == NULL)
 513		tool->auxtrace = process_event_auxtrace_stub;
 514	if (tool->auxtrace_error == NULL)
 515		tool->auxtrace_error = process_event_op2_stub;
 516	if (tool->thread_map == NULL)
 517		tool->thread_map = process_event_thread_map_stub;
 518	if (tool->cpu_map == NULL)
 519		tool->cpu_map = process_event_cpu_map_stub;
 520	if (tool->stat_config == NULL)
 521		tool->stat_config = process_event_stat_config_stub;
 522	if (tool->stat == NULL)
 523		tool->stat = process_stat_stub;
 524	if (tool->stat_round == NULL)
 525		tool->stat_round = process_stat_round_stub;
 526	if (tool->time_conv == NULL)
 527		tool->time_conv = process_event_op2_stub;
 528	if (tool->feature == NULL)
 529		tool->feature = process_event_op2_stub;
 530	if (tool->compressed == NULL)
 531		tool->compressed = perf_session__process_compressed_event;
 532}
 533
 534static void swap_sample_id_all(union perf_event *event, void *data)
 535{
 536	void *end = (void *) event + event->header.size;
 537	int size = end - data;
 538
 539	BUG_ON(size % sizeof(u64));
 540	mem_bswap_64(data, size);
 
 
 
 
 
 
 
 541}
 542
 543static void perf_event__all64_swap(union perf_event *event,
 544				   bool sample_id_all __maybe_unused)
 545{
 546	struct perf_event_header *hdr = &event->header;
 547	mem_bswap_64(hdr + 1, event->header.size - sizeof(*hdr));
 548}
 549
 550static void perf_event__comm_swap(union perf_event *event, bool sample_id_all)
 551{
 552	event->comm.pid = bswap_32(event->comm.pid);
 553	event->comm.tid = bswap_32(event->comm.tid);
 554
 555	if (sample_id_all) {
 556		void *data = &event->comm.comm;
 557
 558		data += PERF_ALIGN(strlen(data) + 1, sizeof(u64));
 559		swap_sample_id_all(event, data);
 560	}
 561}
 562
 563static void perf_event__mmap_swap(union perf_event *event,
 564				  bool sample_id_all)
 565{
 566	event->mmap.pid	  = bswap_32(event->mmap.pid);
 567	event->mmap.tid	  = bswap_32(event->mmap.tid);
 568	event->mmap.start = bswap_64(event->mmap.start);
 569	event->mmap.len	  = bswap_64(event->mmap.len);
 570	event->mmap.pgoff = bswap_64(event->mmap.pgoff);
 571
 572	if (sample_id_all) {
 573		void *data = &event->mmap.filename;
 574
 575		data += PERF_ALIGN(strlen(data) + 1, sizeof(u64));
 576		swap_sample_id_all(event, data);
 577	}
 578}
 579
 580static void perf_event__mmap2_swap(union perf_event *event,
 581				  bool sample_id_all)
 582{
 583	event->mmap2.pid   = bswap_32(event->mmap2.pid);
 584	event->mmap2.tid   = bswap_32(event->mmap2.tid);
 585	event->mmap2.start = bswap_64(event->mmap2.start);
 586	event->mmap2.len   = bswap_64(event->mmap2.len);
 587	event->mmap2.pgoff = bswap_64(event->mmap2.pgoff);
 588	event->mmap2.maj   = bswap_32(event->mmap2.maj);
 589	event->mmap2.min   = bswap_32(event->mmap2.min);
 590	event->mmap2.ino   = bswap_64(event->mmap2.ino);
 591
 592	if (sample_id_all) {
 593		void *data = &event->mmap2.filename;
 594
 595		data += PERF_ALIGN(strlen(data) + 1, sizeof(u64));
 596		swap_sample_id_all(event, data);
 597	}
 598}
 599static void perf_event__task_swap(union perf_event *event, bool sample_id_all)
 600{
 601	event->fork.pid	 = bswap_32(event->fork.pid);
 602	event->fork.tid	 = bswap_32(event->fork.tid);
 603	event->fork.ppid = bswap_32(event->fork.ppid);
 604	event->fork.ptid = bswap_32(event->fork.ptid);
 605	event->fork.time = bswap_64(event->fork.time);
 606
 607	if (sample_id_all)
 608		swap_sample_id_all(event, &event->fork + 1);
 609}
 610
 611static void perf_event__read_swap(union perf_event *event, bool sample_id_all)
 612{
 613	event->read.pid		 = bswap_32(event->read.pid);
 614	event->read.tid		 = bswap_32(event->read.tid);
 615	event->read.value	 = bswap_64(event->read.value);
 616	event->read.time_enabled = bswap_64(event->read.time_enabled);
 617	event->read.time_running = bswap_64(event->read.time_running);
 618	event->read.id		 = bswap_64(event->read.id);
 619
 620	if (sample_id_all)
 621		swap_sample_id_all(event, &event->read + 1);
 622}
 623
 624static void perf_event__aux_swap(union perf_event *event, bool sample_id_all)
 625{
 626	event->aux.aux_offset = bswap_64(event->aux.aux_offset);
 627	event->aux.aux_size   = bswap_64(event->aux.aux_size);
 628	event->aux.flags      = bswap_64(event->aux.flags);
 629
 630	if (sample_id_all)
 631		swap_sample_id_all(event, &event->aux + 1);
 632}
 633
 634static void perf_event__itrace_start_swap(union perf_event *event,
 635					  bool sample_id_all)
 636{
 637	event->itrace_start.pid	 = bswap_32(event->itrace_start.pid);
 638	event->itrace_start.tid	 = bswap_32(event->itrace_start.tid);
 639
 640	if (sample_id_all)
 641		swap_sample_id_all(event, &event->itrace_start + 1);
 642}
 643
 644static void perf_event__switch_swap(union perf_event *event, bool sample_id_all)
 645{
 646	if (event->header.type == PERF_RECORD_SWITCH_CPU_WIDE) {
 647		event->context_switch.next_prev_pid =
 648				bswap_32(event->context_switch.next_prev_pid);
 649		event->context_switch.next_prev_tid =
 650				bswap_32(event->context_switch.next_prev_tid);
 651	}
 652
 653	if (sample_id_all)
 654		swap_sample_id_all(event, &event->context_switch + 1);
 655}
 656
 657static void perf_event__throttle_swap(union perf_event *event,
 658				      bool sample_id_all)
 659{
 660	event->throttle.time	  = bswap_64(event->throttle.time);
 661	event->throttle.id	  = bswap_64(event->throttle.id);
 662	event->throttle.stream_id = bswap_64(event->throttle.stream_id);
 663
 664	if (sample_id_all)
 665		swap_sample_id_all(event, &event->throttle + 1);
 666}
 667
 668static void perf_event__namespaces_swap(union perf_event *event,
 669					bool sample_id_all)
 670{
 671	u64 i;
 672
 673	event->namespaces.pid		= bswap_32(event->namespaces.pid);
 674	event->namespaces.tid		= bswap_32(event->namespaces.tid);
 675	event->namespaces.nr_namespaces	= bswap_64(event->namespaces.nr_namespaces);
 676
 677	for (i = 0; i < event->namespaces.nr_namespaces; i++) {
 678		struct perf_ns_link_info *ns = &event->namespaces.link_info[i];
 679
 680		ns->dev = bswap_64(ns->dev);
 681		ns->ino = bswap_64(ns->ino);
 682	}
 683
 684	if (sample_id_all)
 685		swap_sample_id_all(event, &event->namespaces.link_info[i]);
 686}
 687
 688static u8 revbyte(u8 b)
 689{
 690	int rev = (b >> 4) | ((b & 0xf) << 4);
 691	rev = ((rev & 0xcc) >> 2) | ((rev & 0x33) << 2);
 692	rev = ((rev & 0xaa) >> 1) | ((rev & 0x55) << 1);
 693	return (u8) rev;
 694}
 695
 696/*
 697 * XXX this is hack in attempt to carry flags bitfield
 698 * through endian village. ABI says:
 699 *
 700 * Bit-fields are allocated from right to left (least to most significant)
 701 * on little-endian implementations and from left to right (most to least
 702 * significant) on big-endian implementations.
 703 *
 704 * The above seems to be byte specific, so we need to reverse each
 705 * byte of the bitfield. 'Internet' also says this might be implementation
 706 * specific and we probably need proper fix and carry perf_event_attr
 707 * bitfield flags in separate data file FEAT_ section. Thought this seems
 708 * to work for now.
 709 */
 710static void swap_bitfield(u8 *p, unsigned len)
 711{
 712	unsigned i;
 713
 714	for (i = 0; i < len; i++) {
 715		*p = revbyte(*p);
 716		p++;
 717	}
 718}
 719
 720/* exported for swapping attributes in file header */
 721void perf_event__attr_swap(struct perf_event_attr *attr)
 722{
 723	attr->type		= bswap_32(attr->type);
 724	attr->size		= bswap_32(attr->size);
 725
 726#define bswap_safe(f, n) 					\
 727	(attr->size > (offsetof(struct perf_event_attr, f) + 	\
 728		       sizeof(attr->f) * (n)))
 729#define bswap_field(f, sz) 			\
 730do { 						\
 731	if (bswap_safe(f, 0))			\
 732		attr->f = bswap_##sz(attr->f);	\
 733} while(0)
 734#define bswap_field_16(f) bswap_field(f, 16)
 735#define bswap_field_32(f) bswap_field(f, 32)
 736#define bswap_field_64(f) bswap_field(f, 64)
 737
 738	bswap_field_64(config);
 739	bswap_field_64(sample_period);
 740	bswap_field_64(sample_type);
 741	bswap_field_64(read_format);
 742	bswap_field_32(wakeup_events);
 743	bswap_field_32(bp_type);
 744	bswap_field_64(bp_addr);
 745	bswap_field_64(bp_len);
 746	bswap_field_64(branch_sample_type);
 747	bswap_field_64(sample_regs_user);
 748	bswap_field_32(sample_stack_user);
 749	bswap_field_32(aux_watermark);
 750	bswap_field_16(sample_max_stack);
 751
 752	/*
 753	 * After read_format are bitfields. Check read_format because
 754	 * we are unable to use offsetof on bitfield.
 755	 */
 756	if (bswap_safe(read_format, 1))
 757		swap_bitfield((u8 *) (&attr->read_format + 1),
 758			      sizeof(u64));
 759#undef bswap_field_64
 760#undef bswap_field_32
 761#undef bswap_field
 762#undef bswap_safe
 763}
 764
 765static void perf_event__hdr_attr_swap(union perf_event *event,
 766				      bool sample_id_all __maybe_unused)
 767{
 768	size_t size;
 769
 770	perf_event__attr_swap(&event->attr.attr);
 771
 772	size = event->header.size;
 773	size -= (void *)&event->attr.id - (void *)event;
 774	mem_bswap_64(event->attr.id, size);
 775}
 776
 777static void perf_event__event_update_swap(union perf_event *event,
 778					  bool sample_id_all __maybe_unused)
 779{
 780	event->event_update.type = bswap_64(event->event_update.type);
 781	event->event_update.id   = bswap_64(event->event_update.id);
 782}
 783
 784static void perf_event__event_type_swap(union perf_event *event,
 785					bool sample_id_all __maybe_unused)
 786{
 787	event->event_type.event_type.event_id =
 788		bswap_64(event->event_type.event_type.event_id);
 789}
 790
 791static void perf_event__tracing_data_swap(union perf_event *event,
 792					  bool sample_id_all __maybe_unused)
 793{
 794	event->tracing_data.size = bswap_32(event->tracing_data.size);
 795}
 796
 797static void perf_event__auxtrace_info_swap(union perf_event *event,
 798					   bool sample_id_all __maybe_unused)
 799{
 800	size_t size;
 801
 802	event->auxtrace_info.type = bswap_32(event->auxtrace_info.type);
 803
 804	size = event->header.size;
 805	size -= (void *)&event->auxtrace_info.priv - (void *)event;
 806	mem_bswap_64(event->auxtrace_info.priv, size);
 807}
 808
 809static void perf_event__auxtrace_swap(union perf_event *event,
 810				      bool sample_id_all __maybe_unused)
 811{
 812	event->auxtrace.size      = bswap_64(event->auxtrace.size);
 813	event->auxtrace.offset    = bswap_64(event->auxtrace.offset);
 814	event->auxtrace.reference = bswap_64(event->auxtrace.reference);
 815	event->auxtrace.idx       = bswap_32(event->auxtrace.idx);
 816	event->auxtrace.tid       = bswap_32(event->auxtrace.tid);
 817	event->auxtrace.cpu       = bswap_32(event->auxtrace.cpu);
 818}
 819
 820static void perf_event__auxtrace_error_swap(union perf_event *event,
 821					    bool sample_id_all __maybe_unused)
 822{
 823	event->auxtrace_error.type = bswap_32(event->auxtrace_error.type);
 824	event->auxtrace_error.code = bswap_32(event->auxtrace_error.code);
 825	event->auxtrace_error.cpu  = bswap_32(event->auxtrace_error.cpu);
 826	event->auxtrace_error.pid  = bswap_32(event->auxtrace_error.pid);
 827	event->auxtrace_error.tid  = bswap_32(event->auxtrace_error.tid);
 828	event->auxtrace_error.fmt  = bswap_32(event->auxtrace_error.fmt);
 829	event->auxtrace_error.ip   = bswap_64(event->auxtrace_error.ip);
 830	if (event->auxtrace_error.fmt)
 831		event->auxtrace_error.time = bswap_64(event->auxtrace_error.time);
 832}
 833
 834static void perf_event__thread_map_swap(union perf_event *event,
 835					bool sample_id_all __maybe_unused)
 836{
 837	unsigned i;
 838
 839	event->thread_map.nr = bswap_64(event->thread_map.nr);
 840
 841	for (i = 0; i < event->thread_map.nr; i++)
 842		event->thread_map.entries[i].pid = bswap_64(event->thread_map.entries[i].pid);
 843}
 844
 845static void perf_event__cpu_map_swap(union perf_event *event,
 846				     bool sample_id_all __maybe_unused)
 847{
 848	struct perf_record_cpu_map_data *data = &event->cpu_map.data;
 849	struct cpu_map_entries *cpus;
 850	struct perf_record_record_cpu_map *mask;
 851	unsigned i;
 852
 853	data->type = bswap_64(data->type);
 854
 855	switch (data->type) {
 856	case PERF_CPU_MAP__CPUS:
 857		cpus = (struct cpu_map_entries *)data->data;
 858
 859		cpus->nr = bswap_16(cpus->nr);
 860
 861		for (i = 0; i < cpus->nr; i++)
 862			cpus->cpu[i] = bswap_16(cpus->cpu[i]);
 863		break;
 864	case PERF_CPU_MAP__MASK:
 865		mask = (struct perf_record_record_cpu_map *)data->data;
 866
 867		mask->nr = bswap_16(mask->nr);
 868		mask->long_size = bswap_16(mask->long_size);
 869
 870		switch (mask->long_size) {
 871		case 4: mem_bswap_32(&mask->mask, mask->nr); break;
 872		case 8: mem_bswap_64(&mask->mask, mask->nr); break;
 873		default:
 874			pr_err("cpu_map swap: unsupported long size\n");
 875		}
 876	default:
 877		break;
 878	}
 879}
 880
 881static void perf_event__stat_config_swap(union perf_event *event,
 882					 bool sample_id_all __maybe_unused)
 883{
 884	u64 size;
 885
 886	size  = event->stat_config.nr * sizeof(event->stat_config.data[0]);
 887	size += 1; /* nr item itself */
 888	mem_bswap_64(&event->stat_config.nr, size);
 889}
 890
 891static void perf_event__stat_swap(union perf_event *event,
 892				  bool sample_id_all __maybe_unused)
 893{
 894	event->stat.id     = bswap_64(event->stat.id);
 895	event->stat.thread = bswap_32(event->stat.thread);
 896	event->stat.cpu    = bswap_32(event->stat.cpu);
 897	event->stat.val    = bswap_64(event->stat.val);
 898	event->stat.ena    = bswap_64(event->stat.ena);
 899	event->stat.run    = bswap_64(event->stat.run);
 900}
 901
 902static void perf_event__stat_round_swap(union perf_event *event,
 903					bool sample_id_all __maybe_unused)
 904{
 905	event->stat_round.type = bswap_64(event->stat_round.type);
 906	event->stat_round.time = bswap_64(event->stat_round.time);
 907}
 908
 909typedef void (*perf_event__swap_op)(union perf_event *event,
 910				    bool sample_id_all);
 911
 912static perf_event__swap_op perf_event__swap_ops[] = {
 913	[PERF_RECORD_MMAP]		  = perf_event__mmap_swap,
 914	[PERF_RECORD_MMAP2]		  = perf_event__mmap2_swap,
 915	[PERF_RECORD_COMM]		  = perf_event__comm_swap,
 916	[PERF_RECORD_FORK]		  = perf_event__task_swap,
 917	[PERF_RECORD_EXIT]		  = perf_event__task_swap,
 918	[PERF_RECORD_LOST]		  = perf_event__all64_swap,
 919	[PERF_RECORD_READ]		  = perf_event__read_swap,
 920	[PERF_RECORD_THROTTLE]		  = perf_event__throttle_swap,
 921	[PERF_RECORD_UNTHROTTLE]	  = perf_event__throttle_swap,
 922	[PERF_RECORD_SAMPLE]		  = perf_event__all64_swap,
 923	[PERF_RECORD_AUX]		  = perf_event__aux_swap,
 924	[PERF_RECORD_ITRACE_START]	  = perf_event__itrace_start_swap,
 925	[PERF_RECORD_LOST_SAMPLES]	  = perf_event__all64_swap,
 926	[PERF_RECORD_SWITCH]		  = perf_event__switch_swap,
 927	[PERF_RECORD_SWITCH_CPU_WIDE]	  = perf_event__switch_swap,
 928	[PERF_RECORD_NAMESPACES]	  = perf_event__namespaces_swap,
 929	[PERF_RECORD_HEADER_ATTR]	  = perf_event__hdr_attr_swap,
 930	[PERF_RECORD_HEADER_EVENT_TYPE]	  = perf_event__event_type_swap,
 931	[PERF_RECORD_HEADER_TRACING_DATA] = perf_event__tracing_data_swap,
 932	[PERF_RECORD_HEADER_BUILD_ID]	  = NULL,
 933	[PERF_RECORD_ID_INDEX]		  = perf_event__all64_swap,
 934	[PERF_RECORD_AUXTRACE_INFO]	  = perf_event__auxtrace_info_swap,
 935	[PERF_RECORD_AUXTRACE]		  = perf_event__auxtrace_swap,
 936	[PERF_RECORD_AUXTRACE_ERROR]	  = perf_event__auxtrace_error_swap,
 937	[PERF_RECORD_THREAD_MAP]	  = perf_event__thread_map_swap,
 938	[PERF_RECORD_CPU_MAP]		  = perf_event__cpu_map_swap,
 939	[PERF_RECORD_STAT_CONFIG]	  = perf_event__stat_config_swap,
 940	[PERF_RECORD_STAT]		  = perf_event__stat_swap,
 941	[PERF_RECORD_STAT_ROUND]	  = perf_event__stat_round_swap,
 942	[PERF_RECORD_EVENT_UPDATE]	  = perf_event__event_update_swap,
 943	[PERF_RECORD_TIME_CONV]		  = perf_event__all64_swap,
 944	[PERF_RECORD_HEADER_MAX]	  = NULL,
 945};
 946
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 947/*
 948 * When perf record finishes a pass on every buffers, it records this pseudo
 949 * event.
 950 * We record the max timestamp t found in the pass n.
 951 * Assuming these timestamps are monotonic across cpus, we know that if
 952 * a buffer still has events with timestamps below t, they will be all
 953 * available and then read in the pass n + 1.
 954 * Hence when we start to read the pass n + 2, we can safely flush every
 955 * events with timestamps below t.
 956 *
 957 *    ============ PASS n =================
 958 *       CPU 0         |   CPU 1
 959 *                     |
 960 *    cnt1 timestamps  |   cnt2 timestamps
 961 *          1          |         2
 962 *          2          |         3
 963 *          -          |         4  <--- max recorded
 964 *
 965 *    ============ PASS n + 1 ==============
 966 *       CPU 0         |   CPU 1
 967 *                     |
 968 *    cnt1 timestamps  |   cnt2 timestamps
 969 *          3          |         5
 970 *          4          |         6
 971 *          5          |         7 <---- max recorded
 972 *
 973 *      Flush every events below timestamp 4
 974 *
 975 *    ============ PASS n + 2 ==============
 976 *       CPU 0         |   CPU 1
 977 *                     |
 978 *    cnt1 timestamps  |   cnt2 timestamps
 979 *          6          |         8
 980 *          7          |         9
 981 *          -          |         10
 982 *
 983 *      Flush every events below timestamp 7
 984 *      etc...
 985 */
 986static int process_finished_round(struct perf_tool *tool __maybe_unused,
 987				  union perf_event *event __maybe_unused,
 988				  struct ordered_events *oe)
 989{
 990	if (dump_trace)
 991		fprintf(stdout, "\n");
 992	return ordered_events__flush(oe, OE_FLUSH__ROUND);
 993}
 994
 995int perf_session__queue_event(struct perf_session *s, union perf_event *event,
 996			      u64 timestamp, u64 file_offset)
 997{
 998	return ordered_events__queue(&s->ordered_events, event, timestamp, file_offset);
 999}
1000
1001static void callchain__lbr_callstack_printf(struct perf_sample *sample)
 
1002{
1003	struct ip_callchain *callchain = sample->callchain;
1004	struct branch_stack *lbr_stack = sample->branch_stack;
1005	u64 kernel_callchain_nr = callchain->nr;
1006	unsigned int i;
1007
1008	for (i = 0; i < kernel_callchain_nr; i++) {
1009		if (callchain->ips[i] == PERF_CONTEXT_USER)
1010			break;
1011	}
1012
1013	if ((i != kernel_callchain_nr) && lbr_stack->nr) {
1014		u64 total_nr;
1015		/*
1016		 * LBR callstack can only get user call chain,
1017		 * i is kernel call chain number,
1018		 * 1 is PERF_CONTEXT_USER.
1019		 *
1020		 * The user call chain is stored in LBR registers.
1021		 * LBR are pair registers. The caller is stored
1022		 * in "from" register, while the callee is stored
1023		 * in "to" register.
1024		 * For example, there is a call stack
1025		 * "A"->"B"->"C"->"D".
1026		 * The LBR registers will recorde like
1027		 * "C"->"D", "B"->"C", "A"->"B".
1028		 * So only the first "to" register and all "from"
1029		 * registers are needed to construct the whole stack.
1030		 */
1031		total_nr = i + 1 + lbr_stack->nr + 1;
1032		kernel_callchain_nr = i + 1;
1033
1034		printf("... LBR call chain: nr:%" PRIu64 "\n", total_nr);
1035
1036		for (i = 0; i < kernel_callchain_nr; i++)
1037			printf("..... %2d: %016" PRIx64 "\n",
1038			       i, callchain->ips[i]);
1039
1040		printf("..... %2d: %016" PRIx64 "\n",
1041		       (int)(kernel_callchain_nr), lbr_stack->entries[0].to);
1042		for (i = 0; i < lbr_stack->nr; i++)
1043			printf("..... %2d: %016" PRIx64 "\n",
1044			       (int)(i + kernel_callchain_nr + 1), lbr_stack->entries[i].from);
1045	}
1046}
1047
1048static void callchain__printf(struct evsel *evsel,
1049			      struct perf_sample *sample)
1050{
1051	unsigned int i;
1052	struct ip_callchain *callchain = sample->callchain;
1053
1054	if (perf_evsel__has_branch_callstack(evsel))
1055		callchain__lbr_callstack_printf(sample);
1056
1057	printf("... FP chain: nr:%" PRIu64 "\n", callchain->nr);
1058
1059	for (i = 0; i < callchain->nr; i++)
1060		printf("..... %2d: %016" PRIx64 "\n",
1061		       i, callchain->ips[i]);
1062}
1063
1064static void branch_stack__printf(struct perf_sample *sample, bool callstack)
1065{
1066	uint64_t i;
1067
1068	printf("%s: nr:%" PRIu64 "\n",
1069		!callstack ? "... branch stack" : "... branch callstack",
1070		sample->branch_stack->nr);
1071
1072	for (i = 0; i < sample->branch_stack->nr; i++) {
1073		struct branch_entry *e = &sample->branch_stack->entries[i];
1074
1075		if (!callstack) {
1076			printf("..... %2"PRIu64": %016" PRIx64 " -> %016" PRIx64 " %hu cycles %s%s%s%s %x\n",
1077				i, e->from, e->to,
1078				(unsigned short)e->flags.cycles,
1079				e->flags.mispred ? "M" : " ",
1080				e->flags.predicted ? "P" : " ",
1081				e->flags.abort ? "A" : " ",
1082				e->flags.in_tx ? "T" : " ",
1083				(unsigned)e->flags.reserved);
1084		} else {
1085			printf("..... %2"PRIu64": %016" PRIx64 "\n",
1086				i, i > 0 ? e->from : e->to);
1087		}
 
 
 
 
 
 
 
 
 
 
 
1088	}
1089}
1090
1091static void regs_dump__printf(u64 mask, u64 *regs)
1092{
1093	unsigned rid, i = 0;
1094
1095	for_each_set_bit(rid, (unsigned long *) &mask, sizeof(mask) * 8) {
1096		u64 val = regs[i++];
1097
1098		printf(".... %-5s 0x%" PRIx64 "\n",
1099		       perf_reg_name(rid), val);
1100	}
1101}
1102
1103static const char *regs_abi[] = {
1104	[PERF_SAMPLE_REGS_ABI_NONE] = "none",
1105	[PERF_SAMPLE_REGS_ABI_32] = "32-bit",
1106	[PERF_SAMPLE_REGS_ABI_64] = "64-bit",
1107};
1108
1109static inline const char *regs_dump_abi(struct regs_dump *d)
 
1110{
1111	if (d->abi > PERF_SAMPLE_REGS_ABI_64)
1112		return "unknown";
 
 
1113
1114	return regs_abi[d->abi];
1115}
1116
1117static void regs__printf(const char *type, struct regs_dump *regs)
1118{
1119	u64 mask = regs->mask;
 
1120
1121	printf("... %s regs: mask 0x%" PRIx64 " ABI %s\n",
1122	       type,
1123	       mask,
1124	       regs_dump_abi(regs));
 
 
 
 
 
 
 
 
 
 
 
1125
1126	regs_dump__printf(mask, regs->regs);
1127}
 
1128
1129static void regs_user__printf(struct perf_sample *sample)
1130{
1131	struct regs_dump *user_regs = &sample->user_regs;
1132
1133	if (user_regs->regs)
1134		regs__printf("user", user_regs);
1135}
1136
1137static void regs_intr__printf(struct perf_sample *sample)
1138{
1139	struct regs_dump *intr_regs = &sample->intr_regs;
1140
1141	if (intr_regs->regs)
1142		regs__printf("intr", intr_regs);
1143}
1144
1145static void stack_user__printf(struct stack_dump *dump)
1146{
1147	printf("... ustack: size %" PRIu64 ", offset 0x%x\n",
1148	       dump->size, dump->offset);
1149}
1150
1151static void perf_evlist__print_tstamp(struct evlist *evlist,
1152				       union perf_event *event,
1153				       struct perf_sample *sample)
1154{
1155	u64 sample_type = __perf_evlist__combined_sample_type(evlist);
1156
1157	if (event->header.type != PERF_RECORD_SAMPLE &&
1158	    !perf_evlist__sample_id_all(evlist)) {
1159		fputs("-1 -1 ", stdout);
1160		return;
1161	}
1162
1163	if ((sample_type & PERF_SAMPLE_CPU))
1164		printf("%u ", sample->cpu);
1165
1166	if (sample_type & PERF_SAMPLE_TIME)
1167		printf("%" PRIu64 " ", sample->time);
1168}
1169
1170static void sample_read__printf(struct perf_sample *sample, u64 read_format)
1171{
1172	printf("... sample_read:\n");
1173
1174	if (read_format & PERF_FORMAT_TOTAL_TIME_ENABLED)
1175		printf("...... time enabled %016" PRIx64 "\n",
1176		       sample->read.time_enabled);
1177
1178	if (read_format & PERF_FORMAT_TOTAL_TIME_RUNNING)
1179		printf("...... time running %016" PRIx64 "\n",
1180		       sample->read.time_running);
1181
1182	if (read_format & PERF_FORMAT_GROUP) {
1183		u64 i;
1184
1185		printf(".... group nr %" PRIu64 "\n", sample->read.group.nr);
1186
1187		for (i = 0; i < sample->read.group.nr; i++) {
1188			struct sample_read_value *value;
1189
1190			value = &sample->read.group.values[i];
1191			printf("..... id %016" PRIx64
1192			       ", value %016" PRIx64 "\n",
1193			       value->id, value->value);
1194		}
1195	} else
1196		printf("..... id %016" PRIx64 ", value %016" PRIx64 "\n",
1197			sample->read.one.id, sample->read.one.value);
1198}
1199
1200static void dump_event(struct evlist *evlist, union perf_event *event,
1201		       u64 file_offset, struct perf_sample *sample)
1202{
1203	if (!dump_trace)
1204		return;
1205
1206	printf("\n%#" PRIx64 " [%#x]: event: %d\n",
1207	       file_offset, event->header.size, event->header.type);
1208
1209	trace_event(event);
1210	if (event->header.type == PERF_RECORD_SAMPLE && evlist->trace_event_sample_raw)
1211		evlist->trace_event_sample_raw(evlist, event, sample);
1212
1213	if (sample)
1214		perf_evlist__print_tstamp(evlist, event, sample);
1215
1216	printf("%#" PRIx64 " [%#x]: PERF_RECORD_%s", file_offset,
1217	       event->header.size, perf_event__name(event->header.type));
1218}
1219
1220static void dump_sample(struct evsel *evsel, union perf_event *event,
1221			struct perf_sample *sample)
1222{
1223	u64 sample_type;
1224
1225	if (!dump_trace)
1226		return;
1227
1228	printf("(IP, 0x%x): %d/%d: %#" PRIx64 " period: %" PRIu64 " addr: %#" PRIx64 "\n",
1229	       event->header.misc, sample->pid, sample->tid, sample->ip,
1230	       sample->period, sample->addr);
1231
1232	sample_type = evsel->core.attr.sample_type;
1233
1234	if (evsel__has_callchain(evsel))
1235		callchain__printf(evsel, sample);
1236
1237	if (sample_type & PERF_SAMPLE_BRANCH_STACK)
1238		branch_stack__printf(sample, perf_evsel__has_branch_callstack(evsel));
1239
1240	if (sample_type & PERF_SAMPLE_REGS_USER)
1241		regs_user__printf(sample);
1242
1243	if (sample_type & PERF_SAMPLE_REGS_INTR)
1244		regs_intr__printf(sample);
1245
1246	if (sample_type & PERF_SAMPLE_STACK_USER)
1247		stack_user__printf(&sample->user_stack);
1248
1249	if (sample_type & PERF_SAMPLE_WEIGHT)
1250		printf("... weight: %" PRIu64 "\n", sample->weight);
1251
1252	if (sample_type & PERF_SAMPLE_DATA_SRC)
1253		printf(" . data_src: 0x%"PRIx64"\n", sample->data_src);
1254
1255	if (sample_type & PERF_SAMPLE_PHYS_ADDR)
1256		printf(" .. phys_addr: 0x%"PRIx64"\n", sample->phys_addr);
1257
1258	if (sample_type & PERF_SAMPLE_TRANSACTION)
1259		printf("... transaction: %" PRIx64 "\n", sample->transaction);
1260
1261	if (sample_type & PERF_SAMPLE_READ)
1262		sample_read__printf(sample, evsel->core.attr.read_format);
1263}
1264
1265static void dump_read(struct evsel *evsel, union perf_event *event)
1266{
1267	struct perf_record_read *read_event = &event->read;
1268	u64 read_format;
1269
1270	if (!dump_trace)
1271		return;
1272
1273	printf(": %d %d %s %" PRI_lu64 "\n", event->read.pid, event->read.tid,
1274	       perf_evsel__name(evsel),
1275	       event->read.value);
1276
1277	if (!evsel)
1278		return;
1279
1280	read_format = evsel->core.attr.read_format;
1281
1282	if (read_format & PERF_FORMAT_TOTAL_TIME_ENABLED)
1283		printf("... time enabled : %" PRI_lu64 "\n", read_event->time_enabled);
1284
1285	if (read_format & PERF_FORMAT_TOTAL_TIME_RUNNING)
1286		printf("... time running : %" PRI_lu64 "\n", read_event->time_running);
1287
1288	if (read_format & PERF_FORMAT_ID)
1289		printf("... id           : %" PRI_lu64 "\n", read_event->id);
1290}
1291
1292static struct machine *machines__find_for_cpumode(struct machines *machines,
1293					       union perf_event *event,
1294					       struct perf_sample *sample)
1295{
1296	struct machine *machine;
1297
1298	if (perf_guest &&
1299	    ((sample->cpumode == PERF_RECORD_MISC_GUEST_KERNEL) ||
1300	     (sample->cpumode == PERF_RECORD_MISC_GUEST_USER))) {
1301		u32 pid;
1302
1303		if (event->header.type == PERF_RECORD_MMAP
1304		    || event->header.type == PERF_RECORD_MMAP2)
1305			pid = event->mmap.pid;
1306		else
1307			pid = sample->pid;
1308
1309		machine = machines__find(machines, pid);
1310		if (!machine)
1311			machine = machines__findnew(machines, DEFAULT_GUEST_KERNEL_ID);
1312		return machine;
1313	}
1314
1315	return &machines->host;
1316}
1317
1318static int deliver_sample_value(struct evlist *evlist,
1319				struct perf_tool *tool,
1320				union perf_event *event,
1321				struct perf_sample *sample,
1322				struct sample_read_value *v,
1323				struct machine *machine)
1324{
1325	struct perf_sample_id *sid = perf_evlist__id2sid(evlist, v->id);
1326	struct evsel *evsel;
1327
1328	if (sid) {
1329		sample->id     = v->id;
1330		sample->period = v->value - sid->period;
1331		sid->period    = v->value;
1332	}
1333
1334	if (!sid || sid->evsel == NULL) {
1335		++evlist->stats.nr_unknown_id;
1336		return 0;
1337	}
1338
1339	/*
1340	 * There's no reason to deliver sample
1341	 * for zero period, bail out.
1342	 */
1343	if (!sample->period)
1344		return 0;
1345
1346	evsel = container_of(sid->evsel, struct evsel, core);
1347	return tool->sample(tool, event, sample, evsel, machine);
1348}
1349
1350static int deliver_sample_group(struct evlist *evlist,
1351				struct perf_tool *tool,
1352				union  perf_event *event,
1353				struct perf_sample *sample,
1354				struct machine *machine)
1355{
1356	int ret = -EINVAL;
1357	u64 i;
1358
1359	for (i = 0; i < sample->read.group.nr; i++) {
1360		ret = deliver_sample_value(evlist, tool, event, sample,
1361					   &sample->read.group.values[i],
1362					   machine);
1363		if (ret)
1364			break;
1365	}
1366
1367	return ret;
1368}
1369
1370static int
1371 perf_evlist__deliver_sample(struct evlist *evlist,
1372			     struct perf_tool *tool,
1373			     union  perf_event *event,
1374			     struct perf_sample *sample,
1375			     struct evsel *evsel,
1376			     struct machine *machine)
1377{
1378	/* We know evsel != NULL. */
1379	u64 sample_type = evsel->core.attr.sample_type;
1380	u64 read_format = evsel->core.attr.read_format;
1381
1382	/* Standard sample delivery. */
1383	if (!(sample_type & PERF_SAMPLE_READ))
1384		return tool->sample(tool, event, sample, evsel, machine);
1385
1386	/* For PERF_SAMPLE_READ we have either single or group mode. */
1387	if (read_format & PERF_FORMAT_GROUP)
1388		return deliver_sample_group(evlist, tool, event, sample,
1389					    machine);
1390	else
1391		return deliver_sample_value(evlist, tool, event, sample,
1392					    &sample->read.one, machine);
1393}
1394
1395static int machines__deliver_event(struct machines *machines,
1396				   struct evlist *evlist,
1397				   union perf_event *event,
1398				   struct perf_sample *sample,
1399				   struct perf_tool *tool, u64 file_offset)
1400{
1401	struct evsel *evsel;
1402	struct machine *machine;
1403
1404	dump_event(evlist, event, file_offset, sample);
1405
1406	evsel = perf_evlist__id2evsel(evlist, sample->id);
1407
1408	machine = machines__find_for_cpumode(machines, event, sample);
1409
1410	switch (event->header.type) {
1411	case PERF_RECORD_SAMPLE:
 
 
1412		if (evsel == NULL) {
1413			++evlist->stats.nr_unknown_id;
1414			return 0;
1415		}
1416		dump_sample(evsel, event, sample);
1417		if (machine == NULL) {
1418			++evlist->stats.nr_unprocessable_samples;
1419			return 0;
1420		}
1421		return perf_evlist__deliver_sample(evlist, tool, event, sample, evsel, machine);
1422	case PERF_RECORD_MMAP:
1423		return tool->mmap(tool, event, sample, machine);
1424	case PERF_RECORD_MMAP2:
1425		if (event->header.misc & PERF_RECORD_MISC_PROC_MAP_PARSE_TIMEOUT)
1426			++evlist->stats.nr_proc_map_timeout;
1427		return tool->mmap2(tool, event, sample, machine);
1428	case PERF_RECORD_COMM:
1429		return tool->comm(tool, event, sample, machine);
1430	case PERF_RECORD_NAMESPACES:
1431		return tool->namespaces(tool, event, sample, machine);
1432	case PERF_RECORD_FORK:
1433		return tool->fork(tool, event, sample, machine);
1434	case PERF_RECORD_EXIT:
1435		return tool->exit(tool, event, sample, machine);
1436	case PERF_RECORD_LOST:
1437		if (tool->lost == perf_event__process_lost)
1438			evlist->stats.total_lost += event->lost.lost;
1439		return tool->lost(tool, event, sample, machine);
1440	case PERF_RECORD_LOST_SAMPLES:
1441		if (tool->lost_samples == perf_event__process_lost_samples)
1442			evlist->stats.total_lost_samples += event->lost_samples.lost;
1443		return tool->lost_samples(tool, event, sample, machine);
1444	case PERF_RECORD_READ:
1445		dump_read(evsel, event);
1446		return tool->read(tool, event, sample, evsel, machine);
1447	case PERF_RECORD_THROTTLE:
1448		return tool->throttle(tool, event, sample, machine);
1449	case PERF_RECORD_UNTHROTTLE:
1450		return tool->unthrottle(tool, event, sample, machine);
1451	case PERF_RECORD_AUX:
1452		if (tool->aux == perf_event__process_aux) {
1453			if (event->aux.flags & PERF_AUX_FLAG_TRUNCATED)
1454				evlist->stats.total_aux_lost += 1;
1455			if (event->aux.flags & PERF_AUX_FLAG_PARTIAL)
1456				evlist->stats.total_aux_partial += 1;
1457		}
1458		return tool->aux(tool, event, sample, machine);
1459	case PERF_RECORD_ITRACE_START:
1460		return tool->itrace_start(tool, event, sample, machine);
1461	case PERF_RECORD_SWITCH:
1462	case PERF_RECORD_SWITCH_CPU_WIDE:
1463		return tool->context_switch(tool, event, sample, machine);
1464	case PERF_RECORD_KSYMBOL:
1465		return tool->ksymbol(tool, event, sample, machine);
1466	case PERF_RECORD_BPF_EVENT:
1467		return tool->bpf(tool, event, sample, machine);
1468	default:
1469		++evlist->stats.nr_unknown_events;
1470		return -1;
1471	}
1472}
1473
1474static int perf_session__deliver_event(struct perf_session *session,
1475				       union perf_event *event,
1476				       struct perf_tool *tool,
1477				       u64 file_offset)
1478{
1479	struct perf_sample sample;
1480	int ret;
1481
1482	ret = perf_evlist__parse_sample(session->evlist, event, &sample);
1483	if (ret) {
1484		pr_err("Can't parse sample, err = %d\n", ret);
1485		return ret;
1486	}
1487
1488	ret = auxtrace__process_event(session, event, &sample, tool);
1489	if (ret < 0)
1490		return ret;
1491	if (ret > 0)
1492		return 0;
1493
1494	return machines__deliver_event(&session->machines, session->evlist,
1495				       event, &sample, tool, file_offset);
 
 
 
 
 
1496}
1497
1498static s64 perf_session__process_user_event(struct perf_session *session,
1499					    union perf_event *event,
1500					    u64 file_offset)
1501{
1502	struct ordered_events *oe = &session->ordered_events;
1503	struct perf_tool *tool = session->tool;
1504	struct perf_sample sample = { .time = 0, };
1505	int fd = perf_data__fd(session->data);
1506	int err;
1507
1508	if (event->header.type != PERF_RECORD_COMPRESSED ||
1509	    tool->compressed == perf_session__process_compressed_event_stub)
1510		dump_event(session->evlist, event, file_offset, &sample);
1511
1512	/* These events are processed right away */
1513	switch (event->header.type) {
1514	case PERF_RECORD_HEADER_ATTR:
1515		err = tool->attr(tool, event, &session->evlist);
1516		if (err == 0) {
1517			perf_session__set_id_hdr_size(session);
1518			perf_session__set_comm_exec(session);
1519		}
1520		return err;
1521	case PERF_RECORD_EVENT_UPDATE:
1522		return tool->event_update(tool, event, &session->evlist);
1523	case PERF_RECORD_HEADER_EVENT_TYPE:
1524		/*
1525		 * Depreceated, but we need to handle it for sake
1526		 * of old data files create in pipe mode.
1527		 */
1528		return 0;
1529	case PERF_RECORD_HEADER_TRACING_DATA:
1530		/* setup for reading amidst mmap */
1531		lseek(fd, file_offset, SEEK_SET);
1532		return tool->tracing_data(session, event);
1533	case PERF_RECORD_HEADER_BUILD_ID:
1534		return tool->build_id(session, event);
1535	case PERF_RECORD_FINISHED_ROUND:
1536		return tool->finished_round(tool, event, oe);
1537	case PERF_RECORD_ID_INDEX:
1538		return tool->id_index(session, event);
1539	case PERF_RECORD_AUXTRACE_INFO:
1540		return tool->auxtrace_info(session, event);
1541	case PERF_RECORD_AUXTRACE:
1542		/* setup for reading amidst mmap */
1543		lseek(fd, file_offset + event->header.size, SEEK_SET);
1544		return tool->auxtrace(session, event);
1545	case PERF_RECORD_AUXTRACE_ERROR:
1546		perf_session__auxtrace_error_inc(session, event);
1547		return tool->auxtrace_error(session, event);
1548	case PERF_RECORD_THREAD_MAP:
1549		return tool->thread_map(session, event);
1550	case PERF_RECORD_CPU_MAP:
1551		return tool->cpu_map(session, event);
1552	case PERF_RECORD_STAT_CONFIG:
1553		return tool->stat_config(session, event);
1554	case PERF_RECORD_STAT:
1555		return tool->stat(session, event);
1556	case PERF_RECORD_STAT_ROUND:
1557		return tool->stat_round(session, event);
1558	case PERF_RECORD_TIME_CONV:
1559		session->time_conv = event->time_conv;
1560		return tool->time_conv(session, event);
1561	case PERF_RECORD_HEADER_FEATURE:
1562		return tool->feature(session, event);
1563	case PERF_RECORD_COMPRESSED:
1564		err = tool->compressed(session, event, file_offset);
1565		if (err)
1566			dump_event(session->evlist, event, file_offset, &sample);
1567		return err;
1568	default:
1569		return -EINVAL;
1570	}
1571}
1572
1573int perf_session__deliver_synth_event(struct perf_session *session,
1574				      union perf_event *event,
1575				      struct perf_sample *sample)
1576{
1577	struct evlist *evlist = session->evlist;
1578	struct perf_tool *tool = session->tool;
1579
1580	events_stats__inc(&evlist->stats, event->header.type);
1581
1582	if (event->header.type >= PERF_RECORD_USER_TYPE_START)
1583		return perf_session__process_user_event(session, event, 0);
1584
1585	return machines__deliver_event(&session->machines, evlist, event, sample, tool, 0);
1586}
1587
1588static void event_swap(union perf_event *event, bool sample_id_all)
1589{
1590	perf_event__swap_op swap;
1591
1592	swap = perf_event__swap_ops[event->header.type];
1593	if (swap)
1594		swap(event, sample_id_all);
1595}
1596
1597int perf_session__peek_event(struct perf_session *session, off_t file_offset,
1598			     void *buf, size_t buf_sz,
1599			     union perf_event **event_ptr,
1600			     struct perf_sample *sample)
1601{
1602	union perf_event *event;
1603	size_t hdr_sz, rest;
1604	int fd;
1605
1606	if (session->one_mmap && !session->header.needs_swap) {
1607		event = file_offset - session->one_mmap_offset +
1608			session->one_mmap_addr;
1609		goto out_parse_sample;
1610	}
1611
1612	if (perf_data__is_pipe(session->data))
1613		return -1;
1614
1615	fd = perf_data__fd(session->data);
1616	hdr_sz = sizeof(struct perf_event_header);
1617
1618	if (buf_sz < hdr_sz)
1619		return -1;
1620
1621	if (lseek(fd, file_offset, SEEK_SET) == (off_t)-1 ||
1622	    readn(fd, buf, hdr_sz) != (ssize_t)hdr_sz)
1623		return -1;
1624
1625	event = (union perf_event *)buf;
1626
1627	if (session->header.needs_swap)
1628		perf_event_header__bswap(&event->header);
1629
1630	if (event->header.size < hdr_sz || event->header.size > buf_sz)
1631		return -1;
1632
1633	rest = event->header.size - hdr_sz;
1634
1635	if (readn(fd, buf, rest) != (ssize_t)rest)
1636		return -1;
1637
1638	if (session->header.needs_swap)
1639		event_swap(event, perf_evlist__sample_id_all(session->evlist));
1640
1641out_parse_sample:
1642
1643	if (sample && event->header.type < PERF_RECORD_USER_TYPE_START &&
1644	    perf_evlist__parse_sample(session->evlist, event, sample))
1645		return -1;
1646
1647	*event_ptr = event;
1648
1649	return 0;
1650}
1651
1652static s64 perf_session__process_event(struct perf_session *session,
1653				       union perf_event *event, u64 file_offset)
1654{
1655	struct evlist *evlist = session->evlist;
1656	struct perf_tool *tool = session->tool;
1657	int ret;
1658
1659	if (session->header.needs_swap)
1660		event_swap(event, perf_evlist__sample_id_all(evlist));
 
1661
1662	if (event->header.type >= PERF_RECORD_HEADER_MAX)
1663		return -EINVAL;
1664
1665	events_stats__inc(&evlist->stats, event->header.type);
1666
1667	if (event->header.type >= PERF_RECORD_USER_TYPE_START)
1668		return perf_session__process_user_event(session, event, file_offset);
1669
1670	if (tool->ordered_events) {
1671		u64 timestamp = -1ULL;
 
 
 
 
1672
1673		ret = perf_evlist__parse_sample_timestamp(evlist, event, &timestamp);
1674		if (ret && ret != -1)
1675			return ret;
1676
1677		ret = perf_session__queue_event(session, event, timestamp, file_offset);
 
 
1678		if (ret != -ETIME)
1679			return ret;
1680	}
1681
1682	return perf_session__deliver_event(session, event, tool, file_offset);
1683}
1684
1685void perf_event_header__bswap(struct perf_event_header *hdr)
1686{
1687	hdr->type = bswap_32(hdr->type);
1688	hdr->misc = bswap_16(hdr->misc);
1689	hdr->size = bswap_16(hdr->size);
1690}
1691
1692struct thread *perf_session__findnew(struct perf_session *session, pid_t pid)
1693{
1694	return machine__findnew_thread(&session->machines.host, -1, pid);
 
 
1695}
1696
1697/*
1698 * Threads are identified by pid and tid, and the idle task has pid == tid == 0.
1699 * So here a single thread is created for that, but actually there is a separate
1700 * idle task per cpu, so there should be one 'struct thread' per cpu, but there
1701 * is only 1. That causes problems for some tools, requiring workarounds. For
1702 * example get_idle_thread() in builtin-sched.c, or thread_stack__per_cpu().
1703 */
1704int perf_session__register_idle_thread(struct perf_session *session)
1705{
1706	struct thread *thread;
1707	int err = 0;
1708
1709	thread = machine__findnew_thread(&session->machines.host, 0, 0);
1710	if (thread == NULL || thread__set_comm(thread, "swapper", 0)) {
1711		pr_err("problem inserting idle task.\n");
1712		err = -1;
1713	}
1714
1715	if (thread == NULL || thread__set_namespaces(thread, 0, NULL)) {
1716		pr_err("problem inserting idle task.\n");
1717		err = -1;
1718	}
1719
1720	/* machine__findnew_thread() got the thread, so put it */
1721	thread__put(thread);
1722	return err;
1723}
1724
1725static void
1726perf_session__warn_order(const struct perf_session *session)
1727{
1728	const struct ordered_events *oe = &session->ordered_events;
1729	struct evsel *evsel;
1730	bool should_warn = true;
1731
1732	evlist__for_each_entry(session->evlist, evsel) {
1733		if (evsel->core.attr.write_backward)
1734			should_warn = false;
1735	}
1736
1737	if (!should_warn)
1738		return;
1739	if (oe->nr_unordered_events != 0)
1740		ui__warning("%u out of order events recorded.\n", oe->nr_unordered_events);
1741}
1742
1743static void perf_session__warn_about_errors(const struct perf_session *session)
1744{
1745	const struct events_stats *stats = &session->evlist->stats;
1746
1747	if (session->tool->lost == perf_event__process_lost &&
1748	    stats->nr_events[PERF_RECORD_LOST] != 0) {
1749		ui__warning("Processed %d events and lost %d chunks!\n\n"
1750			    "Check IO/CPU overload!\n\n",
1751			    stats->nr_events[0],
1752			    stats->nr_events[PERF_RECORD_LOST]);
1753	}
1754
1755	if (session->tool->lost_samples == perf_event__process_lost_samples) {
1756		double drop_rate;
1757
1758		drop_rate = (double)stats->total_lost_samples /
1759			    (double) (stats->nr_events[PERF_RECORD_SAMPLE] + stats->total_lost_samples);
1760		if (drop_rate > 0.05) {
1761			ui__warning("Processed %" PRIu64 " samples and lost %3.2f%%!\n\n",
1762				    stats->nr_events[PERF_RECORD_SAMPLE] + stats->total_lost_samples,
1763				    drop_rate * 100.0);
1764		}
1765	}
1766
1767	if (session->tool->aux == perf_event__process_aux &&
1768	    stats->total_aux_lost != 0) {
1769		ui__warning("AUX data lost %" PRIu64 " times out of %u!\n\n",
1770			    stats->total_aux_lost,
1771			    stats->nr_events[PERF_RECORD_AUX]);
1772	}
1773
1774	if (session->tool->aux == perf_event__process_aux &&
1775	    stats->total_aux_partial != 0) {
1776		bool vmm_exclusive = false;
1777
1778		(void)sysfs__read_bool("module/kvm_intel/parameters/vmm_exclusive",
1779		                       &vmm_exclusive);
1780
1781		ui__warning("AUX data had gaps in it %" PRIu64 " times out of %u!\n\n"
1782		            "Are you running a KVM guest in the background?%s\n\n",
1783			    stats->total_aux_partial,
1784			    stats->nr_events[PERF_RECORD_AUX],
1785			    vmm_exclusive ?
1786			    "\nReloading kvm_intel module with vmm_exclusive=0\n"
1787			    "will reduce the gaps to only guest's timeslices." :
1788			    "");
1789	}
1790
1791	if (stats->nr_unknown_events != 0) {
1792		ui__warning("Found %u unknown events!\n\n"
1793			    "Is this an older tool processing a perf.data "
1794			    "file generated by a more recent tool?\n\n"
1795			    "If that is not the case, consider "
1796			    "reporting to linux-kernel@vger.kernel.org.\n\n",
1797			    stats->nr_unknown_events);
1798	}
1799
1800	if (stats->nr_unknown_id != 0) {
1801		ui__warning("%u samples with id not present in the header\n",
1802			    stats->nr_unknown_id);
1803	}
1804
1805	if (stats->nr_invalid_chains != 0) {
1806		ui__warning("Found invalid callchains!\n\n"
1807			    "%u out of %u events were discarded for this reason.\n\n"
1808			    "Consider reporting to linux-kernel@vger.kernel.org.\n\n",
1809			    stats->nr_invalid_chains,
1810			    stats->nr_events[PERF_RECORD_SAMPLE]);
1811	}
1812
1813	if (stats->nr_unprocessable_samples != 0) {
1814		ui__warning("%u unprocessable samples recorded.\n"
1815			    "Do you have a KVM guest running and not using 'perf kvm'?\n",
1816			    stats->nr_unprocessable_samples);
1817	}
1818
1819	perf_session__warn_order(session);
1820
1821	events_stats__auxtrace_error_warn(stats);
1822
1823	if (stats->nr_proc_map_timeout != 0) {
1824		ui__warning("%d map information files for pre-existing threads were\n"
1825			    "not processed, if there are samples for addresses they\n"
1826			    "will not be resolved, you may find out which are these\n"
1827			    "threads by running with -v and redirecting the output\n"
1828			    "to a file.\n"
1829			    "The time limit to process proc map is too short?\n"
1830			    "Increase it by --proc-map-timeout\n",
1831			    stats->nr_proc_map_timeout);
1832	}
1833}
1834
1835static int perf_session__flush_thread_stack(struct thread *thread,
1836					    void *p __maybe_unused)
1837{
1838	return thread_stack__flush(thread);
1839}
1840
1841static int perf_session__flush_thread_stacks(struct perf_session *session)
1842{
1843	return machines__for_each_thread(&session->machines,
1844					 perf_session__flush_thread_stack,
1845					 NULL);
1846}
1847
 
1848volatile int session_done;
1849
1850static int __perf_session__process_decomp_events(struct perf_session *session);
1851
1852static int __perf_session__process_pipe_events(struct perf_session *session)
1853{
1854	struct ordered_events *oe = &session->ordered_events;
1855	struct perf_tool *tool = session->tool;
1856	int fd = perf_data__fd(session->data);
1857	union perf_event *event;
1858	uint32_t size, cur_size = 0;
1859	void *buf = NULL;
1860	s64 skip = 0;
1861	u64 head;
1862	ssize_t err;
1863	void *p;
1864
1865	perf_tool__fill_defaults(tool);
1866
1867	head = 0;
1868	cur_size = sizeof(union perf_event);
1869
1870	buf = malloc(cur_size);
1871	if (!buf)
1872		return -errno;
1873	ordered_events__set_copy_on_queue(oe, true);
1874more:
1875	event = buf;
1876	err = readn(fd, event, sizeof(struct perf_event_header));
1877	if (err <= 0) {
1878		if (err == 0)
1879			goto done;
1880
1881		pr_err("failed to read event header\n");
1882		goto out_err;
1883	}
1884
1885	if (session->header.needs_swap)
1886		perf_event_header__bswap(&event->header);
1887
1888	size = event->header.size;
1889	if (size < sizeof(struct perf_event_header)) {
1890		pr_err("bad event header size\n");
1891		goto out_err;
1892	}
1893
1894	if (size > cur_size) {
1895		void *new = realloc(buf, size);
1896		if (!new) {
1897			pr_err("failed to allocate memory to read event\n");
1898			goto out_err;
1899		}
1900		buf = new;
1901		cur_size = size;
1902		event = buf;
1903	}
1904	p = event;
1905	p += sizeof(struct perf_event_header);
1906
1907	if (size - sizeof(struct perf_event_header)) {
1908		err = readn(fd, p, size - sizeof(struct perf_event_header));
1909		if (err <= 0) {
1910			if (err == 0) {
1911				pr_err("unexpected end of event stream\n");
1912				goto done;
1913			}
1914
1915			pr_err("failed to read event data\n");
1916			goto out_err;
1917		}
1918	}
1919
1920	if ((skip = perf_session__process_event(session, event, head)) < 0) {
1921		pr_err("%#" PRIx64 " [%#x]: failed to process type: %d\n",
1922		       head, event->header.size, event->header.type);
1923		err = -EINVAL;
1924		goto out_err;
 
 
 
 
 
 
 
1925	}
1926
1927	head += size;
1928
1929	if (skip > 0)
1930		head += skip;
1931
1932	err = __perf_session__process_decomp_events(session);
1933	if (err)
1934		goto out_err;
1935
1936	if (!session_done())
1937		goto more;
1938done:
1939	/* do the final flush for ordered samples */
1940	err = ordered_events__flush(oe, OE_FLUSH__FINAL);
1941	if (err)
1942		goto out_err;
1943	err = auxtrace__flush_events(session, tool);
1944	if (err)
1945		goto out_err;
1946	err = perf_session__flush_thread_stacks(session);
1947out_err:
1948	free(buf);
1949	if (!tool->no_warn)
1950		perf_session__warn_about_errors(session);
1951	ordered_events__free(&session->ordered_events);
1952	auxtrace__free_events(session);
1953	return err;
1954}
1955
1956static union perf_event *
1957fetch_mmaped_event(struct perf_session *session,
1958		   u64 head, size_t mmap_size, char *buf)
1959{
1960	union perf_event *event;
1961
1962	/*
1963	 * Ensure we have enough space remaining to read
1964	 * the size of the event in the headers.
1965	 */
1966	if (head + sizeof(event->header) > mmap_size)
1967		return NULL;
1968
1969	event = (union perf_event *)(buf + head);
1970
1971	if (session->header.needs_swap)
1972		perf_event_header__bswap(&event->header);
1973
1974	if (head + event->header.size > mmap_size) {
1975		/* We're not fetching the event so swap back again */
1976		if (session->header.needs_swap)
1977			perf_event_header__bswap(&event->header);
1978		pr_debug("%s: head=%#" PRIx64 " event->header_size=%#x, mmap_size=%#zx: fuzzed perf.data?\n",
1979			 __func__, head, event->header.size, mmap_size);
1980		return ERR_PTR(-EINVAL);
1981	}
1982
1983	return event;
1984}
1985
1986static int __perf_session__process_decomp_events(struct perf_session *session)
1987{
1988	s64 skip;
1989	u64 size, file_pos = 0;
1990	struct decomp *decomp = session->decomp_last;
1991
1992	if (!decomp)
1993		return 0;
1994
1995	while (decomp->head < decomp->size && !session_done()) {
1996		union perf_event *event = fetch_mmaped_event(session, decomp->head, decomp->size, decomp->data);
1997
1998		if (IS_ERR(event))
1999			return PTR_ERR(event);
2000
2001		if (!event)
2002			break;
2003
2004		size = event->header.size;
2005
2006		if (size < sizeof(struct perf_event_header) ||
2007		    (skip = perf_session__process_event(session, event, file_pos)) < 0) {
2008			pr_err("%#" PRIx64 " [%#x]: failed to process type: %d\n",
2009				decomp->file_pos + decomp->head, event->header.size, event->header.type);
2010			return -EINVAL;
2011		}
2012
2013		if (skip)
2014			size += skip;
2015
2016		decomp->head += size;
2017	}
2018
2019	return 0;
2020}
2021
2022/*
2023 * On 64bit we can mmap the data file in one go. No need for tiny mmap
2024 * slices. On 32bit we use 32MB.
2025 */
2026#if BITS_PER_LONG == 64
2027#define MMAP_SIZE ULLONG_MAX
2028#define NUM_MMAPS 1
2029#else
2030#define MMAP_SIZE (32 * 1024 * 1024ULL)
2031#define NUM_MMAPS 128
2032#endif
2033
2034struct reader;
2035
2036typedef s64 (*reader_cb_t)(struct perf_session *session,
2037			   union perf_event *event,
2038			   u64 file_offset);
2039
2040struct reader {
2041	int		 fd;
2042	u64		 data_size;
2043	u64		 data_offset;
2044	reader_cb_t	 process;
2045};
2046
2047static int
2048reader__process_events(struct reader *rd, struct perf_session *session,
2049		       struct ui_progress *prog)
2050{
2051	u64 data_size = rd->data_size;
2052	u64 head, page_offset, file_offset, file_pos, size;
2053	int err = 0, mmap_prot, mmap_flags, map_idx = 0;
2054	size_t	mmap_size;
2055	char *buf, *mmaps[NUM_MMAPS];
2056	union perf_event *event;
2057	s64 skip;
2058
2059	page_offset = page_size * (rd->data_offset / page_size);
2060	file_offset = page_offset;
2061	head = rd->data_offset - page_offset;
2062
2063	ui_progress__init_size(prog, data_size, "Processing events...");
 
2064
2065	data_size += rd->data_offset;
 
 
 
2066
2067	mmap_size = MMAP_SIZE;
2068	if (mmap_size > data_size) {
2069		mmap_size = data_size;
2070		session->one_mmap = true;
2071	}
2072
2073	memset(mmaps, 0, sizeof(mmaps));
2074
2075	mmap_prot  = PROT_READ;
2076	mmap_flags = MAP_SHARED;
2077
2078	if (session->header.needs_swap) {
2079		mmap_prot  |= PROT_WRITE;
2080		mmap_flags = MAP_PRIVATE;
2081	}
2082remap:
2083	buf = mmap(NULL, mmap_size, mmap_prot, mmap_flags, rd->fd,
2084		   file_offset);
2085	if (buf == MAP_FAILED) {
2086		pr_err("failed to mmap file\n");
2087		err = -errno;
2088		goto out;
2089	}
2090	mmaps[map_idx] = buf;
2091	map_idx = (map_idx + 1) & (ARRAY_SIZE(mmaps) - 1);
2092	file_pos = file_offset + head;
2093	if (session->one_mmap) {
2094		session->one_mmap_addr = buf;
2095		session->one_mmap_offset = file_offset;
2096	}
2097
2098more:
2099	event = fetch_mmaped_event(session, head, mmap_size, buf);
2100	if (IS_ERR(event))
2101		return PTR_ERR(event);
2102
2103	if (!event) {
2104		if (mmaps[map_idx]) {
2105			munmap(mmaps[map_idx], mmap_size);
2106			mmaps[map_idx] = NULL;
2107		}
2108
2109		page_offset = page_size * (head / page_size);
2110		file_offset += page_offset;
2111		head -= page_offset;
2112		goto remap;
2113	}
2114
2115	size = event->header.size;
2116
2117	skip = -EINVAL;
 
 
 
 
 
 
 
 
 
 
2118
2119	if (size < sizeof(struct perf_event_header) ||
2120	    (skip = rd->process(session, event, file_pos)) < 0) {
2121		pr_err("%#" PRIx64 " [%#x]: failed to process type: %d [%s]\n",
2122		       file_offset + head, event->header.size,
2123		       event->header.type, strerror(-skip));
2124		err = skip;
2125		goto out;
2126	}
2127
2128	if (skip)
2129		size += skip;
2130
2131	head += size;
2132	file_pos += size;
2133
2134	err = __perf_session__process_decomp_events(session);
2135	if (err)
2136		goto out;
2137
2138	ui_progress__update(prog, size);
2139
2140	if (session_done())
2141		goto out;
2142
2143	if (file_pos < data_size)
2144		goto more;
2145
2146out:
2147	return err;
2148}
2149
2150static s64 process_simple(struct perf_session *session,
2151			  union perf_event *event,
2152			  u64 file_offset)
2153{
2154	return perf_session__process_event(session, event, file_offset);
2155}
2156
2157static int __perf_session__process_events(struct perf_session *session)
2158{
2159	struct reader rd = {
2160		.fd		= perf_data__fd(session->data),
2161		.data_size	= session->header.data_size,
2162		.data_offset	= session->header.data_offset,
2163		.process	= process_simple,
2164	};
2165	struct ordered_events *oe = &session->ordered_events;
2166	struct perf_tool *tool = session->tool;
2167	struct ui_progress prog;
2168	int err;
2169
2170	perf_tool__fill_defaults(tool);
2171
2172	if (rd.data_size == 0)
2173		return -1;
2174
2175	ui_progress__init_size(&prog, rd.data_size, "Processing events...");
2176
2177	err = reader__process_events(&rd, session, &prog);
2178	if (err)
2179		goto out_err;
2180	/* do the final flush for ordered samples */
2181	err = ordered_events__flush(oe, OE_FLUSH__FINAL);
2182	if (err)
2183		goto out_err;
2184	err = auxtrace__flush_events(session, tool);
2185	if (err)
2186		goto out_err;
2187	err = perf_session__flush_thread_stacks(session);
2188out_err:
2189	ui_progress__finish();
2190	if (!tool->no_warn)
2191		perf_session__warn_about_errors(session);
2192	/*
2193	 * We may switching perf.data output, make ordered_events
2194	 * reusable.
2195	 */
2196	ordered_events__reinit(&session->ordered_events);
2197	auxtrace__free_events(session);
2198	session->one_mmap = false;
2199	return err;
2200}
2201
2202int perf_session__process_events(struct perf_session *session)
 
2203{
2204	if (perf_session__register_idle_thread(session) < 0)
 
 
2205		return -ENOMEM;
2206
2207	if (perf_data__is_pipe(session->data))
2208		return __perf_session__process_pipe_events(session);
 
 
 
 
 
2209
2210	return __perf_session__process_events(session);
2211}
2212
2213bool perf_session__has_traces(struct perf_session *session, const char *msg)
2214{
2215	struct evsel *evsel;
2216
2217	evlist__for_each_entry(session->evlist, evsel) {
2218		if (evsel->core.attr.type == PERF_TYPE_TRACEPOINT)
2219			return true;
2220	}
2221
2222	pr_err("No trace sample to read. Did you call 'perf %s'?\n", msg);
2223	return false;
2224}
2225
2226int map__set_kallsyms_ref_reloc_sym(struct map *map, const char *symbol_name, u64 addr)
 
 
2227{
2228	char *bracket;
 
2229	struct ref_reloc_sym *ref;
2230	struct kmap *kmap;
2231
2232	ref = zalloc(sizeof(struct ref_reloc_sym));
2233	if (ref == NULL)
2234		return -ENOMEM;
2235
2236	ref->name = strdup(symbol_name);
2237	if (ref->name == NULL) {
2238		free(ref);
2239		return -ENOMEM;
2240	}
2241
2242	bracket = strchr(ref->name, ']');
2243	if (bracket)
2244		*bracket = '\0';
2245
2246	ref->addr = addr;
2247
2248	kmap = map__kmap(map);
2249	if (kmap)
2250		kmap->ref_reloc_sym = ref;
 
2251
2252	return 0;
2253}
2254
2255size_t perf_session__fprintf_dsos(struct perf_session *session, FILE *fp)
2256{
2257	return machines__fprintf_dsos(&session->machines, fp);
 
 
2258}
2259
2260size_t perf_session__fprintf_dsos_buildid(struct perf_session *session, FILE *fp,
2261					  bool (skip)(struct dso *dso, int parm), int parm)
2262{
2263	return machines__fprintf_dsos_buildid(&session->machines, fp, skip, parm);
 
2264}
2265
2266size_t perf_session__fprintf_nr_events(struct perf_session *session, FILE *fp)
2267{
2268	size_t ret;
2269	const char *msg = "";
2270
2271	if (perf_header__has_feat(&session->header, HEADER_AUXTRACE))
2272		msg = " (excludes AUX area (e.g. instruction trace) decoded / synthesized events)";
2273
2274	ret = fprintf(fp, "\nAggregated stats:%s\n", msg);
 
 
 
2275
2276	ret += events_stats__fprintf(&session->evlist->stats, fp);
2277	return ret;
2278}
2279
2280size_t perf_session__fprintf(struct perf_session *session, FILE *fp)
2281{
2282	/*
2283	 * FIXME: Here we have to actually print all the machines in this
2284	 * session, not just the host...
2285	 */
2286	return machine__fprintf(&session->machines.host, fp);
2287}
2288
2289struct evsel *perf_session__find_first_evtype(struct perf_session *session,
2290					      unsigned int type)
2291{
2292	struct evsel *pos;
2293
2294	evlist__for_each_entry(session->evlist, pos) {
2295		if (pos->core.attr.type == type)
2296			return pos;
2297	}
2298	return NULL;
2299}
2300
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2301int perf_session__cpu_bitmap(struct perf_session *session,
2302			     const char *cpu_list, unsigned long *cpu_bitmap)
2303{
2304	int i, err = -1;
2305	struct perf_cpu_map *map;
2306	int nr_cpus = min(session->header.env.nr_cpus_online, MAX_NR_CPUS);
2307
2308	for (i = 0; i < PERF_TYPE_MAX; ++i) {
2309		struct evsel *evsel;
2310
2311		evsel = perf_session__find_first_evtype(session, i);
2312		if (!evsel)
2313			continue;
2314
2315		if (!(evsel->core.attr.sample_type & PERF_SAMPLE_CPU)) {
2316			pr_err("File does not contain CPU events. "
2317			       "Remove -C option to proceed.\n");
2318			return -1;
2319		}
2320	}
2321
2322	map = perf_cpu_map__new(cpu_list);
2323	if (map == NULL) {
2324		pr_err("Invalid cpu_list\n");
2325		return -1;
2326	}
2327
2328	for (i = 0; i < map->nr; i++) {
2329		int cpu = map->map[i];
2330
2331		if (cpu >= nr_cpus) {
2332			pr_err("Requested CPU %d too large. "
2333			       "Consider raising MAX_NR_CPUS\n", cpu);
2334			goto out_delete_map;
2335		}
2336
2337		set_bit(cpu, cpu_bitmap);
2338	}
2339
2340	err = 0;
2341
2342out_delete_map:
2343	perf_cpu_map__put(map);
2344	return err;
2345}
2346
2347void perf_session__fprintf_info(struct perf_session *session, FILE *fp,
2348				bool full)
2349{
2350	if (session == NULL || fp == NULL)
2351		return;
2352
2353	fprintf(fp, "# ========\n");
2354	perf_header__fprintf_info(session, fp, full);
2355	fprintf(fp, "# ========\n#\n");
2356}
2357
2358
2359int __perf_session__set_tracepoints_handlers(struct perf_session *session,
2360					     const struct evsel_str_handler *assocs,
2361					     size_t nr_assocs)
2362{
2363	struct evsel *evsel;
2364	size_t i;
2365	int err;
2366
2367	for (i = 0; i < nr_assocs; i++) {
2368		/*
2369		 * Adding a handler for an event not in the session,
2370		 * just ignore it.
2371		 */
2372		evsel = perf_evlist__find_tracepoint_by_name(session->evlist, assocs[i].name);
2373		if (evsel == NULL)
2374			continue;
2375
2376		err = -EEXIST;
2377		if (evsel->handler != NULL)
2378			goto out;
2379		evsel->handler = assocs[i].handler;
2380	}
2381
2382	err = 0;
2383out:
2384	return err;
2385}
2386
2387int perf_event__process_id_index(struct perf_session *session,
2388				 union perf_event *event)
2389{
2390	struct evlist *evlist = session->evlist;
2391	struct perf_record_id_index *ie = &event->id_index;
2392	size_t i, nr, max_nr;
2393
2394	max_nr = (ie->header.size - sizeof(struct perf_record_id_index)) /
2395		 sizeof(struct id_index_entry);
2396	nr = ie->nr;
2397	if (nr > max_nr)
2398		return -EINVAL;
2399
2400	if (dump_trace)
2401		fprintf(stdout, " nr: %zu\n", nr);
2402
2403	for (i = 0; i < nr; i++) {
2404		struct id_index_entry *e = &ie->entries[i];
2405		struct perf_sample_id *sid;
2406
2407		if (dump_trace) {
2408			fprintf(stdout,	" ... id: %"PRI_lu64, e->id);
2409			fprintf(stdout,	"  idx: %"PRI_lu64, e->idx);
2410			fprintf(stdout,	"  cpu: %"PRI_ld64, e->cpu);
2411			fprintf(stdout,	"  tid: %"PRI_ld64"\n", e->tid);
2412		}
2413
2414		sid = perf_evlist__id2sid(evlist, e->id);
2415		if (!sid)
2416			return -ENOENT;
2417		sid->idx = e->idx;
2418		sid->cpu = e->cpu;
2419		sid->tid = e->tid;
2420	}
2421	return 0;
2422}
v3.1
   1#define _FILE_OFFSET_BITS 64
   2
 
 
   3#include <linux/kernel.h>
 
 
   4
   5#include <byteswap.h>
   6#include <unistd.h>
   7#include <sys/types.h>
   8#include <sys/mman.h>
 
   9
 
 
 
  10#include "evlist.h"
  11#include "evsel.h"
 
 
 
  12#include "session.h"
  13#include "sort.h"
  14#include "util.h"
  15#include "cpumap.h"
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
  16
  17static int perf_session__open(struct perf_session *self, bool force)
  18{
  19	struct stat input_stat;
  20
  21	if (!strcmp(self->filename, "-")) {
  22		self->fd_pipe = true;
  23		self->fd = STDIN_FILENO;
 
 
 
 
  24
  25		if (perf_session__read_header(self, self->fd) < 0)
  26			pr_err("incompatible file format");
  27
  28		return 0;
  29	}
 
 
 
  30
  31	self->fd = open(self->filename, O_RDONLY);
  32	if (self->fd < 0) {
  33		int err = errno;
  34
  35		pr_err("failed to open %s: %s", self->filename, strerror(err));
  36		if (err == ENOENT && !strcmp(self->filename, "perf.data"))
  37			pr_err("  (try 'perf record' first)");
  38		pr_err("\n");
  39		return -errno;
  40	}
  41
  42	if (fstat(self->fd, &input_stat) < 0)
  43		goto out_close;
 
  44
  45	if (!force && input_stat.st_uid && (input_stat.st_uid != geteuid())) {
  46		pr_err("file %s not owned by current user or root\n",
  47		       self->filename);
  48		goto out_close;
  49	}
  50
  51	if (!input_stat.st_size) {
  52		pr_info("zero-sized file (%s), nothing to do!\n",
  53			self->filename);
  54		goto out_close;
  55	}
  56
  57	if (perf_session__read_header(self, self->fd) < 0) {
  58		pr_err("incompatible file format");
  59		goto out_close;
  60	}
  61
  62	if (!perf_evlist__valid_sample_type(self->evlist)) {
  63		pr_err("non matching sample_type");
  64		goto out_close;
  65	}
  66
  67	if (!perf_evlist__valid_sample_id_all(self->evlist)) {
  68		pr_err("non matching sample_id_all");
  69		goto out_close;
  70	}
  71
  72	self->size = input_stat.st_size;
  73	return 0;
  74
  75out_close:
  76	close(self->fd);
  77	self->fd = -1;
  78	return -1;
  79}
  80
  81static void perf_session__id_header_size(struct perf_session *session)
  82{
  83       struct perf_sample *data;
  84       u64 sample_type = session->sample_type;
  85       u16 size = 0;
  86
  87	if (!session->sample_id_all)
  88		goto out;
  89
  90       if (sample_type & PERF_SAMPLE_TID)
  91               size += sizeof(data->tid) * 2;
 
  92
  93       if (sample_type & PERF_SAMPLE_TIME)
  94               size += sizeof(data->time);
 
 
  95
  96       if (sample_type & PERF_SAMPLE_ID)
  97               size += sizeof(data->id);
 
 
  98
  99       if (sample_type & PERF_SAMPLE_STREAM_ID)
 100               size += sizeof(data->stream_id);
 
 101
 102       if (sample_type & PERF_SAMPLE_CPU)
 103               size += sizeof(data->cpu) * 2;
 104out:
 105       session->id_hdr_size = size;
 106}
 107
 108void perf_session__update_sample_type(struct perf_session *self)
 109{
 110	self->sample_type = perf_evlist__sample_type(self->evlist);
 111	self->sample_size = __perf_evsel__sample_size(self->sample_type);
 112	self->sample_id_all = perf_evlist__sample_id_all(self->evlist);
 113	perf_session__id_header_size(self);
 114}
 115
 116int perf_session__create_kernel_maps(struct perf_session *self)
 117{
 118	int ret = machine__create_kernel_maps(&self->host_machine);
 119
 120	if (ret >= 0)
 121		ret = machines__create_guest_kernel_maps(&self->machines);
 122	return ret;
 123}
 124
 125static void perf_session__destroy_kernel_maps(struct perf_session *self)
 
 126{
 127	machine__destroy_kernel_maps(&self->host_machine);
 128	machines__destroy_guest_kernel_maps(&self->machines);
 
 
 
 129}
 130
 131struct perf_session *perf_session__new(const char *filename, int mode,
 132				       bool force, bool repipe,
 133				       struct perf_event_ops *ops)
 134{
 135	size_t len = filename ? strlen(filename) + 1 : 0;
 136	struct perf_session *self = zalloc(sizeof(*self) + len);
 137
 138	if (self == NULL)
 139		goto out;
 140
 141	memcpy(self->filename, filename, len);
 142	self->threads = RB_ROOT;
 143	INIT_LIST_HEAD(&self->dead_threads);
 144	self->last_match = NULL;
 145	/*
 146	 * On 64bit we can mmap the data file in one go. No need for tiny mmap
 147	 * slices. On 32bit we use 32MB.
 148	 */
 149#if BITS_PER_LONG == 64
 150	self->mmap_window = ULLONG_MAX;
 151#else
 152	self->mmap_window = 32 * 1024 * 1024ULL;
 153#endif
 154	self->machines = RB_ROOT;
 155	self->repipe = repipe;
 156	INIT_LIST_HEAD(&self->ordered_samples.samples);
 157	INIT_LIST_HEAD(&self->ordered_samples.sample_cache);
 158	INIT_LIST_HEAD(&self->ordered_samples.to_free);
 159	machine__init(&self->host_machine, "", HOST_KERNEL_ID);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 160
 161	if (mode == O_RDONLY) {
 162		if (perf_session__open(self, force) < 0)
 163			goto out_delete;
 164		perf_session__update_sample_type(self);
 165	} else if (mode == O_WRONLY) {
 166		/*
 167		 * In O_RDONLY mode this will be performed when reading the
 168		 * kernel MMAP event, in perf_event__process_mmap().
 169		 */
 170		if (perf_session__create_kernel_maps(self) < 0)
 171			goto out_delete;
 172	}
 173
 174	if (ops && ops->ordering_requires_timestamps &&
 175	    ops->ordered_samples && !self->sample_id_all) {
 
 
 
 
 176		dump_printf("WARNING: No sample_id_all support, falling back to unordered processing\n");
 177		ops->ordered_samples = false;
 178	}
 179
 180out:
 181	return self;
 182out_delete:
 183	perf_session__delete(self);
 184	return NULL;
 
 185}
 186
 187static void perf_session__delete_dead_threads(struct perf_session *self)
 188{
 189	struct thread *n, *t;
 
 190
 191	list_for_each_entry_safe(t, n, &self->dead_threads, node) {
 192		list_del(&t->node);
 193		thread__delete(t);
 194	}
 
 
 
 
 
 
 
 
 
 195}
 196
 197static void perf_session__delete_threads(struct perf_session *self)
 198{
 199	struct rb_node *nd = rb_first(&self->threads);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 200
 201	while (nd) {
 202		struct thread *t = rb_entry(nd, struct thread, rb_node);
 203
 204		rb_erase(&t->rb_node, &self->threads);
 205		nd = rb_next(nd);
 206		thread__delete(t);
 207	}
 208}
 209
 210void perf_session__delete(struct perf_session *self)
 
 
 
 211{
 212	perf_session__destroy_kernel_maps(self);
 213	perf_session__delete_dead_threads(self);
 214	perf_session__delete_threads(self);
 215	machine__exit(&self->host_machine);
 216	close(self->fd);
 217	free(self);
 218}
 219
 220void perf_session__remove_thread(struct perf_session *self, struct thread *th)
 
 
 
 
 221{
 222	self->last_match = NULL;
 223	rb_erase(&th->rb_node, &self->threads);
 224	/*
 225	 * We may have references to this thread, for instance in some hist_entry
 226	 * instances, so just move them to a separate list.
 227	 */
 228	list_add_tail(&th->node, &self->dead_threads);
 229}
 230
 231static bool symbol__match_parent_regex(struct symbol *sym)
 
 
 
 232{
 233	if (sym->name && !regexec(&parent_regex, sym->name, 0, NULL, 0))
 234		return 1;
 235
 236	return 0;
 237}
 238
 239int perf_session__resolve_callchain(struct perf_session *self,
 240				    struct thread *thread,
 241				    struct ip_callchain *chain,
 242				    struct symbol **parent)
 243{
 244	u8 cpumode = PERF_RECORD_MISC_USER;
 245	unsigned int i;
 246	int err;
 247
 248	callchain_cursor_reset(&self->callchain_cursor);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 249
 250	for (i = 0; i < chain->nr; i++) {
 251		u64 ip;
 252		struct addr_location al;
 253
 254		if (callchain_param.order == ORDER_CALLEE)
 255			ip = chain->ips[i];
 256		else
 257			ip = chain->ips[chain->nr - i - 1];
 
 
 
 
 258
 259		if (ip >= PERF_CONTEXT_MAX) {
 260			switch (ip) {
 261			case PERF_CONTEXT_HV:
 262				cpumode = PERF_RECORD_MISC_HYPERVISOR;	break;
 263			case PERF_CONTEXT_KERNEL:
 264				cpumode = PERF_RECORD_MISC_KERNEL;	break;
 265			case PERF_CONTEXT_USER:
 266				cpumode = PERF_RECORD_MISC_USER;	break;
 267			default:
 268				break;
 269			}
 270			continue;
 271		}
 272
 273		al.filtered = false;
 274		thread__find_addr_location(thread, self, cpumode,
 275				MAP__FUNCTION, thread->pid, ip, &al, NULL);
 276		if (al.sym != NULL) {
 277			if (sort__has_parent && !*parent &&
 278			    symbol__match_parent_regex(al.sym))
 279				*parent = al.sym;
 280			if (!symbol_conf.use_callchain)
 281				break;
 282		}
 283
 284		err = callchain_cursor_append(&self->callchain_cursor,
 285					      ip, al.map, al.sym);
 286		if (err)
 287			return err;
 288	}
 
 289
 
 290	return 0;
 291}
 292
 293static int process_event_synth_stub(union perf_event *event __used,
 294				    struct perf_session *session __used)
 
 295{
 
 
 
 296	dump_printf(": unhandled!\n");
 297	return 0;
 298}
 299
 300static int process_event_sample_stub(union perf_event *event __used,
 301				     struct perf_sample *sample __used,
 302				     struct perf_evsel *evsel __used,
 303				     struct perf_session *session __used)
 304{
 
 
 
 305	dump_printf(": unhandled!\n");
 306	return 0;
 307}
 308
 309static int process_event_stub(union perf_event *event __used,
 310			      struct perf_sample *sample __used,
 311			      struct perf_session *session __used)
 312{
 
 
 
 313	dump_printf(": unhandled!\n");
 314	return 0;
 315}
 316
 317static int process_finished_round_stub(union perf_event *event __used,
 318				       struct perf_session *session __used,
 319				       struct perf_event_ops *ops __used)
 320{
 
 
 
 321	dump_printf(": unhandled!\n");
 322	return 0;
 323}
 324
 325static int process_finished_round(union perf_event *event,
 326				  struct perf_session *session,
 327				  struct perf_event_ops *ops);
 328
 329static void perf_event_ops__fill_defaults(struct perf_event_ops *handler)
 330{
 331	if (handler->sample == NULL)
 332		handler->sample = process_event_sample_stub;
 333	if (handler->mmap == NULL)
 334		handler->mmap = process_event_stub;
 335	if (handler->comm == NULL)
 336		handler->comm = process_event_stub;
 337	if (handler->fork == NULL)
 338		handler->fork = process_event_stub;
 339	if (handler->exit == NULL)
 340		handler->exit = process_event_stub;
 341	if (handler->lost == NULL)
 342		handler->lost = perf_event__process_lost;
 343	if (handler->read == NULL)
 344		handler->read = process_event_stub;
 345	if (handler->throttle == NULL)
 346		handler->throttle = process_event_stub;
 347	if (handler->unthrottle == NULL)
 348		handler->unthrottle = process_event_stub;
 349	if (handler->attr == NULL)
 350		handler->attr = process_event_synth_stub;
 351	if (handler->event_type == NULL)
 352		handler->event_type = process_event_synth_stub;
 353	if (handler->tracing_data == NULL)
 354		handler->tracing_data = process_event_synth_stub;
 355	if (handler->build_id == NULL)
 356		handler->build_id = process_event_synth_stub;
 357	if (handler->finished_round == NULL) {
 358		if (handler->ordered_samples)
 359			handler->finished_round = process_finished_round;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 360		else
 361			handler->finished_round = process_finished_round_stub;
 362	}
 363}
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 364
 365void mem_bswap_64(void *src, int byte_size)
 366{
 367	u64 *m = src;
 368
 369	while (byte_size > 0) {
 370		*m = bswap_64(*m);
 371		byte_size -= sizeof(u64);
 372		++m;
 373	}
 374}
 375
 376static void perf_event__all64_swap(union perf_event *event)
 
 377{
 378	struct perf_event_header *hdr = &event->header;
 379	mem_bswap_64(hdr + 1, event->header.size - sizeof(*hdr));
 380}
 381
 382static void perf_event__comm_swap(union perf_event *event)
 383{
 384	event->comm.pid = bswap_32(event->comm.pid);
 385	event->comm.tid = bswap_32(event->comm.tid);
 
 
 
 
 
 
 
 386}
 387
 388static void perf_event__mmap_swap(union perf_event *event)
 
 389{
 390	event->mmap.pid	  = bswap_32(event->mmap.pid);
 391	event->mmap.tid	  = bswap_32(event->mmap.tid);
 392	event->mmap.start = bswap_64(event->mmap.start);
 393	event->mmap.len	  = bswap_64(event->mmap.len);
 394	event->mmap.pgoff = bswap_64(event->mmap.pgoff);
 
 
 
 
 
 
 
 395}
 396
 397static void perf_event__task_swap(union perf_event *event)
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 398{
 399	event->fork.pid	 = bswap_32(event->fork.pid);
 400	event->fork.tid	 = bswap_32(event->fork.tid);
 401	event->fork.ppid = bswap_32(event->fork.ppid);
 402	event->fork.ptid = bswap_32(event->fork.ptid);
 403	event->fork.time = bswap_64(event->fork.time);
 
 
 
 404}
 405
 406static void perf_event__read_swap(union perf_event *event)
 407{
 408	event->read.pid		 = bswap_32(event->read.pid);
 409	event->read.tid		 = bswap_32(event->read.tid);
 410	event->read.value	 = bswap_64(event->read.value);
 411	event->read.time_enabled = bswap_64(event->read.time_enabled);
 412	event->read.time_running = bswap_64(event->read.time_running);
 413	event->read.id		 = bswap_64(event->read.id);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 414}
 415
 416/* exported for swapping attributes in file header */
 417void perf_event__attr_swap(struct perf_event_attr *attr)
 418{
 419	attr->type		= bswap_32(attr->type);
 420	attr->size		= bswap_32(attr->size);
 421	attr->config		= bswap_64(attr->config);
 422	attr->sample_period	= bswap_64(attr->sample_period);
 423	attr->sample_type	= bswap_64(attr->sample_type);
 424	attr->read_format	= bswap_64(attr->read_format);
 425	attr->wakeup_events	= bswap_32(attr->wakeup_events);
 426	attr->bp_type		= bswap_32(attr->bp_type);
 427	attr->bp_addr		= bswap_64(attr->bp_addr);
 428	attr->bp_len		= bswap_64(attr->bp_len);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 429}
 430
 431static void perf_event__hdr_attr_swap(union perf_event *event)
 
 432{
 433	size_t size;
 434
 435	perf_event__attr_swap(&event->attr.attr);
 436
 437	size = event->header.size;
 438	size -= (void *)&event->attr.id - (void *)event;
 439	mem_bswap_64(event->attr.id, size);
 440}
 441
 442static void perf_event__event_type_swap(union perf_event *event)
 
 
 
 
 
 
 
 
 443{
 444	event->event_type.event_type.event_id =
 445		bswap_64(event->event_type.event_type.event_id);
 446}
 447
 448static void perf_event__tracing_data_swap(union perf_event *event)
 
 449{
 450	event->tracing_data.size = bswap_32(event->tracing_data.size);
 451}
 452
 453typedef void (*perf_event__swap_op)(union perf_event *event);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 454
 455static perf_event__swap_op perf_event__swap_ops[] = {
 456	[PERF_RECORD_MMAP]		  = perf_event__mmap_swap,
 
 457	[PERF_RECORD_COMM]		  = perf_event__comm_swap,
 458	[PERF_RECORD_FORK]		  = perf_event__task_swap,
 459	[PERF_RECORD_EXIT]		  = perf_event__task_swap,
 460	[PERF_RECORD_LOST]		  = perf_event__all64_swap,
 461	[PERF_RECORD_READ]		  = perf_event__read_swap,
 
 
 462	[PERF_RECORD_SAMPLE]		  = perf_event__all64_swap,
 
 
 
 
 
 
 463	[PERF_RECORD_HEADER_ATTR]	  = perf_event__hdr_attr_swap,
 464	[PERF_RECORD_HEADER_EVENT_TYPE]	  = perf_event__event_type_swap,
 465	[PERF_RECORD_HEADER_TRACING_DATA] = perf_event__tracing_data_swap,
 466	[PERF_RECORD_HEADER_BUILD_ID]	  = NULL,
 
 
 
 
 
 
 
 
 
 
 
 467	[PERF_RECORD_HEADER_MAX]	  = NULL,
 468};
 469
 470struct sample_queue {
 471	u64			timestamp;
 472	u64			file_offset;
 473	union perf_event	*event;
 474	struct list_head	list;
 475};
 476
 477static void perf_session_free_sample_buffers(struct perf_session *session)
 478{
 479	struct ordered_samples *os = &session->ordered_samples;
 480
 481	while (!list_empty(&os->to_free)) {
 482		struct sample_queue *sq;
 483
 484		sq = list_entry(os->to_free.next, struct sample_queue, list);
 485		list_del(&sq->list);
 486		free(sq);
 487	}
 488}
 489
 490static int perf_session_deliver_event(struct perf_session *session,
 491				      union perf_event *event,
 492				      struct perf_sample *sample,
 493				      struct perf_event_ops *ops,
 494				      u64 file_offset);
 495
 496static void flush_sample_queue(struct perf_session *s,
 497			       struct perf_event_ops *ops)
 498{
 499	struct ordered_samples *os = &s->ordered_samples;
 500	struct list_head *head = &os->samples;
 501	struct sample_queue *tmp, *iter;
 502	struct perf_sample sample;
 503	u64 limit = os->next_flush;
 504	u64 last_ts = os->last_sample ? os->last_sample->timestamp : 0ULL;
 505	int ret;
 506
 507	if (!ops->ordered_samples || !limit)
 508		return;
 509
 510	list_for_each_entry_safe(iter, tmp, head, list) {
 511		if (iter->timestamp > limit)
 512			break;
 513
 514		ret = perf_session__parse_sample(s, iter->event, &sample);
 515		if (ret)
 516			pr_err("Can't parse sample, err = %d\n", ret);
 517		else
 518			perf_session_deliver_event(s, iter->event, &sample, ops,
 519						   iter->file_offset);
 520
 521		os->last_flush = iter->timestamp;
 522		list_del(&iter->list);
 523		list_add(&iter->list, &os->sample_cache);
 524	}
 525
 526	if (list_empty(head)) {
 527		os->last_sample = NULL;
 528	} else if (last_ts <= limit) {
 529		os->last_sample =
 530			list_entry(head->prev, struct sample_queue, list);
 531	}
 532}
 533
 534/*
 535 * When perf record finishes a pass on every buffers, it records this pseudo
 536 * event.
 537 * We record the max timestamp t found in the pass n.
 538 * Assuming these timestamps are monotonic across cpus, we know that if
 539 * a buffer still has events with timestamps below t, they will be all
 540 * available and then read in the pass n + 1.
 541 * Hence when we start to read the pass n + 2, we can safely flush every
 542 * events with timestamps below t.
 543 *
 544 *    ============ PASS n =================
 545 *       CPU 0         |   CPU 1
 546 *                     |
 547 *    cnt1 timestamps  |   cnt2 timestamps
 548 *          1          |         2
 549 *          2          |         3
 550 *          -          |         4  <--- max recorded
 551 *
 552 *    ============ PASS n + 1 ==============
 553 *       CPU 0         |   CPU 1
 554 *                     |
 555 *    cnt1 timestamps  |   cnt2 timestamps
 556 *          3          |         5
 557 *          4          |         6
 558 *          5          |         7 <---- max recorded
 559 *
 560 *      Flush every events below timestamp 4
 561 *
 562 *    ============ PASS n + 2 ==============
 563 *       CPU 0         |   CPU 1
 564 *                     |
 565 *    cnt1 timestamps  |   cnt2 timestamps
 566 *          6          |         8
 567 *          7          |         9
 568 *          -          |         10
 569 *
 570 *      Flush every events below timestamp 7
 571 *      etc...
 572 */
 573static int process_finished_round(union perf_event *event __used,
 574				  struct perf_session *session,
 575				  struct perf_event_ops *ops)
 576{
 577	flush_sample_queue(session, ops);
 578	session->ordered_samples.next_flush = session->ordered_samples.max_timestamp;
 
 
 579
 580	return 0;
 
 
 
 581}
 582
 583/* The queue is ordered by time */
 584static void __queue_event(struct sample_queue *new, struct perf_session *s)
 585{
 586	struct ordered_samples *os = &s->ordered_samples;
 587	struct sample_queue *sample = os->last_sample;
 588	u64 timestamp = new->timestamp;
 589	struct list_head *p;
 590
 591	os->last_sample = new;
 592
 593	if (!sample) {
 594		list_add(&new->list, &os->samples);
 595		os->max_timestamp = timestamp;
 596		return;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 597	}
 
 
 
 
 
 
 
 
 
 
 
 
 598
 599	/*
 600	 * last_sample might point to some random place in the list as it's
 601	 * the last queued event. We expect that the new event is close to
 602	 * this.
 603	 */
 604	if (sample->timestamp <= timestamp) {
 605		while (sample->timestamp <= timestamp) {
 606			p = sample->list.next;
 607			if (p == &os->samples) {
 608				list_add_tail(&new->list, &os->samples);
 609				os->max_timestamp = timestamp;
 610				return;
 611			}
 612			sample = list_entry(p, struct sample_queue, list);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 613		}
 614		list_add_tail(&new->list, &sample->list);
 615	} else {
 616		while (sample->timestamp > timestamp) {
 617			p = sample->list.prev;
 618			if (p == &os->samples) {
 619				list_add(&new->list, &os->samples);
 620				return;
 621			}
 622			sample = list_entry(p, struct sample_queue, list);
 623		}
 624		list_add(&new->list, &sample->list);
 625	}
 626}
 627
 628#define MAX_SAMPLE_BUFFER	(64 * 1024 / sizeof(struct sample_queue))
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 629
 630static int perf_session_queue_event(struct perf_session *s, union perf_event *event,
 631				    struct perf_sample *sample, u64 file_offset)
 632{
 633	struct ordered_samples *os = &s->ordered_samples;
 634	struct list_head *sc = &os->sample_cache;
 635	u64 timestamp = sample->time;
 636	struct sample_queue *new;
 637
 638	if (!timestamp || timestamp == ~0ULL)
 639		return -ETIME;
 640
 641	if (timestamp < s->ordered_samples.last_flush) {
 642		printf("Warning: Timestamp below last timeslice flush\n");
 643		return -EINVAL;
 644	}
 645
 646	if (!list_empty(sc)) {
 647		new = list_entry(sc->next, struct sample_queue, list);
 648		list_del(&new->list);
 649	} else if (os->sample_buffer) {
 650		new = os->sample_buffer + os->sample_buffer_idx;
 651		if (++os->sample_buffer_idx == MAX_SAMPLE_BUFFER)
 652			os->sample_buffer = NULL;
 653	} else {
 654		os->sample_buffer = malloc(MAX_SAMPLE_BUFFER * sizeof(*new));
 655		if (!os->sample_buffer)
 656			return -ENOMEM;
 657		list_add(&os->sample_buffer->list, &os->to_free);
 658		os->sample_buffer_idx = 2;
 659		new = os->sample_buffer + 1;
 660	}
 661
 662	new->timestamp = timestamp;
 663	new->file_offset = file_offset;
 664	new->event = event;
 665
 666	__queue_event(new, s);
 
 
 667
 668	return 0;
 
 669}
 670
 671static void callchain__printf(struct perf_sample *sample)
 672{
 673	unsigned int i;
 674
 675	printf("... chain: nr:%" PRIu64 "\n", sample->callchain->nr);
 
 
 676
 677	for (i = 0; i < sample->callchain->nr; i++)
 678		printf("..... %2d: %016" PRIx64 "\n",
 679		       i, sample->callchain->ips[i]);
 
 680}
 681
 682static void perf_session__print_tstamp(struct perf_session *session,
 683				       union perf_event *event,
 684				       struct perf_sample *sample)
 685{
 
 
 686	if (event->header.type != PERF_RECORD_SAMPLE &&
 687	    !session->sample_id_all) {
 688		fputs("-1 -1 ", stdout);
 689		return;
 690	}
 691
 692	if ((session->sample_type & PERF_SAMPLE_CPU))
 693		printf("%u ", sample->cpu);
 694
 695	if (session->sample_type & PERF_SAMPLE_TIME)
 696		printf("%" PRIu64 " ", sample->time);
 697}
 698
 699static void dump_event(struct perf_session *session, union perf_event *event,
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 700		       u64 file_offset, struct perf_sample *sample)
 701{
 702	if (!dump_trace)
 703		return;
 704
 705	printf("\n%#" PRIx64 " [%#x]: event: %d\n",
 706	       file_offset, event->header.size, event->header.type);
 707
 708	trace_event(event);
 
 
 709
 710	if (sample)
 711		perf_session__print_tstamp(session, event, sample);
 712
 713	printf("%#" PRIx64 " [%#x]: PERF_RECORD_%s", file_offset,
 714	       event->header.size, perf_event__name(event->header.type));
 715}
 716
 717static void dump_sample(struct perf_session *session, union perf_event *event,
 718			struct perf_sample *sample)
 719{
 
 
 720	if (!dump_trace)
 721		return;
 722
 723	printf("(IP, %d): %d/%d: %#" PRIx64 " period: %" PRIu64 " addr: %#" PRIx64 "\n",
 724	       event->header.misc, sample->pid, sample->tid, sample->ip,
 725	       sample->period, sample->addr);
 726
 727	if (session->sample_type & PERF_SAMPLE_CALLCHAIN)
 728		callchain__printf(sample);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 729}
 730
 731static int perf_session_deliver_event(struct perf_session *session,
 732				      union perf_event *event,
 733				      struct perf_sample *sample,
 734				      struct perf_event_ops *ops,
 735				      u64 file_offset)
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 736{
 737	struct perf_evsel *evsel;
 
 
 
 738
 739	dump_event(session, event, file_offset, sample);
 
 
 740
 741	switch (event->header.type) {
 742	case PERF_RECORD_SAMPLE:
 743		dump_sample(session, event, sample);
 744		evsel = perf_evlist__id2evsel(session->evlist, sample->id);
 745		if (evsel == NULL) {
 746			++session->hists.stats.nr_unknown_id;
 747			return -1;
 
 
 
 
 
 748		}
 749		return ops->sample(event, sample, evsel, session);
 750	case PERF_RECORD_MMAP:
 751		return ops->mmap(event, sample, session);
 
 
 
 
 752	case PERF_RECORD_COMM:
 753		return ops->comm(event, sample, session);
 
 
 754	case PERF_RECORD_FORK:
 755		return ops->fork(event, sample, session);
 756	case PERF_RECORD_EXIT:
 757		return ops->exit(event, sample, session);
 758	case PERF_RECORD_LOST:
 759		return ops->lost(event, sample, session);
 
 
 
 
 
 
 760	case PERF_RECORD_READ:
 761		return ops->read(event, sample, session);
 
 762	case PERF_RECORD_THROTTLE:
 763		return ops->throttle(event, sample, session);
 764	case PERF_RECORD_UNTHROTTLE:
 765		return ops->unthrottle(event, sample, session);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 766	default:
 767		++session->hists.stats.nr_unknown_events;
 768		return -1;
 769	}
 770}
 771
 772static int perf_session__preprocess_sample(struct perf_session *session,
 773					   union perf_event *event, struct perf_sample *sample)
 
 
 774{
 775	if (event->header.type != PERF_RECORD_SAMPLE ||
 776	    !(session->sample_type & PERF_SAMPLE_CALLCHAIN))
 
 
 
 
 
 
 
 
 
 
 
 777		return 0;
 778
 779	if (!ip_callchain__valid(sample->callchain, event)) {
 780		pr_debug("call-chain problem with event, skipping it.\n");
 781		++session->hists.stats.nr_invalid_chains;
 782		session->hists.stats.total_invalid_chains += sample->period;
 783		return -EINVAL;
 784	}
 785	return 0;
 786}
 787
 788static int perf_session__process_user_event(struct perf_session *session, union perf_event *event,
 789					    struct perf_event_ops *ops, u64 file_offset)
 790{
 791	dump_event(session, event, file_offset, NULL);
 
 
 
 
 
 
 
 
 
 792
 793	/* These events are processed right away */
 794	switch (event->header.type) {
 795	case PERF_RECORD_HEADER_ATTR:
 796		return ops->attr(event, session);
 
 
 
 
 
 
 
 797	case PERF_RECORD_HEADER_EVENT_TYPE:
 798		return ops->event_type(event, session);
 
 
 
 
 799	case PERF_RECORD_HEADER_TRACING_DATA:
 800		/* setup for reading amidst mmap */
 801		lseek(session->fd, file_offset, SEEK_SET);
 802		return ops->tracing_data(event, session);
 803	case PERF_RECORD_HEADER_BUILD_ID:
 804		return ops->build_id(event, session);
 805	case PERF_RECORD_FINISHED_ROUND:
 806		return ops->finished_round(event, session, ops);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 807	default:
 808		return -EINVAL;
 809	}
 810}
 811
 812static int perf_session__process_event(struct perf_session *session,
 813				       union perf_event *event,
 814				       struct perf_event_ops *ops,
 815				       u64 file_offset)
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 816{
 817	struct perf_sample sample;
 
 818	int ret;
 819
 820	if (session->header.needs_swap &&
 821	    perf_event__swap_ops[event->header.type])
 822		perf_event__swap_ops[event->header.type](event);
 823
 824	if (event->header.type >= PERF_RECORD_HEADER_MAX)
 825		return -EINVAL;
 826
 827	hists__inc_nr_events(&session->hists, event->header.type);
 828
 829	if (event->header.type >= PERF_RECORD_USER_TYPE_START)
 830		return perf_session__process_user_event(session, event, ops, file_offset);
 831
 832	/*
 833	 * For all kernel events we get the sample data
 834	 */
 835	ret = perf_session__parse_sample(session, event, &sample);
 836	if (ret)
 837		return ret;
 838
 839	/* Preprocess sample records - precheck callchains */
 840	if (perf_session__preprocess_sample(session, event, &sample))
 841		return 0;
 842
 843	if (ops->ordered_samples) {
 844		ret = perf_session_queue_event(session, event, &sample,
 845					       file_offset);
 846		if (ret != -ETIME)
 847			return ret;
 848	}
 849
 850	return perf_session_deliver_event(session, event, &sample, ops,
 851					  file_offset);
 
 
 
 
 
 
 852}
 853
 854void perf_event_header__bswap(struct perf_event_header *self)
 855{
 856	self->type = bswap_32(self->type);
 857	self->misc = bswap_16(self->misc);
 858	self->size = bswap_16(self->size);
 859}
 860
 861static struct thread *perf_session__register_idle_thread(struct perf_session *self)
 
 
 
 
 
 
 
 862{
 863	struct thread *thread = perf_session__findnew(self, 0);
 
 
 
 
 
 
 
 864
 865	if (thread == NULL || thread__set_comm(thread, "swapper")) {
 866		pr_err("problem inserting idle task.\n");
 867		thread = NULL;
 868	}
 869
 870	return thread;
 
 
 871}
 872
 873static void perf_session__warn_about_errors(const struct perf_session *session,
 874					    const struct perf_event_ops *ops)
 875{
 876	if (ops->lost == perf_event__process_lost &&
 877	    session->hists.stats.total_lost != 0) {
 878		ui__warning("Processed %" PRIu64 " events and LOST %" PRIu64
 879			    "!\n\nCheck IO/CPU overload!\n\n",
 880			    session->hists.stats.total_period,
 881			    session->hists.stats.total_lost);
 
 882	}
 883
 884	if (session->hists.stats.nr_unknown_events != 0) {
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 885		ui__warning("Found %u unknown events!\n\n"
 886			    "Is this an older tool processing a perf.data "
 887			    "file generated by a more recent tool?\n\n"
 888			    "If that is not the case, consider "
 889			    "reporting to linux-kernel@vger.kernel.org.\n\n",
 890			    session->hists.stats.nr_unknown_events);
 891	}
 892
 893	if (session->hists.stats.nr_unknown_id != 0) {
 894		ui__warning("%u samples with id not present in the header\n",
 895			    session->hists.stats.nr_unknown_id);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 896	}
 897
 898 	if (session->hists.stats.nr_invalid_chains != 0) {
 899 		ui__warning("Found invalid callchains!\n\n"
 900 			    "%u out of %u events were discarded for this reason.\n\n"
 901 			    "Consider reporting to linux-kernel@vger.kernel.org.\n\n",
 902 			    session->hists.stats.nr_invalid_chains,
 903 			    session->hists.stats.nr_events[PERF_RECORD_SAMPLE]);
 904 	}
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 905}
 906
 907#define session_done()	(*(volatile int *)(&session_done))
 908volatile int session_done;
 909
 910static int __perf_session__process_pipe_events(struct perf_session *self,
 911					       struct perf_event_ops *ops)
 
 912{
 913	union perf_event event;
 914	uint32_t size;
 915	int skip = 0;
 
 
 
 
 916	u64 head;
 917	int err;
 918	void *p;
 919
 920	perf_event_ops__fill_defaults(ops);
 921
 922	head = 0;
 
 
 
 
 
 
 923more:
 924	err = readn(self->fd, &event, sizeof(struct perf_event_header));
 
 925	if (err <= 0) {
 926		if (err == 0)
 927			goto done;
 928
 929		pr_err("failed to read event header\n");
 930		goto out_err;
 931	}
 932
 933	if (self->header.needs_swap)
 934		perf_event_header__bswap(&event.header);
 935
 936	size = event.header.size;
 937	if (size == 0)
 938		size = 8;
 
 
 939
 940	p = &event;
 
 
 
 
 
 
 
 
 
 
 941	p += sizeof(struct perf_event_header);
 942
 943	if (size - sizeof(struct perf_event_header)) {
 944		err = readn(self->fd, p, size - sizeof(struct perf_event_header));
 945		if (err <= 0) {
 946			if (err == 0) {
 947				pr_err("unexpected end of event stream\n");
 948				goto done;
 949			}
 950
 951			pr_err("failed to read event data\n");
 952			goto out_err;
 953		}
 954	}
 955
 956	if (size == 0 ||
 957	    (skip = perf_session__process_event(self, &event, ops, head)) < 0) {
 958		dump_printf("%#" PRIx64 " [%#x]: skipping unknown header type: %d\n",
 959			    head, event.header.size, event.header.type);
 960		/*
 961		 * assume we lost track of the stream, check alignment, and
 962		 * increment a single u64 in the hope to catch on again 'soon'.
 963		 */
 964		if (unlikely(head & 7))
 965			head &= ~7ULL;
 966
 967		size = 8;
 968	}
 969
 970	head += size;
 971
 972	if (skip > 0)
 973		head += skip;
 974
 
 
 
 
 975	if (!session_done())
 976		goto more;
 977done:
 978	err = 0;
 
 
 
 
 
 
 
 979out_err:
 980	perf_session__warn_about_errors(self, ops);
 981	perf_session_free_sample_buffers(self);
 
 
 
 982	return err;
 983}
 984
 985static union perf_event *
 986fetch_mmaped_event(struct perf_session *session,
 987		   u64 head, size_t mmap_size, char *buf)
 988{
 989	union perf_event *event;
 990
 991	/*
 992	 * Ensure we have enough space remaining to read
 993	 * the size of the event in the headers.
 994	 */
 995	if (head + sizeof(event->header) > mmap_size)
 996		return NULL;
 997
 998	event = (union perf_event *)(buf + head);
 999
1000	if (session->header.needs_swap)
1001		perf_event_header__bswap(&event->header);
1002
1003	if (head + event->header.size > mmap_size)
1004		return NULL;
 
 
 
 
 
 
1005
1006	return event;
1007}
1008
1009int __perf_session__process_events(struct perf_session *session,
1010				   u64 data_offset, u64 data_size,
1011				   u64 file_size, struct perf_event_ops *ops)
1012{
1013	u64 head, page_offset, file_offset, file_pos, progress_next;
1014	int err, mmap_prot, mmap_flags, map_idx = 0;
1015	struct ui_progress *progress;
1016	size_t	page_size, mmap_size;
1017	char *buf, *mmaps[8];
1018	union perf_event *event;
1019	uint32_t size;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1020
1021	perf_event_ops__fill_defaults(ops);
 
 
 
 
 
 
 
 
 
1022
1023	page_size = sysconf(_SC_PAGESIZE);
 
 
 
 
 
 
 
 
 
 
1024
1025	page_offset = page_size * (data_offset / page_size);
1026	file_offset = page_offset;
1027	head = data_offset - page_offset;
1028
1029	if (data_offset + data_size < file_size)
1030		file_size = data_offset + data_size;
1031
1032	progress_next = file_size / 16;
1033	progress = ui_progress__new("Processing events...", file_size);
1034	if (progress == NULL)
1035		return -1;
1036
1037	mmap_size = session->mmap_window;
1038	if (mmap_size > file_size)
1039		mmap_size = file_size;
 
 
1040
1041	memset(mmaps, 0, sizeof(mmaps));
1042
1043	mmap_prot  = PROT_READ;
1044	mmap_flags = MAP_SHARED;
1045
1046	if (session->header.needs_swap) {
1047		mmap_prot  |= PROT_WRITE;
1048		mmap_flags = MAP_PRIVATE;
1049	}
1050remap:
1051	buf = mmap(NULL, mmap_size, mmap_prot, mmap_flags, session->fd,
1052		   file_offset);
1053	if (buf == MAP_FAILED) {
1054		pr_err("failed to mmap file\n");
1055		err = -errno;
1056		goto out_err;
1057	}
1058	mmaps[map_idx] = buf;
1059	map_idx = (map_idx + 1) & (ARRAY_SIZE(mmaps) - 1);
1060	file_pos = file_offset + head;
 
 
 
 
1061
1062more:
1063	event = fetch_mmaped_event(session, head, mmap_size, buf);
 
 
 
1064	if (!event) {
1065		if (mmaps[map_idx]) {
1066			munmap(mmaps[map_idx], mmap_size);
1067			mmaps[map_idx] = NULL;
1068		}
1069
1070		page_offset = page_size * (head / page_size);
1071		file_offset += page_offset;
1072		head -= page_offset;
1073		goto remap;
1074	}
1075
1076	size = event->header.size;
1077
1078	if (size == 0 ||
1079	    perf_session__process_event(session, event, ops, file_pos) < 0) {
1080		dump_printf("%#" PRIx64 " [%#x]: skipping unknown header type: %d\n",
1081			    file_offset + head, event->header.size,
1082			    event->header.type);
1083		/*
1084		 * assume we lost track of the stream, check alignment, and
1085		 * increment a single u64 in the hope to catch on again 'soon'.
1086		 */
1087		if (unlikely(head & 7))
1088			head &= ~7ULL;
1089
1090		size = 8;
 
 
 
 
 
 
1091	}
1092
 
 
 
1093	head += size;
1094	file_pos += size;
1095
1096	if (file_pos >= progress_next) {
1097		progress_next += file_size / 16;
1098		ui_progress__update(progress, file_pos);
1099	}
 
 
 
 
1100
1101	if (file_pos < file_size)
1102		goto more;
1103
1104	err = 0;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1105	/* do the final flush for ordered samples */
1106	session->ordered_samples.next_flush = ULLONG_MAX;
1107	flush_sample_queue(session, ops);
 
 
 
 
 
1108out_err:
1109	ui_progress__delete(progress);
1110	perf_session__warn_about_errors(session, ops);
1111	perf_session_free_sample_buffers(session);
 
 
 
 
 
 
 
1112	return err;
1113}
1114
1115int perf_session__process_events(struct perf_session *self,
1116				 struct perf_event_ops *ops)
1117{
1118	int err;
1119
1120	if (perf_session__register_idle_thread(self) == NULL)
1121		return -ENOMEM;
1122
1123	if (!self->fd_pipe)
1124		err = __perf_session__process_events(self,
1125						     self->header.data_offset,
1126						     self->header.data_size,
1127						     self->size, ops);
1128	else
1129		err = __perf_session__process_pipe_events(self, ops);
1130
1131	return err;
1132}
1133
1134bool perf_session__has_traces(struct perf_session *self, const char *msg)
1135{
1136	if (!(self->sample_type & PERF_SAMPLE_RAW)) {
1137		pr_err("No trace sample to read. Did you call 'perf %s'?\n", msg);
1138		return false;
 
 
1139	}
1140
1141	return true;
 
1142}
1143
1144int perf_session__set_kallsyms_ref_reloc_sym(struct map **maps,
1145					     const char *symbol_name,
1146					     u64 addr)
1147{
1148	char *bracket;
1149	enum map_type i;
1150	struct ref_reloc_sym *ref;
 
1151
1152	ref = zalloc(sizeof(struct ref_reloc_sym));
1153	if (ref == NULL)
1154		return -ENOMEM;
1155
1156	ref->name = strdup(symbol_name);
1157	if (ref->name == NULL) {
1158		free(ref);
1159		return -ENOMEM;
1160	}
1161
1162	bracket = strchr(ref->name, ']');
1163	if (bracket)
1164		*bracket = '\0';
1165
1166	ref->addr = addr;
1167
1168	for (i = 0; i < MAP__NR_TYPES; ++i) {
1169		struct kmap *kmap = map__kmap(maps[i]);
1170		kmap->ref_reloc_sym = ref;
1171	}
1172
1173	return 0;
1174}
1175
1176size_t perf_session__fprintf_dsos(struct perf_session *self, FILE *fp)
1177{
1178	return __dsos__fprintf(&self->host_machine.kernel_dsos, fp) +
1179	       __dsos__fprintf(&self->host_machine.user_dsos, fp) +
1180	       machines__fprintf_dsos(&self->machines, fp);
1181}
1182
1183size_t perf_session__fprintf_dsos_buildid(struct perf_session *self, FILE *fp,
1184					  bool with_hits)
1185{
1186	size_t ret = machine__fprintf_dsos_buildid(&self->host_machine, fp, with_hits);
1187	return ret + machines__fprintf_dsos_buildid(&self->machines, fp, with_hits);
1188}
1189
1190size_t perf_session__fprintf_nr_events(struct perf_session *session, FILE *fp)
1191{
1192	struct perf_evsel *pos;
1193	size_t ret = fprintf(fp, "Aggregated stats:\n");
1194
1195	ret += hists__fprintf_nr_events(&session->hists, fp);
 
1196
1197	list_for_each_entry(pos, &session->evlist->entries, node) {
1198		ret += fprintf(fp, "%s stats:\n", event_name(pos));
1199		ret += hists__fprintf_nr_events(&pos->hists, fp);
1200	}
1201
 
1202	return ret;
1203}
1204
1205struct perf_evsel *perf_session__find_first_evtype(struct perf_session *session,
 
 
 
 
 
 
 
 
 
1206					      unsigned int type)
1207{
1208	struct perf_evsel *pos;
1209
1210	list_for_each_entry(pos, &session->evlist->entries, node) {
1211		if (pos->attr.type == type)
1212			return pos;
1213	}
1214	return NULL;
1215}
1216
1217void perf_session__print_ip(union perf_event *event,
1218			    struct perf_sample *sample,
1219			    struct perf_session *session,
1220			    int print_sym, int print_dso)
1221{
1222	struct addr_location al;
1223	const char *symname, *dsoname;
1224	struct callchain_cursor *cursor = &session->callchain_cursor;
1225	struct callchain_cursor_node *node;
1226
1227	if (perf_event__preprocess_sample(event, session, &al, sample,
1228					  NULL) < 0) {
1229		error("problem processing %d event, skipping it.\n",
1230			event->header.type);
1231		return;
1232	}
1233
1234	if (symbol_conf.use_callchain && sample->callchain) {
1235
1236		if (perf_session__resolve_callchain(session, al.thread,
1237						sample->callchain, NULL) != 0) {
1238			if (verbose)
1239				error("Failed to resolve callchain. Skipping\n");
1240			return;
1241		}
1242		callchain_cursor_commit(cursor);
1243
1244		while (1) {
1245			node = callchain_cursor_current(cursor);
1246			if (!node)
1247				break;
1248
1249			printf("\t%16" PRIx64, node->ip);
1250			if (print_sym) {
1251				if (node->sym && node->sym->name)
1252					symname = node->sym->name;
1253				else
1254					symname = "";
1255
1256				printf(" %s", symname);
1257			}
1258			if (print_dso) {
1259				if (node->map && node->map->dso && node->map->dso->name)
1260					dsoname = node->map->dso->name;
1261				else
1262					dsoname = "";
1263
1264				printf(" (%s)", dsoname);
1265			}
1266			printf("\n");
1267
1268			callchain_cursor_advance(cursor);
1269		}
1270
1271	} else {
1272		printf("%16" PRIx64, sample->ip);
1273		if (print_sym) {
1274			if (al.sym && al.sym->name)
1275				symname = al.sym->name;
1276			else
1277				symname = "";
1278
1279			printf(" %s", symname);
1280		}
1281
1282		if (print_dso) {
1283			if (al.map && al.map->dso && al.map->dso->name)
1284				dsoname = al.map->dso->name;
1285			else
1286				dsoname = "";
1287
1288			printf(" (%s)", dsoname);
1289		}
1290	}
1291}
1292
1293int perf_session__cpu_bitmap(struct perf_session *session,
1294			     const char *cpu_list, unsigned long *cpu_bitmap)
1295{
1296	int i;
1297	struct cpu_map *map;
 
1298
1299	for (i = 0; i < PERF_TYPE_MAX; ++i) {
1300		struct perf_evsel *evsel;
1301
1302		evsel = perf_session__find_first_evtype(session, i);
1303		if (!evsel)
1304			continue;
1305
1306		if (!(evsel->attr.sample_type & PERF_SAMPLE_CPU)) {
1307			pr_err("File does not contain CPU events. "
1308			       "Remove -c option to proceed.\n");
1309			return -1;
1310		}
1311	}
1312
1313	map = cpu_map__new(cpu_list);
 
 
 
 
1314
1315	for (i = 0; i < map->nr; i++) {
1316		int cpu = map->map[i];
1317
1318		if (cpu >= MAX_NR_CPUS) {
1319			pr_err("Requested CPU %d too large. "
1320			       "Consider raising MAX_NR_CPUS\n", cpu);
1321			return -1;
1322		}
1323
1324		set_bit(cpu, cpu_bitmap);
1325	}
1326
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1327	return 0;
1328}