谁能给写个vc++下可调用的ping函数

谁能给写个vc++下可调用的ping函数,第1张

// ping.h#pragma once#include "IpMonitor.h"#include "IpMonitorDlg.h" class CIpMonitorDlgclass CPing{public:CPing(void) ~CPing(void)void Start(CIpMonitorDlg* pDialog) void Stop() bool IsRunning(){return m_thread!= NULL} CString m_sIp CString m_sPort CString m_sTimeSpan CString m_sCommandbool m_bStopCIpMonitorDlg* m_pIpMonitorDlgprotected:HANDLE m_thread DWORD m_threadId } //---------------- ping.cpp -------------------------//孙局#include "StdAfx.h"#include "Ping.h"#include "afxsock.h" /* TRACE(_T("\r\n"))*/ CString GetErrorMessage(){CString msg DWORD err = GetLastError() LPVOID lpMsgBufFormatMessage( FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_IGNORE_INSERTS,NULL,err,0, // Default language(LPTSTR) &lpMsgBuf,0,NULL )msg.Format(_T("[%d] %s"),err, (LPCTSTR)lpMsgBuf)// Free the buffer.LocalFree( lpMsgBuf ) return msg} void Trace(CPing* parent, LPCTSTR lpcszMSg){TRACE(lpcszMSg) if(parent != NULL &&parent->m_pIpMonitorDlg != NULL){//ASSERT(::IsWindow(parent->m_pIpMonitorDlg->m_hWnd)) //if(::IsWindow(parent->m_pIpMonitorDlg->m_hWnd))parent->m_pIpMonitorDlg->TraceMessage(lpcszMSg) } }DWORD WINAPI RunBody( LPVOID lpParam ){CString msg CPing* parent = (CPing*) lpParam ASSERT(parent != NULL)LPCTSTR lpszHostAddress = parent->m_sIp UINT nHostPort = _tstoi(parent->m_sPort) ASSERT(nHostPort >敬凯雀 0)int timespan = _tstoi(parent->m_sTimeSpan) if (timespan <亮早 3) timespan = 3timespan *= 1000 LPTSTR szCmdline = _tcsdup(parent->m_sCommand) STARTUPINFO si PROCESS_INFORMATION piZeroMemory( &si, sizeof(si) ) si.cb = sizeof(si) ZeroMemory( &pi, sizeof(pi) )Trace(parent,_T("thread start\r\n"))if(!AfxSocketInit ()){msg.Format(_T("AfxSocketInit fail , %s \r\n"), GetErrorMessage()) Trace(parent,msg) return 0x01 } CSocket connectbool bTestOk while(!parent->m_bStop){if (!connect.Create(/*0, SOCK_STREAM, _T("127.0.0.1")*/)){msg.Format(_T("connect.Create fail, %s \r\n"), GetErrorMessage()) Trace(parent,msg) }else{bTestOk = connect.Connect(lpszHostAddress, nHostPort) if(bTestOk){msg.Format(_T("connect to %s:%s ok...\r\n"), parent->m_sIp, parent->m_sPort) }else{msg.Format(_T("connect to %s:%s fail, %s ...\r\n"), parent->m_sIp, parent->m_sPort, GetErrorMessage()) }Trace(parent,msg) connect.Close()if(!bTestOk){if(!CreateProcess(NULL,szCmdline, NULL, NULL, FALSE, CREATE_NEW_CONSOLE, NULL, NULL, &si, &pi)){msg.Format(_T("Execute command fail, %s\r\n"), GetErrorMessage()) Trace(parent,msg) }}}::Sleep(timespan) } free(szCmdline) szCmdline = NULLTrace(parent,_T("thread end\r\n"))return 0} CPing::CPing(void){m_thread = NULL m_threadId = 0 m_bStop = false} CPing::~CPing(void){Stop()} void CPing::Start(CIpMonitorDlg* pDialog){TRACE(_T("CPing::Start\r\n")) ASSERT(m_thread == NULL) ASSERT(pDialog != NULL)if(m_thread != NULL){TRACE(_T("CPing::Start m_thread != NULL\r\n")) return }m_pIpMonitorDlg = pDialogm_bStop = falsem_thread = CreateThread(NULL, 0, RunBody, this, NULL, &m_threadId)} void CPing::Stop(){Trace(this, _T("CPing::Stop\r\n")) m_bStop = true if(m_thread != NULL){int timespan = _tstoi(m_sTimeSpan) if (timespan <3) timespan = 3 timespan += 3 timespan *= 1000Trace(this, _T("waiting for thread stop...\r\n")) DWORD r = ::WaitForSingleObject(m_thread, timespan) if(WAIT_TIMEOUT == r){TRACE(_T("CPing::Stop TerminateThread ...\r\n")) TerminateThread(m_thread, 0x02) }::CloseHandle(m_thread) m_thread = NULL }}

