simpleserverdlg.cpp

“基本套接字实现基本聊天功能”,教学示例使用。

// SimpleServerDlg.cpp : implementation file
//

#include "stdafx.h"
#include "SimpleServer.h"
#include "SimpleServerDlg.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif
//全局变量之家
CString ChatInfo;  //存储短消息内容
BOOL ChatEnable;   //聊天开关，TRUE时可以聊天，登陆成功前为FALSE
CString ListInfo;  //---聊天信息列表——服务端的好处，
                    //---在“我的聊天程序”中，客户端也能享受这种好处了

//////////////////发送数据函数///////////////////////
//其中send(m_socket,ChatInfo,ChatInfo.GetLength(),0)是库函数调用
//该库函数第一个参数为标志已连接套接口的描述字，
//第二个参数为待发送数据的缓冲区，第三个参数为缓冲区长度，第四个为调用执行方式
DWORD WINAPI Sendthread(LPVOID lpparam)
{
	SOCKET  m_socket=(SOCKET)lpparam;
	int ret;
	while(1)
	{
		if (ChatInfo.GetLength()>0)
		{
			ret=send(m_socket,ChatInfo,ChatInfo.GetLength(),0);
			if(ret==SOCKET_ERROR)
			{
				ListInfo=_T("服务器:Data send error!");
				return -1;
		    }
			ListInfo=_T("服务器：");
			ListInfo+=ChatInfo;
			ChatInfo.Empty();			
		 }
	}
}


/////////////////////线程接收API函数///////////////////////
//参数为套接字句柄，其中最重要的子函数为recv()库函数//
DWORD WINAPI Recvthread(LPVOID lpparam)
{
	SOCKET  m_socket=(SOCKET)lpparam;  //创建接收数据的套接字
	int ret;
	char buff[256];   //创建接收数据的缓冲区
	ret = recv(m_socket, buff, 256, 0);//库函数，从一个套接口接收数据
		//recv()函数对SOCk_STREAM类型的套接口，返回所有有用信息  
	if(ret == SOCKET_ERROR)
	{
		ListInfo=_T("Recv data error!");
		return -1;
	}

	//处理登陆用户和密码
	char* name = NULL;
	char* pass = NULL;
	int len = 0;
	len = buff[0];
	name = new char[len + 1];
	for(int i = 0; i < len; i++)
		name[i] = buff[i+1];
	int len2 = buff[len + 1];
	pass = new char[len2 + 1];
	for(i = 0; i < len2; i++)
		pass[i] = buff[i + 2 + len];
	pass[len2] = '\0';
	name[len] = '\0';

	CString str;
	if(strcmp(name, "maoy") != 0)
	{
		ChatInfo = _T("用户名不正确!");
	}
	else
	{
		if(strcmp(pass, "maoyue") != 0)
		{
			ChatInfo = _T("密码不正确!");
		}
	}
	if(ChatInfo.IsEmpty())
	{
		ChatInfo = _T("登陆成功，现在可以使用短信功能!");
		ChatEnable=TRUE;
	}
		delete [] name;
		delete [] pass;
	//接收消息
		while(1)
		{
			ret=recv(m_socket,buff,256,0);
			if(ret==SOCKET_ERROR)
			{
				ListInfo=_T("Socket Receive Error!");
				closesocket (m_socket);
				return -1;
			}
			buff[ret]='\0';
			CString str;
			str="客户端:";
			str=str+buff;
			ListInfo=str;
		}
	
	
    	return 0;
}
////////////////线程侦听//////////////
DWORD WINAPI listenthread(LPVOID lpparam)
{	
	SOCKET  m_socket=(SOCKET)lpparam;
	int ret;
	ret=listen(m_socket,30);
    if(ret==SOCKET_ERROR)
	{
		ListInfo=_T("Listen Error!");
        return 0;
	}
	
		SOCKET s;
	    s=accept(m_socket,NULL,NULL);
	    DWORD dwthread;
    	::CreateThread(NULL,0,Recvthread,(LPVOID)s,0,&dwthread);	
		::CreateThread(NULL,0,Sendthread,(LPVOID)s,0,&dwthread);
	    return 0;

}
/////////////////////////////////////////////////////////////////////////////
// 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()

