线性表顺序存储方式的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 =0;
    (*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 = 0; 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<1 || i>(*l).length + 1)
    {
        printf("请插入在第1-%d个元素之间", (*l).length + 1);
        return 0;
    }
    if ((*l).length >= (*l).listsize)
    {
        printf("我执行了");
        newbase = (ElemType *)realloc((*l).base,
            ((*l).listsize + LIST_INCREMENT) * sizeof(ElemType));
        if (!newbase)
            exit(0);
        (*l).base = newbase; // 新基址
        (*l).listsize += LIST_INCREMENT; // 增加存储容量
    }
    for (q = (*l).base + (*l).length - 1; q >= (*l).base + i-1;q--)
        *(q + 1) = *q;

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

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

Status mergeList(Sqlist *lc,Sqlist la,Sqlist lb)
{
    int i=1;
    int j=1;
    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<1||i>l->length)    return ERROR;
    ElemType *p=l->base+i-1;
    *e=*p;
    for(*p;p<(l->base+l->length-1);p++)
        *p=*(p+1);

    l->length--;
    return OK;
}

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

Status nextElem(Sqlist *l,ElemType e,ElemType *next_elem)
{
    int i=1;
    while(i<=l->length&&l->base[i-1]!=e)
    {
        i++;
    }
    if(i==(l->length+1))
    {
        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=0;
    while(i<=l->length&&!compare(e,l->base[i]))
        i++;
    if(i<=l->length)
        return i+1;
    else 
        return 0;
}                                    

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

Status printLinklist(Sqlist l) //遍历输出线性表中的元素
{
    
    for (int i = 0; i < l.length; i++){
        printf("\n第%d个数据为%d",i+1,(l.base)[i]);
    }
    
    return OK;
}

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

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

        return OK;
    }
    return ERROR;
}

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

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

void main()
{
    Sqlist L;
    Sqlist La,Lb,Lc;
    Status s = 1;//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[5]={1,5,8,12,20};
    int b[10]={6,13,35,56,120,288,390,510,700,1000};

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

    for(i=0;i<10;i++)
        ListInsert(&Lb,Lb.length+1,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,6,comp));
    /*printf("请输入您要插入的元素: ");
    scanf("%d", &theElem);
    printf("请输入您要插入元素的位置: ");
    scanf("%d", &i);
    ListInsert(&L, i, theElem);*/
    printf("\n==================\n");
    printf("\n您删除第一个元素后的线性表为\n");
    listDelete(&L,1,&e);
    printLinklist(L);
    printf("\n您删除的这个元素为%d",e);
    printf("\n==================\n");
    //前驱开始
    priorElem(&L,1,&prior_elem);
    printf("\n==================\n");
    printf("元素1的前驱为%d",prior_elem);
    printf("\n==================\n");
    //前驱结束
    //后继开始
    nextElem(&L,9,&next_elem);
    printf("\n==================\n");
    printf("元素9的后继为%d",next_elem);
    printf("\n==================\n");
    //后继结束
    if(s)
    {
        clearList(&L);
    }

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