2 * 2007 Victor Hugo Borja <vic@rubyforge.org>
3 * Copyright 2001-2007 Adrian Thurston <thurston@complang.org>
6 /* This file is part of Ragel.
8 * Ragel is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
13 * Ragel is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License
19 * along with Ragel; if not, write to the Free Software
20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
23 #ifndef _RUBY_CODEGEN_H
24 #define _RUBY_CODEGEN_H
29 /* Integer array line length. */
32 inline string itoa( int i )
35 sprintf( buf, "%i", i );
40 class RubyCodeGen : public CodeGenData
43 RubyCodeGen( ostream &out ) : CodeGenData(out) { }
44 virtual ~RubyCodeGen() {}
46 ostream &START_ARRAY_LINE();
47 ostream &ARRAY_ITEM( string item, int count, bool last );
48 ostream &END_ARRAY_LINE();
53 string START_STATE_ID();
55 string FIRST_FINAL_STATE();
56 void INLINE_LIST(ostream &ret, GenInlineList *inlineList, int targState, bool inFinish);
59 void ACTION( ostream &ret, GenAction *action, int targState, bool inFinish );
61 string GET_WIDE_KEY();
62 string GET_WIDE_KEY( RedStateAp *state );
63 string KEY( Key key );
64 string TABS( int level );
66 void CONDITION( ostream &ret, GenAction *condition );
68 string WIDE_ALPH_TYPE();
69 string ARRAY_TYPE( unsigned long maxVal );
70 ostream &ACTIONS_ARRAY();
75 string PM() { return "_" + DATA_PREFIX() + "partition_map"; }
76 string C() { return "_" + DATA_PREFIX() + "cond_spaces"; }
77 string CK() { return "_" + DATA_PREFIX() + "cond_keys"; }
78 string K() { return "_" + DATA_PREFIX() + "trans_keys"; }
79 string I() { return "_" + DATA_PREFIX() + "indicies"; }
80 string CO() { return "_" + DATA_PREFIX() + "cond_offsets"; }
81 string KO() { return "_" + DATA_PREFIX() + "key_offsets"; }
82 string IO() { return "_" + DATA_PREFIX() + "index_offsets"; }
83 string CL() { return "_" + DATA_PREFIX() + "cond_lengths"; }
84 string SL() { return "_" + DATA_PREFIX() + "single_lengths"; }
85 string RL() { return "_" + DATA_PREFIX() + "range_lengths"; }
86 string A() { return "_" + DATA_PREFIX() + "actions"; }
87 string TA() { return "_" + DATA_PREFIX() + "trans_actions"; }
88 string TT() { return "_" + DATA_PREFIX() + "trans_targs"; }
89 string TSA() { return "_" + DATA_PREFIX() + "to_state_actions"; }
90 string FSA() { return "_" + DATA_PREFIX() + "from_state_actions"; }
91 string EA() { return "_" + DATA_PREFIX() + "eof_actions"; }
92 string ET() { return "_" + DATA_PREFIX() + "eof_trans"; }
93 string SP() { return "_" + DATA_PREFIX() + "key_spans"; }
94 string CSP() { return "_" + DATA_PREFIX() + "cond_key_spans"; }
95 string START() { return DATA_PREFIX() + "start"; }
96 string ERROR() { return DATA_PREFIX() + "error"; }
97 string FIRST_FINAL() { return DATA_PREFIX() + "first_final"; }
98 string CTXDATA() { return DATA_PREFIX() + "ctxdata"; }
102 ostream &OPEN_ARRAY( string type, string name );
103 ostream &CLOSE_ARRAY();
104 ostream &STATIC_VAR( string type, string name );
105 string ARR_OFF( string ptr, string offset );
120 void finishRagelDef();
121 unsigned int arrayTypeSize( unsigned long maxVal );
124 virtual void writeExports();
125 virtual void writeInit();
126 virtual void writeStart();
127 virtual void writeFirstFinal();
128 virtual void writeError();
130 /* Determine if we should use indicies. */
131 virtual void calcIndexSize();
133 virtual void BREAK( ostream &ret, int targState ) = 0;
134 virtual void GOTO( ostream &ret, int gotoDest, bool inFinish ) = 0;
135 virtual void GOTO_EXPR( ostream &ret, GenInlineItem *ilItem, bool inFinish ) = 0;
136 virtual void CALL( ostream &ret, int callDest, int targState, bool inFinish ) = 0;
137 virtual void CALL_EXPR( ostream &ret, GenInlineItem *ilItem, int targState, bool inFinish ) = 0;
138 virtual void RET( ostream &ret, bool inFinish ) = 0;
141 virtual void NEXT( ostream &ret, int nextDest, bool inFinish ) = 0;
142 virtual void NEXT_EXPR( ostream &ret, GenInlineItem *ilItem, bool inFinish ) = 0;
144 virtual int TO_STATE_ACTION( RedStateAp *state ) = 0;
145 virtual int FROM_STATE_ACTION( RedStateAp *state ) = 0;
146 virtual int EOF_ACTION( RedStateAp *state ) = 0;
148 virtual int TRANS_ACTION( RedTransAp *trans );
150 void EXEC( ostream &ret, GenInlineItem *item, int targState, int inFinish );
151 void LM_SWITCH( ostream &ret, GenInlineItem *item, int targState, int inFinish );
152 void SET_ACT( ostream &ret, GenInlineItem *item );
153 void INIT_TOKSTART( ostream &ret, GenInlineItem *item );
154 void INIT_ACT( ostream &ret, GenInlineItem *item );
155 void SET_TOKSTART( ostream &ret, GenInlineItem *item );
156 void SET_TOKEND( ostream &ret, GenInlineItem *item );
157 void GET_TOKEND( ostream &ret, GenInlineItem *item );
158 void SUB_ACTION( ostream &ret, GenInlineItem *item, int targState, bool inFinish );
161 ostream &source_warning(const InputLoc &loc);
162 ostream &source_error(const InputLoc &loc);
170 void genLineDirective( ostream &out );
176 * indent-tabs-mode: 1
177 * c-file-style: "bsd"