栈的链式存储方法的C语言实现

 /*
   编译器：Dev-c++ 5.4.0
   文件名：linkStack.cpp
   代码版本号：1.0
   时间：2015年10月15日18:56:06

 */
 #include <stdio.h>
 #include <stdlib.h>
 #define ERROR 0
 #define OK 1
 #define FALSE 0
 #define TRUE 1
 #define OVERFLOW -2

 typedef int sElemType;
 typedef int Status;
 typedef struct lNode{
     sElemType data;
     struct lNode *next;
 }lNode,*linkStack;

 /*初始化空栈*/
 Status initStack(linkStack *s){
     *s=(linkStack)malloc(sizeof(lNode));
     if(!(*s))
         exit(OVERFLOW);
     (*s)->next=NULL;
     return OK;
 }

 /*销毁栈*/
 Status destroyStack(linkStack *s){
     lNode *p=(*s)->next;
     lNode *q;
     if(!p){
         return OK;
     }
     while(p){
         q=p;
         p=p->next;
         free(q);
     }
     return OK;
 }

 /*把S栈置为空栈*/
 Status clearStack(linkStack *s){
     (*s)->next=NULL;
     return OK;
 }

 /*判断栈是否为空栈*/
 bool emptyStack(linkStack *s){
     if((*s)->next)
         return FALSE;
     else
         return TRUE;
 } 

 int stackLength(linkStack *s){
     int len=;
     *s=(*s)->next;
     while(*s){
         *s=(*s)->next;
         len++;
     }
     return len;
 }
 /*入栈*/
 Status push(linkStack *s,sElemType e){
     lNode *p=(*s);
     while(p->next){
         p=p->next;
     }
     p->next=(linkStack)malloc(sizeof(lNode));
     p->next->data=e;
     p->next->next=NULL;
     return OK;
 }

 /*出栈*/
 Status pop(linkStack *s,sElemType *e){
     lNode *p=(*s);
     lNode *q;
     while(p->next){
         q=p;
         p=p->next;
     }
     q->next=NULL;
     *e=p->data;
     free(p);
     return OK;
 } 

 /*得到栈顶元素*/
 Status getTop(linkStack *s,sElemType *e){
     lNode *p=(*s);
     if(!p->next){
         printf("栈为空，无法得到栈顶元素\n");
         return ERROR;
     }

     while(p->next){
         p=p->next;
     }
     *e=p->data;
     return OK;
 } 

 int visit(sElemType c){
     printf("%d ",c);
     return ;
 }
 /*遍历栈*/
 Status stackTraverse(linkStack *s,int (*visit)(sElemType)){
     linkStack p=(*s)->next;
     while(p){
         visit(p->data);
         p=p->next;
     }
     return OK;
 }

 int main(){
     linkStack S;
     initStack(&S);
     sElemType e;
     for(e=;e<=;e++)
         push(&S,e);
     printf("\n遍历前：");
     stackTraverse(&S,visit);
     int i;
     for(i=;i<=;i++)
         pop(&S,&e);
     printf("\n弹出%d个元素后：",i-);
     stackTraverse(&S,visit);
     getTop(&S,&e);
     printf("\n栈顶元素为:%d",e);
     clearStack(&S);
     if(emptyStack(&S))
         printf("\n栈变为空栈了");
     system("pause");
     return ;
 }