C:算术表达式求值

代码：

// fgets2.cpp : 定义控制台应用程序的入口点。
//

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

typedef enum{
    TT_NUM,
    TT_ADD,
    TT_SUB,
    TT_MUL,
    TT_DIV,
    TT_LP,
    TT_RP,
    TT_EOL
}TokenType;

typedef struct{
    TokenType type;
    char text[];
}Token;

static int pos=;
static char* line;

static Token prevToken;
static int prevTokenExist;

void getToken(Token *token){
    char arr[];
    int index=;
    arr[index]='\0';

    while(line[pos]!='\0'){
        if(line[pos]=='+'){
            if(strlen(arr)>){
                strcpy(token->text,arr);
                index=;
                arr[index]='\0';
                token->type=TT_NUM;

                return;
            }

            token->text[]='+';
            token->text[]='\0';
            token->type=TT_ADD;
            pos++;
            return;
        }else if(line[pos]=='-'){
            if(strlen(arr)>){
                strcpy(token->text,arr);
                index=;
                arr[index]='\0';
                token->type=TT_NUM;
                return;
            }

            token->text[]='-';
            token->text[]='\0';
            token->type=TT_SUB;
            pos++;
            return;
        }else if(line[pos]=='*'){
            if(strlen(arr)>){
                strcpy(token->text,arr);
                index=;
                arr[index]='\0';
                token->type=TT_NUM;
                return;
            }

            token->text[]='*';
            token->text[]='\0';
            token->type=TT_MUL;
            pos++;
            return;
        }else if(line[pos]=='/'){
            if(strlen(arr)>){
                strcpy(token->text,arr);
                index=;
                arr[index]='\0';
                token->type=TT_NUM;
                return;
            }

            token->text[]='/';
            token->text[]='\0';
            token->type=TT_DIV;
            pos++;
            return;
        }else if(line[pos]=='('){
            if(strlen(arr)>){
                strcpy(token->text,arr);
                index=;
                arr[index]='\0';
                token->type=TT_NUM;
                return;
            }

            token->text[]='(';
            token->text[]='\0';
            token->type=TT_LP;
            pos++;
            return;
        }else if(line[pos]==')'){
            if(strlen(arr)>){
                strcpy(token->text,arr);
                index=;
                arr[index]='\0';
                token->type=TT_NUM;
                return;
            }

            token->text[]=')';
            token->text[]='\0';
            token->type=TT_RP;
            pos++;
            return;
        }else if(line[pos]=='\n'){
            if(strlen(arr)>){
                strcpy(token->text,arr);
                index=;
                arr[index]='\0';
                token->type=TT_NUM;
                return;
            }

            token->text[]='\0';
            token->type=TT_EOL;
            pos++;
            return;
        }else{
            arr[index]=line[pos];
            index++;
            arr[index]='\0';
            pos++;
        }
    }

    if(strlen(arr)>){
        strcpy(token->text,arr);
        index=;
        arr[index]='\0';
        token->type=TT_NUM;
        return;
    }
}

void fetchToken(Token *token){
    if(prevTokenExist){
        *token=prevToken;
        prevTokenExist=;
    }else{
        getToken(token);
    }
}

void returnToken(Token *token){
    prevToken=*token;
    prevTokenExist=;
}

char* getTokenTypeDesc(Token *token){
    char* arr;
    arr = (char *)malloc(); 

    if(token->type==){
        strcpy(arr,"Num");
    }else if(token->type==){
        strcpy(arr,"Add");
    }else if(token->type==){
        strcpy(arr,"Sub");
    }else if(token->type==){
        strcpy(arr,"Mul");
    }else if(token->type==){
        strcpy(arr,"Div");
    }else if(token->type==){
        strcpy(arr,"LP");
    }else if(token->type==){
        strcpy(arr,"RP");
    }

    return arr;
}

double parse_expression(void); // 为了防止出现 “找不到标识符parse_expression”

static  double parse_primary_expression(){
    Token token;

    fetchToken(&token);
    if(token.type==TT_NUM){
        return atof(token.text); // 字符串转double
    }else if(token.type==TT_LP){
        double value=parse_expression();
        fetchToken(&token);
        if(token.type!=TT_RP){
            printf("missing ).");
            exit();
        }
        return value;
    }else{
        returnToken(&token);
        return ;
    }

    return ;
}

static double parse_term(){
    double v1;
    double v2;
    Token token;

    v1=parse_primary_expression();

    for(;;){
        fetchToken(&token);

        if(token.type!=TT_MUL && token.type!=TT_DIV){
            returnToken(&token);
            break;
        }

        v2=parse_primary_expression();
        if(token.type==TT_MUL){
            v1*=v2;
        }else if(token.type==TT_DIV){
            v1/=v2;
        }else{
            returnToken(&token);
        }
    }

    return v1;
}

static double parse_expression(){
    double v1;
    double v2;
    Token token;

    v1=parse_term();

    for(;;){
        fetchToken(&token);

        if(token.type!=TT_ADD && token.type!=TT_SUB){
            returnToken(&token);
            break;
        }

        v2=parse_term();
        if(token.type==TT_ADD){
            v1+=v2;
        }else if(token.type==TT_SUB){
            v1-=v2;
        }else{
            returnToken(&token);
        }
    }

    return v1;
}

double parse(){
    prevTokenExist=;
    return parse_expression();
}

int _tmain(int argc, _TCHAR* argv[])
{
    char buf[];

    while(fgets(buf,,stdin)!=NULL){
        pos=;
        line=buf;
        printf("=%f\n",parse());
    }
    return ;
}

输出：

+(+)*
=21.000000
(+)/-*(-)
=4.600000
*-*
=24.000000

--2020年6月6日--