根据上下文代码补全代码

Question

#include <stdio.h>
#include <stdlib.h>
#define Free 0
#define Busy 1
#define OK 1
#define ERROR 0
#define MAX_length 640
typedef int Status;
int flag;

typedef struct freearea    //空闲区域 
{
    long size;       //大小 
    long address;    //首地址 
    long state;      //状态 
}ElemType;

typedef struct DuLNode        //空闲链表 
{
    ElemType data;
    struct DuLNode *prior;
    struct DuLNode *next;
}

DuLNode,*DuLinkList; //双向链表指针 
DuLinkList block_first,block_last;   //空闲链表头指针和尾指针 
Status alloc(int);     //分配存储空间选择函数 
Status freed(int);     //回收存储空间 
Status First_fit(int); //首次适应 
Status Best_fit(int);  //最佳适应 
Status Worst_fit(int); //最坏适应 
void show();           //显示分配结果 
Status Initblock();    //初始化空闲链表 

/*初始化空闲链表*/
Status Initblock()    //初始化 
{
    block_first=(DuLinkList)malloc(sizeof(DuLNode));  //头指针 
    block_last=(DuLinkList)malloc(sizeof(DuLNode));   //尾指针 
    block_first->prior=NULL;   //头指针无前驱 
    block_first->next=block_last;  //空链表 
    block_last->prior=block_first;
    block_last->next=NULL;
    block_last->data.address=0;  //空闲分区起始地址为0 
    block_last->data.size=MAX_length; //空闲分区大小（初始为整个可分配内存空间） 
    block_last->data.state=Free; //区域状态为空闲 
    return OK;
}
/*分配内存函数调用
  参数：ch 表示选择的分配算法 2为最佳，3为最坏，其余为首次 
*/
Status alloc(int ch)
{
    int request = 0;    //申请分配内存大小 
    printf("请输入需要分配的主存大小(单位:KB):");
    scanf("%d",&request);
    if(request<0 || request==0)
    {
        printf("分配大小不合适，请重试!\n");
        return ERROR;
    }

    if(ch==2)
    {
        if(Best_fit(request)==OK) printf("分配成功!\n");
        else printf("内存不足，分配失败!\n");
        return OK;
    }
    if(ch==3)
    {
        if(Worst_fit(request)==OK) printf("分配成功!\n");
        else printf("内存不足，分配失败!\n");
        return OK;
    }
    else
    {
         if(First_fit(request)==OK) printf("分配成功!\n");
        else printf("内存不足，分配失败!\n");
        return OK;
    }
}

