西安电子科技大学编译原理 (10)

《计算机编译原理》试卷A2参考答案一、单项选择题（每小题1分，共25分）1、构造编译程序应掌握＿＿＿D＿＿＿。

A、源程序B、目标语言C、编译方法D、以上三项都是2、变量应当＿＿＿C＿＿＿。

A、持有左值B、持有右值C、既持有左值又持有右值D、既不持有左值也不持有右值3、编译程序绝大多数时间花在＿＿＿D＿＿＿上。

A、出错处理B、词法分析C、目标代码生成D、管理表格4、＿＿＿D＿＿＿不可能是目标代码。

A、汇编指令代码B、可重定位指令代码C、绝对指令代码D、中间代码5、使用＿＿＿A＿＿＿可以定义一个程序的意义。

A、语义规则B、词法规则C、产生规则D、词法规则6、词法分析器的输入是＿＿＿B＿＿＿。

A、单词符号串B、源程序C、语法单位D、目标程序7、中间代码生成时所遵循的是＿＿＿C＿＿＿。

A、语法规则B、词法规则C、语义规则D、等价变换规则8、编译程序是对＿＿＿D＿＿＿。

A、汇编程序的翻译B、高级语言程序的解释执行C、机器语言的执行D、高级语言的翻译9、文法G：S→xSx|y所识别的语言是＿＿＿C＿＿＿。

A、xyxB、(xyx)*C、x n yx n(n≥0)D、x*yx*10、文法G描述的语言L(G)是指＿＿＿A＿＿＿。

A、L(G)={α|S+ ⇒α ,α∈V T*}B、L(G)={α|S*⇒α,α∈V T*}C、L(G)={α|S*⇒α,α∈(V T∪V N*)}D、L(G)={α|S+ ⇒α,α∈(V T∪V N*)}11、有限状态自动机能识别＿＿＿C＿＿＿。

A、上下文无关文法B、上下文有关文法C、正规文法D、短语文法12、设G为算符优先文法，G的任意终结符对a、b有以下关系成立＿＿＿C＿＿＿。

A、若f(a)>g(b)，则a>bB、若f(a)<g(b)，则a<bC、A~B都不一定成立D、A~B一定成立13、如果文法G是无二义的，则它的任何句子α＿＿＿A＿＿＿。

A、最左推导和最右推导对应的语法树必定相同B、最左推导和最右推导对应的语法树可能不同C、最左推导和最右推导必定相同D、可能存在两个不同的最左推导，但它们对应的语法树相同14、由文法的开始符经0步或多步推导产生的文法符号序列是＿＿＿C＿＿＿。

《计算机编译原理》试卷B参考答案一、单项选择题（每小题1分，共25分）1、有文法G：E→E*T|TT→T+i|i句子1+2*8+6按该文法G归约，其值为＿＿＿B＿＿＿。

A、23B、42C、30D、172、规范归约指＿＿＿B＿＿＿。

A、最左推导的逆过程B、最右推导的逆过程C、规范推导D、最左归约的逆过程3、词法分析所依据的是＿＿＿B＿＿＿。

A、语义规则B、构词规则C、语法规则D、等价变换规则4、词法分析器的输出结果是＿＿＿C＿＿＿。

A、单词的种别编码B、单词在符号表中的位置C、单词的种别编码和自身值D、单词自身值5、正规式M1和M2等价是指＿＿＿C＿＿＿。

A、M1和M2的状态数相等B、M1和M2的有向弧条数相等C、M1和M2所识别的语言集相等D、M1和M2状态数和有向弧条数相等6、下面的状态转换图接受的字集为＿＿＿D＿＿＿。

A、以0开头的二进制数组成的集合B、以0结尾的二进制数组成的集合C、含奇数个0的二进制数组成的集合D、含偶数个0的二进制数组成的集合7、词法分析器作为独立的阶段使整个编译程序结构更加简洁、明确，因此，＿＿＿B＿＿＿。

A、词法分析器应作为独立的一遍B、词法分析器作为子程序较好C、词法分析器分解为多个过程，由语法分析器选择使用D、词法分析器并不作为一个独立的阶段8、若a为终结符，则A→α·aβ为＿＿＿B＿＿＿项目A、归约B、移进C、接受D、待约9、若项目集I k含有A→α·，则在状态k时，仅当面临的输入符号a∈FOLLOW(A)时，才采取“A→α·”动作的一定是＿＿＿D＿＿＿。

A、LALR文法B、LR（0）文法C、LR（1）文法D、SLR（1）文法10、就文法的描述能力来说，有＿＿＿C＿＿＿。

A、SLR（1）⊂LR（0）B、LR（1）⊂LR（0）C、SLR（1）⊂LR（1）D、无二义文法⊂LR（1）11、在LR（0）的ACTION子表中，如果某一行中存在标记“r j”的栏，则＿＿＿A＿＿＿。

计算机科学与技术专业本专业是计算机硬件与软件相结合、面向系统、侧重应用的宽口径专业。

通过基础教学与专业训练，培养基础知识扎实、知识面宽、工程实践能力强，具有开拓创新意识，在计算机科学与技术领域从事科学研究、教育、开发和应用的高级人才。

