xref: /linux/tools/perf/util/kvm-stat-arch/kvm-stat-s390.c (revision c7decec2f2d2ab0366567f9e30c0e1418cece43f)
1*ceea279fSIan Rogers // SPDX-License-Identifier: GPL-2.0-only
2*ceea279fSIan Rogers /*
3*ceea279fSIan Rogers  * Arch specific functions for perf kvm stat.
4*ceea279fSIan Rogers  *
5*ceea279fSIan Rogers  * Copyright 2014 IBM Corp.
6*ceea279fSIan Rogers  * Author(s): Alexander Yarygin <yarygin@linux.vnet.ibm.com>
7*ceea279fSIan Rogers  */
8*ceea279fSIan Rogers 
9*ceea279fSIan Rogers #include <errno.h>
10*ceea279fSIan Rogers #include <string.h>
11*ceea279fSIan Rogers #include "../kvm-stat.h"
12*ceea279fSIan Rogers #include "../evsel.h"
13*ceea279fSIan Rogers #include "../../../arch/s390/include/uapi/asm/sie.h"
14*ceea279fSIan Rogers 
15*ceea279fSIan Rogers define_exit_reasons_table(sie_exit_reasons, sie_intercept_code);
16*ceea279fSIan Rogers define_exit_reasons_table(sie_icpt_insn_codes, icpt_insn_codes);
17*ceea279fSIan Rogers define_exit_reasons_table(sie_sigp_order_codes, sigp_order_codes);
18*ceea279fSIan Rogers define_exit_reasons_table(sie_diagnose_codes, diagnose_codes);
19*ceea279fSIan Rogers define_exit_reasons_table(sie_icpt_prog_codes, icpt_prog_codes);
20*ceea279fSIan Rogers 
event_icpt_insn_get_key(struct evsel * evsel,struct perf_sample * sample,struct event_key * key)21*ceea279fSIan Rogers static void event_icpt_insn_get_key(struct evsel *evsel,
22*ceea279fSIan Rogers 				    struct perf_sample *sample,
23*ceea279fSIan Rogers 				    struct event_key *key)
24*ceea279fSIan Rogers {
25*ceea279fSIan Rogers 	u64 insn;
26*ceea279fSIan Rogers 
27*ceea279fSIan Rogers 	insn = evsel__intval(evsel, sample, "instruction");
28*ceea279fSIan Rogers 	key->key = icpt_insn_decoder(insn);
29*ceea279fSIan Rogers 	key->exit_reasons = sie_icpt_insn_codes;
30*ceea279fSIan Rogers }
31*ceea279fSIan Rogers 
event_sigp_get_key(struct evsel * evsel,struct perf_sample * sample,struct event_key * key)32*ceea279fSIan Rogers static void event_sigp_get_key(struct evsel *evsel,
33*ceea279fSIan Rogers 			       struct perf_sample *sample,
34*ceea279fSIan Rogers 			       struct event_key *key)
35*ceea279fSIan Rogers {
36*ceea279fSIan Rogers 	key->key = evsel__intval(evsel, sample, "order_code");
37*ceea279fSIan Rogers 	key->exit_reasons = sie_sigp_order_codes;
38*ceea279fSIan Rogers }
39*ceea279fSIan Rogers 
event_diag_get_key(struct evsel * evsel,struct perf_sample * sample,struct event_key * key)40*ceea279fSIan Rogers static void event_diag_get_key(struct evsel *evsel,
41*ceea279fSIan Rogers 			       struct perf_sample *sample,
42*ceea279fSIan Rogers 			       struct event_key *key)
43*ceea279fSIan Rogers {
44*ceea279fSIan Rogers 	key->key = evsel__intval(evsel, sample, "code");
45*ceea279fSIan Rogers 	key->exit_reasons = sie_diagnose_codes;
46*ceea279fSIan Rogers }
47*ceea279fSIan Rogers 
event_icpt_prog_get_key(struct evsel * evsel,struct perf_sample * sample,struct event_key * key)48*ceea279fSIan Rogers static void event_icpt_prog_get_key(struct evsel *evsel,
49*ceea279fSIan Rogers 				    struct perf_sample *sample,
50*ceea279fSIan Rogers 				    struct event_key *key)
51*ceea279fSIan Rogers {
52*ceea279fSIan Rogers 	key->key = evsel__intval(evsel, sample, "code");
53*ceea279fSIan Rogers 	key->exit_reasons = sie_icpt_prog_codes;
54*ceea279fSIan Rogers }
55*ceea279fSIan Rogers 
56*ceea279fSIan Rogers static const struct child_event_ops child_events[] = {
57*ceea279fSIan Rogers 	{ .name = "kvm:kvm_s390_intercept_instruction",
58*ceea279fSIan Rogers 	  .get_key = event_icpt_insn_get_key },
59*ceea279fSIan Rogers 	{ .name = "kvm:kvm_s390_handle_sigp",
60*ceea279fSIan Rogers 	  .get_key = event_sigp_get_key },
61*ceea279fSIan Rogers 	{ .name = "kvm:kvm_s390_handle_diag",
62*ceea279fSIan Rogers 	  .get_key = event_diag_get_key },
63*ceea279fSIan Rogers 	{ .name = "kvm:kvm_s390_intercept_prog",
64*ceea279fSIan Rogers 	  .get_key = event_icpt_prog_get_key },
65*ceea279fSIan Rogers 	{ NULL, NULL },
66*ceea279fSIan Rogers };
67*ceea279fSIan Rogers 
68*ceea279fSIan Rogers static const struct kvm_events_ops exit_events = {
69*ceea279fSIan Rogers 	.is_begin_event = exit_event_begin,
70*ceea279fSIan Rogers 	.is_end_event = exit_event_end,
71*ceea279fSIan Rogers 	.child_ops = child_events,
72*ceea279fSIan Rogers 	.decode_key = exit_event_decode_key,
73*ceea279fSIan Rogers 	.name = "VM-EXIT"
74*ceea279fSIan Rogers };
75*ceea279fSIan Rogers 
76*ceea279fSIan Rogers static const char * const __kvm_events_tp[] = {
77*ceea279fSIan Rogers 	"kvm:kvm_s390_sie_enter",
78*ceea279fSIan Rogers 	"kvm:kvm_s390_sie_exit",
79*ceea279fSIan Rogers 	"kvm:kvm_s390_intercept_instruction",
80*ceea279fSIan Rogers 	"kvm:kvm_s390_handle_sigp",
81*ceea279fSIan Rogers 	"kvm:kvm_s390_handle_diag",
82*ceea279fSIan Rogers 	"kvm:kvm_s390_intercept_prog",
83*ceea279fSIan Rogers 	NULL,
84*ceea279fSIan Rogers };
85*ceea279fSIan Rogers 
86*ceea279fSIan Rogers static const struct kvm_reg_events_ops __kvm_reg_events_ops[] = {
87*ceea279fSIan Rogers 	{ .name = "vmexit", .ops = &exit_events },
88*ceea279fSIan Rogers 	{ NULL, NULL },
89*ceea279fSIan Rogers };
90*ceea279fSIan Rogers 
91*ceea279fSIan Rogers static const char * const __kvm_skip_events[] = {
92*ceea279fSIan Rogers 	"Wait state",
93*ceea279fSIan Rogers 	NULL,
94*ceea279fSIan Rogers };
95*ceea279fSIan Rogers 
__cpu_isa_init_s390(struct perf_kvm_stat * kvm,const char * cpuid)96*ceea279fSIan Rogers int __cpu_isa_init_s390(struct perf_kvm_stat *kvm, const char *cpuid)
97*ceea279fSIan Rogers {
98*ceea279fSIan Rogers 	if (strstr(cpuid, "IBM")) {
99*ceea279fSIan Rogers 		kvm->exit_reasons = sie_exit_reasons;
100*ceea279fSIan Rogers 		kvm->exit_reasons_isa = "SIE";
101*ceea279fSIan Rogers 	} else
102*ceea279fSIan Rogers 		return -ENOTSUP;
103*ceea279fSIan Rogers 
104*ceea279fSIan Rogers 	return 0;
105*ceea279fSIan Rogers }
106*ceea279fSIan Rogers 
__kvm_events_tp_s390(void)107*ceea279fSIan Rogers const char * const *__kvm_events_tp_s390(void)
108*ceea279fSIan Rogers {
109*ceea279fSIan Rogers 	return __kvm_events_tp;
110*ceea279fSIan Rogers }
111*ceea279fSIan Rogers 
__kvm_reg_events_ops_s390(void)112*ceea279fSIan Rogers const struct kvm_reg_events_ops *__kvm_reg_events_ops_s390(void)
113*ceea279fSIan Rogers {
114*ceea279fSIan Rogers 	return __kvm_reg_events_ops;
115*ceea279fSIan Rogers }
116*ceea279fSIan Rogers 
__kvm_skip_events_s390(void)117*ceea279fSIan Rogers const char * const *__kvm_skip_events_s390(void)
118*ceea279fSIan Rogers {
119*ceea279fSIan Rogers 	return __kvm_skip_events;
120*ceea279fSIan Rogers }
121