the c programming lanuage 逆波兰源码

//逆波兰表示法
#include<stdio.h>
#include<stdlib.h>
#include <ctype.h> 
int getch(void);
void ungetch(int);
#define MAXOP 100 /* max size of operand or operator */ 
#define NUMBER '0' /* signal that a number was found */ 
#define MAXVAL 100 /* maximum depth of val stack */ 
#define BUFSIZE 100 
char buf[BUFSIZE]; /* buffer for ungetch */
int bufp = 0; /* next free position in buf */
int sp = 0; /* next free stack position栈顶指针 */
double val[MAXVAL]; /* value stack值栈 */
int getop(char[]);
void push(double);
double pop(void);
/* reverse Polish calculator */
 int main()
{
    int type;
    double op2;
    char s[MAXOP];
    while ((type = getop(s)) != EOF) {//getop获取下个操作数或者运算符
        switch (type) {
        case NUMBER:
            push(atof(s));//将字符串转为浮点数
            break;
        case '+':
            push(pop() + pop());
            break;
        case '*':
            push(pop() * pop());
            break;
        case '-':
            op2 = pop();
            push(pop() - op2);
            break;
        case '/':
            op2 = pop();
            if (op2 != 0.0)
                push(pop() / op2);
            else
                printf("error: zero divisor\n");
            break;
        case '\n':
            printf("\t%.8g\n", pop());
            break;
        default:
            printf("error: unknown command %s\n", s);
            break;
        }
    }
    return 0;
}
/* push: push f onto value stack */
void push(double f)
{
    if (sp < MAXVAL)
        val[sp++] = f;
    else
        printf("error: stack full, can't push %g\n", f);
}
/* pop: pop and return top value from stack */
double pop(void)
{
    if (sp > 0)
        return val[--sp];
    else {
        printf("error: stack empty\n");
        return 0.0;
    }
}/* getop: get next character or numeric operand */
//它需要跳过空格与制表符。如果下一个字符不是数字或小数点，则返回；否则，
//把这些数字字符串收集起来（其中可能包含小数点），并返回 NUMBER，以标识数已经收集起
//来了
int getop(char s[])
{
    int i, c;
    while ((s[0] = c = getch()) == ' ' || c == '\t');
    s[1] = '\0';
    if (!isdigit(c) && c != '.')
        return c; /* not a number */
    i = 0;
    if (isdigit(c)) /* collect integer part */
        while (isdigit(s[++i] = c = getch()));
    if (c == '.') /* collect fraction part */
        while (isdigit(s[++i] = c = getch()));
    s[i] = '\0';
    if (c != EOF)
        ungetch(c);
    return NUMBER;
}
/*程序不能确定它已经读入的输入是否足够，除非超前多读入一些输入。读入一些字符以
合成一个数字的情况便是一例：在看到第一个非数字字符之前，已经读入的数的完整性是不
能确定的。由于程序要超前读入一个字符，这样就导致最后有一个字符不属于当前所要读入
的数*/
/*反读”不需要的字符，该问题就可以得到解决。每当程序多读入一个字符时，
就把它压回到输入中，对代码其余部分而言就好像没有读入该字符一样。我们可以编写一对
互相协作的函数来比较方便地模拟反取字符操作。getch 函数用于读入下一个待处理的字符，
而 ungetch 函数则用于把字符放回到输入中，这样，此后在调用 getch 函数时，在读入新
的输入之前先返回 ungetch 函数放回的那个字符。*/
int getch(void) /* get a (possibly pushed-back) character */
{
    return (bufp > 0) ? buf[--bufp] : getchar();//如果有之前超前读取的字符在缓冲数组中则先返回缓冲数组中的字符
}
void ungetch(int c) /* push character back on input */
{
    if (bufp >= BUFSIZE)
        printf("ungetch: too many characters\n");
    else
        buf[bufp++] = c;
}