This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
New test: execute/strcpy-1.c
- From: Joern Rennecke <joern dot rennecke at superh dot com>
- To: gcc-patches at gcc dot gnu dot org
- Date: Fri, 17 May 2002 13:11:51 +0100
- Subject: New test: execute/strcpy-1.c
- Organization: SuperH UK Ltd.
--
--------------------------
SuperH
2430 Aztec West / Almondsbury / BRISTOL / BS32 4AQ
T:+44 1454 462330
Fri May 17 12:55:14 2002 J"orn Rennecke <joern.rennecke@superh.com>
* gcc.c-torture/execute/strcpy-1.c: New test.
*** /dev/null Thu Aug 30 21:30:55 2001
--- strcpy-1.c Fri May 17 12:31:13 2002
***************
*** 0 ****
--- 1,75 ----
+ /* Copyright (C) 2002 Free Software Foundation.
+
+ Test strcpy with various combinations of pointer alignments and lengths to
+ make sure any optimizations in the library are correct. */
+
+ #include <string.h>
+
+ #ifndef MAX_OFFSET
+ #define MAX_OFFSET (sizeof (long long))
+ #endif
+
+ #ifndef MAX_COPY
+ #define MAX_COPY (10 * sizeof (long long))
+ #endif
+
+ #ifndef MAX_EXTRA
+ #define MAX_EXTRA (sizeof (long long))
+ #endif
+
+ #define MAX_LENGTH (MAX_OFFSET + MAX_COPY + 1 + MAX_EXTRA)
+
+ /* Use a sequence length that is not divisible by two, to make it more
+ likely to detect when words are mixed up. */
+ #define SEQUENCE_LENGTH 31
+
+ static union {
+ char buf[MAX_LENGTH];
+ long long align_int;
+ long double align_fp;
+ } u1, u2;
+
+ main ()
+ {
+ int off1, off2, len, i;
+ char *p, *q, c;
+
+ for (off1 = 0; off1 < MAX_OFFSET; off1++)
+ for (off2 = 0; off2 < MAX_OFFSET; off2++)
+ for (len = 1; len < MAX_COPY; len++)
+ {
+ for (i = 0, c = 'A'; i < MAX_LENGTH; i++, c++)
+ {
+ u1.buf[i] = 'a';
+ if (c >= 'A' + SEQUENCE_LENGTH)
+ c = 'A';
+ u2.buf[i] = c;
+ }
+ u2.buf[off2 + len] = '\0';
+
+ p = strcpy (u1.buf + off1, u2.buf + off2);
+ if (p != u1.buf + off1)
+ abort ();
+
+ q = u1.buf;
+ for (i = 0; i < off1; i++, q++)
+ if (*q != 'a')
+ abort ();
+
+ for (i = 0, c = 'A' + off2; i < len; i++, q++, c++)
+ {
+ if (c >= 'A' + SEQUENCE_LENGTH)
+ c = 'A';
+ if (*q != c)
+ abort ();
+ }
+
+ if (*q++ != '\0')
+ abort ();
+ for (i = 0; i < MAX_EXTRA; i++, q++)
+ if (*q != 'a')
+ abort ();
+ }
+
+ exit (0);
+ }