基于抽象语法树改造的计算器实例

抽象语法树

在计算机科学中,抽象语法树Abstract Syntax Tree,AST),或简称语法树(Syntax tree),是源代码语法结构的一种抽象表示。它以树状的形式表现编程语言的语法结构,树上的每个节点都表示源代码中的一种结构。之所以说语法是“抽象”的,是因为这里的语法并不会表示出真实语法中出现的每个细节。比如,嵌套括号被隐含在树的结构中,并没有以节点的形式呈现;而类似于 if-condition-then 这样的条件跳转语句,可以使用带有三个分支的节点来表示。和抽象语法树相对的是具体语法树(通常称作分析树)。一般的,在源代码的翻译和编译过程中,语法分析器创建出分析树,然后从分析树生成AST。一旦AST被创建出来,在后续的处理过程中,比如语义分析阶段,会添加一些信息。下面是辗转相除法对应的抽象语法树

while (b != 0) {
      if (a > b)
          a = a − b;
      else
          b = b − a;
}
return a
辗转相除法抽象语法树

计算器实例

首先我们创建计算器的头文件fb3-1.h

/** 与词法分析器的解口*/
extern int yylineno; /*来自于词法分析器*/
void yyerror(char *s, ...);
int yylex();

/** ast中的节点*/
struct ast {
    int nodetype;
    struct ast *l;
    struct ast *r;
};

struct numval {
    int nodetype; /**类型k表明常量*/
    double number;
};

/** 构造ast*/
struct ast *newast(int nodetype, struct ast *l, struct ast *r);
struct ast *newnum(double d);

/** 计算ast*/
double eval (struct ast *);
/**删除和释放ast*/
void treefree(struct ast *);
/**
 * 抽象语法树由多个节点组成,每个节点都有一个节点类型。不同的节点可以有不同的域,但目前我们只有两种类型,一种是执行最多两个子节点的指针,另外一种包含一个数组。eval遍历ast,返回它所代表的表达式的值。
 *
 * */

然后我们创建Bison的语法分析规则文件fb_3_1.y

%{
#include <stdio.h>
#include <stdlib.h>
#include <stdarg.h>
#include "fb_3_1.h"
%}

/*第一部分使用%union来生命语法分析器中符号值的类型
一旦联合类型被定义,我们需要告诉bison每种语法符号使用的值类型,这通过放置在尖括号<>中的联合类型的响应成员名字来确定。
新的声明 %type把值<a>赋给exp, factor, term,当我们创建ast时会用到他们
如果你不使用记号或者非终结符的值,你并不需要为他们声明类型。
当声明中存在%union时,如果你试图使用一个没有被赋予类型的符号值,bison将会报错。
*/
%union {
    struct ast *a;
    double d;
}

%token <d> NUMBER
%token EOL
%type <a> exp factor term

%%
calclist:/*空规则*/
    | calclist exp EOL { 
        printf("=%4.4g\n", eval($2)); 
        treefree($2);
        printf("> ");
    }
    | calclist EOL { printf(">");} /*空行或注释*/
    ;

exp: factor 
   | exp '+' factor { $$ = newast('+', $1, $3);}
   | exp '-' factor { $$ = newast('-', $1, $3);}
   ;
factor: term  
   | factor '*' term { $$ = newast('*', $1, $3); }
   | factor '/' term { $$ = newast('/', $1, $3); }
   ;
term: NUMBER { $$ = newnum($1); }
    | '|' term {$$ = newast('|', $2, NULL);}
    |'(' exp ')' {$$ = $2;}
    | '-' term {$$ = newast('M', $2, NULL);}
    ;
%% 

void
yyerror(char *s, ...)
{
    va_list ap;
    va_start(ap, s);
    fprintf(stderr, "%d: error: ", yylineno);
    vfprintf(stderr, s, ap);
    fprintf(stderr, "\n");
}
int
main(int argc, char **argv)
{
    printf("> ");
    return yyparse();
}

然后我们再创建fb_3_1.funcs.c文件来具体实现抽象语法树

#include <stdio.h>
#include <stdlib.h>
#include <stdarg.h>
#include "fb_3_1.h"

struct ast *
newast(int nodetype, struct ast *l, struct ast *r)
{
    struct ast *a = malloc(sizeof(struct ast));
    if (!a) {
        printf("out of space");
        exit(0);
    }

    a->nodetype = nodetype;
    a->l = l;
    a->r = r;
    return a;
}

