［高级问题］请教一个高深的问题:为什麽我的程序在分配内存的时候失败?

2004-12-13 03:52:52 313 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

C++ RAII机制详解：从原理到实战的资源管理编程范式在C++编程中，资源管理是确保程序健壮性和安全性的核心挑战。资源获取即初始化（RAII）是一种将资源生命周期与对象生命周期绑定的设计范式，其核心原理是利用构造函数获取资源、析构函数释放资源的自动化机制。这一机制的技术价值在于，它通过C++的对象作用域和栈展开规则，从根本上解决了内存泄漏、文件句柄未关闭等资源管理难题，实现了异常安全。其典型应用场景包括动态内存管理、文件操作、互斥锁同步以及网络连接等。本文以智能指针和文件操作为例，深入剖析了RAII的设计哲学与实现细节，并探讨了其在现代C++工程实践中的关键作阅读详情

最近写一个局域网通讯的程序，差不多的功能都写了，可是现在运行不起来了，跟踪到不一定再什麽地方就会出现内存请求失败！（new char[最多上百KB]），由于位置不定，源代码也没办法贴出来，恳请高人指点一下思路！（另外，刚开始运行就会出现，这是为什麽？我要崩溃了）

...全文

从程序报错到性能调优：操作系统核心机制深度解析操作系统作为计算机系统的核心，其核心职责是管理硬件资源并为应用程序提供统一的运行环境。理解其工作原理是解决各类技术问题的基石。操作系统通过进程管理、内存管理、文件系统和网络子系统等核心机制，实现了资源的抽象、分配与隔离。在工程实践中，无论是排查“程序无法运行”的兼容性问题，还是分析“CPU使用率100%”的性能瓶颈，亦或是进行“麒麟操作系统部署”等国产化适配，都离不开对操作系统底层机制的深入理解。掌握虚拟内存、系统调用、中断处理等核心概念，能帮助开发者从根源上定位问题，例如通过分析内存交换（swap）活动或阅读详情

佣工7001

网络及通讯开发 1,317 成员 8,874 内容

+ 关注 + 加入社区

切换为时间正序

佣工7001 2004-12-14

打赏
举报

请高人卡那程序中的SendBuf函数,是不是有问题,我调试的时候发现好像这里的问题.

佣工7001 2004-12-13

打赏
举报

