码迷,mamicode.com
首页 > 其他好文 > 详细

_DataStructure_C_Impl:广义表的扩展线性链表存储

时间:2015-08-08 18:18:27      阅读:122      评论:0      收藏:0      [点我收藏+]

标签:数据结构   c语言   

#include<stdio.h>
#include<stdlib.h>
#include<string.h>
#include"SeqString.h"
typedef char AtomType;
typedef enum{ATOM,LIST} ElemTag;//ATOM=0,表示原子,LIST=1,表示子表

typedef struct GLNode{
	ElemTag tag;	//标志位tag用于区分元素是原子还是子表
	union{
		AtomType atom;	//AtomType是原子结点的值域,用户自己定义类型
		struct GLNode *hp;		//hp指向表头,tp指向表尾
	}ptr;
	struct GLNode *tp;
}*GList,GLNodeList;

//求广义表的表头结点操作
GLNodeList* GetHead(GList L){
	GLNodeList *p;
	p=L->ptr.hp; 					/*将广义表的表头指针赋值给p*/
	if(!p) 							/*如果广义表为空表,则返回1*/
	{
		printf("该广义表是空表!");
		return NULL;
	}
	else if(p->tag==LIST)
		printf("该广义表的表头是非空的子表。");
	else
		printf("该广义表的表头是原子。");
	return p;
}
//求广义表的表尾操作
GLNodeList *GetTail(GList L){
	GLNodeList *p,*tail;
	p=L->ptr.hp;
	if(!p) 							/*如果广义表为空表,则返回1*/
	{
		printf("该广义表是空表!");
		return NULL;
	}
	tail=(GLNodeList*)malloc(sizeof(GLNodeList));	/*生成tail结点*/
	tail->tag=LIST; 						/*将标志域置为LIST*/
	tail->ptr.hp=p->tp; 					/*将tail的表头指针域指向广义表的表尾*/
	tail->tp=NULL; 						/*将tail的表尾指针域置为空*/
	return tail; 							/*返回指向广义表表尾结点的指针*/
}
//求广义表的长度操作
int GListLength(GList L){
	int length=0; 						/*初始化化广义表的长度*/
	GLNodeList *p=L->ptr.hp;
	while(p) 							/*如果广义表非空,则将p指向表尾指针,统计表的长度*/
	{
		length++;
		p=p->tp;
	}
	return length; 
}
//求广义表的深度操作
int GListDepth(GList L){
	int max,depth;
	GLNode *p;
	if(L->tag==LIST&&L->ptr.hp==NULL) 	/*如果广义表非空,则返回1*/
		return 1;
	if(L->tag==ATOM) 					/*如果广义表是原子,则返回0*/
		return 0;
	p=L->ptr.hp;
	for(max=0;p;p=p->tp) 				/*逐层处理广义表*/
	{
		depth=GListDepth(p);
		if(max<depth)
			max=depth;
	}
	return max+1;
}
//广义表的复制操作。由广义表L复制得到广义表T
void CopyList(GList *T,GList L){
	if(!L) 							/*如果广义表为空,则T为空表*/
		*T=NULL;
	else
	{
		*T=(GList)malloc(sizeof(GLNodeList)); 	/*表L不空,为T建立一个表结点*/
		if(*T==NULL)
			exit(-1);
		(*T)->tag=L->tag;
		if(L->tag==ATOM) 						/*复制原子*/
			(*T)->ptr.atom=L->ptr.atom;
		else
			CopyList(&((*T)->ptr.hp),L->ptr.hp);/*递归复制表头*/
		if(L->tp==NULL)
			(*T)->tp=L->tp;
		else
			CopyList(&((*T)->tp),L->tp);		/*递归复制表尾*/
	}
}
//将串Str分离成两个部分,HeadStr为第一个逗号之前的子串,Str为逗号后的子串
void DistributeString(SeqString *Str,SeqString *HeadStr){
	int len,i,k;
	SeqString Ch,Ch1,Ch2,Ch3;
	len=StrLength(*Str);	//len为Str的长度
	StrAssign(&Ch1,",");	//将字符','、'('和')'分别赋给Ch1,Ch2和Ch3
	StrAssign(&Ch2,"("); 
	StrAssign(&Ch3,")"); 
	SubString(&Ch,*Str,1,1);	//Ch保存Str的第一个字符
	for(i=1,k=0;i<=len&&StrCompare(Ch,Ch1)||k!=0;i++) /*搜索Str最外层的第一个括号*/
	{ 
		SubString(&Ch,*Str,i,1);		/*取出Str的第一个字符*/
		if(!StrCompare(Ch,Ch2))			/*如果第一个字符是'(',则令k加1*/
			k++; 
		else if(!StrCompare(Ch,Ch3))	/*如果当前字符是')',则令k减去1*/
			k--; 
	}
	if(i<=len)							/*串Str中存在',',它是第i-1个字符*/
	{
		SubString(HeadStr,*Str,1,i-2);	/*HeadStr保存串Str','前的字符*/
		SubString(Str,*Str,i,len-i+1);	/*Str保存串Str','后的字符*/
	}
	else								/*串Str中不存在','*/
	{
		StrCopy(HeadStr,*Str);			/*将串Str的内容复制到串HeadStr*/
		StrClear(Str);					/*清空串Str*/
	}
}
//采用头尾链表创建广义表
void CreateList(GList *L,SeqString S){
	SeqString Sub,HeadSub,Empty;
	GList p,q;
	StrAssign(&Empty,"()"); 
	if(!(*L=(GList)malloc(sizeof(GLNodeList))))		/*为广义表生成一个结点*/
		exit(-1);
	if(!StrCompare(S,Empty))					/*如果输入的串是空串则创建一个空的广义表*/
	{
		(*L)->tag=LIST; 
		(*L)->ptr.hp=(*L)->tp=NULL;
	}
	else 
	{

		if(StrLength(S)==1)							/*广义表是原子,则将原子的值赋值给广义表结点*/
		{
			(*L)->tag=ATOM;
			(*L)->ptr.atom=S.str[0];
			(*L)->tp=NULL;
		}
		else										/*如果是子表*/
		{
			(*L)->tag=LIST;
			(*L)->tp=NULL;
			SubString(&Sub,S,2,StrLength(S)-2);		/*将S去除最外层的括号,然后赋值给Sub*/
			DistributeString(&Sub,&HeadSub);		/*将Sub分离出表头和表尾分别赋值给HeadSub和Sub*/
			CreateList(&((*L)->ptr.hp),HeadSub);	/*递归调用生成广义表*/
			p=(*L)->ptr.hp;
			while(!StrEmpty(Sub))					/*如果表尾不空,则生成结点p,并将尾指针域指向p*/
			{
				DistributeString(&Sub,&HeadSub);
				CreateList(&(p->tp),HeadSub);
				p=p->tp;	
			}

		}
	}
}
//输出广义表的元素
void PrintGList(GList L){
	if(L->tag == LIST)
	{
		printf("(");			/*如果子表存在,先输出左括号 */
		if(L->ptr.hp == NULL)	/*如果子表为空,则输出' '字符 */
			printf(" ");
		else					/*递归输出表头*/
			PrintGList(L->ptr.hp);
		printf(")");			/*在子表的最后输出右括号 */
	}
	else						/*如果是原子,则输出结点的值*/
		printf("%c", L->ptr.atom);
	if(L->tp != NULL)		
	{

		printf(", ");			/*输出逗号*/
		PrintGList(L->tp);		/*递归输出表尾*/
	}
}
//------------------------
void main(){
	GList L,T;
	SeqString S;
	int depth,length;
	StrAssign(&S,"(a,(),(a,(b,c)))");	/*将字符串赋值给串S*/
	CreateList(&L,S);				/*由串创建广义表L*/
	printf("输出广义表L中的元素:\n");
	PrintGList(L);					/*输出广义表中的元素*/
	length=GListLength(L);			/*求广义表的长度*/
	printf("\n广义表L的长度length=%2d\n",length);
	depth=GListDepth(L);			/*求广义表的深度*/
	printf("广义表L的深度depth=%2d\n",depth);
	CopyList(&T,L);
	printf("由广义表L复制得到广义表T.\n广义表T的元素为:\n");
	PrintGList(T);
	length=GListLength(T);			/*求广义表的长度*/
	printf("\n广义表T的长度length=%2d\n",length);
	depth=GListDepth(T);			/*求广义表的深度*/
	printf("广义表T的深度depth=%2d\n",depth);
	system("pause");
}