/含袜者/关键代码如下:

#include "icmpapi.h"

#include "iphlpapi.h"

#pragma comment(lib,"谈薯iphlpapi.lib")

bool CPINGDlg::startping(char* IP) //成功好孝返回true, 失败返回false

{

HANDLE hIcmpFile = NULL

unsigned long ipaddr = INADDR_NONE

DWORD dwRetVal = 0

char SendData[] = "Data Buffer\0"

LPVOID ReplyBuffer = NULL

DWORD ReplySize = 0

// PICMP_ECHO_REPLY reply

ipaddr = inet_addr(IP)

ReplySize = sizeof(ICMP_ECHO_REPLY)+sizeof(SendData)

ReplyBuffer = (void*)malloc(ReplySize)

hIcmpFile = IcmpCreateFile()

if (hIcmpFile == INVALID_HANDLE_VALUE)

{

AfxMessageBox(_T("Ping 内部代码错误"))

return false

}

dwRetVal = IcmpSendEcho(hIcmpFile, ipaddr, SendData, sizeof(SendData), NULL, ReplyBuffer, ReplySize, 1000)

// CloseHandle(hIcmpFile)

// free(ReplyBuffer)

if (dwRetVal != 0)

{

return true

}

else

{

return false

}

}

#pragma pack(4)

#define WIN32_LEAN_AND_MEAN

#include <WINSOCK2.H>

#include <STDIO.H>

#include <STDLIB.H>

#define ICMP_ECHO 8

#define ICMP_ECHOREPLY 0

#define ICMP_MIN 8 // minimum 8 byte icmp packet (just header)

/* The IP header */

typedef struct iphdr {

unsigned int h_len:4// length of the header

unsigned int version:4/液森/ Version of IP

unsigned char tos//没兆 Type of service

unsigned short total_len// total length of the packet

unsigned short ident// unique identifier

unsigned short frag_and_flags// flags

unsigned char ttl

unsigned char proto// protocol (TCP, UDP etc)

unsigned short checksum// IP checksum

unsigned int sourceIP

unsigned int destIP

}IpHeader

//

// ICMP header

//

typedef struct _ihdr {

BYTE i_type

BYTE i_code/* type sub code */

USHORT i_cksum

USHORT i_id

USHORT i_seq

/枯埋租* This is not the std header, but we reserve space for time */

ULONG timestamp

}IcmpHeader

#define STATUS_FAILED 0xFFFF

#define DEF_PACKET_SIZE 32

#define MAX_PACKET 1024

#define xmalloc(s) HeapAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,(s))

#define xfree(p) HeapFree (GetProcessHeap(),0,(p))

void fill_icmp_data(char *, int)

USHORT checksum(USHORT *, int)

void decode_resp(char *,int ,struct sockaddr_in *)

void Usage(char *progname){

fprintf(stderr,"Usage:\n")

fprintf(stderr,"%s <HOST>[data_size]\n",progname)

fprintf(stderr,"datasize can be up to 1Kb\n")

ExitProcess(STATUS_FAILED)

}

