Pointers and Arrays

1、编写程序expr，以计算从命令行输入的逆波兰表达式的值，其中每个运算符或操作数用一个单独的参数表示。例如，命令expr 2 3 4 + * 将计算表达式2×(3+4) 的值。

#include <stdio.h>

#include <stdlib.h> // for atof()

#define MAXOP 100 // max size of operand or operator

#define NUMBER '0' // signal that a number was found

int getop(char []);

void ungets(char []);

void push(double);

double pop(void);

// reverse Polish calculator; uses command line

int main(int argc, char *argv[])

{

	char s[MAXOP];

	double op2;

	while(--argc > 0)

	{

		ungets(" "); // push end of argument

		ungets(*++argv); // push an argument

		switch(getop(s))

		{

			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");

			default:

				printf("error: unknown command %s\n", s);

				argc = 1;

				break;

		}

	}

	printf("\t%.8g\n", pop());

	return 0;

}

这里给出的解决方案是在TCPL Reading Notes 中的逆波兰计算器的基础上得到的。它使用了push 和pop 函数。我们先利用ungets 函数把一个参数结束标记（' '，一个空格字符）和一个参数依次压入输入缓冲区。这样，我们就可以不加修改地使用getop 函数了。getop 将调用getch 读取字符并分离出下一个运算符或操作数。如果在读取参数的过程中遇到了错误，argc 将被设置为1，主函数中的while 循环while(--argc > 0) 将因条件表达式的求值结构为假而终止程序运行。如果来自命令行的是一个合法的表达式，它的计算结果就将被放在堆栈的最顶部，这个结果将在我们把输入参数全部处理完毕后被打印。

2、在TCPL Reading Notes 中第76 条复杂声明中，dcl 程序有很多限制（该程序的目的意在说明问题，并不想做的尽善尽美），它只能处理类似于char 或int 这样的简单数据类型，而无法处理函数中的参数类型或类似于const 这样的限定符。它不能处理带有不必要的空格的情况。由于没有完备的出错处理，因此它也无法处理无效的声明。这里，我们对它进行一定程度上的修改，使它能够处理输入中的错误。

#include <stdio.h>

#include <string.h>

#include <ctype.h>

enum { NAME, PARENS, BRACKETS };

enum { NO, YES };

void dcl(void);

void dirdcl(void);

void errmsg(char *);

int gettoken(void);

extern int tokentype; // type of last token

extern char token[MAXTOKEN]; // last token string

extern char name[MAXTOKEN]; // identifier name

extern char out[1000];

extern int prevtoken;

// dcl: parse a declarator

void dcl(void)

{

	int ns;

	for(ns = 0; gettoken() == '*'; ) // count *'s

		ns++;

	dirdcl();

	while(ns-- > 0)

		strcat(out, " pointer to");

}

// dirdcl: parse a direct declarstor

void dirdcl(void)

{

	int type;

	if(tokentype == '(') // (dcl)

	{

		dcl();

		if(tokentype != ')')

			errmsg("error: missing )\n");

	}

	else if(tokentype == NAME) // variable name

		strcpy(name, token);

	else

		errmsg("error: expected name or (dcl)\n");

	while((type=gettoken()) == PARENS || type == BRACKETS)

		if(type == PARENS)

			strcat(out, " function returning");

		else

		{

			strcat(out, " array");

			strcat(out, token);

			strcat(out, " of");

		}

}

// gettoken.c 源文件

#include <ctype.h>

#include <string.h>

enum { NAME, PARENS, BRACKETS };

enum { NO, YES };

extern int tokentype; // type of last token

extern char token[]; // last token string

int prevtoken = NO; // there is no previous token

// gettoken: return next token

int gettoken(void) // return next token

