// SPDX-License-Identifier: GPL-2.0 
 | 
#include <stdbool.h> 
 | 
#include <inttypes.h> 
 | 
#include <linux/kernel.h> 
 | 
#include <linux/types.h> 
 | 
  
 | 
#include "util.h" 
 | 
#include "event.h" 
 | 
#include "evsel.h" 
 | 
#include "debug.h" 
 | 
  
 | 
#include "tests.h" 
 | 
  
 | 
#define COMP(m) do {                    \ 
 | 
    if (s1->m != s2->m) {                \ 
 | 
        pr_debug("Samples differ at '"#m"'\n");    \ 
 | 
        return false;                \ 
 | 
    }                        \ 
 | 
} while (0) 
 | 
  
 | 
#define MCOMP(m) do {                    \ 
 | 
    if (memcmp(&s1->m, &s2->m, sizeof(s1->m))) {    \ 
 | 
        pr_debug("Samples differ at '"#m"'\n");    \ 
 | 
        return false;                \ 
 | 
    }                        \ 
 | 
} while (0) 
 | 
  
 | 
static bool samples_same(const struct perf_sample *s1, 
 | 
             const struct perf_sample *s2, 
 | 
             u64 type, u64 read_format) 
 | 
{ 
 | 
    size_t i; 
 | 
  
 | 
    if (type & PERF_SAMPLE_IDENTIFIER) 
 | 
        COMP(id); 
 | 
  
 | 
    if (type & PERF_SAMPLE_IP) 
 | 
        COMP(ip); 
 | 
  
 | 
    if (type & PERF_SAMPLE_TID) { 
 | 
        COMP(pid); 
 | 
        COMP(tid); 
 | 
    } 
 | 
  
 | 
    if (type & PERF_SAMPLE_TIME) 
 | 
        COMP(time); 
 | 
  
 | 
    if (type & PERF_SAMPLE_ADDR) 
 | 
        COMP(addr); 
 | 
  
 | 
    if (type & PERF_SAMPLE_ID) 
 | 
        COMP(id); 
 | 
  
 | 
    if (type & PERF_SAMPLE_STREAM_ID) 
 | 
        COMP(stream_id); 
 | 
  
 | 
    if (type & PERF_SAMPLE_CPU) 
 | 
        COMP(cpu); 
 | 
  
 | 
    if (type & PERF_SAMPLE_PERIOD) 
 | 
        COMP(period); 
 | 
  
 | 
    if (type & PERF_SAMPLE_READ) { 
 | 
        if (read_format & PERF_FORMAT_GROUP) 
 | 
            COMP(read.group.nr); 
 | 
        else 
 | 
            COMP(read.one.value); 
 | 
        if (read_format & PERF_FORMAT_TOTAL_TIME_ENABLED) 
 | 
            COMP(read.time_enabled); 
 | 
        if (read_format & PERF_FORMAT_TOTAL_TIME_RUNNING) 
 | 
            COMP(read.time_running); 
 | 
        /* PERF_FORMAT_ID is forced for PERF_SAMPLE_READ */ 
 | 
        if (read_format & PERF_FORMAT_GROUP) { 
 | 
            for (i = 0; i < s1->read.group.nr; i++) 
 | 
                MCOMP(read.group.values[i]); 
 | 
        } else { 
 | 
            COMP(read.one.id); 
 | 
        } 
 | 
    } 
 | 
  
 | 
    if (type & PERF_SAMPLE_CALLCHAIN) { 
 | 
        COMP(callchain->nr); 
 | 
        for (i = 0; i < s1->callchain->nr; i++) 
 | 
            COMP(callchain->ips[i]); 
 | 
    } 
 | 
  
 | 
    if (type & PERF_SAMPLE_RAW) { 
 | 
        COMP(raw_size); 
 | 
        if (memcmp(s1->raw_data, s2->raw_data, s1->raw_size)) { 
 | 
            pr_debug("Samples differ at 'raw_data'\n"); 
 | 
            return false; 
 | 
        } 
 | 
    } 
 | 
  
 | 
    if (type & PERF_SAMPLE_BRANCH_STACK) { 
 | 
        COMP(branch_stack->nr); 
 | 
        for (i = 0; i < s1->branch_stack->nr; i++) 
 | 
            MCOMP(branch_stack->entries[i]); 
 | 
    } 
 | 
  
 | 
    if (type & PERF_SAMPLE_REGS_USER) { 
 | 
        size_t sz = hweight_long(s1->user_regs.mask) * sizeof(u64); 
 | 
  
 | 
        COMP(user_regs.mask); 
 | 
        COMP(user_regs.abi); 
 | 
        if (s1->user_regs.abi && 
 | 
            (!s1->user_regs.regs || !s2->user_regs.regs || 
 | 
             memcmp(s1->user_regs.regs, s2->user_regs.regs, sz))) { 
 | 
            pr_debug("Samples differ at 'user_regs'\n"); 
 | 
            return false; 
 | 
        } 
 | 
    } 
 | 
  
 | 
    if (type & PERF_SAMPLE_STACK_USER) { 
 | 
        COMP(user_stack.size); 
 | 
        if (memcmp(s1->user_stack.data, s2->user_stack.data, 
 | 
               s1->user_stack.size)) { 
 | 
            pr_debug("Samples differ at 'user_stack'\n"); 
 | 
            return false; 
 | 
        } 
 | 
    } 
 | 
  
 | 
    if (type & PERF_SAMPLE_WEIGHT) 
 | 
        COMP(weight); 
 | 
  
 | 
    if (type & PERF_SAMPLE_DATA_SRC) 
 | 
        COMP(data_src); 
 | 
  
 | 
    if (type & PERF_SAMPLE_TRANSACTION) 
 | 
        COMP(transaction); 
 | 
  
 | 
    if (type & PERF_SAMPLE_REGS_INTR) { 
 | 
        size_t sz = hweight_long(s1->intr_regs.mask) * sizeof(u64); 
 | 
  
 | 
        COMP(intr_regs.mask); 
 | 
        COMP(intr_regs.abi); 
 | 
        if (s1->intr_regs.abi && 
 | 
            (!s1->intr_regs.regs || !s2->intr_regs.regs || 
 | 
             memcmp(s1->intr_regs.regs, s2->intr_regs.regs, sz))) { 
 | 
            pr_debug("Samples differ at 'intr_regs'\n"); 
 | 
            return false; 
 | 
        } 
 | 
    } 
 | 
  
 | 
    if (type & PERF_SAMPLE_PHYS_ADDR) 
 | 
        COMP(phys_addr); 
 | 
  
 | 
    return true; 
 | 
} 
 | 
  
 | 
