1573
社区成员
accept运行一段时间后报access violation at address 错误????
源程序为:
var
aAddrLen:integer;
pSocketAddr:PSockAddr;
begin
GetMem(pSocketAddr,sizeof(TSockAddr));
aAddrLen:=sizeof(TSockAddr);
AcceptedConnect:=Accept(theListenSocket,pSocketAddr,@aAddrLen);
在压力测试时过大约一小时就会报
project xxx.exe raised execption class EAcsessViolation with message 'access violation at address 74f91299 in module 'wshtcpip.dll'.read of address '00000000'.process stopped.use step or run to continue;
高手多指教一下。谢谢 。
var
aAddrLen:integer;
pSocketAddr:PSockAddr;
begin
GetMem(pSocketAddr,sizeof(TSockAddr));
aAddrLen:=sizeof(TSockAddr);
AcceptedConnect:=Accept(theListenSocket,pSocketAddr,@aAddrLen);
在压力测试时过大约一小时就会报
project xxx.exe raised execption class EAcsessViolation with message 'access violation at address 74f91299 in module 'wshtcpip.dll'.read of address '00000000'.process stopped.use step or run to continue;
高手多指教一下。谢谢 。
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
cg1120II 2003-09-23
program tcpserver;
{$APPTYPE CONSOLE}
uses
SysUtils, Windows,
winsock;
var
s,newsock:TSocket;
ser_addr:TSockAddrIn;
remote_addr:PSockAddr;
leng:Integer;
wsa:WSAData;
wVersionRequested:WORD;
buf:array[0..128]of char;
buf2:array[0..128]of char;
begin
//new(leng);
wVersionRequested := MAKEWORD( 2, 0 );
WSAStartup(wVersionRequested,wsa);
s := socket(AF_INET,SOCK_STREAM,0);
ser_addr.sin_family := AF_INET;
ser_addr.sin_addr.S_addr := htonl(INADDR_ANY);
ser_addr.sin_port := htons(4000);
bind(s,ser_addr,sizeof(ser_addr));
listen(s,0);
while 1>0 do
leng:= sizeof(remote_addr);
newsock := accept(s,remote_addr,@leng);
begin
if recv(newsock,buf,sizeof(buf),0)>0 then
begin
writeln('Client Data:',buf);
Readln(buf2);
send(newsock,buf2,sizeof(buf2),0);
end;
closesocket(newsock);
end;
closesocket(s);
WSACleanup();
sleep(2000);
end.
{$APPTYPE CONSOLE}
uses
SysUtils, Windows,
winsock;
var
s,newsock:TSocket;
ser_addr:TSockAddrIn;
remote_addr:PSockAddr;
leng:Integer;
wsa:WSAData;
wVersionRequested:WORD;
buf:array[0..128]of char;
buf2:array[0..128]of char;
begin
//new(leng);
wVersionRequested := MAKEWORD( 2, 0 );
WSAStartup(wVersionRequested,wsa);
s := socket(AF_INET,SOCK_STREAM,0);
ser_addr.sin_family := AF_INET;
ser_addr.sin_addr.S_addr := htonl(INADDR_ANY);
ser_addr.sin_port := htons(4000);
bind(s,ser_addr,sizeof(ser_addr));
listen(s,0);
while 1>0 do
leng:= sizeof(remote_addr);
newsock := accept(s,remote_addr,@leng);
begin
if recv(newsock,buf,sizeof(buf),0)>0 then
begin
writeln('Client Data:',buf);
Readln(buf2);
send(newsock,buf2,sizeof(buf2),0);
end;
closesocket(newsock);
end;
closesocket(s);
WSACleanup();
sleep(2000);
end.
cg1120II 2003-09-23
试试：
AcceptedConnect:=Accept(theListenSocket,pSocketAddr,PInteger(aAddrLen));
AcceptedConnect:=Accept(theListenSocket,pSocketAddr,PInteger(aAddrLen));
EXCEPTION_ACCESS_VIOLATION异常 先记录下来,暂时还没有解决, ...原因猜测:这种错误由于第一次出现,也不频繁,环境没有任何改动,软件没有升过级,JAVA程序也没有跑,怀疑可能是太长时间没有关过机了- -!.约有3个星期了 错误信息 1 ...
【Redis】Is Redlock safe? The rationale for Martin's usage of a token, is that this way, when two different clients access the locked resource at the same time, we can use the token in the database write transaction (that is ...
C++ 面试题大全 主要原因是这四个操作符没有side effect，因此，它们必须构造一个对象作为返回值，可选的方案包括：返回一个对象、返回一个局部变量的引用，返回一个new分配的对象的引用、返回一个静态对象引用。根据前面提到的引用...
Oracle VM VirtualBox R ? Programming Guide and Reference 1.4.2 Authenticating at web service logon . . . . . . . . . . . . . . . . . . . . 25 2 Environment-specific notes 27 2.1 Using the object-oriented web service (OOWS) . . . . . . . . . . . . . . . . . ...
怎样破坏程序的堆栈？ 从这一点来看， 一个过程调用可以象跳转(jump)命令那样改变程序的控制流程， 但是与跳转不同的是， 当工作完成时， 函数把控制权返回给调用之后的语句或指令。这种高级抽象实现起来要靠堆栈的帮助。 堆栈也用于给...
Windows Api函数使用出现的错误码 Windows Api函数使用出现的错误码 作者：Mrzhu007 日期：2018-06-02 博客地址： 金色世界 信息常数 常数值 对应信息 ERROR_SUCCESS 0 操作成功完成。 NO_ERROR 0 操作成功完成。 ERROR_...
GB28181协议错误码返回码整理 错误码定义 错误码 错误码宏定义 说明 0 ERR_COMMON_SUCCEED 执行成功 1 ERR_COMMON_FAIL 执行失败 2 ERR_COMMON_INVALID_PARAM 输入参数非法 3 ERR_COMMON_NO_MEMORY 系统内存不足 4 ERR_COMMON_SYS_FAIL 系统通用...
微软错误代码大全（中文和英文） 微软错误代码 2.1 中文 0 操作成功完成。 1 功能错误。 2 系统找不到指定的文件。 3 系统找不到指定的路径。 4 系统无法打开文件。 5 拒绝访问。 6 句柄无效。 7 存储控制块被损坏。 8...
System Error Codes/系统错误代码 71 No more connections can be made to this remote computer at this time because there are already as many connections as the computer can accept. 72 The specified printer or disk device has been ...
springcloud启动错误 标题:springcloud启动错误 ...EXCEPTION_ACCESS_VIOLATION (0xc0000005) at pc=0x0000000000000000, pid=5900, tid=7172 JRE version: Java™ SE Runtime Environment (12.0.2+10) (build 12.0.2+10) Java VM: Jav
mac 的错误码 在上一篇文章中我描述了我遇到的一个问题，里面有个错误码。这表明什么不清楚。我查了一下可能的错误码列表： http://www.cs.cmu.edu/afs/cs/user/lenzo/html/mac_errors.html 在这里，有不一定准确，也不一定新的...
C#中??和？分别是什么意思？ 在ASP.NET开发中一些单词的标准缩写 C#SESSION丢失问题的解决办法 在C#中INTERFACE与ABSTRACT CLASS的区别 SQL命令语句小... ）：引用类型可以使用空引用表示一个不存在的值，而值类型通常不能表示为空。例如：string str=null; 是正确的，int i=null; 编译器就会报错。为了使值类型也可为空，就可以使用可空类型，即用可空类型修饰符"？"来...
利用Oracle RDA（ Remote Diagnostic Agent）快速收集Oracle产品分析数据 Oracle支持鼓励使用RDA，因为它能对于更多信息最小化请求数量而大大减少服务请求解决的时间。RDA不会对系统做任何的修改，它只为Oracle支持收集有用的数据，如果需要可以提供经安全过滤的数据。 ...
