mypingdlg.cpp

来自「Visual_C++.NET实用编程百例」· C++ 代码 · 共 316 行

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

#include "stdafx.h"
#include "myPing.h"
#include "myPingDlg.h"
#include ".\mypingdlg.h"
#include "afxsock.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#endif


// 用于应用程序“关于”菜单项的 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()


// CmyPingDlg 对话框



CmyPingDlg::CmyPingDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CmyPingDlg::IDD, pParent)
	, m_timeOut(0)
	, m_packetSize(0)
{
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CmyPingDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	DDX_Control(pDX, IDC_LIST2, m_listBox);
	DDX_Text(pDX, IDC_EDIT1, m_timeOut);
	DDX_Text(pDX, IDC_EDIT2, m_packetSize);
	DDX_Control(pDX, IDC_IPADDRESS1, m_IP);
}

BEGIN_MESSAGE_MAP(CmyPingDlg, CDialog)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	//}}AFX_MSG_MAP
	ON_WM_TIMER()
	ON_BN_CLICKED(IDOK, OnBnClickedOk)
END_MESSAGE_MAP()


// CmyPingDlg 消息处理程序

BOOL CmyPingDlg::OnInitDialog()
{
	CDialog::OnInitDialog();
	m_sendBuf=NULL;
	m_recBuf=NULL;

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

	// 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: 在此添加额外的初始化代码
	
	return TRUE;  // 除非设置了控件的焦点，否则返回 TRUE
}

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

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

void CmyPingDlg::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 CmyPingDlg::OnQueryDragIcon()
{
	return static_cast<HCURSOR>(m_hIcon);
}
USHORT CmyPingDlg::GetSum(USHORT *buf,int size)
{
	unsigned long ret=0;
	while(size>1)
	{
		ret+=*buf++;
		size-=sizeof(USHORT);
	}
	if(size)
		ret+=*(UCHAR*)buf;
	ret=(ret>>16)+(ret&0xffff);
	ret+=(ret>>16);
	return (USHORT)(~ret);
}

void CmyPingDlg::GetICMPPacket()
{
	char *real_send;
	ICMP_HEADER *pHead;
	pHead=(ICMP_HEADER*)m_sendBuf;
	pHead->type =ICMP_ECHO_TYPE;
	pHead->code =0;
	pHead->ID =GetCurrentProcessId();
	real_send=m_sendBuf+sizeof(ICMP_HEADER);
	memset(real_send,'z',m_dataSize-sizeof(ICMP_HEADER));
}
BOOL CmyPingDlg::AnalyseBuf()
{
	IP_HEADER *pIPHead;
	ICMP_HEADER *pICMPHead;
	pIPHead=(IP_HEADER*)m_recBuf;
	CString m_str;
	int len=pIPHead->len <<2;
	if((len+ICMP_MIN)>nRec)
	{
		m_strErr.Format (IDP_SOCKETS_ECHODATA_FAILED);
		ShowMsg(m_strErr);
		return FALSE;
	}
	pICMPHead=(ICMP_HEADER *)(m_recBuf+len);
	if(pICMPHead->type !=0)
	{
		m_strErr.Format (IDP_SOCKETS_ECHOTYPE_FAILED);
		ShowMsg(m_strErr);
		return FALSE;
	}
	if((USHORT)GetCurrentProcessId()!=pICMPHead->ID)
	{
		m_strErr.LoadString (IDP_SOCKETS_MISMATCH);
		ShowMsg(m_strErr);
		return FALSE;
	}
	m_str.Format (IDP_SOCKETS_PING_INFO,inet_ntoa(m_addrFrom.sin_addr ),nRec,GetTickCount()-((ICMP_HEADER*)m_sendBuf)->timestamp ,((IP_HEADER*)m_recBuf)->ttl );
	ShowMsg(m_str);
	return TRUE;
}

