diff options
Diffstat (limited to 'xfa/src/fxfa/src/fm2js/xfa_fmparse.cpp')
| -rw-r--r-- | xfa/src/fxfa/src/fm2js/xfa_fmparse.cpp | 2092 |
1 files changed, 1051 insertions, 1041 deletions
diff --git a/xfa/src/fxfa/src/fm2js/xfa_fmparse.cpp b/xfa/src/fxfa/src/fm2js/xfa_fmparse.cpp index 768c080123..6186da1abd 100644 --- a/xfa/src/fxfa/src/fm2js/xfa_fmparse.cpp +++ b/xfa/src/fxfa/src/fm2js/xfa_fmparse.cpp @@ -5,1141 +5,1151 @@ // Original code copyright 2014 Foxit Software Inc. http://www.foxitsoftware.com
#include "xfa_fm2js.h"
-CXFA_FMParse::CXFA_FMParse()
-{
- m_pScript = 0;
- m_uLength = 0;
- m_pErrorInfo = 0;
- m_lexer = 0;
- m_pToken = 0;
+CXFA_FMParse::CXFA_FMParse() {
+ m_pScript = 0;
+ m_uLength = 0;
+ m_pErrorInfo = 0;
+ m_lexer = 0;
+ m_pToken = 0;
}
-CXFA_FMParse::~CXFA_FMParse()
-{
- if (m_lexer) {
- delete m_lexer;
- }
- m_lexer = 0;
- m_pErrorInfo = 0;
- m_pScript = 0;
- m_pToken = 0;
+CXFA_FMParse::~CXFA_FMParse() {
+ if (m_lexer) {
+ delete m_lexer;
+ }
+ m_lexer = 0;
+ m_pErrorInfo = 0;
+ m_pScript = 0;
+ m_pToken = 0;
}
-int32_t CXFA_FMParse::Init(const CFX_WideStringC& wsFormcalc, CXFA_FMErrorInfo *pErrorInfo)
-{
- m_pScript = wsFormcalc.GetPtr();
- m_uLength = wsFormcalc.GetLength();
- m_pErrorInfo = pErrorInfo;
- m_lexer = FX_NEW CXFA_FMLexer(wsFormcalc, m_pErrorInfo);
- if (m_lexer == 0) {
- return -1;
- }
- return 0;
+int32_t CXFA_FMParse::Init(const CFX_WideStringC& wsFormcalc,
+ CXFA_FMErrorInfo* pErrorInfo) {
+ m_pScript = wsFormcalc.GetPtr();
+ m_uLength = wsFormcalc.GetLength();
+ m_pErrorInfo = pErrorInfo;
+ m_lexer = FX_NEW CXFA_FMLexer(wsFormcalc, m_pErrorInfo);
+ if (m_lexer == 0) {
+ return -1;
+ }
+ return 0;
}
-void CXFA_FMParse::NextToken()
-{
- m_pToken = m_lexer->NextToken();
- while (m_pToken->m_type == TOKreserver) {
- if (m_lexer->HasError()) {
- break;
- }
- m_pToken = m_lexer->NextToken();
+void CXFA_FMParse::NextToken() {
+ m_pToken = m_lexer->NextToken();
+ while (m_pToken->m_type == TOKreserver) {
+ if (m_lexer->HasError()) {
+ break;
}
+ m_pToken = m_lexer->NextToken();
+ }
}
-void CXFA_FMParse::Check( XFA_FM_TOKEN op )
-{
- if (m_pToken->m_type != op) {
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN, XFA_FM_KeywordToString(op), ws_TempString.c_str());
- }
- NextToken();
+void CXFA_FMParse::Check(XFA_FM_TOKEN op) {
+ if (m_pToken->m_type != op) {
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN,
+ XFA_FM_KeywordToString(op), ws_TempString.c_str());
+ }
+ NextToken();
}
-void CXFA_FMParse::Error(FX_DWORD lineNum, XFA_FM_ERRMSG msg, ...)
-{
- m_pErrorInfo->linenum = lineNum;
- const FX_WCHAR* lpMessageInfo = XFA_FM_ErrorMsg(msg);
- va_list ap;
- va_start(ap, msg);
- m_pErrorInfo->message.FormatV(lpMessageInfo, ap);
- va_end(ap);
+void CXFA_FMParse::Error(FX_DWORD lineNum, XFA_FM_ERRMSG msg, ...) {
+ m_pErrorInfo->linenum = lineNum;
+ const FX_WCHAR* lpMessageInfo = XFA_FM_ErrorMsg(msg);
+ va_list ap;
+ va_start(ap, msg);
+ m_pErrorInfo->message.FormatV(lpMessageInfo, ap);
+ va_end(ap);
}
-CFX_PtrArray * CXFA_FMParse::ParseTopExpression()
-{
- CXFA_FMExpression *e = 0;
- CFX_PtrArray * expression = FX_NEW CFX_PtrArray();
- while (1) {
- if (m_pToken->m_type == TOKeof) {
- return expression;
- }
- if (m_pToken->m_type == TOKendfunc) {
- return expression;
- }
- if (m_pToken->m_type == TOKendif) {
- return expression;
- }
- if (m_pToken->m_type == TOKelseif) {
- return expression;
- }
- if (m_pToken->m_type == TOKelse) {
- return expression;
- }
- if (m_pToken->m_type == TOKfunc) {
- e = ParseFunction();
- if (e) {
- expression->Add(e);
- } else {
- break;
- }
- } else {
- e = ParseExpression();
- if (e) {
- expression->Add(e);
- } else {
- break;
- }
- }
+CFX_PtrArray* CXFA_FMParse::ParseTopExpression() {
+ CXFA_FMExpression* e = 0;
+ CFX_PtrArray* expression = FX_NEW CFX_PtrArray();
+ while (1) {
+ if (m_pToken->m_type == TOKeof) {
+ return expression;
}
- return expression;
-}
-CXFA_FMExpression * CXFA_FMParse::ParseFunction()
-{
- CXFA_FMExpression *e = 0;
- CFX_WideStringC ident;
- CFX_WideStringCArray * pArguments = 0;
- CFX_PtrArray * pExpressions = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
- NextToken();
- if (m_pToken->m_type != TOKidentifier) {
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_EXPECTED_IDENTIFIER, ws_TempString.c_str());
- } else {
- ident = m_pToken->m_wstring;
- NextToken();
+ if (m_pToken->m_type == TOKendfunc) {
+ return expression;
}
- Check(TOKlparen);
- if (m_pToken->m_type == TOKrparen) {
- NextToken();
- } else {
- pArguments = FX_NEW CFX_WideStringCArray();
- CFX_WideStringC p;
- while (1) {
- if (m_pToken->m_type == TOKidentifier) {
- p = m_pToken->m_wstring;
- pArguments->Add(p);
- NextToken();
- if (m_pToken->m_type == TOKcomma) {
- NextToken();
- continue;
- } else if (m_pToken->m_type == TOKrparen) {
- NextToken();
- break;
- } else {
- Check(TOKrparen);
- break;
- }
- } else {
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_EXPECTED_IDENTIFIER, ws_TempString.c_str());
- NextToken();
- break;
- }
- }
+ if (m_pToken->m_type == TOKendif) {
+ return expression;
}
- Check(TOKdo);
- if (m_pToken->m_type == TOKendfunc) {
- NextToken();
- } else {
- pExpressions = ParseTopExpression();
- Check(TOKendfunc);
+ if (m_pToken->m_type == TOKelseif) {
+ return expression;
}
- if (m_pErrorInfo->message.IsEmpty()) {
- e = FX_NEW CXFA_FMFunctionDefinition(line, 0, ident, pArguments, pExpressions);
- } else {
- int32_t size = 0;
- int32_t index = 0;
- if (pArguments) {
- pArguments->RemoveAll();
- delete pArguments;
- pArguments = 0;
- }
- index = 0;
- if (pExpressions) {
- CXFA_FMExpression *e1 = 0;
- size = pExpressions->GetSize();
- while(index < size) {
- e1 = (CXFA_FMExpression *)pExpressions->GetAt(index);
- delete e1;
- index++;
- }
- pExpressions->RemoveAll();
- delete pExpressions;
- pExpressions = 0;
- }
+ if (m_pToken->m_type == TOKelse) {
+ return expression;
}
- return e;
-}
-CXFA_FMExpression * CXFA_FMParse::ParseExpression()
-{
- CXFA_FMExpression *e = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
- switch (m_pToken->m_type) {
- case TOKvar:
- e = ParseVarExpression();
- break;
- case TOKnull:
- case TOKnumber:
- case TOKstring:
- case TOKplus:
- case TOKminus:
- case TOKksnot:
- case TOKidentifier:
- case TOKlparen:
- e = ParseExpExpression();
- break;
- case TOKif:
- e = ParseIfExpression();
- break;
- case TOKwhile:
- e = ParseWhileExpression();
- break;
- case TOKfor:
- e = ParseForExpression();
- break;
- case TOKforeach:
- e = ParseForeachExpression();
- break;
- case TOKdo:
- e = ParseDoExpression();
- break;
- case TOKbreak:
- e = FX_NEW CXFA_FMBreakExpression(line);
- NextToken();
- break;
- case TOKcontinue:
- e = FX_NEW CXFA_FMContinueExpression(line);
- NextToken();
- break;
- default:
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_UNEXPECTED_EXPRESSION, ws_TempString.c_str());
- NextToken();
- break;
+ if (m_pToken->m_type == TOKfunc) {
+ e = ParseFunction();
+ if (e) {
+ expression->Add(e);
+ } else {
+ break;
+ }
+ } else {
+ e = ParseExpression();
+ if (e) {
+ expression->Add(e);
+ } else {
+ break;
+ }
}
- return e;
+ }
+ return expression;
}
-CXFA_FMExpression * CXFA_FMParse::ParseVarExpression()
-{
- CXFA_FMExpression * e = 0;
- CFX_WideStringC ident;
- FX_DWORD line = m_pToken->m_uLinenum;
+CXFA_FMExpression* CXFA_FMParse::ParseFunction() {
+ CXFA_FMExpression* e = 0;
+ CFX_WideStringC ident;
+ CFX_WideStringCArray* pArguments = 0;
+ CFX_PtrArray* pExpressions = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ NextToken();
+ if (m_pToken->m_type != TOKidentifier) {
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_EXPECTED_IDENTIFIER,
+ ws_TempString.c_str());
+ } else {
+ ident = m_pToken->m_wstring;
NextToken();
- if (m_pToken->m_type != TOKidentifier) {
+ }
+ Check(TOKlparen);
+ if (m_pToken->m_type == TOKrparen) {
+ NextToken();
+ } else {
+ pArguments = FX_NEW CFX_WideStringCArray();
+ CFX_WideStringC p;
+ while (1) {
+ if (m_pToken->m_type == TOKidentifier) {
+ p = m_pToken->m_wstring;
+ pArguments->Add(p);
+ NextToken();
+ if (m_pToken->m_type == TOKcomma) {
+ NextToken();
+ continue;
+ } else if (m_pToken->m_type == TOKrparen) {
+ NextToken();
+ break;
+ } else {
+ Check(TOKrparen);
+ break;
+ }
+ } else {
CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_EXPECTED_IDENTIFIER, ws_TempString.c_str());
- } else {
- ident = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_EXPECTED_IDENTIFIER,
+ ws_TempString.c_str());
NextToken();
+ break;
+ }
}
- if( m_pToken->m_type == TOKassign) {
- NextToken();
- e = ParseExpExpression();
+ }
+ Check(TOKdo);
+ if (m_pToken->m_type == TOKendfunc) {
+ NextToken();
+ } else {
+ pExpressions = ParseTopExpression();
+ Check(TOKendfunc);
+ }
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e = FX_NEW CXFA_FMFunctionDefinition(line, 0, ident, pArguments,
+ pExpressions);
+ } else {
+ int32_t size = 0;
+ int32_t index = 0;
+ if (pArguments) {
+ pArguments->RemoveAll();
+ delete pArguments;
+ pArguments = 0;
}
+ index = 0;
+ if (pExpressions) {
+ CXFA_FMExpression* e1 = 0;
+ size = pExpressions->GetSize();
+ while (index < size) {
+ e1 = (CXFA_FMExpression*)pExpressions->GetAt(index);
+ delete e1;
+ index++;
+ }
+ pExpressions->RemoveAll();
+ delete pExpressions;
+ pExpressions = 0;
+ }
+ }
+ return e;
+}
+CXFA_FMExpression* CXFA_FMParse::ParseExpression() {
+ CXFA_FMExpression* e = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ switch (m_pToken->m_type) {
+ case TOKvar:
+ e = ParseVarExpression();
+ break;
+ case TOKnull:
+ case TOKnumber:
+ case TOKstring:
+ case TOKplus:
+ case TOKminus:
+ case TOKksnot:
+ case TOKidentifier:
+ case TOKlparen:
+ e = ParseExpExpression();
+ break;
+ case TOKif:
+ e = ParseIfExpression();
+ break;
+ case TOKwhile:
+ e = ParseWhileExpression();
+ break;
+ case TOKfor:
+ e = ParseForExpression();
+ break;
+ case TOKforeach:
+ e = ParseForeachExpression();
+ break;
+ case TOKdo:
+ e = ParseDoExpression();
+ break;
+ case TOKbreak:
+ e = FX_NEW CXFA_FMBreakExpression(line);
+ NextToken();
+ break;
+ case TOKcontinue:
+ e = FX_NEW CXFA_FMContinueExpression(line);
+ NextToken();
+ break;
+ default:
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_UNEXPECTED_EXPRESSION,
+ ws_TempString.c_str());
+ NextToken();
+ break;
+ }
+ return e;
+}
+CXFA_FMExpression* CXFA_FMParse::ParseVarExpression() {
+ CXFA_FMExpression* e = 0;
+ CFX_WideStringC ident;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ NextToken();
+ if (m_pToken->m_type != TOKidentifier) {
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_EXPECTED_IDENTIFIER,
+ ws_TempString.c_str());
+ } else {
+ ident = m_pToken->m_wstring;
+ NextToken();
+ }
+ if (m_pToken->m_type == TOKassign) {
+ NextToken();
+ e = ParseExpExpression();
+ }
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e = FX_NEW CXFA_FMVarExpression(line, ident, e);
+ } else {
+ delete e;
+ e = 0;
+ }
+ return e;
+}
+CXFA_FMSimpleExpression* CXFA_FMParse::ParseSimpleExpression() {
+ FX_DWORD line = m_pToken->m_uLinenum;
+ CXFA_FMSimpleExpression *pExp1 = 0, *pExp2 = 0;
+ pExp1 = ParseLogicalOrExpression();
+ while (m_pToken->m_type == TOKassign) {
+ NextToken();
+ pExp2 = ParseLogicalOrExpression();
if (m_pErrorInfo->message.IsEmpty()) {
- e = FX_NEW CXFA_FMVarExpression(line, ident, e);
+ pExp1 = FX_NEW CXFA_FMAssignExpression(line, TOKassign, pExp1, pExp2);
} else {
- delete e;
- e = 0;
+ delete pExp1;
+ pExp1 = 0;
}
- return e;
+ }
+ return pExp1;
}
-CXFA_FMSimpleExpression * CXFA_FMParse::ParseSimpleExpression()
-{
- FX_DWORD line = m_pToken->m_uLinenum;
- CXFA_FMSimpleExpression *pExp1 = 0, *pExp2 = 0;
- pExp1 = ParseLogicalOrExpression();
- while (m_pToken->m_type == TOKassign) {
+CXFA_FMExpression* CXFA_FMParse::ParseExpExpression() {
+ CXFA_FMExpression* e = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ CXFA_FMSimpleExpression* pExp1 = 0;
+ pExp1 = ParseSimpleExpression();
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e = FX_NEW CXFA_FMExpExpression(line, pExp1);
+ } else {
+ delete pExp1;
+ e = 0;
+ }
+ return e;
+}
+CXFA_FMSimpleExpression* CXFA_FMParse::ParseLogicalOrExpression() {
+ CXFA_FMSimpleExpression *e1 = 0, *e2 = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ e1 = ParseLogicalAndExpression();
+ for (;;) {
+ switch (m_pToken->m_type) {
+ case TOKor:
+ case TOKksor:
NextToken();
- pExp2 = ParseLogicalOrExpression();
+ e2 = ParseLogicalAndExpression();
if (m_pErrorInfo->message.IsEmpty()) {
- pExp1 = FX_NEW CXFA_FMAssignExpression(line, TOKassign, pExp1, pExp2);
+ e1 = FX_NEW CXFA_FMLogicalOrExpression(line, TOKor, e1, e2);
} else {
- delete pExp1;
- pExp1 = 0;
+ delete e1;
+ e1 = 0;
}
+ continue;
+ default:
+ break;
}
- return pExp1;
-}
-CXFA_FMExpression * CXFA_FMParse::ParseExpExpression()
-{
- CXFA_FMExpression *e = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
- CXFA_FMSimpleExpression *pExp1 = 0 ;
- pExp1 = ParseSimpleExpression();
- if (m_pErrorInfo->message.IsEmpty()) {
- e = FX_NEW CXFA_FMExpExpression(line, pExp1);
- } else {
- delete pExp1;
- e = 0;
- }
- return e;
+ break;
+ }
+ return e1;
}
-CXFA_FMSimpleExpression * CXFA_FMParse::ParseLogicalOrExpression()
-{
- CXFA_FMSimpleExpression *e1 = 0, *e2 = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
- e1 = ParseLogicalAndExpression();
- for (;;) {
- switch (m_pToken->m_type) {
- case TOKor:
- case TOKksor:
- NextToken();
- e2 = ParseLogicalAndExpression();
- if (m_pErrorInfo->message.IsEmpty()) {
- e1 = FX_NEW CXFA_FMLogicalOrExpression(line, TOKor, e1, e2);
- } else {
- delete e1;
- e1 = 0;
- }
- continue;
- default:
- break;
+CXFA_FMSimpleExpression* CXFA_FMParse::ParseLogicalAndExpression() {
+ CXFA_FMSimpleExpression *e1 = 0, *e2 = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ e1 = ParseEqualityExpression();
+ for (;;) {
+ switch (m_pToken->m_type) {
+ case TOKand:
+ case TOKksand:
+ NextToken();
+ e2 = ParseEqualityExpression();
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e1 = FX_NEW CXFA_FMLogicalAndExpression(line, TOKand, e1, e2);
+ } else {
+ delete e1;
+ e1 = 0;
}
+ continue;
+ default:
break;
}
- return e1;
+ break;
+ }
+ return e1;
}
-CXFA_FMSimpleExpression * CXFA_FMParse::ParseLogicalAndExpression()
-{
- CXFA_FMSimpleExpression *e1 = 0, *e2 = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
- e1 = ParseEqualityExpression();
- for (;;) {
- switch (m_pToken->m_type) {
- case TOKand:
- case TOKksand:
- NextToken();
- e2 = ParseEqualityExpression();
- if (m_pErrorInfo->message.IsEmpty()) {
- e1 = FX_NEW CXFA_FMLogicalAndExpression(line, TOKand, e1, e2);
- } else {
- delete e1;
- e1 = 0;
- }
- continue;
- default:
- break;
+CXFA_FMSimpleExpression* CXFA_FMParse::ParseEqualityExpression() {
+ CXFA_FMSimpleExpression *e1 = 0, *e2 = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ e1 = ParseRelationalExpression();
+ for (;;) {
+ switch (m_pToken->m_type) {
+ case TOKeq:
+ case TOKkseq:
+ NextToken();
+ e2 = ParseRelationalExpression();
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e1 = FX_NEW CXFA_FMEqualityExpression(line, TOKeq, e1, e2);
+ } else {
+ delete e1;
+ e1 = 0;
}
+ continue;
+ case TOKne:
+ case TOKksne:
+ NextToken();
+ e2 = ParseRelationalExpression();
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e1 = FX_NEW CXFA_FMEqualityExpression(line, TOKne, e1, e2);
+ } else {
+ delete e1;
+ e1 = 0;
+ }
+ continue;
+ default:
break;
}
- return e1;
+ break;
+ }
+ return e1;
}
-CXFA_FMSimpleExpression * CXFA_FMParse::ParseEqualityExpression()
-{
- CXFA_FMSimpleExpression *e1 = 0, *e2 = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
- e1 = ParseRelationalExpression();
- for (;;) {
- switch (m_pToken->m_type) {
- case TOKeq:
- case TOKkseq:
- NextToken();
- e2 = ParseRelationalExpression();
- if (m_pErrorInfo->message.IsEmpty()) {
- e1 = FX_NEW CXFA_FMEqualityExpression(line, TOKeq, e1, e2);
- } else {
- delete e1;
- e1 = 0;
- }
- continue;
- case TOKne:
- case TOKksne:
- NextToken();
- e2 = ParseRelationalExpression();
- if (m_pErrorInfo->message.IsEmpty()) {
- e1 = FX_NEW CXFA_FMEqualityExpression(line, TOKne, e1, e2);
- } else {
- delete e1;
- e1 = 0;
- }
- continue;
- default:
- break;
+CXFA_FMSimpleExpression* CXFA_FMParse::ParseRelationalExpression() {
+ CXFA_FMSimpleExpression *e1 = 0, *e2 = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ e1 = ParseAddtiveExpression();
+ for (;;) {
+ switch (m_pToken->m_type) {
+ case TOKlt:
+ case TOKkslt:
+ NextToken();
+ e2 = ParseAddtiveExpression();
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e1 = FX_NEW CXFA_FMRelationalExpression(line, TOKlt, e1, e2);
+ } else {
+ delete e1;
+ e1 = 0;
+ }
+ continue;
+ case TOKgt:
+ case TOKksgt:
+ NextToken();
+ e2 = ParseAddtiveExpression();
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e1 = FX_NEW CXFA_FMRelationalExpression(line, TOKgt, e1, e2);
+ } else {
+ delete e1;
+ e1 = 0;
+ }
+ continue;
+ case TOKle:
+ case TOKksle:
+ NextToken();
+ e2 = ParseAddtiveExpression();
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e1 = FX_NEW CXFA_FMRelationalExpression(line, TOKle, e1, e2);
+ } else {
+ delete e1;
+ e1 = 0;
}
+ continue;
+ case TOKge:
+ case TOKksge:
+ NextToken();
+ e2 = ParseAddtiveExpression();
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e1 = FX_NEW CXFA_FMRelationalExpression(line, TOKge, e1, e2);
+ } else {
+ delete e1;
+ e1 = 0;
+ }
+ continue;
+ default:
break;
}
- return e1;
+ break;
+ }
+ return e1;
}
-CXFA_FMSimpleExpression * CXFA_FMParse::ParseRelationalExpression()
-{
- CXFA_FMSimpleExpression *e1 = 0, *e2 = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
- e1 = ParseAddtiveExpression();
- for (;;) {
- switch (m_pToken->m_type) {
- case TOKlt:
- case TOKkslt:
- NextToken();
- e2 = ParseAddtiveExpression();
- if (m_pErrorInfo->message.IsEmpty()) {
- e1 = FX_NEW CXFA_FMRelationalExpression(line, TOKlt, e1, e2);
- } else {
- delete e1;
- e1 = 0;
- }
- continue;
- case TOKgt:
- case TOKksgt:
- NextToken();
- e2 = ParseAddtiveExpression();
- if (m_pErrorInfo->message.IsEmpty()) {
- e1 = FX_NEW CXFA_FMRelationalExpression(line, TOKgt, e1, e2);
- } else {
- delete e1;
- e1 = 0;
- }
- continue;
- case TOKle:
- case TOKksle:
- NextToken();
- e2 = ParseAddtiveExpression();
- if (m_pErrorInfo->message.IsEmpty()) {
- e1 = FX_NEW CXFA_FMRelationalExpression(line, TOKle, e1, e2);
- } else {
- delete e1;
- e1 = 0;
- }
- continue;
- case TOKge:
- case TOKksge:
- NextToken();
- e2 = ParseAddtiveExpression();
- if (m_pErrorInfo->message.IsEmpty()) {
- e1 = FX_NEW CXFA_FMRelationalExpression(line, TOKge, e1, e2);
- } else {
- delete e1;
- e1 = 0;
- }
- continue;
- default:
- break;
+CXFA_FMSimpleExpression* CXFA_FMParse::ParseAddtiveExpression() {
+ CXFA_FMSimpleExpression *e1 = 0, *e2 = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ e1 = ParseMultiplicativeExpression();
+ for (;;) {
+ switch (m_pToken->m_type) {
+ case TOKplus:
+ NextToken();
+ e2 = ParseMultiplicativeExpression();
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e1 = FX_NEW CXFA_FMAdditiveExpression(line, TOKplus, e1, e2);
+ } else {
+ delete e1;
+ e1 = 0;
}
+ continue;
+ case TOKminus:
+ NextToken();
+ e2 = ParseMultiplicativeExpression();
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e1 = FX_NEW CXFA_FMAdditiveExpression(line, TOKminus, e1, e2);
+ } else {
+ delete e1;
+ e1 = 0;
+ }
+ continue;
+ default:
break;
}
- return e1;
+ break;
+ }
+ return e1;
}
-CXFA_FMSimpleExpression * CXFA_FMParse::ParseAddtiveExpression()
-{
- CXFA_FMSimpleExpression *e1 = 0, *e2 = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
- e1 = ParseMultiplicativeExpression();
- for (;;) {
- switch (m_pToken->m_type) {
- case TOKplus:
- NextToken();
- e2 = ParseMultiplicativeExpression();
- if (m_pErrorInfo->message.IsEmpty()) {
- e1 = FX_NEW CXFA_FMAdditiveExpression(line, TOKplus, e1, e2);
- } else {
- delete e1;
- e1 = 0;
- }
- continue;
- case TOKminus:
- NextToken();
- e2 = ParseMultiplicativeExpression();
- if (m_pErrorInfo->message.IsEmpty()) {
- e1 = FX_NEW CXFA_FMAdditiveExpression(line, TOKminus, e1, e2);
- } else {
- delete e1;
- e1 = 0;
- }
- continue;
- default:
- break;
+CXFA_FMSimpleExpression* CXFA_FMParse::ParseMultiplicativeExpression() {
+ CXFA_FMSimpleExpression *e1 = 0, *e2 = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ e1 = ParseUnaryExpression();
+ for (;;) {
+ switch (m_pToken->m_type) {
+ case TOKmul:
+ NextToken();
+ e2 = ParseUnaryExpression();
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e1 = FX_NEW CXFA_FMMultiplicativeExpression(line, TOKmul, e1, e2);
+ } else {
+ delete e1;
+ e1 = 0;
}
+ continue;
+ case TOKdiv:
+ NextToken();
+ e2 = ParseUnaryExpression();
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e1 = FX_NEW CXFA_FMMultiplicativeExpression(line, TOKdiv, e1, e2);
+ } else {
+ delete e1;
+ e1 = 0;
+ }
+ continue;
+ default:
break;
}
- return e1;
+ break;
+ }
+ return e1;
}
-CXFA_FMSimpleExpression * CXFA_FMParse::ParseMultiplicativeExpression()
-{
- CXFA_FMSimpleExpression *e1 = 0, *e2 = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
- e1 = ParseUnaryExpression();
- for (;;) {
- switch (m_pToken->m_type) {
- case TOKmul:
- NextToken();
- e2 = ParseUnaryExpression();
- if (m_pErrorInfo->message.IsEmpty()) {
- e1 = FX_NEW CXFA_FMMultiplicativeExpression(line, TOKmul, e1, e2);
- } else {
- delete e1;
- e1 = 0;
- }
- continue;
- case TOKdiv:
- NextToken();
- e2 = ParseUnaryExpression();
- if (m_pErrorInfo->message.IsEmpty()) {
- e1 = FX_NEW CXFA_FMMultiplicativeExpression(line, TOKdiv, e1, e2);
- } else {
- delete e1;
- e1 = 0;
- }
- continue;
- default:
- break;
+CXFA_FMSimpleExpression* CXFA_FMParse::ParseUnaryExpression() {
+ CXFA_FMSimpleExpression* e = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ switch (m_pToken->m_type) {
+ case TOKplus:
+ NextToken();
+ e = ParseUnaryExpression();
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e = FX_NEW CXFA_FMPosExpression(line, e);
+ } else {
+ e = 0;
+ }
+ break;
+ case TOKminus:
+ NextToken();
+ e = ParseUnaryExpression();
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e = FX_NEW CXFA_FMNegExpression(line, e);
+ } else {
+ e = 0;
+ }
+ break;
+ case TOKksnot:
+ NextToken();
+ e = ParseUnaryExpression();
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e = FX_NEW CXFA_FMNotExpression(line, e);
+ } else {
+ e = 0;
+ }
+ break;
+ default:
+ e = ParsePrimaryExpression();
+ break;
+ }
+ return e;
+}
+CXFA_FMSimpleExpression* CXFA_FMParse::ParsePrimaryExpression() {
+ CXFA_FMSimpleExpression* e = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ switch (m_pToken->m_type) {
+ case TOKnumber:
+ e = FX_NEW CXFA_FMNumberExpression(line, m_pToken->m_wstring);
+ NextToken();
+ break;
+ case TOKstring:
+ e = FX_NEW CXFA_FMStringExpression(line, m_pToken->m_wstring);
+ NextToken();
+ break;
+ case TOKidentifier: {
+ CFX_WideStringC wsIdentifier(m_pToken->m_wstring);
+ NextToken();
+ if (m_pToken->m_type == TOKlbracket) {
+ CXFA_FMSimpleExpression* s = ParseIndexExpression();
+ if (s) {
+ e = FX_NEW CXFA_FMDotAccessorExpression(line, NULL, TOKdot,
+ wsIdentifier, s);
}
- break;
- }
- return e1;
+ NextToken();
+ } else {
+ e = FX_NEW CXFA_FMIdentifierExpressionn(line, wsIdentifier);
+ }
+ } break;
+ case TOKif:
+ e = FX_NEW CXFA_FMIdentifierExpressionn(line, m_pToken->m_wstring);
+ NextToken();
+ break;
+ case TOKnull:
+ e = FX_NEW CXFA_FMNullExpression(line);
+ NextToken();
+ break;
+ case TOKlparen:
+ e = ParseParenExpression();
+ break;
+ default:
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_UNEXPECTED_EXPRESSION,
+ ws_TempString.c_str());
+ NextToken();
+ break;
+ }
+ e = ParsePostExpression(e);
+ if (!(m_pErrorInfo->message.IsEmpty())) {
+ delete e;
+ e = 0;
+ }
+ return e;
}
-CXFA_FMSimpleExpression * CXFA_FMParse::ParseUnaryExpression()
-{
- CXFA_FMSimpleExpression *e = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
+CXFA_FMSimpleExpression* CXFA_FMParse::ParsePostExpression(
+ CXFA_FMSimpleExpression* e) {
+ FX_DWORD line = m_pToken->m_uLinenum;
+ while (1) {
switch (m_pToken->m_type) {
- case TOKplus:
+ case TOKlparen: {
+ NextToken();
+ CFX_PtrArray* pArray = 0;
+ if (m_pToken->m_type != TOKrparen) {
+ pArray = FX_NEW CFX_PtrArray();
+ while (m_pToken->m_type != TOKrparen) {
+ CXFA_FMSimpleExpression* e = ParseSimpleExpression();
+ if (e) {
+ pArray->Add(e);
+ }
+ if (m_pToken->m_type == TOKcomma) {
+ NextToken();
+ } else if (m_pToken->m_type == TOKeof) {
+ break;
+ }
+ }
+ if (m_pToken->m_type != TOKrparen) {
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN,
+ XFA_FM_KeywordToString(TOKrparen), ws_TempString.c_str());
+ }
+ }
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e = FX_NEW CXFA_FMCallExpression(line, e, pArray, FALSE);
+ NextToken();
+ if (m_pToken->m_type != TOKlbracket) {
+ continue;
+ }
+ CXFA_FMSimpleExpression* s = ParseIndexExpression();
+ if (s) {
+ e = FX_NEW CXFA_FMDotAccessorExpression(line, e, TOKcall,
+ FX_WSTRC(L""), s);
+ } else {
+ delete e;
+ e = 0;
+ }
+ } else {
+ int32_t iSize = pArray->GetSize();
+ for (int32_t i = 0; i < iSize; ++i) {
+ CXFA_FMSimpleExpression* pTemp =
+ (CXFA_FMSimpleExpression*)pArray->GetAt(i);
+ delete pTemp;
+ }
+ delete pArray;
+ delete e;
+ e = 0;
+ }
+ } break;
+ case TOKdot:
+ NextToken();
+ if (m_pToken->m_type == TOKidentifier) {
+ CFX_WideStringC tempStr = m_pToken->m_wstring;
+ FX_DWORD tempLine = m_pToken->m_uLinenum;
+ NextToken();
+ if (m_pToken->m_type == TOKlparen) {
+ CXFA_FMSimpleExpression* pExpAccessor;
+ CXFA_FMSimpleExpression* pExpCall;
+ pExpAccessor = e;
NextToken();
- e = ParseUnaryExpression();
+ CFX_PtrArray* pArray = 0;
+ if (m_pToken->m_type != TOKrparen) {
+ pArray = FX_NEW CFX_PtrArray();
+ while (m_pToken->m_type != TOKrparen) {
+ CXFA_FMSimpleExpression* exp = ParseSimpleExpression();
+ pArray->Add(exp);
+ if (m_pToken->m_type == TOKcomma) {
+ NextToken();
+ } else if (m_pToken->m_type == TOKeof) {
+ break;
+ }
+ }
+ if (m_pToken->m_type != TOKrparen) {
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN,
+ XFA_FM_KeywordToString(TOKrparen), ws_TempString.c_str());
+ }
+ }
if (m_pErrorInfo->message.IsEmpty()) {
- e = FX_NEW CXFA_FMPosExpression(line, e);
+ CXFA_FMSimpleExpression* pIdentifier =
+ FX_NEW CXFA_FMIdentifierExpressionn(tempLine, tempStr);
+ pExpCall =
+ FX_NEW CXFA_FMCallExpression(line, pIdentifier, pArray, TRUE);
+ e = FX_NEW CXFA_FMMethodCallExpression(line, pExpAccessor,
+ pExpCall);
+ NextToken();
+ if (m_pToken->m_type != TOKlbracket) {
+ continue;
+ }
+ CXFA_FMSimpleExpression* s = ParseIndexExpression();
+ if (s) {
+ e = FX_NEW CXFA_FMDotAccessorExpression(line, e, TOKcall,
+ FX_WSTRC(L""), s);
+ } else {
+ delete e;
+ e = 0;
+ }
} else {
+ int32_t iSize = pArray->GetSize();
+ for (int32_t i = 0; i < iSize; ++i) {
+ CXFA_FMSimpleExpression* pTemp =
+ (CXFA_FMSimpleExpression*)pArray->GetAt(i);
+ delete pTemp;
+ }
+ delete pArray;
+ delete e;
+ e = 0;
+ }
+ } else if (m_pToken->m_type == TOKlbracket) {
+ CXFA_FMSimpleExpression* s = ParseIndexExpression();
+ if (!(m_pErrorInfo->message.IsEmpty())) {
+ if (s) {
+ delete s;
+ s = 0;
+ }
+ if (e) {
+ delete e;
e = 0;
+ }
+ return e;
}
- break;
- case TOKminus:
- NextToken();
- e = ParseUnaryExpression();
- if (m_pErrorInfo->message.IsEmpty()) {
- e = FX_NEW CXFA_FMNegExpression(line, e);
- } else {
+ e = FX_NEW CXFA_FMDotAccessorExpression(tempLine, e, TOKdot,
+ tempStr, s);
+ } else {
+ CXFA_FMSimpleExpression* s = FX_NEW CXFA_FMIndexExpression(
+ tempLine, ACCESSOR_NO_INDEX, NULL, FALSE);
+ e = FX_NEW CXFA_FMDotAccessorExpression(line, e, TOKdot, tempStr,
+ s);
+ continue;
+ }
+ } else {
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_EXPECTED_IDENTIFIER,
+ ws_TempString.c_str());
+ return e;
+ }
+ break;
+ case TOKdotdot:
+ NextToken();
+ if (m_pToken->m_type == TOKidentifier) {
+ CFX_WideStringC tempStr = m_pToken->m_wstring;
+ FX_DWORD tempLine = m_pToken->m_uLinenum;
+ NextToken();
+ if (m_pToken->m_type == TOKlbracket) {
+ CXFA_FMSimpleExpression* s = ParseIndexExpression();
+ if (!(m_pErrorInfo->message.IsEmpty())) {
+ if (s) {
+ delete s;
+ s = 0;
+ }
+ if (e) {
+ delete e;
e = 0;
+ }
+ return e;
}
- break;
- case TOKksnot:
- NextToken();
- e = ParseUnaryExpression();
- if (m_pErrorInfo->message.IsEmpty()) {
- e = FX_NEW CXFA_FMNotExpression(line, e);
- } else {
+ e = FX_NEW CXFA_FMDotDotAccessorExpression(tempLine, e, TOKdotdot,
+ tempStr, s);
+ } else {
+ CXFA_FMSimpleExpression* s = FX_NEW CXFA_FMIndexExpression(
+ tempLine, ACCESSOR_NO_INDEX, NULL, FALSE);
+ e = FX_NEW CXFA_FMDotDotAccessorExpression(line, e, TOKdotdot,
+ tempStr, s);
+ continue;
+ }
+ } else {
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_EXPECTED_IDENTIFIER,
+ ws_TempString.c_str());
+ return e;
+ }
+ break;
+ case TOKdotscream:
+ NextToken();
+ if (m_pToken->m_type == TOKidentifier) {
+ CFX_WideStringC tempStr = m_pToken->m_wstring;
+ FX_DWORD tempLine = m_pToken->m_uLinenum;
+ NextToken();
+ if (m_pToken->m_type == TOKlbracket) {
+ CXFA_FMSimpleExpression* s = ParseIndexExpression();
+ if (!(m_pErrorInfo->message.IsEmpty())) {
+ if (s) {
+ delete s;
+ s = 0;
+ }
+ if (e) {
+ delete e;
e = 0;
+ }
+ return e;
}
- break;
- default:
- e = ParsePrimaryExpression();
- break;
+ e = FX_NEW CXFA_FMDotAccessorExpression(tempLine, e, TOKdotscream,
+ tempStr, s);
+ } else {
+ CXFA_FMSimpleExpression* s = FX_NEW CXFA_FMIndexExpression(
+ tempLine, ACCESSOR_NO_INDEX, NULL, FALSE);
+ e = FX_NEW CXFA_FMDotAccessorExpression(line, e, TOKdotscream,
+ tempStr, s);
+ continue;
+ }
+ } else {
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_EXPECTED_IDENTIFIER,
+ ws_TempString.c_str());
+ return e;
+ }
+ break;
+ case TOKdotstar: {
+ CXFA_FMSimpleExpression* s =
+ FX_NEW CXFA_FMIndexExpression(line, ACCESSOR_NO_INDEX, NULL, FALSE);
+ e = FX_NEW CXFA_FMDotAccessorExpression(line, e, TOKdotstar,
+ FX_WSTRC(L"*"), s);
+ } break;
+ default:
+ return e;
}
- return e;
+ NextToken();
+ }
+ return e;
}
-CXFA_FMSimpleExpression * CXFA_FMParse::ParsePrimaryExpression()
-{
- CXFA_FMSimpleExpression *e = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
- switch (m_pToken->m_type) {
- case TOKnumber:
- e = FX_NEW CXFA_FMNumberExpression(line, m_pToken->m_wstring);
- NextToken();
- break;
- case TOKstring:
- e = FX_NEW CXFA_FMStringExpression(line, m_pToken->m_wstring);
- NextToken();
- break;
- case TOKidentifier: {
- CFX_WideStringC wsIdentifier(m_pToken->m_wstring);
- NextToken();
- if (m_pToken->m_type == TOKlbracket) {
- CXFA_FMSimpleExpression *s = ParseIndexExpression();
- if(s) {
- e = FX_NEW CXFA_FMDotAccessorExpression(line, NULL, TOKdot, wsIdentifier, s);
- }
- NextToken();
- } else {
- e = FX_NEW CXFA_FMIdentifierExpressionn(line, wsIdentifier);
- }
- }
- break;
- case TOKif:
- e = FX_NEW CXFA_FMIdentifierExpressionn(line, m_pToken->m_wstring);
- NextToken();
- break;
- case TOKnull:
- e = FX_NEW CXFA_FMNullExpression(line);
- NextToken();
- break;
- case TOKlparen:
- e = ParseParenExpression();
- break;
- default:
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_UNEXPECTED_EXPRESSION, ws_TempString.c_str());
- NextToken();
- break;
+CXFA_FMSimpleExpression* CXFA_FMParse::ParseIndexExpression() {
+ CXFA_FMSimpleExpression* pExp = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ NextToken();
+ CXFA_FMSimpleExpression* s = 0;
+ XFA_FM_AccessorIndex accessorIndex = ACCESSOR_NO_RELATIVEINDEX;
+ if (m_pToken->m_type == TOKmul) {
+ pExp = FX_NEW CXFA_FMIndexExpression(line, accessorIndex, s, TRUE);
+ NextToken();
+ if (m_pToken->m_type != TOKrbracket) {
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN,
+ XFA_FM_KeywordToString(TOKrparen), ws_TempString.c_str());
+ if (pExp) {
+ delete pExp;
+ pExp = 0;
+ }
}
- e = ParsePostExpression(e);
- if (!(m_pErrorInfo->message.IsEmpty())) {
- delete e;
- e = 0;
+ return pExp;
+ }
+ if (m_pToken->m_type == TOKplus) {
+ accessorIndex = ACCESSOR_POSITIVE_INDEX;
+ NextToken();
+ } else if (m_pToken->m_type == TOKminus) {
+ accessorIndex = ACCESSOR_NEGATIVE_INDEX;
+ NextToken();
+ }
+ s = ParseSimpleExpression();
+ if (m_pToken->m_type != TOKrbracket) {
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN,
+ XFA_FM_KeywordToString(TOKrparen), ws_TempString.c_str());
+ if (s) {
+ delete s;
}
- return e;
+ } else {
+ pExp = FX_NEW CXFA_FMIndexExpression(line, accessorIndex, s, FALSE);
+ }
+ return pExp;
}
-CXFA_FMSimpleExpression *CXFA_FMParse::ParsePostExpression(CXFA_FMSimpleExpression *e)
-{
- FX_DWORD line = m_pToken->m_uLinenum;
- while (1) {
- switch (m_pToken->m_type) {
- case TOKlparen: {
- NextToken();
- CFX_PtrArray *pArray = 0;
- if (m_pToken->m_type != TOKrparen) {
- pArray = FX_NEW CFX_PtrArray();
- while (m_pToken->m_type != TOKrparen) {
- CXFA_FMSimpleExpression *e = ParseSimpleExpression();
- if (e) {
- pArray->Add(e);
- }
- if (m_pToken->m_type == TOKcomma) {
- NextToken();
- } else if (m_pToken->m_type == TOKeof) {
- break;
- }
- }
- if (m_pToken->m_type != TOKrparen) {
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN, XFA_FM_KeywordToString(TOKrparen), ws_TempString.c_str());
- }
- }
- if (m_pErrorInfo->message.IsEmpty()) {
- e = FX_NEW CXFA_FMCallExpression(line, e, pArray, FALSE);
- NextToken();
- if (m_pToken->m_type != TOKlbracket) {
- continue;
- }
- CXFA_FMSimpleExpression *s = ParseIndexExpression();
- if(s) {
- e = FX_NEW CXFA_FMDotAccessorExpression(line, e, TOKcall, FX_WSTRC(L""), s);
- } else {
- delete e;
- e = 0;
- }
- } else {
- int32_t iSize = pArray->GetSize();
- for (int32_t i = 0; i < iSize; ++i) {
- CXFA_FMSimpleExpression *pTemp = (CXFA_FMSimpleExpression *)pArray->GetAt(i);
- delete pTemp;
- }
- delete pArray;
- delete e;
- e = 0;
- }
- }
- break;
- case TOKdot:
- NextToken();
- if (m_pToken->m_type == TOKidentifier) {
- CFX_WideStringC tempStr = m_pToken->m_wstring;
- FX_DWORD tempLine = m_pToken->m_uLinenum;
- NextToken();
- if (m_pToken->m_type == TOKlparen) {
- CXFA_FMSimpleExpression *pExpAccessor;
- CXFA_FMSimpleExpression *pExpCall;
- pExpAccessor = e;
- NextToken();
- CFX_PtrArray *pArray = 0;
- if (m_pToken->m_type != TOKrparen) {
- pArray = FX_NEW CFX_PtrArray();
- while (m_pToken->m_type != TOKrparen) {
- CXFA_FMSimpleExpression *exp = ParseSimpleExpression();
- pArray->Add(exp);
- if (m_pToken->m_type == TOKcomma) {
- NextToken();
- } else if (m_pToken->m_type == TOKeof) {
- break;
- }
- }
- if (m_pToken->m_type != TOKrparen) {
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN, XFA_FM_KeywordToString(TOKrparen), ws_TempString.c_str());
- }
- }
- if (m_pErrorInfo->message.IsEmpty()) {
- CXFA_FMSimpleExpression *pIdentifier = FX_NEW CXFA_FMIdentifierExpressionn(tempLine, tempStr);
- pExpCall = FX_NEW CXFA_FMCallExpression(line, pIdentifier, pArray, TRUE);
- e = FX_NEW CXFA_FMMethodCallExpression(line, pExpAccessor, pExpCall);
- NextToken();
- if (m_pToken->m_type != TOKlbracket) {
- continue;
- }
- CXFA_FMSimpleExpression *s = ParseIndexExpression();
- if(s) {
- e = FX_NEW CXFA_FMDotAccessorExpression(line, e, TOKcall, FX_WSTRC(L""), s);
- } else {
- delete e;
- e = 0;
- }
- } else {
- int32_t iSize = pArray->GetSize();
- for (int32_t i = 0; i < iSize; ++i) {
- CXFA_FMSimpleExpression *pTemp = (CXFA_FMSimpleExpression *)pArray->GetAt(i);
- delete pTemp;
- }
- delete pArray;
- delete e;
- e = 0;
- }
- } else if (m_pToken->m_type == TOKlbracket) {
- CXFA_FMSimpleExpression *s = ParseIndexExpression();
- if(!(m_pErrorInfo->message.IsEmpty())) {
- if (s) {
- delete s;
- s = 0;
- }
- if (e) {
- delete e;
- e = 0;
- }
- return e;
- }
- e = FX_NEW CXFA_FMDotAccessorExpression(tempLine, e, TOKdot, tempStr, s);
- } else {
- CXFA_FMSimpleExpression *s = FX_NEW CXFA_FMIndexExpression(tempLine, ACCESSOR_NO_INDEX, NULL, FALSE);
- e = FX_NEW CXFA_FMDotAccessorExpression(line, e, TOKdot, tempStr, s);
- continue;
- }
- } else {
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_EXPECTED_IDENTIFIER, ws_TempString.c_str());
- return e;
- }
- break;
- case TOKdotdot:
- NextToken();
- if (m_pToken->m_type == TOKidentifier) {
- CFX_WideStringC tempStr = m_pToken->m_wstring;
- FX_DWORD tempLine = m_pToken->m_uLinenum;
- NextToken();
- if (m_pToken->m_type == TOKlbracket) {
- CXFA_FMSimpleExpression *s = ParseIndexExpression();
- if(!(m_pErrorInfo->message.IsEmpty())) {
- if (s) {
- delete s;
- s = 0;
- }
- if (e) {
- delete e;
- e = 0;
- }
- return e;
- }
- e = FX_NEW CXFA_FMDotDotAccessorExpression(tempLine, e, TOKdotdot, tempStr, s);
- } else {
- CXFA_FMSimpleExpression *s = FX_NEW CXFA_FMIndexExpression(tempLine, ACCESSOR_NO_INDEX, NULL, FALSE);
- e = FX_NEW CXFA_FMDotDotAccessorExpression(line, e, TOKdotdot, tempStr, s);
- continue;
- }
- } else {
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_EXPECTED_IDENTIFIER, ws_TempString.c_str());
- return e;
- }
- break;
- case TOKdotscream:
- NextToken();
- if (m_pToken->m_type == TOKidentifier) {
- CFX_WideStringC tempStr = m_pToken->m_wstring;
- FX_DWORD tempLine = m_pToken->m_uLinenum;
- NextToken();
- if (m_pToken->m_type == TOKlbracket) {
- CXFA_FMSimpleExpression *s = ParseIndexExpression();
- if(!(m_pErrorInfo->message.IsEmpty())) {
- if (s) {
- delete s;
- s = 0;
- }
- if (e) {
- delete e;
- e = 0;
- }
- return e;
- }
- e = FX_NEW CXFA_FMDotAccessorExpression(tempLine, e, TOKdotscream, tempStr, s);
- } else {
- CXFA_FMSimpleExpression *s = FX_NEW CXFA_FMIndexExpression(tempLine, ACCESSOR_NO_INDEX, NULL, FALSE);
- e = FX_NEW CXFA_FMDotAccessorExpression(line, e, TOKdotscream, tempStr, s);
- continue;
- }
- } else {
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_EXPECTED_IDENTIFIER, ws_TempString.c_str());
- return e;
- }
- break;
- case TOKdotstar: {
- CXFA_FMSimpleExpression *s = FX_NEW CXFA_FMIndexExpression(line, ACCESSOR_NO_INDEX, NULL, FALSE);
- e = FX_NEW CXFA_FMDotAccessorExpression(line, e, TOKdotstar, FX_WSTRC(L"*"), s);
- }
- break;
- default:
- return e;
- }
- NextToken();
+CXFA_FMSimpleExpression* CXFA_FMParse::ParseParenExpression() {
+ CXFA_FMSimpleExpression *pExp1 = 0, *pExp2 = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ Check(TOKlparen);
+ if (m_pToken->m_type != TOKrparen) {
+ pExp1 = ParseLogicalOrExpression();
+ while (m_pToken->m_type == TOKassign) {
+ NextToken();
+ pExp2 = ParseLogicalOrExpression();
+ if (m_pErrorInfo->message.IsEmpty()) {
+ pExp1 = FX_NEW CXFA_FMAssignExpression(line, TOKassign, pExp1, pExp2);
+ } else {
+ delete pExp1;
+ pExp1 = 0;
+ }
}
- return e;
-}
-CXFA_FMSimpleExpression *CXFA_FMParse::ParseIndexExpression()
-{
- CXFA_FMSimpleExpression *pExp = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
+ Check(TOKrparen);
+ } else {
NextToken();
- CXFA_FMSimpleExpression *s = 0;
- XFA_FM_AccessorIndex accessorIndex = ACCESSOR_NO_RELATIVEINDEX;
- if (m_pToken->m_type == TOKmul) {
- pExp = FX_NEW CXFA_FMIndexExpression(line, accessorIndex, s, TRUE);
- NextToken();
- if (m_pToken->m_type != TOKrbracket) {
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN, XFA_FM_KeywordToString(TOKrparen), ws_TempString.c_str());
- if (pExp) {
- delete pExp;
- pExp = 0;
- }
+ }
+ return pExp1;
+}
+CXFA_FMExpression* CXFA_FMParse::ParseBlockExpression() {
+ FX_DWORD line = m_pToken->m_uLinenum;
+ CXFA_FMExpression* e = 0;
+ CFX_PtrArray* expression = FX_NEW CFX_PtrArray();
+ while (1) {
+ switch (m_pToken->m_type) {
+ case TOKeof:
+ case TOKendif:
+ case TOKelseif:
+ case TOKelse:
+ case TOKendwhile:
+ case TOKendfor:
+ case TOKend:
+ case TOKendfunc:
+ break;
+ case TOKfunc:
+ e = ParseFunction();
+ if (e) {
+ expression->Add(e);
}
- return pExp;
- }
- if(m_pToken->m_type == TOKplus) {
- accessorIndex = ACCESSOR_POSITIVE_INDEX;
- NextToken();
- } else if(m_pToken->m_type == TOKminus) {
- accessorIndex = ACCESSOR_NEGATIVE_INDEX;
- NextToken();
- }
- s = ParseSimpleExpression();
- if (m_pToken->m_type != TOKrbracket) {
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN, XFA_FM_KeywordToString(TOKrparen), ws_TempString.c_str());
- if (s) {
- delete s;
+ continue;
+ default:
+ e = ParseExpression();
+ if (e) {
+ expression->Add(e);
}
- } else {
- pExp = FX_NEW CXFA_FMIndexExpression(line, accessorIndex, s, FALSE);
+ continue;
}
- return pExp;
-}
-CXFA_FMSimpleExpression * CXFA_FMParse::ParseParenExpression()
-{
- CXFA_FMSimpleExpression *pExp1 = 0, *pExp2 = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
- Check(TOKlparen);
- if (m_pToken->m_type != TOKrparen) {
- pExp1 = ParseLogicalOrExpression();
- while (m_pToken->m_type == TOKassign) {
- NextToken();
- pExp2 = ParseLogicalOrExpression();
- if (m_pErrorInfo->message.IsEmpty()) {
- pExp1 = FX_NEW CXFA_FMAssignExpression(line, TOKassign, pExp1, pExp2);
- } else {
- delete pExp1;
- pExp1 = 0;
- }
- }
- Check(TOKrparen);
- } else {
- NextToken();
+ break;
+ }
+ CXFA_FMBlockExpression* pExp = 0;
+ if (m_pErrorInfo->message.IsEmpty()) {
+ pExp = FX_NEW CXFA_FMBlockExpression(line, expression);
+ } else {
+ int32_t size = expression->GetSize();
+ int32_t index = 0;
+ while (index < size) {
+ e = (CXFA_FMExpression*)expression->GetAt(index);
+ delete e;
+ index++;
}
- return pExp1;
+ expression->RemoveAll();
+ delete expression;
+ expression = 0;
+ }
+ return pExp;
}
-CXFA_FMExpression * CXFA_FMParse::ParseBlockExpression()
-{
- FX_DWORD line = m_pToken->m_uLinenum;
- CXFA_FMExpression *e = 0;
- CFX_PtrArray * expression = FX_NEW CFX_PtrArray();
- while (1) {
- switch (m_pToken->m_type) {
- case TOKeof:
- case TOKendif:
- case TOKelseif:
- case TOKelse:
- case TOKendwhile:
- case TOKendfor:
- case TOKend:
- case TOKendfunc:
- break;
- case TOKfunc:
- e = ParseFunction();
- if (e) {
- expression->Add(e);
- }
- continue;
- default:
- e = ParseExpression();
- if (e) {
- expression->Add(e);
- }
- continue;
- }
- break;
+CXFA_FMExpression* CXFA_FMParse::ParseIfExpression() {
+ CXFA_FMSimpleExpression* pExpression = 0;
+ CXFA_FMExpression* pIfExpression = 0;
+ CXFA_FMExpression* pElseExpression = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ const FX_WCHAR* pStartPos = m_lexer->SavePos();
+ NextToken();
+ Check(TOKlparen);
+ while (m_pToken->m_type != TOKrparen) {
+ if (pExpression) {
+ delete pExpression;
}
- CXFA_FMBlockExpression *pExp = 0;
- if (m_pErrorInfo->message.IsEmpty()) {
- pExp = FX_NEW CXFA_FMBlockExpression(line, expression);
+ pExpression = ParseSimpleExpression();
+ if (m_pToken->m_type == TOKcomma) {
+ NextToken();
} else {
- int32_t size = expression->GetSize();
- int32_t index = 0;
- while(index < size) {
- e = (CXFA_FMExpression *)expression->GetAt(index);
- delete e;
- index++;
- }
- expression->RemoveAll();
- delete expression;
- expression = 0;
+ break;
}
- return pExp;
-}
-CXFA_FMExpression * CXFA_FMParse::ParseIfExpression()
-{
- CXFA_FMSimpleExpression *pExpression = 0;
- CXFA_FMExpression *pIfExpression = 0;
- CXFA_FMExpression *pElseExpression = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
- const FX_WCHAR* pStartPos = m_lexer->SavePos();
- NextToken();
- Check(TOKlparen);
- while (m_pToken->m_type != TOKrparen) {
- if (pExpression) {
- delete pExpression;
- }
- pExpression = ParseSimpleExpression();
- if (m_pToken->m_type == TOKcomma) {
- NextToken();
- } else {
- break;
- }
+ }
+ Check(TOKrparen);
+ if (m_pToken->m_type != TOKthen) {
+ if (pExpression) {
+ delete pExpression;
}
- Check(TOKrparen);
- if (m_pToken->m_type != TOKthen) {
- if (pExpression) {
- delete pExpression;
- }
- m_lexer->SetCurrentLine(line);
- m_pToken = FX_NEW CXFA_FMToken(line);
- m_pToken->m_type = TOKidentifier;
- m_pToken->m_wstring = FX_WSTRC(L"if");
- m_lexer->SetToken(m_pToken);
- m_lexer->RestorePos(pStartPos);
- return ParseExpExpression();
+ m_lexer->SetCurrentLine(line);
+ m_pToken = FX_NEW CXFA_FMToken(line);
+ m_pToken->m_type = TOKidentifier;
+ m_pToken->m_wstring = FX_WSTRC(L"if");
+ m_lexer->SetToken(m_pToken);
+ m_lexer->RestorePos(pStartPos);
+ return ParseExpExpression();
+ }
+ Check(TOKthen);
+ pIfExpression = ParseBlockExpression();
+ switch (m_pToken->m_type) {
+ case TOKeof:
+ case TOKendif:
+ Check(TOKendif);
+ break;
+ case TOKif:
+ pElseExpression = ParseIfExpression();
+ Check(TOKendif);
+ break;
+ case TOKelseif:
+ pElseExpression = ParseIfExpression();
+ break;
+ case TOKelse:
+ NextToken();
+ pElseExpression = ParseBlockExpression();
+ Check(TOKendif);
+ break;
+ default:
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_EXPECTED_IFEND, ws_TempString.c_str());
+ NextToken();
+ break;
+ }
+ CXFA_FMIfExpression* pExp = 0;
+ if (m_pErrorInfo->message.IsEmpty()) {
+ pExp = FX_NEW CXFA_FMIfExpression(line, pExpression, pIfExpression,
+ pElseExpression);
+ } else {
+ if (pExpression) {
+ delete pExpression;
}
- Check(TOKthen);
- pIfExpression = ParseBlockExpression();
- switch (m_pToken->m_type) {
- case TOKeof:
- case TOKendif:
- Check(TOKendif);
- break;
- case TOKif:
- pElseExpression = ParseIfExpression();
- Check(TOKendif);
- break;
- case TOKelseif:
- pElseExpression = ParseIfExpression();
- break;
- case TOKelse:
- NextToken();
- pElseExpression = ParseBlockExpression();
- Check(TOKendif);
- break;
- default:
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_EXPECTED_IFEND, ws_TempString.c_str());
- NextToken();
- break;
+ if (pIfExpression) {
+ delete pIfExpression;
}
- CXFA_FMIfExpression *pExp = 0;
- if (m_pErrorInfo->message.IsEmpty()) {
- pExp = FX_NEW CXFA_FMIfExpression(line, pExpression, pIfExpression, pElseExpression);
- } else {
- if (pExpression) {
- delete pExpression;
- }
- if (pIfExpression) {
- delete pIfExpression;
- }
- if (pElseExpression) {
- delete pElseExpression;
- }
+ if (pElseExpression) {
+ delete pElseExpression;
}
- return pExp;
+ }
+ return pExp;
}
-CXFA_FMExpression * CXFA_FMParse::ParseWhileExpression()
-{
- CXFA_FMExpression *e = 0;
- CXFA_FMSimpleExpression *pCondition = 0;
- CXFA_FMExpression *pExpression = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
- NextToken();
- pCondition = ParseParenExpression();
- Check(TOKdo);
- pExpression = ParseBlockExpression();
- Check(TOKendwhile);
- if (!m_pErrorInfo->message.IsEmpty()) {
- if (pCondition) {
- delete pCondition;
- }
- if (pExpression) {
- delete pExpression;
- }
- delete e;
- e = 0;
- } else {
- e = FX_NEW CXFA_FMWhileExpression(line, pCondition, pExpression);
+CXFA_FMExpression* CXFA_FMParse::ParseWhileExpression() {
+ CXFA_FMExpression* e = 0;
+ CXFA_FMSimpleExpression* pCondition = 0;
+ CXFA_FMExpression* pExpression = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ NextToken();
+ pCondition = ParseParenExpression();
+ Check(TOKdo);
+ pExpression = ParseBlockExpression();
+ Check(TOKendwhile);
+ if (!m_pErrorInfo->message.IsEmpty()) {
+ if (pCondition) {
+ delete pCondition;
}
- return e;
-}
-CXFA_FMSimpleExpression * CXFA_FMParse::ParseSubassignmentInForExpression()
-{
- CXFA_FMSimpleExpression *e = 0;
- switch (m_pToken->m_type) {
- case TOKidentifier:
- e = ParseSimpleExpression();
- break;
- default:
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_UNEXPECTED_EXPRESSION, ws_TempString.c_str());
- NextToken();
- break;
+ if (pExpression) {
+ delete pExpression;
}
- return e;
+ delete e;
+ e = 0;
+ } else {
+ e = FX_NEW CXFA_FMWhileExpression(line, pCondition, pExpression);
+ }
+ return e;
}
-CXFA_FMExpression * CXFA_FMParse::ParseForExpression()
-{
- CXFA_FMExpression *e = 0;
- CFX_WideStringC wsVariant;
- CXFA_FMSimpleExpression *pAssignment = 0;
- CXFA_FMSimpleExpression *pAccessor = 0;
- CXFA_FMSimpleExpression *pStep = 0;
- CXFA_FMExpression *pList = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
+CXFA_FMSimpleExpression* CXFA_FMParse::ParseSubassignmentInForExpression() {
+ CXFA_FMSimpleExpression* e = 0;
+ switch (m_pToken->m_type) {
+ case TOKidentifier:
+ e = ParseSimpleExpression();
+ break;
+ default:
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_UNEXPECTED_EXPRESSION,
+ ws_TempString.c_str());
+ NextToken();
+ break;
+ }
+ return e;
+}
+CXFA_FMExpression* CXFA_FMParse::ParseForExpression() {
+ CXFA_FMExpression* e = 0;
+ CFX_WideStringC wsVariant;
+ CXFA_FMSimpleExpression* pAssignment = 0;
+ CXFA_FMSimpleExpression* pAccessor = 0;
+ CXFA_FMSimpleExpression* pStep = 0;
+ CXFA_FMExpression* pList = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ NextToken();
+ if (m_pToken->m_type != TOKidentifier) {
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN,
+ XFA_FM_KeywordToString(m_pToken->m_type), ws_TempString.c_str());
+ }
+ wsVariant = m_pToken->m_wstring;
+ NextToken();
+ if (m_pToken->m_type == TOKassign) {
NextToken();
- if (m_pToken->m_type != TOKidentifier) {
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN, XFA_FM_KeywordToString(m_pToken->m_type), ws_TempString.c_str());
- }
- wsVariant = m_pToken->m_wstring;
+ pAssignment = ParseSimpleExpression();
+ } else {
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN,
+ XFA_FM_KeywordToString(m_pToken->m_type), ws_TempString.c_str());
+ }
+ int32_t iDirection = 0;
+ if (m_pToken->m_type == TOKupto) {
+ iDirection = 1;
+ } else if (m_pToken->m_type == TOKdownto) {
+ iDirection = -1;
+ } else {
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN, L"upto or downto",
+ (const FX_WCHAR*)ws_TempString);
+ }
+ NextToken();
+ pAccessor = ParseSimpleExpression();
+ if (m_pToken->m_type == TOKstep) {
NextToken();
- if( m_pToken->m_type == TOKassign) {
- NextToken();
- pAssignment = ParseSimpleExpression();
- } else {
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN, XFA_FM_KeywordToString(m_pToken->m_type), ws_TempString.c_str());
+ pStep = ParseSimpleExpression();
+ }
+ Check(TOKdo);
+ pList = ParseBlockExpression();
+ Check(TOKendfor);
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e = FX_NEW CXFA_FMForExpression(line, wsVariant, pAssignment, pAccessor,
+ iDirection, pStep, pList);
+ } else {
+ if (pAssignment) {
+ delete pAssignment;
}
- int32_t iDirection = 0;
- if (m_pToken->m_type == TOKupto) {
- iDirection = 1;
- } else if (m_pToken->m_type == TOKdownto) {
- iDirection = -1;
- } else {
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN, L"upto or downto", (const FX_WCHAR*)ws_TempString);
+ if (pAccessor) {
+ delete pAccessor;
}
- NextToken();
- pAccessor = ParseSimpleExpression();
- if (m_pToken->m_type == TOKstep) {
- NextToken();
- pStep = ParseSimpleExpression();
+ if (pStep) {
+ delete pStep;
}
- Check(TOKdo);
- pList = ParseBlockExpression();
- Check(TOKendfor);
- if (m_pErrorInfo->message.IsEmpty()) {
- e = FX_NEW CXFA_FMForExpression(line, wsVariant, pAssignment, pAccessor, iDirection, pStep, pList);
- } else {
- if (pAssignment) {
- delete pAssignment;
- }
- if (pAccessor) {
- delete pAccessor;
- }
- if (pStep) {
- delete pStep;
- }
- if (pList) {
- delete pList;
- }
+ if (pList) {
+ delete pList;
}
- return e;
+ }
+ return e;
}
-CXFA_FMExpression * CXFA_FMParse::ParseForeachExpression()
-{
- CXFA_FMExpression *e = 0;
- CFX_WideStringC wsIdentifier;
- CFX_PtrArray *pAccessors = 0;
- CXFA_FMExpression *pList = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
+CXFA_FMExpression* CXFA_FMParse::ParseForeachExpression() {
+ CXFA_FMExpression* e = 0;
+ CFX_WideStringC wsIdentifier;
+ CFX_PtrArray* pAccessors = 0;
+ CXFA_FMExpression* pList = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ NextToken();
+ if (m_pToken->m_type != TOKidentifier) {
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN,
+ XFA_FM_KeywordToString(m_pToken->m_type), ws_TempString.c_str());
+ }
+ wsIdentifier = m_pToken->m_wstring;
+ NextToken();
+ Check(TOKin);
+ Check(TOKlparen);
+ if (m_pToken->m_type == TOKrparen) {
+ CFX_WideString ws_TempString = m_pToken->m_wstring;
+ Error(m_pToken->m_uLinenum, FMERR_UNEXPECTED_EXPRESSION,
+ ws_TempString.c_str());
NextToken();
- if (m_pToken->m_type != TOKidentifier) {
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_EXPECTED_TOKEN, XFA_FM_KeywordToString(m_pToken->m_type), ws_TempString.c_str());
- }
- wsIdentifier = m_pToken->m_wstring;
- NextToken();
- Check(TOKin);
- Check(TOKlparen);
- if (m_pToken->m_type == TOKrparen) {
- CFX_WideString ws_TempString = m_pToken->m_wstring;
- Error(m_pToken->m_uLinenum, FMERR_UNEXPECTED_EXPRESSION, ws_TempString.c_str());
+ } else {
+ pAccessors = FX_NEW CFX_PtrArray();
+ while (m_pToken->m_type != TOKrparen) {
+ CXFA_FMSimpleExpression* s = ParseSimpleExpression();
+ if (s) {
+ pAccessors->Add(s);
+ }
+ if (m_pToken->m_type == TOKcomma) {
NextToken();
- } else {
- pAccessors = FX_NEW CFX_PtrArray();
- while (m_pToken->m_type != TOKrparen) {
- CXFA_FMSimpleExpression *s = ParseSimpleExpression();
- if (s) {
- pAccessors->Add(s);
- }
- if (m_pToken->m_type == TOKcomma) {
- NextToken();
- } else {
- break;
- }
- }
- Check(TOKrparen);
+ } else {
+ break;
+ }
}
- Check(TOKdo);
- pList = ParseBlockExpression();
- Check(TOKendfor);
- if (m_pErrorInfo->message.IsEmpty()) {
- e = FX_NEW CXFA_FMForeachExpression(line, wsIdentifier, pAccessors, pList);
- } else {
- if (pAccessors) {
- CXFA_FMSimpleExpression *s = 0;
- int32_t size = pAccessors->GetSize();
- int32_t index = 0;
- while(index < size) {
- s = (CXFA_FMSimpleExpression *)pAccessors->GetAt(index);
- delete s;
- index++;
- }
- pAccessors->RemoveAll();
- delete pAccessors;
- pAccessors = 0;
- }
- if (pList) {
- delete pList;
- }
+ Check(TOKrparen);
+ }
+ Check(TOKdo);
+ pList = ParseBlockExpression();
+ Check(TOKendfor);
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e = FX_NEW CXFA_FMForeachExpression(line, wsIdentifier, pAccessors, pList);
+ } else {
+ if (pAccessors) {
+ CXFA_FMSimpleExpression* s = 0;
+ int32_t size = pAccessors->GetSize();
+ int32_t index = 0;
+ while (index < size) {
+ s = (CXFA_FMSimpleExpression*)pAccessors->GetAt(index);
+ delete s;
+ index++;
+ }
+ pAccessors->RemoveAll();
+ delete pAccessors;
+ pAccessors = 0;
}
- return e;
-}
-CXFA_FMExpression * CXFA_FMParse::ParseDoExpression()
-{
- CXFA_FMExpression *e = 0;
- FX_DWORD line = m_pToken->m_uLinenum;
- NextToken();
- e = ParseBlockExpression();
- Check(TOKend);
- if (m_pErrorInfo->message.IsEmpty()) {
- e = FX_NEW CXFA_FMDoExpression(line, e);
- } else {
- delete e;
- e = 0;
+ if (pList) {
+ delete pList;
}
- return e;
+ }
+ return e;
+}
+CXFA_FMExpression* CXFA_FMParse::ParseDoExpression() {
+ CXFA_FMExpression* e = 0;
+ FX_DWORD line = m_pToken->m_uLinenum;
+ NextToken();
+ e = ParseBlockExpression();
+ Check(TOKend);
+ if (m_pErrorInfo->message.IsEmpty()) {
+ e = FX_NEW CXFA_FMDoExpression(line, e);
+ } else {
+ delete e;
+ e = 0;
+ }
+ return e;
}
|