数据结构源码笔记（C语言）：置换-选择算法

最新推荐文章于 2024-09-12 10:06:46 发布

半个冯博士

最新推荐文章于 2024-09-12 10:06:46 发布

阅读量1.5k

点赞数

分类专栏：数据结构源码笔记（C语言）文章标签：数据结构算法 c语言排序算法选择置换算法

本文链接：https://blog.csdn.net/cauchy7203/article/details/107833030

版权

数据结构源码笔记（C语言）专栏收录该内容

40 篇文章 45 订阅

订阅专栏

//实现置换-选择算法

#include<stdio.h>
#include<malloc.h>
#include<string.h>
#include<stdlib.h>


#define MAXSIZE 20

typedef int InfoType;//定义其他数据项的类型
typedef int KeyType; //定义关键字类型为整型




struct RedType //记录类型
{
	KeyType key;//关键字项
	InfoType otherinfo;//其他数据项，具体类型在主程序中定义
};

#define MAXKEY 32767//最大关键字值
#define RUNEND_SYMBOL 32767//段结束标记
#define w 5//内存工作区可容纳的记录个数
#define M 6//设输出M个数据换行
#define N 18//设大文件有N个数据

typedef int LoserTree[w];//败者树是完全二叉树且不含叶子，可采用顺序存储结构
typedef struct
{
	RedType rec;//记录
	KeyType key;//从记录中抽取的关键字
	int rnum;//所属归并段的段号
}RedNode,WorkArea[w];//内存工作区，容量为W

void Select_MiniMax(LoserTree ls,WorkArea wa,int q)
{// 从wa[q]起到败者树的根比较选择MINIMAX记录，并由q指示它所在的归并段
	int p,s,t;
	for(t=(w+q)/2,p=ls[t];t>0;t=t/2,p=ls[t])
		if(wa[p].rnum<wa[q].rnum||wa[p].rnum==wa[q].rnum && wa[p].key<wa[q].key)
		{
			s=q;
			q=ls[t];//q指示新的胜利者
			ls[t]=s;
		}
		ls[0]=q;
}

void Construct_Loser(LoserTree ls,WorkArea wa,FILE *fi)
{//输入w个记录到内存工作区wa，建得败者树ls，选出关键字最小的记录并由s指示其在wa中的位置
	int i;
	for(i=0;i<w;++i)
		wa[i].rnum=wa[i].key=ls[i]=0;//工作区初始化
	for(i=w-1;i>=0;--i)
	{
		fread(&wa[i].rec,sizeof(RedType),1,fi);//输入一个记录
		wa[i].key=wa[i].rec.key;//提取关键字
		wa[i].rnum=1;//其段号为1
		Select_MiniMax(ls,wa,i);//调整败者
	}
}

void get_run(LoserTree ls,WorkArea wa,int rc,int &rmax,FILE *fi,FILE *fo)
{//求得一个初始归并段，fi为输入文件指出，fo为输出文件指针
	int q;
	KeyType minimax;
	while(wa[ls[0]].rnum==rc)//选的MINIMAX记录属当前段时
	{
		q=ls[0];//去指示MINIMAX记录在wa中的位置
		minimax=wa[q].key;
		fwrite(&wa[q].rec,sizeof(RedType),1,fo);//将刚选得的MINIMAX记录写入输出文件
		fread(&wa[q].rec,sizeof(RedType),1,fi);//从输入文件读入下一记录
		if(feof(fi))
		{
			wa[q].rnum=rmax+1;//输入文件结束，虚设记录（属rmax+1段）
			wa[q].key=MAXKEY;
		}
		else//输入文件非空时
		{
			wa[q].key=wa[q].rec.key;//提取关键字
			if(wa[q].key<minimax)
			{
				rmax=rc+1;//新读入的记录输入下一段
				wa[q].rnum=rmax;
			}
			else//新读入的记录属当前段
				wa[q].rnum=rc;
		}
		Select_MiniMax(ls,wa,q);//选择新的MINIMAX记录
	}
}

