带头结点循环双链表

带头结点循环双链表

有问题可以在评论区一起讨论

#include<stdio.h>
#include<malloc.h>

typedef int ElemType;

typedef struct DNode {
	ElemType data;
	struct DNode* prior, * next;
}DNode, * DLinkList;

//按位查找
DNode* GetElem(DLinkList, int);

//按值查找
DNode* LocateElem(DLinkList, ElemType);

//求表长
int Length(DLinkList);

//按位序插入
bool DListInsert(DLinkList&, int, ElemType);

//指定结点后插操作
bool InsertNextNode(DNode*, ElemType);

//指定结点前插操作(使用之前判断一下该结点是否是头结点)
bool InsertPriorNode(DNode*, ElemType);

//按位序删除
bool DListDelete(DLinkList&, int, ElemType&);

//指定结点删除
bool DeleteNode(DLinkList&, DNode*);

//删除该结点的后续结点(不能删除最后一个结点后续)
bool DeleteNextDNode(DNode*);

//删除该双链表
void DestoryList(DLinkList&);

//初始化双链表
bool InitDListList(DLinkList&);

//判断双链表是否为空
bool Empty(DLinkList);

//尾插法建立双链表
bool DListTailInsert(DLinkList&);

//头插法建立双链表
bool DListHeadInsert(DLinkList&);

//后向遍历链表
void Traverse(DLinkList);

//前向遍历链表
void TraverseForward(DLinkList);


int main(void) {

	DLinkList L;
	//1.尾插法创建双链表
	DListTailInsert(L);

	//2.头插法创建双链表
	//DListHeadInsert(L);

	//3.按位查找
	DNode* p = GetElem(L, 3);
	//4.按值查找
	/*p = LocateElem(L, 3);
	if (p == NULL) {
		printf("该值不存在\n");
	}
	else {
		printf("该值为：%d\n", p->data);
	}*/

	//5.求表长
	//printf("表长为：%d\n", Length(L));

	//6.按位序插入
	TraverseForward(L);
	/*bool flag = DListInsert(L, 3, 777);
	if (!flag) {
		printf("插入失败!\n");
	}*/

	//7.指定结点前插操作
	/*bool flag = InsertPriorNode(p, 5555);
	if (!flag) {
		printf("插入失败!\n");
	}*/
	//8.按位序删除
	//Traverse(L);
	/*ElemType e;
	bool flag = DListDelete(L, 5, e);*/
	//9.指定结点删除
	/*bool flag = DeleteNode(L, p);
	if (!flag) {
		printf("删除失败!\n");
	}
	else {
		printf("删除成功!\n");
	}*/
	//10.删除该双链表
	DestoryList(L);

	//Traverse(L);

	TraverseForward(L);

	return 0;

}


DNode* GetElem(DLinkList L, int i) {
	if (i < 0 || L == NULL) {
		return NULL;
	}

	DNode* p = L;
	int j = 0;
	while (j < i) {
		p = p->next;
		j++;
		//该链表已经查找了一轮
		if (p == L) {
			return NULL;
		}
	}

	return p;
}

DNode* LocateElem(DLinkList L, ElemType e) {
	if (L == NULL) {
		return NULL;
	}

	DNode* p = L->next;

	while (p->data != e) {
		p = p->next;
		if (p == L) {
			return NULL;
		}
	}

	return p;

}

int Length(DLinkList L) {
	if (L == NULL) {
		return -1;
	}
	DNode* p = L;
	int j = 0;
	while (true) {
		p = p->next;
		if (p == L) {
			break;
		}
		j++;
	}

	return j;
}

bool DListInsert(DLinkList& L, int i, ElemType e) {
	if (i < 1) {
		return false;
	}

	DNode* p = GetElem(L, i - 1);


	return InsertNextNode(p, e);
}

bool InsertNextNode(DNode* p, ElemType e) {
	if (p == NULL) {
		return false;
	}

	//创建新结点
	DNode* s = (DNode*)malloc(sizeof(DNode));
	if (s == NULL) {
		return false;	//内存分配失败情况
	}
	s->data = e;
	p->next->prior = s;
	s->next = p->next;
	p->next = s;
	s->prior = p;
	return true;
}

bool InsertPriorNode(DNode* p, ElemType e) {

	if (p == NULL) {
		return false;
	}

	//将前插操作变为后插操作
	ElemType temp = p->data;
	p->data = e;
	return InsertNextNode(p, temp);
}

bool DListDelete(DLinkList& L, int i, ElemType& e) {
	if (i < 1) {
		return false;
	}
	//查找出该位序结点
	DNode* p = GetElem(L, i);
	if (p != NULL) {
		e = p->data;
		return DeleteNode(L, p);
	}
	else {
		return false;
	}

}

bool DeleteNode(DLinkList& L, DNode* p) {

	if (p == NULL || L == NULL) {
		return false;
	}

	if (p == L && L->next != L) {
		return false;
	}

	if (p == L && p->next == L) { //链表只有头结点了
		free(L);
		L = NULL;
		return true;
	}

	p->prior->next = p->next;
	p->next->prior = p->prior;
	free(p);

	return true;

}

bool DeleteNextDNode(DNode* p) {
	if (p == NULL) {
		return false;
	}
	DNode* q = p->next;
	p->next = q->next;
	q->next->prior = p;
	free(q);			//释放空间
	return true;

}

void DestoryList(DLinkList& L) {
	if (L == NULL) {
		return;
	}
	while (L->next != L) {
		DeleteNextDNode(L);
	}
	free(L);
	L = NULL;
}

bool InitDListList(DLinkList& L) {
	L = (DNode*)malloc(sizeof(DNode));
	if (L == NULL) {
		return false;
	}

	L->next = L;
	L->prior = L;
	return true;

}

bool Empty(DLinkList L) {
	return  L == NULL || L->next == L;
}

bool DListTailInsert(DLinkList& L) {

	if (!InitDListList(L)) {
		return false;
	}

	ElemType x;
	DNode* s, * r = L;
	printf("输入9999即退出\n");
	printf("请输入:\n");
	scanf("%d", &x);
	while (x != 9999) {
		s = (DNode*)malloc(sizeof(DNode));
		if (s == NULL) {
			return false;
		}
		s->data = x;
		s->next = r->next;
		s->prior = r;
		r->next = s;
		r = s;

		scanf("%d", &x);
	}
	L->prior = r;
	return true;

}

bool DListHeadInsert(DLinkList& L) {
	if (!InitDListList(L)) {
		return false;
	}
	DNode* s;
	ElemType x;
	printf("输入9999即退出\n");
	printf("请输入:\n");
	scanf("%d", &x);
	while (x != 9999) {
		s = (DNode*)malloc(sizeof(DNode));
		if (s == NULL) {
			return false;
		}
		s->data = x;
		s->next = L->next;
		s->prior = L;
		if (L->next == L) {
			L->prior = s;
		}
		L->next = s;
		if (s->next != NULL) {
			s->next->prior = s;
		}
		scanf("%d", &x);
	}

	return true;

}

void Traverse(DLinkList L) {
	if (L == NULL) {
		return;
	}

	DNode* p = L->next;

	while (p != L) {
		printf("%d\t", p->data);
		p = p->next;
	}
	printf("\n");
}

void TraverseForward(DLinkList L) {
	if (L == NULL) {
		return;
	}
	DNode* p;
	p = L->prior;
	while (p != L) {
		printf("%d\t", p->data);
		p = p->prior;
	}
	printf("\n");
}