Patch from Evan Phoenix: updated rubinius code generation to the latest
[external/ragel.git] / ragel / rlscan.h
1 /*
2  *  Copyright 2007 Adrian Thurston <thurston@cs.queensu.ca>
3  */
4
5 /*  This file is part of Ragel.
6  *
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.
11  * 
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.
16  * 
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 
20  */
21
22 #ifndef _RLSCAN_H
23 #define _RLSCAN_H
24
25 #include <iostream>
26 #include "rlscan.h"
27 #include "vector.h"
28 #include "rlparse.h"
29 #include "parsedata.h"
30 #include "avltree.h"
31 #include "vector.h"
32
33 using std::istream;
34 using std::ostream;
35
36 extern char *Parser_lelNames[];
37
38 /* This is used for tracking the current stack of include file/machine pairs. It is
39  * is used to detect and recursive include structure. */
40 struct IncludeStackItem
41 {
42         IncludeStackItem( char *fileName, char *sectionName )
43                 : fileName(fileName), sectionName(sectionName) {}
44
45         char *fileName;
46         char *sectionName;
47 };
48
49 typedef Vector<IncludeStackItem> IncludeStack;
50
51 struct Scanner
52 {
53         Scanner( char *fileName, istream &input, ostream &output,
54                         Parser *inclToParser, char *inclSectionTarg,
55                         int includeDepth, bool importMachines )
56         : 
57                 fileName(fileName), input(input), output(output),
58                 inclToParser(inclToParser),
59                 inclSectionTarg(inclSectionTarg),
60                 includeDepth(includeDepth),
61                 importMachines(importMachines),
62                 cur_token(0),
63                 line(1), column(1), lastnl(0), 
64                 parser(0), ignoreSection(false), 
65                 parserExistsError(false),
66                 whitespaceOn(true),
67                 lastToken(0)
68                 {}
69
70         bool recursiveInclude( char *inclFileName, char *inclSectionName );
71
72         /* Make a list of places to look for an included file. */
73         char **makeIncludePathChecks( char *curFileName, char *fileName, int len );
74         std::ifstream *tryOpenInclude( char **pathChecks, long &found );
75
76         void handleMachine();
77         void handleInclude();
78         void handleImport();
79
80         void init();
81         void token( int type, char *start, char *end );
82         void token( int type, char c );
83         void token( int type );
84         void processToken( int type, char *tokdata, int toklen );
85         void directToParser( Parser *toParser, char *tokFileName, int tokLine, 
86                 int tokColumn, int type, char *tokdata, int toklen );
87         void flushImport( );
88         void importToken( int type, char *start, char *end );
89         void pass( int token, char *start, char *end );
90         void pass();
91         void updateCol();
92         void startSection();
93         void endSection();
94         void do_scan();
95         bool active();
96         ostream &scan_error();
97
98         char *fileName;
99         istream &input;
100         ostream &output;
101         Parser *inclToParser;
102         char *inclSectionTarg;
103         int includeDepth;
104         bool importMachines;
105
106         /* For import parsing. */
107         int tok_cs, tok_act;
108         int *tok_ts, *tok_te;
109         int cur_token;
110         static const int max_tokens = 32;
111         int token_data[max_tokens];
112         char *token_strings[max_tokens];
113         int token_lens[max_tokens];
114
115         /* For section processing. */
116         int cs;
117         char *word, *lit;
118         int word_len, lit_len;
119
120         /* For character scanning. */
121         int line;
122         InputLoc sectionLoc;
123         char *ts, *te;
124         int column;
125         char *lastnl;
126
127         /* Set by machine statements, these persist from section to section
128          * allowing for unnamed sections. */
129         Parser *parser;
130         bool ignoreSection;
131         IncludeStack includeStack;
132
133         /* This is set if ragel has already emitted an error stating that
134          * no section name has been seen and thus no parser exists. */
135         bool parserExistsError;
136
137         /* This is for inline code. By default it is on. It goes off for
138          * statements and values in inline blocks which are parsed. */
139         bool whitespaceOn;
140
141         /* Keeps a record of the previous token sent to the section parser. */
142         int lastToken;
143 };
144
145 #endif /* _RLSCAN_H */