#include <stdio.h>
#include <stdlib.h>
#define NN 12
#define MM 20
typedef int elemType ;
/*******************************************************/
/* 以下是关于线性表链接存储（单链表）操作的16种算法 */
/*******************************************************/
struct sNode{ /* 定义单链表结点类型 */
elemType data;
struct sNode *next;
};
/* 1.初始化线性表，即置单链表的表头指针为空 */
void initList(struct sNode* *hl)
{
*hl = NULL;
return;
}
/* 2.清除线性表L中的所有元素，即释放单链表L中所有的结点，使之成为一个空表 */
void clearList(struct sNode* *hl)
{
/* cp和np分别作为指向两个相邻结点的指针 */
struct sNode *cp, *np;
cp = *hl;
/* 遍历单链表，依次释放每个结点 */
while(cp != NULL){
np = cp->next; /* 保存下一个结点的指针 */
free(cp);
cp = np;
}
*hl = NULL; /* 置单链表的表头指针为空 */
return;
}
/* 3.返回单链表的长度 */
int sizeList(struct sNode *hl)
{
int count = 0; /* 用于统计结点的个数 */
while(hl !
= NULL){
count++;
hl = hl->next;
}
return count;
}
/* 4.检查单链表是否为空，若为空则返回１，否则返回０ */
int emptyList(struct sNode *hl)
{
if(hl == NULL){
return 1;
}else{
return 0;
}
}
/* 5.返回单链表中第pos个结点中的元素，若pos超出范围，则停止程序运行 */
elemType getElem(struct sNode *hl, int pos)
{
int i = 0; /* 统计已遍历的结点个数 */
if(pos < 1){
printf("pos值非法，退出运行！ ");
exit(1);
}
while(hl != NULL){
i++;
if(i == pos){
break;
}
hl = hl->next;
}
if(hl != NULL){
return hl->data;
}else{
printf("pos值非法，退出运行！ ");
exit(1);
}
}
/* 6.遍历一个单链表 */
void traverseList(struct sNode *hl)
{
while(hl !
= NULL){
printf("%5d", hl->data);
hl = hl->next;
}
printf(" ");
return;
}
/* 7.从单链表中查找具有给定值x的第一个元素，若查找成功则返回该结点data域的存储地址，否则返回NULL */
elemType* findList(struct sNode *hl, elemType x)
{
while(hl != NULL){
if(hl->data == x){
return &hl->data;
}else{
hl = hl->next;
}
}
return NULL;
}
/* 8.把单链表中第pos个结点的值修改为x的值，若修改成功返回１，否则返回０ */
int updatePosList(struct sNode *hl, int pos, elemType x)
{
int i = 0;
struct sNode *p = hl;
while(p != NULL){ /* 查找第pos个结点 */
i++;
if(pos == i){
break;
}else{
p = p->next;
}
}
if(pos == i){
p->data = x;
return 1;
}else{
return 0;
}
}
/* 9.向单链表的表头插入一个元素 */
void insertFirstList(struct sNode* *hl, elemType x)
{
struct sNode *newP;
newP = malloc(sizeof(struct sNode));
if(newP == NULL){
printf("内存分配失败，退出运行！
");
exit(1);
}
newP->data = x; /* 把x的值赋给新结点的data域 */
/* 把新结点作为新的表头结点插入 */
newP->next = *hl;
*hl = newP;
return;
}
/* 10.向单链表的末尾添加一个元素 */
void insertLastList(struct sNode* *hl, elemType x)
{
struct sNode *newP;
newP = malloc(sizeof(struct sNode));
if(newP == NULL){
printf("内在分配失败，退出运行！ ");
exit(1);
}
/* 把x的值赋给新结点的data域，把空值赋给新结点的next域 */
newP->data = x;
newP->next = NULL;
/* 若原表为空，则作为表头结点插入 */
if(*hl == NULL){
*hl = newP;
}
/* 查找到表尾结点并完成插入 */
else{
struct sNode *p = NULL;
while(p->next != NULL){
p = p->next;
}
p->next = newP;
}
return;
}
/* 11.向单链表中第pos个结点位置插入元素为x的结点，若插入成功返回１，否则返回０ */
int insetPosList(struct sNode* *hl, int pos, elemType x){
int i = 0;
struct sNode *newP;
struct sNode *cp = *hl, *ap = NULL;
/* 对pos值小于等于０的情况进行处理 */
if(pos <= 0){
printf("pos值非法，返回０表示插入失败！
");
return 0;
}
/* 查找第pos个结点 */
while(cp != NULL){
i++;
if(pos == i){
break;
}else{
ap = cp;
cp = cp->next;
}
}
/* 产生新结点，若分配失败，则停止插入 */
newP = malloc(sizeof(struct sNode));
if(newP == NULL){
printf("内存分配失败，无法进行插入操作！ ");
return 0;
}
/* 把x的值赋给新结点的data域 */
newP->data = x;
/* 把新结点插入到表头 */
if(ap == NULL){
newP->next = cp; /* 或改为newP->next = *hl; */
*hl = newP;
}
/* 把新结点插入到ap和cp之间 */
else{
newP->next = cp;
ap->next = newP;
}
return 1; /* 插入成功返回1 */
}
/* 12.向有序单链表中插入元素x结点，使得插入后仍然有序 */
void insertOrderList(struct sNode* *hl, elemType x)
{
/* 把单链表的表头指针赋给cp，把ap置空 */
struct sNode *cp = *hl, *ap = NULL;
/* 建立新结点 */
struct sNode *newP;
newP = malloc(sizeof(struct sNode));
if(newP == NULL){
printf("内在分配失败，退出运行！
");
exit(1);
}
newP->data = x; /* 把x的值赋给新结点的data域 */
/* 把新结点插入到表头 */
if((cp == NULL) (x < cp->data)){
newP->next = cp;
*hl = newP;
return;
}
/* 顺序查找出x结点的插入位置 */
while(cp != NULL){
if(x < cp->data){
break;
}else{
ap = cp;
cp = cp->next;
}
}
/* 把x结点插入到ap和cp之间 */
newP->next = cp;
ap->next = newP;
return;
}
/* 13.从单链表中删除表头结点，并把该结点的值返回，若删除失败则停止程序运行 */
elemType deleteFirstList(struct sNode* *hl)
{
elemType temp;
struct sNode *p = *hl; /* 暂存表头结点指针，以便回收 */
if(*hl == NULL){
printf("单链表为空，无表头可进行删除，退出运行！ ");
exit(1);
}
*hl = (*hl)->next; /* 使表头指针指向第二个结点 */
temp = p->data; /* 暂存原表头元素，以便返回 */
free(p); /* 回收被删除的表头结点 */
return temp; /* 返回第一个结点的值 */
}
/* 14.从单链表中删除表尾结点并返回它的值，若删除失败则停止程序运行 */
elemType deleteLastList(struct sNode* *hl)
{
elemType temp;
/* 初始化cp和ap指针，使cp指向表头结点，使ap为空 */
struct sNode *cp = *hl;
struct sNode *ap = NULL;
/* 单链表为空则停止运行 */
if(cp == NULL){
printf("单链表为空，无表头进行删除，退出运行！
");
exit(1);
}
/* 从单链表中查找表尾结点，循环结束时cp指向表尾结点，ap指向其前驱结点 */
while(cp->next != NULL){
ap = cp;
cp = cp->next;
}
/* 若单链表中只有一个结点，则需要修改表头指针 */
if(ap == NULL){
*hl = (*hl)->next; /* 或改为*hl = NULL; */
}
/* 删除表尾结点 */
else{
ap->next = NULL;
}
/* 暂存表尾元素，以便返回 */
temp = cp->data;
free(cp); /* 回收被删除的表尾结点 */
return temp; /* 返回表尾结点的值 */
}
/* 15.从单链表中删除第pos个结点并返回它的值，若删除失败则停止程序运行 */
elemType deletePosList(struct sNode* *hl, int pos)
{
int i = 0;
elemType temp;
/* 初始化cp和ap指针，使cp指向表头结点，使ap为空 */
struct sNode *cp = *hl;
struct sNode *ap = NULL;
/* 单链表为空或pos值非法则停止运行 */
if((cp == NULL) (pos <= 0)){
printf("单链表为空或pos值不正确，退出运行！
");
exit(1);
}
/* 从单链表中查找第pos个结点，找到后由cp指向该结点，由ap指向其前驱结点 */
while(cp != NULL){
i++;
if(i == pos){
break;
}
ap = cp;
cp = cp->next;
}
/* 单链表中没有第pos个结点 */
if(cp == NULL){
printf("pos值不正确，退出运行！ ");
exit(1);
}
/* 若pos等于1，则需要删除表头结点 */
if(pos == 1){
*hl = (*hl)->next; /* 或改为*hl = cp->next; */
}
/* 否则删除非表头结点，此时cp指向该结点，ap指向前驱结点 */
else{
ap->next = cp->next;
}
/* 暂存第pos个结点的值，以便返回 */
temp = cp->data;
free(cp); /* 回收被删除的第pos个结点 */
return temp; /* 返回在temp中暂存的第pos个结点的值 */
}
/* 16.从单链表中删除值为x的第一个结点，若删除成功则返回1,否则返回0 */
int deleteValueList(struct sNode* *hl, elemType x)
{
/* 初始化cp和ap指针，使cp指向表头结点，使ap为空 */
struct sNode *cp = *hl;
struct sNode *ap = NULL;
/* 从单链表中查找值为x的结点，找到后由cp指向该结点，由ap指向其前驱结点 */
while(cp !
= NULL){
if(cp->data == x){
break;
}
ap = cp;
cp = cp->next;
}
/* 若查找失败，即该单链表中不存在值为x的结点，则返回0 */
if(cp == NULL){
return 0;
}
/* 如果删除的是表头或非表头结点则分别进行处理 */
if(ap == NULL){
*hl = (*hl)->next; /* 或改为*hl= cp->next */
}else{
ap->next = cp->next;
}
free(cp); /* 回收被删除的结点 */
return 1; /* 返回1表示删除成功 */
}
/************************************************************************/
int main(int argc, char* argv[])
{
int a[NN];
int i;
struct sNode *p, *h, *s;
srand(time(NULL));
initList(&p);
for(i = 0; i < NN; i++){
a[i] = rand() & MM;
}
printf("随机数序列：");
for(i = 0; i < NN; i++){
printf("%5d", a[i]);
}
printf(" ");
printf("随机数逆序：");
for(i = 0; i < NN; i++){
insertFirstList(&p, a[i]);
}
traverseList(p);
printf("单链表长度：%5d ", sizeList(p));
for(h = p; h != NULL; h = h->next){
while(deleteValueList(&(h->next), h->data)){
;
}
}
printf("去除重复数：");
traverseList(p);
printf("单链表长度：%5d ", sizeList(p));
h = NULL;
for(s = p; s != NULL; s = s->next){
insertOrderList(&h, s->data);
}
printf("有序表序列：");
traverseList(h);
clearList(&p);
system("pause");
return 0;
}
