词法与语法分析 （VC实现）

最新推荐文章于 2021-10-10 18:52:34 发布
最新推荐文章于 2021-10-10 18:52:34 发布
阅读量1.1k 收藏 1
点赞数
分类专栏： 学习笔记 文章标签： null input 存储 delete struct string
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/rjy0816/article/details/1232047
版权

这两个星期按下面语法图封装了一个词法与语法的类，因为水平有限现在传上来，希望各位高手指正^_^

以下是语法图：

 头文件：

struct CIFA            //存储分析出的词
{
 CString work;  //分析出的单词
 int type;  //1 关键字，2 标识符，3 数字，4或7 错误，5 操作符，6 statement number
 int loca;  //该词在缓冲的位置
// int value;  //该词的值
 CIFA * next;    //连接下一单词
};

class CFenXi 
{
public:
 BOOL GetErrFlag();
 void PrintYuFaMsg(CString &str);
 void YuFaFenXi();
 void PrintCiFaErrMsg(CString& str);
 void CifaFenxi();
 CFenXi();
 virtual ~CFenXi();

 CIFA *m_head;  //词法分析结果
 CString m_code;  //源程序缓冲

protected:
 BOOL IsRepeat();
 BOOL Expression();
 BOOL KW_VARIABLE();
 BOOL NextWord();
 void NextYuJu();
 int WhichKW(CString str);
 BOOL Condition();
 BOOL Statement();
 BOOL Program();
 BOOL IsRem(CString str);
 BOOL IsKeyWord(CString str);
 BOOL IsString(CString str);
 BOOL KW_FOR();
 BOOL KW_END();
 BOOL KW_NEXT();
 BOOL KW_UNLOOP();
 BOOL KW_IF();
 BOOL KW_REM();
 BOOL KW_GOTO();
 BOOL KW_GOSUB();
 BOOL KW_RETURN();
 BOOL KW_INPUT(int num);
 BOOL KW_PRINT(int num);

 CIFA* cur; //指向当前分析的词
 char m_keyWord[15][10]; //关键字表
 int m_keyWordNum;  //分析的单词个数
 char m_operor[15][5];  //操作符表
 char m_errMes[35][100];  //错误信息表
 int m_errors[50]; //记录语法错误
 int m_errNum;  //记录语法错误个数
 int m_errFlag;  //词法错误标志（词法有错为非零）
 int m_staNum[50];  //记录statement number
 int m_stanum; //statement Number  个数
};

 

CPP文件：

CFenXi::CFenXi()
{
 m_errFlag = 0;
 m_head = NULL;

 strcpy(m_keyWord[0],"FOR");
 strcpy(m_keyWord[1],"END");
 strcpy(m_keyWord[2],"NEXT");
 strcpy(m_keyWord[3],"UNLOOP");
 strcpy(m_keyWord[4],"IF");
 strcpy(m_keyWord[5],"REM");
 strcpy(m_keyWord[6],"GOTO");
 strcpy(m_keyWord[7], "GOSUB");
 strcpy(m_keyWord[8],"RETURN");
 strcpy(m_keyWord[9],"INPUT");
 strcpy(m_keyWord[10],"PRINT");
 strcpy(m_keyWord[11],"TO");
 strcpy(m_keyWord[12],"THEN");
 strcpy(m_keyWord[13],"program");
// strcpy(m_keyWord[13],"CR");
 m_keyWordNum = 14;

 strcpy(m_operor[0],"=");
 strcpy(m_operor[1],"-");
 strcpy(m_operor[2],"+");
 strcpy(m_operor[3],"*");
 strcpy(m_operor[4],"/");
 strcpy(m_operor[5],"(");
 strcpy(m_operor[6],")");
 strcpy(m_operor[7],"<");
 strcpy(m_operor[8],">");
 strcpy(m_operor[9],",");
 char temp[2];
 temp[0] = (char)13;
 strcpy(m_operor[10],temp); //m_operor[10]存储回车

 strcpy(m_errMes[0],"标识符定义错误或存在非法字符；标识符定义只能有一个字母打头，后面跟数字串");
 strcpy(m_errMes[1],"漏了一边括号");
 strcpy(m_errMes[2],"缺少CR或该语句后存在多余语句");
 strcpy(m_errMes[3],"缺少statement number");
 strcpy(m_errMes[4],"注释行有错");
 strcpy(m_errMes[5],"缺少关键字“ program ”");
 strcpy(m_errMes[6],"program与statement间有多余信息");
 strcpy(m_errMes[7],"缺少statement number");
 strcpy(m_errMes[8],"FOR的结构应为FOR 标识符 = 标识符或常量 TO 标识符或常量");
 strcpy(m_errMes[9],"END后除了‘CR’外没有其它字符");
 strcpy(m_errMes[10],"NEXT后只跟一个标识符");
 strcpy(m_errMes[11],"UNLOOP后只跟一个标识符");
 strcpy(m_errMes[12],"IF结构错误 正确为（标识符或常数 <或=或〉标识符或常数）");
 strcpy(m_errMes[13],"REM语句出错");
 strcpy(m_errMes[14],"GOTO后应跟statement number");
 strcpy(m_errMes[15],"GOSUB后应跟statement number");
 strcpy(m_errMes[16],"statement Number 与另一重复");
 strcpy(m_errMes[17],"INPUT后跟标识符，若有多个（不超过三个）标识符用逗号分开");
 strcpy(m_errMes[18],"PRINT后跟标识符，若有多个（不超过三个）标识符用逗号分开");
 strcpy(m_errMes[19],"variable后应为 = 表达式 CR");
 strcpy(m_errMes[20],"statement后不能直接换行");
 strcpy(m_errMes[21],"一次语句只能输入三个数");
 strcpy(m_errMes[22],"PRINT后跟标识符，若有多个（不超过三个）标识符用逗号分开");
 strcpy(m_errMes[23],"statement后只能跟关键字或变量");

}

