src/ceph.c

   1 /**
   2  * collectd - src/ceph.c
   3  * Copyright (C) 2011  New Dream Network
   4  *
   5  * This program is free software; you can redistribute it and/or modify it
   6  * under the terms of the GNU General Public License as published by the
   7  * Free Software Foundation; only version 2 of the License is applicable.
   8  *
   9  * This program is distributed in the hope that it will be useful, but
  10  * WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License along
  15  * with this program; if not, write to the Free Software Foundation, Inc.,
  16  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  17  *
  18  * Authors:
  19  *   Colin McCabe <cmccabe@alumni.cmu.edu>
  20  *   Dennis Zou <yunzou@cisco.com>
  21  *   Dan Ryder <daryder@cisco.com>
  22  **/
  23
  24 #define _BSD_SOURCE
  25
  26 #include "collectd.h"
  27 #include "common.h"
  28 #include "plugin.h"
  29
  30 #include <arpa/inet.h>
  31 #include <errno.h>
  32 #include <fcntl.h>
  33 #include <yajl/yajl_parse.h>
  34 #if HAVE_YAJL_YAJL_VERSION_H
  35 #include <yajl/yajl_version.h>
  36 #endif
  37
  38 #include <limits.h>
  39 #include <poll.h>
  40 #include <stdint.h>
  41 #include <stdio.h>
  42 #include <stdlib.h>
  43 #include <string.h>
  44 #include <strings.h>
  45 #include <sys/socket.h>
  46 #include <sys/time.h>
  47 #include <sys/types.h>
  48 #include <sys/un.h>
  49 #include <unistd.h>
  50 #include <math.h>
  51 #include <inttypes.h>
  52
  53 #define RETRY_AVGCOUNT -1
  54
  55 #if defined(YAJL_MAJOR) && (YAJL_MAJOR > 1)
  56 # define HAVE_YAJL_V2 1
  57 #endif
  58
  59 #define RETRY_ON_EINTR(ret, expr) \
  60     while(1) { \
  61         ret = expr; \
  62         if(ret >= 0) \
  63             break; \
  64         ret = -errno; \
  65         if(ret != -EINTR) \
  66             break; \
  67     }
  68
  69 /** Timeout interval in seconds */
  70 #define CEPH_TIMEOUT_INTERVAL 1
  71
  72 /** Maximum path length for a UNIX domain socket on this system */
  73 #define UNIX_DOMAIN_SOCK_PATH_MAX (sizeof(((struct sockaddr_un*)0)->sun_path))
  74
  75 /** Yajl callback returns */
  76 #define CEPH_CB_CONTINUE 1
  77 #define CEPH_CB_ABORT 0
  78
  79 #if HAVE_YAJL_V2
  80 typedef size_t yajl_len_t;
  81 #else
  82 typedef unsigned int yajl_len_t;
  83 #endif
  84
  85 /** Number of types for ceph defined in types.db */
  86 #define CEPH_DSET_TYPES_NUM 3
  87 /** ceph types enum */
  88 enum ceph_dset_type_d
  89 {
  90     DSET_LATENCY = 0,
  91     DSET_BYTES = 1,
  92     DSET_RATE = 2,
  93     DSET_TYPE_UNFOUND = 1000
  94 };
  95
  96 /** Valid types for ceph defined in types.db */
  97 const char * ceph_dset_types [CEPH_DSET_TYPES_NUM] =
  98                                    {"ceph_latency", "ceph_bytes", "ceph_rate"};
  99
 100 /******* ceph_daemon *******/
 101 struct ceph_daemon
 102 {
 103     /** Version of the admin_socket interface */
 104     uint32_t version;
 105     /** daemon name **/
 106     char name[DATA_MAX_NAME_LEN];
 107
 108     /** Path to the socket that we use to talk to the ceph daemon */
 109     char asok_path[UNIX_DOMAIN_SOCK_PATH_MAX];
 110
 111     /** Number of counters */
 112     int ds_num;
 113     /** Track ds types */
 114     uint32_t *ds_types;
 115     /** Track ds names to match with types */
 116     char **ds_names;
 117
 118     /**
 119      * Keep track of last data for latency values so we can calculate rate
 120      * since last poll.
 121      */
 122     struct last_data **last_poll_data;
 123     /** index of last poll data */
 124     int last_idx;
 125 };
 126
 127 /******* JSON parsing *******/
 128 typedef int (*node_handler_t)(void *, const char*, const char*);
 129
 130 /** Track state and handler while parsing JSON */
 131 struct yajl_struct
 132 {
 133     node_handler_t handler;
 134     void * handler_arg;
 135     struct {
 136       char key[DATA_MAX_NAME_LEN];
 137       int key_len;
 138     } state[YAJL_MAX_DEPTH];
 139     int depth;
 140 };
 141 typedef struct yajl_struct yajl_struct;
 142
 143 enum perfcounter_type_d
 144 {
 145     PERFCOUNTER_LATENCY = 0x4, PERFCOUNTER_DERIVE = 0x8,
 146 };
 147
 148 /** Give user option to use default (long run = since daemon started) avg */
 149 static int long_run_latency_avg = 0;
 150
 151 /**
 152  * Give user option to use default type for special cases -
 153  * filestore.journal_wr_bytes is currently only metric here. Ceph reports the
 154  * type as a sum/count pair and will calculate it the same as a latency value.
 155  * All other "bytes" metrics (excluding the used/capacity bytes for the OSD)
 156  * use the DERIVE type. Unless user specifies to use given type, convert this
 157  * metric to use DERIVE.
 158  */
 159 static int convert_special_metrics = 1;
 160
 161 /** Array of daemons to monitor */
 162 static struct ceph_daemon **g_daemons = NULL;
 163
 164 /** Number of elements in g_daemons */
 165 static int g_num_daemons = 0;
 166
 167 /**
 168  * A set of data that we build up in memory while parsing the JSON.
 169  */
 170 struct values_tmp
 171 {
 172     /** ceph daemon we are processing data for*/
 173     struct ceph_daemon *d;
 174     /** track avgcount across counters for avgcount/sum latency pairs */
 175     uint64_t avgcount;
 176     /** current index of counters - used to get type of counter */
 177     int index;
 178     /** do we already have an avgcount for latency pair */
 179     int avgcount_exists;
 180     /**
 181      * similar to index, but current index of latency type counters -
 182      * used to get last poll data of counter
 183      */
 184     int latency_index;
 185     /**
 186      * values list - maintain across counters since
 187      * host/plugin/plugin instance are always the same
 188      */
 189     value_list_t vlist;
 190 };
 191
 192 /**
 193  * A set of count/sum pairs to keep track of latency types and get difference
 194  * between this poll data and last poll data.
 195  */
 196 struct last_data
 197 {
 198     char ds_name[DATA_MAX_NAME_LEN];
 199     double last_sum;
 200     uint64_t last_count;
 201 };
 202
 203 /******* network I/O *******/
 204 enum cstate_t
 205 {
 206     CSTATE_UNCONNECTED = 0,
 207     CSTATE_WRITE_REQUEST,
 208     CSTATE_READ_VERSION,
 209     CSTATE_READ_AMT,
 210     CSTATE_READ_JSON,
 211 };
 212
 213 enum request_type_t
 214 {
 215     ASOK_REQ_VERSION = 0,
 216     ASOK_REQ_DATA = 1,
 217     ASOK_REQ_SCHEMA = 2,
 218     ASOK_REQ_NONE = 1000,
 219 };
 220
 221 struct cconn
 222 {
 223     /** The Ceph daemon that we're talking to */
 224     struct ceph_daemon *d;
 225
 226     /** Request type */
 227     uint32_t request_type;
 228
 229     /** The connection state */
 230     enum cstate_t state;
 231
 232     /** The socket we use to talk to this daemon */
 233     int asok;
 234
 235     /** The amount of data remaining to read / write. */
 236     uint32_t amt;
 237
 238     /** Length of the JSON to read */
 239     uint32_t json_len;
 240
 241     /** Buffer containing JSON data */
 242     unsigned char *json;
 243
 244     /** Keep data important to yajl processing */
 245     struct yajl_struct yajl;
 246 };
 247
 248 static int ceph_cb_null(void *ctx)
 249 {
 250     return CEPH_CB_CONTINUE;
 251 }
 252
 253 static int ceph_cb_boolean(void *ctx, int bool_val)
 254 {
 255     return CEPH_CB_CONTINUE;
 256 }
 257
 258 static int
 259 ceph_cb_number(void *ctx, const char *number_val, yajl_len_t number_len)
 260 {
 261     yajl_struct *yajl = (yajl_struct*)ctx;
 262     char buffer[number_len+1];
 263     int i, latency_type = 0, result;
 264     char key[128];
 265
 266     memcpy(buffer, number_val, number_len);
 267     buffer[sizeof(buffer) - 1] = 0;
 268
 269     ssnprintf(key, yajl->state[0].key_len, "%s", yajl->state[0].key);
 270     for(i = 1; i < yajl->depth; i++)
 271     {
 272         if((i == yajl->depth-1) && ((strcmp(yajl->state[i].key,"avgcount") == 0)
 273                 || (strcmp(yajl->state[i].key,"sum") == 0)))
 274         {
 275             if(convert_special_metrics)
 276             {
 277                 /**
 278                  * Special case for filestore:JournalWrBytes. For some reason,
 279                  * Ceph schema encodes this as a count/sum pair while all
 280                  * other "Bytes" data (excluding used/capacity bytes for OSD
 281                  * space) uses a single "Derive" type. To spare further
 282                  * confusion, keep this KPI as the same type of other "Bytes".
 283                  * Instead of keeping an "average" or "rate", use the "sum" in
 284                  * the pair and assign that to the derive value.
 285                  */
 286                 if((strcmp(yajl->state[i-1].key, "journal_wr_bytes") == 0) &&
 287                         (strcmp(yajl->state[i-2].key,"filestore") == 0) &&
 288                         (strcmp(yajl->state[i].key,"avgcount") == 0))
 289                 {
 290                     DEBUG("ceph plugin: Skipping avgcount for filestore.JournalWrBytes");
 291                     yajl->depth = (yajl->depth - 1);
 292                     return CEPH_CB_CONTINUE;
 293                 }
 294             }
 295             //probably a avgcount/sum pair. if not - we'll try full key later
 296             latency_type = 1;
 297             break;
 298         }
 299         strncat(key, ".", 1);
 300         strncat(key, yajl->state[i].key, yajl->state[i].key_len+1);
 301     }
 302
 303     result = yajl->handler(yajl->handler_arg, buffer, key);
 304
 305     if((result == RETRY_AVGCOUNT) && latency_type)
 306     {
 307         strncat(key, ".", 1);
 308         strncat(key, yajl->state[yajl->depth-1].key,
 309                 yajl->state[yajl->depth-1].key_len+1);
 310         result = yajl->handler(yajl->handler_arg, buffer, key);
 311     }
 312
 313     if(result == -ENOMEM)
 314     {
 315         ERROR("ceph plugin: memory allocation failed");
 316         return CEPH_CB_ABORT;
 317     }
 318
 319     yajl->depth = (yajl->depth - 1);
 320     return CEPH_CB_CONTINUE;
 321 }
 322
 323 static int ceph_cb_string(void *ctx, const unsigned char *string_val,
 324         yajl_len_t string_len)
 325 {
 326     return CEPH_CB_CONTINUE;
 327 }
 328
 329 static int ceph_cb_start_map(void *ctx)
 330 {
 331     return CEPH_CB_CONTINUE;
 332 }
 333
 334 static int
 335 ceph_cb_map_key(void *ctx, const unsigned char *key, yajl_len_t string_len)
 336 {
 337     yajl_struct *yajl = (yajl_struct*)ctx;
 338
 339     if((yajl->depth+1)  >= YAJL_MAX_DEPTH)
 340     {
 341         ERROR("ceph plugin: depth exceeds max, aborting.");
 342         return CEPH_CB_ABORT;
 343     }
 344
 345     char buffer[string_len+1];
 346
 347     memcpy(buffer, key, string_len);
 348     buffer[sizeof(buffer) - 1] = 0;
 349
 350     snprintf(yajl->state[yajl->depth].key, sizeof(buffer), "%s", buffer);
 351     yajl->state[yajl->depth].key_len = sizeof(buffer);
 352     yajl->depth = (yajl->depth + 1);
 353
 354     return CEPH_CB_CONTINUE;
 355 }
 356
 357 static int ceph_cb_end_map(void *ctx)
 358 {
 359     yajl_struct *yajl = (yajl_struct*)ctx;
 360
 361     yajl->depth = (yajl->depth - 1);
 362     return CEPH_CB_CONTINUE;
 363 }
 364
 365 static int ceph_cb_start_array(void *ctx)
 366 {
 367     return CEPH_CB_CONTINUE;
 368 }
 369
 370 static int ceph_cb_end_array(void *ctx)
 371 {
 372     return CEPH_CB_CONTINUE;
 373 }
 374
 375 static yajl_callbacks callbacks = {
 376         ceph_cb_null,
 377         ceph_cb_boolean,
 378         NULL,
 379         NULL,
 380         ceph_cb_number,
 381         ceph_cb_string,
 382         ceph_cb_start_map,
 383         ceph_cb_map_key,
 384         ceph_cb_end_map,
 385         ceph_cb_start_array,
 386         ceph_cb_end_array
 387 };
 388
 389 static void ceph_daemon_print(const struct ceph_daemon *d)
 390 {
 391     DEBUG("ceph plugin: name=%s, asok_path=%s", d->name, d->asok_path);
 392 }
 393
 394 static void ceph_daemons_print(void)
 395 {
 396     int i;
 397     for(i = 0; i < g_num_daemons; ++i)
 398     {
 399         ceph_daemon_print(g_daemons[i]);
 400     }
 401 }
 402
 403 static void ceph_daemon_free(struct ceph_daemon *d)
 404 {
 405     int i = 0;
 406     for(; i < d->last_idx; i++)
 407     {
 408         sfree(d->last_poll_data[i]);
 409     }
 410     sfree(d->last_poll_data);
 411     d->last_poll_data = NULL;
 412     d->last_idx = 0;
 413     for(i = 0; i < d->ds_num; i++)
 414     {
 415         sfree(d->ds_names[i]);
 416     }
 417     sfree(d->ds_types);
 418     sfree(d->ds_names);
 419     sfree(d);
 420 }
 421
 422 /**
 423  * Compact ds name by removing special characters and trimming length to
 424  * DATA_MAX_NAME_LEN if necessary
 425  */
 426 static void compact_ds_name(char *source, char *dest)
 427 {
 428     int keys_num = 0, i;
 429     char *save_ptr = NULL, *tmp_ptr = source;
 430     char *keys[16];
 431     char len_str[3];
 432     char tmp[DATA_MAX_NAME_LEN];
 433     size_t key_chars_remaining = (DATA_MAX_NAME_LEN-1);
 434     int reserved = 0;
 435     int offset = 0;
 436     memset(tmp, 0, sizeof(tmp));
 437     if(source == NULL || dest == NULL || source[0] == '\0' || dest[0] != '\0')
 438     {
 439         return;
 440     }
 441     size_t src_len = strlen(source);
 442     snprintf(len_str, sizeof(len_str), "%zu", src_len);
 443     unsigned char append_status = 0x0;
 444     append_status |= (source[src_len - 1] == '-') ? 0x1 : 0x0;
 445     append_status |= (source[src_len - 1] == '+') ? 0x2 : 0x0;
 446     while ((keys[keys_num] = strtok_r(tmp_ptr, ":_-+", &save_ptr)) != NULL)
 447     {
 448         tmp_ptr = NULL;
 449         /** capitalize 1st char **/
 450         keys[keys_num][0] = toupper(keys[keys_num][0]);
 451         keys_num++;
 452         if(keys_num >= 16)
 453         {
 454             break;
 455         }
 456     }
 457     /** concatenate each part of source string **/
 458     for(i = 0; i < keys_num; i++)
 459     {
 460         strncat(tmp, keys[i], key_chars_remaining);
 461         key_chars_remaining -= strlen(keys[i]);
 462     }
 463     tmp[DATA_MAX_NAME_LEN - 1] = '\0';
 464     /** to coordinate limitation of length of type_instance
 465      *  we will truncate ds_name
 466      *  when the its length is more than
 467      *  DATA_MAX_NAME_LEN
 468      */
 469     if(strlen(tmp) > DATA_MAX_NAME_LEN - 1)
 470     {
 471         append_status |= 0x4;
 472         /** we should reserve space for
 473          * len_str
 474          */
 475         reserved += 2;
 476     }
 477     if(append_status & 0x1)
 478     {
 479         /** we should reserve space for
 480          * "Minus"
 481          */
 482         reserved += 5;
 483     }
 484     if(append_status & 0x2)
 485     {
 486         /** we should reserve space for
 487          * "Plus"
 488          */
 489         reserved += 4;
 490     }
 491     snprintf(dest, DATA_MAX_NAME_LEN - reserved, "%s", tmp);
 492     offset = strlen(dest);
 493     switch (append_status)
 494     {
 495         case 0x1:
 496             memcpy(dest + offset, "Minus", 5);
 497             break;
 498         case 0x2:
 499             memcpy(dest + offset, "Plus", 5);
 500             break;
 501         case 0x4:
 502             memcpy(dest + offset, len_str, 2);
 503             break;
 504         case 0x5:
 505             memcpy(dest + offset, "Minus", 5);
 506             memcpy(dest + offset + 5, len_str, 2);
 507             break;
 508         case 0x6:
 509             memcpy(dest + offset, "Plus", 4);
 510             memcpy(dest + offset + 4, len_str, 2);
 511             break;
 512         default:
 513             break;
 514     }
 515 }
 516
 517 /**
 518  * Parse key to remove "type" if this is for schema and initiate compaction
 519  */
 520 static int parse_keys(const char *key_str, char *ds_name)
 521 {
 522     char *ptr, *rptr;
 523     size_t ds_name_len = 0;
 524     /**
 525      * allow up to 100 characters before compaction - compact_ds_name will not
 526      * allow more than DATA_MAX_NAME_LEN chars
 527      */
 528     int max_str_len = 100;
 529     char tmp_ds_name[max_str_len];
 530     memset(tmp_ds_name, 0, sizeof(tmp_ds_name));
 531     if(ds_name == NULL || key_str == NULL ||  key_str[0] == '\0' ||
 532                                                             ds_name[0] != '\0')
 533     {
 534         return -1;
 535     }
 536     if((ptr = strchr(key_str, '.')) == NULL
 537             || (rptr = strrchr(key_str, '.')) == NULL)
 538     {
 539         memcpy(tmp_ds_name, key_str, max_str_len - 1);
 540         goto compact;
 541     }
 542
 543     ds_name_len = (rptr - ptr) > max_str_len ? max_str_len : (rptr - ptr);
 544     if((ds_name_len == 0) || strncmp(rptr + 1, "type", 4))
 545     { /** copy whole key **/
 546         memcpy(tmp_ds_name, key_str, max_str_len - 1);
 547     }
 548     else
 549     {/** more than two keys **/
 550         memcpy(tmp_ds_name, key_str, ((rptr - key_str) > (max_str_len - 1) ?
 551                 (max_str_len - 1) : (rptr - key_str)));
 552     }
 553
 554     compact: compact_ds_name(tmp_ds_name, ds_name);
 555     return 0;
 556 }
 557
 558 /**
 559  * while parsing ceph admin socket schema, save counter name and type for later
 560  * data processing
 561  */
 562 static int ceph_daemon_add_ds_entry(struct ceph_daemon *d, const char *name,
 563         int pc_type)
 564 {
 565     uint32_t type;
 566     char ds_name[DATA_MAX_NAME_LEN];
 567     memset(ds_name, 0, sizeof(ds_name));
 568
 569     if(convert_special_metrics)
 570     {
 571         /**
 572          * Special case for filestore:JournalWrBytes. For some reason, Ceph
 573          * schema encodes this as a count/sum pair while all other "Bytes" data
 574          * (excluding used/capacity bytes for OSD space) uses a single "Derive"
 575          * type. To spare further confusion, keep this KPI as the same type of
 576          * other "Bytes". Instead of keeping an "average" or "rate", use the
 577          * "sum" in the pair and assign that to the derive value.
 578          */
 579         if((strcmp(name,"filestore.journal_wr_bytes.type") == 0))
 580         {
 581             pc_type = 10;
 582         }
 583     }
 584
 585     d->ds_names = realloc(d->ds_names, sizeof(char *) * (d->ds_num + 1));
 586     if(!d->ds_names)
 587     {
 588         return -ENOMEM;
 589     }
 590
 591     d->ds_types = realloc(d->ds_types, sizeof(uint32_t) * (d->ds_num + 1));
 592     if(!d->ds_types)
 593     {
 594         return -ENOMEM;
 595     }
 596
 597     d->ds_names[d->ds_num] = malloc(sizeof(char) * DATA_MAX_NAME_LEN);
 598     if(!d->ds_names[d->ds_num])
 599     {
 600         return -ENOMEM;
 601     }
 602
 603     type = (pc_type & PERFCOUNTER_DERIVE) ? DSET_RATE :
 604             ((pc_type & PERFCOUNTER_LATENCY) ? DSET_LATENCY : DSET_BYTES);
 605     d->ds_types[d->ds_num] = type;
 606
 607     if(parse_keys(name, ds_name))
 608     {
 609         return 1;
 610     }
 611
 612     sstrncpy(d->ds_names[d->ds_num], ds_name, DATA_MAX_NAME_LEN -1);
 613     d->ds_num = (d->ds_num + 1);
 614
 615     return 0;
 616 }
 617
 618 /******* ceph_config *******/
 619 static int cc_handle_str(struct oconfig_item_s *item, char *dest, int dest_len)
 620 {
 621     const char *val;
 622     if(item->values_num != 1)
 623     {
 624         return -ENOTSUP;
 625     }
 626     if(item->values[0].type != OCONFIG_TYPE_STRING)
 627     {
 628         return -ENOTSUP;
 629     }
 630     val = item->values[0].value.string;
 631     if(snprintf(dest, dest_len, "%s", val) > (dest_len - 1))
 632     {
 633         ERROR("ceph plugin: configuration parameter '%s' is too long.\n",
 634                 item->key);
 635         return -ENAMETOOLONG;
 636     }
 637     return 0;
 638 }
 639
 640 static int cc_handle_bool(struct oconfig_item_s *item, int *dest)
 641 {
 642     if(item->values_num != 1)
 643     {
 644         return -ENOTSUP;
 645     }
 646
 647     if(item->values[0].type != OCONFIG_TYPE_BOOLEAN)
 648     {
 649         return -ENOTSUP;
 650     }
 651
 652     *dest = (item->values[0].value.boolean) ? 1 : 0;
 653     return 0;
 654 }
 655
 656 static int cc_add_daemon_config(oconfig_item_t *ci)
 657 {
 658     int ret, i;
 659     struct ceph_daemon *array, *nd, cd;
 660     memset(&cd, 0, sizeof(struct ceph_daemon));
 661
 662     if((ci->values_num != 1) || (ci->values[0].type != OCONFIG_TYPE_STRING))
 663     {
 664         WARNING("ceph plugin: `Daemon' blocks need exactly one string "
 665                 "argument.");
 666         return (-1);
 667     }
 668
 669     ret = cc_handle_str(ci, cd.name, DATA_MAX_NAME_LEN);
 670     if(ret)
 671     {
 672         return ret;
 673     }
 674
 675     for(i=0; i < ci->children_num; i++)
 676     {
 677         oconfig_item_t *child = ci->children + i;
 678
 679         if(strcasecmp("SocketPath", child->key) == 0)
 680         {
 681             ret = cc_handle_str(child, cd.asok_path, sizeof(cd.asok_path));
 682             if(ret)
 683             {
 684                 return ret;
 685             }
 686         }
 687         else
 688         {
 689             WARNING("ceph plugin: ignoring unknown option %s", child->key);
 690         }
 691     }
 692     if(cd.name[0] == '\0')
 693     {
 694         ERROR("ceph plugin: you must configure a daemon name.\n");
 695         return -EINVAL;
 696     }
 697     else if(cd.asok_path[0] == '\0')
 698     {
 699         ERROR("ceph plugin(name=%s): you must configure an administrative "
 700         "socket path.\n", cd.name);
 701         return -EINVAL;
 702     }
 703     else if(!((cd.asok_path[0] == '/') ||
 704             (cd.asok_path[0] == '.' && cd.asok_path[1] == '/')))
 705     {
 706         ERROR("ceph plugin(name=%s): administrative socket paths must begin "
 707                 "with '/' or './' Can't parse: '%s'\n", cd.name, cd.asok_path);
 708         return -EINVAL;
 709     }
 710
 711     array = realloc(g_daemons,
 712                     sizeof(struct ceph_daemon *) * (g_num_daemons + 1));
 713     if(array == NULL)
 714     {
 715         /* The positive return value here indicates that this is a
 716          * runtime error, not a configuration error.  */
 717         return ENOMEM;
 718     }
 719     g_daemons = (struct ceph_daemon**) array;
 720     nd = malloc(sizeof(struct ceph_daemon));
 721     if(!nd)
 722     {
 723         return ENOMEM;
 724     }
 725     memcpy(nd, &cd, sizeof(struct ceph_daemon));
 726     g_daemons[g_num_daemons++] = nd;
 727     return 0;
 728 }
 729
 730 static int ceph_config(oconfig_item_t *ci)
 731 {
 732     int ret, i;
 733
 734     for(i = 0; i < ci->children_num; ++i)
 735     {
 736         oconfig_item_t *child = ci->children + i;
 737         if(strcasecmp("Daemon", child->key) == 0)
 738         {
 739             ret = cc_add_daemon_config(child);
 740             if(ret == ENOMEM)
 741             {
 742                 ERROR("ceph plugin: Couldn't allocate memory");
 743                 return ret;
 744             }
 745             else if(ret)
 746             {
 747                 //process other daemons and ignore this one
 748                 continue;
 749             }
 750         }
 751         else if(strcasecmp("LongRunAvgLatency", child->key) == 0)
 752         {
 753             ret = cc_handle_bool(child, &long_run_latency_avg);
 754             if(ret)
 755             {
 756                 return ret;
 757             }
 758         }
 759         else if(strcasecmp("ConvertSpecialMetricTypes", child->key) == 0)
 760         {
 761             ret = cc_handle_bool(child, &convert_special_metrics);
 762             if(ret)
 763             {
 764                 return ret;
 765             }
 766         }
 767         else
 768         {
 769             WARNING("ceph plugin: ignoring unknown option %s", child->key);
 770         }
 771     }
 772     return 0;
 773 }
 774
 775 /**
 776  * Parse JSON and get error message if present
 777  */
 778 static int
 779 traverse_json(const unsigned char *json, uint32_t json_len, yajl_handle hand)
 780 {
 781     yajl_status status = yajl_parse(hand, json, json_len);
 782     unsigned char *msg;
 783
 784     switch(status)
 785     {
 786         case yajl_status_error:
 787             msg = yajl_get_error(hand, /* verbose = */ 1,
 788                                        /* jsonText = */ (unsigned char *) json,
 789                                                       (unsigned int) json_len);
 790             ERROR ("ceph plugin: yajl_parse failed: %s", msg);
 791             yajl_free_error(hand, msg);
 792             return 1;
 793         case yajl_status_client_canceled:
 794             return 1;
 795         default:
 796             return 0;
 797     }
 798 }
 799
 800 /**
 801  * Add entry for each counter while parsing schema
 802  */
 803 static int
 804 node_handler_define_schema(void *arg, const char *val, const char *key)
 805 {
 806     struct ceph_daemon *d = (struct ceph_daemon *) arg;
 807     int pc_type;
 808     pc_type = atoi(val);
 809     DEBUG("ceph plugin: ceph_daemon_add_ds_entry(d=%s,key=%s,pc_type=%04x)",
 810             d->name, key, pc_type);
 811     return ceph_daemon_add_ds_entry(d, key, pc_type);
 812 }
 813
 814 /**
 815  * Latency counter does not yet have an entry in last poll data - add it.
 816  */
 817 static int add_last(struct ceph_daemon *d, const char *ds_n, double cur_sum,
 818         uint64_t cur_count)
 819 {
 820     d->last_poll_data[d->last_idx] = malloc(1 * sizeof(struct last_data));
 821     if(!d->last_poll_data[d->last_idx])
 822     {
 823         return -ENOMEM;
 824     }
 825     sstrncpy(d->last_poll_data[d->last_idx]->ds_name,ds_n,
 826             sizeof(d->last_poll_data[d->last_idx]->ds_name));
 827     d->last_poll_data[d->last_idx]->last_sum = cur_sum;
 828     d->last_poll_data[d->last_idx]->last_count = cur_count;
 829     d->last_idx = (d->last_idx + 1);
 830     return 0;
 831 }
 832
 833 /**
 834  * Update latency counter or add new entry if it doesn't exist
 835  */
 836 static int update_last(struct ceph_daemon *d, const char *ds_n, int index,
 837         double cur_sum, uint64_t cur_count)
 838 {
 839     if((d->last_idx > index) && (strcmp(d->last_poll_data[index]->ds_name, ds_n) == 0))
 840     {
 841         d->last_poll_data[index]->last_sum = cur_sum;
 842         d->last_poll_data[index]->last_count = cur_count;
 843         return 0;
 844     }
 845
 846     if(!d->last_poll_data)
 847     {
 848         d->last_poll_data = malloc(1 * sizeof(struct last_data *));
 849         if(!d->last_poll_data)
 850         {
 851             return -ENOMEM;
 852         }
 853     }
 854     else
 855     {
 856         struct last_data **tmp_last = realloc(d->last_poll_data,
 857                 ((d->last_idx+1) * sizeof(struct last_data *)));
 858         if(!tmp_last)
 859         {
 860             return -ENOMEM;
 861         }
 862         d->last_poll_data = tmp_last;
 863     }
 864     return add_last(d, ds_n, cur_sum, cur_count);
 865 }
 866
 867 /**
 868  * If using index guess failed (shouldn't happen, but possible if counters
 869  * get rearranged), resort to searching for counter name
 870  */
 871 static int backup_search_for_last_avg(struct ceph_daemon *d, const char *ds_n)
 872 {
 873     int i = 0;
 874     for(; i < d->last_idx; i++)
 875     {
 876         if(strcmp(d->last_poll_data[i]->ds_name, ds_n) == 0)
 877         {
 878             return i;
 879         }
 880     }
 881     return -1;
 882 }
 883
 884 /**
 885  * Calculate average b/t current data and last poll data
 886  * if last poll data exists
 887  */
 888 static double get_last_avg(struct ceph_daemon *d, const char *ds_n, int index,
 889         double cur_sum, uint64_t cur_count)
 890 {
 891     double result = -1.1, sum_delt = 0.0;
 892     uint64_t count_delt = 0;
 893     int tmp_index = 0;
 894     if(d->last_idx > index)
 895     {
 896         if(strcmp(d->last_poll_data[index]->ds_name, ds_n) == 0)
 897         {
 898             tmp_index = index;
 899         }
 900         //test previous index
 901         else if((index > 0) && (strcmp(d->last_poll_data[index-1]->ds_name, ds_n) == 0))
 902         {
 903             tmp_index = (index - 1);
 904         }
 905         else
 906         {
 907             tmp_index = backup_search_for_last_avg(d, ds_n);
 908         }
 909
 910         if((tmp_index > -1) && (cur_count > d->last_poll_data[tmp_index]->last_count))
 911         {
 912             sum_delt = (cur_sum - d->last_poll_data[tmp_index]->last_sum);
 913             count_delt = (cur_count - d->last_poll_data[tmp_index]->last_count);
 914             result = (sum_delt / count_delt);
 915         }
 916     }
 917
 918     if(result == -1.1)
 919     {
 920         result = NAN;
 921     }
 922     if(update_last(d, ds_n, tmp_index, cur_sum, cur_count) == -ENOMEM)
 923     {
 924         return -ENOMEM;
 925     }
 926     return result;
 927 }
 928
 929 /**
 930  * If using index guess failed, resort to searching for counter name
 931  */
 932 static uint32_t backup_search_for_type(struct ceph_daemon *d, char *ds_name)
 933 {
 934     int idx = 0;
 935     for(; idx < d->ds_num; idx++)
 936     {
 937         if(strcmp(d->ds_names[idx], ds_name) == 0)
 938         {
 939             return d->ds_types[idx];
 940         }
 941     }
 942     return DSET_TYPE_UNFOUND;
 943 }
 944
 945 /**
 946  * Process counter data and dispatch values
 947  */
 948 static int node_handler_fetch_data(void *arg, const char *val, const char *key)
 949 {
 950     value_t uv;
 951     double tmp_d;
 952     uint64_t tmp_u;
 953     struct values_tmp *vtmp = (struct values_tmp*) arg;
 954     uint32_t type = DSET_TYPE_UNFOUND;
 955     int index = vtmp->index;
 956
 957     char ds_name[DATA_MAX_NAME_LEN];
 958     memset(ds_name, 0, sizeof(ds_name));
 959
 960     if(parse_keys(key, ds_name))
 961     {
 962         return 1;
 963     }
 964
 965     if(index >= vtmp->d->ds_num)
 966     {
 967         //don't overflow bounds of array
 968         index = (vtmp->d->ds_num - 1);
 969     }
 970
 971     /**
 972      * counters should remain in same order we parsed schema... we maintain the
 973      * index variable to keep track of current point in list of counters. first
 974      * use index to guess point in array for retrieving type. if that doesn't
 975      * work, use the old way to get the counter type
 976      */
 977     if(strcmp(ds_name, vtmp->d->ds_names[index]) == 0)
 978     {
 979         //found match
 980         type = vtmp->d->ds_types[index];
 981     }
 982     else if((index > 0) && (strcmp(ds_name, vtmp->d->ds_names[index-1]) == 0))
 983     {
 984         //try previous key
 985         type = vtmp->d->ds_types[index-1];
 986     }
 987
 988     if(type == DSET_TYPE_UNFOUND)
 989     {
 990         //couldn't find right type by guessing, check the old way
 991         type = backup_search_for_type(vtmp->d, ds_name);
 992     }
 993
 994     switch(type)
 995     {
 996         case DSET_LATENCY:
 997             if(vtmp->avgcount_exists == -1)
 998             {
 999                 sscanf(val, "%" PRIu64, &vtmp->avgcount);
1000                 vtmp->avgcount_exists = 0;
1001                 //return after saving avgcount - don't dispatch value
1002                 //until latency calculation
1003                 return 0;
1004             }
1005             else
1006             {
1007                 double sum, result;
1008                 sscanf(val, "%lf", &sum);
1009                 DEBUG("ceph plugin: avgcount:%" PRIu64,vtmp->avgcount);
1010                 DEBUG("ceph plugin: sum:%lf",sum);
1011
1012                 if(vtmp->avgcount == 0)
1013                 {
1014                     vtmp->avgcount = 1;
1015                 }
1016
1017                 /** User wants latency values as long run avg */
1018                 if(long_run_latency_avg)
1019                 {
1020                     result = (sum / vtmp->avgcount);
1021                     DEBUG("ceph plugin: uv->gauge = sumd / avgcounti = :%lf", result);
1022                 }
1023                 else
1024                 {
1025                     result = get_last_avg(vtmp->d, ds_name, vtmp->latency_index, sum, vtmp->avgcount);
1026                     if(result == -ENOMEM)
1027                     {
1028                         return -ENOMEM;
1029                     }
1030                     DEBUG("ceph plugin: uv->gauge = (sumd_now - sumd_last) / "
1031                             "(avgcounti_now - avgcounti_last) = :%lf", result);
1032                 }
1033
1034                 uv.gauge = result;
1035                 vtmp->avgcount_exists = -1;
1036                 vtmp->latency_index = (vtmp->latency_index + 1);
1037             }
1038             break;
1039         case DSET_BYTES:
1040             sscanf(val, "%lf", &tmp_d);
1041             uv.gauge = tmp_d;
1042             DEBUG("ceph plugin: uv->gauge = %lf",uv.gauge);
1043             break;
1044         case DSET_RATE:
1045             sscanf(val, "%" PRIu64, &tmp_u);
1046             uv.derive = tmp_u;
1047             DEBUG("ceph plugin: uv->derive = %" PRIu64 "",(uint64_t)uv.derive);
1048             break;
1049         case DSET_TYPE_UNFOUND:
1050         default:
1051             ERROR("ceph plugin: ds %s was not properly initialized.", ds_name);
1052             return -1;
1053     }
1054
1055     sstrncpy(vtmp->vlist.type, ceph_dset_types[type], sizeof(vtmp->vlist.type));
1056     sstrncpy(vtmp->vlist.type_instance, ds_name, sizeof(vtmp->vlist.type_instance));
1057     vtmp->vlist.values = &uv;
1058     vtmp->vlist.values_len = 1;
1059
1060     DEBUG("ceph plugin: dispatching %s\n", ds_name);
1061     vtmp->index = (vtmp->index + 1);
1062     plugin_dispatch_values(&vtmp->vlist);
1063
1064     return 0;
1065 }
1066
1067 static int cconn_connect(struct cconn *io)
1068 {
1069     struct sockaddr_un address;
1070     int flags, fd, err;
1071     if(io->state != CSTATE_UNCONNECTED)
1072     {
1073         ERROR("ceph plugin: cconn_connect: io->state != CSTATE_UNCONNECTED");
1074         return -EDOM;
1075     }
1076     fd = socket(PF_UNIX, SOCK_STREAM, 0);
1077     if(fd < 0)
1078     {
1079         int err = -errno;
1080         ERROR("ceph plugin: cconn_connect: socket(PF_UNIX, SOCK_STREAM, 0) "
1081             "failed: error %d", err);
1082         return err;
1083     }
1084     memset(&address, 0, sizeof(struct sockaddr_un));
1085     address.sun_family = AF_UNIX;
1086     snprintf(address.sun_path, sizeof(address.sun_path), "%s",
1087             io->d->asok_path);
1088     RETRY_ON_EINTR(err,
1089         connect(fd, (struct sockaddr *) &address, sizeof(struct sockaddr_un)));
1090     if(err < 0)
1091     {
1092         ERROR("ceph plugin: cconn_connect: connect(%d) failed: error %d",
1093             fd, err);
1094         return err;
1095     }
1096
1097     flags = fcntl(fd, F_GETFL, 0);
1098     if(fcntl(fd, F_SETFL, flags | O_NONBLOCK) != 0)
1099     {
1100         err = -errno;
1101         ERROR("ceph plugin: cconn_connect: fcntl(%d, O_NONBLOCK) error %d",
1102             fd, err);
1103         return err;
1104     }
1105     io->asok = fd;
1106     io->state = CSTATE_WRITE_REQUEST;
1107     io->amt = 0;
1108     io->json_len = 0;
1109     io->json = NULL;
1110     return 0;
1111 }
1112
1113 static void cconn_close(struct cconn *io)
1114 {
1115     io->state = CSTATE_UNCONNECTED;
1116     if(io->asok != -1)
1117     {
1118         int res;
1119         RETRY_ON_EINTR(res, close(io->asok));
1120     }
1121     io->asok = -1;
1122     io->amt = 0;
1123     io->json_len = 0;
1124     sfree(io->json);
1125     io->json = NULL;
1126 }
1127
1128 /* Process incoming JSON counter data */
1129 static int
1130 cconn_process_data(struct cconn *io, yajl_struct *yajl, yajl_handle hand)
1131 {
1132     int ret;
1133     struct values_tmp *vtmp = calloc(1, sizeof(struct values_tmp) * 1);
1134     if(!vtmp)
1135     {
1136         return -ENOMEM;
1137     }
1138
1139     vtmp->vlist = (value_list_t)VALUE_LIST_INIT;
1140     sstrncpy(vtmp->vlist.host, hostname_g, sizeof(vtmp->vlist.host));
1141     sstrncpy(vtmp->vlist.plugin, "ceph", sizeof(vtmp->vlist.plugin));
1142     sstrncpy(vtmp->vlist.plugin_instance, io->d->name, sizeof(vtmp->vlist.plugin_instance));
1143
1144     vtmp->d = io->d;
1145     vtmp->avgcount_exists = -1;
1146     vtmp->latency_index = 0;
1147     vtmp->index = 0;
1148     yajl->handler_arg = vtmp;
1149     ret = traverse_json(io->json, io->json_len, hand);
1150     sfree(vtmp);
1151     return ret;
1152 }
1153
1154 /**
1155  * Initiate JSON parsing and print error if one occurs
1156  */
1157 static int cconn_process_json(struct cconn *io)
1158 {
1159     if((io->request_type != ASOK_REQ_DATA) &&
1160             (io->request_type != ASOK_REQ_SCHEMA))
1161     {
1162         return -EDOM;
1163     }
1164
1165     int result = 1;
1166     yajl_handle hand;
1167     yajl_status status;
1168
1169     hand = yajl_alloc(&callbacks,
1170 #if HAVE_YAJL_V2
1171       /* alloc funcs = */ NULL,
1172 #else
1173       /* alloc funcs = */ NULL, NULL,
1174 #endif
1175       /* context = */ (void *)(&io->yajl));
1176
1177     if(!hand)
1178     {
1179         ERROR ("ceph plugin: yajl_alloc failed.");
1180         return ENOMEM;
1181     }
1182
1183     io->yajl.depth = 0;
1184
1185     switch(io->request_type)
1186     {
1187         case ASOK_REQ_DATA:
1188             io->yajl.handler = node_handler_fetch_data;
1189             result = cconn_process_data(io, &io->yajl, hand);
1190             break;
1191         case ASOK_REQ_SCHEMA:
1192             //init daemon specific variables
1193             io->d->ds_num = 0;
1194             io->d->last_idx = 0;
1195             io->d->last_poll_data = NULL;
1196             io->yajl.handler = node_handler_define_schema;
1197             io->yajl.handler_arg = io->d;
1198             result = traverse_json(io->json, io->json_len, hand);
1199             break;
1200     }
1201
1202     if(result)
1203     {
1204         goto done;
1205     }
1206
1207 #if HAVE_YAJL_V2
1208     status = yajl_complete_parse(hand);
1209 #else
1210     status = yajl_parse_complete(hand);
1211 #endif
1212
1213     if (status != yajl_status_ok)
1214     {
1215       unsigned char *errmsg = yajl_get_error (hand, /* verbose = */ 0,
1216           /* jsonText = */ NULL, /* jsonTextLen = */ 0);
1217       ERROR ("ceph plugin: yajl_parse_complete failed: %s",
1218           (char *) errmsg);
1219       yajl_free_error (hand, errmsg);
1220       yajl_free (hand);
1221       return 1;
1222     }
1223
1224     done:
1225     yajl_free (hand);
1226     return result;
1227 }
1228
1229 static int cconn_validate_revents(struct cconn *io, int revents)
1230 {
1231     if(revents & POLLERR)
1232     {
1233         ERROR("ceph plugin: cconn_validate_revents(name=%s): got POLLERR",
1234             io->d->name);
1235         return -EIO;
1236     }
1237     switch (io->state)
1238     {
1239         case CSTATE_WRITE_REQUEST:
1240             return (revents & POLLOUT) ? 0 : -EINVAL;
1241         case CSTATE_READ_VERSION:
1242         case CSTATE_READ_AMT:
1243         case CSTATE_READ_JSON:
1244             return (revents & POLLIN) ? 0 : -EINVAL;
1245         default:
1246             ERROR("ceph plugin: cconn_validate_revents(name=%s) got to "
1247                 "illegal state on line %d", io->d->name, __LINE__);
1248             return -EDOM;
1249     }
1250 }
1251
1252 /** Handle a network event for a connection */
1253 static int cconn_handle_event(struct cconn *io)
1254 {
1255     int ret;
1256     switch (io->state)
1257     {
1258         case CSTATE_UNCONNECTED:
1259             ERROR("ceph plugin: cconn_handle_event(name=%s) got to illegal "
1260                 "state on line %d", io->d->name, __LINE__);
1261
1262             return -EDOM;
1263         case CSTATE_WRITE_REQUEST:
1264         {
1265             char cmd[32];
1266             snprintf(cmd, sizeof(cmd), "%s%d%s", "{ \"prefix\": \"",
1267                     io->request_type, "\" }\n");
1268             size_t cmd_len = strlen(cmd);
1269             RETRY_ON_EINTR(ret,
1270                   write(io->asok, ((char*)&cmd) + io->amt, cmd_len - io->amt));
1271             DEBUG("ceph plugin: cconn_handle_event(name=%s,state=%d,amt=%d,ret=%d)",
1272                     io->d->name, io->state, io->amt, ret);
1273             if(ret < 0)
1274             {
1275                 return ret;
1276             }
1277             io->amt += ret;
1278             if(io->amt >= cmd_len)
1279             {
1280                 io->amt = 0;
1281                 switch (io->request_type)
1282                 {
1283                     case ASOK_REQ_VERSION:
1284                         io->state = CSTATE_READ_VERSION;
1285                         break;
1286                     default:
1287                         io->state = CSTATE_READ_AMT;
1288                         break;
1289                 }
1290             }
1291             return 0;
1292         }
1293         case CSTATE_READ_VERSION:
1294         {
1295             RETRY_ON_EINTR(ret,
1296                     read(io->asok, ((char*)(&io->d->version)) + io->amt,
1297                             sizeof(io->d->version) - io->amt));
1298             DEBUG("ceph plugin: cconn_handle_event(name=%s,state=%d,ret=%d)",
1299                     io->d->name, io->state, ret);
1300             if(ret < 0)
1301             {
1302                 return ret;
1303             }
1304             io->amt += ret;
1305             if(io->amt >= sizeof(io->d->version))
1306             {
1307                 io->d->version = ntohl(io->d->version);
1308                 if(io->d->version != 1)
1309                 {
1310                     ERROR("ceph plugin: cconn_handle_event(name=%s) not "
1311                         "expecting version %d!", io->d->name, io->d->version);
1312                     return -ENOTSUP;
1313                 }
1314                 DEBUG("ceph plugin: cconn_handle_event(name=%s): identified as "
1315                         "version %d", io->d->name, io->d->version);
1316                 io->amt = 0;
1317                 cconn_close(io);
1318                 io->request_type = ASOK_REQ_SCHEMA;
1319             }
1320             return 0;
1321         }
1322         case CSTATE_READ_AMT:
1323         {
1324             RETRY_ON_EINTR(ret,
1325                     read(io->asok, ((char*)(&io->json_len)) + io->amt,
1326                             sizeof(io->json_len) - io->amt));
1327             DEBUG("ceph plugin: cconn_handle_event(name=%s,state=%d,ret=%d)",
1328                     io->d->name, io->state, ret);
1329             if(ret < 0)
1330             {
1331                 return ret;
1332             }
1333             io->amt += ret;
1334             if(io->amt >= sizeof(io->json_len))
1335             {
1336                 io->json_len = ntohl(io->json_len);
1337                 io->amt = 0;
1338                 io->state = CSTATE_READ_JSON;
1339                 io->json = calloc(1, io->json_len + 1);
1340                 if(!io->json)
1341                 {
1342                     ERROR("ceph plugin: error callocing io->json");
1343                     return -ENOMEM;
1344                 }
1345             }
1346             return 0;
1347         }
1348         case CSTATE_READ_JSON:
1349         {
1350             RETRY_ON_EINTR(ret,
1351                    read(io->asok, io->json + io->amt, io->json_len - io->amt));
1352             DEBUG("ceph plugin: cconn_handle_event(name=%s,state=%d,ret=%d)",
1353                     io->d->name, io->state, ret);
1354             if(ret < 0)
1355             {
1356                 return ret;
1357             }
1358             io->amt += ret;
1359             if(io->amt >= io->json_len)
1360             {
1361                 ret = cconn_process_json(io);
1362                 if(ret)
1363                 {
1364                     return ret;
1365                 }
1366                 cconn_close(io);
1367                 io->request_type = ASOK_REQ_NONE;
1368             }
1369             return 0;
1370         }
1371         default:
1372             ERROR("ceph plugin: cconn_handle_event(name=%s) got to illegal "
1373                 "state on line %d", io->d->name, __LINE__);
1374             return -EDOM;
1375     }
1376 }
1377
1378 static int cconn_prepare(struct cconn *io, struct pollfd* fds)
1379 {
1380     int ret;
1381     if(io->request_type == ASOK_REQ_NONE)
1382     {
1383         /* The request has already been serviced. */
1384         return 0;
1385     }
1386     else if((io->request_type == ASOK_REQ_DATA) && (io->d->ds_num == 0))
1387     {
1388         /* If there are no counters to report on, don't bother
1389          * connecting */
1390         return 0;
1391     }
1392
1393     switch (io->state)
1394     {
1395         case CSTATE_UNCONNECTED:
1396             ret = cconn_connect(io);
1397             if(ret > 0)
1398             {
1399                 return -ret;
1400             }
1401             else if(ret < 0)
1402             {
1403                 return ret;
1404             }
1405             fds->fd = io->asok;
1406             fds->events = POLLOUT;
1407             return 1;
1408         case CSTATE_WRITE_REQUEST:
1409             fds->fd = io->asok;
1410             fds->events = POLLOUT;
1411             return 1;
1412         case CSTATE_READ_VERSION:
1413         case CSTATE_READ_AMT:
1414         case CSTATE_READ_JSON:
1415             fds->fd = io->asok;
1416             fds->events = POLLIN;
1417             return 1;
1418         default:
1419             ERROR("ceph plugin: cconn_prepare(name=%s) got to illegal state "
1420                 "on line %d", io->d->name, __LINE__);
1421             return -EDOM;
1422     }
1423 }
1424
1425 /** Returns the difference between two struct timevals in milliseconds.
1426  * On overflow, we return max/min int.
1427  */
1428 static int milli_diff(const struct timeval *t1, const struct timeval *t2)
1429 {
1430     int64_t ret;
1431     int sec_diff = t1->tv_sec - t2->tv_sec;
1432     int usec_diff = t1->tv_usec - t2->tv_usec;
1433     ret = usec_diff / 1000;
1434     ret += (sec_diff * 1000);
1435     return (ret > INT_MAX) ? INT_MAX : ((ret < INT_MIN) ? INT_MIN : (int)ret);
1436 }
1437
1438 /** This handles the actual network I/O to talk to the Ceph daemons.
1439  */
1440 static int cconn_main_loop(uint32_t request_type)
1441 {
1442     int i, ret, some_unreachable = 0;
1443     struct timeval end_tv;
1444     struct cconn io_array[g_num_daemons];
1445
1446     DEBUG("ceph plugin: entering cconn_main_loop(request_type = %d)", request_type);
1447
1448     /* create cconn array */
1449     memset(io_array, 0, sizeof(io_array));
1450     for(i = 0; i < g_num_daemons; ++i)
1451     {
1452         io_array[i].d = g_daemons[i];
1453         io_array[i].request_type = request_type;
1454         io_array[i].state = CSTATE_UNCONNECTED;
1455     }
1456
1457     /** Calculate the time at which we should give up */
1458     gettimeofday(&end_tv, NULL);
1459     end_tv.tv_sec += CEPH_TIMEOUT_INTERVAL;
1460
1461     while (1)
1462     {
1463         int nfds, diff;
1464         struct timeval tv;
1465         struct cconn *polled_io_array[g_num_daemons];
1466         struct pollfd fds[g_num_daemons];
1467         memset(fds, 0, sizeof(fds));
1468         nfds = 0;
1469         for(i = 0; i < g_num_daemons; ++i)
1470         {
1471             struct cconn *io = io_array + i;
1472             ret = cconn_prepare(io, fds + nfds);
1473             if(ret < 0)
1474             {
1475                 WARNING("ceph plugin: cconn_prepare(name=%s,i=%d,st=%d)=%d",
1476                         io->d->name, i, io->state, ret);
1477                 cconn_close(io);
1478                 io->request_type = ASOK_REQ_NONE;
1479                 some_unreachable = 1;
1480             }
1481             else if(ret == 1)
1482             {
1483                 DEBUG("ceph plugin: did cconn_prepare(name=%s,i=%d,st=%d)",
1484                         io->d->name, i, io->state);
1485                 polled_io_array[nfds++] = io_array + i;
1486             }
1487         }
1488         if(nfds == 0)
1489         {
1490             /* finished */
1491             ret = 0;
1492             DEBUG("ceph plugin: cconn_main_loop: no more cconn to manage.");
1493             goto done;
1494         }
1495         gettimeofday(&tv, NULL);
1496         diff = milli_diff(&end_tv, &tv);
1497         if(diff <= 0)
1498         {
1499             /* Timed out */
1500             ret = -ETIMEDOUT;
1501             WARNING("ceph plugin: cconn_main_loop: timed out.");
1502             goto done;
1503         }
1504         RETRY_ON_EINTR(ret, poll(fds, nfds, diff));
1505         if(ret < 0)
1506         {
1507             ERROR("ceph plugin: poll(2) error: %d", ret);
1508             goto done;
1509         }
1510         for(i = 0; i < nfds; ++i)
1511         {
1512             struct cconn *io = polled_io_array[i];
1513             int revents = fds[i].revents;
1514             if(revents == 0)
1515             {
1516                 /* do nothing */
1517             }
1518             else if(cconn_validate_revents(io, revents))
1519             {
1520                 WARNING("ceph plugin: cconn(name=%s,i=%d,st=%d): "
1521                 "revents validation error: "
1522                 "revents=0x%08x", io->d->name, i, io->state, revents);
1523                 cconn_close(io);
1524                 io->request_type = ASOK_REQ_NONE;
1525                 some_unreachable = 1;
1526             }
1527             else
1528             {
1529                 int ret = cconn_handle_event(io);
1530                 if(ret)
1531                 {
1532                     WARNING("ceph plugin: cconn_handle_event(name=%s,"
1533                     "i=%d,st=%d): error %d", io->d->name, i, io->state, ret);
1534                     cconn_close(io);
1535                     io->request_type = ASOK_REQ_NONE;
1536                     some_unreachable = 1;
1537                 }
1538             }
1539         }
1540     }
1541     done: for(i = 0; i < g_num_daemons; ++i)
1542     {
1543         cconn_close(io_array + i);
1544     }
1545     if(some_unreachable)
1546     {
1547         DEBUG("ceph plugin: cconn_main_loop: some Ceph daemons were unreachable.");
1548     }
1549     else
1550     {
1551         DEBUG("ceph plugin: cconn_main_loop: reached all Ceph daemons :)");
1552     }
1553     return ret;
1554 }
1555
1556 static int ceph_read(void)
1557 {
1558     return cconn_main_loop(ASOK_REQ_DATA);
1559 }
1560
1561 /******* lifecycle *******/
1562 static int ceph_init(void)
1563 {
1564     int ret;
1565     DEBUG("ceph plugin: ceph_init");
1566     ceph_daemons_print();
1567
1568     ret = cconn_main_loop(ASOK_REQ_VERSION);
1569
1570     return (ret) ? ret : 0;
1571 }
1572
1573 static int ceph_shutdown(void)
1574 {
1575     int i;
1576     for(i = 0; i < g_num_daemons; ++i)
1577     {
1578         ceph_daemon_free(g_daemons[i]);
1579     }
1580     sfree(g_daemons);
1581     g_daemons = NULL;
1582     g_num_daemons = 0;
1583     DEBUG("ceph plugin: finished ceph_shutdown");
1584     return 0;
1585 }
1586
1587 void module_register(void)
1588 {
1589     plugin_register_complex_config("ceph", ceph_config);
1590     plugin_register_init("ceph", ceph_init);
1591     plugin_register_read("ceph", ceph_read);
1592     plugin_register_shutdown("ceph", ceph_shutdown);
1593 }