静态链表

#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("
");
	return OK;
}
int main() {
	StaticLinkList L;
	int i = 0;
	i = InitList(L);
	printf("初始化 L 后:L.length=%d
", 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("
 在 L 的表头依次插入 FEDBA 后:
L.data=");
	ListTraverse(L);
	i = ListInsert(L, 3, 'C');
	printf("
 在 L 的“B”与“D”之间插入“C”后:
L.data=");
	ListTraverse(L);
	i = ListDelete(L, 1);
	printf("
 在 L 的删除“A”后:
L.data=");
	ListTraverse(L);
	printf("
");
	return i;
}

来自为知笔记(Wiz)