struct ast *
newnum(double d)
{
    struct numval *a = malloc(sizeof(struct numval));
    if (!a) {
        printf("out of space");
        exit(0);
    }

    a->nodetype = 'k';
    a->number = d;
    return (struct ast *)a;

}

double 
eval(struct ast *a)
{
    double v;

    printf("nodetype:%c\n", a->nodetype);
    if (a->nodetype == 'k') {
        printf("number:%f\n", ((struct numval *)a)->number);
    }
    switch(a->nodetype) {
        case 'k': v = ((struct numval *)a)->number;break;
        case '+': v = eval(a->l) + eval(a->r); break;
        case '-': v = eval(a->l) - eval(a->r); break;
        case '*': v = eval(a->l) * eval(a->r); break;
        case '/': v = eval(a->l) / eval(a->r); break;
        case '|': v = eval(a->l); if (v < 0) v = -v; break;
        case 'M': v = eval(a->l); break;
        default: printf("internal error: bad node %c\n", a->nodetype);
    }
    return v;
}

void
treefree(struct ast *a)
{
    switch(a->nodetype) {
        /**两颗子树*/
        case '+':
        case '-':
        case '*':
        case '/':
            treefree(a->r);
       /*一颗子树*/
        case '|':
        case 'M':
            treefree(a->l);
       /*没有子树*/
        case 'k':
            free(a);
            break;
        default: printf("internal error: bad node %c\n", a->nodetype);
    }
}

最后我们创建Makefile文件来指定编译内容,

fb_3_1: fb_3_1.l fb_3_1.y fb_3_1.h
    bison -d fb_3_1.y
    flex -o fb_3_1.lex.c fb_3_1.l
    gcc -o $@ fb_3_1.tab.c fb_3_1.lex.c fb_3_1.funcs.c
clean:
    rm -rf fb_3_1.lex.c fb_3_1 fb_3_1.tab.c fb_3_1.tab.h

在终端窗口中执行编译和测试

% make
bison -d fb_3_1.y
flex -o fb_3_1.lex.c fb_3_1.l
gcc -o fb_3_1 fb_3_1.tab.c fb_3_1.lex.c fb_3_1.funcs.c
% ./fb_3_1 
> 2 + 3
nodetype:+
nodetype:k
number:2.000000
nodetype:k
number:3.000000
=   5
> 6 * 7
nodetype:*
nodetype:k
number:6.000000
nodetype:k
number:7.000000
=  42
> 

测试结果分析

当我们在测试代码中键入2 + 3回车后,首先Flex会进行词法分析,得到3个token,'2','+',"3",然后将数据喂给BisonBison利用语法规则匹配到最后一条term: NUMBER { $$ = newnum($1); },在这里会调用newnum这个函数并将返回值赋给term,读取'+'号后,因暂时无法匹配任何规则,会移进到堆栈中,然后继续读取'3',会像‘2’一样进行类似处理返回一个数字ast,然后堆栈中的内容可以匹配上第二条

exp: factor 
        | exp '+' factor { $$ = newast('+', $1, $3);}

会进行归约处理,调用newast这个函数构造出一个新的抽象语法树,语法树的结构如下:

语法树

将新生成的语法树移进之后,发现已输入结束,可匹配上第一条规则

calclist:/*空规则*/
    | calclist exp EOL { 
        printf("=%4.4g\n", eval($2)); 
        treefree($2);
        printf("> ");
    }

此时会调用eval这个函数,并将上面得到的语法树作为参数传递到函数中去($2的值),在eval函数中首先会匹配上'+'

eval(struct ast *a)
{
    double v;

    printf("nodetype:%c\n", a->nodetype);
    if (a->nodetype == 'k') {
        printf("nodetype:%f\n", ((struct numval *)a)->number);
    }
    switch(a->nodetype) {
        ...
        case '+': v = eval(a->l) + eval(a->r); break;
        ...
    }
    return v;
}

然后会递归调用eval这个函数,不过传的参数分别是左子树和右子树,

double 
eval(struct ast *a)
{
    double v;

    printf("nodetype:%c\n", a->nodetype);
    if (a->nodetype == 'k') {
        printf("nodetype:%f\n", ((struct numval *)a)->number);
    }
    switch(a->nodetype) {
        case 'k': v = ((struct numval *)a)->number;break;
        ...
    }
    return v;
}

