红联Linux门户
Linux帮助

ping源码

发布时间:2008-10-28 09:14:54来源:红联作者:jerry520
/* PING.C
/*
/* ping source code distribute by cpu || digger.
/* for unix family only. compil and link success in sco unix.
/* i think linux no problem too. u can try it.
/* before read this code, you shoud know about the principle of
/* tcp/ip, especially icmp protocol, u also should also know some
/* about BSD socket API, and unix system signal programming.
/*
/* cc -o ping ping.c -lsocket, then u will get executable file,
/* but must act as root when cc it, and then set euid attribute
/* for this ping, then u can execute it as common user.
/* because only root can have authority to creat raw socket.
/*
/* i love socket, if so do u,
/* call me, cpu == digger

# include
# include
# include
# include
# include
# include
# include
# include
# include
# include

# define ICMP_ECHO 8 /* icmp echo requir */
# define ICMP_ECHOREPLY 0 /* icmp echo reply */
# define ICMP_HEADSIZE 8 /* icmp packet header size */
# define IP_HEADSIZE 20 /* ip packet header size */

typedef struct tagIpHead /* icmp packet header */
{
u_char ip_verlen; /* ip version and ip header lenth*/
u_char ip_tos; /* ip type of service */
u_short ip_len; /* ip packet lenghth */
u_short ip_id; /* ip packet identification */
u_short ip_fragoff; /* ip packet fragment and offset */
u_char ip_ttl; /* ip packet time to live */
u_char ip_proto; /* ip packet protocol type */
u_short ip_chksum; /* ip packet header checksum */
u_long ip_src_addr; /* ip source ip adress */
u_long ip_dst_addr; /* ip destination ip adress */
} IPHEAD;

typedef struct tagIcmpHead /* icmp header */
{
u_char icmp_type; /* icmp service type */
/* 8 echo require, 0 echo reply */
u_char icmp_code; /* icmp header code */
u_short icmp_chksum; /* icmp header chksum */
u_short icmp_id; /* icmp packet identification */
u_short icmp_seq; /* icmp packet sequent */
u_char icmp_data[1]; /* icmp data, use as pointer */
} ICMPHEAD;

u_short ChkSum( u_short * pIcmpData, int iDataLen )
/* for check sum of icmp header */
{
u_short iSum;
u_short iOddByte;

iSum = 0;

while ( iDataLen > 1 ) { /* xor the next unsigned int data */
iSum ^= *pIcmpData++;
iDataLen -= 2;
}

if ( iDataLen == 1 ) { /* the rest odd byte */
iOddByte = 0;
*((u_char *)&iOddByte) = *(u_char *)pIcmpData;
iSum ^= iOddByte;
}

iSum ^= 0xffff; /* xor 0xffff == not it */
return(iSum);
}

long time_now() /* return time passed by */
/* since 1970.1.1 00:00:00, */
/* in 1/1000000 second */
{
struct timeval now;
long lPassed;
gettimeofday(&now, 0);
lPassed = now.tv_sec * 1000000 + now.tv_usec;
/* now.tv_sec in second */
/* now.tv_usec in 1/1000000 second */
return lPassed;
}

char* host; /* destination host */
char* prog; /* program name */
extern errno; /* system global parameter */
long lSendTime; /* each time when send, change it */
u_short seq; /* the icmp packet seqence */
int iTimeOut; /* time out parameter */
int sock, sent, recvd, max, min, total;
/* sent : icmp packet already sent */
/* recvd: proper icmp packet received */
/* max, min: max min round trip time */
/* total: total round trip time */
/* store to calculate average */
u_long lHostIp; /* host ip adress */
struct sockaddr_in it; /* destination host information */

int ping();
void stat();

