#include "string.h"#include "ctype.h"#include "stdio.h"#include "stdlib.h"#include "math.h"#include "time.h"#define OK 1#define ERROR 0#define TRUE 1#define FALSE 0#define MAXSIZE 1000 /* 存储空间初始分配量 *//* Status 是函数的类型,其值是函数结果状态代码,如 OK 等 */typedef int Status;/* ElemType 类型根据实际情况而定,这里假设为 char */typedef char ElemType;Status visit(ElemType c) { printf("%c ", c); return OK;}/* 线性表的静态链表存储结构 */typedef struct { ElemType data; int cur; /* 游标(Cursor) ,为 0 时表示无指向 */} Component, StaticLinkList[MAXSIZE];/* 将一维数组 space 中各分量链成一个备用链表,space[0].cur 为头指针,"0"表示空指针 */Status InitList(StaticLinkList space) { int i; for (i = 0; i < MAXSIZE - 1; i++) space[i].cur = i + 1; space[MAXSIZE - 1].cur = 0; /* 目前静态链表为空,最后一个元素的 cur 为 0 */ return OK;}/* 若备用空间链表非空,则返回分配的结点下标,否则返回 0 */int Malloc_SSL(StaticLinkList space) { int i = space[0].cur; /* 当前数组第一个元素的 cur 存的值 */ /* 就是要返回的第一个备用空闲的下标 */ if (space[0].cur) space[0].cur = space[i].cur; /* 由于要拿出一个分量来使用了, */ /* 所以我们就得把它的下一个 */ /* 分量用来做备用 */ return i;}/** 在C99之前,C语言的标准没有提供布尔类型,但是这不意味着C90不能表示布尔值的概念。* C中的所有布尔运算(&&, ||)以及条件声明(if, while)都以非零值代表真,零值代表假。* 这样,在其他类型如一个整数或一个枚举中保存布尔值就变得很平常。** *//* 将下标为 k 的空闲结点回收到备用链表 */void Free_SSL(StaticLinkList space, int k) { space[k].cur = space[0].cur; space[0].cur = k; /* 把第一个元素的 cur 值赋给要删除的分量 cur */ /* 把要删除的分量下标赋值给第一个元素的 cur */}/* 初始条件:静态链表 L 已存在。操作结果:返回 L 中数据元素个数 */int ListLength(StaticLinkList L) { int j = 0; int i = L[MAXSIZE - 1].cur; while (i) { i = L[i].cur; j++; } return j;}/* 在 L 中第 i 个元素之前插入新的数据元素 e */Status ListInsert(StaticLinkList L, int i, ElemType e) { int j, k, l; k = MAXSIZE - 1; /* 注意 k 首先是最后一个元素的下标 */ if (i < 1 || i > ListLength(L) + 1) return ERROR; j = Malloc_SSL(L); if (j) { /* 获得空闲分量的下标 */ L[j].data = e; /* 将数据赋值给此分量的 data */ for (l = 1; l <= i - 1; l++) /* 找到第 i 个元素之前的位置 */ k = L[k].cur; L[j].cur = L[k].cur; /* 把第 i 个元素之前的 cur 赋值给新元素的 cur */ L[k].cur = j; /* 把新元素的下标赋值给第 i 个元素之前元素的 ur */ return OK; } return ERROR;}/* 删除在 L 中第 i 个数据元素 */Status ListDelete(StaticLinkList L, int i) { int j, k; if (i < 1 || i > ListLength(L)) return ERROR; k = MAXSIZE - 1; for (j = 1; j <= i - 1; j++) k = L[k].cur; j = L[k].cur; L[k].cur = L[j].cur; Free_SSL(L, j); return OK;}Status ListTraverse(StaticLinkList L) { int j = 0; int i = L[MAXSIZE - 1].cur; while (i) { visit(L[i].data); i = L[i].cur; j++; } return j; printf("\n"); return OK;}int main() { StaticLinkList L; int i = 0; i = InitList(L); printf("初始化 L 后:L.length=%d\n", ListLength(L)); i = ListInsert(L, 1, 'F'); i = ListInsert(L, 1, 'E'); i = ListInsert(L, 1, 'D'); i = ListInsert(L, 1, 'B'); i = ListInsert(L, 1, 'A'); printf("\n 在 L 的表头依次插入 FEDBA 后:\nL.data="); ListTraverse(L); i = ListInsert(L, 3, 'C'); printf("\n 在 L 的“B”与“D”之间插入“C”后:\nL.data="); ListTraverse(L); i = ListDelete(L, 1); printf("\n 在 L 的删除“A”后:\nL.data="); ListTraverse(L); printf("\n"); return i;}