CFenXi::~CFenXi()
{

}
void CFenXi::CifaFenxi()
{//词法分析
 m_stanum = 0;
 m_errFlag = 0; //出错标志初始为0
 if(m_head)
 {
  CIFA* p;
  CIFA* q;
  p = m_head->next;
  while(p) //当再次运行函数,将上次所占资源释放
  {
   q = p;
   p = p->next;
   delete q;
  }
  m_head = NULL;  //表头清空
 }

 m_head = new CIFA; //带头节点的链表存储词法分析结果
 CString room; //当前分析的词
 room.Empty();
 CIFA* last = m_head; //记录表尾
 BOOL m_isKG = TRUE; //判断是否读到一个词
 int m_n;  //记录词在缓冲的位置
 int flag = 1;  //0表示字符串，1表示操作符或空格
 for(int i = 0;i<=m_code.GetLength();i++)//分析源代码
 {
  if(m_isKG) //遇到空格或操作符时的处理
  {
   m_n = i;
   room.Empty();
   m_isKG = FALSE;
  }

  if(i < m_code.GetLength())//当前字符不是m_code的最后一位，则操作
  {
   int tt = m_code.GetAt(i);
   if(tt != ' ' && !(tt>=40&&tt<=45) && tt!=47 && !(tt>=60&&tt<=62) && tt!=13 && tt!=10) 
    //如果不是空格或不是操作符,继续读字符
   {
    room += m_code.GetAt(i);
    flag = 0;//将标志转成字符串
    continue;
   }
  }
//  CIFA* cur; //存放当前分析的词
  if(flag == 0)
  {//一个词读完,进行处理
   cur = new CIFA;
   cur->work = room;

   int n = 0; //room标识符的类型,1为非法,2为数字与字符混合
      //3为数字,4为字符,0为没定义
   int m; //循环控制标志
   for(m = 0;m<room.GetLength();m++)//分析当前词
   {
    if(!((room.GetAt(m)>=65 && room.GetAt(m)<=90) ||
     (room.GetAt(m)>=97 && room.GetAt(m)<=122) ||
     (room.GetAt(m)>=48 && room.GetAt(m)<58)))
    {//遇到非法字符,出错
     m_errFlag = 1;
     cur->type = 4;
     cur->loca = m_n;
     cur->next = NULL;
     last->next = cur;
     last = cur;
     n=1;
     break; //检测到非法字符，确定单词为非法串，退出循环
    }

    if(room.GetAt(m)>=48 && room.GetAt(m)<58)
    {//判断是否纯数字
     if(n!=1 && (n==0||n==3))
      n = 3;
     if(n!=1 && (n==4||n==2))
      n = 2;//确定该词为数字与字符混合
    }
    if((room.GetAt(m)>=65 && room.GetAt(m)<=90) ||
     (room.GetAt(m)>=97 && room.GetAt(m)<=122))
    {///判断是否纯字符
     if(n!=1 && (n==0||n==4))
      n=4;    
     if(n!=1 && (n==3||n==2))
      n = 2;//确定该词为数字与字符混合
    }
   }
   if(n == 3)
   {//该词类型为数字
    if(last->work == "CR")
    {
     if(IsRepeat())
      cur->type = 7;
     else
      cur->type = 6;
    }
    else
     cur->type = 3;
    cur->loca = m_n;
    cur->next = NULL;
    last->next = cur;
    last = cur;
   }
   if(n == 4)
   {
    if(m==1)//当只有一个字母时为标识符
    {
     cur->type = 2;
     cur->loca = m_n;
     cur->next = NULL;
     last->next = cur;
     last = cur;
    }
    else//当大于一个字母时为标识符
    {
     if(IsKeyWord(room))//是否为关键字
     {
      if(IsRem(room))//如果为 注释
      {
       BOOL m_yinHao = FALSE;
       CString strRem;
       for(int h = i;;h++)//过滤注释
       {
        if(m_code[h] == 13)
         break;
        if(m_code[h] == ' ')
         continue;
        else
         strRem += m_code.GetAt(h);
 //       if((m_code[h] == 34&&m_yinHao==FALSE)
 //        m_yinHao = TRUE;
       }
       if(IsString(strRem)) //分析注释
        cur->type = 1;
       else
       {
        cur->type = 4;
        m_errFlag = 1;
       }
       i = h;
      }
      else
       cur->type = 1;
      cur->loca = m_n;
      cur->next = NULL;
      last->next = cur;
      last = cur;
     }
     else
     {//大于两个字符的纯字母组成的串为非法串
      cur->type = 4;
      m_errFlag = 1;
      cur->loca = m_n;
      cur->next = NULL;
      last->next = cur;
      last = cur;
     }
    }
   }
   if(n == 2)
   {
    if(room.GetAt(0)>=48 && room.GetAt(0)<58)
    {//不符合标识符定义规则
     m_errFlag = 1;
     cur->type = 4;
     cur->loca = m_n;
     cur->next = NULL;
     last->next = cur;
     last = cur;
    }

    if((room.GetAt(0)>=65 && room.GetAt(0)<=90) ||
     (room.GetAt(0)>=97 && room.GetAt(0)<=122))
    {
     for(m = 1;m<room.GetLength();m++)
     {//标识符定义为一字符打头,后面跟数字.不能跟数字以外的符号
      if(room.GetAt(m)<48 || room.GetAt(m)>=58)
       break;  
     }
     if(m<room.GetLength())
     {//不符合标识符定义规则
      m_errFlag = 1;
      cur->type = 4;
      cur->loca = m_n;
      cur->next = NULL;
      last->next = cur;
      last = cur;
     }
     else
     {//标识符
      cur->type = 2;
      cur->loca = m_n;
      cur->next = NULL;
      last->next = cur;
      last = cur;
     }//if
    }//if
   }//for
  }//if

  if(i < m_code.GetLength())//当前字符不是m_code的最后一位，则操作
  {
   flag = 1;  //将标志转成操作符
   int t = m_code.GetAt(i);
   if((t>=40&&t<=45) || t==47 || (t>=60&&t<=62) || t==13) 
   {//当当前字符为操作符时
    cur = new CIFA;
    if(t == 13) //如果当前是回车，且上个单词不是回车，则
     if(last->work != "CR")
     {
      cur->work = "CR";
      cur->type = 1;  //回车为关键字
      i++;
     }
     else
     {//如果连续两个回车,则过滤
      m_isKG = TRUE;
      continue;
     }

    else
    {
     cur->work = m_code.GetAt(i);
     cur->type = 5; //其他为操作符
    }
    cur->loca = i;
    cur->next = NULL;
    last->next = cur;
    last = cur;
   }
  }
  m_isKG = TRUE;
 }
}

