2 * Copyright 2007 Adrian Thurston <thurston@complang.org>
5 /* This file is part of Ragel.
7 * Ragel is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or
10 * (at your option) any later version.
12 * Ragel 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 Ragel; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
29 #include "parsedata.h"
36 extern char *Parser_lelNames[];
40 Scanner( InputData &id, const char *fileName, istream &input,
41 Parser *inclToParser, char *inclSectionTarg,
42 int includeDepth, bool importMachines )
44 id(id), fileName(fileName),
46 inclToParser(inclToParser),
47 inclSectionTarg(inclSectionTarg),
48 includeDepth(includeDepth),
49 importMachines(importMachines),
51 line(1), column(1), lastnl(0),
52 parser(0), ignoreSection(false),
53 parserExistsError(false),
58 bool duplicateInclude( char *inclFileName, char *inclSectionName );
60 /* Make a list of places to look for an included file. */
61 char **makeIncludePathChecks( const char *curFileName, const char *fileName, int len );
62 std::ifstream *tryOpenInclude( char **pathChecks, long &found );
69 void token( int type, char *start, char *end );
70 void token( int type, char c );
71 void token( int type );
72 void processToken( int type, char *tokdata, int toklen );
73 void directToParser( Parser *toParser, const char *tokFileName, int tokLine,
74 int tokColumn, int type, char *tokdata, int toklen );
76 void importToken( int type, char *start, char *end );
77 void pass( int token, char *start, char *end );
84 ostream &scan_error();
90 char *inclSectionTarg;
94 /* For import parsing. */
98 static const int max_tokens = 32;
99 int token_data[max_tokens];
100 char *token_strings[max_tokens];
101 int token_lens[max_tokens];
103 /* For section processing. */
106 int word_len, lit_len;
108 /* For character scanning. */
115 /* Set by machine statements, these persist from section to section
116 * allowing for unnamed sections. */
120 /* This is set if ragel has already emitted an error stating that
121 * no section name has been seen and thus no parser exists. */
122 bool parserExistsError;
124 /* This is for inline code. By default it is on. It goes off for
125 * statements and values in inline blocks which are parsed. */
128 /* Keeps a record of the previous token sent to the section parser. */