网络主机发现程序

#pragma pack(4)#pragma comment(lib,"Ws2_32.lib")#define win32_LEAN_AND_MEAN#include <winsock2.h>#include <stdio.h>#include <iostream.h>#include <string.h>#include <stdlib.h>#include <sys/timeb.h>#include <time.h>//THE IP HEADERtypedef struct iphdr{unsigned int headlen:4; //ip头长度unsigned int wersion:4; //ip版本号unsigned char tos; //服务类型unsigned short totallen; //ip包总长度unsigned short id; //ip号unsigned short flag; //标记unsigned char ttl; //生存时间unsigned char prot; //协议（UDP TCP）unsigned short checksum; //校验和unsigned int sourceip; //源ipunsigned int destip; //目的ip}IpHeader;//ICMP HEADERtypedef struct icmphdr{BYTE type; //icmp类型码，回送请求的类型码为8BYTE code; //子类型码，保存与特定ICMP报文类型相关的//节信息USHORT checksum; //校验和USHORT id; //ICMP报文id号USHORT seq; //ICMP数据报的序列号}Icmpheader;#define ICMP_ECHO 8 //请求回送#define ICMP_ECHO_REPLY 0 //请求回应#define ICMP_MIN 8 //ICMP包头长度（最小ICMP包长度）#define STA TUS_FAILED 0xFFFF //错误码#define DEF_PACKET_SIZE 32 //缺省数据报长度#define MAX_PACKET 1024 //最大数据报长度#define MAX_PING_PACKET_SIZE (MAX_PACKET + sizeof(IpHeader)) //最大接受数据报长度void fill_icmp_date(char * ,int); //填充ICMP包USHORT checksum(USHORT *,int); //校验和函数void decode_resp(char*,int,struct sockaddr_in *); //找到此数据报IP地址DWORD WINAPI FindIp(LPVOID pipaddrtemp); //线程调用子函数WSADA TA wsadata;SOCKET sockraw;struct sockaddr_in dest,from,end;int fromlen=sizeof(from);char * recvbuf=new char[MAX_PING_PACKET_SIZE];unsigned int addr=0;long threadnumcounter=0,threadnumlimit=20;long *aa=&threadnumcounter;void main(){char *in_ip="192.168.0.1";char *end_ip="192.168.0.10";cout<<"请输入起始扫描地址，和终止扫描地址,格式"<<endl<<"IP1"<<endl<<"IP2"<<endl;if(WSAStartup(MAKEWORD(2,1),&wsadata)!=0){/*对Winsock服务的初始化*/ cout<<"WSAStartup failed:"<<GetLastError()<<endl;ExitProcess(STA TUS_FAILED);}//创建原始套接字sockraw=WSASocket(AF_INET,SOCK_RA W,IPPROTO_ICMP,NULL,0,WSA_FLAG_OV ERLAPPED);//创建一个与指定传送服务提供者捆绑的套接口，可选地创建和/或加入一个套接口组if(sockraw==INV ALID_SOCKET){cout<<"WSASocket() failed:"<<WSAGetLastError()<<endl;ExitProcess(STA TUS_FAILED);}//设置读取延时int timeout=1000;intbread=setsockopt(sockraw,SOL_SOCKET,SO_RCVTIMEO,(char*)&timeout,sizeof(timeout));//s etsockopt()函数用于任意类型、任意状态套接口的设置选项值if(bread==SOCKET_ERROR){cout<<"fail to set recv timeout:"<<WSAGetLastError()<<endl;ExitProcess(STA TUS_FAILED);}memset(&dest,0,sizeof(dest));//将dest中的N 个字节替换成“0”，起清零作用unsigned long startip,endip;dest.sin_family=AF_INET;dest.sin_addr.s_addr=inet_addr(in_ip);startip=inet_addr(in_ip);end.sin_family=AF_INET;end.sin_addr.s_addr=inet_addr(end_ip);endip=inet_addr(end_ip);HANDLE hthread;while(htonl(startip)<=htonl(endip)){//将主机的无符号长整形数转换成网络字节顺序。

