!实现循环双链表各种基本运算的算法

/*algo2-5.cpp*/
#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;
}
void DestroyList(DLinkList * &L)
{
 DLinkList *p=L,*q=p->next;
 while(q!=L)
 {
  free(p);
  p=q;
  q=p->next;
 }
 free(p);
}
int 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");
}
int GetElem(DLinkList *L,int i,ElemType &e)
{
 int j=0;
 DLinkList *p;
 if(L->next!=L)/*双链表不为空表时*/
 {
  if(i==1)
  {
   e=L->next->data;
   return 1;
  }
  else
  {
   p=L->next;
   while(j<i-1&&p!=L)
   {
    j++;
    p=p->next;
   }
   if(p==L)
    return 0;
   else
   {
    e=p->data;
    return 1;
   }
  }
 }
 else /*双链表为空表时*/
  return 0;
}
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;
}
int 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 1;
 }
 else if(i==1)/*原双链表不为空表但i=1时*/
 {
  s=(DLinkList *)malloc(sizeof(DLinkList));/*创建新结点*s*/
  s->data=e;
  s->next=p->next;p->next=s;
  s->next->prior=s;s->prior=p;
  return 1;
 }
 else
 {
  p=L->next;
  while(j<i-2&&p!=L)
  {
   j++;
   p=p->next;
  }
  if(p==L)/*未找到第i-1个结点*/
   return 0;
  else/*找到第i-1个结点*p*/
  {
   s=(DLinkList *)malloc(sizeof(DLinkList));/*创建新结点*s*/
   s->data=e;
   s->next=p->next;/*将*s插入到*p之后*/
   if(p->next!=NULL)p->next->prior=s;
   s->prior=p;
   p->next=s;
   return 1;
  }
 }
}
int ListDelete(DLinkList * &L,int i,ElemType &e)
{
 int j=0;
 DLinkList *p=L,*q;
 if(p->next!=L)/*原双链表不为空表时*/
 {
  if(i==1)
  {
   q=L->next;
   L->next=q->next;
   q->next->prior=L;
   free(q);
   return 1;
  }
  else/*i不为1时*/
  {
   p=L->next;
   while(j<i-2&&p!=NULL)
   {
    j++;
    p=p->next;
   }
   if(p==NULL)/*未找到第i-1个结点*/
    return 0;
   else/*找到第i-1个结点*/
   {
    q=p->next;/*q指向要删除的结点*/
    if(q==NULL) return 0;/*不存在第i个结点*/
    p->next=q->next;/*从单链表中删除*q结点*/
    if(p->next!=NULL)p->next->prior=p;
    free(q);/*释放*q结点*/
    return 1;
   }
  }
 }
 else return 0;/*原双链表为空表时间*/
}

 

 

/*exp2-5.cpp*/
#include <stdio.h>
typedef char ElemType;
typedef struct DNode/*定义双链表结点类型*/
{
 ElemType data;
 struct DNode *prior;/*指向前驱结点*/
 struct DNode *next;/*指向后继结点*/
}DLinkList;
/*以下均为外部函数*/
extern void InitList(DLinkList * &L);
extern void DestroyList(DLinkList * &L);
extern int ListEmpty(DLinkList *L);
extern int ListLength(DLinkList *L);
extern void DispList(DLinkList *L);
extern int GetElem(DLinkList *L,int i,ElemType &e);
extern int LocateELem(DLinkList *L,ElemType e);
extern int ListInsert(DLinkList * &L,int i,ElemType e);
extern int ListDelete(DLinkList * &L,int i,ElemType &e);
void main()
{
 DLinkList *h;
 ElemType e;
 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);
}