大话数据结构，双端循环链表，源程序

在网上找了下大话数据结构这本书的源码，发现第三章虽然有说到双端链表却没给出实现，于是自己在线性链表的基础上修改了一下，源码如下:

我将只有一个头结点的时候，头结点的next和prior都指向自己。

主要是注意一下插入的时候基本都遵循这个模型:,也就是找到要插入的地方的前一个数据的坐标(可能是头结点)。

#include "stdio.h"    #include "string.h"#include "ctype.h"      #include "stdlib.h"   #include "io.h"  #include "math.h"  #include "time.h"#define OK 1#define ERROR 0#define TRUE 1#define FALSE 0#define MAXSIZE 20 /* 存储空间初始分配量 */#define RANDOMINT(m,n) ((int)(rand()%(n-m+1)+m))typedef int Status;/* Status是函数的类型,其值是函数结果状态代码，如OK等 */typedef int ElemType;/* ElemType类型根据实际情况而定，这里假设为int */Status visit(ElemType c){printf("%d ", c);return OK;}typedef struct DulNode{ElemType data;struct DulNode *next;struct DulNode *prior;}DulNode;typedef struct DulNode *DuLinkList;/* 初始化顺序线性表 */Status InitList(DuLinkList *L){if ((*L = (DuLinkList)malloc(sizeof(DulNode))) != NULL){(*L)->next = (*L);(*L)->prior = (*L);return OK;}else return ERROR;}/* 初始条件：顺序线性表L已存在。操作结果：若L为空表，则返回TRUE，否则返回FALSE */Status ListEmpty(DuLinkList L){if (L->next != L)return FALSE;elsereturn TRUE;}/* 初始条件：顺序线性表L已存在。操作结果：将L重置为空表 */Status ClearList(DuLinkList *L){DuLinkList p, q;q = (*L)->next;(*L)->next = *L;(*L)->prior = *L;while (q != *L) //首先判断首元素是否空{p = q->next;free(q);q = p;}return OK;}/* 初始条件：顺序线性表L已存在。操作结果：返回L中数据元素个数 */int ListLength(DuLinkList L){int i = 0;DuLinkList p = L->next; /* p指向第一个结点 */while (p != L){p = p->next;++i;}return i;}/* 初始条件：顺序线性表L已存在，1≤i≤ListLength(L) *//* 操作结果：用e返回L中第i个数据元素的值 */Status GetElem(DuLinkList L, int i, ElemType *e){if (i > ListLength(L) || i < 1 || ListLength(L) == 0)return ERROR;int j = 1;DuLinkList p;p = L->next;while (p!=L && j < i){p = p->next;++j;}*e = p->data;return OK;}/* 初始条件：顺序线性表L已存在 *//* 操作结果：返回L中第1个与e满足关系的数据元素的位序。 *//* 若这样的数据元素不存在，则返回值为0 */int LocateElem(DuLinkList L, ElemType e){int i = 1;DuLinkList p = L->next;while (p!=L && p->data != e){p = p->next;++i;if (i > ListLength(L)){return 0;}}return i;}/* 初始条件：顺序线性表L已存在,1≤i≤ListLength(L)， *//* 操作结果：在L中第i个位置之前插入新的数据元素e，L的长度加1 */Status ListInsert(DuLinkList *L, int i, ElemType e){if (i < 1){return ERROR;}int j = 0;DuLinkList p, q, s;p = (*L);while (j < i - 1) //这里判断到达表末了不能写在while循环里面了{p = p->next;j++;if (p == *L) break;}if (j < i - 1){return ERROR;}s = (DuLinkList)malloc(sizeof(DulNode));s->data = e;q = p->next;p->next = s;q->prior = s;s->prior = p;s->next = q;return OK;}/* 初始条件：顺序线性表L已存在 *//* 操作结果：依次对L的每个数据元素输出 */Status ListTraverse(DuLinkList L){if (ListLength(L) < 1)return ERROR;DuLinkList p = L->next;while (p != L){visit(p->data);p = p->next;}printf("\n");return OK;}/* 初始条件：顺序线性表L已存在，1≤i≤ListLength(L) *//* 操作结果：删除L的第i个数据元素，并用e返回其值，L的长度减1 */Status ListDelete(DuLinkList *L, int i, ElemType *e){if (i >= 1 && i <= ListLength(*L)){DuLinkList p = (*L), q;int j = 0;while (j < i - 1) //找到第i-1个元素{p = p->next;++j;}q = p->next;*e = q->data;p->next = q->next;q->next->prior = p;free(q);return OK;}else return ERROR;}///*  随机产生n个元素的值，建立带表头结点的单链线性表L（头插法） */void CreateListHead(DuLinkList *L, int n){DuLinkList p, q, s;int i = 0;srand(time(0));                         /* 初始化随机数种子 */InitList(L);p = *L;for (i = 0; i != n; ++i){s = (DuLinkList)malloc(sizeof(DulNode));s->data = i;q = p->next;p->next = s;q->prior = s;s->prior = p;s->next = q;}}/*  随机产生n个元素的值，建立带表头结点的单链线性表L（尾插法） */void CreateListTail(DuLinkList *L, int n){DuLinkList p, q;int i = 0;srand(time(0));                         /* 初始化随机数种子 */InitList(L);p = *L;while (i < n){i++;ListInsert(L, i, i);}}int main(){DuLinkList L;ElemType e;Status i;int j, k;i = InitList(&L);printf("初始化L后：ListLength(L)=%d\n", ListLength(L));for (j = 1; j <= 5; j++)i = ListInsert(&L, 1, j);printf("在L的表头依次插入1～5后：L.data=");ListTraverse(L);printf("ListLength(L)=%d \n", ListLength(L));i = ListEmpty(L);printf("L是否空：i=%d(1:是 0:否)\n", i);i = ClearList(&L);printf("清空L后：ListLength(L)=%d\n", ListLength(L));i = ListEmpty(L);printf("L是否空：i=%d(1:是 0:否)\n", i);for (j = 1; j <= 10; j++)ListInsert(&L, j, j);printf("在L的表尾依次插入1～10后：L.data=");ListTraverse(L);printf("ListLength(L)=%d \n", ListLength(L));ListInsert(&L, 1, 0);printf("在L的表头插入0后：L.data=");ListTraverse(L);printf("ListLength(L)=%d \n", ListLength(L));GetElem(L, 5, &e);printf("第5个元素的值为：%d\n", e);for (j = 3; j <= 4; j++){k = LocateElem(L, j);if (k)printf("第%d个元素的值为%d\n", k, j);elseprintf("没有值为%d的元素\n", j);}k = ListLength(L); /* k为表长 */for (j = k + 1; j >= k; j--){i = ListDelete(&L, j, &e); /* 删除第j个数据 */if (i == ERROR)printf("删除第%d个数据失败\n", j);elseprintf("删除第%d个的元素值为：%d\n", j, e);}printf("依次输出L的元素：");ListTraverse(L);j = 5;ListDelete(&L, j, &e); /* 删除第5个数据 */printf("删除第%d个的元素值为：%d\n", j, e);printf("依次输出L的元素：");ListTraverse(L);i = ClearList(&L);printf("\n清空L后：ListLength(L)=%d\n", ListLength(L));CreateListHead(&L, 20);printf("整体创建L的元素(头插法)：");ListTraverse(L);i = ClearList(&L);printf("\n删除L后：ListLength(L)=%d\n", ListLength(L));CreateListTail(&L, 20);printf("整体创建L的元素(尾插法)：");ListTraverse(L);system("pause");return 0;}