/********************************** (C) COPYRIGHT *******************************
* File Name : netstatus_check.c
* Author : skdkjzz
* Date : 2014/08/07
* Description : 检测本机是否连通外部网络(Joseph_Ping 百度)。
*********************************************************************************/
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <netinet/ip.h>
#include <netinet/ip_icmp.h>
#include <netdb.h>
#include <errno.h>
#include <sys/types.h>
#include <netinet/in.h>
#include <sys/types.h>
#include <string.h>
#include <stdlib.h>
#include <sys/types.h>
#include <sys/ioctl.h>
#include <sys/stat.h>
#include <stdio.h>
#include <string.h>
#include <errno.h>
#include <net/if.h>
#include <sys/utsname.h>
#include <limits.h>
#include <ctype.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <linux/sockios.h>
#define PACKET_SIZE 4096
#define ERROR -1
#define SUCCESS 0
/*效验算法*/
unsigned short Joseph_Cal_Chksum(unsigned short *addr, int len)
{
int nleft=len;
int sum=0;
unsigned short *w=addr;
unsigned short answer=0;
while(nleft > 1)
{
sum += *w++;
nleft -= 2;
}
if( nleft == 1)
{
*(unsigned char *)(&answer) = *(unsigned char *)w;
sum += answer;
}
sum = (sum >> 16) + (sum & 0xffff);
sum += (sum >> 16);
answer = ~sum;
return answer;
}
int Joseph_Ping( char *ips,char *srcip , int timeout) /* Ping函数 */
{
struct timeval *tval;
int maxfds = 0;
fd_set readfds;
struct sockaddr_in addr;
struct sockaddr_in from;
struct ifreq ifr;
bzero(&addr,sizeof(addr)); /* 设定Ip信息 */
addr.sin_family = AF_INET;
addr.sin_addr.s_addr = inet_addr(ips);
int sockfd;
sockfd = socket(AF_INET, SOCK_RAW, IPPROTO_ICMP); /* 取得socket */
if (sockfd < 0)
{
printf("ip:%s,socket error\n",ips);
return ERROR;
}
struct timeval timeo;
timeo.tv_sec = timeout / 1000; /* 设定TimeOut时间 */
timeo.tv_usec = timeout % 1000;
#if 0
/*set src ip*/
bzero(&from,sizeof(from)); /* 设定Ip信息 */
from.sin_family = AF_INET;
from.sin_addr.s_addr = inet_addr(srcip);
if (setsockopt(sockfd, IPPROTO_IP, IP_MULTICAST_IF,(struct sockaddr *)&from, sizeof(from)) == -1)
{
printf("ip:%s,setsockopt error \n",srcip);
return ERROR;
}
bind(sockfd,(struct sockaddr *)&addr, sizeof(addr));
#else
strcpy(ifr.ifr_name, srcip);
if (setsockopt(sockfd, SOL_SOCKET, SO_BINDTODEVICE, &ifr, sizeof(ifr)) == -1)
{
printf("can't bind to interface %s\n",ifr.ifr_name);
}
#endif
printf("%s %d\n",__FUNCTION__,__LINE__);
if (setsockopt(sockfd, SOL_SOCKET, SO_SNDTIMEO, &timeo, sizeof(timeo)) == -1)
{
printf("ip:%s,setsockopt error\n",ips);
return ERROR;
}
else
{
printf("ip:%s,setsockopt ok \n",ips);
}
char sendpacket[PACKET_SIZE];
char recvpacket[PACKET_SIZE];
memset(sendpacket, 0, sizeof(sendpacket)); /* 设定Ping包 */
pid_t pid;
pid=getpid(); /* 取得PID,作为Ping的Sequence ID */
struct ip *iph;
struct icmp *icmp;
icmp=(struct icmp*)sendpacket;
icmp->icmp_type=ICMP_ECHO; /* 回显请求 */
icmp->icmp_code=0;
icmp->icmp_cksum=0;
icmp->icmp_seq=0;
icmp->icmp_id=pid;
tval= (struct timeval *)icmp->icmp_data;
gettimeofday(tval,NULL);
icmp->icmp_cksum=Joseph_Cal_Chksum((unsigned short *)icmp,sizeof(struct icmp)); /* 校验 */
int n; /* 发包 */
n = sendto(sockfd, (char *)&sendpacket, sizeof(struct icmp), 0, (struct sockaddr *)&addr, sizeof(addr));
if (n < 1)
{
printf("ip:%s,sendto error\n",ips);
return ERROR;
}
while(1) /* 接受 由于可能接受到其他Ping的应答消息,所以这里要用循环 */
{
FD_ZERO(&readfds); /* 设定TimeOut时间,这次才是真正起作用的 */
FD_SET(sockfd, &readfds);
maxfds = sockfd + 1;
n = select(maxfds, &readfds, NULL, NULL, &timeo);
if (n <= 0)
{
printf("ip:%s,Time out error\n",ips);
close(sockfd);
return ERROR;
}
memset(recvpacket, 0, sizeof(recvpacket));
int fromlen = sizeof(from); /* 接受 */
n = recvfrom(sockfd, recvpacket, sizeof(recvpacket), 0, (struct sockaddr *)&from, (socklen_t *)&fromlen);
if (n < 1) {
return ERROR;
}
char *from_ip = (char *)inet_ntoa(from.sin_addr);
if (strcmp(from_ip,ips) != 0) /* 判断是否是自己Ping的回复 */
{
printf("Now Pingip:%s Fromip:%s\n Now Pingip is not same to Fromip,so Joseph_Ping wrong!\n",ips,from_ip);
return ERROR;
}
iph = (struct ip *)recvpacket;
icmp=(struct icmp *)(recvpacket + (iph->ip_hl<<2));
if (icmp->icmp_type == ICMP_ECHOREPLY && icmp->icmp_id == pid) /* 判断Ping回复包的状态 ICMP_ECHOREPLY回显应答 */
{
return SUCCESS;
} /* 正常退出循环 */
else
continue; /* 否则继续等 */
}
return 0;
}
int main(int argc ,char *argv[])
{
int Qy_Ret = 0;
struct hostent *h=NULL;
char hostname[16]="www.baidu.com";
char aPing[16]="202.108.22.5"; /* Joseph_Ping form ip */
Qy_Ret = Joseph_Ping(aPing,argv[1],3000);
printf("Qy_Ret is %d\n",Qy_Ret);
if(Qy_Ret == 0)
{
printf("Network is Ok!\n");
return 0;
}
else
{
printf("Network is Bad!\n");
return -1;
}
sprintf(hostname,"%s",(char *)inet_ntoa(*((struct in_addr *)h->h_addr))); /* Joseph_Ping form hostname */
if(Joseph_Ping(hostname,argv[1],3000))
{
printf("Network is Ok!\n");
return 0;
}
else
{
printf("Network is Bad!\n");
return -1;
}
}
</span>