Mercurial > hg > graal-compiler
annotate src/share/vm/adlc/adlparse.hpp @ 1476:1f81c0d18c75
Build also release version of VM. Fix towards making SpecJVM2008 run.
author | Thomas Wuerthinger <wuerthinger@ssw.jku.at> |
---|---|
date | Fri, 26 Nov 2010 12:12:35 +0100 |
parents | 0fbdb4381b99 |
children | c18cbe5936b8 |
rev | line source |
---|---|
0 | 1 /* |
579 | 2 * Copyright 1997-2009 Sun Microsystems, Inc. All Rights Reserved. |
0 | 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
4 * | |
5 * This code is free software; you can redistribute it and/or modify it | |
6 * under the terms of the GNU General Public License version 2 only, as | |
7 * published by the Free Software Foundation. | |
8 * | |
9 * This code is distributed in the hope that it will be useful, but WITHOUT | |
10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
12 * version 2 for more details (a copy is included in the LICENSE file that | |
13 * accompanied this code). | |
14 * | |
15 * You should have received a copy of the GNU General Public License version | |
16 * 2 along with this work; if not, write to the Free Software Foundation, | |
17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. | |
18 * | |
19 * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara, | |
20 * CA 95054 USA or visit www.sun.com if you need additional information or | |
21 * have any questions. | |
22 * | |
23 */ | |
24 | |
25 // ADLPARSE.HPP - Definitions for Architecture Description Language Parser | |
26 // Authors: Chris Vick and Mike Paleczny | |
27 | |
28 // Class List | |
29 class Form; | |
30 // ***** Top Level, 1, classes ***** | |
31 class InstructForm; | |
32 class OperandForm; | |
33 class OpClassForm; | |
34 class AttributeForm; | |
35 class RegisterForm; | |
36 class PipelineForm; | |
37 class SourceForm; | |
38 class Peephole; | |
39 // ***** Level 2 classes ***** | |
40 class Component; | |
41 class Predicate; | |
42 class MatchRule; | |
43 class Encode; | |
44 class Attribute; | |
45 class Effect; | |
46 class ExpandRule; | |
47 class RewriteRule; | |
48 class Constraint; | |
49 class ConstructRule; | |
50 // ***** Register Section ***** | |
51 class RegDef; | |
52 class RegClass; | |
53 class AllocClass; | |
54 class ResourceForm; | |
55 // ***** Pipeline Section ***** | |
56 class PipeDesc; | |
57 class PipeClass; | |
58 class RegList; | |
59 // ***** Peephole Section ***** | |
60 class PeepMatch; | |
61 class PeepConstraint; | |
62 class PeepReplace; | |
63 | |
64 // class ostream; // ostream is a typedef in some systems | |
65 | |
66 extern char *toUpper(const char *str); | |
67 | |
68 //---------------------------ADLParser----------------------------------------- | |
69 class ADLParser { | |
70 protected: | |
71 char *_curline; // Start of current line | |
72 char *_ptr; // Pointer into current location in File Buffer | |
73 char _curchar; // Current character from buffer | |
74 FormDict &_globalNames; // Global names | |
75 | |
76 enum { _preproc_limit = 20 }; | |
77 int _preproc_depth; // How deep are we into ifdefs? | |
78 int _preproc_not_taken; // How deep in not-taken ifdefs? | |
79 bool _preproc_taken[_preproc_limit]; // Are we taking this ifdef level? | |
80 bool _preproc_else[_preproc_limit]; // Did this level have an else yet? | |
81 | |
82 // ***** Level 1 Parse functions ***** | |
83 void instr_parse(void); // Parse instruction definitions | |
84 void oper_parse(void); // Parse operand definitions | |
85 void opclass_parse(void); // Parse operand class definitions | |
86 void ins_attr_parse(void); // Parse instruction attrubute definitions | |
87 void op_attr_parse(void); // Parse operand attrubute definitions | |
88 void source_parse(void); // Parse source section | |
89 void source_hpp_parse(void); // Parse source_hpp section | |
90 void reg_parse(void); // Parse register section | |
91 void encode_parse(void); // Parse encoding section | |
92 void frame_parse(void); // Parse frame section | |
93 void pipe_parse(void); // Parse pipeline section | |
94 void definitions_parse(void); // Parse definitions section | |
95 void peep_parse(void); // Parse peephole rule definitions | |
475
284d0af00d53
6771309: debugging AD files is difficult without #line directives in generated code
jrose
parents:
415
diff
changeset
|
96 void preproc_line(void); // Parse a #line statement |
0 | 97 void preproc_define(void); // Parse a #define statement |
98 void preproc_undef(void); // Parse an #undef statement | |
99 | |
100 // Helper functions for instr_parse(). | |
101 void adjust_set_rule(InstructForm *instr); | |
102 void matchrule_clone_and_swap(MatchRule *rule, const char* instr_ident, int& match_rules_cnt); | |
103 | |
104 // ***** Level 2 Parse functions ***** | |
105 // Parse the components of the encode section | |
106 void enc_class_parse(void); // Parse encoding class definition | |
107 void enc_class_parse_block(EncClass* encoding, char* ec_name); | |
108 | |
109 // Parse the components of the frame section | |
110 void stack_dir_parse(FrameForm *frame); // Parse the stack direction entry | |
111 void sync_stack_slots_parse(FrameForm *frame); | |
112 void frame_pointer_parse(FrameForm *frame, bool native); | |
113 void interpreter_frame_pointer_parse(FrameForm *frame, bool native); | |
114 void inline_cache_parse(FrameForm *frame, bool native); | |
115 void interpreter_arg_ptr_parse(FrameForm *frame, bool native); | |
116 void interpreter_method_oop_parse(FrameForm *frame, bool native); | |
117 void cisc_spilling_operand_name_parse(FrameForm *frame, bool native); | |
118 void stack_alignment_parse(FrameForm *frame); | |
119 void return_addr_parse(FrameForm *frame, bool native); | |
120 void preserve_stack_parse(FrameForm *frame); | |
121 char *calling_convention_parse(); | |
122 char *return_value_parse(); | |
123 | |
124 // Parse components of the register section | |
125 void reg_def_parse(void); // Parse register definition | |
126 void reg_class_parse(void); // Parse register class definition | |
127 void alloc_class_parse(void); // Parse allocation class definition | |
128 | |
129 // Parse components of the definition section | |
130 void int_def_parse(void); // Parse an integer definition | |
131 | |
132 // Parse components of a pipeline rule | |
133 void resource_parse(PipelineForm &pipe); // Parse resource definition | |
134 void pipe_desc_parse(PipelineForm &pipe); // Parse pipeline description definition | |
135 void pipe_class_parse(PipelineForm &pipe); // Parse pipeline class definition | |
136 | |
137 // Parse components of a peephole rule | |
138 void peep_match_parse(Peephole &peep); // Parse the peephole match rule | |
139 void peep_constraint_parse(Peephole &peep);// Parse the peephole constraints | |
140 void peep_replace_parse(Peephole &peep); // Parse peephole replacement rule | |
141 | |
142 // Parse the peep match rule tree | |
143 InstructForm *peep_match_child_parse(PeepMatch &match, int parent, int &position, int input); | |
144 | |
145 // Parse components of an operand and/or instruction form | |
146 Predicate *pred_parse(void); // Parse predicate rule | |
147 // Parse match rule, and internal nodes | |
148 MatchRule *match_parse(FormDict &operands); | |
149 MatchNode *matchNode_parse(FormDict &operands, int &depth, | |
150 int &numleaves, bool atroot); | |
151 MatchNode *matchChild_parse(FormDict &operands, int &depth, | |
152 int &numleaves, bool atroot); | |
153 | |
154 Attribute *attr_parse(char *ident);// Parse instr/operand attribute rule | |
155 // Parse instruction encode rule | |
156 InsEncode *ins_encode_parse(InstructForm &inst); | |
157 InsEncode *ins_encode_parse_block(InstructForm &inst); | |
158 Opcode *opcode_parse(InstructForm *insr); // Parse instruction opcode | |
159 char *size_parse(InstructForm *insr); // Parse instruction size | |
160 Interface *interface_parse(); // Parse operand interface rule | |
161 Interface *mem_interface_parse(); // Parse memory interface rule | |
162 Interface *cond_interface_parse(); // Parse conditional interface rule | |
415
4d9884b01ba6
6754519: don't emit flag fixup for NaN when condition being tested doesn't need it
never
parents:
0
diff
changeset
|
163 char *interface_field_parse(const char** format = NULL);// Parse field contents |
0 | 164 |
165 FormatRule *format_parse(void); // Parse format rule | |
415
4d9884b01ba6
6754519: don't emit flag fixup for NaN when condition being tested doesn't need it
never
parents:
0
diff
changeset
|
166 FormatRule *template_parse(void); // Parse format rule |
0 | 167 void effect_parse(InstructForm *instr); // Parse effect rule |
168 ExpandRule *expand_parse(InstructForm *instr); // Parse expand rule | |
169 RewriteRule *rewrite_parse(void); // Parse rewrite rule | |
170 Constraint *constraint_parse(void); // Parse constraint rule | |
171 ConstructRule *construct_parse(void); // Parse construct rule | |
172 void ins_pipe_parse(InstructForm &instr); // Parse ins_pipe rule | |
173 | |
174 // ***** Preprocessor functions ***** | |
175 void begin_if_def(bool taken) { | |
176 assert(_preproc_depth < _preproc_limit, "#ifdef nesting limit"); | |
177 int ppn = _preproc_depth++; | |
178 _preproc_taken[ppn] = taken; | |
179 // Invariant: _preproc_not_taken = SUM !_preproc_taken[0.._preproc_depth) | |
180 if (!_preproc_taken[ppn]) _preproc_not_taken += 1; | |
181 _preproc_else[ppn] = false; | |
182 } | |
183 void invert_if_def() { | |
184 assert(_preproc_depth > 0, "#ifdef matching"); | |
185 int ppn = _preproc_depth - 1; | |
186 assert(!_preproc_else[ppn], "multiple #else lines"); | |
187 _preproc_else[ppn] = true; | |
188 if (!_preproc_taken[ppn]) _preproc_not_taken -= 1; | |
189 _preproc_taken[ppn] = !_preproc_taken[ppn]; | |
190 if (!_preproc_taken[ppn]) _preproc_not_taken += 1; | |
191 } | |
192 void end_if_def() { | |
193 assert(_preproc_depth > 0, "#ifdef matching"); | |
194 int ppn = --_preproc_depth; | |
195 if (!_preproc_taken[ppn]) _preproc_not_taken -= 1; | |
196 } | |
197 bool preproc_taken() { | |
198 // Return true only if there is no directive hiding this text position. | |
199 return _preproc_not_taken == 0; | |
200 } | |
201 // Handle a '#' token. Return true if it disappeared. | |
202 bool handle_preproc_token(); | |
203 | |
204 // ***** Utility Functions for ADL Parser ****** | |
205 | |
206 // Parse one string argument inside parens: '(' string ')' ';' | |
207 char *parse_one_arg(const char *description); | |
208 | |
209 // Return the next identifier given a pointer into a line of the buffer. | |
210 char *get_ident() { return get_ident_common(true); } | |
211 char *get_ident_no_preproc() { return get_ident_common(false); } | |
212 char *get_ident_common(bool do_preproc); // Grab it from the file buffer | |
213 char *get_ident_dup(void); // Grab a duplicate of the identifier | |
214 char *get_ident_or_literal_constant(const char* description); | |
215 // Grab unique identifier from file buffer | |
216 char *get_unique_ident(FormDict &dict, const char *nameDescription); | |
217 // Return the next replacement variable identifier | |
218 char *get_rep_var_ident(void); | |
219 // Skip first '$' and make a duplicate of the string | |
220 char *get_rep_var_ident_dup(void); | |
221 // Return the next token given as a signed integer. | |
222 int get_int(void); | |
223 // Return the next token, a relational operator { ==, !=, <=, >= } | |
224 char *get_relation_dup(void); | |
225 | |
226 void get_oplist(NameList ¶meters, FormDict &operands);// Parse type-operand pairs | |
227 void get_effectlist(FormDict &effects, FormDict &operands); // Parse effect-operand pairs | |
228 // Return the contents of a parenthesized expression. | |
229 // Requires initial '(' and consumes final ')', which is replaced by '\0'. | |
475
284d0af00d53
6771309: debugging AD files is difficult without #line directives in generated code
jrose
parents:
415
diff
changeset
|
230 char *get_paren_expr(const char *description, bool include_location = false); |
0 | 231 // Return expression up to next stop-char, which terminator replaces. |
232 // Does not require initial '('. Does not consume final stop-char. | |
233 // Final stop-char is left in _curchar, but is also is replaced by '\0'. | |
234 char *get_expr(const char *description, const char *stop_chars); | |
235 char *find_cpp_block(const char *description); // Parse a C++ code block | |
236 // Issue parser error message & go to EOL | |
237 void parse_err(int flag, const char *fmt, ...); | |
475
284d0af00d53
6771309: debugging AD files is difficult without #line directives in generated code
jrose
parents:
415
diff
changeset
|
238 // Create a location marker for this file and line. |
284d0af00d53
6771309: debugging AD files is difficult without #line directives in generated code
jrose
parents:
415
diff
changeset
|
239 char *get_line_string(int linenum = 0); |
284d0af00d53
6771309: debugging AD files is difficult without #line directives in generated code
jrose
parents:
415
diff
changeset
|
240 // Return a location marker which tells the C preprocessor to |
284d0af00d53
6771309: debugging AD files is difficult without #line directives in generated code
jrose
parents:
415
diff
changeset
|
241 // forget the previous location marker. (Requires awk postprocessing.) |
284d0af00d53
6771309: debugging AD files is difficult without #line directives in generated code
jrose
parents:
415
diff
changeset
|
242 char *end_line_marker() { return (char*)"\n#line 999999\n"; } |
0 | 243 |
244 // Return pointer to current character | |
245 inline char cur_char(void); | |
246 // Advance to next character, assign this to _curchar | |
247 inline void next_char(void); | |
248 inline void next_char_or_line(void); | |
249 // Advance File Buffer to next line, updating _curline | |
250 inline void next_line(void); | |
251 // Issue an error if we are not at the beginning of a line (exc. whitespace). | |
252 void ensure_start_of_line(void); | |
253 // Issue an error if we are not at the end of a line (exc. whitespace). | |
254 void ensure_end_of_line(void); | |
255 // Skip whitespace, leaving ptr pointing to first non-whitespace character | |
256 // Also handle preprocessor constructs like "#ifdef". | |
257 void skipws() { skipws_common(true); } | |
258 // Skip comments and spaces but not newlines or preprocessor constructs. | |
259 void skipws_no_preproc() { skipws_common(false); } | |
260 void skipws_common(bool do_preproc); | |
261 | |
262 FileBuff &_buf; // File buffer to be parsed | |
263 ArchDesc &_AD; // Architecture Description being built | |
264 | |
265 public: | |
266 | |
267 ADLParser(FileBuff &buf, ArchDesc &archDesc); // Create new ADLParser object | |
268 ~ADLParser(); // Destroy ADLParser object | |
269 | |
270 void parse(void); // Do the parsing & build forms lists | |
271 | |
415
4d9884b01ba6
6754519: don't emit flag fixup for NaN when condition being tested doesn't need it
never
parents:
0
diff
changeset
|
272 int linenum() { return _buf.linenum(); } |
0 | 273 |
274 static bool is_literal_constant(const char *hex_string); | |
275 static bool is_hex_digit(char digit); | |
276 static bool is_int_token(const char* token, int& intval); | |
475
284d0af00d53
6771309: debugging AD files is difficult without #line directives in generated code
jrose
parents:
415
diff
changeset
|
277 static bool equivalent_expressions(const char* str1, const char* str2); |
0 | 278 static void trim(char* &token); // trim leading & trailing spaces |
279 }; |