MFC+Winsock实现基于TCP协议的C/S聊天程序服务端代码

以下是基于TCP协议的C/S聊天程序服务端代码的示例，使用MFC和Winsock库实现：

#include "stdafx.h"
#include "Server.h"
#include "ServerDlg.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#endif

CServerDlg* pDlg = NULL;
SOCKET serverSocket = INVALID_SOCKET;

DWORD WINAPI ClientThread(LPVOID lpParam)
{
    SOCKET clientSocket = *(SOCKET*)lpParam;
    delete (SOCKET*)lpParam;

    char buffer[1024];
    int recvSize = 0;

    while (true)
    {
        recvSize = recv(clientSocket, buffer, 1024, 0);
        if (recvSize > 0)
        {
            buffer[recvSize] = '\0';
            pDlg->AddMessage(buffer);
            // broadcast message to all clients
            for (int i = 0; i < pDlg->m_clientList.GetCount(); i++)
            {
                SOCKET client = (SOCKET)pDlg->m_clientList.GetAt(pDlg->m_clientList.FindIndex(i));
                send(client, buffer, recvSize, 0);
            }
        }
        else if (recvSize == 0)
        {
            // client disconnected
            pDlg->RemoveClient(clientSocket);
            break;
        }
        else
        {
            // error occurred
            pDlg->RemoveClient(clientSocket);
            break;
        }
    }

    closesocket(clientSocket);
    return 0;
}

DWORD WINAPI ListenThread(LPVOID lpParam)
{
    SOCKADDR_IN serverAddr;
    serverAddr.sin_family = AF_INET;
    serverAddr.sin_port = htons(pDlg->m_port);
    serverAddr.sin_addr.s_addr = INADDR_ANY;

    serverSocket = socket(AF_INET, SOCK_STREAM, 0);
    if (serverSocket == INVALID_SOCKET)
    {
        pDlg->AddMessage("Failed to create server socket.");
        return 1;
    }

    if (bind(serverSocket, (SOCKADDR*)&serverAddr, sizeof(serverAddr)) == SOCKET_ERROR)
    {
        pDlg->AddMessage("Failed to bind server socket.");
        closesocket(serverSocket);
        return 1;
    }

    if (listen(serverSocket, SOMAXCONN) == SOCKET_ERROR)
    {
        pDlg->AddMessage("Failed to listen on server socket.");
        closesocket(serverSocket);
        return 1;
    }

    pDlg->AddMessage("Server started.");

    while (true)
    {
        SOCKET clientSocket = accept(serverSocket, NULL, NULL);
        if (clientSocket == INVALID_SOCKET)
            break;

        pDlg->AddMessage("New client connected.");

        pDlg->AddClient(clientSocket);

        HANDLE hThread = CreateThread(NULL, 0, ClientThread, new SOCKET(clientSocket), 0, NULL);
        CloseHandle(hThread);
    }

    closesocket(serverSocket);
    return 0;
}

// CServerApp

BEGIN_MESSAGE_MAP(CServerApp, CWinApp)
    ON_COMMAND(ID_HELP, &CWinApp::OnHelp)
END_MESSAGE_MAP()

// CServerApp 构造

CServerApp::CServerApp()
{
    // 支持重新启动管理器
    m_dwRestartManagerSupportFlags = AFX_RESTART_MANAGER_SUPPORT_RESTART;

    // TODO:  在此处添加构造代码，
    // 将所有重要的初始化放置在 InitInstance 中
}

// 唯一的 CServerApp 对象

CServerApp theApp;

// CServerApp 初始化

BOOL CServerApp::InitInstance()
{
    // 初始化 Winsock
    WSADATA wsaData;
    int iResult = WSAStartup(MAKEWORD(2, 2), &wsaData);
    if (iResult != 0)
        return FALSE;

    CWinApp::InitInstance();

    AfxEnableControlContainer();

    // 创建对话框
    pDlg = new CServerDlg;
    m_pMainWnd = pDlg;

    // 显示对话框
    INT_PTR nResponse = pDlg->DoModal();
    if (nResponse == IDOK)
    {
        // TODO: 在此处放置处理何时用
        //  “确定”来关闭对话框的代码
    }
    else if (nResponse == IDCANCEL)
    {
        // TODO: 在此处放置处理何时用
        //  “取消”来关闭对话框的代码
    }

    // 释放 Winsock
    WSACleanup();

    return FALSE;
}

// CServerApp 退出清理

int CServerApp::ExitInstance()
{
    // 关闭服务器套接字
    if (serverSocket != INVALID_SOCKET)
        closesocket(serverSocket);

    return CWinApp::ExitInstance();
}

上述代码中，ListenThread函数是用来监听新客户端连接的线程函数，ClientThread函数是用来处理客户端消息的线程函数。AddMessage、AddClient和RemoveClient是CServerDlg类中的成员函数，用于向聊天室中添加消息和管理客户端列表。CServerDlg类可以使用MFC资源编辑器创建，包含一个列表框和一个编辑框，用于显示消息和输入消息。在DoModal函数中，我们创建了一个CServerDlg实例并显示它，等待用户操作。在程序退出时，我们需要关闭服务器套接字并释放Winsock库。

注：本代码仅供参考，具体实现还需要根据实际情况进行修改和完善。