本专业开设的主要课程有：电子技术、离散数学、程序设计、数据结构、操作系统、计算机组成原理、微机系统、计算机系统结构、编译原理、计算机网络、数据库系统、软件工程、人工智能、计算机图形学、数字图像处理、计算机通讯原理、多媒体信息处理技术、数字信号处理、计算机控制、网络计算、算法设计与分析、信息安全、应用密码学基础、信息对抗、移动计算、数论与有限域基础、人机界面设计、面向对象程序设计等。

计算机科学与技术专业从三年级开始，设有计算机软件、计算机应用、计算机安全技术三个方向，分别供不同兴趣的同学根据自身发展方向自由选择！本专业毕业生应获得以下几个方面的知识和能力：1．掌握电子技术和计算机组成与体系结构的基本原理、分析方法和实验技能，能从事计算机硬件系统开发与设计。

2．掌握程序设计语言、算法与数据结构、操作系统以及软件设计方法和工程的基本理论、基本知识与基本技能，具有较强的程序设计能力,能从事系统软件和大型应用软件的开发与研制。

3．掌握并行处理、分布式系统、网络与通信、多媒体信息处理、计算机安全、图形图象处理以及计算机辅助设计等方面的基本理论、分析方法和工程实践技能，具有计算机应用和开发的能力。

4．掌握计算机科学的基本理论，具有从事计算机科学研究的坚实基础。

计算机科学与技术专业培养方案一、培养目标及模式本专业培养德、智、体、美全面发展，具备自然科学基础知识，系统地掌握计算机科学理论、计算机软硬件系统及应用知识和技能的高级人才。

毕业生基本具备本领域分析问题和解决问题的能力，具备良好外语运用能力。

本专业培养模式分为“研究开发型”和“工程应用型”两种，分别对应“计算机科学”和“计算机工程”两个方向，各方向对应的培养目标是：●“计算机科学”方向：具有扎实、深入的高等数理基础和专业理论基础；外语水平高，听说读写能力强；具有较强的知识更新能力、创新能力、综合设计能力和工程化能力；具有一定的学科前沿知识和从事科学研究的能力。

1.编译程序的工作情况有三种，分别是解释型、编译型和（）。

A.综合型B.并列型C.汇编型D.不确定型【参考答案】: C2.文法中不包含左公共因子是LL(1)文法的（）。

A.充分条件B.必要条件C.充要条件D.即不充分也不必要的条件【参考答案】: B3.在规范归约中用来刻画可归约串的是（）。

A.短语B.句柄C.最左素短语D.素短语【参考答案】: B4.文法G[S]：S→S+U|U ，U→U*V|V ，V→(S)a 。

则句型P+T+i的句柄和最左素短语为（）。

A.V+U和aB.V和V+UC.a和V+U+aD.V和U【参考答案】: B5.中间代码设计原则是（）。

A.简洁，占用内存少B.接近自然语言C.可替代编译程序D.容易生成和翻译为目标代码【参考答案】: D6.设有文法G[S]： S→S8|S9|Sa|Sc|a|b|c 下列句子中符合该文法的有（）。

①ab9 ②a9c98 ③aaa ④bc89 可选项有：A.①B.②③④C.③④D.①②③④【参考答案】: B7.编译程序工作的后端包含的阶段有（）。

A.语义分析、代码优化、代码生成B.词法分析、语法分析、代码生成C.中间代码生成、代码优化、代码生成D.语义分析、中间代码生成、代码优化【参考答案】: C8.一个句型中称为句柄的是该句型的最左（）。

A.最左终结符号B.所有短语C.所有句子D.最左直接短语【参考答案】: D9.设文法G[S]：S→SB|B ，B→0|b 则对句子0b0，以下推导为规范推导的是（）。

A.SSBSBBBBB0BB0bB0b0B.SSBSBBBBBBB0Bb00b0C.SSBSBBSB0Sb0Bb00b0D.SSBS0SB0Sb0Bb00b0【参考答案】: D10.已知文法G[E]：E→3EXY|34Y，YX→XY，4X→44，4Y→45，5Y→55 该文法是Chomsky文法类型中的（）。

A.0型文法B.1型文法C.2型文法D.3型文法【参考答案】: B11.一个LR分析器由三部分组成，分别是总控程序、分析表和（）。

