1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
|
/*
* Copyright (C) 2021-present ScyllaDB
*/
/*
* This file is open source software, licensed to you under the terms
* of the Apache License, Version 2.0 (the "License"). See the NOTICE file
* distributed with this work for additional information regarding copyright
* ownership. You may not use this file except in compliance with the License.
*
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing,
* software distributed under the License is distributed on an
* "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
* KIND, either express or implied. See the License for the
* specific language governing permissions and limitations
* under the License.
*/
/*
* This file was copied from Scylla (https://github.com/scylladb/scylla)
*/
#include <seastar/testing/linux_perf_event.hh>
#include <linux/perf_event.h>
#include <linux/hw_breakpoint.h>
#include <sys/ioctl.h>
#include <asm/unistd.h>
linux_perf_event::linux_perf_event(const struct ::perf_event_attr& attr, pid_t pid, int cpu, int group_fd, unsigned long flags) {
int ret = syscall(__NR_perf_event_open, &attr, pid, cpu, group_fd, flags);
if (ret != -1) {
_fd = ret; // ignore failures, can happen in constrained environments such as containers
}
}
linux_perf_event::~linux_perf_event() {
if (_fd != -1) {
::close(_fd);
}
}
linux_perf_event&
linux_perf_event::operator=(linux_perf_event&& x) noexcept {
if (this != &x) {
if (_fd != -1) {
::close(_fd);
}
_fd = std::exchange(x._fd, -1);
}
return *this;
}
uint64_t
linux_perf_event::read() {
if (_fd == -1) {
return 0;
}
uint64_t ret;
::read(_fd, &ret, sizeof(ret));
return ret;
}
void
linux_perf_event::enable() {
if (_fd == -1) {
return;
}
::ioctl(_fd, PERF_EVENT_IOC_ENABLE, 0);
}
void
linux_perf_event::disable() {
if (_fd == -1) {
return;
}
::ioctl(_fd, PERF_EVENT_IOC_DISABLE, 0);
}
linux_perf_event
linux_perf_event::user_instructions_retired() {
return linux_perf_event(perf_event_attr{
.type = PERF_TYPE_HARDWARE,
.size = sizeof(struct perf_event_attr),
.config = PERF_COUNT_HW_INSTRUCTIONS,
.disabled = 1,
.exclude_kernel = 1,
.exclude_hv = 1,
}, 0, -1, -1, 0);
}
|
