khanat-code-old/code/ryzom/tools/pd_parser/parser_rules.cpp
2014-02-07 19:29:36 -08:00

566 lines
9.3 KiB
C++

// Ryzom - MMORPG Framework <http://dev.ryzom.com/projects/ryzom/>
// Copyright (C) 2010 Winch Gate Property Limited
//
// This program is free software: you can redistribute it and/or modify
// it under the terms of the GNU Affero General Public License as
// published by the Free Software Foundation, either version 3 of the
// License, or (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU Affero General Public License for more details.
//
// You should have received a copy of the GNU Affero General Public License
// along with this program. If not, see <http://www.gnu.org/licenses/>.
#include "parser_rules.h"
/*
* Main Bloc
*/
PARSE_START_NO_DESCRIPTION(Main, CParseNode)
while (!tokenizer.end())
{
PARSE_MARK
PARSE_ALTERNATIVE(Db)
PARSE_FAIL
}
PARSE_END
/*
* Db Bloc
*/
PARSE_START(Db, CDbNode)
PARSE_KEYWORD(Db)
PARSE_MARK
PARSE_IDENTIFIER(Name)
PARSE_MARK
PARSE_OPT_KEYWORD_IN(String, MainFile);
PARSE_START_BLOC
PARSE_MARK
PARSE_ALTERNATIVE(File)
PARSE_ALTERNATIVE(UsePch)
PARSE_FAIL
PARSE_MARK
PARSE_END_BLOC
PARSE_MARK
PARSE_END
/*
* File Bloc
*/
PARSE_START(File, CFileNode)
PARSE_OPT_BEFORE(File)
PARSE_OPT_IN(Separated, SeparatedFlag);
PARSE_END_OPT_BEFORE()
PARSE_KEYWORD(File)
PARSE_MARK
PARSE_STRING(Name)
PARSE_MARK
main->IncludeAs = main->Name;
PARSE_OPT_KEYWORD_IN(String, IncludeAs);
PARSE_START_BLOC
PARSE_MARK
PARSE_ALTERNATIVE(Include)
PARSE_ALTERNATIVE(Type)
PARSE_ALTERNATIVE(Class)
PARSE_ALTERNATIVE(Enum)
PARSE_ALTERNATIVE(Dimension)
//PARSE_ALTERNATIVE(CppCode)
PARSE_ALTERNATIVE(LogMsg)
PARSE_ALTERNATIVE(LogContext)
PARSE_FAIL
PARSE_MARK
PARSE_END_BLOC
PARSE_MARK
PARSE_END
/*
* Include Bloc
*/
PARSE_START(Include, CIncludeNode)
PARSE_KEYWORD(Include)
PARSE_MARK
PARSE_STRING(Name)
PARSE_MARK
PARSE_END
/*
* Include Bloc
*/
PARSE_START(UsePch, CUsePchNode)
PARSE_KEYWORD(UsePch)
PARSE_MARK
PARSE_STRING(Name)
PARSE_MARK
PARSE_END
/*
* Cpp Code Bloc
*/
PARSE_START(CppCode, CCppCodeNode)
PARSE_OPT_KEYWORD_IN(Identifier, Name)
PARSE_KEYWORD_IN(CppCode, RawCode)
PARSE_MARK
PARSE_END
/*
* Type Bloc
*/
PARSE_START(Type, CTypeNode)
PARSE_OPT_BEFORE(Type)
PARSE_OPT_IN(Extern, ExternFlag);
PARSE_END_OPT_BEFORE()
PARSE_KEYWORD(Type)
PARSE_MARK
if (main->ExternFlag)
{
PARSE_SCOPE_IDF(Name)
}
else
{
PARSE_IDENTIFIER(Name)
}
main->DisplayName = main->Name;
PARSE_MARK
if (tokenizer.current() == TokenOpenParenthesis)
{
tokenizer.next();
PARSE_MARK
PARSE_IDENTIFIER(CppType)
PARSE_MARK
PARSE_KEYWORD(Comma)
PARSE_MARK
PARSE_IDENTIFIER(StorageType)
PARSE_MARK
PARSE_KEYWORD(CloseParenthesis)
PARSE_MARK
if (tokenizer.current() == TokenOpenBrace)
{
tokenizer.next();
PARSE_MARK
PARSE_IDENTIFIER(Temp)
if (main->Temp == main->CppType)
{
PARSE_MARK
PARSE_KEYWORD(OpenParenthesis)
PARSE_MARK
PARSE_IDENTIFIER(Temp)
if (main->Temp != main->StorageType)
PARSE_FAIL
PARSE_MARK
PARSE_KEYWORD(CloseParenthesis)
PARSE_MARK
PARSE_NODE(CppCode, ToCppType)
PARSE_MARK
}
else if (main->Temp == main->StorageType)
{
PARSE_MARK
PARSE_KEYWORD(OpenParenthesis)
PARSE_MARK
PARSE_IDENTIFIER(Temp)
if (main->Temp != main->CppType)
PARSE_FAIL
PARSE_MARK
PARSE_KEYWORD(CloseParenthesis)
PARSE_MARK
PARSE_NODE(CppCode, ToStorageType)
PARSE_MARK
}
else
PARSE_FAIL
if (tokenizer.current() != TokenCloseBrace)
{
PARSE_IDENTIFIER(Temp)
PARSE_MARK
if (main->Temp == main->CppType && main->ToCppType == NULL)
{
PARSE_MARK
PARSE_KEYWORD(OpenParenthesis)
PARSE_MARK
PARSE_IDENTIFIER(Temp)
if (main->Temp != main->StorageType)
PARSE_FAIL
PARSE_MARK
PARSE_KEYWORD(CloseParenthesis)
PARSE_MARK
PARSE_NODE(CppCode, ToCppType)
PARSE_MARK
}
else if (main->Temp == main->StorageType && main->ToStorageType == NULL)
{
PARSE_MARK
PARSE_KEYWORD(OpenParenthesis)
PARSE_MARK
PARSE_IDENTIFIER(Temp)
if (main->Temp != main->CppType)
PARSE_FAIL
PARSE_MARK
PARSE_KEYWORD(CloseParenthesis)
PARSE_MARK
PARSE_NODE(CppCode, ToStorageType)
PARSE_MARK
}
else
PARSE_FAIL
}
PARSE_KEYWORD(CloseBrace)
}
else
{
PARSE_KEYWORD(SemiColon)
}
}
else
{
PARSE_IDENTIFIER(CppType)
main->StorageType = main->CppType;
PARSE_MARK
PARSE_KEYWORD(SemiColon)
}
PARSE_MARK
PARSE_END
/*
* Class Bloc
*/
PARSE_START(Class, CClassNode)
PARSE_OPT_BEFORE(Class)
PARSE_OPT_IN(Mapped, MappedFlag);
PARSE_OPT_IN(Derived, DerivatedFlag);
PARSE_END_OPT_BEFORE()
PARSE_KEYWORD(Class)
PARSE_MARK
PARSE_IDENTIFIER(Name)
PARSE_MARK
PARSE_OPT(Colon)
PARSE_MARK
PARSE_IDENTIFIER(Inherited)
PARSE_MARK
PARSE_END_OPT
PARSE_OPT(Key)
PARSE_MARK
PARSE_KEYWORD(OpenParenthesis)
PARSE_MARK
PARSE_IDENTIFIER(ClassKey)
PARSE_MARK
PARSE_KEYWORD(CloseParenthesis)
PARSE_MARK
PARSE_END_OPT
PARSE_OPT(Implements)
PARSE_MARK
PARSE_IDENTIFIER(Implements)
PARSE_MARK
PARSE_END_OPT
PARSE_OPT(Reserve)
PARSE_MARK
PARSE_KEYWORD(OpenParenthesis)
PARSE_MARK
PARSE_IDENTIFIER(Reserve)
PARSE_MARK
PARSE_KEYWORD(CloseParenthesis)
PARSE_MARK
PARSE_END_OPT
PARSE_START_BLOC
PARSE_MARK
PARSE_ALTERNATIVE(CppCode)
PARSE_ALTERNATIVE(Declaration)
PARSE_FAIL
PARSE_MARK
PARSE_END_BLOC
PARSE_MARK
PARSE_END
/*
* Declaration Bloc
*/
PARSE_START(Declaration, CDeclarationNode)
PARSE_OPT_BEFORE_2(Identifier, ScopedIdentifier)
PARSE_OPT_IN(WriteTrigger, WriteTriggerFlag);
PARSE_OPT_IN(InitFill, InitFillFlag);
PARSE_OPT_IN(Parent, ParentFlag);
PARSE_OPT_IN(Hidden, HiddenFlag);
PARSE_OPT_IN(Mirrored, MirroredFlag);
PARSE_END_OPT_BEFORE()
if (main->ParentFlag)
{
PARSE_IDENTIFIER(ParentClass);
PARSE_MARK
PARSE_KEYWORD(Colon)
PARSE_MARK
PARSE_IDENTIFIER(ParentField);
PARSE_MARK
PARSE_IDENTIFIER(Name);
PARSE_MARK
}
else
{
PARSE_SCOPE_IDF(Type);
PARSE_MARK
PARSE_OPT(Colon)
PARSE_MARK
PARSE_IDENTIFIER(ForwardRefAttribute);
PARSE_MARK
PARSE_END_OPT
PARSE_OPT(OpenBracket)
PARSE_MARK
PARSE_IDENTIFIER(ArrayIndex);
PARSE_MARK
main->ArrayFlag = true;
PARSE_KEYWORD(CloseBracket)
PARSE_MARK
PARSE_IDENTIFIER(Name);
PARSE_MARK
PARSE_NEXT_OPT(LessThan)
main->SetFlag = true;
PARSE_MARK
PARSE_KEYWORD(GreaterThan)
PARSE_MARK
PARSE_IDENTIFIER(Name);
PARSE_MARK
PARSE_LAST_OPT
PARSE_IDENTIFIER(Name);
PARSE_MARK
PARSE_OPT(Equal)
//PARSE_VALUE(DefaultValue)
PARSE_KEYWORD_IN(CppCode, DefaultValue)
PARSE_END_OPT
PARSE_END_OPT
}
if (tokenizer.current() == TokenOpenBrace)
{
PARSE_START_BLOC
PARSE_MARK
CDeclarationNode::CUserCode UCode;
PARSE_KEYWORD_IN_TEMP(Identifier, UCode.Event)
PARSE_OPT_LIST(OpenParenthesis, CloseParenthesis)
std::string UCodeAtom;
PARSE_KEYWORD_IN_TEMP(Identifier, UCodeAtom)
if (!UCode.CodeSpecializer.empty())
UCode.CodeSpecializer += ".";
UCode.CodeSpecializer += UCodeAtom;
PARSE_END_OPT_LIST(CloseParenthesis, Dot)
PARSE_KEYWORD_IN_TEMP(CppCode, UCode.UserCode)
main->UserCodes.push_back(UCode);
PARSE_MARK
PARSE_END_BLOC
}
else
{
PARSE_KEYWORD(SemiColon);
}
PARSE_MARK
PARSE_END
/*
* Enum Bloc
*/
PARSE_START(Enum, CEnumNode)
PARSE_KEYWORD(Enum)
PARSE_MARK
PARSE_IDENTIFIER(Name)
PARSE_START_LIST(OpenBrace, CloseBrace)
PARSE_MARK
PARSE_ALTERNATIVE(EnumRange)
PARSE_ALTERNATIVE(EnumSimpleValue)
PARSE_FAIL
PARSE_MARK
PARSE_END_LIST(CloseBrace, Comma)
PARSE_OPT_KEYWORD_IN(Identifier, EndRange)
PARSE_MARK
PARSE_END
//
PARSE_START(EnumSimpleValue, CEnumSimpleValueNode)
PARSE_LIST_KEYWORDS(Identifier, Names, Or)
PARSE_END
//
PARSE_START(EnumRange, CEnumRangeNode)
PARSE_IDENTIFIER(Name)
PARSE_START_LIST(OpenBrace, CloseBrace)
PARSE_MARK
PARSE_ALTERNATIVE(EnumRange)
PARSE_ALTERNATIVE(EnumSimpleValue)
PARSE_FAIL
PARSE_MARK
PARSE_END_LIST(CloseBrace, Comma)
PARSE_MARK
PARSE_OPT_KEYWORD_IN(Identifier, EndRange)
PARSE_MARK
PARSE_END
/*
* Dimension Bloc
*/
PARSE_START(Dimension, CDimensionNode)
PARSE_KEYWORD(Dimension)
PARSE_MARK
PARSE_IDENTIFIER(Name)
PARSE_MARK
PARSE_INT(Dimension)
PARSE_MARK
PARSE_KEYWORD(SemiColon);
PARSE_MARK
PARSE_END
/*
* LogMsg Bloc
*/
PARSE_START(LogMsg, CLogMsgNode)
PARSE_KEYWORD(LogMsg)
PARSE_MARK
PARSE_IDENTIFIER(Name)
PARSE_MARK
PARSE_KEYWORD(OpenParenthesis)
PARSE_MARK
PARSE_LIST_2_KEYWORDS(Identifier, Identifier, Params, Comma)
PARSE_KEYWORD(CloseParenthesis)
PARSE_MARK
PARSE_KEYWORD(OpenBrace)
PARSE_MARK
PARSE_LIST_KEYWORDS(String, Logs, Comma)
PARSE_MARK
PARSE_KEYWORD(CloseBrace)
PARSE_MARK
PARSE_END
PARSE_START(LogContext, CLogMsgNode)
PARSE_KEYWORD(LogContext)
PARSE_MARK
PARSE_IDENTIFIER(Name)
PARSE_MARK
main->Context = true;
PARSE_KEYWORD(OpenParenthesis)
PARSE_MARK
PARSE_LIST_2_KEYWORDS(Identifier, Identifier, Params, Comma)
PARSE_KEYWORD(CloseParenthesis)
PARSE_MARK
PARSE_KEYWORD(OpenBrace)
PARSE_MARK
PARSE_LIST_KEYWORDS(String, Logs, Comma)
PARSE_MARK
PARSE_KEYWORD(CloseBrace)
PARSE_MARK
PARSE_END