2 * SPDX-License-Identifier: BSD-3-Clause
4 * Copyright (c) 1989, 1993
5 * The Regents of the University of California. All rights reserved.
7 * This code is derived from software contributed to Berkeley by
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. Neither the name of the University nor the names of its contributors
19 * may be used to endorse or promote products derived from this software
20 * without specific prior written permission.
22 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
37 static const char copyright[] =
38 "@(#) Copyright (c) 1989, 1993\n\
39 The Regents of the University of California. All rights reserved.\n";
43 static char sccsid[] = "@(#)ping.c 8.1 (Berkeley) 6/5/93";
46 #include <sys/cdefs.h>
47 __FBSDID("$FreeBSD$");
52 * Using the Internet Control Message Protocol (ICMP) "ECHO" facility,
53 * measure round-trip-delays and packet loss across network paths.
57 * U. S. Army Ballistic Research Laboratory
61 * Public Domain. Distribution Unlimited.
63 * More statistics could always be gathered.
64 * This program has to run SUID to ROOT to access the ICMP socket.
67 #include <sys/param.h> /* NB: we rely on this for <sys/types.h> */
68 #include <sys/capsicum.h>
69 #include <sys/socket.h>
70 #include <sys/sysctl.h>
74 #include <netinet/in.h>
75 #include <netinet/in_systm.h>
76 #include <netinet/ip.h>
77 #include <netinet/ip_icmp.h>
78 #include <netinet/ip_var.h>
79 #include <arpa/inet.h>
81 #include <libcasper.h>
82 #include <casper/cap_dns.h>
85 #include <netipsec/ipsec.h>
88 #include <capsicum_helpers.h>
107 #define INADDR_LEN ((int)sizeof(in_addr_t))
108 #define TIMEVAL_LEN ((int)sizeof(struct tv32))
109 #define MASK_LEN (ICMP_MASKLEN - ICMP_MINLEN)
110 #define TS_LEN (ICMP_TSLEN - ICMP_MINLEN)
111 #define DEFDATALEN 56 /* default data length */
112 #define FLOOD_BACKOFF 20000 /* usecs to back off if F_FLOOD mode */
113 /* runs out of buffer space */
114 #define MAXIPLEN (sizeof(struct ip) + MAX_IPOPTLEN)
115 #define MAXICMPLEN (ICMP_ADVLENMIN + MAX_IPOPTLEN)
116 #define MAXWAIT 10000 /* max ms to wait for response */
117 #define MAXALARM (60 * 60) /* max seconds for alarm timeout */
120 #define A(bit) rcvd_tbl[(bit)>>3] /* identify byte in array */
121 #define B(bit) (1 << ((bit) & 0x07)) /* identify bit in byte */
122 #define SET(bit) (A(bit) |= B(bit))
123 #define CLR(bit) (A(bit) &= (~B(bit)))
124 #define TST(bit) (A(bit) & B(bit))
131 /* various options */
133 #define F_FLOOD 0x0001
134 #define F_INTERVAL 0x0002
135 #define F_NUMERIC 0x0004
136 #define F_PINGFILLED 0x0008
137 #define F_QUIET 0x0010
138 #define F_RROUTE 0x0020
139 #define F_SO_DEBUG 0x0040
140 #define F_SO_DONTROUTE 0x0080
141 #define F_VERBOSE 0x0100
142 #define F_QUIET2 0x0200
143 #define F_NOLOOP 0x0400
144 #define F_MTTL 0x0800
146 #define F_AUDIBLE 0x2000
148 #ifdef IPSEC_POLICY_IPSEC
149 #define F_POLICY 0x4000
150 #endif /*IPSEC_POLICY_IPSEC*/
153 #define F_MISSED 0x10000
154 #define F_ONCE 0x20000
155 #define F_HDRINCL 0x40000
156 #define F_MASK 0x80000
157 #define F_TIME 0x100000
158 #define F_SWEEP 0x200000
159 #define F_WAITTIME 0x400000
160 #define F_IP_VLAN_PCP 0x800000
161 #define F_DOT 0x1000000
164 * MAX_DUP_CHK is the number of bits in received table, i.e. the maximum
165 * number of received sequence numbers we can keep track of. Change 128
166 * to 8192 for complete accuracy...
168 #define MAX_DUP_CHK (8 * 128)
169 static int mx_dup_ck = MAX_DUP_CHK;
170 static char rcvd_tbl[MAX_DUP_CHK / 8];
172 static struct sockaddr_in whereto; /* who to ping */
173 static int datalen = DEFDATALEN;
174 static int maxpayload;
175 static int ssend; /* send socket file descriptor */
176 static int srecv; /* receive socket file descriptor */
177 static u_char outpackhdr[IP_MAXPACKET], *outpack;
178 static char BBELL = '\a'; /* characters written for MISSED and AUDIBLE */
179 static char BSPACE = '\b'; /* characters written for flood */
180 static const char *DOT = ".";
181 static size_t DOTlen = 1;
182 static size_t DOTidx = 0;
183 static char *hostname;
184 static char *shostname;
185 static int ident; /* process id to identify our packets */
186 static int uid; /* cached uid for micro-optimization */
187 static u_char icmp_type = ICMP_ECHO;
188 static u_char icmp_type_rsp = ICMP_ECHOREPLY;
189 static int phdr_len = 0;
193 static long nmissedmax; /* max value of ntransmitted - nreceived - 1 */
194 static long npackets; /* max packets to transmit */
195 static long nreceived; /* # of packets we got back */
196 static long nrepeats; /* number of duplicates */
197 static long ntransmitted; /* sequence # for outbound packets = #sent */
198 static long snpackets; /* max packets to transmit in one sweep */
199 static long sntransmitted; /* # of packets we sent in this sweep */
200 static int sweepmax; /* max value of payload in sweep */
201 static int sweepmin = 0; /* start value of payload in sweep */
202 static int sweepincr = 1; /* payload increment in sweep */
203 static int interval = 1000; /* interval between packets, ms */
204 static int waittime = MAXWAIT; /* timeout for each packet */
205 static long nrcvtimeout = 0; /* # of packets we got back after waittime */
208 static int timing; /* flag to do timing */
209 static double tmin = 999999999.0; /* minimum round trip time */
210 static double tmax = 0.0; /* maximum round trip time */
211 static double tsum = 0.0; /* sum of all times, for doing average */
212 static double tsumsq = 0.0; /* sum of all times squared, for std. dev. */
214 /* nonzero if we've been told to finish up */
215 static volatile sig_atomic_t finish_up;
216 static volatile sig_atomic_t siginfo_p;
218 static cap_channel_t *capdns;
220 static void fill(char *, char *);
221 static cap_channel_t *capdns_setup(void);
222 static void check_status(void);
223 static void finish(void) __dead2;
224 static void pinger(void);
225 static char *pr_addr(struct in_addr);
226 static char *pr_ntime(n_time);
227 static void pr_icmph(struct icmp *, struct ip *, const u_char *const);
228 static void pr_iph(struct ip *);
229 static void pr_pack(char *, ssize_t, struct sockaddr_in *, struct timespec *);
230 static void pr_retip(struct ip *, const u_char *);
231 static void status(int);
232 static void stopit(int);
235 ping(int argc, char *const *argv)
237 struct sockaddr_in from, sock_in;
238 struct in_addr ifaddr;
239 struct timespec last, intvl;
242 struct sigaction si_sa;
244 u_char *datap, packet[IP_MAXPACKET] __aligned(4);
246 char *ep, *source, *target, *payload;
248 #ifdef IPSEC_POLICY_IPSEC
249 char *policy_in, *policy_out;
251 struct sockaddr_in *to;
255 int almost_done, ch, df, hold, i, icmp_len, mib[4], preload;
256 int ssend_errno, srecv_errno, tos, ttl, pcp;
257 char ctrl[CMSG_SPACE(sizeof(struct timespec))];
258 char hnamebuf[MAXHOSTNAMELEN], snamebuf[MAXHOSTNAMELEN];
260 char rspace[MAX_IPOPTLEN]; /* record route space */
262 unsigned char loop, mttl;
264 payload = source = NULL;
265 #ifdef IPSEC_POLICY_IPSEC
266 policy_in = policy_out = NULL;
270 options |= F_NUMERIC;
273 * Do the stuff that we need root priv's for *first*, and
274 * then drop our setuid bit. Save error reporting for
277 * Historicaly ping was using one socket 's' for sending and for
278 * receiving. After capsicum(4) related changes we use two
279 * sockets. It was done for special ping use case - when user
280 * issue ping on multicast or broadcast address replies come
281 * from different addresses, not from the address we
282 * connect(2)'ed to, and send socket do not receive those
285 ssend = socket(AF_INET, SOCK_RAW, IPPROTO_ICMP);
287 srecv = socket(AF_INET, SOCK_RAW, IPPROTO_ICMP);
290 if (setuid(getuid()) != 0)
291 err(EX_NOPERM, "setuid() failed");
296 err(EX_OSERR, "ssend socket");
301 err(EX_OSERR, "srecv socket");
304 alarmtimeout = df = preload = tos = pcp = 0;
306 outpack = outpackhdr + sizeof(struct ip);
307 while ((ch = getopt(argc, argv, PING4OPTS)) != -1) {
311 if (optarg != NULL) {
313 DOTlen = strlen(optarg);
317 /* This option is processed in main(). */
323 options |= F_AUDIBLE;
326 options |= F_IP_VLAN_PCP;
327 ltmp = strtonum(optarg, -1, 7, &errstr);
329 errx(EX_USAGE, "invalid PCP: `%s'", optarg);
333 ltmp = strtonum(optarg, 1, LONG_MAX, &errstr);
336 "invalid count of packets to transmit: `%s'",
338 npackets = (long)ltmp;
341 options |= F_HDRINCL;
345 options |= F_SO_DEBUG;
350 err(EX_NOPERM, "-f flag");
354 setbuf(stdout, (char *)NULL);
356 case 'G': /* Maximum packet size for ping sweep */
357 ltmp = strtonum(optarg, 1, INT_MAX, &errstr);
358 if (errstr != NULL) {
359 errx(EX_USAGE, "invalid packet size: `%s'",
362 sweepmax = (int)ltmp;
363 if (uid != 0 && sweepmax > DEFDATALEN) {
364 errc(EX_NOPERM, EPERM,
365 "packet size too large: %d > %u",
366 sweepmax, DEFDATALEN);
370 case 'g': /* Minimum packet size for ping sweep */
371 ltmp = strtonum(optarg, 1, INT_MAX, &errstr);
372 if (errstr != NULL) {
373 errx(EX_USAGE, "invalid packet size: `%s'",
376 sweepmin = (int)ltmp;
377 if (uid != 0 && sweepmin > DEFDATALEN) {
378 errc(EX_NOPERM, EPERM,
379 "packet size too large: %d > %u",
380 sweepmin, DEFDATALEN);
385 options &= ~F_NUMERIC;
387 case 'h': /* Packet size increment for ping sweep */
388 ltmp = strtonum(optarg, 1, INT_MAX, &errstr);
389 if (errstr != NULL) {
390 errx(EX_USAGE, "invalid packet size: `%s'",
393 sweepincr = (int)ltmp;
394 if (uid != 0 && sweepincr > DEFDATALEN) {
395 errc(EX_NOPERM, EPERM,
396 "packet size too large: %d > %u",
397 sweepincr, DEFDATALEN);
401 case 'I': /* multicast interface */
402 if (inet_aton(optarg, &ifaddr) == 0)
404 "invalid multicast interface: `%s'",
408 case 'i': /* wait between sending packets */
409 t = strtod(optarg, &ep) * 1000.0;
410 if (*ep || ep == optarg || t > (double)INT_MAX)
411 errx(EX_USAGE, "invalid timing interval: `%s'",
413 options |= F_INTERVAL;
415 if (uid && interval < 1000) {
417 err(EX_NOPERM, "-i interval too short");
425 ltmp = strtonum(optarg, 0, INT_MAX, &errstr);
428 "invalid preload value: `%s'", optarg);
431 err(EX_NOPERM, "-l flag");
446 errx(EX_USAGE, "invalid message: `%c'", optarg[0]);
451 ltmp = strtonum(optarg, 0, MAXTTL, &errstr);
453 errx(EX_USAGE, "invalid TTL: `%s'", optarg);
458 options |= F_NUMERIC;
464 #ifdef IPSEC_POLICY_IPSEC
467 if (!strncmp("in", optarg, 2))
468 policy_in = strdup(optarg);
469 else if (!strncmp("out", optarg, 3))
470 policy_out = strdup(optarg);
472 errx(1, "invalid security policy");
474 #endif /*IPSEC_POLICY_IPSEC*/
476 case 'p': /* fill buffer with user pattern */
477 options |= F_PINGFILLED;
490 options |= F_SO_DONTROUTE;
495 case 's': /* size of packet to send */
496 ltmp = strtonum(optarg, 0, INT_MAX, &errstr);
498 errx(EX_USAGE, "invalid packet size: `%s'",
501 if (uid != 0 && datalen > DEFDATALEN) {
504 "packet size too large: %d > %u",
505 datalen, DEFDATALEN);
508 case 'T': /* multicast TTL */
509 ltmp = strtonum(optarg, 0, MAXTTL, &errstr);
511 errx(EX_USAGE, "invalid multicast TTL: `%s'",
513 mttl = (unsigned char)ltmp;
517 alarmtimeout = strtoul(optarg, &ep, 0);
518 if ((alarmtimeout < 1) || (alarmtimeout == ULONG_MAX))
519 errx(EX_USAGE, "invalid timeout: `%s'",
521 if (alarmtimeout > MAXALARM)
522 errx(EX_USAGE, "invalid timeout: `%s' > %d",
525 struct itimerval itv;
527 timerclear(&itv.it_interval);
528 timerclear(&itv.it_value);
529 itv.it_value.tv_sec = (time_t)alarmtimeout;
530 if (setitimer(ITIMER_REAL, &itv, NULL) != 0)
535 options |= F_VERBOSE;
537 case 'W': /* wait ms for answer */
538 t = strtod(optarg, &ep);
539 if (*ep || ep == optarg || t > (double)INT_MAX)
540 errx(EX_USAGE, "invalid timing interval: `%s'",
542 options |= F_WAITTIME;
546 options |= F_HDRINCL;
547 ltmp = strtol(optarg, &ep, 0);
548 if (*ep || ep == optarg || ltmp > MAXTOS || ltmp < 0)
549 errx(EX_USAGE, "invalid TOS: `%s'", optarg);
557 if (argc - optind != 1)
559 target = argv[optind];
561 switch (options & (F_MASK|F_TIME)) {
564 icmp_type = ICMP_MASKREQ;
565 icmp_type_rsp = ICMP_MASKREPLY;
567 if (!(options & F_QUIET))
568 (void)printf("ICMP_MASKREQ\n");
571 icmp_type = ICMP_TSTAMP;
572 icmp_type_rsp = ICMP_TSTAMPREPLY;
574 if (!(options & F_QUIET))
575 (void)printf("ICMP_TSTAMP\n");
578 errx(EX_USAGE, "ICMP_TSTAMP and ICMP_MASKREQ are exclusive.");
581 icmp_len = sizeof(struct ip) + ICMP_MINLEN + phdr_len;
582 if (options & F_RROUTE)
583 icmp_len += MAX_IPOPTLEN;
584 maxpayload = IP_MAXPACKET - icmp_len;
585 if (datalen > maxpayload)
586 errx(EX_USAGE, "packet size too large: %d > %d", datalen,
588 send_len = icmp_len + datalen;
589 datap = &outpack[ICMP_MINLEN + phdr_len + TIMEVAL_LEN];
590 if (options & F_PINGFILLED) {
591 fill((char *)datap, payload);
593 capdns = capdns_setup();
595 bzero((char *)&sock_in, sizeof(sock_in));
596 sock_in.sin_family = AF_INET;
597 if (inet_aton(source, &sock_in.sin_addr) != 0) {
600 hp = cap_gethostbyname2(capdns, source, AF_INET);
602 errx(EX_NOHOST, "cannot resolve %s: %s",
603 source, hstrerror(h_errno));
605 sock_in.sin_len = sizeof sock_in;
606 if ((unsigned)hp->h_length > sizeof(sock_in.sin_addr) ||
608 errx(1, "gethostbyname2: illegal address");
609 memcpy(&sock_in.sin_addr, hp->h_addr_list[0],
610 sizeof(sock_in.sin_addr));
611 (void)strncpy(snamebuf, hp->h_name,
612 sizeof(snamebuf) - 1);
613 snamebuf[sizeof(snamebuf) - 1] = '\0';
614 shostname = snamebuf;
616 if (bind(ssend, (struct sockaddr *)&sock_in, sizeof sock_in) ==
621 bzero(&whereto, sizeof(whereto));
623 to->sin_family = AF_INET;
624 to->sin_len = sizeof *to;
625 if (inet_aton(target, &to->sin_addr) != 0) {
628 hp = cap_gethostbyname2(capdns, target, AF_INET);
630 errx(EX_NOHOST, "cannot resolve %s: %s",
631 target, hstrerror(h_errno));
633 if ((unsigned)hp->h_length > sizeof(to->sin_addr))
634 errx(1, "gethostbyname2 returned an illegal address");
635 memcpy(&to->sin_addr, hp->h_addr_list[0], sizeof to->sin_addr);
636 (void)strncpy(hnamebuf, hp->h_name, sizeof(hnamebuf) - 1);
637 hnamebuf[sizeof(hnamebuf) - 1] = '\0';
641 /* From now on we will use only reverse DNS lookups. */
643 if (capdns != NULL) {
644 const char *types[1];
646 types[0] = "ADDR2NAME";
647 if (cap_dns_type_limit(capdns, types, 1) < 0)
648 err(1, "unable to limit access to system.dns service");
651 if (connect(ssend, (struct sockaddr *)&whereto, sizeof(whereto)) != 0)
654 if (options & F_FLOOD && options & F_INTERVAL)
655 errx(EX_USAGE, "-f and -i: incompatible options");
657 if (options & F_FLOOD && IN_MULTICAST(ntohl(to->sin_addr.s_addr)))
659 "-f flag cannot be used with multicast destination");
660 if (options & (F_MIF | F_NOLOOP | F_MTTL)
661 && !IN_MULTICAST(ntohl(to->sin_addr.s_addr)))
663 "-I, -L, -T flags cannot be used with unicast destination");
665 if (datalen >= TIMEVAL_LEN) /* can we time transfer */
668 if ((options & (F_PINGFILLED | F_SWEEP)) == 0)
669 for (i = TIMEVAL_LEN; i < datalen; ++i)
672 ident = getpid() & 0xFFFF;
675 if (options & F_SO_DEBUG) {
676 (void)setsockopt(ssend, SOL_SOCKET, SO_DEBUG, (char *)&hold,
678 (void)setsockopt(srecv, SOL_SOCKET, SO_DEBUG, (char *)&hold,
681 if (options & F_SO_DONTROUTE)
682 (void)setsockopt(ssend, SOL_SOCKET, SO_DONTROUTE, (char *)&hold,
684 if (options & F_IP_VLAN_PCP) {
685 (void)setsockopt(ssend, IPPROTO_IP, IP_VLAN_PCP, (char *)&pcp,
689 #ifdef IPSEC_POLICY_IPSEC
690 if (options & F_POLICY) {
692 if (policy_in != NULL) {
693 buf = ipsec_set_policy(policy_in, strlen(policy_in));
695 errx(EX_CONFIG, "%s", ipsec_strerror());
696 if (setsockopt(srecv, IPPROTO_IP, IP_IPSEC_POLICY,
697 buf, ipsec_get_policylen(buf)) < 0)
699 "ipsec policy cannot be configured");
703 if (policy_out != NULL) {
704 buf = ipsec_set_policy(policy_out, strlen(policy_out));
706 errx(EX_CONFIG, "%s", ipsec_strerror());
707 if (setsockopt(ssend, IPPROTO_IP, IP_IPSEC_POLICY,
708 buf, ipsec_get_policylen(buf)) < 0)
710 "ipsec policy cannot be configured");
714 #endif /*IPSEC_POLICY_IPSEC*/
717 if (options & F_HDRINCL) {
720 memcpy(&ip, outpackhdr, sizeof(ip));
721 if (!(options & (F_TTL | F_MTTL))) {
725 mib[3] = IPCTL_DEFTTL;
727 if (sysctl(mib, 4, &ttl, &sz, NULL, 0) == -1)
728 err(1, "sysctl(net.inet.ip.ttl)");
730 setsockopt(ssend, IPPROTO_IP, IP_HDRINCL, &hold, sizeof(hold));
732 ip.ip_hl = sizeof(struct ip) >> 2;
735 ip.ip_off = htons(df ? IP_DF : 0);
737 ip.ip_p = IPPROTO_ICMP;
738 ip.ip_src.s_addr = source ? sock_in.sin_addr.s_addr : INADDR_ANY;
739 ip.ip_dst = to->sin_addr;
740 memcpy(outpackhdr, &ip, sizeof(ip));
744 * Here we enter capability mode. Further down access to global
745 * namespaces (e.g filesystem) is restricted (see capsicum(4)).
746 * We must connect(2) our socket before this point.
748 caph_cache_catpages();
749 if (caph_enter_casper() < 0)
750 err(1, "caph_enter_casper");
752 cap_rights_init(&rights, CAP_RECV, CAP_EVENT, CAP_SETSOCKOPT);
753 if (caph_rights_limit(srecv, &rights) < 0)
754 err(1, "cap_rights_limit srecv");
755 cap_rights_init(&rights, CAP_SEND, CAP_SETSOCKOPT);
756 if (caph_rights_limit(ssend, &rights) < 0)
757 err(1, "cap_rights_limit ssend");
759 /* record route option */
760 if (options & F_RROUTE) {
762 bzero(rspace, sizeof(rspace));
763 rspace[IPOPT_OPTVAL] = IPOPT_RR;
764 rspace[IPOPT_OLEN] = sizeof(rspace) - 1;
765 rspace[IPOPT_OFFSET] = IPOPT_MINOFF;
766 rspace[sizeof(rspace) - 1] = IPOPT_EOL;
767 if (setsockopt(ssend, IPPROTO_IP, IP_OPTIONS, rspace,
769 err(EX_OSERR, "setsockopt IP_OPTIONS");
772 "record route not available in this implementation");
773 #endif /* IP_OPTIONS */
776 if (options & F_TTL) {
777 if (setsockopt(ssend, IPPROTO_IP, IP_TTL, &ttl,
779 err(EX_OSERR, "setsockopt IP_TTL");
782 if (options & F_NOLOOP) {
783 if (setsockopt(ssend, IPPROTO_IP, IP_MULTICAST_LOOP, &loop,
785 err(EX_OSERR, "setsockopt IP_MULTICAST_LOOP");
788 if (options & F_MTTL) {
789 if (setsockopt(ssend, IPPROTO_IP, IP_MULTICAST_TTL, &mttl,
791 err(EX_OSERR, "setsockopt IP_MULTICAST_TTL");
794 if (options & F_MIF) {
795 if (setsockopt(ssend, IPPROTO_IP, IP_MULTICAST_IF, &ifaddr,
796 sizeof(ifaddr)) < 0) {
797 err(EX_OSERR, "setsockopt IP_MULTICAST_IF");
803 int ts_clock = SO_TS_MONOTONIC;
804 if (setsockopt(srecv, SOL_SOCKET, SO_TIMESTAMP, &on,
806 err(EX_OSERR, "setsockopt SO_TIMESTAMP");
807 if (setsockopt(srecv, SOL_SOCKET, SO_TS_CLOCK, &ts_clock,
808 sizeof(ts_clock)) < 0)
809 err(EX_OSERR, "setsockopt SO_TS_CLOCK");
813 if (sweepmin > sweepmax)
815 "Maximum packet size must be no less than the minimum packet size");
817 if (sweepmax > maxpayload - TIMEVAL_LEN)
818 errx(EX_USAGE, "Invalid sweep maximum");
820 if (datalen != DEFDATALEN)
822 "Packet size and ping sweep are mutually exclusive");
825 snpackets = npackets;
830 send_len = icmp_len + sweepmin;
832 if (options & F_SWEEP && !sweepmax)
833 errx(EX_USAGE, "Maximum sweep size must be specified");
836 * When pinging the broadcast address, you can get a lot of answers.
837 * Doing something so evil is useful if you are trying to stress the
838 * ethernet, or just want to fill the arp cache to get some stuff for
839 * /etc/ethers. But beware: RFC 1122 allows hosts to ignore broadcast
840 * or multicast pings if they wish.
844 * XXX receive buffer needs undetermined space for mbuf overhead
847 hold = IP_MAXPACKET + 128;
848 (void)setsockopt(srecv, SOL_SOCKET, SO_RCVBUF, (char *)&hold,
850 /* CAP_SETSOCKOPT removed */
851 cap_rights_init(&rights, CAP_RECV, CAP_EVENT);
852 if (caph_rights_limit(srecv, &rights) < 0)
853 err(1, "cap_rights_limit srecv setsockopt");
855 (void)setsockopt(ssend, SOL_SOCKET, SO_SNDBUF, (char *)&hold,
857 /* CAP_SETSOCKOPT removed */
858 cap_rights_init(&rights, CAP_SEND);
859 if (caph_rights_limit(ssend, &rights) < 0)
860 err(1, "cap_rights_limit ssend setsockopt");
862 if (to->sin_family == AF_INET) {
863 (void)printf("PING %s (%s)", hostname,
864 inet_ntoa(to->sin_addr));
866 (void)printf(" from %s", shostname);
868 (void)printf(": (%d ... %d) data bytes\n",
871 (void)printf(": %d data bytes\n", datalen);
875 (void)printf("PING %s: (%d ... %d) data bytes\n",
876 hostname, sweepmin, sweepmax);
878 (void)printf("PING %s: %d data bytes\n", hostname, datalen);
882 * Use sigaction() instead of signal() to get unambiguous semantics,
883 * in particular with SA_RESTART not set.
886 sigemptyset(&si_sa.sa_mask);
889 si_sa.sa_handler = stopit;
890 if (sigaction(SIGINT, &si_sa, 0) == -1) {
891 err(EX_OSERR, "sigaction SIGINT");
894 si_sa.sa_handler = status;
895 if (sigaction(SIGINFO, &si_sa, 0) == -1) {
896 err(EX_OSERR, "sigaction");
899 if (alarmtimeout > 0) {
900 si_sa.sa_handler = stopit;
901 if (sigaction(SIGALRM, &si_sa, 0) == -1)
902 err(EX_OSERR, "sigaction SIGALRM");
905 bzero(&msg, sizeof(msg));
906 msg.msg_name = (caddr_t)&from;
910 msg.msg_control = (caddr_t)ctrl;
911 msg.msg_controllen = sizeof(ctrl);
913 iov.iov_base = packet;
914 iov.iov_len = IP_MAXPACKET;
917 pinger(); /* send the first ping */
919 if (npackets != 0 && preload > npackets)
921 while (preload--) /* fire off them quickies */
924 (void)clock_gettime(CLOCK_MONOTONIC, &last);
926 if (options & F_FLOOD) {
928 intvl.tv_nsec = 10000000;
930 intvl.tv_sec = interval / 1000;
931 intvl.tv_nsec = interval % 1000 * 1000000;
936 struct timespec now, timeout;
942 if ((unsigned)srecv >= FD_SETSIZE)
943 errx(EX_OSERR, "descriptor too large");
945 FD_SET(srecv, &rfds);
946 (void)clock_gettime(CLOCK_MONOTONIC, &now);
947 timespecadd(&last, &intvl, &timeout);
948 timespecsub(&timeout, &now, &timeout);
949 if (timeout.tv_sec < 0)
950 timespecclear(&timeout);
951 n = pselect(srecv + 1, &rfds, NULL, NULL, &timeout, NULL);
953 continue; /* Must be EINTR. */
955 struct timespec *tv = NULL;
957 struct cmsghdr *cmsg = CMSG_FIRSTHDR(&msg);
959 msg.msg_namelen = sizeof(from);
960 if ((cc = recvmsg(srecv, &msg, 0)) < 0) {
968 cmsg->cmsg_level == SOL_SOCKET &&
969 cmsg->cmsg_type == SCM_TIMESTAMP &&
970 cmsg->cmsg_len == CMSG_LEN(sizeof *tv)) {
971 /* Copy to avoid alignment problems: */
972 memcpy(&now, CMSG_DATA(cmsg), sizeof(now));
977 (void)clock_gettime(CLOCK_MONOTONIC, &now);
980 pr_pack((char *)packet, cc, &from, tv);
981 if ((options & F_ONCE && nreceived) ||
982 (npackets && nreceived >= npackets))
985 if (n == 0 || options & F_FLOOD) {
986 if (sweepmax && sntransmitted == snpackets) {
987 if (datalen + sweepincr > sweepmax)
989 for (i = 0; i < sweepincr; i++)
991 datalen += sweepincr;
992 send_len = icmp_len + datalen;
995 if (!npackets || ntransmitted < npackets)
1003 intvl.tv_sec = 2 * tmax / 1000;
1007 intvl.tv_sec = waittime / 1000;
1008 intvl.tv_nsec = waittime % 1000 * 1000000;
1011 (void)clock_gettime(CLOCK_MONOTONIC, &last);
1012 if (ntransmitted - nreceived - 1 > nmissedmax) {
1013 nmissedmax = ntransmitted - nreceived - 1;
1014 if (options & F_MISSED)
1015 (void)write(STDOUT_FILENO, &BBELL, 1);
1021 exit(0); /* Make the compiler happy */
1026 * Set the global bit that causes the main loop to quit.
1027 * Do NOT call finish() from here, since finish() does far too much
1028 * to be called from a signal handler.
1031 stopit(int sig __unused)
1035 * When doing reverse DNS lookups, the finish_up flag might not
1036 * be noticed for a while. Just exit if we get a second SIGINT.
1038 if (!(options & F_NUMERIC) && finish_up)
1039 _exit(nreceived ? 0 : 2);
1045 * Compose and transmit an ICMP ECHO REQUEST packet. The IP packet
1046 * will be added on by the kernel. The ID field is our UNIX process ID,
1047 * and the sequence number is an ascending integer. The first TIMEVAL_LEN
1048 * bytes of the data portion are used to hold a UNIX "timespec" struct in
1049 * host byte-order, to compute the round-trip time.
1054 struct timespec now;
1061 memcpy(&icp, outpack, ICMP_MINLEN + phdr_len);
1062 icp.icmp_type = icmp_type;
1065 icp.icmp_seq = htons(ntransmitted);
1066 icp.icmp_id = ident; /* ID */
1068 CLR(ntransmitted % mx_dup_ck);
1070 if ((options & F_TIME) || timing) {
1071 (void)clock_gettime(CLOCK_MONOTONIC, &now);
1073 * Truncate seconds down to 32 bits in order
1074 * to fit the timestamp within 8 bytes of the
1075 * packet. We're only concerned with
1076 * durations, not absolute times.
1078 tv32.tv32_sec = (uint32_t)htonl(now.tv_sec);
1079 tv32.tv32_nsec = (uint32_t)htonl(now.tv_nsec);
1080 if (options & F_TIME)
1081 icp.icmp_otime = htonl((now.tv_sec % (24*60*60))
1082 * 1000 + now.tv_nsec / 1000000);
1084 bcopy((void *)&tv32,
1085 (void *)&outpack[ICMP_MINLEN + phdr_len],
1089 memcpy(outpack, &icp, ICMP_MINLEN + phdr_len);
1091 cc = ICMP_MINLEN + phdr_len + datalen;
1093 /* compute ICMP checksum here */
1094 icp.icmp_cksum = in_cksum(outpack, cc);
1095 /* Update icmp_cksum in the raw packet data buffer. */
1096 memcpy(outpack + offsetof(struct icmp, icmp_cksum), &icp.icmp_cksum,
1097 sizeof(icp.icmp_cksum));
1099 if (options & F_HDRINCL) {
1102 cc += sizeof(struct ip);
1103 ip.ip_len = htons(cc);
1104 /* Update ip_len in the raw packet data buffer. */
1105 memcpy(outpackhdr + offsetof(struct ip, ip_len), &ip.ip_len,
1107 ip.ip_sum = in_cksum(outpackhdr, cc);
1108 /* Update ip_sum in the raw packet data buffer. */
1109 memcpy(outpackhdr + offsetof(struct ip, ip_sum), &ip.ip_sum,
1111 packet = outpackhdr;
1113 i = send(ssend, (char *)packet, cc, 0);
1114 if (i < 0 || i != cc) {
1116 if (options & F_FLOOD && errno == ENOBUFS) {
1117 usleep(FLOOD_BACKOFF);
1122 warn("%s: partial write: %d of %d bytes",
1128 if (!(options & F_QUIET) && options & F_DOT)
1129 (void)write(STDOUT_FILENO, &DOT[DOTidx++ % DOTlen], 1);
1134 * Print out the packet, if it came from us. This logic is necessary
1135 * because ALL readers of the ICMP socket get a copy of ALL ICMP packets
1136 * which arrive ('tis only fair). This permits multiple copies of this
1137 * program to be run without having intermingled output (or statistics!).
1140 pr_pack(char *buf, ssize_t cc, struct sockaddr_in *from, struct timespec *tv)
1146 const u_char *icmp_data_raw;
1148 int dupflag, hlen, i, j, recv_len;
1150 static int old_rrlen;
1151 static char old_rr[MAX_IPOPTLEN];
1153 u_char oip_header_len;
1155 const u_char *oicmp_raw;
1158 * Get size of IP header of the received packet. The
1159 * information is contained in the lower four bits of the
1162 memcpy(&l, buf, sizeof(l));
1163 hlen = (l & 0x0f) << 2;
1164 memcpy(&ip, buf, hlen);
1166 /* Check the IP header */
1168 if (cc < hlen + ICMP_MINLEN) {
1169 if (options & F_VERBOSE)
1170 warn("packet too short (%zd bytes) from %s", cc,
1171 inet_ntoa(from->sin_addr));
1176 icmp_data_raw = buf + hlen + offsetof(struct icmp, icmp_ip);
1178 icmp_data_raw = buf + hlen + offsetof(struct icmp, icmp_data);
1181 /* Now the ICMP part */
1183 memcpy(&icp, buf + hlen, MIN((ssize_t)sizeof(icp), cc));
1184 if (icp.icmp_type == icmp_type_rsp) {
1185 if (icp.icmp_id != ident)
1186 return; /* 'Twas not our ECHO */
1190 struct timespec tv1;
1194 tp = icmp_data_raw + phdr_len;
1196 if ((size_t)(cc - ICMP_MINLEN - phdr_len) >=
1198 /* Copy to avoid alignment problems: */
1199 memcpy(&tv32, tp, sizeof(tv32));
1200 tv1.tv_sec = ntohl(tv32.tv32_sec);
1201 tv1.tv_nsec = ntohl(tv32.tv32_nsec);
1202 timespecsub(tv, &tv1, tv);
1203 triptime = ((double)tv->tv_sec) * 1000.0 +
1204 ((double)tv->tv_nsec) / 1000000.0;
1206 tsumsq += triptime * triptime;
1207 if (triptime < tmin)
1209 if (triptime > tmax)
1215 seq = ntohs(icp.icmp_seq);
1217 if (TST(seq % mx_dup_ck)) {
1222 SET(seq % mx_dup_ck);
1226 if (options & F_QUIET)
1229 if (options & F_WAITTIME && triptime > waittime) {
1234 if (options & F_DOT)
1235 (void)write(STDOUT_FILENO, &BSPACE, 1);
1237 (void)printf("%zd bytes from %s: icmp_seq=%u", cc,
1238 pr_addr(from->sin_addr), seq);
1239 (void)printf(" ttl=%d", ip.ip_ttl);
1241 (void)printf(" time=%.3f ms", triptime);
1243 (void)printf(" (DUP!)");
1244 if (options & F_AUDIBLE)
1245 (void)write(STDOUT_FILENO, &BBELL, 1);
1246 if (options & F_MASK) {
1247 /* Just prentend this cast isn't ugly */
1248 (void)printf(" mask=%s",
1249 inet_ntoa(*(struct in_addr *)&(icp.icmp_mask)));
1251 if (options & F_TIME) {
1252 (void)printf(" tso=%s", pr_ntime(icp.icmp_otime));
1253 (void)printf(" tsr=%s", pr_ntime(icp.icmp_rtime));
1254 (void)printf(" tst=%s", pr_ntime(icp.icmp_ttime));
1256 if (recv_len != send_len) {
1258 "\nwrong total length %d instead of %d",
1259 recv_len, send_len);
1261 /* check the data */
1262 cp = (u_char*)(buf + hlen + offsetof(struct icmp,
1263 icmp_data) + phdr_len);
1264 dp = &outpack[ICMP_MINLEN + phdr_len];
1265 cc -= ICMP_MINLEN + phdr_len;
1267 if (timing) { /* don't check variable timestamp */
1273 for (; i < datalen && cc > 0; ++i, ++cp, ++dp, --cc) {
1275 (void)printf("\nwrong data byte #%d should be 0x%x but was 0x%x",
1277 (void)printf("\ncp:");
1278 cp = (u_char*)(buf + hlen +
1279 offsetof(struct icmp, icmp_data));
1280 for (i = 0; i < datalen; ++i, ++cp) {
1282 (void)printf("\n\t");
1283 (void)printf("%2x ", *cp);
1285 (void)printf("\ndp:");
1286 cp = &outpack[ICMP_MINLEN];
1287 for (i = 0; i < datalen; ++i, ++cp) {
1289 (void)printf("\n\t");
1290 (void)printf("%2x ", *cp);
1298 * We've got something other than an ECHOREPLY.
1299 * See if it's a reply to something that we sent.
1300 * We can compare IP destination, protocol,
1301 * and ICMP type and ID.
1303 * Only print all the error messages if we are running
1304 * as root to avoid leaking information not normally
1305 * available to those not running as root.
1307 memcpy(&oip_header_len, icmp_data_raw, sizeof(oip_header_len));
1308 oip_header_len = (oip_header_len & 0x0f) << 2;
1309 memcpy(&oip, icmp_data_raw, oip_header_len);
1310 oicmp_raw = icmp_data_raw + oip_header_len;
1311 memcpy(&oicmp, oicmp_raw, offsetof(struct icmp, icmp_id) +
1312 sizeof(oicmp.icmp_id));
1314 if (((options & F_VERBOSE) && uid == 0) ||
1315 (!(options & F_QUIET2) &&
1316 (oip.ip_dst.s_addr == whereto.sin_addr.s_addr) &&
1317 (oip.ip_p == IPPROTO_ICMP) &&
1318 (oicmp.icmp_type == ICMP_ECHO) &&
1319 (oicmp.icmp_id == ident))) {
1320 (void)printf("%zd bytes from %s: ", cc,
1321 pr_addr(from->sin_addr));
1322 pr_icmph(&icp, &oip, oicmp_raw);
1327 /* Display any IP options */
1328 cp = (u_char *)buf + sizeof(struct ip);
1330 for (; hlen > (int)sizeof(struct ip); --hlen, ++cp)
1337 (void)printf(*cp == IPOPT_LSRR ?
1338 "\nLSRR: " : "\nSSRR: ");
1339 j = cp[IPOPT_OLEN] - IPOPT_MINOFF + 1;
1342 if (j >= INADDR_LEN &&
1343 j <= hlen - (int)sizeof(struct ip)) {
1345 bcopy(++cp, &ina.s_addr, INADDR_LEN);
1346 if (ina.s_addr == 0)
1347 (void)printf("\t0.0.0.0");
1349 (void)printf("\t%s",
1352 cp += INADDR_LEN - 1;
1356 (void)putchar('\n');
1359 (void)printf("\t(truncated route)\n");
1362 j = cp[IPOPT_OLEN]; /* get length */
1363 i = cp[IPOPT_OFFSET]; /* and pointer */
1368 i = i - IPOPT_MINOFF + 1;
1369 if (i < 0 || i > (hlen - (int)sizeof(struct ip))) {
1374 && !bcmp((char *)cp, old_rr, i)
1375 && !(options & F_DOT)) {
1376 (void)printf("\t(same route)");
1382 bcopy((char *)cp, old_rr, i);
1383 (void)printf("\nRR: ");
1384 if (i >= INADDR_LEN &&
1385 i <= hlen - (int)sizeof(struct ip)) {
1387 bcopy(++cp, &ina.s_addr, INADDR_LEN);
1388 if (ina.s_addr == 0)
1389 (void)printf("\t0.0.0.0");
1391 (void)printf("\t%s",
1394 cp += INADDR_LEN - 1;
1398 (void)putchar('\n');
1401 (void)printf("\t(truncated route)");
1404 (void)printf("\nNOP");
1407 (void)printf("\nunknown option %x", *cp);
1410 if (!(options & F_DOT)) {
1411 (void)putchar('\n');
1412 (void)fflush(stdout);
1418 * Print out statistics when SIGINFO is received.
1422 status(int sig __unused)
1434 (void)fprintf(stderr, "\r%ld/%ld packets received (%.1f%%)",
1435 nreceived, ntransmitted,
1436 ntransmitted ? nreceived * 100.0 / ntransmitted : 0.0);
1437 if (nreceived && timing)
1438 (void)fprintf(stderr, " %.3f min / %.3f avg / %.3f max",
1439 tmin, tsum / (nreceived + nrepeats), tmax);
1440 (void)fprintf(stderr, "\n");
1446 * Print out statistics, and give up.
1452 (void)signal(SIGINT, SIG_IGN);
1453 (void)signal(SIGALRM, SIG_IGN);
1454 (void)putchar('\n');
1455 (void)fflush(stdout);
1456 (void)printf("--- %s ping statistics ---\n", hostname);
1457 (void)printf("%ld packets transmitted, ", ntransmitted);
1458 (void)printf("%ld packets received, ", nreceived);
1460 (void)printf("+%ld duplicates, ", nrepeats);
1462 if (nreceived > ntransmitted)
1463 (void)printf("-- somebody's printing up packets!");
1465 (void)printf("%.1f%% packet loss",
1466 ((ntransmitted - nreceived) * 100.0) /
1470 (void)printf(", %ld packets out of wait time", nrcvtimeout);
1471 (void)putchar('\n');
1472 if (nreceived && timing) {
1473 double n = nreceived + nrepeats;
1474 double avg = tsum / n;
1475 double vari = tsumsq / n - avg * avg;
1477 "round-trip min/avg/max/stddev = %.3f/%.3f/%.3f/%.3f ms\n",
1478 tmin, avg, tmax, sqrt(vari));
1488 static char *ttab[] = {
1489 "Echo Reply", /* ip + seq + udata */
1490 "Dest Unreachable", /* net, host, proto, port, frag, sr + IP */
1491 "Source Quench", /* IP */
1492 "Redirect", /* redirect type, gateway, + IP */
1494 "Time Exceeded", /* transit, frag reassem + IP */
1495 "Parameter Problem", /* pointer + IP */
1496 "Timestamp", /* id + seq + three timestamps */
1497 "Timestamp Reply", /* " */
1498 "Info Request", /* id + sq */
1499 "Info Reply" /* " */
1505 * Print a descriptive string about an ICMP header.
1508 pr_icmph(struct icmp *icp, struct ip *oip, const u_char *const oicmp_raw)
1511 switch(icp->icmp_type) {
1512 case ICMP_ECHOREPLY:
1513 (void)printf("Echo Reply\n");
1514 /* XXX ID + Seq + Data */
1517 switch(icp->icmp_code) {
1518 case ICMP_UNREACH_NET:
1519 (void)printf("Destination Net Unreachable\n");
1521 case ICMP_UNREACH_HOST:
1522 (void)printf("Destination Host Unreachable\n");
1524 case ICMP_UNREACH_PROTOCOL:
1525 (void)printf("Destination Protocol Unreachable\n");
1527 case ICMP_UNREACH_PORT:
1528 (void)printf("Destination Port Unreachable\n");
1530 case ICMP_UNREACH_NEEDFRAG:
1531 (void)printf("frag needed and DF set (MTU %d)\n",
1532 ntohs(icp->icmp_nextmtu));
1534 case ICMP_UNREACH_SRCFAIL:
1535 (void)printf("Source Route Failed\n");
1537 case ICMP_UNREACH_FILTER_PROHIB:
1538 (void)printf("Communication prohibited by filter\n");
1541 (void)printf("Dest Unreachable, Bad Code: %d\n",
1545 /* Print returned IP header information */
1546 pr_retip(oip, oicmp_raw);
1548 case ICMP_SOURCEQUENCH:
1549 (void)printf("Source Quench\n");
1550 pr_retip(oip, oicmp_raw);
1553 switch(icp->icmp_code) {
1554 case ICMP_REDIRECT_NET:
1555 (void)printf("Redirect Network");
1557 case ICMP_REDIRECT_HOST:
1558 (void)printf("Redirect Host");
1560 case ICMP_REDIRECT_TOSNET:
1561 (void)printf("Redirect Type of Service and Network");
1563 case ICMP_REDIRECT_TOSHOST:
1564 (void)printf("Redirect Type of Service and Host");
1567 (void)printf("Redirect, Bad Code: %d", icp->icmp_code);
1570 (void)printf("(New addr: %s)\n", inet_ntoa(icp->icmp_gwaddr));
1571 pr_retip(oip, oicmp_raw);
1574 (void)printf("Echo Request\n");
1575 /* XXX ID + Seq + Data */
1578 switch(icp->icmp_code) {
1579 case ICMP_TIMXCEED_INTRANS:
1580 (void)printf("Time to live exceeded\n");
1582 case ICMP_TIMXCEED_REASS:
1583 (void)printf("Frag reassembly time exceeded\n");
1586 (void)printf("Time exceeded, Bad Code: %d\n",
1590 pr_retip(oip, oicmp_raw);
1592 case ICMP_PARAMPROB:
1593 (void)printf("Parameter problem: pointer = 0x%02x\n",
1594 icp->icmp_hun.ih_pptr);
1595 pr_retip(oip, oicmp_raw);
1598 (void)printf("Timestamp\n");
1599 /* XXX ID + Seq + 3 timestamps */
1601 case ICMP_TSTAMPREPLY:
1602 (void)printf("Timestamp Reply\n");
1603 /* XXX ID + Seq + 3 timestamps */
1606 (void)printf("Information Request\n");
1609 case ICMP_IREQREPLY:
1610 (void)printf("Information Reply\n");
1614 (void)printf("Address Mask Request\n");
1616 case ICMP_MASKREPLY:
1617 (void)printf("Address Mask Reply\n");
1619 case ICMP_ROUTERADVERT:
1620 (void)printf("Router Advertisement\n");
1622 case ICMP_ROUTERSOLICIT:
1623 (void)printf("Router Solicitation\n");
1626 (void)printf("Bad ICMP type: %d\n", icp->icmp_type);
1632 * Print an IP header with options.
1635 pr_iph(struct ip *ip)
1641 hlen = ip->ip_hl << 2;
1642 cp = (u_char *)ip + 20; /* point to options */
1644 (void)printf("Vr HL TOS Len ID Flg off TTL Pro cks Src Dst\n");
1645 (void)printf(" %1x %1x %02x %04x %04x",
1646 ip->ip_v, ip->ip_hl, ip->ip_tos, ntohs(ip->ip_len),
1648 (void)printf(" %1lx %04lx",
1649 (u_long) (ntohl(ip->ip_off) & 0xe000) >> 13,
1650 (u_long) ntohl(ip->ip_off) & 0x1fff);
1651 (void)printf(" %02x %02x %04x", ip->ip_ttl, ip->ip_p,
1653 memcpy(&ina, &ip->ip_src.s_addr, sizeof ina);
1654 (void)printf(" %s ", inet_ntoa(ina));
1655 memcpy(&ina, &ip->ip_dst.s_addr, sizeof ina);
1656 (void)printf(" %s ", inet_ntoa(ina));
1657 /* dump any option bytes */
1658 while (hlen-- > 20) {
1659 (void)printf("%02x", *cp++);
1661 (void)putchar('\n');
1666 * Return an ascii host address as a dotted quad and optionally with
1670 pr_addr(struct in_addr ina)
1673 static char buf[16 + 3 + MAXHOSTNAMELEN];
1675 if (options & F_NUMERIC)
1676 return inet_ntoa(ina);
1678 hp = cap_gethostbyaddr(capdns, (char *)&ina, 4, AF_INET);
1681 return inet_ntoa(ina);
1683 (void)snprintf(buf, sizeof(buf), "%s (%s)", hp->h_name,
1690 * Dump some info on a returned (via ICMP) IP packet.
1693 pr_retip(struct ip *ip, const u_char *cp)
1698 (void)printf("TCP: from port %u, to port %u (decimal)\n",
1699 (*cp * 256 + *(cp + 1)), (*(cp + 2) * 256 + *(cp + 3)));
1700 else if (ip->ip_p == 17)
1701 (void)printf("UDP: from port %u, to port %u (decimal)\n",
1702 (*cp * 256 + *(cp + 1)), (*(cp + 2) * 256 + *(cp + 3)));
1706 pr_ntime(n_time timestamp)
1708 static char buf[11];
1711 sec = ntohl(timestamp) / 1000;
1712 hour = sec / 60 / 60;
1713 min = (sec % (60 * 60)) / 60;
1714 sec = (sec % (60 * 60)) % 60;
1716 (void)snprintf(buf, sizeof(buf), "%02d:%02d:%02d", hour, min, sec);
1722 fill(char *bp, char *patp)
1728 for (cp = patp; *cp; cp++) {
1731 "patterns must be specified as hex digits");
1735 "%2x%2x%2x%2x%2x%2x%2x%2x%2x%2x%2x%2x%2x%2x%2x%2x",
1736 &pat[0], &pat[1], &pat[2], &pat[3], &pat[4], &pat[5], &pat[6],
1737 &pat[7], &pat[8], &pat[9], &pat[10], &pat[11], &pat[12],
1738 &pat[13], &pat[14], &pat[15]);
1741 for (kk = 0; kk <= maxpayload - (TIMEVAL_LEN + ii); kk += ii)
1742 for (jj = 0; jj < ii; ++jj)
1743 bp[jj + kk] = pat[jj];
1744 if (!(options & F_QUIET)) {
1745 (void)printf("PATTERN: 0x");
1746 for (jj = 0; jj < ii; ++jj)
1747 (void)printf("%02x", bp[jj] & 0xFF);
1752 static cap_channel_t *
1755 cap_channel_t *capcas, *capdnsloc;
1757 const char *types[2];
1760 capcas = cap_init();
1762 err(1, "unable to create casper process");
1763 capdnsloc = cap_service_open(capcas, "system.dns");
1764 /* Casper capability no longer needed. */
1766 if (capdnsloc == NULL)
1767 err(1, "unable to open system.dns service");
1769 types[0] = "NAME2ADDR";
1770 types[1] = "ADDR2NAME";
1771 if (cap_dns_type_limit(capdnsloc, types, 2) < 0)
1772 err(1, "unable to limit access to system.dns service");
1773 families[0] = AF_INET;
1774 if (cap_dns_family_limit(capdnsloc, families, 1) < 0)
1775 err(1, "unable to limit access to system.dns service");