BOOL CFenXi::IsKeyWord(CString str)
{//判断是否为关键字
 char *temp; 
// for(int i = 0;i<str.GetLength();i++)
//  temp[i] = str.GetAt(i);
 temp = str.GetBuffer(str.GetLength());
 for(int m = 0;m<m_keyWordNum;m++)
  if(strcmp(temp,m_keyWord[m]) == 0)//两字符串相等
   return TRUE;
 return FALSE;
}

void CFenXi::PrintCiFaErrMsg(CString &str)
{//打印词法分析的错误信息

 CIFA * p;
 p = m_head->next;
 int num = 0; //错误单词个数
 CString temp;
 str.Empty();
 str.Format("词法分析");
 str += 13; //回车
 str += 10; //换行
 str += "属性中1 关键字，2 标识符，3 数字，4或7 错误，5 操作符，6 statement number";
 str += 13; //回车
 str += 10; //换行
 str += 13; //回车
 str += 10; //换行
 str += "属性        单词        ";
 str += 13; //回车
 str += 10; //换行
 while(p)
 {
  temp.Empty();
  switch(p->type)
  {
  case 1:
   temp += '1';//关键字
   break;
  case 2:
   temp += '2';//标识符
   break;
  case 3:
   temp += '3';//数字
   break;
  case 4:
   temp += '4';//出错
   break;
  case 5:
   temp += '5';//操作符
   break;
  case 6:
   temp += '6';//statement number
   break;
  case 7:
   temp += '7';//statement number出现重复
   break;
  }
  temp += "           ";
  temp += p->work;
  if(p->type == 4)
  {
   temp += "     ";
   if(p->work == "REM")
    temp += m_errMes[4];//显示出错信息
   else
    temp += m_errMes[0];//显示出错信息
   num++;
  }
  if(p->type == 7)
  {
   temp += "     ";
   temp += m_errMes[16];//显示出错信息
   num++;
  }
  temp += 13;
  temp += 10;
  str += temp;
  p = p->next;
 }
 str += 13; //回车
 str += 10; //换行
 char a[5];
 itoa(num,a,10); //错误个数
 str += "错误个数    ";
 str += a;
}