//=====================================================
void __fastcall TClientConnection::Process(long rl)
{
int fh;
AnsiString as,fn;
FormMachine->ShowState(2,"Server Responsed ok");
//**********************
if(state==ssGetingPeer) goto READMOREPEER;
if(state==ssGetingData) goto READMOREDATA;
//**********************
if(strncmp(recBuf,CMD_CLOSE,2)==0)
{socket->Close();goto DONE; }
//**********************
if(strncmp(recBuf,CMD_OK,2)==0)
{FormMachine->ShowState(2,"Server Ack");goto DONE; }
//**********************
if(strncmp(recBuf,CMD_SCFHASH,2)==0)
{
as = machine->cfgFile->ReadString("current","hash","");
memcpy(hash,as.c_str(),32);
if(strncmp(hash,recBuf,32)==0
&& FileExists(machine->cfgFile->ReadString("current","scf",""))) //yes scf is current
{
if(!machine->bRunning)
{
StartWork();
}
Report();
GetPeer();
// Close();
}
else
{
memcpy(hash,recBuf,32);
machine->Stop();
GetName();
}
goto DONE;
}
//**********************
if(strncmp(recBuf,CMD_SCFNAME,2)==0)
{
machine->scName = recBuf+2;
machine->scName.SetLength(rl-2);
GetSCF();
goto DONE;
}
//**********************
if(strncmp(recBuf,CMD_PEER,2)==0)
{
memcpy(&bytesToRead,recBuf+2,sizeof bytesToRead);
SafeDelete(cacheBuf);
SafeNew(cacheBuf,bytesToRead+1);
cachePoint = rl - 2 - sizeof bytesToRead;
memcpy(cacheBuf,recBuf+2+sizeof bytesToRead,cachePoint);
bytesToRead-=(rl -2-sizeof bytesToRead);
if(bytesToRead>0)
state=ssGetingPeer;
else
{state=ssCmd;
*(cacheBuf+cachePoint+1)='\0';
ParsePeers();
}
goto DONE;
}
//**********************
if(strncmp(recBuf,CMD_SCF,2)==0 )
{
memcpy(&bytesToRead,recBuf+2,sizeof bytesToRead);
fn=machine->scPath+machine->scName+".sc";
DeleteFile(fn);
fh = FileCreate(fn);
if(fh<0)throw Exception("不能保存SCF文件："+fn);
FileWrite(fh,recBuf+2+sizeof bytesToRead ,rl-2-sizeof bytesToRead);
FileClose(fh);
bytesToRead-=(rl -2-sizeof bytesToRead);
if(bytesToRead>0)
state=ssGetingData;
else
{state=ssCmd;
SaveSCF();
StartWork();
}
goto DONE;
}
//**********************
goto DONE;
READMOREDATA:
bytesToRead-=rl;
fn=machine->scPath+machine->scName+".sc";
fh = FileOpen(fn,fmOpenWrite);
if(fh<0)throw Exception("不能保存SCF文件："+fn);
FileSeek(fh,0,2);
FileWrite(fh,recBuf,rl);
FileClose(fh);
if(bytesToRead>0)
state=ssGetingData;
else
{ state=ssCmd;
SaveSCF();
StartWork();
}
goto DONE;
//**********************
READMOREPEER:
bytesToRead-=rl;
memcpy(cacheBuf+cachePoint,recBuf,rl);
cachePoint += rl;
if(bytesToRead>0)
state=ssGetingPeer;
else
{state=ssCmd;
ParsePeers();
}
goto DONE;
//**********************
DONE:
return;
}

佣工7001 2004-12-13

打赏
举报

to: xelements
char recBuf[2048],sendBuf[2048],*cacheBuf;
开始同样是char*,可是发现此问题后，才改成静态的，不过好像作用不大。
___________________________________
谢谢几位大侠了，我会去试试这样分配内存。
___________________________________
另外，请大家帮看看，我这麽用ServerSocket和ClientSocket写程序不知道是否行得通？以前没接触过，心里没有底。

jiangchun_xn 2004-12-13

打赏
举报

以前我遇到过。上百KB，就是几十MB了，分配大的内存，频繁使用new/delete会有问题。对于大的内存块，我现在使用SysGetMem/SysFreeMem来分配释放内存，就不会有问题了。另外，用malloc/free估计也没有问题。
-------------
我也遇到过，而且从外面看不出来内存分配失败，而是用于API调用发生失败，于是改成GlobalAlloc

xelements 2004-12-13

打赏
举报

recBuf是怎么定义的

xu_xinyu 2004-12-13

打赏
举报

关注。

netsys2 2004-12-13

打赏
举报

你把CODE GUARD打开没有？

打开来看看。

另，频繁使用new-delete造成很多内存碎片，建议你一开始申请一块然后多次使用

佣工7001 2004-12-13

打赏
举报

还有，程序中的SendBuf也是封装的

void MyYield(long MilliSeconds)
{
long lap=0,lastC,nowC;
lastC=GetTickCount();
while(lap<MilliSeconds)
{
nowC=GetTickCount();
lap=nowC-lastC;
Application->ProcessMessages();
}
}

int __fastcall TConnection::SendBuf(void *buf, int count)
{
int r=0;
char g;
memcpy(&g,(char*)buf+1,sizeof g);
/*
if(state==ssWaitResponse)
{
while(r<30) // wait 3 seconds
{MyYield(100);
r++;
if(state!=ssWaitResponse)
break;
}
}
if(state==ssWaitResponse)
return -1;
if(count<10)
*/
MyYield(300); // CMD sending;
SENDING:
r = socket->SendBuf(buf,count);
if(r<0)
{
MyYield(100);
goto SENDING;
}
/*
if(count==2 && g<'5' && g>'1')
state=ssWaitResponse;
*/
return r;
}