void Replace_Selection(LoserTree ls,WorkArea wa,FILE *fi,FILE *fo)
{//在败者树ls和内存工作区wa上用置换一选择排序求初始归并段，fi输入文件（只读文件）
	//fo为输出文件( 只写文件）指针，两个文件均已打开
	int rc,rmax;
	RedType j;
	j.key=RUNEND_SYMBOL;
	Construct_Loser(ls,wa,fi);//初建败者树
	rc=rmax=1;//rc指示当前生产的初始归并段的段号，rmax指示wa中关键字所属初始归并段的最大段号
	while(rc<=rmax)//rc=rmax+1  标志输入文件的置换-选择排序已完成
	{
		get_run(ls,wa,rc,rmax,fi,fo);//求得一个初始归并段
		j.otherinfo=rc;
		fwrite(&j,sizeof(RedType),1,fo);//将段结束标志写入输出文件
		rc=wa[ls[0]].rnum;//设置下一段的段号
	}
}

void print(RedType t)//输出t记录
{
	if(t.key==RUNEND_SYMBOL)
		printf("(%3s,%2d)  ","-",t.otherinfo);
	else
		printf("(%3d,%2d)  ",t.key,t.otherinfo);
}

int main()
{
	RedType b,a[N]={{15,1},{4,2},{97,3},{64,4},{17,5},{32,6},{108,7},
	{44,8},{76,9},{9,10},{39,11},{82,12},{56,13},{31,14},{80,15},{73,16},{255,17},{68,18}};
	FILE *fi,*fo;
	LoserTree ls;
	WorkArea wa;
	KeyType tmp;
	int i,k,j=RUNEND_SYMBOL,rno=1;
	char s[3],fname[4];
	fo=fopen("ori","wb");//以写的方式打开大文件ori
	fwrite(a,sizeof(RedType),N,fo);//将数组a写入大文件ori
	fclose(fo);
	fi=fopen("ori","rb");//以读的方式重新打开大文件ori
	printf("\n大文件的记录为:\n\t");
	for(i=1;i<=N;i++)
	{
		fread(&b,sizeof(RedType),1,fi);//依次将大文件ori的数据读入b
		print(b);//输出b的内容
		if(i%M==0)
			printf("\n\t");
	}
	printf("\n");
	rewind(fi);//使fi的指针重新返回大文件ori的起始位置，
	           //以便重新读入内存，产生有序的子文件
	fo=fopen("out","wb");//以写的方式打开初始归并段文件out
	Replace_Selection(ls,wa,fi,fo);
	fclose(fo);
	fclose(fi);
	fi=fopen("out","rb");//以读的方式重新打开初始归并段文件out
	printf("初始归并段文件的记录如下:\n\n");
	printf("归并段%d:",rno);
	i=1;tmp=0;
	do
	{
		k=fread(&b,sizeof(RedType),1,fi);//依次将大文件out的数据读入b
		if(k==1)
		{
			print(b);//输出b的内容
			if(i++%M==0)
				printf("\n\t");
			if(b.key<tmp)
			{
				rno++;
				printf("\n归并段%d:",rno);
			}
			tmp=b.key;
		}
	}while(k==1);
	printf("\n");
	rewind(fi);//使fi的指针重新返回大文件ori的起始位置，以便重新读入内存，产生有序的子文件

	k=0;
	while(!feof(fi))//按段输出初始归并段文件out
	{
		itoa(k,s,10);//依次生成文件f0，f1，........
		strcpy(fname,"f");
		strcat(fname,s);
		fo=fopen(fname,"wb");//依次以写的方式打开文件f0,f1.... 
		do
		{
			i=fread(&b,sizeof(RedType),1,fi);
			if(i==1)//fread()调用成功
			{
				fwrite(&b,sizeof(RedType),1,fo);//将b写入文件f0,f1,......
				if(b.key==j)//1个归并段结束
				{
					k++;
		     		fclose(fo);
					break;
				}
			}
		}while(i==1);
	}
	fclose(fi);
	printf("\n共产生%d个初始归并段文件\n\n",k);
	return 0;
}