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