//文件名:algo2-4.cpp
#include <stdio.h>
#include <malloc.h>
typedef char ElemType;
typedef struct LNode		//定義單鏈表結(jié)點(diǎn)類(lèi)型
{
	ElemType data;
    struct LNode *next;
} LinkList;
void InitList(LinkList *&L)
{
	L=(LinkList *)malloc(sizeof(LinkList));	//創(chuàng)建頭結(jié)點(diǎn)
	L->next=L;
}
void DestroyList(LinkList *&L)
{
	LinkList *p=L,*q=p->next;
	while (q!=L)
	{
		free(p);
		p=q;
		q=p->next;
	}
	free(p);
}
int ListEmpty(LinkList *L)
{
	return(L->next==L);
}
int ListLength(LinkList *L)
{
	LinkList *p=L;int i=0;
	while (p->next!=L)
	{
		i++;
		p=p->next;
	}
	return(i);
}
void DispList(LinkList *L)
{
	LinkList *p=L->next;
	while (p!=L)
	{
		printf("%c",p->data);
		p=p->next;
	}
	printf("\n");
}
int GetElem(LinkList *L,int i,ElemType &e)
{
	int j=0;
	LinkList *p;
	if (L->next!=L)		//單鏈表不為空表時(shí)
	{
		if (i==1)
		{
			e=L->next->data;
			return 1;
		}
		else			//i不為1時(shí)
		{
			p=L->next;
			while (j<i-1 && p!=L)
			{
				j++;
				p=p->next;
			}
			if (p==L)
				return 0;
			else
			{
				e=p->data;
				return 1;
			}
		}
	}
	else				//單鏈表為空表時(shí)
		return 0;
}
int LocateElem(LinkList *L,ElemType e)
{
	LinkList *p=L->next;
	int n=1;
	while (p!=L && p->data!=e)
	{
		p=p->next;
		n++;
	}
	if (p==L)
		return(0);
	else
		return(n);
}
int ListInsert(LinkList *&L,int i,ElemType e)
{
	int j=0;
	LinkList *p=L,*s;
	if (p->next==L || i==1)		//原單鏈表為空表或i==1時(shí)
	{
		s=(LinkList *)malloc(sizeof(LinkList));	//創(chuàng)建新結(jié)點(diǎn)*s
		s->data=e;								
		s->next=p->next;		//將*s插入到*p之后
		p->next=s;
		return 1;
	}
	else
	{
		p=L->next;
		while (j<i-2 && p!=L)
		{
			j++;
			p=p->next;
		}
		if (p==L)				//未找到第i-1個(gè)結(jié)點(diǎn)
			return 0;
		else					//找到第i-1個(gè)結(jié)點(diǎn)*p
		{
			s=(LinkList *)malloc(sizeof(LinkList));	//創(chuàng)建新結(jié)點(diǎn)*s
			s->data=e;								
			s->next=p->next;						//將*s插入到*p之后
			p->next=s;
			return 1;
		}
	}
}
int ListDelete(LinkList *&L,int i,ElemType &e)
{
	int j=0;
	LinkList *p=L,*q;
	if (p->next!=L)					//原單鏈表不為空表時(shí)
	{
		if (i==1)					//i==1時(shí)
		{
			q=L->next;				//刪除第1個(gè)結(jié)點(diǎn)
			e=q->data;
			L->next=q->next;
			free(q);
			return 1;
		}
		else						//i不為1時(shí)
		{
			p=L->next;
			while (j<i-2 && p!=L)
			{
				j++;
				p=p->next;
			}
			if (p==L)				//未找到第i-1個(gè)結(jié)點(diǎn)
				return 0;
			else					//找到第i-1個(gè)結(jié)點(diǎn)*p
			{
				q=p->next;			//q指向要?jiǎng)h除的結(jié)點(diǎn)
				e=q->data;
				p->next=q->next;	//從單鏈表中刪除*q結(jié)點(diǎn)
				free(q);			//釋放*q結(jié)點(diǎn)
				return 1;
			}
		}
	}
	else return 0;
}