int main(int argc, char **argv){

WSADATA wsaData

SOCKET sockRaw

struct sockaddr_in dest,from

struct hostent * hp

int bread,datasize

int fromlen = sizeof(from)

int timeout = 1000

char *dest_ip

char *icmp_data

char *recvbuf

unsigned int addr=0

USHORT seq_no = 0

if (WSAStartup(MAKEWORD(2,1),&wsaData) != 0){

fprintf(stderr,"WSAStartup failed: %d\n",GetLastError())

ExitProcess(STATUS_FAILED)

}

if (argc <2 ) {

Usage(argv[0])

}

sockRaw = WSASocket (AF_INET,

SOCK_RAW,

IPPROTO_ICMP,

NULL, 0,0)

if (sockRaw == INVALID_SOCKET) {

fprintf(stderr,"WSASocket() failed: %d\n",WSAGetLastError())

ExitProcess(STATUS_FAILED)

}

bread = setsockopt(sockRaw,SOL_SOCKET,SO_RCVTIMEO,(char*)&timeout,

sizeof(timeout))

if(bread == SOCKET_ERROR) {

fprintf(stderr,"failed to set recv timeout: %d\n",WSAGetLastError())

ExitProcess(STATUS_FAILED)

}

timeout = 1000

bread = setsockopt(sockRaw,SOL_SOCKET,SO_SNDTIMEO,(char*)&timeout,

sizeof(timeout))

if(bread == SOCKET_ERROR) {

fprintf(stderr,"failed to set send timeout: %d\n",WSAGetLastError())

ExitProcess(STATUS_FAILED)

}

memset(&dest,0,sizeof(dest))

hp = gethostbyname(argv[1])

if (!hp){

addr = inet_addr(argv[1])

}

if ((!hp) &&(addr == INADDR_NONE) ) {

fprintf(stderr,"Unable to resolve %s\n",argv[1])

ExitProcess(STATUS_FAILED)

}

if (hp != NULL)

memcpy(&(dest.sin_addr),hp->h_addr,hp->h_length)

else

dest.sin_addr.s_addr = addr

if (hp)

dest.sin_family = hp->h_addrtype

else

dest.sin_family = AF_INET

dest_ip = inet_ntoa(dest.sin_addr)

if (argc >2) {

datasize = atoi(argv[2])

if (datasize == 0)

datasize = DEF_PACKET_SIZE

}

else

datasize = DEF_PACKET_SIZE

datasize += sizeof(IcmpHeader)

icmp_data = xmalloc(MAX_PACKET)

recvbuf = xmalloc(MAX_PACKET)

if (!icmp_data) {

fprintf(stderr,"HeapAlloc failed %d\n",GetLastError())

ExitProcess(STATUS_FAILED)

}

memset(icmp_data,0,MAX_PACKET)

fill_icmp_data(icmp_data,datasize)

while(1) {

int bwrote

((IcmpHeader*)icmp_data)->i_cksum = 0

((IcmpHeader*)icmp_data)->timestamp = GetTickCount()

((IcmpHeader*)icmp_data)->i_seq = seq_no++

((IcmpHeader*)icmp_data)->i_cksum = checksum((USHORT*)icmp_data,

datasize)

bwrote = sendto(sockRaw,icmp_data,datasize,0,(struct sockaddr*)&dest,

sizeof(dest))

if (bwrote == SOCKET_ERROR){

if (WSAGetLastError() == WSAETIMEDOUT) {

printf("timed out\n")

continue

}

fprintf(stderr,"sendto failed: %d\n",WSAGetLastError())

ExitProcess(STATUS_FAILED)

}

if (bwrote <datasize ) {

fprintf(stdout,"Wrote %d bytes\n",bwrote)

}

bread = recvfrom(sockRaw,recvbuf,MAX_PACKET,0,(struct sockaddr*)&from,

&fromlen)

if (bread == SOCKET_ERROR){

if (WSAGetLastError() == WSAETIMEDOUT) {

printf("timed out\n")

continue

}

fprintf(stderr,"recvfrom failed: %d\n",WSAGetLastError())

ExitProcess(STATUS_FAILED)

}

decode_resp(recvbuf,bread,&from)

Sleep(1000)

}

return 0

}

/*

The response is an IP packet. We must decode the IP header to locate

the ICMP data

*/

void decode_resp(char *buf, int bytes,struct sockaddr_in *from) {

IpHeader *iphdr

IcmpHeader *icmphdr

unsigned short iphdrlen

iphdr = (IpHeader *)buf

iphdrlen = iphdr->h_len * 4 // number of 32-bit words *4 = bytes

if (bytes <iphdrlen + ICMP_MIN) {

printf("Too few bytes from %s\n",inet_ntoa(from->sin_addr))

}

icmphdr = (IcmpHeader*)(buf + iphdrlen)

if (icmphdr->i_type != ICMP_ECHOREPLY) {

fprintf(stderr,"non-echo type %d recvd\n",icmphdr->i_type)

return

}

if (icmphdr->i_id != (USHORT)GetCurrentProcessId()) {

fprintf(stderr,"someone else's packet!\n")

return

}

printf("%d bytes from %s:",bytes, inet_ntoa(from->sin_addr))

printf(" icmp_seq = %d. ",icmphdr->i_seq)

printf(" time: %d ms ",GetTickCount()-icmphdr->timestamp)

printf("\n")

}

USHORT checksum(USHORT *buffer, int size) {

unsigned long cksum=0

while(size >1) {

cksum+=*buffer++

size -=sizeof(USHORT)

}

if(size ) {

cksum += *(UCHAR*)buffer

}

cksum = (cksum >>16) + (cksum &0xffff)

cksum += (cksum >>16)

return (USHORT)(~cksum)

}

/*

Helper function to fill in various stuff in our ICMP request.

*/

void fill_icmp_data(char * icmp_data, int datasize){

IcmpHeader *icmp_hdr

char *datapart

icmp_hdr = (IcmpHeader*)icmp_data

icmp_hdr->i_type = ICMP_ECHO

icmp_hdr->i_code = 0

icmp_hdr->i_id = (USHORT)GetCurrentProcessId()

icmp_hdr->i_cksum = 0

icmp_hdr->i_seq = 0

datapart = icmp_data + sizeof(IcmpHeader)

//

// Place some junk in the buffer.

//

memset(datapart,'E', datasize - sizeof(IcmpHeader))

}


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/yw/8270365.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-04-14
下一篇 2023-04-14

发表评论

登录后才能评论

评论列表(0条)

保存