src/curl.c

   1 /**
   2  * collectd - src/curl.c
   3  * Copyright (C) 2006-2009  Florian octo Forster
   4  * Copyright (C) 2009       Aman Gupta
   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  * Authors:
  20  *   Florian octo Forster <octo at collectd.org>
  21  *   Aman Gupta <aman at tmm1.net>
  22  **/
  23
  24 #include "collectd.h"
  25 #include "common.h"
  26 #include "plugin.h"
  27 #include "configfile.h"
  28 #include "utils_match.h"
  29 #include "utils_time.h"
  30
  31 #include <curl/curl.h>
  32
  33 /*
  34  * Data types
  35  */
  36 struct web_match_s;
  37 typedef struct web_match_s web_match_t;
  38 struct web_match_s /* {{{ */
  39 {
  40   char *regex;
  41   char *exclude_regex;
  42   int dstype;
  43   char *type;
  44   char *instance;
  45
  46   cu_match_t *match;
  47
  48   web_match_t *next;
  49 }; /* }}} */
  50
  51 struct web_page_s;
  52 typedef struct web_page_s web_page_t;
  53 struct web_page_s /* {{{ */
  54 {
  55   char *instance;
  56
  57   char *url;
  58   char *user;
  59   char *pass;
  60   char *credentials;
  61   _Bool digest;
  62   _Bool verify_peer;
  63   _Bool verify_host;
  64   char *cacert;
  65   struct curl_slist *headers;
  66   char *post_body;
  67   _Bool response_time;
  68   _Bool response_code;
  69
  70   CURL *curl;
  71   char curl_errbuf[CURL_ERROR_SIZE];
  72   char *buffer;
  73   size_t buffer_size;
  74   size_t buffer_fill;
  75
  76   web_match_t *matches;
  77
  78   web_page_t *next;
  79 }; /* }}} */
  80
  81 /*
  82  * Global variables;
  83  */
  84 /* static CURLM *curl = NULL; */
  85 static web_page_t *pages_g = NULL;
  86
  87 /*
  88  * Private functions
  89  */
  90 static size_t cc_curl_callback (void *buf, /* {{{ */
  91     size_t size, size_t nmemb, void *user_data)
  92 {
  93   web_page_t *wp;
  94   size_t len;
  95
  96   len = size * nmemb;
  97   if (len <= 0)
  98     return (len);
  99
 100   wp = user_data;
 101   if (wp == NULL)
 102     return (0);
 103
 104   if ((wp->buffer_fill + len) >= wp->buffer_size)
 105   {
 106     char *temp;
 107     size_t temp_size;
 108
 109     temp_size = wp->buffer_fill + len + 1;
 110     temp = (char *) realloc (wp->buffer, temp_size);
 111     if (temp == NULL)
 112     {
 113       ERROR ("curl plugin: realloc failed.");
 114       return (0);
 115     }
 116     wp->buffer = temp;
 117     wp->buffer_size = temp_size;
 118   }
 119
 120   memcpy (wp->buffer + wp->buffer_fill, (char *) buf, len);
 121   wp->buffer_fill += len;
 122   wp->buffer[wp->buffer_fill] = 0;
 123
 124   return (len);
 125 } /* }}} size_t cc_curl_callback */
 126
 127 static void cc_web_match_free (web_match_t *wm) /* {{{ */
 128 {
 129   if (wm == NULL)
 130     return;
 131
 132   sfree (wm->regex);
 133   sfree (wm->type);
 134   sfree (wm->instance);
 135   match_destroy (wm->match);
 136   cc_web_match_free (wm->next);
 137   sfree (wm);
 138 } /* }}} void cc_web_match_free */
 139
 140 static void cc_web_page_free (web_page_t *wp) /* {{{ */
 141 {
 142   if (wp == NULL)
 143     return;
 144
 145   if (wp->curl != NULL)
 146     curl_easy_cleanup (wp->curl);
 147   wp->curl = NULL;
 148
 149   sfree (wp->instance);
 150
 151   sfree (wp->url);
 152   sfree (wp->user);
 153   sfree (wp->pass);
 154   sfree (wp->credentials);
 155   sfree (wp->cacert);
 156   sfree (wp->post_body);
 157   curl_slist_free_all (wp->headers);
 158
 159   sfree (wp->buffer);
 160
 161   cc_web_match_free (wp->matches);
 162   cc_web_page_free (wp->next);
 163   sfree (wp);
 164 } /* }}} void cc_web_page_free */
 165
 166 static int cc_config_append_string (const char *name, struct curl_slist **dest, /* {{{ */
 167     oconfig_item_t *ci)
 168 {
 169   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
 170   {
 171     WARNING ("curl plugin: `%s' needs exactly one string argument.", name);
 172     return (-1);
 173   }
 174
 175   *dest = curl_slist_append(*dest, ci->values[0].value.string);
 176   if (*dest == NULL)
 177     return (-1);
 178
 179   return (0);
 180 } /* }}} int cc_config_append_string */
 181
 182 static int cc_config_add_match_dstype (int *dstype_ret, /* {{{ */
 183     oconfig_item_t *ci)
 184 {
 185   int dstype;
 186
 187   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
 188   {
 189     WARNING ("curl plugin: `DSType' needs exactly one string argument.");
 190     return (-1);
 191   }
 192
 193   if (strncasecmp ("Gauge", ci->values[0].value.string,
 194         strlen ("Gauge")) == 0)
 195   {
 196     dstype = UTILS_MATCH_DS_TYPE_GAUGE;
 197     if (strcasecmp ("GaugeAverage", ci->values[0].value.string) == 0)
 198       dstype |= UTILS_MATCH_CF_GAUGE_AVERAGE;
 199     else if (strcasecmp ("GaugeMin", ci->values[0].value.string) == 0)
 200       dstype |= UTILS_MATCH_CF_GAUGE_MIN;
 201     else if (strcasecmp ("GaugeMax", ci->values[0].value.string) == 0)
 202       dstype |= UTILS_MATCH_CF_GAUGE_MAX;
 203     else if (strcasecmp ("GaugeLast", ci->values[0].value.string) == 0)
 204       dstype |= UTILS_MATCH_CF_GAUGE_LAST;
 205     else
 206       dstype = 0;
 207   }
 208   else if (strncasecmp ("Counter", ci->values[0].value.string,
 209         strlen ("Counter")) == 0)
 210   {
 211     dstype = UTILS_MATCH_DS_TYPE_COUNTER;
 212     if (strcasecmp ("CounterSet", ci->values[0].value.string) == 0)
 213       dstype |= UTILS_MATCH_CF_COUNTER_SET;
 214     else if (strcasecmp ("CounterAdd", ci->values[0].value.string) == 0)
 215       dstype |= UTILS_MATCH_CF_COUNTER_ADD;
 216     else if (strcasecmp ("CounterInc", ci->values[0].value.string) == 0)
 217       dstype |= UTILS_MATCH_CF_COUNTER_INC;
 218     else
 219       dstype = 0;
 220   }
 221 else if (strncasecmp ("Derive", ci->values[0].value.string,
 222         strlen ("Derive")) == 0)
 223   {
 224     dstype = UTILS_MATCH_DS_TYPE_DERIVE;
 225     if (strcasecmp ("DeriveSet", ci->values[0].value.string) == 0)
 226       dstype |= UTILS_MATCH_CF_DERIVE_SET;
 227     else if (strcasecmp ("DeriveAdd", ci->values[0].value.string) == 0)
 228       dstype |= UTILS_MATCH_CF_DERIVE_ADD;
 229     else if (strcasecmp ("DeriveInc", ci->values[0].value.string) == 0)
 230       dstype |= UTILS_MATCH_CF_DERIVE_INC;
 231     else
 232       dstype = 0;
 233   }
 234 else if (strncasecmp ("Absolute", ci->values[0].value.string,
 235         strlen ("Absolute")) == 0)
 236   {
 237     dstype = UTILS_MATCH_DS_TYPE_ABSOLUTE;
 238     if (strcasecmp ("AbsoluteSet", ci->values[0].value.string) == 0) /* Absolute DS is reset-on-read so no sense doin anything else but set */
 239       dstype |= UTILS_MATCH_CF_ABSOLUTE_SET;
 240     else
 241       dstype = 0;
 242   }
 243
 244   else
 245   {
 246     dstype = 0;
 247   }
 248
 249   if (dstype == 0)
 250   {
 251     WARNING ("curl plugin: `%s' is not a valid argument to `DSType'.",
 252         ci->values[0].value.string);
 253     return (-1);
 254   }
 255
 256   *dstype_ret = dstype;
 257   return (0);
 258 } /* }}} int cc_config_add_match_dstype */
 259
 260 static int cc_config_add_match (web_page_t *page, /* {{{ */
 261     oconfig_item_t *ci)
 262 {
 263   web_match_t *match;
 264   int status;
 265   int i;
 266
 267   if (ci->values_num != 0)
 268   {
 269     WARNING ("curl plugin: Ignoring arguments for the `Match' block.");
 270   }
 271
 272   match = (web_match_t *) malloc (sizeof (*match));
 273   if (match == NULL)
 274   {
 275     ERROR ("curl plugin: malloc failed.");
 276     return (-1);
 277   }
 278   memset (match, 0, sizeof (*match));
 279
 280   status = 0;
 281   for (i = 0; i < ci->children_num; i++)
 282   {
 283     oconfig_item_t *child = ci->children + i;
 284
 285     if (strcasecmp ("Regex", child->key) == 0)
 286       status = cf_util_get_string (child, &match->regex);
 287     else if (strcasecmp ("ExcludeRegex", child->key) == 0)
 288       status = cf_util_get_string (child, &match->exclude_regex);
 289     else if (strcasecmp ("DSType", child->key) == 0)
 290       status = cc_config_add_match_dstype (&match->dstype, child);
 291     else if (strcasecmp ("Type", child->key) == 0)
 292       status = cf_util_get_string (child, &match->type);
 293     else if (strcasecmp ("Instance", child->key) == 0)
 294       status = cf_util_get_string (child, &match->instance);
 295     else
 296     {
 297       WARNING ("curl plugin: Option `%s' not allowed here.", child->key);
 298       status = -1;
 299     }
 300
 301     if (status != 0)
 302       break;
 303   } /* for (i = 0; i < ci->children_num; i++) */
 304
 305   while (status == 0)
 306   {
 307     if (match->regex == NULL)
 308     {
 309       WARNING ("curl plugin: `Regex' missing in `Match' block.");
 310       status = -1;
 311     }
 312
 313     if (match->type == NULL)
 314     {
 315       WARNING ("curl plugin: `Type' missing in `Match' block.");
 316       status = -1;
 317     }
 318
 319     if (match->dstype == 0)
 320     {
 321       WARNING ("curl plugin: `DSType' missing in `Match' block.");
 322       status = -1;
 323     }
 324
 325     break;
 326   } /* while (status == 0) */
 327
 328   if (status != 0)
 329     return (status);
 330
 331   match->match = match_create_simple (match->regex, match->exclude_regex,
 332       match->dstype);
 333   if (match->match == NULL)
 334   {
 335     ERROR ("curl plugin: tail_match_add_match_simple failed.");
 336     cc_web_match_free (match);
 337     return (-1);
 338   }
 339   else
 340   {
 341     web_match_t *prev;
 342
 343     prev = page->matches;
 344     while ((prev != NULL) && (prev->next != NULL))
 345       prev = prev->next;
 346
 347     if (prev == NULL)
 348       page->matches = match;
 349     else
 350       prev->next = match;
 351   }
 352
 353   return (0);
 354 } /* }}} int cc_config_add_match */
 355
 356 static int cc_page_init_curl (web_page_t *wp) /* {{{ */
 357 {
 358   wp->curl = curl_easy_init ();
 359   if (wp->curl == NULL)
 360   {
 361     ERROR ("curl plugin: curl_easy_init failed.");
 362     return (-1);
 363   }
 364
 365   curl_easy_setopt (wp->curl, CURLOPT_NOSIGNAL, 1L);
 366   curl_easy_setopt (wp->curl, CURLOPT_WRITEFUNCTION, cc_curl_callback);
 367   curl_easy_setopt (wp->curl, CURLOPT_WRITEDATA, wp);
 368   curl_easy_setopt (wp->curl, CURLOPT_USERAGENT, COLLECTD_USERAGENT);
 369   curl_easy_setopt (wp->curl, CURLOPT_ERRORBUFFER, wp->curl_errbuf);
 370   curl_easy_setopt (wp->curl, CURLOPT_URL, wp->url);
 371   curl_easy_setopt (wp->curl, CURLOPT_FOLLOWLOCATION, 1L);
 372   curl_easy_setopt (wp->curl, CURLOPT_MAXREDIRS, 50L);
 373
 374   if (wp->user != NULL)
 375   {
 376 #ifdef HAVE_CURLOPT_USERNAME
 377     curl_easy_setopt (wp->curl, CURLOPT_USERNAME, wp->user);
 378     curl_easy_setopt (wp->curl, CURLOPT_PASSWORD,
 379         (wp->pass == NULL) ? "" : wp->pass);
 380 #else
 381     size_t credentials_size;
 382
 383     credentials_size = strlen (wp->user) + 2;
 384     if (wp->pass != NULL)
 385       credentials_size += strlen (wp->pass);
 386
 387     wp->credentials = (char *) malloc (credentials_size);
 388     if (wp->credentials == NULL)
 389     {
 390       ERROR ("curl plugin: malloc failed.");
 391       return (-1);
 392     }
 393
 394     ssnprintf (wp->credentials, credentials_size, "%s:%s",
 395         wp->user, (wp->pass == NULL) ? "" : wp->pass);
 396     curl_easy_setopt (wp->curl, CURLOPT_USERPWD, wp->credentials);
 397 #endif
 398
 399     if (wp->digest)
 400       curl_easy_setopt (wp->curl, CURLOPT_HTTPAUTH, CURLAUTH_DIGEST);
 401   }
 402
 403   curl_easy_setopt (wp->curl, CURLOPT_SSL_VERIFYPEER, (long) wp->verify_peer);
 404   curl_easy_setopt (wp->curl, CURLOPT_SSL_VERIFYHOST,
 405       wp->verify_host ? 2L : 0L);
 406   if (wp->cacert != NULL)
 407     curl_easy_setopt (wp->curl, CURLOPT_CAINFO, wp->cacert);
 408   if (wp->headers != NULL)
 409     curl_easy_setopt (wp->curl, CURLOPT_HTTPHEADER, wp->headers);
 410   if (wp->post_body != NULL)
 411     curl_easy_setopt (wp->curl, CURLOPT_POSTFIELDS, wp->post_body);
 412
 413   return (0);
 414 } /* }}} int cc_page_init_curl */
 415
 416 static int cc_config_add_page (oconfig_item_t *ci) /* {{{ */
 417 {
 418   web_page_t *page;
 419   int status;
 420   int i;
 421
 422   if ((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
 423   {
 424     WARNING ("curl plugin: `Page' blocks need exactly one string argument.");
 425     return (-1);
 426   }
 427
 428   page = (web_page_t *) malloc (sizeof (*page));
 429   if (page == NULL)
 430   {
 431     ERROR ("curl plugin: malloc failed.");
 432     return (-1);
 433   }
 434   memset (page, 0, sizeof (*page));
 435   page->url = NULL;
 436   page->user = NULL;
 437   page->pass = NULL;
 438   page->digest = 0;
 439   page->verify_peer = 1;
 440   page->verify_host = 1;
 441   page->response_time = 0;
 442   page->response_code = 0;
 443
 444   page->instance = strdup (ci->values[0].value.string);
 445   if (page->instance == NULL)
 446   {
 447     ERROR ("curl plugin: strdup failed.");
 448     sfree (page);
 449     return (-1);
 450   }
 451
 452   /* Process all children */
 453   status = 0;
 454   for (i = 0; i < ci->children_num; i++)
 455   {
 456     oconfig_item_t *child = ci->children + i;
 457
 458     if (strcasecmp ("URL", child->key) == 0)
 459       status = cf_util_get_string (child, &page->url);
 460     else if (strcasecmp ("User", child->key) == 0)
 461       status = cf_util_get_string (child, &page->user);
 462     else if (strcasecmp ("Password", child->key) == 0)
 463       status = cf_util_get_string (child, &page->pass);
 464     else if (strcasecmp ("Digest", child->key) == 0)
 465       status = cf_util_get_boolean (child, &page->digest);
 466     else if (strcasecmp ("VerifyPeer", child->key) == 0)
 467       status = cf_util_get_boolean (child, &page->verify_peer);
 468     else if (strcasecmp ("VerifyHost", child->key) == 0)
 469       status = cf_util_get_boolean (child, &page->verify_host);
 470     else if (strcasecmp ("MeasureResponseTime", child->key) == 0)
 471       status = cf_util_get_boolean (child, &page->response_time);
 472     else if (strcasecmp ("MeasureResponseCode", child->key) == 0)
 473       status = cf_util_get_boolean (child, &page->response_code);
 474     else if (strcasecmp ("CACert", child->key) == 0)
 475       status = cf_util_get_string (child, &page->cacert);
 476     else if (strcasecmp ("Match", child->key) == 0)
 477       /* Be liberal with failing matches => don't set `status'. */
 478       cc_config_add_match (page, child);
 479     else if (strcasecmp ("Header", child->key) == 0)
 480       status = cc_config_append_string ("Header", &page->headers, child);
 481     else if (strcasecmp ("Post", child->key) == 0)
 482       status = cf_util_get_string (child, &page->post_body);
 483     else
 484     {
 485       WARNING ("curl plugin: Option `%s' not allowed here.", child->key);
 486       status = -1;
 487     }
 488
 489     if (status != 0)
 490       break;
 491   } /* for (i = 0; i < ci->children_num; i++) */
 492
 493   /* Additionial sanity checks and libCURL initialization. */
 494   while (status == 0)
 495   {
 496     if (page->url == NULL)
 497     {
 498       WARNING ("curl plugin: `URL' missing in `Page' block.");
 499       status = -1;
 500     }
 501
 502     if (page->matches == NULL && !page->response_time && !page->response_code)
 503     {
 504       assert (page->instance != NULL);
 505       WARNING ("curl plugin: No (valid) `Match' block "
 506           "or MeasureResponseTime or MeasureResponseCode within "
 507           "`Page' block `%s'.", page->instance);
 508       status = -1;
 509     }
 510
 511     if (status == 0)
 512       status = cc_page_init_curl (page);
 513
 514     break;
 515   } /* while (status == 0) */
 516
 517   if (status != 0)
 518   {
 519     cc_web_page_free (page);
 520     return (status);
 521   }
 522
 523   /* Add the new page to the linked list */
 524   if (pages_g == NULL)
 525     pages_g = page;
 526   else
 527   {
 528     web_page_t *prev;
 529
 530     prev = pages_g;
 531     while ((prev != NULL) && (prev->next != NULL))
 532       prev = prev->next;
 533     prev->next = page;
 534   }
 535
 536   return (0);
 537 } /* }}} int cc_config_add_page */
 538
 539 static int cc_config (oconfig_item_t *ci) /* {{{ */
 540 {
 541   int success;
 542   int errors;
 543   int status;
 544   int i;
 545
 546   success = 0;
 547   errors = 0;
 548
 549   for (i = 0; i < ci->children_num; i++)
 550   {
 551     oconfig_item_t *child = ci->children + i;
 552
 553     if (strcasecmp ("Page", child->key) == 0)
 554     {
 555       status = cc_config_add_page (child);
 556       if (status == 0)
 557         success++;
 558       else
 559         errors++;
 560     }
 561     else
 562     {
 563       WARNING ("curl plugin: Option `%s' not allowed here.", child->key);
 564       errors++;
 565     }
 566   }
 567
 568   if ((success == 0) && (errors > 0))
 569   {
 570     ERROR ("curl plugin: All statements failed.");
 571     return (-1);
 572   }
 573
 574   return (0);
 575 } /* }}} int cc_config */
 576
 577 static int cc_init (void) /* {{{ */
 578 {
 579   if (pages_g == NULL)
 580   {
 581     INFO ("curl plugin: No pages have been defined.");
 582     return (-1);
 583   }
 584   curl_global_init (CURL_GLOBAL_SSL);
 585   return (0);
 586 } /* }}} int cc_init */
 587
 588 static void cc_submit (const web_page_t *wp, const web_match_t *wm, /* {{{ */
 589     const cu_match_value_t *mv)
 590 {
 591   value_t values[1];
 592   value_list_t vl = VALUE_LIST_INIT;
 593
 594   values[0] = mv->value;
 595
 596   vl.values = values;
 597   vl.values_len = 1;
 598   sstrncpy (vl.host, hostname_g, sizeof (vl.host));
 599   sstrncpy (vl.plugin, "curl", sizeof (vl.plugin));
 600   sstrncpy (vl.plugin_instance, wp->instance, sizeof (vl.plugin_instance));
 601   sstrncpy (vl.type, wm->type, sizeof (vl.type));
 602   if (wm->instance != NULL)
 603     sstrncpy (vl.type_instance, wm->instance, sizeof (vl.type_instance));
 604
 605   plugin_dispatch_values (&vl);
 606 } /* }}} void cc_submit */
 607
 608 static void cc_submit_response_code (const web_page_t *wp, long code) /* {{{ */
 609 {
 610   value_t values[1];
 611   value_list_t vl = VALUE_LIST_INIT;
 612
 613   values[0].gauge = code;
 614
 615   vl.values = values;
 616   vl.values_len = 1;
 617   sstrncpy (vl.host, hostname_g, sizeof (vl.host));
 618   sstrncpy (vl.plugin, "curl", sizeof (vl.plugin));
 619   sstrncpy (vl.plugin_instance, wp->instance, sizeof (vl.plugin_instance));
 620   sstrncpy (vl.type, "response_code", sizeof (vl.type));
 621
 622   plugin_dispatch_values (&vl);
 623 } /* }}} void cc_submit_response_code */
 624
 625 static void cc_submit_response_time (const web_page_t *wp, /* {{{ */
 626     cdtime_t response_time)
 627 {
 628   value_t values[1];
 629   value_list_t vl = VALUE_LIST_INIT;
 630
 631   values[0].gauge = CDTIME_T_TO_DOUBLE (response_time);
 632
 633   vl.values = values;
 634   vl.values_len = 1;
 635   sstrncpy (vl.host, hostname_g, sizeof (vl.host));
 636   sstrncpy (vl.plugin, "curl", sizeof (vl.plugin));
 637   sstrncpy (vl.plugin_instance, wp->instance, sizeof (vl.plugin_instance));
 638   sstrncpy (vl.type, "response_time", sizeof (vl.type));
 639
 640   plugin_dispatch_values (&vl);
 641 } /* }}} void cc_submit_response_time */
 642
 643 static int cc_read_page (web_page_t *wp) /* {{{ */
 644 {
 645   web_match_t *wm;
 646   int status;
 647   cdtime_t start = 0;
 648
 649   if (wp->response_time)
 650     start = cdtime ();
 651
 652   wp->buffer_fill = 0;
 653   status = curl_easy_perform (wp->curl);
 654   if (status != CURLE_OK)
 655   {
 656     ERROR ("curl plugin: curl_easy_perform failed with staus %i: %s",
 657         status, wp->curl_errbuf);
 658     return (-1);
 659   }
 660
 661   if (wp->response_time)
 662     cc_submit_response_time (wp, cdtime() - start);
 663
 664   if(wp->response_code)
 665   {
 666     long response_code = 0;
 667     status = curl_easy_getinfo(wp->curl, CURLINFO_RESPONSE_CODE, &response_code);
 668     if(status != CURLE_OK) {
 669       ERROR ("curl plugin: Fetching response code failed with staus %i: %s",
 670         status, wp->curl_errbuf);
 671     } else {
 672       cc_submit_response_code(wp, response_code);
 673     }
 674   }
 675
 676   for (wm = wp->matches; wm != NULL; wm = wm->next)
 677   {
 678     cu_match_value_t *mv;
 679
 680     status = match_apply (wm->match, wp->buffer);
 681     if (status != 0)
 682     {
 683       WARNING ("curl plugin: match_apply failed.");
 684       continue;
 685     }
 686
 687     mv = match_get_user_data (wm->match);
 688     if (mv == NULL)
 689     {
 690       WARNING ("curl plugin: match_get_user_data returned NULL.");
 691       continue;
 692     }
 693
 694     cc_submit (wp, wm, mv);
 695     match_value_reset (mv);
 696   } /* for (wm = wp->matches; wm != NULL; wm = wm->next) */
 697
 698   return (0);
 699 } /* }}} int cc_read_page */
 700
 701 static int cc_read (void) /* {{{ */
 702 {
 703   web_page_t *wp;
 704
 705   for (wp = pages_g; wp != NULL; wp = wp->next)
 706     cc_read_page (wp);
 707
 708   return (0);
 709 } /* }}} int cc_read */
 710
 711 static int cc_shutdown (void) /* {{{ */
 712 {
 713   cc_web_page_free (pages_g);
 714   pages_g = NULL;
 715
 716   return (0);
 717 } /* }}} int cc_shutdown */
 718
 719 void module_register (void)
 720 {
 721   plugin_register_complex_config ("curl", cc_config);
 722   plugin_register_init ("curl", cc_init);
 723   plugin_register_read ("curl", cc_read);
 724   plugin_register_shutdown ("curl", cc_shutdown);
 725 } /* void module_register */
 726
 727 /* vim: set sw=2 sts=2 et fdm=marker : */