循环双链表各种基本算法实现及示例

#include<stdio.h>
#include<malloc.h>
typedef char ElemType;
typedef struct DNode
{
 ElemType data;
 struct DNode *prior;
 struct DNode *next;
}DLinkList;
void InitList(DLinkList *&L)
{
 L=(DLinkList *)malloc(sizeof(DLinkList));
 L->prior=L->next=L;
}
void DestroyList(DLinkList *&L)
{
 DLinkList *p=L,*q=p->next;
 while(q!=L)
 {
  free(p);
  p=q;
  q=p->next;
 }
 free(p);
}
bool ListEmpty(DLinkList *L)
{
 return (L->next==L);
}
int ListLength(DLinkList *L)
{
 DLinkList *p=L;
 int i=0;
 while(p->next!=L)
 {
  i++;
  p=p->next;
 }
 return i;
}
void DispList(DLinkList *L)
{
 DLinkList *p=L->next;
 while(p!=L)
 {
  printf("%c",p->data);
  p=p->next; 
 }
 printf("\n");
}
bool GetElem(DLinkList *L,int i,ElemType &e)
{
 int j=0;
 DLinkList *p;
 if(L->next!=L)
 {
  if(i==1)
  {
   e=L->next->data;
   return true;
  }
  else
  {
   p=L->next;
   while(j<i-1&&p!=L)
   {
    j++;
    p=p->next;
   }
   if(p==L)
    return false;
   else
    {
     e=p->data;
     return true;
    }
  }
 }
 else
  return false;
}
int LocateElem(DLinkList *L,ElemType e)
{
 int n=1;
 DLinkList *p=L->next;
 while(p!=NULL&&p->data!=e)
 {
  n++;
  p=p->next;
 }
 if(p==NULL)
  return 0;
 else
  return n;
}
bool ListInsert(DLinkList *L,int i,ElemType e)
{
 int j=0;
 DLinkList *p=L,*s;
 if(p->next==L)
 {
  s=(DLinkList*)malloc(sizeof(DLinkList));
  s->data=e;
  p->next=s;
  s->next=p;
  p->prior=s;
  s->prior=p;
  return true;
 }
 else if(i==1)
 {
  s=(DLinkList*)malloc(sizeof(DLinkList));
  s->data=e;
  s->next=p->next;
  p->next=s;
  s->next->prior=s;
  s->prior=p;
  return true; 
 }
 else
 {
  p=L->next;
  while(j<i-2&&p!=L)
  {
   j++;
   p=p->next;
  }
  if(p==L)
   return false;
  else
  {
  s=(DLinkList*)malloc(sizeof(DLinkList));
  s->data=e;
  s->next=p->next;
  if(p->next!=NULL)
   p->next->prior=s;
   s->prior=p;
   p->next=s;
   return true;
  }
 }
}
bool ListDelete(DLinkList *&L,int i,ElemType &e)
{
 int j=0;
 DLinkList  *p=L,*q;
 if(p->next!=L)
 {
  if(i==1)
  {
   q=L->next;
   e=q->data;
   L->next=q->next;
   q->next->prior=L;
   free(q);
   return true;
  }
  else
  {
   p=L->next;
   while(j<i-2&&p!=NULL)
   {
    j++;
    p=p->next;
   }
   if(p==NULL)
    return false;
   else
   {
    q=p->next;
    if(q==NULL)
     return false;
    e=q->data;
    p->next=q->next;
    if(p->next!=NULL)
    {
     p->next->prior=p;
     free(q);
     return true;
    }
   }
  }
 }
  else
   return false;
} 
int main()
{
DLinkList *h;
ElemType e;
printf("循环双链表的基本运算如下:\n");
printf("(1)初始化循环双链表h\n");
InitList(h);
printf("(2)依次采用尾插法插入a,b,c,d,e元素\n");
ListInsert(h,1,'a'); 
ListInsert(h,2,'b'); 
ListInsert(h,3,'c'); 
ListInsert(h,4,'d'); 
ListInsert(h,5,'e');
printf("(3)输出循环双链表h：");
DispList(h);
printf("(4)循环双链表h的长度=%d\n",ListLength(h));
printf("(5)循环双链表h为%s\n",(ListEmpty(h)?"空":"非空"));
GetElem(h,3,e);
printf("(6)循环双链表h的第3个元素=%c\n",e);
printf("(7)元素a的位置=%d\n",LocateElem(h,'a'));
printf("(8)在第4个元素位置上插入f元素\n");
ListInsert(h,4,'f');
printf("(9)输出循环双链表h:");
DispList(h);
printf("(10)删除h的第3个元素\n");
ListDelete(h,3,e);
printf("(11)输出循环双链表h:");
DispList(h);
printf("(12)释放循环双链表h\n");
DestroyList(h);
return 0; 
}

程序运行如下：