wsachatdlg.cpp

一个漂亮的聊天对话框程序

// WSAChatDlg.cpp : implementation file
//

#include "stdafx.h"
#include "WSAChat.h"
#include "WSAChatDlg.h"

#include "mmsystem.h"
#pragma comment(lib, "winmm.lib")

#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()

/////////////////////////////////////////////////////////////////////////////
// CWSAChatDlg dialog

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

CWSAChatDlg::~CWSAChatDlg()
{
	if(m_socket)
		closesocket(m_socket);
}

void CWSAChatDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CWSAChatDlg)
	DDX_Control(pDX, IDC_EDIT_RECV, m_editRecv);
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CWSAChatDlg, CDialog)
	//{{AFX_MSG_MAP(CWSAChatDlg)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_BN_CLICKED(IDC_BTN_SEND, OnBtnSend)
	ON_WM_CTLCOLOR()
	ON_WM_SHOWWINDOW()
	//}}AFX_MSG_MAP
	ON_MESSAGE(UM_SOCK,OnSock)
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CWSAChatDlg message handlers

BOOL CWSAChatDlg::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
	InitSocket();//初始化套接字

	return TRUE;  // return TRUE  unless you set the focus to a control
}

void CWSAChatDlg::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 CWSAChatDlg::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();
	}
}

// The system calls this to obtain the cursor to display while the user drags
//  the minimized window.
HCURSOR CWSAChatDlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}

BOOL CWSAChatDlg::InitSocket()
{
	m_socket=WSASocket(AF_INET,SOCK_DGRAM,0,NULL,0,0);
	if(INVALID_SOCKET==m_socket)
	{
		MessageBox("创建套接字失败!");
		return false;
	}

	SOCKADDR_IN addrSock;
	addrSock.sin_addr.S_un.S_addr=htonl(INADDR_ANY);
	addrSock.sin_family=AF_INET;
	addrSock.sin_port=htons(6000);
	if(SOCKET_ERROR==bind(m_socket,(SOCKADDR*)&addrSock,sizeof(SOCKADDR)))
	{
	//	MessageBox("绑定套接字失败!");
		return false;
	}

	if(SOCKET_ERROR==WSAAsyncSelect(m_socket,m_hWnd,UM_SOCK,FD_READ))
	{
		MessageBox("注册网络读取事件失败!");
		return false;
	}

	return true;
}

void CWSAChatDlg::OnSock(WPARAM wParam,LPARAM lParam)
{
	 switch(LOWORD(lParam))
	 {
	 case FD_READ:
		 WSABUF wsabuf;
		 wsabuf.buf=new char[200];
		 wsabuf.len=200;
		 DWORD dwRead;
		 DWORD dwFlag=0;
		 SOCKADDR_IN addrFrom;
		 int len=sizeof(SOCKADDR);
		 CString str,strTemp;
		 if(SOCKET_ERROR==WSARecvFrom(m_socket,&wsabuf,1,&dwRead,&dwFlag,
				(SOCKADDR*)&addrFrom,&len,NULL,NULL))
		 {
			MessageBox("接受数据失败!");
			return;
		 }
		 
		 CTime timeNow=CTime::GetCurrentTime();
		 CString strTime=timeNow.Format("%H:%M");
		 
		 str.Format("%s %s\r\n    %s ",inet_ntoa(addrFrom.sin_addr),strTime,wsabuf.buf);
		 str+="\r\n";
		 GetDlgItemText(IDC_EDIT_RECV,strTemp);
		 str+=strTemp;
		 SetDlgItemText(IDC_EDIT_RECV,str);

		 PlaySound("res\\msg.wav",NULL,SND_FILENAME | SND_ASYNC);

		 break;
	 }
}

void CWSAChatDlg::OnBtnSend() 
{
	// TODO: Add your control notification handler code here
	DWORD dwIP;
	CString strHostName;
	SOCKADDR_IN addrTo;
	HOSTENT* pHost;

	if(GetDlgItemText(IDC_EDIT_HOSTNAME,strHostName),""==strHostName)
	{
		((CIPAddressCtrl*)GetDlgItem(IDC_IPADDRESS))->GetAddress(dwIP);
		addrTo.sin_addr.S_un.S_addr=htonl(dwIP);		
	}
	else
	{
		if(pHost=gethostbyname(strHostName),NULL==pHost)
		{
			MessageBox("Host name Error!");
			return;
		}
		addrTo.sin_addr.S_un.S_addr=*((DWORD*)pHost->h_addr_list[0]);
	}

	addrTo.sin_family=AF_INET;
	addrTo.sin_port=htons(6000);

	CString strSend;
	GetDlgItemText(IDC_EDIT_SEND,strSend);
	int len=strSend.GetLength();
	DWORD dwSend;
	WSABUF wsabuf;
	wsabuf.buf=strSend.GetBuffer(len);
	wsabuf.len=len+1;

	if(SOCKET_ERROR==WSASendTo(m_socket,&wsabuf,1,&dwSend,0,
			(SOCKADDR*)&addrTo,sizeof(SOCKADDR),NULL,NULL))
	{
		MessageBox("发送数据失败!");
		return;
	}

	CTime timeNow=CTime::GetCurrentTime();
	CString strTime=timeNow.Format("%H:%M");

	CString strTemp,str;
	GetDlgItemText(IDC_EDIT_RECV,strTemp);
	str.Format("%s %s\r\n    %s  ",inet_ntoa(addrTo.sin_addr),strTime,strSend);
	str+="\r\n";
	str+=strTemp;
	SetDlgItemText(IDC_EDIT_RECV,str);

	SetDlgItemText(IDC_EDIT_SEND,"");
	::SetFocus(::GetDlgItem(m_hWnd,IDC_EDIT_SEND));
}

HBRUSH CWSAChatDlg::OnCtlColor(CDC* pDC, CWnd* pWnd, UINT nCtlColor) 
{
	HBRUSH hbr =CDialog::OnCtlColor(pDC, pWnd, nCtlColor);

	if(pWnd->GetDlgCtrlID()==IDC_EDIT_RECV)
	{
		static HBRUSH hbrEdit=::CreateSolidBrush(RGB(128,255,128));
		pDC->SetBkColor(RGB(128,255,128));
//		pDC->SetTextColor(RGB(0,0,255));
		return hbrEdit;
	}
	
/*	if(CTLCOLOR_BTN==nCtlColor)
	{
		static HBRUSH hbrBtn=::CreateSolidBrush(RGB(0,0,0));
		pDC->SetBkColor(RGB(0,0,0));
		pDC->SetTextColor(RGB(0,0,0));
		return hbrBtn;
	}
*/
	return hbr;
}

void CWSAChatDlg::OnShowWindow(BOOL bShow, UINT nStatus) 
{
	CDialog::OnShowWindow(bShow, nStatus);

	char szName[20];
	gethostname(szName,20);

	SetDlgItemText(IDC_EDIT_HOSTNAME,szName);

	CenterWindow();//使窗口居中
	AnimateWindow(m_hWnd,2000,AW_BLEND);
	Invalidate();//有点水平啦
}