#include<stdio.h>
#include<stdlib.h>
#define n 5 /*假定系统允许的最大作业为，假定模拟实验中n值为10*/
#define m 5 /*假定系统允许的空闲区表最大为m，假定模拟实验中m值为10*/
#define minisize 100
struct
{
float address; /*已分分区起始地址*/
float length; /*已分分区长度，单位为字节*/
int flag; /*已分配区表登记栏标志，用"0"表示空栏目*/
}used_table[n]; /*已分配区表*/
struct
{
float address; /*空闲区起始地址*/
float length; /*空闲区长度，单位为字节*/
int flag; /*空闲区表登记栏标志，用"0"表示空栏目，用"1"表示未分配*/
}free_table[m]; /*空闲区表*/
int allocate(char J,float xk) /*采用最优分配算法分配xk大小的空间*/
{
int i,k;
float ad;
k=-1;
for(i=0;i<m;i++) /*寻找空间大于xk的最小空闲区登记项k*/
if(free_table[i].length>=xk&&free_table[i].flag==1)
if(k==-1||free_table[i].length<free_table[k].length)
k=i;
if(k==-1)/*未找到可用空闲区，返回*/
{
printf("无可用空闲区\n");
return;
}
if(free_table[k].length-xk<=minisize)
{
free_table[k].flag=0;
ad=free_table[k].address;
xk=free_table[k].length;
}
else
{
free_table[k].length=free_table[k].length-xk;
ad=free_table[k].address+free_table[k].length;
}
i=0;
while(used_table[i].flag!=0&&i<n)
i++;
if(i>=n)
{
printf("无表目填写已分分区，错误\n");
if(free_table[k].flag==0)
free_table[k].flag=1;
else
{
free_table[k].length=free_table[k].length+xk;
return;
}
}
else
{
used_table[i].address=ad;
used_table[i].length=xk;
used_table[i].flag=J;
}
return;
}
int reclaim(char J) /*回收作业名为J的作业所占主存空间*/
{
int i,k,j,s,t;
float S,L;
s=0;
while((used_table[s].flag!=J||used_table[s].flag==0)&&s<n)
s++;
if(s>=n)/*在已分配表中找不到名字为J的作业*/
{
printf("找不到该作业\n");
return;
}
used_table[s].flag=0;
S=used_table[s].address;
L=used_table[s].length;
j=-1;k=-1;i=0;
while(i<m&&(j==-1||k==-1))
{
if(free_table[i].flag==1)
{
if(free_table[i].address+free_table[i].length==S)k=i;/*找到上邻*/
if(free_table[i].address==S+L)j=i;/*找到下邻*/
}
i++;
}
if(k!=-1)
if(j!=-1)
{
free_table[k].length=free_table[j].length+free_table[k].length+L;
free_table[j].flag=0;
}
else
free_table[k].length=free_table[k].length+L;
else
if(j!=-1)
{
free_table[j].address=S;
free_table[j].length=free_table[j].length+L;
}
else
{
t=0;
while(free_table[t].flag==1&&t<m)
t++;
if(t>=m)/*空闲区表满,回收空间失败,将已分配表复原*/
{
printf("主存空闲表没有空间,回收空间失败\n");
used_table[s].flag=J;
return;
}
free_table[t].address=S;
free_table[t].length=L;
free_table[t].flag=1;
}
return;
}
main( )
{
int i,a;
float xk;
char J;
free_table[0].address=110;
free_table[0].length=110;
free_table[0].flag=1;
for(i=1;i<m;i++)
free_table[i].flag=0;
for(i=0;i<n;i++)
used_table[i].flag=0;
printf("* *\n");
printf("* 选择功能项 *\n");
printf("* 0-退出,1-分配主存,2-回收主存,3-显示主存 *\n");
printf("* *\n");
printf("*********************************************\n");
while(1)
{ printf("选择功能项:");
scanf("%d",&a);
switch(a)
{
case 0: exit(0); /*a=0程序结束*/
case 1: /*a=1分配主存空间*/
printf("输入作业名和作业所需长度: ");
scanf("%*c%c%f",&J,&xk);
allocate(J,xk);/*分配主存空间*/
break;
case 2: /*a=2回收主存空间*/
printf("输入要回收分区的作业名:");
scanf("%*c%c",&J);
reclaim(J);/*回收主存空间*/
break;
case 3: /*a=3显示主存情况*/
printf("输出空闲区表：\n起始地址 分区长度 标志\n");
for(i=0;i<m;i++)
printf("%6.0f%9.0f%6d\n",free_table[i].address,free_table[i].length, free_table[i].flag);
printf(" 按任意键,输出已分配区表\n");
printf(" 输出已分配区表：\n起始地址 分区长度 标志\n");
for(i=0;i<n;i++)
if(used_table[i].flag!=0)
printf("%6.0f%9.0f%6c\n",used_table[i].address,used_table[i].length, used_table[i].flag);
else
printf("%6.0f%9.0f%6d\n",used_table[i].address,used_table[i].length, used_table[i].flag);
break;
default:printf("没有该选项\n");
}
}
}