BOOL CFenXi::IsRem(CString str)
{//判断是否为注释行
 if(str.GetLength()>3)
  return FALSE;//不与关键字REM匹配放回FALSE
 for(int i = 0;i<str.GetLength();i++)
 {
  if(str.GetAt(i) != m_keyWord[5][i])
   break;
 }
 if(i<str.GetLength())
  return FALSE;//不与关键字REM匹配放回FALSE
 return TRUE;//与关键字REM匹配放回TRUE
}

BOOL CFenXi::IsString(CString str)
{//分析string
 if(str.GetAt(0) != 34) //判断第一个字符是否为 "
  return FALSE;
 else
  if(str.GetAt(str.GetLength()-1) != 34)
   return  FALSE;
 //注释在两双引号内则返回TRUE
 return TRUE;
}

void CFenXi::YuFaFenXi()
{
 Program();
}

BOOL CFenXi::Program()
{//程序分析开始
 cur = m_head->next; //cur获得的一个分析的单词
 m_errNum = 0;  //错误信息初始为0
 if(cur->work != "program")
  m_errors[m_errNum++] = 5; //缺少关键字“ program ”

 NextWord(); //分析下一单词

 while(1)
 {
  if(cur->work != "CR")
  {
   NextWord();
   if(m_errNum == 1)
    m_errors[m_errNum++] = 6; //program与statement间有多余信息
  }
  else
   break;  //遇到statement number时退出
 }

 NextWord();

 while(1)
 {
  if(cur)
  {
   if(Statement()) //分析statement
    return TRUE;  //遇到END返回TRUE
  }
  else
   break;
 }

 return FALSE;
}

BOOL CFenXi::Statement()
{//分析statement
 if(cur->type != 6)
 {
  NextYuJu();
  m_errors[m_errNum++] = 7; //缺少statement number
  NextWord();
  NextWord();
  return FALSE;
 }

 NextWord();

 int flag = 1;
 switch(WhichKW(cur->work))//各个语句分析
 {
 case 0: //"FOR"
  if(!KW_FOR())
  {
   if(cur->work == "CR")
   {
    NextWord();
    m_errors[m_errNum++] = 8; //FOR的结构应为FOR 标识符 = 标识符或常量 TO 标识符或常量
    return FALSE;
   }
   else
    NextYuJu();
   m_errors[m_errNum++] = 8; //FOR的结构应为FOR 标识符 = 标识符或常量 TO 标识符或常量
  }
  break;
 case 1: //"END"
  if(!KW_END())
  {
   m_errors[m_errNum++] = 9; //END后除了‘CR’外没有其它字符
  }
  return TRUE; //END后没有字符返回真

  break;
 case 2: //"NEXT"
  if(!KW_NEXT())
  {
   if(cur->work == "CR")
   {
    NextWord();
    m_errors[m_errNum++] = 10; //NEXT后只跟一个标识符
    return FALSE;
   }
   else
    NextYuJu();
    m_errors[m_errNum++] = 10; //NEXT后只跟一个标识符
  }
  break;
 case 3: //"UNLOOP"
  if(!KW_UNLOOP())
  {
   if(cur->work == "CR")
   {
    NextWord();
    m_errors[m_errNum++] = 11; //UNLOOP后只跟一个标识符
    return FALSE;
   }
   else
    NextYuJu();
    m_errors[m_errNum++] = 11; //UNLOOP后只跟一个标识符
  }
  break;
 case 4: //"IF"
  if(!KW_IF())
  {
   if(cur->work == "CR")
   {
    NextWord();
    m_errors[m_errNum++] = 12; //IF结构错误
    return FALSE;
   }
   else
    NextYuJu();
    m_errors[m_errNum++] = 12; //IF结构错误
  }
  break;
 case 5: //"REM"
  if(!KW_REM())
  {
   NextYuJu();
   m_errors[m_errNum++] = 13; //REM出错
  }
  break;
 case 6: //"GOTO"
  if(!KW_GOTO())
  {
   if(cur->work == "CR")
   {
    NextWord();
    m_errors[m_errNum++] = 14; //GOTO后跟statement number
    return FALSE;
   }
   else
    NextYuJu();
   m_errors[m_errNum++] = 14; //GOTO后跟statement number
  }
  break;
 case 7: //"GOSUB"
  if(!KW_GOSUB())
  {
   if(cur->work == "CR")
   {
    NextWord();
    m_errors[m_errNum++] = 15; //GOSUB后跟statement number
    return FALSE;
   }
   else
    NextYuJu();
   m_errors[m_errNum++] = 15; //GOSUB后跟statement number
  }
  break;
 case 8: //"RETURN"
  if(!KW_RETURN())
   m_errors[m_errNum++] = 16;
  break;
 case 9: //"INPUT"
  if(!KW_INPUT(0))
  {
   if(cur->work == "CR")
   {
    NextWord();
    m_errors[m_errNum++] = 17; //INPUT后跟标识符，若有多个（不超过三个）标识符用逗号分开
    return FALSE;
   }
   else
    NextYuJu();
   m_errors[m_errNum++] = 17; //INPUT后跟标识符，若有多个（不超过三个）标识符用逗号分开
  }
  break;
 case 10: //"PRINT"
  if(!KW_PRINT(0))
  {
   if(cur->work == "CR")
   {
    NextWord();
    m_errors[m_errNum++] = 18; //PRINT后跟标识符，若有多个（不超过三个）标识符用逗号分开
    return FALSE;
   }
   else
    NextYuJu();
   m_errors[m_errNum++] = 18; //PRINT后跟标识符，若有多个（不超过三个）标识符用逗号分开
  }
  break;
 default:
  if(cur->type == 2)
  {
   if(!KW_VARIABLE())
   {
    if(cur->work == "CR")
    {
     NextWord();
     m_errors[m_errNum++] = 19; //variable后应为 = 表达式 CR
     return FALSE;
    }
    else
     NextYuJu();
    m_errors[m_errNum++] = 19; //variable后应为 = 表达式 CR
   }
  }
  else
  {
   if(cur->work != "CR")
    NextYuJu();
   else
   {
    NextWord();
    m_errors[m_errNum++] = 20; //statement后不能直接换行
    return FALSE;
   }
   m_errors[m_errNum++] = 23; //statement后只能跟关键字或变量
  }
 }

 NextWord();
 if(cur->work != "CR")
 {
  NextYuJu();
  m_errors[m_errNum++] = 2; //缺少CR或该语句后存在多余语句
  NextWord();
  NextWord();
 }
 else
  NextWord();

 return FALSE;
}

