程序比较简单，但感觉比较有意思，个人认为有一定应用价值，希望大家有更好的思路和方法，互相促进。
程序的基本思路是：在CPU堆栈指针SP以上的RAM区域，通过把堆栈指针SP上移若干个字节，把空出的RAM区域供用户使用，当用户在使用完后又可以把该RAM区域释放。
头文件dmalloc51.h
/*
*********************************************************************************************************
* C51内部RAM动态内存申请函数 ，动态内存释放函数
* (c) Copyright 2004.6, LM7556,China
* All Rights Reserved
*
*
* 文件 : dmalloc51.h
*********************************************************************************************************
*/
//动态内存申请函数DMEM8U *dmalloc(DMEM8U dmsize,StkSize)从RAM堆栈中开辟一段空间做变量区.
//动态内存释放函数DMEM8U freedmalloc(DMEM8U *dmp,DMEM8U dmsize)把动态内存分配的空间从堆栈中释放。
/******************************** Define Messages *****************************************/
#define CPU_PCLEN 2 //CPU 程序指针长度(字节数).
#define RAM_SIZE 0x100 //CPU内部RAM字节数。
#define MEM_OVER 0xff //CPU内部RAM内存不够。
#define NO_MEM_DEL 0xfe //试图释放不存在的内存空间。
#define MEM_DELETED 0xfd //内存空间释放成功。
typedef unsigned ｃｈａｒ idata DMEM8U;
/************* 动态内存申请函数DMEM8U *dmalloc(DMEM8U dmsize,StkSize) *********************/
//该函数把堆栈SP向上移动dmsize字节空间，再返回指向该空间起始地址的指针，
//入口参数；dmsize是需要分配的空间大小，以DMEM8U为单位。
// StkSize 需要给CPU预留的堆栈空间.
//出口参数: 返回 STACK_OVER --- CPU内部RAM堆栈溢出,分配的空间不存在.
// 如果成功则返回一个指针，该指针指向所分配空间(大小为dmsize)的起始地址。
DMEM8U *dmalloc(DMEM8U dmsize,StkSize);
/************ 动态内存释放函数 freedmalloc(DMEM8U *dmp,DMEM8U dmsize) *********************/
//该函数把起始地址为dmp的空间(大小为dmsize)从堆栈中释放。
//入口参数；dmsize是需要释放的空间大小，以DMEM8U为单位。
// dmp指针指向需要释放空间的起始地址.
//出口参数: 返回MEM_DELETE --- 内存空间释放成功.
// 返回NO_MEM_DEL --- 试图释放不存在的内存空间.
DMEM8U freedmalloc(DMEM8U *dmp,DMEM8U dmsize);
主文件 : dmalloc51.c
/*
*********************************************************************************************************
* C51内部RAM动态申请函数 ，动态释放函数
* (c) Copyright 2004.6, LM7556,China
* All Rights Reserved
*
*
* 文件 : dmalloc51.c
*********************************************************************************************************
*/
#include "dmalloc51.h"
sfr SP = 0x81;
/************* 动态内存申请函数DMEM8U *dmalloc(DMEM8U dmsize,StkSize) *********************/
//动态内存申请函数DMEM8U *dmalloc(DMEM8U dmsize,StkSize)从RAM堆栈中开辟一段空间做变量区.
//该函数把堆栈SP向上移动dmsize字节空间，再返回指向该空间起始地址的指针，
//入口参数；dmsize是需要分配的空间大小，以DMEM8U为单位。
// StkSize 需要给CPU预留的堆栈空间.
//出口参数: 返回 STACK_OVER --- CPU内部RAM堆栈溢出,分配的空间不存在.
// 如果成功则返回一个指针，该指针指向所分配空间(大小为dmsize)的起始地址。
DMEM8U *dmalloc(DMEM8U dmsize,StkSize)
{DMEM8U *p1,*p2,spbuf; unsigned int StkChk;
StkChk=SP+dmsize+StkSize;
if (StkChk>(RAM_SIZE-1)) {return MEM_OVER;} //检查要申请的内存是否存在.
spbuf=SP;
spbuf-=CPU_PCLEN;
p1=(DMEM8U*)spbuf;
p2=p1+dmsize;
spbuf=(DMEM8U)p2+CPU_PCLEN;
SP=spbuf;
//把上一级函数的返回地址移到该空间的上面，使本函数自己在执行完后可以正确的返回到上一级函数.
p1++;p2++;
*p2++=*p1++;
*p2=*p1;
p1--;
return p1;
}
/************ 动态内存释放函数 freedmalloc(DMEM8U *dmp,DMEM8U dmsize) *********************/
//动态内存释放函数DMEM8U freedmalloc(DMEM8U *dmp,DMEM8U dmsize)把动态内存分配的空间从堆栈中释放。
//该函数把起始地址为dmp的空间(大小为dmsize)从堆栈中释放。
//入口参数；dmsize是需要释放的空间大小，以DMEM8U为单位。
// dmp指针指向需要释放空间的起始地址.
//出口参数: 返回MEM_DELETE --- 内存空间释放成功.
// 返回NO_MEM_DEL --- 试图释放不存在的内存空间.
DMEM8U freedmalloc(DMEM8U *dmp,DMEM8U dmsize)
{DMEM8U *p1,*p2,spbuf,i;
spbuf=(DMEM8U)dmp+dmsize;
if (spbuf<=(DMEM8U)dmp) {return NO_MEM_DEL;}
if (spbuf>SP-CPU_PCLEN) {spbuf=SP-CPU_PCLEN;}
i=SP-spbuf;
p1=(DMEM8U*)spbuf;
p1++;
p2=dmp;
spbuf=(SP-spbuf)+p2;
spbuf--;
while (i)
{
*p2++=*p1++; //把上一级函数的返回地址移到该空间的底部,使程序可以返回到上一级函数.
i--;
}
SP=spbuf;
return MEM_DELETED;
}
应用范例：
文件 : main.c
#include
#include
#include
#define STACK_SIZE 0x30 //为程序预留的最小堆栈.
#include "dmalloc51.h"
void initsio(void);
void TDelay(unsigned int t);
void Fn_dRamA(void);
void Fn_dRamB(void);
void Fn_dRamC(void);
void main(void)
{
initsio();
while (1)
{
TDelay(500);
Fn_dRamA();
printf("n");
TDelay(500);
Fn_dRamB();
printf("n");
TDelay(500);
Fn_dRamC();
printf("n");
}
}
#define dmSIZE_A 0x20
void Fn_dRamA(void)
{unsigned ｃｈａｒ i,*mp,*mpp;
if ((mpp=dmalloc(dmSIZE_A,STACK_SIZE))==MEM_OVER) {return;};
mp=mpp;
for (i=0;i { *mp++=i+0x20; } *mp=0; printf(mpp); printf("n"); Fn_dRamB(); freedmalloc(mpp,dmSIZE_A); //后面加nop()为了防止c51把freedmalloc(mpp)做ljmp 调用。 _nop_(); } #define dmSIZE_B 0x20 void Fn_dRamB(void) {unsigned ｃｈａｒ i,*mp,*mpp; if ((mpp=dmalloc(dmSIZE_B,STACK_SIZE))==MEM_OVER) {return;}; mp=mpp; for (i=0;i { *mp++=i+0x40; } *mp=0; printf(mpp); printf("n"); Fn_dRamC(); freedmalloc(mpp,dmSIZE_B); //后面加nop()为了防止c51把freedmalloc(mpp)做ljmp 调用。 _nop_(); } #define dmSIZE_C 0x20 void Fn_dRamC(void) {unsigned ｃｈａｒ i,*mp,*mpp; if ((mpp=dmalloc(dmSIZE_C,STACK_SIZE))==MEM_OVER) {return;}; mp=mpp; for (i=0;i { *mp++=i+0x60; } *mp=0; printf(mpp); printf("n"); freedmalloc(mpp,dmSIZE_C); //后面加nop()为了防止c51把freedmalloc(mpp)做ljmp 调用。 _nop_(); } void TDelay(unsigned int t) {unsigned int i,j; for (i=0;i { for (j=0;j } } void initsio(void) { TMOD=TMOD&0x0F; TMOD=TMOD|0x20; TL1=0xFD,TH1=0xFD;//19200 , 22.1184MHz SCON=0x50;PCON=0x00; TR1=1; TI = 1; /* TI: set TI to send first ｃｈａｒ of UART */ }