C语言从零开始之数据结构与算法循环链表基本操作（3）

#include <stdio.h>
#include <stdlib.h>
#define OK 		1
#define ERROR 	0
typedef int	Status;
typedef int ElemType;
typedef struct DuLNode{
ElemType data;
struct DuLNode *prior;
struct DuLNode *next;
}DuLNode,*DuLinkList;

/************************************************************************/
/*             以下是关于循环链接存储操作的7种算法        */

/* 1.InitDuLinkList函数,初始化线性表，创建表头指针并置为NULL*/
/* 2.CreateDuLinkList函数，创建线性表,此函数输入为负数则停止输入*/
/* 3.PrintDuLinkList函数，遍历输出线性表*/
/* 4.DestroyDuLinkList函数,销毁线性表释放内存空间*/
/* 5.ClearDuLinkList函数,清空线性表释放内存空间*/
/* 6.GetElemDuLinkList函数,返回线性链表第i个元素*/
/* 7.InsertDuLinkList函数,插入线性表*/
/************************************************************************/

/***************************初始化循环链表,创建空的头指针******************************************/
Status InitDuLinkList(DuLinkList *L)
{			//*L为头节点指针的值
*L=(DuLinkList)malloc(sizeof(DuLNode));		//为头节点指针指向的区域分配内存空间
if(!*L)
{
printf("内存分配失败，初始化失败!\n");
exit(1);
//return ERROR;
}
(*L)->prior=*L;							//空的循环链表，指向自己
(*L)->next=*L;
return OK;
}

/***************************创建循环链表,输入数据大于0有效******************************************/
Status CreateDuLinkList(DuLinkList L)
{
DuLinkList L_new=NULL;
DuLinkList L_prior=NULL;
ElemType ch;
L_prior = L;
printf("请输入数据：");
scanf("%d",&ch);
getchar();				//消除回车键
while(ch > 0)
{
L_new = (DuLinkList)malloc(sizeof(DuLNode));
if(!L_new)
{
printf("内存分配失败，初始化失败!\n");
exit(1);
//return ERROR;
}
L_new->data=ch;				//输入赋值给data
L_new->prior = L_prior;		//新建节点直接前驱指向前一个节点
L_new->next = L;			//新建节点属于尾节点,直接后继指向头指针
L_prior->next = L_new;		//前驱指针的直接后继指向新建节点
L_prior = L_new;			//新建节点转为当前节点当前节点
printf("请输入数据：");
scanf("%d",&ch);
getchar();				//消除回车键
}
return OK;
}

/***************************遍历打印循环链表******************************************/
Status PrintDutLinkList(DuLinkList const L)
{
DuLinkList L_cur=NULL;
printf("遍历打印循环链表:");
if(L == NULL)
{
printf("DuLinkList is NULL!\n");
return OK;
}
L_cur=L->next;
while(L_cur != L)
{
printf("--%d--",L_cur->data);
L_cur = L_cur->next;
}
printf("\n");
printf("打印输出完毕!\n");
return OK;
}

/**************************销毁循环链表******************************************/
Status DestroyDuLinkList(DuLinkList *head)
{
DuLinkList L_cur=(*head)->next;			//L_cur指向第一个节点
DuLinkList L_next=NULL;
while(L_cur != *head)					//判断是否到表尾
{
L_next = L_cur->next;
free(L_cur);
L_cur = L_next;
}
free(*head);						//最后释放头指针 并置NULL避免野指针
*head = NULL;
return OK;
}

/**************************销毁循环链表******************************************/
Status ClearDuLinkList(DuLinkList head)
{
DuLinkList L_cur=head->next;			//L_cur指向第一个节点
DuLinkList L_next=NULL;
while(L_cur != head)					//判断是否到表尾
{
L_next = L_cur->next;
free(L_cur);
L_cur = L_next;
}
head->prior = head;
head->next = head;
return OK;
}

/**************************在循环链表第i位置插入e******************************************/
ElemType InsertDuLinkList(DuLinkList head,int i,ElemType e)
{
DuLinkList L_prior=head;
DuLinkList L_new=NULL;
for(int j=0;j!=i;j++)				//循环到L_prior等于插入位置前一个值
{
L_prior=L_prior->next;
}
L_new = (DuLinkList)malloc(sizeof(DuLNode));
if(!L_new)
{
printf("内存分配失败，初始化失败!\n");
exit(1);
//return ERROR;
}
L_new->data = e;
L_new->prior=L_prior;
L_new->next=L_prior->next;				//L_new各成员赋值
L_prior->next=L_new;					//直接前驱的后继指向新建节点
return OK;
}

Status main(void)
{
DuLinkList L;
int a[] = {1504,3,42,42,8,183,22,238,85,18,22,18,31};

printf("L_adr=%x\n",L);
InitDuLinkList(&L);
printf("L_adr=%x\n",L);
CreateDuLinkList(L);
PrintDutLinkList(L);
//DestroyDuLinkList(&L);
ClearDuLinkList(L);
PrintDutLinkList(L);

for(int i=0;i<(sizeof(a)/sizeof(int));i++){
int cnt=rand()%(i+1);
InsertDuLinkList(L,cnt,a[i]);
PrintDutLinkList(L);
}

return OK;
}