由于左右子树的类型都为k,那么直接返回其number值,分别为23,然后执行相加操作,得到最后的返回值5,再打印出来就得到了测试结果。

全部代码大家可以到我的github上去下载

最后编辑于
©著作权归作者所有,转载或内容合作请联系作者
  • 序言:七十年代末,一起剥皮案震惊了整个滨河市,随后出现的几起案子,更是在滨河造成了极大的恐慌,老刑警刘岩,带你破解...
    沈念sama阅读 214,029评论 6 493
  • 序言:滨河连续发生了三起死亡事件,死亡现场离奇诡异,居然都是意外死亡,警方通过查阅死者的电脑和手机,发现死者居然都...
    沈念sama阅读 91,238评论 3 388
  • 文/潘晓璐 我一进店门,熙熙楼的掌柜王于贵愁眉苦脸地迎上来,“玉大人,你说我怎么就摊上这事。” “怎么了?”我有些...
    开封第一讲书人阅读 159,576评论 0 349
  • 文/不坏的土叔 我叫张陵,是天一观的道长。 经常有香客问我,道长,这世上最难降的妖魔是什么? 我笑而不...
    开封第一讲书人阅读 57,214评论 1 287
  • 正文 为了忘掉前任,我火速办了婚礼,结果婚礼上,老公的妹妹穿的比我还像新娘。我一直安慰自己,他们只是感情好,可当我...
    茶点故事阅读 66,324评论 6 386
  • 文/花漫 我一把揭开白布。 她就那样静静地躺着,像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上,一...
    开封第一讲书人阅读 50,392评论 1 292
  • 那天,我揣着相机与录音,去河边找鬼。 笑死,一个胖子当着我的面吹牛,可吹牛的内容都是我干的。 我是一名探鬼主播,决...
    沈念sama阅读 39,416评论 3 412
  • 文/苍兰香墨 我猛地睁开眼,长吁一口气:“原来是场噩梦啊……” “哼!你这毒妇竟也来了?” 一声冷哼从身侧响起,我...
    开封第一讲书人阅读 38,196评论 0 269
  • 序言:老挝万荣一对情侣失踪,失踪者是张志新(化名)和其女友刘颖,没想到半个月后,有当地人在树林里发现了一具尸体,经...
    沈念sama阅读 44,631评论 1 306
  • 正文 独居荒郊野岭守林人离奇死亡,尸身上长有42处带血的脓包…… 初始之章·张勋 以下内容为张勋视角 年9月15日...
    茶点故事阅读 36,919评论 2 328
  • 正文 我和宋清朗相恋三年,在试婚纱的时候发现自己被绿了。 大学时的朋友给我发了我未婚夫和他白月光在一起吃饭的照片。...
    茶点故事阅读 39,090评论 1 342
  • 序言:一个原本活蹦乱跳的男人离奇死亡,死状恐怖,灵堂内的尸体忽然破棺而出,到底是诈尸还是另有隐情,我是刑警宁泽,带...
    沈念sama阅读 34,767评论 4 337
  • 正文 年R本政府宣布,位于F岛的核电站,受9级特大地震影响,放射性物质发生泄漏。R本人自食恶果不足惜,却给世界环境...
    茶点故事阅读 40,410评论 3 322
  • 文/蒙蒙 一、第九天 我趴在偏房一处隐蔽的房顶上张望。 院中可真热闹,春花似锦、人声如沸。这庄子的主人今日做“春日...
    开封第一讲书人阅读 31,090评论 0 21
  • 文/苍兰香墨 我抬头看了看天上的太阳。三九已至,却和暖如春,着一层夹袄步出监牢的瞬间,已是汗流浃背。 一阵脚步声响...
    开封第一讲书人阅读 32,328评论 1 267
  • 我被黑心中介骗来泰国打工, 没想到刚下飞机就差点儿被人妖公主榨干…… 1. 我叫王不留,地道东北人。 一个月前我还...
    沈念sama阅读 46,952评论 2 365
  • 正文 我出身青楼,却偏偏与公主长得像,于是被迫代替她去往敌国和亲。 传闻我的和亲对象是个残疾皇子,可洞房花烛夜当晚...
    茶点故事阅读 43,979评论 2 351

推荐阅读更多精彩内容