static int do_test(u64 sample_type, u64 sample_regs, u64 read_format) 
 | 
{ 
 | 
    struct perf_evsel evsel = { 
 | 
        .needs_swap = false, 
 | 
        .attr = { 
 | 
            .sample_type = sample_type, 
 | 
            .read_format = read_format, 
 | 
        }, 
 | 
    }; 
 | 
    union perf_event *event; 
 | 
    union { 
 | 
        struct ip_callchain callchain; 
 | 
        u64 data[64]; 
 | 
    } callchain = { 
 | 
        /* 3 ips */ 
 | 
        .data = {3, 201, 202, 203}, 
 | 
    }; 
 | 
    union { 
 | 
        struct branch_stack branch_stack; 
 | 
        u64 data[64]; 
 | 
    } branch_stack = { 
 | 
        /* 1 branch_entry */ 
 | 
        .data = {1, 211, 212, 213}, 
 | 
    }; 
 | 
    u64 regs[64]; 
 | 
    const u32 raw_data[] = {0x12345678, 0x0a0b0c0d, 0x11020304, 0x05060708, 0 }; 
 | 
    const u64 data[] = {0x2211443366558877ULL, 0, 0xaabbccddeeff4321ULL}; 
 | 
    struct perf_sample sample = { 
 | 
        .ip        = 101, 
 | 
        .pid        = 102, 
 | 
        .tid        = 103, 
 | 
        .time        = 104, 
 | 
        .addr        = 105, 
 | 
        .id        = 106, 
 | 
        .stream_id    = 107, 
 | 
        .period        = 108, 
 | 
        .weight        = 109, 
 | 
        .cpu        = 110, 
 | 
        .raw_size    = sizeof(raw_data), 
 | 
        .data_src    = 111, 
 | 
        .transaction    = 112, 
 | 
        .raw_data    = (void *)raw_data, 
 | 
        .callchain    = &callchain.callchain, 
 | 
        .branch_stack    = &branch_stack.branch_stack, 
 | 
        .user_regs    = { 
 | 
            .abi    = PERF_SAMPLE_REGS_ABI_64, 
 | 
            .mask    = sample_regs, 
 | 
            .regs    = regs, 
 | 
        }, 
 | 
        .user_stack    = { 
 | 
            .size    = sizeof(data), 
 | 
            .data    = (void *)data, 
 | 
        }, 
 | 
        .read        = { 
 | 
            .time_enabled = 0x030a59d664fca7deULL, 
 | 
            .time_running = 0x011b6ae553eb98edULL, 
 | 
        }, 
 | 
        .intr_regs    = { 
 | 
            .abi    = PERF_SAMPLE_REGS_ABI_64, 
 | 
            .mask    = sample_regs, 
 | 
            .regs    = regs, 
 | 
        }, 
 | 
        .phys_addr    = 113, 
 | 
    }; 
 | 
    struct sample_read_value values[] = {{1, 5}, {9, 3}, {2, 7}, {6, 4},}; 
 | 
    struct perf_sample sample_out; 
 | 
    size_t i, sz, bufsz; 
 | 
    int err, ret = -1; 
 | 
  
 | 
    if (sample_type & PERF_SAMPLE_REGS_USER) 
 | 
        evsel.attr.sample_regs_user = sample_regs; 
 | 
  
 | 
    if (sample_type & PERF_SAMPLE_REGS_INTR) 
 | 
        evsel.attr.sample_regs_intr = sample_regs; 
 | 
  
 | 
    for (i = 0; i < sizeof(regs); i++) 
 | 
        *(i + (u8 *)regs) = i & 0xfe; 
 | 
  
 | 
    if (read_format & PERF_FORMAT_GROUP) { 
 | 
        sample.read.group.nr     = 4; 
 | 
        sample.read.group.values = values; 
 | 
    } else { 
 | 
        sample.read.one.value = 0x08789faeb786aa87ULL; 
 | 
        sample.read.one.id    = 99; 
 | 
    } 
 | 
  
 | 
    sz = perf_event__sample_event_size(&sample, sample_type, read_format); 
 | 
    bufsz = sz + 4096; /* Add a bit for overrun checking */ 
 | 
    event = malloc(bufsz); 
 | 
    if (!event) { 
 | 
        pr_debug("malloc failed\n"); 
 | 
        return -1; 
 | 
    } 
 | 
  
 | 
    memset(event, 0xff, bufsz); 
 | 
    event->header.type = PERF_RECORD_SAMPLE; 
 | 
    event->header.misc = 0; 
 | 
    event->header.size = sz; 
 | 
  
 | 
    err = perf_event__synthesize_sample(event, sample_type, read_format, 
 | 
                        &sample); 
 | 
    if (err) { 
 | 
        pr_debug("%s failed for sample_type %#"PRIx64", error %d\n", 
 | 
             "perf_event__synthesize_sample", sample_type, err); 
 | 
        goto out_free; 
 | 
    } 
 | 
  
 | 
    /* The data does not contain 0xff so we use that to check the size */ 
 | 
    for (i = bufsz; i > 0; i--) { 
 | 
        if (*(i - 1 + (u8 *)event) != 0xff) 
 | 
            break; 
 | 
    } 
 | 
    if (i != sz) { 
 | 
        pr_debug("Event size mismatch: actual %zu vs expected %zu\n", 
 | 
             i, sz); 
 | 
        goto out_free; 
 | 
    } 
 | 
  
 | 
    evsel.sample_size = __perf_evsel__sample_size(sample_type); 
 | 
  
 | 
    err = perf_evsel__parse_sample(&evsel, event, &sample_out); 
 | 
    if (err) { 
 | 
        pr_debug("%s failed for sample_type %#"PRIx64", error %d\n", 
 | 
             "perf_evsel__parse_sample", sample_type, err); 
 | 
        goto out_free; 
 | 
    } 
 | 
  
 | 
    if (!samples_same(&sample, &sample_out, sample_type, read_format)) { 
 | 
        pr_debug("parsing failed for sample_type %#"PRIx64"\n", 
 | 
             sample_type); 
 | 
        goto out_free; 
 | 
    } 
 | 
  
 | 
    ret = 0; 
 | 
out_free: 
 | 
    free(event); 
 | 
    if (ret && read_format) 
 | 
        pr_debug("read_format %#"PRIx64"\n", read_format); 
 | 
    return ret; 
 | 
} 
 | 
  
 | 