jishiping 2004-12-13

打赏
举报

以前我遇到过。上百KB，就是几十MB了，分配大的内存，频繁使用new/delete会有问题。对于大的内存块，我现在使用SysGetMem/SysFreeMem来分配释放内存，就不会有问题了。另外，用malloc/free估计也没有问题。

佣工7001 2004-12-13

打赏
举报

可是我不知道那里错了，这样我贴一段核心代码，大家帮忙看看，有没有问题

void __fastcall TConnection::SocketEvent(TObject* Sender, TCustomWinSocket* Socket, TSocketEvent SocketEvent)
{long rl,len,loops,left;
switch(SocketEvent)
{
case seRead:
if(state==ssWaitResponse)
state=ssCmd;
len = socket->ReceiveLength();
loops = (len+sizeof recBuf -1)/(sizeof recBuf);
left = len;
while(loops>0)
{
rl = min(sizeof recBuf,left);
left -= sizeof recBuf;
loops--;
rl = socket->ReceiveBuf(recBuf,rl);
Process(rl);
}
break;
}
return;
}

void __fastcall TServerConnection::Process(long rl)
{
long size;
//**********************
if(state==ssGetingPeer) goto READMOREPEER;
//**********************
if(strncmp(recBuf,CMD_CLOSE,2)==0)
{
socket->Close();
if(OnClose)OnClose(this);
goto DONE;
}
if(strncmp(recBuf,CMD_GETSCFHASH,2)==0)
{
memcpy(sendBuf,CMD_SCFHASH,2);
memcpy(sendBuf+2,tracker->scf->Hash,32);
SendBuf(sendBuf,32+2);
goto DONE;
}
if(strncmp(recBuf,CMD_GETSCFNAME,2)==0)
{
long l=tracker->scName.Length();
memcpy(sendBuf,CMD_SCFNAME,2);
memcpy(sendBuf+2,tracker->scName.c_str(),l);
SendBuf(sendBuf,l+2);
goto DONE;
}
if(strncmp(recBuf,CMD_GETSCF,2)==0)
{
long l=tracker->scf->Length;
char *buf;
size=l+2+sizeof l;
SafeNew(buf,size);
memcpy(buf,CMD_SCF,2);
memcpy(buf+2,&l,sizeof l);
memcpy(buf+2+sizeof l,tracker->scFileContent,l);
SendBuf(buf,l+2+sizeof l);
delete buf;
goto DONE;
}
if(strncmp(recBuf,CMD_GETPEER,2)==0)
{
long l=tracker->peers->Size;
char* buf;
SafeNew(buf,l+2+sizeof l);
memcpy(buf,CMD_PEER,2);
memcpy(buf+2,&l,sizeof l);
memcpy(buf+2+sizeof l,tracker->peers->ToString().c_str(),l);
SendBuf(buf,l+2+sizeof l);
delete buf;
goto DONE;
}
if(strncmp(recBuf,CMD_REPORT,2)==0)
{
memcpy(&bytesToRead,recBuf+2,sizeof bytesToRead);
SafeDelete(cacheBuf);
SafeNew(cacheBuf,bytesToRead+1);
cachePoint = rl - 2 - sizeof bytesToRead;
memcpy(cacheBuf,recBuf+2+sizeof bytesToRead,cachePoint);
bytesToRead -=(rl -2-sizeof bytesToRead);
if(bytesToRead>0)
state=ssGetingPeer;
else
{state=ssCmd;
Ok(); // response
ParsePeer(cacheBuf);
}
goto DONE;
}
goto DONE;
//**********************
READMOREPEER:
bytesToRead-=rl;
memcpy(cacheBuf+cachePoint,recBuf,rl);
cachePoint += rl;
if(bytesToRead>0)
state=ssGetingPeer;
else
{state=ssCmd;
Ok();
ParsePeer(cacheBuf);
}
goto DONE;
DONE:
return;
}

xelements 2004-12-13

打赏
举报

你提供的信息太少了

［高级问题］请教一个高深的问题:为什麽我的程序在分配内存的时候失败?

相关推荐