栈的链式存储方法的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=0;
    *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("栈为空，无法得到栈顶元素
");
        return ERROR;    
    }
    
    while(p->next){
        p=p->next;
    }
    *e=p->data;
    return OK;
} 

int visit(sElemType c){
    printf("%d ",c);
    return 1;
}
/*遍历栈*/
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=1;e<=5;e++)
        push(&S,e); 
    printf("
遍历前：");
    stackTraverse(&S,visit);
    int i;
    for(i=1;i<=1;i++)
        pop(&S,&e);
    printf("
弹出%d个元素后：",i-1);
    stackTraverse(&S,visit);
    getTop(&S,&e);
    printf("
栈顶元素为:%d",e);
    clearStack(&S);
    if(emptyStack(&S))
        printf("
栈变为空栈了"); 
    system("pause");
    return 0;
}