第四周实践项目6 循环双链表应用

/*
*Copyright (c) 2017,烟台大学计算机与控制工程学院
*All rights reserved.
*文件名称：项目6-
 设非空线性表ha和hb都用带头节点的循环双链表表示。
 设计一个算法Insert(ha,hb,i)。其功能是：i=0时，将线性表hb插入到线性表ha的最前面；
 当i>0时，将线性表hb插入到线性表ha中第i个节点的后面；
 当i大于等于线性表ha的长度时，将线性表hb插入到线性表ha的最后面。
*作    者：邵雪源
*完成日期：2017年12月13日
*版 本 号：v1.0
*/
#include <stdio.h>
#include <malloc.h>
typedef int ElemType;
typedef struct DNode        //定义双链表结点类型
{
    ElemType data;
    struct DNode *prior;    //指向前驱结点
    struct DNode *next;     //指向后继结点
} CDLinkList;
void CreateListF(CDLinkList *&L,ElemType a[],int n) //头插法建立循环双链表
{
    CDLinkList *s;
    int i;
    L=(CDLinkList *)malloc(sizeof(CDLinkList));     //创建头结点
    L->next=NULL;
    for (i=0; i<n; i++)
    {
        s=(CDLinkList *)malloc(sizeof(CDLinkList));//创建新结点
        s->data=a[i];
        s->next=L->next;            //将*s插在原开始结点之前,头结点之后
        if (L->next!=NULL) L->next->prior=s;
        L->next=s;
        s->prior=L;
    }
    s=L->next;
    while (s->next!=NULL)           //查找尾结点,由s指向它
        s=s->next;
    s->next=L;                      //尾结点next域指向头结点
    L->prior=s;                     //头结点的prior域指向尾结点

}
void InitList(CDLinkList *&L) //初始化循环双链表
{
    L=(CDLinkList *)malloc(sizeof(CDLinkList));     //创建头结点
    L->prior=L->next=L;
}
void DestroyList(CDLinkList *&L)  //销毁
{
    CDLinkList *p=L,*q=p->next;
    while (q!=L)
    {
        free(p);
        p=q;
        q=p->next;
    }
    free(p);
}
void DispList(CDLinkList *L)  //输出链表
{
    CDLinkList *p=L->next;
    while (p!=L)
    {
        printf("%d ",p->data);
        p=p->next;
    }
    printf("\n");
}
void Insert(CDLinkList *&ha, CDLinkList *&hb,int i)
{
    CDLinkList *p=ha->next,*q;
    int lena=1,j=1;
    while (p->next!=ha) //求出ha的长度lena
    {
        lena++;
        p=p->next;
    }
    if (i==0)   //将hb的所有数据结点插入到ha的头结点和第1个数据结点之间
    {
        p=hb->prior;        //p指向hb的最后一个结点/
        p->next=ha->next;       //将*p链到ha的第1个数据结点前面
        ha->next->prior=p;
        ha->next=hb->next;
        hb->next->prior=ha;     //将ha头结点与hb的第1个数据结点链起来
    }
    else if (i<lena)            //将hb插入到ha中间
    {
        p=ha->next;
        while (j<i)         //在ha中查找第i个结点*p
        {
            j++;
            p=p->next;
        }
        q=p->next;          //q指向*p结点的后继结点/
        p->next=hb->next;       //hb->prior指向hb的最后一个结点
        hb->next->prior=p;
        hb->prior->next=q;
        q->prior=hb->prior;
    }
    else                        //将hb链到ha之后
    {
        ha->prior->next=hb->next; //ha->prior指向ha的最后一个结点
        hb->next->prior=ha->prior;
        hb->prior->next=ha;
        ha->prior=hb->prior;
    }
    free(hb);   //释放hb头结点
}
int main()
{
    CDLinkList *HA, *HB;
    ElemType ha[]= {0, 1, 2, 3, 4, 5, 6, 7 ,8, 9};
    InitList(HA);
    CreateListF(HA, ha, 10);
    ElemType hb[]= {100, 200, 300, 400, 500};
    InitList(HB);
    CreateListF(HB, hb, 5);
    printf("HA: ");
    DispList(HA);
    printf("HB: ");
    DispList(HB);
    Insert(HA, HB, 0);  //将0改为其他值，多次运行程序完成测试
    printf("new HA: ");
    DispList(HA);
    DestroyList(HA);
    return 0;
}