main(int argc, char** argv)
{
struct hostent* h;
char buf[200];
char dst_host[32];
int i, namelen;
IPHEAD* pIpHead;
ICMPHEAD* pIcmpHead;

if (argc < 2) { /* ping the destination host */
/* every timeout second */
/* default timeout is 1 second */

printf("usage: %s [-timeout] host|IP\n", argv[0]);
exit(0);
}
prog = argv[0];
host = argc == 2 ? argv[1] : argv[2];
iTimeOut = argc == 2 ? 1 : atoi(argv[1]);

/* creat the raw socket for icmp */

if ((sock = socket(AF_INET, SOCK_RAW, IPPROTO_ICMP)) < 0) {
perror("socket");
exit(2);
}

/* set destination host information */

bzero(&it, sizeof(it));
it.sin_family = AF_INET;

/* check host format */

if ( ( lHostIp = inet_addr(host) ) != INADDR_NONE ) {
/* is available ip adress */
it.sin_addr.s_addr = lHostIp;
strcpy( dst_host, host );
} else if ( h = gethostbyname(host) ) {
/* is available host name */
/* from hosts file of local host */
/* or from DNS */
bcopy(h->h_addr, &it.sin_addr, h->h_length);
sprintf( dst_host, "%s (%s)", host,
inet_ntoa(it.sin_addr) );
} else {
/* bad ip adress or host name */
/* exit */
fprintf( stderr, "bad IP or host\n" );
exit(3);
}
namelen = sizeof(it);

printf("\nDigger pinging %s, send %d bytes\n",
dst_host,
IP_HEADSIZE + ICMP_HEADSIZE + sizeof(long)
);

seq = 0; /* first icmp_seq = 0 */
sigset(SIGINT, stat); /* when press del or ctrl+c, call stat */
/* to statistic the result , and then exit */
sigset(SIGALRM, ping); /* hook ping function to timer */
alarm(iTimeOut); /* start timer, call ping every timeout */
/* seconds */
ping();
for ( ;; ) { /* waiting for every echo back */
/* icmp packet and check it */
register size;
register u_char ttl;
register delta;
register iIpHeadLen;

/* block to received echo back datagram */

size = recvfrom(sock, buf, sizeof(buf), 0,
(struct sockaddr *)&it, &namelen);
if (size == -1 && errno == EINTR) {
/* receive error or system call */
/* interrupted */
continue;
}

/* calculate the round trip time, */
/* time when receive minus time when send */

delta = (int)((time_now() - lSendTime)/1000);

/* get echo back packet and check its ip header */

pIpHead = (IPHEAD *)buf;

/* get the ip packet lenth */
/* if too small, not the icmp echoreply packet */
/* give it up */

iIpHeadLen = (int)((pIpHead->ip_verlen & 0x0f) << 2);
if (size < iIpHeadLen + ICMP_HEADSIZE) {
continue;
}
ttl = pIpHead->ip_ttl; /* time to live param */

/* get the icmp header information */
pIcmpHead = (ICMPHEAD *)(buf + iIpHeadLen);

/* not icmp echo reply packet, give it up */
if (pIcmpHead->icmp_type != ICMP_ECHOREPLY) {
continue;
}

/* not proper icmp sequent number, give it up */
if (pIcmpHead->icmp_id != seq || pIcmpHead->icmp_seq != seq) {
continue;
}

/* print out result for each icmp */
/* echo reply information */
sprintf( buf, "icmp_seq=%u bytes=%d ttl=%d",
pIcmpHead->icmp_seq, size, ttl );
fprintf(stderr, "reply from %s: %s time=%d ms\n",
host, buf, delta);

/* calculate some statistic information */
/* max, min, average round trip time */
/* received icmp echo reply packet numbers */
max = MAX(delta, max);
min = min ? MIN(delta, min) : delta;
total += delta;
++ recvd;

/* for next icmp sequence */

++ seq;
}
}

ping()
{
char buf[200];
int iPacketSize;

/* make the icmp header information */

ICMPHEAD *pIcmpHead = (ICMPHEAD *)buf;
pIcmpHead->icmp_type = ICMP_ECHO;
pIcmpHead->icmp_code = 0;
pIcmpHead->icmp_id = seq;
pIcmpHead->icmp_seq = seq;
pIcmpHead->icmp_chksum = 0;

/* store time information as icmp packet content, 4 bytes */
/* u may store other information instead */

*((long *)pIcmpHead->icmp_data) = time_now();

iPacketSize = ICMP_HEADSIZE + 4; /* icmp packet length */

/* icmp header check sum */

pIcmpHead->icmp_chksum = ChkSum((u_short *)pIcmpHead,
iPacketSize );

/* remember the time when send for calculate round trip time */
lSendTime = time_now();

/* send the icmp packet to des host */
if ( sendto(sock, buf, iPacketSize, 0, (struct sockaddr *)&it,
sizeof(it) ) < 0) {
perror("send failed");
exit(6);
}

/* packet number been sent */
++sent;

/* reset the timer hooker to me again */
alarm(iTimeOut);
}

void stat() /* print the statistic information for this time's ping */
{
if (sent) {
printf("\n----- %s ping statistics summerized by Digger-----\n"
, host );
printf("%d packets sent, %d packets received, %.2f%% lost\n",
sent, recvd, (float)(sent-recvd)/(float)sent*100 );
}
if (recvd) {
printf("round_trip min/avg/max: %d/%d/%d ms\n\n",
min, total/recvd, max );
}
exit(0);
}
文章评论