void CmyPingDlg::ShowMsg(LPCSTR lpsz)
{
	m_listBox.AddString(lpsz);
}
void CmyPingDlg::OnTimer(UINT nIDEvent)
{
	// TODO: 在此添加消息处理程序代码和/或调用默认值
	CDialog::OnTimer(nIDEvent);
	if(nPing_Count==MAX_PING_COUNT)
	{
		KillTimer(m_timer);
		closesocket(m_sock);
		return;
	}
	nPing_Count++;
	((ICMP_HEADER*)m_sendBuf)->cksum=0;
	((ICMP_HEADER*)m_sendBuf)->timestamp=GetTickCount();
	((ICMP_HEADER*)m_sendBuf)->cksum=GetSum((USHORT*)m_sendBuf,m_dataSize);
	if((nSend=sendto(m_sock,m_sendBuf,m_dataSize,0,(struct sockaddr*)&m_addrDest,sizeof(m_addrDest)))==SOCKET_ERROR)
	{
		KillTimer(m_timer);
		m_strErr.Format (IDP_SOCKETS_SEND_FAILED,WSAGetLastError());
		ShowMsg(m_strErr);
		return;
	}
	int nAddrFrom =sizeof(m_addrFrom);
	if((nRec=recvfrom(m_sock,m_recBuf,m_dataSize+MAX_IPHEADER,0,(struct sockaddr*)&m_addrFrom,&nAddrFrom))==SOCKET_ERROR)
	{
		KillTimer(m_timer);
		if(WSAGetLastError()==WSAETIMEDOUT)
		{
			m_strErr.Format (IDP_SOCKETS_TIMEOUT);
			ShowMsg(m_strErr);
			return;
		}
		else
		{
			m_strErr.Format (IDP_SOCKETS_REC_FAILED);
			ShowMsg(m_strErr);
			return;
		}
	}
	AnalyseBuf();
}
BOOL CmyPingDlg::StartPing ()
{
	nPing_Count=0;
	if(m_sendBuf!=NULL)
	{
		delete m_sendBuf;
		m_sendBuf=NULL;
	}
	if(m_recBuf!=NULL)
	{
		delete m_recBuf;
		m_recBuf=NULL;
	}
	if(m_sock!=INVALID_SOCKET)
	{
		closesocket(m_sock);
		m_sock=INVALID_SOCKET;
	}
	if((m_sock=socket(AF_INET,SOCK_RAW,IPPROTO_ICMP))==INVALID_SOCKET)
	{
		m_strErr.Format (IDP_SOCKETS_CREAT_FAILED,WSAGetLastError());
		ShowMsg(m_strErr);
		return FALSE;
	}
	if((setsockopt(m_sock,SOL_SOCKET,SO_RCVTIMEO,(char*)&m_timeOut,sizeof(m_timeOut)))==SOCKET_ERROR)
	{
		m_strErr.Format (IDP_SOCKETS_SETOPT_FAILED,WSAGetLastError());
		ShowMsg(m_strErr);
		return FALSE;
	}
	m_addrDest.sin_family =AF_INET;
	m_addrDest.sin_addr.s_addr=inet_addr(m_hostAddr);
	m_dataSize=m_packetSize+sizeof(ICMP_HEADER);
	m_sendBuf=new char[m_dataSize];
	m_recBuf=new char[m_dataSize+MAX_IPHEADER];
	GetICMPPacket();
	m_timer=SetTimer(1,500,NULL);
	return TRUE;
}
void CmyPingDlg::OnBnClickedOk()
{
	m_listBox.ResetContent ();
	BYTE m_addrField[4];
	UpdateData();
	DWORD m_test;
	m_IP.GetAddress (m_test);
	if(m_timeOut==0||m_packetSize==0||m_test==0)
	{
		ShowMsg("请重新填写数据");
		return;
	}
	m_IP.GetAddress (m_addrField[0],m_addrField[1],m_addrField[2],m_addrField[3]);
	m_hostAddr.Format ("%d.%d.%d.%d",m_addrField[0],m_addrField[1],m_addrField[2],m_addrField[3]);
	StartPing();
}