BOOL CFenXi::Condition()
{//IF的判断条件 
 if(cur->work.GetAt(0) != '(')
  return FALSE;
 NextWord();

 if(!(cur->type == 2 || cur->type == 3))
  return FALSE;
 NextWord();

 if(!(cur->work.GetAt(0) == '<' || cur->work.GetAt(0) == '=' || cur->work.GetAt(0) == '>'))
  return FALSE;
 NextWord();

 if(!(cur->type == 2 || cur->type == 3))
  return FALSE;
 NextWord();

 if(cur->work.GetAt(0) != ')')
  return FALSE;
 return TRUE;
}

int CFenXi::WhichKW(CString str)
{//判断关键字所对应的序号
 for(int i = 0;i<11;i++)
 {
  for(int j = 0;j<str.GetLength();j++)
   if(str.GetAt(j) != m_keyWord[i][j])
    break;
  if(j==str.GetLength())
   return i; //表示相应的关键字
 }
 return -1;  //表示是标示符
}

BOOL CFenXi::KW_FOR()//FOR的结构应为FOR 标识符 = 标识符或常量 TO 标识符或常量 CR
{
 NextWord();
 if(cur->type != 2)//FOR后缺标识符
  return FALSE;
 NextWord();
 if(cur->work.GetAt(0) != '=')//FOR中的 =  有误
  return FALSE;
 NextWord();
 if(!(cur->type == 2||cur->type == 3)) //标识符出错
  return FALSE;
 NextWord();
 if(cur->work != "TO")//TO 出错
  return FALSE;
 NextWord();
 if(!(cur->type == 2||cur->type == 3)) //标识符出错
  return FALSE;

 return TRUE;
}

BOOL CFenXi::KW_END()//END后除了‘CR’外没有其它字符
{
 NextWord();
 if(!cur) //为空则结束
  return TRUE;
 if(cur->work != "CR") //不空又不与CR相符，出错
  return FALSE;
 if(cur->next) //空又与CR相符，但后面还有字符，出错
  return FALSE;
 return TRUE;
}

BOOL CFenXi::KW_NEXT()//NEXT后只跟一个标识符
{
 NextWord();
 if(cur->type != 2)
  return FALSE;
 return TRUE;
}

BOOL CFenXi::KW_UNLOOP()//UNLOOP后只跟一个标识符
{
 NextWord();
 if(cur->type != 2)
  return FALSE;
 return TRUE;
}

