]>
Commit | Line | Data |
---|---|---|
62f29fda | 1 | /* Cache of styled source file text |
42a4f53d | 2 | Copyright (C) 2018-2019 Free Software Foundation, Inc. |
62f29fda TT |
3 | |
4 | This file is part of GDB. | |
5 | ||
6 | This program is free software; you can redistribute it and/or modify | |
7 | it under the terms of the GNU General Public License as published by | |
8 | the Free Software Foundation; either version 3 of the License, or | |
9 | (at your option) any later version. | |
10 | ||
11 | This program is distributed in the hope that it will be useful, | |
12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
14 | GNU General Public License for more details. | |
15 | ||
16 | You should have received a copy of the GNU General Public License | |
17 | along with this program. If not, see <http://www.gnu.org/licenses/>. */ | |
18 | ||
19 | #include "defs.h" | |
20 | #include "source-cache.h" | |
21 | #include "common/scoped_fd.h" | |
22 | #include "source.h" | |
23 | #include "cli/cli-style.h" | |
24 | ||
25 | #ifdef HAVE_SOURCE_HIGHLIGHT | |
3a350822 EZ |
26 | /* If Gnulib redirects 'open' and 'close' to its replacements |
27 | 'rpl_open' and 'rpl_close' via cpp macros, including <fstream> | |
28 | below with those macros in effect will cause unresolved externals | |
29 | when GDB is linked. Happens, e.g., in the MinGW build. */ | |
30 | #undef open | |
31 | #undef close | |
62f29fda TT |
32 | #include <fstream> |
33 | #include <sstream> | |
34 | #include <srchilite/sourcehighlight.h> | |
35 | #include <srchilite/langmap.h> | |
36 | #endif | |
37 | ||
38 | /* The number of source files we'll cache. */ | |
39 | ||
40 | #define MAX_ENTRIES 5 | |
41 | ||
42 | /* See source-cache.h. */ | |
43 | ||
44 | source_cache g_source_cache; | |
45 | ||
46 | /* See source-cache.h. */ | |
47 | ||
48 | bool | |
49 | source_cache::get_plain_source_lines (struct symtab *s, int first_line, | |
50 | int last_line, std::string *lines) | |
51 | { | |
52 | scoped_fd desc (open_source_file (s)); | |
53 | if (desc.get () < 0) | |
54 | return false; | |
55 | ||
56 | if (s->line_charpos == 0) | |
57 | find_source_lines (s, desc.get ()); | |
58 | ||
59 | if (first_line < 1 || first_line > s->nlines || last_line < 1) | |
60 | return false; | |
61 | ||
62 | if (lseek (desc.get (), s->line_charpos[first_line - 1], SEEK_SET) < 0) | |
63 | perror_with_name (symtab_to_filename_for_display (s)); | |
64 | ||
65 | int last_charpos; | |
66 | if (last_line >= s->nlines) | |
67 | { | |
68 | struct stat st; | |
69 | ||
70 | if (fstat (desc.get (), &st) < 0) | |
71 | perror_with_name (symtab_to_filename_for_display (s)); | |
72 | /* We could cache this in line_charpos... */ | |
73 | last_charpos = st.st_size; | |
74 | } | |
75 | else | |
76 | last_charpos = s->line_charpos[last_line]; | |
77 | ||
78 | lines->resize (last_charpos - s->line_charpos[first_line - 1]); | |
79 | if (myread (desc.get (), &(*lines)[0], lines->size ()) < 0) | |
80 | perror_with_name (symtab_to_filename_for_display (s)); | |
81 | ||
82 | return true; | |
83 | } | |
84 | ||
85 | /* See source-cache.h. */ | |
86 | ||
87 | bool | |
88 | source_cache::extract_lines (const struct source_text &text, int first_line, | |
89 | int last_line, std::string *lines) | |
90 | { | |
91 | int lineno = 1; | |
92 | std::string::size_type pos = 0; | |
93 | std::string::size_type first_pos = std::string::npos; | |
94 | ||
95 | while (pos != std::string::npos && lineno <= last_line) | |
96 | { | |
97 | std::string::size_type new_pos = text.contents.find ('\n', pos); | |
98 | ||
99 | if (lineno == first_line) | |
100 | first_pos = pos; | |
101 | ||
102 | pos = new_pos; | |
103 | if (lineno == last_line || pos == std::string::npos) | |
104 | { | |
105 | if (pos == std::string::npos) | |
106 | pos = text.contents.size (); | |
107 | *lines = text.contents.substr (first_pos, pos - first_pos); | |
108 | return true; | |
109 | } | |
110 | ++lineno; | |
111 | ++pos; | |
112 | } | |
113 | ||
114 | return false; | |
115 | } | |
116 | ||
64c45143 TT |
117 | #ifdef HAVE_SOURCE_HIGHLIGHT |
118 | ||
62f29fda TT |
119 | /* Return the Source Highlight language name, given a gdb language |
120 | LANG. Returns NULL if the language is not known. */ | |
121 | ||
122 | static const char * | |
123 | get_language_name (enum language lang) | |
124 | { | |
125 | switch (lang) | |
126 | { | |
127 | case language_c: | |
128 | case language_objc: | |
129 | return "c.lang"; | |
130 | ||
131 | case language_cplus: | |
132 | return "cpp.lang"; | |
133 | ||
134 | case language_d: | |
135 | return "d.lang"; | |
136 | ||
137 | case language_go: | |
138 | return "go.lang"; | |
139 | ||
140 | case language_fortran: | |
141 | return "fortran.lang"; | |
142 | ||
143 | case language_m2: | |
144 | /* Not handled by Source Highlight. */ | |
145 | break; | |
146 | ||
147 | case language_asm: | |
148 | return "asm.lang"; | |
149 | ||
150 | case language_pascal: | |
151 | return "pascal.lang"; | |
152 | ||
153 | case language_opencl: | |
154 | /* Not handled by Source Highlight. */ | |
155 | break; | |
156 | ||
157 | case language_rust: | |
158 | /* Not handled by Source Highlight. */ | |
159 | break; | |
160 | ||
161 | case language_ada: | |
162 | return "ada.lang"; | |
163 | ||
164 | default: | |
165 | break; | |
166 | } | |
167 | ||
168 | return nullptr; | |
169 | } | |
170 | ||
64c45143 TT |
171 | #endif /* HAVE_SOURCE_HIGHLIGHT */ |
172 | ||
62f29fda TT |
173 | /* See source-cache.h. */ |
174 | ||
175 | bool | |
176 | source_cache::get_source_lines (struct symtab *s, int first_line, | |
177 | int last_line, std::string *lines) | |
178 | { | |
179 | if (first_line < 1 || last_line < 1 || first_line > last_line) | |
180 | return false; | |
181 | ||
182 | #ifdef HAVE_SOURCE_HIGHLIGHT | |
d085f989 | 183 | if (source_styling && can_emit_style_escape (gdb_stdout)) |
62f29fda TT |
184 | { |
185 | const char *fullname = symtab_to_fullname (s); | |
186 | ||
187 | for (const auto &item : m_source_map) | |
188 | { | |
189 | if (item.fullname == fullname) | |
190 | return extract_lines (item, first_line, last_line, lines); | |
191 | } | |
192 | ||
193 | const char *lang_name = get_language_name (SYMTAB_LANGUAGE (s)); | |
194 | if (lang_name != nullptr) | |
195 | { | |
196 | std::ifstream input (fullname); | |
197 | if (input.is_open ()) | |
198 | { | |
199 | srchilite::SourceHighlight highlighter ("esc.outlang"); | |
200 | highlighter.setStyleFile("esc.style"); | |
201 | ||
202 | std::ostringstream output; | |
203 | highlighter.highlight (input, output, lang_name, fullname); | |
204 | ||
205 | source_text result = { fullname, output.str () }; | |
206 | m_source_map.push_back (std::move (result)); | |
207 | ||
208 | if (m_source_map.size () > MAX_ENTRIES) | |
209 | m_source_map.erase (m_source_map.begin ()); | |
210 | ||
211 | return extract_lines (m_source_map.back (), first_line, | |
212 | last_line, lines); | |
213 | } | |
214 | } | |
215 | } | |
216 | #endif /* HAVE_SOURCE_HIGHLIGHT */ | |
217 | ||
218 | return get_plain_source_lines (s, first_line, last_line, lines); | |
219 | } |