serverdlg.cpp

来自「简单的聊天程序」· C++ 代码 · 共 402 行

// serverDlg.cpp : implementation file
//

#include "stdafx.h"
#include "server.h"
#include "serverDlg.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// CAboutDlg dialog used for App About

class CAboutDlg : public CDialog
{
public:
	CAboutDlg();

// Dialog Data
	//{{AFX_DATA(CAboutDlg)
	enum { IDD = IDD_ABOUTBOX };
	//}}AFX_DATA

	// ClassWizard generated virtual function overrides
	//{{AFX_VIRTUAL(CAboutDlg)
	protected:
	virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV support
	//}}AFX_VIRTUAL

// Implementation
protected:
	//{{AFX_MSG(CAboutDlg)
	//}}AFX_MSG
	DECLARE_MESSAGE_MAP()
};

CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
{
	//{{AFX_DATA_INIT(CAboutDlg)
	//}}AFX_DATA_INIT
}

void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CAboutDlg)
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
	//{{AFX_MSG_MAP(CAboutDlg)
		// No message handlers
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CServerDlg dialog

CServerDlg::CServerDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CServerDlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CServerDlg)
	m_port = 0;
	//}}AFX_DATA_INIT
	// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
	m_serverON=FALSE;
}

void CServerDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CServerDlg)
	DDX_Control(pDX, IDC_EDIT, m_send_message);
	DDX_Control(pDX, IDC_EDIT1, m_message);
	DDX_Text(pDX, IDC_EDIT2, m_port);
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CServerDlg, CDialog)
	//{{AFX_MSG_MAP(CServerDlg)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_BN_CLICKED(IDC_START_SERVER_BUTTON, OnStartServerButton)
	ON_WM_DESTROY()
	ON_BN_CLICKED(IDC_SEND_BUTTON, OnSendButton)
	//}}AFX_MSG_MAP
	ON_MESSAGE(WM_CLIENT_ACCEPT,OnClientAccept)
	ON_MESSAGE(WM_CLIENT_MESSAGE,OnClientMessage)
	ON_MESSAGE(WM_CLIENT_READ,OnClientRead)
	ON_MESSAGE(WM_CLIENT_CLOSE,OnClientClose)
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CServerDlg message handlers

BOOL CServerDlg::OnInitDialog()
{
	CDialog::OnInitDialog();

	// Add "About..." menu item to system menu.

	// IDM_ABOUTBOX must be in the system command range.
	ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
	ASSERT(IDM_ABOUTBOX < 0xF000);

	CMenu* pSysMenu = GetSystemMenu(FALSE);
	if (pSysMenu != NULL)
	{
		CString strAboutMenu;
		strAboutMenu.LoadString(IDS_ABOUTBOX);
		if (!strAboutMenu.IsEmpty())
		{
			pSysMenu->AppendMenu(MF_SEPARATOR);
			pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
		}
	}

	// Set the icon for this dialog.  The framework does this automatically
	//  when the application's main window is not a dialog
	SetIcon(m_hIcon, TRUE);			// Set big icon
	SetIcon(m_hIcon, FALSE);		// Set small icon
	
	// TODO: Add extra initialization here
	m_port=5600;
	UpdateData(FALSE);
	OnStartServerButton();
	return TRUE;  // return TRUE  unless you set the focus to a control
}

void CServerDlg::OnSysCommand(UINT nID, LPARAM lParam)
{
	if ((nID & 0xFFF0) == IDM_ABOUTBOX)
	{
		CAboutDlg dlgAbout;
		dlgAbout.DoModal();
	}
	else
	{
		CDialog::OnSysCommand(nID, lParam);
	}
}

// If you add a minimize button to your dialog, you will need the code below
//  to draw the icon.  For MFC applications using the document/view model,
//  this is automatically done for you by the framework.

