gnu/dist/gcc4/gcc/testsuite/gcc.c-torture/execute/strcpy-1.c

   1 /* Copyright (C) 2002  Free Software Foundation.
   2
   3    Test strcpy with various combinations of pointer alignments and lengths to
   4    make sure any optimizations in the library are correct.  */
   5
   6 #include <string.h>
   7
   8 #ifndef MAX_OFFSET
   9 #define MAX_OFFSET (sizeof (long long))
  10 #endif
  11
  12 #ifndef MAX_COPY
  13 #define MAX_COPY (10 * sizeof (long long))
  14 #endif
  15
  16 #ifndef MAX_EXTRA
  17 #define MAX_EXTRA (sizeof (long long))
  18 #endif
  19
  20 #define MAX_LENGTH (MAX_OFFSET + MAX_COPY + 1 + MAX_EXTRA)
  21
  22 /* Use a sequence length that is not divisible by two, to make it more
  23    likely to detect when words are mixed up.  */
  24 #define SEQUENCE_LENGTH 31
  25
  26 static union {
  27   char buf[MAX_LENGTH];
  28   long long align_int;
  29   long double align_fp;
  30 } u1, u2;
  31
  32 main ()
  33 {
  34   int off1, off2, len, i;
  35   char *p, *q, c;
  36
  37   for (off1 = 0; off1 < MAX_OFFSET; off1++)
  38     for (off2 = 0; off2 < MAX_OFFSET; off2++)
  39       for (len = 1; len < MAX_COPY; len++)
  40         {
  41           for (i = 0, c = 'A'; i < MAX_LENGTH; i++, c++)
  42             {
  43               u1.buf[i] = 'a';
  44               if (c >= 'A' + SEQUENCE_LENGTH)
  45                 c = 'A';
  46               u2.buf[i] = c;
  47             }
  48           u2.buf[off2 + len] = '\0';
  49
  50           p = strcpy (u1.buf + off1, u2.buf + off2);
  51           if (p != u1.buf + off1)
  52             abort ();
  53
  54           q = u1.buf;
  55           for (i = 0; i < off1; i++, q++)
  56             if (*q != 'a')
  57               abort ();
  58
  59           for (i = 0, c = 'A' + off2; i < len; i++, q++, c++)
  60             {
  61               if (c >= 'A' + SEQUENCE_LENGTH)
  62                 c = 'A';
  63               if (*q != c)
  64                 abort ();
  65             }
  66
  67           if (*q++ != '\0')
  68             abort ();
  69           for (i = 0; i < MAX_EXTRA; i++, q++)
  70             if (*q != 'a')
  71               abort ();
  72         }
  73
  74   exit (0);
  75 }