3be8e2a0a5
On s390, the vmexit event has a tree-like structure: between exit_event_begin and exit_event_end several other events may happen and with each of them refining the previous ones. This patch adds a decoder for such events to the generic code and also the files <asm/kvm_perf.h> and kvm-stat.c for s390. Commands 'perf kvm stat record', 'report' and 'live' are supported. Reviewed-by: David Ahern <dsahern@gmail.com> Signed-off-by: Alexander Yarygin <yarygin@linux.vnet.ibm.com> Acked-by: Christian Borntraeger <borntraeger@de.ibm.com> Cc: Christian Borntraeger <borntraeger@de.ibm.com> Cc: Cornelia Huck <cornelia.huck@de.ibm.com> Cc: David Ahern <dsahern@gmail.com> Cc: Ingo Molnar <mingo@kernel.org> Cc: Jiri Olsa <jolsa@redhat.com> Cc: Paul Mackerras <paulus@samba.org> Cc: Peter Zijlstra <a.p.zijlstra@chello.nl> Link: http://lkml.kernel.org/r/1404397747-20939-5-git-send-email-yarygin@linux.vnet.ibm.com Signed-off-by: Arnaldo Carvalho de Melo <acme@redhat.com>
105 lines
2.9 KiB
C
105 lines
2.9 KiB
C
/*
|
|
* Arch specific functions for perf kvm stat.
|
|
*
|
|
* Copyright 2014 IBM Corp.
|
|
* Author(s): Alexander Yarygin <yarygin@linux.vnet.ibm.com>
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License (version 2 only)
|
|
* as published by the Free Software Foundation.
|
|
*/
|
|
|
|
#include "../../util/kvm-stat.h"
|
|
#include <asm/kvm_perf.h>
|
|
|
|
define_exit_reasons_table(sie_exit_reasons, sie_intercept_code);
|
|
define_exit_reasons_table(sie_icpt_insn_codes, icpt_insn_codes);
|
|
define_exit_reasons_table(sie_sigp_order_codes, sigp_order_codes);
|
|
define_exit_reasons_table(sie_diagnose_codes, diagnose_codes);
|
|
define_exit_reasons_table(sie_icpt_prog_codes, icpt_prog_codes);
|
|
|
|
static void event_icpt_insn_get_key(struct perf_evsel *evsel,
|
|
struct perf_sample *sample,
|
|
struct event_key *key)
|
|
{
|
|
unsigned long insn;
|
|
|
|
insn = perf_evsel__intval(evsel, sample, "instruction");
|
|
key->key = icpt_insn_decoder(insn);
|
|
key->exit_reasons = sie_icpt_insn_codes;
|
|
}
|
|
|
|
static void event_sigp_get_key(struct perf_evsel *evsel,
|
|
struct perf_sample *sample,
|
|
struct event_key *key)
|
|
{
|
|
key->key = perf_evsel__intval(evsel, sample, "order_code");
|
|
key->exit_reasons = sie_sigp_order_codes;
|
|
}
|
|
|
|
static void event_diag_get_key(struct perf_evsel *evsel,
|
|
struct perf_sample *sample,
|
|
struct event_key *key)
|
|
{
|
|
key->key = perf_evsel__intval(evsel, sample, "code");
|
|
key->exit_reasons = sie_diagnose_codes;
|
|
}
|
|
|
|
static void event_icpt_prog_get_key(struct perf_evsel *evsel,
|
|
struct perf_sample *sample,
|
|
struct event_key *key)
|
|
{
|
|
key->key = perf_evsel__intval(evsel, sample, "code");
|
|
key->exit_reasons = sie_icpt_prog_codes;
|
|
}
|
|
|
|
static struct child_event_ops child_events[] = {
|
|
{ .name = "kvm:kvm_s390_intercept_instruction",
|
|
.get_key = event_icpt_insn_get_key },
|
|
{ .name = "kvm:kvm_s390_handle_sigp",
|
|
.get_key = event_sigp_get_key },
|
|
{ .name = "kvm:kvm_s390_handle_diag",
|
|
.get_key = event_diag_get_key },
|
|
{ .name = "kvm:kvm_s390_intercept_prog",
|
|
.get_key = event_icpt_prog_get_key },
|
|
{ NULL, NULL },
|
|
};
|
|
|
|
static struct kvm_events_ops exit_events = {
|
|
.is_begin_event = exit_event_begin,
|
|
.is_end_event = exit_event_end,
|
|
.child_ops = child_events,
|
|
.decode_key = exit_event_decode_key,
|
|
.name = "VM-EXIT"
|
|
};
|
|
|
|
const char * const kvm_events_tp[] = {
|
|
"kvm:kvm_s390_sie_enter",
|
|
"kvm:kvm_s390_sie_exit",
|
|
"kvm:kvm_s390_intercept_instruction",
|
|
"kvm:kvm_s390_handle_sigp",
|
|
"kvm:kvm_s390_handle_diag",
|
|
"kvm:kvm_s390_intercept_prog",
|
|
NULL,
|
|
};
|
|
|
|
struct kvm_reg_events_ops kvm_reg_events_ops[] = {
|
|
{ .name = "vmexit", .ops = &exit_events },
|
|
{ NULL, NULL },
|
|
};
|
|
|
|
const char * const kvm_skip_events[] = {
|
|
"Wait state",
|
|
NULL,
|
|
};
|
|
|
|
int cpu_isa_init(struct perf_kvm_stat *kvm, const char *cpuid)
|
|
{
|
|
if (strstr(cpuid, "IBM/S390")) {
|
|
kvm->exit_reasons = sie_exit_reasons;
|
|
kvm->exit_reasons_isa = "SIE";
|
|
} else
|
|
return -ENOTSUP;
|
|
|
|
return 0;
|
|
}
|