开发完成端口。WSAID_ACCEPTEX 怎么定义啊?

wulengbing 2007-06-21 12:28:15
VC中可以这样定义
#define WSAID_ACCEPTEX \
{0xb5367df1,0xcbac,0x11cf,{0x95,0xca,0x00,0x80,0x5f,0x48,0xa1,0x92}}

在d中我这样定义为什么出错啊?
const
WSAID_ACCEPTEX: TGUID = '($b5367df1; $cbac; $11cf; ($95, $ca, $00, $80, $5f, $48, $a1, $92))';

请高手指教,应该怎么定义这个TGUID?
...全文
727 11 打赏 收藏 转发到动态 举报
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
僵哥 2007-06-21
  • 打赏
  • 举报
回复
哈哈,这几天我也在弄IOCP的东西,现在可以测试了,不过本机ECHO有问题,我拿一个现成的应用客户端(也就是Windows Platform当中的那个IOCPClient),发送接收受发送缓冲区1024倍的数据,由于发送端不支持重叠IO,而我设置成支持重叠IO,结果对方发送的源源不断,但是不接受,从而导致发送端内存猛涨。之前就更加离谱,我使用每一数据包,一次发送,结果整个本机的网络都挂了(内核驱动内存耗尽)。
僵哥 2007-06-21
  • 打赏
  • 举报
回复
楼主拿到的Winsock2这个pas文件当中对TGUID定义有问题。
constantine 2007-06-21
  • 打赏
  • 举报
回复
WSAID_ACCEPTEX: TGUID = '{b5367df1-cbac-11cf-95ca-00805f48a192}';
这样也可以吧
hongqi162 2007-06-21
  • 打赏
  • 举报
回复
const
WSAID_ACCEPTEX: TGUID = (
D1:$b5367df1; D2:$cbac; D3:$11cf; D4:($95, $ca, $00, $80, $5f, $48, $a1, $92));
hongqi162 2007-06-21
  • 打赏
  • 举报
回复
winsock2中TGUID的定义
u_char:Char;

PGUID = ^TGUID;
TGUID = packed record
Data1 :u_long;
Data2 :u_short;
Data3 :u_short;
Data4 : array [0..8-1] of u_char;
end;

//Data4定义的是char数组不是byte数组
const
WSAID_ACCEPTEX: TGUID = (Data1:$b5367df1; Data2:$cbac; Data3:$11cf; Data4:(char($95), char($ca), char($00), char($80), char($5f), char($48), char($a1), char($92)));
wulengbing 2007-06-21
  • 打赏
  • 举报
回复
WSAID_ACCEPTEX: TGUID = (Data1:$b5367df1; Data2:$cbac; Data3:$11cf; Data4:($95, $ca, $00, $80, $5f, $48, $a1, $92));

在$00怎么这里会报类型不匹配啊?'Char' and 'Integer'
请高手解决啊。
ERR0RC0DE 2007-06-21
  • 打赏
  • 举报
回复
基础知识吧。。。
僵哥 2007-06-21
  • 打赏
  • 举报
回复
const
WSAID_ACCEPTEX: TGUID = (Data1:$b5367df1; Data2:$cbac; Data3:$11cf; Data4:($95, $ca, $00, $80, $5f, $48, $a1, $92));
type
LPACCEPTEX = function(sListenSocket: TSocket; sAcceptSocket: TSocket; lpOutputBuffer: Pointer;
dwReceiveDataLength: DWORD; dwLocalAddressLength: DWORD; dwRemoteAddressLength: DWORD;
lpdwBytesReceived: PDWORD; lpOverlapped: POverlapped): BOOL; stdcall;
TAcceptEx = LPACCEPTEX;

function WSAGetExtensionFunctionPointer(s: TSocket; const gdExFuncGuid: TGUID): Pointer;
僵哥 2007-06-21
  • 打赏
  • 举报
