1*412f47f9SXin Li /*
2*412f47f9SXin Li * strcmp test.
3*412f47f9SXin Li *
4*412f47f9SXin Li * Copyright (c) 2019-2022, 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 "mte.h"
13*412f47f9SXin Li #include "stringlib.h"
14*412f47f9SXin Li #include "stringtest.h"
15*412f47f9SXin Li
16*412f47f9SXin Li #define F(x, mte) {#x, x, mte},
17*412f47f9SXin Li
18*412f47f9SXin Li static const struct fun
19*412f47f9SXin Li {
20*412f47f9SXin Li const char *name;
21*412f47f9SXin Li int (*fun) (const char *s1, const char *s2);
22*412f47f9SXin Li int test_mte;
23*412f47f9SXin Li } funtab[] = {
24*412f47f9SXin Li // clang-format off
25*412f47f9SXin Li F(strcmp, 0)
26*412f47f9SXin Li #if __aarch64__
27*412f47f9SXin Li F(__strcmp_aarch64, 1)
28*412f47f9SXin Li # if __ARM_FEATURE_SVE
29*412f47f9SXin Li F(__strcmp_aarch64_sve, 1)
30*412f47f9SXin Li # endif
31*412f47f9SXin Li #elif __arm__
32*412f47f9SXin Li # if __ARM_ARCH >= 7 && __ARM_ARCH_ISA_ARM >= 1
33*412f47f9SXin Li F(__strcmp_arm, 0)
34*412f47f9SXin Li # elif __ARM_ARCH == 6 && __ARM_ARCH_6M__ >= 1
35*412f47f9SXin Li F(__strcmp_armv6m, 0)
36*412f47f9SXin Li # endif
37*412f47f9SXin Li #endif
38*412f47f9SXin Li {0, 0, 0}
39*412f47f9SXin Li // clang-format on
40*412f47f9SXin Li };
41*412f47f9SXin Li #undef F
42*412f47f9SXin Li
43*412f47f9SXin Li #define A 32
44*412f47f9SXin Li #define LEN 250000
45*412f47f9SXin Li static char *s1buf;
46*412f47f9SXin Li static char *s2buf;
47*412f47f9SXin Li
48*412f47f9SXin Li static void *
alignup(void * p)49*412f47f9SXin Li alignup (void *p)
50*412f47f9SXin Li {
51*412f47f9SXin Li return (void *) (((uintptr_t) p + A - 1) & -A);
52*412f47f9SXin Li }
53*412f47f9SXin Li
54*412f47f9SXin Li static void
test(const struct fun * fun,int s1align,int s2align,int len,int diffpos,int delta)55*412f47f9SXin Li test (const struct fun *fun, int s1align, int s2align, int len, int diffpos,
56*412f47f9SXin Li int delta)
57*412f47f9SXin Li {
58*412f47f9SXin Li char *src1 = alignup (s1buf);
59*412f47f9SXin Li char *src2 = alignup (s2buf);
60*412f47f9SXin Li char *s1 = src1 + s1align;
61*412f47f9SXin Li char *s2 = src2 + s2align;
62*412f47f9SXin Li int r;
63*412f47f9SXin Li
64*412f47f9SXin Li if (err_count >= ERR_LIMIT)
65*412f47f9SXin Li return;
66*412f47f9SXin Li if (len > LEN || s1align >= A || s2align >= A)
67*412f47f9SXin Li abort ();
68*412f47f9SXin Li if (diffpos >= len)
69*412f47f9SXin Li abort ();
70*412f47f9SXin Li if ((diffpos < 0) != (delta == 0))
71*412f47f9SXin Li abort ();
72*412f47f9SXin Li
73*412f47f9SXin Li for (int i = 0; i < len + A; i++)
74*412f47f9SXin Li src1[i] = src2[i] = '?';
75*412f47f9SXin Li for (int i = 0; i < len; i++)
76*412f47f9SXin Li s1[i] = s2[i] = 'a' + i % 23;
77*412f47f9SXin Li if (delta)
78*412f47f9SXin Li s1[diffpos] += delta;
79*412f47f9SXin Li s1[len] = s2[len] = '\0';
80*412f47f9SXin Li
81*412f47f9SXin Li s1 = tag_buffer (s1, len + 1, fun->test_mte);
82*412f47f9SXin Li s2 = tag_buffer (s2, len + 1, fun->test_mte);
83*412f47f9SXin Li r = fun->fun (s1, s2);
84*412f47f9SXin Li untag_buffer (s1, len + 1, fun->test_mte);
85*412f47f9SXin Li untag_buffer (s2, len + 1, fun->test_mte);
86*412f47f9SXin Li
87*412f47f9SXin Li if ((delta == 0 && r != 0) || (delta > 0 && r <= 0) || (delta < 0 && r >= 0))
88*412f47f9SXin Li {
89*412f47f9SXin Li ERR ("%s(align %d, align %d, %d) failed, returned %d\n", fun->name,
90*412f47f9SXin Li s1align, s2align, len, r);
91*412f47f9SXin Li quoteat ("src1", src1, len + A, diffpos);
92*412f47f9SXin Li quoteat ("src2", src2, len + A, diffpos);
93*412f47f9SXin Li }
94*412f47f9SXin Li }
95*412f47f9SXin Li
96*412f47f9SXin Li int
main()97*412f47f9SXin Li main ()
98*412f47f9SXin Li {
99*412f47f9SXin Li s1buf = mte_mmap (LEN + 2 * A + 1);
100*412f47f9SXin Li s2buf = mte_mmap (LEN + 2 * A + 1);
101*412f47f9SXin Li int r = 0;
102*412f47f9SXin Li for (int i = 0; funtab[i].name; i++)
103*412f47f9SXin Li {
104*412f47f9SXin Li err_count = 0;
105*412f47f9SXin Li for (int d = 0; d < A; d++)
106*412f47f9SXin Li for (int s = 0; s < A; s++)
107*412f47f9SXin Li {
108*412f47f9SXin Li int n;
109*412f47f9SXin Li test (funtab + i, d, s, 0, -1, 0);
110*412f47f9SXin Li test (funtab + i, d, s, 1, -1, 0);
111*412f47f9SXin Li test (funtab + i, d, s, 1, 0, 1);
112*412f47f9SXin Li test (funtab + i, d, s, 1, 0, -1);
113*412f47f9SXin Li for (n = 2; n < 100; n++)
114*412f47f9SXin Li {
115*412f47f9SXin Li test (funtab + i, d, s, n, -1, 0);
116*412f47f9SXin Li test (funtab + i, d, s, n, n - 1, -1);
117*412f47f9SXin Li test (funtab + i, d, s, n, n / 2, 1);
118*412f47f9SXin Li }
119*412f47f9SXin Li for (; n < LEN; n *= 2)
120*412f47f9SXin Li {
121*412f47f9SXin Li test (funtab + i, d, s, n, -1, 0);
122*412f47f9SXin Li test (funtab + i, d, s, n, n / 2, -1);
123*412f47f9SXin Li }
124*412f47f9SXin Li }
125*412f47f9SXin Li char *pass = funtab[i].test_mte && mte_enabled () ? "MTE PASS" : "PASS";
126*412f47f9SXin Li printf ("%s %s\n", err_count ? "FAIL" : pass, funtab[i].name);
127*412f47f9SXin Li if (err_count)
128*412f47f9SXin Li r = -1;
129*412f47f9SXin Li }
130*412f47f9SXin Li return r;
131*412f47f9SXin Li }
132