#pragma once
#include<stdio.h>
#include<stdlib.h>
#define MaxLength 60
typedef struct{
	char str[MaxLength];
	int length;
}SeqString;
//串的赋值操作
void StrAssign(SeqString *S,char cstr[]){
	int i;
	for(i=0;cstr[i]!='\0';i++)
		S->str[i]=cstr[i];	//将常量cstr中的字符赋值给串S
	S->length=i;
}
//判断串是否为空,串为空返回1,否则返回0
int StrEmpty(SeqString S){
	if(S.length==0)
		return 1;
	else
		return 0;
}
//求串的长度操作
int StrLength(SeqString S){
	return S.length;
}
//串的复制操作
void StrCopy(SeqString *T,SeqString S){
	int i;
	for(i=0;i<S.length;i++)	//将串S的字符赋值给串T
		T->str[i]=S.str[i];
	T->length=S.length;	//将串S的长度赋值给串T
}
//串的比较操作
int StrCompare(SeqString S,SeqString T){	//比较两个串中的字符
	int i;
	for(i=0;i<S.length&&i<T.length;i++){		//比较两个串中的字符
		if(S.str[i]!=T.str[i])		//如果出现字符不同,则返回两个字符的差值
			return (S.str[i]-T.str[i]);
	}
	return (S.length-T.length);	//如果比较完毕,返回两个串的长度的差值
}
//串的插入操作。在S中第pos个位置插入T分为三种情况
int StrInsert(SeqString *S,int pos,SeqString T){
	int i;
	if(pos<0||pos-1>S->length){	//插入位置不正确,返回0
		printf("插入位置不正确");
		return 0;
	}
	if(S->length+T.length<=MaxLength){	//第一种情况,插入子串后串长≤MaxLength,即子串T完整地插入到串S中
		for(i=S->length+T.length-1;i>=pos+T.length-1;i--)	//在插入子串T前,将S中pos后的字符向后移动len个位置
			S->str[i]=S->str[i-T.length];
		for(i=0;i<T.length;i++)	//将串插入到S中
			S->str[pos+i-1]=T.str[i];
		S->length=S->length+T.length;
		return 1;
	}else if(pos+T.length<=MaxLength){	//第二种情况,子串可以完全插入到S中,但是S中的字符将会被截掉
		for(i=MaxLength-1;i>T.length+pos-i;i--)		//将S中pos以后的字符整体移动到数组的最后
			S->str[i]=S->str[i-T.length];
		for(i=0;i<T.length;i++)		//将T插入到S中
			S->str[i+pos-1]=T.str[i];
		S->length=MaxLength;
		return 0;
	}else{		//第三种情况,子串T不能被完全插入到S中,T中将会有字符被舍弃
		for(i=0;i<MaxLength-pos;i++)	//将T直接插入到S中,插入之前不需要移动S中的字符
			S->str[i+pos-1]=T.str[i];
		S->length=MaxLength;
		return 0;
	}
}
//在串S中删除pos开始的len个字符
int StrDelete(SeqString *S,int pos,int len){
	int i;
	if(pos<0||len<0||pos+len-1>S->length){
		printf("删除位置不正确,参数len不合法");
		return 0;
	}else{
		for(i=pos+len;i<=S->length-1;i++)
			S->str[i-len]=S->str[i];
		S->length=S->length-len;
		return 1;
	}
}
//串的连接操作
int StrCat(SeqString *T,SeqString S){
	int i,flag;
	if(T->length+S.length<=MaxLength){
		for(i=T->length;i<T->length+S.length;i++)
			T->str[i]=S.str[i-T->length];
		T->length=T->length+S.length;
		flag=1;
	}else if(T->length<MaxLength){
		for(i=T->length;i<MaxLength;i++)
			T->str[i]=S.str[i-T->length];
		T->length=MaxLength;
		flag=0;
	}
	return flag;
}
//截取子串操作
int SubString(SeqString *Sub,SeqString S,int pos,int len){
	int i;
	if(pos<0||len<0||pos+len-1>S.length){
		printf("参数pos和len不合法");
		return 0;
	}else{
		for(i=0;i<len;i++)
			Sub->str[i]=S.str[i+pos-1];
		Sub->length=len;
		return 1;
	}
}
//串的定位操作
int StrIndex(SeqString S,int pos,SeqString T){
	int i,j;
	if(StrEmpty(T))
		return 0;
	i=pos;
	j=0;
	while(i<S.length&&j<T.length){
		if(S.str[i]==T.str[j]){
			i++;
			j++;
		}else{
			i=i-j+1;
			j=0;
		}
	}
	if(j>=T.length)
		return i-j+1;
	else 
		return 0;
}
//串的替换操作
int StrReplace(SeqString *S,SeqString T,SeqString V){
	//将S中所有的T替换为V
	int i;
	int flag;
	if(StrEmpty(T))
		return 0;
	i=0;
	do{
		i=StrIndex(*S,i,T);//找到T在S中的位置
		if(i){
			StrDelete(S,i,StrLength(T));	//删除找到的T
			flag=StrInsert(S,i,V);	//在i位置插入V
			if(!flag)
				return 0;
			i+=StrLength(V);
		}
	}while(i);
	return 1;
}
//串的清空操作
void StrClear(SeqString *S){
	S->length=0;
}
//===========
void StrPrint(SeqString S){
	int i;
	for(i=0;i<S.length;i++){
		printf("%c",S.str[i]);
	}
	printf("\n");
}

版权声明:本文为博主原创文章,未经博主允许不得转载|Copyright ©2011-2015,Supernatural, All Rights Reserved.

_DataStructure_C_Impl:广义表的扩展线性链表存储

标签:数据结构   c语言   

原文地址:http://blog.csdn.net/williamfan21c/article/details/47360535

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!