1*412f47f9SXin Li /*
2*412f47f9SXin Li * memchr test.
3*412f47f9SXin Li *
4*412f47f9SXin Li * Copyright (c) 2019-2020, Arm Limited.
5*412f47f9SXin Li * SPDX-License-Identifier: MIT OR Apache-2.0 WITH LLVM-exception
6*412f47f9SXin Li */
7*412f47f9SXin Li
8*412f47f9SXin Li #include <stdint.h>
9*412f47f9SXin Li #include <stdio.h>
10*412f47f9SXin Li #include <stdlib.h>
11*412f47f9SXin Li #include <string.h>
12*412f47f9SXin Li #include <limits.h>
13*412f47f9SXin Li #include "mte.h"
14*412f47f9SXin Li #include "stringlib.h"
15*412f47f9SXin Li #include "stringtest.h"
16*412f47f9SXin Li
17*412f47f9SXin Li #define F(x, mte) {#x, x, mte},
18*412f47f9SXin Li
19*412f47f9SXin Li static const struct fun
20*412f47f9SXin Li {
21*412f47f9SXin Li const char *name;
22*412f47f9SXin Li void *(*fun) (const void *s, int c, size_t n);
23*412f47f9SXin Li int test_mte;
24*412f47f9SXin Li } funtab[] = {
25*412f47f9SXin Li // clang-format off
26*412f47f9SXin Li F(memchr, 0)
27*412f47f9SXin Li #if __aarch64__
28*412f47f9SXin Li F(__memchr_aarch64, 0)
29*412f47f9SXin Li F(__memchr_aarch64_mte, 1)
30*412f47f9SXin Li # if __ARM_FEATURE_SVE
31*412f47f9SXin Li F(__memchr_aarch64_sve, 1)
32*412f47f9SXin Li # endif
33*412f47f9SXin Li #elif __arm__
34*412f47f9SXin Li F(__memchr_arm, 0)
35*412f47f9SXin Li #endif
36*412f47f9SXin Li {0, 0, 0}
37*412f47f9SXin Li // clang-format on
38*412f47f9SXin Li };
39*412f47f9SXin Li #undef F
40*412f47f9SXin Li
41*412f47f9SXin Li #define ALIGN 32
42*412f47f9SXin Li #define LEN 512
43*412f47f9SXin Li static char *sbuf;
44*412f47f9SXin Li
45*412f47f9SXin Li static void *
alignup(void * p)46*412f47f9SXin Li alignup (void *p)
47*412f47f9SXin Li {
48*412f47f9SXin Li return (void *) (((uintptr_t) p + ALIGN - 1) & -ALIGN);
49*412f47f9SXin Li }
50*412f47f9SXin Li
51*412f47f9SXin Li static void
test(const struct fun * fun,int align,size_t seekpos,size_t len,size_t maxlen)52*412f47f9SXin Li test (const struct fun *fun, int align, size_t seekpos, size_t len,
53*412f47f9SXin Li size_t maxlen)
54*412f47f9SXin Li {
55*412f47f9SXin Li char *src = alignup (sbuf);
56*412f47f9SXin Li char *s = src + align;
57*412f47f9SXin Li char *f = seekpos < maxlen ? s + seekpos : NULL;
58*412f47f9SXin Li int seekchar = 1;
59*412f47f9SXin Li void *p;
60*412f47f9SXin Li
61*412f47f9SXin Li if (err_count >= ERR_LIMIT)
62*412f47f9SXin Li return;
63*412f47f9SXin Li if (len > LEN || seekpos > LEN || align > ALIGN)
64*412f47f9SXin Li abort ();
65*412f47f9SXin Li
66*412f47f9SXin Li for (int i = 0; src + i < s; i++)
67*412f47f9SXin Li src[i] = seekchar;
68*412f47f9SXin Li for (int i = 0; i <= ALIGN; i++)
69*412f47f9SXin Li s[len + i] = seekchar;
70*412f47f9SXin Li for (int i = 0; i < len; i++)
71*412f47f9SXin Li s[i] = 'a' + (i & 31);
72*412f47f9SXin Li s[seekpos] = seekchar;
73*412f47f9SXin Li s[((len ^ align) & 1) ? seekpos + 1 : len] = seekchar;
74*412f47f9SXin Li
75*412f47f9SXin Li int mte_len = seekpos != -1 ? seekpos + 1 : maxlen;
76*412f47f9SXin Li s = tag_buffer (s, mte_len, fun->test_mte);
77*412f47f9SXin Li p = fun->fun (s, seekchar, maxlen);
78*412f47f9SXin Li untag_buffer (s, mte_len, fun->test_mte);
79*412f47f9SXin Li p = untag_pointer (p);
80*412f47f9SXin Li
81*412f47f9SXin Li if (p != f)
82*412f47f9SXin Li {
83*412f47f9SXin Li ERR ("%s (%p, 0x%02x, %zu) returned %p, expected %p\n", fun->name, s,
84*412f47f9SXin Li seekchar, maxlen, p, f);
85*412f47f9SXin Li quote ("input", s, len);
86*412f47f9SXin Li }
87*412f47f9SXin Li }
88*412f47f9SXin Li
89*412f47f9SXin Li int
main(void)90*412f47f9SXin Li main (void)
91*412f47f9SXin Li {
92*412f47f9SXin Li sbuf = mte_mmap (LEN + 3 * ALIGN);
93*412f47f9SXin Li int r = 0;
94*412f47f9SXin Li for (int i = 0; funtab[i].name; i++)
95*412f47f9SXin Li {
96*412f47f9SXin Li err_count = 0;
97*412f47f9SXin Li for (int a = 0; a < ALIGN; a++)
98*412f47f9SXin Li for (int n = 0; n < LEN; n++)
99*412f47f9SXin Li {
100*412f47f9SXin Li for (int sp = 0; sp < LEN; sp++)
101*412f47f9SXin Li test (funtab + i, a, sp, n, n);
102*412f47f9SXin Li test (funtab + i, a, n, n, SIZE_MAX - a);
103*412f47f9SXin Li }
104*412f47f9SXin Li char *pass = funtab[i].test_mte && mte_enabled () ? "MTE PASS" : "PASS";
105*412f47f9SXin Li printf ("%s %s\n", err_count ? "FAIL" : pass, funtab[i].name);
106*412f47f9SXin Li if (err_count)
107*412f47f9SXin Li r = -1;
108*412f47f9SXin Li }
109*412f47f9SXin Li return r;
110*412f47f9SXin Li }
111