词法分析程序和语法分析程序 编译原理实验源代码与文档

#include<stdio.h> #include<string.h> int p,isError; char prog[80]; //存放所有输入字符 char token[8]; //存放词组 char ch; //单个字符 int syn,p,m,n; //syn:种别编码 double sum; int count; int isSignal; //是否带正负号(0不带，1负号，2正号） int isDecimal; //是否是小数 double decimal; //小数 int isExp; //是否是指数 int index; //指数幂 int isNegative; //是否带负号 double temp; int temp2; int repeat; //是否连续出现+,- void scanner(); char *rwtab[9]={"main","int","float","double","char","if","else","do","while"}; void E(); void T(); void F(); void scanner(); void main() { p=0; count=0; isDecimal=0; index=0; repeat=0; printf("\n please input the source string:\n"); do{ ch=getchar(); prog[p++]=ch; }while(ch!='#'); p=0; isError=0; scanner(); if((syn==20)||(syn==10)||(syn==26)) { E(); } if((ch=='#')&&(isError==0)) printf("success\n"); else printf("error\n"); } void E() { T(); while((syn==22)||(syn==23)) { scanner(); T(); } } void T() { F(); while((syn==24)||(syn==25)) { scanner(); F(); } } void F() { if((syn==20)||(syn==10)) scanner(); else if(syn==26) { scanner(); E(); if(syn==27) { scanner(); } else isError=1; } else isError=1; } void scanner() { sum=0; decimal=0; m=0; for(n=0;n<8;n++) token[n]=NULL; ch=prog[p++]; //从prog中读出一个字符到ch中 while(ch==' ') //跳过空字符（无效输入） ch=prog[p++]; if(((ch>='a')&&(ch<='z'))||((ch>='A')&&(ch<='Z'))) //ch是字母字符 { while(((ch>='a')&&(ch<='z'))||((ch>='A')&&(ch<='Z'))||((ch>='0')&&(ch<='9'))) { token[m++]=ch; //ch=>token ch=prog[p++]; //读下一个字符 } token[m++]='\0'; p--; //回退一格 syn=10; //标识符 //如果是"begin","if","then","while","do","end"标识符中的一个 for(n=0;n<9;n++) if(strcmp(token,rwtab[n])==0) { syn=n+1; break; } } else if((ch>='0')&&(ch<='9')) { IsNum: if(isSignal==1) { //token[m++]='-'; } while((ch>='0')&&(ch<='9')) { sum=sum*10+ch-'0'; //ch中数字本身是当做字符存放的 ch=prog[p++]; } if(ch=='.') { isDecimal=1; ch=prog[p++]; count=0; //之前忘了清零,123.123+123.123#两个浮点数就无法识别 while((ch>='0')&&(ch<='9')) { //pow(x,y)计算x的y次幂 temp=(ch-'0')*pow(0.1,++count); decimal=decimal+temp; //AddToDec(); ch=prog[p++]; } sum=sum+decimal; } if(ch=='e'||ch=='E') { isExp=1; ch=prog[p++]; if(ch=='-') { isNegative=1; ch=prog[p++]; } while((ch>='0')&&(ch<='9')) { //指数 index=index*10+ch-'0'; ch=prog[p++]; } //10的幂 //123e3代表123*10(3) //sum=sum*pow(10,index);是错误的 if(isNegative) sum=sum*pow(0.1,index); else sum=sum*pow(10,index); } if(isSignal==1) { sum=-sum; isSignal=0; } p--; syn=20; } else switch(ch) { case '<': m=0; token[m++]=ch; ch=prog[p++]; if(ch=='=') { syn=35; token[m++]=ch; } else { syn=34; p--; } break; case '>': m=0; token[m++]=ch; ch=prog[p++]; if(ch=='=') { syn=33; token[m++]=ch; } else { syn=32; p--; } break; case '=': m=0; token[m++]=ch; ch=prog[p++]; if(ch=='=') { syn=36; token[m++]=ch; } else { syn=21; p--; } break; case '+': temp2=prog[p]; token[m++]=ch; if((temp2>='0')&&(temp2<='9')&&(repeat==1)) { isSignal=2; ch=prog[p++]; repeat=0; goto IsNum; } if(((temp2=='+')||(temp2=='-'))&&(repeat==0)) //如果重复出现符号，才将后边的+，-视为正负号 { repeat=1; //ch=prog[p++]; } syn=22; break; case '-': temp2=prog[p]; token[m++]=ch; if((temp2>='0')&&(temp2<='9')&&(repeat==1)) { isSignal=1; ch=prog[p++]; //读“-”下一个字符 repeat=0; goto IsNum; //转到数字的识别 } if(((temp2=='+')||(temp2=='-'))&&(repeat==0)) //如果重复出现符号，才将后边的+，-视为正负号 { repeat=1; //预言会重复 //ch=prog[p++]; //读下一个字符 } syn=23; break; /* case '*': syn=24; token[m++]=ch; break; */ case '*': temp2=prog[p]; token[m++]=ch; if(temp2=='+') { isSignal=2; repeat=1; } else if(temp2=='-') { isSignal=1; repeat=1; } syn=24; break; case '/': syn=25; token[m++]=ch; break; /* case '(': syn=26; token[m++]=ch; break; */ case '(': temp2=prog[p]; token[m++]=ch; if(temp2=='+') { isSignal=2; repeat=1; } else if(temp2=='-') { isSignal=1; repeat=1; } syn=26; break; case ')': syn=27; token[m++]=ch; break; case '{': syn=28; token[m++]=ch; break; case '}': syn=29; token[m++]=ch; break; case ',': syn=30; token[m++]=ch; break; case ';': syn=31; token[m++]=ch; break; case'#': syn=0; token[m++]=ch; break; default: syn=-1; } } /* #include<stdio.h> #include<string.h> char prog[20],token[8]; char ch; int p,isError; void E(); void T(); void F(); void main() { p=0; printf("\n please input the source string:\n"); do{ ch=getchar(); prog[p++]=ch; }while(ch!='#'); p=0; isError=0; ch=prog[p++]; E(); if((ch=='#')&&(isError==0)) printf("success\n"); else printf("error\n"); } void E() { T(); if((ch=='+')||(ch=='-')) { ch=prog[p++]; T(); } } void T() { F(); if((ch=='*')||(ch=='/')) { ch=prog[p++]; F(); } } void F() { if((ch=='a')||(ch=='b')||(ch=='c')) ch=prog[p++]; else if(ch=='(') { ch=prog[p++]; E(); if(ch==')') { ch=prog[p++]; } else isError=1; } else isError=1; } */