回复
const
WSAID_ACCEPTEX: TGUID = (D1:$b5367df1; D2:$cbac; D3:$11cf; D4:($95, $ca, $00, $80, $5f, $48, $a1, $92));
type
LPACCEPTEX = function(sListenSocket: TSocket; sAcceptSocket: TSocket; lpOutputBuffer: Pointer;
dwReceiveDataLength: DWORD; dwLocalAddressLength: DWORD; dwRemoteAddressLength: DWORD;
lpdwBytesReceived: PDWORD; lpOverlapped: POverlapped): BOOL; stdcall;
TAcceptEx = LPACCEPTEX;

function WSAGetExtensionFunctionPointer(s: TSocket; const gdExFuncGuid: TGUID): Pointer;
wulengbing 2007-06-21
  • 打赏
  • 举报
回复
我是在http://jungla.dit.upm.es/~bti/files/winsock2.pas下载的啊。
wulengbing 2007-06-21
  • 打赏
  • 举报
回复
那在那儿下载正确的Winsock2.pas啊?
问题还没有解决啊?
///////////////////////////////////////////////////////////////// // 初始化Socket bool CIOCPModel::_InitializeListenSocket() { // AcceptEx 和 GetAcceptExSockaddrs 的GUID,用于导出函数指针 GUID GuidAcceptEx = WSAID_ACCEPTEX; GUID GuidGetAcceptExSockAddrs = WSAID_GETACCEPTEXSOCKADDRS; // 服务器地址信息,用于绑定Socket struct sockaddr_in ServerAddress; // 生成用于监听的Socket的信息 m_pListenContext = new PER_SOCKET_CONTEXT; // 需要使用重叠IO,必须得使用WSASocket来建立Socket,才可以支持重叠IO操作 m_pListenContext->m_Socket = WSASocket(AF_INET, SOCK_STREAM, 0, NULL, 0, WSA_FLAG_OVERLAPPED); if (INVALID_SOCKET == m_pListenContext->m_Socket) { this->_ShowMessage("初始化Socket失败,错误代码: %d.\n", WSAGetLastError()); return false; } else { TRACE("WSASocket() 完成.\n"); } // 将Listen Socket绑定至完成端口中 if( NULL== CreateIoCompletionPort( (HANDLE)m_pListenContext->m_Socket, m_hIOCompletionPort,(DWORD)m_pListenContext, 0)) { this->_ShowMessage("绑定 Listen Socket至完成端口失败!错误代码: %d/n", WSAGetLastError()); RELEASE_SOCKET( m_pListenContext->m_Socket ); return false; } else { TRACE("Listen Socket绑定完成端口 完成.\n"); } // 填充地址信息 ZeroMemory((char *)&ServerAddress, sizeof(ServerAddress)); ServerAddress.sin_family = AF_INET; // 这里可以绑定任何可用的IP地址,或者绑定一个指定的IP地址 //ServerAddress.sin_addr.s_addr = htonl(INADDR_ANY); ServerAddress.sin_addr.s_addr = inet_addr(m_strIP.GetString()); ServerAddress.sin_port = htons(m_nPort); // 绑定地址和端口 if (SOCKET_ERROR == bind(m_pListenContext->m_Socket, (struct sockaddr *) &ServerAddress, sizeof(ServerAddress))) { this->_ShowMessage("bind()函数执行错误.\n"); return false; } else { TRACE("bind() 完成.\n"); } // 开始进行监听 if (SOCKET_ERROR == listen(m_pListenContext->m_Socket,SOMAXCONN)) { this->_ShowMessage("Listen()函数执行出现错误.\n"); return false; } else { TRACE("Listen() 完成.\n"); } // 使用AcceptEx函数,因为这个是属于WinSock2规范之外的微软另外提供的扩展函数 // 所以需要额外获取一下函数的指针, // 获取AcceptEx函数指针 DWORD dwBytes = 0; if(SOCKET_ERROR == WSAIoctl

1,593

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 网络通信/分布式开发
社区管理员
  • 网络通信/分布式开发社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