实验二：内存分配回收（带注释）.c

内存分配与回收程序

#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]; /*空闲区表*/ 


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; 
}

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=1024; 
  free_table[0].length=1024; 
  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("*               选择功能项                  *\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("输入作业名J和作业所需长度xk: "); 
           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"); 
           getch(); 
           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"); 
	}
  }
}