C++ 实现计算机程序的实现及其细节处理

#include <iostream>
#include <algorithm>
#include <cstring>
#include <map>
#include <cstdio>
using namespace  std;

// 程序大致流程
// curr_tok 表示当前的符号 （加减乘除 还是 数字 等等）
// 每次通过 curr_tok 决定当前的操作
// term 表示一个小的表达式 比如 a + b 一个括号内表达式 也可以是一个数
// expr 表示整个表达式
// prim 表示一个数字或者一个操作符
// 通过 get_token() 处理表达式 涉及编译原理知识

// 程序的具体细节
// 关于枚举类型 enum 这个类型里面的每一个元素称之为枚举元素
// 每一个枚举元素对应着一个整数类型，也只能对应整数类型
// 每次可以通过字符对应到枚举类型
// 枚举类型默认从0开始，如果有规定的值，那么以后的值从这个值开始
// 枚举也可以是数据类型，数据类型就可以像一般的基本类型一样声明变量。
// 等号的处理 :
// 相当于一个新的开始 对前面的输出结果 （不管怎样都会输出）
// 如果前面没有变量直接输出，如果有的话输出 ＋ 赋值。
// 关于 cin 输入到缓冲区
// 程序的输入都建有一个缓冲区，即输入缓冲区。一次输入过程是这样的，
// 当一次键盘输入结束时会将输入的数据存入输入缓冲区，
// 而cin函数直接从输入缓冲区中取数据。
// 正因为cin函数是直接从缓冲区取数据的，所以有时候当缓冲区中有残留数据时，
// cin函数会直接取得这些残留数据而不会请求键盘输入
// cin.get(char) 从键盘中输入一个字符
// 当cin 读取整数或者浮点数的时候会正确识别这些东西就不会读到别的
// cin.putback(char) 可以将一个字符压入缓存区
// 再次用cin 输入的时候直接从缓冲区读取数据
//

int no_of_error = 0;

double error (const char * s) {
    no_of_error ++;
    cerr << "error: " << s << endl;
    return 1;
}
enum Token_value {
    NAME, NUMBER,END = '#',
    PLUS = '+',MINUS='-',MUL='*',DIV = '/',
    PRINT=';',ASSIGN='=',LP='(',RP=')'
};
Token_value curr_tok = PRINT;
double number_value;
string string_value;
map <string,double> table;
Token_value get_token () {
    char ch;
    do {
        if (!cin.get(ch)) return curr_tok = END;
    }while (ch != '\n' && isspace(ch));
    switch (ch) {
        case ';':
        case '\n':
            return curr_tok = PRINT;
        case '*':
        case '/':
        case '+':
        case '-':
        case '(':
        case ')':
        case '=':
        case '#':
            return curr_tok = Token_value(ch);
        case '0':
        case '1':
        case '2':
        case '3':
        case '4':
        case '5':
        case '6':
        case '7':
        case '8':
        case '9':
        case '.':
            cin.putback(ch);
            cin >> number_value;
            return curr_tok = NUMBER;
        default:
            if (isalpha(ch)) {
                string_value = ch;
                while (cin.get(ch) && isalnum(ch)) string_value += ch;
                cin.putback(ch);
                return curr_tok = NAME;
            }
            error ("bad token");
            return curr_tok = PRINT;
    }
}

double expr (bool);

double prim (bool get) {
    if (get) get_token();
    switch (curr_tok) {
        case NUMBER: {
            double v = number_value;
            get_token();
            return v;
        }
        case NAME: {
            double & v = table[string_value];
            if (get_token() == ASSIGN) v = expr (true);
            return v;
        }
        case MINUS :
            return -prim (true);
        case LP : {
            double e = expr (true);
            if (curr_tok != RP) return error(") expected");
            get_token();
            return e;
        }
        default:
            return error("primary expected");
    }
}

double term (bool get) {
    double left = prim (get);
    for (;;) {
        switch (curr_tok) {
            case MUL:
                left *= prim(true);
                break;
            case DIV:{
                if (double d = prim(true)) {
                    left /= d;
                    break;
                }
                return error("divide by 0");
            }
            default:
                return left;
        }
    }
}

double expr (bool get) {
    double left = term (get);
    for (;;) {
        switch (curr_tok) {
            case PLUS:
                left += term(true);
                break;
            case MINUS:
                left -= term(true);
                break;
            default:
                return left;
        }
    }
}

int main () {
    table["pi"] = 3.1415926535897932385;
    table["e"] = 2.7182818284590452354;
    while (cin) {
        get_token ();
        if (curr_tok == END) break;
        if (curr_tok == PRINT) continue;
        cout << expr(false) << endl;
    }
    return 0;
}