作业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. 递归下降分析程序

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

void lrparser();
void yucu();
void statement();
void expression();
void term();
void factor();
int a=0;

char prog[]="a+b*20#",token[8]; //程序段，单词符号
char ch;
int syn,p,m,n,sum;  //单词符号类型syn,整数sum
char *rwtab[6]={"begin","if","then","while","do","end"};

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;
            }
        }
    } 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;
    } 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;
        }
    }
}

void lrparser() {
    if (syn==1) { //begin
        scaner();
        yucu();
        if (syn==6) { //end
            scaner();
            if (syn==0 && a==0) printf("success 
");
        } else {
            if(a!=1) printf("error,lose 'end' ! 
");
            a=1;
        } 
    } else {
        printf("error,lose 'begin' ! 
");
        a=1;
    }
    return;
}

void yucu() {
    statement();
    while(syn==26) { 
        scaner();
        statement();
    }
    return;
}

void statement() {
    if (syn==10) { //为标识符
        scaner();
        if (syn==18) { //为 :=
            scaner();
            expression();
        } else {
            printf("error!");
            a=1;
        }
    } else {
        printf("error!");
        a=1;
    }
    return;
}

void expression() {
    term();
    while(syn==13 || syn==14) {
        scaner();
        term();
    }
    return;
}
 
 
void term() {
    factor();
    while(syn==15 || syn==16) {
        scaner();
        factor();
    }
    return;
}
 
 
void factor() {
    if(syn==10 || syn==11)scaner(); //为标识符或整常数时，读下一个单词符号
    else if(syn==27) {
        scaner();
        expression();
        if(syn==28)scaner();
        else {
            printf(" ')' 错误
");
            a=1;
        }
    } else {
        printf("表达式错误
");
        a=1;
    }
    return;
}
 
int main(void) {
    p=0;int i;
    printf("******************递归下降语法分析***************
");
    printf("请输入源程序:
");
    do {
        scanf("%c",&ch);
        prog[p++]=ch;
    } while(ch!='#');
    p=0;
    scaner();
    lrparser();
    printf("语法分析结束！
");
    getchar();
}

实验截图：