C语言 带有头结点的循环双链表的实现和相关操作。

#include<stdio.h>
#include<stdlib.h>
typedef int DAT;
typedef struct node
{
	struct node *prior;//指向前一节点 
	DAT data;//存储数据 
	struct node *next;//指向下一节点 
}Node;
typedef struct
{
	Node *head;//指向头节点 
	int size;//存储节点个数 
 }list;
void init_list(list *pL)//初始化链表
{
	pL->head=NULL;
	pL->size=0;
 }
Node* mack_node(DAT data)//创建新的节点
{
	Node *newnode=(Node*)malloc(sizeof(Node));
	if(newnode==NULL) 
	{
		printf("内存分配失败");
		return; 
	}
	newnode->prior=NULL;
	newnode->data=data;
	newnode->next=NULL;
	return newnode;
 } 
void push_back_list(list *pL,DAT data)//尾插法插入链表
{
	Node *newnode=mack_node(data);
	if(pL->head ==NULL)
	{
		pL->head=newnode;
		newnode->prior=newnode;
		newnode->next=newnode;
		pL->size++;
		return;
	}
	Node *cur=pL->head->prior;
	cur->next=newnode;
	newnode->prior=cur;
	newnode->next=pL->head;
	pL->head->prior=newnode;
	pL->size++;
 } 
void push_front_list(list *pL,DAT data)//头插法插入链表
{
	Node *newnode=mack_node(data);
	if(pL->head==NULL)
	{
		pL->head=newnode;
		newnode->prior=newnode;
		newnode->next=newnode;
		pL->size++;
		return;
	}
	Node *cur=pL->head->prior;
	cur->next=newnode;
	newnode->prior=cur;
	newnode->next=pL->head;
	pL->head->prior=newnode;
	pL->head=newnode; 
	pL->size++;
 }
void pop_front_list(list *pL)//头删法删除链表
{
	if(pL->head==NULL)
	{
		printf("链表为空，删除失败。");
		return; 
	}
	Node *cur=pL->head;
	if(cur->next==pL->head)
	{
		pL->head=NULL;
		free(cur);
		pL->size--;
		return;
	}
	cur->prior->next=pL->head->next;
	cur->next->prior=cur->prior;
	pL->head=cur->next;
	free(cur);
	cur=NULL;
	pL->size--; 
 }
void pop_back_list(list *pL)//尾删法删除链表
{
		if(pL->head==NULL)
	{
		printf("链表为空，删除失败。");
		return; 
	}
	Node *cur=pL->head;
	if(cur->next==pL->head)
	{
		pL->head=NULL;
		free(cur);
		pL->size--;
		return;
	}
	cur=cur->prior;
	cur->prior->next=cur->next;
	cur->next->prior=cur->prior;
	free(cur);
	cur=NULL; 
	pL->size--;
 }
void destroy_list(list *pL)//销毁链表
{
	if(pL->head==NULL)
	return;
	Node *cur=pL->head;
	Node *pre=NULL;
	while(cur)
	{
		pre=cur;
		cur=cur->next;
		free(pre);
		if(cur==(pL->head))
		break;
	}
	pL->head=NULL;
	cur=NULL;
	pre=NULL;
	pL->size=0;
 } 
void print_list(list *pL)//打印链表
{
	if(pL->head==NULL)
	{
		printf("空链表\n");
		return; 
	}
	Node *cur=pL->head;
	while(cur)
	{
		printf("<-%d-> ",cur->data);
		if(cur->next==pL->head)
		{
			printf("  %d个节点\n",pL->size);
			return;
		 } 
		cur=cur->next;
	}
 } 
int main()
{
	list List;
	init_list(&List);//初始化链表
	print_list(&List);//打印链表
	push_back_list(&List,1);//尾插法插入链表 
	print_list(&List);//打印链表
	push_back_list(&List,12);//尾插法插入链表 
	print_list(&List);//打印链表	
	push_back_list(&List,123);//尾插法插入链表 
	print_list(&List);//打印链表	
	push_front_list(&List,4);//头插法插入链表
	print_list(&List);//打印链表 
	push_front_list(&List,45);//头插法插入链表
	print_list(&List);//打印链表	
	push_front_list(&List,456);//头插法插入链表
	print_list(&List);//打印链表	
	pop_front_list(&List);//头删法删除链表
	print_list(&List);//打印链表
	pop_back_list(&List);//尾删法删除链表
	print_list(&List);//打印链表	
	destroy_list(&List);//销毁链表
	print_list(&List);//打印链表	
	return 0;
 }