蔡军生先生第二人生的源码分析(105)脚本的词法分析（3）

短命女 2022-08-27 12:54 124阅读 0赞

下面来分析 flex文件的最后一部份，就是辅助代码部份，这部份代码是原封不动地拷贝到生成的文件里。它的代码如下：

\#001 %%

这个双百分号开始，就表示 flex文件的第三部分开始了。

\#002

\#003 LLScriptAllocationManager \*gAllocationManager;

定义分配管理器指针。

\#004  LLScriptScript              \*gScriptp;

定义脚本的指针。

\#005

\#006 // Prototype for the yacc parser entry point

\#007 int yyparse(void);

前置声明 yacc的语法分析的函数。

\#008

\#009 int yyerror(const char \*fmt, ...)

\#010 \{

\#011     gErrorToText.writeError(yyout, gLine, gColumn, LSERROR\_SYNTAX\_ERROR);

\#012     return 0;

\#013 \}

分析出错时输出错误位置。

\#014

\#015 //\#define EMERGENCY\_DEBUG\_PRINTOUTS

\#016 //\#define EMIT\_CIL\_ASSEMBLER

\#017

下面开始进行脚本编译处理。

\#018 BOOL lscript\_compile(const char\* src\_filename, const char\* dst\_filename,

\#019                      const char\* err\_filename, BOOL is\_god\_like)

\#020 \{

\#021     BOOL            b\_parse\_ok = FALSE;

\#022     BOOL            b\_dummy = FALSE;

\#023     U64             b\_dummy\_count = FALSE;

\#024     LSCRIPTType     type = LST\_NULL;

\#025

\#026     gInternalColumn = 0;

\#027     gInternalLine = 0;

\#028     gScriptp = NULL;

\#029

\#030     gErrorToText.init();

\#031     init\_supported\_expressions();

\#032     init\_temp\_jumps();

\#033     gAllocationManager = new LLScriptAllocationManager();

\#034

下面打开脚本文件。

\#035     yyin = LLFile::fopen(src\_filename, "r");

\#036     if (yyin)

\#037     \{

打开错误输出文件。

\#038         yyout = LLFile::fopen(err\_filename, "w");

\#039

\#040         // Reset the lexer's internal buffering.

\#041

读入脚本文件。

\#042         yyrestart(yyin);

\#043

进行语法分析。

\#044         b\_parse\_ok = !yyparse();

\#045

\#046         if (b\_parse\_ok)

\#047         \{

语法分析成功。

\#048 \#ifdef EMERGENCY\_DEBUG\_PRINTOUTS

\#049             char compiled\[256\];

\#050             sprintf(compiled, "%s.o", src\_filename);

\#051             FILE\* compfile;

\#052             compfile = LLFile::fopen(compiled, "w");

\#053 \#endif

\#054

\#055             if(dst\_filename)

\#056             \{

\#057                 gScriptp->setBytecodeDest(dst\_filename);

\#058             \}

\#059

\#060             gScriptp->mGodLike = is\_god\_like;

\#061

\#062             gScopeStringTable = new LLStringTable(16384);

\#063 \#ifdef EMERGENCY\_DEBUG\_PRINTOUTS

下面的代码遍历语法树，生成脚本的中间代码。

\#064             gScriptp->recurse(compfile, 0, 4, LSCP\_PRETTY\_PRINT, LSPRUNE\_INVALID, b\_dummy, NULL, type, type, b\_dummy\_count, NULL, NULL,

\#065 0, NULL, 0, NULL);

\#066 \#endif

\#067             gScriptp->recurse(yyout, 0, 0, LSCP\_PRUNE,      LSPRUNE\_INVALID, b\_dummy, NULL, type, type, b\_dummy\_count,

\#068 NULL, NULL, 0, NULL, 0, NULL);

\#069             gScriptp->recurse(yyout, 0, 0, LSCP\_SCOPE\_PASS1, LSPRUNE\_INVALID, b\_dummy, NULL, type, type, b\_dummy\_count, NULL, NULL, 0,

