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
|
/* { dg-do run } */
/* { dg-require-effective-target mempcpy } */
/* PR fortran/45636 */
typedef __SIZE_TYPE__ size_t;
void *memcpy (void *__restrict__, const void *__restrict__, size_t);
void *mempcpy (void *__restrict__, const void *__restrict__, size_t);
void *memset (void *, int, size_t);
int memcmp (const void *, const void *, size_t);
extern void abort (void);
struct A { int i; char c[32]; } a[2];
__attribute__((noinline, noclone)) int
f1 (char *p, int q, int z)
{
memcpy (p, "abcd", 4);
if (q)
z = z + 123;
else
z *= 114;
memset (p + 4, ' ', 2);
return z;
}
__attribute__((noinline, noclone)) void
f2 (void)
{
char *p = mempcpy (&a[0].c[13], "123456", 4);
memset (p, '7', 3);
}
__attribute__((noinline, noclone)) void
f3 (struct A *p)
{
p++;
char *q = &p->c[10];
memcpy (q + 4, "__1234567" + 2, 7);
memset (&p->c[21], '9', 3);
}
__attribute__((noinline, noclone)) void
f4 (void)
{
memcpy (&a[0].c[10], "0123456789", 10);
memset (&a[0].c[13], ' ', 3);
}
__attribute__((noinline, noclone)) void
check (const char *p, const char *str, size_t size)
{
const char *q;
for (q = (const char *) &a; q < p; q++)
if (*q)
abort ();
if (memcmp (p, str, size) != 0)
abort ();
for (q = p + size; q < (const char *) (&a[0] + 2); q++)
if (*q)
abort ();
memset (&a, '\0', sizeof a);
}
int
main (void)
{
if (f1 (&a[0].c[7], 1, 2) != 125)
abort ();
check (&a[0].c[7], "abcd ", 6);
f2 ();
check (&a[0].c[13], "1234777", 7);
f3 (&a[0]);
check (&a[1].c[14], "1234567999", 10);
f4 ();
check (&a[0].c[10], "012 6789", 10);
return 0;
}
|
