list-c单循环链表

 /*@file listtest.c 单循环链表检验主程序 */
/*mingGW编译OK*/
#include "allhead.h"
#include "list.h"
#include "fun.h"

void main()
 {
   LinkList L;
   ElemType e;
   int j;
   Status i;
   InitList(&L); /* 初始化单循环链表L */
   i=ListEmpty(L);
   printf("1.L是否空 i=%d(1:空 0:否)/n",i);
   ListInsert(&L,1,3); /* 在L中依次插入3,5 */
   ListInsert(&L,2,5);
   i=GetElem(L,1,&e);
   j=ListLength(L);
   printf("2.L中数据元素个数=%d,第1个元素的值为%d。/n",j,e);
   printf("3.L中的数据元素依次为：");
   ListTraverse(L,print);
   PriorElem(L,5,&e); /* 求元素5的前驱 */
   printf("4.5前面的元素的值为%d。/n",e);
   NextElem(L,3,&e); /* 求元素3的后继 */
   printf("3后面的元素的值为%d。/n",e);
   printf("5.L是否空 %d(1:空 0:否)/n",ListEmpty(L));
   j=LocateElem(L,5,equal);
   if(j)
     printf("6.L的第%d个元素为5。/n",j);
   else
     printf("6.不存在值为5的元素/n");
   i=ListDelete(&L,2,&e);
   printf("7.L删除的第2个元素：/n");
   if(i)
   {
     printf("8.L删除的元素值为%d,现在L中的数据元素依次为：",e);
     ListTraverse(L,print);
   }
   else
     printf("8.L删除不成功！/n");
   ClearList(&L);
   printf("9.L清空L后，L是否空：%d(1:空 0:否)/n",ListEmpty(L));
   DestroyList(&L);
 }

 

/**************************************************************/
#include "allhead.h"
#include "fun.h"
省略它们，内容详见
http://blog.csdn.net/chinayaosir/archive/2008/09/20/2956091.aspx

/**************************************************************/

/*@file list.h*/
/*mingGW编译OK*/

/*单循环链表构建表*/
 typedef int ElemType;
/*单链表结构*/
 typedef struct LNode /* 结点类型 */
 {
   ElemType data;
   struct LNode *next;
 }LNode,*LinkList;

