Update.
[glibc.git] / string / stratcliff.c
blob10ddc47400a4ef34f91cf94ef291cc75da6f3694
1 /* Test for string function add boundaries of usable memory.
2 Copyright (C) 1996, 1997, 1999 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Ulrich Drepper <drepper@cygnus.com>, 1996.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Library General Public License as
8 published by the Free Software Foundation; either version 2 of the
9 License, or (at your option) any later version.
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Library General Public License for more details.
16 You should have received a copy of the GNU Library General Public
17 License along with the GNU C Library; see the file COPYING.LIB. If not,
18 write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA. */
21 #define _GNU_SOURCE 1
23 /* Make sure we don't test the optimized inline functions if we want to
24 test the real implementation. */
25 #undef __USE_STRING_INLINES
27 #include <errno.h>
28 #include <stdio.h>
29 #include <string.h>
30 #include <unistd.h>
31 #include <sys/mman.h>
32 #include <sys/param.h>
34 #ifndef MAX
35 #define MAX(a, b) ((a) > (b) ? (a) : (b))
36 #endif
38 int
39 main (int argc, char *argv[])
41 int size = sysconf (_SC_PAGESIZE);
42 char *adr, *dest;
43 int result = 0;
45 adr = (char *) mmap (NULL, 3 * size, PROT_READ | PROT_WRITE,
46 MAP_PRIVATE | MAP_ANON, -1, 0);
47 dest = (char *) mmap (NULL, 3 * size, PROT_READ | PROT_WRITE,
48 MAP_PRIVATE | MAP_ANON, -1, 0);
49 if (adr == MAP_FAILED || dest == MAP_FAILED)
51 if (errno == ENOSYS)
52 puts ("No test, mmap not available.");
53 else
55 printf ("mmap failed: %m");
56 result = 1;
59 else
61 int inner, middle, outer;
63 mprotect(adr, size, PROT_NONE);
64 mprotect(adr + 2 * size, size, PROT_NONE);
65 adr += size;
67 mprotect(dest, size, PROT_NONE);
68 mprotect(dest + 2 * size, size, PROT_NONE);
69 dest += size;
71 memset (adr, 'T', size);
73 /* strlen test */
74 for (outer = size - 1; outer >= MAX (0, size - 128); --outer)
76 for (inner = MAX (outer, size - 64); inner < size; ++inner)
78 adr[inner] = '\0';
80 if (strlen (&adr[outer]) != (size_t) (inner - outer))
82 printf ("strlen flunked for outer = %d, inner = %d\n",
83 outer, inner);
84 result = 1;
87 adr[inner] = 'T';
91 /* strchr test */
92 for (outer = size - 1; outer >= MAX (0, size - 128); --outer)
94 for (middle = MAX (outer, size - 64); middle < size; ++middle)
96 for (inner = middle; inner < size; ++inner)
98 char *cp;
99 adr[middle] = 'V';
100 adr[inner] = '\0';
102 cp = strchr (&adr[outer], 'V');
104 if ((inner == middle && cp != NULL)
105 || (inner != middle
106 && (cp - &adr[outer]) != middle - outer))
108 printf ("strchr flunked for outer = %d, middle = %d, "
109 "inner = %d\n", outer, middle, inner);
110 result = 1;
113 adr[inner] = 'T';
114 adr[middle] = 'T';
119 /* Special test. */
120 adr[size - 1] = '\0';
121 if (strchr (&adr[size - 1], '\n') != NULL)
123 puts ("strchr flunked for test of empty string at end of page");
124 result = 1;
127 /* strrchr test */
128 for (outer = size - 1; outer >= MAX (0, size - 128); --outer)
130 for (middle = MAX (outer, size - 64); middle < size; ++middle)
132 for (inner = middle; inner < size; ++inner)
134 char *cp;
135 adr[middle] = 'V';
136 adr[inner] = '\0';
138 cp = strrchr (&adr[outer], 'V');
140 if ((inner == middle && cp != NULL)
141 || (inner != middle
142 && (cp - &adr[outer]) != middle - outer))
144 printf ("strrchr flunked for outer = %d, middle = %d, "
145 "inner = %d\n", outer, middle, inner);
146 result = 1;
149 adr[inner] = 'T';
150 adr[middle] = 'T';
155 /* strcpy test */
156 for (outer = size - 1; outer >= MAX (0, size - 128); --outer)
158 for (inner = MAX (outer, size - 64); inner < size; ++inner)
160 adr[inner] = '\0';
162 if (strcpy (dest, &adr[outer]) != dest
163 || strlen (dest) != (size_t) (inner - outer))
165 printf ("strcpy flunked for outer = %d, inner = %d\n",
166 outer, inner);
167 result = 1;
170 adr[inner] = 'T';
174 /* stpcpy test */
175 for (outer = size - 1; outer >= MAX (0, size - 128); --outer)
177 for (inner = MAX (outer, size - 64); inner < size; ++inner)
179 adr[inner] = '\0';
181 if ((stpcpy (dest, &adr[outer]) - dest) != inner - outer)
183 printf ("stpcpy flunked for outer = %d, inner = %d\n",
184 outer, inner);
185 result = 1;
188 adr[inner] = 'T';
193 return result;