if(threadnumcounter>threadnumlimit){Sleep(5000);continue;}DWORD Threadid;sockaddr_in * pipaddrtemp=new(sockaddr_in);if(!pipaddrtemp){cout<<"memory alloc failed"<<endl;return;}*pipaddrtemp=dest;//创建新线程clock_t start;start=clock();hthread=CreateThread(NULL,NULL,FindIp,(LPVOID)pipaddrtemp,NULL,&Threadid);//CreateThread(线程安全属性,堆栈大小, 线程函数,线程参数, 线程创建属性,线程ID )long i=60000000L;while(i--);TerminateThread(hthread,0);/*在线程外终止一个线程，用于强制终止线程*/InterlockedDecrement(aa);//递减指定变量的值并存储结果memset(&from,0,sizeof(from));startip=htonl(htonl(startip)+1);dest.sin_addr.s_addr=startip;}while(threadnumcounter!=0){Sleep(2000);return;}}void fill_icmp_data(char * icmp_data,int datasize){Icmpheader *icmp_hdr;char *datapart;icmp_hdr=(Icmpheader*)icmp_data;icmp_hdr->type = ICMP_ECHO;icmp_hdr->id=(USHORT)GetCurrentThreadId();datapart=icmp_data+sizeof(Icmpheader);memset(datapart,'A',datasize-sizeof(Icmpheader));}void decode_resp(char *buf,int bytes,struct sockaddr_in *from){ IpHeader *iphdr;Icmpheader *icmphdr;unsigned short iphdrlen;iphdr=(IpHeader *)buf;;//从buf中获取IP数据包头指针iphdrlen=iphdr->headlen * 4;icmphdr=(Icmpheader *)(buf+iphdrlen);//定位ICMP包头起始位置//数据包太短丢弃if(bytes<iphdrlen+ICMP_MIN) return;if(icmphdr->type!=ICMP_ECHO_REPLY) return;if(icmphdr->id!=(USHORT)GetCurrentThreadId()) return;{cout<<"活动主机"<<inet_ntoa(from->sin_addr)<<endl;}}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);}DWORD WINAPI FindIp(LPVOID pipaddrtemp){InterlockedIncrement(aa);char icmp_data[MAX_PACKET];memset(icmp_data,0,MAX_PACKET);int datasize=DEF_PACKET_SIZE;datasize+=sizeof(Icmpheader);fill_icmp_data(icmp_data,datasize);((Icmpheader*)icmp_data)->checksum=0;((Icmpheader*)icmp_data)->seq = 0;//计算校验和后填入((Icmpheader*)icmp_data)->checksum=checksum((USHORT*)icmp_data,datasize);int bwrote=sendto(sockraw,icmp_data,datasize,0,(struct sockaddr*)pipaddrtemp,sizeof(dest));//将指定字节数的数据发送到指定的终结点//sendto(套接字;待发送数据的缓冲区;缓冲区长度;调用方式标志位一般为0,改变Flags 将会改变Sendto发送的形式;（可选）指针，指向目的套接字的地址;所指地址的长度)int n=0;if (bwrote==SOCKET_ERROR){if(WSAGetLastError()==WSAETIMEDOUT){cout<<"timed out"<<endl;}cout<<"sendto failed: "<<WSAGetLastError()<<endl;ExitProcess(STA TUS_FAILED);n=1;}if(bwrote<datasize){cout<<"worte "<<bwrote<<" bytes"<<endl;ExitProcess(STA TUS_FAILED);n=1;}int bread =recvfrom(sockraw,recvbuf,MAX_PING_PACKET_SIZE,0,(struct sockaddr*) &from,&fromlen);//recvfrom(套接口的描述字,接收数据缓冲区,缓冲区长度,指向装有源地址from的缓冲区,from缓冲区长度,)if(bread==SOCKET_ERROR){if(WSAGetLastError()==WSAETIMEDOUT){cout<<"time out"<<endl;}cout<<"recvform failed:"<<WSAGetLastError()<<endl;ExitProcess(STA TUS_FAILED);n=1;}if(n==0)decode_resp(recvbuf,bread,&from);InterlockedDecrement(aa);return 0;}。