Added CONFIG_CLEAR and CONFIG_RESET to config.maemo
[busybox4maemo] / networking / netstat.c
1 /* vi: set sw=4 ts=4: */
2 /*
3  * Mini netstat implementation(s) for busybox
4  * based in part on the netstat implementation from net-tools.
5  *
6  * Copyright (C) 2002 by Bart Visscher <magick@linux-fan.com>
7  *
8  * 2002-04-20
9  * IPV6 support added by Bart Visscher <magick@linux-fan.com>
10  *
11  * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
12  */
13
14 #include "libbb.h"
15 #include "inet_common.h"
16
17 enum {
18         OPT_extended = 0x4,
19         OPT_showroute = 0x100,
20         OPT_widedisplay = 0x200 * ENABLE_FEATURE_NETSTAT_WIDE,
21 };
22 # define NETSTAT_OPTS "laentuwxr"USE_FEATURE_NETSTAT_WIDE("W")
23
24 #define NETSTAT_CONNECTED 0x01
25 #define NETSTAT_LISTENING 0x02
26 #define NETSTAT_NUMERIC   0x04
27 /* Must match getopt32 option string */
28 #define NETSTAT_TCP       0x10
29 #define NETSTAT_UDP       0x20
30 #define NETSTAT_RAW       0x40
31 #define NETSTAT_UNIX      0x80
32 #define NETSTAT_ALLPROTO  (NETSTAT_TCP|NETSTAT_UDP|NETSTAT_RAW|NETSTAT_UNIX)
33
34 static smallint flags = NETSTAT_CONNECTED | NETSTAT_ALLPROTO;
35
36 enum {
37         TCP_ESTABLISHED = 1,
38         TCP_SYN_SENT,
39         TCP_SYN_RECV,
40         TCP_FIN_WAIT1,
41         TCP_FIN_WAIT2,
42         TCP_TIME_WAIT,
43         TCP_CLOSE,
44         TCP_CLOSE_WAIT,
45         TCP_LAST_ACK,
46         TCP_LISTEN,
47         TCP_CLOSING /* now a valid state */
48 };
49
50 static const char *const tcp_state[] = {
51         "",
52         "ESTABLISHED",
53         "SYN_SENT",
54         "SYN_RECV",
55         "FIN_WAIT1",
56         "FIN_WAIT2",
57         "TIME_WAIT",
58         "CLOSE",
59         "CLOSE_WAIT",
60         "LAST_ACK",
61         "LISTEN",
62         "CLOSING"
63 };
64
65 typedef enum {
66         SS_FREE = 0,     /* not allocated                */
67         SS_UNCONNECTED,  /* unconnected to any socket    */
68         SS_CONNECTING,   /* in process of connecting     */
69         SS_CONNECTED,    /* connected to socket          */
70         SS_DISCONNECTING /* in process of disconnecting  */
71 } socket_state;
72
73 #define SO_ACCEPTCON (1<<16)    /* performed a listen           */
74 #define SO_WAITDATA  (1<<17)    /* wait data to read            */
75 #define SO_NOSPACE   (1<<18)    /* no space to write            */
76
77 /* Standard printout size */
78 #define PRINT_IP_MAX_SIZE           23
79 #define PRINT_NET_CONN              "%s   %6ld %6ld %-23s %-23s %-12s\n"
80 #define PRINT_NET_CONN_HEADER       "\nProto Recv-Q Send-Q %-23s %-23s State\n"
81
82 /* When there are IPv6 connections the IPv6 addresses will be
83  * truncated to none-recognition. The '-W' option makes the
84  * address columns wide enough to accomodate for longest possible
85  * IPv6 addresses, i.e. addresses of the form
86  * xxxx:xxxx:xxxx:xxxx:xxxx:xxxx:ddd.ddd.ddd.ddd
87  */
88 #define PRINT_IP_MAX_SIZE_WIDE      51  /* INET6_ADDRSTRLEN + 5 for the port number */
89 #define PRINT_NET_CONN_WIDE         "%s   %6ld %6ld %-51s %-51s %-12s\n"
90 #define PRINT_NET_CONN_HEADER_WIDE  "\nProto Recv-Q Send-Q %-51s %-51s State\n"
91
92 static const char *net_conn_line = PRINT_NET_CONN;
93
94
95 #if ENABLE_FEATURE_IPV6
96 static void build_ipv6_addr(char* local_addr, struct sockaddr_in6* localaddr)
97 {
98         char addr6[INET6_ADDRSTRLEN];
99         struct in6_addr in6;
100
101         sscanf(local_addr, "%08X%08X%08X%08X",
102                    &in6.s6_addr32[0], &in6.s6_addr32[1],
103                    &in6.s6_addr32[2], &in6.s6_addr32[3]);
104         inet_ntop(AF_INET6, &in6, addr6, sizeof(addr6));
105         inet_pton(AF_INET6, addr6, (struct sockaddr *) &localaddr->sin6_addr);
106
107         localaddr->sin6_family = AF_INET6;
108 }
109 #endif
110
111 #if ENABLE_FEATURE_IPV6
112 static void build_ipv4_addr(char* local_addr, struct sockaddr_in6* localaddr)
113 #else
114 static void build_ipv4_addr(char* local_addr, struct sockaddr_in* localaddr)
115 #endif
116 {
117         sscanf(local_addr, "%X",
118                    &((struct sockaddr_in *) localaddr)->sin_addr.s_addr);
119         ((struct sockaddr *) localaddr)->sa_family = AF_INET;
120 }
121
122 static const char *get_sname(int port, const char *proto, int numeric)
123 {
124         if (!port)
125                 return "*";
126         if (!numeric) {
127                 struct servent *se = getservbyport(port, proto);
128                 if (se)
129                         return se->s_name;
130         }
131         /* hummm, we may return static buffer here!! */
132         return itoa(ntohs(port));
133 }
134
135 static char *ip_port_str(struct sockaddr *addr, int port, const char *proto, int numeric)
136 {
137         enum { salen = USE_FEATURE_IPV6(sizeof(struct sockaddr_in6)) SKIP_FEATURE_IPV6(sizeof(struct sockaddr_in)) };
138         char *host, *host_port;
139
140         /* Code which used "*" for INADDR_ANY is removed: it's ambiguous in IPv6,
141          * while "0.0.0.0" is not. */
142
143         host = numeric ? xmalloc_sockaddr2dotted_noport(addr)
144                        : xmalloc_sockaddr2host_noport(addr);
145
146         host_port = xasprintf("%s:%s", host, get_sname(htons(port), proto, numeric));
147         free(host);
148         return host_port;
149 }
150
151 static int tcp_do_one(int lnr, char *line)
152 {
153         char local_addr[64], rem_addr[64];
154         char more[512];
155         int num, local_port, rem_port, d, state, timer_run, uid, timeout;
156 #if ENABLE_FEATURE_IPV6
157         struct sockaddr_in6 localaddr, remaddr;
158 #else
159         struct sockaddr_in localaddr, remaddr;
160 #endif
161         unsigned long rxq, txq, time_len, retr, inode;
162
163         if (lnr == 0)
164                 return 0;
165
166         more[0] = '\0';
167         num = sscanf(line,
168                         "%d: %64[0-9A-Fa-f]:%X %64[0-9A-Fa-f]:%X %X %lX:%lX %X:%lX %lX %d %d %ld %512s\n",
169                         &d, local_addr, &local_port,
170                         rem_addr, &rem_port, &state,
171                         &txq, &rxq, &timer_run, &time_len, &retr, &uid, &timeout, &inode, more);
172
173         if (num < 10) {
174                 return 1; /* error */
175         }
176
177         if (strlen(local_addr) > 8) {
178 #if ENABLE_FEATURE_IPV6
179                 build_ipv6_addr(local_addr, &localaddr);
180                 build_ipv6_addr(rem_addr, &remaddr);
181 #endif
182         } else {
183                 build_ipv4_addr(local_addr, &localaddr);
184                 build_ipv4_addr(rem_addr, &remaddr);
185         }
186
187         if ((rem_port && (flags & NETSTAT_CONNECTED))
188          || (!rem_port && (flags & NETSTAT_LISTENING))
189         ) {
190                 char *l = ip_port_str(
191                                 (struct sockaddr *) &localaddr, local_port,
192                                 "tcp", flags & NETSTAT_NUMERIC);
193                 char *r = ip_port_str(
194                                 (struct sockaddr *) &remaddr, rem_port,
195                                 "tcp", flags & NETSTAT_NUMERIC);
196                 printf(net_conn_line,
197                         "tcp", rxq, txq, l, r, tcp_state[state]);
198                 free(l);
199                 free(r);
200         }
201         return 0;
202 }
203
204 static int udp_do_one(int lnr, char *line)
205 {
206         char local_addr[64], rem_addr[64];
207         const char *state_str;
208         char more[512];
209         int num, local_port, rem_port, d, state, timer_run, uid, timeout;
210 #if ENABLE_FEATURE_IPV6
211         struct sockaddr_in6 localaddr, remaddr;
212 #else
213         struct sockaddr_in localaddr, remaddr;
214 #endif
215         unsigned long rxq, txq, time_len, retr, inode;
216
217         if (lnr == 0)
218                 return 0;
219
220         more[0] = '\0';
221         num = sscanf(line,
222                         "%d: %64[0-9A-Fa-f]:%X %64[0-9A-Fa-f]:%X %X %lX:%lX %X:%lX %lX %d %d %ld %512s\n",
223                         &d, local_addr, &local_port,
224                         rem_addr, &rem_port, &state,
225                         &txq, &rxq, &timer_run, &time_len, &retr, &uid, &timeout, &inode, more);
226
227         if (strlen(local_addr) > 8) {
228 #if ENABLE_FEATURE_IPV6
229                 /* Demangle what the kernel gives us */
230                 build_ipv6_addr(local_addr, &localaddr);
231                 build_ipv6_addr(rem_addr, &remaddr);
232 #endif
233         } else {
234                 build_ipv4_addr(local_addr, &localaddr);
235                 build_ipv4_addr(rem_addr, &remaddr);
236         }
237
238         if (num < 10) {
239                 return 1; /* error */
240         }
241         switch (state) {
242                 case TCP_ESTABLISHED:
243                         state_str = "ESTABLISHED";
244                         break;
245                 case TCP_CLOSE:
246                         state_str = "";
247                         break;
248                 default:
249                         state_str = "UNKNOWN";
250                         break;
251         }
252
253 #if ENABLE_FEATURE_IPV6
254 # define notnull(A) ( \
255         ( (A.sin6_family == AF_INET6)                               \
256           && (A.sin6_addr.s6_addr32[0] | A.sin6_addr.s6_addr32[1] | \
257               A.sin6_addr.s6_addr32[2] | A.sin6_addr.s6_addr32[3])  \
258         ) || (                                                      \
259           (A.sin6_family == AF_INET)                                \
260           && ((struct sockaddr_in*)&A)->sin_addr.s_addr             \
261         )                                                           \
262 )
263 #else
264 # define notnull(A) (A.sin_addr.s_addr)
265 #endif
266         {
267                 int have_remaddr = notnull(remaddr);
268                 if ((have_remaddr && (flags & NETSTAT_CONNECTED))
269                  || (!have_remaddr && (flags & NETSTAT_LISTENING))
270                 ) {
271                         char *l = ip_port_str(
272                                 (struct sockaddr *) &localaddr, local_port,
273                                 "udp", flags & NETSTAT_NUMERIC);
274                         char *r = ip_port_str(
275                                 (struct sockaddr *) &remaddr, rem_port,
276                                 "udp", flags & NETSTAT_NUMERIC);
277                         printf(net_conn_line,
278                                 "udp", rxq, txq, l, r, state_str);
279                         free(l);
280                         free(r);
281                 }
282         }
283         return 0;
284 }
285
286 static int raw_do_one(int lnr, char *line)
287 {
288         char local_addr[64], rem_addr[64];
289         char more[512];
290         int num, local_port, rem_port, d, state, timer_run, uid, timeout;
291 #if ENABLE_FEATURE_IPV6
292         struct sockaddr_in6 localaddr, remaddr;
293 #else
294         struct sockaddr_in localaddr, remaddr;
295 #endif
296         unsigned long rxq, txq, time_len, retr, inode;
297
298         if (lnr == 0)
299                 return 0;
300
301         more[0] = '\0';
302         num = sscanf(line,
303                         "%d: %64[0-9A-Fa-f]:%X %64[0-9A-Fa-f]:%X %X %lX:%lX %X:%lX %lX %d %d %ld %512s\n",
304                         &d, local_addr, &local_port,
305                         rem_addr, &rem_port, &state,
306                         &txq, &rxq, &timer_run, &time_len, &retr, &uid, &timeout, &inode, more);
307
308         if (strlen(local_addr) > 8) {
309 #if ENABLE_FEATURE_IPV6
310                 build_ipv6_addr(local_addr, &localaddr);
311                 build_ipv6_addr(rem_addr, &remaddr);
312 #endif
313         } else {
314                 build_ipv4_addr(local_addr, &localaddr);
315                 build_ipv4_addr(rem_addr, &remaddr);
316         }
317
318         if (num < 10) {
319                 return 1; /* error */
320         }
321
322         {
323                 int have_remaddr = notnull(remaddr);
324                 if ((have_remaddr && (flags & NETSTAT_CONNECTED))
325                  || (!have_remaddr && (flags & NETSTAT_LISTENING))
326                 ) {
327                         char *l = ip_port_str(
328                                 (struct sockaddr *) &localaddr, local_port,
329                                 "raw", flags & NETSTAT_NUMERIC);
330                         char *r = ip_port_str(
331                                 (struct sockaddr *) &remaddr, rem_port,
332                                 "raw", flags & NETSTAT_NUMERIC);
333                         printf(net_conn_line,
334                                 "raw", rxq, txq, l, r, itoa(state));
335                         free(l);
336                         free(r);
337                 }
338         }
339         return 0;
340 }
341
342 static int unix_do_one(int nr, char *line)
343 {
344         unsigned long refcnt, proto, unix_flags;
345         unsigned long inode;
346         int type, state;
347         int num, path_ofs;
348         void *d;
349         const char *ss_proto, *ss_state, *ss_type;
350         char ss_flags[32];
351
352         if (nr == 0)
353                 return 0; /* skip header */
354
355         /* 2.6.15 may report lines like "... @/tmp/fam-user-^@^@^@^@^@^@^@..."
356          * Other users report long lines filled by NUL bytes.
357          * (those ^@ are NUL bytes too). We see them as empty lines. */
358         if (!line[0])
359                 return 0;
360
361         path_ofs = 0; /* paranoia */
362         num = sscanf(line, "%p: %lX %lX %lX %X %X %lu %n",
363                         &d, &refcnt, &proto, &unix_flags, &type, &state, &inode, &path_ofs);
364         if (num < 7) {
365                 return 1; /* error */
366         }
367         if ((flags & (NETSTAT_LISTENING|NETSTAT_CONNECTED)) != (NETSTAT_LISTENING|NETSTAT_CONNECTED)) {
368                 if ((state == SS_UNCONNECTED) && (unix_flags & SO_ACCEPTCON)) {
369                         if (!(flags & NETSTAT_LISTENING))
370                                 return 0;
371                 } else {
372                         if (!(flags & NETSTAT_CONNECTED))
373                                 return 0;
374                 }
375         }
376
377         switch (proto) {
378                 case 0:
379                         ss_proto = "unix";
380                         break;
381                 default:
382                         ss_proto = "??";
383         }
384
385         switch (type) {
386                 case SOCK_STREAM:
387                         ss_type = "STREAM";
388                         break;
389                 case SOCK_DGRAM:
390                         ss_type = "DGRAM";
391                         break;
392                 case SOCK_RAW:
393                         ss_type = "RAW";
394                         break;
395                 case SOCK_RDM:
396                         ss_type = "RDM";
397                         break;
398                 case SOCK_SEQPACKET:
399                         ss_type = "SEQPACKET";
400                         break;
401                 default:
402                         ss_type = "UNKNOWN";
403         }
404
405         switch (state) {
406                 case SS_FREE:
407                         ss_state = "FREE";
408                         break;
409                 case SS_UNCONNECTED:
410                         /*
411                          * Unconnected sockets may be listening
412                          * for something.
413                          */
414                         if (unix_flags & SO_ACCEPTCON) {
415                                 ss_state = "LISTENING";
416                         } else {
417                                 ss_state = "";
418                         }
419                         break;
420                 case SS_CONNECTING:
421                         ss_state = "CONNECTING";
422                         break;
423                 case SS_CONNECTED:
424                         ss_state = "CONNECTED";
425                         break;
426                 case SS_DISCONNECTING:
427                         ss_state = "DISCONNECTING";
428                         break;
429                 default:
430                         ss_state = "UNKNOWN";
431         }
432
433         strcpy(ss_flags, "[ ");
434         if (unix_flags & SO_ACCEPTCON)
435                 strcat(ss_flags, "ACC ");
436         if (unix_flags & SO_WAITDATA)
437                 strcat(ss_flags, "W ");
438         if (unix_flags & SO_NOSPACE)
439                 strcat(ss_flags, "N ");
440         strcat(ss_flags, "]");
441
442         printf("%-5s %-6ld %-11s %-10s %-13s %6lu ",
443                 ss_proto, refcnt, ss_flags, ss_type, ss_state, inode
444                 );
445
446         /* TODO: currently we stop at first NUL byte. Is it a problem? */
447         line += path_ofs;
448         *strchrnul(line, '\n') = '\0';
449         while (*line)
450                 fputc_printable(*line++, stdout);
451         bb_putchar('\n');
452         return 0;
453 }
454
455 #define _PATH_PROCNET_UDP "/proc/net/udp"
456 #define _PATH_PROCNET_UDP6 "/proc/net/udp6"
457 #define _PATH_PROCNET_TCP "/proc/net/tcp"
458 #define _PATH_PROCNET_TCP6 "/proc/net/tcp6"
459 #define _PATH_PROCNET_RAW "/proc/net/raw"
460 #define _PATH_PROCNET_RAW6 "/proc/net/raw6"
461 #define _PATH_PROCNET_UNIX "/proc/net/unix"
462
463 static void do_info(const char *file, const char *name, int (*proc)(int, char *))
464 {
465         int lnr;
466         FILE *procinfo;
467         char *buffer;
468
469         procinfo = fopen(file, "r");
470         if (procinfo == NULL) {
471                 if (errno != ENOENT) {
472                         bb_simple_perror_msg(file);
473                 } else {
474                         bb_error_msg("no kernel support for %s", name);
475                 }
476                 return;
477         }
478         lnr = 0;
479         /* Why? because xmalloc_fgets_str doesn't stop on NULs */
480         while ((buffer = xmalloc_fgets_str(procinfo, "\n")) != NULL) {
481                 if (proc(lnr++, buffer))
482                         bb_error_msg("%s: bogus data on line %d", file, lnr);
483                 free(buffer);
484         }
485         fclose(procinfo);
486 }
487
488 int netstat_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
489 int netstat_main(int argc ATTRIBUTE_UNUSED, char **argv)
490 {
491         const char *net_conn_line_header = PRINT_NET_CONN_HEADER;
492         unsigned opt;
493 #if ENABLE_FEATURE_IPV6
494         smallint inet = 1;
495         smallint inet6 = 1;
496 #else
497         enum { inet = 1, inet6 = 0 };
498 #endif
499
500         /* Option string must match NETSTAT_xxx constants */
501         opt = getopt32(argv, NETSTAT_OPTS);
502         if (opt & 0x1) { // -l
503                 flags &= ~NETSTAT_CONNECTED;
504                 flags |= NETSTAT_LISTENING;
505         }
506         if (opt & 0x2) flags |= NETSTAT_LISTENING | NETSTAT_CONNECTED; // -a
507         //if (opt & 0x4) // -e
508         if (opt & 0x8) flags |= NETSTAT_NUMERIC; // -n
509         //if (opt & 0x10) // -t: NETSTAT_TCP
510         //if (opt & 0x20) // -u: NETSTAT_UDP
511         //if (opt & 0x40) // -w: NETSTAT_RAW
512         //if (opt & 0x80) // -x: NETSTAT_UNIX
513         if (opt & OPT_showroute) { // -r
514 #if ENABLE_ROUTE
515                 bb_displayroutes(flags & NETSTAT_NUMERIC, !(opt & OPT_extended));
516                 return 0;
517 #else
518                 bb_show_usage();
519 #endif
520         }
521
522         if (opt & OPT_widedisplay) { // -W
523                 net_conn_line = PRINT_NET_CONN_WIDE;
524                 net_conn_line_header = PRINT_NET_CONN_HEADER_WIDE;
525         }
526
527         opt &= NETSTAT_ALLPROTO;
528         if (opt) {
529                 flags &= ~NETSTAT_ALLPROTO;
530                 flags |= opt;
531         }
532         if (flags & (NETSTAT_TCP|NETSTAT_UDP|NETSTAT_RAW)) {
533                 printf("Active Internet connections "); /* xxx */
534
535                 if ((flags & (NETSTAT_LISTENING|NETSTAT_CONNECTED)) == (NETSTAT_LISTENING|NETSTAT_CONNECTED))
536                         printf("(servers and established)");
537                 else if (flags & NETSTAT_LISTENING)
538                         printf("(only servers)");
539                 else
540                         printf("(w/o servers)");
541                 printf(net_conn_line_header, "Local Address", "Foreign Address");
542         }
543         if (inet && flags & NETSTAT_TCP)
544                 do_info(_PATH_PROCNET_TCP, "AF INET (tcp)", tcp_do_one);
545 #if ENABLE_FEATURE_IPV6
546         if (inet6 && flags & NETSTAT_TCP)
547                 do_info(_PATH_PROCNET_TCP6, "AF INET6 (tcp)", tcp_do_one);
548 #endif
549         if (inet && flags & NETSTAT_UDP)
550                 do_info(_PATH_PROCNET_UDP, "AF INET (udp)", udp_do_one);
551 #if ENABLE_FEATURE_IPV6
552         if (inet6 && flags & NETSTAT_UDP)
553                 do_info(_PATH_PROCNET_UDP6, "AF INET6 (udp)", udp_do_one);
554 #endif
555         if (inet && flags & NETSTAT_RAW)
556                 do_info(_PATH_PROCNET_RAW, "AF INET (raw)", raw_do_one);
557 #if ENABLE_FEATURE_IPV6
558         if (inet6 && flags & NETSTAT_RAW)
559                 do_info(_PATH_PROCNET_RAW6, "AF INET6 (raw)", raw_do_one);
560 #endif
561         if (flags & NETSTAT_UNIX) {
562                 printf("Active UNIX domain sockets ");
563                 if ((flags & (NETSTAT_LISTENING|NETSTAT_CONNECTED)) == (NETSTAT_LISTENING|NETSTAT_CONNECTED))
564                         printf("(servers and established)");
565                 else if (flags & NETSTAT_LISTENING)
566                         printf("(only servers)");
567                 else
568                         printf("(w/o servers)");
569                 printf("\nProto RefCnt Flags       Type       State         I-Node Path\n");
570                 do_info(_PATH_PROCNET_UNIX, "AF UNIX", unix_do_one);
571         }
572         return 0;
573 }