]> git.proxmox.com Git - mirror_ubuntu-bionic-kernel.git/blame - tools/perf/util/evlist.c
perf trace: Add header with copyright and background info
[mirror_ubuntu-bionic-kernel.git] / tools / perf / util / evlist.c
CommitLineData
f8a95309
ACM
1/*
2 * Copyright (C) 2011, Red Hat Inc, Arnaldo Carvalho de Melo <acme@redhat.com>
3 *
4 * Parts came from builtin-{top,stat,record}.c, see those files for further
5 * copyright notes.
6 *
7 * Released under the GPL v2. (and only v2, not any later version)
8 */
a8c9ae18 9#include "util.h"
956fa571 10#include <api/fs/fs.h>
5c581041 11#include <poll.h>
f8a95309
ACM
12#include "cpumap.h"
13#include "thread_map.h"
12864b31 14#include "target.h"
361c99a6
ACM
15#include "evlist.h"
16#include "evsel.h"
e3e1a54f 17#include "debug.h"
35b9d88e 18#include <unistd.h>
361c99a6 19
50d08e47 20#include "parse-events.h"
994a1f78 21#include "parse-options.h"
50d08e47 22
f8a95309
ACM
23#include <sys/mman.h>
24
70db7533
ACM
25#include <linux/bitops.h>
26#include <linux/hash.h>
0389cd1f 27#include <linux/log2.h>
70db7533 28
e4b356b5
ACM
29static void perf_evlist__mmap_put(struct perf_evlist *evlist, int idx);
30static void __perf_evlist__munmap(struct perf_evlist *evlist, int idx);
31
f8a95309 32#define FD(e, x, y) (*(int *)xyarray__entry(e->fd, x, y))
a91e5431 33#define SID(e, x, y) xyarray__entry(e->sample_id, x, y)
f8a95309 34
7e2ed097
ACM
35void perf_evlist__init(struct perf_evlist *evlist, struct cpu_map *cpus,
36 struct thread_map *threads)
ef1d1af2
ACM
37{
38 int i;
39
40 for (i = 0; i < PERF_EVLIST__HLIST_SIZE; ++i)
41 INIT_HLIST_HEAD(&evlist->heads[i]);
42 INIT_LIST_HEAD(&evlist->entries);
7e2ed097 43 perf_evlist__set_maps(evlist, cpus, threads);
1b85337d 44 fdarray__init(&evlist->pollfd, 64);
35b9d88e 45 evlist->workload.pid = -1;
ef1d1af2
ACM
46}
47
334fe7a3 48struct perf_evlist *perf_evlist__new(void)
361c99a6
ACM
49{
50 struct perf_evlist *evlist = zalloc(sizeof(*evlist));
51
ef1d1af2 52 if (evlist != NULL)
334fe7a3 53 perf_evlist__init(evlist, NULL, NULL);
361c99a6
ACM
54
55 return evlist;
56}
57
b22d54b0
JO
58struct perf_evlist *perf_evlist__new_default(void)
59{
60 struct perf_evlist *evlist = perf_evlist__new();
61
62 if (evlist && perf_evlist__add_default(evlist)) {
63 perf_evlist__delete(evlist);
64 evlist = NULL;
65 }
66
67 return evlist;
68}
69
75562573
AH
70/**
71 * perf_evlist__set_id_pos - set the positions of event ids.
72 * @evlist: selected event list
73 *
74 * Events with compatible sample types all have the same id_pos
75 * and is_pos. For convenience, put a copy on evlist.
76 */
77void perf_evlist__set_id_pos(struct perf_evlist *evlist)
78{
79 struct perf_evsel *first = perf_evlist__first(evlist);
80
81 evlist->id_pos = first->id_pos;
82 evlist->is_pos = first->is_pos;
83}
84
733cd2fe
AH
85static void perf_evlist__update_id_pos(struct perf_evlist *evlist)
86{
87 struct perf_evsel *evsel;
88
0050f7aa 89 evlist__for_each(evlist, evsel)
733cd2fe
AH
90 perf_evsel__calc_id_pos(evsel);
91
92 perf_evlist__set_id_pos(evlist);
93}
94
361c99a6
ACM
95static void perf_evlist__purge(struct perf_evlist *evlist)
96{
97 struct perf_evsel *pos, *n;
98
0050f7aa 99 evlist__for_each_safe(evlist, n, pos) {
361c99a6
ACM
100 list_del_init(&pos->node);
101 perf_evsel__delete(pos);
102 }
103
104 evlist->nr_entries = 0;
105}
106
ef1d1af2 107void perf_evlist__exit(struct perf_evlist *evlist)
361c99a6 108{
04662523 109 zfree(&evlist->mmap);
1b85337d 110 fdarray__exit(&evlist->pollfd);
ef1d1af2
ACM
111}
112
113void perf_evlist__delete(struct perf_evlist *evlist)
114{
983874d1 115 perf_evlist__munmap(evlist);
f26e1c7c 116 perf_evlist__close(evlist);
f30a79b0 117 cpu_map__put(evlist->cpus);
186fbb74 118 thread_map__put(evlist->threads);
03ad9747
ACM
119 evlist->cpus = NULL;
120 evlist->threads = NULL;
ef1d1af2
ACM
121 perf_evlist__purge(evlist);
122 perf_evlist__exit(evlist);
361c99a6
ACM
123 free(evlist);
124}
125
126void perf_evlist__add(struct perf_evlist *evlist, struct perf_evsel *entry)
127{
128 list_add_tail(&entry->node, &evlist->entries);
ef503831 129 entry->idx = evlist->nr_entries;
60b0896c 130 entry->tracking = !entry->idx;
ef503831 131
75562573
AH
132 if (!evlist->nr_entries++)
133 perf_evlist__set_id_pos(evlist);
361c99a6
ACM
134}
135
0529bc1f
JO
136void perf_evlist__splice_list_tail(struct perf_evlist *evlist,
137 struct list_head *list,
138 int nr_entries)
50d08e47 139{
75562573
AH
140 bool set_id_pos = !evlist->nr_entries;
141
50d08e47
ACM
142 list_splice_tail(list, &evlist->entries);
143 evlist->nr_entries += nr_entries;
75562573
AH
144 if (set_id_pos)
145 perf_evlist__set_id_pos(evlist);
50d08e47
ACM
146}
147
63dab225
ACM
148void __perf_evlist__set_leader(struct list_head *list)
149{
150 struct perf_evsel *evsel, *leader;
151
152 leader = list_entry(list->next, struct perf_evsel, node);
97f63e4a
NK
153 evsel = list_entry(list->prev, struct perf_evsel, node);
154
155 leader->nr_members = evsel->idx - leader->idx + 1;
63dab225 156
0050f7aa 157 __evlist__for_each(list, evsel) {
74b2133d 158 evsel->leader = leader;
63dab225
ACM
159 }
160}
161
162void perf_evlist__set_leader(struct perf_evlist *evlist)
6a4bb04c 163{
97f63e4a
NK
164 if (evlist->nr_entries) {
165 evlist->nr_groups = evlist->nr_entries > 1 ? 1 : 0;
63dab225 166 __perf_evlist__set_leader(&evlist->entries);
97f63e4a 167 }
6a4bb04c
JO
168}
169
361c99a6
ACM
170int perf_evlist__add_default(struct perf_evlist *evlist)
171{
172 struct perf_event_attr attr = {
173 .type = PERF_TYPE_HARDWARE,
174 .config = PERF_COUNT_HW_CPU_CYCLES,
175 };
1aed2671
JR
176 struct perf_evsel *evsel;
177
178 event_attr_init(&attr);
361c99a6 179
ef503831 180 evsel = perf_evsel__new(&attr);
361c99a6 181 if (evsel == NULL)
cc2d86b0
SE
182 goto error;
183
184 /* use strdup() because free(evsel) assumes name is allocated */
185 evsel->name = strdup("cycles");
186 if (!evsel->name)
187 goto error_free;
361c99a6
ACM
188
189 perf_evlist__add(evlist, evsel);
190 return 0;
cc2d86b0
SE
191error_free:
192 perf_evsel__delete(evsel);
193error:
194 return -ENOMEM;
361c99a6 195}
5c581041 196
e60fc847
ACM
197static int perf_evlist__add_attrs(struct perf_evlist *evlist,
198 struct perf_event_attr *attrs, size_t nr_attrs)
50d08e47
ACM
199{
200 struct perf_evsel *evsel, *n;
201 LIST_HEAD(head);
202 size_t i;
203
204 for (i = 0; i < nr_attrs; i++) {
ef503831 205 evsel = perf_evsel__new_idx(attrs + i, evlist->nr_entries + i);
50d08e47
ACM
206 if (evsel == NULL)
207 goto out_delete_partial_list;
208 list_add_tail(&evsel->node, &head);
209 }
210
211 perf_evlist__splice_list_tail(evlist, &head, nr_attrs);
212
213 return 0;
214
215out_delete_partial_list:
0050f7aa 216 __evlist__for_each_safe(&head, n, evsel)
50d08e47
ACM
217 perf_evsel__delete(evsel);
218 return -1;
219}
220
79695e1b
ACM
221int __perf_evlist__add_default_attrs(struct perf_evlist *evlist,
222 struct perf_event_attr *attrs, size_t nr_attrs)
223{
224 size_t i;
225
226 for (i = 0; i < nr_attrs; i++)
227 event_attr_init(attrs + i);
228
229 return perf_evlist__add_attrs(evlist, attrs, nr_attrs);
230}
231
da378962
ACM
232struct perf_evsel *
233perf_evlist__find_tracepoint_by_id(struct perf_evlist *evlist, int id)
ee29be62
ACM
234{
235 struct perf_evsel *evsel;
236
0050f7aa 237 evlist__for_each(evlist, evsel) {
ee29be62
ACM
238 if (evsel->attr.type == PERF_TYPE_TRACEPOINT &&
239 (int)evsel->attr.config == id)
240 return evsel;
241 }
242
243 return NULL;
244}
245
a2f2804a
DA
246struct perf_evsel *
247perf_evlist__find_tracepoint_by_name(struct perf_evlist *evlist,
248 const char *name)
249{
250 struct perf_evsel *evsel;
251
0050f7aa 252 evlist__for_each(evlist, evsel) {
a2f2804a
DA
253 if ((evsel->attr.type == PERF_TYPE_TRACEPOINT) &&
254 (strcmp(evsel->name, name) == 0))
255 return evsel;
256 }
257
258 return NULL;
259}
260
39876e7d
ACM
261int perf_evlist__add_newtp(struct perf_evlist *evlist,
262 const char *sys, const char *name, void *handler)
263{
ef503831 264 struct perf_evsel *evsel = perf_evsel__newtp(sys, name);
39876e7d 265
39876e7d
ACM
266 if (evsel == NULL)
267 return -1;
268
744a9719 269 evsel->handler = handler;
39876e7d
ACM
270 perf_evlist__add(evlist, evsel);
271 return 0;
272}
273
bf8e8f4b
AH
274static int perf_evlist__nr_threads(struct perf_evlist *evlist,
275 struct perf_evsel *evsel)
276{
277 if (evsel->system_wide)
278 return 1;
279 else
280 return thread_map__nr(evlist->threads);
281}
282
4152ab37
ACM
283void perf_evlist__disable(struct perf_evlist *evlist)
284{
285 int cpu, thread;
286 struct perf_evsel *pos;
b3a319d5 287 int nr_cpus = cpu_map__nr(evlist->cpus);
bf8e8f4b 288 int nr_threads;
4152ab37 289
b3a319d5 290 for (cpu = 0; cpu < nr_cpus; cpu++) {
0050f7aa 291 evlist__for_each(evlist, pos) {
395c3070 292 if (!perf_evsel__is_group_leader(pos) || !pos->fd)
3fe4430d 293 continue;
bf8e8f4b 294 nr_threads = perf_evlist__nr_threads(evlist, pos);
b3a319d5 295 for (thread = 0; thread < nr_threads; thread++)
55da8005
NK
296 ioctl(FD(pos, cpu, thread),
297 PERF_EVENT_IOC_DISABLE, 0);
4152ab37
ACM
298 }
299 }
2b56bcfb
ACM
300
301 evlist->enabled = false;
4152ab37
ACM
302}
303
764e16a3
DA
304void perf_evlist__enable(struct perf_evlist *evlist)
305{
306 int cpu, thread;
307 struct perf_evsel *pos;
b3a319d5 308 int nr_cpus = cpu_map__nr(evlist->cpus);
bf8e8f4b 309 int nr_threads;
764e16a3 310
b3a319d5 311 for (cpu = 0; cpu < nr_cpus; cpu++) {
0050f7aa 312 evlist__for_each(evlist, pos) {
395c3070 313 if (!perf_evsel__is_group_leader(pos) || !pos->fd)
3fe4430d 314 continue;
bf8e8f4b 315 nr_threads = perf_evlist__nr_threads(evlist, pos);
b3a319d5 316 for (thread = 0; thread < nr_threads; thread++)
55da8005
NK
317 ioctl(FD(pos, cpu, thread),
318 PERF_EVENT_IOC_ENABLE, 0);
764e16a3
DA
319 }
320 }
2b56bcfb
ACM
321
322 evlist->enabled = true;
323}
324
325void perf_evlist__toggle_enable(struct perf_evlist *evlist)
326{
327 (evlist->enabled ? perf_evlist__disable : perf_evlist__enable)(evlist);
764e16a3
DA
328}
329
395c3070
AH
330int perf_evlist__disable_event(struct perf_evlist *evlist,
331 struct perf_evsel *evsel)
332{
333 int cpu, thread, err;
bf8e8f4b
AH
334 int nr_cpus = cpu_map__nr(evlist->cpus);
335 int nr_threads = perf_evlist__nr_threads(evlist, evsel);
395c3070
AH
336
337 if (!evsel->fd)
338 return 0;
339
bf8e8f4b
AH
340 for (cpu = 0; cpu < nr_cpus; cpu++) {
341 for (thread = 0; thread < nr_threads; thread++) {
395c3070
AH
342 err = ioctl(FD(evsel, cpu, thread),
343 PERF_EVENT_IOC_DISABLE, 0);
344 if (err)
345 return err;
346 }
347 }
348 return 0;
349}
350
351int perf_evlist__enable_event(struct perf_evlist *evlist,
352 struct perf_evsel *evsel)
353{
354 int cpu, thread, err;
bf8e8f4b
AH
355 int nr_cpus = cpu_map__nr(evlist->cpus);
356 int nr_threads = perf_evlist__nr_threads(evlist, evsel);
395c3070
AH
357
358 if (!evsel->fd)
359 return -EINVAL;
360
bf8e8f4b
AH
361 for (cpu = 0; cpu < nr_cpus; cpu++) {
362 for (thread = 0; thread < nr_threads; thread++) {
395c3070
AH
363 err = ioctl(FD(evsel, cpu, thread),
364 PERF_EVENT_IOC_ENABLE, 0);
365 if (err)
366 return err;
367 }
368 }
369 return 0;
370}
371
1c65056c
AH
372static int perf_evlist__enable_event_cpu(struct perf_evlist *evlist,
373 struct perf_evsel *evsel, int cpu)
374{
375 int thread, err;
376 int nr_threads = perf_evlist__nr_threads(evlist, evsel);
377
378 if (!evsel->fd)
379 return -EINVAL;
380
381 for (thread = 0; thread < nr_threads; thread++) {
382 err = ioctl(FD(evsel, cpu, thread),
383 PERF_EVENT_IOC_ENABLE, 0);
384 if (err)
385 return err;
386 }
387 return 0;
388}
389
390static int perf_evlist__enable_event_thread(struct perf_evlist *evlist,
391 struct perf_evsel *evsel,
392 int thread)
393{
394 int cpu, err;
395 int nr_cpus = cpu_map__nr(evlist->cpus);
396
397 if (!evsel->fd)
398 return -EINVAL;
399
400 for (cpu = 0; cpu < nr_cpus; cpu++) {
401 err = ioctl(FD(evsel, cpu, thread), PERF_EVENT_IOC_ENABLE, 0);
402 if (err)
403 return err;
404 }
405 return 0;
406}
407
408int perf_evlist__enable_event_idx(struct perf_evlist *evlist,
409 struct perf_evsel *evsel, int idx)
410{
411 bool per_cpu_mmaps = !cpu_map__empty(evlist->cpus);
412
413 if (per_cpu_mmaps)
414 return perf_evlist__enable_event_cpu(evlist, evsel, idx);
415 else
416 return perf_evlist__enable_event_thread(evlist, evsel, idx);
417}
418
ad6765dd 419int perf_evlist__alloc_pollfd(struct perf_evlist *evlist)
5c581041 420{
b3a319d5
NK
421 int nr_cpus = cpu_map__nr(evlist->cpus);
422 int nr_threads = thread_map__nr(evlist->threads);
bf8e8f4b
AH
423 int nfds = 0;
424 struct perf_evsel *evsel;
425
cba9b847 426 evlist__for_each(evlist, evsel) {
bf8e8f4b
AH
427 if (evsel->system_wide)
428 nfds += nr_cpus;
429 else
430 nfds += nr_cpus * nr_threads;
431 }
432
1b85337d
ACM
433 if (fdarray__available_entries(&evlist->pollfd) < nfds &&
434 fdarray__grow(&evlist->pollfd, nfds) < 0)
ad6765dd
ACM
435 return -ENOMEM;
436
437 return 0;
5c581041 438}
70082dd9 439
e4b356b5
ACM
440static int __perf_evlist__add_pollfd(struct perf_evlist *evlist, int fd, int idx)
441{
442 int pos = fdarray__add(&evlist->pollfd, fd, POLLIN | POLLERR | POLLHUP);
443 /*
444 * Save the idx so that when we filter out fds POLLHUP'ed we can
445 * close the associated evlist->mmap[] entry.
446 */
447 if (pos >= 0) {
448 evlist->pollfd.priv[pos].idx = idx;
449
450 fcntl(fd, F_SETFL, O_NONBLOCK);
451 }
452
453 return pos;
454}
455
ad6765dd 456int perf_evlist__add_pollfd(struct perf_evlist *evlist, int fd)
70082dd9 457{
e4b356b5
ACM
458 return __perf_evlist__add_pollfd(evlist, fd, -1);
459}
460
461static void perf_evlist__munmap_filtered(struct fdarray *fda, int fd)
462{
463 struct perf_evlist *evlist = container_of(fda, struct perf_evlist, pollfd);
1b85337d 464
e4b356b5 465 perf_evlist__mmap_put(evlist, fda->priv[fd].idx);
70082dd9 466}
70db7533 467
1ddec7f0
ACM
468int perf_evlist__filter_pollfd(struct perf_evlist *evlist, short revents_and_mask)
469{
e4b356b5
ACM
470 return fdarray__filter(&evlist->pollfd, revents_and_mask,
471 perf_evlist__munmap_filtered);
1ddec7f0
ACM
472}
473
f66a889d
ACM
474int perf_evlist__poll(struct perf_evlist *evlist, int timeout)
475{
1b85337d 476 return fdarray__poll(&evlist->pollfd, timeout);
f66a889d
ACM
477}
478
a91e5431
ACM
479static void perf_evlist__id_hash(struct perf_evlist *evlist,
480 struct perf_evsel *evsel,
481 int cpu, int thread, u64 id)
3d3b5e95
ACM
482{
483 int hash;
484 struct perf_sample_id *sid = SID(evsel, cpu, thread);
485
486 sid->id = id;
487 sid->evsel = evsel;
488 hash = hash_64(sid->id, PERF_EVLIST__HLIST_BITS);
489 hlist_add_head(&sid->node, &evlist->heads[hash]);
490}
491
a91e5431
ACM
492void perf_evlist__id_add(struct perf_evlist *evlist, struct perf_evsel *evsel,
493 int cpu, int thread, u64 id)
494{
495 perf_evlist__id_hash(evlist, evsel, cpu, thread, id);
496 evsel->id[evsel->ids++] = id;
497}
498
499static int perf_evlist__id_add_fd(struct perf_evlist *evlist,
500 struct perf_evsel *evsel,
501 int cpu, int thread, int fd)
f8a95309 502{
f8a95309 503 u64 read_data[4] = { 0, };
3d3b5e95 504 int id_idx = 1; /* The first entry is the counter value */
e2b5abe0
JO
505 u64 id;
506 int ret;
507
508 ret = ioctl(fd, PERF_EVENT_IOC_ID, &id);
509 if (!ret)
510 goto add;
511
512 if (errno != ENOTTY)
513 return -1;
514
515 /* Legacy way to get event id.. All hail to old kernels! */
f8a95309 516
c4861afe
JO
517 /*
518 * This way does not work with group format read, so bail
519 * out in that case.
520 */
521 if (perf_evlist__read_format(evlist) & PERF_FORMAT_GROUP)
522 return -1;
523
f8a95309
ACM
524 if (!(evsel->attr.read_format & PERF_FORMAT_ID) ||
525 read(fd, &read_data, sizeof(read_data)) == -1)
526 return -1;
527
528 if (evsel->attr.read_format & PERF_FORMAT_TOTAL_TIME_ENABLED)
529 ++id_idx;
530 if (evsel->attr.read_format & PERF_FORMAT_TOTAL_TIME_RUNNING)
531 ++id_idx;
532
e2b5abe0
JO
533 id = read_data[id_idx];
534
535 add:
536 perf_evlist__id_add(evlist, evsel, cpu, thread, id);
f8a95309
ACM
537 return 0;
538}
539
3c659eed
AH
540static void perf_evlist__set_sid_idx(struct perf_evlist *evlist,
541 struct perf_evsel *evsel, int idx, int cpu,
542 int thread)
543{
544 struct perf_sample_id *sid = SID(evsel, cpu, thread);
545 sid->idx = idx;
546 if (evlist->cpus && cpu >= 0)
547 sid->cpu = evlist->cpus->map[cpu];
548 else
549 sid->cpu = -1;
550 if (!evsel->system_wide && evlist->threads && thread >= 0)
e13798c7 551 sid->tid = thread_map__pid(evlist->threads, thread);
3c659eed
AH
552 else
553 sid->tid = -1;
554}
555
932a3594 556struct perf_sample_id *perf_evlist__id2sid(struct perf_evlist *evlist, u64 id)
70db7533
ACM
557{
558 struct hlist_head *head;
70db7533
ACM
559 struct perf_sample_id *sid;
560 int hash;
561
70db7533
ACM
562 hash = hash_64(id, PERF_EVLIST__HLIST_BITS);
563 head = &evlist->heads[hash];
564
b67bfe0d 565 hlist_for_each_entry(sid, head, node)
70db7533 566 if (sid->id == id)
932a3594
JO
567 return sid;
568
569 return NULL;
570}
571
572struct perf_evsel *perf_evlist__id2evsel(struct perf_evlist *evlist, u64 id)
573{
574 struct perf_sample_id *sid;
575
05169df5 576 if (evlist->nr_entries == 1 || !id)
932a3594
JO
577 return perf_evlist__first(evlist);
578
579 sid = perf_evlist__id2sid(evlist, id);
580 if (sid)
581 return sid->evsel;
30e68bcc
NK
582
583 if (!perf_evlist__sample_id_all(evlist))
0c21f736 584 return perf_evlist__first(evlist);
30e68bcc 585
70db7533
ACM
586 return NULL;
587}
04391deb 588
75562573
AH
589static int perf_evlist__event2id(struct perf_evlist *evlist,
590 union perf_event *event, u64 *id)
591{
592 const u64 *array = event->sample.array;
593 ssize_t n;
594
595 n = (event->header.size - sizeof(event->header)) >> 3;
596
597 if (event->header.type == PERF_RECORD_SAMPLE) {
598 if (evlist->id_pos >= n)
599 return -1;
600 *id = array[evlist->id_pos];
601 } else {
602 if (evlist->is_pos > n)
603 return -1;
604 n -= evlist->is_pos;
605 *id = array[n];
606 }
607 return 0;
608}
609
610static struct perf_evsel *perf_evlist__event2evsel(struct perf_evlist *evlist,
611 union perf_event *event)
612{
98be6966 613 struct perf_evsel *first = perf_evlist__first(evlist);
75562573
AH
614 struct hlist_head *head;
615 struct perf_sample_id *sid;
616 int hash;
617 u64 id;
618
619 if (evlist->nr_entries == 1)
98be6966
AH
620 return first;
621
622 if (!first->attr.sample_id_all &&
623 event->header.type != PERF_RECORD_SAMPLE)
624 return first;
75562573
AH
625
626 if (perf_evlist__event2id(evlist, event, &id))
627 return NULL;
628
629 /* Synthesized events have an id of zero */
630 if (!id)
98be6966 631 return first;
75562573
AH
632
633 hash = hash_64(id, PERF_EVLIST__HLIST_BITS);
634 head = &evlist->heads[hash];
635
636 hlist_for_each_entry(sid, head, node) {
637 if (sid->id == id)
638 return sid->evsel;
639 }
640 return NULL;
641}
642
aece948f 643union perf_event *perf_evlist__mmap_read(struct perf_evlist *evlist, int idx)
04391deb 644{
aece948f 645 struct perf_mmap *md = &evlist->mmap[idx];
7951722d 646 u64 head;
7b8283b5 647 u64 old = md->prev;
04391deb 648 unsigned char *data = md->base + page_size;
8115d60c 649 union perf_event *event = NULL;
04391deb 650
7951722d
SB
651 /*
652 * Check if event was unmapped due to a POLLHUP/POLLERR.
653 */
654 if (!atomic_read(&md->refcnt))
655 return NULL;
656
657 head = perf_mmap__read_head(md);
7bb41152 658 if (evlist->overwrite) {
04391deb 659 /*
7bb41152
ACM
660 * If we're further behind than half the buffer, there's a chance
661 * the writer will bite our tail and mess up the samples under us.
662 *
663 * If we somehow ended up ahead of the head, we got messed up.
664 *
665 * In either case, truncate and restart at head.
04391deb 666 */
7bb41152
ACM
667 int diff = head - old;
668 if (diff > md->mask / 2 || diff < 0) {
669 fprintf(stderr, "WARNING: failed to keep up with mmap data.\n");
670
671 /*
672 * head points to a known good entry, start there.
673 */
674 old = head;
675 }
04391deb
ACM
676 }
677
678 if (old != head) {
679 size_t size;
680
8115d60c 681 event = (union perf_event *)&data[old & md->mask];
04391deb
ACM
682 size = event->header.size;
683
684 /*
685 * Event straddles the mmap boundary -- header should always
686 * be inside due to u64 alignment of output.
687 */
688 if ((old & md->mask) + size != ((old + size) & md->mask)) {
689 unsigned int offset = old;
690 unsigned int len = min(sizeof(*event), size), cpy;
a65cb4b9 691 void *dst = md->event_copy;
04391deb
ACM
692
693 do {
694 cpy = min(md->mask + 1 - (offset & md->mask), len);
695 memcpy(dst, &data[offset & md->mask], cpy);
696 offset += cpy;
697 dst += cpy;
698 len -= cpy;
699 } while (len);
700
a65cb4b9 701 event = (union perf_event *) md->event_copy;
04391deb
ACM
702 }
703
704 old += size;
705 }
706
707 md->prev = old;
7bb41152 708
04391deb
ACM
709 return event;
710}
f8a95309 711
82396986
ACM
712static bool perf_mmap__empty(struct perf_mmap *md)
713{
b72e74d1 714 return perf_mmap__read_head(md) == md->prev && !md->auxtrace_mmap.base;
82396986
ACM
715}
716
717static void perf_evlist__mmap_get(struct perf_evlist *evlist, int idx)
718{
7143849a 719 atomic_inc(&evlist->mmap[idx].refcnt);
82396986
ACM
720}
721
722static void perf_evlist__mmap_put(struct perf_evlist *evlist, int idx)
723{
7143849a 724 BUG_ON(atomic_read(&evlist->mmap[idx].refcnt) == 0);
82396986 725
7143849a 726 if (atomic_dec_and_test(&evlist->mmap[idx].refcnt))
82396986
ACM
727 __perf_evlist__munmap(evlist, idx);
728}
729
8e50d384
ZZ
730void perf_evlist__mmap_consume(struct perf_evlist *evlist, int idx)
731{
82396986
ACM
732 struct perf_mmap *md = &evlist->mmap[idx];
733
8e50d384 734 if (!evlist->overwrite) {
7b8283b5 735 u64 old = md->prev;
8e50d384
ZZ
736
737 perf_mmap__write_tail(md, old);
738 }
82396986 739
7143849a 740 if (atomic_read(&md->refcnt) == 1 && perf_mmap__empty(md))
82396986 741 perf_evlist__mmap_put(evlist, idx);
8e50d384
ZZ
742}
743
718c602d
AH
744int __weak auxtrace_mmap__mmap(struct auxtrace_mmap *mm __maybe_unused,
745 struct auxtrace_mmap_params *mp __maybe_unused,
746 void *userpg __maybe_unused,
747 int fd __maybe_unused)
748{
749 return 0;
750}
751
752void __weak auxtrace_mmap__munmap(struct auxtrace_mmap *mm __maybe_unused)
753{
754}
755
756void __weak auxtrace_mmap_params__init(
757 struct auxtrace_mmap_params *mp __maybe_unused,
758 off_t auxtrace_offset __maybe_unused,
759 unsigned int auxtrace_pages __maybe_unused,
760 bool auxtrace_overwrite __maybe_unused)
761{
762}
763
764void __weak auxtrace_mmap_params__set_idx(
765 struct auxtrace_mmap_params *mp __maybe_unused,
766 struct perf_evlist *evlist __maybe_unused,
767 int idx __maybe_unused,
768 bool per_cpu __maybe_unused)
769{
770}
771
93edcbd9
AH
772static void __perf_evlist__munmap(struct perf_evlist *evlist, int idx)
773{
774 if (evlist->mmap[idx].base != NULL) {
775 munmap(evlist->mmap[idx].base, evlist->mmap_len);
776 evlist->mmap[idx].base = NULL;
7143849a 777 atomic_set(&evlist->mmap[idx].refcnt, 0);
93edcbd9 778 }
718c602d 779 auxtrace_mmap__munmap(&evlist->mmap[idx].auxtrace_mmap);
93edcbd9
AH
780}
781
7e2ed097 782void perf_evlist__munmap(struct perf_evlist *evlist)
f8a95309 783{
aece948f 784 int i;
f8a95309 785
983874d1
ACM
786 if (evlist->mmap == NULL)
787 return;
788
93edcbd9
AH
789 for (i = 0; i < evlist->nr_mmaps; i++)
790 __perf_evlist__munmap(evlist, i);
aece948f 791
04662523 792 zfree(&evlist->mmap);
f8a95309
ACM
793}
794
806fb630 795static int perf_evlist__alloc_mmap(struct perf_evlist *evlist)
f8a95309 796{
a14bb7a6 797 evlist->nr_mmaps = cpu_map__nr(evlist->cpus);
ec1e7e43 798 if (cpu_map__empty(evlist->cpus))
b3a319d5 799 evlist->nr_mmaps = thread_map__nr(evlist->threads);
aece948f 800 evlist->mmap = zalloc(evlist->nr_mmaps * sizeof(struct perf_mmap));
f8a95309
ACM
801 return evlist->mmap != NULL ? 0 : -ENOMEM;
802}
803
a8a8f3eb
AH
804struct mmap_params {
805 int prot;
806 int mask;
718c602d 807 struct auxtrace_mmap_params auxtrace_mp;
a8a8f3eb
AH
808};
809
810static int __perf_evlist__mmap(struct perf_evlist *evlist, int idx,
811 struct mmap_params *mp, int fd)
f8a95309 812{
82396986
ACM
813 /*
814 * The last one will be done at perf_evlist__mmap_consume(), so that we
815 * make sure we don't prevent tools from consuming every last event in
816 * the ring buffer.
817 *
818 * I.e. we can get the POLLHUP meaning that the fd doesn't exist
819 * anymore, but the last events for it are still in the ring buffer,
820 * waiting to be consumed.
821 *
822 * Tools can chose to ignore this at their own discretion, but the
823 * evlist layer can't just drop it when filtering events in
824 * perf_evlist__filter_pollfd().
825 */
7143849a 826 atomic_set(&evlist->mmap[idx].refcnt, 2);
aece948f 827 evlist->mmap[idx].prev = 0;
a8a8f3eb
AH
828 evlist->mmap[idx].mask = mp->mask;
829 evlist->mmap[idx].base = mmap(NULL, evlist->mmap_len, mp->prot,
f8a95309 830 MAP_SHARED, fd, 0);
301b195d 831 if (evlist->mmap[idx].base == MAP_FAILED) {
02635965
AH
832 pr_debug2("failed to mmap perf event ring buffer, error %d\n",
833 errno);
301b195d 834 evlist->mmap[idx].base = NULL;
f8a95309 835 return -1;
301b195d 836 }
ad6765dd 837
718c602d
AH
838 if (auxtrace_mmap__mmap(&evlist->mmap[idx].auxtrace_mmap,
839 &mp->auxtrace_mp, evlist->mmap[idx].base, fd))
840 return -1;
841
f8a95309
ACM
842 return 0;
843}
844
04e21314 845static int perf_evlist__mmap_per_evsel(struct perf_evlist *evlist, int idx,
a8a8f3eb
AH
846 struct mmap_params *mp, int cpu,
847 int thread, int *output)
aece948f
ACM
848{
849 struct perf_evsel *evsel;
04e21314 850
0050f7aa 851 evlist__for_each(evlist, evsel) {
bf8e8f4b
AH
852 int fd;
853
854 if (evsel->system_wide && thread)
855 continue;
856
857 fd = FD(evsel, cpu, thread);
04e21314
AH
858
859 if (*output == -1) {
860 *output = fd;
a8a8f3eb 861 if (__perf_evlist__mmap(evlist, idx, mp, *output) < 0)
04e21314
AH
862 return -1;
863 } else {
864 if (ioctl(fd, PERF_EVENT_IOC_SET_OUTPUT, *output) != 0)
865 return -1;
82396986
ACM
866
867 perf_evlist__mmap_get(evlist, idx);
04e21314
AH
868 }
869
f90d194a
AH
870 /*
871 * The system_wide flag causes a selected event to be opened
872 * always without a pid. Consequently it will never get a
873 * POLLHUP, but it is used for tracking in combination with
874 * other events, so it should not need to be polled anyway.
875 * Therefore don't add it for polling.
876 */
877 if (!evsel->system_wide &&
878 __perf_evlist__add_pollfd(evlist, fd, idx) < 0) {
82396986 879 perf_evlist__mmap_put(evlist, idx);
ad6765dd 880 return -1;
82396986 881 }
033fa713 882
3c659eed
AH
883 if (evsel->attr.read_format & PERF_FORMAT_ID) {
884 if (perf_evlist__id_add_fd(evlist, evsel, cpu, thread,
885 fd) < 0)
886 return -1;
887 perf_evlist__set_sid_idx(evlist, evsel, idx, cpu,
888 thread);
889 }
04e21314
AH
890 }
891
892 return 0;
893}
894
a8a8f3eb
AH
895static int perf_evlist__mmap_per_cpu(struct perf_evlist *evlist,
896 struct mmap_params *mp)
04e21314 897{
aece948f 898 int cpu, thread;
b3a319d5
NK
899 int nr_cpus = cpu_map__nr(evlist->cpus);
900 int nr_threads = thread_map__nr(evlist->threads);
aece948f 901
e3e1a54f 902 pr_debug2("perf event ring buffer mmapped per cpu\n");
b3a319d5 903 for (cpu = 0; cpu < nr_cpus; cpu++) {
aece948f
ACM
904 int output = -1;
905
718c602d
AH
906 auxtrace_mmap_params__set_idx(&mp->auxtrace_mp, evlist, cpu,
907 true);
908
b3a319d5 909 for (thread = 0; thread < nr_threads; thread++) {
a8a8f3eb
AH
910 if (perf_evlist__mmap_per_evsel(evlist, cpu, mp, cpu,
911 thread, &output))
04e21314 912 goto out_unmap;
aece948f
ACM
913 }
914 }
915
916 return 0;
917
918out_unmap:
93edcbd9
AH
919 for (cpu = 0; cpu < nr_cpus; cpu++)
920 __perf_evlist__munmap(evlist, cpu);
aece948f
ACM
921 return -1;
922}
923
a8a8f3eb
AH
924static int perf_evlist__mmap_per_thread(struct perf_evlist *evlist,
925 struct mmap_params *mp)
aece948f 926{
aece948f 927 int thread;
b3a319d5 928 int nr_threads = thread_map__nr(evlist->threads);
aece948f 929
e3e1a54f 930 pr_debug2("perf event ring buffer mmapped per thread\n");
b3a319d5 931 for (thread = 0; thread < nr_threads; thread++) {
aece948f
ACM
932 int output = -1;
933
718c602d
AH
934 auxtrace_mmap_params__set_idx(&mp->auxtrace_mp, evlist, thread,
935 false);
936
a8a8f3eb
AH
937 if (perf_evlist__mmap_per_evsel(evlist, thread, mp, 0, thread,
938 &output))
04e21314 939 goto out_unmap;
aece948f
ACM
940 }
941
942 return 0;
943
944out_unmap:
93edcbd9
AH
945 for (thread = 0; thread < nr_threads; thread++)
946 __perf_evlist__munmap(evlist, thread);
aece948f
ACM
947 return -1;
948}
949
994a1f78
JO
950static size_t perf_evlist__mmap_size(unsigned long pages)
951{
8185e881
ACM
952 if (pages == UINT_MAX) {
953 int max;
954
955 if (sysctl__read_int("kernel/perf_event_mlock_kb", &max) < 0) {
956 /*
957 * Pick a once upon a time good value, i.e. things look
958 * strange since we can't read a sysctl value, but lets not
959 * die yet...
960 */
961 max = 512;
962 } else {
963 max -= (page_size / 1024);
964 }
965
966 pages = (max * 1024) / page_size;
1be300f4
ACM
967 if (!is_power_of_2(pages))
968 pages = rounddown_pow_of_two(pages);
8185e881 969 } else if (!is_power_of_2(pages))
994a1f78
JO
970 return 0;
971
972 return (pages + 1) * page_size;
973}
974
33c2dcfd
DA
975static long parse_pages_arg(const char *str, unsigned long min,
976 unsigned long max)
994a1f78 977{
2fbe4abe 978 unsigned long pages, val;
27050f53
JO
979 static struct parse_tag tags[] = {
980 { .tag = 'B', .mult = 1 },
981 { .tag = 'K', .mult = 1 << 10 },
982 { .tag = 'M', .mult = 1 << 20 },
983 { .tag = 'G', .mult = 1 << 30 },
984 { .tag = 0 },
985 };
994a1f78 986
8973504b 987 if (str == NULL)
33c2dcfd 988 return -EINVAL;
8973504b 989
27050f53 990 val = parse_tag_value(str, tags);
2fbe4abe 991 if (val != (unsigned long) -1) {
27050f53
JO
992 /* we got file size value */
993 pages = PERF_ALIGN(val, page_size) / page_size;
27050f53
JO
994 } else {
995 /* we got pages count value */
996 char *eptr;
997 pages = strtoul(str, &eptr, 10);
33c2dcfd
DA
998 if (*eptr != '\0')
999 return -EINVAL;
994a1f78
JO
1000 }
1001
2bcab6c1 1002 if (pages == 0 && min == 0) {
33c2dcfd 1003 /* leave number of pages at 0 */
1dbfa938 1004 } else if (!is_power_of_2(pages)) {
33c2dcfd 1005 /* round pages up to next power of 2 */
91529834 1006 pages = roundup_pow_of_two(pages);
1dbfa938
AH
1007 if (!pages)
1008 return -EINVAL;
9639837e
DA
1009 pr_info("rounding mmap pages size to %lu bytes (%lu pages)\n",
1010 pages * page_size, pages);
2fbe4abe
AH
1011 }
1012
33c2dcfd
DA
1013 if (pages > max)
1014 return -EINVAL;
1015
1016 return pages;
1017}
1018
e9db1310 1019int __perf_evlist__parse_mmap_pages(unsigned int *mmap_pages, const char *str)
33c2dcfd 1020{
33c2dcfd
DA
1021 unsigned long max = UINT_MAX;
1022 long pages;
1023
f5ae9c42 1024 if (max > SIZE_MAX / page_size)
33c2dcfd
DA
1025 max = SIZE_MAX / page_size;
1026
1027 pages = parse_pages_arg(str, 1, max);
1028 if (pages < 0) {
1029 pr_err("Invalid argument for --mmap_pages/-m\n");
994a1f78
JO
1030 return -1;
1031 }
1032
1033 *mmap_pages = pages;
1034 return 0;
1035}
1036
e9db1310
AH
1037int perf_evlist__parse_mmap_pages(const struct option *opt, const char *str,
1038 int unset __maybe_unused)
1039{
1040 return __perf_evlist__parse_mmap_pages(opt->value, str);
1041}
1042
c83fa7f2 1043/**
718c602d 1044 * perf_evlist__mmap_ex - Create mmaps to receive events.
c83fa7f2
AH
1045 * @evlist: list of events
1046 * @pages: map length in pages
1047 * @overwrite: overwrite older events?
718c602d
AH
1048 * @auxtrace_pages - auxtrace map length in pages
1049 * @auxtrace_overwrite - overwrite older auxtrace data?
f8a95309 1050 *
c83fa7f2
AH
1051 * If @overwrite is %false the user needs to signal event consumption using
1052 * perf_mmap__write_tail(). Using perf_evlist__mmap_read() does this
1053 * automatically.
7e2ed097 1054 *
718c602d
AH
1055 * Similarly, if @auxtrace_overwrite is %false the user needs to signal data
1056 * consumption using auxtrace_mmap__write_tail().
1057 *
c83fa7f2 1058 * Return: %0 on success, negative error code otherwise.
f8a95309 1059 */
718c602d
AH
1060int perf_evlist__mmap_ex(struct perf_evlist *evlist, unsigned int pages,
1061 bool overwrite, unsigned int auxtrace_pages,
1062 bool auxtrace_overwrite)
f8a95309 1063{
aece948f 1064 struct perf_evsel *evsel;
7e2ed097
ACM
1065 const struct cpu_map *cpus = evlist->cpus;
1066 const struct thread_map *threads = evlist->threads;
a8a8f3eb
AH
1067 struct mmap_params mp = {
1068 .prot = PROT_READ | (overwrite ? 0 : PROT_WRITE),
1069 };
50a682ce 1070
7e2ed097 1071 if (evlist->mmap == NULL && perf_evlist__alloc_mmap(evlist) < 0)
f8a95309
ACM
1072 return -ENOMEM;
1073
1b85337d 1074 if (evlist->pollfd.entries == NULL && perf_evlist__alloc_pollfd(evlist) < 0)
f8a95309
ACM
1075 return -ENOMEM;
1076
1077 evlist->overwrite = overwrite;
994a1f78 1078 evlist->mmap_len = perf_evlist__mmap_size(pages);
2af68ef5 1079 pr_debug("mmap size %zuB\n", evlist->mmap_len);
a8a8f3eb 1080 mp.mask = evlist->mmap_len - page_size - 1;
f8a95309 1081
718c602d
AH
1082 auxtrace_mmap_params__init(&mp.auxtrace_mp, evlist->mmap_len,
1083 auxtrace_pages, auxtrace_overwrite);
1084
0050f7aa 1085 evlist__for_each(evlist, evsel) {
f8a95309 1086 if ((evsel->attr.read_format & PERF_FORMAT_ID) &&
a91e5431 1087 evsel->sample_id == NULL &&
a14bb7a6 1088 perf_evsel__alloc_id(evsel, cpu_map__nr(cpus), threads->nr) < 0)
f8a95309 1089 return -ENOMEM;
f8a95309
ACM
1090 }
1091
ec1e7e43 1092 if (cpu_map__empty(cpus))
a8a8f3eb 1093 return perf_evlist__mmap_per_thread(evlist, &mp);
f8a95309 1094
a8a8f3eb 1095 return perf_evlist__mmap_per_cpu(evlist, &mp);
f8a95309 1096}
7e2ed097 1097
718c602d
AH
1098int perf_evlist__mmap(struct perf_evlist *evlist, unsigned int pages,
1099 bool overwrite)
1100{
1101 return perf_evlist__mmap_ex(evlist, pages, overwrite, 0, false);
1102}
1103
b7f0c203 1104static int perf_evlist__propagate_maps(struct perf_evlist *evlist,
52361ff0 1105 bool has_user_cpus)
b7f0c203
JO
1106{
1107 struct perf_evsel *evsel;
1108
1109 evlist__for_each(evlist, evsel) {
1110 /*
1111 * We already have cpus for evsel (via PMU sysfs) so
1112 * keep it, if there's no target cpu list defined.
1113 */
52361ff0 1114 if (evsel->cpus && has_user_cpus)
b7f0c203
JO
1115 cpu_map__put(evsel->cpus);
1116
52361ff0 1117 if (!evsel->cpus || has_user_cpus)
b7f0c203
JO
1118 evsel->cpus = cpu_map__get(evlist->cpus);
1119
578e91ec
JO
1120 evsel->threads = thread_map__get(evlist->threads);
1121
0e5ffb31
JO
1122 if ((evlist->cpus && !evsel->cpus) ||
1123 (evlist->threads && !evsel->threads))
b7f0c203
JO
1124 return -ENOMEM;
1125 }
1126
1127 return 0;
1128}
1129
602ad878 1130int perf_evlist__create_maps(struct perf_evlist *evlist, struct target *target)
7e2ed097 1131{
b809ac10
NK
1132 evlist->threads = thread_map__new_str(target->pid, target->tid,
1133 target->uid);
7e2ed097
ACM
1134
1135 if (evlist->threads == NULL)
1136 return -1;
1137
9c105fbc 1138 if (target__uses_dummy_map(target))
d1cb9fce 1139 evlist->cpus = cpu_map__dummy_new();
879d77d0
NK
1140 else
1141 evlist->cpus = cpu_map__new(target->cpu_list);
7e2ed097
ACM
1142
1143 if (evlist->cpus == NULL)
1144 goto out_delete_threads;
1145
52361ff0 1146 return perf_evlist__propagate_maps(evlist, !!target->cpu_list);
7e2ed097
ACM
1147
1148out_delete_threads:
186fbb74 1149 thread_map__put(evlist->threads);
b2e19a93 1150 evlist->threads = NULL;
7e2ed097
ACM
1151 return -1;
1152}
1153
3de5cfb0
JO
1154int perf_evlist__set_maps(struct perf_evlist *evlist,
1155 struct cpu_map *cpus,
1156 struct thread_map *threads)
1157{
1158 if (evlist->cpus)
1159 cpu_map__put(evlist->cpus);
1160
1161 evlist->cpus = cpus;
1162
1163 if (evlist->threads)
1164 thread_map__put(evlist->threads);
1165
1166 evlist->threads = threads;
1167
1168 return perf_evlist__propagate_maps(evlist, false);
1169}
1170
23d4aad4 1171int perf_evlist__apply_filters(struct perf_evlist *evlist, struct perf_evsel **err_evsel)
0a102479 1172{
0a102479 1173 struct perf_evsel *evsel;
745cefc5
ACM
1174 int err = 0;
1175 const int ncpus = cpu_map__nr(evlist->cpus),
b3a319d5 1176 nthreads = thread_map__nr(evlist->threads);
0a102479 1177
0050f7aa 1178 evlist__for_each(evlist, evsel) {
745cefc5 1179 if (evsel->filter == NULL)
0a102479 1180 continue;
745cefc5 1181
f47805a2 1182 err = perf_evsel__apply_filter(evsel, ncpus, nthreads, evsel->filter);
23d4aad4
ACM
1183 if (err) {
1184 *err_evsel = evsel;
745cefc5 1185 break;
23d4aad4 1186 }
0a102479
FW
1187 }
1188
745cefc5
ACM
1189 return err;
1190}
1191
1192int perf_evlist__set_filter(struct perf_evlist *evlist, const char *filter)
1193{
1194 struct perf_evsel *evsel;
1195 int err = 0;
745cefc5 1196
0050f7aa 1197 evlist__for_each(evlist, evsel) {
94ad89bc 1198 err = perf_evsel__set_filter(evsel, filter);
745cefc5
ACM
1199 if (err)
1200 break;
1201 }
1202
1203 return err;
0a102479 1204}
74429964 1205
be199ada 1206int perf_evlist__set_filter_pids(struct perf_evlist *evlist, size_t npids, pid_t *pids)
cfd70a26
ACM
1207{
1208 char *filter;
be199ada
ACM
1209 int ret = -1;
1210 size_t i;
cfd70a26 1211
be199ada
ACM
1212 for (i = 0; i < npids; ++i) {
1213 if (i == 0) {
1214 if (asprintf(&filter, "common_pid != %d", pids[i]) < 0)
1215 return -1;
1216 } else {
1217 char *tmp;
1218
1219 if (asprintf(&tmp, "%s && common_pid != %d", filter, pids[i]) < 0)
1220 goto out_free;
1221
1222 free(filter);
1223 filter = tmp;
1224 }
1225 }
cfd70a26
ACM
1226
1227 ret = perf_evlist__set_filter(evlist, filter);
be199ada 1228out_free:
cfd70a26
ACM
1229 free(filter);
1230 return ret;
1231}
1232
be199ada
ACM
1233int perf_evlist__set_filter_pid(struct perf_evlist *evlist, pid_t pid)
1234{
1235 return perf_evlist__set_filter_pids(evlist, 1, &pid);
1236}
1237
0c21f736 1238bool perf_evlist__valid_sample_type(struct perf_evlist *evlist)
74429964 1239{
75562573 1240 struct perf_evsel *pos;
c2a70653 1241
75562573
AH
1242 if (evlist->nr_entries == 1)
1243 return true;
1244
1245 if (evlist->id_pos < 0 || evlist->is_pos < 0)
1246 return false;
1247
0050f7aa 1248 evlist__for_each(evlist, pos) {
75562573
AH
1249 if (pos->id_pos != evlist->id_pos ||
1250 pos->is_pos != evlist->is_pos)
c2a70653 1251 return false;
74429964
FW
1252 }
1253
c2a70653 1254 return true;
74429964
FW
1255}
1256
75562573 1257u64 __perf_evlist__combined_sample_type(struct perf_evlist *evlist)
c2a70653 1258{
75562573
AH
1259 struct perf_evsel *evsel;
1260
1261 if (evlist->combined_sample_type)
1262 return evlist->combined_sample_type;
1263
0050f7aa 1264 evlist__for_each(evlist, evsel)
75562573
AH
1265 evlist->combined_sample_type |= evsel->attr.sample_type;
1266
1267 return evlist->combined_sample_type;
1268}
1269
1270u64 perf_evlist__combined_sample_type(struct perf_evlist *evlist)
1271{
1272 evlist->combined_sample_type = 0;
1273 return __perf_evlist__combined_sample_type(evlist);
c2a70653
ACM
1274}
1275
98df858e
AK
1276u64 perf_evlist__combined_branch_type(struct perf_evlist *evlist)
1277{
1278 struct perf_evsel *evsel;
1279 u64 branch_type = 0;
1280
1281 evlist__for_each(evlist, evsel)
1282 branch_type |= evsel->attr.branch_sample_type;
1283 return branch_type;
1284}
1285
9ede473c
JO
1286bool perf_evlist__valid_read_format(struct perf_evlist *evlist)
1287{
1288 struct perf_evsel *first = perf_evlist__first(evlist), *pos = first;
1289 u64 read_format = first->attr.read_format;
1290 u64 sample_type = first->attr.sample_type;
1291
0050f7aa 1292 evlist__for_each(evlist, pos) {
9ede473c
JO
1293 if (read_format != pos->attr.read_format)
1294 return false;
1295 }
1296
1297 /* PERF_SAMPLE_READ imples PERF_FORMAT_ID. */
1298 if ((sample_type & PERF_SAMPLE_READ) &&
1299 !(read_format & PERF_FORMAT_ID)) {
1300 return false;
1301 }
1302
1303 return true;
1304}
1305
1306u64 perf_evlist__read_format(struct perf_evlist *evlist)
1307{
1308 struct perf_evsel *first = perf_evlist__first(evlist);
1309 return first->attr.read_format;
1310}
1311
0c21f736 1312u16 perf_evlist__id_hdr_size(struct perf_evlist *evlist)
81e36bff 1313{
0c21f736 1314 struct perf_evsel *first = perf_evlist__first(evlist);
81e36bff
ACM
1315 struct perf_sample *data;
1316 u64 sample_type;
1317 u16 size = 0;
1318
81e36bff
ACM
1319 if (!first->attr.sample_id_all)
1320 goto out;
1321
1322 sample_type = first->attr.sample_type;
1323
1324 if (sample_type & PERF_SAMPLE_TID)
1325 size += sizeof(data->tid) * 2;
1326
1327 if (sample_type & PERF_SAMPLE_TIME)
1328 size += sizeof(data->time);
1329
1330 if (sample_type & PERF_SAMPLE_ID)
1331 size += sizeof(data->id);
1332
1333 if (sample_type & PERF_SAMPLE_STREAM_ID)
1334 size += sizeof(data->stream_id);
1335
1336 if (sample_type & PERF_SAMPLE_CPU)
1337 size += sizeof(data->cpu) * 2;
75562573
AH
1338
1339 if (sample_type & PERF_SAMPLE_IDENTIFIER)
1340 size += sizeof(data->id);
81e36bff
ACM
1341out:
1342 return size;
1343}
1344
0c21f736 1345bool perf_evlist__valid_sample_id_all(struct perf_evlist *evlist)
74429964 1346{
0c21f736 1347 struct perf_evsel *first = perf_evlist__first(evlist), *pos = first;
c2a70653 1348
0050f7aa 1349 evlist__for_each_continue(evlist, pos) {
c2a70653
ACM
1350 if (first->attr.sample_id_all != pos->attr.sample_id_all)
1351 return false;
74429964
FW
1352 }
1353
c2a70653
ACM
1354 return true;
1355}
1356
0c21f736 1357bool perf_evlist__sample_id_all(struct perf_evlist *evlist)
c2a70653 1358{
0c21f736 1359 struct perf_evsel *first = perf_evlist__first(evlist);
c2a70653 1360 return first->attr.sample_id_all;
74429964 1361}
81cce8de
ACM
1362
1363void perf_evlist__set_selected(struct perf_evlist *evlist,
1364 struct perf_evsel *evsel)
1365{
1366 evlist->selected = evsel;
1367}
727ab04e 1368
a74b4b66
NK
1369void perf_evlist__close(struct perf_evlist *evlist)
1370{
1371 struct perf_evsel *evsel;
1372 int ncpus = cpu_map__nr(evlist->cpus);
1373 int nthreads = thread_map__nr(evlist->threads);
8ad9219e 1374 int n;
a74b4b66 1375
8ad9219e
SE
1376 evlist__for_each_reverse(evlist, evsel) {
1377 n = evsel->cpus ? evsel->cpus->nr : ncpus;
1378 perf_evsel__close(evsel, n, nthreads);
1379 }
a74b4b66
NK
1380}
1381
4112eb18
ACM
1382static int perf_evlist__create_syswide_maps(struct perf_evlist *evlist)
1383{
1384 int err = -ENOMEM;
1385
1386 /*
1387 * Try reading /sys/devices/system/cpu/online to get
1388 * an all cpus map.
1389 *
1390 * FIXME: -ENOMEM is the best we can do here, the cpu_map
1391 * code needs an overhaul to properly forward the
1392 * error, and we may not want to do that fallback to a
1393 * default cpu identity map :-\
1394 */
1395 evlist->cpus = cpu_map__new(NULL);
1396 if (evlist->cpus == NULL)
1397 goto out;
1398
1399 evlist->threads = thread_map__new_dummy();
1400 if (evlist->threads == NULL)
1401 goto out_free_cpus;
1402
1403 err = 0;
1404out:
1405 return err;
1406out_free_cpus:
f30a79b0 1407 cpu_map__put(evlist->cpus);
4112eb18
ACM
1408 evlist->cpus = NULL;
1409 goto out;
1410}
1411
6a4bb04c 1412int perf_evlist__open(struct perf_evlist *evlist)
727ab04e 1413{
6a4bb04c 1414 struct perf_evsel *evsel;
a74b4b66 1415 int err;
727ab04e 1416
4112eb18
ACM
1417 /*
1418 * Default: one fd per CPU, all threads, aka systemwide
1419 * as sys_perf_event_open(cpu = -1, thread = -1) is EINVAL
1420 */
1421 if (evlist->threads == NULL && evlist->cpus == NULL) {
1422 err = perf_evlist__create_syswide_maps(evlist);
1423 if (err < 0)
1424 goto out_err;
1425 }
1426
733cd2fe
AH
1427 perf_evlist__update_id_pos(evlist);
1428
0050f7aa 1429 evlist__for_each(evlist, evsel) {
6a4bb04c 1430 err = perf_evsel__open(evsel, evlist->cpus, evlist->threads);
727ab04e
ACM
1431 if (err < 0)
1432 goto out_err;
1433 }
1434
1435 return 0;
1436out_err:
a74b4b66 1437 perf_evlist__close(evlist);
41c21a68 1438 errno = -err;
727ab04e
ACM
1439 return err;
1440}
35b9d88e 1441
602ad878 1442int perf_evlist__prepare_workload(struct perf_evlist *evlist, struct target *target,
55e162ea 1443 const char *argv[], bool pipe_output,
735f7e0b 1444 void (*exec_error)(int signo, siginfo_t *info, void *ucontext))
35b9d88e
ACM
1445{
1446 int child_ready_pipe[2], go_pipe[2];
1447 char bf;
1448
1449 if (pipe(child_ready_pipe) < 0) {
1450 perror("failed to create 'ready' pipe");
1451 return -1;
1452 }
1453
1454 if (pipe(go_pipe) < 0) {
1455 perror("failed to create 'go' pipe");
1456 goto out_close_ready_pipe;
1457 }
1458
1459 evlist->workload.pid = fork();
1460 if (evlist->workload.pid < 0) {
1461 perror("failed to fork");
1462 goto out_close_pipes;
1463 }
1464
1465 if (!evlist->workload.pid) {
5f1c4225
ACM
1466 int ret;
1467
119fa3c9 1468 if (pipe_output)
35b9d88e
ACM
1469 dup2(2, 1);
1470
0817df08
DA
1471 signal(SIGTERM, SIG_DFL);
1472
35b9d88e
ACM
1473 close(child_ready_pipe[0]);
1474 close(go_pipe[1]);
1475 fcntl(go_pipe[0], F_SETFD, FD_CLOEXEC);
1476
35b9d88e
ACM
1477 /*
1478 * Tell the parent we're ready to go
1479 */
1480 close(child_ready_pipe[1]);
1481
1482 /*
1483 * Wait until the parent tells us to go.
1484 */
5f1c4225
ACM
1485 ret = read(go_pipe[0], &bf, 1);
1486 /*
1487 * The parent will ask for the execvp() to be performed by
1488 * writing exactly one byte, in workload.cork_fd, usually via
1489 * perf_evlist__start_workload().
1490 *
20f86fc1 1491 * For cancelling the workload without actually running it,
5f1c4225
ACM
1492 * the parent will just close workload.cork_fd, without writing
1493 * anything, i.e. read will return zero and we just exit()
1494 * here.
1495 */
1496 if (ret != 1) {
1497 if (ret == -1)
1498 perror("unable to read pipe");
1499 exit(ret);
1500 }
35b9d88e
ACM
1501
1502 execvp(argv[0], (char **)argv);
1503
735f7e0b 1504 if (exec_error) {
f33cbe72
ACM
1505 union sigval val;
1506
1507 val.sival_int = errno;
1508 if (sigqueue(getppid(), SIGUSR1, val))
1509 perror(argv[0]);
1510 } else
1511 perror(argv[0]);
35b9d88e
ACM
1512 exit(-1);
1513 }
1514
735f7e0b
ACM
1515 if (exec_error) {
1516 struct sigaction act = {
1517 .sa_flags = SA_SIGINFO,
1518 .sa_sigaction = exec_error,
1519 };
1520 sigaction(SIGUSR1, &act, NULL);
1521 }
1522
1aaf63b1
ACM
1523 if (target__none(target)) {
1524 if (evlist->threads == NULL) {
1525 fprintf(stderr, "FATAL: evlist->threads need to be set at this point (%s:%d).\n",
1526 __func__, __LINE__);
1527 goto out_close_pipes;
1528 }
e13798c7 1529 thread_map__set_pid(evlist->threads, 0, evlist->workload.pid);
1aaf63b1 1530 }
35b9d88e
ACM
1531
1532 close(child_ready_pipe[1]);
1533 close(go_pipe[0]);
1534 /*
1535 * wait for child to settle
1536 */
1537 if (read(child_ready_pipe[0], &bf, 1) == -1) {
1538 perror("unable to read pipe");
1539 goto out_close_pipes;
1540 }
1541
bcf3145f 1542 fcntl(go_pipe[1], F_SETFD, FD_CLOEXEC);
35b9d88e
ACM
1543 evlist->workload.cork_fd = go_pipe[1];
1544 close(child_ready_pipe[0]);
1545 return 0;
1546
1547out_close_pipes:
1548 close(go_pipe[0]);
1549 close(go_pipe[1]);
1550out_close_ready_pipe:
1551 close(child_ready_pipe[0]);
1552 close(child_ready_pipe[1]);
1553 return -1;
1554}
1555
1556int perf_evlist__start_workload(struct perf_evlist *evlist)
1557{
1558 if (evlist->workload.cork_fd > 0) {
b3824404 1559 char bf = 0;
bcf3145f 1560 int ret;
35b9d88e
ACM
1561 /*
1562 * Remove the cork, let it rip!
1563 */
bcf3145f
NK
1564 ret = write(evlist->workload.cork_fd, &bf, 1);
1565 if (ret < 0)
1566 perror("enable to write to pipe");
1567
1568 close(evlist->workload.cork_fd);
1569 return ret;
35b9d88e
ACM
1570 }
1571
1572 return 0;
1573}
cb0b29e0 1574
a3f698fe 1575int perf_evlist__parse_sample(struct perf_evlist *evlist, union perf_event *event,
0807d2d8 1576 struct perf_sample *sample)
cb0b29e0 1577{
75562573
AH
1578 struct perf_evsel *evsel = perf_evlist__event2evsel(evlist, event);
1579
1580 if (!evsel)
1581 return -EFAULT;
0807d2d8 1582 return perf_evsel__parse_sample(evsel, event, sample);
cb0b29e0 1583}
78f067b3
ACM
1584
1585size_t perf_evlist__fprintf(struct perf_evlist *evlist, FILE *fp)
1586{
1587 struct perf_evsel *evsel;
1588 size_t printed = 0;
1589
0050f7aa 1590 evlist__for_each(evlist, evsel) {
78f067b3
ACM
1591 printed += fprintf(fp, "%s%s", evsel->idx ? ", " : "",
1592 perf_evsel__name(evsel));
1593 }
1594
b2222139 1595 return printed + fprintf(fp, "\n");
78f067b3 1596}
6ef068cb 1597
a8f23d8f
ACM
1598int perf_evlist__strerror_open(struct perf_evlist *evlist __maybe_unused,
1599 int err, char *buf, size_t size)
1600{
1601 int printed, value;
6e81c74c 1602 char sbuf[STRERR_BUFSIZE], *emsg = strerror_r(err, sbuf, sizeof(sbuf));
a8f23d8f
ACM
1603
1604 switch (err) {
1605 case EACCES:
1606 case EPERM:
1607 printed = scnprintf(buf, size,
1608 "Error:\t%s.\n"
1609 "Hint:\tCheck /proc/sys/kernel/perf_event_paranoid setting.", emsg);
1610
1a47245d 1611 value = perf_event_paranoid();
a8f23d8f
ACM
1612
1613 printed += scnprintf(buf + printed, size - printed, "\nHint:\t");
1614
1615 if (value >= 2) {
1616 printed += scnprintf(buf + printed, size - printed,
1617 "For your workloads it needs to be <= 1\nHint:\t");
1618 }
1619 printed += scnprintf(buf + printed, size - printed,
5229e366 1620 "For system wide tracing it needs to be set to -1.\n");
a8f23d8f
ACM
1621
1622 printed += scnprintf(buf + printed, size - printed,
5229e366
ACM
1623 "Hint:\tTry: 'sudo sh -c \"echo -1 > /proc/sys/kernel/perf_event_paranoid\"'\n"
1624 "Hint:\tThe current value is %d.", value);
a8f23d8f
ACM
1625 break;
1626 default:
1627 scnprintf(buf, size, "%s", emsg);
1628 break;
1629 }
1630
1631 return 0;
1632}
a025e4f0 1633
956fa571
ACM
1634int perf_evlist__strerror_mmap(struct perf_evlist *evlist, int err, char *buf, size_t size)
1635{
1636 char sbuf[STRERR_BUFSIZE], *emsg = strerror_r(err, sbuf, sizeof(sbuf));
e965bea1 1637 int pages_attempted = evlist->mmap_len / 1024, pages_max_per_user, printed = 0;
956fa571
ACM
1638
1639 switch (err) {
1640 case EPERM:
e5d4a290 1641 sysctl__read_int("kernel/perf_event_mlock_kb", &pages_max_per_user);
e965bea1
ACM
1642 printed += scnprintf(buf + printed, size - printed,
1643 "Error:\t%s.\n"
956fa571 1644 "Hint:\tCheck /proc/sys/kernel/perf_event_mlock_kb (%d kB) setting.\n"
e965bea1 1645 "Hint:\tTried using %zd kB.\n",
e5d4a290 1646 emsg, pages_max_per_user, pages_attempted);
e965bea1
ACM
1647
1648 if (pages_attempted >= pages_max_per_user) {
1649 printed += scnprintf(buf + printed, size - printed,
1650 "Hint:\tTry 'sudo sh -c \"echo %d > /proc/sys/kernel/perf_event_mlock_kb\"', or\n",
1651 pages_max_per_user + pages_attempted);
1652 }
1653
1654 printed += scnprintf(buf + printed, size - printed,
1655 "Hint:\tTry using a smaller -m/--mmap-pages value.");
956fa571
ACM
1656 break;
1657 default:
1658 scnprintf(buf, size, "%s", emsg);
1659 break;
1660 }
1661
1662 return 0;
1663}
1664
a025e4f0
AH
1665void perf_evlist__to_front(struct perf_evlist *evlist,
1666 struct perf_evsel *move_evsel)
1667{
1668 struct perf_evsel *evsel, *n;
1669 LIST_HEAD(move);
1670
1671 if (move_evsel == perf_evlist__first(evlist))
1672 return;
1673
0050f7aa 1674 evlist__for_each_safe(evlist, n, evsel) {
a025e4f0
AH
1675 if (evsel->leader == move_evsel->leader)
1676 list_move_tail(&evsel->node, &move);
1677 }
1678
1679 list_splice(&move, &evlist->entries);
1680}
60b0896c
AH
1681
1682void perf_evlist__set_tracking_event(struct perf_evlist *evlist,
1683 struct perf_evsel *tracking_evsel)
1684{
1685 struct perf_evsel *evsel;
1686
1687 if (tracking_evsel->tracking)
1688 return;
1689
1690 evlist__for_each(evlist, evsel) {
1691 if (evsel != tracking_evsel)
1692 evsel->tracking = false;
1693 }
1694
1695 tracking_evsel->tracking = true;
1696}