作业12 实验二 递归下降语法分析

一、实验目的：

利用C语言编制递归下降分析程序,并对简单语言进行语法分析。

编制一个递归下降分析程序,实现对词法分析程序所提供的单词序列的语法检查和结构分析。

二、实验原理

每个非终结符都对应一个子程序。

该子程序根据下一个输入符号(SELECT集)来确定按照哪一个产生式进行处理，再根据该产生式的右端:

• 每遇到一个终结符，则判断当前读入的单词是否与该终结符相匹配，若匹配，再读取下一个单词继续分析；不匹配，则进行出错处理
• 每遇到一个非终结符，则调用相应的子程序

三、实验要求说明

输入单词串，以“＃”结束，如果是文法正确的句子，则输出成功信息，打印“success”,否则输出“error”，并指出语法错误的类型及位置。

例如：

输入begin a:=9;x:=2*3;b:=a+x end #

输出success

输入x:=a+b*c  end #

输出‘end' error

四、实验步骤

      1．待分析的语言的语法（参考P90）

      2．将其改为文法表示，至少包含

–语句

–条件

–表达式

3. 消除其左递归

4. 提取公共左因子

5. SELECT集计算

6. LL(1)文法判断

7. 递归下降分析程序

种别码：

单词符号	种别码	单词符号	种别码
begin	1	:	17
if	2	:=	18
then	3	<	20
while	4	<>	21
do	5	<=	22
end	6	>	23
I	10	>=	24
D	11	=	25
+	13	:	26
-	14	(	27
*	15	)	28
/	16	#	0

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

char prog[80],token[8];
int syn,p,m,n,sum=0;
char ch;
char *rwtab[6]= {"begin","if","then","while","do","end"};
void print(char *s,int n){  //词法分析的输出函数 
    printf("(%s,%d)
",s,n);
}
void scaner() {
    m=0;
    for(n=0; n<8; n++) 
        token[n]=NULL;
    ch=prog[p++];
    while(ch==' ')    //过滤掉空格 
        ch=prog[p++];
    if((ch>='a' && ch<='z') ||(ch>='A' && ch<='Z')) { 
        while((ch>='a' && ch<='z') ||(ch>='A' && ch<='Z')||(ch>='0' && ch<='9')) {
            token[m++]=ch;
            ch=prog[p++];
        }
        token[m++]='';
        syn=10;     //字母种别码 
        p=p-1;      //回退一个字符
        for(n=0; n<6; n++) {
            if(strcmp(token,rwtab[n])==0) {  //判断是否为关键字
                syn=n+1;
                break;
            }
        }
        print(token,syn);
    } else if(ch>='0' && ch<='9') {
        sum=0;
        while(ch>='0' && ch<='9') {
            sum=sum*10+ch-'0';
            ch=prog[p++];
        }
        p=p-1;
        syn=11;  //数字种别码 
        printf("(%d,%d)
",sum,syn);
    } else {
        switch(ch) {
            case '<':
                m=0;
                token[m++]=ch;
                ch=prog[p];
                if(ch=='>') {
                    syn=21;
                    token[m++]=ch;
                } else if(ch=='=') {
                    syn=22;
                    token[m++]=ch;
                } else {
                    syn=20;
                    p=p-1;
                }
                p=p+1;
                token[m]='';
                break;
            case '>':
                m=0;
                token[m++]=ch;
                ch=prog[p++];
                if(ch=='=') {
                    syn=24;
                    token[m++]=ch;
                } else {
                    syn=23;
                    p=p-1;
                }
                break;
            case ':':
                m=0;
                token[m++]=ch;
                ch=prog[p++];
                if(ch=='=') {
                    syn=18;
                    token[m++]=ch;
                } else {
                    syn=17;
                    p=p-1;
                }
                break;
            case '+':
                syn=13;
                token[0]=ch;
                break;
            case '-':
                syn=14;
                token[0]=ch;
                break;
            case '*':
                syn=15;
                token[0]=ch;
                break;
            case '/':
                syn=16;
                token[0]=ch;
                break;
            case ';':
                syn=26;
                token[0]=ch;
                break;
            case '(':
                syn=27;
                token[0]=ch;
                break;
            case ')':
                syn=28;
                token[0]=ch;
                break;
            case '=':
                syn=25;
                token[0]=ch;
                break;
            case '#':
                syn=0;
                token[0]=ch;
                break;
            default:
                syn=-1;
        }
        print(token,syn);
    }
    
}

void S();
void A();
void B();
void C();
void D();
void E();
int kk=0;
 
void S() {
    if (syn==1) { //begin
        scaner();
        A();
        if (syn==6) { //end
            scaner();
            if (syn==0 && kk==0) printf("分析成功 
");
        } else {
            if(kk!=1) printf("语法错误,缺失 'end' ! 
");
            kk=1;
        }
    } else {
        printf("语法错误,缺失 'begin' ! 
");
        kk=1;
    }
    return;
}
 
void A() {
    B();
    while(syn==26) { //； 
        scaner();
        B();
    }
    return;
}
 
void B() {
    if (syn==10) { //为标识符
        scaner();
        if (syn==18) { //为 :=
            scaner();
            C();
        } else {
            printf("界符错误!");
            kk=1;
        }
    } else {
        printf("标识符错误!");
        kk=1;
    }
    return;
}
 
 
void C() {
    D();
    while(syn==13 || syn==14) {  //+或- 
        scaner();
        D();
    }
    return;
}
 
 
void D() {
    E();
    while(syn==15 || syn==16) {  //*或/ 
        scaner();
        E();
    }
    return;
}
 
 
void E() {
    if(syn==10 || syn==11)scaner(); //为标识符或整常数时，读下一个单词符号
    else if(syn==27) {  // )
        scaner();
        C();
        if(syn==28)scaner(); // ) 
        else {
            printf(" ')' 错误
");
            kk=1;
        }
    } else {
        printf("表达式错误
");
        kk=1;
    }
    return;
}
 
 
int main() {
    p=0;int i;
    printf("********************语法分析程序***************
");
    printf("请输入源程序:
");
    do {
        scanf("%c",&ch);
        prog[p++]=ch;
    } while(ch!='#');
    p=0;
    printf("词法分析为：
");
    scaner();
    S();
    printf("语法分析结束！
");
    system("pause");
    return 0;
}

实验结果：