1 // SPDX-License-Identifier: GPL-2.0
2 #include <stdlib.h>
3 #include <string.h>
4 #include <unistd.h>
5 #include <errno.h>
6 #include <sys/ioctl.h>
7 #include <linux/compiler.h>
8 #include <linux/hw_breakpoint.h>
9 #include <linux/kernel.h>
10 #include "tests.h"
11 #include "debug.h"
12 #include "event.h"
13 #include "cloexec.h"
14 #include "../perf-sys.h"
15
16 #define WP_TEST_ASSERT_VAL(fd, text, val) \
17 do { \
18 long long count; \
19 wp_read(fd, &count, sizeof(long long)); \
20 TEST_ASSERT_VAL(text, count == val); \
21 } while (0)
22
23 #ifdef __i386__
24 /* Only breakpoint length less-than 8 has hardware support on i386. */
25 volatile u32 data1;
26 #else
27 volatile u64 data1;
28 #endif
29 volatile u8 data2[3];
30
31 #ifndef __s390x__
wp_read(int fd,long long * count,int size)32 static int wp_read(int fd, long long *count, int size)
33 {
34 int ret = read(fd, count, size);
35
36 if (ret != size) {
37 pr_debug("failed to read: %d\n", ret);
38 return -1;
39 }
40 return 0;
41 }
42
get__perf_event_attr(struct perf_event_attr * attr,int wp_type,void * wp_addr,unsigned long wp_len)43 static void get__perf_event_attr(struct perf_event_attr *attr, int wp_type,
44 void *wp_addr, unsigned long wp_len)
45 {
46 memset(attr, 0, sizeof(struct perf_event_attr));
47 attr->type = PERF_TYPE_BREAKPOINT;
48 attr->size = sizeof(struct perf_event_attr);
49 attr->config = 0;
50 attr->bp_type = wp_type;
51 attr->bp_addr = (unsigned long)wp_addr;
52 attr->bp_len = wp_len;
53 attr->sample_period = 1;
54 attr->sample_type = PERF_SAMPLE_IP;
55 attr->exclude_kernel = 1;
56 attr->exclude_hv = 1;
57 }
58
__event(int wp_type,void * wp_addr,unsigned long wp_len)59 static int __event(int wp_type, void *wp_addr, unsigned long wp_len)
60 {
61 int fd;
62 struct perf_event_attr attr;
63
64 get__perf_event_attr(&attr, wp_type, wp_addr, wp_len);
65 fd = sys_perf_event_open(&attr, 0, -1, -1,
66 perf_event_open_cloexec_flag());
67 if (fd < 0) {
68 fd = -errno;
69 pr_debug("failed opening event %x\n", attr.bp_type);
70 }
71
72 return fd;
73 }
74 #endif
75
test__wp_ro(struct test_suite * test __maybe_unused,int subtest __maybe_unused)76 static int test__wp_ro(struct test_suite *test __maybe_unused,
77 int subtest __maybe_unused)
78 {
79 #if defined(__s390x__) || defined(__x86_64__) || defined(__i386__)
80 return TEST_SKIP;
81 #else
82 int fd;
83 unsigned long tmp, tmp1 = rand();
84
85 fd = __event(HW_BREAKPOINT_R, (void *)&data1, sizeof(data1));
86 if (fd < 0)
87 return fd == -ENODEV ? TEST_SKIP : -1;
88
89 tmp = data1;
90 WP_TEST_ASSERT_VAL(fd, "RO watchpoint", 1);
91
92 data1 = tmp1 + tmp;
93 WP_TEST_ASSERT_VAL(fd, "RO watchpoint", 1);
94
95 close(fd);
96 return 0;
97 #endif
98 }
99
test__wp_wo(struct test_suite * test __maybe_unused,int subtest __maybe_unused)100 static int test__wp_wo(struct test_suite *test __maybe_unused,
101 int subtest __maybe_unused)
102 {
103 #if defined(__s390x__)
104 return TEST_SKIP;
105 #else
106 int fd;
107 unsigned long tmp, tmp1 = rand();
108
109 fd = __event(HW_BREAKPOINT_W, (void *)&data1, sizeof(data1));
110 if (fd < 0)
111 return fd == -ENODEV ? TEST_SKIP : -1;
112
113 tmp = data1;
114 WP_TEST_ASSERT_VAL(fd, "WO watchpoint", 0);
115
116 data1 = tmp1 + tmp;
117 WP_TEST_ASSERT_VAL(fd, "WO watchpoint", 1);
118
119 close(fd);
120 return 0;
121 #endif
122 }
123
test__wp_rw(struct test_suite * test __maybe_unused,int subtest __maybe_unused)124 static int test__wp_rw(struct test_suite *test __maybe_unused,
125 int subtest __maybe_unused)
126 {
127 #if defined(__s390x__)
128 return TEST_SKIP;
129 #else
130 int fd;
131 unsigned long tmp, tmp1 = rand();
132
133 fd = __event(HW_BREAKPOINT_R | HW_BREAKPOINT_W, (void *)&data1,
134 sizeof(data1));
135 if (fd < 0)
136 return fd == -ENODEV ? TEST_SKIP : -1;
137
138 tmp = data1;
139 WP_TEST_ASSERT_VAL(fd, "RW watchpoint", 1);
140
141 data1 = tmp1 + tmp;
142 WP_TEST_ASSERT_VAL(fd, "RW watchpoint", 2);
143
144 close(fd);
145 return 0;
146 #endif
147 }
148
test__wp_modify(struct test_suite * test __maybe_unused,int subtest __maybe_unused)149 static int test__wp_modify(struct test_suite *test __maybe_unused, int subtest __maybe_unused)
150 {
151 #if defined(__s390x__)
152 return TEST_SKIP;
153 #else
154 int fd, ret;
155 unsigned long tmp = rand();
156 struct perf_event_attr new_attr;
157
158 fd = __event(HW_BREAKPOINT_W, (void *)&data1, sizeof(data1));
159 if (fd < 0)
160 return fd == -ENODEV ? TEST_SKIP : -1;
161
162 data1 = tmp;
163 WP_TEST_ASSERT_VAL(fd, "Modify watchpoint", 1);
164
165 /* Modify watchpoint with disabled = 1 */
166 get__perf_event_attr(&new_attr, HW_BREAKPOINT_W, (void *)&data2[0],
167 sizeof(u8) * 2);
168 new_attr.disabled = 1;
169 ret = ioctl(fd, PERF_EVENT_IOC_MODIFY_ATTRIBUTES, &new_attr);
170 if (ret < 0) {
171 if (errno == ENOTTY) {
172 test->test_cases[subtest].skip_reason = "missing kernel support";
173 ret = TEST_SKIP;
174 }
175
176 pr_debug("ioctl(PERF_EVENT_IOC_MODIFY_ATTRIBUTES) failed\n");
177 close(fd);
178 return ret;
179 }
180
181 data2[1] = tmp; /* Not Counted */
182 WP_TEST_ASSERT_VAL(fd, "Modify watchpoint", 1);
183
184 /* Enable the event */
185 ioctl(fd, PERF_EVENT_IOC_ENABLE, 0);
186 if (ret < 0) {
187 pr_debug("Failed to enable event\n");
188 close(fd);
189 return ret;
190 }
191
192 data2[1] = tmp; /* Counted */
193 WP_TEST_ASSERT_VAL(fd, "Modify watchpoint", 2);
194
195 data2[2] = tmp; /* Not Counted */
196 WP_TEST_ASSERT_VAL(fd, "Modify watchpoint", 2);
197
198 close(fd);
199 return 0;
200 #endif
201 }
202
203 static struct test_case wp_tests[] = {
204 TEST_CASE_REASON("Read Only Watchpoint", wp_ro, "missing hardware support"),
205 TEST_CASE_REASON("Write Only Watchpoint", wp_wo, "missing hardware support"),
206 TEST_CASE_REASON("Read / Write Watchpoint", wp_rw, "missing hardware support"),
207 TEST_CASE_REASON("Modify Watchpoint", wp_modify, "missing hardware support"),
208 { .name = NULL, }
209 };
210
211 struct test_suite suite__wp = {
212 .desc = "Watchpoint",
213 .test_cases = wp_tests,
214 };
215