src/powerdns.c

   1 /**
   2  * collectd - src/powerdns.c
   3  * Copyright (C) 2007-2008  C-Ware, Inc.
   4  * Copyright (C) 2008       Florian Forster
   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  *   Luke Heberling <lukeh at c-ware.com>
  21  *   Florian Forster <octo at verplant.org>
  22  *
  23  * DESCRIPTION
  24  *   Queries a PowerDNS control socket for statistics
  25  **/
  26
  27 #include "collectd.h"
  28 #include "common.h"
  29 #include "plugin.h"
  30 #include "configfile.h"
  31 #include "utils_llist.h"
  32
  33 #include <sys/stat.h>
  34 #include <unistd.h>
  35 #include <stdlib.h>
  36 #include <stdio.h>
  37 #include <string.h>
  38 #include <errno.h>
  39 #include <sys/types.h>
  40 #include <sys/socket.h>
  41 #include <sys/un.h>
  42
  43 #ifndef UNIX_PATH_MAX
  44 # define UNIX_PATH_MAX sizeof (((struct sockaddr_un *)0)->sun_path)
  45 #endif
  46 #define FUNC_ERROR(func) do { char errbuf[1024]; ERROR ("powerdns plugin: %s failed: %s", func, sstrerror (errno, errbuf, sizeof (errbuf))); } while (0)
  47
  48 #define SERVER_SOCKET  "/var/run/pdns.controlsocket"
  49 #define SERVER_COMMAND "SHOW *"
  50
  51 #define RECURSOR_SOCKET  "/var/run/pdns_recursor.controlsocket"
  52 #define RECURSOR_COMMAND "get all-outqueries answers0-1 " /* {{{ */ \
  53   "answers100-1000 answers10-100 answers1-10 answers-slow cache-entries " \
  54   "cache-hits cache-misses chain-resends client-parse-errors " \
  55   "concurrent-queries dlg-only-drops ipv6-outqueries negcache-entries " \
  56   "noerror-answers nsset-invalidations nsspeeds-entries nxdomain-answers " \
  57   "outgoing-timeouts qa-latency questions resource-limits " \
  58   "server-parse-errors servfail-answers spoof-prevents sys-msec " \
  59   "tcp-client-overflow tcp-outqueries tcp-questions throttled-out " \
  60   "throttled-outqueries throttle-entries unauthorized-tcp unauthorized-udp " \
  61   "unexpected-packets unreachables user-msec" /* }}} */
  62
  63 struct list_item_s;
  64 typedef struct list_item_s list_item_t;
  65
  66 struct list_item_s
  67 {
  68   int (*func) (list_item_t *item);
  69   char *instance;
  70   char *command;
  71   struct sockaddr_un sockaddr;
  72   int socktype;
  73 };
  74
  75 struct statname_lookup_s
  76 {
  77   char *name;
  78   char *type;
  79   char *type_instance;
  80 };
  81 typedef struct statname_lookup_s statname_lookup_t;
  82
  83 /* Description of statistics returned by the recursor: {{{
  84 all-outqueries      counts the number of outgoing UDP queries since starting
  85 answers0-1          counts the number of queries answered within 1 milisecond
  86 answers100-1000     counts the number of queries answered within 1 second
  87 answers10-100       counts the number of queries answered within 100 miliseconds
  88 answers1-10         counts the number of queries answered within 10 miliseconds
  89 answers-slow        counts the number of queries answered after 1 second
  90 cache-entries       shows the number of entries in the cache
  91 cache-hits          counts the number of cache hits since starting
  92 cache-misses        counts the number of cache misses since starting
  93 chain-resends       number of queries chained to existing outstanding query
  94 client-parse-errors counts number of client packets that could not be parsed
  95 concurrent-queries  shows the number of MThreads currently running
  96 dlg-only-drops      number of records dropped because of delegation only setting
  97 negcache-entries    shows the number of entries in the Negative answer cache
  98 noerror-answers     counts the number of times it answered NOERROR since starting
  99 nsspeeds-entries    shows the number of entries in the NS speeds map
 100 nsset-invalidations number of times an nsset was dropped because it no longer worked
 101 nxdomain-answers    counts the number of times it answered NXDOMAIN since starting
 102 outgoing-timeouts   counts the number of timeouts on outgoing UDP queries since starting
 103 qa-latency          shows the current latency average
 104 questions           counts all End-user initiated queries with the RD bit set
 105 resource-limits     counts number of queries that could not be performed because of resource limits
 106 server-parse-errors counts number of server replied packets that could not be parsed
 107 servfail-answers    counts the number of times it answered SERVFAIL since starting
 108 spoof-prevents      number of times PowerDNS considered itself spoofed, and dropped the data
 109 sys-msec            number of CPU milliseconds spent in 'system' mode
 110 tcp-client-overflow number of times an IP address was denied TCP access because it already had too many connections
 111 tcp-outqueries      counts the number of outgoing TCP queries since starting
 112 tcp-questions       counts all incoming TCP queries (since starting)
 113 throttled-out       counts the number of throttled outgoing UDP queries since starting
 114 throttle-entries    shows the number of entries in the throttle map
 115 unauthorized-tcp    number of TCP questions denied because of allow-from restrictions
 116 unauthorized-udp    number of UDP questions denied because of allow-from restrictions
 117 unexpected-packets  number of answers from remote servers that were unexpected (might point to spoofing)
 118 uptime              number of seconds process has been running (since 3.1.5)
 119 user-msec           number of CPU milliseconds spent in 'user' mode
 120 }}} */
 121
 122 statname_lookup_t lookup_table[] = /* {{{ */
 123 {
 124   /*********************
 125    * Server statistics *
 126    *********************/
 127   /* Questions */
 128   {"recursing-questions",    "dns_question", "recurse"},
 129   {"tcp-queries",            "dns_question", "tcp"},
 130   {"udp-queries",            "dns_question", "udp"},
 131
 132   /* Answers */
 133   {"recursing-answers",      "dns_answer",   "recurse"},
 134   {"tcp-answers",            "dns_answer",   "tcp"},
 135   {"udp-answers",            "dns_answer",   "udp"},
 136
 137   /* Cache stuff */
 138   {"packetcache-hit",        "cache_result", "packet-hit"},
 139   {"packetcache-miss",       "cache_result", "packet-miss"},
 140   {"packetcache-size",       "cache_size",   "packet"},
 141   {"query-cache-hit",        "cache_result", "query-hit"},
 142   {"query-cache-miss",       "cache_result", "query-miss"},
 143
 144   /* Latency */
 145   {"latency",                "latency",      NULL},
 146
 147   /* Other stuff.. */
 148   {"corrupt-packets",        "io_packets",   "corrupt"},
 149   {"deferred-cache-inserts", "counter",      "cache-deferred_insert"},
 150   {"deferred-cache-lookup",  "counter",      "cache-deferred_lookup"},
 151   {"qsize-a",                "cache_size",   "answers"},
 152   {"qsize-q",                "cache_size",   "questions"},
 153   {"servfail-packets",       "io_packets",   "servfail"},
 154   {"timedout-packets",       "io_packets",   "timeout"},
 155   {"udp4-answers",           "dns_answer",   "udp4"},
 156   {"udp4-queries",           "dns_question", "queries-udp4"},
 157   {"udp6-answers",           "dns_answer",   "udp6"},
 158   {"udp6-queries",           "dns_question", "queries-udp6"},
 159
 160   /***********************
 161    * Recursor statistics *
 162    ***********************/
 163   /* Answers by return code */
 164   {"noerror-answers",     "dns_rcode",    "NOERROR"},
 165   {"nxdomain-answers",    "dns_rcode",    "NXDOMAIN"},
 166   {"servfail-answers",    "dns_rcode",    "SERVFAIL"},
 167
 168   /* CPU utilization */
 169   {"sys-msec",            "cpu",          "system"},
 170   {"user-msec",           "cpu",          "user"},
 171
 172   /* Question-to-answer latency */
 173   {"qa-latency",          "latency",      NULL},
 174
 175   /* Cache */
 176   {"cache-entries",       "cache_size",   NULL},
 177   {"cache-hits",          "cache_result", "hit"},
 178   {"cache-misses",        "cache_result", "miss"},
 179
 180   /* Total number of questions.. */
 181   {"questions",           "dns_qtype",    "total"}
 182
 183   /* TODO: Add all recursor metrics here */
 184 }; /* }}} */
 185 int lookup_table_length = STATIC_ARRAY_SIZE (lookup_table);
 186
 187 static llist_t *list = NULL;
 188
 189 #define PDNS_LOCAL_SOCKPATH LOCALSTATEDIR"/run/"PACKAGE_NAME"-powerdns"
 190 static char *local_sockpath = NULL;
 191
 192 /* TODO: Do this before 4.4:
 193  * - Make list of ``interesting values'' configurable
 194  * - Authorative server:
 195  *   - Store each element in a list or an array
 196  *   - Check values returned by `SHOW *' against that list.
 197  * - Recursor:
 198  *   - Use the list to build a command to request the given values
 199  *   - Complete list of known pdns -> collectd mappings.
 200  *
 201  * -octo
 202  */
 203
 204 /* <http://doc.powerdns.com/recursor-stats.html> */
 205 static void submit (const char *plugin_instance, /* {{{ */
 206     const char *pdns_type, const char *value)
 207 {
 208   value_list_t vl = VALUE_LIST_INIT;
 209   value_t values[1];
 210
 211   const char *type = NULL;
 212   const char *type_instance = NULL;
 213   const data_set_t *ds;
 214
 215   int i;
 216
 217   for (i = 0; i < lookup_table_length; i++)
 218     if (strcmp (lookup_table[i].name, pdns_type) == 0)
 219       break;
 220
 221   if (lookup_table[i].type == NULL)
 222     return;
 223
 224   if (i >= lookup_table_length)
 225   {
 226     DEBUG ("powerdns plugin: submit: Not found in lookup table: %s = %s;",
 227         pdns_type, value);
 228     return;
 229   }
 230
 231   type = lookup_table[i].type;
 232   type_instance = lookup_table[i].type_instance;
 233
 234   ds = plugin_get_ds (type);
 235   if (ds == NULL)
 236   {
 237     ERROR ("powerdns plugin: The lookup table returned type `%s', "
 238         "but I cannot find it via `plugin_get_ds'.",
 239         type);
 240     return;
 241   }
 242
 243   if (ds->ds_num != 1)
 244   {
 245     ERROR ("powerdns plugin: type `%s' has %i data sources, "
 246         "but I can only handle one.",
 247         type, ds->ds_num);
 248     return;
 249   }
 250
 251   if (ds->ds[0].type == DS_TYPE_GAUGE)
 252   {
 253     char *endptr = NULL;
 254
 255     values[0].gauge = strtod (value, &endptr);
 256
 257     if (endptr == value)
 258     {
 259       ERROR ("powerdns plugin: Cannot convert `%s' "
 260           "to a floating point number.", value);
 261       return;
 262     }
 263   }
 264   else
 265   {
 266     char *endptr = NULL;
 267
 268     values[0].counter = strtoll (value, &endptr, 0);
 269     if (endptr == value)
 270     {
 271       ERROR ("powerdns plugin: Cannot convert `%s' "
 272           "to an integer number.", value);
 273       return;
 274     }
 275   }
 276
 277   vl.values = values;
 278   vl.values_len = 1;
 279   vl.time = time (NULL);
 280   sstrncpy (vl.host, hostname_g, sizeof (vl.host));
 281   sstrncpy (vl.plugin, "powerdns", sizeof (vl.plugin));
 282   if (type_instance != NULL)
 283     sstrncpy (vl.type_instance, type_instance, sizeof (vl.type_instance));
 284   sstrncpy (vl.plugin_instance, plugin_instance, sizeof (vl.plugin_instance));
 285
 286   plugin_dispatch_values (type, &vl);
 287 } /* }}} static void submit */
 288
 289 static int powerdns_get_data_dgram (list_item_t *item, /* {{{ */
 290     char **ret_buffer,
 291     size_t *ret_buffer_size)
 292 {
 293   int sd;
 294   int status;
 295
 296   char temp[4096];
 297   char *buffer = NULL;
 298   size_t buffer_size = 0;
 299
 300   struct sockaddr_un sa_unix;
 301
 302   sd = socket (PF_UNIX, item->socktype, 0);
 303   if (sd < 0)
 304   {
 305     FUNC_ERROR ("socket");
 306     return (-1);
 307   }
 308
 309   memset (&sa_unix, 0, sizeof (sa_unix));
 310   sa_unix.sun_family = AF_UNIX;
 311   strncpy (sa_unix.sun_path,
 312       (local_sockpath != NULL) ? local_sockpath : PDNS_LOCAL_SOCKPATH,
 313       sizeof (sa_unix.sun_path));
 314   sa_unix.sun_path[sizeof (sa_unix.sun_path) - 1] = 0;
 315
 316   status = unlink (sa_unix.sun_path);
 317   if ((status != 0) && (errno != ENOENT))
 318   {
 319     FUNC_ERROR ("unlink");
 320     close (sd);
 321     return (-1);
 322   }
 323
 324   do /* while (0) */
 325   {
 326     /* We need to bind to a specific path, because this is a datagram socket
 327      * and otherwise the daemon cannot answer. */
 328     status = bind (sd, (struct sockaddr *) &sa_unix, sizeof (sa_unix));
 329     if (status != 0)
 330     {
 331       FUNC_ERROR ("bind");
 332       break;
 333     }
 334
 335     /* Make the socket writeable by the daemon.. */
 336     status = chmod (sa_unix.sun_path, 0666);
 337     if (status != 0)
 338     {
 339       FUNC_ERROR ("chmod");
 340       break;
 341     }
 342
 343     status = connect (sd, (struct sockaddr *) &item->sockaddr,
 344         sizeof (item->sockaddr));
 345     if (status != 0)
 346     {
 347       FUNC_ERROR ("connect");
 348       break;
 349     }
 350
 351     status = send (sd, item->command, strlen (item->command), 0);
 352     if (status < 0)
 353     {
 354       FUNC_ERROR ("send");
 355       break;
 356     }
 357
 358     status = recv (sd, temp, sizeof (temp), /* flags = */ 0);
 359     if (status < 0)
 360     {
 361       FUNC_ERROR ("recv");
 362       break;
 363     }
 364     status = 0;
 365   } while (0);
 366
 367   close (sd);
 368   unlink (sa_unix.sun_path);
 369
 370   if (status != 0)
 371     return (-1);
 372
 373   buffer_size = status + 1;
 374   buffer = (char *) malloc (buffer_size);
 375   if (buffer == NULL)
 376   {
 377     FUNC_ERROR ("malloc");
 378     return (-1);
 379   }
 380
 381   memcpy (buffer, temp, status);
 382   buffer[status] = 0;
 383
 384   *ret_buffer = buffer;
 385   *ret_buffer_size = buffer_size;
 386
 387   return (0);
 388 } /* }}} int powerdns_get_data_dgram */
 389
 390 static int powerdns_get_data_stream (list_item_t *item, /* {{{ */
 391     char **ret_buffer,
 392     size_t *ret_buffer_size)
 393 {
 394   int sd;
 395   int status;
 396
 397   char temp[4096];
 398   char *buffer = NULL;
 399   size_t buffer_size = 0;
 400
 401   sd = socket (PF_UNIX, item->socktype, 0);
 402   if (sd < 0)
 403   {
 404     FUNC_ERROR ("socket");
 405     return (-1);
 406   }
 407
 408   status = connect (sd, (struct sockaddr *) &item->sockaddr,
 409       sizeof (item->sockaddr));
 410   if (status != 0)
 411   {
 412     FUNC_ERROR ("connect");
 413     close (sd);
 414     return (-1);
 415   }
 416
 417   /* strlen + 1, because we need to send the terminating NULL byte, too. */
 418   status = send (sd, item->command, strlen (item->command) + 1,
 419       /* flags = */ 0);
 420   if (status < 0)
 421   {
 422     FUNC_ERROR ("send");
 423     close (sd);
 424     return (-1);
 425   }
 426
 427   while (42)
 428   {
 429     char *buffer_new;
 430
 431     status = recv (sd, temp, sizeof (temp), /* flags = */ 0);
 432     if (status < 0)
 433     {
 434       FUNC_ERROR ("recv");
 435       break;
 436     }
 437     else if (status == 0)
 438       break;
 439
 440     buffer_new = (char *) realloc (buffer, buffer_size + status + 1);
 441     if (buffer_new == NULL)
 442     {
 443       FUNC_ERROR ("realloc");
 444       status = -1;
 445       break;
 446     }
 447     buffer = buffer_new;
 448
 449     memcpy (buffer + buffer_size, temp, status);
 450     buffer_size += status;
 451     buffer[buffer_size] = 0;
 452   } /* while (42) */
 453   close (sd);
 454   sd = -1;
 455
 456   if (status < 0)
 457   {
 458     sfree (buffer);
 459   }
 460   else
 461   {
 462     assert (status == 0);
 463     *ret_buffer = buffer;
 464     *ret_buffer_size = buffer_size;
 465   }
 466
 467   return (status);
 468 } /* }}} int powerdns_get_data_stream */
 469
 470 static int powerdns_get_data (list_item_t *item, char **ret_buffer,
 471     size_t *ret_buffer_size)
 472 {
 473   if (item->socktype == SOCK_DGRAM)
 474     return (powerdns_get_data_dgram (item, ret_buffer, ret_buffer_size));
 475   else if (item->socktype == SOCK_STREAM)
 476     return (powerdns_get_data_stream (item, ret_buffer, ret_buffer_size));
 477   else
 478   {
 479     ERROR ("powerdns plugin: Unknown socket type: %i", (int) item->socktype);
 480     return (-1);
 481   }
 482 } /* int powerdns_get_data */
 483
 484 static int powerdns_read_server (list_item_t *item) /* {{{ */
 485 {
 486   char *buffer = NULL;
 487   size_t buffer_size = 0;
 488   int status;
 489
 490   char *dummy;
 491   char *saveptr;
 492
 493   char *key;
 494   char *value;
 495
 496   status = powerdns_get_data (item, &buffer, &buffer_size);
 497   if (status != 0)
 498     return (-1);
 499
 500   /* corrupt-packets=0,deferred-cache-inserts=0,deferred-cache-lookup=0,latency=0,packetcache-hit=0,packetcache-miss=0,packetcache-size=0,qsize-q=0,query-cache-hit=0,query-cache-miss=0,recursing-answers=0,recursing-questions=0,servfail-packets=0,tcp-answers=0,tcp-queries=0,timedout-packets=0,udp-answers=0,udp-queries=0,udp4-answers=0,udp4-queries=0,udp6-answers=0,udp6-queries=0, */
 501   dummy = buffer;
 502   saveptr = NULL;
 503   while ((key = strtok_r (dummy, ",", &saveptr)) != NULL)
 504   {
 505     dummy = NULL;
 506
 507     value = strchr (key, '=');
 508     if (value == NULL)
 509       break;
 510
 511     *value = '\0';
 512     value++;
 513
 514     if (value[0] == '\0')
 515       continue;
 516
 517     submit (item->instance, key, value);
 518   } /* while (strtok_r) */
 519
 520   sfree (buffer);
 521
 522   return (0);
 523 } /* }}} int powerdns_read_server */
 524
 525 static int powerdns_read_recursor (list_item_t *item) /* {{{ */
 526 {
 527   char *buffer = NULL;
 528   size_t buffer_size = 0;
 529   int status;
 530
 531   char *dummy;
 532
 533   char *keys_list;
 534   char *key;
 535   char *key_saveptr;
 536   char *value;
 537   char *value_saveptr;
 538
 539   status = powerdns_get_data (item, &buffer, &buffer_size);
 540   if (status != 0)
 541     return (-1);
 542
 543   keys_list = strdup (item->command);
 544   if (keys_list == NULL)
 545   {
 546     FUNC_ERROR ("strdup");
 547     sfree (buffer);
 548     return (-1);
 549   }
 550
 551   key_saveptr = NULL;
 552   value_saveptr = NULL;
 553
 554   /* Skip the `get' at the beginning */
 555   strtok_r (keys_list, " \t", &key_saveptr);
 556
 557   dummy = buffer;
 558   while ((value = strtok_r (dummy, " \t\n\r", &value_saveptr)) != NULL)
 559   {
 560     dummy = NULL;
 561
 562     key = strtok_r (NULL, " \t", &key_saveptr);
 563     if (key == NULL)
 564       break;
 565
 566     submit (item->instance, key, value);
 567   } /* while (strtok_r) */
 568
 569   sfree (buffer);
 570   sfree (keys_list);
 571
 572   return (0);
 573 } /* }}} int powerdns_read_recursor */
 574
 575 static int powerdns_config_add_string (const char *name, /* {{{ */
 576     char **dest,
 577     oconfig_item_t *ci)
 578 {
 579   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
 580   {
 581     WARNING ("powerdns plugin: `%s' needs exactly one string argument.",
 582         name);
 583     return (-1);
 584   }
 585
 586   sfree (*dest);
 587   *dest = strdup (ci->values[0].value.string);
 588   if (*dest == NULL)
 589     return (-1);
 590
 591   return (0);
 592 } /* }}} int ctail_config_add_string */
 593
 594 static int powerdns_config_add_server (oconfig_item_t *ci) /* {{{ */
 595 {
 596   char *socket_temp;
 597
 598   list_item_t *item;
 599   int status;
 600   int i;
 601
 602   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
 603   {
 604     WARNING ("powerdns plugin: `%s' needs exactly one string argument.",
 605         ci->key);
 606     return (-1);
 607   }
 608
 609   item = (list_item_t *) malloc (sizeof (list_item_t));
 610   if (item == NULL)
 611   {
 612     ERROR ("powerdns plugin: malloc failed.");
 613     return (-1);
 614   }
 615   memset (item, '\0', sizeof (list_item_t));
 616
 617   item->instance = strdup (ci->values[0].value.string);
 618   if (item->instance == NULL)
 619   {
 620     ERROR ("powerdns plugin: strdup failed.");
 621     sfree (item);
 622     return (-1);
 623   }
 624
 625   /*
 626    * Set default values for the members of list_item_t
 627    */
 628   if (strcasecmp ("Server", ci->key) == 0)
 629   {
 630     item->func = powerdns_read_server;
 631     item->command = strdup (SERVER_COMMAND);
 632     item->socktype = SOCK_STREAM;
 633     socket_temp = strdup (SERVER_SOCKET);
 634   }
 635   else if (strcasecmp ("Recursor", ci->key) == 0)
 636   {
 637     item->func = powerdns_read_recursor;
 638     item->command = strdup (RECURSOR_COMMAND);
 639     item->socktype = SOCK_DGRAM;
 640     socket_temp = strdup (RECURSOR_SOCKET);
 641   }
 642
 643   status = 0;
 644   for (i = 0; i < ci->children_num; i++)
 645   {
 646     oconfig_item_t *option = ci->children + i;
 647
 648     if (strcasecmp ("Command", option->key) == 0)
 649       status = powerdns_config_add_string ("Command", &item->command, option);
 650     else if (strcasecmp ("Socket", option->key) == 0)
 651       status = powerdns_config_add_string ("Socket", &socket_temp, option);
 652     else
 653     {
 654       ERROR ("powerdns plugin: Option `%s' not allowed here.", option->key);
 655       status = -1;
 656     }
 657
 658     if (status != 0)
 659       break;
 660   }
 661
 662   while (status == 0)
 663   {
 664     llentry_t *e;
 665
 666     if (socket_temp == NULL)
 667     {
 668       ERROR ("powerdns plugin: socket_temp == NULL.");
 669       status = -1;
 670       break;
 671     }
 672
 673     if (item->command == NULL)
 674     {
 675       ERROR ("powerdns plugin: item->command == NULL.");
 676       status = -1;
 677       break;
 678     }
 679
 680     item->sockaddr.sun_family = AF_UNIX;
 681     sstrncpy (item->sockaddr.sun_path, socket_temp, UNIX_PATH_MAX);
 682
 683     e = llentry_create (item->instance, item);
 684     if (e == NULL)
 685     {
 686       ERROR ("powerdns plugin: llentry_create failed.");
 687       status = -1;
 688       break;
 689     }
 690     llist_append (list, e);
 691
 692     break;
 693   }
 694
 695   if (status != 0)
 696   {
 697     sfree (item);
 698     return (-1);
 699   }
 700
 701   DEBUG ("powerdns plugin: Add server: instance = %s;", item->instance);
 702
 703   return (0);
 704 } /* }}} int powerdns_config_add_server */
 705
 706 static int powerdns_config (oconfig_item_t *ci) /* {{{ */
 707 {
 708   int i;
 709
 710   DEBUG ("powerdns plugin: powerdns_config (ci = %p);", (void *) ci);
 711
 712   if (list == NULL)
 713   {
 714     list = llist_create ();
 715
 716     if (list == NULL)
 717     {
 718       ERROR ("powerdns plugin: `llist_create' failed.");
 719       return (-1);
 720     }
 721   }
 722
 723   for (i = 0; i < ci->children_num; i++)
 724   {
 725     oconfig_item_t *option = ci->children + i;
 726
 727     if ((strcasecmp ("Server", option->key) == 0)
 728         || (strcasecmp ("Recursor", option->key) == 0))
 729       powerdns_config_add_server (option);
 730     if (strcasecmp ("LocalSocket", option->key) == 0)
 731     {
 732       char *temp = strdup (option->key);
 733       if (temp == NULL)
 734         return (1);
 735       sfree (local_sockpath);
 736       local_sockpath = temp;
 737     }
 738     else
 739     {
 740       ERROR ("powerdns plugin: Option `%s' not allowed here.", option->key);
 741     }
 742   } /* for (i = 0; i < ci->children_num; i++) */
 743
 744   return (0);
 745 } /* }}} int powerdns_config */
 746
 747 static int powerdns_read (void)
 748 {
 749   llentry_t *e;
 750
 751   for (e = llist_head (list); e != NULL; e = e->next)
 752   {
 753     list_item_t *item = e->value;
 754     item->func (item);
 755   }
 756
 757   return (0);
 758 } /* static int powerdns_read */
 759
 760 static int powerdns_shutdown (void)
 761 {
 762   llentry_t *e;
 763
 764   if (list == NULL)
 765     return (0);
 766
 767   for (e = llist_head (list); e != NULL; e = e->next)
 768   {
 769     list_item_t *item = (list_item_t *) e->value;
 770     e->value = NULL;
 771
 772     sfree (item->instance);
 773     sfree (item->command);
 774     sfree (item);
 775   }
 776
 777   llist_destroy (list);
 778   list = NULL;
 779
 780   return (0);
 781 } /* static int powerdns_shutdown */
 782
 783 void module_register (void)
 784 {
 785   plugin_register_complex_config ("powerdns", powerdns_config);
 786   plugin_register_read ("powerdns", powerdns_read);
 787   plugin_register_shutdown ("powerdns", powerdns_shutdown );
 788 } /* void module_register */
 789
 790 /* vim: set sw=2 sts=2 ts=8 fdm=marker : */