接着上面讲,使用内存池分配内存 我们介绍一种比较简单的办法来实现:分块式内存管理。下面我们介绍一下该方法 的实现原理,如图 43.1.1 所示: 从上图可以看出,分块式内存管理由内存池和内存管理表两部分组成。内存池被等分为 n块,对应的内存管理表,大小也为 n,内存管理表的每一个项对应内存池的一块内存。内存管理表的项值代表的意义为:当该项值为 0 的时候,代表对应的内存块未被占用,当该项值非零的时候,代表该项对应的内存块已经被占用,其数值则代表被连续占用的内存块数。比如某项值为 10,那么说明包括本项对应的内存块在内,总共分配了 10 个内存块给外部的某个指针。
内寸分配方向如图所示,是从顶到底的分配方向。即首先从最末端开始找空内存。当内存管理刚初始化的时候,内存表全部清零,表示没有任何内存块被占用。
1、分配原理
当指针 p 调用 malloc 申请内存的时候,先判断 p 要分配的内存块数(m),然后从第 n 项开始,向下查找,直到找到 m 块连续的空内存块(即对应内存管理表项为 0),然后将这 m 个内存管理表项的值都设置为 m(标记被占用),最后,把最后的这个空内存块的地址返回指针 p,完成一次分配。注意,如果当内存不够的时候(找到最后也没找到连续的 m 块空闲内存),则返回 NULL 给 p,表示分配失败。
2、释放原理
当 p 申请的内存用完,需要释放的时候,调用 free 函数实现。free 函数先判断 p 指向的内存地址所对应的内存块,然后找到对应的内存管理表项目,得到 p 所占用的内存块数目 m(内存管理表项目的值就是所分配内存块的数目),将这 m 个内存管理表项目的值都清零,标记释放,完成一次内存释放。
3、代码
malloc.c
#include "malloc.h"
__align(32) u8 mem1base[MEM1_MAX_SIZE];
__align(32) u8 mem2base[MEM2_MAX_SIZE] __attribute__((at(0XC01F4000)));
__align(32) u8 mem3base[MEM3_MAX_SIZE] __attribute__((at(0X10000000)));
u32 mem1mapbase[MEM1_ALLOC_TABLE_SIZE];
u32 mem2mapbase[MEM2_ALLOC_TABLE_SIZE] __attribute__((at(0XC01F4000+MEM2_MAX_SIZE)));
u32 mem3mapbase[MEM3_ALLOC_TABLE_SIZE] __attribute__((at(0X10000000+MEM3_MAX_SIZE)));
const u32 memtblsize[SRAMBANK]={MEM1_ALLOC_TABLE_SIZE,MEM2_ALLOC_TABLE_SIZE,MEM3_ALLOC_TABLE_SIZE};
const u32 memblksize[SRAMBANK]={MEM1_BLOCK_SIZE,MEM2_BLOCK_SIZE,MEM3_BLOCK_SIZE};
const u32 memsize[SRAMBANK]={MEM1_MAX_SIZE,MEM2_MAX_SIZE,MEM3_MAX_SIZE};
struct _m_mallco_dev mallco_dev=
{
my_mem_init,
my_mem_perused,
mem1base,mem2base,mem3base,
mem1mapbase,mem2mapbase,mem3mapbase,
0,0,0,
};
void mymemcpy(void *des,void *src,u32 n)
{
u8 *xdes=des;
u8 *xsrc=src;
while(n--)*xdes++=*xsrc++;
}
void mymemset(void *s,u8 c,u32 count)
{
u8 *xs = s;
while(count--)*xs++=c;
}
void my_mem_init(u8 memx)
{
mymemset(mallco_dev.memmap[memx],0,memtblsize[memx]*4);
mallco_dev.memrdy[memx]=1;
}
u16 my_mem_perused(u8 memx)
{
u32 used=0;
u32 i;
for(i=0;i<memtblsize[memx];i++)
{
if(mallco_dev.memmap[memx][i])used++;
}
return (used*1000)/(memtblsize[memx]);
}
u32 my_mem_malloc(u8 memx,u32 size)
{
uint32_t *point_test;
signed long offset=0;
u32 nmemb;
u32 cmemb=0;
u32 i;
if(!mallco_dev.memrdy[memx])mallco_dev.init(memx);
if(size==0)return 0XFFFFFFFF;
nmemb=size/memblksize[memx];
if(size%memblksize[memx])nmemb++;
for(offset=memtblsize[memx]-1;offset>=0;offset--)
{
point_test = &mallco_dev.memmap[memx][offset];
if(!mallco_dev.memmap[memx][offset])
cmemb++;
else
cmemb=0;
if(cmemb==nmemb)
{
for(i=0;i<nmemb;i++)
{
point_test = &mallco_dev.memmap[memx][offset+i];
mallco_dev.memmap[memx][offset+i]=nmemb;
}
return (offset*memblksize[memx]);
}
}
return 0XFFFFFFFF;
}
u8 my_mem_free(u8 memx,u32 offset)
{
int i;
if(!mallco_dev.memrdy[memx])
{
mallco_dev.init(memx);
return 1;
}
if(offset<memsize[memx])
{
int index=offset/memblksize[memx];
int nmemb=mallco_dev.memmap[memx][index];
for(i=0;i<nmemb;i++)
{
mallco_dev.memmap[memx][index+i]=0;
}
return 0;
}else return 2;
}
void myfree(u8 memx,void *ptr)
{
u32 offset;
if(ptr==NULL)return;
offset=(u32)ptr-(u32)mallco_dev.membase[memx];
my_mem_free(memx,offset);
}
void *mymalloc(u8 memx,u32 size)
{
u32 offset;
offset=my_mem_malloc(memx,size);
if(offset==0XFFFFFFFF)return NULL;
else return (void*)((u32)mallco_dev.membase[memx]+offset);
}
void *myrealloc(u8 memx,void *ptr,u32 size)
{
u32 offset;
offset=my_mem_malloc(memx,size);
if(offset==0XFFFFFFFF)return NULL;
else
{
mymemcpy((void*)((u32)mallco_dev.membase[memx]+offset),ptr,size);
myfree(memx,ptr);
return (void*)((u32)mallco_dev.membase[memx]+offset);
}
}
malloc.h
#ifndef __MALLOC_H
#define __MALLOC_H
#include "sys.h"
#ifndef NULL
#define NULL 0
#endif
#define SRAMIN 0
#define SRAMEX 1
#define SRAMCCM 2
#define SRAMBANK 3
#define MEM1_BLOCK_SIZE 64
#define MEM1_MAX_SIZE 160*1024
#define MEM1_ALLOC_TABLE_SIZE MEM1_MAX_SIZE/MEM1_BLOCK_SIZE
#define MEM2_BLOCK_SIZE 64
#define MEM2_MAX_SIZE 28912 *1024
#define MEM2_ALLOC_TABLE_SIZE MEM2_MAX_SIZE/MEM2_BLOCK_SIZE
#define MEM3_BLOCK_SIZE 64
#define MEM3_MAX_SIZE 60 *1024
#define MEM3_ALLOC_TABLE_SIZE MEM3_MAX_SIZE/MEM3_BLOCK_SIZE
struct _m_mallco_dev
{
void (*init)(u8);
u16 (*perused)(u8);
u8 *membase[SRAMBANK];
u32 *memmap[SRAMBANK];
u8 memrdy[SRAMBANK];
};
extern struct _m_mallco_dev mallco_dev;
void mymemset(void *s,u8 c,u32 count);
void mymemcpy(void *des,void *src,u32 n);
void my_mem_init(u8 memx);
u32 my_mem_malloc(u8 memx,u32 size);
u8 my_mem_free(u8 memx,u32 offset);
u16 my_mem_perused(u8 memx) ;
void myfree(u8 memx,void *ptr);
void *mymalloc(u8 memx,u32 size);
void *myrealloc(u8 memx,void *ptr,u32 size);
#endif
main.c
main()
{
u8 *p=0;
u8 sramx=1;
p=mymalloc(sramx,2048);
myfree(sramx,p);
memused=my_mem_perused(SRAMEX);
}
从上面代码: const u32 memtblsize[SRAMBANK] //内存表大小 内存表指针为,指向的是是32位,每一块内存为64字节:0xFFFFFFFF*64Byte=64M,所以一次最大申请64M。每块为64字节,也就是说就算需要一个字节的空间,也会分配一块,即一次最小申请为分配64字节。6
|