Add missing kstat definitions
[collectd.git] / src / tcpconns.c
1 /**
2  * collectd - src/tcpconns.c
3  * Copyright (C) 2007,2008  Florian octo Forster
4  * Copyright (C) 2008       Michael Stapelberg
5  *
6  * This program is free software; you can redistribute it and/or modify it
7  * under the terms of the GNU General Public License as published by the
8  * Free Software Foundation; only version 2 of the License is applicable.
9  *
10  * This program is distributed in the hope that it will be useful, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License along
16  * with this program; if not, write to the Free Software Foundation, Inc.,
17  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
18  *
19  * Author:
20  *   Florian octo Forster <octo at collectd.org>
21  *   Michael Stapelberg <michael+git at stapelberg.de>
22  **/
23
24 /**
25  * Code within `HAVE_LIBKVM_NLIST' blocks is provided under the following
26  * license:
27  *
28  * $collectd: parts of tcpconns.c, 2008/08/08 03:48:30 Michael Stapelberg $
29  * $OpenBSD: inet.c,v 1.100 2007/06/19 05:28:30 ray Exp $
30  * $NetBSD: inet.c,v 1.14 1995/10/03 21:42:37 thorpej Exp $
31  *
32  * Copyright (c) 1983, 1988, 1993
33  *      The Regents of the University of California.  All rights reserved.
34  *
35  * Redistribution and use in source and binary forms, with or without
36  * modification, are permitted provided that the following conditions
37  * are met:
38  * 1. Redistributions of source code must retain the above copyright
39  *    notice, this list of conditions and the following disclaimer.
40  * 2. Redistributions in binary form must reproduce the above copyright
41  *    notice, this list of conditions and the following disclaimer in the
42  *    documentation and/or other materials provided with the distribution.
43  * 3. Neither the name of the University nor the names of its contributors
44  *    may be used to endorse or promote products derived from this software
45  *    without specific prior written permission.
46  *
47  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
48  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
49  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
50  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
51  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
52  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
53  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
54  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
55  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
56  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
57  * SUCH DAMAGE.
58  */
59
60 #include "collectd.h"
61 #include "common.h"
62 #include "plugin.h"
63
64 #if defined(__OpenBSD__) || defined(__NetBSD__)
65 #undef HAVE_SYSCTLBYNAME /* force HAVE_LIBKVM_NLIST path */
66 #endif
67
68 #if !KERNEL_LINUX && !HAVE_SYSCTLBYNAME && !HAVE_LIBKVM_NLIST && !KERNEL_AIX
69 # error "No applicable input method."
70 #endif
71
72 #if KERNEL_LINUX
73 # include <asm/types.h>
74 /* sys/socket.h is necessary to compile when using netlink on older systems. */
75 # include <sys/socket.h>
76 # include <linux/netlink.h>
77 #if HAVE_LINUX_INET_DIAG_H
78 # include <linux/inet_diag.h>
79 #endif
80 # include <sys/socket.h>
81 # include <arpa/inet.h>
82 /* #endif KERNEL_LINUX */
83
84 #elif HAVE_SYSCTLBYNAME
85 # include <sys/socketvar.h>
86 # include <sys/sysctl.h>
87
88 /* Some includes needed for compiling on FreeBSD */
89 #include <sys/time.h>
90 #if HAVE_SYS_TYPES_H
91 # include <sys/types.h>
92 #endif
93 #if HAVE_SYS_SOCKET_H
94 # include <sys/socket.h>
95 #endif
96 #if HAVE_NET_IF_H
97 # include <net/if.h>
98 #endif
99
100 # include <net/route.h>
101 # include <netinet/in.h>
102 # include <netinet/in_systm.h>
103 # include <netinet/ip.h>
104 # include <netinet/ip6.h>
105 # include <netinet/in_pcb.h>
106 # include <netinet/ip_var.h>
107 # include <netinet/tcp.h>
108 # include <netinet/tcpip.h>
109 # include <netinet/tcp_seq.h>
110 # include <netinet/tcp_var.h>
111 /* #endif HAVE_SYSCTLBYNAME */
112
113 /* This is for OpenBSD and NetBSD. */
114 #elif HAVE_LIBKVM_NLIST
115 # include <sys/queue.h>
116 # include <sys/socket.h>
117 # include <net/route.h>
118 # include <netinet/in.h>
119 # include <netinet/in_systm.h>
120 # include <netinet/ip.h>
121 # include <netinet/ip_var.h>
122 # include <netinet/in_pcb.h>
123 # include <netinet/tcp.h>
124 # include <netinet/tcp_timer.h>
125 # include <netinet/tcp_var.h>
126 # include <netdb.h>
127 # include <arpa/inet.h>
128 # if !defined(HAVE_BSD_NLIST_H) || !HAVE_BSD_NLIST_H
129 #  include <nlist.h>
130 # else /* HAVE_BSD_NLIST_H */
131 #  include <bsd/nlist.h>
132 # endif
133 # include <kvm.h>
134 /* #endif HAVE_LIBKVM_NLIST */
135
136 #elif KERNEL_AIX
137 # include <arpa/inet.h>
138 # include <sys/socketvar.h>
139 #endif /* KERNEL_AIX */
140
141 #if KERNEL_LINUX
142 #if HAVE_STRUCT_LINUX_INET_DIAG_REQ
143 struct nlreq {
144   struct nlmsghdr nlh;
145   struct inet_diag_req r;
146 };
147 #endif
148
149 static const char *tcp_state[] =
150 {
151   "", /* 0 */
152   "ESTABLISHED",
153   "SYN_SENT",
154   "SYN_RECV",
155   "FIN_WAIT1",
156   "FIN_WAIT2",
157   "TIME_WAIT",
158   "CLOSED",
159   "CLOSE_WAIT",
160   "LAST_ACK",
161   "LISTEN", /* 10 */
162   "CLOSING"
163 };
164
165 # define TCP_STATE_LISTEN 10
166 # define TCP_STATE_MIN 1
167 # define TCP_STATE_MAX 11
168 /* #endif KERNEL_LINUX */
169
170 #elif HAVE_SYSCTLBYNAME
171 static const char *tcp_state[] =
172 {
173   "CLOSED",
174   "LISTEN",
175   "SYN_SENT",
176   "SYN_RECV",
177   "ESTABLISHED",
178   "CLOSE_WAIT",
179   "FIN_WAIT1",
180   "CLOSING",
181   "LAST_ACK",
182   "FIN_WAIT2",
183   "TIME_WAIT"
184 };
185
186 # define TCP_STATE_LISTEN 1
187 # define TCP_STATE_MIN 0
188 # define TCP_STATE_MAX 10
189 /* #endif HAVE_SYSCTLBYNAME */
190
191 #elif HAVE_LIBKVM_NLIST
192 static const char *tcp_state[] =
193 {
194   "CLOSED",
195   "LISTEN",
196   "SYN_SENT",
197   "SYN_RECV",
198   "ESTABLISHED",
199   "CLOSE_WAIT",
200   "FIN_WAIT1",
201   "CLOSING",
202   "LAST_ACK",
203   "FIN_WAIT2",
204   "TIME_WAIT"
205 };
206
207 static kvm_t *kvmd;
208 static u_long      inpcbtable_off = 0;
209 struct inpcbtable *inpcbtable_ptr = NULL;
210
211 # define TCP_STATE_LISTEN 1
212 # define TCP_STATE_MIN 1
213 # define TCP_STATE_MAX 10
214 /* #endif HAVE_LIBKVM_NLIST */
215
216 #elif KERNEL_AIX
217 static const char *tcp_state[] =
218 {
219   "CLOSED",
220   "LISTEN",
221   "SYN_SENT",
222   "SYN_RECV",
223   "ESTABLISHED",
224   "CLOSE_WAIT",
225   "FIN_WAIT1",
226   "CLOSING",
227   "LAST_ACK",
228   "FIN_WAIT2",
229   "TIME_WAIT"
230 };
231
232 # define TCP_STATE_LISTEN 1
233 # define TCP_STATE_MIN 0
234 # define TCP_STATE_MAX 10
235
236 struct netinfo_conn {
237   uint32_t unknow1[2];
238   uint16_t dstport;
239   uint16_t unknow2;
240   struct in6_addr dstaddr;
241   uint16_t srcport;
242   uint16_t unknow3;
243   struct in6_addr srcaddr;
244   uint32_t unknow4[36];
245   uint16_t tcp_state;
246   uint16_t unknow5[7];
247 };
248
249 struct netinfo_header {
250   unsigned int proto;
251   unsigned int size;
252 };
253
254 # define NETINFO_TCP 3
255 extern int netinfo (int proto, void *data, int *size,  int n);
256 #endif /* KERNEL_AIX */
257
258 #define PORT_COLLECT_LOCAL  0x01
259 #define PORT_COLLECT_REMOTE 0x02
260 #define PORT_IS_LISTENING   0x04
261
262 typedef struct port_entry_s
263 {
264   uint16_t port;
265   uint16_t flags;
266   uint32_t count_local[TCP_STATE_MAX + 1];
267   uint32_t count_remote[TCP_STATE_MAX + 1];
268   struct port_entry_s *next;
269 } port_entry_t;
270
271 static const char *config_keys[] =
272 {
273   "ListeningPorts",
274   "LocalPort",
275   "RemotePort",
276   "AllPortsSummary"
277 };
278 static int config_keys_num = STATIC_ARRAY_SIZE (config_keys);
279
280 static int port_collect_listening = 0;
281 static int port_collect_total = 0;
282 static port_entry_t *port_list_head = NULL;
283 static uint32_t count_total[TCP_STATE_MAX + 1];
284
285 #if KERNEL_LINUX
286 #if HAVE_STRUCT_LINUX_INET_DIAG_REQ
287 /* This depends on linux inet_diag_req because if this structure is missing,
288  * sequence_number is useless and we get a compilation warning.
289  */
290 static uint32_t sequence_number = 0;
291 #endif
292
293 enum
294 {
295   SRC_DUNNO,
296   SRC_NETLINK,
297   SRC_PROC
298 } linux_source = SRC_DUNNO;
299 #endif
300
301 static void conn_prepare_vl (value_list_t *vl, value_t *values)
302 {
303   vl->values = values;
304   vl->values_len = 1;
305   sstrncpy (vl->host, hostname_g, sizeof (vl->host));
306   sstrncpy (vl->plugin, "tcpconns", sizeof (vl->plugin));
307   sstrncpy (vl->type, "tcp_connections", sizeof (vl->type));
308 }
309
310 static void conn_submit_port_entry (port_entry_t *pe)
311 {
312   value_t values[1];
313   value_list_t vl = VALUE_LIST_INIT;
314   int i;
315
316   conn_prepare_vl (&vl, values);
317
318   if (((port_collect_listening != 0) && (pe->flags & PORT_IS_LISTENING))
319       || (pe->flags & PORT_COLLECT_LOCAL))
320   {
321     ssnprintf (vl.plugin_instance, sizeof (vl.plugin_instance),
322         "%"PRIu16"-local", pe->port);
323
324     for (i = 1; i <= TCP_STATE_MAX; i++)
325     {
326       vl.values[0].gauge = pe->count_local[i];
327
328       sstrncpy (vl.type_instance, tcp_state[i], sizeof (vl.type_instance));
329
330       plugin_dispatch_values (&vl);
331     }
332   }
333
334   if (pe->flags & PORT_COLLECT_REMOTE)
335   {
336     ssnprintf (vl.plugin_instance, sizeof (vl.plugin_instance),
337         "%"PRIu16"-remote", pe->port);
338
339     for (i = 1; i <= TCP_STATE_MAX; i++)
340     {
341       vl.values[0].gauge = pe->count_remote[i];
342
343       sstrncpy (vl.type_instance, tcp_state[i], sizeof (vl.type_instance));
344
345       plugin_dispatch_values (&vl);
346     }
347   }
348 } /* void conn_submit */
349
350 static void conn_submit_port_total (void)
351 {
352   value_t values[1];
353   value_list_t vl = VALUE_LIST_INIT;
354   int i;
355
356   conn_prepare_vl (&vl, values);
357
358   sstrncpy (vl.plugin_instance, "all", sizeof (vl.plugin_instance));
359
360   for (i = 1; i <= TCP_STATE_MAX; i++)
361   {
362     vl.values[0].gauge = count_total[i];
363
364     sstrncpy (vl.type_instance, tcp_state[i], sizeof (vl.type_instance));
365
366     plugin_dispatch_values (&vl);
367   }
368 }
369
370 static void conn_submit_all (void)
371 {
372   port_entry_t *pe;
373
374   if (port_collect_total)
375     conn_submit_port_total ();
376
377   for (pe = port_list_head; pe != NULL; pe = pe->next)
378     conn_submit_port_entry (pe);
379 } /* void conn_submit_all */
380
381 static port_entry_t *conn_get_port_entry (uint16_t port, int create)
382 {
383   port_entry_t *ret;
384
385   ret = port_list_head;
386   while (ret != NULL)
387   {
388     if (ret->port == port)
389       break;
390     ret = ret->next;
391   }
392
393   if ((ret == NULL) && (create != 0))
394   {
395     ret = (port_entry_t *) malloc (sizeof (port_entry_t));
396     if (ret == NULL)
397       return (NULL);
398     memset (ret, '\0', sizeof (port_entry_t));
399
400     ret->port = port;
401     ret->next = port_list_head;
402     port_list_head = ret;
403   }
404
405   return (ret);
406 } /* port_entry_t *conn_get_port_entry */
407
408 /* Removes ports that were added automatically due to the `ListeningPorts'
409  * setting but which are no longer listening. */
410 static void conn_reset_port_entry (void)
411 {
412   port_entry_t *prev = NULL;
413   port_entry_t *pe = port_list_head;
414
415   memset (&count_total, '\0', sizeof(count_total));
416
417   while (pe != NULL)
418   {
419     /* If this entry was created while reading the files (ant not when handling
420      * the configuration) remove it now. */
421     if ((pe->flags & (PORT_COLLECT_LOCAL
422             | PORT_COLLECT_REMOTE
423             | PORT_IS_LISTENING)) == 0)
424     {
425       port_entry_t *next = pe->next;
426
427       DEBUG ("tcpconns plugin: Removing temporary entry "
428           "for listening port %"PRIu16, pe->port);
429
430       if (prev == NULL)
431         port_list_head = next;
432       else
433         prev->next = next;
434
435       sfree (pe);
436       pe = next;
437
438       continue;
439     }
440
441     memset (pe->count_local, '\0', sizeof (pe->count_local));
442     memset (pe->count_remote, '\0', sizeof (pe->count_remote));
443     pe->flags &= ~PORT_IS_LISTENING;
444
445     prev = pe;
446     pe = pe->next;
447   }
448 } /* void conn_reset_port_entry */
449
450 static int conn_handle_ports (uint16_t port_local, uint16_t port_remote, uint8_t state)
451 {
452   port_entry_t *pe = NULL;
453
454   if ((state > TCP_STATE_MAX)
455 #if TCP_STATE_MIN > 0
456       || (state < TCP_STATE_MIN)
457 #endif
458      )
459   {
460     NOTICE ("tcpconns plugin: Ignoring connection with "
461         "unknown state 0x%02"PRIx8".", state);
462     return (-1);
463   }
464
465   count_total[state]++;
466
467   /* Listening sockets */
468   if ((state == TCP_STATE_LISTEN) && (port_collect_listening != 0))
469   {
470     pe = conn_get_port_entry (port_local, 1 /* create */);
471     if (pe != NULL)
472       pe->flags |= PORT_IS_LISTENING;
473   }
474
475   DEBUG ("tcpconns plugin: Connection %"PRIu16" <-> %"PRIu16" (%s)",
476       port_local, port_remote, tcp_state[state]);
477
478   pe = conn_get_port_entry (port_local, 0 /* no create */);
479   if (pe != NULL)
480     pe->count_local[state]++;
481
482   pe = conn_get_port_entry (port_remote, 0 /* no create */);
483   if (pe != NULL)
484     pe->count_remote[state]++;
485
486   return (0);
487 } /* int conn_handle_ports */
488
489 #if KERNEL_LINUX
490 /* Returns zero on success, less than zero on socket error and greater than
491  * zero on other errors. */
492 static int conn_read_netlink (void)
493 {
494 #if HAVE_STRUCT_LINUX_INET_DIAG_REQ
495   int fd;
496   struct sockaddr_nl nladdr;
497   struct nlreq req;
498   struct msghdr msg;
499   struct iovec iov;
500   struct inet_diag_msg *r;
501   char buf[8192];
502
503   /* If this fails, it's likely a permission problem. We'll fall back to
504    * reading this information from files below. */
505   fd = socket(AF_NETLINK, SOCK_RAW, NETLINK_INET_DIAG);
506   if (fd < 0)
507   {
508     ERROR ("tcpconns plugin: conn_read_netlink: socket(AF_NETLINK, SOCK_RAW, "
509         "NETLINK_INET_DIAG) failed: %s",
510         sstrerror (errno, buf, sizeof (buf)));
511     return (-1);
512   }
513
514   memset(&nladdr, 0, sizeof(nladdr));
515   nladdr.nl_family = AF_NETLINK;
516
517   memset(&req, 0, sizeof(req));
518   req.nlh.nlmsg_len = sizeof(req);
519   req.nlh.nlmsg_type = TCPDIAG_GETSOCK;
520   /* NLM_F_ROOT: return the complete table instead of a single entry.
521    * NLM_F_MATCH: return all entries matching criteria (not implemented)
522    * NLM_F_REQUEST: must be set on all request messages */
523   req.nlh.nlmsg_flags = NLM_F_ROOT | NLM_F_MATCH | NLM_F_REQUEST;
524   req.nlh.nlmsg_pid = 0;
525   /* The sequence_number is used to track our messages. Since netlink is not
526    * reliable, we don't want to end up with a corrupt or incomplete old
527    * message in case the system is/was out of memory. */
528   req.nlh.nlmsg_seq = ++sequence_number;
529   req.r.idiag_family = AF_INET;
530   req.r.idiag_states = 0xfff;
531   req.r.idiag_ext = 0;
532
533   memset(&iov, 0, sizeof(iov));
534   iov.iov_base = &req;
535   iov.iov_len = sizeof(req);
536
537   memset(&msg, 0, sizeof(msg));
538   msg.msg_name = (void*)&nladdr;
539   msg.msg_namelen = sizeof(nladdr);
540   msg.msg_iov = &iov;
541   msg.msg_iovlen = 1;
542
543   if (sendmsg (fd, &msg, 0) < 0)
544   {
545     ERROR ("tcpconns plugin: conn_read_netlink: sendmsg(2) failed: %s",
546         sstrerror (errno, buf, sizeof (buf)));
547     close (fd);
548     return (-1);
549   }
550
551   iov.iov_base = buf;
552   iov.iov_len = sizeof(buf);
553
554   while (1)
555   {
556     int status;
557     struct nlmsghdr *h;
558
559     memset(&msg, 0, sizeof(msg));
560     msg.msg_name = (void*)&nladdr;
561     msg.msg_namelen = sizeof(nladdr);
562     msg.msg_iov = &iov;
563     msg.msg_iovlen = 1;
564
565     status = recvmsg(fd, (void *) &msg, /* flags = */ 0);
566     if (status < 0)
567     {
568       if ((errno == EINTR) || (errno == EAGAIN))
569         continue;
570
571       ERROR ("tcpconns plugin: conn_read_netlink: recvmsg(2) failed: %s",
572           sstrerror (errno, buf, sizeof (buf)));
573       close (fd);
574       return (-1);
575     }
576     else if (status == 0)
577     {
578       close (fd);
579       DEBUG ("tcpconns plugin: conn_read_netlink: Unexpected zero-sized "
580           "reply from netlink socket.");
581       return (0);
582     }
583
584     h = (struct nlmsghdr*)buf;
585     while (NLMSG_OK(h, status))
586     {
587       if (h->nlmsg_seq != sequence_number)
588       {
589         h = NLMSG_NEXT(h, status);
590         continue;
591       }
592
593       if (h->nlmsg_type == NLMSG_DONE)
594       {
595         close (fd);
596         return (0);
597       }
598       else if (h->nlmsg_type == NLMSG_ERROR)
599       {
600         struct nlmsgerr *msg_error;
601
602         msg_error = NLMSG_DATA(h);
603         WARNING ("tcpconns plugin: conn_read_netlink: Received error %i.",
604             msg_error->error);
605
606         close (fd);
607         return (1);
608       }
609
610       r = NLMSG_DATA(h);
611
612       /* This code does not (need to) distinguish between IPv4 and IPv6. */
613       conn_handle_ports (ntohs(r->id.idiag_sport),
614           ntohs(r->id.idiag_dport),
615           r->idiag_state);
616
617       h = NLMSG_NEXT(h, status);
618     } /* while (NLMSG_OK) */
619   } /* while (1) */
620
621   /* Not reached because the while() loop above handles the exit condition. */
622   return (0);
623 #else
624   return (1);
625 #endif /* HAVE_STRUCT_LINUX_INET_DIAG_REQ */
626 } /* int conn_read_netlink */
627
628 static int conn_handle_line (char *buffer)
629 {
630   char *fields[32];
631   int   fields_len;
632
633   char *endptr;
634
635   char *port_local_str;
636   char *port_remote_str;
637   uint16_t port_local;
638   uint16_t port_remote;
639
640   uint8_t state;
641
642   int buffer_len = strlen (buffer);
643
644   while ((buffer_len > 0) && (buffer[buffer_len - 1] < 32))
645     buffer[--buffer_len] = '\0';
646   if (buffer_len <= 0)
647     return (-1);
648
649   fields_len = strsplit (buffer, fields, STATIC_ARRAY_SIZE (fields));
650   if (fields_len < 12)
651   {
652     DEBUG ("tcpconns plugin: Got %i fields, expected at least 12.", fields_len);
653     return (-1);
654   }
655
656   port_local_str  = strchr (fields[1], ':');
657   port_remote_str = strchr (fields[2], ':');
658
659   if ((port_local_str == NULL) || (port_remote_str == NULL))
660     return (-1);
661   port_local_str++;
662   port_remote_str++;
663   if ((*port_local_str == '\0') || (*port_remote_str == '\0'))
664     return (-1);
665
666   endptr = NULL;
667   port_local = (uint16_t) strtol (port_local_str, &endptr, 16);
668   if ((endptr == NULL) || (*endptr != '\0'))
669     return (-1);
670
671   endptr = NULL;
672   port_remote = (uint16_t) strtol (port_remote_str, &endptr, 16);
673   if ((endptr == NULL) || (*endptr != '\0'))
674     return (-1);
675
676   endptr = NULL;
677   state = (uint8_t) strtol (fields[3], &endptr, 16);
678   if ((endptr == NULL) || (*endptr != '\0'))
679     return (-1);
680
681   return (conn_handle_ports (port_local, port_remote, state));
682 } /* int conn_handle_line */
683
684 static int conn_read_file (const char *file)
685 {
686   FILE *fh;
687   char buffer[1024];
688
689   fh = fopen (file, "r");
690   if (fh == NULL)
691     return (-1);
692
693   while (fgets (buffer, sizeof (buffer), fh) != NULL)
694   {
695     conn_handle_line (buffer);
696   } /* while (fgets) */
697
698   fclose (fh);
699
700   return (0);
701 } /* int conn_read_file */
702 /* #endif KERNEL_LINUX */
703
704 #elif HAVE_SYSCTLBYNAME
705 /* #endif HAVE_SYSCTLBYNAME */
706
707 #elif HAVE_LIBKVM_NLIST
708 #endif /* HAVE_LIBKVM_NLIST */
709
710 static int conn_config (const char *key, const char *value)
711 {
712   if (strcasecmp (key, "ListeningPorts") == 0)
713   {
714     if (IS_TRUE (value))
715       port_collect_listening = 1;
716     else
717       port_collect_listening = 0;
718   }
719   else if ((strcasecmp (key, "LocalPort") == 0)
720       || (strcasecmp (key, "RemotePort") == 0))
721   {
722       port_entry_t *pe;
723       int port = atoi (value);
724
725       if ((port < 1) || (port > 65535))
726       {
727         ERROR ("tcpconns plugin: Invalid port: %i", port);
728         return (1);
729       }
730
731       pe = conn_get_port_entry ((uint16_t) port, 1 /* create */);
732       if (pe == NULL)
733       {
734         ERROR ("tcpconns plugin: conn_get_port_entry failed.");
735         return (1);
736       }
737
738       if (strcasecmp (key, "LocalPort") == 0)
739         pe->flags |= PORT_COLLECT_LOCAL;
740       else
741         pe->flags |= PORT_COLLECT_REMOTE;
742   }
743   else if (strcasecmp (key, "AllPortsSummary") == 0)
744   {
745     if (IS_TRUE (value))
746       port_collect_total = 1;
747     else
748       port_collect_total = 0;
749   }
750   else
751   {
752     return (-1);
753   }
754
755   return (0);
756 } /* int conn_config */
757
758 #if KERNEL_LINUX
759 static int conn_init (void)
760 {
761   if (port_collect_total == 0 && port_list_head == NULL)
762     port_collect_listening = 1;
763
764   return (0);
765 } /* int conn_init */
766
767 static int conn_read (void)
768 {
769   int status;
770
771   conn_reset_port_entry ();
772
773   if (linux_source == SRC_NETLINK)
774   {
775     status = conn_read_netlink ();
776   }
777   else if (linux_source == SRC_PROC)
778   {
779     int errors_num = 0;
780
781     if (conn_read_file ("/proc/net/tcp") != 0)
782       errors_num++;
783     if (conn_read_file ("/proc/net/tcp6") != 0)
784       errors_num++;
785
786     if (errors_num < 2)
787       status = 0;
788     else
789       status = ENOENT;
790   }
791   else /* if (linux_source == SRC_DUNNO) */
792   {
793     /* Try to use netlink for getting this data, it is _much_ faster on systems
794      * with a large amount of connections. */
795     status = conn_read_netlink ();
796     if (status == 0)
797     {
798       INFO ("tcpconns plugin: Reading from netlink succeeded. "
799           "Will use the netlink method from now on.");
800       linux_source = SRC_NETLINK;
801     }
802     else
803     {
804       INFO ("tcpconns plugin: Reading from netlink failed. "
805           "Will read from /proc from now on.");
806       linux_source = SRC_PROC;
807
808       /* return success here to avoid the "plugin failed" message. */
809       return (0);
810     }
811   }
812
813   if (status == 0)
814     conn_submit_all ();
815   else
816     return (status);
817
818   return (0);
819 } /* int conn_read */
820 /* #endif KERNEL_LINUX */
821
822 #elif HAVE_SYSCTLBYNAME
823 static int conn_read (void)
824 {
825   int status;
826   char *buffer;
827   size_t buffer_len;;
828
829   struct xinpgen *in_orig;
830   struct xinpgen *in_ptr;
831
832   conn_reset_port_entry ();
833
834   buffer_len = 0;
835   status = sysctlbyname ("net.inet.tcp.pcblist", NULL, &buffer_len, 0, 0);
836   if (status < 0)
837   {
838     ERROR ("tcpconns plugin: sysctlbyname failed.");
839     return (-1);
840   }
841
842   buffer = (char *) malloc (buffer_len);
843   if (buffer == NULL)
844   {
845     ERROR ("tcpconns plugin: malloc failed.");
846     return (-1);
847   }
848
849   status = sysctlbyname ("net.inet.tcp.pcblist", buffer, &buffer_len, 0, 0);
850   if (status < 0)
851   {
852     ERROR ("tcpconns plugin: sysctlbyname failed.");
853     sfree (buffer);
854     return (-1);
855   }
856
857   if (buffer_len <= sizeof (struct xinpgen))
858   {
859     ERROR ("tcpconns plugin: (buffer_len <= sizeof (struct xinpgen))");
860     sfree (buffer);
861     return (-1);
862   }
863
864   in_orig = (struct xinpgen *) buffer;
865   for (in_ptr = (struct xinpgen *) (((char *) in_orig) + in_orig->xig_len);
866       in_ptr->xig_len > sizeof (struct xinpgen);
867       in_ptr = (struct xinpgen *) (((char *) in_ptr) + in_ptr->xig_len))
868   {
869     struct tcpcb *tp = &((struct xtcpcb *) in_ptr)->xt_tp;
870     struct inpcb *inp = &((struct xtcpcb *) in_ptr)->xt_inp;
871     struct xsocket *so = &((struct xtcpcb *) in_ptr)->xt_socket;
872
873     /* Ignore non-TCP sockets */
874     if (so->xso_protocol != IPPROTO_TCP)
875       continue;
876
877     /* Ignore PCBs which were freed during copyout. */
878     if (inp->inp_gencnt > in_orig->xig_gen)
879       continue;
880
881     if (((inp->inp_vflag & INP_IPV4) == 0)
882         && ((inp->inp_vflag & INP_IPV6) == 0))
883       continue;
884
885     conn_handle_ports (ntohs (inp->inp_lport), ntohs (inp->inp_fport),
886         tp->t_state);
887   } /* for (in_ptr) */
888
889   in_orig = NULL;
890   in_ptr = NULL;
891   sfree (buffer);
892
893   conn_submit_all ();
894
895   return (0);
896 } /* int conn_read */
897 /* #endif HAVE_SYSCTLBYNAME */
898
899 #elif HAVE_LIBKVM_NLIST
900 static int kread (u_long addr, void *buf, int size)
901 {
902   int status;
903
904   status = kvm_read (kvmd, addr, buf, size);
905   if (status != size)
906   {
907     ERROR ("tcpconns plugin: kvm_read failed (got %i, expected %i): %s\n",
908         status, size, kvm_geterr (kvmd));
909     return (-1);
910   }
911   return (0);
912 } /* int kread */
913
914 static int conn_init (void)
915 {
916   char buf[_POSIX2_LINE_MAX];
917   struct nlist nl[] =
918   {
919 #define N_TCBTABLE 0
920     { "_tcbtable" },
921     { "" }
922   };
923   int status;
924
925   kvmd = kvm_openfiles (NULL, NULL, NULL, O_RDONLY, buf);
926   if (kvmd == NULL)
927   {
928     ERROR ("tcpconns plugin: kvm_openfiles failed: %s", buf);
929     return (-1);
930   }
931
932   status = kvm_nlist (kvmd, nl);
933   if (status < 0)
934   {
935     ERROR ("tcpconns plugin: kvm_nlist failed with status %i.", status);
936     return (-1);
937   }
938
939   if (nl[N_TCBTABLE].n_type == 0)
940   {
941     ERROR ("tcpconns plugin: Error looking up kernel's namelist: "
942         "N_TCBTABLE is invalid.");
943     return (-1);
944   }
945
946   inpcbtable_off = (u_long) nl[N_TCBTABLE].n_value;
947   inpcbtable_ptr = (struct inpcbtable *) nl[N_TCBTABLE].n_value;
948
949   return (0);
950 } /* int conn_init */
951
952 static int conn_read (void)
953 {
954   struct inpcbtable table;
955 #if !defined(__OpenBSD__) && (defined(__NetBSD_Version__) && __NetBSD_Version__ <= 699002700)
956   struct inpcb *head;
957 #endif
958   struct inpcb *next;
959   struct inpcb inpcb;
960   struct tcpcb tcpcb;
961   int status;
962
963   conn_reset_port_entry ();
964
965   /* Read the pcbtable from the kernel */
966   status = kread (inpcbtable_off, &table, sizeof (table));
967   if (status != 0)
968     return (-1);
969
970 #if defined(__OpenBSD__) || (defined(__NetBSD_Version__) && __NetBSD_Version__ > 699002700)
971   /* inpt_queue is a TAILQ on OpenBSD */
972   /* Get the first pcb */
973   next = (struct inpcb *)TAILQ_FIRST (&table.inpt_queue);
974   while (next)
975 #else
976   /* Get the `head' pcb */
977   head = (struct inpcb *) &(inpcbtable_ptr->inpt_queue);
978   /* Get the first pcb */
979   next = (struct inpcb *)CIRCLEQ_FIRST (&table.inpt_queue);
980
981   while (next != head)
982 #endif
983   {
984     /* Read the pcb pointed to by `next' into `inpcb' */
985     status = kread ((u_long) next, &inpcb, sizeof (inpcb));
986     if (status != 0)
987       return (-1);
988
989     /* Advance `next' */
990 #if defined(__OpenBSD__) || (defined(__NetBSD_Version__) && __NetBSD_Version__ > 699002700)
991     /* inpt_queue is a TAILQ on OpenBSD */
992     next = (struct inpcb *)TAILQ_NEXT (&inpcb, inp_queue);
993 #else
994     next = (struct inpcb *)CIRCLEQ_NEXT (&inpcb, inp_queue);
995 #endif
996
997     /* Ignore sockets, that are not connected. */
998 #ifdef __NetBSD__
999     if (inpcb.inp_af == AF_INET6)
1000       continue; /* XXX see netbsd/src/usr.bin/netstat/inet6.c */
1001 #else
1002     if (!(inpcb.inp_flags & INP_IPV6)
1003         && (inet_lnaof(inpcb.inp_laddr) == INADDR_ANY))
1004       continue;
1005     if ((inpcb.inp_flags & INP_IPV6)
1006         && IN6_IS_ADDR_UNSPECIFIED (&inpcb.inp_laddr6))
1007       continue;
1008 #endif
1009
1010     status = kread ((u_long) inpcb.inp_ppcb, &tcpcb, sizeof (tcpcb));
1011     if (status != 0)
1012       return (-1);
1013     conn_handle_ports (ntohs(inpcb.inp_lport), ntohs(inpcb.inp_fport), tcpcb.t_state);
1014   } /* while (next != head) */
1015
1016   conn_submit_all ();
1017
1018   return (0);
1019 }
1020 /* #endif HAVE_LIBKVM_NLIST */
1021
1022 #elif KERNEL_AIX
1023
1024 static int conn_read (void)
1025 {
1026   int size;
1027   int i;
1028   int nconn;
1029   void *data;
1030   struct netinfo_header *header;
1031   struct netinfo_conn *conn;
1032
1033   conn_reset_port_entry ();
1034
1035   size = netinfo(NETINFO_TCP, 0, 0, 0);
1036   if (size < 0)
1037   {
1038     ERROR ("tcpconns plugin: netinfo failed return: %i", size);
1039     return (-1);
1040   }
1041
1042   if (size == 0)
1043     return (0);
1044
1045   if ((size - sizeof (struct netinfo_header)) % sizeof (struct netinfo_conn))
1046   {
1047     ERROR ("tcpconns plugin: invalid buffer size");
1048     return (-1);
1049   }
1050
1051   data = malloc(size);
1052   if (data == NULL)
1053   {
1054     ERROR ("tcpconns plugin: malloc failed");
1055     return (-1);
1056   }
1057
1058   if (netinfo(NETINFO_TCP, data, &size, 0) < 0)
1059   {
1060     ERROR ("tcpconns plugin: netinfo failed");
1061     free(data);
1062     return (-1);
1063   }
1064
1065   header = (struct netinfo_header *)data;
1066   nconn = header->size;
1067   conn = (struct netinfo_conn *)(data + sizeof(struct netinfo_header));
1068
1069   for (i=0; i < nconn; conn++, i++)
1070   {
1071     conn_handle_ports (conn->srcport, conn->dstport, conn->tcp_state);
1072   }
1073
1074   free(data);
1075
1076   conn_submit_all ();
1077
1078   return (0);
1079 }
1080 #endif /* KERNEL_AIX */
1081
1082 void module_register (void)
1083 {
1084         plugin_register_config ("tcpconns", conn_config,
1085                         config_keys, config_keys_num);
1086 #if KERNEL_LINUX
1087         plugin_register_init ("tcpconns", conn_init);
1088 #elif HAVE_SYSCTLBYNAME
1089         /* no initialization */
1090 #elif HAVE_LIBKVM_NLIST
1091         plugin_register_init ("tcpconns", conn_init);
1092 #elif KERNEL_AIX
1093         /* no initialization */
1094 #endif
1095         plugin_register_read ("tcpconns", conn_read);
1096 } /* void module_register */
1097
1098 /*
1099  * vim: set shiftwidth=2 softtabstop=2 tabstop=8 fdm=marker :
1100  */