clientdlg.cpp

单点登录源代码

// ClientDlg.cpp : 实现文件
//

#include "stdafx.h"
#include "Client.h"
#include "ClientDlg.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#endif

#define WM_MY_UPDATEDATA (WM_USER + 110)

void CString2Char(char* lpStr,int nLen,CString s);
void Encrypt(char* strPlainText,char* strKey);
void Decrypt(char* strCypherText,char* strKey);
void GetKey(const char* szLeft,char* szKey);
void GetName(const char* szLeft,char* szName);
void TimeIncreator(char* lpszTime);
void GetTime(char* lpszTime);

DWORD WINAPI ThreadProc(LPVOID lpParam);
// 用于应用程序“关于”菜单项的 CAboutDlg 对话框

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

// 对话框数据
	enum { IDD = IDD_ABOUTBOX };

	protected:
	virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV 支持

// 实现
protected:
	DECLARE_MESSAGE_MAP()
};

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

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

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
END_MESSAGE_MAP()


// CClientDlg 对话框




CClientDlg::CClientDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CClientDlg::IDD, pParent)
	, m_sGet(_T(""))
	, m_sSend(_T(""))
	, m_SelfPort(8081)
	, m_OtherPort(8082)
	, m_sIP(_T("127.0.0.1"))
	, m_sSelfKey(_T(""))
	, m_sMyName(_T(""))
{
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
	strcpy(szKeyAB,"260000");
}

CClientDlg::~CClientDlg()
{
	closesocket(m_sockClient);
	WSACleanup();
}

void CClientDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	DDX_Text(pDX, IDC_EDIT1, m_sGet);
	DDX_Text(pDX, IDC_EDIT2, m_sSend);
	DDX_Text(pDX, IDC_EDIT3, m_SelfPort);
	DDX_Text(pDX, IDC_EDIT4, m_OtherPort);
	DDX_Text(pDX, IDC_EDIT5, m_sIP);
	DDX_Text(pDX, IDC_EDIT6, m_sSelfKey);
	DDX_Text(pDX, IDC_EDIT7, m_sMyName);
}

BEGIN_MESSAGE_MAP(CClientDlg, CDialog)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	//}}AFX_MSG_MAP
	ON_BN_CLICKED(IDC_BUTTON2, &CClientDlg::OnBnClickedButton2)
	ON_BN_CLICKED(IDC_BUTTON1, &CClientDlg::OnBnClickedButton1)
	ON_BN_CLICKED(IDC_BUTTON4, &CClientDlg::OnBnClickedButton4)
	ON_EN_CHANGE(IDC_EDIT3, &CClientDlg::OnEnChangeEdit3)
	ON_EN_CHANGE(IDC_EDIT4, &CClientDlg::OnEnChangeEdit4)
	ON_MESSAGE(WM_MY_UPDATEDATA,&CClientDlg::MyUpdatedata)
	ON_EN_CHANGE(IDC_EDIT5, &CClientDlg::OnEnChangeEdit5)
	ON_EN_CHANGE(IDC_EDIT6, &CClientDlg::OnEnChangeEdit6)
	ON_EN_CHANGE(IDC_EDIT7, &CClientDlg::OnEnChangeEdit7)
END_MESSAGE_MAP()


// CClientDlg 消息处理程序

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

	// 将“关于...”菜单项添加到系统菜单中。

	// IDM_ABOUTBOX 必须在系统命令范围内。
	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);
		}
	}

	// 设置此对话框的图标。当应用程序主窗口不是对话框时，框架将自动
	//  执行此操作
	SetIcon(m_hIcon, TRUE);			// 设置大图标
	SetIcon(m_hIcon, FALSE);		// 设置小图标

	// TODO: 在此添加额外的初始化代码
	m_szRecBuffer[0] = '\0';
	m_szSendBuffer[0] = '\0';

	m_wVersionRequested = MAKEWORD(1,1);

	m_nErr = WSAStartup(m_wVersionRequested,&m_wsaData);
	if(m_nErr != 0)
	{
		AfxMessageBox(_T("加载套接字库失败！"));
	}
	
	if(LOBYTE(m_wsaData.wVersion) != 1 || HIBYTE(m_wsaData.wVersion) != 1)
	{
		AfxMessageBox(_T("加载套接字库版本错误！"));
		WSACleanup();
	}

	return TRUE;  // 除非将焦点设置到控件，否则返回 TRUE
}

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

