标签：双向单链表
//函数声明部分：#include"twowaylinklist.h"
#define _CRT_SECURE_NO_WARNINGS 1
#include<stdio.h>
#include<stdlib.h>
typedef int ElemType;
typedef struct DulNode
{
struct DulNode *prior;
ElemType data;
struct DulNode *next;
}DulNode;
void judgement_NULL(DulNode *point);
DulNode * creat();
void insert(DulNode *head, ElemType x, int i);
void delete_element(DulNode *head, ElemType x);
void delete_place(DulNode *head, int i);
void find_element(DulNode *head, int i);
void find_place(DulNode *head, ElemType x);
void length(DulNode *head);
void output_order(DulNode *head);
void output_back(DulNode *head);
void initslinklist(DulNode *head);
int means(); //选择以那种方式进行
//函数实现部分：#include"twowaylinklist.c"
void judgement_NULL(DulNode *point) //判断开辟动态内存是否成功
{
if (point == NULL)
{
perror("out of memory\n");
exit(EXIT_FAILURE);
}
}
DulNode * creat() //建立链表，以0作为结束标志
{
printf("开始创建：");
ElemType x;
DulNode *head, *r, *p;
head = (DulNode *)malloc(sizeof(DulNode));
judgement_NULL(head);
head->prior = NULL;
r = head;
while (1)
{
scanf("%d", &x);
if (x != 0)
{
p = (DulNode *)malloc(sizeof(DulNode));
p->data = x;
r->next = p;
p->prior = r;
r = p;
}
else
break;
}
r->next = NULL;
printf("创建成功\n");
return head;
}
void insert(DulNode *head, ElemType x, int i) //在第i个位置上插入一个结点，并且结点的data为x
{
DulNode *p, *r;
p = (DulNode *)malloc(sizeof(DulNode));
judgement_NULL(p);
p->data = x;
if (i == 1)
{
p->next = head->next;
head->next->prior = p;
head->next = p;
p->prior = head;
printf("插入成功\n");
}
else
{
r = head->next;
while (r != NULL)
{
if (i == 1)
break;
r = r->next;
i--;
}
if (r == NULL)
printf("没有这个结点\n");
else
{
r->prior->next = p;
p->prior = r->prior;
p->next = r;
r->prior = p;
printf("插入成功\n");
}
}
}
void delete_element(DulNode *head, ElemType x) //删除链表中所有的X元素
{
DulNode *p, *r;
int flag = 0;
if (head->next == NULL)
printf("链表下溢\n");
else
{
p = head->next;
while (p != NULL)
{
if (p->data == x)
{
flag++;
r = p;
p = p->next;
r->prior->next = r->next;
r->next->prior = r->prior;
free(r);
r = NULL;
}
else
p = p->next;
}
if (flag == 0)
printf("没找到该元素\n");
else
printf("共删除%d个\n", flag);
}
}
void delete_place(DulNode *head, int i) //删除指定位置的结点
{
DulNode *p;
if (head->next == NULL)
printf("链表下溢\n");
else
{
p = head->next;
while (p != NULL)
{
if (i == 1)
break;
p = p->next;
i--;
}
if (p == NULL)
printf("没有此位置\n");
else
{
p->prior->next = p->next;
p->next->prior = p->prior;
free(p);
printf("删除成功\n");
}
}
}
void find_element(DulNode *head, int i) //查找第i个结点上的data，找到并输出
{
DulNode *p;
if (head->next == NULL)
printf("链表下溢\n");
else
{
p = head->next;
while (p != NULL)
{
if (i == 1)
break;
p = p->next;
i--;
}
if (p == NULL)
printf("没有该结点\n");
else
printf("结点元素：%d\n", p->data);
}
}
void find_place(DulNode *head, ElemType x) //找到链表中所有data为x的结点，并输出结点位置
{
DulNode *p;
int i = 0;
int flag = 0;
if (head->next == NULL)
printf("链表下溢\n");
else
{
p = head->next;
while (p != NULL)
{
i++;
if (p->data == x)
{
flag++;
printf("此元素的结点位置：%d\n",i);
}
p = p->next;
}
if (flag == 0)
printf("链表中没有该结点\n");
}
}
void length(DulNode *head) //求链表长度
{
DulNode *p = head->next;
int len = 0;
if (head->next == NULL)
printf("链表长度为：%d\n", len);
else
{
while (p != NULL)
{
len++;
p = p->next;
}
printf("链表长度：%d\n", len);
}
}
void output_order(DulNode *head) //正向打印链表
{
DulNode *p = head->next;
if (head->next == NULL)
printf("链表为空");
else
{
printf("顺序打印链表：");
while (p != NULL)
{
printf("%d ", p->data);
p = p->next;
}
}
printf("\n");
}
void output_back(DulNode *head) //反向打印链表
{
DulNode *p;
if (head->next == NULL)
printf("链表为空");
else
{
printf("逆序打印链表：");
p = head->next;
while (p->next != NULL) //让p指向最后一个结点
{
p = p->next;
}
while (p != head)
{
printf("%d ", p->data);
p = p->prior;
}
}
printf("\n");
}
void initslinklist(DulNode *head) //释放当前链表
{
free(head);
head = NULL;
printf("初始化成功\n");
}
int means()
{
int m = 0;
while (1)
{
printf("请选择方式：");
scanf("%d", &m);
if (m == 1 || m == 2)
break;
printf("选择无效，请重新选择\n");
}
return m;
}
//函数功能测试部分：#include"twowaylinklist.h"
int main()
{
DulNode *ret = NULL;
int n = 0;
int i = 0;
ElemType x;
printf("*********************************************\n");
printf("*********************************************\n");
printf("*1.CreatLinkList 2.Insert *\n");
printf("*3.Delete 4.Find *\n");
printf("*5.Length 6.Output *\n");
printf("*7.InitsLinkLinst 0.Exit *\n\n\n");
while (1)
{
printf("请选择功能：");
scanf("%d", &n);
if (n == 0) //选择0直接退出
{
free(ret); //退出前先释放列表
exit(1);
}
if (ret == NULL) //如果ret为空，则首先建立链表
{
if (n == 1)
{
printf("创建链表以0作为结束标志\n");
ret = creat();
}
else
printf("请先建立链表\n");
}
else
{
switch (n) //选择剩下的功能
{
case 1: //当ret不为空时不能建立链表
printf("当前链表未结束，请先初始化链表\n");
break;
case 2:
printf("请输入要插入的元素和位置：");
scanf("%d", &x);
scanf("%d", &i);
insert(ret, x, i);
break;
case 3:
printf("*1.delete_element 2.delete_place*\n");
if (means() == 1)
{
printf("请输入要删除的元素：");
scanf("%d", &x);
delete_element(ret, x);
}
else
{
printf("请输入要删除的结点：");
scanf("%d", &i);
delete_place(ret, i);
}
break;
case 4:
printf("*1.find_place 2.find_element*\n");
if (means() == 1)
{
printf("请输入要查找的元素：");
scanf("%d", &x);
find_place(ret, x);
}
else
{
printf("请输入要查找的位置：");
scanf("%d", &i);
find_element(ret, i);
}
break;
case 5:
length(ret);
break;
case 6:
printf("*1.output_order 2.output_back*\n");
if (means() == 1)
output_order(ret);
else
output_back(ret);
break;
case 7: //将当前链表释放
initslinklist(ret);
ret = NULL;
break;
default:
printf("选择无效，请重新选择\n");
break;
}
}
n = 0;
}
system("pause");
return 0;
}
本文出自 “11132019” 博客，请务必保留此出处http://11142019.blog.51cto.com/11132019/1764294
标签：双向单链表
原文地址：http://11142019.blog.51cto.com/11132019/1764294
