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

////////////////////////////////////////////
//双链表的初始化，建立，插入，查找，删除。//
//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;
}