/*缺陷：1不能識別:= 2文件結尾需有空格或換行符　3雙符號實現有bug*/
#include <iostream>
#include <vector> //vector是同一種類模板
#include <utility>
#include <string>
#include <fstream>
#include <algorithm>
#include <cstdlib>
using namespace std;

//用來存儲目標文件名
string file_name;

//提取文本文件中的信息。 
string GetText();

//獲得一個單詞符號,從位置i開始查找。
//并且有一個引用參數j，用來返回這個單詞最后一個字符在str的位置。 
string GetWord(string str,int i,int& j); 

//這個函數用來除去字符串中連續的空格和換行
//第一個參數為目標字符串，第二個參數為開始位置
//返回值為連續的空格和換行后的第一個有效字符在字符串的位置
int DeleteNull(string str,int i);

//判斷i當前所指的字符是否為一個分界符，是的話返回真，反之假
bool IsBoundary(string str,int i); 

//判斷i當前所指的字符是否為一個運算符，是的話返回真，反之假
bool IsOperation(string str,int i); 

//此函數將一個pair數組輸出到一個文件中
void OutFile(vector<pair<int,string> > v); 

//此函數接受一個字符串數組，對它進行詞法分析，返回一個pair型數組
vector<pair<int,string> > analyst(vector<string> vec);

//此函數判斷傳遞的參數是否為關鍵字，是的話，返回真，反之返回假
bool IsKey(string str);

int main()
{
    string com1=" ";
    string com2="\n"; 
    string fileline=GetText();
//cout<<fileline<<endl;
    int begin=0,end=0;
    vector<string> array;//string類型
    do
    {
        begin=DeleteNull(fileline,begin);
		cout<<"begin="<<begin<<endl;
        string nowString;//nowstring為當前分析的單詞
        nowString=GetWord(fileline,begin,end);
		//cout<<"end="<<end<<endl;
        if(end==-1)//文件為空
            break;
		cout<<"nowString2="<<nowString<<endl;
        if(nowString.compare(com1)&&nowString.compare(com2))
            array.push_back(nowString);//當前單詞nowString!=" "且!="\n"時,將nowString單詞添加到array矢量末尾
		//cout<<"nowString="<<nowString<<endl;
		//cout<<"array="<<array<<endl;
        begin=end+1; 
    }while(true);
    vector<pair<int,string> > mid_result;
    mid_result=analyst(array);
    OutFile(mid_result);

cout<<"**********************************************************************\n";
    cout<<"***詞法分析成功，分析結果已經存儲在文件"<<file_name<<"中！??！***\n";
    cout<<"**********************************************************************\n";
    system("pause");
 return 0;
}

//提取文本文件中的信息
string GetText()
{   
    string file_name1;
 cout<<"請輸入源文件名：";
 cin>>file_name1;
 ifstream infile(file_name1.c_str(),ios::in);
 if (!infile)
 {
  cerr<<"無法打開文件 "<<file_name1.c_str()<<" !!!"<<endl;
  exit(-1);
 }
    cout<<endl;
    char f[1000];
 infile.getline(f,1000,EOF);
 infile.close();
 return f;
}

//獲得一個單詞符號,從位置i開始查找。
//并且有一個引用參數j，用來返回這個單詞最后一個字符在原字符串的位置。 
string GetWord(string str,int i,int& j)
{
       string no_use("(){},; \n+=*/-<>\"");
       j=str.find_first_of(no_use,i);//no-use中仍任一個字串（字符）在以i開頭的str串中的第一次出現的位置
	   cout<<"j="<<j<<endl;
       if(j==-1)//表示已經取完
           return "";
       if(i!=j)
           j--; 
       return str.substr(i,j-i+1);
}

//這個函數用來除去字符串中連續的空格和換行
//第一個參數為目標字符串，第二個參數為開始位置
//返回值為連續的空格和換行后的第一個有效字符在字符串的位置
int DeleteNull(string str,int i)
{
    for(;;i++)
        if(str[i]!=' '&&str[i]!='\n')
            return i;
}

