/* bo2-31.c 一個數組只生成一個靜態鏈表(數據結構由c2-3.h定義)的基本操作(11個) */
 void InitList(SLinkList L)
 { /* 構造一個空的鏈表，表頭為L的最后一個單元L[MAXSIZE-1]，其余單元鏈成 */
   /* 一個備用鏈表，表頭為L的第一個單元L[0]，“0”表示空指針 */
   int i;
   L[MAXSIZE-1].cur=0; /* L的最后一個單元為空鏈表的表頭 */
   for(i=0;i<MAXSIZE-2;i++) /* 將其余單元鏈接成以L[0]為表頭的備用鏈表 */
     L[i].cur=i+1;
   L[MAXSIZE-2].cur=0;
 }

 Status ClearList(SLinkList L)
 { /* 初始條件：線性表L已存在。操作結果：將L重置為空表 */
   int i,j,k;
   i=L[MAXSIZE-1].cur; /* 鏈表第一個結點的位置 */
   L[MAXSIZE-1].cur=0; /* 鏈表空 */
   k=L[0].cur; /* 備用鏈表第一個結點的位置 */
   L[0].cur=i; /* 把鏈表的結點連到備用鏈表的表頭 */
   while(i) /* 沒到鏈表尾 */
   {
     j=i;
     i=L[i].cur; /* 指向下一個元素 */
   }
   L[j].cur=k; /* 備用鏈表的第一個結點接到鏈表的尾部 */
   return OK;
 }

 Status ListEmpty(SLinkList L)
 { /* 若L是空表，返回TRUE；否則返回FALSE */
   if(L[MAXSIZE-1].cur==0) /* 空表 */
     return TRUE;
   else
     return FALSE;
 }

 int ListLength(SLinkList L)
 { /* 返回L中數據元素個數 */
   int j=0,i=L[MAXSIZE-1].cur; /* i指向第一個元素 */
   while(i) /* 沒到靜態鏈表尾 */
   {
     i=L[i].cur; /* 指向下一個元素 */
     j++;
   }
   return j;
 }

 Status GetElem(SLinkList L,int i,ElemType *e)
 { /* 用e返回L中第i個元素的值 */
   int l,k=MAXSIZE-1; /* k指向表頭序號 */
   if(i<1||i>ListLength(L))
     return ERROR;
   for(l=1;l<=i;l++) /* 移動到第i個元素處 */
     k=L[k].cur;
   *e=L[k].data;
   return OK;
 }

 int LocateElem(SLinkList L,ElemType e) /* 算法2.13（有改動） */
 { /* 在靜態單鏈線性表L中查找第1個值為e的元素。若找到，則返回它在L中的 */
   /* 位序，否則返回0。（與其它LocateElem()的定義不同) */
   int i=L[MAXSIZE-1].cur; /* i指示表中第一個結點 */
   while(i&&L[i].data!=e) /* 在表中順鏈查找(e不能是字符串) */
     i=L[i].cur;
   return i;
 }

 Status PriorElem(SLinkList L,ElemType cur_e,ElemType *pre_e)
 { /* 初始條件：線性表L已存在 */
   /* 操作結果：若cur_e是L的數據元素，且不是第一個，則用pre_e返回它的前驅， */
   /*           否則操作失敗，pre_e無定義 */
   int j,i=L[MAXSIZE-1].cur; /* i指示鏈表第一個結點的位置 */
   do
   { /* 向后移動結點 */
     j=i;
     i=L[i].cur;
   }while(i&&cur_e!=L[i].data);
   if(i) /* 找到該元素 */
   {
     *pre_e=L[j].data;
     return OK;
   }
   return ERROR;
 }

 Status NextElem(SLinkList L,ElemType cur_e,ElemType *next_e)
 { /* 初始條件：線性表L已存在 */
   /* 操作結果：若cur_e是L的數據元素，且不是最后一個，則用next_e返回它的后繼， */
   /*           否則操作失敗，next_e無定義 */
   int j,i=LocateElem(L,cur_e); /* 在L中查找第一個值為cur_e的元素的位置 */
   if(i) /* L中存在元素cur_e */
   {
     j=L[i].cur; /* cur_e的后繼的位置 */
     if(j) /* cur_e有后繼 */
     {
       *next_e=L[j].data;
       return OK; /* cur_e元素有后繼 */
     }
   }
   return ERROR; /* L不存在cur_e元素,cur_e元素無后繼 */
 }

 Status ListInsert(SLinkList L,int i,ElemType e)
 { /* 在L中第i個元素之前插入新的數據元素e */
   int l,j,k=MAXSIZE-1; /* k指向表頭 */
   if(i<1||i>ListLength(L)+1)
     return ERROR;
   j=Malloc(L); /* 申請新單元 */
   if(j) /* 申請成功 */
   {
     L[j].data=e; /* 賦值給新單元 */
     for(l=1;l<i;l++) /* 移動i-1個元素 */
       k=L[k].cur;
     L[j].cur=L[k].cur;
     L[k].cur=j;
     return OK;
   }
   return ERROR;
 }

 Status ListDelete(SLinkList L,int i,ElemType *e)
 { /* 刪除在L中第i個數據元素e，并返回其值 */
   int j,k=MAXSIZE-1; /* k指向表頭 */
   if(i<1||i>ListLength(L))
     return ERROR;
   for(j=1;j<i;j++) /* 移動i-1個元素 */
     k=L[k].cur;
   j=L[k].cur;
   L[k].cur=L[j].cur;
   *e=L[j].data;
   Free(L,j);
   return OK;
 }

 Status ListTraverse(SLinkList L,void(*vi)(ElemType))
 { /* 初始條件:線性表L已存在 */
   /* 操作結果:依次對L的每個數據元素調用函數vi()。一旦vi()失敗,則操作失敗 */
   int i=L[MAXSIZE-1].cur; /* 指向第一個元素 */
   while(i) /* 沒到靜態鏈表尾 */
   {
     vi(L[i].data); /* 調用vi() */
     i=L[i].cur; /* 指向下一個元素 */
   }
   printf("\n");
   return OK;
 }