\#070 NULL, 0, NULL);

\#071             gScriptp->recurse(yyout, 0, 0, LSCP\_SCOPE\_PASS2, LSPRUNE\_INVALID, b\_dummy, NULL, type, type, b\_dummy\_count, NULL, NULL, 0,

\#072 NULL, 0, NULL);

\#073             gScriptp->recurse(yyout, 0, 0, LSCP\_TYPE,       LSPRUNE\_INVALID, b\_dummy, NULL, type, type, b\_dummy\_count,

\#074 NULL, NULL, 0, NULL, 0, NULL);

\#075             if (!gErrorToText.getErrors())

\#076             \{

\#077                 gScriptp->recurse(yyout, 0, 0, LSCP\_RESOURCE, LSPRUNE\_INVALID,      b\_dummy,

\#078 NULL, type, type, b\_dummy\_count, NULL, NULL, 0, NULL, 0, NULL);

\#079 \#ifdef EMERGENCY\_DEBUG\_PRINTOUTS

\#080                  gScriptp->recurse(yyout, 0, 0, LSCP\_EMIT\_ASSEMBLY, LSPRUNE\_INVALID, b\_dummy, NULL, type, type,

\#081 b\_dummy\_count, NULL, NULL, 0, NULL, 0, NULL);

\#082 \#endif

\#083 \#ifdef EMIT\_CIL\_ASSEMBLER

\#084                 const char\* cil\_output\_file\_name = dst\_filename? dst\_filename : "lscript.cil";

\#085                 FILE\* cilout = LLFile::fopen(cil\_output\_file\_name, "w");

\#086                 if(NULL == cilout)

\#087                 \{

\#088                     fprintf(yyout, "Error opening cil output file %s/n", cil\_output\_file\_name);

\#089                 \}

\#090                 else

\#091                 \{

\#092                     gScriptp->recurse(cilout, 0, 0, LSCP\_EMIT\_CIL\_ASSEMBLY, LSPRUNE\_INVALID, b\_dummy, NULL,

\#093 type, type, b\_dummy\_count, NULL, NULL, 0, NULL, 0, NULL);

\#094                     if(fclose(cilout) == EOF)

\#095                     \{

\#096                         fprintf(yyout, "Error closing cil output file %s/n", cil\_output\_file\_name);

\#097                     \}

\#098                 \}

\#099 \#endif

\#100                 gScriptp->recurse(yyout, 0, 0, LSCP\_EMIT\_BYTE\_CODE, LSPRUNE\_INVALID, b\_dummy, NULL, type, type,

\#101 b\_dummy\_count, NULL, NULL, 0, NULL, 0, NULL);

\#102             \}

\#103             delete gScopeStringTable;

\#104             gScopeStringTable = NULL;

\#105 \#ifdef EMERGENCY\_DEBUG\_PRINTOUTS

\#106             fclose(compfile);

\#107 \#endif

\#108         \}

\#109         fclose(yyout);

\#110     \}

\#111

\#112     fclose(yyin);

\#113     delete gAllocationManager;

\#114     delete gScopeStringTable;

\#115

\#116     return b\_parse\_ok && !gErrorToText.getErrors();

\#117 \}

\#118

\#119

输入文件名称的脚本编译函数。

\#120 BOOL lscript\_compile(char \*filename, BOOL is\_god\_like = FALSE)

\#121 \{

生成输入和输出文件名称。

\#122     char src\_filename\[MAX\_STRING\];

\#123     sprintf(src\_filename, "%s.lsl", filename);

\#124     char err\_filename\[MAX\_STRING\];

\#125     sprintf(err\_filename, "%s.out", filename);

调用前面脚本编译函数。

\#126     return lscript\_compile(src\_filename, NULL, err\_filename, is\_god\_like);

\#127 \}

\#128

\#129

下面处理 GCC编译问题。

\#130 S32 yywrap()

\#131 \{