//判斷i當前所指的字符是否為一個分界符，是的話返回真，反之假
bool IsBoundary(string str,int i)
{
     int t;
     char arr[7]={',',';','{','}','(',')','\"'};
     for (t=0;t<7;t++) 
         if(str[i]==arr[t])
             return true;
     return false;
}

//判斷i當前所指的字符是否為一個運算符，是的話返回真，反之假
bool IsOperation(string str,int i)
{
     int t;
    // char arr[8]={'+','-','*','/','=','<','>',':='};
	 char arr[7]={'+','-','*','/','=','<','>'};
     for (t=0;t<7;t++) 
         if(str[i]==arr[t])
             return true;
     return false;
}

//此函數將一個個字符串數組輸出到一個文件中
void OutFile(vector<pair<int,string> > v)
{
    cout<<"請輸入目標文件名：";
 cin>>file_name;
    ofstream outfile(file_name.c_str(),ios::out);
 if (!outfile)
 {
  cerr<<"無法打開文件 "<<file_name.c_str()<<" !!!"<<endl;
  exit(-1);
 }
    cout<<endl;
    int i;
    outfile<<"詞法分析結果如下：\n";
    outfile<<"\n\n";
    outfile<<"v.size()="<<v.size()<<endl;
    for(i=0;i<v.size();i++)
        outfile<<"<"<<v[i].first<<" , \""<<v[i].second<<"\">"<<endl;
    outfile<<"\n\n*********************************\n";
    outfile.close();
    return;
}

//此函數接受一個字符串數組，對它進行詞法分析，返回一個pair型數組
vector<pair<int,string> > analyst(vector<string> vec)
{
     vector<pair<int,string> > temp;
     int i;
     for(i=0;i<vec.size();i++)//vec.size()為單詞數
     {
         if(vec[i].size()==1)
         {
             if((vec[i]==">"||vec[i]=="<"||vec[i]=="!")&&vec[i+1]=="=")
             {
				 cout<<333<<endl;
                   string jk=vec[i];
                   jk.append(vec[++i],0,1);
				   cout<<"jk="<<jk<<endl;
                   pair<int,string> pp(4,jk);
                   temp.push_back(pp);
                   continue;
             }
             if((vec[i]=="+"&&vec[i+1]=="+")||(vec[i]=="-"&&vec[i+1]=="-"))
             {
                   string jk=vec[i];
                   jk.append(vec[++i],0,1);
                   pair<int,string> pp(4,jk);
                   temp.push_back(pp);
                   continue;
             }
             if(IsBoundary(vec[i],0))//若是界符
             {
                   pair<int,string> pp(5,vec[i]);
                   temp.push_back(pp);
             }
             else if(IsOperation(vec[i],0))//若是運算符
             {
                   pair<int,string> pp(4,vec[i]);
                   temp.push_back(pp);
             }
             else if(vec[i][0]<='9'&&vec[i][0]>='0')//若是數字
             {
                   pair<int,string> pp(3,vec[i]);
                   temp.push_back(pp);
             }
             else//若是字母
             {
                   pair<int,string> pp(2,vec[i]);
                   temp.push_back(pp);
             }
         }
         else if(vec[i][0]<='9'&&vec[i][0]>='0')//數字
         {
              pair<int,string> pp(3,vec[i]);
              temp.push_back(pp);
         }
         else if(IsKey(vec[i]))//關鍵字
         {
              pair<int,string> pp(1,vec[i]);
              temp.push_back(pp);
         }
         else//字符
         {
              pair<int,string> pp(2,vec[i]);
              temp.push_back(pp);
         }
     }
     return temp;   
}

//此函數判斷傳遞的參數是否為關鍵字，是的話，返回真，反之返回假
bool IsKey(string str)
{
     string p[27]={"procedure","call","begin","end","var","const","if","then","while","do","read","write","odd","program","type","function","array","integer","real","char","boolean","case","of","repeat","until","to","down"};
     vector<string> ppp(p,p+27);
     int u;
     for(u=0;u<ppp.size();u++)
         if(!str.compare(ppp[u]))
             return true;
     return false;
}
//finished