[Ada] Empty CUDA_Global procedures when compiling for host
[official-gcc.git] / gcc / attr-fnspec.h
blob1154c30e7b0df2f91510bbdb81075b4ddb0af3b2
1 /* Handling of fnspec attribute specifiers
2 Copyright (C) 2008-2021 Free Software Foundation, Inc.
3 Contributed by Richard Guenther <rguenther@suse.de>
5 This file is part of GCC.
7 GCC is free software; you can redistribute it and/or modify
8 under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
12 GCC is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GCC; see the file COPYING3. If not see
19 <http://www.gnu.org/licenses/>. */
21 /* Parse string of attribute "fn spec". This is an internal attribute
22 describing side effects of a function as follows:
24 character 0 specifies properties of return values as follows:
25 '1'...'4' specifies number of argument function returns (as in memset)
26 'm' specifies that returned value is noalias (as in malloc)
27 '.' specifies that nothing is known.
28 character 1 specifies additional function properties
29 ' ' specifies that nothing is known
30 'p' or 'P' specifies that function is pure except for described side
31 effects.
32 'c' or 'C' specifies that function is const except for described side
33 effects.
34 The uppercase letter in addition specifies that function clobbers errno.
36 character 2+2i specifies properties of argument number i as follows:
37 'x' or 'X' specifies that parameter is unused.
38 'r' or 'R' specifies that the memory pointed to by the parameter is only
39 read and does not escape
40 'o' or 'O' specifies that the memory pointed to by the parameter is only
41 written and does not escape
42 'w' or 'W' specifies that the memory pointed to by the parameter does not
43 escape
44 '1'....'9' specifies that the memory pointed to by the parameter is
45 copied to memory pointed to by different parameter
46 (as in memcpy).
47 '.' specifies that nothing is known.
48 The uppercase letter in addition specifies that the memory pointed to
49 by the parameter is not dereferenced. For 'r' only read applies
50 transitively to pointers read from the pointed-to memory.
52 character 3+2i specifies additional properties of argument number i
53 as follows:
54 ' ' nothing is known
55 't' the size of value written/read corresponds to the size of
56 of the pointed-to type of the argument type
57 '1'...'9' specifies the size of value written/read is given by the
58 specified argument
61 #ifndef ATTR_FNSPEC_H
62 #define ATTR_FNSPEC_H
64 class attr_fnspec
66 private:
67 /* fn spec attribute string. */
68 const char *str;
69 /* length of the fn spec string. */
70 const unsigned len;
71 /* Number of characters specifying return value. */
72 const unsigned int return_desc_size = 2;
73 /* Number of characters specifying size. */
74 const unsigned int arg_desc_size = 2;
76 /* Return start of specifier of arg i. */
77 unsigned int arg_idx (int i)
79 return return_desc_size + arg_desc_size * i;
82 public:
83 attr_fnspec (const char *str, unsigned len)
84 : str (str), len (len)
86 if (flag_checking)
87 verify ();
89 attr_fnspec (const char *str)
90 : str (str), len (strlen (str))
92 if (flag_checking)
93 verify ();
95 attr_fnspec (const_tree identifier)
96 : str (TREE_STRING_POINTER (identifier)),
97 len (TREE_STRING_LENGTH (identifier))
99 if (flag_checking)
100 verify ();
102 attr_fnspec ()
103 : str (NULL), len (0)
107 /* Return true if fn spec is known. */
108 bool
109 known_p ()
111 return len;
114 /* Return true if arg I is specified. */
115 bool
116 arg_specified_p (unsigned int i)
118 return len >= arg_idx (i + 1);
121 /* True if the argument is not dereferenced recursively, thus only
122 directly reachable memory is read or written. */
123 bool
124 arg_direct_p (unsigned int i)
126 unsigned int idx = arg_idx (i);
127 gcc_checking_assert (arg_specified_p (i));
128 return str[idx] == 'R' || str[idx] == 'O'
129 || str[idx] == 'W' || (str[idx] >= '1' && str[idx] <= '9');
132 /* True if argument is used. */
133 bool
134 arg_used_p (unsigned int i)
136 unsigned int idx = arg_idx (i);
137 gcc_checking_assert (arg_specified_p (i));
138 return str[idx] != 'x' && str[idx] != 'X';
141 /* True if memory reached by the argument is readonly (not clobbered). */
142 bool
143 arg_readonly_p (unsigned int i)
145 unsigned int idx = arg_idx (i);
146 gcc_checking_assert (arg_specified_p (i));
147 return str[idx] == 'r' || str[idx] == 'R' || (str[idx] >= '1' && str[idx] <= '9');
150 /* True if memory reached by the argument is read (directly or indirectly) */
151 bool
152 arg_maybe_read_p (unsigned int i)
154 unsigned int idx = arg_idx (i);
155 gcc_checking_assert (arg_specified_p (i));
156 return str[idx] != 'o' && str[idx] != 'O'
157 && str[idx] != 'x' && str[idx] != 'X';
160 /* True if memory reached by the argument is written.
161 (directly or indirectly) */
162 bool
163 arg_maybe_written_p (unsigned int i)
165 unsigned int idx = arg_idx (i);
166 gcc_checking_assert (arg_specified_p (i));
167 return str[idx] != 'r' && str[idx] != 'R'
168 && (str[idx] < '1' || str[idx] > '9')
169 && str[idx] != 'x' && str[idx] != 'X';
172 /* Return true if load of memory pointed to by argument I is specified
173 by another argument. In this case set ARG. */
174 bool
175 arg_max_access_size_given_by_arg_p (unsigned int i, unsigned int *arg)
177 unsigned int idx = arg_idx (i);
178 gcc_checking_assert (arg_specified_p (i));
179 if (str[idx + 1] >= '1' && str[idx + 1] <= '9')
181 *arg = str[idx + 1] - '1';
182 return true;
184 else
185 return false;
188 /* Return true if the pointed-to type of the argument correspond to the
189 size of the memory acccess. */
190 bool
191 arg_access_size_given_by_type_p (unsigned int i)
193 unsigned int idx = arg_idx (i);
194 gcc_checking_assert (arg_specified_p (i));
195 return str[idx + 1] == 't';
198 /* Return true if memory pointer to by argument is copied to a memory
199 pointed to by a different argument (as in memcpy).
200 In this case set ARG. */
201 bool
202 arg_copied_to_arg_p (unsigned int i, unsigned int *arg)
204 unsigned int idx = arg_idx (i);
205 gcc_checking_assert (arg_specified_p (i));
206 if (str[idx] < '1' || str[idx] > '9')
207 return false;
208 *arg = str[idx] - '1';
209 return true;
213 /* True if the argument does not escape. */
214 bool
215 arg_noescape_p (unsigned int i)
217 unsigned int idx = arg_idx (i);
218 gcc_checking_assert (arg_specified_p (i));
219 return str[idx] == 'w' || str[idx] == 'W'
220 || str[idx] == 'r' || str[idx] == 'R'
221 || str[idx] == 'o' || str[idx] == 'O';
224 /* Return true if function returns value of its parameter. If ARG_NO is
225 non-NULL return initialize it to the argument returned. */
226 bool
227 returns_arg (unsigned int *arg_no)
229 if (str[0] >= '1' && str[0] <= '4')
231 if (arg_no)
232 *arg_no = str[0] - '1';
233 return true;
235 return false;
238 /* Nonzero if the return value does not alias with anything. Functions
239 with the malloc attribute have this set on their return value. */
240 bool
241 returns_noalias_p ()
243 return str[0] == 'm';
246 /* Return true if all memory read by the function is specified by fnspec. */
247 bool
248 global_memory_read_p ()
250 return str[1] != 'c' && str[1] != 'C';
253 /* Return true if all memory written by the function
254 is specified by fnspec. */
255 bool
256 global_memory_written_p ()
258 return str[1] != 'c' && str[1] != 'C' && str[1] != 'p' && str[1] != 'P';
261 bool
262 errno_maybe_written_p ()
264 return str[1] == 'C' || str[1] == 'P';
267 /* Check validity of the string. */
268 void verify ();
270 /* Return the fnspec string. */
271 const char *
272 get_str ()
274 return str;
278 extern attr_fnspec gimple_call_fnspec (const gcall *stmt);
279 extern attr_fnspec builtin_fnspec (tree);
281 #endif /* ATTR_FNSPEC_H */