1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
|
/* { dg-do run } */
/* { dg-options "-O2 -fdump-tree-strlen" } */
#include "strlenopt.h"
__attribute__((noinline, noclone)) size_t
fn1 (char *p)
{
char *q;
/* This can be optimized into memcpy and the size can be decreased to one,
as it is immediately overwritten. */
strcpy (p, "z");
q = strchr (p, '\0');
*q = 32;
/* This strlen can't be optimized away, string length is unknown here. */
return strlen (p);
}
__attribute__((noinline, noclone)) void
fn2 (char *p, const char *z, size_t *lp)
{
char *q, *r;
char buf[64];
size_t l[10];
/* The first strlen stays, all the strcpy calls can be optimized
into memcpy and all other strlen calls and all strchr calls
optimized away. */
l[0] = strlen (z);
strcpy (buf, z);
strcpy (p, "abcde");
q = strchr (p, '\0');
strcpy (q, "efghi");
r = strchr (q, '\0');
strcpy (r, "jkl");
l[1] = strlen (p);
l[2] = strlen (q);
l[3] = strlen (r);
strcpy (r, buf);
l[4] = strlen (p);
l[5] = strlen (q);
l[6] = strlen (r);
strcpy (r, "mnopqr");
l[7] = strlen (p);
l[8] = strlen (q);
l[9] = strlen (r);
memcpy (lp, l, sizeof l);
}
int
main ()
{
char buf[64];
size_t l[10];
const char *volatile z = "ABCDEFG";
memset (buf, '\0', sizeof buf);
if (fn1 (buf) != 2 || buf[0] != 'z' || buf[1] != 32 || buf[2] != '\0')
abort ();
fn2 (buf, z, l);
if (memcmp (buf, "abcdeefghimnopqr", 17) != 0)
abort ();
if (l[0] != 7)
abort ();
if (l[1] != 13 || l[2] != 8 || l[3] != 3)
abort ();
if (l[4] != 17 || l[5] != 12 || l[6] != 7)
abort ();
if (l[7] != 16 || l[8] != 11 || l[9] != 6)
abort ();
return 0;
}
/* { dg-final { scan-tree-dump-times "strlen \\(" 2 "strlen" } } */
/* avr has BIGGEST_ALIGNMENT 8, allowing fold_builtin_memory_op
to expand the memcpy call at the end of fn2. */
/* { dg-final { scan-tree-dump-times "memcpy \\(" 8 "strlen" { target { ! avr-*-* } } } } */
/* { dg-final { scan-tree-dump-times "memcpy \\(" 7 "strlen" { target { avr-*-* } } } } */
/* { dg-final { scan-tree-dump-times "strcpy \\(" 0 "strlen" } } */
/* { dg-final { scan-tree-dump-times "strcat \\(" 0 "strlen" } } */
/* { dg-final { scan-tree-dump-times "strchr \\(" 0 "strlen" } } */
/* { dg-final { scan-tree-dump-times "stpcpy \\(" 0 "strlen" } } */
/* { dg-final { scan-tree-dump-times "\\*q_\[0-9\]* = 32;" 1 "strlen" } } */
/* { dg-final { scan-tree-dump-times "memcpy \\(\[^\n\r\]*, 1\\)" 1 "strlen" } } */
/* { dg-final { cleanup-tree-dump "strlen" } } */
|
