基于C语言与原始套接字实现Ping程序

源代码如下：

ping.h

#pragma pack(1)//#define u_char unsigned char//#define u_short unsigned short #include<windows.h>#define ICMP_ECHOREPLY 0#define ICMP_ECHOREQ 8//////////////////////////////////typedef struct tagIPDR{u_char VIHL;//版本和类型u_char TOS;//服务质量u_char shortTotLen;//长度    u_char shortID;//编号u_char shortFlagOff;//分片，Fragmentu_char TTL;//生存时间u_char Protocol;//协议类型u_short Checksum;//校验和struct in_addr iaSrc;//源地址struct in_addr isDet;//目的地址}IPHDR,*PIPHDR;//RFC791 的IP协议头类型////////////////////////////////////////typedef struct tagICMP{u_char Type;//类型u_char Code;//代号u_short  Checksum;//校验号u_short ID;//标识号u_short Seq;//列号char Data;//数据信息}ICMPHDR,*PICMPHDR;//RFC 792 ICMP协议头/////////////////////////////////////////#define REQ_DATASIZE 32typedef struct tagECHOREQUEST{ICMPHDR icmpHdr;//ICMP协议头DWORD dwTime;//数据传输时间char cData[REQ_DATASIZE];//传输数据}ECHOREQUEST,*PECHOREQUEST;//请求回传的数据长度///////////////////////////////////////////////////typedef struct tagECHOREPLY{IPHDR ipHdr;ECHOREQUEST echoRequest;char cFiler[256];}ECHOREPLY,*PECHOREPLY;//回送请求报文#pragma pack()

ping.cpp

#include "ping.h"#include<Winsock.h>#include<stdlib.h>#include<stdio.h>DWORD time;void Ping(LPCSTR pstrHost);//ping 指令函数；void ReportError(LPCSTR psrtFrom);int WaitForEchoReply(SOCKET s);int SendEchoRequest(SOCKET,LPSOCKADDR_IN);DWORD RecvEchoReply(SOCKET,LPSOCKADDR_IN,char*);u_short in_cksum(u_short *addr,int len);void main(){WSADATA wsaData;WORD version=MAKEWORD(1,1);char pstrHost[20];if(WSAStartup(version,&wsaData)){printf("初始化协议栈错误\n");getchar();return ;}if(wsaData.wVersion!=version){        printf("不支持WIDOWS的套接字\n");getchar();return ;}bool flag=true;while(flag){ printf("Ping>:"); scanf("%s",pstrHost); if(strcmp(pstrHost,"exit")==0) break; printf("*****************************\n"); Ping(pstrHost);}WSACleanup();}void Ping(LPCSTR pstrHost){SOCKET rawSocket;LPHOSTENT  lpHost;struct sockaddr_in saDest;struct sockaddr_in saSrc;DWORD dwTimeSent;DWORD dwElapsed;u_char cTTL;int nLoop;int nRet;rawSocket=socket(AF_INET,SOCK_RAW,IPPROTO_ICMP);if(rawSocket==SOCKET_ERROR){ReportError("套接字");return;}lpHost=gethostbyname(pstrHost);   if(lpHost==NULL){printf("无法找到这主机[%s]\n",pstrHost);getchar();return;}saDest.sin_addr.s_addr=*((u_long FAR*)(lpHost->h_addr));saDest.sin_family=AF_INET;saDest.sin_port=0;printf("\n探测主机%s[%s]：%d字节\n",pstrHost,inet_ntoa(saDest.sin_addr),REQ_DATASIZE);for(nLoop=0;nLoop<4;nLoop++){SendEchoRequest(rawSocket,&saDest);nRet=WaitForEchoReply(rawSocket);if(nRet==SOCKET_ERROR){ReportError("选择");break;}   if(!nRet){printf("发送超时\n");break;}dwTimeSent=RecvEchoReply(rawSocket,&saSrc,(char*)&cTTL);dwElapsed=time-dwTimeSent;    printf("来自主机[%s]响应,字节:%d 时间:%ld毫秒 最大生存期:%d\n",inet_ntoa(saSrc.sin_addr),REQ_DATASIZE,dwElapsed,cTTL);}       if(closesocket(rawSocket)==SOCKET_ERROR)   ReportError("关闭套接字");}int SendEchoRequest(SOCKET s,LPSOCKADDR_IN lpstToAddr){static ECHOREQUEST echoReq;static nId=1;static nSeq=1;static nRet;echoReq.icmpHdr.Type=ICMP_ECHOREQ;    echoReq.icmpHdr.Code=0;echoReq.icmpHdr.Checksum=0;echoReq.icmpHdr.ID=nId++;echoReq.icmpHdr.Seq=nSeq++;for(nRet=0;nRet<REQ_DATASIZE;nRet++)  echoReq.cData[nRet]=nRet;    echoReq.dwTime=GetTickCount();time=echoReq.dwTime;//记录发送时间 echoReq.icmpHdr.Checksum=in_cksum((u_short *)&echoReq,sizeof(ECHOREQUEST));nRet=sendto(s,(LPCSTR)&echoReq,sizeof(ECHOREQUEST),0,(LPSOCKADDR)lpstToAddr,sizeof(SOCKADDR_IN));if(nRet==SOCKET_ERROR) ReportError("发送出错");    return nRet;}void ReportError(LPCSTR lpStr){printf("%s发生错误，错误号：%d\n",lpStr,WSAGetLastError());getchar();}DWORD RecvEchoReply(SOCKET s,LPSOCKADDR_IN lpsaFrom,char *pTTL){ECHOREPLY echoReply;int nRet;int nAddrLen=sizeof(struct sockaddr_in);    nRet=recvfrom(s,(LPSTR)&echoReply,sizeof(ECHOREPLY),0,(LPSOCKADDR)lpsaFrom,&nAddrLen);if(nRet==SOCKET_ERROR)ReportError("接收");*pTTL=echoReply.ipHdr.TTL;return echoReply.echoRequest.dwTime;}int WaitForEchoReply(SOCKET s){ struct timeval Timeout; fd_set readfds; readfds.fd_count=1; readfds.fd_array[0]=s; Timeout.tv_sec=5; Timeout.tv_usec=0; return select(1,&readfds,NULL,NULL,&Timeout);}u_short in_cksum(u_short *addr,int len){register int nleft=len;    register u_short *w=addr;register u_short answer;register int sum=0;while(nleft>1){sum+=*w++;nleft-=2;}if(nleft==1){u_short u=0;*(u_char *)(&u)=*(u_char *)w;sum+=u;}sum=(sum>>16)+(sum&0xffff);sum+=(sum>>16);answer=~sum;return answer;}

基于VC++6.0直接编译即可。