Code

LRESULT KPortServer::Run() { bool bE = false; WSADATA wsData; #define BUF_LEN 20 char szMsgBuf[BUF_LEN + 1]; sockaddr_in addrClient; SYSTEMTIME sysTime; bool bResult = true; WSAStartup(MAKEWORD(2, 2), &wsData); KServer::Init(); KServer::ResetSocket(); fprintf(stdout, "Waitting for client:/n"); while (true) { SOCKET skClient = INVALID_SOCKET; PROCESS_ERROR(INVALID_SOCKET != (skClient = StartAccepting())); addrClient = GetClientAddress(); GetLocalTime(&sysTime); sprintf(szMsgBuf, "%d/0", ntohs(addrClient.sin_port)); send(skClient, szMsgBuf, strlen(szMsgBuf), !MSG_DONTROUTE); fprintf(stdout, "%d:%d:%d:%d/tClient %s %d connected!/n", sysTime.wHour, sysTime.wMinute, sysTime.wSecond, sysTime.wMilliseconds, inet_ntoa(addrClient.sin_addr), ntohs(addrClient.sin_port)); printf("%s:/tSocket closed!/n", ::GetSystemTimeAsString()); shutdown(skClient, SD_RECEIVE); closesocket(skClient); } bE = true; Exit0: WSACleanup(); return bE; #undef BUF_LEN }