语法分析（编译原理）

G: S->Ab|Ba
   A->aA|a
   B->a
实现对以上文法的预测分析。
#include<stdio.h>
#include<stdlib.h>
#include<string.h>
#include<dos.h>
char A[20];		/*分析栈*/
char B[20];		/*剩余串*/
char v1[20]={'a','b','#'};	/*终结符  */
char v2[20]={'S','G','A'};/*非终结符   */
int j=0,t=0,top=0,l;	/*L为输入串长度 */
typedef struct type	/*产生式类型定义  */
{
	char origin;	/*大写字符  */
	char array[5];	/*产生式右边字符 */
	int length;/*字符个数      */
}type;
type s,s1,s2,a1,a2;	/*结构体变量  */
type C[10][10];/*预测分析表  */
/*--------------------------------*/
/*输出分析栈  */
void print()
{
	int i;	/*指针*/
	for(i=0;i<=top+1;i++)
		printf("%c",A[i]);
	printf("\t\t");
}
/*--------------------------------*/
/*输出剩余串*/
void print1()
{
	int j;
	for(j=0;j<t;j++)	/*输出对齐符*/
		printf(" ");
	for(j=t;j<=l;j++)
		printf("%c",B[j]);
	printf("\t\t\t");
}
/*--------------------------------*/
int main()
{
	int m,n,k=0,flag=0,finish=0;
	char ch,x;
	type cha;/*用来接受C[m][n]*/
	/*把文法产生式赋值结构体*/
    s.origin='S';	strcpy(s.array,"aaG"); s.length=3;
	s1.origin='G';	strcpy(s1.array,"Ab");	s1.length=2;
	s2.origin='G';	s2.array[0]='^';		s2.length=1;
	a1.origin='A';	strcpy(a1.array,"aA");	a1.length=2;
	a2.origin='A';	a2.array[0]='^';		a2.length=1;
	/*初始化分析表*/
	for(m=0;m<=2;m++)
		for(n=0;n<=2;n++)
			C[m][n].origin='N';/*全部赋为空*/
	/*填充分析表*/
	C[0][0]=s;
	C[1][0]=s1;
	C[1][1]=s1;
	C[1][2]=s2;
	C[2][0]=a1;
	C[2][1]=a2;
	C[2][2]=a2;
	printf("提示:本程序只能对由'a','b',构成的以'#'结束的字符串进行分析,\n");
	printf("请输入要分析的字符串:");

	do/*读入分析串*/
	{
	   scanf("%c",&ch);
	   if ((ch!='a') &&(ch!='b')&&(ch!='#'))
	   {
		   printf("输入串中有非法字符\n");
		   exit(1);
	   }
	   B[j]=ch;
	   j++;
	}while(ch!='#');
	l=j;		/*分析串长度*/
	ch=B[0];	/*当前分析字符*/
	A[top]='#'; A[++top]='S';	/*'#','S'进栈*/
	printf("步骤\t\t分析栈 \t\t剩余字符 \t\t所用产生式 \n");
	do
	{
		x=A[top--];/*x为当前栈顶字符*/
		printf("%d",k++);
		printf("\t\t");
		for(j=0;j<=5;j++)/*判断是否为终结符*/
			if(x==v1[j])
			{
			  flag=1;
			  break;
			}
		if(flag==1)/*如果是终结符*/
		{
			  if(x=='#')
			  {
				  finish=1;			/*结束标记*/
				  printf("acc!\n");	/*接受 */
				  exit(1);
			  }
			  if(x==ch)
			  {
				  print();
				  print1();
				  printf("%c匹配\n",ch);
				  ch=B[++t];		/*下一个输入字符*/
				  flag=0;			/*恢复标记*/
			  }
			  else
			  {	/*出错处理*/
				  print();
				  print1();
				  printf("%c出错\n",ch);/*输出出错终结符*/
				  exit(1);
			  }
		}
		else
		{		/*非终结符处理*/
			for(j=0;j<=4;j++)
				if(x==v2[j])
				{
					m=j;	/* m: 分析表行号*/
					break;
				}
			for(j=0;j<=5;j++)
				if(ch==v1[j])
				{
					n=j;	/*n: 分析表列号*/
					break;
				}
			cha=C[m][n];
			if(cha.origin!='N')/*判断是否为空*/
			{
				print();
				print1();
				printf("%c-",cha.origin);	/*输出产生式*/
				for(j=0;j<cha.length;j++)
					printf("%c",cha.array[j]);
				printf("\n");
				// Fanru modifed
//				for(j=(cha.length-1);j=0;j--)	/*产生式逆序入栈*/
				for(j=(cha.length-1);j>=0;j--)	/*产生式逆序入栈*/
					A[++top]=cha.array[j];
				if(A[top]=='^')	/*为空则不进栈*/
					top--;
			}
			else/*出错处理*/
			{
				print();
				print1();
				printf("%c出错\n",x);/*输出出错非终结符*/
				exit(1);
			}
		}/*else*/
	}while(finish==0);
}

运行结果：