/*list ADT 12个基本操作*/
 void InitList(LinkList *L)
 { /* 操作结果：构造一个空的线性表L */
   *L=(LinkList)malloc(sizeof(struct LNode)); /* 产生头结点，并使L指向此头结点 */
   if(!*L) /* 存储分配失败 */
     exit(OVERFLOW);
   (*L)->next=*L; /* 指针域指向头结点 */
 }

 void DestroyList(LinkList *L)
 { /* 操作结果：销毁线性表L */
   LinkList q,p;
   p=(*L)->next; /* p指向头结点 */
   while(p!=*L) /* 没到表尾 */
   {
     q=p->next;
     free(p);
     p=q;
   }
   free(*L);
   *L=NULL;
 }

 void ClearList(LinkList *L) /* 改变L */
 { /* 初始条件：线性表L已存在。操作结果：将L重置为空表 */
   LinkList p,q;
   *L=(*L)->next; /* L指向头结点 */
   p=(*L)->next; /* p指向第一个结点 */
   while(p!=*L) /* 没到表尾 */
   {
     q=p->next;
     free(p);
     p=q;
   }
   (*L)->next=*L; /* 头结点指针域指向自身 */
 }

 Status ListEmpty(LinkList L)
 { /* 初始条件：线性表L已存在。操作结果：若L为空表，则返回TRUE，否则返回FALSE */
   if(L->next==L) /* 空 */
     return TRUE;
   else
     return FALSE;
 }

 int ListLength(LinkList L)
 { /* 初始条件：L已存在。操作结果：返回L中数据元素个数 */
   int i=0;
   LinkList p=L->next; /* p指向头结点 */
   while(p!=L) /* 没到表尾 */
   {
     i++;
     p=p->next;
   }
   return i;
 }

 Status GetElem(LinkList L,int i,ElemType *e)
 { /* 当第i个元素存在时，其值赋给e并返回OK，否则返回ERROR */
   int j=1; /* 初始化，j为计数器 */
   LinkList p=L->next->next; /* p指向第一个结点 */
   if(i<=0||i>ListLength(L)) /* 第i个元素不存在 */
     return ERROR;
   while(j<i)
   { /* 顺指针向后查找，直到p指向第i个元素 */
     p=p->next;
     j++;
   }
   *e=p->data; /* 取第i个元素 */
   return OK;
 }

 int LocateElem(LinkList L,ElemType e,Status(*compare)(ElemType,ElemType))
 { /* 初始条件：线性表L已存在，compare()是数据元素判定函数 */
   /* 操作结果：返回L中第1个与e满足关系compare()的数据元素的位序。*/
   /*           若这样的数据元素不存在，则返回值为0 */
   int i=0;
   LinkList p=L->next->next; /* p指向第一个结点 */
   while(p!=L->next)
   {
     i++;
     if(compare(p->data,e)) /* 满足关系 */
       return i;
     p=p->next;
   }
   return 0;
 }

 Status PriorElem(LinkList L,ElemType cur_e,ElemType *pre_e)
 { /* 初始条件：线性表L已存在 */
   /* 操作结果：若cur_e是L的数据元素，且不是第一个，则用pre_e返回它的前驱，*/
   /*           否则操作失败，pre_e无定义 */
   LinkList q,p=L->next->next; /* p指向第一个结点 */
   q=p->next;
   while(q!=L->next) /* p没到表尾 */
   {
     if(q->data==cur_e)
     {
       *pre_e=p->data;
       return TRUE;
     }
     p=q;
     q=q->next;
   }
   return FALSE; /* 操作失败 */
 }

 Status NextElem(LinkList L,ElemType cur_e,ElemType *next_e)
 { /* 初始条件：线性表L已存在 */
   /* 操作结果：若cur_e是L的数据元素，且不是最后一个，则用next_e返回它的后继，*/
   /*           否则操作失败，next_e无定义 */
   LinkList p=L->next->next; /* p指向第一个结点 */
   while(p!=L) /* p没到表尾 */
   {
     if(p->data==cur_e)
     {
       *next_e=p->next->data;
       return TRUE;
     }
     p=p->next;
   }
   return FALSE; /* 操作失败 */
 }

 Status ListInsert(LinkList *L,int i,ElemType e) /* 改变L */
 { /* 在L的第i个位置之前插入元素e */
   LinkList p=(*L)->next,s; /* p指向头结点 */
   int j=0;
   if(i<=0||i>ListLength(*L)+1) /* 无法在第i个元素之前插入 */
     return ERROR;
   while(j<i-1) /* 寻找第i-1个结点 */
   {
     p=p->next;
     j++;
   }
   s=(LinkList)malloc(sizeof(struct LNode)); /* 生成新结点 */
   s->data=e; /* 插入L中 */
   s->next=p->next;
   p->next=s;
   if(p==*L) /* 改变尾结点 */
     *L=s;
   return OK;
 }

 Status ListDelete(LinkList *L,int i,ElemType *e) /* 改变L */
 { /* 删除L的第i个元素，并由e返回其值 */
   LinkList p=(*L)->next,q; /* p指向头结点 */
   int j=0;
   if(i<=0||i>ListLength(*L)) /* 第i个元素不存在 */
     return ERROR;
   while(j<i-1) /* 寻找第i-1个结点 */
   {
     p=p->next;
     j++;
   }
   q=p->next; /* q指向待删除结点 */
   p->next=q->next;
   *e=q->data;
   if(*L==q) /* 删除的是表尾元素 */
     *L=p;
   free(q); /* 释放待删除结点 */
   return OK;
 }

 void ListTraverse(LinkList L,void(*vi)(ElemType))
 { /* 初始条件：L已存在。操作结果：依次对L的每个数据元素调用函数vi() */
   LinkList p=L->next->next; /* p指向首元结点 */
   while(p!=L->next) /* p不指向头结点 */
   {
     vi(p->data);
     p=p->next;
   }
   printf("/n");
 }