?? 實驗3.cpp
字號:
void prior_analysis()//自下而上分析
{
int i,j,m;
char q,str,ch[10];
push('#');//設置符號棧初值
print(0,-1);
u: readvt(&a);//當前輸入符號讀入a
if(IsVT(stack[top]))//判斷是否為終結符
j=top;
else
j=top-1;
do
{
while(big(j,a)&&strcmp(stack,"#N")!=0)//j優先級高于a
{
do
{
q=stack[j];
if(IsVT(stack[j-1]))//判斷是否為終結符
j=j-1;
else
j=j-2;
}while(!less(j,q));
i=-1;
while((top-j)!=0)
{
ch[++i]=pop();
}
ch[i+1]='\0';
for (m=0;m<=5;m++)//把最左素短語歸約為某個N
{
if(strcmp(word[m],ch)==0)
str='N';
}
push(str);
print(1,1);
}
if(less(j,a))//j優先級低于a
{
push(a);
print(0,-1);
if(stack[top]!='#')
goto u;
}
else
{
if(equal(j,a))//j優先級等于a
{
push(a);
print(0,0);
if(stack[top]!='#')
goto u;
}
else
{
error1(j);//調用錯誤分析函數
a='#';
}
}
}while(a!='#');
}
//////////////////////////////////////////////////////////////////////////////////////////
void suanfu()//算符優先語法主函數
{
cout<<"\n******************************算符優先語法分析程序******************************"<<endl;
cout<<" E->E+T|E-T|T"<<endl;
cout<<" T->T*F|T/F|F"<<endl;
cout<<" F->(E)|i"<<endl;
cout<<" E表示算術表達式.T表示項.F表示因子.i表示變量或常數."<<endl;
cout<<" 優先表"<<endl;
cout<<" + - * / ( ) i #"<<endl;
cout<<" + > > < < < > < >"<<endl;
cout<<" - > > < < < > < >"<<endl;
cout<<" * > > > > < > < >"<<endl;
cout<<" / > > > > < > < >"<<endl;
cout<<" ( < < < < < = < e1"<<endl;
cout<<" ) > > > > e2 > e2 >"<<endl;
cout<<" i > > > > e2 > e2 >"<<endl;
cout<<" # < < < < < e3 < ="<<endl;
ff=fopen("預處理.txt","r");
char ch=fgetc(ff);
char ch1;
while(ch!='#')
{
int i=-1,j=0,m=-1;
while(ch!='='&&ch!='#')
{
ch1=ch;
ch=fgetc(ff);
if((ch1=='>'||ch1=='<')&&ch=='=')
ch=fgetc(ff);
}
if(ch=='#')
{
cout<<endl;
fclose(ff);
return;
}
while(ch!=' '&&ch!='#')//得到算數表達式
{
ch=fgetc(ff);
oldstrings[++i]=ch;
}
oldstrings[i]='\0';
if(isalnum(oldstrings[j]))
strings[++m]='i';
else
strings[++m]=oldstrings[j];
j++;
while(oldstrings[j]!='\0')//轉換為輸入串
{
if(isalnum(oldstrings[j]))
{
if(isalnum(oldstrings[j-1])==0)
strings[++m]='i';
}
else
strings[++m]=oldstrings[j];
j++;
}
strings[m+1]='#';
strings[m+2]='\0';
cout<<"算術表達式"<<id<<"為: "<<oldstrings<<endl;
cout<<"轉換為輸入串: "<<strings<<endl;
cout<<" 步驟號 符號棧 優先關系 當前分析符 剩余輸入串 動作";
prior_analysis();//自下而上分析
n=0;
cout<<endl;
cout<<"算術表達式"<<id++<<"的"<<"歸約產生式步驟號為:";
while(No[n])//記錄歸約產生式步驟號
{
cout<<" "<<No[n];
n++;
}
cout<<endl;
//回歸各全局變量初值
while(stack[0]!='\0')
pop();
while(No[--n])
{
No[n]='\0';
}
top=-1;
a='\0';
k=0;
step=1;
n=0;
}
}
/***********************************以下是語義分析部分***********************************/
//////////////////////////////////////////////////////////////////////////////////////////
void error(char *strError)//輸出掃描發現的錯誤
{
fprintf(fw,"錯誤: %s\n",strError);
printf("錯誤: %s\n",strError);
return;
}
//////////////////////////////////////////////////////////////////////////////////////////
int Match(char syn,char *strError)//匹配當前識別出的單詞
{
if(syn==uWord.syn&&(strcmp(strError,uWord.value.T1)==0)||strError[0]==uWord.value.T3)
{
Scaner();
return 1;
}
else
{
error(strError);
return 0;
}
}
//////////////////////////////////////////////////////////////////////////////////////////
void gen(char *op,char *argv1,char *argv2,char *result)//生成一個四元式
{
sprintf(pQuad[nNXQ].op,op);
sprintf(pQuad[nNXQ].argv1,argv1);
sprintf(pQuad[nNXQ].argv2,argv2);
sprintf(pQuad[nNXQ].result,result);
nNXQ++;
return;
}
//////////////////////////////////////////////////////////////////////////////////////////
void PrintQuaternion()//打印四元式數組
{
int nLoop;
printf("********************************中間代碼生成程序********************************");
for(nLoop=1;nLoop<nNXQ;nLoop++)
{
fprintf(fw,"\n%d:(%s,\t%s,\t%s,\t%s)",
nLoop,pQuad[nLoop].op,pQuad[nLoop].argv1,
pQuad[nLoop].argv2,pQuad[nLoop].result);
printf("\n%d:(%s,\t%s,\t%s,\t%s)",
nLoop,pQuad[nLoop].op,pQuad[nLoop].argv1,
pQuad[nLoop].argv2,pQuad[nLoop].result);
}
}
//////////////////////////////////////////////////////////////////////////////////////////
char *Newtemp()//產生一個臨時變量
{
char *strTempID=(char *)malloc(MAXLENGTH);
sprintf(strTempID,"T%d",++nSuffix);
return strTempID;
}
//////////////////////////////////////////////////////////////////////////////////////////
int merge(int p1,int p2)//合并p1和p2
{
int p,nResult;
if(p2==0)
nResult=p1;
else
{
nResult=p=p2;
while(atoi(pQuad[p].result))
{
p=atoi(pQuad[p].result);
sprintf(pQuad[p].result,"%d",p1);
}
}
return nResult;
}
//////////////////////////////////////////////////////////////////////////////////////////
void backpatch(int p,int t)//將t回填到以p為首的四元式中
{
int w,q=p;
while(q)
{
w=atoi(pQuad[q].result);
sprintf(pQuad[q].result,"%d",t);
q=w;
}
}
//////////////////////////////////////////////////////////////////////////////////////////
char *Expression()//分析算術表達式函數
{
char opp[MAXLENGTH],*eplace,*eplace1,*eplace2;
eplace=eplace1=Term();
while(uWord.syn=='O'&&(strcmp(uWord.value.T1,"+")==0||strcmp(uWord.value.T1,"-")==0))
{
sprintf(opp,"%s",uWord.value.T1);
Scaner();
eplace2=Term();
eplace=Newtemp();
gen(opp,eplace1,eplace2,eplace);
eplace1=eplace;
}
return eplace;
}
//////////////////////////////////////////////////////////////////////////////////////////
char *Term()//分析項函數
{
char opp[2],*eplace1,*eplace2,*eplace;
eplace=eplace1=Factor();
while(uWord.syn=='O'&&(strcmp(uWord.value.T1,"*")==0||strcmp(uWord.value.T1,"/")==0))
{
sprintf(opp,"%s",uWord.value.T1);
Scaner();
eplace2=Factor();
eplace=Newtemp();
gen(opp,eplace1,eplace2,eplace);
eplace1=eplace;
}
return eplace;
}
//////////////////////////////////////////////////////////////////////////////////////////
char *Factor()//分析因子函數
{
char *eplace=(char *)malloc(MAXLENGTH);
if(uWord.syn=='I'||uWord.syn=='C')
{
if(uWord.syn=='I')
sprintf(eplace,"%s",uWord.value.T1);
else
sprintf(eplace,"%d",uWord.value.T2);
Scaner();
}
else
{
Match('P',"(");
eplace=Expression();
Match('P',")");
}
return eplace;
}
//////////////////////////////////////////////////////////////////////////////////////////
void Condition(int *etc,int *efc)//分析布爾表達式函數
{
char opp[3],*eplace1,*eplace2;
char strTemp[4];
eplace1=Expression();
if(uWord.syn=='O'&&(strcmp(uWord.value.T1,"+")!=0&&strcmp(uWord.value.T1,"-")!=0
&&strcmp(uWord.value.T1,"*")!=0&&strcmp(uWord.value.T1,"/")!=0))
{
sprintf(opp,"%s",uWord.value.T1);
Scaner();
eplace2=Expression();
*etc=nNXQ;
*efc=nNXQ+1;
sprintf(strTemp,"j%s",opp);
gen(strTemp,eplace1,eplace2,"0");
gen("j","","","0");
}
else
error("關系運算符");
}
//////////////////////////////////////////////////////////////////////////////////////////
void Statement(int nChain)//語句分析函數
{
char strTemp[MAXLENGTH],eplace[MAXLENGTH];
int nChainTemp=0,nChainTemp1=0,nWQUAD,Temp,tag2;
switch(uWord.syn)
{
case 'I'://賦值語句分析
strcpy(strTemp,uWord.value.T1);
Scaner();
Match('O',"=");
strcpy(eplace,Expression());
gen("=",eplace,"",strTemp);
nChain=0;
break;
case 'L'://帶標號的賦值語句分析
Scaner();
Match('P',":");
strcpy(strTemp,uWord.value.T1);
Scaner();
Match('O',"=");
tag1=nNXQ;
strcpy(eplace,Expression());
gen("=",eplace,"",strTemp);
nChain=0;
break;
case 'K':
if(strcmp(uWord.value.T1,"IF")==0)//IF-THEN條件語句分析
{
Match('K',"IF");
Match('P',"(");
Condition(&ntc,&nfc);
backpatch(ntc,nNXQ);
Match('P',")");
Match('K',"THEN");
Statement(nChainTemp);
if(strcmp(uWord.value.T1,"ELSE")!=0)
backpatch(nfc,nNXQ);
nChain=merge(nChainTemp,nfc);
}
if(strcmp(uWord.value.T1,"ELSE")==0)//IF-THEN-ELSE條件語句分析
{
gen("j","","","0");
nWQUAD=nNXQ;
tag2=nNXQ-1;
backpatch(nfc,nWQUAD);
Temp=merge(nWQUAD,nChainTemp);
Match('K',"ELSE");
Statement(nChainTemp);
backpatch(tag2,nNXQ);
nChain=merge(Temp,nChainTemp1);
}
if(strcmp(uWord.value.T1,"GOTO")==0)//轉移語句分析
{
Match('K',"GOTO");
nWQUAD=nNXQ;
gen("j","","","0");
backpatch(nWQUAD,tag1);
nChain=0;
}
break;
}
}
//////////////////////////////////////////////////////////////////////////////////////////
void Statement_Sequence(int nChain)//語句串分析函數
{
Statement(nChain);
while((uWord.syn=='I'||uWord.syn=='L'
||(uWord.syn=='K'&&strcmp(uWord.value.T1,"IF")==0)
||(uWord.syn=='K'&&strcmp(uWord.value.T1,"ELSE")==0)
||(uWord.syn=='K'&&strcmp(uWord.value.T1,"GOTO")==0))&&strcmp(uWord.value.T1,"end")!=0)
{
Statement(nChain);
}
}
//////////////////////////////////////////////////////////////////////////////////////////
void Parse()//分析生成中間代碼
{
int nChain=0;
str=fgetc(fp);
Scaner();
Statement_Sequence(nChain);
if(strcmp(uWord.value.T1,"end")!=0)
{
printf("\n源程序非正常結束");
fprintf(fw,"\n源程序非正常結束");
}
suanfu();//調用算符優先語法主函數
PrintQuaternion();//打印四元式數組
}
/************************************以下是主函數部分************************************/
//////////////////////////////////////////////////////////////////////////////////////////
void main()//主函數
{
pQuad=(QUATERNION *)malloc(4*MAXLENGTH);
nSuffix=0;
nfc=ntc=nNXQ=1;
char buf[4048]={'\0'};
int i=0;
out=fopen("二元式表.txt","w");
in=fopen("預處理.txt","w");
printf("請輸入源文件路徑及名稱:");
scanf("%s",filename);
if ((fp=fopen(filename,"rt"))==NULL)
{
printf("源文件無法打開!\n");
system("pause");
exit(0);
}
else
{
printf("**********************************詞法分析程序**********************************\n");
printf("K:關鍵字 I:標識符 C:常數 O:運算符 P:界符 L:標號\n");
pro_process(buf);//生成預處理文件
while (buf[i]!='#')
{
fputc(buf[i],in);
i++;
}
fputc('#',in);
fclose(in);
fp=fopen("預處理.txt","r");
}
fw=fopen("四元式表.txt","w");
Parse();//分析生成中間代碼
cout<<endl;
fclose(fw);
fclose(fp);
cout<<"輸出結果保存在二元式表.txt和四元式表.txt文件中,請打開查看。"<<endl;
system("pause");
exit(0);
}?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -