双链表的初始化，建立，插入，查找，删除。

////////////////////////////////////////////

//双链表的初始化，建立，插入，查找，删除。//

//Author:Wang Yong				  		  //	

//Date:	2010.8.19				  		  //

////////////////////////////////////////////





#include <stdio.h>

#include <stdlib.h>



typedef int ElemType;

////////////////////////////////////////////



// 定义双链表结点类型



typedef struct Node

{

	ElemType data;

	struct Node *prior;			//指向前驱结点 

	struct Node *next;			//指向后继结点 

}Node, *DLinkList;



////////////////////////////////////////////



//双链表的建立，采用尾插法建立双链表 

DLinkList DLinkListCreatT()

{

	Node *L,*p,*r;

	L = (Node *)malloc(sizeof(Node));//申请头结点

	L->next = NULL;

	r = L;

	r->next = NULL;							//r 为指向终端结点的指针 

	ElemType x;

	while(scanf("%d",&x) != EOF)	//输入双链表元素，建立双链表

	{

		p = (Node *)malloc(sizeof(Node));

		p->data = x;

		p->next = r->next;

		r->next = p;

		r = p;

	}

	r->next = NULL; 

	return L;

}



/////////////////////////////////////////



//双链表的查找，查找元素为x的位置



int DLinkListFind(DLinkList L,ElemType x)

{

	DLinkList p;				//p为检索， 

	p = L->next;

	int i = 1;

	while(p != NULL && p->data != x )//寻找值为x的元素**注意这里循环的条件不能写反 

	{								//原因，当p == NULL 时候 p->data 会出错

		++i;						//	for (i = 1, p = L->next; p; p = p->next, i++) {

									//	if (p->data == x) break;}

		p = p->next;

	}

	

	if(p == NULL)				//如果没找到返回0 

		return 0;

	else return i;				//如果找到返回i 

}

/////////////////////////////////////////



//双链表的插入，在双链表中的第i个位置插入值为x的元素



DLinkList DLinkListInsert(DLinkList L,int i,ElemType x)

{

	DLinkList p,s;							//s为要插入的结点 

	p = L->next;							//从第一个结点位置开始查找 

	int tempi;

	for(tempi = 1;tempi < i-1; tempi++)

		p = p->next;

 	s = (Node *)malloc(sizeof(Node));

	s->data = x;							//将x赋值到s的数据域 

	s->next = p->next;						//将结点插入 

	p->next->prior = s;

	s->prior = p;

	p->next = s;

	

	return L;

	 

} 



//////////////////////////////////////////////



//双链表的删除，删除双链表中第i个结点



DLinkList DLinkListDelete(DLinkList L,int i)

{

	int tempi = 1;

	DLinkList p;						//p为查找结点。 

	p = L->next;

	while((tempi++) != i && p != NULL)

	{

		p = p->next;

	}

	if(p == NULL)						//检查是不是在双链表中的位置 

		printf("位置不合法。\n");

	else if(p->next == NULL)			//最后一个结点特殊处理，原因最后一个结点p->next没有prior  

	{

		p->prior->next = NULL;

		free(p);

	} 

	else								//进行删除操作 

	{ 

		p->prior->next = p->next;

		p->next->prior = p->prior;

		free(p); 

	}

} 



/////////////////////////////////////////// 

int main()

{

	DLinkList list,start;

	list = DLinkListCreatT();

	for(start = list->next; start != NULL; start = start->next)

		printf("%d ",start->data);

	printf("\n");

	int i;

	ElemType x;

	printf("请输入要查找元素的值：");

	scanf("%d",&x);

	i = DLinkListFind(list,x);

	if(i)

		printf("在链表中的位置为：%d\n",i);

	else 

		printf("没有这个元素。\n");

	printf("请输入插入位置：");

	scanf("%d",&i);

	printf("请输入插入元素的值：");

	scanf("%d",&x);

	DLinkListInsert(list,i,x);

	for(start = list->next; start != NULL; start = start->next)

		printf("%d ",start->data);

	printf("\n");

	printf("请输入要删除的位置：");

	scanf("%d",&i);

	DLinkListDelete(list,i); 

	for(start = list->next; start != NULL; start = start->next)

		printf("%d ",start->data);

	printf("\n");



	return 0;

}