\#132 \#if defined(FLEX\_SCANNER) && !defined(LL\_WINDOWS)

\#133     // get gcc to stop complaining about lack of use of yyunput

\#134     (void) yyunput;

\#135 \#endif

\#136     return(1);

\#137 \}

\#138

跳过所有脚本注释部份。

\#139 void comment()

\#140 \{

\#141     char c;

\#142

\#143     while ((c = yyinput()) != '/n' && c != 0 && c != EOF)

\#144         ;

\#145 \}

\#146

统计编译所在的行号和列号。

\#147 void count()

\#148 \{

\#149     S32 i;

\#150

\#151     gColumn = gInternalColumn;

\#152     gLine = gInternalLine;

\#153

\#154     for (i = 0; yytext\[i\] != '/0'; i++)

\#155         if (yytext\[i\] == '/n')

\#156         \{

\#157             gInternalLine++;

\#158             gInternalColumn = 0;

\#159         \}

\#160         else if (yytext\[i\] == '/t')

\#161             gInternalColumn += 4 - (gInternalColumn % 8);

\#162         else

\#163             gInternalColumn++;

\#164 \}

\#165

分析脚本的字符串。

\#166 void parse\_string()

\#167 \{

\#168     S32 length = (S32)strlen(yytext);

\#169     length = length - 2;

\#170     char \*temp = yytext + 1;

\#171

\#172     S32 i;

\#173     S32 escapes = 0;

\#174     S32 tabs = 0;

\#175     for (i = 0; i < length; i++)

\#176     \{

\#177         if (temp\[i\] == '//')

\#178         \{

\#179             escapes++;

\#180             i++;

\#181             if (temp\[i\] == 't')

\#182                 tabs++;

\#183         \}

\#184     \}

\#185

\#186     S32 newlength = length - escapes + tabs\*3;

\#187     yylval.sval = new char\[newlength + 1\];

\#188

\#189     char \*dest = yylval.sval;

\#190

\#191     for (i = 0; i < length; i++)

\#192     \{

\#193         if (temp\[i\] == '//')

\#194         \{

\#195             i++;

\#196             // linefeed

\#197             if (temp\[i\] == 'n')

\#198             \{

\#199                 \*dest++ = 10;

\#200             \}

\#201             else if (temp\[i\] == 't')

\#202             \{

\#203                 \*dest++ = ' ';

\#204                 \*dest++ = ' ';

\#205                 \*dest++ = ' ';

\#206                 \*dest++ = ' ';

\#207             \}

\#208             else

\#209             \{

\#210                 \*dest++ = temp\[i\];

\#211             \}

\#212         \}

\#213         else

\#214         \{

\#215             \*dest++ = temp\[i\];

\#216         \}

\#217     \}

\#218     yylval.sval\[newlength\] = 0;

\#219 \}

\#220

辅助代码部份主要调用语法分析生成函数来编译脚本，当然语法分析的函数里又调用词法分析的函数来获取所需要的单词，最后生成脚本的树中间代码。

蔡军生先生第二人生的源码分析(105)脚本的词法分析（3）

发表评论取消回复

还没有评论，来说两句吧...

相关阅读

相关蔡军生先生第二人生的源码分析(110)脚本的语法分析（5）

相关蔡军生先生第二人生的源码分析(111)脚本的综合分析（1）

相关蔡军生先生第二人生的源码分析(112)脚本的综合分析（2）

相关蔡军生先生第二人生的源码分析(109)脚本的语法分析（3）

相关蔡军生先生第二人生的源码分析(107)脚本的词法分析（5）

相关蔡军生先生第二人生的源码分析(106)脚本的词法分析（4）

相关蔡军生先生第二人生的源码分析(105)脚本的词法分析（3）

相关蔡军生先生第二人生的源码分析(104)脚本的词法分析（2）

相关蔡军生先生第二人生的源码分析(103)脚本的词法分析（1）

相关蔡军生先生第二人生的源码分析(102)脚本的构造