blob: de05f8b7051738187267e95580397f6b944441c3 [file] [log] [blame] [edit]
/*
* Copyright (C) 2019 The Android Open Source Project
*
* Licensed under the Apache License, Version 2.0 (the "License");
* 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.
*/
#include "src/profiling/perf/event_reader.h"
#include <linux/perf_event.h>
#include <sys/ioctl.h>
#include <sys/mman.h>
#include <sys/syscall.h>
#include <sys/types.h>
#include <unistd.h>
#include "perfetto/ext/base/utils.h"
#include "src/profiling/perf/regs_parsing.h"
namespace perfetto {
namespace profiling {
namespace {
template <typename T>
const char* ReadValue(T* value_out, const char* ptr) {
memcpy(value_out, reinterpret_cast<const void*>(ptr), sizeof(T));
return ptr + sizeof(T);
}
template <typename T>
const char* ReadValues(T* out, const char* ptr, size_t num_values) {
size_t sz = sizeof(T) * num_values;
memcpy(out, reinterpret_cast<const void*>(ptr), sz);
return ptr + sz;
}
bool IsPowerOfTwo(size_t v) {
return (v != 0 && ((v & (v - 1)) == 0));
}
static int perf_event_open(perf_event_attr* attr,
pid_t pid,
int cpu,
int group_fd,
unsigned long flags) {
return static_cast<int>(
syscall(__NR_perf_event_open, attr, pid, cpu, group_fd, flags));
}
base::ScopedFile PerfEventOpen(uint32_t cpu,
perf_event_attr* perf_attr,
int group_fd = -1) {
base::ScopedFile perf_fd{perf_event_open(perf_attr, /*pid=*/-1,
static_cast<int>(cpu), group_fd,
PERF_FLAG_FD_CLOEXEC)};
return perf_fd;
}
// If counting tracepoints, set an event filter if requested.
bool MaybeApplyTracepointFilter(int fd, const PerfCounter& event) {
if (event.type != PerfCounter::Type::kTracepoint ||
event.tracepoint_filter.empty()) {
return true;
}
PERFETTO_DCHECK(event.attr_type == PERF_TYPE_TRACEPOINT);
if (ioctl(fd, PERF_EVENT_IOC_SET_FILTER, event.tracepoint_filter.c_str())) {
PERFETTO_PLOG("Failed ioctl to set event filter");
return false;
}
return true;
}
} // namespace
PerfRingBuffer::PerfRingBuffer(PerfRingBuffer&& other) noexcept
: metadata_page_(other.metadata_page_),
mmap_sz_(other.mmap_sz_),
data_buf_(other.data_buf_),
data_buf_sz_(other.data_buf_sz_) {
other.metadata_page_ = nullptr;
other.mmap_sz_ = 0;
other.data_buf_ = nullptr;
other.data_buf_sz_ = 0;
}
PerfRingBuffer& PerfRingBuffer::operator=(PerfRingBuffer&& other) noexcept {
if (this == &other)
return *this;
this->~PerfRingBuffer();
new (this) PerfRingBuffer(std::move(other));
return *this;
}
PerfRingBuffer::~PerfRingBuffer() {
if (!valid())
return;
if (munmap(reinterpret_cast<void*>(metadata_page_), mmap_sz_) != 0)
PERFETTO_PLOG("failed munmap");
}
base::Optional<PerfRingBuffer> PerfRingBuffer::Allocate(
int perf_fd,
size_t data_page_count) {
// perf_event_open requires the ring buffer to be a power of two in size.
PERFETTO_DCHECK(IsPowerOfTwo(data_page_count));
PerfRingBuffer ret;
// mmap request is one page larger than the buffer size (for the metadata).
ret.data_buf_sz_ = data_page_count * base::kPageSize;
ret.mmap_sz_ = ret.data_buf_sz_ + base::kPageSize;
// If PROT_WRITE, kernel won't overwrite unread samples.
void* mmap_addr = mmap(nullptr, ret.mmap_sz_, PROT_READ | PROT_WRITE,
MAP_SHARED, perf_fd, 0);
if (mmap_addr == MAP_FAILED) {
PERFETTO_PLOG("failed mmap");
return base::nullopt;
}
// Expected layout is [ metadata page ] [ data pages ... ]
ret.metadata_page_ = reinterpret_cast<perf_event_mmap_page*>(mmap_addr);
ret.data_buf_ = reinterpret_cast<char*>(mmap_addr) + base::kPageSize;
PERFETTO_CHECK(ret.metadata_page_->data_offset == base::kPageSize);
PERFETTO_CHECK(ret.metadata_page_->data_size = ret.data_buf_sz_);
return base::make_optional(std::move(ret));
}
// See |perf_output_put_handle| for the necessary synchronization between the
// kernel and this userspace thread (which are using the same shared memory, but
// might be on different cores).
// TODO(rsavitski): is there false sharing between |data_tail| and |data_head|?
// Is there an argument for maintaining our own copy of |data_tail| instead of
// reloading it?
char* PerfRingBuffer::ReadRecordNonconsuming() {
static_assert(sizeof(std::atomic<uint64_t>) == sizeof(uint64_t), "");
PERFETTO_DCHECK(valid());
// |data_tail| is written only by this userspace thread, so we can safely read
// it without any synchronization.
uint64_t read_offset = metadata_page_->data_tail;
// |data_head| is written by the kernel, perform an acquiring load such that
// the payload reads below are ordered after this load.
uint64_t write_offset =
reinterpret_cast<std::atomic<uint64_t>*>(&metadata_page_->data_head)
->load(std::memory_order_acquire);
PERFETTO_DCHECK(read_offset <= write_offset);
if (write_offset == read_offset)
return nullptr; // no new data
size_t read_pos = static_cast<size_t>(read_offset & (data_buf_sz_ - 1));
// event header (64 bits) guaranteed to be contiguous
PERFETTO_DCHECK(read_pos <= data_buf_sz_ - sizeof(perf_event_header));
PERFETTO_DCHECK(0 == reinterpret_cast<size_t>(data_buf_ + read_pos) %
alignof(perf_event_header));
perf_event_header* evt_header =
reinterpret_cast<perf_event_header*>(data_buf_ + read_pos);
uint16_t evt_size = evt_header->size;
// event wrapped - reconstruct it, and return a pointer to the buffer
if (read_pos + evt_size > data_buf_sz_) {
PERFETTO_DCHECK(read_pos + evt_size !=
((read_pos + evt_size) & (data_buf_sz_ - 1)));
PERFETTO_DLOG("PerfRingBuffer: returning reconstructed event");
size_t prefix_sz = data_buf_sz_ - read_pos;
memcpy(&reconstructed_record_[0], data_buf_ + read_pos, prefix_sz);
memcpy(&reconstructed_record_[0] + prefix_sz, data_buf_,
evt_size - prefix_sz);
return &reconstructed_record_[0];
} else {
// usual case - contiguous sample
PERFETTO_DCHECK(read_pos + evt_size ==
((read_pos + evt_size) & (data_buf_sz_ - 1)));
return data_buf_ + read_pos;
}
}
void PerfRingBuffer::Consume(size_t bytes) {
PERFETTO_DCHECK(valid());
// Advance |data_tail|, which is written only by this thread. The store of the
// updated value needs to have release semantics such that the preceding
// payload reads are ordered before it. The reader in this case is the kernel,
// which reads |data_tail| to calculate the available ring buffer capacity
// before trying to store a new record.
uint64_t updated_tail = metadata_page_->data_tail + bytes;
reinterpret_cast<std::atomic<uint64_t>*>(&metadata_page_->data_tail)
->store(updated_tail, std::memory_order_release);
}
EventReader::EventReader(uint32_t cpu,
perf_event_attr event_attr,
base::ScopedFile perf_fd,
PerfRingBuffer ring_buffer)
: cpu_(cpu),
event_attr_(event_attr),
perf_fd_(std::move(perf_fd)),
ring_buffer_(std::move(ring_buffer)) {}
EventReader& EventReader::operator=(EventReader&& other) noexcept {
if (this == &other)
return *this;
this->~EventReader();
new (this) EventReader(std::move(other));
return *this;
}
base::Optional<EventReader> EventReader::ConfigureEvents(
uint32_t cpu,
const EventConfig& event_cfg) {
auto leader_fd = PerfEventOpen(cpu, event_cfg.perf_attr());
if (!leader_fd) {
PERFETTO_PLOG("Failed perf_event_open");
return base::nullopt;
}
if (!MaybeApplyTracepointFilter(leader_fd.get(), event_cfg.timebase_event()))
return base::nullopt;
auto ring_buffer =
PerfRingBuffer::Allocate(leader_fd.get(), event_cfg.ring_buffer_pages());
if (!ring_buffer.has_value()) {
return base::nullopt;
}
return base::make_optional<EventReader>(cpu, *event_cfg.perf_attr(),
std::move(leader_fd),
std::move(ring_buffer.value()));
}
base::Optional<ParsedSample> EventReader::ReadUntilSample(
std::function<void(uint64_t)> records_lost_callback) {
for (;;) {
char* event = ring_buffer_.ReadRecordNonconsuming();
if (!event)
return base::nullopt; // caught up with the writer
auto* event_hdr = reinterpret_cast<const perf_event_header*>(event);
if (event_hdr->type == PERF_RECORD_SAMPLE) {
ParsedSample sample = ParseSampleRecord(cpu_, event);
ring_buffer_.Consume(event_hdr->size);
return base::make_optional(std::move(sample));
}
if (event_hdr->type == PERF_RECORD_LOST) {
/*
* struct {
* struct perf_event_header header;
* u64 id;
* u64 lost;
* struct sample_id sample_id;
* };
*/
uint64_t records_lost = *reinterpret_cast<const uint64_t*>(
event + sizeof(perf_event_header) + sizeof(uint64_t));
records_lost_callback(records_lost);
ring_buffer_.Consume(event_hdr->size);
continue; // keep looking for a sample
}
// Kernel had to throttle irqs.
if (event_hdr->type == PERF_RECORD_THROTTLE ||
event_hdr->type == PERF_RECORD_UNTHROTTLE) {
ring_buffer_.Consume(event_hdr->size);
continue; // keep looking for a sample
}
PERFETTO_DFATAL_OR_ELOG("Unsupported event type [%zu]",
static_cast<size_t>(event_hdr->type));
ring_buffer_.Consume(event_hdr->size);
}
}
// Generally, samples can belong to any cpu (which can be recorded with
// PERF_SAMPLE_CPU). However, this producer uses only cpu-scoped events,
// therefore it is already known.
ParsedSample EventReader::ParseSampleRecord(uint32_t cpu,
const char* record_start) {
if (event_attr_.sample_type &
(~uint64_t(PERF_SAMPLE_TID | PERF_SAMPLE_TIME | PERF_SAMPLE_STACK_USER |
PERF_SAMPLE_REGS_USER | PERF_SAMPLE_CALLCHAIN |
PERF_SAMPLE_READ))) {
PERFETTO_FATAL("Unsupported sampling option");
}
auto* event_hdr = reinterpret_cast<const perf_event_header*>(record_start);
size_t sample_size = event_hdr->size;
ParsedSample sample = {};
sample.common.cpu = cpu;
sample.common.cpu_mode = event_hdr->misc & PERF_RECORD_MISC_CPUMODE_MASK;
// Parse the payload, which consists of concatenated data for each
// |attr.sample_type| flag.
const char* parse_pos = record_start + sizeof(perf_event_header);
if (event_attr_.sample_type & PERF_SAMPLE_TID) {
uint32_t pid = 0;
uint32_t tid = 0;
parse_pos = ReadValue(&pid, parse_pos);
parse_pos = ReadValue(&tid, parse_pos);
sample.common.pid = static_cast<pid_t>(pid);
sample.common.tid = static_cast<pid_t>(tid);
}
if (event_attr_.sample_type & PERF_SAMPLE_TIME) {
parse_pos = ReadValue(&sample.common.timestamp, parse_pos);
}
if (event_attr_.sample_type & PERF_SAMPLE_READ) {
parse_pos = ReadValue(&sample.common.timebase_count, parse_pos);
}
if (event_attr_.sample_type & PERF_SAMPLE_CALLCHAIN) {
uint64_t chain_len = 0;
parse_pos = ReadValue(&chain_len, parse_pos);
sample.kernel_ips.resize(static_cast<size_t>(chain_len));
parse_pos = ReadValues<uint64_t>(sample.kernel_ips.data(), parse_pos,
static_cast<size_t>(chain_len));
}
if (event_attr_.sample_type & PERF_SAMPLE_REGS_USER) {
// Can be empty, e.g. if we sampled a kernel thread.
sample.regs = ReadPerfUserRegsData(&parse_pos);
}
if (event_attr_.sample_type & PERF_SAMPLE_STACK_USER) {
// Maximum possible sampled stack size for this sample. Can be lower than
// the requested size if there wasn't enough room in the sample (which is
// limited to 64k).
uint64_t max_stack_size;
parse_pos = ReadValue(&max_stack_size, parse_pos);
const char* stack_start = parse_pos;
parse_pos += max_stack_size; // skip to dyn_size
// Payload written conditionally, e.g. kernel threads don't have a
// user stack.
if (max_stack_size > 0) {
uint64_t filled_stack_size;
parse_pos = ReadValue(&filled_stack_size, parse_pos);
PERFETTO_DLOG("sampled stack size: %" PRIu64 " / %" PRIu64 "",
filled_stack_size, max_stack_size);
// copy stack bytes into a vector
size_t payload_sz = static_cast<size_t>(filled_stack_size);
sample.stack.resize(payload_sz);
memcpy(sample.stack.data(), stack_start, payload_sz);
// remember whether the stack sample is (most likely) truncated
sample.stack_maxed = (filled_stack_size == max_stack_size);
}
}
PERFETTO_CHECK(parse_pos == record_start + sample_size);
return sample;
}
void EventReader::EnableEvents() {
int ret = ioctl(perf_fd_.get(), PERF_EVENT_IOC_ENABLE);
PERFETTO_CHECK(ret == 0);
}
void EventReader::DisableEvents() {
int ret = ioctl(perf_fd_.get(), PERF_EVENT_IOC_DISABLE);
PERFETTO_CHECK(ret == 0);
}
} // namespace profiling
} // namespace perfetto