void CServerDlg::OnPaint() 
{
	if (IsIconic())
	{
		CPaintDC dc(this); // device context for painting

		SendMessage(WM_ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0);

		// Center icon in client rectangle
		int cxIcon = GetSystemMetrics(SM_CXICON);
		int cyIcon = GetSystemMetrics(SM_CYICON);
		CRect rect;
		GetClientRect(&rect);
		int x = (rect.Width() - cxIcon + 1) / 2;
		int y = (rect.Height() - cyIcon + 1) / 2;

		// Draw the icon
		dc.DrawIcon(x, y, m_hIcon);
	}
	else
	{
		CDialog::OnPaint();
	}
}
void CServerDlg::OnDestroy() 
{
	CDialog::OnDestroy();
	
	// TODO: Add your message handler code here
	POSITION pos=m_socket_list.GetHeadPosition();
	while(pos!=NULL)
	{
		CMySocket *pdata=m_socket_list.GetNext(pos);
		delete pdata;
	}
	m_socket_list.RemoveAll();
}
// The system calls this to obtain the cursor to display while the user drags
//  the minimized window.
HCURSOR CServerDlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}
//////////////////////////////////////////////////////////////////////////////////////////
void CServerDlg::AddMessageToMessageBar(CString strMessage)
{
	CTime tm=CTime::GetCurrentTime();
	CString strTime=tm.Format("[%Y-%m-%d %H:%M:%S]");

	CString str;
	m_message.GetWindowText(str);

	str=strTime+strMessage+"\r\n"+str;

	m_message.SetWindowText(str);
}
void CServerDlg::OnStartServerButton() 
{
	CWaitCursor waitcursor;
	Startserver();
}
CMySocket* CServerDlg::GetCurMessageSocket(SOCKET socket)
{
	CMySocket *pMySocket=NULL;
	POSITION pos=m_socket_list.GetHeadPosition();
	while(pos!=NULL)
	{
		CMySocket *pdata=m_socket_list.GetNext(pos);
		if(pdata->m_clientSocket==socket)
		{
			pMySocket=pdata;
			break;
		}
	}
	return pMySocket;
}
//打开服务台
int CServerDlg::Startserver()
{
	if(m_serverON)return 0;
	if(!UpdateData(TRUE))return -1;

	WSADATA wsaData;
	int iErrorCode;
	char chInfo[64];

	if(WSAStartup(WINSOCK_VERSION,&wsaData))
	{
		MessageBeep(MB_ICONSTOP);
		AddMessageToMessageBar("打开服务失败！");
		WSACleanup();
		return 1;
	}

	WSACleanup();

	if(gethostname(chInfo,sizeof(chInfo)))
	{
		MessageBeep(MB_ICONSTOP);
		AddMessageToMessageBar("获取主机失败");
		return 2;
	}

	m_serverSocket=socket(PF_INET,SOCK_STREAM,DEFAULT_PROTOCOL);
	if(m_serverSocket==INVALID_SOCKET)
	{
		MessageBeep(MB_ICONSTOP);
		AddMessageToMessageBar("创建SOCKET失败");
		return 3;
	}

	m_serverAddress.sin_family=AF_INET;
	m_serverAddress.sin_addr.s_addr=INADDR_ANY;
	m_serverAddress.sin_port=htons(m_port);

	if(bind(m_serverSocket,(LPSOCKADDR)&m_serverAddress,
		sizeof(m_serverAddress))==SOCKET_ERROR)
	{
		MessageBeep(MB_ICONSTOP);
		AddMessageToMessageBar("端口邦定失败");
		return 4;
	}

	iErrorCode=WSAAsyncSelect(m_serverSocket,m_hWnd,WM_CLIENT_ACCEPT,FD_ACCEPT);
	if(iErrorCode==SOCKET_ERROR)
	{
		MessageBeep(MB_ICONSTOP);
		AddMessageToMessageBar("设定事件失败");
		return 5;
	}

	iErrorCode=listen(m_serverSocket,1);
	if(iErrorCode==SOCKET_ERROR)
	{
		MessageBeep(MB_ICONSTOP);
		AddMessageToMessageBar("创建侦听失败");
		return 6;
	}

	m_serverON=TRUE;
	AddMessageToMessageBar(chInfo);
	AddMessageToMessageBar("服务已经打开了!");

	return 0;
}
////////////////////////////////////////////////////////////////////////////////////////
//消息函数
LRESULT CServerDlg::OnClientAccept(WPARAM wParam,LPARAM lParam)
{
	if(WSAGETSELECTERROR(lParam))
	{
		AddMessageToMessageBar("Error:error socket entry");
		return 0L;
	}
	if(WSAGETSELECTEVENT(lParam)==FD_ACCEPT)
	{
		CMySocket *pSocket=new CMySocket;
		pSocket->m_clientSocket=accept(m_serverSocket,(LPSOCKADDR)&pSocket->m_clientAddress,
			&pSocket->m_nLength);
		if(pSocket->m_clientSocket!=INVALID_SOCKET)
		{
			pSocket->m_posSocket=m_socket_list.AddTail(pSocket);
			WSAAsyncSelect(pSocket->m_clientSocket,m_hWnd,WM_CLIENT_MESSAGE,FD_READ|FD_CLOSE);
			AddMessageToMessageBar("接收到一个用户");
		}
		else
		{
			AddMessageToMessageBar("accept error");
			delete pSocket;
		}
	}
	return 1L;
}
LRESULT CServerDlg::OnClientMessage(WPARAM wParam,LPARAM lParam)
{
	switch(WSAGETSELECTEVENT(lParam))
	{
	case FD_READ:
		SendMessage(WM_CLIENT_READ,wParam,lParam);
		break;
	case FD_CLOSE:
		SendMessage(WM_CLIENT_CLOSE,wParam,lParam);
		break;
	}
	return 1L;
}
LRESULT CServerDlg::OnClientRead(WPARAM wParam,LPARAM lParam)
{
	CMySocket *pMySocket=GetCurMessageSocket(wParam);
	if(!pMySocket)return 0L;
	int nLength=recv(pMySocket->m_clientSocket,(LPSTR)pMySocket->buf,sizeof(pMySocket->buf),0);
	if(nLength>0)
	{
		CString str;
		str.Format("接收到消息：[%s]",pMySocket->buf);
		AddMessageToMessageBar(str);
		pMySocket->Init();
	}
	return 1L;
}
LRESULT CServerDlg::OnClientClose(WPARAM wParam,LPARAM lParam)
{
	int iErrorCode;
	CMySocket *pMySocket=GetCurMessageSocket(wParam);
	if(!pMySocket)return 0L;

	iErrorCode=closesocket(pMySocket->m_clientSocket);
	pMySocket->m_clientSocket=INVALID_SOCKET;

	if(iErrorCode==SOCKET_ERROR)
	{
		AddMessageToMessageBar("关闭SOCKET失败");
	}
	else
	{
		m_socket_list.RemoveAt(pMySocket->m_posSocket);
		delete pMySocket;
		AddMessageToMessageBar("关闭SOCKET成功");
	}
	return 1L;
}

void CServerDlg::OnSendButton() 
{
	POSITION pos=m_socket_list.GetHeadPosition();
	while(pos!=NULL)
	{
		CMySocket *pdata=m_socket_list.GetNext(pos);
		SendMessageToClient(pdata);
	}	
}

BOOL CServerDlg::SendMessageToClient(CMySocket *pMySocket)
{
	pMySocket->m_nLength=m_send_message.GetWindowText((char*)pMySocket->buf,sizeof(pMySocket->buf));
	if(pMySocket->m_nLength==0)
	{
		AddMessageToMessageBar("不能发送空消息！");
		return FALSE;
	}
	int iErrorCode=send(pMySocket->m_clientSocket,(LPSTR)pMySocket->buf,pMySocket->m_nLength,0);
	if(iErrorCode==SOCKET_ERROR)
	{
		CString str;
		str.Format("发送消息[%s]失败",pMySocket->buf);
		AddMessageToMessageBar(str);
	}
	pMySocket->Init();
	return TRUE;
}