1 /* Declarations for variables relating to reading the source file.
2 Used by parsers, lexical analyzers, and error message routines.
3 Copyright (C) 1993-2021 Free Software Foundation, Inc.
5 This file is part of GCC.
7 GCC is free software; you can redistribute it and/or modify it under
8 the terms of the GNU General Public License as published by the Free
9 Software Foundation; either version 3, or (at your option) any later
12 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
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/>. */
26 extern GTY(()) class line_maps
*line_table
;
27 extern GTY(()) class line_maps
*saved_line_table
;
29 /* A value which will never be used to represent a real location. */
30 #define UNKNOWN_LOCATION ((location_t) 0)
32 /* The location for declarations in "<built-in>" */
33 #define BUILTINS_LOCATION ((location_t) 1)
35 /* line-map.c reserves RESERVED_LOCATION_COUNT to the user. Ensure
36 both UNKNOWN_LOCATION and BUILTINS_LOCATION fit into that. */
37 STATIC_ASSERT (BUILTINS_LOCATION
< RESERVED_LOCATION_COUNT
);
39 extern bool is_location_from_builtin_token (location_t
);
40 extern expanded_location
expand_location (location_t
);
42 extern int location_compute_display_column (expanded_location exploc
,
45 /* A class capturing the bounds of a buffer, to allow for run-time
46 bounds-checking in a checked build. */
51 char_span (const char *ptr
, size_t n_elts
) : m_ptr (ptr
), m_n_elts (n_elts
) {}
53 /* Test for a non-NULL pointer. */
54 operator bool() const { return m_ptr
; }
56 /* Get length, not including any 0-terminator (which may not be,
58 size_t length () const { return m_n_elts
; }
60 const char *get_buffer () const { return m_ptr
; }
62 char operator[] (int idx
) const
64 gcc_assert (idx
>= 0);
65 gcc_assert ((size_t)idx
< m_n_elts
);
69 char_span
subspan (int offset
, int n_elts
) const
71 gcc_assert (offset
>= 0);
72 gcc_assert (offset
< (int)m_n_elts
);
73 gcc_assert (n_elts
>= 0);
74 gcc_assert (offset
+ n_elts
<= (int)m_n_elts
);
75 return char_span (m_ptr
+ offset
, n_elts
);
78 char *xstrdup () const
80 return ::xstrndup (m_ptr
, m_n_elts
);
88 extern char_span
location_get_source_line (const char *file_path
, int line
);
90 extern bool location_missing_trailing_newline (const char *file_path
);
92 /* Forward decl of slot within file_cache, so that the definition doesn't
93 need to be in this header. */
94 class file_cache_slot
;
96 /* A cache of source files for use when emitting diagnostics
97 (and in a few places in the C/C++ frontends).
99 Results are only valid until the next call to the cache, as
100 slots can be evicted.
102 Filenames are stored by pointer, and so must outlive the cache
111 file_cache_slot
*lookup_or_add_file (const char *file_path
);
112 void forcibly_evict_file (const char *file_path
);
115 file_cache_slot
*evicted_cache_tab_entry (unsigned *highest_use_count
);
116 file_cache_slot
*add_file (const char *file_path
);
117 file_cache_slot
*lookup_file (const char *file_path
);
120 static const size_t num_file_slots
= 16;
121 file_cache_slot
*m_file_slots
;
124 extern expanded_location
125 expand_location_to_spelling_point (location_t
,
126 enum location_aspect aspect
127 = LOCATION_ASPECT_CARET
);
128 extern location_t
expansion_point_location_if_in_system_header (location_t
);
129 extern location_t
expansion_point_location (location_t
);
131 extern location_t input_location
;
133 #define LOCATION_FILE(LOC) ((expand_location (LOC)).file)
134 #define LOCATION_LINE(LOC) ((expand_location (LOC)).line)
135 #define LOCATION_COLUMN(LOC)((expand_location (LOC)).column)
136 #define LOCATION_LOCUS(LOC) \
137 ((IS_ADHOC_LOC (LOC)) ? get_location_from_adhoc_loc (line_table, LOC) \
139 #define LOCATION_BLOCK(LOC) \
140 ((tree) ((IS_ADHOC_LOC (LOC)) ? get_data_from_adhoc_loc (line_table, (LOC)) \
142 #define RESERVED_LOCATION_P(LOC) \
143 (LOCATION_LOCUS (LOC) < RESERVED_LOCATION_COUNT)
145 /* Return a positive value if LOCATION is the locus of a token that is
146 located in a system header, O otherwise. It returns 1 if LOCATION
147 is the locus of a token that is located in a system header, and 2
148 if LOCATION is the locus of a token located in a C system header
149 that therefore needs to be extern "C" protected in C++.
151 Note that this function returns 1 if LOCATION belongs to a token
152 that is part of a macro replacement-list defined in a system
153 header, but expanded in a non-system file. */
156 in_system_header_at (location_t loc
)
158 return linemap_location_in_system_header_p (line_table
, loc
);
161 /* Return true if LOCATION is the locus of a token that
162 comes from a macro expansion, false otherwise. */
165 from_macro_expansion_at (location_t loc
)
167 return linemap_location_from_macro_expansion_p (line_table
, loc
);
170 /* Return true if LOCATION is the locus of a token that comes from
171 a macro definition, false otherwise. This differs from from_macro_expansion_at
172 in its treatment of macro arguments, for which this returns false. */
175 from_macro_definition_at (location_t loc
)
177 return linemap_location_from_macro_definition_p (line_table
, loc
);
180 static inline location_t
181 get_pure_location (location_t loc
)
183 return get_pure_location (line_table
, loc
);
186 /* Get the start of any range encoded within location LOC. */
188 static inline location_t
189 get_start (location_t loc
)
191 return get_range_from_loc (line_table
, loc
).m_start
;
194 /* Get the endpoint of any range encoded within location LOC. */
196 static inline location_t
197 get_finish (location_t loc
)
199 return get_range_from_loc (line_table
, loc
).m_finish
;
202 extern location_t
make_location (location_t caret
,
203 location_t start
, location_t finish
);
204 extern location_t
make_location (location_t caret
, source_range src_range
);
206 void dump_line_table_statistics (void);
208 void dump_location_info (FILE *stream
);
210 void diagnostics_file_cache_fini (void);
212 void diagnostics_file_cache_forcibly_evict_file (const char *file_path
);
214 class GTY(()) string_concat
217 string_concat (int num
, location_t
*locs
);
220 location_t
* GTY ((atomic
)) m_locs
;
223 struct location_hash
: int_hash
<location_t
, UNKNOWN_LOCATION
> { };
225 class GTY(()) string_concat_db
229 void record_string_concatenation (int num
, location_t
*locs
);
231 bool get_string_concatenation (location_t loc
,
233 location_t
**out_locs
);
236 static location_t
get_key_loc (location_t loc
);
238 /* For the fields to be private, we must grant access to the
239 generated code in gtype-desc.c. */
241 friend void ::gt_ggc_mx_string_concat_db (void *x_p
);
242 friend void ::gt_pch_nx_string_concat_db (void *x_p
);
243 friend void ::gt_pch_p_16string_concat_db (void *this_obj
, void *x_p
,
244 gt_pointer_operator op
,
247 hash_map
<location_hash
, string_concat
*> *m_table
;