BOOL CFenXi::KW_IF()//结构 （标识符或常数 <或=或〉标识符或常数）
{
 NextWord();
 if(!Condition())
  return FALSE;
 NextWord();
 if(cur->work != "THEN")
  return FALSE;
 NextWord();
 if(cur->type != 3)
  return FALSE;
 return TRUE;
}

BOOL CFenXi::KW_REM()
{
 return TRUE;
}

BOOL CFenXi::KW_GOTO()//GOTO后跟statement number
{
 NextWord();
 if(cur->type != 3)
  return FALSE;
 return TRUE;
}

BOOL CFenXi::KW_GOSUB()//GOSUB后跟statement number
{
 NextWord();
 if(cur->type != 3)
  return FALSE;
 return TRUE;
}

BOOL CFenXi::KW_INPUT(int num)
{//INPUT后跟标识符，若有多个（不超过三个）标识符用逗号分开
 NextWord();
 if(cur->type != 2) //不是标识符返回FALSE
  return FALSE;
// NextWord();
 if(cur->next->work != "CR")
 {
  NextWord();
  if(cur->work.GetAt(0) != ',')//若有多个逗号分开
   return FALSE;
  else
  {
   if(num < 2)
   {
    if(!KW_INPUT(++num))
     return FALSE;
   }
   else
   {
    NextYuJu();
//    m_errors[m_errNum++] = 21;//一次语句只能输入三个数 
    return FALSE;
   }
  }
 }
 return TRUE;
}

BOOL CFenXi::KW_RETURN()
{
 return TRUE;
}

BOOL CFenXi::KW_PRINT(int num)
{//PRINT后跟标识符，若有多个（不超过三个）标识符用逗号分开
 NextWord();
 if(cur->type != 2) //不是标识符返回FALSE
  return FALSE;
 if(cur->next->work != "CR")
 {
  NextWord();
  if(cur->work.GetAt(0) != ',')//若有多个逗号分开
   return FALSE;
  else
  {
   if(num < 2)
   {
    if(!KW_PRINT(++num))
     return FALSE;
   }
   else
   {
    NextYuJu();
//    m_errors[m_errNum++] = 21;//一次语句只能输入三个数 
    return FALSE;
   }
  }
 }
 return TRUE;
}

void CFenXi::PrintYuFaMsg(CString &str)
{
 str.Empty();
 char a[5];
 if(m_errNum == 0)
 {
  str += 13; //回车
  str += 10; //换行
  str += "     源程序语法正确";
  return ;
 }
 str += "语法分析结果:";
 str += 13; //回车
 str += 10; //换行
 for(int i = 1;i<=m_errNum;i++)
 {
  itoa(i,a,10); //错误排列
  str += "错误";
  str += a;
  str += "   ";
  str += m_errMes[m_errors[i-1]];
  str += 13; //回车
  str += 10; //换行
 }
 str += 13; //回车
 str += 10; //换行
 itoa(m_errNum,a,10); //错误个数
 str += "错误个数    ";
 str += a;
 
}

void CFenXi::NextYuJu()
{//将指针移到下一语句
 while(1)
 {
  if(!cur->next)
   break;
  if(cur->next->work == "CR")
   break;
  NextWord();
 }
}

BOOL CFenXi::NextWord()
{//指向下一单词
 if(cur)
 {
  cur = cur->next;
  return TRUE;
 }
 else //当没有单词时返回FALSE
  return FALSE;
}

BOOL CFenXi::KW_VARIABLE()
{
 NextWord();
 if(cur->work.GetAt(0) != '=')
  return FALSE;
 NextWord();
 if(!Expression())
  return FALSE;
 return TRUE;
}

BOOL CFenXi::Expression()
{//表达式     

 if(!(cur->type == 2 || cur->type == 3 || cur->work.GetAt(0) == '('))
  return FALSE;//不是变量或数字或因子，返回FALSE
 else
 {
  if(cur->work.GetAt(0) == '(')
  {
   NextWord();
   if(!Expression())//如果因子则判断里面是否表达式
    return FALSE;
   if(cur->work.GetAt(0) != ')')
    return FALSE;
   else
   {
    if(cur->next->work == "CR")//语句结束则返回ＴＲＵＥ
     return TRUE;
   }
  }
 }

 if(cur->next->work != "CR")
  NextWord();
 else
  return TRUE;//语句结束则返回ＴＲＵＥ

 if(!(cur->work.GetAt(0) == '+' || cur->work.GetAt(0) == '-'
  || cur->work.GetAt(0) == '*' || cur->work.GetAt(0) == '/'))
  if(cur->work.GetAt(0) != ')')
   return FALSE;//不是以上操作符返回FALSE
  else
   return TRUE;
 NextWord();

 if(!Expression())//递归
  return FALSE;

 return TRUE;
}

