#include<iostream>
#include<stdio.h>
#include <string>
#include <stack>

using namespace std;

void showstack(stack< char > st)
{
 int i,j;
 char ch[100];
 j=st.size();
 for(i=0;i<j;i++)
 {
    ch[i]=st.top();
	st.pop();
 }
    for(i=j-1;i>=0;i--)
 {
  cout<<ch[i];
  st.push(ch[i]);
 }
}


bool find(char c,char array[])                     //查找函數，返回布爾值
{ 
 int i;
    bool flag=false;
 for(i=0;i<100;i++)
 {
  if(c==array[i])
   flag=true;
 }
 return flag;
}


int location(char c,char array[])                  //定位函數,指出字符所在位置
{
 int i;
 for(i=0;i<100;i++)
 {
  if(c==array[i])
   return i;
 }
}


void error()
{
   cout<<"                    出錯!"<<endl;
}



void analyse(char Vn[],char Vt[],string M[100][100])
{
   int i,j,m,p,q,length,t,h;
   char w,X;
   string str;
opt0:
   cin>>str;
   for(i=0;i<str.size();i++)
   {
    if(!find(str[i],Vt))
    {  cout<<"輸入字符串有誤!請重新輸入!"<<endl;
    goto opt0;
    break;}
   }
   stack <char> st;
   st.push('#');                                  
   st.push(Vn[0]);                  //#與識別符號入棧
   j=0;
   h=1;
   w=str[0];
   cout<<"步驟            "<<"分析棧                "<<"剩余輸入串           "<<" 所用產生式"<<endl;
opt1:
   cout<<h<<"                ";                    //顯示步驟
   h++;
   showstack(st);                                   //顯示分析棧中內容
   cout<<"                      ";
    for(t=j;t<str.size();t++)
 {
  cout<<str[t];                              //顯示剩余字符串
 }
   X=st.top();                             //上托棧頂符號放入X
   st.pop();
    if(find(X,Vt)&& X!='#')
   {
    if(X==w)                                    //分析棧的棧頂元素和剩余輸入串的第一個元素相比較
    {     
     cout<<"                   "<<X<<"匹配"<<endl;
	 j++;
     w=str[j];
     goto opt1;
    }
    else 
     error();
	}
   else 
   {
    if(X=='#')
    {
         if(X==w)
		{ 
			cout<<"                    "<<"接受!"<<endl<<endl;       
		}
       else
		error();
    }
       else  
    {
		p=location(X,Vn);
        q=location(w,Vt);
		string S1("NULL"),S2("null");
        if(M[p][q]==S1 || M[p][q]==S2)                                             //查找二維數組中的產生式
        error();
        else
		 {   
			string str0=M[p][q]; 
			cout<<"                  "<<X<<"-->"<<str0<<endl;       //顯示對應的產生式
		if(str0=="$")
		goto opt1;
		 else
		{length=str0.size();                                //逆序進棧
            for(m=length-1;m>=0;m--)
		{
           st.push(str0[m]);
		}
        goto opt1;
	}
    }
    }
   }
}


main()
{   
	int i,k,n,r;
    char Vn[100],Vt[100],select;
    string M[100][100];
    cout<<"**********************************************************************"<<endl;
	cout<<"                 語法分析程序—預測分析表法"<<endl;
    cout<<"***********************************************************************"<<endl;
    cout<<endl<<endl;
 //opt1: 
 cout<<"請輸入非終結符個數:";
 cin>>n;
 cout<<"請輸入各終結符(#號表示結束)Vt[i]:";
 for(i=0;i<100;i++)
 {
  cin>>Vt[i];
  if(Vt[i]=='#')
  {
   r=i;
   break;
  }
 }
    for (i=0;i<n;i++)
 {
  cout<<"請輸入非終結符Vn["<<i<<"]:";
  cin>>Vn[i];
  cout<<"請輸入此非終結符對應各終結符的產生式右部(null或NULL表示出錯;$表示空串):"; 
  for(k=0;k<=r;k++)
  {
   cin>>M[i][k];
  }
 }
/*opt2:
    cout<<"請輸入要分析的字符串，且以#結束:";
    analyse(Vn, Vt, M);
    cout<<"             ************************請選擇***********************"<<endl;
    cout<<"                                  1: 輸入字符串"                  <<endl;
    cout<<"                                  2: 輸入新分析表"                <<endl;
    cout<<"                                  0: 退  出"                      <<endl;
/*opt3:
    cin>>select;
    switch(select)
 {
        case '1': {goto opt2;break;}
        case '2': {goto opt1;}
        case '0': {break;}
        default:  {
						cout<<"輸入錯誤!請重新選擇:"<<endl;
						goto opt3;
						break;
				  }
 }*/
    return 0;
}