共有 7 条评论

  1. hanchanwu 于 2009-02-22 09:45:55发表:

    源代码似乎有问题,#include后面没有内容。

  2. py_lei 于 2008-12-02 16:06:12发表:

    不懂啊~

  3. anton830813 于 2008-11-04 09:32:23发表:

    2008,盛世中国 嵌入你的中国心!
    --亚嵌2008《嵌入式linux系统工程师强化培训班》 第7期
    课程链接:http://www.akaedu.org/pages/center11_shuqi.html 咨询热线:400-700-9624
    **************************************************************************************

    开课时间:11月29日(140学时)
    报名优惠:11月09日之前报名免费获得三星ARM2440开发板1块(仅10套) 或 免收300元教材费
    课程特点:
    ■以实验为主,理论经典讲授,内容为亚嵌多位老师多年教学精华提炼而成;
    ■学习内容涵盖 6 个方面,是全面、系统、专业地学习嵌入式linux技术的金典课程;
    1).ARM开发实战 2).嵌入式linux应用开发实战 3).嵌入式linux高级编程实战
    4).嵌入式linux移植实战 5).嵌入式linux驱动实战 6).嵌入式linux项目实战
    ■毕业后可免费参加亚嵌《嵌入式linux系统工程师中级》认证,通过认证的学生,签订就业协议,保证就业、保证底薪;
    ■保证教学质量,承诺本期学习未消化,不限次数免费重听相同课程,不限次数免费参加亚嵌《嵌入式linux系统工程师中级》认证,直至通过认证,保证就业。

    课程师资详见:http://www.akaedu.org/pages/team01.htm
    课程实验器材详见:http://www.akaedu.org/pages/center05_2.htm

    **************************************************************************************

    报名信息:
    ** 培训费用:¥5900.00 元
    ** 师生优惠:¥5300.00 元(凭学生证原件、教师资格证书原件)
    ** 团报费用:¥5300.00 元(3人以上)
    ** 教材费: ¥300.00 元                  

    ** 咨询电话:400-700-9624
          010-62642993   
          010-62631735 转 8005/8006
    ** 咨询QQ : 601334534
    ** 咨询MSN:[email protected]
    ** 课程咨询:史老师 15910982846(24小时)

    **************************************************************************************

  4. anton830813 于 2008-11-04 09:31:57发表:

    2008,盛世中国 嵌入你的中国心!
    --亚嵌2008《嵌入式linux系统工程师强化培训班》 第7期
    课程链接:http://www.akaedu.org/pages/center11_shuqi.html 咨询热线:400-700-9624
    **************************************************************************************

    开课时间:11月29日(140学时)
    报名优惠:11月09日之前报名免费获得三星ARM2440开发板1块(仅10套) 或 免收300元教材费
    课程特点:
    ■以实验为主,理论经典讲授,内容为亚嵌多位老师多年教学精华提炼而成;
    ■学习内容涵盖 6 个方面,是全面、系统、专业地学习嵌入式linux技术的金典课程;
    1).ARM开发实战 2).嵌入式linux应用开发实战 3).嵌入式linux高级编程实战
    4).嵌入式linux移植实战 5).嵌入式linux驱动实战 6).嵌入式linux项目实战
    ■毕业后可免费参加亚嵌《嵌入式linux系统工程师中级》认证,通过认证的学生,签订就业协议,保证就业、保证底薪;
    ■保证教学质量,承诺本期学习未消化,不限次数免费重听相同课程,不限次数免费参加亚嵌《嵌入式linux系统工程师中级》认证,直至通过认证,保证就业。

    课程师资详见:http://www.akaedu.org/pages/team01.htm
    课程实验器材详见:http://www.akaedu.org/pages/center05_2.htm

    **************************************************************************************

    报名信息:
    ** 培训费用:¥5900.00 元
    ** 师生优惠:¥5300.00 元(凭学生证原件、教师资格证书原件)
    ** 团报费用:¥5300.00 元(3人以上)
    ** 教材费: ¥300.00 元                  

    ** 咨询电话:400-700-9624
          010-62642993   
          010-62631735 转 8005/8006
    ** 咨询QQ : 601334534
    ** 咨询MSN:[email protected]
    ** 课程咨询:史老师 15910982846(24小时)

    **************************************************************************************

  5. zhanglistar 于 2008-11-02 20:14:23发表:

    quite nice. but i have sth which is hard to me, although i am going to graduate from univeristy. i love linux and i love programing.

  6. cwqing1973 于 2008-11-01 15:21:10发表:

    楼主要把全源代码用汉语解释一次,那可就不简单了!

  7. guofzhao 于 2008-10-31 12:58:28发表:

    太好了!谢谢楼主!:0wpoi2