/*************Written By Zzg************/
      /*******Date : 11,25,2017********/
 
#include <iostream>
#include <stdlib.h>
#include <stdio.h>
 
using namespace std;
string KEYWORD[15]={"if","else","void","return","while","then","for","do",   //關(guān)鍵字
          "int","char","double","float","case","cin","cout"};
char SEPARATER[8]={';',',','{','}','[',']','(',')'};  //分隔符
char OPERATOR[8]={'+','-','*','/','>','<','=','!'};   //運(yùn)算符
char FILTER[4]={' ','\t','\r','\n'};          //過濾符
const int IDENTIFIER=100;     //標(biāo)識符值
const int CONSTANT=101;      //常數(shù)值
const int FILTER_VALUE=102;    //過濾字符值
 
 
/**判斷是否為關(guān)鍵字**/
bool IsKeyword(string word){
  for(int i=0;i<15;i++){
    if(KEYWORD[i]==word){
      return true;
    }
  }
  return false;
}
/**判斷是否為分隔符**/
bool IsSeparater(char ch){
  for(int i=0;i<8;i++){
    if(SEPARATER[i]==ch){
      return true;
    }
  }
  return false;
}
 
/**判斷是否為運(yùn)算符**/
bool IsOperator(char ch){
  for(int i=0;i<8;i++){
    if(OPERATOR[i]==ch){
      return true;
    }
  }
  return false;
}
/**判斷是否為過濾符**/
bool IsFilter(char ch){
  for(int i=0;i<4;i++){
    if(FILTER[i]==ch){
      return true;
    }
  }
  return false;
}
/**判斷是否為大寫字母**/
bool IsUpLetter(char ch){
  if(ch>='A' && ch<='Z') return true;
  return false;
}
/**判斷是否為小寫字母**/
bool IsLowLetter(char ch){
  if(ch>='a' && ch<='z') return true;
  return false;
}
/**判斷是否為數(shù)字**/
bool IsDigit(char ch){
  if(ch>='0' && ch<='9') return true;
  return false;
}
/**返回每個字的值**/
template <class T>
int value(T *a,int n,T str){
 for(int i=0;i<n;i++){
 if(a[i]==str) return i+1;
 }
 return -1;
}
/**詞法分析**/
void analyse(FILE * fpin){
  char ch=' ';
  string arr="";
  while((ch=fgetc(fpin))!=EOF){
    arr="";
    if(IsFilter(ch)){}       //判斷是否為過濾符
    else if(IsLowLetter(ch)){    //判斷是否為關(guān)鍵字
      while(IsLowLetter(ch)){
  arr += ch;
  ch=fgetc(fpin);
      }
  //fseek(fpin,-1L,SEEK_CUR);
  if(IsKeyword(arr)){
        printf("%3d  ",value(KEYWORD,15,arr));
  cout<<arr<<" 關(guān)鍵字"<<endl;
  }
  else
      {
        printf("%3d  ",IDENTIFIER);
        cout<<arr<<" 標(biāo)識符"<<endl;
      }
    }
    else if(IsDigit(ch)){      //判斷是否為數(shù)字
      while(IsDigit(ch)||(ch=='.'&&IsDigit(fgetc(fpin)))){
        arr += ch;
        ch=fgetc(fpin);
      }
      fseek(fpin,-1L,SEEK_CUR);
      printf("%3d  ",CONSTANT);
      cout<<arr<<" 整形數(shù)"<<endl;
    }
    else if(IsUpLetter(ch)||IsLowLetter(ch)||ch=='_'){
      while(IsUpLetter(ch)||IsLowLetter(ch)||ch=='_'||IsDigit(ch)){
        arr += ch;
        ch=fgetc(fpin);
      }
      fseek(fpin,-1L,SEEK_CUR);
      printf("%3d  ",CONSTANT);
      cout<<arr<<" 標(biāo)識符"<<endl;
    }
    else switch(ch){
    case '+':
    case '-':
    case '*':
    case '/':
    case '>':
    case '<':
    case '=':
    case '!':
      {
        arr += ch;
        printf("%3d  ",value(OPERATOR,8,*arr.data()));
        cout<<arr<<" 運(yùn)算符"<<endl;
        break;
      }
    case ';':
    case ',':
    case '(':
    case ')':
    case '[':
    case ']':
    case '{':
    case '}':
      {
       arr += ch;
       printf("%3d  ",value(SEPARATER,8,*arr.data()));
       cout<<arr<<" 分隔符"<<endl;
       break;
      }
    default :cout<<"\""<<ch<<"\":無法識別的字符！"<<endl;
    }
  }
 
}
int main()
{
  char inFile[40];
  FILE *fpin;
  cout<<"請輸入源文件名（包括路徑和后綴）:";
  while(true){
    cin>>inFile;
    if((fpin=fopen(inFile,"r"))!=NULL)
      break;
    else{
      cout<<"文件名錯誤！"<<endl;
      cout<<"請輸入源文件名（包括路徑和后綴）:";
    }
 
  }
  cout<<"------詞法分析如下------"<<endl;
  analyse(fpin);
  return 0;
}