re PR libfortran/15311 (Incorrect handling of A edit descriptor)
[official-gcc.git] / gcc / line-map.h
blob73631be229f3dacbc6891913741e27be38e9b593
1 /* Map logical line numbers to (source file, line number) pairs.
2 Copyright (C) 2001, 2003, 2004
3 Free Software Foundation, Inc.
5 This program is free software; you can redistribute it and/or modify it
6 under the terms of the GNU General Public License as published by the
7 Free Software Foundation; either version 2, or (at your option) any
8 later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
19 In other words, you are welcome to use, share and improve this program.
20 You are forbidden to forbid anyone else to use, share and improve
21 what you give them. Help stamp out software-hoarding! */
23 #ifndef GCC_LINE_MAP_H
24 #define GCC_LINE_MAP_H
26 /* Reason for adding a line change with add_line_map (). LC_ENTER is
27 when including a new file, e.g. a #include directive in C.
28 LC_LEAVE is when reaching a file's end. LC_RENAME is when a file
29 name or line number changes for neither of the above reasons
30 (e.g. a #line directive in C). */
31 enum lc_reason {LC_ENTER = 0, LC_LEAVE, LC_RENAME};
33 /* A logical line/column number, i.e. an "index" into a line_map. */
34 /* Long-term, we want to use this to replace struct location_s (in input.h),
35 and effectively typedef source_location location_t. */
36 typedef unsigned int source_location;
37 typedef source_location fileline; /* deprecated name */
39 /* Physical source file TO_FILE at line TO_LINE at column 0 is represented
40 by the logical START_LOCATION. TO_LINE+L at column C is represented by
41 START_LOCATION+(L*(1<<column_bits))+C, as long as C<(1<<column_bits),
42 and the result_location is less than the next line_map's start_location.
43 (The top line is line 1 and the leftmost column is column 1; line/column 0
44 means "entire file/line" or "unknown line/column" or "not applicable".)
45 INCLUDED_FROM is an index into the set that gives the line mapping
46 at whose end the current one was included. File(s) at the bottom
47 of the include stack have this set to -1. REASON is the reason for
48 creation of this line map, SYSP is one for a system header, two for
49 a C system header file that therefore needs to be extern "C"
50 protected in C++, and zero otherwise. */
51 struct line_map
53 const char *to_file;
54 unsigned int to_line;
55 source_location start_location;
56 int included_from;
57 ENUM_BITFIELD (lc_reason) reason : CHAR_BIT;
58 /* The sysp field isn't really needed now that it's in cpp_buffer. */
59 unsigned char sysp;
60 /* Number of the low-order source_location bits used for a column number. */
61 unsigned int column_bits : 8;
64 /* A set of chronological line_map structures. */
65 struct line_maps
67 struct line_map *maps;
68 unsigned int allocated;
69 unsigned int used;
71 unsigned int cache;
73 /* The most recently listed include stack, if any, starts with
74 LAST_LISTED as the topmost including file. -1 indicates nothing
75 has been listed yet. */
76 int last_listed;
78 /* Depth of the include stack, including the current file. */
79 unsigned int depth;
81 /* If true, prints an include trace a la -H. */
82 bool trace_includes;
84 /* Highest source_location "given out". */
85 source_location highest_location;
87 /* Start of line of highest source_location "given out". */
88 source_location highest_line;
90 /* The maximum column number we can quickly allocate. Higher numbers
91 may require allocating a new line_map. */
92 unsigned int max_column_hint;
95 /* Initialize a line map set. */
96 extern void linemap_init (struct line_maps *);
98 /* Free a line map set. */
99 extern void linemap_free (struct line_maps *);
101 /* Check for and warn about line_maps entered but not exited. */
103 extern void linemap_check_files_exited (struct line_maps *);
105 /* Return a source_location for the start (i.e. column==0) of
106 (physical) line TO_LINE in the current source file (as in the
107 most recent linemap_add). MAX_COLUMN_HINT is the highest column
108 number we expect to use in this line (but it does not change
109 the highest_location). */
111 extern source_location linemap_line_start
112 (struct line_maps *, unsigned int, unsigned int);
114 /* Add a mapping of logical source line to physical source file and
115 line number.
117 The text pointed to by TO_FILE must have a lifetime
118 at least as long as the final call to lookup_line (). An empty
119 TO_FILE means standard input. If reason is LC_LEAVE, and
120 TO_FILE is NULL, then TO_FILE, TO_LINE and SYSP are given their
121 natural values considering the file we are returning to.
123 START_LOCATION should be monotonic increasing across calls to this
124 function. A call to this function can relocate the previous set of
125 maps, so any stored line_map pointers should not be used. */
126 extern const struct line_map *linemap_add
127 (struct line_maps *, enum lc_reason, unsigned int sysp,
128 const char *to_file, unsigned int to_line);
130 /* Given a logical line, returns the map from which the corresponding
131 (source file, line) pair can be deduced. */
132 extern const struct line_map *linemap_lookup
133 (struct line_maps *, source_location);
135 /* Print the file names and line numbers of the #include commands
136 which led to the map MAP, if any, to stderr. Nothing is output if
137 the most recently listed stack is the same as the current one. */
138 extern void linemap_print_containing_files (struct line_maps *,
139 const struct line_map *);
141 /* Converts a map and a source_location to source line. */
142 #define SOURCE_LINE(MAP, LINE) \
143 ((((LINE) - (MAP)->start_location) >> (MAP)->column_bits) + (MAP)->to_line)
145 #define SOURCE_COLUMN(MAP, LINE) \
146 (((LINE) - (MAP)->start_location) & ((1 << (MAP)->column_bits) - 1))
148 /* Returns the last source line within a map. This is the (last) line
149 of the #include, or other directive, that caused a map change. */
150 #define LAST_SOURCE_LINE(MAP) \
151 SOURCE_LINE (MAP, LAST_SOURCE_LINE_LOCATION (MAP))
152 #define LAST_SOURCE_LINE_LOCATION(MAP) \
153 ((((MAP)[1].start_location - 1 - (MAP)->start_location) \
154 & ~((1 << (MAP)->column_bits) - 1)) \
155 + (MAP)->start_location)
157 /* Returns the map a given map was included from. */
158 #define INCLUDED_FROM(SET, MAP) (&(SET)->maps[(MAP)->included_from])
160 /* Nonzero if the map is at the bottom of the include stack. */
161 #define MAIN_FILE_P(MAP) ((MAP)->included_from < 0)
163 /* Set LOC to a source position that is the same line as the most recent
164 linemap_line_start, but with the specified TO_COLUMN column number. */
166 #define LINEMAP_POSITION_FOR_COLUMN(LOC, SET, TO_COLUMN) { \
167 unsigned int to_column = (TO_COLUMN); \
168 struct line_maps *set = (SET); \
169 if (__builtin_expect (to_column >= set->max_column_hint, 0)) \
170 (LOC) = linemap_position_for_column (set, to_column); \
171 else { \
172 source_location r = set->highest_line; \
173 r = r + to_column; \
174 if (r >= set->highest_location) \
175 set->highest_location = r; \
176 (LOC) = r; \
180 extern source_location
181 linemap_position_for_column (struct line_maps *set, unsigned int to_column);
182 #endif /* !GCC_LINE_MAP_H */