gcc/testsuite/gcc.dg/strlenopt-11.c

   1 /* { dg-do run } */
   2 /* { dg-options "-O2 -fdump-tree-strlen" } */
   3
   4 #include "strlenopt.h"
   5
   6 __attribute__((noinline, noclone)) void
   7 fn1 (char *p, const char *z, size_t *lp)
   8 {
   9   char *q, *r, *s;
  10   char buf[64];
  11   size_t l[11];
  12   /* The first strlen stays, all the strcpy calls can be optimized
  13      into memcpy and most other strlen calls and all strchr calls
  14      optimized away.  l[6] = strlen (r); and l[9] = strlen (r); need
  15      to stay, because we need to invalidate the knowledge about
  16      r strlen after strcpy (q, "jklmnopqrst").  */
  17   l[0] = strlen (z);
  18   strcpy (buf, z);
  19   strcpy (p, "abcde");
  20   q = strchr (p, '\0');
  21   strcpy (q, "efghi");
  22   r = strchr (q, '\0');
  23   strcpy (r, buf);
  24   l[1] = strlen (p);
  25   l[2] = strlen (q);
  26   l[3] = strlen (r);
  27   strcpy (q, "jklmnopqrst");
  28   l[4] = strlen (p);
  29   l[5] = strlen (q);
  30   l[6] = strlen (r);
  31   s = strchr (q, '\0');
  32   strcpy (s, buf);
  33   l[7] = strlen (p);
  34   l[8] = strlen (q);
  35   l[9] = strlen (r);
  36   l[10] = strlen (s);
  37   memcpy (lp, l, sizeof l);
  38 }
  39
  40 int
  41 main ()
  42 {
  43   char buf[64];
  44   size_t l[11];
  45   const char *volatile z = "ABCDEFG";
  46   memset (buf, '\0', sizeof buf);
  47   fn1 (buf, z, l);
  48   if (memcmp (buf, "abcdejklmnopqrstABCDEFG", 24) != 0)
  49     abort ();
  50   if (l[0] != 7)
  51     abort ();
  52   if (l[1] != 17 || l[2] != 12 || l[3] != 7)
  53     abort ();
  54   if (l[4] != 16 || l[5] != 11 || l[6] != 6)
  55     abort ();
  56   if (l[7] != 23 || l[8] != 18 || l[9] != 13 || l[10] != 7)
  57     abort ();
  58   return 0;
  59 }
  60
  61 /* { dg-final { scan-tree-dump-times "strlen \\(" 3 "strlen" } } */
  62 /* { dg-final { scan-tree-dump-times "memcpy \\(" 7 "strlen" } } */
  63 /* { dg-final { scan-tree-dump-times "strcpy \\(" 0 "strlen" } } */
  64 /* { dg-final { scan-tree-dump-times "strcat \\(" 0 "strlen" } } */
  65 /* { dg-final { scan-tree-dump-times "strchr \\(" 0 "strlen" } } */
  66 /* { dg-final { scan-tree-dump-times "stpcpy \\(" 0 "strlen" } } */
  67 /* { dg-final { scan-tree-dump-times "  D\.\[0-9_\]* = strlen \\(\[^\n\r\]*;\[\n\r\]*  l.0. = " 1 "strlen" } } */
  68 /* { dg-final { scan-tree-dump-times "  D\.\[0-9_\]* = strlen \\(\[^\n\r\]*;\[\n\r\]*  l.6. = " 1 "strlen" } } */
  69 /* { dg-final { scan-tree-dump-times "  D\.\[0-9_\]* = strlen \\(\[^\n\r\]*;\[\n\r\]*  l.9. = " 1 "strlen" } } */
  70 /* { dg-final { cleanup-tree-dump "strlen" } } */