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
)
275 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
));
290 int wireless_sigqual(const char *ifname
, struct iw_statistics
*stats
)
295 sock
= af_socket(AF_INET
);
297 memset(&iwr
, 0, sizeof(iwr
));
298 strlcpy(iwr
.ifr_name
, ifname
, IFNAMSIZ
);
300 iwr
.u
.data
.pointer
= (caddr_t
) stats
;
301 iwr
.u
.data
.length
= sizeof(*stats
);
302 iwr
.u
.data
.flags
= 1;
304 ret
= ioctl(sock
, SIOCGIWSTATS
, &iwr
);
311 int wireless_rangemax_sigqual(const char *ifname
)
313 int ret
, sock
, sigqual
;
315 struct iw_range iwrange
;
317 sock
= af_socket(AF_INET
);
319 memset(&iwrange
, 0, sizeof(iwrange
));
321 memset(&iwr
, 0, sizeof(iwr
));
322 strlcpy(iwr
.ifr_name
, ifname
, IFNAMSIZ
);
324 iwr
.u
.data
.pointer
= (caddr_t
) &iwrange
;
325 iwr
.u
.data
.length
= sizeof(iwrange
);
326 iwr
.u
.data
.flags
= 0;
328 ret
= ioctl(sock
, SIOCGIWRANGE
, &iwr
);
330 sigqual
= iwrange
.max_qual
.qual
;
339 int ethtool_bitrate(const char *ifname
)
341 int ret
, sock
, bitrate
;
343 struct ethtool_cmd ecmd
;
345 sock
= af_socket(AF_INET
);
347 memset(&ecmd
, 0, sizeof(ecmd
));
349 memset(&ifr
, 0, sizeof(ifr
));
350 strlcpy(ifr
.ifr_name
, ifname
, IFNAMSIZ
);
352 ecmd
.cmd
= ETHTOOL_GSET
;
353 ifr
.ifr_data
= (char *) &ecmd
;
355 ret
= ioctl(sock
, SIOCETHTOOL
, &ifr
);
361 switch (ecmd
.speed
) {
366 bitrate
= ecmd
.speed
;
378 int ethtool_drvinf(const char *ifname
, struct ethtool_drvinfo
*drvinf
)
383 sock
= af_socket(AF_INET
);
385 memset(drvinf
, 0, sizeof(*drvinf
));
387 memset(&ifr
, 0, sizeof(ifr
));
388 strlcpy(ifr
.ifr_name
, ifname
, IFNAMSIZ
);
390 drvinf
->cmd
= ETHTOOL_GDRVINFO
;
391 ifr
.ifr_data
= (char *) drvinf
;
393 ret
= ioctl(sock
, SIOCETHTOOL
, &ifr
);
400 int device_bitrate(const char *ifname
)
402 int speed_c
, speed_w
;
404 speed_c
= ethtool_bitrate(ifname
);
405 speed_w
= wireless_bitrate(ifname
);
407 return (speed_c
== 0 ? speed_w
: speed_c
);
410 int device_ifindex(const char *ifname
)
412 int ret
, sock
, index
;
415 if (!strncmp("any", ifname
, strlen("any")))
418 sock
= af_socket(AF_INET
);
420 memset(&ifr
, 0, sizeof(ifr
));
421 strlcpy(ifr
.ifr_name
, ifname
, IFNAMSIZ
);
423 ret
= ioctl(sock
, SIOCGIFINDEX
, &ifr
);
425 index
= ifr
.ifr_ifindex
;
434 static int __device_address6(const char *ifname
, struct sockaddr_storage
*ss
)
436 int ret
, family
, found
= -EINVAL
;
437 struct ifaddrs
*ifaddr
, *ifa
;
439 ret
= getifaddrs(&ifaddr
);
441 panic("Cannot get device addresses for IPv6!\n");
443 for (ifa
= ifaddr
; ifa
!= NULL
; ifa
= ifa
->ifa_next
) {
444 family
= ifa
->ifa_addr
->sa_family
;
445 if (family
!= AF_INET6
)
447 if (strcmp(ifa
->ifa_name
, ifname
))
450 memcpy(ss
, ifa
->ifa_addr
, sizeof(*ss
));
459 int device_address(const char *ifname
, int af
, struct sockaddr_storage
*ss
)
466 if (!strncmp("any", ifname
, strlen("any")))
469 return __device_address6(ifname
, ss
);
471 sock
= af_socket(af
);
473 memset(&ifr
, 0, sizeof(ifr
));
474 strlcpy(ifr
.ifr_name
, ifname
, IFNAMSIZ
);
476 ifr
.ifr_addr
.sa_family
= af
;
478 ret
= ioctl(sock
, SIOCGIFADDR
, &ifr
);
480 memcpy(ss
, &ifr
.ifr_addr
, sizeof(ifr
.ifr_addr
));
487 int device_mtu(const char *ifname
)
492 sock
= af_socket(AF_INET
);
494 memset(&ifr
, 0, sizeof(ifr
));
495 strlcpy(ifr
.ifr_name
, ifname
, IFNAMSIZ
);
497 ret
= ioctl(sock
, SIOCGIFMTU
, &ifr
);
508 short device_get_flags(const char *ifname
)
510 /* Really, it's short! Look at struct ifreq */
515 sock
= af_socket(AF_INET
);
517 memset(&ifr
, 0, sizeof(ifr
));
518 strlcpy(ifr
.ifr_name
, ifname
, IFNAMSIZ
);
520 ret
= ioctl(sock
, SIOCGIFFLAGS
, &ifr
);
522 flags
= ifr
.ifr_flags
;
531 void device_set_flags(const char *ifname
, const short flags
)
536 sock
= af_socket(AF_INET
);
538 memset(&ifr
, 0, sizeof(ifr
));
539 strlcpy(ifr
.ifr_name
, ifname
, IFNAMSIZ
);
541 ifr
.ifr_flags
= flags
;
543 ret
= ioctl(sock
, SIOCSIFFLAGS
, &ifr
);
545 panic("Cannot set NIC flags!\n");
550 int device_irq_number(const char *ifname
)
553 * Since fetching IRQ numbers from SIOCGIFMAP is deprecated and not
554 * supported anymore, we need to grab them from procfs
561 if (!strncmp("lo", ifname
, strlen("lo")))
564 FILE *fp
= fopen("/proc/interrupts", "r");
566 whine("Cannot open /proc/interrupts!\n");
570 memset(buff
, 0, sizeof(buff
));
571 while (fgets(buff
, sizeof(buff
), fp
) != NULL
) {
572 buff
[sizeof(buff
) - 1] = 0;
574 if (strstr(buff
, ifname
) == NULL
)
578 while (*buffp
!= ':')
583 memset(buff
, 0, sizeof(buff
));
591 * Try sysfs as fallback. Probably wireless devices will be found
592 * here. We return silently if it fails ...
594 slprintf(sysname
, sizeof(sysname
), "/sys/class/net/%s/device/irq",
597 fp
= fopen(sysname
, "r");
601 memset(buff
, 0, sizeof(buff
));
602 if(fgets(buff
, sizeof(buff
), fp
) != NULL
) {
603 buff
[sizeof(buff
) - 1] = 0;
612 int device_bind_irq_to_cpu(int irq
, int cpu
)
618 /* Note: first CPU begins with CPU 0 */
619 if (irq
< 0 || cpu
< 0)
622 memset(file
, 0, sizeof(file
));
623 memset(buff
, 0, sizeof(buff
));
625 /* smp_affinity starts counting with CPU 1, 2, ... */
627 sprintf(file
, "/proc/irq/%d/smp_affinity", irq
);
629 FILE *fp
= fopen(file
, "w");
631 whine("Cannot open file %s!\n", file
);
635 sprintf(buff
, "%d", cpu
);
636 ret
= fwrite(buff
, sizeof(buff
), 1, fp
);
639 return (ret
> 0 ? 0 : ret
);
642 void sock_print_net_stats(int sock
, unsigned long skipped
)
645 struct tpacket_stats kstats
;
647 socklen_t slen
= sizeof(kstats
);
649 memset(&kstats
, 0, sizeof(kstats
));
651 ret
= getsockopt(sock
, SOL_PACKET
, PACKET_STATISTICS
, &kstats
, &slen
);
653 printf("\r%12ld frames incoming\n",
654 1UL * kstats
.tp_packets
);
655 printf("\r%12ld frames passed filter\n",
656 1UL * kstats
.tp_packets
- kstats
.tp_drops
- skipped
);
657 printf("\r%12ld frames failed filter (out of space)\n",
658 1UL * kstats
.tp_drops
+ skipped
);
659 if (kstats
.tp_packets
> 0)
660 printf("\r%12.4f%% frame droprate\n", 1.f
*
661 kstats
.tp_drops
/ kstats
.tp_packets
* 100.f
);
665 void register_signal(int signal
, void (*handler
)(int))
668 struct sigaction saction
;
670 sigfillset(&block_mask
);
672 saction
.sa_handler
= handler
;
673 saction
.sa_mask
= block_mask
;
674 saction
.sa_flags
= SA_RESTART
;
675 sigaction(signal
, &saction
, NULL
);
678 void register_signal_f(int signal
, void (*handler
)(int), int flags
)
681 struct sigaction saction
;
683 sigfillset(&block_mask
);
685 saction
.sa_handler
= handler
;
686 saction
.sa_mask
= block_mask
;
687 saction
.sa_flags
= flags
;
688 sigaction(signal
, &saction
, NULL
);
691 int get_tty_size(void)
694 struct ttysize ts
= {0};
695 int ret
= ioctl(0, TIOCGSIZE
, &ts
);
696 return (ret
== 0 ? ts
.ts_cols
: DEFAULT_TTY_SIZE
);
697 #elif defined(TIOCGWINSZ)
699 memset(&ts
, 0, sizeof(ts
));
700 int ret
= ioctl(0, TIOCGWINSZ
, &ts
);
701 return (ret
== 0 ? ts
.ws_col
: DEFAULT_TTY_SIZE
);
703 return DEFAULT_TTY_SIZE
;
707 short enter_promiscuous_mode(char *ifname
)
711 if (!strncmp("any", ifname
, strlen("any")))
714 ifflags
= device_get_flags(ifname
);
715 device_set_flags(ifname
, ifflags
| IFF_PROMISC
);
720 void leave_promiscuous_mode(char *ifname
, short oldflags
)
722 if (!strncmp("any", ifname
, strlen("any")))
725 device_set_flags(ifname
, oldflags
);
728 int device_up(char *ifname
)
732 if (!strncmp("any", ifname
, strlen("any")))
735 return (device_get_flags(ifname
) & IFF_UP
) == IFF_UP
;
738 int device_running(char *ifname
)
742 if (!strncmp("any", ifname
, strlen("any")))
745 return (device_get_flags(ifname
) & IFF_RUNNING
) == IFF_RUNNING
;
748 int device_up_and_running(char *ifname
)
752 if (!strncmp("any", ifname
, strlen("any")))
755 return (device_get_flags(ifname
) & (IFF_UP
| IFF_RUNNING
)) ==
756 (IFF_UP
| IFF_RUNNING
);
759 int poll_error_maybe_die(int sock
, struct pollfd
*pfd
)
761 if ((pfd
->revents
& (POLLHUP
| POLLRDHUP
| POLLERR
| POLLNVAL
)) == 0)
762 return POLL_NEXT_PKT
;
763 if (pfd
->revents
& (POLLHUP
| POLLRDHUP
))
764 panic("Hangup on socket occured!\n");
765 if (pfd
->revents
& POLLERR
) {
769 if (recv(sock
, &tmp
, sizeof(tmp
), MSG_PEEK
) >= 0)
770 return POLL_NEXT_PKT
;
771 if (errno
== ENETDOWN
)
772 panic("Interface went down!\n");
774 return POLL_MOVE_OUT
;
776 if (pfd
->revents
& POLLNVAL
) {
777 whine("Invalid polling request on socket!\n");
779 return POLL_MOVE_OUT
;
782 return POLL_NEXT_PKT
;
785 static inline char *next_token(char *q
, int sep
)
790 * glibc defines this as a macro and gcc throws a false
791 * positive ``logical ‘&&’ with non-zero constant will
792 * always evaluate as true'' in older versions. See:
793 * http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36513
800 int set_cpu_affinity(char *str
, int inverted
)
804 cpu_set_t cpu_bitmask
;
808 cpus
= get_number_cpus();
810 CPU_ZERO(&cpu_bitmask
);
812 for (i
= 0; inverted
&& i
< cpus
; ++i
)
813 CPU_SET(i
, &cpu_bitmask
);
815 while (p
= q
, q
= next_token(q
, ','), p
) {
816 unsigned int a
; /* Beginning of range */
817 unsigned int b
; /* End of range */
818 unsigned int s
; /* Stride */
821 if (sscanf(p
, "%u", &a
) < 1)
827 c1
= next_token(p
, '-');
828 c2
= next_token(p
, ',');
830 if (c1
!= NULL
&& (c2
== NULL
|| c1
< c2
)) {
831 if (sscanf(c1
, "%u", &b
) < 1)
834 c1
= next_token(c1
, ':');
836 if (c1
!= NULL
&& (c2
== NULL
|| c1
< c2
))
837 if (sscanf(c1
, "%u", &s
) < 1)
846 CPU_CLR(a
, &cpu_bitmask
);
848 CPU_SET(a
, &cpu_bitmask
);
853 ret
= sched_setaffinity(getpid(), sizeof(cpu_bitmask
),
856 panic("Can't set this cpu affinity!\n");
861 int set_proc_prio(int priority
)
864 * setpriority() is clever, even if you put a nice value which
865 * is out of range it corrects it to the closest valid nice value
867 int ret
= setpriority(PRIO_PROCESS
, getpid(), priority
);
869 panic("Can't set nice val to %i!\n", priority
);
874 int set_sched_status(int policy
, int priority
)
876 int ret
, min_prio
, max_prio
;
877 struct sched_param sp
;
879 max_prio
= sched_get_priority_max(policy
);
880 min_prio
= sched_get_priority_min(policy
);
882 if (max_prio
== -1 || min_prio
== -1)
883 whine("Cannot determine scheduler prio limits!\n");
884 else if (priority
< min_prio
)
886 else if (priority
> max_prio
)
889 memset(&sp
, 0, sizeof(sp
));
890 sp
.sched_priority
= priority
;
892 ret
= sched_setscheduler(getpid(), policy
, &sp
);
894 whine("Cannot set scheduler policy!\n");
898 ret
= sched_setparam(getpid(), &sp
);
900 whine("Cannot set scheduler prio!\n");
907 static inline int ioprio_set(int which
, int who
, int ioprio
)
909 return syscall(SYS_ioprio_set
, which
, who
, ioprio
);
912 static inline int ioprio_get(int which
, int who
)
914 return syscall(SYS_ioprio_get
, which
, who
);
917 static void ioprio_setpid(pid_t pid
, int ioprio
, int ioclass
)
919 int ret
= ioprio_set(ioprio_who_process
, pid
,
920 ioprio
| ioclass
<< IOPRIO_CLASS_SHIFT
);
922 panic("Failed to set io prio for pid!\n");
925 void ioprio_print(void)
927 int ioprio
= ioprio_get(ioprio_who_process
, getpid());
929 panic("Failed to fetch io prio for pid!\n");
931 int ioclass
= ioprio
>> IOPRIO_CLASS_SHIFT
;
932 if (ioclass
!= ioprio_class_idle
) {
934 printf("%s: prio %d\n", to_prio
[ioclass
], ioprio
);
936 printf("%s\n", to_prio
[ioclass
]);
940 void set_ioprio_rt(void)
942 ioprio_setpid(getpid(), 4, ioprio_class_rt
);
945 void set_ioprio_be(void)
947 ioprio_setpid(getpid(), 4, ioprio_class_be
);
950 int set_timeout(struct timeval
*timeval
, unsigned int msec
)
956 timeval
->tv_usec
= 0;
959 timeval
->tv_usec
= msec
* 1000;
963 timeval
->tv_sec
= (long) (msec
/ 1000);
964 timeval
->tv_usec
= (long) ((msec
- (timeval
->tv_sec
* 1000)) * 1000);
969 size_t strlcpy(char *dest
, const char *src
, size_t size
)
971 size_t ret
= strlen(src
);
974 size_t len
= (ret
>= size
) ? size
- 1 : ret
;
976 memcpy(dest
, src
, len
);
983 int slprintf(char *dst
, size_t size
, const char *fmt
, ...)
990 ret
= vsnprintf(dst
, size
, fmt
, ap
);
991 dst
[size
- 1] = '\0';
998 noinline
void *xmemset(void *s
, int c
, size_t n
)
1003 for (i
= 0; i
< n
; ++i
)
1004 ptr
[i
] = (uint8_t) c
;
1009 char *getuint(char *in
, uint32_t *out
)
1012 char *endptr
= NULL
;
1014 while (*in
&& (isdigit(*in
) || isxdigit(*in
) || *in
== 'x'))
1017 panic("Syntax error!\n");
1021 *out
= strtoul(pt
, &endptr
, 0);
1022 if ((endptr
!= NULL
&& *endptr
!= '\0') || errno
!= 0) {
1023 panic("Syntax error!\n");
1030 char *strtrim_right(register char *p
, register char c
)
1048 char *strtrim_left(register char *p
, register char c
)
1053 while (*p
&& len
--) {