#include<>#include<>#include<>#define MAX_COUNT 1024#define ILLEGAL_CHAR_ERR 1#define UNKNOWN_OPERATOR_ERR 2/*从标准输入读入第一个非空白字符(换行符除外)*/char getnbc(){char ch;ch = getchar();while (1){if (ch == '\r' || ch == '\t' || ch == ' '){ch = getchar();}else{break;}}return ch;}/*判断character是否为字母*/bool letter(char character){if ((character >= 'a'&&character <= 'z') || (character >= 'A'&&character <= 'Z')) return true;elsereturn false;}/*判断character是否为数字*/bool digit(char character){if (character >= '0'&&character <= '9')return true;elsereturn false;}/*回退字符*/void retract(char& character){ungetc(character, stdin);character = NULL;}/*返回保留字的对应种别*/int reserve(char* token){if (strcmp(token, "begin") == 0)return 1;else if (strcmp(token, "end") == 0)return 2;else if (strcmp(token, "integer") == 0)return 3;else if (strcmp(token, "if") == 0)return 4;else if (strcmp(token, "then") == 0)return 5;else if (strcmp(token, "else") == 0)return 6;else if (strcmp(token, "function") == 0) return 7;else if (strcmp(token, "read") == 0)return 8;else if (strcmp(token, "write") == 0)return 9;elsereturn 0;}/*返回标识符的对应种别*/int symbol(){return 10;}/*返回常数的对应种别*/int constant(){return 11;}/*按照格式输出单词符号和种别*/void output(const char* token, int kindNum){printf("%16s %2d\n", token, kindNum);}/*根据行号和错误码输出错误*/bool error(int lineNum, int errNum){char* errInfo;switch (errNum){case ILLEGAL_CHAR_ERR:errInfo = "出现字母表以外的非法字符";break;case UNKNOWN_OPERATOR_ERR:errInfo = "出现未知运算符";break;default:errInfo = "未知错误";}if (fprintf(stderr, "***LINE:%d %s\n", lineNum, errInfo) >= 0) return true;elsereturn false;}/*词法分析函数，每调用一次识别一个符号*/bool LexAnalyze(){static int lineNum = 1;char character;char token[17] = "";character = getnbc();switch (character){case'\n':output("EOLN", 24);lineNum++;break;case EOF:output("EOF", 25);return false;;if (fullName != NULL)strncpy(out, fullName + 1, strlen(fullName) - 1 - strlen(extension));elsestrncpy(out, in, strlen(in) - strlen(extension));}/*初始化函数，接收输入文件地址，并打开输入、输出、错误文件、将标准输入重定向到输入文件，将标准输出重定向到输出文件，标准错误重定向到错误文件*/bool init(int argc, char* argv[]){if (argc != 2){return false;}else{char* inFilename = argv[1];yd");rr");if (freopen(inFilename, "r", stdin) != NULL&&freopen(outFilename, "w", stdout) !=NULL&&freopen(errFilename, "w", stderr) != NULL)return true;elsereturn false;}}void main(int argc,char* argv[])//argv[1]是输入文件地址{if (init(argc,argv)){while (LexAnalyze()){}}fclose(stdin);fclose(stdout);fclose(stderr);return;}。

编译原理上机报告《DBMS的设计与实现》学号：姓名：手机：邮箱：完成时间：2013 年6月21日目录1.项目概况 (3)1.1基本目标 (3)1.2完成情况 (3)2.项目实现方案 (4)2.1逻辑结构与物理结构 (4)2.2语法结构与数据结构 (7)2.3执行流程 (19)2.4功能测试 (39)3.总结与未来工作 (48)3.1未完成功能 (48)3.2未来实现方案 (48)1.项目概况1.1 基本目标设计并实现一个DBMS原型系统，可以接受基本的SQL语句，对其进行词法分析、语法分析，然后解释执行SQL语句，完成对数据库文件的相应操作，实现DBMS的基本功能。

1.2 完成情况1.CREATE DATABASE 创建数据库2.SHOW DATABASES 显示数据库名3.DROP DATABASE 删除数据库E DATABASE 选择数据库5.CREATE TABLE 创建表6.SHOW TABLES 显示表名7.DROP TABLE 删除表8.INSERT 插入元组9.SELECT 查询元组10.DELETE 删除元组11.UPDATE 更新元组12.EXIT 退出系统2.项目实现方案2.1 逻辑结构与物理结构1.逻辑结构(1)系统数据库1)元数据的逻辑结构在我设计的系统数据库中，虽然建有元数据的文件，但是文件中没有任何数据，所以元数据的逻辑结构不存在。

2)基本数据的逻辑结构表1 系统数据库的基本数据的逻辑结构(2)用户数据库1)元数据的逻辑结构由于在我的设计中，为数据库中每个表创建一个基本数据文件，所以不需要ppt中的“起始页”，添加了一个“表中列的数目”的列，如下表所示：说明：表中col_type列，取值为整数，1表示字符串，2表示整型2)基本数据的逻辑结构与ppt中的参考方案不同的是，对于数据库中的每一个表，我并不是把每个表的基本数据均存放在一个与数据库同名的基本数据文件中，而是为每个表创建一个与表同名的基本数据文件。

