2 * collectd - src/snmp.c
3 * Copyright (C) 2007-2012 Florian octo Forster
5 * Permission is hereby granted, free of charge, to any person obtaining a
6 * copy of this software and associated documentation files (the "Software"),
7 * to deal in the Software without restriction, including without limitation
8 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
9 * and/or sell copies of the Software, and to permit persons to whom the
10 * Software is furnished to do so, subject to the following conditions:
12 * The above copyright notice and this permission notice shall be included in
13 * all copies or substantial portions of the Software.
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
18 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
20 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
21 * DEALINGS IN THE SOFTWARE.
24 * Florian octo Forster <octo at collectd.org>
30 #include "utils_complain.h"
34 #include <net-snmp/net-snmp-config.h>
35 #include <net-snmp/net-snmp-includes.h>
40 * Private data structes
47 typedef struct oid_s oid_t;
51 char string[DATA_MAX_NAME_LEN];
54 typedef union instance_u instance_t;
56 struct data_definition_s
58 char *name; /* used to reference this from the `Collect' option */
59 char *type; /* used to find the data_set */
62 char *instance_prefix;
67 struct data_definition_s *next;
72 typedef struct data_definition_s data_definition_t;
74 struct host_definition_s
80 /* snmpv1/2 options */
83 /* snmpv3 security options */
86 size_t auth_protocol_len;
87 char *auth_passphrase;
89 size_t priv_protocol_len;
90 char *priv_passphrase;
95 c_complain_t complaint;
97 data_definition_t **data_list;
100 typedef struct host_definition_s host_definition_t;
102 /* These two types are used to cache values in `csnmp_read_table' to handle
104 struct csnmp_list_instances_s
107 char instance[DATA_MAX_NAME_LEN];
108 struct csnmp_list_instances_s *next;
110 typedef struct csnmp_list_instances_s csnmp_list_instances_t;
112 struct csnmp_table_values_s
116 struct csnmp_table_values_s *next;
118 typedef struct csnmp_table_values_s csnmp_table_values_t;
123 static data_definition_t *data_head = NULL;
128 static int csnmp_read_host (user_data_t *ud);
133 static void csnmp_oid_init (oid_t *dst, oid const *src, size_t n)
135 assert (n <= STATIC_ARRAY_SIZE (dst->oid));
136 memcpy (dst->oid, src, sizeof (*src) * n);
140 static int csnmp_oid_compare (oid_t const *left, oid_t const *right)
142 return (snmp_oid_compare (left->oid, left->oid_len,
143 right->oid, right->oid_len));
146 static int csnmp_oid_suffix (oid_t *dst, oid_t const *src,
149 /* Make sure "src" is in "root"s subtree. */
150 if (src->oid_len <= root->oid_len)
152 if (snmp_oid_ncompare (root->oid, root->oid_len,
153 src->oid, src->oid_len,
154 /* n = */ root->oid_len) != 0)
157 memset (dst, 0, sizeof (*dst));
158 dst->oid_len = src->oid_len - root->oid_len;
159 memcpy (dst->oid, &src->oid[root->oid_len],
160 dst->oid_len * sizeof (dst->oid[0]));
164 static int csnmp_oid_to_string (char *buffer, size_t buffer_size,
167 char oid_str[MAX_OID_LEN][16];
168 char *oid_str_ptr[MAX_OID_LEN];
171 for (i = 0; i < o->oid_len; i++)
173 ssnprintf (oid_str[i], sizeof (oid_str[i]), "%lu", (unsigned long) o->oid[i]);
174 oid_str_ptr[i] = oid_str[i];
177 return (strjoin (buffer, buffer_size,
178 oid_str_ptr, o->oid_len, /* separator = */ "."));
181 static void csnmp_host_close_session (host_definition_t *host) /* {{{ */
183 if (host->sess_handle == NULL)
186 snmp_sess_close (host->sess_handle);
187 host->sess_handle = NULL;
188 } /* }}} void csnmp_host_close_session */
190 static void csnmp_host_definition_destroy (void *arg) /* {{{ */
192 host_definition_t *hd;
199 if (hd->name != NULL)
201 DEBUG ("snmp plugin: Destroying host definition for host `%s'.",
205 csnmp_host_close_session (hd);
209 sfree (hd->community);
210 sfree (hd->username);
211 sfree (hd->auth_passphrase);
212 sfree (hd->priv_passphrase);
214 sfree (hd->data_list);
217 } /* }}} void csnmp_host_definition_destroy */
219 /* Many functions to handle the configuration. {{{ */
220 /* First there are many functions which do configuration stuff. It's a big
221 * bloated and messy, I'm afraid. */
224 * Callgraph for the config stuff:
226 * +-> call_snmp_init_once
227 * +-> csnmp_config_add_data
228 * ! +-> csnmp_config_add_data_instance
229 * ! +-> csnmp_config_add_data_instance_prefix
230 * ! +-> csnmp_config_add_data_values
231 * +-> csnmp_config_add_host
232 * +-> csnmp_config_add_host_version
233 * +-> csnmp_config_add_host_collect
234 * +-> csnmp_config_add_host_auth_protocol
235 * +-> csnmp_config_add_host_priv_protocol
236 * +-> csnmp_config_add_host_security_level
238 static void call_snmp_init_once (void)
240 static int have_init = 0;
243 init_snmp (PACKAGE_NAME);
245 } /* void call_snmp_init_once */
247 static int csnmp_config_add_data_instance (data_definition_t *dd, oconfig_item_t *ci)
249 char buffer[DATA_MAX_NAME_LEN];
252 status = cf_util_get_string_buffer(ci, buffer, sizeof(buffer));
258 /* Instance is an OID */
259 dd->instance.oid.oid_len = MAX_OID_LEN;
261 if (!read_objid (buffer,
262 dd->instance.oid.oid, &dd->instance.oid.oid_len))
264 ERROR ("snmp plugin: read_objid (%s) failed.", buffer);
270 /* Instance is a simple string */
271 sstrncpy (dd->instance.string, buffer,
272 sizeof (dd->instance.string));
276 } /* int csnmp_config_add_data_instance */
278 static int csnmp_config_add_data_instance_prefix (data_definition_t *dd,
285 WARNING ("snmp plugin: data %s: InstancePrefix is ignored when `Table' "
286 "is set to `false'.", dd->name);
290 status = cf_util_get_string(ci, &dd->instance_prefix);
292 } /* int csnmp_config_add_data_instance_prefix */
294 static int csnmp_config_add_data_values (data_definition_t *dd, oconfig_item_t *ci)
298 if (ci->values_num < 1)
300 WARNING ("snmp plugin: `Values' needs at least one argument.");
304 for (i = 0; i < ci->values_num; i++)
305 if (ci->values[i].type != OCONFIG_TYPE_STRING)
307 WARNING ("snmp plugin: `Values' needs only string argument.");
313 dd->values = malloc (sizeof (*dd->values) * ci->values_num);
314 if (dd->values == NULL)
316 dd->values_len = (size_t) ci->values_num;
318 for (i = 0; i < ci->values_num; i++)
320 dd->values[i].oid_len = MAX_OID_LEN;
322 if (NULL == snmp_parse_oid (ci->values[i].value.string,
323 dd->values[i].oid, &dd->values[i].oid_len))
325 ERROR ("snmp plugin: snmp_parse_oid (%s) failed.",
326 ci->values[i].value.string);
335 } /* int csnmp_config_add_data_instance */
337 static int csnmp_config_add_data_blacklist(data_definition_t *dd, oconfig_item_t *ci)
341 if (ci->values_num < 1)
344 for (i = 0; i < ci->values_num; i++)
346 if (ci->values[i].type != OCONFIG_TYPE_STRING)
348 WARNING ("snmp plugin: `Ignore' needs only string argument.");
356 for (i = 0; i < ci->values_num; ++i)
358 if (strarray_add(&(dd->ignores), &(dd->ignores_len), ci->values[i].value.string) != 0)
360 ERROR("snmp plugin: Can't allocate memory");
361 strarray_free(dd->ignores, dd->ignores_len);
366 } /* int csnmp_config_add_data_blacklist */
368 static int csnmp_config_add_data_blacklist_match_inverted(data_definition_t *dd, oconfig_item_t *ci)
370 if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_BOOLEAN))
372 WARNING ("snmp plugin: `InvertMatch' needs exactly one boolean argument.");
376 dd->invert_match = ci->values[0].value.boolean ? 1 : 0;
379 } /* int csnmp_config_add_data_blacklist_match_inverted */
381 static int csnmp_config_add_data (oconfig_item_t *ci)
383 data_definition_t *dd;
387 dd = calloc (1, sizeof (*dd));
391 status = cf_util_get_string(ci, &dd->name);
401 for (i = 0; i < ci->children_num; i++)
403 oconfig_item_t *option = ci->children + i;
405 if (strcasecmp ("Type", option->key) == 0)
406 status = cf_util_get_string(option, &dd->type);
407 else if (strcasecmp ("Table", option->key) == 0)
408 status = cf_util_get_boolean(option, &dd->is_table);
409 else if (strcasecmp ("Instance", option->key) == 0)
410 status = csnmp_config_add_data_instance (dd, option);
411 else if (strcasecmp ("InstancePrefix", option->key) == 0)
412 status = csnmp_config_add_data_instance_prefix (dd, option);
413 else if (strcasecmp ("Values", option->key) == 0)
414 status = csnmp_config_add_data_values (dd, option);
415 else if (strcasecmp ("Shift", option->key) == 0)
416 status = cf_util_get_double(option, &dd->shift);
417 else if (strcasecmp ("Scale", option->key) == 0)
418 status = cf_util_get_double(option, &dd->scale);
419 else if (strcasecmp ("Ignore", option->key) == 0)
420 status = csnmp_config_add_data_blacklist(dd, option);
421 else if (strcasecmp ("InvertMatch", option->key) == 0)
422 status = csnmp_config_add_data_blacklist_match_inverted(dd, option);
425 WARNING ("snmp plugin: Option `%s' not allowed here.", option->key);
431 } /* for (ci->children) */
435 if (dd->type == NULL)
437 WARNING ("snmp plugin: `Type' not given for data `%s'", dd->name);
441 if (dd->values == NULL)
443 WARNING ("snmp plugin: No `Value' given for data `%s'", dd->name);
449 } /* while (status == 0) */
454 sfree (dd->instance_prefix);
461 DEBUG ("snmp plugin: dd = { name = %s, type = %s, is_table = %s, values_len = %zu }",
462 dd->name, dd->type, (dd->is_table != 0) ? "true" : "false", dd->values_len);
464 if (data_head == NULL)
468 data_definition_t *last;
470 while (last->next != NULL)
476 } /* int csnmp_config_add_data */
478 static int csnmp_config_add_host_version (host_definition_t *hd, oconfig_item_t *ci)
482 if ((ci->values_num != 1)
483 || (ci->values[0].type != OCONFIG_TYPE_NUMBER))
485 WARNING ("snmp plugin: The `Version' config option needs exactly one number argument.");
489 version = (int) ci->values[0].value.number;
490 if ((version < 1) || (version > 3))
492 WARNING ("snmp plugin: `Version' must either be `1', `2', or `3'.");
496 hd->version = version;
499 } /* int csnmp_config_add_host_address */
501 static int csnmp_config_add_host_collect (host_definition_t *host,
504 data_definition_t *data;
505 data_definition_t **data_list;
509 if (ci->values_num < 1)
511 WARNING ("snmp plugin: `Collect' needs at least one argument.");
515 for (i = 0; i < ci->values_num; i++)
516 if (ci->values[i].type != OCONFIG_TYPE_STRING)
518 WARNING ("snmp plugin: All arguments to `Collect' must be strings.");
522 data_list_len = host->data_list_len + ci->values_num;
523 data_list = (data_definition_t **) realloc (host->data_list,
524 sizeof (data_definition_t *) * data_list_len);
525 if (data_list == NULL)
527 host->data_list = data_list;
529 for (i = 0; i < ci->values_num; i++)
531 for (data = data_head; data != NULL; data = data->next)
532 if (strcasecmp (ci->values[i].value.string, data->name) == 0)
537 WARNING ("snmp plugin: No such data configured: `%s'",
538 ci->values[i].value.string);
542 DEBUG ("snmp plugin: Collect: host = %s, data[%i] = %s;",
543 host->name, host->data_list_len, data->name);
545 host->data_list[host->data_list_len] = data;
546 host->data_list_len++;
547 } /* for (values_num) */
550 } /* int csnmp_config_add_host_collect */
552 static int csnmp_config_add_host_auth_protocol (host_definition_t *hd, oconfig_item_t *ci)
557 status = cf_util_get_string_buffer(ci, buffer, sizeof(buffer));
561 if (strcasecmp("MD5", buffer) == 0) {
562 hd->auth_protocol = usmHMACMD5AuthProtocol;
563 hd->auth_protocol_len = sizeof(usmHMACMD5AuthProtocol)/sizeof(oid);
565 else if (strcasecmp("SHA", buffer) == 0) {
566 hd->auth_protocol = usmHMACSHA1AuthProtocol;
567 hd->auth_protocol_len = sizeof(usmHMACSHA1AuthProtocol)/sizeof(oid);
571 WARNING ("snmp plugin: The `AuthProtocol' config option must be `MD5' or `SHA'.");
575 DEBUG ("snmp plugin: host = %s; host->auth_protocol = %s;",
576 hd->name, hd->auth_protocol == usmHMACMD5AuthProtocol ? "MD5" : "SHA");
579 } /* int csnmp_config_add_host_auth_protocol */
581 static int csnmp_config_add_host_priv_protocol (host_definition_t *hd, oconfig_item_t *ci)
586 status = cf_util_get_string_buffer(ci, buffer, sizeof(buffer));
590 if (strcasecmp("AES", buffer) == 0)
592 hd->priv_protocol = usmAESPrivProtocol;
593 hd->priv_protocol_len = sizeof(usmAESPrivProtocol)/sizeof(oid);
595 else if (strcasecmp("DES", buffer) == 0) {
596 hd->priv_protocol = usmDESPrivProtocol;
597 hd->priv_protocol_len = sizeof(usmDESPrivProtocol)/sizeof(oid);
601 WARNING ("snmp plugin: The `PrivProtocol' config option must be `AES' or `DES'.");
605 DEBUG ("snmp plugin: host = %s; host->priv_protocol = %s;",
606 hd->name, hd->priv_protocol == usmAESPrivProtocol ? "AES" : "DES");
609 } /* int csnmp_config_add_host_priv_protocol */
611 static int csnmp_config_add_host_security_level (host_definition_t *hd, oconfig_item_t *ci)
616 status = cf_util_get_string_buffer(ci, buffer, sizeof(buffer));
620 if (strcasecmp("noAuthNoPriv", buffer) == 0)
621 hd->security_level = SNMP_SEC_LEVEL_NOAUTH;
622 else if (strcasecmp("authNoPriv", buffer) == 0)
623 hd->security_level = SNMP_SEC_LEVEL_AUTHNOPRIV;
624 else if (strcasecmp("authPriv", buffer) == 0)
625 hd->security_level = SNMP_SEC_LEVEL_AUTHPRIV;
628 WARNING ("snmp plugin: The `SecurityLevel' config option must be `noAuthNoPriv', `authNoPriv', or `authPriv'.");
632 DEBUG ("snmp plugin: host = %s; host->security_level = %d;",
633 hd->name, hd->security_level);
636 } /* int csnmp_config_add_host_security_level */
638 static int csnmp_config_add_host (oconfig_item_t *ci)
640 host_definition_t *hd;
644 /* Registration stuff. */
645 char cb_name[DATA_MAX_NAME_LEN];
648 hd = calloc (1, sizeof (*hd));
652 C_COMPLAIN_INIT (&hd->complaint);
654 status = cf_util_get_string(ci, &hd->name);
661 hd->sess_handle = NULL;
664 for (i = 0; i < ci->children_num; i++)
666 oconfig_item_t *option = ci->children + i;
669 if (strcasecmp ("Address", option->key) == 0)
670 status = cf_util_get_string(option, &hd->address);
671 else if (strcasecmp ("Community", option->key) == 0)
672 status = cf_util_get_string(option, &hd->community);
673 else if (strcasecmp ("Version", option->key) == 0)
674 status = csnmp_config_add_host_version (hd, option);
675 else if (strcasecmp ("Collect", option->key) == 0)
676 csnmp_config_add_host_collect (hd, option);
677 else if (strcasecmp ("Interval", option->key) == 0)
678 cf_util_get_cdtime (option, &hd->interval);
679 else if (strcasecmp ("Username", option->key) == 0)
680 status = cf_util_get_string(option, &hd->username);
681 else if (strcasecmp ("AuthProtocol", option->key) == 0)
682 status = csnmp_config_add_host_auth_protocol (hd, option);
683 else if (strcasecmp ("PrivacyProtocol", option->key) == 0)
684 status = csnmp_config_add_host_priv_protocol (hd, option);
685 else if (strcasecmp ("AuthPassphrase", option->key) == 0)
686 status = cf_util_get_string(option, &hd->auth_passphrase);
687 else if (strcasecmp ("PrivacyPassphrase", option->key) == 0)
688 status = cf_util_get_string(option, &hd->priv_passphrase);
689 else if (strcasecmp ("SecurityLevel", option->key) == 0)
690 status = csnmp_config_add_host_security_level (hd, option);
691 else if (strcasecmp ("Context", option->key) == 0)
692 status = cf_util_get_string(option, &hd->context);
695 WARNING ("snmp plugin: csnmp_config_add_host: Option `%s' not allowed here.", option->key);
701 } /* for (ci->children) */
705 if (hd->address == NULL)
707 WARNING ("snmp plugin: `Address' not given for host `%s'", hd->name);
711 if (hd->community == NULL && hd->version < 3)
713 WARNING ("snmp plugin: `Community' not given for host `%s'", hd->name);
717 if (hd->version == 3)
719 if (hd->username == NULL)
721 WARNING ("snmp plugin: `Username' not given for host `%s'", hd->name);
725 if (hd->security_level == 0)
727 WARNING ("snmp plugin: `SecurityLevel' not given for host `%s'", hd->name);
731 if (hd->security_level == SNMP_SEC_LEVEL_AUTHNOPRIV || hd->security_level == SNMP_SEC_LEVEL_AUTHPRIV)
733 if (hd->auth_protocol == NULL)
735 WARNING ("snmp plugin: `AuthProtocol' not given for host `%s'", hd->name);
739 if (hd->auth_passphrase == NULL)
741 WARNING ("snmp plugin: `AuthPassphrase' not given for host `%s'", hd->name);
746 if (hd->security_level == SNMP_SEC_LEVEL_AUTHPRIV)
748 if (hd->priv_protocol == NULL)
750 WARNING ("snmp plugin: `PrivacyProtocol' not given for host `%s'", hd->name);
754 if (hd->priv_passphrase == NULL)
756 WARNING ("snmp plugin: `PrivacyPassphrase' not given for host `%s'", hd->name);
764 } /* while (status == 0) */
768 csnmp_host_definition_destroy (hd);
772 DEBUG ("snmp plugin: hd = { name = %s, address = %s, community = %s, version = %i }",
773 hd->name, hd->address, hd->community, hd->version);
775 ssnprintf (cb_name, sizeof (cb_name), "snmp-%s", hd->name);
777 memset (&cb_data, 0, sizeof (cb_data));
779 cb_data.free_func = csnmp_host_definition_destroy;
781 status = plugin_register_complex_read (/* group = */ NULL, cb_name,
782 csnmp_read_host, hd->interval, /* user_data = */ &cb_data);
785 ERROR ("snmp plugin: Registering complex read function failed.");
786 csnmp_host_definition_destroy (hd);
791 } /* int csnmp_config_add_host */
793 static int csnmp_config (oconfig_item_t *ci)
797 call_snmp_init_once ();
799 for (i = 0; i < ci->children_num; i++)
801 oconfig_item_t *child = ci->children + i;
802 if (strcasecmp ("Data", child->key) == 0)
803 csnmp_config_add_data (child);
804 else if (strcasecmp ("Host", child->key) == 0)
805 csnmp_config_add_host (child);
808 WARNING ("snmp plugin: Ignoring unknown config option `%s'.", child->key);
810 } /* for (ci->children) */
813 } /* int csnmp_config */
815 /* }}} End of the config stuff. Now the interesting part begins */
817 static void csnmp_host_open_session (host_definition_t *host)
819 struct snmp_session sess;
822 if (host->sess_handle != NULL)
823 csnmp_host_close_session (host);
825 snmp_sess_init (&sess);
826 sess.peername = host->address;
827 switch (host->version)
830 sess.version = SNMP_VERSION_1;
833 sess.version = SNMP_VERSION_3;
836 sess.version = SNMP_VERSION_2c;
840 if (host->version == 3)
842 sess.securityName = host->username;
843 sess.securityNameLen = strlen (host->username);
844 sess.securityLevel = host->security_level;
846 if (sess.securityLevel == SNMP_SEC_LEVEL_AUTHNOPRIV || sess.securityLevel == SNMP_SEC_LEVEL_AUTHPRIV)
848 sess.securityAuthProto = host->auth_protocol;
849 sess.securityAuthProtoLen = host->auth_protocol_len;
850 sess.securityAuthKeyLen = USM_AUTH_KU_LEN;
851 error = generate_Ku (sess.securityAuthProto,
852 sess.securityAuthProtoLen,
853 (u_char *) host->auth_passphrase,
854 strlen(host->auth_passphrase),
855 sess.securityAuthKey,
856 &sess.securityAuthKeyLen);
857 if (error != SNMPERR_SUCCESS) {
858 ERROR ("snmp plugin: host %s: Error generating Ku from auth_passphrase. (Error %d)", host->name, error);
862 if (sess.securityLevel == SNMP_SEC_LEVEL_AUTHPRIV)
864 sess.securityPrivProto = host->priv_protocol;
865 sess.securityPrivProtoLen = host->priv_protocol_len;
866 sess.securityPrivKeyLen = USM_PRIV_KU_LEN;
867 error = generate_Ku (sess.securityAuthProto,
868 sess.securityAuthProtoLen,
869 (u_char *) host->priv_passphrase,
870 strlen(host->priv_passphrase),
871 sess.securityPrivKey,
872 &sess.securityPrivKeyLen);
873 if (error != SNMPERR_SUCCESS) {
874 ERROR ("snmp plugin: host %s: Error generating Ku from priv_passphrase. (Error %d)", host->name, error);
878 if (host->context != NULL)
880 sess.contextName = host->context;
881 sess.contextNameLen = strlen (host->context);
884 else /* SNMPv1/2 "authenticates" with community string */
886 sess.community = (u_char *) host->community;
887 sess.community_len = strlen (host->community);
890 /* snmp_sess_open will copy the `struct snmp_session *'. */
891 host->sess_handle = snmp_sess_open (&sess);
893 if (host->sess_handle == NULL)
897 snmp_error (&sess, NULL, NULL, &errstr);
899 ERROR ("snmp plugin: host %s: snmp_sess_open failed: %s",
900 host->name, (errstr == NULL) ? "Unknown problem" : errstr);
903 } /* void csnmp_host_open_session */
905 /* TODO: Check if negative values wrap around. Problem: negative temperatures. */
906 static value_t csnmp_value_list_to_value (struct variable_list *vl, int type,
907 double scale, double shift,
908 const char *host_name, const char *data_name)
911 uint64_t tmp_unsigned = 0;
912 int64_t tmp_signed = 0;
914 /* Set to true when the original SNMP type appears to have been signed. */
915 _Bool prefer_signed = 0;
917 if ((vl->type == ASN_INTEGER)
918 || (vl->type == ASN_UINTEGER)
919 || (vl->type == ASN_COUNTER)
921 || (vl->type == ASN_TIMETICKS)
923 || (vl->type == ASN_GAUGE))
925 tmp_unsigned = (uint32_t) *vl->val.integer;
926 tmp_signed = (int32_t) *vl->val.integer;
928 if (vl->type == ASN_INTEGER)
931 DEBUG ("snmp plugin: Parsed int32 value is %"PRIu64".", tmp_unsigned);
933 else if (vl->type == ASN_COUNTER64)
935 tmp_unsigned = (uint32_t) vl->val.counter64->high;
936 tmp_unsigned = tmp_unsigned << 32;
937 tmp_unsigned += (uint32_t) vl->val.counter64->low;
938 tmp_signed = (int64_t) tmp_unsigned;
939 DEBUG ("snmp plugin: Parsed int64 value is %"PRIu64".", tmp_unsigned);
941 else if (vl->type == ASN_OCTET_STR)
943 /* We'll handle this later.. */
947 char oid_buffer[1024];
949 memset (oid_buffer, 0, sizeof (oid_buffer));
950 snprint_objid (oid_buffer, sizeof (oid_buffer) - 1,
951 vl->name, vl->name_length);
954 if (vl->type == ASN_NULL)
955 INFO ("snmp plugin: OID \"%s\" is undefined (type ASN_NULL)",
959 WARNING ("snmp plugin: I don't know the ASN type #%i "
960 "(OID: \"%s\", data block \"%s\", host block \"%s\")",
961 (int) vl->type, oid_buffer,
962 (data_name != NULL) ? data_name : "UNKNOWN",
963 (host_name != NULL) ? host_name : "UNKNOWN");
968 if (vl->type == ASN_OCTET_STR)
972 if (vl->val.string != NULL)
975 size_t string_length;
977 string_length = sizeof (string) - 1;
978 if (vl->val_len < string_length)
979 string_length = vl->val_len;
981 /* The strings we get from the Net-SNMP library may not be null
982 * terminated. That is why we're using `memcpy' here and not `strcpy'.
983 * `string_length' is set to `vl->val_len' which holds the length of the
985 memcpy (string, vl->val.string, string_length);
986 string[string_length] = 0;
988 status = parse_value (string, &ret, type);
991 ERROR ("snmp plugin: host %s: csnmp_value_list_to_value: Parsing string as %s failed: %s",
992 (host_name != NULL) ? host_name : "UNKNOWN",
993 DS_TYPE_TO_STRING (type), string);
1001 case DS_TYPE_COUNTER:
1002 case DS_TYPE_DERIVE:
1003 case DS_TYPE_ABSOLUTE:
1004 memset (&ret, 0, sizeof (ret));
1012 ERROR ("snmp plugin: csnmp_value_list_to_value: Unknown "
1013 "data source type: %i.", type);
1017 } /* if (vl->type == ASN_OCTET_STR) */
1018 else if (type == DS_TYPE_COUNTER)
1020 ret.counter = tmp_unsigned;
1022 else if (type == DS_TYPE_GAUGE)
1026 else if (prefer_signed)
1027 ret.gauge = (scale * tmp_signed) + shift;
1029 ret.gauge = (scale * tmp_unsigned) + shift;
1031 else if (type == DS_TYPE_DERIVE)
1034 ret.derive = (derive_t) tmp_signed;
1036 ret.derive = (derive_t) tmp_unsigned;
1038 else if (type == DS_TYPE_ABSOLUTE)
1040 ret.absolute = (absolute_t) tmp_unsigned;
1044 ERROR ("snmp plugin: csnmp_value_list_to_value: Unknown data source "
1050 } /* value_t csnmp_value_list_to_value */
1052 /* csnmp_strvbcopy_hexstring converts the bit string contained in "vb" to a hex
1053 * representation and writes it to dst. Returns zero on success and ENOMEM if
1054 * dst is not large enough to hold the string. dst is guaranteed to be
1055 * nul-terminated. */
1056 static int csnmp_strvbcopy_hexstring (char *dst, /* {{{ */
1057 const struct variable_list *vb, size_t dst_size)
1066 buffer_free = dst_size;
1068 for (i = 0; i < vb->val_len; i++)
1072 status = snprintf (buffer_ptr, buffer_free,
1073 (i == 0) ? "%02x" : ":%02x", (unsigned int) vb->val.bitstring[i]);
1074 assert (status >= 0);
1076 if (((size_t) status) >= buffer_free) /* truncated */
1078 dst[dst_size - 1] = 0;
1081 else /* if (status < buffer_free) */
1083 buffer_ptr += (size_t) status;
1084 buffer_free -= (size_t) status;
1089 } /* }}} int csnmp_strvbcopy_hexstring */
1091 /* csnmp_strvbcopy copies the octet string or bit string contained in vb to
1092 * dst. If non-printable characters are detected, it will switch to a hex
1093 * representation of the string. Returns zero on success, EINVAL if vb does not
1094 * contain a string and ENOMEM if dst is not large enough to contain the
1096 static int csnmp_strvbcopy (char *dst, /* {{{ */
1097 const struct variable_list *vb, size_t dst_size)
1103 if (vb->type == ASN_OCTET_STR)
1104 src = (char *) vb->val.string;
1105 else if (vb->type == ASN_BIT_STR)
1106 src = (char *) vb->val.bitstring;
1107 else if (vb->type == ASN_IPADDRESS)
1109 return ssnprintf (dst, dst_size, "%"PRIu8".%"PRIu8".%"PRIu8".%"PRIu8"",
1110 (uint8_t) vb->val.string[0],
1111 (uint8_t) vb->val.string[1],
1112 (uint8_t) vb->val.string[2],
1113 (uint8_t) vb->val.string[3]);
1121 num_chars = dst_size - 1;
1122 if (num_chars > vb->val_len)
1123 num_chars = vb->val_len;
1125 for (i = 0; i < num_chars; i++)
1127 /* Check for control characters. */
1128 if ((unsigned char)src[i] < 32)
1129 return (csnmp_strvbcopy_hexstring (dst, vb, dst_size));
1133 dst[dst_size - 1] = 0;
1135 if (dst_size <= vb->val_len)
1139 } /* }}} int csnmp_strvbcopy */
1141 static int csnmp_instance_list_add (csnmp_list_instances_t **head,
1142 csnmp_list_instances_t **tail,
1143 const struct snmp_pdu *res,
1144 const host_definition_t *hd, const data_definition_t *dd)
1146 csnmp_list_instances_t *il;
1147 struct variable_list *vb;
1151 uint32_t is_matched;
1153 /* Set vb on the last variable */
1154 for (vb = res->variables;
1155 (vb != NULL) && (vb->next_variable != NULL);
1156 vb = vb->next_variable)
1161 csnmp_oid_init (&vb_name, vb->name, vb->name_length);
1163 il = calloc (1, sizeof (*il));
1166 ERROR ("snmp plugin: calloc failed.");
1171 status = csnmp_oid_suffix (&il->suffix, &vb_name, &dd->instance.oid);
1178 /* Get instance name */
1179 if ((vb->type == ASN_OCTET_STR) || (vb->type == ASN_BIT_STR) || (vb->type == ASN_IPADDRESS))
1183 csnmp_strvbcopy (il->instance, vb, sizeof (il->instance));
1185 for (i = 0; i < dd->ignores_len; i++)
1187 status = fnmatch(dd->ignores[i], il->instance, 0);
1190 if (dd->invert_match == 0)
1202 if (dd->invert_match != 0 && is_matched == 0)
1207 for (ptr = il->instance; *ptr != '\0'; ptr++)
1209 if ((*ptr > 0) && (*ptr < 32))
1211 else if (*ptr == '/')
1214 DEBUG ("snmp plugin: il->instance = `%s';", il->instance);
1218 value_t val = csnmp_value_list_to_value (vb, DS_TYPE_COUNTER,
1219 /* scale = */ 1.0, /* shift = */ 0.0, hd->name, dd->name);
1220 ssnprintf (il->instance, sizeof (il->instance),
1221 "%llu", val.counter);
1224 /* TODO: Debugging output */
1233 } /* int csnmp_instance_list_add */
1235 static int csnmp_dispatch_table (host_definition_t *host, data_definition_t *data,
1236 csnmp_list_instances_t *instance_list,
1237 csnmp_table_values_t **value_table)
1239 const data_set_t *ds;
1240 value_list_t vl = VALUE_LIST_INIT;
1242 csnmp_list_instances_t *instance_list_ptr;
1243 csnmp_table_values_t **value_table_ptr;
1247 oid_t current_suffix;
1249 ds = plugin_get_ds (data->type);
1252 ERROR ("snmp plugin: DataSet `%s' not defined.", data->type);
1255 assert (ds->ds_num == data->values_len);
1256 assert (data->values_len > 0);
1258 instance_list_ptr = instance_list;
1260 value_table_ptr = calloc (data->values_len, sizeof (*value_table_ptr));
1261 if (value_table_ptr == NULL)
1263 for (i = 0; i < data->values_len; i++)
1264 value_table_ptr[i] = value_table[i];
1266 vl.values_len = data->values_len;
1267 vl.values = malloc (sizeof (*vl.values) * vl.values_len);
1268 if (vl.values == NULL)
1270 ERROR ("snmp plugin: malloc failed.");
1271 sfree (value_table_ptr);
1275 sstrncpy (vl.host, host->name, sizeof (vl.host));
1276 sstrncpy (vl.plugin, "snmp", sizeof (vl.plugin));
1278 vl.interval = host->interval;
1281 memset (¤t_suffix, 0, sizeof (current_suffix));
1284 _Bool suffix_skipped = 0;
1286 /* Determine next suffix to handle. */
1287 if (instance_list != NULL)
1289 if (instance_list_ptr == NULL)
1295 memcpy (¤t_suffix, &instance_list_ptr->suffix, sizeof (current_suffix));
1297 else /* no instance configured */
1299 csnmp_table_values_t *ptr = value_table_ptr[0];
1306 memcpy (¤t_suffix, &ptr->suffix, sizeof (current_suffix));
1309 /* Update all the value_table_ptr to point at the entry with the same
1310 * trailing partial OID */
1311 for (i = 0; i < data->values_len; i++)
1313 while ((value_table_ptr[i] != NULL)
1314 && (csnmp_oid_compare (&value_table_ptr[i]->suffix, ¤t_suffix) < 0))
1315 value_table_ptr[i] = value_table_ptr[i]->next;
1317 if (value_table_ptr[i] == NULL)
1322 else if (csnmp_oid_compare (&value_table_ptr[i]->suffix, ¤t_suffix) > 0)
1324 /* This suffix is missing in the subtree. Indicate this with the
1325 * "suffix_skipped" flag and try the next instance / suffix. */
1329 } /* for (i = 0; i < columns; i++) */
1334 /* Matching the values failed. Start from the beginning again. */
1337 if (instance_list != NULL)
1338 instance_list_ptr = instance_list_ptr->next;
1340 value_table_ptr[0] = value_table_ptr[0]->next;
1345 /* if we reach this line, all value_table_ptr[i] are non-NULL and are set
1346 * to the same subid. instance_list_ptr is either NULL or points to the
1347 * same subid, too. */
1349 for (i = 1; i < data->values_len; i++)
1351 assert (value_table_ptr[i] != NULL);
1352 assert (csnmp_oid_compare (&value_table_ptr[i-1]->suffix,
1353 &value_table_ptr[i]->suffix) == 0);
1355 assert ((instance_list_ptr == NULL)
1356 || (csnmp_oid_compare (&instance_list_ptr->suffix,
1357 &value_table_ptr[0]->suffix) == 0));
1360 sstrncpy (vl.type, data->type, sizeof (vl.type));
1363 char temp[DATA_MAX_NAME_LEN];
1365 if (instance_list_ptr == NULL)
1366 csnmp_oid_to_string (temp, sizeof (temp), ¤t_suffix);
1368 sstrncpy (temp, instance_list_ptr->instance, sizeof (temp));
1370 if (data->instance_prefix == NULL)
1371 sstrncpy (vl.type_instance, temp, sizeof (vl.type_instance));
1373 ssnprintf (vl.type_instance, sizeof (vl.type_instance), "%s%s",
1374 data->instance_prefix, temp);
1377 for (i = 0; i < data->values_len; i++)
1378 vl.values[i] = value_table_ptr[i]->value;
1380 /* If we get here `vl.type_instance' and all `vl.values' have been set */
1381 plugin_dispatch_values (&vl);
1383 if (instance_list != NULL)
1384 instance_list_ptr = instance_list_ptr->next;
1386 value_table_ptr[0] = value_table_ptr[0]->next;
1387 } /* while (have_more) */
1390 sfree (value_table_ptr);
1393 } /* int csnmp_dispatch_table */
1395 static int csnmp_read_table (host_definition_t *host, data_definition_t *data)
1397 struct snmp_pdu *req;
1398 struct snmp_pdu *res = NULL;
1399 struct variable_list *vb;
1401 const data_set_t *ds;
1403 size_t oid_list_len = data->values_len + 1;
1404 /* Holds the last OID returned by the device. We use this in the GETNEXT
1405 * request to proceed. */
1406 oid_t oid_list[oid_list_len];
1407 /* Set to false when an OID has left its subtree so we don't re-request it
1409 _Bool oid_list_todo[oid_list_len];
1414 /* `value_list_head' and `value_list_tail' implement a linked list for each
1415 * value. `instance_list_head' and `instance_list_tail' implement a linked list of
1416 * instance names. This is used to jump gaps in the table. */
1417 csnmp_list_instances_t *instance_list_head;
1418 csnmp_list_instances_t *instance_list_tail;
1419 csnmp_table_values_t **value_list_head;
1420 csnmp_table_values_t **value_list_tail;
1422 DEBUG ("snmp plugin: csnmp_read_table (host = %s, data = %s)",
1423 host->name, data->name);
1425 if (host->sess_handle == NULL)
1427 DEBUG ("snmp plugin: csnmp_read_table: host->sess_handle == NULL");
1431 ds = plugin_get_ds (data->type);
1434 ERROR ("snmp plugin: DataSet `%s' not defined.", data->type);
1438 if (ds->ds_num != data->values_len)
1440 ERROR ("snmp plugin: DataSet `%s' requires %zu values, but config talks about %zu",
1441 data->type, ds->ds_num, data->values_len);
1444 assert (data->values_len > 0);
1446 /* We need a copy of all the OIDs, because GETNEXT will destroy them. */
1447 memcpy (oid_list, data->values, data->values_len * sizeof (oid_t));
1448 if (data->instance.oid.oid_len > 0)
1449 memcpy (oid_list + data->values_len, &data->instance.oid, sizeof (oid_t));
1450 else /* no InstanceFrom option specified. */
1453 for (i = 0; i < oid_list_len; i++)
1454 oid_list_todo[i] = 1;
1456 /* We're going to construct n linked lists, one for each "value".
1457 * value_list_head will contain pointers to the heads of these linked lists,
1458 * value_list_tail will contain pointers to the tail of the lists. */
1459 value_list_head = calloc (data->values_len, sizeof (*value_list_head));
1460 value_list_tail = calloc (data->values_len, sizeof (*value_list_tail));
1461 if ((value_list_head == NULL) || (value_list_tail == NULL))
1463 ERROR ("snmp plugin: csnmp_read_table: calloc failed.");
1464 sfree (value_list_head);
1465 sfree (value_list_tail);
1469 instance_list_head = NULL;
1470 instance_list_tail = NULL;
1475 int oid_list_todo_num;
1477 req = snmp_pdu_create (SNMP_MSG_GETNEXT);
1480 ERROR ("snmp plugin: snmp_pdu_create failed.");
1485 oid_list_todo_num = 0;
1486 for (i = 0; i < oid_list_len; i++)
1488 /* Do not rerequest already finished OIDs */
1489 if (!oid_list_todo[i])
1491 oid_list_todo_num++;
1492 snmp_add_null_var (req, oid_list[i].oid, oid_list[i].oid_len);
1495 if (oid_list_todo_num == 0)
1497 /* The request is still empty - so we are finished */
1498 DEBUG ("snmp plugin: all variables have left their subtree");
1504 status = snmp_sess_synch_response (host->sess_handle, req, &res);
1505 if ((status != STAT_SUCCESS) || (res == NULL))
1507 char *errstr = NULL;
1509 snmp_sess_error (host->sess_handle, NULL, NULL, &errstr);
1511 c_complain (LOG_ERR, &host->complaint,
1512 "snmp plugin: host %s: snmp_sess_synch_response failed: %s",
1513 host->name, (errstr == NULL) ? "Unknown problem" : errstr);
1516 snmp_free_pdu (res);
1519 /* snmp_synch_response already freed our PDU */
1522 csnmp_host_close_session (host);
1529 assert (res != NULL);
1530 c_release (LOG_INFO, &host->complaint,
1531 "snmp plugin: host %s: snmp_sess_synch_response successful.",
1534 vb = res->variables;
1541 for (vb = res->variables, i = 0; (vb != NULL); vb = vb->next_variable, i++)
1543 /* Calculate value index from todo list */
1544 while ((i < oid_list_len) && !oid_list_todo[i])
1547 /* An instance is configured and the res variable we process is the
1548 * instance value (last index) */
1549 if ((data->instance.oid.oid_len > 0) && (i == data->values_len))
1551 if ((vb->type == SNMP_ENDOFMIBVIEW)
1552 || (snmp_oid_ncompare (data->instance.oid.oid,
1553 data->instance.oid.oid_len,
1554 vb->name, vb->name_length,
1555 data->instance.oid.oid_len) != 0))
1557 DEBUG ("snmp plugin: host = %s; data = %s; Instance left its subtree.",
1558 host->name, data->name);
1559 oid_list_todo[i] = 0;
1563 /* Allocate a new `csnmp_list_instances_t', insert the instance name and
1564 * add it to the list */
1565 if (csnmp_instance_list_add (&instance_list_head, &instance_list_tail,
1566 res, host, data) != 0)
1568 ERROR ("snmp plugin: host %s: csnmp_instance_list_add failed.",
1574 else /* The variable we are processing is a normal value */
1576 csnmp_table_values_t *vt;
1581 csnmp_oid_init (&vb_name, vb->name, vb->name_length);
1583 /* Calculate the current suffix. This is later used to check that the
1584 * suffix is increasing. This also checks if we left the subtree */
1585 ret = csnmp_oid_suffix (&suffix, &vb_name, data->values + i);
1588 DEBUG ("snmp plugin: host = %s; data = %s; i = %zu; "
1589 "Value probably left its subtree.",
1590 host->name, data->name, i);
1591 oid_list_todo[i] = 0;
1595 /* Make sure the OIDs returned by the agent are increasing. Otherwise our
1596 * table matching algorithm will get confused. */
1597 if ((value_list_tail[i] != NULL)
1598 && (csnmp_oid_compare (&suffix, &value_list_tail[i]->suffix) <= 0))
1600 DEBUG ("snmp plugin: host = %s; data = %s; i = %zu; "
1601 "Suffix is not increasing.",
1602 host->name, data->name, i);
1603 oid_list_todo[i] = 0;
1607 vt = calloc (1, sizeof (*vt));
1610 ERROR ("snmp plugin: calloc failed.");
1615 vt->value = csnmp_value_list_to_value (vb, ds->ds[i].type,
1616 data->scale, data->shift, host->name, data->name);
1617 memcpy (&vt->suffix, &suffix, sizeof (vt->suffix));
1620 if (value_list_tail[i] == NULL)
1621 value_list_head[i] = vt;
1623 value_list_tail[i]->next = vt;
1624 value_list_tail[i] = vt;
1627 /* Copy OID to oid_list[i] */
1628 memcpy (oid_list[i].oid, vb->name, sizeof (oid) * vb->name_length);
1629 oid_list[i].oid_len = vb->name_length;
1631 } /* for (vb = res->variables ...) */
1634 snmp_free_pdu (res);
1636 } /* while (status == 0) */
1639 snmp_free_pdu (res);
1643 snmp_free_pdu (req);
1647 csnmp_dispatch_table (host, data, instance_list_head, value_list_head);
1649 /* Free all allocated variables here */
1650 while (instance_list_head != NULL)
1652 csnmp_list_instances_t *next = instance_list_head->next;
1653 sfree (instance_list_head);
1654 instance_list_head = next;
1657 for (i = 0; i < data->values_len; i++)
1659 while (value_list_head[i] != NULL)
1661 csnmp_table_values_t *next = value_list_head[i]->next;
1662 sfree (value_list_head[i]);
1663 value_list_head[i] = next;
1667 sfree (value_list_head);
1668 sfree (value_list_tail);
1671 } /* int csnmp_read_table */
1673 static int csnmp_read_value (host_definition_t *host, data_definition_t *data)
1675 struct snmp_pdu *req;
1676 struct snmp_pdu *res;
1677 struct variable_list *vb;
1679 const data_set_t *ds;
1680 value_list_t vl = VALUE_LIST_INIT;
1685 DEBUG ("snmp plugin: csnmp_read_value (host = %s, data = %s)",
1686 host->name, data->name);
1688 if (host->sess_handle == NULL)
1690 DEBUG ("snmp plugin: csnmp_read_value: host->sess_handle == NULL");
1694 ds = plugin_get_ds (data->type);
1697 ERROR ("snmp plugin: DataSet `%s' not defined.", data->type);
1701 if (ds->ds_num != data->values_len)
1703 ERROR ("snmp plugin: DataSet `%s' requires %zu values, but config talks about %zu",
1704 data->type, ds->ds_num, data->values_len);
1708 vl.values_len = ds->ds_num;
1709 vl.values = malloc (sizeof (*vl.values) * vl.values_len);
1710 if (vl.values == NULL)
1712 for (i = 0; i < vl.values_len; i++)
1714 if (ds->ds[i].type == DS_TYPE_COUNTER)
1715 vl.values[i].counter = 0;
1717 vl.values[i].gauge = NAN;
1720 sstrncpy (vl.host, host->name, sizeof (vl.host));
1721 sstrncpy (vl.plugin, "snmp", sizeof (vl.plugin));
1722 sstrncpy (vl.type, data->type, sizeof (vl.type));
1723 sstrncpy (vl.type_instance, data->instance.string, sizeof (vl.type_instance));
1725 vl.interval = host->interval;
1727 req = snmp_pdu_create (SNMP_MSG_GET);
1730 ERROR ("snmp plugin: snmp_pdu_create failed.");
1735 for (i = 0; i < data->values_len; i++)
1736 snmp_add_null_var (req, data->values[i].oid, data->values[i].oid_len);
1739 status = snmp_sess_synch_response (host->sess_handle, req, &res);
1741 if ((status != STAT_SUCCESS) || (res == NULL))
1743 char *errstr = NULL;
1745 snmp_sess_error (host->sess_handle, NULL, NULL, &errstr);
1746 ERROR ("snmp plugin: host %s: snmp_sess_synch_response failed: %s",
1747 host->name, (errstr == NULL) ? "Unknown problem" : errstr);
1750 snmp_free_pdu (res);
1754 csnmp_host_close_session (host);
1760 for (vb = res->variables; vb != NULL; vb = vb->next_variable)
1764 snprint_variable (buffer, sizeof (buffer),
1765 vb->name, vb->name_length, vb);
1766 DEBUG ("snmp plugin: Got this variable: %s", buffer);
1767 #endif /* COLLECT_DEBUG */
1769 for (i = 0; i < data->values_len; i++)
1770 if (snmp_oid_compare (data->values[i].oid, data->values[i].oid_len,
1771 vb->name, vb->name_length) == 0)
1772 vl.values[i] = csnmp_value_list_to_value (vb, ds->ds[i].type,
1773 data->scale, data->shift, host->name, data->name);
1774 } /* for (res->variables) */
1776 snmp_free_pdu (res);
1778 DEBUG ("snmp plugin: -> plugin_dispatch_values (&vl);");
1779 plugin_dispatch_values (&vl);
1783 } /* int csnmp_read_value */
1785 static int csnmp_read_host (user_data_t *ud)
1787 host_definition_t *host;
1794 if (host->interval == 0)
1795 host->interval = plugin_get_interval ();
1797 if (host->sess_handle == NULL)
1798 csnmp_host_open_session (host);
1800 if (host->sess_handle == NULL)
1804 for (i = 0; i < host->data_list_len; i++)
1806 data_definition_t *data = host->data_list[i];
1809 status = csnmp_read_table (host, data);
1811 status = csnmp_read_value (host, data);
1821 } /* int csnmp_read_host */
1823 static int csnmp_init (void)
1825 call_snmp_init_once ();
1828 } /* int csnmp_init */
1830 static int csnmp_shutdown (void)
1832 data_definition_t *data_this;
1833 data_definition_t *data_next;
1835 /* When we get here, the read threads have been stopped and all the
1836 * `host_definition_t' will be freed. */
1837 DEBUG ("snmp plugin: Destroying all data definitions.");
1839 data_this = data_head;
1841 while (data_this != NULL)
1843 data_next = data_this->next;
1845 sfree (data_this->name);
1846 sfree (data_this->type);
1847 sfree (data_this->values);
1848 sfree (data_this->ignores);
1851 data_this = data_next;
1855 } /* int csnmp_shutdown */
1857 void module_register (void)
1859 plugin_register_complex_config ("snmp", csnmp_config);
1860 plugin_register_init ("snmp", csnmp_init);
1861 plugin_register_shutdown ("snmp", csnmp_shutdown);
1862 } /* void module_register */
1865 * vim: shiftwidth=2 softtabstop=2 tabstop=8 fdm=marker