編譯原理C語言詞法分析器

編譯原理C語言詞法分析器編譯原理C語言詞法分析器編譯原理C語言詞法分析器xxx公司編譯原理C語言詞法分析器文件編號：文件日期：修訂次數(shù)：第1.0次更改批準(zhǔn)審核制定方案設(shè)計(jì)，管理制度編譯原理C語言詞法分析器一、實(shí)驗(yàn)題目編制并調(diào)試C詞法分析程序。txt源代碼:main(){intsum=0,it=1;/*Variabledeclaration*/if(sum==1)it++;elseit=it+2;}設(shè)計(jì)其詞法分析程序，能識別出所有的關(guān)鍵字、標(biāo)識符、常數(shù)、運(yùn)算符（包括復(fù)合運(yùn)算符，如++）、界符；能過濾掉源程序中的注釋、空格、制表符、換行符；并且能夠?qū)σ恍┰~法規(guī)則的錯誤進(jìn)行必要的處理，如：標(biāo)識符只能由字母、數(shù)字和下劃線組成，且第一個字符必須為字母或下劃線。實(shí)驗(yàn)要求:要給出所分析語言的詞法說明，相應(yīng)的狀態(tài)轉(zhuǎn)換圖，單詞的種別編碼方案，詞法分析程序的主要算法思想等。二、實(shí)驗(yàn)?zāi)康?、理解詞法分析在編譯程序中的作用；2、掌握詞法分析程序的實(shí)現(xiàn)方法和技術(shù)；3、加深對有窮自動機(jī)模型的理解。三、主要函數(shù)voidload()voidchar_search(char*word)voidmain()voidintb_search(char*word)voidscan()voidc_search(char*word)voidinta_search(char*word)voidcc_search(char*word)四、設(shè)計(jì)1.主函數(shù)voidmain()繪制程序界面繪制程序界面調(diào)用初始化函數(shù)：voidload()實(shí)現(xiàn)文件的建立調(diào)用初始化函數(shù)：voidload()實(shí)現(xiàn)文件的建立調(diào)用主掃描函數(shù)：voidscan()實(shí)現(xiàn)文件的掃描調(diào)用主掃描函數(shù)：voidscan()實(shí)現(xiàn)文件的掃描分析完成后指引用戶查看相關(guān)文件，直到用戶輸入退出命令分析完成后指引用戶查看相關(guān)文件，直到用戶輸入退出命令函數(shù)結(jié)束函數(shù)結(jié)束2.初始化函數(shù)voidload()通過文件指針建立相關(guān)文件通過文件指針建立相關(guān)文件函數(shù)結(jié)束函數(shù)結(jié)束3.保留字及標(biāo)識符判斷函數(shù)voidchar_search(char*word)接收數(shù)據(jù)接收數(shù)據(jù)是否為保留字是否為保留字否：查標(biāo)識符表是：寫入輸出文件否：查標(biāo)識符表是：寫入輸出文件沒找到：寫入表文件找到：寫入輸出文件沒找到：寫入表文件找到：寫入輸出文件寫入輸出文件寫入輸出文件4.整數(shù)類型判斷函數(shù)voidinta_search(char*word)接收數(shù)據(jù)找到：寫入輸出文件寫入輸出文件接收數(shù)據(jù)找到：寫入輸出文件寫入輸出文件查表查表沒找到：寫入整數(shù)常量表文件沒找到：寫入整數(shù)常量表文件5.浮點(diǎn)類型判斷函數(shù)voidintb_search(char*word)沒找到：寫入整數(shù)常量表文件找到：寫入輸出文件查表接收數(shù)據(jù)寫入輸出文件沒找到：寫入整數(shù)常量表文件找到：寫入輸出文件查表接收數(shù)據(jù)寫入輸出文件6.字符串常量判斷函數(shù)voidcc_search(char*word)7.字符常量判斷函數(shù)voidc_search(char*word)同4、5函數(shù)圖8.主掃描函數(shù)voidscan()函數(shù)開始函數(shù)開始讀入源文件中的一個單詞讀入源文件中的一個單詞判斷宏定義判斷宏定義忽略忽略無效字符無效字符忽略忽略調(diào)用保留字及標(biāo)識符函數(shù)voidchar_search進(jìn)行處理調(diào)用保留字及標(biāo)識符函數(shù)voidchar_search進(jìn)行處理字符串字符常量字符常量調(diào)用字符常量判斷函數(shù)voidc_search調(diào)用字符常量判斷函數(shù)voidc_search進(jìn)行處理調(diào)用字符串常量判斷函數(shù)voidcc_search進(jìn)行處理字符串常量調(diào)用字符串常量判斷函數(shù)voidcc_search進(jìn)行處理字符串常量整數(shù)常量整數(shù)常量調(diào)用整數(shù)類型判斷函數(shù)voidinta_search進(jìn)行處理調(diào)用整數(shù)類型判斷函數(shù)voidinta_search進(jìn)行處理調(diào)用浮點(diǎn)類型判斷函數(shù)voidintb_search進(jìn)行處理浮點(diǎn)數(shù)常量調(diào)用浮點(diǎn)類型判斷函數(shù)voidintb_search進(jìn)行處理浮點(diǎn)數(shù)常量注釋注釋寫入注釋文件寫入注釋文件查運(yùn)算符、分隔符表并寫入輸出文件限制符查運(yùn)算符、分隔符表并寫入輸出文件限制符五、關(guān)鍵代碼#include<>#include<>#include<>char*key0[]={"","auto","break","case","char","const","continue","default","do","double","else","enum","extern","float","for","goto","if","int","long","register","return","short","signed","sizeof","static","struct","switch","typedef","_Complex","_Imaginary","union","unsigned","void","volatile","while"};/*保留字表*/char*key1[]={"","(",")","[","]","{","}",",",";","'"};/*分隔符表*/char*key2[]={"","+","-","*","/","%","<",">","==",">=","<=","!=","!","&&","||","<<",">>","~","|","^","&","=",":","->","++","--",".","+=","-=","*=","/="};/*運(yùn)算符表*/intxx0[35],xx1[10],xx2[31];inttemp_key3=0,temp_c40=0,temp_c41=0,temp_c42=0,temp_c43=0;/*******初始化函數(shù)*******/voidload(){ intmm; for(mm=0;mm<=34;mm++) { xx0[mm]=0; } for(mm=0;mm<=9;mm++) { xx1[mm]=0; } for(mm=0;mm<=30;mm++) { xx2[mm]=0; } FILE*floading; if((floading=fopen("","w"))==NULL) { printf("Error!Can'tcreatefile:"); return; } fclose(floading); /*建立保留字表文件：*/ if((floading=fopen("","w"))==NULL) { printf("Error!Can'tcreatefile:"); return; } /*建立分隔符表文件：*/ if((floading=fopen("","w"))==NULL) { printf("Error!Can'tcreatefile:"); return; } fclose(floading); /*建立運(yùn)算符表文件：*/ if((floading=fopen("","w"))==NULL) { printf("Error!Can'tcreatefile:"); return; } fclose(floading); /*建立標(biāo)識符表文件：*/ if((floading=fopen("","w"))==NULL) { printf("Error!Can'tcreatefile:"); return; } fclose(floading); /*建立整數(shù)類型常量表文件：*/ if((floading=fopen("","w"))==NULL) { printf("Error!Can'tcreatefile:"); return; } fclose(floading); /*建立浮點(diǎn)類型常量表文件：*/ if((floading=fopen("","w"))==NULL) { printf("Error!Can'tcreatefile:"); return; } fclose(floading); /*建立字符類型常量表文件：*/ if((floading=fopen("","w"))==NULL) { printf("Error!Can'tcreatefile:"); return; } fclose(floading); /*建立字符串類型常量表文件：*/if((floading=fopen("","w"))==NULL) { printf("Error!Can'tcreatefile:"); return; } fclose(floading); /*建立注釋文件：*/ if((floading=fopen("","w"))==NULL) { printf("Error!Can'tcreatefile:"); return; } fclose(floading); /*建立內(nèi)部碼文件：*/ if((floading=fopen("temp_key1","w"))==NULL) { printf("Error!Can'tcreatefile:temp_key1"); return; } fclose(floading); /*建立保留字臨時表文件：temp_key1*/ if((floading=fopen("temp_key3","w"))==NULL) { printf("Error!Can'tcreatefile:temp_key3"); return; } fclose(floading); /*建立標(biāo)識符臨時文件：temp_key3*/ if((floading=fopen("temp_c40","w"))==NULL) { printf("Error!Can'tcreatefile:temp_c40"); return; } fclose(floading); /*建立整數(shù)類型常量臨時文件：temp_c40*/ if((floading=fopen("temp_c41","w"))==NULL) { printf("Error!Can'tcreatefile:temp_c41"); return; } fclose(floading); /*建立浮點(diǎn)類型常量臨時文件：temp_c41*/ if((floading=fopen("temp_c42","w"))==NULL) { printf("Error!Can'tcreatefile:temp_c42"); return; } fclose(floading); /*建立字符類型常量臨時文件：temp_c42*/ if((floading=fopen("temp_c43","w"))==NULL) { printf("Error!Can'tcreatefile:temp_c43"); return; } fclose(floading); /*建立字符串類型常量臨時文件：temp_c43*/}/*******保留字及標(biāo)識符判斷函數(shù)*******/voidchar_search(char*word){ intm,line=0,csi=0; intvalue=0; intvalue2=0; charc,cs[100]; FILE*foutput,*finput; for(m=1;m<=34;m++) { if(strcmp(word,key0[m])==0) { value=1; break; } } if(value==1) { if(xx0[m]==0) { foutput=fopen("","a"); fprintf(foutput,"0\t%d\t\t%s\n",m,word); fclose(foutput); xx0[m]=1; } foutput=fopen("","a"); fprintf(foutput,"0\t%d\t\t%s\n",m,word); fclose(foutput); } else { if(temp_key3==0) { foutput=fopen("temp_key3","a"); fprintf(foutput,"%s\n",word); fclose(foutput); temp_key3++; foutput=fopen("","a"); fprintf(foutput,"3\t1\t\t%s\n",word); fclose(foutput); } finput=fopen("temp_key3","r"); c=fgetc(finput); while(c!=EOF) { while(c!='\n') { cs[csi++]=c; c=fgetc(finput); } cs[csi]='\0'; csi=0; line++; if((strcmp(cs,word))==0) { value2=1; break; } else { value2=0; c=fgetc(finput); } } fclose(finput); if(value2==1) { foutput=fopen("","a"); fprintf(foutput,"3\t%d\t\t%s\n",line,word); fclose(foutput); } else { foutput=fopen("temp_key3","a"); fprintf(foutput,"%s\n",word); fclose(foutput); temp_key3++; foutput=fopen("","a"); fprintf(foutput,"3\t%d\t\t%s\n",temp_key3,word); fclose(foutput); foutput=fopen("","a"); fprintf(foutput,"3\t%d\t\t%s\n",temp_key3,word); fclose(foutput); } }}/*******整數(shù)類型判斷函數(shù)*******/voidinta_search(char*word){ FILE*foutput,*finput; charc; charcs[100]; intcsi=0; intline=0; intvalue2=0; if(temp_c40==0) { foutput=fopen("temp_c40","a"); fprintf(foutput,"%s\n",word); fclose(foutput); temp_c40++; foutput=fopen("","a"); fprintf(foutput,"4\t0\t1\t%s\n",word); fclose(foutput); } finput=fopen("temp_c40","r"); c=fgetc(finput); while(c!=EOF) { while(c!='\n') { cs[csi++]=c; c=fgetc(finput); } cs[csi]='\0'; csi=0; line++; if(strcmp(cs,word)==0) { value2=1; break; } c=fgetc(finput); } fclose(finput); if(value2==1) { foutput=fopen("","a"); fprintf(foutput,"4\t0\t%d\t%s\n",line,word); fclose(foutput); } else { foutput=fopen("temp_c40","a"); fprintf(foutput,"%s\n",word); fclose(foutput); temp_c40++; foutput=fopen("","a"); fprintf(foutput,"4\t0\t%d\t%s\n",temp_c40,word); fclose(foutput); foutput=fopen("","a"); fprintf(foutput,"4\t0\t%d\t%s\n",temp_c40,word); fclose(foutput); }}/*******浮點(diǎn)類型判斷函數(shù)*******/voidintb_search(char*word){ FILE*foutput,*finput; charc; charcs[100]; intcsi=0; intline=0; intvalue2=0; if(temp_c41==0) { foutput=fopen("temp_c41","a"); fprintf(foutput,"%s\n",word); fclose(foutput); temp_c41++; foutput=fopen("","a"); fprintf(foutput,"4\t1\t1\t%s\n",word); fclose(foutput); } finput=fopen("temp_c41","r"); c=fgetc(finput); while(c!=EOF) { while(c!='\n') { cs[csi++]=c; c=fgetc(finput); } cs[csi]='\0'; csi=0; line++; if(strcmp(cs,word)==0) { value2=1; break; } c=fgetc(finput); } fclose(finput); if(value2==1) { foutput=fopen("","a"); fprintf(foutput,"4\t1\t%d\t%s\n",line,word); fclose(foutput); } else { foutput=fopen("temp_c41","a"); fprintf(foutput,"%s\n",word); fclose(foutput); temp_c41++; foutput=fopen("","a"); fprintf(foutput,"4\t1\t%d\t%s\n",temp_c41,word); fclose(foutput); foutput=fopen("","a"); fprintf(foutput,"4\t1\t%d\t%s\n",temp_c41,word); fclose(foutput); }}/*******字符串常量判斷函數(shù)*******/voidcc_search(char*word){ FILE*foutput,*finput; charc; charcs[100]; intcsi=0; intline=0; intvalue2=0; if(temp_c43==0) { foutput=fopen("temp_c43","a"); fprintf(foutput,"%s\n",word); fclose(foutput); temp_c43++; foutput=fopen("","a"); fprintf(foutput,"4\t3\t1\t%s\n",word); fclose(foutput); } finput=fopen("temp_c43","r"); c=fgetc(finput); while(c!=EOF) { while(c!='\n') { cs[csi++]=c; c=fgetc(finput); } cs[csi]='\0'; csi=0; line++; if(strcmp(cs,word)==0) { value2=1; break; } c=fgetc(finput); } fclose(finput); if(value2==1) { foutput=fopen("","a"); fprintf(foutput,"4\t3\t%d\t%s\n",line,word); fclose(foutput); } else { foutput=fopen("temp_c43","a"); fprintf(foutput,"%s\n",word); fclose(foutput); temp_c43++; foutput=fopen("","a"); fprintf(foutput,"4\t3\t%d\t%s\n",temp_c43,word); fclose(foutput); foutput=fopen("","a"); fprintf(foutput,"4\t3\t%d\t%s\n",temp_c43,word); fclose(foutput); }}/*******字符常量判斷函數(shù)*******/voidc_search(char*word){ FILE*foutput,*finput; charc; charcs[100]; intcsi=0; intline=0; intvalue2=0; if(temp_c42==0) { foutput=fopen("temp_c42","a"); fprintf(foutput,"%s\n",word); fclose(foutput); temp_c42++; foutput=fopen("","a"); fprintf(foutput,"4\t2\t1\t%s\n",word); fclose(foutput); } finput=fopen("temp_c42","r"); c=fgetc(finput); while(c!=EOF) { while(c!='\n') { cs[csi++]=c; c=fgetc(finput); } cs[csi]='\0'; csi=0; line++; if(strcmp(cs,word)==0) { value2=1; break; } c=fgetc(finput); } fclose(finput); if(value2==1) { foutput=fopen("","a"); fprintf(foutput,"4\t2\t%d\t%s\n",line,word); fclose(foutput); } else { foutput=fopen("temp_c42","a"); fprintf(foutput,"%s\n",word); fclose(foutput); temp_c42++; foutput=fopen("","a"); fprintf(foutput,"4\t2\t%d\t%s\n",temp_c42,word); fclose(foutput); foutput=fopen("","a"); fprintf(foutput,"4\t2\t%d\t%s\n",temp_c42,word); fclose(foutput); }}/*******主掃描函數(shù)*******/voidscan(){ intcount; charchin; FILE*fin; FILE*fout; charfilename[50]; chartemp[100]; chartarget[3]="'"; printf("請輸入文件名："); scanf("%s",filename); if((fin=fopen(filename,"r"))==NULL) { printf("Error!Can'topenfile:%s\n",filename); return; } chin=fgetc(fin); while(chin!=EOF) { /*對文件包含、宏定義進(jìn)行處理*/ if(chin=='#') { while(chin!='>') chin=fgetc(fin); /*chin=fgetc(fin);*/ } /*對空格符、水平制表符進(jìn)行處理*/ elseif((chin=='')||(chin=='\t')) { ; } /*對回車符進(jìn)行處理*/ elseif(chin=='\n') { ; } /*對單引號內(nèi)的字符常量進(jìn)行處理*/ elseif(chin==target[0]) { if(xx1[9]==0) { fout=fopen("","a"); fprintf(fout,"1\t9\t\t%c\n",target[0]); fclose(fout); xx1[9]=1; } temp[0]=chin; chin=fgetc(fin); temp[1]=chin; chin=fgetc(fin); if(chin!=target[0]) { temp[2]=chin; chin=fgetc(fin); temp[3]=chin; temp[4]='\0'; } else { temp[2]=chin; temp[3]='\0'; } c_search(temp); } /*對雙引號內(nèi)的字符串常量進(jìn)行處理*/ elseif(chin=='"') { inti=0; temp[i++]='"'; chin=fgetc(fin); while(chin!='"') { temp[i++]=chin; chin=fgetc(fin); } temp[i]='"'; temp[i+1]='\0'; cc_search(temp); } /*對保留字、標(biāo)識符進(jìn)行處理*/ elseif(((chin>='A')&&(chin<='Z'))||((chin>='a')&&(chin<='z'))||(chin=='_')) { inti=0; while(((chin>='A')&&(chin<='Z'))||((chin>='a')&&(chin<='z'))||(chin=='_')||((chin>='0')&&(chin<='9'))) { temp[i++]=chin; chin=fgetc(fin); } temp[i]='\0'; char_search(temp); if(chin!=EOF) fseek(fin,-1L,SEEK_CUR); } /*對整型、浮點(diǎn)型數(shù)據(jù)進(jìn)行處理*/ elseif((chin>='0')&&(chin<='9')) { intdotcount=0; inti=0; while(((chin>='0')&&(chin<='9'))||(chin=='.')) { if(chin=='.') dotcount++; if(dotcount==2) break; temp[i++]=chin; chin=fgetc(fin); } temp[i]='\0'; if(dotcount==1) intb_search(temp); else inta_search(temp); if(chin!=EOF) fseek(fin,-1L,SEEK_CUR); } /*對注釋進(jìn)行處理*/ elseif(chin=='/') { chin=fgetc(fin); if(chin=='=') { fout=fopen("","a"); fprintf(fout,"2\t30\t\t/=\n"); fclose(fout); } elseif(chin!='*') { fout=fopen("","a"); fprintf(fout,"2\t4\t\t/\n"); fclose(fout); fseek(fin,-1L,SEEK_CUR); } elseif(chin=='*') { count=0; chin=fgetc(fin); fout=fopen("","a"); fprintf(fout,"/*"); while(count!=2) { count=0; while(chin!='*') { fprintf(fout,"%c",chin); chin=fgetc(fin); } count++; fprintf(fout,"%c",chin); chin=fgetc(fin); if(chin=='/') { count++; fprintf(fout,"%c\n",chin); } else { fprintf(fout,"%c",chin); chin=fgetc(fin); } } } } /*對運(yùn)算符、分隔符進(jìn)行處理*/ else { inttime=0; intfirstblood=0; temp[0]=chin; chin=fgetc(fin); if(chin!=EOF) { temp[1]=chin; temp[2]='\0'; for(time=1;time<=30;time++) { if(strcmp(temp,key2[time])==0) { firstblood=1; if(xx2[time]==0) { fout=fopen("","a"); fprintf(fout,"2\t%d\t\t%s\n",time,temp); fclose(fout); xx2[time]=1; } fout=fopen("","a"); fprintf(fout,"2\t%d\t\t%s\n",time,temp); fclose(fout); break; } } if(firstblood!=1) { fseek(fin,-1L,SEEK_CUR); temp[1]='\0'; for(time=1;time<=9;time++) { if(strcmp(temp,key1[time])==0) { if(xx1[time]==0) { fout=fopen("","a"); fprintf(fout,"1\t%d\t\t%s\n",time,temp); fclose(fout); xx1[time]=1; } fout=fopen("","a"); fprintf(fout,"1\t%d\t\t%s\n",time,temp); fclose(fout); break; } } for(time=1;time<=30;time++) { if(strcmp(temp,key2[time])==0) { if(xx2[time]==0) { fout=fopen("","a"); fprintf(fout,"2\t%d\t\t%s\n",time,temp); fclose(fout); xx2[time]=1; } fout=fopen("","a"); fprintf(fout,"2\t%d\t\t%s\n",time,temp); fclose(fout); break; } } } } } chin=fgetc(fin); } fout=fopen("","a"); fprintf(fout,"1\t6\t\t}\n"); fclose(fout);}/*******Main函數(shù)*******/voidmain(){ FILE*fread; charcharin; charcommand='Q'; printf("\n"); printf("********************C語言詞法分析工具********************\n"); printf("**\n"); printf("**\n"); printf("*命令如下：*\n"); printf("*0-->查看保留字表文件*\n"); printf("*1-->查看分隔符表文件*\n"); printf("*2-->查看運(yùn)算符表文件*\n"); printf("*3-->查看標(biāo)識符表文件*\n"); printf("*4-->查看整數(shù)類型常量表*\n"); printf("*5-->查看浮點(diǎn)類型常量表*\n"); printf("*6-->查看字符類型常量表*\n"); printf("*7-->查看字符串類型常量表*\n"); printf("*8-->查看注釋文件*\n"); printf("*9-->查看內(nèi)部碼文件*\n"); printf("*--------------------------*\n"); printf("*Q-->退出*\n"); printf("***************************************************************\n"); printf("\n"); load(); scan(); printf("\n"); printf("分析完成！\n"); getchar(); printf("\n"); printf("請輸入命令："); command=getchar(); while((command!='Q')&&(command!='q')) { switch(command) { case'0': { printf("*************************\n"); printf("\n"); fread=fopen("","r"); charin=fgetc(fread); while(charin!=EOF) { putchar(charin); charin=fgetc(fread); } printf("\n"); printf("*************************\n"); printf("\n"); printf("請輸入命令："); break; } case'1': { printf("*************************\n"); printf("\n"); fread=fopen("","r"); charin=fgetc(fread); while(charin!=EOF) { putchar(charin); charin=fgetc(fread); } printf("\n"); printf("*************************\n"); printf("\n"); printf("請輸入命令："); break; } case'2': { printf("*************************\n"); printf("\n"); fread=fopen("","r"); charin=fgetc(fread); while(charin!=EOF) { putchar(charin); charin=fgetc(fread); } printf("\n"); printf("*************************\n"); printf("\n"); printf("請輸入命令："); break; } case'3': { printf("*************************\n"); printf("\n"); fread=fopen("","r"); charin=fgetc(fread); while(charin!=EOF) { putchar(charin); charin=fgetc(fread); } printf("\n"); printf("*************************\n"); printf("\n"); printf("請輸入命令："); break; } case'4': {