BOOL CFenXi::GetErrFlag()//得到此法分析时的错误标志
{
 return m_errFlag;
}

BOOL CFenXi::IsRepeat()//statement Number 是否重复出现
{
 char a[10];
 for(int i = 0;i<cur->work.GetLength();i++)
  a[i] = cur->work.GetAt(i);
 a[i] = '/0';

 int t = atoi(a);
 for(int j = 0;j<m_stanum;j++)//查找有没有重复statement number
 {
  if(t == m_staNum[j])
   break;
 }
 m_staNum[m_stanum++] = t;
 if(j<m_stanum-1)
  return TRUE;
 return FALSE;
}

类留了词法分析，语法分析，词法分析报告输出和语法分析报告输出几个接口
purewinds86
关注
  • 0
    点赞
  • 踩
  • 1
    收藏
    觉得还不错? 一键收藏
  • 2
    评论
专栏目录
VC实现的词法分析器
11-10
一个VC++实现词法分析器：编制一个读单词过程，从输入的源程序中，识别出各个具有独立意义的单词，即基本保留字、标识符、常数、运算符、分隔符五大类。并依次输出各个单词的内部编码及单词符号自身值。
vc++做词法分析器
yyt7529的专栏
10-08 985
<br />词：变量var,类型,int ,real(实数）bool（布尔) while,do,begin,if,then,else, 将关键字放在一个表中，有的话，不添加，否则添加算符，有+/*/，这也要在符号表中，都要反回一个记号：addop,mulop 界符：( ) ; , ： ：= 关系操作符：>=,<=,!=,<,>,== id:字开头的字符数字串无符号int 型的关键字用空格隔开，其它可以有也可以没有在扫描时：注释有{}，{}不能有{}，可以有一行或多行。功能：删除一个多余字符，插入一个字符。<
c语言词法分析报告,编译原理词法分析和语法分析报告代码(C语言版)
weixin_36368404的博客
05-18 205
编译原理词法分析和语法分析报告代码(C语言版) 词法分析 一、 实验目的 设计、编制并调试一个词法分析程序，加深对词法分析原理的理解。 二、 实验要求 2.1 待分析的简单的词法 (1)关键字： begin if then while do end 所有的关键字都是小写。 (2)运算符和界符 ： = + - * / >= = ; ( ) # (3)其他单词是标识符(ID)和整型常数(SUM)...
c语言语法语义大全,[工学]编译原理--词法分析_语法分析_语义分析C语言.doc
weixin_28994227的博客
05-17 223
词法分析#include#include#includeusing namespace std;#define MAXN 20000int syn,p,sum,kk,m,n,row;double dsum,pos;char index[800],len;//记录指数形式的浮点数char r[6][10]={"function","if","then","while","do","endfunc"}...
VC++语法分析工具源代码附文档
03-15
内容索引:VC/C++源码,算法相关,语法分析工具,代码检查器　　VC++专用的语法分析工具，可以分析出你的VC代码是否正确，它分为词法分析和语法分析两个程序，封装在一个CFenXi类中,，本程序利用了分割窗体技术和单文档设计，压缩包内附有开发文档说明。 　　
yufafenxi_newspai_词法分析_语法分析_Vc_
10-02
《VC++实现词法与语法分析程序详解》 在计算机科学领域，编译器和解释器是关键的软件工具，它们负责将高级语言转化为机器可理解的指令。在这个过程中，词法分析和语法分析是两个重要的步骤。本篇将深入探讨如何使用...
Cminus 词法、语法分析程序VC6.0
12-30
《Cminus 词法、语法分析程序在VC6.0中的实现》 在计算机科学领域，编译原理是深入理解程序设计语言核心机制的关键。它包括词法分析、语法分析、语义分析等多个阶段，这些步骤共同将源代码转换为目标机器可执行的...
C++ 词法和语法分析程序实验源代码与文档
03-15
内容索引:VC/C++源码,字符处理,词法分析　基于C的词法分析和语法分析程序，是我们编译原理实验课时候做的一个演示实验，附有源代码和文档。 　实验的上的是设计、编制并调试一个词法分析程序，加深对词法分析原理的...
编译原理实验_词法分析_Vc_audience12q
09-10
编译原理是研究编译器设计的一门核心课程，涵盖了词法分析、语法分析、语义分析等多个方面。本实验“编译原理实验_词法分析_Vc_audience12q”专注于词法分析这一阶段，它是编译过程的第一步。 词法分析，也称为扫描...
VC++基于PL/0语言的词法、语法分析系统
03-15
内容索引:VC/C++源码,算法相关,语法分析　VC++基于PL/0语言的词法、语法分析系统，测试文件以及源代码工程，从界面来看，貌似很专业。请注意要将编译后的可执行文件放到同一个目录下，否则调用会出错。程序仿VC的...
SNL词法+语法分析java实现
05-21
SNL词法+语法分析的java实现，其中语法分析采用了递归下降的方式。
VC 词法语法分析程序源代码.rar
07-10
VC VC 词法语法分析程序源代码附文档，在程序窗口设计方面，应用了窗体分割技术和单文档设计思路，并附有语法分析详细技术文档。 　　struct CIFA //保存词法分析结果 　　{ 　　int nType; //0:错误, 1:标志符, 2:数字, 3-:关键字和操作符, -1:结束符 　　int nValue; //二元式中的值 　　char szText[20]; //单词 　　int nAddr; //源文件缓冲区中地址 　　}; 　　void YuFaFenXi(); //语法分析 　　void CiFaFenXi(); //词法分析 　　int m_nErrAddr; //语法错误对应单词的地址 　　int m_nErrNo; //语法错误代码 　　char m_str[20000]; //源程序缓冲区 　　char m_szErrMsg[100][100]; //错误信息表 　　CIFA * m_cifa[10000]; //词法分析结果 　　protected: 　　void init(); 　　int m_nCur; //用于语法分析中，指示词法分析结果表中当前的位置 　　int m_n; //用于词法分析中，用于指示词法分析结果的个数 　　char m_szKW[50][20]; //关键词表
语法分析程序 vc 配套
02-18
语法分析程序 vc 配套，编译原理课堂使用
SNL词法分析器源代码（C#）
09-23
原创SNL词法分析器源代码，相关问题请上我的博客上留言，谢谢
编译原理——词法分析实验报告
qq_42334384的博客
04-25 4389
实验要求： 1.编写代码实现程序的词法分析 2.根据对源程序的字符流进行扫描和分解，从而识别出一个个单词或符号 实验代码： #include<string.h> #include<stdio.h> #include<stdlib.h> #include<ctype.h> //定义关键字 char *Key[10]={“main”,“void”,“in...
编译原理-词法分析
修心
05-16 2479
实验一 词法分析 一、词法分析的任务 词法分析的核心任务是从左到右读入源程序的字符流，识别出一个个的单词。所识别的每一个单词，是下一个有意义的词法元素，如标识符或整数。在识别出下一单词，同时也验证了其词法正确性之后，词法分析程序就会产生一个单词记录，传递给后续阶段使用。 词法分析程序所产生的单词记录通常由两部分信息组成：一个是单词符号（token），对应某个特定意义的词法单元，如标识符、整常数等；另一部分是单词的属性值（attribute）。 程序设计语言中有各种类别的单词，常见的如： •保留字，也称关键
编译原理——词法分析器 C++实现
热门推荐
weixin_45693492的博客
04-12 2万+
词法分析器实验目的单词分类表单词结构描述单词状态转换图算法描述程序结构源代码实验结果 实验目的 对C语言的一个子集设计并实现一个简单的词法分析器，掌握利用状态转换图设计词法分析器的基本方法。利用该词法分析器完成对源程序字符串的词法分析。 培养团队合作精神，体会协同工作在解决问题中的作用。 单词分类表 单词符号 种类 种别码 单词符号 种类 种别码 未定义符号 未定义符号 0 =...
语法分析器
smile_lx的博客
10-10 3208
语法分析器1.课程设计内容与要求1.1实验目的1.2实验内容与要求1.3文法表示2.分析与设计2.1模块一 求firstvt和lastvt集合2.1.1 数据结构2.1.2 主要函数2.1.3 算法描述2.1.3.1 First_VT2.1.3.2 Last_VT2.1.4 运行结果2.2 模块二 构建优先关系表2.2.1 数据结构2.2.2 主要函数2.2.3 算法描述2.2.4 运行结果2.3 模块三 词法分析2.3.1 单词种别码设计2.3.2 状态转换图2.3.3 数据结构2.3.4 主要函数2.3
词 法 分 析
qq_44378332的博客
12-18 343
1.测试案例 FOR T FROM 0 TO 2*PI STEP PI/50 DRAW (cos(T),sin(T)); 2.结果说明 1.若输入文本中的某一个单词不在符号表中，则结果是ERRTOKEN 如 ORigin is B (-30, 0); B不在符号表中，显示ERRTOKEN 2.NonToken出现在字符串的末尾，其他情况不会出现 3. 下列错误在词法分析的过程中不会检测到错误，只有在语法分析阶段才可以检测到错误 缺少分号：ROT IS -pi/2+pi/12 错误语法：ROT IS
"基于VC的LL(1)语法分析器设计与实现——晏丽智
基于VC的LL语法分析器设计和实现 摘要： 语法分析是编译过程的关键部分，可以粗略地分为自上而下分析法和自下而上分析法。LL（1）文法是一种能够进行确定性自上而下语法分析的文法。本文首先介绍了LL（1）文法的...

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 2
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值