HP-Socket是一个免费开源的通信库。示例代码看起来比较纷繁,所以简化了一下,写了一个demo.
服务器端:
//调试模式请包含HPSocket4C_UD.lib //在工程目录中,包含头件HPSocket4C.h、HPTypeDef.h、SocketInterface.h #pragma once #include "HPSocket4C.h" const LPCTSTR DEF_ADDRESS = _T("0.0.0.0"); const USHORT PORT = 9700; class Server { public: Server(); ~Server(); HP_TcpPullServer m_pServer; //创建服务器 HP_TcpPullServerListener m_pListener;//监听器 private: //回调函数 static En_HP_HandleResult __stdcall OnPrepareListen(HP_Server pSender, SOCKET soListen); static En_HP_HandleResult __stdcall OnAccept(HP_Server pSender, HP_CONNID dwConnID, SOCKET soClient); static En_HP_HandleResult __stdcall OnSend(HP_Server pSender, HP_CONNID dwConnID, const BYTE* pData, int iLength); static En_HP_HandleResult __stdcall OnReceive(HP_Server pSender, HP_CONNID dwConnID, int iLength); static En_HP_HandleResult __stdcall OnClose(HP_Server pSender, HP_CONNID dwConnID, En_HP_SocketOperation enOperation, int iErrorCode); static En_HP_HandleResult __stdcall OnShutdown(HP_Server pSender); public: VOID StartServer(); VOID StopServer(); private: static BOOL m_ServerStat; };
.CPP文件
#include "stdafx.h" #include "Server.h" BOOL Server::m_ServerStat = FALSE; Server::Server() { // 创建监听器对象 m_pListener = ::Create_HP_TcpPullServerListener(); // 创建 Socket 对象 m_pServer = ::Create_HP_TcpPullServer(m_pListener); // 设置 Socket 监听器回调函数 ::HP_Set_FN_Server_OnPrepareListen(m_pListener, OnPrepareListen); ::HP_Set_FN_Server_OnAccept(m_pListener, OnAccept); ::HP_Set_FN_Server_OnSend(m_pListener, OnSend); ::HP_Set_FN_Server_OnPullReceive(m_pListener, OnReceive); ::HP_Set_FN_Server_OnClose(m_pListener, OnClose); ::HP_Set_FN_Server_OnShutdown(m_pListener, OnShutdown); } Server::~Server() { // 销毁 Socket 对象 ::Destroy_HP_TcpPullServer(m_pServer); // 销毁监听器对象 ::Destroy_HP_TcpPullServerListener(m_pListener); } En_HP_HandleResult Server::OnPrepareListen(HP_Server pSender, SOCKET soListen) { setlocale(LC_ALL, "chs"); TCHAR szAddress[50]; int iAddressLen = sizeof(szAddress) / sizeof(TCHAR); USHORT usPort; ::HP_Server_GetListenAddress(pSender, szAddress, &iAddressLen, &usPort); return HR_OK; } En_HP_HandleResult Server::OnAccept(HP_Server pSender, HP_CONNID dwConnID, SOCKET soClient) { BOOL bPass = TRUE; TCHAR szAddress[50]; int iAddressLen = sizeof(szAddress) / sizeof(TCHAR); USHORT usPort; ::HP_Server_GetRemoteAddress(pSender, dwConnID, szAddress, &iAddressLen, &usPort); USES_CONVERSION; char buff[255] = {}; sprintf_s(buff,255,"地址%s:%ld", W2A(szAddress), usPort); return HR_OK; } En_HP_HandleResult Server::OnSend(HP_Server pSender, HP_CONNID dwConnID, const BYTE* pData, int iLength) { return HR_OK; } En_HP_HandleResult Server::OnReceive(HP_Server pSender, HP_CONNID dwConnID, int iLength) { return HR_OK; } En_HP_HandleResult Server::OnClose(HP_Server pSender, HP_CONNID dwConnID, En_HP_SocketOperation enOperation, int iErrorCode) { return HR_OK; } En_HP_HandleResult Server::OnShutdown(HP_Server pSender) { return HR_OK; } VOID Server::StartServer() {//启动服务器 USES_CONVERSION; if (!::HP_Server_Start(m_pServer, DEF_ADDRESS, PORT)) { m_ServerStat = FALSE; printf("服务器启动出错:%d,%s", ::HP_Server_GetLastError(m_pServer), W2A(::HP_Server_GetLastErrorDesc(m_pServer))); } else { m_ServerStat = TRUE; } } VOID Server::StopServer() {//停止服务器 ::HP_Server_Stop(m_pServer); m_ServerStat = FALSE; }
客户端:
CHpClientDlg::CHpClientDlg(CWnd* pParent /*=NULL*/) : CDialogEx(IDD_HPCLIENT_DIALOG, pParent) {//初始化 m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME); // 创建监听器对象 m_pListener = ::Create_HP_TcpPullClientListener(); // 创建 Socket 对象 m_pClient = ::Create_HP_TcpPullClient(m_pListener); // 设置 Socket 监听器回调函数 ::HP_Set_FN_Client_OnConnect(m_pListener, OnConnect); ::HP_Set_FN_Client_OnSend(m_pListener, OnSend); ::HP_Set_FN_Client_OnPullReceive(m_pListener, OnReceive); ::HP_Set_FN_Client_OnClose(m_pListener, OnClose); }
连接服务器:
void CHpClientDlg::OnBnClickedButton2() { if (::HP_Client_Start(m_pClient, DEFAULT_ADDRESS, DEFAULT_PORT, true)) { m_edShow->SetSel(-1, -1); //插入光标放于最后 m_edShow->ReplaceSel(_T("连接成功!")); m_edShow->ScrollWindow(0, 0); //滚动到插入点 } else { CString str; str.Format(_T("%d,%s"), ::HP_Client_GetLastError(m_pClient), HP_Client_GetLastErrorDesc(m_pClient)); m_edShow->SetSel(-1, -1); //插入光标放于最后 m_edShow->ReplaceSel(str); m_edShow->ScrollWindow(0, 0); //滚动到插入点 } }
准备回调函数(固定写法):
En_HP_HandleResult CHpClientDlg::OnConnect(HP_Client pSender, HP_CONNID dwConnID) { TCHAR szAddress[50]; int iAddressLen = sizeof(szAddress) / sizeof(TCHAR); USHORT usPort; ::HP_Client_GetLocalAddress(pSender, szAddress, &iAddressLen, &usPort); return HR_OK; } En_HP_HandleResult CHpClientDlg::OnSend(HP_Client pSender, HP_CONNID dwConnID, const BYTE* pData, int iLength) { return HR_OK; } En_HP_HandleResult CHpClientDlg::OnReceive(HP_Client pSender, HP_CONNID dwConnID, int iLength) { byte buffer[1000]{ 0 }; En_HP_FetchResult result = ::HP_TcpPullClient_Fetch(pSender, buffer, 1000); return HR_OK; } En_HP_HandleResult CHpClientDlg::OnClose(HP_Client pSender, HP_CONNID dwConnID, En_HP_SocketOperation enOperation, int iErrorCode) { return HR_OK; }
发送数据:
void CHpClientDlg::OnBnClickedButton1() {//发送数据 CString strSend; m_edSend->GetWindowText(strSend); USES_CONVERSION; char * p = W2A(strSend); if (::HP_Client_Send(m_pClient, (BYTE*)p, strlen(p)+1)) { CString strinfo; strinfo.Format(_T("%d-%s"), ::HP_Client_GetConnectionID(m_pClient), strSend); m_edShow->SetSel(-1, -1); //插入光标放于最后 m_edShow->ReplaceSel(_T("\r\n发送成功!")); m_edShow->ScrollWindow(0, 0); //滚动到插入点 } else ;//::LogSendFail(::HP_Client_GetConnectionID(m_pClient), ::SYS_GetLastError(), ::HP_GetSocketErrorDesc(SE_DATA_SEND)); }
关闭连接:
void CHpClientDlg::OnBnClickedButton3() { if (::HP_Client_Stop(m_pClient)) ;//记录客户端(::HP_Client_GetConnectionID(m_pClient)); else ASSERT(FALSE); }