// 如果向对话框添加最小化按钮，则需要下面的代码
//  来绘制该图标。对于使用文档/视图模型的 MFC 应用程序，
//  这将由框架自动完成。

void CClientDlg::OnPaint()
{
	if (IsIconic())
	{
		CPaintDC dc(this); // 用于绘制的设备上下文

		SendMessage(WM_ICONERASEBKGND, reinterpret_cast<WPARAM>(dc.GetSafeHdc()), 0);

		// 使图标在工作矩形中居中
		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;

		// 绘制图标
		dc.DrawIcon(x, y, m_hIcon);
	}
	else
	{
		CDialog::OnPaint();
	}
}

//当用户拖动最小化窗口时系统调用此函数取得光标显示。
//
HCURSOR CClientDlg::OnQueryDragIcon()
{
	return static_cast<HCURSOR>(m_hIcon);
}


void CClientDlg::OnBnClickedButton2()
{
	// TODO: 在此添加控件通知处理程序代码
	int i;
	CString sAppend;

	sAppend.Format(_T("\r\n正在建立连接到%s端口%d......"),m_sIP,m_OtherPort);
	m_sGet.Append(sAppend);
	UpdateData(FALSE);
	//创建套接字
	m_sockClient = socket(AF_INET,SOCK_STREAM,0);
	if(m_sockClient == INVALID_SOCKET)
	{
		AfxMessageBox(_T("socket()调用失败！"));
		return;
	}
	for(i=0;i<m_sIP.GetLength()&&i<16;i++)
	{
		m_szIP[i] = m_sIP.GetAt(i);
	}
	m_szIP[i] = '\0';
	m_addrSrv.sin_addr.S_un.S_addr = inet_addr(m_szIP);
	m_addrSrv.sin_family = AF_INET;
	m_addrSrv.sin_port = htons((u_short)m_OtherPort);
	//向服务器发出连接请求
	connect(m_sockClient,(SOCKADDR*)&m_addrSrv,(int)sizeof(SOCKADDR));

	wsprintfA(m_szSendBuffer,"Client requesting for connection..");
	send(m_sockClient,m_szSendBuffer,CharLen(m_szSendBuffer)+1,0);
	m_szRecBuffer[0] = '\0';
	recv(m_sockClient,m_szRecBuffer,500,0);
	if(m_szRecBuffer[0])
	{
		CString sGet(m_szRecBuffer);
		m_sGet += _T("\r\n");
		m_sGet += sGet;
		UpdateData(FALSE);
	}
	closesocket(m_sockClient);
}

