2 * Copyright (c) 1984, 1993
3 * The Regents of the University of California. All rights reserved.
5 * This code is derived from software contributed to Berkeley by
6 * Sun Microsystems, Inc.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed by the University of
19 * California, Berkeley and its contributors.
20 * 4. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 * @(#) Copyright (c) 1984, 1993 The Regents of the University of California. All rights reserved.
37 * @(#)from: arp.c 8.2 (Berkeley) 1/2/94
38 * $FreeBSD: src/usr.sbin/arp/arp.c,v 1.22.2.12 2003/04/16 10:02:37 ru Exp $
39 * $DragonFly: src/usr.sbin/arp/arp.c,v 1.8 2006/01/19 23:19:31 dillon Exp $
43 * arp - display, set, and delete arp table entries
47 #include <sys/param.h>
49 #include <sys/socket.h>
50 #include <sys/sockio.h>
51 #include <sys/sysctl.h>
52 #include <sys/ioctl.h>
56 #include <net/if_dl.h>
57 #include <net/if_types.h>
58 #include <net/route.h>
59 #include <net/iso88025.h>
61 #include <netinet/in.h>
62 #include <netinet/if_ether.h>
64 #include <arpa/inet.h>
77 void search(u_long addr
, void (*action
)(struct sockaddr_dl
*sdl
,
78 struct sockaddr_inarp
*sin
, struct rt_msghdr
*rtm
));
79 void print_entry(struct sockaddr_dl
*sdl
,
80 struct sockaddr_inarp
*addr
, struct rt_msghdr
*rtm
);
81 void nuke_entry(struct sockaddr_dl
*sdl
,
82 struct sockaddr_inarp
*addr
, struct rt_msghdr
*rtm
);
83 int delete(char *host
, char *info
);
85 int set(int argc
, char **argv
);
89 int my_ether_aton(char *a
, struct ether_addr
*n
);
91 int get_ether_addr(u_int32_t ipaddr
, struct ether_addr
*hwaddr
);
94 static int nflag
; /* no reverse dns lookups */
95 static int aflag
; /* do it for all entries */
96 static int cpuflag
= -1;
99 struct sockaddr_in so_mask
;
100 struct sockaddr_inarp blank_sin
, sin_m
;
101 struct sockaddr_dl blank_sdl
, sdl_m
;
102 int expire_time
, flags
, doing_proxy
, proxy_only
, found_entry
;
104 struct rt_msghdr m_rtm
;
108 /* which function we're supposed to do */
116 ((a) > 0 ? (1 + (((a) - 1) | (sizeof(long) - 1))) : sizeof(long))
117 #define SETFUNC(f) { if (func) usage(); func = (f); }
120 main(int argc
, char **argv
)
126 while ((ch
= getopt(argc
, argv
, "ac:ndfsS")) != -1)
132 cpuflag
= strtol(optarg
, NULL
, 0);
156 bzero(&so_mask
, sizeof(so_mask
));
158 so_mask
.sin_addr
.s_addr
= 0xffffffff;
159 bzero(&blank_sin
, sizeof(blank_sin
));
160 blank_sin
.sin_len
= sizeof(blank_sin
);
161 blank_sin
.sin_family
= AF_INET
;
162 bzero(&blank_sdl
, sizeof(blank_sdl
));
163 blank_sdl
.sdl_len
= sizeof(blank_sdl
);
164 blank_sdl
.sdl_family
= AF_LINK
;
173 search(0, print_entry
);
182 if (argc
< 2 || argc
> 6)
184 if (func
== F_REPLACE
)
185 delete(argv
[0], NULL
);
186 rtn
= set(argc
, argv
) ? 1 : 0;
192 search(0, nuke_entry
);
194 if (argc
< 1 || argc
> 2)
196 rtn
= delete(argv
[0], argv
[1]);
210 * Process a file to set standard arp entries
217 char line
[100], arg
[5][50], *args
[5], *p
;
219 if ((fp
= fopen(name
, "r")) == NULL
)
220 errx(1, "cannot open %s", name
);
221 args
[0] = &arg
[0][0];
222 args
[1] = &arg
[1][0];
223 args
[2] = &arg
[2][0];
224 args
[3] = &arg
[3][0];
225 args
[4] = &arg
[4][0];
227 while(fgets(line
, 100, fp
) != NULL
) {
228 if ((p
= strchr(line
, '#')) != NULL
)
230 for (p
= line
; isblank(*p
); p
++);
231 if (*p
== '\n' || *p
== '\0')
233 i
= sscanf(p
, "%49s %49s %49s %49s %49s", arg
[0], arg
[1],
234 arg
[2], arg
[3], arg
[4]);
236 warnx("bad line: %s", line
);
251 s
= socket(PF_ROUTE
, SOCK_RAW
, 0);
258 * Set an individual arp entry
261 set(int argc
, char **argv
)
264 struct sockaddr_inarp
*addr
= &sin_m
;
265 struct sockaddr_dl
*sdl
;
266 struct rt_msghdr
*rtm
= &(m_rtmsg
.m_rtm
);
267 struct ether_addr
*ea
;
268 char *host
= argv
[0], *eaddr
= argv
[1];
275 addr
->sin_addr
.s_addr
= inet_addr(host
);
276 if (addr
->sin_addr
.s_addr
== INADDR_NONE
) {
277 if (!(hp
= gethostbyname(host
))) {
278 warnx("%s: %s", host
, hstrerror(h_errno
));
281 bcopy((char *)hp
->h_addr
, (char *)&addr
->sin_addr
,
282 sizeof(addr
->sin_addr
));
284 doing_proxy
= flags
= proxy_only
= expire_time
= 0;
286 if (strncmp(argv
[0], "temp", 4) == 0) {
288 gettimeofday(&tv
, 0);
289 expire_time
= tv
.tv_sec
+ 20 * 60;
291 else if (strncmp(argv
[0], "pub", 3) == 0) {
292 flags
|= RTF_ANNOUNCE
;
294 if (argc
&& strncmp(argv
[1], "only", 3) == 0) {
296 sin_m
.sin_other
= SIN_PROXY
;
299 } else if (strncmp(argv
[0], "trail", 5) == 0) {
300 printf("%s: Sending trailers is no longer supported\n",
305 ea
= (struct ether_addr
*)LLADDR(&sdl_m
);
306 if (doing_proxy
&& !strcmp(eaddr
, "auto")) {
307 if (!get_ether_addr(addr
->sin_addr
.s_addr
, ea
)) {
308 printf("no interface found for %s\n",
309 inet_ntoa(addr
->sin_addr
));
312 sdl_m
.sdl_alen
= ETHER_ADDR_LEN
;
314 if (my_ether_aton(eaddr
, ea
) == 0)
315 sdl_m
.sdl_alen
= ETHER_ADDR_LEN
;
318 if (rtmsg(RTM_GET
) < 0) {
322 addr
= (struct sockaddr_inarp
*)(rtm
+ 1);
323 sdl
= (struct sockaddr_dl
*)(ROUNDUP(addr
->sin_len
) + (char *)addr
);
324 if (addr
->sin_addr
.s_addr
== sin_m
.sin_addr
.s_addr
) {
325 if (sdl
->sdl_family
== AF_LINK
&&
326 (rtm
->rtm_flags
& RTF_LLINFO
) &&
327 !(rtm
->rtm_flags
& RTF_GATEWAY
)) switch (sdl
->sdl_type
) {
328 case IFT_ETHER
: case IFT_FDDI
: case IFT_ISO88023
:
329 case IFT_ISO88024
: case IFT_ISO88025
: case IFT_L2VLAN
:
332 if (doing_proxy
== 0) {
333 printf("set: can only proxy for %s\n", host
);
336 if (sin_m
.sin_other
& SIN_PROXY
) {
337 printf("set: proxy entry exists for non 802 device\n");
340 sin_m
.sin_other
= SIN_PROXY
;
345 if (sdl
->sdl_family
!= AF_LINK
) {
346 printf("cannot intuit interface index and type for %s\n", host
);
349 sdl_m
.sdl_type
= sdl
->sdl_type
;
350 sdl_m
.sdl_index
= sdl
->sdl_index
;
351 return(rtmsg(RTM_ADD
));
355 * Display an individual arp entry
361 struct sockaddr_inarp
*addr
= &sin_m
;
364 addr
->sin_addr
.s_addr
= inet_addr(host
);
365 if (addr
->sin_addr
.s_addr
== INADDR_NONE
) {
366 if (!(hp
= gethostbyname(host
)))
367 errx(1, "%s: %s", host
, hstrerror(h_errno
));
368 bcopy((char *)hp
->h_addr
, (char *)&addr
->sin_addr
,
369 sizeof(addr
->sin_addr
));
371 search(addr
->sin_addr
.s_addr
, print_entry
);
372 if (found_entry
== 0) {
373 printf("%s (%s) -- no entry\n",
374 host
, inet_ntoa(addr
->sin_addr
));
381 * Delete an arp entry
384 delete(char *host
, char *info
)
387 struct sockaddr_inarp
*addr
= &sin_m
;
388 struct rt_msghdr
*rtm
= &m_rtmsg
.m_rtm
;
389 struct sockaddr_dl
*sdl
;
394 if (strncmp(info
, "pub", 3) == 0)
395 sin_m
.sin_other
= SIN_PROXY
;
399 addr
->sin_addr
.s_addr
= inet_addr(host
);
400 if (addr
->sin_addr
.s_addr
== INADDR_NONE
) {
401 if (!(hp
= gethostbyname(host
))) {
402 warnx("%s: %s", host
, hstrerror(h_errno
));
405 bcopy((char *)hp
->h_addr
, (char *)&addr
->sin_addr
,
406 sizeof(addr
->sin_addr
));
409 if (rtmsg(RTM_GET
) < 0) {
413 addr
= (struct sockaddr_inarp
*)(rtm
+ 1);
414 sdl
= (struct sockaddr_dl
*)(ROUNDUP(addr
->sin_len
) + (char *)addr
);
415 if (addr
->sin_addr
.s_addr
== sin_m
.sin_addr
.s_addr
) {
416 if (sdl
->sdl_family
== AF_LINK
&&
417 (rtm
->rtm_flags
& RTF_LLINFO
) &&
418 !(rtm
->rtm_flags
& RTF_GATEWAY
)) switch (sdl
->sdl_type
) {
419 case IFT_ETHER
: case IFT_FDDI
: case IFT_ISO88023
:
420 case IFT_ISO88024
: case IFT_ISO88025
: case IFT_L2VLAN
:
424 if (sin_m
.sin_other
& SIN_PROXY
) {
425 fprintf(stderr
, "delete: can't locate %s\n",host
);
428 sin_m
.sin_other
= SIN_PROXY
;
432 if (sdl
->sdl_family
!= AF_LINK
) {
433 printf("cannot locate %s\n", host
);
436 if (aflag
&& (rtm
->rtm_flags
& RTF_STATIC
)) {
439 if (rtmsg(RTM_CHANGE
) == 0) {
440 printf("%s (%s) cleared\n",
441 host
, inet_ntoa(addr
->sin_addr
));
445 if (rtmsg(RTM_DELETE
) == 0) {
446 printf("%s (%s) deleted\n",
447 host
, inet_ntoa(addr
->sin_addr
));
455 * Search the arp table and do some action on matching entries
458 search(u_long addr
, void (*action
)(struct sockaddr_dl
*sdl
,
459 struct sockaddr_inarp
*sin
, struct rt_msghdr
*rtm
))
464 char *lim
, *buf
, *next
;
465 struct rt_msghdr
*rtm
;
466 struct sockaddr_inarp
*sin2
;
467 struct sockaddr_dl
*sdl
;
473 mib
[4] = NET_RT_FLAGS
;
481 if (sysctl(mib
, miblen
, NULL
, &needed
, NULL
, 0) < 0)
482 errx(1, "route-sysctl-estimate");
483 if ((buf
= malloc(needed
)) == NULL
)
485 if (sysctl(mib
, miblen
, buf
, &needed
, NULL
, 0) < 0)
486 errx(1, "actual retrieval of routing table");
488 for (next
= buf
; next
< lim
; next
+= rtm
->rtm_msglen
) {
489 rtm
= (struct rt_msghdr
*)next
;
490 sin2
= (struct sockaddr_inarp
*)(rtm
+ 1);
491 sdl
= (struct sockaddr_dl
*)((char *)sin2
+ ROUNDUP(sin2
->sin_len
));
493 if (addr
!= sin2
->sin_addr
.s_addr
)
497 (*action
)(sdl
, sin2
, rtm
);
503 * Display an arp entry
506 print_entry(struct sockaddr_dl
*sdl
,
507 struct sockaddr_inarp
*addr
, struct rt_msghdr
*rtm
)
511 struct iso88025_sockaddr_dl_data
*trld
;
512 char ifname
[IF_NAMESIZE
];
516 hp
= gethostbyaddr((caddr_t
)&(addr
->sin_addr
),
517 sizeof(addr
->sin_addr
), AF_INET
);
524 if (h_errno
== TRY_AGAIN
)
527 printf("%s (%s) at ", host
, inet_ntoa(addr
->sin_addr
));
529 printf("%s", ether_ntoa((struct ether_addr
*)LLADDR(sdl
)));
531 printf("(incomplete)");
532 if (if_indextoname(sdl
->sdl_index
, ifname
) != NULL
)
533 printf(" on %s", ifname
);
534 if (rtm
->rtm_rmx
.rmx_expire
== 0)
535 printf(" permanent");
536 if (addr
->sin_other
& SIN_PROXY
)
537 printf(" published (proxy only)");
538 if (rtm
->rtm_addrs
& RTA_NETMASK
) {
539 addr
= (struct sockaddr_inarp
*)
540 (ROUNDUP(sdl
->sdl_len
) + (char *)sdl
);
541 if (addr
->sin_addr
.s_addr
== 0xffffffff)
542 printf(" published");
543 if (addr
->sin_len
!= 8)
546 switch(sdl
->sdl_type
) {
548 printf(" [ethernet]");
551 printf(" [token-ring]");
552 trld
= SDL_ISO88025(sdl
);
553 if (trld
->trld_rcf
!= 0) {
554 printf(" rt=%x", ntohs(trld
->trld_rcf
));
556 seg
< ((TR_RCF_RIFLEN(trld
->trld_rcf
) - 2 ) / 2);
558 printf(":%x", ntohs(*(trld
->trld_route
[seg
])));
576 nuke_entry(struct sockaddr_dl
*sdl __unused
,
577 struct sockaddr_inarp
*addr
, struct rt_msghdr
*rtm __unused
)
581 snprintf(ip
, sizeof(ip
), "%s", inet_ntoa(addr
->sin_addr
));
586 my_ether_aton(char *a
, struct ether_addr
*n
)
588 struct ether_addr
*ea
;
590 if ((ea
= ether_aton(a
)) == NULL
) {
591 warnx("invalid Ethernet address '%s'", a
);
601 fprintf(stderr
, "%s\n%s\n%s\n%s\n%s\n%s\n%s\n",
602 "usage: arp [-n] hostname",
604 " arp -d hostname [pub]",
606 " arp -s hostname ether_addr [temp] [pub]",
607 " arp -S hostname ether_addr [temp] [pub]",
617 struct rt_msghdr
*rtm
= &m_rtmsg
.m_rtm
;
618 char *cp
= m_rtmsg
.m_space
;
622 if (cmd
== RTM_DELETE
|| cmd
== RTM_CHANGE
)
624 bzero((char *)&m_rtmsg
, sizeof(m_rtmsg
));
625 rtm
->rtm_flags
= flags
;
626 rtm
->rtm_version
= RTM_VERSION
;
630 errx(1, "internal wrong cmd");
632 rtm
->rtm_addrs
|= RTA_GATEWAY
;
633 rtm
->rtm_rmx
.rmx_expire
= expire_time
;
634 rtm
->rtm_inits
= RTV_EXPIRE
;
635 rtm
->rtm_flags
|= (RTF_HOST
| RTF_STATIC
);
639 sin_m
.sin_other
= SIN_PROXY
;
641 rtm
->rtm_addrs
|= RTA_NETMASK
;
642 rtm
->rtm_flags
&= ~RTF_HOST
;
647 rtm
->rtm_addrs
|= RTA_DST
;
649 #define NEXTADDR(w, s) \
650 if (rtm->rtm_addrs & (w)) { \
651 bcopy((char *)&s, cp, sizeof(s)); cp += ROUNDUP(sizeof(s));}
653 NEXTADDR(RTA_DST
, sin_m
);
654 NEXTADDR(RTA_GATEWAY
, sdl_m
);
655 NEXTADDR(RTA_NETMASK
, so_mask
);
657 rtm
->rtm_msglen
= cp
- (char *)&m_rtmsg
;
660 rtm
->rtm_seq
= ++seq
;
662 if ((rlen
= write(s
, (char *)&m_rtmsg
, l
)) < 0) {
663 if (errno
!= ESRCH
|| (cmd
!= RTM_DELETE
&& cmd
!= RTM_CHANGE
)) {
664 warn("writing to routing socket");
669 l
= read(s
, (char *)&m_rtmsg
, sizeof(m_rtmsg
));
670 } while (l
> 0 && (rtm
->rtm_seq
!= seq
|| rtm
->rtm_pid
!= pid
));
672 warn("read from routing socket");
677 * get_ether_addr - get the hardware address of an interface on the
678 * the same subnet as ipaddr.
683 get_ether_addr(u_int32_t ipaddr
, struct ether_addr
*hwaddr
)
685 struct ifreq
*ifr
, *ifend
, *ifp
;
687 struct sockaddr_dl
*dla
;
690 struct ifreq ifs
[MAX_IFS
];
693 sock
= socket(AF_INET
, SOCK_DGRAM
, 0);
697 ifc
.ifc_len
= sizeof(ifs
);
699 if (ioctl(sock
, SIOCGIFCONF
, &ifc
) < 0) {
700 warnx("ioctl(SIOCGIFCONF)");
706 * Scan through looking for an interface with an Internet
707 * address on the same subnet as `ipaddr'.
709 ifend
= (struct ifreq
*) (ifc
.ifc_buf
+ ifc
.ifc_len
);
710 for (ifr
= ifc
.ifc_req
; ifr
< ifend
; ) {
711 if (ifr
->ifr_addr
.sa_family
== AF_INET
) {
712 ina
= ((struct sockaddr_in
*)
713 &ifr
->ifr_addr
)->sin_addr
.s_addr
;
714 strncpy(ifreq
.ifr_name
, ifr
->ifr_name
,
715 sizeof(ifreq
.ifr_name
));
717 * Check that the interface is up,
718 * and not point-to-point or loopback.
720 if (ioctl(sock
, SIOCGIFFLAGS
, &ifreq
) < 0)
722 if ((ifreq
.ifr_flags
&
723 (IFF_UP
|IFF_BROADCAST
|IFF_POINTOPOINT
|
724 IFF_LOOPBACK
|IFF_NOARP
))
725 != (IFF_UP
|IFF_BROADCAST
))
728 * Get its netmask and check that it's on
731 if (ioctl(sock
, SIOCGIFNETMASK
, &ifreq
) < 0)
733 mask
= ((struct sockaddr_in
*)
734 &ifreq
.ifr_addr
)->sin_addr
.s_addr
;
735 if ((ipaddr
& mask
) != (ina
& mask
))
740 ifr
= (struct ifreq
*) ((char *)&ifr
->ifr_addr
741 + MAX(ifr
->ifr_addr
.sa_len
, sizeof(ifr
->ifr_addr
)));
750 * Now scan through again looking for a link-level address
751 * for this interface.
754 for (ifr
= ifc
.ifc_req
; ifr
< ifend
; ) {
755 if (strcmp(ifp
->ifr_name
, ifr
->ifr_name
) == 0
756 && ifr
->ifr_addr
.sa_family
== AF_LINK
) {
758 * Found the link-level address - copy it out
760 dla
= (struct sockaddr_dl
*) &ifr
->ifr_addr
;
761 memcpy(hwaddr
, LLADDR(dla
), dla
->sdl_alen
);
763 printf("using interface %s for proxy with address ",
765 printf("%s\n", ether_ntoa(hwaddr
));
766 return(dla
->sdl_alen
);
768 ifr
= (struct ifreq
*) ((char *)&ifr
->ifr_addr
769 + MAX(ifr
->ifr_addr
.sa_len
, sizeof(ifr
->ifr_addr
)));