/*首次适应算法
  参数：request表示申请存储大小（KB） 
*/
Status First_fit(int request)   
{   //创建申请存储链表信息块 
    DuLinkList temp=(DuLinkList)malloc(sizeof(DuLNode));
    temp->data.size=request;
    temp->data.state=Busy;
    //p为查找分配存储块 
    DuLNode *p=block_first->next;
    DuLNode *q=NULL;
    while(p)
    {
        if(p->data.state==Free && (p->data.size>=request))
        {  //查找空闲分区 
            if(q==NULL)
                q=p;
        }
        p=p->next;
    }    
    if(q==NULL) return ERROR;    
    p=block_first->next;
    while(p)
    {
        if(p->data.state==Free && p->data.size==request)
        {
           //待补全  当前存储块可分配 

           
        } else if(p->data.state==Free && p->data.size>request)
        {
            //待补全  分割当前存储块 （修改空闲链表，链入新空闲分区块） 

            }
        }
        p=p->next;
    }
    return OK;
}
/*最佳适应算法
  参数：request表示申请存储大小（KB） 
*/
Status Best_fit(int request)
{

    DuLinkList temp=(DuLinkList)malloc(sizeof(DuLNode));
    temp->data.size=request;
    temp->data.state=Busy;
    DuLNode *p=block_first->next;
    DuLNode *q=NULL;

    while(p)
    {
         if(p->data.state==Free && (p->data.size>=request))
         {
             //查找最小分区 
             if(q==NULL)
             {  //待补全

                q = p;
             }
             else if(q->data.size > p->data.size)
             {
                 //待补全

             }
         }
         p=p->next;
    }
    if(q==NULL) return ERROR;
    else if(q->data.size==request)
    {
        //待补全  如果当前空闲块等于申请大小直接分配 

    } else
    {
        //待补全 如果空闲块大于申请大小分割当前块，添加分配项 

    }    
}
/*最坏适应算法
  参数：request表示申请存储大小（KB）
*/
Status Worst_fit(int request)
{
    DuLinkList temp=(DuLinkList)malloc(sizeof(DuLNode));
    temp->data.size=request;
    temp->data.state=Busy;
    DuLNode *p=block_first->next;
    DuLNode *q=NULL;

    while(p)
    {
         if(p->data.state==Free && (p->data.size>=request))
         {  //查找最大空闲分区 
             if(q==NULL)
             {
                 //待补全

             }
             else if(q->data.size < p->data.size)
             {
                 //待补全

             }
         }
         p=p->next;
    }

    if(q==NULL) return ERROR;
    else if(q->data.size==request)
    {
        //待补全 

    }
    else
    {
        //待补全

    }
}
/* 回收存储空间 
   参数：flag为回收分区块号 
*/
Status freed(int flag)
{
    DuLNode *p=block_first->next,*q=NULL;
    //查找回收分区块号 
    for(int i=0; i < flag; i++)
        if(p!=NULL)
           p=p->next;
        else
            return ERROR;  //未找到回收分区号 
    //回收区域为空闲区域 
    if (p->data.state==Free)
    {
        printf("该块本为空闲\n");
        return ERROR;
    } 
    //释放存储区前后都为已分配区域   
    p->data.state=Free;
    //释放的是最后一个分区 
    if(p==block_last)  
    {   //空闲区只有一个分区 
        if(p->prior==block_first)
        {
            p->data.state=Free;
        }
        else
        {   //回收区域前为已分配区域 
            if(p->prior->data.state==Busy)
            {
                p->data.state=Free;
            }
            else  //回收区域前为空闲区域 
            {
                p->prior->data.size+=p->data.size;
                p->prior->next=p->next;
                p->next->prior=p->prior;
                p=p->prior;
            }
        }
        return OK;
    }
    //释放的是不是第1块内存且其前面的内存为空闲 
    if(p->prior!=block_first && p->prior->data.state==Free)
    {
         p->prior->data.size+=p->data.size;
         p->prior->next=p->next;
         p->next->prior=p->prior;
         p=p->prior;
         //后面内存是否也为空闲 
         if(p->next->data.state==Free) {
             q=p->next;
             p->data.size+=q->data.size;
             p->next=q->next;
             free(q);
         }
         return OK;
    }
    //释放内存为中间块且其后存储块空闲 
    if(p->next!=block_last && p->next->data.state==Free)
    {
         p->data.size+=p->next->data.size;
         p->next->next->prior=p;
         p->next=p->next->next;
         return OK;
    }
    //释放区域为倒数第2个区域 
    if(p->next==block_last && p->next->data.state==Free)
    {
         p->data.size+=p->next->data.size;
         p->next=NULL;
         return OK;
    }
    return OK; 
 }    

/*显示内存分配情况*/
 void show()
 {
     int flag=0;
     printf("\n主存分配情况:\n");
     printf("++++++++++++++++++++++++++++++++++++++++++\n\n");
     DuLNode *p=block_first->next;
     printf("分区号\t起始地址\t分区大小\t状态\n\n");
     while(p)
     {
         printf("  %d\t",flag++);
         printf(" %ld\t\t",p->data.address);
         printf(" %ldKB\t\t", p->data.size);
         if(p->data.state==Free) printf("空闲\n\n");
         else printf("已分配\n\n");
         p=p->next;
     }
     printf("++++++++++++++++++++++++++++++++++++++++++\n\n");
 }

 int main()
 {
     int ch;
     printf("请输入所使用的内存分配算法:\n");
     printf("(1)首次适应算法\n(2)最佳适应算法\n(3)最差适应算法\n");
     scanf("%d",&ch);
     while(ch<1||ch>3)
     {
        printf("输入错误，请重新输入所使用的内存分配算法:\n");
        scanf("%d",&ch);
     }
     Initblock();
     int choice;

     while(1)
     {
         show();
         printf("请输入您的操作:");
         printf("1:分配内存\n2:回收内存\n0:退出\n");

         scanf("%d",&choice);
         if(choice==1)alloc(ch);
         else if(choice==2)
         {
             int flag;
             printf("请输入您要释放的分区号:");
             scanf("%d",&flag);
             freed(flag);
         }
         else if(choice==0) break;
         else
         {
            printf("输入错误，请重试!\n");
            continue;
         }
     }  
 }           

