#include<stdio.h>
#include<stdlib.h>
#include<assert.h>
typedef  int slistdatatype;
typedef  struct slistnode
{
	slistdatatype  data;
	struct s* next;
}slistnode;

void stackpushback(slistnode**pphead, slistdatatype x);
void slistprint(slistnode* phead);
void stackpopback(slistnode**phead);
void stackpushfront(slistnode** phead, slistdatatype x);
void stackpopfront(slistnode** phead);
slistnode* slistfind(slistnode* phead, slistdatatype x);
void slistinsertafter(slistnode**pphead, slistnode* pos, slistdatatype x);
void slisteraseafter(slistnode**pphead,slistnode*pos);

#include"list.h"
int main()
{
	slistnode* phead = NULL;
	stackpushback(&phead, 1);//尾插
	stackpushback(&phead, 2);
	stackpushback(&phead, 3);
	stackpushback(&phead, 4);
	slistprint(phead);//打印
	stackpopback(&phead);//尾删
	slistprint(phead);
	stackpushfront(&phead,5);//头插
	slistprint(phead);
	stackpopfront(&phead);//头删
	slistprint(phead);
	slistnode* pos1 = slistfind(phead, 2);//查找位置
	slistinsertafter(&phead, pos1, 6);//指定插
	slistprint(phead);
	slistnode*pos2=slistfind(phead,2);
	slisteraseafter(&phead,pos2);//指定删
	slistprint(phead);
	return 0;
}

void stackpushback(slistnode** pphead, slistdatatype x)//尾插
{
	slistnode* newnode = (slistnode*)malloc(sizeof(slistnode));
	if (newnode != NULL)
	{
		newnode->data = x;
		newnode->next = NULL;
	}
	if (*pphead == NULL)//为空时
	{
		*pphead = newnode;
	}
	else//不为空时
	{
		slistnode* tail = *pphead;
		while (tail->next != NULL)//遍历到最后一个节点
		{
			tail = tail->next;
		}
		tail->next = newnode;
	}
}

void stackpopback(slistnode** pphead)//尾删
{
	if (*pphead == NULL)//为空
	{
		return;
	}
	else if ((*pphead)->next == NULL)//只有一个节点时
	{
		free(*pphead);
		*pphead = NULL;
	}
	else//正常情况下  要把尾节点free   尾节点的前一个节点的指针置为NULL 
	{
		slistnode* prev = NULL;//prev指向前一个节点
		slistnode* tail = *pphead;
		while (tail->next != NULL)
		{
			prev = tail;
			tail = tail->next;
		}
		free(tail);
		tail = NULL;
		prev->next = NULL;
	}
}

void stackpushfront(slistnode** pphead, slistdatatype x)//头插
{
	slistnode* newnode = (slistnode*)malloc(sizeof(slistnode));
	newnode->data = x;
	newnode->next = NULL;
	newnode->next = *pphead;
	*pphead = newnode;
}

void stackpopfront(slistnode** pphead)//头删
{
	if (*pphead == NULL)//若为空
	{
		return;
	}
	else
	{
		slistnode* newnode = (slistnode*)malloc(sizeof(slistnode));
		newnode = (*pphead)->next;//*pphead的后一个节点作为*pphead
		free(*pphead);
		*pphead = NULL;
		*pphead = newnode;
	}
}

slistnode* slistfind(slistnode* phead, slistdatatype x)//查找位置(返回该位置，不是下标）
{
	slistnode* cur = phead;
	while (cur != NULL)
	{
		if (cur->data == x)
		{
			return cur;//如果找到了则返回该位置
		}
		cur = cur->next;
	}
	return NULL;//没找到直接返回NULL
}

void slistinsertafter(slistnode** pphead, slistnode* pos, slistdatatype x)//指定插
{
	assert(pos);//pos为找到的位置， x是要插入的值
	slistnode* newnode = (slistnode*)malloc(sizeof(slistnode));
	newnode->data = x;
	newnode->next = NULL;
	newnode->next = pos->next;//先将新节点与pos后面的节点连接
	pos->next = newnode;//再将pos与新节点连接
}

void slisteraseafter(slistnode** pphead, slistnode* pos)//指定删
{
	assert(pos);//pos有可能传过来NULL
	slistnode* prev = *pphead;
	while (prev->next != pos)//prev为pos的前一个节点  
	{
		prev = prev->next;
	}
	prev->next = pos->next;//将pos的前一个节点与pos的后一个节点连接
	free(pos);
	pos = NULL;
}

void slistprint(slistnode* phead)//打印
{
	slistnode* cur = phead;
	while (cur != NULL)
	{
		printf("%d->", cur->data);
		cur = cur->next;
	}
	printf("NULL\n");
}