/** 
 | 
 * test__sample_parsing - test sample parsing. 
 | 
 * 
 | 
 * This function implements a test that synthesizes a sample event, parses it 
 | 
 * and then checks that the parsed sample matches the original sample.  The test 
 | 
 * checks sample format bits separately and together.  If the test passes %0 is 
 | 
 * returned, otherwise %-1 is returned. 
 | 
 */ 
 | 
int test__sample_parsing(struct test *test __maybe_unused, int subtest __maybe_unused) 
 | 
{ 
 | 
    const u64 rf[] = {4, 5, 6, 7, 12, 13, 14, 15}; 
 | 
    u64 sample_type; 
 | 
    u64 sample_regs; 
 | 
    size_t i; 
 | 
    int err; 
 | 
  
 | 
    /* 
 | 
     * Fail the test if it has not been updated when new sample format bits 
 | 
     * were added.  Please actually update the test rather than just change 
 | 
     * the condition below. 
 | 
     */ 
 | 
    if (PERF_SAMPLE_MAX > PERF_SAMPLE_PHYS_ADDR << 1) { 
 | 
        pr_debug("sample format has changed, some new PERF_SAMPLE_ bit was introduced - test needs updating\n"); 
 | 
        return -1; 
 | 
    } 
 | 
  
 | 
    /* Test each sample format bit separately */ 
 | 
    for (sample_type = 1; sample_type != PERF_SAMPLE_MAX; 
 | 
         sample_type <<= 1) { 
 | 
        /* Test read_format variations */ 
 | 
        if (sample_type == PERF_SAMPLE_READ) { 
 | 
            for (i = 0; i < ARRAY_SIZE(rf); i++) { 
 | 
                err = do_test(sample_type, 0, rf[i]); 
 | 
                if (err) 
 | 
                    return err; 
 | 
            } 
 | 
            continue; 
 | 
        } 
 | 
        sample_regs = 0; 
 | 
  
 | 
        if (sample_type == PERF_SAMPLE_REGS_USER) 
 | 
            sample_regs = 0x3fff; 
 | 
  
 | 
        if (sample_type == PERF_SAMPLE_REGS_INTR) 
 | 
            sample_regs = 0xff0fff; 
 | 
  
 | 
        err = do_test(sample_type, sample_regs, 0); 
 | 
        if (err) 
 | 
            return err; 
 | 
    } 
 | 
  
 | 
    /* Test all sample format bits together */ 
 | 
    sample_type = PERF_SAMPLE_MAX - 1; 
 | 
    sample_regs = 0x3fff; /* shared yb intr and user regs */ 
 | 
    for (i = 0; i < ARRAY_SIZE(rf); i++) { 
 | 
        err = do_test(sample_type, sample_regs, rf[i]); 
 | 
        if (err) 
 | 
            return err; 
 | 
    } 
 | 
  
 | 
    return 0; 
 | 
} 
 |