1#!/bin/bash
2# SPDX-License-Identifier: GPL-2.0
3
4# Kselftest frmework requirement - SKIP code is 4.
5ksft_skip=4
6
7ensure_write_succ()
8{
9	file=$1
10	content=$2
11	reason=$3
12
13	if ! echo "$content" > "$file"
14	then
15		echo "writing $content to $file failed"
16		echo "expected success because $reason"
17		exit 1
18	fi
19}
20
21ensure_write_fail()
22{
23	file=$1
24	content=$2
25	reason=$3
26
27	if (echo "$content" > "$file") 2> /dev/null
28	then
29		echo "writing $content to $file succeed ($fail_reason)"
30		echo "expected failure because $reason"
31		exit 1
32	fi
33}
34
35ensure_dir()
36{
37	dir=$1
38	to_ensure=$2
39	if [ "$to_ensure" = "exist" ] && [ ! -d "$dir" ]
40	then
41		echo "$dir dir is expected but not found"
42		exit 1
43	elif [ "$to_ensure" = "not_exist" ] && [ -d "$dir" ]
44	then
45		echo "$dir dir is not expected but found"
46		exit 1
47	fi
48}
49
50ensure_file()
51{
52	file=$1
53	to_ensure=$2
54	permission=$3
55	if [ "$to_ensure" = "exist" ]
56	then
57		if [ ! -f "$file" ]
58		then
59			echo "$file is expected but not found"
60			exit 1
61		fi
62		perm=$(stat -c "%a" "$file")
63		if [ ! "$perm" = "$permission" ]
64		then
65			echo "$file permission: expected $permission but $perm"
66			exit 1
67		fi
68	elif [ "$to_ensure" = "not_exist" ] && [ -f "$dir" ]
69	then
70		echo "$file is not expected but found"
71		exit 1
72	fi
73}
74
75test_range()
76{
77	range_dir=$1
78	ensure_dir "$range_dir" "exist"
79	ensure_file "$range_dir/min" "exist" 600
80	ensure_file "$range_dir/max" "exist" 600
81}
82
83test_tried_regions()
84{
85	tried_regions_dir=$1
86	ensure_dir "$tried_regions_dir" "exist"
87	ensure_file "$tried_regions_dir/total_bytes" "exist" "400"
88}
89
90test_stats()
91{
92	stats_dir=$1
93	ensure_dir "$stats_dir" "exist"
94	for f in nr_tried sz_tried nr_applied sz_applied qt_exceeds
95	do
96		ensure_file "$stats_dir/$f" "exist" "400"
97	done
98}
99
100test_filter()
101{
102	filter_dir=$1
103	ensure_file "$filter_dir/type" "exist" "600"
104	ensure_write_succ "$filter_dir/type" "anon" "valid input"
105	ensure_write_succ "$filter_dir/type" "memcg" "valid input"
106	ensure_write_fail "$filter_dir/type" "foo" "invalid input"
107	ensure_file "$filter_dir/matching" "exist" "600"
108	ensure_file "$filter_dir/memcg_path" "exist" "600"
109}
110
111test_filters()
112{
113	filters_dir=$1
114	ensure_dir "$filters_dir" "exist"
115	ensure_file "$filters_dir/nr_filters" "exist" "600"
116	ensure_write_succ  "$filters_dir/nr_filters" "1" "valid input"
117	test_filter "$filters_dir/0"
118
119	ensure_write_succ  "$filters_dir/nr_filters" "2" "valid input"
120	test_filter "$filters_dir/0"
121	test_filter "$filters_dir/1"
122
123	ensure_write_succ "$filters_dir/nr_filters" "0" "valid input"
124	ensure_dir "$filters_dir/0" "not_exist"
125	ensure_dir "$filters_dir/1" "not_exist"
126}
127
128test_watermarks()
129{
130	watermarks_dir=$1
131	ensure_dir "$watermarks_dir" "exist"
132	ensure_file "$watermarks_dir/metric" "exist" "600"
133	ensure_file "$watermarks_dir/interval_us" "exist" "600"
134	ensure_file "$watermarks_dir/high" "exist" "600"
135	ensure_file "$watermarks_dir/mid" "exist" "600"
136	ensure_file "$watermarks_dir/low" "exist" "600"
137}
138
139test_weights()
140{
141	weights_dir=$1
142	ensure_dir "$weights_dir" "exist"
143	ensure_file "$weights_dir/sz_permil" "exist" "600"
144	ensure_file "$weights_dir/nr_accesses_permil" "exist" "600"
145	ensure_file "$weights_dir/age_permil" "exist" "600"
146}
147
148test_quotas()
149{
150	quotas_dir=$1
151	ensure_dir "$quotas_dir" "exist"
152	ensure_file "$quotas_dir/ms" "exist" 600
153	ensure_file "$quotas_dir/bytes" "exist" 600
154	ensure_file "$quotas_dir/reset_interval_ms" "exist" 600
155	test_weights "$quotas_dir/weights"
156}
157
158test_access_pattern()
159{
160	access_pattern_dir=$1
161	ensure_dir "$access_pattern_dir" "exist"
162	test_range "$access_pattern_dir/age"
163	test_range "$access_pattern_dir/nr_accesses"
164	test_range "$access_pattern_dir/sz"
165}
166
167test_scheme()
168{
169	scheme_dir=$1
170	ensure_dir "$scheme_dir" "exist"
171	ensure_file "$scheme_dir/action" "exist" "600"
172	test_access_pattern "$scheme_dir/access_pattern"
173	test_quotas "$scheme_dir/quotas"
174	test_watermarks "$scheme_dir/watermarks"
175	test_filters "$scheme_dir/filters"
176	test_stats "$scheme_dir/stats"
177	test_tried_regions "$scheme_dir/tried_regions"
178}
179
180test_schemes()
181{
182	schemes_dir=$1
183	ensure_dir "$schemes_dir" "exist"
184	ensure_file "$schemes_dir/nr_schemes" "exist" 600
185
186	ensure_write_succ  "$schemes_dir/nr_schemes" "1" "valid input"
187	test_scheme "$schemes_dir/0"
188
189	ensure_write_succ  "$schemes_dir/nr_schemes" "2" "valid input"
190	test_scheme "$schemes_dir/0"
191	test_scheme "$schemes_dir/1"
192
193	ensure_write_succ "$schemes_dir/nr_schemes" "0" "valid input"
194	ensure_dir "$schemes_dir/0" "not_exist"
195	ensure_dir "$schemes_dir/1" "not_exist"
196}
197
198test_region()
199{
200	region_dir=$1
201	ensure_dir "$region_dir" "exist"
202	ensure_file "$region_dir/start" "exist" 600
203	ensure_file "$region_dir/end" "exist" 600
204}
205
206test_regions()
207{
208	regions_dir=$1
209	ensure_dir "$regions_dir" "exist"
210	ensure_file "$regions_dir/nr_regions" "exist" 600
211
212	ensure_write_succ  "$regions_dir/nr_regions" "1" "valid input"
213	test_region "$regions_dir/0"
214
215	ensure_write_succ  "$regions_dir/nr_regions" "2" "valid input"
216	test_region "$regions_dir/0"
217	test_region "$regions_dir/1"
218
219	ensure_write_succ "$regions_dir/nr_regions" "0" "valid input"
220	ensure_dir "$regions_dir/0" "not_exist"
221	ensure_dir "$regions_dir/1" "not_exist"
222}
223
224test_target()
225{
226	target_dir=$1
227	ensure_dir "$target_dir" "exist"
228	ensure_file "$target_dir/pid_target" "exist" "600"
229	test_regions "$target_dir/regions"
230}
231
232test_targets()
233{
234	targets_dir=$1
235	ensure_dir "$targets_dir" "exist"
236	ensure_file "$targets_dir/nr_targets" "exist" 600
237
238	ensure_write_succ  "$targets_dir/nr_targets" "1" "valid input"
239	test_target "$targets_dir/0"
240
241	ensure_write_succ  "$targets_dir/nr_targets" "2" "valid input"
242	test_target "$targets_dir/0"
243	test_target "$targets_dir/1"
244
245	ensure_write_succ "$targets_dir/nr_targets" "0" "valid input"
246	ensure_dir "$targets_dir/0" "not_exist"
247	ensure_dir "$targets_dir/1" "not_exist"
248}
249
250test_intervals()
251{
252	intervals_dir=$1
253	ensure_dir "$intervals_dir" "exist"
254	ensure_file "$intervals_dir/aggr_us" "exist" "600"
255	ensure_file "$intervals_dir/sample_us" "exist" "600"
256	ensure_file "$intervals_dir/update_us" "exist" "600"
257}
258
259test_monitoring_attrs()
260{
261	monitoring_attrs_dir=$1
262	ensure_dir "$monitoring_attrs_dir" "exist"
263	test_intervals "$monitoring_attrs_dir/intervals"
264	test_range "$monitoring_attrs_dir/nr_regions"
265}
266
267test_context()
268{
269	context_dir=$1
270	ensure_dir "$context_dir" "exist"
271	ensure_file "$context_dir/avail_operations" "exit" 400
272	ensure_file "$context_dir/operations" "exist" 600
273	test_monitoring_attrs "$context_dir/monitoring_attrs"
274	test_targets "$context_dir/targets"
275	test_schemes "$context_dir/schemes"
276}
277
278test_contexts()
279{
280	contexts_dir=$1
281	ensure_dir "$contexts_dir" "exist"
282	ensure_file "$contexts_dir/nr_contexts" "exist" 600
283
284	ensure_write_succ  "$contexts_dir/nr_contexts" "1" "valid input"
285	test_context "$contexts_dir/0"
286
287	ensure_write_fail "$contexts_dir/nr_contexts" "2" "only 0/1 are supported"
288	test_context "$contexts_dir/0"
289
290	ensure_write_succ "$contexts_dir/nr_contexts" "0" "valid input"
291	ensure_dir "$contexts_dir/0" "not_exist"
292}
293
294test_kdamond()
295{
296	kdamond_dir=$1
297	ensure_dir "$kdamond_dir" "exist"
298	ensure_file "$kdamond_dir/state" "exist" "600"
299	ensure_file "$kdamond_dir/pid" "exist" 400
300	test_contexts "$kdamond_dir/contexts"
301}
302
303test_kdamonds()
304{
305	kdamonds_dir=$1
306	ensure_dir "$kdamonds_dir" "exist"
307
308	ensure_file "$kdamonds_dir/nr_kdamonds" "exist" "600"
309
310	ensure_write_succ  "$kdamonds_dir/nr_kdamonds" "1" "valid input"
311	test_kdamond "$kdamonds_dir/0"
312
313	ensure_write_succ  "$kdamonds_dir/nr_kdamonds" "2" "valid input"
314	test_kdamond "$kdamonds_dir/0"
315	test_kdamond "$kdamonds_dir/1"
316
317	ensure_write_succ "$kdamonds_dir/nr_kdamonds" "0" "valid input"
318	ensure_dir "$kdamonds_dir/0" "not_exist"
319	ensure_dir "$kdamonds_dir/1" "not_exist"
320}
321
322test_damon_sysfs()
323{
324	damon_sysfs=$1
325	if [ ! -d "$damon_sysfs" ]
326	then
327		echo "$damon_sysfs not found"
328		exit $ksft_skip
329	fi
330
331	test_kdamonds "$damon_sysfs/kdamonds"
332}
333
334check_dependencies()
335{
336	if [ $EUID -ne 0 ]
337	then
338		echo "Run as root"
339		exit $ksft_skip
340	fi
341}
342
343check_dependencies
344test_damon_sysfs "/sys/kernel/mm/damon/admin"
345