《计算机编译原理》试卷A1参考答案一、单项选择题（每小题1分，共25分）1、语言是＿＿＿A＿＿＿A、句子的集合B、产生式的集合C、符号串的集合D、句型的集合2、编译程序前三个阶段完成的工作是＿＿＿C＿＿＿A、词法分析、语法分析和代码优化B、代码生成、代码优化和词法分析C、词法分析、语法分析、语义分析和中间代码生成D、词法分析、语法分析和代码优化3、一个句型中称为句柄的是该句型的最左＿＿＿D＿＿＿A、非终结符号B、短语C、句子D、直接短语4、下推自动机识别的语言是＿＿＿C＿＿＿A、0型语言B、1型语言C、2型语言D、3型语言5、扫描器所完成的任务是从字符串形式的源程序中识别出一个个具有独立含义的最小语法单位即＿＿＿B＿＿＿A、字符B、单词C、句子D、句型6、对应Chomsky四种文法的四种语言之间的关系是＿＿＿B＿＿＿A、L0⊂L1⊂L2⊂L3B、L3⊂L2⊂L1⊂L0C、L3=L2⊂L1⊂L0D、L0⊂L1⊂L2=L37、词法分析的任务是＿＿＿A＿＿＿A、识别单词B、分析句子的含义C、识别句子D、生成目标代码8、常用的中间代码形式不含＿＿＿D＿＿＿A、三元式B、四元式C、逆波兰式D、语法树9、代码优化的目的是＿＿＿C＿＿＿A、节省时间B、节省空间C、节省时间和空间D、把编译程序进行等价交换10、代码生成阶段的主要任务是＿＿＿C＿＿＿A、把高级语言翻译成汇编语言B、把高级语言翻译成机器语言C、把中间代码变换成依赖具体机器的目标代码D、把汇编语言翻译成机器语言11、一个上下文无关文法G包括四个组成部分：一组终结符，一组非终结符，一个开始符号，以及一组＿＿＿B＿＿＿。

A、字符串B、产生式C、数字符号D、文法12、程序的基本块是指＿＿＿D＿＿＿。

A、一个子程序B、一个仅有一个入口和一个出口的语句C、一个没有嵌套的程序段D、一组顺序执行的程序段，仅有一个入口和一个出口13、高级语言编译程序常用的语法分析方法中，递归下降分析法属于＿＿＿B＿＿＿分析方法。

《计算机编译原理》试卷A1参考答案一、单项选择题（每小题1分，共25分）1、语言是＿＿＿A＿＿＿A、句子的集合B、产生式的集合C、符号串的集合D、句型的集合2、编译程序前三个阶段完成的工作是＿＿＿C＿＿＿A、词法分析、语法分析和代码优化B、代码生成、代码优化和词法分析C、词法分析、语法分析、语义分析和中间代码生成D、词法分析、语法分析和代码优化3、一个句型中称为句柄的是该句型的最左＿＿＿D＿＿＿A、非终结符号B、短语C、句子D、直接短语4、下推自动机识别的语言是＿＿＿C＿＿＿A、0型语言B、1型语言C、2型语言D、3型语言5、扫描器所完成的任务是从字符串形式的源程序中识别出一个个具有独立含义的最小语法单位即＿＿＿B＿＿＿A、字符B、单词C、句子D、句型6、对应Chomsky四种文法的四种语言之间的关系是＿＿＿B＿＿＿A、L0⊂L1⊂L2⊂L3B、L3⊂L2⊂L1⊂L0C、L3=L2⊂L1⊂L0D、L0⊂L1⊂L2=L37、词法分析的任务是＿＿＿A＿＿＿A、识别单词B、分析句子的含义C、识别句子D、生成目标代码8、常用的中间代码形式不含＿＿＿D＿＿＿A、三元式B、四元式C、逆波兰式D、语法树9、代码优化的目的是＿＿＿C＿＿＿A、节省时间B、节省空间C、节省时间和空间D、把编译程序进行等价交换10、代码生成阶段的主要任务是＿＿＿C＿＿＿A、把高级语言翻译成汇编语言B、把高级语言翻译成机器语言C、把中间代码变换成依赖具体机器的目标代码D、把汇编语言翻译成机器语言11、一个上下文无关文法G包括四个组成部分：一组终结符，一组非终结符，一个开始符号，以及一组＿＿＿B＿＿＿。

A、字符串B、产生式C、数字符号D、文法12、程序的基本块是指＿＿＿D＿＿＿。

A、一个子程序B、一个仅有一个入口和一个出口的语句C、一个没有嵌套的程序段D、一组顺序执行的程序段，仅有一个入口和一个出口13、高级语言编译程序常用的语法分析方法中，递归下降分析法属于＿＿＿B＿＿＿分析方法。

// SyntaxAnalyzer.cpp : 定义控制台应用程序的入口点。

