1 #include <msp/strings/format.h>
2 #include <msp/strings/regex.h>
3 #include "programparser.h"
10 using namespace ProgramSyntax;
12 ProgramParser::Operator ProgramParser::operators[] =
14 { "[", 2, BINARY, LEFT_TO_RIGHT },
15 { "(", 2, BINARY, LEFT_TO_RIGHT },
16 { ".", 2, BINARY, LEFT_TO_RIGHT },
17 { "++", 2, POSTFIX, LEFT_TO_RIGHT },
18 { "--", 2, POSTFIX, LEFT_TO_RIGHT },
19 { "++", 3, PREFIX, RIGHT_TO_LEFT },
20 { "--", 3, PREFIX, RIGHT_TO_LEFT },
21 { "+", 3, PREFIX, RIGHT_TO_LEFT },
22 { "-", 3, PREFIX, RIGHT_TO_LEFT },
23 { "~", 3, PREFIX, RIGHT_TO_LEFT },
24 { "!", 3, PREFIX, RIGHT_TO_LEFT },
25 { "*", 4, BINARY, LEFT_TO_RIGHT },
26 { "/", 4, BINARY, LEFT_TO_RIGHT },
27 { "%", 4, BINARY, LEFT_TO_RIGHT },
28 { "+", 5, BINARY, LEFT_TO_RIGHT },
29 { "-", 5, BINARY, LEFT_TO_RIGHT },
30 { "<<", 6, BINARY, LEFT_TO_RIGHT },
31 { ">>", 6, BINARY, LEFT_TO_RIGHT },
32 { "<", 7, BINARY, LEFT_TO_RIGHT },
33 { ">", 7, BINARY, LEFT_TO_RIGHT },
34 { "<=", 7, BINARY, LEFT_TO_RIGHT },
35 { ">=", 7, BINARY, LEFT_TO_RIGHT },
36 { "==", 8, BINARY, LEFT_TO_RIGHT },
37 { "!=", 8, BINARY, LEFT_TO_RIGHT },
38 { "&", 9, BINARY, LEFT_TO_RIGHT },
39 { "^", 10, BINARY, LEFT_TO_RIGHT },
40 { "|", 11, BINARY, LEFT_TO_RIGHT },
41 { "&&", 12, BINARY, LEFT_TO_RIGHT },
42 { "^^", 13, BINARY, LEFT_TO_RIGHT },
43 { "||", 14, BINARY, LEFT_TO_RIGHT },
44 { "?", 15, BINARY, RIGHT_TO_LEFT },
45 { ":", 15, BINARY, RIGHT_TO_LEFT },
46 { "=", 16, BINARY, RIGHT_TO_LEFT },
47 { "+=", 16, BINARY, RIGHT_TO_LEFT },
48 { "-=", 16, BINARY, RIGHT_TO_LEFT },
49 { "*=", 16, BINARY, RIGHT_TO_LEFT },
50 { "/=", 16, BINARY, RIGHT_TO_LEFT },
51 { "%=", 16, BINARY, RIGHT_TO_LEFT },
52 { "<<=", 16, BINARY, RIGHT_TO_LEFT },
53 { ">>=", 16, BINARY, RIGHT_TO_LEFT },
54 { "&=", 16, BINARY, RIGHT_TO_LEFT },
55 { "^=", 16, BINARY, RIGHT_TO_LEFT },
56 { "|=", 16, BINARY, RIGHT_TO_LEFT },
57 { ",", 17, BINARY, LEFT_TO_RIGHT },
58 { { 0 }, 18, NO_OPERATOR, LEFT_TO_RIGHT }
61 ProgramParser::ProgramParser():
65 ProgramParser::~ProgramParser()
70 Module &ProgramParser::parse(const string &s)
77 Module &ProgramParser::parse(IO::Base &io)
83 unsigned len = io.read(buffer, sizeof(buffer));
84 source.append(buffer, len);
90 void ProgramParser::parse_source()
94 cur_stage = &module->shared;
95 iter = source.begin();
98 while(RefPtr<Node> statement = parse_global_declaration())
99 cur_stage->content.body.push_back(statement);
102 string token = parse_token();
105 else if(token=="vertex")
106 module->stages.push_back(VERTEX);
107 else if(token=="geometry")
108 module->stages.push_back(GEOMETRY);
109 else if(token=="fragment")
110 module->stages.push_back(FRAGMENT);
112 throw runtime_error(format("Parse error at '%s': expected stage identifier", token));
114 if(cur_stage->type!=SHARED)
115 module->stages.back().previous = cur_stage;
116 cur_stage = &module->stages.back();
118 for(; (iter!=source.end() && *iter!='\n'); ++iter) ;
122 const string &ProgramParser::peek_token(unsigned index)
124 while(next_tokens.size()<=index)
125 next_tokens.push_back(parse_token_());
126 return next_tokens[index];
129 string ProgramParser::parse_token()
131 if(!next_tokens.empty())
133 string token = next_tokens.front();
134 next_tokens.pop_front();
138 return parse_token_();
141 string ProgramParser::parse_token_()
143 if(!skip_comment_and_whitespace())
146 if(isalpha(*iter) || *iter=='_')
147 return parse_identifier();
148 else if(isdigit(*iter))
149 return parse_number();
151 return parse_other();
154 string ProgramParser::parse_identifier()
157 while(iter!=source.end())
159 if(isalnum(*iter) || *iter=='_')
168 string ProgramParser::parse_number()
170 bool accept_sign = false;
172 while(iter!=source.end())
174 if(isdigit(*iter) || *iter=='.')
176 else if(*iter=='e' || *iter=='E')
181 else if(accept_sign && (*iter=='+' || *iter=='-'))
190 string ProgramParser::parse_other()
192 if(iter==source.end())
195 string token(1, *iter++);
196 for(unsigned i=1; (i<3 && iter!=source.end()); ++i)
198 bool matched = false;
199 for(const Operator *j=operators; (!matched && j->type); ++j)
201 matched = (j->token[i]==*iter);
202 for(unsigned k=0; (matched && k<i && j->token[k]); ++k)
203 matched = (j->token[k]==token[k]);
215 bool ProgramParser::skip_comment_and_whitespace()
217 unsigned comment = 0;
218 unsigned slashes = 0;
219 while(iter!=source.end())
225 else if(!isspace(*iter))
250 else if(!isspace(*iter) && slashes>=6)
253 else if(comment==3 && *iter=='*')
266 return iter!=source.end();
269 void ProgramParser::expect(const string &token)
271 string parsed = parse_token();
273 throw runtime_error(format("Parse error at '%s': expected '%s'", parsed, token));
276 string ProgramParser::expect_type()
278 string token = parse_token();
280 throw runtime_error(format("Parse error at '%s': expected a type", token));
284 string ProgramParser::expect_identifier()
286 string token = parse_token();
287 if(!is_identifier(token))
288 throw runtime_error(format("Parse error at '%s': expected an identifier", token));
292 bool ProgramParser::check(const string &token)
294 bool result = (peek_token()==token);
300 bool ProgramParser::is_interface_qualifier(const string &token)
302 return (token=="uniform" || token=="in" || token=="out");
305 bool ProgramParser::is_sampling_qualifier(const string &token)
307 return token=="centroid";
310 bool ProgramParser::is_qualifier(const string &token)
312 return (token=="const" || is_interface_qualifier(token) || is_sampling_qualifier(token));
315 bool ProgramParser::is_builtin_type(const string &token)
317 static Regex re("^(void|float|int|bool|[ib]?vec[234]|mat[234](x[234])?|sampler((1D|2D)(Array)?(Shadow)?|Cube(Shadow)?|3D))$");
318 return re.match(token);
321 bool ProgramParser::is_type(const string &token)
323 return is_builtin_type(token) || declared_types.count(token);
326 bool ProgramParser::is_identifier(const string &token)
328 static Regex re("^[a-zA-Z_][a-zA-Z0-9_]*$");
329 return re.match(token);
332 RefPtr<Node> ProgramParser::parse_global_declaration()
334 string token = peek_token();
336 return parse_import();
337 else if(token=="layout")
339 RefPtr<Layout> layout = parse_layout();
340 token = peek_token();
341 if(is_interface_qualifier(token) && peek_token(1)==";")
343 RefPtr<InterfaceLayout> iface_lo = new InterfaceLayout;
344 iface_lo->layout.qualifiers = layout->qualifiers;
345 iface_lo->interface = parse_token();
351 RefPtr<VariableDeclaration> var = parse_variable_declaration();
352 var->layout = layout;
356 else if(token=="struct")
357 return parse_struct_declaration();
358 else if(is_sampling_qualifier(token) || token=="const")
359 return parse_variable_declaration();
360 else if(is_interface_qualifier(token))
362 if(is_type(peek_token(1)))
363 return parse_variable_declaration();
365 return parse_interface_block();
367 else if(is_type(token))
369 if(peek_token(2)=="(")
370 return parse_function_declaration();
372 return parse_variable_declaration();
374 else if(token.empty())
377 throw runtime_error(format("Syntax error at '%s': expected a global declaration", token));
380 RefPtr<Node> ProgramParser::parse_statement()
382 string token = peek_token();
384 return parse_conditional();
385 else if(token=="for")
386 return parse_iteration();
387 else if(token=="passthrough")
388 return parse_passthrough();
389 else if(token=="return")
390 return parse_return();
391 else if(is_qualifier(token) || is_type(token))
392 return parse_variable_declaration();
393 else if(!token.empty())
395 RefPtr<ExpressionStatement> expr = new ExpressionStatement;
396 expr->expression = parse_expression();
402 throw runtime_error(format("Syntax error at '%s': expected a statement", token));
405 RefPtr<Import> ProgramParser::parse_import()
407 if(cur_stage->type!=SHARED)
408 throw runtime_error("Imports are only allowed in the shared section");
411 RefPtr<Import> import = new Import;
412 import->module = parse_token();
417 RefPtr<Layout> ProgramParser::parse_layout()
421 RefPtr<Layout> layout = new Layout;
424 string token = parse_token();
426 throw runtime_error(format("Parse error at '%s': expected layout qualifier id", token));
428 layout->qualifiers.push_back(Layout::Qualifier());
429 Layout::Qualifier &qual = layout->qualifiers.back();
430 qual.identifier = token;
433 qual.value = parse_token();
435 if(peek_token()==")")
445 void ProgramParser::parse_block(Block &block, bool require_braces)
447 bool have_braces = (require_braces || peek_token()=="{");
453 while(peek_token()!="}")
454 block.body.push_back(parse_statement());
457 block.body.push_back(parse_statement());
459 block.use_braces = (require_braces || block.body.size()!=1);
465 RefPtr<Expression> ProgramParser::parse_expression(unsigned precedence)
467 RefPtr<Expression> left;
468 VariableReference *left_var = 0;
471 string token = peek_token();
473 const Operator *oper = 0;
474 for(Operator *i=operators; (!oper && i->type); ++i)
475 if(token==i->token && (!left || i->type!=PREFIX) && (left || i->type!=POSTFIX))
478 if(token==";" || token==")" || token=="]" || token=="," || (oper && precedence && oper->precedence>=precedence))
483 throw runtime_error(format("Parse error at '%s': expected an expression", token));
490 throw runtime_error(format("Parse error at '%s': function name must be an identifier", token));
491 left = parse_function_call(*left_var);
495 RefPtr<MemberAccess> memacc = new MemberAccess;
498 memacc->member = expect_identifier();
501 else if(oper && oper->type==POSTFIX)
503 RefPtr<UnaryExpression> unary = new UnaryExpression;
504 unary->oper = parse_token();
505 unary->prefix = false;
506 unary->expression = left;
509 else if(oper && oper->type==BINARY)
510 left = parse_binary(left, oper);
512 throw runtime_error(format("Parse error at '%s': expected an operator", token));
520 RefPtr<ParenthesizedExpression> parexpr = new ParenthesizedExpression;
521 parexpr->expression = parse_expression();
525 else if(isdigit(token[0]) || token=="true" || token=="false")
527 RefPtr<Literal> literal = new Literal;
528 literal->token = parse_token();
531 else if(is_identifier(token))
533 RefPtr<VariableReference> var = new VariableReference;
534 var->name = expect_identifier();
536 left_var = var.get();
538 else if(oper && oper->type==PREFIX)
540 RefPtr<UnaryExpression> unary = new UnaryExpression;
541 unary->oper = parse_token();
542 unary->prefix = true;
543 unary->expression = parse_expression(oper->precedence);
547 throw runtime_error(format("Parse error at '%s': expected an expression", token));
552 RefPtr<BinaryExpression> ProgramParser::parse_binary(const RefPtr<Expression> &left, const Operator *oper)
554 RefPtr<BinaryExpression> binary = (oper->precedence==16 ? new Assignment : new BinaryExpression);
556 binary->oper = parse_token();
557 if(binary->oper=="[")
559 binary->right = parse_expression();
564 binary->right = parse_expression(oper->precedence+(oper->assoc==RIGHT_TO_LEFT));
568 RefPtr<FunctionCall> ProgramParser::parse_function_call(const VariableReference &var)
570 RefPtr<FunctionCall> call = new FunctionCall;
571 call->name = var.name;
572 call->constructor = is_type(call->name);
574 while(peek_token()!=")")
576 if(!call->arguments.empty())
578 call->arguments.push_back(parse_expression());
584 RefPtr<StructDeclaration> ProgramParser::parse_struct_declaration()
587 RefPtr<StructDeclaration> strct = new StructDeclaration;
589 strct->name = expect_identifier();
590 parse_block(strct->members, true);
593 declared_types.insert(strct->name);
597 RefPtr<VariableDeclaration> ProgramParser::parse_variable_declaration()
599 RefPtr<VariableDeclaration> var = new VariableDeclaration;
601 string token = peek_token();
602 if(is_sampling_qualifier(token))
604 var->sampling = parse_token();
605 token = peek_token();
606 if(!is_interface_qualifier(token))
607 throw runtime_error(format("Parse error at '%s': expected an interface qualifier", token));
610 if(is_interface_qualifier(token))
611 var->interface = parse_token();
612 else if(token=="const")
614 var->constant = true;
618 var->type = expect_type();
619 var->name = expect_identifier();
626 var->array_size = parse_expression();
632 var->init_expression = parse_expression();
638 RefPtr<FunctionDeclaration> ProgramParser::parse_function_declaration()
640 RefPtr<FunctionDeclaration> func = new FunctionDeclaration;
642 func->return_type = expect_type();
643 func->name = expect_identifier();
645 while(peek_token()!=")")
647 if(!func->parameters.empty())
650 RefPtr<VariableDeclaration> var = new VariableDeclaration;
651 var->type = expect_type();
652 var->name = expect_identifier();
653 func->parameters.push_back(var);
657 string token = peek_token();
660 func->definition = func.get();
661 parse_block(func->body, true);
666 throw runtime_error(format("Parse error at '%s': expected '{' or ';'", token));
671 RefPtr<InterfaceBlock> ProgramParser::parse_interface_block()
673 RefPtr<InterfaceBlock> iface = new InterfaceBlock;
675 iface->interface = parse_token();
676 if(!is_interface_qualifier(iface->interface))
677 throw runtime_error(format("Parse error at '%s': expected an interface qualifier", iface->interface));
679 iface->name = expect_identifier();
680 parse_block(iface->members, true);
683 iface->instance_name = expect_identifier();
695 RefPtr<Conditional> ProgramParser::parse_conditional()
699 RefPtr<Conditional> cond = new Conditional;
700 cond->condition = parse_expression();
703 parse_block(cond->body, false);
705 string token = peek_token();
709 parse_block(cond->else_body, false);
715 RefPtr<Iteration> ProgramParser::parse_iteration()
719 RefPtr<Iteration> loop = new Iteration;
720 string token = peek_token();
722 loop->init_statement = parse_statement();
725 RefPtr<ExpressionStatement> expr = new ExpressionStatement;
726 expr->expression = parse_expression();
728 loop->init_statement = expr;
730 loop->condition = parse_expression();
732 loop->loop_expression = parse_expression();
735 parse_block(loop->body, false);
740 RefPtr<Passthrough> ProgramParser::parse_passthrough()
742 expect("passthrough");
743 RefPtr<Passthrough> pass = new Passthrough;
744 if(cur_stage->type==GEOMETRY)
747 pass->subscript = parse_expression();
754 RefPtr<Return> ProgramParser::parse_return()
757 RefPtr<Return> ret = new Return;
758 if(peek_token()!=";")
759 ret->expression = parse_expression();