Answer 1

引自免费微信小程序：皆我百晓生

在提供的代码基础上，我将完成First_fit、Best_fit、Worst_fit以及freed中的剩余部分。以下是完整的代码实现：

#include <stdio.h>
#include <stdlib.h>
#define Free 0
#define Busy 1
#define OK 1
#define ERROR 0
#define MAX_length 640
typedef int Status;
int flag;

typedef struct freearea    //空闲区域 
{
    long size;       //大小 
    long address;    //首地址 
    long state;      //状态 
}ElemType;

typedef struct DuLNode        //空闲链表 
{
    ElemType data;
    struct DuLNode *prior;
    struct DuLNode *next;
};

DuLNode* DuLinkList; //双向链表指针 
DuLinkList block_first,block_last;   //空闲链表头指针和尾指针 
Status alloc(int);     //分配存储空间选择函数 
Status freed(int);     //回收存储空间 
Status First_fit(int); //首次适应 
Status Best_fit(int);  //最佳适应 
Status Worst_fit(int); //最坏适应 
void show();           //显示分配结果 
Status Initblock();    //初始化空闲链表 

/*初始化空闲链表*/
Status Initblock()    //初始化 
{
    block_first=(DuLinkList)malloc(sizeof(DuLNode));  //头指针 
    block_last=(DuLinkList)malloc(sizeof(DuLNode));   //尾指针 
    block_first->prior=NULL;   //头指针无前驱 
    block_first->next=block_last;  //空链表 
    block_last->prior=block_first;
    block_last->next=NULL;
    block_last->data.address=0;  //空闲分区起始地址为0 
    block_last->data.size=MAX_length; //空闲分区大小（初始为整个可分配内存空间） 
    block_last->data.state=Free; //区域状态为空闲 
    return OK;
}
/*分配内存函数调用
  参数：ch 表示选择的分配算法 2为最佳，3为最坏，其余为首次 
*/
Status alloc(int ch)
{
    int request = 0;    //申请分配内存大小 
    printf("请输入需要分配的主存大小(单位:KB):");
    scanf("%d",&request);
    if(request<0 || request==0)
    {
        printf("分配大小不合适，请重试!\n");
        return ERROR;
    }

    if(ch==2)
    {
        if(Best_fit(request)==OK) printf("分配成功!\n");
        else printf("内存不足，分配失败!\n");
        return OK;
    }
    if(ch==3)
    {
        if(Worst_fit(request)==OK) printf("分配成功!\n");
        else printf("内存不足，分配失败!\n");
        return OK;
    }
    else
    {
        if(First_fit(request)==OK) printf("分配成功!\n");
        else printf("内存不足，分配失败!\n");
        return OK;
    }
}

