1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3 * Tests for setexpr command
4 *
5 * Copyright 2020 Google LLC
6 * Written by Simon Glass <sjg@chromium.org>
7 */
8
9 #include <common.h>
10 #include <console.h>
11 #include <mapmem.h>
12 #include <dm/test.h>
13 #include <test/suites.h>
14 #include <test/ut.h>
15
16 #define BUF_SIZE 0x100
17
18 /* Declare a new mem test */
19 #define SETEXPR_TEST(_name, _flags) UNIT_TEST(_name, _flags, setexpr_test)
20
21 /* Test 'setexpr' command with simply setting integers */
setexpr_test_int(struct unit_test_state * uts)22 static int setexpr_test_int(struct unit_test_state *uts)
23 {
24 u8 *buf;
25
26 buf = map_sysmem(0, BUF_SIZE);
27 memset(buf, '\xff', BUF_SIZE);
28
29 /* byte */
30 buf[0x0] = 0x12;
31 ut_assertok(run_command("setexpr.b fred 0", 0));
32 ut_asserteq_str("0", env_get("fred"));
33 ut_assertok(run_command("setexpr.b fred *0", 0));
34 ut_asserteq_str("12", env_get("fred"));
35
36 /* 16-bit */
37 *(short *)buf = 0x2345;
38 ut_assertok(run_command("setexpr.w fred 0", 0));
39 ut_asserteq_str("0", env_get("fred"));
40 ut_assertok(run_command("setexpr.w fred *0", 0));
41 ut_asserteq_str("2345", env_get("fred"));
42
43 /* 32-bit */
44 *(u32 *)buf = 0x3456789a;
45 ut_assertok(run_command("setexpr.l fred 0", 0));
46 ut_asserteq_str("0", env_get("fred"));
47 ut_assertok(run_command("setexpr.l fred *0", 0));
48 ut_asserteq_str("3456789a", env_get("fred"));
49
50 /* 64-bit */
51 *(u64 *)buf = 0x456789abcdef0123;
52 ut_assertok(run_command("setexpr.q fred 0", 0));
53 ut_asserteq_str("0", env_get("fred"));
54 ut_assertok(run_command("setexpr.q fred *0", 0));
55 ut_asserteq_str("456789abcdef0123", env_get("fred"));
56
57 /* default */
58 ut_assertok(run_command("setexpr fred 0", 0));
59 ut_asserteq_str("0", env_get("fred"));
60 ut_assertok(run_command("setexpr fred *0", 0));
61 ut_asserteq_str("cdef0123", env_get("fred"));
62
63 unmap_sysmem(buf);
64
65 return 0;
66 }
67 SETEXPR_TEST(setexpr_test_int, UT_TESTF_CONSOLE_REC);
68
69 /* Test 'setexpr' command with + operator */
setexpr_test_plus(struct unit_test_state * uts)70 static int setexpr_test_plus(struct unit_test_state *uts)
71 {
72 char *buf;
73
74 buf = map_sysmem(0, BUF_SIZE);
75 memset(buf, '\xff', BUF_SIZE);
76
77 /* byte */
78 buf[0x0] = 0x12;
79 buf[0x10] = 0x34;
80 ut_assertok(run_command("setexpr.b fred *0 + *10", 0));
81 ut_asserteq_str("46", env_get("fred"));
82
83 /* 16-bit */
84 *(short *)buf = 0x2345;
85 *(short *)(buf + 0x10) = 0xf012;
86 ut_assertok(run_command("setexpr.w fred *0 + *10", 0));
87 ut_asserteq_str("11357", env_get("fred"));
88
89 /* 32-bit */
90 *(u32 *)buf = 0x3456789a;
91 *(u32 *)(buf + 0x10) = 0xc3384235;
92 ut_assertok(run_command("setexpr.l fred *0 + *10", 0));
93 ut_asserteq_str("f78ebacf", env_get("fred"));
94
95 /* 64-bit */
96 *(u64 *)buf = 0x456789abcdef0123;
97 *(u64 *)(buf + 0x10) = 0x4987328372849283;
98 ut_assertok(run_command("setexpr.q fred *0 + *10", 0));
99 ut_asserteq_str("8eeebc2f407393a6", env_get("fred"));
100
101 /* default */
102 ut_assertok(run_command("setexpr fred *0 + *10", 0));
103 ut_asserteq_str("1407393a6", env_get("fred"));
104
105 unmap_sysmem(buf);
106
107 return 0;
108 }
109 SETEXPR_TEST(setexpr_test_plus, UT_TESTF_CONSOLE_REC);
110
111 /* Test 'setexpr' command with other operators */
setexpr_test_oper(struct unit_test_state * uts)112 static int setexpr_test_oper(struct unit_test_state *uts)
113 {
114 char *buf;
115
116 buf = map_sysmem(0, BUF_SIZE);
117 memset(buf, '\xff', BUF_SIZE);
118
119 *(u32 *)buf = 0x1234;
120 *(u32 *)(buf + 0x10) = 0x560000;
121
122 /* Quote | to avoid confusing hush */
123 ut_assertok(run_command("setexpr fred *0 \"|\" *10", 0));
124 ut_asserteq_str("561234", env_get("fred"));
125
126 *(u32 *)buf = 0x561200;
127 *(u32 *)(buf + 0x10) = 0x1234;
128
129 /* Quote & to avoid confusing hush */
130 ut_assertok(run_command("setexpr.l fred *0 \"&\" *10", 0));
131 ut_asserteq_str("1200", env_get("fred"));
132
133 ut_assertok(run_command("setexpr.l fred *0 ^ *10", 0));
134 ut_asserteq_str("560034", env_get("fred"));
135
136 ut_assertok(run_command("setexpr.l fred *0 - *10", 0));
137 ut_asserteq_str("55ffcc", env_get("fred"));
138
139 ut_assertok(run_command("setexpr.l fred *0 * *10", 0));
140 ut_asserteq_str("61ebfa800", env_get("fred"));
141
142 ut_assertok(run_command("setexpr.l fred *0 / *10", 0));
143 ut_asserteq_str("4ba", env_get("fred"));
144
145 ut_assertok(run_command("setexpr.l fred *0 % *10", 0));
146 ut_asserteq_str("838", env_get("fred"));
147
148 unmap_sysmem(buf);
149
150 return 0;
151 }
152 SETEXPR_TEST(setexpr_test_oper, UT_TESTF_CONSOLE_REC);
153
154 /* Test 'setexpr' command with regex */
setexpr_test_regex(struct unit_test_state * uts)155 static int setexpr_test_regex(struct unit_test_state *uts)
156 {
157 char *buf, *val;
158
159 buf = map_sysmem(0, BUF_SIZE);
160
161 /* Single substitution */
162 ut_assertok(run_command("setenv fred 'this is a test'", 0));
163 ut_assertok(run_command("setexpr fred sub is us", 0));
164 val = env_get("fred");
165 ut_asserteq_str("thus is a test", val);
166
167 /* Global substitution */
168 ut_assertok(run_command("setenv fred 'this is a test'", 0));
169 ut_assertok(run_command("setexpr fred gsub is us", 0));
170 val = env_get("fred");
171 ut_asserteq_str("thus us a test", val);
172
173 /* Global substitution */
174 ut_assertok(run_command("setenv fred 'this is a test'", 0));
175 ut_assertok(run_command("setenv mary 'this is a test'", 0));
176 ut_assertok(run_command("setexpr fred gsub is us \"${mary}\"", 0));
177 val = env_get("fred");
178 ut_asserteq_str("thus us a test", val);
179 val = env_get("mary");
180 ut_asserteq_str("this is a test", val);
181
182 unmap_sysmem(buf);
183
184 return 0;
185 }
186 SETEXPR_TEST(setexpr_test_regex, UT_TESTF_CONSOLE_REC);
187
188 /* Test 'setexpr' command with regex replacement that expands the string */
setexpr_test_regex_inc(struct unit_test_state * uts)189 static int setexpr_test_regex_inc(struct unit_test_state *uts)
190 {
191 char *buf, *val;
192
193 buf = map_sysmem(0, BUF_SIZE);
194
195 ut_assertok(run_command("setenv fred 'this is a test'", 0));
196 ut_assertok(run_command("setexpr fred gsub is much_longer_string", 0));
197 val = env_get("fred");
198 ut_asserteq_str("thmuch_longer_string much_longer_string a test", val);
199 unmap_sysmem(buf);
200
201 return 0;
202 }
203 SETEXPR_TEST(setexpr_test_regex_inc, UT_TESTF_CONSOLE_REC);
204
205 /* Test setexpr_regex_sub() directly to check buffer usage */
setexpr_test_sub(struct unit_test_state * uts)206 static int setexpr_test_sub(struct unit_test_state *uts)
207 {
208 char *buf, *nbuf;
209 int i;
210
211 buf = map_sysmem(0, BUF_SIZE);
212 nbuf = map_sysmem(0x1000, BUF_SIZE);
213
214 /* Add a pattern so we can check the buffer limits */
215 memset(buf, '\xff', BUF_SIZE);
216 memset(nbuf, '\xff', BUF_SIZE);
217 for (i = BUF_SIZE; i < 0x1000; i++) {
218 buf[i] = i & 0xff;
219 nbuf[i] = i & 0xff;
220 }
221 strcpy(buf, "this is a test");
222
223 /*
224 * This is a regression test, since a bug was found in the use of
225 * memmove() in setexpr
226 */
227 ut_assertok(setexpr_regex_sub(buf, BUF_SIZE, nbuf, BUF_SIZE, "is",
228 "us it is longer", true));
229 ut_asserteq_str("thus it is longer us it is longer a test", buf);
230 for (i = BUF_SIZE; i < 0x1000; i++) {
231 ut_assertf(buf[i] == (char)i,
232 "buf byte at %x should be %02x, got %02x)\n",
233 i, i & 0xff, (u8)buf[i]);
234 ut_assertf(nbuf[i] == (char)i,
235 "nbuf byte at %x should be %02x, got %02x)\n",
236 i, i & 0xff, (u8)nbuf[i]);
237 }
238
239 unmap_sysmem(buf);
240
241 return 0;
242 }
243 SETEXPR_TEST(setexpr_test_sub, UT_TESTF_CONSOLE_REC);
244
245 /* Test setexpr_regex_sub() with back references */
setexpr_test_backref(struct unit_test_state * uts)246 static int setexpr_test_backref(struct unit_test_state *uts)
247 {
248 char *buf, *nbuf;
249 int i;
250
251 buf = map_sysmem(0, BUF_SIZE);
252 nbuf = map_sysmem(0x1000, BUF_SIZE);
253
254 /* Add a pattern so we can check the buffer limits */
255 memset(buf, '\xff', BUF_SIZE);
256 memset(nbuf, '\xff', BUF_SIZE);
257 for (i = BUF_SIZE; i < 0x1000; i++) {
258 buf[i] = i & 0xff;
259 nbuf[i] = i & 0xff;
260 }
261 strcpy(buf, "this is surely a test is it? yes this is indeed a test");
262
263 /*
264 * This is a regression test, since a bug was found in the use of
265 * memmove() in setexpr
266 */
267 ut_assertok(setexpr_regex_sub(buf, BUF_SIZE, nbuf, BUF_SIZE,
268 "(this) (is) (surely|indeed)",
269 "us \\1 \\2 \\3!", true));
270 ut_asserteq_str("us this is surely! a test is it? yes us this is indeed! a test",
271 buf);
272
273 /* The following checks fail at present due to a bug in setexpr */
274 return 0;
275 for (i = BUF_SIZE; i < 0x1000; i++) {
276 ut_assertf(buf[i] == (char)i,
277 "buf byte at %x should be %02x, got %02x)\n",
278 i, i & 0xff, (u8)buf[i]);
279 ut_assertf(nbuf[i] == (char)i,
280 "nbuf byte at %x should be %02x, got %02x)\n",
281 i, i & 0xff, (u8)nbuf[i]);
282 }
283
284 unmap_sysmem(buf);
285
286 return 0;
287 }
288 SETEXPR_TEST(setexpr_test_backref, UT_TESTF_CONSOLE_REC);
289
290 /* Test 'setexpr' command with setting strings */
setexpr_test_str(struct unit_test_state * uts)291 static int setexpr_test_str(struct unit_test_state *uts)
292 {
293 ulong start_mem;
294 char *buf;
295
296 buf = map_sysmem(0, BUF_SIZE);
297 memset(buf, '\xff', BUF_SIZE);
298
299 /*
300 * Set 'fred' to the same length as we expect to get below, to avoid a
301 * new allocation in 'setexpr'. That way we can check for memory leaks.
302 */
303 ut_assertok(env_set("fred", "x"));
304 start_mem = ut_check_free();
305 strcpy(buf, "hello");
306 ut_asserteq(1, run_command("setexpr.s fred 0", 0));
307 ut_assertok(ut_check_delta(start_mem));
308
309 start_mem = ut_check_free();
310 ut_assertok(env_set("fred", "12345"));
311 ut_assertok(run_command("setexpr.s fred *0", 0));
312 ut_asserteq_str("hello", env_get("fred"));
313 ut_assertok(ut_check_delta(start_mem));
314
315 unmap_sysmem(buf);
316
317 return 0;
318 }
319 SETEXPR_TEST(setexpr_test_str, UT_TESTF_CONSOLE_REC);
320
321
322 /* Test 'setexpr' command with concatenating strings */
setexpr_test_str_oper(struct unit_test_state * uts)323 static int setexpr_test_str_oper(struct unit_test_state *uts)
324 {
325 ulong start_mem;
326 char *buf;
327
328 buf = map_sysmem(0, BUF_SIZE);
329 memset(buf, '\xff', BUF_SIZE);
330 strcpy(buf, "hello");
331 strcpy(buf + 0x10, " there");
332
333 ut_assertok(console_record_reset_enable());
334 start_mem = ut_check_free();
335 ut_asserteq(1, run_command("setexpr.s fred *0 * *10", 0));
336 ut_assertok(ut_check_delta(start_mem));
337 ut_assert_nextline("invalid op");
338 ut_assert_console_end();
339
340 /*
341 * Set 'fred' to the same length as we expect to get below, to avoid a
342 * new allocation in 'setexpr'. That way we can check for memory leaks.
343 */
344 ut_assertok(env_set("fred", "12345012345"));
345 start_mem = ut_check_free();
346 ut_assertok(run_command("setexpr.s fred *0 + *10", 0));
347 ut_asserteq_str("hello there", env_get("fred"));
348 ut_assertok(ut_check_delta(start_mem));
349
350 unmap_sysmem(buf);
351
352 return 0;
353 }
354 SETEXPR_TEST(setexpr_test_str_oper, UT_TESTF_CONSOLE_REC);
355
356 /* Test 'setexpr' command with a string that is too long */
setexpr_test_str_long(struct unit_test_state * uts)357 static int setexpr_test_str_long(struct unit_test_state *uts)
358 {
359 const int size = 128 << 10; /* setexpr strings are a max of 64KB */
360 char *buf, *val;
361
362 buf = map_sysmem(0, size);
363 memset(buf, 'a', size);
364
365 /* String should be truncated to 64KB */
366 ut_assertok(run_command("setexpr.s fred *0", 0));
367 val = env_get("fred");
368 ut_asserteq(64 << 10, strlen(val));
369
370 unmap_sysmem(buf);
371
372 return 0;
373 }
374 SETEXPR_TEST(setexpr_test_str_long, UT_TESTF_CONSOLE_REC);
375
do_ut_setexpr(struct cmd_tbl * cmdtp,int flag,int argc,char * const argv[])376 int do_ut_setexpr(struct cmd_tbl *cmdtp, int flag, int argc, char *const argv[])
377 {
378 struct unit_test *tests = ll_entry_start(struct unit_test,
379 setexpr_test);
380 const int n_ents = ll_entry_count(struct unit_test, setexpr_test);
381
382 return cmd_ut_category("cmd_setexpr", "cmd_mem_", tests, n_ents, argc,
383 argv);
384 }
385