1 /* Test and measure memmove functions.
2 Copyright (C) 1999-2021 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library 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 GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <https://www.gnu.org/licenses/>. */
21 # define TEST_NAME "bcopy"
23 # define TEST_NAME "memmove"
25 #include "test-string.h"
26 #include <support/test-driver.h>
28 char *simple_memmove (char *, const char *, size_t);
31 typedef void (*proto_t
) (const char *, char *, size_t);
32 void simple_bcopy (const char *, char *, size_t);
34 IMPL (simple_bcopy
, 0)
38 simple_bcopy (const char *src
, char *dst
, size_t n
)
40 simple_memmove (dst
, src
, n
);
43 typedef char *(*proto_t
) (char *, const char *, size_t);
45 IMPL (simple_memmove
, 0)
50 inhibit_loop_to_libcall
51 simple_memmove (char *dst
, const char *src
, size_t n
)
68 do_one_test (impl_t
*impl
, char *dst
, char *src
, const char *orig_src
,
71 /* This also clears the destination buffer set by the previous run. */
72 memcpy (src
, orig_src
, len
);
74 CALL (impl
, src
, dst
, len
);
78 res
= CALL (impl
, dst
, src
, len
);
81 error (0, 0, "Wrong result in function %s %p %p", impl
->name
,
88 if (memcmp (dst
, orig_src
, len
) != 0)
90 error (0, 0, "Wrong result in function %s dst \"%s\" src \"%s\"",
91 impl
->name
, dst
, src
);
98 do_test (size_t align1
, size_t align2
, size_t len
)
104 if (align1
+ len
>= page_size
)
108 if (align2
+ len
>= page_size
)
111 s1
= (char *) (buf1
+ align1
);
112 s2
= (char *) (buf2
+ align2
);
114 for (i
= 0, j
= 1; i
< len
; i
++, j
+= 23)
117 FOR_EACH_IMPL (impl
, 0)
118 do_one_test (impl
, s2
, (char *) (buf2
+ align1
), s1
, len
);
122 do_random_tests (void)
124 size_t i
, n
, align1
, align2
, len
, size
;
125 size_t srcstart
, srcend
, dststart
, dstend
;
127 unsigned char *p1
, *p2
;
132 for (n
= 0; n
< ITERATIONS
; n
++)
134 if ((random () & 255) == 0)
138 if (size
> page_size
)
140 if ((random () & 3) == 0)
142 len
= random () & (size
- 1);
143 align1
= size
- len
- (random () & 31);
144 align2
= size
- len
- (random () & 31);
152 align1
= random () & (size
/ 2 - 1);
153 align2
= random () & (size
/ 2 - 1);
154 len
= random () & (size
- 1);
155 if (align1
+ len
> size
)
157 if (align2
+ len
> size
)
161 p1
= buf1
+ page_size
- size
;
162 p2
= buf2
+ page_size
- size
;
164 srcend
= align1
+ len
+ 256;
168 srcstart
= align1
- 256;
171 for (i
= srcstart
; i
< srcend
; ++i
)
172 p1
[i
] = random () & 255;
173 dstend
= align2
+ len
+ 256;
177 dststart
= align2
- 256;
181 FOR_EACH_IMPL (impl
, 1)
183 memset (p2
+ dststart
, c
, dstend
- dststart
);
184 memcpy (p2
+ srcstart
, p1
+ srcstart
, srcend
- srcstart
);
186 CALL (impl
, (char *) (p2
+ align1
), (char *) (p2
+ align2
), len
);
188 res
= (unsigned char *) CALL (impl
,
189 (char *) (p2
+ align2
),
190 (char *) (p2
+ align1
), len
);
191 if (res
!= p2
+ align2
)
193 error (0, 0, "Iteration %zd - wrong result in function %s (%zd, %zd, %zd) %p != %p",
194 n
, impl
->name
, align1
, align2
, len
, res
, p2
+ align2
);
198 if (memcmp (p1
+ align1
, p2
+ align2
, len
))
200 error (0, 0, "Iteration %zd - different strings, %s (%zd, %zd, %zd)",
201 n
, impl
->name
, align1
, align2
, len
);
204 for (i
= dststart
; i
< dstend
; ++i
)
206 if (i
>= align2
&& i
< align2
+ len
)
208 i
= align2
+ len
- 1;
211 if (i
>= srcstart
&& i
< srcend
)
218 error (0, 0, "Iteration %zd - garbage in memset area, %s (%zd, %zd, %zd)",
219 n
, impl
->name
, align1
, align2
, len
);
225 if (srcstart
< align2
226 && memcmp (p2
+ srcstart
, p1
+ srcstart
,
227 (srcend
> align2
? align2
: srcend
) - srcstart
))
229 error (0, 0, "Iteration %zd - garbage before dst, %s (%zd, %zd, %zd)",
230 n
, impl
->name
, align1
, align2
, len
);
235 i
= srcstart
> align2
+ len
? srcstart
: align2
+ len
;
236 if (srcend
> align2
+ len
237 && memcmp (p2
+ i
, p1
+ i
, srcend
- i
))
239 error (0, 0, "Iteration %zd - garbage after dst, %s (%zd, %zd, %zd)",
240 n
, impl
->name
, align1
, align2
, len
);
249 do_test2 (size_t offset
)
251 size_t size
= 0x20000000;
252 uint32_t * large_buf
;
254 large_buf
= mmap ((void*) 0x70000000, size
, PROT_READ
| PROT_WRITE
,
255 MAP_PRIVATE
| MAP_ANON
, -1, 0);
257 if (large_buf
== MAP_FAILED
)
258 error (EXIT_UNSUPPORTED
, errno
, "Large mmap failed");
260 if ((uintptr_t) large_buf
> 0x80000000 - 128
261 || 0x80000000 - (uintptr_t) large_buf
> 0x20000000)
263 error (0, 0, "Large mmap allocated improperly");
264 ret
= EXIT_UNSUPPORTED
;
265 munmap ((void *) large_buf
, size
);
269 size_t bytes_move
= 0x80000000 - (uintptr_t) large_buf
;
270 if (bytes_move
+ offset
* sizeof (uint32_t) > size
)
272 munmap ((void *) large_buf
, size
);
275 size_t arr_size
= bytes_move
/ sizeof (uint32_t);
278 uint32_t * src
= large_buf
;
279 uint32_t * dst
= &large_buf
[offset
];
280 for (repeats
= 0; repeats
< 2; ++repeats
)
282 FOR_EACH_IMPL (impl
, 0)
284 for (i
= 0; i
< arr_size
; i
++)
285 src
[i
] = (uint32_t) i
;
289 CALL (impl
, (char *) src
, (char *) dst
, bytes_move
);
291 CALL (impl
, (char *) dst
, (char *) src
, bytes_move
);
294 for (i
= 0; i
< arr_size
; i
++)
296 if (dst
[i
] != (uint32_t) i
)
299 "Wrong result in function %s dst \"%p\" src \"%p\" offset \"%zd\"",
300 impl
->name
, dst
, src
, i
);
302 munmap ((void *) large_buf
, size
);
311 munmap ((void *) large_buf
, size
);
315 do_test3 (size_t bytes_move
, size_t offset
)
317 size_t size
= bytes_move
* 3;
320 buf
= mmap (NULL
, size
, PROT_READ
| PROT_WRITE
,
321 MAP_PRIVATE
| MAP_ANON
, -1, 0);
323 if (buf
== MAP_FAILED
)
324 error (EXIT_UNSUPPORTED
, errno
, "mmap failed");
326 size_t arr_size
= bytes_move
/ sizeof (uint32_t);
329 FOR_EACH_IMPL (impl
, 0)
331 for (i
= 0; i
< arr_size
; i
++)
332 buf
[i
] = (uint32_t) i
;
334 uint32_t *dst
= &buf
[arr_size
+ offset
];
337 CALL (impl
, (char *) buf
, (char *) dst
, bytes_move
);
339 CALL (impl
, (char *) dst
, (char *) buf
, bytes_move
);
342 for (i
= 0; i
< arr_size
; i
++)
344 if (dst
[i
] != (uint32_t) i
)
347 "Wrong result in function %s dst \"%p\" src \"%p\" offset \"%zd\"",
348 impl
->name
, dst
, buf
, i
);
355 munmap ((void *) buf
, size
);
366 FOR_EACH_IMPL (impl
, 0)
367 printf ("\t%s", impl
->name
);
370 for (i
= 0; i
< 14; ++i
)
372 do_test (0, 32, 1 << i
);
373 do_test (32, 0, 1 << i
);
374 do_test (0, i
, 1 << i
);
375 do_test (i
, 0, 1 << i
);
378 for (i
= 0; i
< 32; ++i
)
386 for (i
= 3; i
< 32; ++i
)
388 if ((i
& (i
- 1)) == 0)
390 do_test (0, 32, 16 * i
);
391 do_test (32, 0, 16 * i
);
392 do_test (0, i
, 16 * i
);
393 do_test (i
, 0, 16 * i
);
400 do_test2 (0x4000000 - 1);
401 do_test2 (0x4000000);
403 /* Copy 16KB data. */
409 #include <support/test-driver.c>