1 /* Test and measure memmove functions.
2 Copyright (C) 1999-2012 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Written by Jakub Jelinek <jakub@redhat.com>, 1999.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the 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 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, see
18 <http://www.gnu.org/licenses/>. */
21 #include "test-string.h"
23 char *simple_memmove (char *, const char *, size_t);
26 typedef void (*proto_t
) (const char *, char *, size_t);
27 void simple_bcopy (const char *, char *, size_t);
29 IMPL (simple_bcopy
, 0)
33 simple_bcopy (const char *src
, char *dst
, size_t n
)
35 simple_memmove (dst
, src
, n
);
38 typedef char *(*proto_t
) (char *, const char *, size_t);
40 IMPL (simple_memmove
, 0)
45 simple_memmove (char *dst
, const char *src
, size_t n
)
62 do_one_test (impl_t
*impl
, char *dst
, char *src
, const char *orig_src
,
65 memcpy (src
, orig_src
, len
);
67 CALL (impl
, src
, dst
, len
);
71 res
= CALL (impl
, dst
, src
, len
);
74 error (0, 0, "Wrong result in function %s %p %p", impl
->name
,
81 if (memcmp (dst
, orig_src
, len
) != 0)
83 error (0, 0, "Wrong result in function %s dst \"%s\" src \"%s\"",
84 impl
->name
, dst
, src
);
91 hp_timing_t start
__attribute ((unused
));
92 hp_timing_t stop
__attribute ((unused
));
93 hp_timing_t best_time
= ~ (hp_timing_t
) 0;
96 for (i
= 0; i
< 32; ++i
)
98 HP_TIMING_NOW (start
);
100 CALL (impl
, src
, dst
, len
);
102 CALL (impl
, dst
, src
, len
);
104 HP_TIMING_NOW (stop
);
105 HP_TIMING_BEST (best_time
, start
, stop
);
108 printf ("\t%zd", (size_t) best_time
);
113 do_test (size_t align1
, size_t align2
, size_t len
)
119 if (align1
+ len
>= page_size
)
123 if (align2
+ len
>= page_size
)
126 s1
= (char *) (buf1
+ align1
);
127 s2
= (char *) (buf2
+ align2
);
129 for (i
= 0, j
= 1; i
< len
; i
++, j
+= 23)
133 printf ("Length %4zd, alignment %2zd/%2zd:", len
, align1
, align2
);
135 FOR_EACH_IMPL (impl
, 0)
136 do_one_test (impl
, s2
, (char *) (buf2
+ align1
), s1
, len
);
143 do_random_tests (void)
145 size_t i
, n
, align1
, align2
, len
, size
;
146 size_t srcstart
, srcend
, dststart
, dstend
;
148 unsigned char *p1
, *p2
;
153 for (n
= 0; n
< ITERATIONS
; n
++)
155 if ((random () & 255) == 0)
159 if (size
> page_size
)
161 if ((random () & 3) == 0)
163 len
= random () & (size
- 1);
164 align1
= size
- len
- (random () & 31);
165 align2
= size
- len
- (random () & 31);
173 align1
= random () & (size
/ 2 - 1);
174 align2
= random () & (size
/ 2 - 1);
175 len
= random () & (size
- 1);
176 if (align1
+ len
> size
)
178 if (align2
+ len
> size
)
182 p1
= buf1
+ page_size
- size
;
183 p2
= buf2
+ page_size
- size
;
185 srcend
= align1
+ len
+ 256;
189 srcstart
= align1
- 256;
192 for (i
= srcstart
; i
< srcend
; ++i
)
193 p1
[i
] = random () & 255;
194 dstend
= align2
+ len
+ 256;
198 dststart
= align2
- 256;
202 FOR_EACH_IMPL (impl
, 1)
204 memset (p2
+ dststart
, c
, dstend
- dststart
);
205 memcpy (p2
+ srcstart
, p1
+ srcstart
, srcend
- srcstart
);
207 CALL (impl
, (char *) (p2
+ align1
), (char *) (p2
+ align2
), len
);
209 res
= (unsigned char *) CALL (impl
,
210 (char *) (p2
+ align2
),
211 (char *) (p2
+ align1
), len
);
212 if (res
!= p2
+ align2
)
214 error (0, 0, "Iteration %zd - wrong result in function %s (%zd, %zd, %zd) %p != %p",
215 n
, impl
->name
, align1
, align2
, len
, res
, p2
+ align2
);
219 if (memcmp (p1
+ align1
, p2
+ align2
, len
))
221 error (0, 0, "Iteration %zd - different strings, %s (%zd, %zd, %zd)",
222 n
, impl
->name
, align1
, align2
, len
);
225 for (i
= dststart
; i
< dstend
; ++i
)
227 if (i
>= align2
&& i
< align2
+ len
)
229 i
= align2
+ len
- 1;
232 if (i
>= srcstart
&& i
< srcend
)
239 error (0, 0, "Iteration %zd - garbage in memset area, %s (%zd, %zd, %zd)",
240 n
, impl
->name
, align1
, align2
, len
);
246 if (srcstart
< align2
247 && memcmp (p2
+ srcstart
, p1
+ srcstart
,
248 (srcend
> align2
? align2
: srcend
) - srcstart
))
250 error (0, 0, "Iteration %zd - garbage before dst, %s (%zd, %zd, %zd)",
251 n
, impl
->name
, align1
, align2
, len
);
256 i
= srcstart
> align2
+ len
? srcstart
: align2
+ len
;
257 if (srcend
> align2
+ len
258 && memcmp (p2
+ i
, p1
+ i
, srcend
- i
))
260 error (0, 0, "Iteration %zd - garbage after dst, %s (%zd, %zd, %zd)",
261 n
, impl
->name
, align1
, align2
, len
);
277 FOR_EACH_IMPL (impl
, 0)
278 printf ("\t%s", impl
->name
);
281 for (i
= 0; i
< 14; ++i
)
283 do_test (0, 32, 1 << i
);
284 do_test (32, 0, 1 << i
);
285 do_test (0, i
, 1 << i
);
286 do_test (i
, 0, 1 << i
);
289 for (i
= 0; i
< 32; ++i
)
297 for (i
= 3; i
< 32; ++i
)
299 if ((i
& (i
- 1)) == 0)
301 do_test (0, 32, 16 * i
);
302 do_test (32, 0, 16 * i
);
303 do_test (0, i
, 16 * i
);
304 do_test (i
, 0, 16 * i
);
311 #include "../test-skeleton.c"