malloc 源码

最新推荐文章于 2024-10-04 19:08:50 发布

缘起性本空

最新推荐文章于 2024-10-04 19:08:50 发布

阅读量793

点赞数

分类专栏： C编程

C编程专栏收录该内容

78 篇文章 0 订阅

订阅专栏

 
   两个函数取自UNIX 版本6 malloc.c文件，一个为malloc函数，一个为mfree函数  
/*map数组是一个空闲资源列表，其中每个存储区由其长度和相对地址定义*/  
       struct map   
 {  
         char *m_size;  
         char *m_addr;  
 };  
 /* ---------------------------       */  
   
 /* 
  * Allocate size units from the given 
  * map. Return the base of the allocated 
  * space. 
  * Algorithm is first fit. 
  */  
 malloc(mp, size)  
 struct map *mp;  
 {  
         register int a;  
         register struct map *bp;  
   
         for (bp = mp; bp->m_size; bp++) { /*搜索map数组，直到到达map列表尾部，或者搜索到一个长度满足请求的空闲空间*/  
                 if (bp->m_size >= size) { /*该空闲块满足请求*/  
                         a = bp->m_addr;   /*记录该区首地址*/  
                         bp->m_addr =+ size; /*空闲块地址首端大小为size块被分配，因此首地址前移size*/  
                         if ((bp->m_size =- size) == 0) /*分配的空闲块大小刚好等于请求空间的大小*/  
                                 do {    /*将该空间块在map中的后继记录前移*/  
                                         bp++;  
                                         (bp-1)->m_addr = bp->m_addr;  
                                 } while ((bp-1)->m_size = bp->m_size);  
                         return(a);  
                 }  
         }  
         return(0);  
 }  
 /* ---------------------------       */  
   
 /* 
  * Free the previously allocated space aa 
  * of size units into the specified map. 
  * Sort aa into map and combine on 
  * one or both ends if possible. 
  */  
   /*将一个大小为size，起始地址为aa的存储区还给map*/  
 mfree(mp, size, aa)  
 struct map *mp;  
 {  
         register struct map *bp;  
         register int t;  
         register int a;  
   
         a = aa;  
         for (bp = mp; bp->m_addr<=a && bp->m_size!=0; bp++); /*搜索map，直到找到map中起始地址小于释放空间地址的记录*/  
         if (bp>mp && (bp-1)->m_addr+(bp-1)->m_size == a) { /*释放空间和前一空间连续*/  
                 (bp-1)->m_size =+ size; /*map中前一元素的大小增加被释放空间的大小*/  
                 if (a+size == bp->m_addr) { /*释放的存储区是否与map中下一个区块相邻*/  
                         (bp-1)->m_size =+ bp->m_size; /*合并被释放块和后一块存储区*/  
                         while (bp->m_size) { /*前移余下的存储区*/  
                                 bp++;  
                                 (bp-1)->m_addr = bp->m_addr;  
                                 (bp-1)->m_size = bp->m_size;  
                         }  
                 }  
         } else { /*不与前一空间连续*/  
                 if (a+size == bp->m_addr && bp->m_size) { /*是否与后一空间连续*/  
                         bp->m_addr =- size;  
                         bp->m_size =+ size;  
                 } else if (size) do { /*释放空间大小不为0，在map中加入新记录，后移map中余下的空间记录*/  
                         t = bp->m_addr;  
                         bp->m_addr = a;  
                         a = t;  
                         t = bp->m_size;  
                         bp->m_size = size;  
                         bp++;  
                 } while (size = t);  
         }  
 }  
 /* ---------------------------       */  
 
 