{

	int c, getch(void);

	void ungetch(int);

	char *p = token;

	if(prevtoken == YES)

	{

		prevtoken = NO;

		return tokentype;

	}

	while((c = getch()) == ' ' || c == '\t')

		;

	if(c == '(')

	{

		if((c = getch()) == ')')

		{

			strcpy(token, "()");

			return tokentype = PARENS;

		}

		else

		{

			ungetch(c);

			return tokentype = '(';

		}

	}

	else if(c == '[')

	{

		for(*p++ = c; (*p++ = getch()) != ']'; )

			;

		*p = '\0';

		return tokentype = BRACKETS;

	}

	else if(isalpha(c))

	{

		for(*p++ = c; isalnum(c = getch()); )

			*p++ = c;

		*p = '\0';

		ungetch(c);

		return tokentype = NAME;

	}

	else

		return tokentype = c;

}

我们对函数dirdcl 做了一些修改，它现在能够分析出两种记号——跟在dcl 调用后的一个右括号（')'）或一个变量名。如果不是这两种记号，我们将调用函数errmsg 而不是printf。errmsg 会先打印一条出错信息，然后把变量prevtoken 设置为YES 以通知gettoken 说已经读入了一个记号。gettoken 开头部分有一个新的if 语句：

if(prevtoken == YES){

		prevtoken = NO;

		return tokentype;

}

它的意思是：如果已经有了一个记号，就不要再读入一个新记号了。这个改进版本并不是十全十美的，但它已经具备一定的出错处理能力了。

3、修改TCPL Reading Notes 中第76 条复杂声明中的undcl 程序，使它在把文字描述转换为声明的过程中不会生产多余的圆括号。

#include <stdio.h>

#include <string.h>

#include <ctype.h>

#define MAXTOKEN 100

enum { NAME, PARENS, BRACKETS };

void dcl(void);

void dirdcl(void);

int gettoken(void);

int nexttoken(void);

int tokentype; // type of last token

char token[MAXTOKEN]; // last token string

char out[1000];

// undcl: convert word description to declation

int main(void)

{

	int type;

	char temp[MAXTOKEN];

	while(gettoken() != EOF)

	{

		strcpy(out, token);

		while((type = gettoken()) != '\n')

			if(type == PARENS || type == BRACKETS)

				strcat(out, token);

			else if(type == '*')

			{

				if((type = nexttoken()) == PARENS || type == BRACKETS)

					sprintf(temp, "(*%s)", out);

				else

					sprintf(temp, "*%s", out);

			}

			else if(type == NAME)

			{

				sprintf(temp, "%s %s", token, out);

				strcpy(out, temp);

			}

			else

				printf("invalid input at %s\n", token);

		printf("%s\n", out);

	}

	return 0;

}

enum { NO, YES };

int gettoken(void);

// nexttoken: get the next token and push it back

int nexttoken(void)

{

	int type;

	extern int prevtoken;

	type = gettoken();

	prevtoken = YES;

	return type;

}

如果"x 是一个指向char 的指针"，undcl 程序的输入将是：x * char。改进前的undcl 程序的输出结果是：char (*x)。这里，输出结果中的括号是多余的。事实上，只有当下一个记号是() 或[] 时，undcl 程序才有必要在自己的输出结果中使用括号。

再比如，如果"daytab 是一个指针，它指向一个有[13] 个int 元素的数组"，undcl 程序的输入将会是：daytab * [13] int。改进前的程序的输出结果：int (*daytab)[13] 就是正确的。但是，如果"daytab 是一个有[13] 个元素的指针数组，数组中的每个元素分别指向一个int"，undcl 程序的输入将是：daytab [13] * int，改进前的undcl 程序的输出结果：int (*daytab[13]) 中就会有多余的圆括号。

我们对undcl 进行了修改，让它检查下一个记号是不是() 或[]。如果下一个记号是() 或[]，undcl 程序就必须给它加上括号；否则，输出结果中的括号就将是多余的。也就是说，我们必须根据undcl 中程序输入中的下一个记号来决定是否需要添加括号。

我们编写了一个简单的nexttoken 函数，它将调用gettoken，记录已经读入一个记号的事实并返回该记号的类型。gettoken 是我们在上一个练习中编写的一个函数，它在读入下一个记号前会先检查是否已经有一个可用的记号了。改进后的undcl 程序将不再产生多余的括号。

巴特西

Pointers and Arrays_4

最新文章

热门文章