/*
	2016年9月17日11:35:35
	栈的操作和算法
*/
#include <stdio.h>
#include <malloc.h>
#include <stdlib.h>

typedef struct Node    
{
	int data;             //数据域
	struct Node * pNext;  //指针域
} NODE, * PNODE;

typedef struct Stack
{
	PNODE pTop;          //栈顶
	PNODE pBottom;       //栈底
} STACK, * PSTACK;

//函数声明
void init_stack(PSTACK pS);      //初始化栈
void push_stack(PSTACK pS, int val);
void traverse_stack(PSTACK pS);
bool is_empty(PSTACK pS);
bool pop_stack(PSTACK pS, int * pVal);
void clear_stack(PSTACK pS);

int main(void)
{
	STACK S;
	int val;
	
	init_stack(&S);
	
	push_stack(&S, 1);
	push_stack(&S, 2);
	push_stack(&S, 3);
	push_stack(&S, 4);
	push_stack(&S, 5);
	traverse_stack(&S);
	clear_stack(&S);
	traverse_stack(&S);
	
/* 	if(pop_stack(&S, &val))
	{
		printf("出栈成功，出栈的值为：%d\n",val);
	}
	else
	{
		printf("出栈失败，栈为空！\n");
	}
	traverse_stack(&S); */
	
	return 0;
}

void init_stack(PSTACK pS)     //初始化栈
{
	PNODE pNew = (PNODE)malloc(sizeof(NODE));   //造出一个栈的头结点
	if(NULL == pNew)
	{
		printf("内存分配失败，程序终止！\n");
		exit(-1);
	}
	
	pS->pTop = pNew;
	pS->pBottom = pS->pTop;
	pNew->pNext = NULL;
}

void push_stack(PSTACK pS, int val)    //压栈     
{
	PNODE pNew = (PNODE)malloc(sizeof(NODE));   
	if(NULL == pNew)
	{
		printf("内存分配失败，程序终止！\n");
		exit(-1);
	}
	
	pNew->data = http://www.mamicode.com/val;"  %d   \n", p->data);
		p = p->pNext;
	}
	printf("\n");
	
	return;
}

bool is_empty(PSTACK pS)   //判断是否为空
{
	if(pS->pTop == pS->pBottom)
		return true;
	else 
		return false;
}

bool pop_stack(PSTACK pS, int * pVal)   //出栈
{
	if(is_empty(pS))    //先判断是否为空
	{
		return false;
	}
	else
	{
		PNODE p = pS->pTop;
		*pVal = p->data;
		pS->pTop = p->pNext;
		free(p);
		p = NULL;
		
		return true;
	}
}

void clear_stack(PSTACK pS)   //清空栈
{
	PNODE p, q;
	p = pS->pTop;
	q = NULL;
	
	while(pS->pBottom != p)
	{
		q = p->pNext;
		free(p);
		p = q;
	}
	
	pS->pTop = pS->pBottom;
	
	return;
}