/*首次适应算法
  参数：request表示申请存储大小（KB） 
*/
Status First_fit(int request)   
{
    DuLinkList temp=(DuLinkList)malloc(sizeof(DuLNode));
    temp->data.size=request;
    temp->data.state=Busy;
    DuLNode *p=block_first->next;
    DuLNode *q=NULL;
    while(p)
    {
        if(p->data.state==Free && (p->data.size>=request))
        {  //查找空闲分区 
            if(q==NULL)
                q=p;
        }
        p=p->next;
    }    
    if(q==NULL) return ERROR;    
    p=block_first->next;
    while(p)
    {
        if(p->data.state==Free && p->data.size==request)
        {
            //当前存储块可分配
            p->data.state=Busy;
            temp->data.address = p->data.address;
            return OK;
        } else if(p->data.state==Free && p->data.size>request)
        {
            //分割当前存储块 （修改空闲链表，链入新空闲分区块）
            long new_address = p->data.address + request;
            long new_size = p->data.size - request;
            p->data.size = request;
            temp->data.address = new_address;
            temp->data.size = new_size;
            DuLNode* newNode = (DuLNode*)malloc(sizeof(DuLNode));
            newNode->data.size = new_size;
            newNode->data.address = new_address;
            newNode->data.state = Free;
            newNode->next = p->next;
            newNode->prior = p;
            p->next->prior = newNode;
            p->next = newNode;
            return OK;
        }
        p=p->next;
    }
    return OK;
}
/*最佳适应算法
  参数：request表示申请存储大小（KB） 
*/
Status Best_fit(int request)
{
    DuLinkList temp=(DuLinkList)malloc(sizeof(DuLNode));
    temp->data.size=request;
    temp->data.state=Busy;
    DuLNode *p=block_first->next;
    DuLNode *q=NULL;

    while(p)
    {
         if(p->data.state==Free && (p->data.size>=request))
         {
             //查找最小分区 
             if(q==NULL)
             {  //找到第一个符合条件的空闲块
                q = p;
             }
             else if(q->data.size > p->data.size)
             {
                 //更新最小分区
                 q = p;
             }
         }
         p=p->next;
    }
    if(q==NULL) return ERROR;
    else if(q->data.size==request)
    {
        //当前空闲块等于申请大小直接分配
        q->data.state=Busy;
        temp->data.address = q->data.address;
        return OK;
    } else
    {
        //空闲块大于申请大小分割当前块，添加分配项
        long new_address = q->data.address + request;
        long new_size = q->data.size - request;
        q->data.size = request;
        temp->data.address = new_address;
        temp->data.size = new_size;
        DuLNode* newNode = (DuLNode*)malloc(sizeof(DuLNode));
        newNode->data.size = new_size;
        newNode->data.address = new_address;
        newNode->data.state = Free;
        newNode->next = q->next;
        newNode->prior = q;
        q->next->prior = newNode;
        q->next = newNode;
        return OK;
    }    
}
/*最坏适应算法
  参数：request表示申请存储大小（KB）
*/
Status Worst_fit(int request)
{
    DuLinkList temp=(DuLinkList)malloc(sizeof(DuLNode));
    temp->data.size=request;
    temp->data.state=Busy;
    DuLNode *p=block_first->next;
    DuLNode *q=NULL;

    while(p)
    {
         if(p->data.state==Free && (p->data.size>=request))
         {  //查找最大空闲分区 
             if(q==NULL)
             {
                 //找到第一个符合条件的空闲块
                 q = p;
             }
             else if(q->data.size < p->data.size)
             {
                 //更新最大分区
                 q = p;
             }
         }
         p=p->next;
    }

    if(q==NULL) return ERROR;
    else if(q->data.size==request)
    {
        //直接分配
        q->data.state=Busy;
        temp->data.address = q->data.address;
        return OK;
    }
    else
    {
        //分割当前块
        long new_address = q->data.address + request;
        long new_size = q->data.size - request;
        q->data.size = request;
        temp->data.address = new_address;
        temp->data.size = new_size;
        DuLNode* newNode = (DuLNode*)malloc(sizeof(DuLNode));
        newNode->data.size = new_size;
        newNode->data.address = new_address;
        newNode->data.state = Free;
        newNode->next = q->next;
        newNode->prior = q;
        q->next->prior = newNode;
        q->next = newNode;
        return OK;
    }
}
/* 回收存储空间 
   参数：flag为回收分区块号 
*/
Status freed(int flag)
{
    DuLNode *p=block_first->next,*q=NULL;
    //查找回收分区块号 
    for(int i=0; i < flag; i++)
        if(p!=NULL)
           p=p->next;
        else
            return ERROR;  //未找到回收分区号 
    //回收区域为空闲区域 
    if (p->data.state==Free)
    {
        printf("该块本为空闲\n");
        return ERROR;
    } 
    //释放存储区前后都为已分配区域   
    p->data.state=Free;
    //释放的是最后一个分区 
    if(p==block_last)  
    {   //空闲区只有一个分区 
        if(p->prior==block_first)
        {
            p->data.state=