线性表顺序存储方式的C语言实现

 /*
 编译器VC6++
 文件名1.cpp
 代码版本号：1.0
 时间：2015年9月14日16:39:21
 */
 #include <stdio.h>
 #include <stdlib.h>

 #define OK 1
 #define ERROR 0
 #define TRUE 1
 #define FALSE 0
 #define OVERFLOW -2
 #define LIST_INIT_SIZE 10
 #define LIST_INCREMENT 10

 typedef int ElemType;
 typedef int Status;
 typedef struct{
     ElemType *base;
     int length;
     int listsize;
 } Sqlist;

 Status initSqlist(Sqlist *l)//初始化线性表，分配容量
 {
     (*l).base = (ElemType *)malloc(LIST_INIT_SIZE*sizeof(ElemType));

     if (!((*l).base))
         exit(OVERFLOW);
     (*l).length =;
     (*l).listsize =LIST_INIT_SIZE;
     return OK;
 }

 Status assignSqlist(Sqlist *l) //按位序assign值到线性表中
 {
     int i;
     if(l->base!=NULL)
     {
         l->length=LIST_INIT_SIZE;
         for (i = ; i < LIST_INIT_SIZE; i++)
             (l->base)[i] = i;
         return OK;
     }
     else
         return ERROR;
 }

 Status ListInsert(Sqlist *l, int i, ElemType e) //元素插入
 {
     ElemType *newbase=NULL;
     ElemType *q;
     //ElemType *p = (*l).base + i - 1;
     if (i< || i>(*l).length + )
     {
         printf("请插入在第1-%d个元素之间", (*l).length + );
         return ;
     }
     if ((*l).length >= (*l).listsize)
     {
         printf("我执行了");
         newbase = (ElemType *)realloc((*l).base,
             ((*l).listsize + LIST_INCREMENT) * sizeof(ElemType));
         if (!newbase)
             exit();
         (*l).base = newbase; // 新基址
         (*l).listsize += LIST_INCREMENT; // 增加存储容量
     }
     for (q = (*l).base + (*l).length - ; q >= (*l).base + i-;q--)
         *(q + ) = *q;

     *((*l).base + i - ) = e;
     (*l).length++;
     return OK;
 }

 Status GetElem(Sqlist *l,int i,ElemType *e)
 {
     if(i>=&&i<=l->length)
     {
         *e=l->base[i-];
         return OK;
     }
     else
     {
         printf("您输入的元素位序不合法\n");
         return ERROR;
     }
 }

 Status mergeList(Sqlist *lc,Sqlist la,Sqlist lb)
 {
     int i=;
     int j=;
     ElemType *a=la.base;
     ElemType *b=lb.base;
     ElemType *c;
     lc->listsize=lc->length=la.length+lb.length;
     lc->base=(ElemType *)malloc(lc->listsize*sizeof(ElemType));
     if(!lc->base)
         exit(OVERFLOW);

     c=lc->base;

     while(i<=la.length&&j<=lb.length)
     {
         if(*a<=*b)
         {
             *c++=*a++;
             i++;
         }
         else
         {
             *c++=*b++;
             j++;
         }
     }

     while(i<=la.length)
     {
         *c++=*a++;
         i++;
     }
     while(j<=lb.length)
     {
         *c++=*b++;
         j++;
     }

     return OK;
 }

 Status listDelete(Sqlist *l,int i,ElemType *e)
 {
     if(i<||i>l->length)    return ERROR;
     ElemType *p=l->base+i-;
     *e=*p;
     for(*p;p<(l->base+l->length-);p++)
         *p=*(p+);

     l->length--;
     return OK;
 }

 Status priorElem(Sqlist *l,ElemType e,ElemType *prior_elem)
 {
     int i=;
     while(i<=l->length&&l->base[i-]!=e)
     {
         i++;
     }
     if(i==(l->length+))
     {
         printf("\n元素%d不在线性表中\n",e);
         return ERROR;
     }
     else
     {
         if(i==)
         {
             printf("该元素没有前驱\n");
             return ERROR;
         }
         else
         {
             *prior_elem=l->base[i-];
             return OK;
         }
     }
 }

 Status nextElem(Sqlist *l,ElemType e,ElemType *next_elem)
 {
     int i=;
     while(i<=l->length&&l->base[i-]!=e)
     {
         i++;
     }
     if(i==(l->length+))
     {
         printf("\n元素%d不在线性表中\n",e);
         return ERROR;
     }
     else
     {
         if(i==l->length)
         {
             printf("该元素没有后驱\n");
             return ERROR;
         }
         else
         {
             *next_elem=l->base[i];
             return OK;
         }
     }
 }
 /*
 返回L中第1个与e满足关系compare()的数据元素的位序。
 若这样的数据元素不存在，则返回值为0。
 */
 int locateElem(Sqlist *l,ElemType e,bool (*compare)(ElemType e,ElemType a))
 {
     int i=;
     while(i<=l->length&&!compare(e,l->base[i]))
         i++;
     if(i<=l->length)
         return i+;
     else
         return ;
 }                                    

 bool comp(ElemType e,ElemType a){
     if(e==a)
         return TRUE;
     else
         return FALSE;
 }

 Status printLinklist(Sqlist l) //遍历输出线性表中的元素
 {

     for (int i = ; i < l.length; i++){
         printf("\n第%d个数据为%d",i+,(l.base)[i]);
     }

     return OK;
 }

 Status destroyList(Sqlist *l){//销毁线性表，释放空间

     if(l->base!=NULL)
     {
         free(l->base);
         l->length=;
         l->listsize=;

         return OK;
     }
     return ERROR;
 }

 Status clearList(Sqlist *l)//将线性表重置为长度为0的空表
 {
     l->length=;
     return OK;
 }

 bool isEmpty(Sqlist *l) //判断线性表是否是空表
 {
     if(l->length==)
         return TRUE;
     else
         return FALSE;
 }

 void main()
 {
     Sqlist L;
     Sqlist La,Lb,Lc;
     Status s = ;//s为程序运行状态
     int i;
     ElemType theElem;
     ElemType prior_elem;
     ElemType next_elem;
     ElemType e;

     s = initSqlist(&L);  

     //合并3个线性表开始
     initSqlist(&La);
     initSqlist(&Lb);
     initSqlist(&Lc);

     int a[]={,,,,};
     int b[]={,,,,,,,,,};

     for(i=;i<;i++)
         ListInsert(&La,La.length+,a[i]);

     for(i=;i<;i++)
         ListInsert(&Lb,Lb.length+,b[i]);

     printLinklist(La);
     printf("\n==================\n");
     printLinklist(Lb);
     printf("\n==================\n");

     s=mergeList(&Lc,La,Lb);
     printLinklist(Lc);
     printf("\n==================\n");

     //合并3个线性表结束

     if(s)
         s=assignSqlist(&L);

     printLinklist(L);
     printf("\n==================\n");
     printf("请输入要获得的元素的位序： ");
     scanf("%d",&i);
     s=GetElem(&L,i,&e);
     printf("\n线性表中位序为%d的元素为%d",i,e);
     printf("\n==================\n");
     printf("\n元素6在线性表表中的位序为%d",locateElem(&L,,comp));
     /*printf("请输入您要插入的元素: ");
     scanf("%d", &theElem);
     printf("请输入您要插入元素的位置: ");
     scanf("%d", &i);
     ListInsert(&L, i, theElem);*/
     printf("\n==================\n");
     printf("\n您删除第一个元素后的线性表为\n");
     listDelete(&L,,&e);
     printLinklist(L);
     printf("\n您删除的这个元素为%d",e);
     printf("\n==================\n");
     //前驱开始
     priorElem(&L,,&prior_elem);
     printf("\n==================\n");
     printf("元素1的前驱为%d",prior_elem);
     printf("\n==================\n");
     //前驱结束
     //后继开始
     nextElem(&L,,&next_elem);
     printf("\n==================\n");
     printf("元素9的后继为%d",next_elem);
     printf("\n==================\n");
     //后继结束
     if(s)
     {
         clearList(&L);
     }

     printLinklist(L);
     system("pause");
 }