2 * Copyright (C) 2008-2021 Free Software Foundation, Inc.
3 * Written by Eric Blake and Bruno Haible
5 * This program is free software: you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 3 of the License, or
8 * (at your option) any later version.
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
15 * You should have received a copy of the GNU General Public License
16 * along with this program. If not, see <https://www.gnu.org/licenses/>. */
22 #include "signature.h"
23 SIGNATURE_CHECK (memchr, void *, (void const *, int, size_t));
27 #include "zerosize-ptr.h"
30 /* Calculating void * + int is not portable, so this wrapper converts
31 to char * to make the tests easier to write. */
32 #define MEMCHR (char *) memchr
38 char *input = malloc (n);
43 memset (input + 2, 'c', 1024);
44 memset (input + 1026, 'd', n - 1028);
48 /* Basic behavior tests. */
49 ASSERT (MEMCHR (input, 'a', n) == input);
51 ASSERT (MEMCHR (input, 'a', 0) == NULL);
54 void *page_boundary = zerosize_ptr ();
56 ASSERT (MEMCHR (page_boundary, 'a', 0) == NULL);
59 ASSERT (MEMCHR (input, 'b', n) == input + 1);
60 ASSERT (MEMCHR (input, 'c', n) == input + 2);
61 ASSERT (MEMCHR (input, 'd', n) == input + 1026);
63 ASSERT (MEMCHR (input + 1, 'a', n - 1) == input + n - 1);
64 ASSERT (MEMCHR (input + 1, 'e', n - 1) == input + n - 2);
65 ASSERT (MEMCHR (input + 1, 0x789abc00 | 'e', n - 1) == input + n - 2);
67 ASSERT (MEMCHR (input, 'f', n) == NULL);
68 ASSERT (MEMCHR (input, '\0', n) == NULL);
70 /* Check that a very long haystack is handled quickly if the byte is
71 found near the beginning. */
73 size_t repeat = 10000;
74 for (; repeat > 0; repeat--)
76 ASSERT (MEMCHR (input, 'c', n) == input + 2);
80 /* Alignment tests. */
83 for (i = 0; i < 32; i++)
85 for (j = 0; j < 256; j++)
87 for (j = 0; j < 256; j++)
89 ASSERT (MEMCHR (input + i, j, 256) == input + i + j);
94 /* Check that memchr() does not read past the first occurrence of the
95 byte being searched. See the Austin Group's clarification
96 <https://www.opengroup.org/austin/docs/austin_454.txt>.
97 Test both '\0' and something else, since some implementations
98 special-case searching for NUL.
101 char *page_boundary = (char *) zerosize_ptr ();
102 /* Too small, and we miss cache line boundary tests; too large,
103 and the test takes cubically longer to complete. */
106 if (page_boundary != NULL)
108 for (n = 1; n <= limit; n++)
110 char *mem = page_boundary - n;
111 memset (mem, 'X', n);
112 ASSERT (MEMCHR (mem, 'U', n) == NULL);
113 ASSERT (MEMCHR (mem, 0, n) == NULL);
119 for (i = 0; i < n; i++)
122 for (k = i + 1; k < n + limit; k++)
123 ASSERT (MEMCHR (mem, 'U', k) == mem + i);
125 for (k = i + 1; k < n + limit; k++)
126 ASSERT (MEMCHR (mem, 0, k) == mem + i);