//#include<stdio.h>#include<string.h>#include<Windows.h>#define MAX_COUNT 1024#define SIGN_UNDEFINED_ERR 1#define SIGN_REDEFINED_ERR 2#define SIGN_EXECUTE_ERR 3#define NO_SIGN_ERR 4#define SIGN_RESERVE_ERR 5#define NO_PARA_ERR 6/*types是支持类型的集合*/typedef enum{ integer } types;/*记录变量信息的结构体*/typedef struct {char vname[17];char vproc[17];bool vkind;types vtype;int vlev;int vadr;} varRecord;/*记录过程信息的结构体*/typedef struct{char pname[17];types ptype;int plev;int varNum;int fadr;int ladr;int parameter;bool parameterIsDefined;} proRecord;/**********文法产生式如下**********A：程序A->BB：分程序B->begin C;M endC：说明与句表C->DC'C'->;DC'|εD：说明语句D->E|JE：变量说明E->integer FF：变量F->GG：标识符G->HG'G'->HG'|IG'|εH：字母H->a|...|z|A|...|ZI：数字I->0|1|...|9J：函数说明J->integer function G(K);L K：参数K->FL：函数体L->begin C;M endM：执行语句表M->NM'M'->;NM'|εN：执行语句N->O|P|Q|WO：读语句O->read(F)P：写语句P->write(F)Q：赋值语句Q->F:=RR：算术表达式R->SR'R'->-SR'|εS：项S->TS'S'->*TS'|εT：因子T->F|U|ZU：常数U->VV：无符号整数V->IV'V'->IV'|εW：条件语句W->if X then N else NX：条件表达式X->RYRY：关系运算符Y-><|<=|>|>=|=|<>Z：函数调用Z->G(R)**********************************/void A();void B();void C();void C_();void D();void E();void F();void G();void J();void K();void L();void M();void M_();void N();void O();void P();void Q();void R();void R_();void S();void S_();void T();void U();void W();void X();void Y();void Z();/*初始化函数：从输入文件读取数据，建立各个文件，初始化全局变量*/bool init(int argc, char* argv[]);/*结束处理函数，将var和pro数组中的元素输出到相应文件，填充输出文件*/ bool final();/*错误处理函数，参数分别为行号、错误码和错误符号*/bool error(int lineNum, int errNum, const char* sign);/*获得所处目录路径，包括最后斜杠，或者为空*/void getPath(char* in, char* out);/*获得文件名，不包括扩展*/void getFilename(char* in, char* out);/*获得下一符号,true表示已到队尾，false表示还未到队尾*/bool nextToken();/*获得当前符号的下一字符,true表示已到'\0'*/bool nextChar();/*判断变量是否已存在*/bool isVarExisted(char* vname, char* vproc, bool vkind);/*判断过程是否已存在，参数为过程名*/bool isProExisted(char* vname);/*获得下一符号，指针不变*/int getNextToken();char input[MAX_COUNT][17];//存放输入文件所有符号的数组int kind[MAX_COUNT];int inputCount;//输入符号的数量int pToken;//指向当前输入符号int pChar;//指向当前输入符号中的当前字符varRecord currentVar;//存放当前变量的信息proRecord currentPro;//存放当前过程的信息int lineNum;//当前行号varRecord var[MAX_COUNT];//存放变量名表项数组proRecord pro[MAX_COUNT];//存放过程名表项数组int varCount;//变量的数量int proCount;//过程的数量FILE* inFile;//输入文件句柄FILE* outFile;//输出文件句柄FILE* errFile;//错误文件句柄FILE* varFile;//变量文件句柄FILE* proFile;//过程文件句柄/*主函数*/int main(int argc, char* argv[]){if (init(argc, argv)){A();final();}return 0;}bool init(int argc, char* argv[]){if (argc != 2){return false;}else{char* inFilename = argv[1];char outFilename[MAX_COUNT] = "";char errFilename[MAX_COUNT] = "";char varFilename[MAX_COUNT] = "";char proFilename[MAX_COUNT] = "";char filename[MAX_COUNT] = "";char path[MAX_COUNT] = "";//获得文件名（不包括扩展名）和路径getFilename(inFilename, filename);getPath(inFilename, path);//生成输出文件全部路径strcat(outFilename, path);//strcat(outFilename, "\\");strcat(outFilename, filename);strcat(outFilename, ".dys");//生成错误文件全部路径strcat(errFilename, path);//strcat(errFilename, "\\");strcat(errFilename, filename);strcat(errFilename, ".err");//生成变量文件全部路径strcat(varFilename, path);//strcat(varFilename, "\\");strcat(varFilename, filename);strcat(varFilename, ".var");//生成过程文件全部路径strcat(proFilename, path);//strcat(proFilename, "\\");strcat(proFilename, filename);strcat(proFilename, ".pro");//打开文件句柄if ((inFile = fopen(inFilename, "r")) && (outFile = fopen(outFilename, "w")) && (errFile = fopen(errFilename, "w")) && (varFile = fopen(varFilename, "w")) && (proFile = fopen(proFilename, "w"))){//初始化单词指针、字符指针、行号、层次inputCount = 0;pToken = 0;pChar = 0;lineNum = 1;//当前行号//level = 0;//当前层次//varCountInPro = 0;strcpy(currentPro.pname, "");currentPro.plev = 0;currentPro.varNum = 0;currentPro.parameter = -1;varCount = 0;proCount = 0;//读取输入文件内容，初始化input数组while (!feof(inFile)){char stringOfLine[MAX_COUNT];if (fgets(stringOfLine, MAX_COUNT, inFile)){char lineString[20] = "";strncpy(lineString, stringOfLine, 19);char* kindString = strrchr(lineString, ' ');kind[inputCount] = atoi(kindString+1);char string[17] = "";strncpy(string, stringOfLine, 16);char* lastString = strrchr(string, ' ');strcpy(input[inputCount], lastString + 1);inputCount++;}}return true;}else{fclose(inFile);fclose(outFile);fclose(errFile);fclose(varFile);fclose(proFile);return false;}}}bool final(){for (int i = 0; i < varCount; i++){int vkind = var[i].vkind ? 1 : 0;char* vtype = (var[i].vtype == integer) ? "integer" : "";fprintf(varFile, "%16s %16s %d %s %d %d\n", var[i].vname, var[i].vproc, vkind, vtype, var[i].vlev, var[i].vadr);}for (int i = 0; i < proCount; i++){char* ptype = (pro[i].ptype == integer) ? "integer" : "";fprintf(proFile, "%16s %s %d %d %d\n", pro[i].pname, ptype, pro[i].plev, pro[i].fadr, pro[i].ladr);}if (fseek(inFile, 0, 0) == 0){while (!feof(inFile))fputc(fgetc(inFile), outFile);}bool val;val = fclose(inFile);val = fclose(outFile);val = fclose(errFile);val = fclose(varFile);val = fclose(proFile);return val;}bool error(int errNum,const char* symbol){char* errInfo;switch (errNum){case SIGN_UNDEFINED_ERR:fprintf(errFile, "***LINE:%d %s符号无定义\n", lineNum, input[pToken]);break;case SIGN_REDEFINED_ERR:fprintf(errFile, "***LINE:%d %s符号重定义\n", lineNum, input[pToken]);break;case SIGN_EXECUTE_ERR:fprintf(errFile, "***LINE:%d %s处不能匹配执行语句\n", lineNum, input[pToken]);break;case NO_SIGN_ERR:fprintf(errFile, "***LINE:%d %s处缺少%s\n", lineNum,input[pToken], symbol);break;case SIGN_RESERVE_ERR:errInfo = "以保留字开头";break;case NO_PARA_ERR:fprintf(errFile, "***LINE:%d 缺少形参%s的声明\n", lineNum, symbol);break;default:errInfo = "未知错误";}return true;}void getPath(char* in, char* out){char* name;name = strrchr(in, '\\');if (name != NULL)strncpy(out, in, strlen(in) - strlen(name) + 1);elsestrcpy(out, "");}void getFilename(char* in, char* out){char* fullName;char* extension;fullName = strrchr(in, '\\');extension = strrchr(in, '.');if (fullName != NULL)strncpy(out, fullName + 1, strlen(fullName) - 1 - strlen(extension));elsestrncpy(out, in, strlen(in) - strlen(extension));}bool nextToken(){pToken++;pChar = 0;if (strcmp(input[pToken], "EOF") == 0){return true;}while (strcmp(input[pToken], "EOLN") == 0){pToken++;lineNum++;}return false;}bool nextChar(){if (input[pToken][pChar] == '\0'){//nextToken();return true;}pChar++;return false;}bool isVarExisted(char* vname, char* vproc, bool vkind){for (int i = 0; i < varCount; i++){if ((strcmp(vname, var[i].vname) == 0) && (strcmp(vproc, var[i].vproc) == 0) && (var[i].vkind == vkind))return true;}for (int i = 0; i < proCount; i++){if (strcmp(vname, pro[i].pname) == 0)return true;}return false;}bool isProExisted(char* vname){for (int i = 0; i < varCount; i++){if (strcmp(vname, var[i].vname) == 0)return true;}for (int i = 0; i < proCount; i++){if (strcmp(vname, pro[i].pname) == 0)return true;}return false;}int getNextToken(){int pNextToken = pToken + 1;while (strcmp(input[pNextToken], "EOLN") == 0) {pNextToken++;}return pNextToken;}void A(){B();}void B(){if (strcmp(input[pToken], "begin") == 0){nextToken();}else{error(NO_SIGN_ERR,"begin");if (strcmp(input[pToken], "integer")!=0){nextToken();}}C();if (strcmp(input[pToken], ";") == 0){nextToken();}{error(NO_SIGN_ERR, ";");if ((strcmp(input[pToken], "integer") != 0) && (strcmp(input[pToken], "read") != 0) && (strcmp(input[pToken], "write") != 0) && (kind[pToken]!=10)){nextToken();}}M();if (strcmp(input[pToken], "end") == 0){nextToken();}else{error(NO_SIGN_ERR, "end");}}void C(){D();C_();}void C_(){if (strcmp(input[pToken], ";") == 0 && strcmp(input[getNextToken()], "integer") == 0) {nextToken();D();C_();}else{if (strcmp(input[pToken], "integer") == 0){error(NO_SIGN_ERR, ";");D();C_();}}void D(){if (strcmp(input[pToken + 1], "function") == 0) {J();}else{E();}}void E(){if (strcmp(input[pToken], "integer") == 0){nextToken();}else{error(NO_SIGN_ERR, "integer");//if (kind[pToken] != 10)//{nextToken();//}}strcpy(currentVar.vname, input[pToken]);strcpy(currentVar.vproc, currentPro.pname);if (pToken == currentPro.parameter){currentVar.vkind = true;currentPro.parameterIsDefined = true;}else{currentVar.vkind = false;}currentVar.vtype = integer;currentVar.vlev = currentPro.plev;currentVar.vadr = varCount;if (isVarExisted(input[pToken], currentPro.pname, currentVar.vkind))//如果存在变量{error(SIGN_REDEFINED_ERR,NULL);}else{if (currentPro.varNum == 0)//如果当前过程中变量数为0，则当前变量是当前过程的第一个变量{currentPro.fadr = currentVar.vadr;}dr = currentVar.vadr;//过程中最后一个变量在变量表中的位置currentPro.varNum++;//过程中变量数++var[varCount] = currentVar;//当前变量存入var数组varCount++;//变量数++}F();}void F(){G();}void G(){if (kind[pToken] == 10){nextToken();}/*char* keywords[] = { "begin", "end", "integer", "if", "then", "else", "function", "read", "write" };int keywordLength[] = { 5, 3, 7, 2, 4, 4, 8, 4, 5 };for (int i = 0; i < 9; i++){if (strncmp(input[pToken], keywords[i], keywordLength[i]) == 0){error(SIGN_RESERVE_ERR);}}H();nextToken();*/}void J(){proRecord proBackup = currentPro;//备份当前过程，在匹配完G过程后恢复if (strcmp(input[pToken], "integer") == 0){nextToken();}else{error(NO_SIGN_ERR, "integer");if (strcmp(input[pToken], "function") != 0){nextToken();}}if (strcmp(input[pToken], "function") == 0){nextToken();}else{error(NO_SIGN_ERR, "function");if (kind[pToken] != 10){nextToken();}}strcpy(currentPro.pname, input[pToken]);currentPro.ptype = integer;currentPro.plev++;currentPro.varNum = 0;currentPro.parameterIsDefined = false;if (isProExisted(input[pToken])){error(SIGN_REDEFINED_ERR,NULL);}if (strcmp(input[pToken], "(") == 0){nextToken();}else{error(NO_SIGN_ERR, "(");if (kind[pToken] != 10){nextToken();}}/*strcpy(currentVar.vname, input[pToken]); strcpy(currentVar.vproc, currentPro.pname); currentVar.vkind = true;currentVar.vtype = integer;currentVar.vlev = currentPro.plev; currentVar.vadr = varCount;*/currentPro.parameter = pToken;K();/*if (currentPro.varNum == 0){currentPro.fadr = currentVar.vadr;}dr = currentVar.vadr; currentPro.varNum++;var[varCount] = currentVar;varCount++;*/if (strcmp(input[pToken], ")") == 0){nextToken();}else{error(NO_SIGN_ERR, ")");if (strcmp(input[pToken], ";") != 0){nextToken();}}if (strcmp(input[pToken], ";") == 0){nextToken();}else{error(NO_SIGN_ERR, ";");if (strcmp(input[pToken], "begin") != 0){nextToken();}}L();currentPro = proBackup;//匹配完G过程后恢复原过程}void K(){F();}void L(){if (strcmp(input[pToken], "begin") == 0){nextToken();}else{error(NO_SIGN_ERR, "begin");if (strcmp(input[pToken], "integer") != 0){nextToken();}}C();if (!currentPro.parameterIsDefined){error(NO_PARA_ERR, input[currentPro.parameter]);}pro[proCount] = currentPro;//在这里而不是在J()函数最后把currentPro加入pro数组是因为M 中可能会使用当前过程(递归)proCount++;if (strcmp(input[pToken], ";") == 0){nextToken();}else{error(NO_SIGN_ERR, ";");if ((strcmp(input[pToken], "integer") != 0) && (strcmp(input[pToken], "read") != 0) && (strcmp(input[pToken], "write") != 0) && (kind[pToken] != 10)){nextToken();}}M();if (strcmp(input[pToken], "end") == 0){nextToken();}else{error(NO_SIGN_ERR, "end");if ((strcmp(input[pToken], ";") != 0) && (strcmp(input[pToken], "end") != 0)){nextToken();}}/*if (strcmp(input[pToken], "begin") == 0){nextToken();C();pro[proCount] = currentPro;//在这里而不是在J()函数最后把currentPro加入pro数组是因为M中可能会使用当前过程(递归)proCount++;if (strcmp(input[pToken], ";") == 0)nextToken();M();if (strcmp(input[pToken], "end") == 0){nextToken();}else{error(SIGN_MATCH_ERR);}}else{error(SIGN_MATCH_ERR);}}else{error(SIGN_MATCH_ERR);}*/}void M(){N();M_();}void M_(){if (strcmp(input[pToken], ";") == 0){nextToken();N();M_();}else{//if ((strcmp(input[pToken], "read") == 0) || (strcmp(input[pToken], "write") == 0)||(strcmp(input[pToken], "if") == 0)||(kind[pToken] == 10))if ((strcmp(input[pToken], "end") != 0) && (strcmp(input[pToken],"EOF") !=0 ))error(NO_SIGN_ERR, ";");N();M_();}}}void N(){if (strcmp(input[pToken], "read") == 0){O();}else if (strcmp(input[pToken], "write") == 0) {P();}else if (strcmp(input[pToken], "if") == 0){W();}else if (kind[pToken] == 10){Q();}else{error(SIGN_EXECUTE_ERR, NULL);nextToken();}}void O(){if (strcmp(input[pToken], "read") == 0){nextToken();}else{error(NO_SIGN_ERR, "read");if (strcmp(input[pToken], "(") != 0)nextToken();}}if (strcmp(input[pToken], "(") == 0){nextToken();}else{error(NO_SIGN_ERR, "(");if (kind[pToken] != 10){nextToken();}}if(!isVarExisted(input[pToken], currentPro.pname, false) && !isVarExisted(input[pToken], currentPro.pname, true)){error(SIGN_UNDEFINED_ERR,NULL);}F();if (strcmp(input[pToken], ")") == 0){nextToken();}else{error(NO_SIGN_ERR, ")");if ((strcmp(input[pToken], ";") != 0) && (strcmp(input[pToken], "end") != 0)){nextToken();}}}void P(){if (strcmp(input[pToken], "write") == 0){nextToken();}else{error(NO_SIGN_ERR, "write");if (strcmp(input[pToken], "(") != 0){nextToken();}}if (strcmp(input[pToken], "(") == 0){nextToken();}else{error(NO_SIGN_ERR, "(");if (kind[pToken] != 10){nextToken();}}if(!isVarExisted(input[pToken], currentPro.pname, false) && !isVarExisted(input[pToken], currentPro.pname, true)){error(SIGN_UNDEFINED_ERR,NULL);}F();if (strcmp(input[pToken], ")") == 0){nextToken();}else{error(NO_SIGN_ERR, ")");if ((strcmp(input[pToken], ";") != 0) && (strcmp(input[pToken], "end") != 0)){nextToken();}}}void Q(){if(!isVarExisted(input[pToken], currentPro.pname, false) && !isVarExisted(input[pToken], currentPro.pname, true) && !isProExisted(input[pToken])){error(SIGN_UNDEFINED_ERR,NULL);}F();if (strcmp(input[pToken], ":=") == 0){nextToken();}else{error(NO_SIGN_ERR, ":=");if ((kind[pToken] != 10) && (kind[pToken] != 11)){nextToken();}}R();}void R(){S();R_();}void R_(){if (strcmp(input[pToken], "-") == 0){nextToken();S();R_();}else{if ((kind[pToken] == 10) || (kind[pToken] == 11)){S();R_();}}}void S(){T();S_();}void S_(){if (strcmp(input[pToken], "*") == 0){nextToken();T();S_();}else{if ((kind[pToken] == 10) || (kind[pToken] == 11)){T();S_();}}}void T(){if (input[pToken][pChar] >= '0' && input[pToken][pChar] <= '9'){U();}else if (strcmp(input[getNextToken()], "(") == 0)///////////////////////pToken+1 {Z();}else{if (!isVarExisted(input[pToken], currentPro.pname, false)&& !isVarExisted(input[pToken], currentPro.pname, true)){error(SIGN_UNDEFINED_ERR,NULL);}F();}}void U(){if (kind[pToken] == 11){nextToken();}}void W(){if (strcmp(input[pToken], "if") == 0){nextToken();}else{error(NO_SIGN_ERR, "if");if ((kind[pToken] != 10) && (kind[pToken] != 11)){nextToken();}}X();if (strcmp(input[pToken], "then") == 0){nextToken();}else{error(NO_SIGN_ERR, "then");if ((strcmp(input[pToken], "integer") != 0) && (strcmp(input[pToken], "read") != 0) && (strcmp(input[pToken], "write") != 0) && (kind[pToken] != 10)){nextToken();}}N();if (strcmp(input[pToken], "else") == 0){nextToken();}else{error(NO_SIGN_ERR,"else");if ((strcmp(input[pToken], "integer") != 0) && (strcmp(input[pToken], "read") != 0) && (strcmp(input[pToken], "write") != 0) && (kind[pToken] != 10)){nextToken();}}N();}void X(){R();Y();R();}void Y(){if (strcmp(input[pToken], "<") == 0 || strcmp(input[pToken], "<=") == 0 ||strcmp(input[pToken], ">") == 0 || strcmp(input[pToken], ">=") == 0 || strcmp(input[pToken], "=") == 0 || strcmp(input[pToken], "<>") == 0){nextToken();}else{error(NO_SIGN_ERR, "关系运算符");if ((kind[pToken] != 10) && (kind[pToken] != 11)){nextToken();}}}void Z(){if (!isProExisted(input[pToken])){error(SIGN_UNDEFINED_ERR, NULL);}G();if (strcmp(input[pToken], "(") == 0){nextToken();}else{error(NO_SIGN_ERR, "(");if ((kind[pToken] != 10) && (kind[pToken] != 11)){nextToken();}}R();if (strcmp(input[pToken], ")") == 0){nextToken();}else{error(NO_SIGN_ERR, ")");if ((strcmp(input[pToken], "-") != 0) && (strcmp(input[pToken], "*") != 0) && (strcmp(input[pToken], ";") != 0) && (strcmp(input[pToken], "end"))){nextToken();}}}。