ding.cpp

递归分析器

/*文法表达式为E->TE'
              E'->+TE'|^
              T->FT'
              T'->+TF'|^
              F->(E)|i
*/

#include<iostream.h> 
#include<stdlib.h>
#include<string.h>
#include <stdio.h> 
 
char a[50] ,b[50],d[200],e[10];
char ch;
int n1,i1=0,flag=1,n=5,z;
int total=0;/*步骤计数器*/

int E();
int T();
int G();// E'
int S();// T'
int F();
void input();
void input1();
void output();

void main()                      /*递归分析*/
{
	int p,j=0;int z;
	char x;
	d[0]='E';
    d[1]='=';
    d[2]='>';
    d[3]='T';
    d[4]='G';
    d[5]='#';
	cout<<"☆☆☆☆☆☆☆☆☆☆☆☆☆☆欢迎使用递归下降分析器☆☆☆☆☆☆☆☆☆☆☆☆☆"<<endl;
	cout<<"＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊"<<endl;
	
	printf("请输入字符串(以#号结束）\n");
	do{
		scanf("%c",&ch);
		a[j]=ch;
		j++;
	}while(ch!='#');
	n1=j;
	ch=b[0]=a[0];
	printf("步骤\t文法\t分析串\t\t分析字符\t剩余串\n");
	E();
	if (ch=='#')  
	{ 
		printf("accept\n");
        p=0;
        x=d[p];
		while(x!='#')
		{
			printf("%c",x);p=p+1;x=d[p];          /*输出推导式*/
		}
	}
	else 
	{
		printf("error\n");
		printf("回车返回\n");
		getchar();
        return; 
	}
	printf("\n");
    getchar();
   
}

int E()//E=>TE'
{   
	int f,t;
    printf("%d\tE-->TG\t",total);total++;
    flag=1;
    input();
    input1();
	f=T();
	if (f==0) return(0);
	t=G();
	if (t==0) return(0);
	else return(1);

}

int T()//T=FT'
{  
	int f,t;
    printf("%d\tT-->FS\t",total);total++;
    e[0]='T';e[1]='=';e[2]='>';e[3]='F';e[4]='S';e[5]='#';
    output();
    flag=1;
    input();
    input1();
    f=F();
    if (f==0) return(0);
    t=S(); 
    if (t==0) return(0);
	else return(1);
}

int  G()//E'=+TE'
{   
	int f;
    if(ch=='+')
	{  
		b[i1]=ch;
        printf("%d\tG-->+TG\t",total);total++;
        e[0]='G';e[1]='=';e[2]='>';e[3]='+';e[4]='T';e[5]='G';e[6]='#';
        output();
        flag=0;
        input();input1();
        ch=a[++i1];
        f=T();
        if (f==0) return(0);
        G();
        return(1);
	}
	printf("%d\tG-->^\t",total);total++;
    e[0]='G';e[1]='=';e[2]='>';e[3]='^';e[4]='#';
    output();
    flag=1; 
    input();input1();
    return(1);
}
 
int S()//T'=*FT'||空
{
	int f,t;
    if(ch=='*')
	{ 
		b[i1]=ch;printf("%d\tS-->*FS\t",total);total++;
        e[0]='S';e[1]='=';e[2]='>';e[3]='*';e[4]='F';e[5]='S';e[6]='#';
        output();
        flag=0;
        input();input1();
        ch=a[++i1];
        f=F();
        if (f==0) return(0);
        t=S();
        if (t==0) return(0);
		else return(1);}
        printf("%d\tS-->^\t",total);total++;
        e[0]='S';e[1]='=';e[2]='>';e[3]='^';e[4]='#';
        output();
        flag=1; 
        a[i1]=ch;
        input();input1();
        return(1);
}

int F()//F=(E)||i
{  
	int f;
    if(ch=='(') //F=(E)的情况
	{ 
		b[i1]=ch;printf("%d\tF-->(E)\t",total);total++;
        e[0]='F';e[1]='=';e[2]='>';e[3]='(';e[4]='E';e[5]=')';e[6]='#';
        output();
        flag=0;
        input();input1();
        ch=a[++i1];
        f=E();
        if (f==0) return(0);
        if(ch==')')
		{
			b[i1]=ch;printf("%d\tF-->(E)\t",total);total++;
            flag=0;input();input1();  
            ch=a[++i1];
		}
		else {
			printf("error\n");
            return(0);
		}
	}
	else
		if(ch=='i') //F=i的情况
		{ 
			b[i1]=ch;printf("%d\tF-->i\t",total);total++;
            e[0]='F';e[1]='=';e[2]='>';e[3]='i';e[4]='#';
            output();
            flag=0;input();input1();
            ch=a[++i1]; 
		}
		else 
		{printf("error\n");return(0);}
		return(1);
}

void input()                      
{
	int j=0;
    for (;j<=i1-flag;j++)
    printf("%c",b[j]);                    /*输出分析串*/
    printf("\t\t");
    printf("%c\t\t",ch);                  /*输出分析字符*/  
}

void input1()
{
	int j;
    for (j=i1+1-flag;j<n1;j++)
		printf("%c",a[j]);                     /*输出剩余字符*/
	printf("\n");
}

void output()
{                              /*推导式计算*/
	int m,k,j,q;
	int i=0;
	m=0;k=0;q=0;
	i=n;
    d[n]='=';d[n+1]='>';d[n+2]='#';n=n+2;i=n;
    i=i-2;
    while(d[i]!='>'&&i!=0) i=i-1;//识别到开始
    i=i+1;
    while(d[i]!=e[0]) i=i+1;
    q=i;
    m=q;k=q;
    while(d[m]!='>')  m=m-1;
    m=m+1;
    while(m!=q)
	{
		d[n]=d[m];m=m+1;n=n+1;
	}
	d[n]='#';
	for(j=3;e[j]!='#';j++)
	{
		d[n]=e[j];
		n=n+1;
	}
	k=k+1;
	while(d[k]!='=')
	{
		d[n]=d[k];n=n+1;k=k+1;
	}
	d[n]='#';
}