2 * netsniff-ng - the packet sniffing beast
3 * By Daniel Borkmann <daniel@netsniff-ng.org>
4 * Copyright 2009, 2010 Daniel Borkmann.
5 * Copyright 2009, 2010 Emmanuel Roullit.
6 * Copyright 2010 Marek Polacek.
7 * Subject to the GPL, version 2.
21 #include <arpa/inet.h>
29 #include <sys/socket.h>
30 #include <sys/ioctl.h>
31 #include <sys/resource.h>
32 #include <sys/epoll.h>
33 #include <sys/syscall.h>
34 #include <asm/unistd.h>
37 #include <linux/socket.h>
38 #include <linux/types.h>
40 #include <linux/if_ether.h>
41 #include <linux/if_packet.h>
42 #include <linux/sockios.h>
43 #include <netinet/tcp.h>
44 #include <netinet/udp.h>
52 #define IOPRIO_CLASS_SHIFT 13
62 ioprio_who_process
= 1,
67 static const char *const to_prio
[] = {
68 "none", "realtime", "best-effort", "idle",
71 static const char *const sock_mem
[] = {
72 "/proc/sys/net/core/rmem_max",
73 "/proc/sys/net/core/rmem_default",
74 "/proc/sys/net/core/wmem_max",
75 "/proc/sys/net/core/wmem_default",
82 if (unlikely(af
!= AF_INET
&& af
!= AF_INET6
)) {
83 whine("Wrong AF socket type! Falling back to AF_INET\n");
87 sock
= socket(af
, SOCK_DGRAM
, 0);
88 if (unlikely(sock
< 0))
89 panic("Creation AF socket failed!\n");
96 int sock
= socket(PF_PACKET
, SOCK_RAW
, htons(ETH_P_ALL
));
97 if (unlikely(sock
< 0))
98 panic("Creation of PF socket failed!\n");
103 void set_sock_prio(int fd
, int prio
)
106 setsockopt(fd
, SOL_SOCKET
, SO_PRIORITY
, &val
, sizeof(val
));
109 void set_udp_cork(int fd
)
112 setsockopt(fd
, IPPROTO_UDP
, UDP_CORK
, &state
, sizeof(state
));
115 void set_udp_uncork(int fd
)
118 setsockopt(fd
, IPPROTO_UDP
, UDP_CORK
, &state
, sizeof(state
));
121 void set_tcp_cork(int fd
)
124 setsockopt(fd
, IPPROTO_TCP
, TCP_CORK
, &state
, sizeof(state
));
127 void set_tcp_uncork(int fd
)
130 setsockopt(fd
, IPPROTO_TCP
, TCP_CORK
, &state
, sizeof(state
));
133 void set_sock_cork(int fd
, int udp
)
141 void set_sock_uncork(int fd
, int udp
)
149 int set_nonblocking(int fd
)
151 int ret
= fcntl(fd
, F_SETFL
, fcntl(fd
, F_GETFD
, 0) | O_NONBLOCK
);
152 if (unlikely(ret
< 0))
153 panic("Cannot fcntl!\n");
158 int set_nonblocking_sloppy(int fd
)
160 return fcntl(fd
, F_SETFL
, fcntl(fd
, F_GETFD
, 0) | O_NONBLOCK
);
163 void set_socket_keepalive(int fd
)
166 setsockopt(fd
, SOL_SOCKET
, SO_KEEPALIVE
, &one
, sizeof(one
));
169 void set_tcp_nodelay(int fd
)
172 setsockopt(fd
, IPPROTO_TCP
, TCP_NODELAY
, &one
, sizeof(one
));
175 int set_ipv6_only(int fd
)
178 return setsockopt(fd
, IPPROTO_IPV6
, IPV6_V6ONLY
, &one
, sizeof(one
));
181 int set_reuseaddr(int fd
)
185 ret
= setsockopt(fd
, SOL_SOCKET
, SO_REUSEADDR
, &one
, sizeof (one
));
186 if (unlikely(ret
< 0))
187 panic("Cannot reuse addr!\n");
192 void set_mtu_disc_dont(int fd
)
194 int mtu
= IP_PMTUDISC_DONT
;
195 setsockopt(fd
, SOL_IP
, IP_MTU_DISCOVER
, &mtu
, sizeof(mtu
));
198 void set_epoll_descriptor(int fd_epoll
, int action
, int fd_toadd
, int events
)
201 struct epoll_event ev
;
203 memset(&ev
, 0, sizeof(ev
));
205 ev
.data
.fd
= fd_toadd
;
207 ret
= epoll_ctl(fd_epoll
, action
, fd_toadd
, &ev
);
209 panic("Cannot add socket for epoll!\n");
212 int set_epoll_descriptor2(int fd_epoll
, int action
, int fd_toadd
, int events
)
214 struct epoll_event ev
;
216 memset(&ev
, 0, sizeof(ev
));
218 ev
.data
.fd
= fd_toadd
;
220 return epoll_ctl(fd_epoll
, action
, fd_toadd
, &ev
);
223 int wireless_bitrate(const char *ifname
)
225 int sock
, ret
, rate_in_mbit
;
228 sock
= af_socket(AF_INET
);
230 memset(&iwr
, 0, sizeof(iwr
));
231 strlcpy(iwr
.ifr_name
, ifname
, IFNAMSIZ
);
233 ret
= ioctl(sock
, SIOCGIWRATE
, &iwr
);
235 rate_in_mbit
= iwr
.u
.bitrate
.value
/ 1000000;
244 int adjust_dbm_level(int in_dbm
, int dbm_val
)
249 return dbm_val
- 0x100;
252 int get_system_socket_mem(int which
)
256 const char *file
= sock_mem
[which
];
259 fd
= open(file
, O_RDONLY
);
263 ret
= read(fd
, buff
, sizeof(buff
));
271 void set_system_socket_mem(int which
, int val
)
274 const char *file
= sock_mem
[which
];
278 fd
= open(file
, O_WRONLY
);
282 memset(buff
, 0, sizeof(buff
));
283 slprintf(buff
, sizeof(buff
), "%d", val
);
285 ret
= write(fd
, buff
, strlen(buff
));
291 int wireless_sigqual(const char *ifname
, struct iw_statistics
*stats
)
296 sock
= af_socket(AF_INET
);
298 memset(&iwr
, 0, sizeof(iwr
));
299 strlcpy(iwr
.ifr_name
, ifname
, IFNAMSIZ
);
301 iwr
.u
.data
.pointer
= (caddr_t
) stats
;
302 iwr
.u
.data
.length
= sizeof(*stats
);
303 iwr
.u
.data
.flags
= 1;
305 ret
= ioctl(sock
, SIOCGIWSTATS
, &iwr
);
312 int wireless_rangemax_sigqual(const char *ifname
)
314 int ret
, sock
, sigqual
;
316 struct iw_range iwrange
;
318 sock
= af_socket(AF_INET
);
320 memset(&iwrange
, 0, sizeof(iwrange
));
322 memset(&iwr
, 0, sizeof(iwr
));
323 strlcpy(iwr
.ifr_name
, ifname
, IFNAMSIZ
);
325 iwr
.u
.data
.pointer
= (caddr_t
) &iwrange
;
326 iwr
.u
.data
.length
= sizeof(iwrange
);
327 iwr
.u
.data
.flags
= 0;
329 ret
= ioctl(sock
, SIOCGIWRANGE
, &iwr
);
331 sigqual
= iwrange
.max_qual
.qual
;
340 int ethtool_bitrate(const char *ifname
)
342 int ret
, sock
, bitrate
;
344 struct ethtool_cmd ecmd
;
346 sock
= af_socket(AF_INET
);
348 memset(&ecmd
, 0, sizeof(ecmd
));
350 memset(&ifr
, 0, sizeof(ifr
));
351 strlcpy(ifr
.ifr_name
, ifname
, IFNAMSIZ
);
353 ecmd
.cmd
= ETHTOOL_GSET
;
354 ifr
.ifr_data
= (char *) &ecmd
;
356 ret
= ioctl(sock
, SIOCETHTOOL
, &ifr
);
362 switch (ecmd
.speed
) {
367 bitrate
= ecmd
.speed
;
379 int ethtool_drvinf(const char *ifname
, struct ethtool_drvinfo
*drvinf
)
384 sock
= af_socket(AF_INET
);
386 memset(drvinf
, 0, sizeof(*drvinf
));
388 memset(&ifr
, 0, sizeof(ifr
));
389 strlcpy(ifr
.ifr_name
, ifname
, IFNAMSIZ
);
391 drvinf
->cmd
= ETHTOOL_GDRVINFO
;
392 ifr
.ifr_data
= (char *) drvinf
;
394 ret
= ioctl(sock
, SIOCETHTOOL
, &ifr
);
401 int device_bitrate(const char *ifname
)
403 int speed_c
, speed_w
;
405 speed_c
= ethtool_bitrate(ifname
);
406 speed_w
= wireless_bitrate(ifname
);
408 return (speed_c
== 0 ? speed_w
: speed_c
);
411 int device_ifindex(const char *ifname
)
413 int ret
, sock
, index
;
416 if (!strncmp("any", ifname
, strlen("any")))
419 sock
= af_socket(AF_INET
);
421 memset(&ifr
, 0, sizeof(ifr
));
422 strlcpy(ifr
.ifr_name
, ifname
, IFNAMSIZ
);
424 ret
= ioctl(sock
, SIOCGIFINDEX
, &ifr
);
426 index
= ifr
.ifr_ifindex
;
435 static int __device_address6(const char *ifname
, struct sockaddr_storage
*ss
)
437 int ret
, family
, found
= -EINVAL
;
438 struct ifaddrs
*ifaddr
, *ifa
;
440 ret
= getifaddrs(&ifaddr
);
442 panic("Cannot get device addresses for IPv6!\n");
444 for (ifa
= ifaddr
; ifa
!= NULL
; ifa
= ifa
->ifa_next
) {
445 family
= ifa
->ifa_addr
->sa_family
;
446 if (family
!= AF_INET6
)
448 if (strcmp(ifa
->ifa_name
, ifname
))
451 memcpy(ss
, ifa
->ifa_addr
, sizeof(*ss
));
460 int device_address(const char *ifname
, int af
, struct sockaddr_storage
*ss
)
467 if (!strncmp("any", ifname
, strlen("any")))
470 return __device_address6(ifname
, ss
);
472 sock
= af_socket(af
);
474 memset(&ifr
, 0, sizeof(ifr
));
475 strlcpy(ifr
.ifr_name
, ifname
, IFNAMSIZ
);
477 ifr
.ifr_addr
.sa_family
= af
;
479 ret
= ioctl(sock
, SIOCGIFADDR
, &ifr
);
481 memcpy(ss
, &ifr
.ifr_addr
, sizeof(ifr
.ifr_addr
));
488 int device_mtu(const char *ifname
)
493 sock
= af_socket(AF_INET
);
495 memset(&ifr
, 0, sizeof(ifr
));
496 strlcpy(ifr
.ifr_name
, ifname
, IFNAMSIZ
);
498 ret
= ioctl(sock
, SIOCGIFMTU
, &ifr
);
509 short device_get_flags(const char *ifname
)
511 /* Really, it's short! Look at struct ifreq */
516 sock
= af_socket(AF_INET
);
518 memset(&ifr
, 0, sizeof(ifr
));
519 strlcpy(ifr
.ifr_name
, ifname
, IFNAMSIZ
);
521 ret
= ioctl(sock
, SIOCGIFFLAGS
, &ifr
);
523 flags
= ifr
.ifr_flags
;
532 void device_set_flags(const char *ifname
, const short flags
)
537 sock
= af_socket(AF_INET
);
539 memset(&ifr
, 0, sizeof(ifr
));
540 strlcpy(ifr
.ifr_name
, ifname
, IFNAMSIZ
);
542 ifr
.ifr_flags
= flags
;
544 ret
= ioctl(sock
, SIOCSIFFLAGS
, &ifr
);
546 panic("Cannot set NIC flags!\n");
551 int device_irq_number(const char *ifname
)
554 * Since fetching IRQ numbers from SIOCGIFMAP is deprecated and not
555 * supported anymore, we need to grab them from procfs
563 if (!strncmp("lo", ifname
, strlen("lo")))
566 fp
= fopen("/proc/interrupts", "r");
568 whine("Cannot open /proc/interrupts!\n");
572 memset(buff
, 0, sizeof(buff
));
573 while (fgets(buff
, sizeof(buff
), fp
) != NULL
) {
574 buff
[sizeof(buff
) - 1] = 0;
576 if (strstr(buff
, ifname
) == NULL
)
580 while (*buffp
!= ':')
585 memset(buff
, 0, sizeof(buff
));
593 * Try sysfs as fallback. Probably wireless devices will be found
594 * here. We return silently if it fails ...
596 slprintf(sysname
, sizeof(sysname
), "/sys/class/net/%s/device/irq",
599 fp
= fopen(sysname
, "r");
603 memset(buff
, 0, sizeof(buff
));
604 if(fgets(buff
, sizeof(buff
), fp
) != NULL
) {
605 buff
[sizeof(buff
) - 1] = 0;
614 int device_bind_irq_to_cpu(int irq
, int cpu
)
621 /* Note: first CPU begins with CPU 0 */
622 if (irq
< 0 || cpu
< 0)
625 memset(file
, 0, sizeof(file
));
626 memset(buff
, 0, sizeof(buff
));
628 /* smp_affinity starts counting with CPU 1, 2, ... */
630 sprintf(file
, "/proc/irq/%d/smp_affinity", irq
);
632 fp
= fopen(file
, "w");
634 whine("Cannot open file %s!\n", file
);
638 sprintf(buff
, "%d", cpu
);
639 ret
= fwrite(buff
, sizeof(buff
), 1, fp
);
642 return (ret
> 0 ? 0 : ret
);
645 void sock_print_net_stats(int sock
, unsigned long skipped
)
648 struct tpacket_stats kstats
;
650 socklen_t slen
= sizeof(kstats
);
652 memset(&kstats
, 0, sizeof(kstats
));
654 ret
= getsockopt(sock
, SOL_PACKET
, PACKET_STATISTICS
, &kstats
, &slen
);
656 uint64_t packets
= kstats
.tp_packets
;
657 uint64_t drops
= kstats
.tp_drops
;
659 printf("\r%12ld frames incoming\n", packets
);
660 printf("\r%12ld frames passed filter\n",
661 packets
- drops
- skipped
);
662 printf("\r%12ld frames failed filter (out of space)\n",
664 if (kstats
.tp_packets
> 0)
665 printf("\r%12.4f%\% frame droprate\n",
666 1.f
* drops
/ packets
* 100.f
);
670 void register_signal(int signal
, void (*handler
)(int))
673 struct sigaction saction
;
675 sigfillset(&block_mask
);
677 saction
.sa_handler
= handler
;
678 saction
.sa_mask
= block_mask
;
679 saction
.sa_flags
= SA_RESTART
;
680 sigaction(signal
, &saction
, NULL
);
683 void register_signal_f(int signal
, void (*handler
)(int), int flags
)
686 struct sigaction saction
;
688 sigfillset(&block_mask
);
690 saction
.sa_handler
= handler
;
691 saction
.sa_mask
= block_mask
;
692 saction
.sa_flags
= flags
;
693 sigaction(signal
, &saction
, NULL
);
696 int get_tty_size(void)
699 struct ttysize ts
= {0};
700 return (ioctl(0, TIOCGSIZE
, &ts
) == 0 ?
701 ts
.ts_cols
: DEFAULT_TTY_SIZE
);
702 #elif defined(TIOCGWINSZ)
704 return (ioctl(0, TIOCGWINSZ
, &ts
) == 0 ?
705 ts
.ws_col
: DEFAULT_TTY_SIZE
);
707 return DEFAULT_TTY_SIZE
;
711 short enter_promiscuous_mode(char *ifname
)
715 if (!strncmp("any", ifname
, strlen("any")))
718 ifflags
= device_get_flags(ifname
);
719 device_set_flags(ifname
, ifflags
| IFF_PROMISC
);
724 void leave_promiscuous_mode(char *ifname
, short oldflags
)
726 if (!strncmp("any", ifname
, strlen("any")))
729 device_set_flags(ifname
, oldflags
);
732 int device_up(char *ifname
)
736 if (!strncmp("any", ifname
, strlen("any")))
739 return (device_get_flags(ifname
) & IFF_UP
) == IFF_UP
;
742 int device_running(char *ifname
)
746 if (!strncmp("any", ifname
, strlen("any")))
749 return (device_get_flags(ifname
) & IFF_RUNNING
) == IFF_RUNNING
;
752 int device_up_and_running(char *ifname
)
756 if (!strncmp("any", ifname
, strlen("any")))
759 return (device_get_flags(ifname
) & (IFF_UP
| IFF_RUNNING
)) ==
760 (IFF_UP
| IFF_RUNNING
);
763 int poll_error_maybe_die(int sock
, struct pollfd
*pfd
)
765 if ((pfd
->revents
& (POLLHUP
| POLLRDHUP
| POLLERR
| POLLNVAL
)) == 0)
766 return POLL_NEXT_PKT
;
767 if (pfd
->revents
& (POLLHUP
| POLLRDHUP
))
768 panic("Hangup on socket occured!\n");
769 if (pfd
->revents
& POLLERR
) {
773 if (recv(sock
, &tmp
, sizeof(tmp
), MSG_PEEK
) >= 0)
774 return POLL_NEXT_PKT
;
775 if (errno
== ENETDOWN
)
776 panic("Interface went down!\n");
778 return POLL_MOVE_OUT
;
780 if (pfd
->revents
& POLLNVAL
) {
781 whine("Invalid polling request on socket!\n");
783 return POLL_MOVE_OUT
;
786 return POLL_NEXT_PKT
;
789 static inline char *next_token(char *q
, int sep
)
794 * glibc defines this as a macro and gcc throws a false
795 * positive ``logical ‘&&’ with non-zero constant will
796 * always evaluate as true'' in older versions. See:
797 * http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36513
804 int set_cpu_affinity(char *str
, int inverted
)
808 cpu_set_t cpu_bitmask
;
812 cpus
= get_number_cpus();
814 CPU_ZERO(&cpu_bitmask
);
816 for (i
= 0; inverted
&& i
< cpus
; ++i
)
817 CPU_SET(i
, &cpu_bitmask
);
819 while (p
= q
, q
= next_token(q
, ','), p
) {
820 unsigned int a
; /* Beginning of range */
821 unsigned int b
; /* End of range */
822 unsigned int s
; /* Stride */
825 if (sscanf(p
, "%u", &a
) < 1)
831 c1
= next_token(p
, '-');
832 c2
= next_token(p
, ',');
834 if (c1
!= NULL
&& (c2
== NULL
|| c1
< c2
)) {
835 if (sscanf(c1
, "%u", &b
) < 1)
838 c1
= next_token(c1
, ':');
840 if (c1
!= NULL
&& (c2
== NULL
|| c1
< c2
))
841 if (sscanf(c1
, "%u", &s
) < 1)
850 CPU_CLR(a
, &cpu_bitmask
);
852 CPU_SET(a
, &cpu_bitmask
);
857 ret
= sched_setaffinity(getpid(), sizeof(cpu_bitmask
),
860 panic("Can't set this cpu affinity!\n");
865 int set_proc_prio(int priority
)
868 * setpriority() is clever, even if you put a nice value which
869 * is out of range it corrects it to the closest valid nice value
871 int ret
= setpriority(PRIO_PROCESS
, getpid(), priority
);
873 panic("Can't set nice val to %i!\n", priority
);
878 int set_sched_status(int policy
, int priority
)
880 int ret
, min_prio
, max_prio
;
881 struct sched_param sp
;
883 max_prio
= sched_get_priority_max(policy
);
884 min_prio
= sched_get_priority_min(policy
);
886 if (max_prio
== -1 || min_prio
== -1)
887 whine("Cannot determine scheduler prio limits!\n");
888 else if (priority
< min_prio
)
890 else if (priority
> max_prio
)
893 memset(&sp
, 0, sizeof(sp
));
894 sp
.sched_priority
= priority
;
896 ret
= sched_setscheduler(getpid(), policy
, &sp
);
898 whine("Cannot set scheduler policy!\n");
902 ret
= sched_setparam(getpid(), &sp
);
904 whine("Cannot set scheduler prio!\n");
911 static inline int ioprio_set(int which
, int who
, int ioprio
)
913 return syscall(SYS_ioprio_set
, which
, who
, ioprio
);
916 static inline int ioprio_get(int which
, int who
)
918 return syscall(SYS_ioprio_get
, which
, who
);
921 static void ioprio_setpid(pid_t pid
, int ioprio
, int ioclass
)
923 int ret
= ioprio_set(ioprio_who_process
, pid
,
924 ioprio
| ioclass
<< IOPRIO_CLASS_SHIFT
);
926 panic("Failed to set io prio for pid!\n");
929 void ioprio_print(void)
931 int ioprio
= ioprio_get(ioprio_who_process
, getpid());
933 panic("Failed to fetch io prio for pid!\n");
935 int ioclass
= ioprio
>> IOPRIO_CLASS_SHIFT
;
936 if (ioclass
!= ioprio_class_idle
) {
938 printf("%s: prio %d\n", to_prio
[ioclass
], ioprio
);
940 printf("%s\n", to_prio
[ioclass
]);
944 void set_ioprio_rt(void)
946 ioprio_setpid(getpid(), 4, ioprio_class_rt
);
949 void set_ioprio_be(void)
951 ioprio_setpid(getpid(), 4, ioprio_class_be
);
954 int set_timeout(struct timeval
*timeval
, unsigned int msec
)
960 timeval
->tv_usec
= 0;
963 timeval
->tv_usec
= msec
* 1000;
967 timeval
->tv_sec
= (long) (msec
/ 1000);
968 timeval
->tv_usec
= (long) ((msec
- (timeval
->tv_sec
* 1000)) * 1000);
973 size_t strlcpy(char *dest
, const char *src
, size_t size
)
975 size_t ret
= strlen(src
);
978 size_t len
= (ret
>= size
) ? size
- 1 : ret
;
980 memcpy(dest
, src
, len
);
987 int slprintf(char *dst
, size_t size
, const char *fmt
, ...)
994 ret
= vsnprintf(dst
, size
, fmt
, ap
);
995 dst
[size
- 1] = '\0';
1002 noinline
void *xmemset(void *s
, int c
, size_t n
)
1007 for (i
= 0; i
< n
; ++i
)
1008 ptr
[i
] = (uint8_t) c
;
1013 char *getuint(char *in
, uint32_t *out
)
1016 char *endptr
= NULL
;
1018 while (*in
&& (isdigit(*in
) || isxdigit(*in
) || *in
== 'x'))
1021 panic("Syntax error!\n");
1025 *out
= strtoul(pt
, &endptr
, 0);
1026 if ((endptr
!= NULL
&& *endptr
!= '\0') || errno
!= 0) {
1027 panic("Syntax error!\n");
1034 char *strtrim_right(register char *p
, register char c
)
1052 char *strtrim_left(register char *p
, register char c
)
1057 while (*p
&& len
--) {