栈（纪念版）

这个程序吸取了前一个线性表的经验，增加了判空和判满两个函数，思路更加清晰了，然而“硬化代码”的情形仍然存在。其实有些缺点是因为用数组实现的缘故， 如果换成指针会减少现在出现的问题，同时也会出现新的问题。同样的逻辑结构可以用不同的物理结构实现，它们各有优缺点，适用于不同的环境。

/*stack.h*/ typedef char ElementType; typedef struct { ElementType *buffer; int max; int top; }Stack; Stack *CreateStack(int);/*创建栈*/ void DestroyStack(Stack *);/*销毁栈*/ void ClearStack(Stack *);/*清空栈*/ int Push(Stack *,ElementType);/*入栈*/ int Pop(Stack *,ElementType *);/*出栈*/ int GetElement(Stack *,int,ElementType *);/*获取栈顶元素*/ int IsEmpty(Stack *);/*判空*/ int IsFull(Stack *);/*判满*/ void StackTraverse(Stack *,void (*)(ElementType *));/*遍历栈*/ Stack *CreateStack(int n) { Stack *sp; sp=(Stack *)malloc(sizeof(Stack)); if(!sp) return 0; sp->buffer=(ElementType *)malloc(n*sizeof(ElementType)); if(!sp->buffer) { free(sp); return 0; } sp->max=n; sp->top=-1; return sp; } void DestroyStack(Stack *sp) { free(sp->buffer); free(sp); } void ClearStack(Stack *sp) { sp->top=-1; } int Push(Stack *sp,ElementType data) { if(IsFull(sp)) return 0; sp->top++; sp->buffer[sp->top]=data; return 1; } int Pop(Stack *sp,ElementType *data) { if(IsEmpty(sp)) return 0; *data=sp->buffer[sp->top]; sp->top--; return 1; } int GetElement(Stack *sp,int n,ElementType *data) { if(!(n>=1&&n<=sp->top+1)&&!IsEmpty(sp)) return 0; *data=sp->buffer[n-1]; return 1; } IsEmpty(Stack *sp) { return sp->top==-1; } IsFull(Stack *sp) { return sp->top==sp->max-1; } void StackTraverse(Stack *sp,void (* f)(ElementType *)) { int i; if(IsEmpty(sp)) return; for(i=sp->top;i>-1;i--) f(&(sp->buffer[i])); } /*以下为测试程序*/ #include"stack.h" void show(ElementType *a) { printf("%c",*a); } void main() { Stack *sp; char ch; char c[3]; int i; sp=CreateStack(20); Push(sp,'a'); Push(sp,'b'); Push(sp,'c'); Push(sp,'d'); StackTraverse(sp,show); printf("/n"); Pop(sp,&ch); printf("%c/n",ch); StackTraverse(sp,show); printf("/n"); GetElement(sp,1,&c[0]); GetElement(sp,2,&c[1]); GetElement(sp,3,&c[2]); for(i=0;i<3;i++) printf("%c",c[i]); printf("/n"); }