语法分析实验-2

实验目的及内容实现下述我们定义的语言的语法分析器这种语言的程序结构很简单，语法相当于c的函数体，即由一对大括号括起来的语句序列，没有过程或函数。声明语句、表达式语句及控制语句的写法都与c类似，但规定：一条声明语句只能声明一个整型变量，没有数组；控制语句只是if、for和while三个语句，这三个语句本身也可以包含语句序列；表达式仅局限于布尔表达式和整型算术表达式，布尔表达式由对两个算术表达式的比较组成，该比较使用<,>,<=,>=,==,!=比较运算符；算术表达式可以包括整型常数、变量以及+,－,*,/这四个运算符。另外，还可以有复合语句。用read和write语句实现输入输出。注释用/*和*/括起来，但注释不能嵌套。实验原理及基本技术路线图（方框原理图或程序流程图）实验所用的产生式：<程序>→‘{’<声明序列><语句序列>‘}’<声明序列>→<声明语句>{<声明语句>}<声明语句>→int<标志符>;<语句序列>→<语句>{<语句>}<语句>→<if语句>|<while语句>|<for语句>|<read语句>|<write语句>|<复合语句>|<表达式语句><if语句>→if(<表达式>)<语句>[else<语句>]<while语句>→while(<表达式>)<语句><for语句>→for(<表达式>;<表达式>;<表达式>)<语句><read语句>→read<标识符>;<write语句>→write<表达式>;<复合语句>→‘{’<语句序列>‘}’<表达式语句>→<表达式>;|;<表达式>→<布尔表达式>|<标志符>=<布尔表达式><布尔表达式>→<算术表达式>|<算术表达式>(>|<|>=|<=|==|!=)<算术表达式><算术表达式>→<项>{(+|-)<项>}<项>→<因子>{(*|/)<因子>}<因子>→(<算术表达式>)|<标识符>|<无符号整数>实验中自定义的函数：intparse();语法分析主函数intprogram();<程序>intstatement();<语句>intexpression_stat();<表达式语句>intexpression();<表达式>intbool_expr();<布尔表达式>intadditive_expr();<算术表达式>intterm();<项>intfactor();<因子>intif_stat();<if语句>intwhile_stat();<while语句>intfor_stat();<for语句>intwrite_stat();<write语句>intread_stat();<read语句>intdeclaration_stat();<声明语句>intdeclaration_list();<声明序列>intstatement_list();<语句序列>intcompound_stat();<复合语句>所用仪器、材料（设备名称、型号、规格等或使用软件）开发环境/平台：vc++6.0实验器材：兼容计算机一台实验方法、步骤（或：程序代码或操作过程）实验源代码：#include<stdio.h>#include<ctype.h>#include<conio.h>#include<string.h>intparse();intprogram();intstatement();intexpression_stat();intexpression();intbool_expr();intadditive_expr();intterm();intfactor();intif_stat();intwhile_stat();intfor_stat();intwrite_stat();intread_stat();intdeclaration_stat();intdeclaration_list();intstatement_list();intcompound_stat();chartoken[20],token1[40];//token保存单词符号，token1保存单词值charScanout[300];//保存词法分析输出文件名longcount=0;FILE*fp;//用于指向输入输出文件的指针voidmain(){strcpy(Scanout,"输出.txt");parse();}//语法分析程序intparse(){ intes=0; if((fp=fopen(Scanout,"r"))==NULL) {printf("\n打开%s错误!\n",Scanout); es=10; } if(es==0)es=program(); printf("=====语法分析结果!======\n"); switch(es) { case0:printf("语法分析成功!\n");break; case10:printf("打开文件%s失败!\n",Scanout);break; case1:printf("缺少{!\n");break; case2:printf("缺少}!\n");break; case3:printf("缺少标识符!\n");break; case4:printf("少分号!\n");break; case5:printf("缺少(!\n");break; case6:printf("缺少)!\n");break; case7:printf("缺少操作数!\n");break; case8:printf("缺少运算符!\n");break; } fclose(fp); return(es);}voidget(){ fscanf(fp,"%s%s\n",&token,&token1); printf("%s%s\n",token,token1); count++;}voidback(intj)//文件指针回退一位{ inti; printf("文件指针回退%d位!\n",j); rewind(fp); for(i=0;i<count;i++) { fscanf(fp,"%s%s\n",&token,&token1); }}//<程序>::={<声明序列><语句序列>}//program::='{'<declaration_list><statement_list>'}'intprogram(){intes=0; get();if(strcmp(token,"{"))//判断是否'{'{ es=1; return(es);}es=declaration_list();if(es>0)return(es);es=statement_list();if(es>0)return(es);if(strcmp(token,"}"))//判断是否'}'{ es=2; return(es);}return(es);}//<声明序列>::=<声明序列><声明语句>|<声明语句>//<declaration_list>::=//<declaration_list><declaration_stat>|<declaration_stat>//改成<declaration_list>::={<declaration_stat>}intdeclaration_list(){ intes=0; get(); while(strcmp(token,"int")==0) { es=declaration_stat(); if(es>0)return(es); } return(es);}//<声明语句>::=int<变量>；//<declaration_stat>::=intID;intdeclaration_stat(){ intes=0; get(); if(strcmp(token,"ID")) return(es=3);//不是标识符 get(); if(strcmp(token,";")) return(es=4); get(); return(es);}//<语句序列>::=<语句序列><语句>|<语句>//<statement_list>::=<statement_list><statement>|<statement>//改成<statement_list>::={<statement>}intstatement_list(){ intes=0; while(strcmp(token,"(")==0||strcmp(token,"NUM")==0||strcmp(token,"ID")==0||strcmp(token,"if")==0||strcmp(token,"while")==0||strcmp(token,"for")==0||strcmp(token,"read")==0||strcmp(token,"write")==0||strcmp(token,"{")==0) { es=statement(); if(es>0)return(es); get(); } returnes;}//<语句>::=<if语句>|<while语句>|<for语句>|<read语句>//|<write语句>|<复合语句>|<表达式语句>//<statement>::=<if_stat>|<while_stat>|<for_stat>//|<compound_stat>|<expression_stat>intstatement()//error；；；；；；{ intes=0; if(strcmp(token,"if")==0) { es=if_stat(); returnes; } if(strcmp(token,"while")==0) { es=while_stat(); returnes; } if(strcmp(token,"for")==0) { es=for_stat(); returnes; } if(strcmp(token,"read")==0) { es=read_stat(); returnes; } if(strcmp(token,"write")==0) { es=write_stat(); returnes; } if(strcmp(token,"{")==0) { es=compound_stat(); returnes; } else { es=expression_stat(); returnes; } returnes; }//<IF语句>::=if(<表达式>)<语句>[else<语句>]//<IF_stat>::=if(<expr>)<statement>[else<statement>]intif_stat(){ intes=0; inttemp=0; get(); if(strcmp(token,"(")==0) { get(); if(strcmp(token,"ID")==0||strcmp(token,"NUM")==0||strcmp(token,"(")==0) { es=expression(); } else if(strcmp(token,"ID")) return(es=3); else if(strcmp(token,"NUM")) return(es=7); get(); if(strcmp(token,")")==0) { get(); es=statement(); temp=es; if(es>0)returnes; get(); if(strcmp(token,"else")==0) { get(); es=statement();} else { count-=1; back(1); es=temp; }//需要做回退操作 } else { es=6; returnes; } } else es=5; returnes;}//<while语句>::=while(<表达式>)<语句>//<while_stat>::=while(<expr>)<statement>intwhile_stat(){ intes=0; get(); if(strcmp(token,"(")==0) { get(); if(strcmp(token,"ID")==0||strcmp(token,"NUM")==0||strcmp(token,"(")==0) { es=expression(); } else if(strcmp(token,"ID")) return(es=3); else if(strcmp(token,"NUM")) return(es=7); get(); if(strcmp(token,")")==0) { get(); es=statement(); returnes; } } else { es=5; returnes; } returnes;}//<for语句>::=for(<表达式>;<表达式>;<表达式>)<语句>//<for_stat>::=for(<expr>,<expr>,<expr>)<statement>intfor_stat(){ intes=0; get(); if(strcmp(token,"(")==0) { get(); if(strcmp(token,"ID")==0||strcmp(token,"NUM")==0||strcmp(token,"(")==0) { es=expression(); if(es>0)returnes; } else if(strcmp(token,"ID")) return(es=3); else if(strcmp(token,"NUM")) return(es=7); get(); if(strcmp(token,";")==0) { get(); if(strcmp(token,"ID")==0||strcmp(token,"NUM")==0||strcmp(token,"(")==0) { es=expression(); if(es>0)returnes; } else if(strcmp(token,"ID")) return(es=3); else if(strcmp(token,"NUM")) return(es=7); get(); if(strcmp(token,";")==0) { get(); if(strcmp(token,"ID")==0||strcmp(token,"NUM")==0||strcmp(token,"(")==0) { es=expression(); if(es>0)returnes; } else if(strcmp(token,"ID")) return(es=3); else if(strcmp(token,"NUM")) return(es=7); get(); if(strcmp(token,")")==0) { get(); es=statement(); returnes; } else { es=6; returnes; } } else { es=4; returnes; } } else { es=4; returnes; } } else { es=5; returnes; } returnes; }//<write_语句>::=write<表达式>;//<write_stat>::=write<expression>;intwrite_stat(){ intes=0; get(); if(strcmp(token,"ID")==0||strcmp(token,"NUM")==0||strcmp(token,"(")==0) { es=expression(); if(es>0)returnes; get(); if(strcmp(token,";"))return4; } else if(strcmp(token,"ID")) return(es=3); else if(strcmp(token,"NUM")) return(es=7); returnes;}//<read_语句>::=read<变量>;//<read_stat>::=readID;intread_stat(){ intes=0; get(); if(strcmp(token,"ID")) return(es=3);//不是标识符 get(); if(strcmp(token,";"))return4; returnes;}//<复合语句>::={<语句序列>}//<compound_stat>::='{'<statement_list>'}'intcompound_stat(){//复合语句函数 intes=0; get(); es=statement_list(); if(es>0)returnes; if(strcmp(token,"}"))return(es=2); returnes;}//<表达式语句>::=<表达式>;|;//<expression_stat>::=<expression>;|;intexpression_stat(){ intes=0; if(strcmp(token,";")==0)returnes; else { if(strcmp(token,"ID")==0||strcmp(token,"NUM")==0||strcmp(token,"(")==0) { es=expression(); if(es>0)returnes; } get(); if(strcmp(token,";"))return4; } returnes;}//<表达式>::=<标识符>=<布尔表达式>|<布尔表达式>//<expr>::=ID=<bool_expr>|<bool_expr>intexpression(){ intes=0; if(strcmp(token,"ID")==0) { get(); if(strcmp(token,"=")==0) { get(); if(strcmp(token,"ID")==0||strcmp(token,"NUM")==0||strcmp(token,"(")==0) es=bool_expr(); if(es>0)returnes; } else { count-=2; back(2); get(); if(strcmp(token,"ID")==0||strcmp(token,"NUM")==0||strcmp(token,"(")==0) es=bool_expr(); } } returnes;}//<布尔表达式>::=<算术表达式>|<算术表达式>(>|<|>=|<=|==|!=)<算术表达式>//<bool_expr>::=<additive_expr>//|<additive_expr>(>|<|>=|<=|==|!=)<additive_expr>intbool_expr(){ intes=0; es=additive_expr(); if(es>0)returnes; get(); if(strcmp(token,">")==0||strcmp(token,"<")==0||strcmp(token,">=")==0||strcmp(token,"<=")==0||strcmp(token,"==")==0||strcmp(token,"!=")==0) { get(); if(strcmp(token,"ID")==0||strcmp(token,"NUM")==0||strcmp(token,"(")==0) es=additive_expr(); if(es>0)returnes; } else//keystep { count--; back(1); } returnes;}//<算术表达式>::=<项>{(+|-)<项>}//<additive_expr>::=<term>{(+|-)<term>}intadditive_expr(){ intes=0; es=term(); if(es>0)returnes; get(); if(strcmp(token,"+")==0||strcmp(token,"-")==0) { get(); if(strcmp(token,"ID")==0||strcmp(token,"NUM")==0||strcmp(token,"(")==0) es=term(); if(es>0)returnes; } else//keystep { count--; back(1); } r