annotate gcc/testsuite/gcc.dg/attr-access-write-only.c @ 145:1830386684a0

gcc-9.2.0
author anatofuz
date Thu, 13 Feb 2020 11:34:05 +0900
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
145
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
1 /* PR middle-end/83859 - attribute to establish relation between parameters
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
2 for buffer and its size
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
3 Test to verify the handling of attribute access (write_only) syntax.
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
4 { dg-do compile }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
5 { dg-options "-Wall -ftrack-macro-expansion=0" } */
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
6
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
7 int __attribute__ ((access))
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
8 access_v (void); // { dg-error "wrong number of arguments specified for 'access' attribute" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
9
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
10 int __attribute__ ((access ()))
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
11 access___v (void); // { dg-error "wrong number of arguments specified for 'access' attribute" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
12
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
13 int __attribute__ ((access (wronly)))
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
14 wronly_spelling (void); // { dg-error "attribute .access. invalid mode 'wronly'; expected one of 'read_only', 'read_write', or 'write_only'" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
15
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
16 int __attribute__ ((access (read_only)))
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
17 wronly_v_all (void); // { dg-error "attribute .access\\(read_only\\). missing an argument" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
18
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
19 int __attribute__ ((access (read_only ())))
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
20 wronly___v_all (void); // { dg-error "attribute 'access' unexpected '\\(' after mode 'read_only'; expected a positional argument or '\\)'" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
21 // { dg-warning "implicit declaration of function 'read_only'" "" { target *-*-* } .-2 }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
22
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
23
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
24 int wronly (void);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
25
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
26 int __attribute__ ((access (wronly ())))
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
27 wronly___v_all (void); // { dg-error "attribute 'access' invalid mode 'wronly'" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
28
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
29 #define WRONLY(...) __attribute__ ((access (write_only, __VA_ARGS__)))
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
30
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
31 int WRONLY (1)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
32 wronly_pcv_1 (void*);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
33 int WRONLY (2)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
34 wronly_i_pcv_2 (int, void*);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
35 int WRONLY (3)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
36 wronly_i_i_pcv_3 (int, int, void*);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
37
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
38 int WRONLY (0 + 1)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
39 wronly_pcv_0p1 (void*);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
40
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
41 int WRONLY (2 - 1)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
42 wronly_pcv_2m1 (void*);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
43
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
44 int WRONLY (1, 1)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
45 wronly_pv_pi_1_1 (void*, const int*); // { dg-error "attribute 'access\\(write_only, 1, 1\\)' positional argument 2 references non-integer argument type 'void \\*'" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
46
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
47 int WRONLY (1, 2)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
48 wronly_pcv_pc_1_2 (void*, char*); // { dg-error "attribute .access\\(write_only, 1, 2\\)' positional argument 2 references non-integer argument type 'char \\*'" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
49
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
50 int WRONLY (2, 1)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
51 wronly_pcd_pcv_2_1 (const double*, void*); // { dg-error "attribute .access\\(write_only, 2, 1\\)' positional argument 2 references non-integer argument type 'const double \\*'" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
52
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
53 int WRONLY (2, 2)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
54 wronly_pi_pcv_2_2 (int*, void*); // { dg-error "positional argument 2 references non-integer argument type 'void \\*'" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
55
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
56 int WRONLY (4)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
57 wronly_i_i_i_4 (int, int, int); // { dg-error "attribute 'access\\(write_only, 4\\)' positional argument 1 value 4 exceeds number of function arguments 3" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
58
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
59 int WRONLY (1)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
60 wronly_i_1 (int); // { dg-error "attribute 'access\\(write_only, 1\\)' positional argument 1 references non-pointer argument type 'int'" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
61
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
62 int WRONLY (2)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
63 wronly_i_pc (int, const char*); // { dg-error "attribute 'access\\(write_only, 2\\)' positional argument 1 references 'const'-qualified argument type 'const char \\*'" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
64
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
65 int WRONLY (-1)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
66 wronly_pcv_m1 (void*); // { dg-error "attribute 'access\\(write_only, -1\\)' positional argument 1 invalid value -1" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
67
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
68 int WRONLY (1, -12345)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
69 wronly_pcv_i_1_m12345 (void*, int*); // { dg-error "attribute 'access\\(write_only, 1, -12345\\)' positional argument 2 invalid value -12345" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
70
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
71 int WRONLY ("blah")
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
72 wronly_pcv_str (void*); // { dg-error "attribute 'access\\(write_only, \"blah\"\\)' invalid positional argument 1" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
73
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
74 int WRONLY (1, "foobar")
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
75 wronly_pcv_i_1_str (void*, int); // { dg-error "attribute 'access\\(write_only, 1, \"foobar\"\\)' invalid positional argument 2" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
76
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
77 // Verify that attributes whose operands reference function pointers
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
78 // are rejected.
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
79 typedef int F (int, int);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
80 WRONLY (1) void wronly_pf_1 (F*); // { dg-error "attribute 'access\\(write_only, 1\\)' positional argument 1 references argument of function type 'F' \\{aka 'int\\(int, *int\\)'\\}" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
81
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
82 // Verify pointers to functions.
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
83 void WRONLY(2) (*pwronly_pcv2)(int, void*);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
84 void WRONLY(3, 1) (*pwronly_pcv2_1)(int, void*, void*);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
85 void WRONLY(1, 2) (*pwronly_i_pcv_1_2)(int, void*); // { dg-error "attribute 'access\\(write_only, 1, 2\\)' positional argument 1 references non-pointer argument type 'int'" }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
86
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
87 // Verify types.
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
88 typedef WRONLY (2) void wronly_p2_t (const int*, char*, const void*);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
89 typedef WRONLY (2) void wronly_p2_1 (int, int*);