Add display method for \bendAfter.
[lilypond/mpolesky.git] / lily / includable-lexer.cc
blob2ddfdd38c0390ea60b8503059a7f95ecb0e5b5bd
1 /*
2 This file is part of LilyPond, the GNU music typesetter.
4 Copyright (C) 1997--2010 Han-Wen Nienhuys <hanwen@xs4all.nl>
6 LilyPond 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.
11 LilyPond 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.
16 You should have received a copy of the GNU General Public License
17 along with LilyPond. If not, see <http://www.gnu.org/licenses/>.
20 #include "includable-lexer.hh"
22 #include <sstream>
23 using namespace std;
25 #include "config.hh"
27 #include "file-name.hh"
28 #include "file-path.hh"
29 #include "international.hh"
30 #include "main.hh"
31 #include "source-file.hh"
32 #include "sources.hh"
33 #include "warn.hh"
35 #ifndef YY_BUF_SIZE
36 #define YY_BUF_SIZE 16384
37 #endif
39 #ifndef YY_START
40 #define YY_START \
41 ((yy_start - 1) / 2)
42 #define YYSTATE YY_START
43 #endif
45 /* Flex >= 2.5.29 has include stack; but we don't use that yet. */
46 #if !HAVE_FLEXLEXER_YY_CURRENT_BUFFER
47 #define yy_current_buffer \
48 (yy_buffer_stack != 0 ? yy_buffer_stack[yy_buffer_stack_top] : 0)
49 #endif
51 extern bool relative_includes;
53 Includable_lexer::Includable_lexer ()
55 #if HAVE_FLEXLEXER_YY_CURRENT_BUFFER
56 yy_current_buffer = 0;
57 #endif
60 /** Set the new input file to NAME, remember old file. */
61 void
62 Includable_lexer::new_input (string name, Sources *sources)
64 string current_dir = dir_name (main_input_name_);
65 if (relative_includes)
66 current_dir = include_stack_.size () ? dir_name (include_stack_.back ()->name_string ()) : "";
68 Source_file *file = sources->get_file (name, current_dir);
69 if (!file)
71 string msg = _f ("cannot find file: `%s'", name);
72 msg += "\n";
73 msg += _f ("(search path: `%s')",
74 (current_dir.length () ? (current_dir + PATHSEP) : "") + sources->path_->to_string ().c_str ());
75 LexerError (msg.c_str ());
76 return;
78 file_name_strings_.push_back (file->name_string ());
80 char_count_stack_.push_back (0);
81 if (yy_current_buffer)
82 state_stack_.push_back (yy_current_buffer);
84 if (be_verbose_global)
86 string spaces = "";
87 for (size_t i = 0; i < state_stack_.size (); i++)
88 spaces += " ";
89 progress_indication (string ("\n") + spaces + string ("[") + file->name_string ());
92 include_stack_.push_back (file);
94 /* Ugh. We'd want to create a buffer from the bytes directly.
96 Whoops. The size argument to yy_create_buffer is not the
97 filelength but a BUFFERSIZE. Maybe this is why reading stdin fucks up. */
98 yy_switch_to_buffer (yy_create_buffer (file->get_istream (), YY_BUF_SIZE));
101 void
102 Includable_lexer::new_input (string name, string data, Sources *sources)
104 Source_file *file = new Source_file (name, data);
105 sources->add (file);
106 file_name_strings_.push_back (name);
108 char_count_stack_.push_back (0);
109 if (yy_current_buffer)
110 state_stack_.push_back (yy_current_buffer);
112 if (be_verbose_global)
114 string spaces = "";
115 for (size_t i = 0; i < state_stack_.size (); i++)
116 spaces += " ";
117 progress_indication (string ("\n") + spaces + string ("[") + name);
119 include_stack_.push_back (file);
121 yy_switch_to_buffer (yy_create_buffer (file->get_istream (), YY_BUF_SIZE));
124 /** pop the inputstack. conceptually this is a destructor, but it
125 does not destruct the Source_file that Includable_lexer::new_input
126 creates. */
127 bool
128 Includable_lexer::close_input ()
130 include_stack_.pop_back ();
131 char_count_stack_.pop_back ();
132 if (be_verbose_global)
133 progress_indication ("]");
134 yy_delete_buffer (yy_current_buffer);
135 #if HAVE_FLEXLEXER_YY_CURRENT_BUFFER
136 yy_current_buffer = 0;
137 #endif
138 if (state_stack_.empty ())
140 #if HAVE_FLEXLEXER_YY_CURRENT_BUFFER
141 yy_current_buffer = 0;
142 #endif
143 return false;
145 yy_switch_to_buffer (state_stack_.back ());
146 state_stack_.pop_back ();
147 return true;
150 char const *
151 Includable_lexer::here_str0 () const
153 if (include_stack_.empty ())
154 return 0;
155 return include_stack_.back ()->c_str () + char_count_stack_.back ();
158 Includable_lexer::~Includable_lexer ()
160 while (!include_stack_.empty ())
161 close_input ();
164 Source_file *
165 Includable_lexer::get_source_file () const
167 if (include_stack_.empty ())
168 return 0;
169 return include_stack_.back ();