Merge branch 'collectd-5.5' into collectd-5.6
[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
62 #include "common.h"
63 #include "plugin.h"
64
65 #if defined(__OpenBSD__) || defined(__NetBSD__)
66 #undef HAVE_SYSCTLBYNAME /* force HAVE_LIBKVM_NLIST path */
67 #endif
68
69 #if !KERNEL_LINUX && !HAVE_SYSCTLBYNAME && !HAVE_LIBKVM_NLIST && !KERNEL_AIX
70 #error "No applicable input method."
71 #endif
72
73 #if KERNEL_LINUX
74 #include <asm/types.h>
75 #include <linux/netlink.h>
76 #if HAVE_LINUX_INET_DIAG_H
77 #include <linux/inet_diag.h>
78 #endif
79 #include <arpa/inet.h>
80 /* #endif KERNEL_LINUX */
81
82 #elif HAVE_SYSCTLBYNAME
83 #include <sys/socketvar.h>
84 #include <sys/sysctl.h>
85
86 /* Some includes needed for compiling on FreeBSD */
87 #include <sys/time.h>
88 #if HAVE_SYS_TYPES_H
89 #include <sys/types.h>
90 #endif
91 #if HAVE_NET_IF_H
92 #include <net/if.h>
93 #endif
94
95 #include <net/route.h>
96 #include <netinet/in.h>
97 #include <netinet/in_pcb.h>
98 #include <netinet/in_systm.h>
99 #include <netinet/ip.h>
100 #include <netinet/ip6.h>
101 #include <netinet/ip_var.h>
102 #include <netinet/tcp.h>
103 #include <netinet/tcp_seq.h>
104 #include <netinet/tcp_var.h>
105 #include <netinet/tcpip.h>
106 /* #endif HAVE_SYSCTLBYNAME */
107
108 /* This is for OpenBSD and NetBSD. */
109 #elif HAVE_LIBKVM_NLIST
110 #include <arpa/inet.h>
111 #include <net/route.h>
112 #include <netdb.h>
113 #include <netinet/in.h>
114 #include <netinet/in_pcb.h>
115 #include <netinet/in_systm.h>
116 #include <netinet/ip.h>
117 #include <netinet/ip_var.h>
118 #include <netinet/tcp.h>
119 #include <netinet/tcp_timer.h>
120 #include <netinet/tcp_var.h>
121 #include <sys/queue.h>
122 #if !defined(HAVE_BSD_NLIST_H) || !HAVE_BSD_NLIST_H
123 #include <nlist.h>
124 #else /* HAVE_BSD_NLIST_H */
125 #include <bsd/nlist.h>
126 #endif
127 #include <kvm.h>
128 /* #endif HAVE_LIBKVM_NLIST */
129
130 #elif KERNEL_AIX
131 #include <arpa/inet.h>
132 #include <sys/socketvar.h>
133 #endif /* KERNEL_AIX */
134
135 #if KERNEL_LINUX
136 #if HAVE_STRUCT_LINUX_INET_DIAG_REQ
137 struct nlreq {
138   struct nlmsghdr nlh;
139   struct inet_diag_req r;
140 };
141 #endif
142
143 static const char *tcp_state[] = {"", /* 0 */
144                                   "ESTABLISHED",
145                                   "SYN_SENT",
146                                   "SYN_RECV",
147                                   "FIN_WAIT1",
148                                   "FIN_WAIT2",
149                                   "TIME_WAIT",
150                                   "CLOSED",
151                                   "CLOSE_WAIT",
152                                   "LAST_ACK",
153                                   "LISTEN", /* 10 */
154                                   "CLOSING"};
155
156 #define TCP_STATE_LISTEN 10
157 #define TCP_STATE_MIN 1
158 #define TCP_STATE_MAX 11
159 /* #endif KERNEL_LINUX */
160
161 #elif HAVE_SYSCTLBYNAME
162 static const char *tcp_state[] = {"CLOSED",    "LISTEN",      "SYN_SENT",
163                                   "SYN_RECV",  "ESTABLISHED", "CLOSE_WAIT",
164                                   "FIN_WAIT1", "CLOSING",     "LAST_ACK",
165                                   "FIN_WAIT2", "TIME_WAIT"};
166
167 #define TCP_STATE_LISTEN 1
168 #define TCP_STATE_MIN 0
169 #define TCP_STATE_MAX 10
170 /* #endif HAVE_SYSCTLBYNAME */
171
172 #elif HAVE_LIBKVM_NLIST
173 static const char *tcp_state[] = {"CLOSED",    "LISTEN",      "SYN_SENT",
174                                   "SYN_RECV",  "ESTABLISHED", "CLOSE_WAIT",
175                                   "FIN_WAIT1", "CLOSING",     "LAST_ACK",
176                                   "FIN_WAIT2", "TIME_WAIT"};
177
178 static kvm_t *kvmd;
179 static u_long inpcbtable_off = 0;
180 struct inpcbtable *inpcbtable_ptr = NULL;
181
182 #define TCP_STATE_LISTEN 1
183 #define TCP_STATE_MIN 1
184 #define TCP_STATE_MAX 10
185 /* #endif HAVE_LIBKVM_NLIST */
186
187 #elif KERNEL_AIX
188 static const char *tcp_state[] = {"CLOSED",    "LISTEN",      "SYN_SENT",
189                                   "SYN_RECV",  "ESTABLISHED", "CLOSE_WAIT",
190                                   "FIN_WAIT1", "CLOSING",     "LAST_ACK",
191                                   "FIN_WAIT2", "TIME_WAIT"};
192
193 #define TCP_STATE_LISTEN 1
194 #define TCP_STATE_MIN 0
195 #define TCP_STATE_MAX 10
196
197 struct netinfo_conn {
198   uint32_t unknow1[2];
199   uint16_t dstport;
200   uint16_t unknow2;
201   struct in6_addr dstaddr;
202   uint16_t srcport;
203   uint16_t unknow3;
204   struct in6_addr srcaddr;
205   uint32_t unknow4[36];
206   uint16_t tcp_state;
207   uint16_t unknow5[7];
208 };
209
210 struct netinfo_header {
211   unsigned int proto;
212   unsigned int size;
213 };
214
215 #define NETINFO_TCP 3
216 extern int netinfo(int proto, void *data, int *size, int n);
217 #endif /* KERNEL_AIX */
218
219 #define PORT_COLLECT_LOCAL 0x01
220 #define PORT_COLLECT_REMOTE 0x02
221 #define PORT_IS_LISTENING 0x04
222
223 typedef struct port_entry_s {
224   uint16_t port;
225   uint16_t flags;
226   uint32_t count_local[TCP_STATE_MAX + 1];
227   uint32_t count_remote[TCP_STATE_MAX + 1];
228   struct port_entry_s *next;
229 } port_entry_t;
230
231 static const char *config_keys[] = {"ListeningPorts", "LocalPort", "RemotePort",
232                                     "AllPortsSummary"};
233 static int config_keys_num = STATIC_ARRAY_SIZE(config_keys);
234
235 static int port_collect_listening = 0;
236 static int port_collect_total = 0;
237 static port_entry_t *port_list_head = NULL;
238 static uint32_t count_total[TCP_STATE_MAX + 1];
239
240 #if KERNEL_LINUX
241 #if HAVE_STRUCT_LINUX_INET_DIAG_REQ
242 /* This depends on linux inet_diag_req because if this structure is missing,
243  * sequence_number is useless and we get a compilation warning.
244  */
245 static uint32_t sequence_number = 0;
246 #endif
247
248 static enum { SRC_DUNNO, SRC_NETLINK, SRC_PROC } linux_source = SRC_DUNNO;
249 #endif
250
251 static void conn_prepare_vl(value_list_t *vl, value_t *values) {
252   vl->values = values;
253   vl->values_len = 1;
254   sstrncpy(vl->host, hostname_g, sizeof(vl->host));
255   sstrncpy(vl->plugin, "tcpconns", sizeof(vl->plugin));
256   sstrncpy(vl->type, "tcp_connections", sizeof(vl->type));
257 }
258
259 static void conn_submit_port_entry(port_entry_t *pe) {
260   value_t values[1];
261   value_list_t vl = VALUE_LIST_INIT;
262
263   conn_prepare_vl(&vl, values);
264
265   if (((port_collect_listening != 0) && (pe->flags & PORT_IS_LISTENING)) ||
266       (pe->flags & PORT_COLLECT_LOCAL)) {
267     ssnprintf(vl.plugin_instance, sizeof(vl.plugin_instance),
268               "%" PRIu16 "-local", pe->port);
269
270     for (int i = 1; i <= TCP_STATE_MAX; i++) {
271       vl.values[0].gauge = pe->count_local[i];
272
273       sstrncpy(vl.type_instance, tcp_state[i], sizeof(vl.type_instance));
274
275       plugin_dispatch_values(&vl);
276     }
277   }
278
279   if (pe->flags & PORT_COLLECT_REMOTE) {
280     ssnprintf(vl.plugin_instance, sizeof(vl.plugin_instance),
281               "%" PRIu16 "-remote", pe->port);
282
283     for (int i = 1; i <= TCP_STATE_MAX; i++) {
284       vl.values[0].gauge = pe->count_remote[i];
285
286       sstrncpy(vl.type_instance, tcp_state[i], sizeof(vl.type_instance));
287
288       plugin_dispatch_values(&vl);
289     }
290   }
291 } /* void conn_submit */
292
293 static void conn_submit_port_total(void) {
294   value_t values[1];
295   value_list_t vl = VALUE_LIST_INIT;
296
297   conn_prepare_vl(&vl, values);
298
299   sstrncpy(vl.plugin_instance, "all", sizeof(vl.plugin_instance));
300
301   for (int i = 1; i <= TCP_STATE_MAX; i++) {
302     vl.values[0].gauge = count_total[i];
303
304     sstrncpy(vl.type_instance, tcp_state[i], sizeof(vl.type_instance));
305
306     plugin_dispatch_values(&vl);
307   }
308 }
309
310 static void conn_submit_all(void) {
311   if (port_collect_total)
312     conn_submit_port_total();
313
314   for (port_entry_t *pe = port_list_head; pe != NULL; pe = pe->next)
315     conn_submit_port_entry(pe);
316 } /* void conn_submit_all */
317
318 static port_entry_t *conn_get_port_entry(uint16_t port, int create) {
319   port_entry_t *ret;
320
321   ret = port_list_head;
322   while (ret != NULL) {
323     if (ret->port == port)
324       break;
325     ret = ret->next;
326   }
327
328   if ((ret == NULL) && (create != 0)) {
329     ret = calloc(1, sizeof(*ret));
330     if (ret == NULL)
331       return (NULL);
332
333     ret->port = port;
334     ret->next = port_list_head;
335     port_list_head = ret;
336   }
337
338   return (ret);
339 } /* port_entry_t *conn_get_port_entry */
340
341 /* Removes ports that were added automatically due to the `ListeningPorts'
342  * setting but which are no longer listening. */
343 static void conn_reset_port_entry(void) {
344   port_entry_t *prev = NULL;
345   port_entry_t *pe = port_list_head;
346
347   memset(&count_total, '\0', sizeof(count_total));
348
349   while (pe != NULL) {
350     /* If this entry was created while reading the files (ant not when handling
351      * the configuration) remove it now. */
352     if ((pe->flags &
353          (PORT_COLLECT_LOCAL | PORT_COLLECT_REMOTE | PORT_IS_LISTENING)) == 0) {
354       port_entry_t *next = pe->next;
355
356       DEBUG("tcpconns plugin: Removing temporary entry "
357             "for listening port %" PRIu16,
358             pe->port);
359
360       if (prev == NULL)
361         port_list_head = next;
362       else
363         prev->next = next;
364
365       sfree(pe);
366       pe = next;
367
368       continue;
369     }
370
371     memset(pe->count_local, '\0', sizeof(pe->count_local));
372     memset(pe->count_remote, '\0', sizeof(pe->count_remote));
373     pe->flags &= ~PORT_IS_LISTENING;
374
375     prev = pe;
376     pe = pe->next;
377   }
378 } /* void conn_reset_port_entry */
379
380 static int conn_handle_ports(uint16_t port_local, uint16_t port_remote,
381                              uint8_t state) {
382   port_entry_t *pe = NULL;
383
384   if ((state > TCP_STATE_MAX)
385 #if TCP_STATE_MIN > 0
386       || (state < TCP_STATE_MIN)
387 #endif
388           ) {
389     NOTICE("tcpconns plugin: Ignoring connection with "
390            "unknown state 0x%02" PRIx8 ".",
391            state);
392     return (-1);
393   }
394
395   count_total[state]++;
396
397   /* Listening sockets */
398   if ((state == TCP_STATE_LISTEN) && (port_collect_listening != 0)) {
399     pe = conn_get_port_entry(port_local, 1 /* create */);
400     if (pe != NULL)
401       pe->flags |= PORT_IS_LISTENING;
402   }
403
404   DEBUG("tcpconns plugin: Connection %" PRIu16 " <-> %" PRIu16 " (%s)",
405         port_local, port_remote, tcp_state[state]);
406
407   pe = conn_get_port_entry(port_local, 0 /* no create */);
408   if (pe != NULL)
409     pe->count_local[state]++;
410
411   pe = conn_get_port_entry(port_remote, 0 /* no create */);
412   if (pe != NULL)
413     pe->count_remote[state]++;
414
415   return (0);
416 } /* int conn_handle_ports */
417
418 #if KERNEL_LINUX
419 /* Returns zero on success, less than zero on socket error and greater than
420  * zero on other errors. */
421 static int conn_read_netlink(void) {
422 #if HAVE_STRUCT_LINUX_INET_DIAG_REQ
423   int fd;
424   struct inet_diag_msg *r;
425   char buf[8192];
426
427   /* If this fails, it's likely a permission problem. We'll fall back to
428    * reading this information from files below. */
429   fd = socket(AF_NETLINK, SOCK_RAW, NETLINK_INET_DIAG);
430   if (fd < 0) {
431     ERROR("tcpconns plugin: conn_read_netlink: socket(AF_NETLINK, SOCK_RAW, "
432           "NETLINK_INET_DIAG) failed: %s",
433           sstrerror(errno, buf, sizeof(buf)));
434     return (-1);
435   }
436
437   struct sockaddr_nl nladdr = {.nl_family = AF_NETLINK};
438
439   struct nlreq req = {
440       .nlh.nlmsg_len = sizeof(req),
441       .nlh.nlmsg_type = TCPDIAG_GETSOCK,
442       /* NLM_F_ROOT: return the complete table instead of a single entry.
443        * NLM_F_MATCH: return all entries matching criteria (not implemented)
444        * NLM_F_REQUEST: must be set on all request messages */
445       .nlh.nlmsg_flags = NLM_F_ROOT | NLM_F_MATCH | NLM_F_REQUEST,
446       .nlh.nlmsg_pid = 0,
447       /* The sequence_number is used to track our messages. Since netlink is not
448        * reliable, we don't want to end up with a corrupt or incomplete old
449        * message in case the system is/was out of memory. */
450       .nlh.nlmsg_seq = ++sequence_number,
451       .r.idiag_family = AF_INET,
452       .r.idiag_states = 0xfff,
453       .r.idiag_ext = 0};
454
455   struct iovec iov = {.iov_base = &req, .iov_len = sizeof(req)};
456
457   struct msghdr msg = {.msg_name = (void *)&nladdr,
458                        .msg_namelen = sizeof(nladdr),
459                        .msg_iov = &iov,
460                        .msg_iovlen = 1};
461
462   if (sendmsg(fd, &msg, 0) < 0) {
463     ERROR("tcpconns plugin: conn_read_netlink: sendmsg(2) failed: %s",
464           sstrerror(errno, buf, sizeof(buf)));
465     close(fd);
466     return (-1);
467   }
468
469   iov.iov_base = buf;
470   iov.iov_len = sizeof(buf);
471
472   while (1) {
473     int status;
474     struct nlmsghdr *h;
475
476     memset(&msg, 0, sizeof(msg));
477     msg.msg_name = (void *)&nladdr;
478     msg.msg_namelen = sizeof(nladdr);
479     msg.msg_iov = &iov;
480     msg.msg_iovlen = 1;
481
482     status = recvmsg(fd, (void *)&msg, /* flags = */ 0);
483     if (status < 0) {
484       if ((errno == EINTR) || (errno == EAGAIN))
485         continue;
486
487       ERROR("tcpconns plugin: conn_read_netlink: recvmsg(2) failed: %s",
488             sstrerror(errno, buf, sizeof(buf)));
489       close(fd);
490       return (-1);
491     } else if (status == 0) {
492       close(fd);
493       DEBUG("tcpconns plugin: conn_read_netlink: Unexpected zero-sized "
494             "reply from netlink socket.");
495       return (0);
496     }
497
498     h = (struct nlmsghdr *)buf;
499     while (NLMSG_OK(h, status)) {
500       if (h->nlmsg_seq != sequence_number) {
501         h = NLMSG_NEXT(h, status);
502         continue;
503       }
504
505       if (h->nlmsg_type == NLMSG_DONE) {
506         close(fd);
507         return (0);
508       } else if (h->nlmsg_type == NLMSG_ERROR) {
509         struct nlmsgerr *msg_error;
510
511         msg_error = NLMSG_DATA(h);
512         WARNING("tcpconns plugin: conn_read_netlink: Received error %i.",
513                 msg_error->error);
514
515         close(fd);
516         return (1);
517       }
518
519       r = NLMSG_DATA(h);
520
521       /* This code does not (need to) distinguish between IPv4 and IPv6. */
522       conn_handle_ports(ntohs(r->id.idiag_sport), ntohs(r->id.idiag_dport),
523                         r->idiag_state);
524
525       h = NLMSG_NEXT(h, status);
526     } /* while (NLMSG_OK) */
527   }   /* while (1) */
528
529   /* Not reached because the while() loop above handles the exit condition. */
530   return (0);
531 #else
532   return (1);
533 #endif /* HAVE_STRUCT_LINUX_INET_DIAG_REQ */
534 } /* int conn_read_netlink */
535
536 static int conn_handle_line(char *buffer) {
537   char *fields[32];
538   int fields_len;
539
540   char *endptr;
541
542   char *port_local_str;
543   char *port_remote_str;
544   uint16_t port_local;
545   uint16_t port_remote;
546
547   uint8_t state;
548
549   int buffer_len = strlen(buffer);
550
551   while ((buffer_len > 0) && (buffer[buffer_len - 1] < 32))
552     buffer[--buffer_len] = '\0';
553   if (buffer_len <= 0)
554     return (-1);
555
556   fields_len = strsplit(buffer, fields, STATIC_ARRAY_SIZE(fields));
557   if (fields_len < 12) {
558     DEBUG("tcpconns plugin: Got %i fields, expected at least 12.", fields_len);
559     return (-1);
560   }
561
562   port_local_str = strchr(fields[1], ':');
563   port_remote_str = strchr(fields[2], ':');
564
565   if ((port_local_str == NULL) || (port_remote_str == NULL))
566     return (-1);
567   port_local_str++;
568   port_remote_str++;
569   if ((*port_local_str == '\0') || (*port_remote_str == '\0'))
570     return (-1);
571
572   endptr = NULL;
573   port_local = (uint16_t)strtol(port_local_str, &endptr, 16);
574   if ((endptr == NULL) || (*endptr != '\0'))
575     return (-1);
576
577   endptr = NULL;
578   port_remote = (uint16_t)strtol(port_remote_str, &endptr, 16);
579   if ((endptr == NULL) || (*endptr != '\0'))
580     return (-1);
581
582   endptr = NULL;
583   state = (uint8_t)strtol(fields[3], &endptr, 16);
584   if ((endptr == NULL) || (*endptr != '\0'))
585     return (-1);
586
587   return (conn_handle_ports(port_local, port_remote, state));
588 } /* int conn_handle_line */
589
590 static int conn_read_file(const char *file) {
591   FILE *fh;
592   char buffer[1024];
593
594   fh = fopen(file, "r");
595   if (fh == NULL)
596     return (-1);
597
598   while (fgets(buffer, sizeof(buffer), fh) != NULL) {
599     conn_handle_line(buffer);
600   } /* while (fgets) */
601
602   fclose(fh);
603
604   return (0);
605 } /* int conn_read_file */
606 /* #endif KERNEL_LINUX */
607
608 #elif HAVE_SYSCTLBYNAME
609 /* #endif HAVE_SYSCTLBYNAME */
610
611 #elif HAVE_LIBKVM_NLIST
612 #endif /* HAVE_LIBKVM_NLIST */
613
614 static int conn_config(const char *key, const char *value) {
615   if (strcasecmp(key, "ListeningPorts") == 0) {
616     if (IS_TRUE(value))
617       port_collect_listening = 1;
618     else
619       port_collect_listening = 0;
620   } else if ((strcasecmp(key, "LocalPort") == 0) ||
621              (strcasecmp(key, "RemotePort") == 0)) {
622     port_entry_t *pe;
623     int port = atoi(value);
624
625     if ((port < 1) || (port > 65535)) {
626       ERROR("tcpconns plugin: Invalid port: %i", port);
627       return (1);
628     }
629
630     pe = conn_get_port_entry((uint16_t)port, 1 /* create */);
631     if (pe == NULL) {
632       ERROR("tcpconns plugin: conn_get_port_entry failed.");
633       return (1);
634     }
635
636     if (strcasecmp(key, "LocalPort") == 0)
637       pe->flags |= PORT_COLLECT_LOCAL;
638     else
639       pe->flags |= PORT_COLLECT_REMOTE;
640   } else if (strcasecmp(key, "AllPortsSummary") == 0) {
641     if (IS_TRUE(value))
642       port_collect_total = 1;
643     else
644       port_collect_total = 0;
645   } else {
646     return (-1);
647   }
648
649   return (0);
650 } /* int conn_config */
651
652 #if KERNEL_LINUX
653 static int conn_init(void) {
654   if (port_collect_total == 0 && port_list_head == NULL)
655     port_collect_listening = 1;
656
657   return (0);
658 } /* int conn_init */
659
660 static int conn_read(void) {
661   int status;
662
663   conn_reset_port_entry();
664
665   if (linux_source == SRC_NETLINK) {
666     status = conn_read_netlink();
667   } else if (linux_source == SRC_PROC) {
668     int errors_num = 0;
669
670     if (conn_read_file("/proc/net/tcp") != 0)
671       errors_num++;
672     if (conn_read_file("/proc/net/tcp6") != 0)
673       errors_num++;
674
675     if (errors_num < 2)
676       status = 0;
677     else
678       status = ENOENT;
679   } else /* if (linux_source == SRC_DUNNO) */
680   {
681     /* Try to use netlink for getting this data, it is _much_ faster on systems
682      * with a large amount of connections. */
683     status = conn_read_netlink();
684     if (status == 0) {
685       INFO("tcpconns plugin: Reading from netlink succeeded. "
686            "Will use the netlink method from now on.");
687       linux_source = SRC_NETLINK;
688     } else {
689       INFO("tcpconns plugin: Reading from netlink failed. "
690            "Will read from /proc from now on.");
691       linux_source = SRC_PROC;
692
693       /* return success here to avoid the "plugin failed" message. */
694       return (0);
695     }
696   }
697
698   if (status == 0)
699     conn_submit_all();
700   else
701     return (status);
702
703   return (0);
704 } /* int conn_read */
705 /* #endif KERNEL_LINUX */
706
707 #elif HAVE_SYSCTLBYNAME
708 static int conn_read(void) {
709   int status;
710   char *buffer;
711   size_t buffer_len;
712   ;
713
714   struct xinpgen *in_orig;
715   struct xinpgen *in_ptr;
716
717   conn_reset_port_entry();
718
719   buffer_len = 0;
720   status = sysctlbyname("net.inet.tcp.pcblist", NULL, &buffer_len, 0, 0);
721   if (status < 0) {
722     ERROR("tcpconns plugin: sysctlbyname failed.");
723     return (-1);
724   }
725
726   buffer = malloc(buffer_len);
727   if (buffer == NULL) {
728     ERROR("tcpconns plugin: malloc failed.");
729     return (-1);
730   }
731
732   status = sysctlbyname("net.inet.tcp.pcblist", buffer, &buffer_len, 0, 0);
733   if (status < 0) {
734     ERROR("tcpconns plugin: sysctlbyname failed.");
735     sfree(buffer);
736     return (-1);
737   }
738
739   if (buffer_len <= sizeof(struct xinpgen)) {
740     ERROR("tcpconns plugin: (buffer_len <= sizeof (struct xinpgen))");
741     sfree(buffer);
742     return (-1);
743   }
744
745   in_orig = (struct xinpgen *)buffer;
746   for (in_ptr = (struct xinpgen *)(((char *)in_orig) + in_orig->xig_len);
747        in_ptr->xig_len > sizeof(struct xinpgen);
748        in_ptr = (struct xinpgen *)(((char *)in_ptr) + in_ptr->xig_len)) {
749     struct tcpcb *tp = &((struct xtcpcb *)in_ptr)->xt_tp;
750     struct inpcb *inp = &((struct xtcpcb *)in_ptr)->xt_inp;
751     struct xsocket *so = &((struct xtcpcb *)in_ptr)->xt_socket;
752
753     /* Ignore non-TCP sockets */
754     if (so->xso_protocol != IPPROTO_TCP)
755       continue;
756
757     /* Ignore PCBs which were freed during copyout. */
758     if (inp->inp_gencnt > in_orig->xig_gen)
759       continue;
760
761     if (((inp->inp_vflag & INP_IPV4) == 0) &&
762         ((inp->inp_vflag & INP_IPV6) == 0))
763       continue;
764
765     conn_handle_ports(ntohs(inp->inp_lport), ntohs(inp->inp_fport),
766                       tp->t_state);
767   } /* for (in_ptr) */
768
769   in_orig = NULL;
770   in_ptr = NULL;
771   sfree(buffer);
772
773   conn_submit_all();
774
775   return (0);
776 } /* int conn_read */
777   /* #endif HAVE_SYSCTLBYNAME */
778
779 #elif HAVE_LIBKVM_NLIST
780 static int kread(u_long addr, void *buf, int size) {
781   int status;
782
783   status = kvm_read(kvmd, addr, buf, size);
784   if (status != size) {
785     ERROR("tcpconns plugin: kvm_read failed (got %i, expected %i): %s\n",
786           status, size, kvm_geterr(kvmd));
787     return (-1);
788   }
789   return (0);
790 } /* int kread */
791
792 static int conn_init(void) {
793   char buf[_POSIX2_LINE_MAX];
794   struct nlist nl[] = {
795 #define N_TCBTABLE 0
796       {"_tcbtable"}, {""}};
797   int status;
798
799   kvmd = kvm_openfiles(NULL, NULL, NULL, O_RDONLY, buf);
800   if (kvmd == NULL) {
801     ERROR("tcpconns plugin: kvm_openfiles failed: %s", buf);
802     return (-1);
803   }
804
805   status = kvm_nlist(kvmd, nl);
806   if (status < 0) {
807     ERROR("tcpconns plugin: kvm_nlist failed with status %i.", status);
808     return (-1);
809   }
810
811   if (nl[N_TCBTABLE].n_type == 0) {
812     ERROR("tcpconns plugin: Error looking up kernel's namelist: "
813           "N_TCBTABLE is invalid.");
814     return (-1);
815   }
816
817   inpcbtable_off = (u_long)nl[N_TCBTABLE].n_value;
818   inpcbtable_ptr = (struct inpcbtable *)nl[N_TCBTABLE].n_value;
819
820   return (0);
821 } /* int conn_init */
822
823 static int conn_read(void) {
824   struct inpcbtable table;
825 #if !defined(__OpenBSD__) &&                                                   \
826     (defined(__NetBSD_Version__) && __NetBSD_Version__ <= 699002700)
827   struct inpcb *head;
828 #endif
829   struct inpcb *next;
830   struct inpcb inpcb;
831   struct tcpcb tcpcb;
832   int status;
833
834   conn_reset_port_entry();
835
836   /* Read the pcbtable from the kernel */
837   status = kread(inpcbtable_off, &table, sizeof(table));
838   if (status != 0)
839     return (-1);
840
841 #if defined(__OpenBSD__) ||                                                    \
842     (defined(__NetBSD_Version__) && __NetBSD_Version__ > 699002700)
843   /* inpt_queue is a TAILQ on OpenBSD */
844   /* Get the first pcb */
845   next = (struct inpcb *)TAILQ_FIRST(&table.inpt_queue);
846   while (next)
847 #else
848   /* Get the `head' pcb */
849   head = (struct inpcb *)&(inpcbtable_ptr->inpt_queue);
850   /* Get the first pcb */
851   next = (struct inpcb *)CIRCLEQ_FIRST(&table.inpt_queue);
852
853   while (next != head)
854 #endif
855   {
856     /* Read the pcb pointed to by `next' into `inpcb' */
857     status = kread((u_long)next, &inpcb, sizeof(inpcb));
858     if (status != 0)
859       return (-1);
860
861 /* Advance `next' */
862 #if defined(__OpenBSD__) ||                                                    \
863     (defined(__NetBSD_Version__) && __NetBSD_Version__ > 699002700)
864     /* inpt_queue is a TAILQ on OpenBSD */
865     next = (struct inpcb *)TAILQ_NEXT(&inpcb, inp_queue);
866 #else
867     next = (struct inpcb *)CIRCLEQ_NEXT(&inpcb, inp_queue);
868 #endif
869
870 /* Ignore sockets, that are not connected. */
871 #ifdef __NetBSD__
872     if (inpcb.inp_af == AF_INET6)
873       continue; /* XXX see netbsd/src/usr.bin/netstat/inet6.c */
874 #else
875     if (!(inpcb.inp_flags & INP_IPV6) &&
876         (inet_lnaof(inpcb.inp_laddr) == INADDR_ANY))
877       continue;
878     if ((inpcb.inp_flags & INP_IPV6) &&
879         IN6_IS_ADDR_UNSPECIFIED(&inpcb.inp_laddr6))
880       continue;
881 #endif
882
883     status = kread((u_long)inpcb.inp_ppcb, &tcpcb, sizeof(tcpcb));
884     if (status != 0)
885       return (-1);
886     conn_handle_ports(ntohs(inpcb.inp_lport), ntohs(inpcb.inp_fport),
887                       tcpcb.t_state);
888   } /* while (next != head) */
889
890   conn_submit_all();
891
892   return (0);
893 }
894 /* #endif HAVE_LIBKVM_NLIST */
895
896 #elif KERNEL_AIX
897
898 static int conn_read(void) {
899   int size;
900   int nconn;
901   void *data;
902   struct netinfo_header *header;
903   struct netinfo_conn *conn;
904
905   conn_reset_port_entry();
906
907   size = netinfo(NETINFO_TCP, 0, 0, 0);
908   if (size < 0) {
909     ERROR("tcpconns plugin: netinfo failed return: %i", size);
910     return (-1);
911   }
912
913   if (size == 0)
914     return (0);
915
916   if ((size - sizeof(struct netinfo_header)) % sizeof(struct netinfo_conn)) {
917     ERROR("tcpconns plugin: invalid buffer size");
918     return (-1);
919   }
920
921   data = malloc(size);
922   if (data == NULL) {
923     ERROR("tcpconns plugin: malloc failed");
924     return (-1);
925   }
926
927   if (netinfo(NETINFO_TCP, data, &size, 0) < 0) {
928     ERROR("tcpconns plugin: netinfo failed");
929     free(data);
930     return (-1);
931   }
932
933   header = (struct netinfo_header *)data;
934   nconn = header->size;
935   conn = (struct netinfo_conn *)(data + sizeof(struct netinfo_header));
936
937   for (int i = 0; i < nconn; conn++, i++) {
938     conn_handle_ports(conn->srcport, conn->dstport, conn->tcp_state);
939   }
940
941   free(data);
942
943   conn_submit_all();
944
945   return (0);
946 }
947 #endif /* KERNEL_AIX */
948
949 void module_register(void) {
950   plugin_register_config("tcpconns", conn_config, config_keys, config_keys_num);
951 #if KERNEL_LINUX
952   plugin_register_init("tcpconns", conn_init);
953 #elif HAVE_SYSCTLBYNAME
954   /* no initialization */
955 #elif HAVE_LIBKVM_NLIST
956   plugin_register_init("tcpconns", conn_init);
957 #elif KERNEL_AIX
958 /* no initialization */
959 #endif
960   plugin_register_read("tcpconns", conn_read);
961 } /* void module_register */
962
963 /*
964  * vim: set shiftwidth=2 softtabstop=2 tabstop=8 fdm=marker :
965  */