DWORD WINAPI ThreadProc(LPVOID lpParam)
{
	CClientDlg* pDlg;
	pDlg = (CClientDlg*)lpParam;
	//加载套接字库
	WORD wVersionRequested;
	WSADATA wsaData;
	int nErr;

	wVersionRequested = MAKEWORD(1,1);

	nErr = WSAStartup(wVersionRequested,&wsaData);
	if(nErr != 0)
	{
		AfxMessageBox(_T("加载套接字库失败！"));
		return 0;
	}
	
	if(LOBYTE(wsaData.wVersion) != 1 || HIBYTE(wsaData.wVersion) != 1)
	{
		WSACleanup();
		return 0;
	}

	//创建用于监听的套接字
	SOCKET sockSrv = socket(AF_INET,SOCK_STREAM,0);
	if(sockSrv == INVALID_SOCKET)
	{
		AfxMessageBox(_T("socket()调用失败！"));
		return 0;
	}
	SOCKADDR_IN addrSrv;
	addrSrv.sin_addr.S_un.S_addr = htonl(INADDR_ANY);
	addrSrv.sin_family=AF_INET;
	addrSrv.sin_port = htons((u_short)pDlg->m_SelfPort);

	//绑定套接字
	bind(sockSrv,(SOCKADDR*)&addrSrv,sizeof(SOCKADDR));
	//将套接字设为监听模式，准备接受客户请求
	listen(sockSrv,5);

	SOCKADDR_IN addrClient;
	int nLen = sizeof(SOCKADDR);
	SOCKET sockConn;

	while(TRUE)
	{
		Sleep(10);
		sockConn = accept(sockSrv,(SOCKADDR*)&addrClient,&nLen);
		//发送数据
		//wsprintfA(pDlg->szSendBuffer,"Welcom %s to server",inet_ntoa(addrClient.sin_addr));
		//send(sockConn,pDlg->szSendBuffer,(int)strlen(pDlg->szSendBuffer)+1,0);
		//接收数据
		pDlg->m_szRecBuffer[0] = '\0';
		recv(sockConn,pDlg->m_szRecBuffer,500,0);
		if(pDlg->m_szRecBuffer[0])
		{
			pDlg->m_sGet += _T("\r\n");
			CString sRec(pDlg->m_szRecBuffer);
			if(sRec.Find(_T("p5"))!=-1 || sRec.Find(_T("P5"))!=-1)//Bob
			{
				pDlg->m_sGet += sRec;
				sRec = sRec.Mid(3);
				pDlg->sLeft = sRec.Left(sRec.Find(',',sRec.Find(',')+1));
				//AfxMessageBox(pDlg->sLeft+_T("\r\n"));
				pDlg->sRight = sRec.Mid(sRec.Find(',',sRec.Find(',')+1)+1);
				//AfxMessageBox(pDlg->sRight+_T("\r\n"));
				CString2Char(pDlg->szLeft,500,pDlg->sLeft);
				CString2Char(pDlg->szRight,500,pDlg->sRight);
				CString2Char(pDlg->szMyKey,7,pDlg->m_sSelfKey);
				Decrypt(pDlg->szLeft,pDlg->szMyKey);
				GetKey(pDlg->szLeft,pDlg->szKeyAB);
				//CString s(pDlg->szKeyAB);
				//AfxMessageBox(s);
				GetName(pDlg->szLeft,pDlg->szSenderName);
				//CString sss(pDlg->szSenderName);
				//AfxMessageBox(sss);
				Decrypt(pDlg->szRight,pDlg->szKeyAB);
				//CString ss(pDlg->szRight);
				//AfxMessageBox(ss);
				TimeIncreator(pDlg->szRight);
				Encrypt(pDlg->szRight,pDlg->szKeyAB);
				wsprintfA(pDlg->m_szSendBuffer,"p6;%s",pDlg->szRight);
				send(sockConn,pDlg->m_szSendBuffer,(int)strlen(pDlg->m_szSendBuffer)+1,0);
			}
			else
			{
				Decrypt(pDlg->m_szRecBuffer,pDlg->szKeyAB);
				CString sMsg(pDlg->m_szRecBuffer);
				pDlg->m_sGet.Append(sMsg);

			}
			PostMessage(pDlg->m_hWnd,WM_MY_UPDATEDATA,0,0);
		}
		//关闭套接字
		closesocket(sockConn);
	}

	closesocket(sockSrv);
	WSACleanup();
	return 0;
}
void CClientDlg::OnBnClickedButton1()  //发送消息
{
	// TODO: 在此添加控件通知处理程序代码
	int i;

	m_sockClient = socket(AF_INET,SOCK_STREAM,0);
	if(m_sockClient == INVALID_SOCKET)
	{
		AfxMessageBox(_T("socket()调用失败！"));
		return;
	}
	connect(m_sockClient,(SOCKADDR*)&m_addrSrv,(int)sizeof(SOCKADDR));
	UpdateData(TRUE);
	for(i=0;i<m_sSend.GetLength()&&i<499;i++)
	{
		m_szSendBuffer[i] = m_sSend.GetAt(i);
	}
	m_szSendBuffer[i] = '\0';
	if(m_sSend.Find(_T("p3")) != -1 || m_sSend.Find(_T("P3")) != -1)
	{
		GetTime(szTime);
		Encrypt(szTime,szKeyS);
		strcpy(szSenderName,m_szSendBuffer+3);
		wsprintfA(m_szSendBuffer,"p3;%s,%s,%s",szSendToTGS,szSenderName,szTime);
	}
	else if(m_sSend.Find(_T("p5")) != -1 || m_sSend.Find(_T("P5")) != -1)
	{
		GetTime(szTime);
		Encrypt(szTime,szKeyAB);
		wsprintfA(m_szSendBuffer,"p5;%s,%s",szSendToBob,szTime);
	}
	else if(m_sSend.Find(_T("p1")) != -1 || m_sSend.Find(_T("P1")) != -1 || m_sSend.Find(_T("p3")) != -1 || m_sSend.Find(_T("P3")) != -1)
	{
		//Do nothing