source/glsl/parser.cpp

   1 #include <msp/core/raii.h>
   2 #include <msp/strings/format.h>
   3 #include <msp/strings/regex.h>
   4 #include <msp/strings/utils.h>
   5 #include "builtin.h"
   6 #include "glsl_error.h"
   7 #include "parser.h"
   8
   9 #undef interface
  10
  11 using namespace std;
  12
  13 namespace Msp {
  14 namespace GL {
  15 namespace SL {
  16
  17 Parser::Parser():
  18         preprocessor(tokenizer),
  19         module(0)
  20 {
  21         tokenizer.signal_preprocess.connect(sigc::mem_fun(&preprocessor, &Preprocessor::preprocess));
  22         preprocessor.signal_version.connect(sigc::mem_fun(this, &Parser::set_required_version));
  23         preprocessor.signal_source.connect(sigc::mem_fun(this, &Parser::source_reference));
  24         preprocessor.signal_stage_change.connect(sigc::mem_fun(this, &Parser::stage_change));
  25         preprocessor.signal_line.connect(sigc::mem_fun(this, &Parser::line_change));
  26 }
  27
  28 Parser::~Parser()
  29 {
  30         delete module;
  31 }
  32
  33 Module &Parser::parse(const string &s, const string &n, int i)
  34 {
  35         source = s;
  36         parse_source(n, i);
  37         return *module;
  38 }
  39
  40 Module &Parser::parse(IO::Base &io, const string &n, int i)
  41 {
  42         source = string();
  43         while(!io.eof())
  44         {
  45                 char buffer[4096];
  46                 unsigned len = io.read(buffer, sizeof(buffer));
  47                 source.append(buffer, len);
  48         }
  49         parse_source(n, i);
  50         return *module;
  51 }
  52
  53 void Parser::parse_source(const string &name, int index)
  54 {
  55         delete module;
  56         module = new Module;
  57
  58         cur_stage = &module->shared;
  59         base_index = index;
  60         source_index = index;
  61         if(index>=0)
  62                 source_reference(1, name);
  63
  64         // TODO Need to somehow get type names from imports
  65         if(const Stage *builtin = get_builtins(Stage::SHARED))
  66         {
  67                 for(map<string, TypeDeclaration *>::const_iterator i=builtin->types.begin(); i!=builtin->types.end(); ++i)
  68                         declared_types.insert(i->first);
  69         }
  70         else
  71         {
  72                 declared_types.insert("void");
  73                 declared_types.insert("bool");
  74                 declared_types.insert("int");
  75                 declared_types.insert("float");
  76         }
  77
  78         tokenizer.begin(source, name);
  79         allow_stage_change = true;
  80         while(!tokenizer.peek_token().empty())
  81                 if(RefPtr<Statement> statement = parse_with_recovery(&Parser::parse_global_declaration))
  82                         cur_stage->content.body.push_back(statement);
  83
  84         if(!errors.empty())
  85                 throw invalid_shader_source(join(errors.begin(), errors.end(), "\n"));
  86 }
  87
  88 void Parser::set_required_version(const Version &ver)
  89 {
  90         cur_stage->required_features.glsl_version = ver;
  91 }
  92
  93 void Parser::source_reference(unsigned index, const string &name)
  94 {
  95         if(index<1 || base_index<0)
  96                 throw invalid_shader_source(tokenizer.get_location(), "Invalid source reference");
  97
  98         module->source_map.set_name(base_index+index-1, name);
  99 }
 100
 101 void Parser::stage_change(Stage::Type stage)
 102 {
 103         if(!allow_stage_change)
 104                 throw invalid_shader_source(tokenizer.get_location(), "Changing stage not allowed here");
 105         else if(stage<=cur_stage->type)
 106                 throw invalid_shader_source(tokenizer.get_location(), "Stage '%s' not allowed here", Stage::get_stage_name(stage));
 107
 108         module->stages.push_back(stage);
 109
 110         if(cur_stage->type!=Stage::SHARED)
 111                 module->stages.back().previous = cur_stage;
 112         cur_stage = &module->stages.back();
 113 }
 114
 115 void Parser::line_change(int index, unsigned line)
 116 {
 117         if(index>0)
 118                 source_index = base_index+index-1;
 119         else if(index==0)
 120                 source_index = 0;
 121         else
 122                 index = source_index;
 123
 124         string name = module->source_map.get_name(index);
 125         if(name.empty())
 126                 name = format("<%d>", index);
 127         tokenizer.set_location(Location(name, line));
 128 }
 129
 130 string Parser::expect_type()
 131 {
 132         string token = tokenizer.parse_token();
 133         if(!is_type(token))
 134                 throw parse_error(tokenizer.get_location(), token, "a type");
 135         return token;
 136 }
 137
 138 string Parser::expect_identifier()
 139 {
 140         string token = tokenizer.parse_token();
 141         if(!is_identifier(token))
 142                 throw parse_error(tokenizer.get_location(), token, "an identifier");
 143         return token;
 144 }
 145
 146 int Parser::expect_integer()
 147 {
 148         string token = tokenizer.parse_token();
 149         if(!isnumrc(token))
 150                 throw parse_error(tokenizer.get_location(), token, "an integer literal");
 151         return lexical_cast<int>(token);
 152 }
 153
 154 bool Parser::check(const string &token)
 155 {
 156         bool result = (tokenizer.peek_token()==token);
 157         if(result)
 158                 tokenizer.parse_token();
 159         return result;
 160 }
 161
 162 bool Parser::is_interface_qualifier(const string &token)
 163 {
 164         return (token=="uniform" || token=="in" || token=="out");
 165 }
 166
 167 bool Parser::is_sampling_qualifier(const string &token)
 168 {
 169         return (token=="centroid" || token=="sample");
 170 }
 171
 172 bool Parser::is_interpolation_qualifier(const string &token)
 173 {
 174         return (token=="smooth" || token=="flat" || token=="noperspective");
 175 }
 176
 177 bool Parser::is_precision_qualifier(const string &token)
 178 {
 179         return (token=="highp" || token=="mediump" || token=="lowp");
 180 }
 181
 182 bool Parser::is_qualifier(const string &token)
 183 {
 184         return (token=="const" ||
 185                 is_interface_qualifier(token) ||
 186                 is_sampling_qualifier(token) ||
 187                 is_interpolation_qualifier(token) ||
 188                 is_precision_qualifier(token));
 189 }
 190
 191 bool Parser::is_type(const string &token)
 192 {
 193         return declared_types.count(token);
 194 }
 195
 196 bool Parser::is_identifier(const string &token)
 197 {
 198         static Regex re("^[a-zA-Z_][a-zA-Z0-9_]*$");
 199         return re.match(token);
 200 }
 201
 202 template<typename T>
 203 RefPtr<T> Parser::create_node()
 204 {
 205         RefPtr<T> node = new T;
 206         node->source = source_index;
 207         node->line = tokenizer.get_location().line;
 208         return node;
 209 }
 210
 211 template<typename T>
 212 RefPtr<T> Parser::parse_with_recovery(RefPtr<T> (Parser::*parse_func)())
 213 {
 214         tokenizer.clear_progress_mark();
 215         try
 216         {
 217                 return (this->*parse_func)();
 218         }
 219         catch(const invalid_shader_source &exc)
 220         {
 221                 errors.push_back(exc.what());
 222         }
 223
 224         if(tokenizer.get_last_token()!=";" || !tokenizer.get_progress_mark())
 225         {
 226                 unsigned scope_level = 0;
 227                 while(1)
 228                 {
 229                         if(tokenizer.peek_token()=="}" && scope_level==0)
 230                         {
 231                                 if(!tokenizer.get_progress_mark())
 232                                         tokenizer.parse_token();
 233                                 break;
 234                         }
 235
 236                         string token = tokenizer.parse_token();
 237                         if(token=="}")
 238                         {
 239                                 --scope_level;
 240                                 if(scope_level==0)
 241                                         break;
 242                         }
 243                         else if(token=="{")
 244                                 ++scope_level;
 245                         else if(token==";" && scope_level==0)
 246                                 break;
 247                         else if(token.empty())
 248                                 break;
 249                 }
 250         }
 251
 252         return RefPtr<T>();
 253 }
 254
 255 RefPtr<Statement> Parser::parse_global_declaration()
 256 {
 257         string token = tokenizer.peek_token();
 258         SetFlag disallow(allow_stage_change, false);
 259
 260         if(token=="import")
 261                 return parse_import();
 262         else if(token=="precision")
 263                 return parse_precision();
 264         else if(token=="layout")
 265         {
 266                 RefPtr<Layout> layout = parse_layout();
 267                 token = tokenizer.peek_token();
 268                 if(is_interface_qualifier(token) && tokenizer.peek_token(1)==";")
 269                 {
 270                         RefPtr<InterfaceLayout> iface_lo = create_node<InterfaceLayout>();
 271                         iface_lo->layout.qualifiers = layout->qualifiers;
 272                         iface_lo->interface = tokenizer.parse_token();
 273                         tokenizer.expect(";");
 274                         return iface_lo;
 275                 }
 276                 else
 277                 {
 278                         RefPtr<VariableDeclaration> var = parse_variable_declaration();
 279                         var->layout = layout;
 280                         return var;
 281                 }
 282         }
 283         else if(token=="typedef")
 284                 return parse_type_declaration();
 285         else if(token=="struct")
 286                 return parse_struct_declaration();
 287         else if(is_interface_qualifier(token))
 288         {
 289                 string next = tokenizer.peek_token(1);
 290                 if(is_type(next) || is_qualifier(next))
 291                         return parse_variable_declaration();
 292                 else
 293                         return parse_interface_block();
 294         }
 295         else if(is_qualifier(token))
 296                 return parse_variable_declaration();
 297         else if(is_type(token))
 298         {
 299                 if(tokenizer.peek_token(2)=="(")
 300                         return parse_function_declaration();
 301                 else
 302                         return parse_variable_declaration();
 303         }
 304         else if(token.empty())
 305                 return 0;
 306         else
 307                 throw parse_error(tokenizer.get_location(), token, "a global declaration");
 308 }
 309
 310 RefPtr<Statement> Parser::parse_statement()
 311 {
 312         string token = tokenizer.peek_token();
 313         if(token=="if")
 314                 return parse_conditional();
 315         else if(token=="for")
 316                 return parse_for();
 317         else if(token=="while")
 318                 return parse_while();
 319         else if(token=="passthrough")
 320                 return parse_passthrough();
 321         else if(token=="return")
 322                 return parse_return();
 323         else if(token=="break" || token=="continue" || token=="discard")
 324         {
 325                 RefPtr<Jump> jump = create_node<Jump>();
 326                 jump->keyword = tokenizer.parse_token();
 327                 tokenizer.expect(";");
 328
 329                 return jump;
 330         }
 331         else if(is_qualifier(token) || is_type(token))
 332                 return parse_variable_declaration();
 333         else if(token==";")
 334         {
 335                 tokenizer.parse_token();
 336                 throw invalid_shader_source(tokenizer.get_location(), "Empty statement not allowed");
 337         }
 338         else if(!token.empty())
 339         {
 340                 RefPtr<ExpressionStatement> expr = create_node<ExpressionStatement>();
 341                 expr->expression = parse_expression();
 342                 tokenizer.expect(";");
 343
 344                 return expr;
 345         }
 346         else
 347                 throw parse_error(tokenizer.get_location(), token, "a statement");
 348 }
 349
 350 RefPtr<Import> Parser::parse_import()
 351 {
 352         if(cur_stage->type!=Stage::SHARED)
 353                 throw invalid_shader_source(tokenizer.get_location(), "Imports are only allowed in the shared section");
 354
 355         tokenizer.expect("import");
 356         RefPtr<Import> import = create_node<Import>();
 357         import->module = expect_identifier();
 358         tokenizer.expect(";");
 359         return import;
 360 }
 361
 362 RefPtr<Precision> Parser::parse_precision()
 363 {
 364         tokenizer.expect("precision");
 365         RefPtr<Precision> precision = create_node<Precision>();
 366
 367         precision->precision = tokenizer.parse_token();
 368         if(!is_precision_qualifier(precision->precision))
 369                 throw parse_error(tokenizer.get_location(), precision->precision, "a precision qualifier");
 370
 371         // TODO Add validation for this
 372         precision->type = expect_type();
 373
 374         tokenizer.expect(";");
 375
 376         return precision;
 377 }
 378
 379 RefPtr<Layout> Parser::parse_layout()
 380 {
 381         tokenizer.expect("layout");
 382         tokenizer.expect("(");
 383         RefPtr<Layout> layout = create_node<Layout>();
 384         while(1)
 385         {
 386                 string token = tokenizer.parse_token();
 387                 if(token==")")
 388                         throw parse_error(tokenizer.get_location(), token, "a layout qualifier name");
 389
 390                 layout->qualifiers.push_back(Layout::Qualifier());
 391                 Layout::Qualifier &qual = layout->qualifiers.back();
 392                 qual.name = token;
 393
 394                 if((qual.has_value = check("=")))
 395                 {
 396                         if(qual.name=="constant_id" && tokenizer.peek_token()=="auto")
 397                         {
 398                                 qual.value = -1;
 399                                 tokenizer.parse_token();
 400                         }
 401                         else
 402                                 qual.value = expect_integer();
 403                 }
 404
 405                 if(tokenizer.peek_token()==")")
 406                         break;
 407
 408                 tokenizer.expect(",");
 409         }
 410         tokenizer.expect(")");
 411
 412         return layout;
 413 }
 414
 415 template<typename T>
 416 void Parser::parse_block(Block &block, bool require_braces, RefPtr<T> (Parser::*parse_content)())
 417 {
 418         bool have_braces = (require_braces || tokenizer.peek_token()=="{");
 419         if(have_braces)
 420                 tokenizer.expect("{");
 421
 422         if(have_braces)
 423         {
 424                 while(tokenizer.peek_token()!="}")
 425                         if(RefPtr<Statement> node = parse_with_recovery(parse_content))
 426                                 block.body.push_back(node);
 427         }
 428         else
 429                 block.body.push_back((this->*parse_content)());
 430
 431         block.use_braces = (require_braces || block.body.size()!=1);
 432
 433         if(have_braces)
 434                 tokenizer.expect("}");
 435 }
 436
 437 RefPtr<Expression> Parser::parse_expression(const Operator *outer_oper)
 438 {
 439         unsigned outer_precedence = (outer_oper ? outer_oper->precedence+(outer_oper->assoc==Operator::RIGHT_TO_LEFT) : 20);
 440         RefPtr<Expression> left;
 441         VariableReference *left_var = 0;
 442         while(1)
 443         {
 444                 string token = tokenizer.peek_token();
 445
 446                 const Operator *oper = 0;
 447                 for(const Operator *i=Operator::operators; (!oper && i->type); ++i)
 448                         if(token==i->token && (!left || i->type!=Operator::PREFIX) && (left || i->type!=Operator::POSTFIX))
 449                                 oper = i;
 450
 451                 bool lower_precedence = (oper && oper->type!=Operator::PREFIX && oper->precedence>=outer_precedence);
 452                 if(token==";" || token==")" || token=="]" || token=="," || token==":" || lower_precedence)
 453                 {
 454                         if(left)
 455                                 return left;
 456                         else
 457                                 throw parse_error(tokenizer.get_location(), token, "an expression");
 458                 }
 459                 else if(left)
 460                 {
 461                         if(token=="(")
 462                         {
 463                                 if(!left_var)
 464                                         throw invalid_shader_source(tokenizer.get_location(), "Syntax error before '(': function name must be an identifier");
 465                                 left = parse_function_call(*left_var);
 466                         }
 467                         else if(token==".")
 468                         {
 469                                 RefPtr<MemberAccess> memacc = create_node<MemberAccess>();
 470                                 memacc->left = left;
 471                                 memacc->oper = oper;
 472                                 tokenizer.parse_token();
 473                                 memacc->member = expect_identifier();
 474                                 left = memacc;
 475                         }
 476                         else if(oper && oper->type==Operator::POSTFIX)
 477                         {
 478                                 RefPtr<UnaryExpression> unary = create_node<UnaryExpression>();
 479                                 unary->oper = oper;
 480                                 tokenizer.parse_token();
 481                                 unary->expression = left;
 482                                 left = unary;
 483                         }
 484                         else if(oper && oper->type==Operator::BINARY)
 485                                 left = parse_binary(left, *oper);
 486                         else if(oper && oper->type==Operator::TERNARY)
 487                                 left = parse_ternary(left, *oper);
 488                         else
 489                                 throw parse_error(tokenizer.get_location(), token, "an operator");
 490                         left_var = 0;
 491                 }
 492                 else
 493                 {
 494                         if(token=="(")
 495                         {
 496                                 tokenizer.parse_token();
 497                                 RefPtr<ParenthesizedExpression> parexpr = create_node<ParenthesizedExpression>();
 498                                 parexpr->expression = parse_expression();
 499                                 tokenizer.expect(")");
 500                                 left = parexpr;
 501                         }
 502                         else if(isdigit(token[0]) || token=="true" || token=="false")
 503                                 left = parse_literal();
 504                         else if(is_identifier(token))
 505                         {
 506                                 RefPtr<VariableReference> var = create_node<VariableReference>();
 507                                 var->name = expect_identifier();
 508                                 left = var;
 509                                 left_var = var.get();
 510                         }
 511                         else if(oper && oper->type==Operator::PREFIX)
 512                         {
 513                                 RefPtr<UnaryExpression> unary = create_node<UnaryExpression>();
 514                                 unary->oper = oper;
 515                                 tokenizer.parse_token();
 516                                 unary->expression = parse_expression(oper);
 517                                 left = unary;
 518                         }
 519                         else
 520                                 throw parse_error(tokenizer.get_location(), token, "an expression");
 521                 }
 522         }
 523 }
 524
 525 RefPtr<Literal> Parser::parse_literal()
 526 {
 527         RefPtr<Literal> literal = create_node<Literal>();
 528         literal->token = tokenizer.parse_token();
 529         if(isdigit(literal->token[0]))
 530         {
 531                 // TODO have the tokenizer return the type of the token
 532                 if(isnumrc(literal->token))
 533                         literal->value = lexical_cast<int>(literal->token);
 534                 else
 535                         literal->value = lexical_cast<float>(literal->token);
 536         }
 537         else if(literal->token=="true" || literal->token=="false")
 538                 literal->value = (literal->token=="true");
 539         else
 540                 throw parse_error(tokenizer.get_location(), literal->token, "a literal");
 541
 542         return literal;
 543 }
 544
 545 RefPtr<BinaryExpression> Parser::parse_binary(const RefPtr<Expression> &left, const Operator &oper)
 546 {
 547         RefPtr<BinaryExpression> binary = (oper.precedence==16 ?
 548                 static_cast<RefPtr<BinaryExpression> >(create_node<Assignment>()) : create_node<BinaryExpression>());
 549         binary->left = left;
 550         binary->oper = &oper;
 551         tokenizer.expect(oper.token);
 552         if(oper.token[0]=='[')
 553         {
 554                 binary->right = parse_expression();
 555                 tokenizer.expect("]");
 556         }
 557         else
 558                 binary->right = parse_expression(&oper);
 559         return binary;
 560 }
 561
 562 RefPtr<TernaryExpression> Parser::parse_ternary(const RefPtr<Expression> &cond, const Operator &oper)
 563 {
 564         RefPtr<TernaryExpression> ternary = create_node<TernaryExpression>();
 565         ternary->condition = cond;
 566         ternary->oper = &oper;
 567         tokenizer.expect("?");
 568         ternary->true_expr = parse_expression(&oper);
 569         tokenizer.expect(":");
 570         ternary->false_expr = parse_expression(&oper);
 571         return ternary;
 572 }
 573
 574 RefPtr<FunctionCall> Parser::parse_function_call(const VariableReference &var)
 575 {
 576         RefPtr<FunctionCall> call = create_node<FunctionCall>();
 577         call->name = var.name;
 578         call->constructor = is_type(call->name);
 579         call->oper = &Operator::get_operator("(", Operator::POSTFIX);
 580         tokenizer.expect("(");
 581         while(tokenizer.peek_token()!=")")
 582         {
 583                 if(!call->arguments.empty())
 584                         tokenizer.expect(",");
 585                 call->arguments.push_back(parse_expression());
 586         }
 587         tokenizer.expect(")");
 588         return call;
 589 }
 590
 591 RefPtr<TypeDeclaration> Parser::parse_type_declaration()
 592 {
 593         tokenizer.expect("typedef");
 594
 595         RefPtr<TypeDeclaration> type;
 596         if(tokenizer.peek_token()=="image")
 597                 type = parse_image_type_declaration();
 598         else
 599                 type = parse_basic_type_declaration();
 600
 601         tokenizer.expect(";");
 602         declared_types.insert(type->name);
 603         return type;
 604 }
 605
 606 RefPtr<BasicTypeDeclaration> Parser::parse_basic_type_declaration()
 607 {
 608         RefPtr<BasicTypeDeclaration> type = create_node<BasicTypeDeclaration>();
 609
 610         if(tokenizer.peek_token()=="vector")
 611         {
 612                 type->kind = BasicTypeDeclaration::VECTOR;
 613
 614                 tokenizer.parse_token();
 615                 tokenizer.expect("(");
 616                 type->size = expect_integer();
 617                 tokenizer.expect(")");
 618         }
 619
 620         type->base = expect_type();
 621         type->name = expect_identifier();
 622
 623         if(type->kind==BasicTypeDeclaration::ALIAS && check("["))
 624         {
 625                 type->kind = BasicTypeDeclaration::ARRAY;
 626                 tokenizer.expect("]");
 627         }
 628
 629         return type;
 630 }
 631
 632 RefPtr<ImageTypeDeclaration> Parser::parse_image_type_declaration()
 633 {
 634         tokenizer.expect("image");
 635         tokenizer.expect("(");
 636
 637         RefPtr<ImageTypeDeclaration> type = create_node<ImageTypeDeclaration>();
 638         while(1)
 639         {
 640                 string token = tokenizer.parse_token();
 641                 if(token=="dimensions")
 642                 {
 643                         tokenizer.expect("=");
 644                         token = tokenizer.parse_token();
 645                         if(token=="1")
 646                                 type->dimensions = ImageTypeDeclaration::ONE;
 647                         else if(token=="2")
 648                                 type->dimensions = ImageTypeDeclaration::TWO;
 649                         else if(token=="3")
 650                                 type->dimensions = ImageTypeDeclaration::THREE;
 651                         else if(token=="cube")
 652                                 type->dimensions = ImageTypeDeclaration::CUBE;
 653                         else
 654                                 throw parse_error(tokenizer.get_location(), token, "dimensions");
 655
 656                         if(check("["))
 657                         {
 658                                 type->array = true;
 659                                 tokenizer.expect("]");
 660                         }
 661                 }
 662                 else if(token=="sampled")
 663                         type->sampled = true;
 664                 else if(token=="shadow")
 665                         type->shadow = true;
 666                 else
 667                         throw parse_error(tokenizer.get_location(), token, "image type attribute");
 668
 669                 token = tokenizer.peek_token();
 670                 if(token==")")
 671                         break;
 672
 673                 tokenizer.expect(",");
 674         }
 675         tokenizer.expect(")");
 676
 677         type->base = expect_type();
 678         type->name = expect_identifier();
 679
 680         return type;
 681 }
 682
 683 RefPtr<StructDeclaration> Parser::parse_struct_declaration()
 684 {
 685         tokenizer.expect("struct");
 686         RefPtr<StructDeclaration> strct = create_node<StructDeclaration>();
 687
 688         strct->name = expect_identifier();
 689         parse_block(strct->members, true, &Parser::parse_variable_declaration);
 690         tokenizer.expect(";");
 691
 692         declared_types.insert(strct->name);
 693         return strct;
 694 }
 695
 696 RefPtr<VariableDeclaration> Parser::parse_variable_declaration()
 697 {
 698         RefPtr<VariableDeclaration> var = create_node<VariableDeclaration>();
 699
 700         string token = tokenizer.peek_token();
 701         while(is_qualifier(token))
 702         {
 703                 tokenizer.parse_token();
 704                 if(is_interface_qualifier(token))
 705                         var->interface = token;
 706                 else if(is_sampling_qualifier(token))
 707                         var->sampling = token;
 708                 else if(is_interpolation_qualifier(token))
 709                         var->interpolation = token;
 710                 else if(is_precision_qualifier(token))
 711                         var->precision = token;
 712                 else if(token=="const")
 713                         var->constant = true;
 714                 token = tokenizer.peek_token();
 715         }
 716
 717         var->type = expect_type();
 718         var->name = expect_identifier();
 719
 720         if(check("["))
 721         {
 722                 var->array = true;
 723                 if(!check("]"))
 724                 {
 725                         var->array_size = parse_expression();
 726                         tokenizer.expect("]");
 727                 }
 728         }
 729
 730         if(check("="))
 731                 var->init_expression = parse_expression();
 732
 733         tokenizer.expect(";");
 734         return var;
 735 }
 736
 737 RefPtr<VariableDeclaration> Parser::parse_variable_declaration_with_layout()
 738 {
 739         RefPtr<Layout> layout;
 740         if(tokenizer.peek_token()=="layout")
 741                 layout = parse_layout();
 742
 743         RefPtr<VariableDeclaration> var = parse_variable_declaration();
 744         var->layout = layout;
 745
 746         return var;
 747 }
 748
 749 RefPtr<FunctionDeclaration> Parser::parse_function_declaration()
 750 {
 751         RefPtr<FunctionDeclaration> func = create_node<FunctionDeclaration>();
 752
 753         func->return_type = expect_type();
 754         func->name = expect_identifier();
 755         tokenizer.expect("(");
 756         while(tokenizer.peek_token()!=")")
 757         {
 758                 if(!func->parameters.empty())
 759                         tokenizer.expect(",");
 760
 761                 RefPtr<VariableDeclaration> var = create_node<VariableDeclaration>();
 762                 string token = tokenizer.peek_token();
 763                 if(token=="in" || token=="out" || token=="inout")
 764                         var->interface = tokenizer.parse_token();
 765                 var->type = expect_type();
 766                 var->name = expect_identifier();
 767                 func->parameters.push_back(var);
 768         }
 769         tokenizer.expect(")");
 770
 771         string token = tokenizer.peek_token();
 772         if(token=="{")
 773         {
 774                 func->definition = func.get();
 775                 parse_block(func->body, true, &Parser::parse_statement);
 776         }
 777         else if(token==";")
 778                 tokenizer.parse_token();
 779         else
 780                 throw parse_error(tokenizer.get_location(), token, "'{' or ';'");
 781
 782         return func;
 783 }
 784
 785 RefPtr<InterfaceBlock> Parser::parse_interface_block()
 786 {
 787         RefPtr<InterfaceBlock> iface = create_node<InterfaceBlock>();
 788
 789         iface->interface = tokenizer.parse_token();
 790         if(!is_interface_qualifier(iface->interface))
 791                 throw parse_error(tokenizer.get_location(), iface->interface, "an interface qualifier");
 792
 793         iface->name = expect_identifier();
 794         iface->members = new Block;
 795         parse_block(*iface->members, true, &Parser::parse_variable_declaration_with_layout);
 796         if(!check(";"))
 797         {
 798                 iface->instance_name = expect_identifier();
 799                 if(check("["))
 800                 {
 801                         iface->array = true;
 802                         tokenizer.expect("]");
 803                 }
 804                 tokenizer.expect(";");
 805         }
 806
 807         return iface;
 808 }
 809
 810 RefPtr<Conditional> Parser::parse_conditional()
 811 {
 812         tokenizer.expect("if");
 813         RefPtr<Conditional> cond = create_node<Conditional>();
 814         tokenizer.expect("(");
 815         cond->condition = parse_expression();
 816         tokenizer.expect(")");
 817
 818         parse_block(cond->body, false, &Parser::parse_statement);
 819
 820         string token = tokenizer.peek_token();
 821         if(token=="else")
 822         {
 823                 tokenizer.parse_token();
 824                 parse_block(cond->else_body, false, &Parser::parse_statement);
 825         }
 826
 827         return cond;
 828 }
 829
 830 RefPtr<Iteration> Parser::parse_for()
 831 {
 832         tokenizer.expect("for");
 833         RefPtr<Iteration> loop = create_node<Iteration>();
 834         tokenizer.expect("(");
 835         string token = tokenizer.peek_token();
 836         if(is_type(token))
 837                 loop->init_statement = parse_statement();
 838         else
 839         {
 840                 if(token!=";")
 841                 {
 842                         RefPtr<ExpressionStatement> expr = create_node<ExpressionStatement>();
 843                         expr->expression = parse_expression();
 844                         loop->init_statement = expr;
 845                 }
 846                 tokenizer.expect(";");
 847         }
 848         if(tokenizer.peek_token()!=";")
 849                 loop->condition = parse_expression();
 850         tokenizer.expect(";");
 851         if(tokenizer.peek_token()!=")")
 852                 loop->loop_expression = parse_expression();
 853         tokenizer.expect(")");
 854
 855         parse_block(loop->body, false, &Parser::parse_statement);
 856
 857         return loop;
 858 }
 859
 860 RefPtr<Iteration> Parser::parse_while()
 861 {
 862         tokenizer.expect("while");
 863         RefPtr<Iteration> loop = create_node<Iteration>();
 864         tokenizer.expect("(");
 865         loop->condition = parse_expression();
 866         tokenizer.expect(")");
 867
 868         parse_block(loop->body, false, &Parser::parse_statement);
 869
 870         return loop;
 871 }
 872
 873 RefPtr<Passthrough> Parser::parse_passthrough()
 874 {
 875         tokenizer.expect("passthrough");
 876         RefPtr<Passthrough> pass = create_node<Passthrough>();
 877         if(cur_stage->type==Stage::GEOMETRY)
 878         {
 879                 tokenizer.expect("[");
 880                 pass->subscript = parse_expression();
 881                 tokenizer.expect("]");
 882         }
 883         tokenizer.expect(";");
 884         return pass;
 885 }
 886
 887 RefPtr<Return> Parser::parse_return()
 888 {
 889         tokenizer.expect("return");
 890         RefPtr<Return> ret = create_node<Return>();
 891         if(tokenizer.peek_token()!=";")
 892                 ret->expression = parse_expression();
 893         tokenizer.expect(";");
 894         return ret;
 895 }
 896
 897 } // namespace SL
 898 } // namespace GL
 899 } // namespace Msp