/////////////////////////////////////////////////////////////////////////////
// CSimpleServerDlg dialog

CSimpleServerDlg::CSimpleServerDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CSimpleServerDlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CSimpleServerDlg)
	m_list = "";
	//}}AFX_DATA_INIT
	// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
	m_hSocket = NULL;
	isServerStart=FALSE;
	ChatEnable=FALSE;
	
	
}

void CSimpleServerDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CSimpleServerDlg)
	DDX_Text(pDX,IDC_LIST, m_list);
	DDX_Text(pDX,IDC_MSG,m_msg);
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CSimpleServerDlg, CDialog)
	//{{AFX_MSG_MAP(CSimpleServerDlg)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_WM_DESTROY()
	ON_BN_CLICKED(IDC_BUTTON1, OnSendMSG)
	ON_WM_TIMER()
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CSimpleServerDlg message handlers

BOOL CSimpleServerDlg::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
	
	StartUp();
	
	return TRUE;  // return TRUE  unless you set the focus to a control
}

void CSimpleServerDlg::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 CSimpleServerDlg::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 CSimpleServerDlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}

void CSimpleServerDlg::OnOK() 
{
    
	if(isServerStart)
	{
		closesocket(m_hSocket);
		m_hSocket = NULL;
		return;
	}
	else
	{
		list=(CListBox*)this->GetDlgItem(IDC_LIST);
		m_hSocket = socket(AF_INET, SOCK_STREAM,0); //参数0表示ip相关
		
		if(m_hSocket==INVALID_SOCKET)
		{			
			list->AddString("Socket Create Error!");
			return ;
		}
		list->AddString("服务器：Socket 创建完毕!");
	}
	
	m_addr.sin_family = AF_INET;  //常量AF_INET一般取2
	m_addr.sin_addr.S_un.S_addr = INADDR_ANY;
	m_addr.sin_port = htons(1028);   //端口设置
    int ret = 0;
	int error = 0;
	ret = bind(m_hSocket, (LPSOCKADDR)&m_addr, sizeof(m_addr));  //邦定端口
	if(ret == SOCKET_ERROR)
	{
		list->AddString("服务器：Bind Error!");
		return ;
	}
	list->AddString("服务器：Socket 绑定完毕!");
	SetTimer(1,500,NULL);
	DWORD dwthread;
	::CreateThread(NULL,0,listenthread,(LPVOID)m_hSocket,0,&dwthread);	
	isServerStart=TRUE;
}

void CSimpleServerDlg::StartUp()
{
	WSADATA wsaData;
	WORD version = MAKEWORD(2, 0);
	int ret = WSAStartup(version, &wsaData);
	if(ret != 0)
	{
		m_list="Initilize Error!\n";   
		UpdateData(FALSE);
	}
}

void CSimpleServerDlg::CleanUp()
{
	if (WSACleanup() != 0)
	{
		m_list="UnInitilize Error!\n";   
		UpdateData(FALSE);
	}
}

void CSimpleServerDlg::OnDestroy() 
{
	CDialog::OnDestroy();
	if(m_hSocket!=NULL)
	{
		closesocket(m_hSocket);
		m_hSocket=NULL;
	}
	CleanUp();	
}

void CSimpleServerDlg::OnSendMSG() 
{
	if(ChatEnable)
	{
		UpdateData();
		ChatInfo="发向客户端的消息为：";
		ChatInfo+=m_msg;
		m_msg.Empty();
		UpdateData(FALSE);
	}
	else
		AfxMessageBox("连接尚未建立，请先建立连接!");
}

void CSimpleServerDlg::OnTimer(UINT nIDEvent) 
{
	if(!ListInfo.IsEmpty())
	{
        list->AddString(ListInfo);				
		ListInfo.Empty();
	}
	
	CDialog::OnTimer(nIDEvent);
}