src/virt.c

   1 /**
   2  * collectd - src/virt.c
   3  * Copyright (C) 2006-2008  Red Hat Inc.
   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  *   Richard W.M. Jones <rjones@redhat.com>
  20  *   Przemyslaw Szczerbik <przemyslawx.szczerbik@intel.com>
  21  **/
  22
  23 #include "collectd.h"
  24
  25 #include "common.h"
  26 #include "plugin.h"
  27 #include "utils_complain.h"
  28 #include "utils_ignorelist.h"
  29
  30 #include <libgen.h> /* for basename(3) */
  31 #include <libvirt/libvirt.h>
  32 #include <libvirt/virterror.h>
  33 #include <libxml/parser.h>
  34 #include <libxml/tree.h>
  35 #include <libxml/xpath.h>
  36 #include <libxml/xpathInternals.h>
  37
  38 /* Plugin name */
  39 #define PLUGIN_NAME "virt"
  40
  41 #ifdef LIBVIR_CHECK_VERSION
  42
  43 #if LIBVIR_CHECK_VERSION(0, 9, 2)
  44 #define HAVE_DOM_REASON 1
  45 #endif
  46
  47 #if LIBVIR_CHECK_VERSION(0, 9, 5)
  48 #define HAVE_BLOCK_STATS_FLAGS 1
  49 #define HAVE_DOM_REASON_PAUSED_SHUTTING_DOWN 1
  50 #endif
  51
  52 #if LIBVIR_CHECK_VERSION(0, 9, 10)
  53 #define HAVE_DISK_ERR 1
  54 #endif
  55
  56 #if LIBVIR_CHECK_VERSION(0, 9, 11)
  57 #define HAVE_CPU_STATS 1
  58 #define HAVE_DOM_STATE_PMSUSPENDED 1
  59 #define HAVE_DOM_REASON_RUNNING_WAKEUP 1
  60 #endif
  61
  62 #if LIBVIR_CHECK_VERSION(1, 0, 1)
  63 #define HAVE_DOM_REASON_PAUSED_SNAPSHOT 1
  64 #endif
  65
  66 #if LIBVIR_CHECK_VERSION(1, 1, 1)
  67 #define HAVE_DOM_REASON_PAUSED_CRASHED 1
  68 #endif
  69
  70 #if LIBVIR_CHECK_VERSION(1, 2, 9)
  71 #define HAVE_JOB_STATS 1
  72 #endif
  73
  74 #if LIBVIR_CHECK_VERSION(1, 2, 10)
  75 #define HAVE_DOM_REASON_CRASHED 1
  76 #endif
  77
  78 #if LIBVIR_CHECK_VERSION(1, 2, 11)
  79 #define HAVE_FS_INFO 1
  80 #endif
  81
  82 #if LIBVIR_CHECK_VERSION(1, 2, 15)
  83 #define HAVE_DOM_REASON_PAUSED_STARTING_UP 1
  84 #endif
  85
  86 #if LIBVIR_CHECK_VERSION(1, 3, 3)
  87 #define HAVE_PERF_STATS 1
  88 #define HAVE_DOM_REASON_POSTCOPY 1
  89 #endif
  90
  91 #endif /* LIBVIR_CHECK_VERSION */
  92
  93 static const char *config_keys[] = {"Connection",
  94
  95                                     "RefreshInterval",
  96
  97                                     "Domain",
  98                                     "BlockDevice",
  99                                     "BlockDeviceFormat",
 100                                     "BlockDeviceFormatBasename",
 101                                     "InterfaceDevice",
 102                                     "IgnoreSelected",
 103
 104                                     "HostnameFormat",
 105                                     "InterfaceFormat",
 106
 107                                     "PluginInstanceFormat",
 108
 109                                     "Instances",
 110                                     "ExtraStats",
 111                                     NULL};
 112
 113 const char *domain_states[] = {
 114         [VIR_DOMAIN_NOSTATE] = "no state",
 115         [VIR_DOMAIN_RUNNING] = "the domain is running",
 116         [VIR_DOMAIN_BLOCKED] = "the domain is blocked on resource",
 117         [VIR_DOMAIN_PAUSED] = "the domain is paused by user",
 118         [VIR_DOMAIN_SHUTDOWN] = "the domain is being shut down",
 119         [VIR_DOMAIN_SHUTOFF] = "the domain is shut off",
 120         [VIR_DOMAIN_CRASHED] = "the domain is crashed",
 121 #ifdef HAVE_DOM_STATE_PMSUSPENDED
 122         [VIR_DOMAIN_PMSUSPENDED] =
 123             "the domain is suspended by guest power management",
 124 #endif
 125 };
 126
 127 #ifdef HAVE_DOM_REASON
 128 #define DOMAIN_STATE_REASON_MAX_SIZE 20
 129 const char *domain_reasons[][DOMAIN_STATE_REASON_MAX_SIZE] = {
 130         [VIR_DOMAIN_NOSTATE][VIR_DOMAIN_NOSTATE_UNKNOWN] =
 131             "the reason is unknown",
 132
 133         [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_UNKNOWN] =
 134             "the reason is unknown",
 135         [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_BOOTED] =
 136             "normal startup from boot",
 137         [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_MIGRATED] =
 138             "migrated from another host",
 139         [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_RESTORED] =
 140             "restored from a state file",
 141         [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_FROM_SNAPSHOT] =
 142             "restored from snapshot",
 143         [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_UNPAUSED] =
 144             "returned from paused state",
 145         [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_MIGRATION_CANCELED] =
 146             "returned from migration",
 147         [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_SAVE_CANCELED] =
 148             "returned from failed save process",
 149 #ifdef HAVE_DOM_REASON_RUNNING_WAKEUP
 150         [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_WAKEUP] =
 151             "returned from pmsuspended due to wakeup event",
 152 #endif
 153 #ifdef HAVE_DOM_REASON_CRASHED
 154         [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_CRASHED] =
 155             "resumed from crashed",
 156 #endif
 157 #ifdef HAVE_DOM_REASON_POSTCOPY
 158         [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_POSTCOPY] =
 159             "running in post-copy migration mode",
 160 #endif
 161
 162         [VIR_DOMAIN_BLOCKED][VIR_DOMAIN_BLOCKED_UNKNOWN] =
 163             "the reason is unknown",
 164
 165         [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_UNKNOWN] =
 166             "the reason is unknown",
 167         [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_USER] = "paused on user request",
 168         [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_MIGRATION] =
 169             "paused for offline migration",
 170         [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_SAVE] = "paused for save",
 171         [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_DUMP] =
 172             "paused for offline core dump",
 173         [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_IOERROR] =
 174             "paused due to a disk I/O error",
 175         [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_WATCHDOG] =
 176             "paused due to a watchdog event",
 177         [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_FROM_SNAPSHOT] =
 178             "paused after restoring from snapshot",
 179 #ifdef HAVE_DOM_REASON_PAUSED_SHUTTING_DOWN
 180         [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_SHUTTING_DOWN] =
 181             "paused during shutdown process",
 182 #endif
 183 #ifdef HAVE_DOM_REASON_PAUSED_SNAPSHOT
 184         [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_SNAPSHOT] =
 185             "paused while creating a snapshot",
 186 #endif
 187 #ifdef HAVE_DOM_REASON_PAUSED_CRASHED
 188         [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_CRASHED] =
 189             "paused due to a guest crash",
 190 #endif
 191 #ifdef HAVE_DOM_REASON_PAUSED_STARTING_UP
 192         [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_STARTING_UP] =
 193             "the domain is being started",
 194 #endif
 195 #ifdef HAVE_DOM_REASON_POSTCOPY
 196         [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_POSTCOPY] =
 197             "paused for post-copy migration",
 198         [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_POSTCOPY_FAILED] =
 199             "paused after failed post-copy",
 200 #endif
 201
 202         [VIR_DOMAIN_SHUTDOWN][VIR_DOMAIN_SHUTDOWN_UNKNOWN] =
 203             "the reason is unknown",
 204         [VIR_DOMAIN_SHUTDOWN][VIR_DOMAIN_SHUTDOWN_USER] =
 205             "shutting down on user request",
 206
 207         [VIR_DOMAIN_SHUTOFF][VIR_DOMAIN_SHUTOFF_UNKNOWN] =
 208             "the reason is unknown",
 209         [VIR_DOMAIN_SHUTOFF][VIR_DOMAIN_SHUTOFF_SHUTDOWN] = "normal shutdown",
 210         [VIR_DOMAIN_SHUTOFF][VIR_DOMAIN_SHUTOFF_DESTROYED] = "forced poweroff",
 211         [VIR_DOMAIN_SHUTOFF][VIR_DOMAIN_SHUTOFF_CRASHED] = "domain crashed",
 212         [VIR_DOMAIN_SHUTOFF][VIR_DOMAIN_SHUTOFF_MIGRATED] =
 213             "migrated to another host",
 214         [VIR_DOMAIN_SHUTOFF][VIR_DOMAIN_SHUTOFF_SAVED] = "saved to a file",
 215         [VIR_DOMAIN_SHUTOFF][VIR_DOMAIN_SHUTOFF_FAILED] =
 216             "domain failed to start",
 217         [VIR_DOMAIN_SHUTOFF][VIR_DOMAIN_SHUTOFF_FROM_SNAPSHOT] =
 218             "restored from a snapshot which was taken while domain was shutoff",
 219
 220         [VIR_DOMAIN_CRASHED][VIR_DOMAIN_CRASHED_UNKNOWN] =
 221             "the reason is unknown",
 222 #ifdef VIR_DOMAIN_CRASHED_PANICKED
 223         [VIR_DOMAIN_CRASHED][VIR_DOMAIN_CRASHED_PANICKED] = "domain panicked",
 224 #endif
 225
 226 #ifdef HAVE_DOM_STATE_PMSUSPENDED
 227         [VIR_DOMAIN_PMSUSPENDED][VIR_DOMAIN_PMSUSPENDED_UNKNOWN] =
 228             "the reason is unknown",
 229 #endif
 230 };
 231 #endif /* HAVE_DOM_REASON */
 232
 233 #define NR_CONFIG_KEYS ((sizeof config_keys / sizeof config_keys[0]) - 1)
 234 #define NANOSEC_IN_SEC 1e9
 235
 236 #define GET_STATS(_f, _name, ...)                                              \
 237   do {                                                                         \
 238     status = _f(__VA_ARGS__);                                                  \
 239     if (status != 0)                                                           \
 240       ERROR(PLUGIN_NAME ": Failed to get " _name);                             \
 241   } while (0)
 242
 243 /* Connection. */
 244 static virConnectPtr conn = 0;
 245 static char *conn_string = NULL;
 246 static c_complain_t conn_complain = C_COMPLAIN_INIT_STATIC;
 247
 248 /* Node information required for %CPU */
 249 static virNodeInfo nodeinfo;
 250
 251 /* Seconds between list refreshes, 0 disables completely. */
 252 static int interval = 60;
 253
 254 /* List of domains, if specified. */
 255 static ignorelist_t *il_domains = NULL;
 256 /* List of block devices, if specified. */
 257 static ignorelist_t *il_block_devices = NULL;
 258 /* List of network interface devices, if specified. */
 259 static ignorelist_t *il_interface_devices = NULL;
 260
 261 static int ignore_device_match(ignorelist_t *, const char *domname,
 262                                const char *devpath);
 263
 264 /* Actual list of block devices found on last refresh. */
 265 struct block_device {
 266   virDomainPtr dom; /* domain */
 267   char *path;       /* name of block device */
 268 };
 269
 270 /* Actual list of network interfaces found on last refresh. */
 271 struct interface_device {
 272   virDomainPtr dom; /* domain */
 273   char *path;       /* name of interface device */
 274   char *address;    /* mac address of interface device */
 275   char *number;     /* interface device number */
 276 };
 277
 278 typedef struct domain_s {
 279   virDomainPtr ptr;
 280   virDomainInfo info;
 281 } domain_t;
 282
 283 struct lv_read_state {
 284   /* Actual list of domains found on last refresh. */
 285   domain_t *domains;
 286   int nr_domains;
 287
 288   struct block_device *block_devices;
 289   int nr_block_devices;
 290
 291   struct interface_device *interface_devices;
 292   int nr_interface_devices;
 293 };
 294
 295 static void free_domains(struct lv_read_state *state);
 296 static int add_domain(struct lv_read_state *state, virDomainPtr dom);
 297
 298 static void free_block_devices(struct lv_read_state *state);
 299 static int add_block_device(struct lv_read_state *state, virDomainPtr dom,
 300                             const char *path);
 301
 302 static void free_interface_devices(struct lv_read_state *state);
 303 static int add_interface_device(struct lv_read_state *state, virDomainPtr dom,
 304                                 const char *path, const char *address,
 305                                 unsigned int number);
 306
 307 #define METADATA_VM_PARTITION_URI "http://ovirt.org/ovirtmap/tag/1.0"
 308 #define METADATA_VM_PARTITION_ELEMENT "tag"
 309 #define METADATA_VM_PARTITION_PREFIX "ovirtmap"
 310
 311 #define BUFFER_MAX_LEN 256
 312 #define PARTITION_TAG_MAX_LEN 32
 313
 314 struct lv_read_instance {
 315   struct lv_read_state read_state;
 316   char tag[PARTITION_TAG_MAX_LEN];
 317   size_t id;
 318 };
 319
 320 struct lv_user_data {
 321   struct lv_read_instance inst;
 322   user_data_t ud;
 323 };
 324
 325 #define NR_INSTANCES_DEFAULT 1
 326 #define NR_INSTANCES_MAX 128
 327 static int nr_instances = NR_INSTANCES_DEFAULT;
 328 static struct lv_user_data lv_read_user_data[NR_INSTANCES_MAX];
 329
 330 /* HostnameFormat. */
 331 #define HF_MAX_FIELDS 3
 332
 333 enum hf_field { hf_none = 0, hf_hostname, hf_name, hf_uuid };
 334
 335 static enum hf_field hostname_format[HF_MAX_FIELDS] = {hf_name};
 336
 337 /* PluginInstanceFormat */
 338 #define PLGINST_MAX_FIELDS 2
 339
 340 enum plginst_field { plginst_none = 0, plginst_name, plginst_uuid };
 341
 342 static enum plginst_field plugin_instance_format[PLGINST_MAX_FIELDS] = {
 343     plginst_none};
 344
 345 /* BlockDeviceFormat */
 346 enum bd_field { target, source };
 347
 348 /* InterfaceFormat. */
 349 enum if_field { if_address, if_name, if_number };
 350
 351 /* ExtraStats */
 352 #define EX_STATS_MAX_FIELDS 15
 353 enum ex_stats {
 354   ex_stats_none = 0,
 355   ex_stats_disk = 1 << 0,
 356   ex_stats_pcpu = 1 << 1,
 357   ex_stats_cpu_util = 1 << 2,
 358   ex_stats_domain_state = 1 << 3,
 359 #ifdef HAVE_PERF_STATS
 360   ex_stats_perf = 1 << 4,
 361 #endif
 362   ex_stats_vcpupin = 1 << 5,
 363 #ifdef HAVE_DISK_ERR
 364   ex_stats_disk_err = 1 << 6,
 365 #endif
 366 #ifdef HAVE_FS_INFO
 367   ex_stats_fs_info = 1 << 7,
 368 #endif
 369 #ifdef HAVE_JOB_STATS
 370   ex_stats_job_stats_completed = 1 << 8,
 371   ex_stats_job_stats_background = 1 << 9,
 372 #endif
 373 };
 374
 375 static unsigned int extra_stats = ex_stats_none;
 376
 377 struct ex_stats_item {
 378   const char *name;
 379   enum ex_stats flag;
 380 };
 381 static const struct ex_stats_item ex_stats_table[] = {
 382     {"disk", ex_stats_disk},
 383     {"pcpu", ex_stats_pcpu},
 384     {"cpu_util", ex_stats_cpu_util},
 385     {"domain_state", ex_stats_domain_state},
 386 #ifdef HAVE_PERF_STATS
 387     {"perf", ex_stats_perf},
 388 #endif
 389     {"vcpupin", ex_stats_vcpupin},
 390 #ifdef HAVE_DISK_ERR
 391     {"disk_err", ex_stats_disk_err},
 392 #endif
 393 #ifdef HAVE_FS_INFO
 394     {"fs_info", ex_stats_fs_info},
 395 #endif
 396 #ifdef HAVE_JOB_STATS
 397     {"job_stats_completed", ex_stats_job_stats_completed},
 398     {"job_stats_background", ex_stats_job_stats_background},
 399 #endif
 400     {NULL, ex_stats_none},
 401 };
 402
 403 /* BlockDeviceFormatBasename */
 404 _Bool blockdevice_format_basename = 0;
 405 static enum bd_field blockdevice_format = target;
 406 static enum if_field interface_format = if_name;
 407
 408 /* Time that we last refreshed. */
 409 static time_t last_refresh = (time_t)0;
 410
 411 static int refresh_lists(struct lv_read_instance *inst);
 412
 413 struct lv_info {
 414   virDomainInfo di;
 415   unsigned long long total_user_cpu_time;
 416   unsigned long long total_syst_cpu_time;
 417 };
 418
 419 struct lv_block_info {
 420   virDomainBlockStatsStruct bi;
 421
 422   long long rd_total_times;
 423   long long wr_total_times;
 424
 425   long long fl_req;
 426   long long fl_total_times;
 427 };
 428
 429 static void init_block_info(struct lv_block_info *binfo) {
 430   if (binfo == NULL)
 431     return;
 432
 433   binfo->bi.rd_req = -1;
 434   binfo->bi.wr_req = -1;
 435   binfo->bi.rd_bytes = -1;
 436   binfo->bi.wr_bytes = -1;
 437
 438   binfo->rd_total_times = -1;
 439   binfo->wr_total_times = -1;
 440   binfo->fl_req = -1;
 441   binfo->fl_total_times = -1;
 442 }
 443
 444 #ifdef HAVE_BLOCK_STATS_FLAGS
 445
 446 #define GET_BLOCK_INFO_VALUE(NAME, FIELD)                                      \
 447   do {                                                                         \
 448     if (!strcmp(param[i].field, NAME)) {                                       \
 449       binfo->FIELD = param[i].value.l;                                         \
 450       continue;                                                                \
 451     }                                                                          \
 452   } while (0)
 453
 454 static int get_block_info(struct lv_block_info *binfo,
 455                           virTypedParameterPtr param, int nparams) {
 456   if (binfo == NULL || param == NULL)
 457     return -1;
 458
 459   for (int i = 0; i < nparams; ++i) {
 460     /* ignore type. Everything must be LLONG anyway. */
 461     GET_BLOCK_INFO_VALUE("rd_operations", bi.rd_req);
 462     GET_BLOCK_INFO_VALUE("wr_operations", bi.wr_req);
 463     GET_BLOCK_INFO_VALUE("rd_bytes", bi.rd_bytes);
 464     GET_BLOCK_INFO_VALUE("wr_bytes", bi.wr_bytes);
 465     GET_BLOCK_INFO_VALUE("rd_total_times", rd_total_times);
 466     GET_BLOCK_INFO_VALUE("wr_total_times", wr_total_times);
 467     GET_BLOCK_INFO_VALUE("flush_operations", fl_req);
 468     GET_BLOCK_INFO_VALUE("flush_total_times", fl_total_times);
 469   }
 470
 471   return 0;
 472 }
 473
 474 #undef GET_BLOCK_INFO_VALUE
 475
 476 #endif /* HAVE_BLOCK_STATS_FLAGS */
 477
 478 /* ERROR(...) macro for virterrors. */
 479 #define VIRT_ERROR(conn, s)                                                    \
 480   do {                                                                         \
 481     virErrorPtr err;                                                           \
 482     err = (conn) ? virConnGetLastError((conn)) : virGetLastError();            \
 483     if (err)                                                                   \
 484       ERROR("%s: %s", (s), err->message);                                      \
 485   } while (0)
 486
 487 static void init_lv_info(struct lv_info *info) {
 488   if (info != NULL)
 489     memset(info, 0, sizeof(*info));
 490 }
 491
 492 static int lv_domain_info(virDomainPtr dom, struct lv_info *info) {
 493 #ifdef HAVE_CPU_STATS
 494   virTypedParameterPtr param = NULL;
 495   int nparams = 0;
 496 #endif /* HAVE_CPU_STATS */
 497   int ret = virDomainGetInfo(dom, &(info->di));
 498   if (ret != 0) {
 499     return ret;
 500   }
 501
 502 #ifdef HAVE_CPU_STATS
 503   nparams = virDomainGetCPUStats(dom, NULL, 0, -1, 1, 0);
 504   if (nparams < 0) {
 505     VIRT_ERROR(conn, "getting the CPU params count");
 506     return -1;
 507   }
 508
 509   param = calloc(nparams, sizeof(virTypedParameter));
 510   if (param == NULL) {
 511     ERROR("virt plugin: alloc(%i) for cpu parameters failed.", nparams);
 512     return -1;
 513   }
 514
 515   ret = virDomainGetCPUStats(dom, param, nparams, -1, 1, 0); // total stats.
 516   if (ret < 0) {
 517     virTypedParamsClear(param, nparams);
 518     sfree(param);
 519     VIRT_ERROR(conn, "getting the disk params values");
 520     return -1;
 521   }
 522
 523   for (int i = 0; i < nparams; ++i) {
 524     if (!strcmp(param[i].field, "user_time"))
 525       info->total_user_cpu_time = param[i].value.ul;
 526     else if (!strcmp(param[i].field, "system_time"))
 527       info->total_syst_cpu_time = param[i].value.ul;
 528   }
 529
 530   virTypedParamsClear(param, nparams);
 531   sfree(param);
 532 #endif /* HAVE_CPU_STATS */
 533
 534   return 0;
 535 }
 536
 537 static void init_value_list(value_list_t *vl, virDomainPtr dom) {
 538   int n;
 539   const char *name;
 540   char uuid[VIR_UUID_STRING_BUFLEN];
 541
 542   sstrncpy(vl->plugin, PLUGIN_NAME, sizeof(vl->plugin));
 543
 544   vl->host[0] = '\0';
 545
 546   /* Construct the hostname field according to HostnameFormat. */
 547   for (int i = 0; i < HF_MAX_FIELDS; ++i) {
 548     if (hostname_format[i] == hf_none)
 549       continue;
 550
 551     n = DATA_MAX_NAME_LEN - strlen(vl->host) - 2;
 552
 553     if (i > 0 && n >= 1) {
 554       strncat(vl->host, ":", 1);
 555       n--;
 556     }
 557
 558     switch (hostname_format[i]) {
 559     case hf_none:
 560       break;
 561     case hf_hostname:
 562       strncat(vl->host, hostname_g, n);
 563       break;
 564     case hf_name:
 565       name = virDomainGetName(dom);
 566       if (name)
 567         strncat(vl->host, name, n);
 568       break;
 569     case hf_uuid:
 570       if (virDomainGetUUIDString(dom, uuid) == 0)
 571         strncat(vl->host, uuid, n);
 572       break;
 573     }
 574   }
 575
 576   vl->host[sizeof(vl->host) - 1] = '\0';
 577
 578   /* Construct the plugin instance field according to PluginInstanceFormat. */
 579   for (int i = 0; i < PLGINST_MAX_FIELDS; ++i) {
 580     if (plugin_instance_format[i] == plginst_none)
 581       continue;
 582
 583     n = sizeof(vl->plugin_instance) - strlen(vl->plugin_instance) - 2;
 584
 585     if (i > 0 && n >= 1) {
 586       strncat(vl->plugin_instance, ":", 1);
 587       n--;
 588     }
 589
 590     switch (plugin_instance_format[i]) {
 591     case plginst_none:
 592       break;
 593     case plginst_name:
 594       name = virDomainGetName(dom);
 595       if (name)
 596         strncat(vl->plugin_instance, name, n);
 597       break;
 598     case plginst_uuid:
 599       if (virDomainGetUUIDString(dom, uuid) == 0)
 600         strncat(vl->plugin_instance, uuid, n);
 601       break;
 602     }
 603   }
 604
 605   vl->plugin_instance[sizeof(vl->plugin_instance) - 1] = '\0';
 606
 607 } /* void init_value_list */
 608
 609 static int init_notif(notification_t *notif, const virDomainPtr domain,
 610                       int severity, const char *msg, const char *type,
 611                       const char *type_instance) {
 612   value_list_t vl = VALUE_LIST_INIT;
 613
 614   if (!notif) {
 615     ERROR(PLUGIN_NAME ": init_notif: NULL pointer");
 616     return -1;
 617   }
 618
 619   init_value_list(&vl, domain);
 620   notification_init(notif, severity, msg, vl.host, vl.plugin,
 621                     vl.plugin_instance, type, type_instance);
 622   notif->time = cdtime();
 623   return 0;
 624 }
 625
 626 static void submit_notif(const virDomainPtr domain, int severity,
 627                          const char *msg, const char *type,
 628                          const char *type_instance) {
 629   notification_t notif;
 630
 631   init_notif(&notif, domain, severity, msg, type, type_instance);
 632   plugin_dispatch_notification(&notif);
 633   if (notif.meta)
 634     plugin_notification_meta_free(notif.meta);
 635 }
 636
 637 static void submit(virDomainPtr dom, char const *type,
 638                    char const *type_instance, value_t *values,
 639                    size_t values_len) {
 640   value_list_t vl = VALUE_LIST_INIT;
 641   init_value_list(&vl, dom);
 642
 643   vl.values = values;
 644   vl.values_len = values_len;
 645
 646   sstrncpy(vl.type, type, sizeof(vl.type));
 647   if (type_instance != NULL)
 648     sstrncpy(vl.type_instance, type_instance, sizeof(vl.type_instance));
 649
 650   plugin_dispatch_values(&vl);
 651 }
 652
 653 static void memory_submit(virDomainPtr dom, gauge_t value) {
 654   submit(dom, "memory", "total", &(value_t){.gauge = value}, 1);
 655 }
 656
 657 static void memory_stats_submit(gauge_t value, virDomainPtr dom,
 658                                 int tag_index) {
 659   static const char *tags[] = {"swap_in",        "swap_out", "major_fault",
 660                                "minor_fault",    "unused",   "available",
 661                                "actual_balloon", "rss",      "usable",
 662                                "last_update"};
 663
 664   if ((tag_index < 0) || (tag_index >= (int)STATIC_ARRAY_SIZE(tags))) {
 665     ERROR("virt plugin: Array index out of bounds: tag_index = %d", tag_index);
 666     return;
 667   }
 668
 669   submit(dom, "memory", tags[tag_index], &(value_t){.gauge = value}, 1);
 670 }
 671
 672 static void submit_derive2(const char *type, derive_t v0, derive_t v1,
 673                            virDomainPtr dom, const char *devname) {
 674   value_t values[] = {
 675       {.derive = v0}, {.derive = v1},
 676   };
 677
 678   submit(dom, type, devname, values, STATIC_ARRAY_SIZE(values));
 679 } /* void submit_derive2 */
 680
 681 static void pcpu_submit(virDomainPtr dom, struct lv_info *info) {
 682 #ifdef HAVE_CPU_STATS
 683   if (extra_stats & ex_stats_pcpu)
 684     submit_derive2("ps_cputime", info->total_user_cpu_time,
 685                    info->total_syst_cpu_time, dom, NULL);
 686 #endif /* HAVE_CPU_STATS */
 687 }
 688
 689 static double cpu_ns_to_percent(unsigned int node_cpus,
 690                                 unsigned long long cpu_time_old,
 691                                 unsigned long long cpu_time_new) {
 692   double percent = 0.0;
 693   unsigned long long cpu_time_diff = 0;
 694   double time_diff_sec = CDTIME_T_TO_DOUBLE(plugin_get_interval());
 695
 696   if (node_cpus != 0 && time_diff_sec != 0 && cpu_time_old != 0) {
 697     cpu_time_diff = cpu_time_new - cpu_time_old;
 698     percent = ((double)(100 * cpu_time_diff)) /
 699               (time_diff_sec * node_cpus * NANOSEC_IN_SEC);
 700   }
 701
 702   DEBUG(PLUGIN_NAME ": node_cpus=%u cpu_time_old=%" PRIu64
 703                     " cpu_time_new=%" PRIu64 "cpu_time_diff=%" PRIu64
 704                     " time_diff_sec=%f percent=%f",
 705         node_cpus, (uint64_t)cpu_time_old, (uint64_t)cpu_time_new,
 706         (uint64_t)cpu_time_diff, time_diff_sec, percent);
 707
 708   return percent;
 709 }
 710
 711 static void cpu_submit(const domain_t *dom, unsigned long long cpuTime_new) {
 712
 713   if (!dom)
 714     return;
 715
 716   if (extra_stats & ex_stats_cpu_util) {
 717     /* Computing %CPU requires 2 samples of cpuTime */
 718     if (dom->info.cpuTime != 0 && cpuTime_new != 0) {
 719
 720       submit(dom->ptr, "percent", "virt_cpu_total",
 721              &(value_t){.gauge = cpu_ns_to_percent(
 722                             nodeinfo.cpus, dom->info.cpuTime, cpuTime_new)},
 723              1);
 724     }
 725   }
 726
 727   submit(dom->ptr, "virt_cpu_total", NULL, &(value_t){.derive = cpuTime_new},
 728          1);
 729 }
 730
 731 static void vcpu_submit(derive_t value, virDomainPtr dom, int vcpu_nr,
 732                         const char *type) {
 733   char type_instance[DATA_MAX_NAME_LEN];
 734
 735   snprintf(type_instance, sizeof(type_instance), "%d", vcpu_nr);
 736   submit(dom, type, type_instance, &(value_t){.derive = value}, 1);
 737 }
 738
 739 static void disk_submit(struct lv_block_info *binfo, virDomainPtr dom,
 740                         const char *dev) {
 741   char *dev_copy = strdup(dev);
 742   const char *type_instance = dev_copy;
 743
 744   if (!dev_copy)
 745     return;
 746
 747   if (blockdevice_format_basename && blockdevice_format == source)
 748     type_instance = basename(dev_copy);
 749
 750   if (!type_instance) {
 751     sfree(dev_copy);
 752     return;
 753   }
 754
 755   char flush_type_instance[DATA_MAX_NAME_LEN];
 756   snprintf(flush_type_instance, sizeof(flush_type_instance), "flush-%s",
 757            type_instance);
 758
 759   if ((binfo->bi.rd_req != -1) && (binfo->bi.wr_req != -1))
 760     submit_derive2("disk_ops", (derive_t)binfo->bi.rd_req,
 761                    (derive_t)binfo->bi.wr_req, dom, type_instance);
 762
 763   if ((binfo->bi.rd_bytes != -1) && (binfo->bi.wr_bytes != -1))
 764     submit_derive2("disk_octets", (derive_t)binfo->bi.rd_bytes,
 765                    (derive_t)binfo->bi.wr_bytes, dom, type_instance);
 766
 767   if (extra_stats & ex_stats_disk) {
 768     if ((binfo->rd_total_times != -1) && (binfo->wr_total_times != -1))
 769       submit_derive2("disk_time", (derive_t)binfo->rd_total_times,
 770                      (derive_t)binfo->wr_total_times, dom, type_instance);
 771
 772     if (binfo->fl_req != -1)
 773       submit(dom, "total_requests", flush_type_instance,
 774              &(value_t){.derive = (derive_t)binfo->fl_req}, 1);
 775     if (binfo->fl_total_times != -1) {
 776       derive_t value = binfo->fl_total_times / 1000; // ns -> ms
 777       submit(dom, "total_time_in_ms", flush_type_instance,
 778              &(value_t){.derive = value}, 1);
 779     }
 780   }
 781
 782   sfree(dev_copy);
 783 }
 784
 785 static unsigned int parse_ex_stats_flags(char **exstats, int numexstats) {
 786   unsigned int ex_stats_flags = ex_stats_none;
 787   for (int i = 0; i < numexstats; i++) {
 788     for (int j = 0; ex_stats_table[j].name != NULL; j++) {
 789       if (strcasecmp(exstats[i], ex_stats_table[j].name) == 0) {
 790         DEBUG(PLUGIN_NAME " plugin: enabling extra stats for '%s'",
 791               ex_stats_table[j].name);
 792         ex_stats_flags |= ex_stats_table[j].flag;
 793         break;
 794       }
 795
 796       if (ex_stats_table[j + 1].name == NULL) {
 797         ERROR(PLUGIN_NAME ": Unmatched ExtraStats option: %s", exstats[i]);
 798       }
 799     }
 800   }
 801   return ex_stats_flags;
 802 }
 803
 804 static void domain_state_submit(virDomainPtr dom, int state, int reason) {
 805
 806   if ((state < 0) || (state >= STATIC_ARRAY_SIZE(domain_states))) {
 807     ERROR(PLUGIN_NAME ": Array index out of bounds: state=%d", state);
 808     return;
 809   }
 810
 811   char msg[DATA_MAX_NAME_LEN];
 812   const char *state_str = domain_states[state];
 813 #ifdef HAVE_DOM_REASON
 814   if ((reason < 0) || (reason >= STATIC_ARRAY_SIZE(domain_reasons[0]))) {
 815     ERROR(PLUGIN_NAME ": Array index out of bounds: reason=%d", reason);
 816     return;
 817   }
 818
 819   const char *reason_str = domain_reasons[state][reason];
 820   /* Array size for domain reasons is fixed, but different domain states can
 821    * have different number of reasons. We need to check if reason was
 822    * successfully parsed */
 823   if (!reason_str) {
 824     ERROR(PLUGIN_NAME ": Invalid reason (%d) for domain state: %s", reason,
 825           state_str);
 826     return;
 827   }
 828 #else
 829   const char *reason_str = "N/A";
 830 #endif
 831
 832   snprintf(msg, sizeof(msg), "Domain state: %s. Reason: %s", state_str,
 833            reason_str);
 834
 835   int severity;
 836   switch (state) {
 837   case VIR_DOMAIN_NOSTATE:
 838   case VIR_DOMAIN_RUNNING:
 839   case VIR_DOMAIN_SHUTDOWN:
 840   case VIR_DOMAIN_SHUTOFF:
 841     severity = NOTIF_OKAY;
 842     break;
 843   case VIR_DOMAIN_BLOCKED:
 844   case VIR_DOMAIN_PAUSED:
 845 #ifdef DOM_STATE_PMSUSPENDED
 846   case VIR_DOMAIN_PMSUSPENDED:
 847 #endif
 848     severity = NOTIF_WARNING;
 849     break;
 850   case VIR_DOMAIN_CRASHED:
 851     severity = NOTIF_FAILURE;
 852     break;
 853   default:
 854     ERROR(PLUGIN_NAME ": Unrecognized domain state (%d)", state);
 855     return;
 856   }
 857   submit_notif(dom, severity, msg, "domain_state", NULL);
 858 }
 859
 860 static int lv_config(const char *key, const char *value) {
 861   if (virInitialize() != 0)
 862     return 1;
 863
 864   if (il_domains == NULL)
 865     il_domains = ignorelist_create(1);
 866   if (il_block_devices == NULL)
 867     il_block_devices = ignorelist_create(1);
 868   if (il_interface_devices == NULL)
 869     il_interface_devices = ignorelist_create(1);
 870
 871   if (strcasecmp(key, "Connection") == 0) {
 872     char *tmp = strdup(value);
 873     if (tmp == NULL) {
 874       ERROR(PLUGIN_NAME " plugin: Connection strdup failed.");
 875       return 1;
 876     }
 877     sfree(conn_string);
 878     conn_string = tmp;
 879     return 0;
 880   }
 881
 882   if (strcasecmp(key, "RefreshInterval") == 0) {
 883     char *eptr = NULL;
 884     interval = strtol(value, &eptr, 10);
 885     if (eptr == NULL || *eptr != '\0')
 886       return 1;
 887     return 0;
 888   }
 889
 890   if (strcasecmp(key, "Domain") == 0) {
 891     if (ignorelist_add(il_domains, value))
 892       return 1;
 893     return 0;
 894   }
 895   if (strcasecmp(key, "BlockDevice") == 0) {
 896     if (ignorelist_add(il_block_devices, value))
 897       return 1;
 898     return 0;
 899   }
 900
 901   if (strcasecmp(key, "BlockDeviceFormat") == 0) {
 902     if (strcasecmp(value, "target") == 0)
 903       blockdevice_format = target;
 904     else if (strcasecmp(value, "source") == 0)
 905       blockdevice_format = source;
 906     else {
 907       ERROR(PLUGIN_NAME " plugin: unknown BlockDeviceFormat: %s", value);
 908       return -1;
 909     }
 910     return 0;
 911   }
 912   if (strcasecmp(key, "BlockDeviceFormatBasename") == 0) {
 913     blockdevice_format_basename = IS_TRUE(value);
 914     return 0;
 915   }
 916   if (strcasecmp(key, "InterfaceDevice") == 0) {
 917     if (ignorelist_add(il_interface_devices, value))
 918       return 1;
 919     return 0;
 920   }
 921
 922   if (strcasecmp(key, "IgnoreSelected") == 0) {
 923     if (IS_TRUE(value)) {
 924       ignorelist_set_invert(il_domains, 0);
 925       ignorelist_set_invert(il_block_devices, 0);
 926       ignorelist_set_invert(il_interface_devices, 0);
 927     } else {
 928       ignorelist_set_invert(il_domains, 1);
 929       ignorelist_set_invert(il_block_devices, 1);
 930       ignorelist_set_invert(il_interface_devices, 1);
 931     }
 932     return 0;
 933   }
 934
 935   if (strcasecmp(key, "HostnameFormat") == 0) {
 936     char *value_copy;
 937     char *fields[HF_MAX_FIELDS];
 938     int n;
 939
 940     value_copy = strdup(value);
 941     if (value_copy == NULL) {
 942       ERROR(PLUGIN_NAME " plugin: strdup failed.");
 943       return -1;
 944     }
 945
 946     n = strsplit(value_copy, fields, HF_MAX_FIELDS);
 947     if (n < 1) {
 948       sfree(value_copy);
 949       ERROR(PLUGIN_NAME " plugin: HostnameFormat: no fields");
 950       return -1;
 951     }
 952
 953     for (int i = 0; i < n; ++i) {
 954       if (strcasecmp(fields[i], "hostname") == 0)
 955         hostname_format[i] = hf_hostname;
 956       else if (strcasecmp(fields[i], "name") == 0)
 957         hostname_format[i] = hf_name;
 958       else if (strcasecmp(fields[i], "uuid") == 0)
 959         hostname_format[i] = hf_uuid;
 960       else {
 961         ERROR(PLUGIN_NAME " plugin: unknown HostnameFormat field: %s",
 962               fields[i]);
 963         sfree(value_copy);
 964         return -1;
 965       }
 966     }
 967     sfree(value_copy);
 968
 969     for (int i = n; i < HF_MAX_FIELDS; ++i)
 970       hostname_format[i] = hf_none;
 971
 972     return 0;
 973   }
 974
 975   if (strcasecmp(key, "PluginInstanceFormat") == 0) {
 976     char *value_copy;
 977     char *fields[PLGINST_MAX_FIELDS];
 978     int n;
 979
 980     value_copy = strdup(value);
 981     if (value_copy == NULL) {
 982       ERROR(PLUGIN_NAME " plugin: strdup failed.");
 983       return -1;
 984     }
 985
 986     n = strsplit(value_copy, fields, PLGINST_MAX_FIELDS);
 987     if (n < 1) {
 988       sfree(value_copy);
 989       ERROR(PLUGIN_NAME " plugin: PluginInstanceFormat: no fields");
 990       return -1;
 991     }
 992
 993     for (int i = 0; i < n; ++i) {
 994       if (strcasecmp(fields[i], "none") == 0) {
 995         plugin_instance_format[i] = plginst_none;
 996         break;
 997       } else if (strcasecmp(fields[i], "name") == 0)
 998         plugin_instance_format[i] = plginst_name;
 999       else if (strcasecmp(fields[i], "uuid") == 0)
1000         plugin_instance_format[i] = plginst_uuid;
1001       else {
1002         ERROR(PLUGIN_NAME " plugin: unknown PluginInstanceFormat field: %s",
1003               fields[i]);
1004         sfree(value_copy);
1005         return -1;
1006       }
1007     }
1008     sfree(value_copy);
1009
1010     for (int i = n; i < PLGINST_MAX_FIELDS; ++i)
1011       plugin_instance_format[i] = plginst_none;
1012
1013     return 0;
1014   }
1015
1016   if (strcasecmp(key, "InterfaceFormat") == 0) {
1017     if (strcasecmp(value, "name") == 0)
1018       interface_format = if_name;
1019     else if (strcasecmp(value, "address") == 0)
1020       interface_format = if_address;
1021     else if (strcasecmp(value, "number") == 0)
1022       interface_format = if_number;
1023     else {
1024       ERROR(PLUGIN_NAME " plugin: unknown InterfaceFormat: %s", value);
1025       return -1;
1026     }
1027     return 0;
1028   }
1029
1030   if (strcasecmp(key, "Instances") == 0) {
1031     char *eptr = NULL;
1032     double val = strtod(value, &eptr);
1033
1034     if (*eptr != '\0') {
1035       ERROR(PLUGIN_NAME " plugin: Invalid value for Instances = '%s'", value);
1036       return 1;
1037     }
1038     if (val <= 0) {
1039       ERROR(PLUGIN_NAME " plugin: Instances <= 0 makes no sense.");
1040       return 1;
1041     }
1042     if (val > NR_INSTANCES_MAX) {
1043       ERROR(PLUGIN_NAME " plugin: Instances=%f > NR_INSTANCES_MAX=%i"
1044                         " use a lower setting or recompile the plugin.",
1045             val, NR_INSTANCES_MAX);
1046       return 1;
1047     }
1048
1049     nr_instances = (int)val;
1050     DEBUG(PLUGIN_NAME " plugin: configured %i instances", nr_instances);
1051     return 0;
1052   }
1053
1054   if (strcasecmp(key, "ExtraStats") == 0) {
1055     char *localvalue = strdup(value);
1056     if (localvalue != NULL) {
1057       char *exstats[EX_STATS_MAX_FIELDS];
1058       int numexstats =
1059           strsplit(localvalue, exstats, STATIC_ARRAY_SIZE(exstats));
1060       extra_stats = parse_ex_stats_flags(exstats, numexstats);
1061       sfree(localvalue);
1062
1063 #ifdef HAVE_JOB_STATS
1064       if ((extra_stats & ex_stats_job_stats_completed) &&
1065           (extra_stats & ex_stats_job_stats_background)) {
1066         ERROR(PLUGIN_NAME " plugin: Invalid job stats configuration. Only one "
1067                           "type of job statistics can be collected at the same "
1068                           "time");
1069         return 1;
1070       }
1071 #endif
1072     }
1073   }
1074
1075   /* Unrecognised option. */
1076   return -1;
1077 }
1078
1079 static int lv_connect(void) {
1080   if (conn == NULL) {
1081 /* `conn_string == NULL' is acceptable */
1082 #ifdef HAVE_FS_INFO
1083     /* virDomainGetFSInfo requires full read-write access connection */
1084     if (extra_stats & ex_stats_fs_info)
1085       conn = virConnectOpen(conn_string);
1086     else
1087 #endif
1088       conn = virConnectOpenReadOnly(conn_string);
1089     if (conn == NULL) {
1090       c_complain(LOG_ERR, &conn_complain,
1091                  PLUGIN_NAME " plugin: Unable to connect: "
1092                              "virConnectOpen failed.");
1093       return -1;
1094     }
1095     int status = virNodeGetInfo(conn, &nodeinfo);
1096     if (status != 0) {
1097       ERROR(PLUGIN_NAME ": virNodeGetInfo failed");
1098       return -1;
1099     }
1100   }
1101   c_release(LOG_NOTICE, &conn_complain,
1102             PLUGIN_NAME " plugin: Connection established.");
1103   return 0;
1104 }
1105
1106 static void lv_disconnect(void) {
1107   if (conn != NULL)
1108     virConnectClose(conn);
1109   conn = NULL;
1110   WARNING(PLUGIN_NAME " plugin: closed connection to libvirt");
1111 }
1112
1113 static int lv_domain_block_info(virDomainPtr dom, const char *path,
1114                                 struct lv_block_info *binfo) {
1115 #ifdef HAVE_BLOCK_STATS_FLAGS
1116   int nparams = 0;
1117   if (virDomainBlockStatsFlags(dom, path, NULL, &nparams, 0) < 0 ||
1118       nparams <= 0) {
1119     VIRT_ERROR(conn, "getting the disk params count");
1120     return -1;
1121   }
1122
1123   virTypedParameterPtr params = calloc((size_t)nparams, sizeof(*params));
1124   if (params == NULL) {
1125     ERROR("virt plugin: alloc(%i) for block=%s parameters failed.", nparams,
1126           path);
1127     return -1;
1128   }
1129
1130   int rc = -1;
1131   if (virDomainBlockStatsFlags(dom, path, params, &nparams, 0) < 0) {
1132     VIRT_ERROR(conn, "getting the disk params values");
1133   } else {
1134     rc = get_block_info(binfo, params, nparams);
1135   }
1136
1137   virTypedParamsClear(params, nparams);
1138   sfree(params);
1139   return rc;
1140 #else
1141   return virDomainBlockStats(dom, path, &(binfo->bi), sizeof(binfo->bi));
1142 #endif /* HAVE_BLOCK_STATS_FLAGS */
1143 }
1144
1145 #ifdef HAVE_PERF_STATS
1146 static void perf_submit(virDomainStatsRecordPtr stats) {
1147   for (int i = 0; i < stats->nparams; ++i) {
1148     /* Replace '.' with '_' in event field to match other metrics' naming
1149      * convention */
1150     char *c = strchr(stats->params[i].field, '.');
1151     if (c)
1152       *c = '_';
1153     submit(stats->dom, "perf", stats->params[i].field,
1154            &(value_t){.derive = stats->params[i].value.ul}, 1);
1155   }
1156 }
1157
1158 static int get_perf_events(virDomainPtr domain) {
1159   virDomainStatsRecordPtr *stats = NULL;
1160   /* virDomainListGetStats requires a NULL terminated list of domains */
1161   virDomainPtr domain_array[] = {domain, NULL};
1162
1163   int status =
1164       virDomainListGetStats(domain_array, VIR_DOMAIN_STATS_PERF, &stats, 0);
1165   if (status == -1) {
1166     ERROR("virt plugin: virDomainListGetStats failed with status %i.", status);
1167     return status;
1168   }
1169
1170   for (int i = 0; i < status; ++i)
1171     perf_submit(stats[i]);
1172
1173   virDomainStatsRecordListFree(stats);
1174   return 0;
1175 }
1176 #endif /* HAVE_PERF_STATS */
1177
1178 static void vcpu_pin_submit(virDomainPtr dom, int max_cpus, int vcpu,
1179                             unsigned char *cpu_maps, int cpu_map_len) {
1180   for (int cpu = 0; cpu < max_cpus; ++cpu) {
1181     char type_instance[DATA_MAX_NAME_LEN];
1182     _Bool is_set = VIR_CPU_USABLE(cpu_maps, cpu_map_len, vcpu, cpu) ? 1 : 0;
1183
1184     snprintf(type_instance, sizeof(type_instance), "vcpu_%d-cpu_%d", vcpu, cpu);
1185     submit(dom, "cpu_affinity", type_instance, &(value_t){.gauge = is_set}, 1);
1186   }
1187 }
1188
1189 static int get_vcpu_stats(virDomainPtr domain, unsigned short nr_virt_cpu) {
1190   int max_cpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
1191   int cpu_map_len = VIR_CPU_MAPLEN(max_cpus);
1192
1193   virVcpuInfoPtr vinfo = calloc(nr_virt_cpu, sizeof(vinfo[0]));
1194   if (vinfo == NULL) {
1195     ERROR(PLUGIN_NAME " plugin: malloc failed.");
1196     return -1;
1197   }
1198
1199   unsigned char *cpumaps = calloc(nr_virt_cpu, cpu_map_len);
1200   if (cpumaps == NULL) {
1201     ERROR(PLUGIN_NAME " plugin: malloc failed.");
1202     sfree(vinfo);
1203     return -1;
1204   }
1205
1206   int status =
1207       virDomainGetVcpus(domain, vinfo, nr_virt_cpu, cpumaps, cpu_map_len);
1208   if (status < 0) {
1209     ERROR(PLUGIN_NAME " plugin: virDomainGetVcpus failed with status %i.",
1210           status);
1211     sfree(cpumaps);
1212     sfree(vinfo);
1213     return status;
1214   }
1215
1216   for (int i = 0; i < nr_virt_cpu; ++i) {
1217     vcpu_submit(vinfo[i].cpuTime, domain, vinfo[i].number, "virt_vcpu");
1218     if (extra_stats & ex_stats_vcpupin)
1219       vcpu_pin_submit(domain, max_cpus, i, cpumaps, cpu_map_len);
1220   }
1221
1222   sfree(cpumaps);
1223   sfree(vinfo);
1224   return 0;
1225 }
1226
1227 #ifdef HAVE_DOM_REASON
1228 static int get_domain_state(virDomainPtr domain) {
1229   int domain_state = 0;
1230   int domain_reason = 0;
1231
1232   int status = virDomainGetState(domain, &domain_state, &domain_reason, 0);
1233   if (status != 0) {
1234     ERROR(PLUGIN_NAME " plugin: virDomainGetState failed with status %i.",
1235           status);
1236     return status;
1237   }
1238
1239   domain_state_submit(domain, domain_state, domain_reason);
1240   return status;
1241 }
1242 #endif /* HAVE_DOM_REASON */
1243
1244 static int get_memory_stats(virDomainPtr domain) {
1245   virDomainMemoryStatPtr minfo =
1246       calloc(VIR_DOMAIN_MEMORY_STAT_NR, sizeof(virDomainMemoryStatStruct));
1247   if (minfo == NULL) {
1248     ERROR("virt plugin: malloc failed.");
1249     return -1;
1250   }
1251
1252   int mem_stats =
1253       virDomainMemoryStats(domain, minfo, VIR_DOMAIN_MEMORY_STAT_NR, 0);
1254   if (mem_stats < 0) {
1255     ERROR("virt plugin: virDomainMemoryStats failed with mem_stats %i.",
1256           mem_stats);
1257     sfree(minfo);
1258     return mem_stats;
1259   }
1260
1261   for (int i = 0; i < mem_stats; i++)
1262     memory_stats_submit((gauge_t)minfo[i].val * 1024, domain, minfo[i].tag);
1263
1264   sfree(minfo);
1265   return 0;
1266 }
1267
1268 #ifdef HAVE_DISK_ERR
1269 static void disk_err_submit(virDomainPtr domain,
1270                             virDomainDiskErrorPtr disk_err) {
1271   submit(domain, "disk_error", disk_err->disk,
1272          &(value_t){.gauge = disk_err->error}, 1);
1273 }
1274
1275 static int get_disk_err(virDomainPtr domain) {
1276   /* Get preferred size of disk errors array */
1277   int disk_err_count = virDomainGetDiskErrors(domain, NULL, 0, 0);
1278   if (disk_err_count == -1) {
1279     ERROR(PLUGIN_NAME
1280           " plugin: failed to get preferred size of disk errors array");
1281     return -1;
1282   }
1283
1284   DEBUG(PLUGIN_NAME
1285         " plugin: preferred size of disk errors array: %d for domain %s",
1286         disk_err_count, virDomainGetName(domain));
1287   virDomainDiskError disk_err[disk_err_count];
1288
1289   disk_err_count = virDomainGetDiskErrors(domain, disk_err, disk_err_count, 0);
1290   if (disk_err_count == -1) {
1291     ERROR(PLUGIN_NAME " plugin: virDomainGetDiskErrors failed with status %d",
1292           disk_err_count);
1293     return -1;
1294   }
1295
1296   DEBUG(PLUGIN_NAME " plugin: detected %d disk errors in domain %s",
1297         disk_err_count, virDomainGetName(domain));
1298
1299   for (int i = 0; i < disk_err_count; ++i) {
1300     disk_err_submit(domain, &disk_err[i]);
1301     sfree(disk_err[i].disk);
1302   }
1303
1304   return 0;
1305 }
1306 #endif /* HAVE_DISK_ERR */
1307
1308 static int get_block_stats(struct block_device *block_dev) {
1309
1310   if (!block_dev) {
1311     ERROR(PLUGIN_NAME " plugin: get_block_stats NULL pointer");
1312     return -1;
1313   }
1314
1315   struct lv_block_info binfo;
1316   init_block_info(&binfo);
1317
1318   if (lv_domain_block_info(block_dev->dom, block_dev->path, &binfo) < 0) {
1319     ERROR(PLUGIN_NAME " plugin: lv_domain_block_info failed");
1320     return -1;
1321   }
1322
1323   disk_submit(&binfo, block_dev->dom, block_dev->path);
1324   return 0;
1325 }
1326
1327 #ifdef HAVE_FS_INFO
1328
1329 #define NM_ADD_ITEM(_fun, _name, _val)                                         \
1330   do {                                                                         \
1331     ret = _fun(&notif, _name, _val);                                           \
1332     if (ret != 0) {                                                            \
1333       ERROR(PLUGIN_NAME " plugin: failed to add notification metadata");       \
1334       goto cleanup;                                                            \
1335     }                                                                          \
1336   } while (0)
1337
1338 #define NM_ADD_STR_ITEMS(_items, _size)                                        \
1339   do {                                                                         \
1340     for (int _i = 0; _i < _size; ++_i) {                                       \
1341       DEBUG(PLUGIN_NAME                                                        \
1342             " plugin: Adding notification metadata name=%s value=%s",          \
1343             _items[_i].name, _items[_i].value);                                \
1344       NM_ADD_ITEM(plugin_notification_meta_add_string, _items[_i].name,        \
1345                   _items[_i].value);                                           \
1346     }                                                                          \
1347   } while (0)
1348
1349 static int fs_info_notify(virDomainPtr domain, virDomainFSInfoPtr fs_info) {
1350   notification_t notif;
1351   int ret = 0;
1352
1353   /* Local struct, just for the purpose of this function. */
1354   typedef struct nm_str_item_s {
1355     const char *name;
1356     const char *value;
1357   } nm_str_item_t;
1358
1359   nm_str_item_t fs_dev_alias[fs_info->ndevAlias];
1360   nm_str_item_t fs_str_items[] = {
1361       {.name = "mountpoint", .value = fs_info->mountpoint},
1362       {.name = "name", .value = fs_info->name},
1363       {.name = "fstype", .value = fs_info->fstype}};
1364
1365   for (int i = 0; i < fs_info->ndevAlias; ++i) {
1366     fs_dev_alias[i].name = "devAlias";
1367     fs_dev_alias[i].value = fs_info->devAlias[i];
1368   }
1369
1370   init_notif(&notif, domain, NOTIF_OKAY, "File system information",
1371              "file_system", NULL);
1372   NM_ADD_STR_ITEMS(fs_str_items, STATIC_ARRAY_SIZE(fs_str_items));
1373   NM_ADD_ITEM(plugin_notification_meta_add_unsigned_int, "ndevAlias",
1374               fs_info->ndevAlias);
1375   NM_ADD_STR_ITEMS(fs_dev_alias, fs_info->ndevAlias);
1376
1377   plugin_dispatch_notification(&notif);
1378
1379 cleanup:
1380   if (notif.meta)
1381     plugin_notification_meta_free(notif.meta);
1382   return ret;
1383 }
1384
1385 #undef RETURN_ON_ERR
1386 #undef NM_ADD_STR_ITEMS
1387
1388 static int get_fs_info(virDomainPtr domain) {
1389   virDomainFSInfoPtr *fs_info = NULL;
1390   int ret = 0;
1391
1392   int mount_points_cnt = virDomainGetFSInfo(domain, &fs_info, 0);
1393   if (mount_points_cnt == -1) {
1394     ERROR(PLUGIN_NAME " plugin: virDomainGetFSInfo failed: %d",
1395           mount_points_cnt);
1396     return mount_points_cnt;
1397   }
1398
1399   for (int i = 0; i < mount_points_cnt; ++i) {
1400     if (fs_info_notify(domain, fs_info[i]) != 0) {
1401       ERROR(PLUGIN_NAME " plugin: failed to send file system notification "
1402                         "for mount point %s",
1403             fs_info[i]->mountpoint);
1404       ret = -1;
1405     }
1406     virDomainFSInfoFree(fs_info[i]);
1407   }
1408
1409   sfree(fs_info);
1410   return ret;
1411 }
1412
1413 #endif /* HAVE_FS_INFO */
1414
1415 #ifdef HAVE_JOB_STATS
1416 static void job_stats_submit(virDomainPtr domain, virTypedParameterPtr param) {
1417   value_t vl = {0};
1418
1419   if (param->type == VIR_TYPED_PARAM_INT)
1420     vl.derive = param->value.i;
1421   else if (param->type == VIR_TYPED_PARAM_UINT)
1422     vl.derive = param->value.ui;
1423   else if (param->type == VIR_TYPED_PARAM_LLONG)
1424     vl.derive = param->value.l;
1425   else if (param->type == VIR_TYPED_PARAM_ULLONG)
1426     vl.derive = param->value.ul;
1427   else if (param->type == VIR_TYPED_PARAM_DOUBLE)
1428     vl.derive = param->value.d;
1429   else if (param->type == VIR_TYPED_PARAM_BOOLEAN)
1430     vl.derive = param->value.b;
1431   else if (param->type == VIR_TYPED_PARAM_STRING) {
1432     submit_notif(domain, NOTIF_OKAY, param->value.s, "job_stats", param->field);
1433     return;
1434   } else {
1435     ERROR(PLUGIN_NAME " plugin: unrecognized virTypedParameterType");
1436     return;
1437   }
1438
1439   submit(domain, "job_stats", param->field, &vl, 1);
1440 }
1441
1442 static int get_job_stats(virDomainPtr domain) {
1443   int ret = 0;
1444   int job_type = 0;
1445   int nparams = 0;
1446   virTypedParameterPtr params = NULL;
1447   int flags = (extra_stats & ex_stats_job_stats_completed)
1448                   ? VIR_DOMAIN_JOB_STATS_COMPLETED
1449                   : 0;
1450
1451   ret = virDomainGetJobStats(domain, &job_type, &params, &nparams, flags);
1452   if (ret != 0) {
1453     ERROR(PLUGIN_NAME " plugin: virDomainGetJobStats failed: %d", ret);
1454     return ret;
1455   }
1456
1457   DEBUG(PLUGIN_NAME " plugin: job_type=%d nparams=%d", job_type, nparams);
1458
1459   for (int i = 0; i < nparams; ++i) {
1460     DEBUG(PLUGIN_NAME " plugin: param[%d] field=%s type=%d", i, params[i].field,
1461           params[i].type);
1462     job_stats_submit(domain, &params[i]);
1463   }
1464
1465   virTypedParamsFree(params, nparams);
1466   return ret;
1467 }
1468 #endif /* HAVE_JOB_STATS */
1469
1470 static int get_domain_metrics(domain_t *domain) {
1471   struct lv_info info;
1472
1473   if (!domain || !domain->ptr) {
1474     ERROR(PLUGIN_NAME ": get_domain_metrics: NULL pointer");
1475     return -1;
1476   }
1477
1478   init_lv_info(&info);
1479   int status = lv_domain_info(domain->ptr, &info);
1480   if (status != 0) {
1481     ERROR(PLUGIN_NAME " plugin: virDomainGetInfo failed with status %i.",
1482           status);
1483     return -1;
1484   }
1485
1486   if (extra_stats & ex_stats_domain_state) {
1487 #ifdef HAVE_DOM_REASON
1488     /* At this point we already know domain's state from virDomainGetInfo call,
1489      * however it doesn't provide a reason for entering particular state.
1490      * We need to get it from virDomainGetState.
1491      */
1492     GET_STATS(get_domain_state, "domain reason", domain->ptr);
1493 #else
1494     /* virDomainGetState is not available. Submit 0, which corresponds to
1495      * unknown reason. */
1496     domain_state_submit(domain->ptr, info.di.state, 0);
1497 #endif
1498   }
1499
1500   /* Gather remaining stats only for running domains */
1501   if (info.di.state != VIR_DOMAIN_RUNNING)
1502     return 0;
1503
1504   pcpu_submit(domain->ptr, &info);
1505   cpu_submit(domain, info.di.cpuTime);
1506
1507   memory_submit(domain->ptr, (gauge_t)info.di.memory * 1024);
1508
1509   GET_STATS(get_vcpu_stats, "vcpu stats", domain->ptr, info.di.nrVirtCpu);
1510   GET_STATS(get_memory_stats, "memory stats", domain->ptr);
1511
1512 #ifdef HAVE_PERF_STATS
1513   if (extra_stats & ex_stats_perf)
1514     GET_STATS(get_perf_events, "performance monitoring events", domain->ptr);
1515 #endif
1516
1517 #ifdef HAVE_FS_INFO
1518   if (extra_stats & ex_stats_fs_info)
1519     GET_STATS(get_fs_info, "file system info", domain->ptr);
1520 #endif
1521
1522 #ifdef HAVE_DISK_ERR
1523   if (extra_stats & ex_stats_disk_err)
1524     GET_STATS(get_disk_err, "disk errors", domain->ptr);
1525 #endif
1526
1527 #ifdef HAVE_JOB_STATS
1528   if (extra_stats &
1529       (ex_stats_job_stats_completed | ex_stats_job_stats_background))
1530     GET_STATS(get_job_stats, "job stats", domain->ptr);
1531 #endif
1532
1533   /* Update cached virDomainInfo. It has to be done after cpu_submit */
1534   memcpy(&domain->info, &info.di, sizeof(domain->info));
1535   return 0;
1536 }
1537
1538 static int get_if_dev_stats(struct interface_device *if_dev) {
1539   virDomainInterfaceStatsStruct stats = {0};
1540   char *display_name = NULL;
1541
1542   if (!if_dev) {
1543     ERROR(PLUGIN_NAME " plugin: get_if_dev_stats: NULL pointer");
1544     return -1;
1545   }
1546
1547   switch (interface_format) {
1548   case if_address:
1549     display_name = if_dev->address;
1550     break;
1551   case if_number:
1552     display_name = if_dev->number;
1553     break;
1554   case if_name:
1555   default:
1556     display_name = if_dev->path;
1557   }
1558
1559   if (virDomainInterfaceStats(if_dev->dom, if_dev->path, &stats,
1560                               sizeof(stats)) != 0) {
1561     ERROR(PLUGIN_NAME " plugin: virDomainInterfaceStats failed");
1562     return -1;
1563   }
1564
1565   if ((stats.rx_bytes != -1) && (stats.tx_bytes != -1))
1566     submit_derive2("if_octets", (derive_t)stats.rx_bytes,
1567                    (derive_t)stats.tx_bytes, if_dev->dom, display_name);
1568
1569   if ((stats.rx_packets != -1) && (stats.tx_packets != -1))
1570     submit_derive2("if_packets", (derive_t)stats.rx_packets,
1571                    (derive_t)stats.tx_packets, if_dev->dom, display_name);
1572
1573   if ((stats.rx_errs != -1) && (stats.tx_errs != -1))
1574     submit_derive2("if_errors", (derive_t)stats.rx_errs,
1575                    (derive_t)stats.tx_errs, if_dev->dom, display_name);
1576
1577   if ((stats.rx_drop != -1) && (stats.tx_drop != -1))
1578     submit_derive2("if_dropped", (derive_t)stats.rx_drop,
1579                    (derive_t)stats.tx_drop, if_dev->dom, display_name);
1580   return 0;
1581 }
1582
1583 static int lv_read(user_data_t *ud) {
1584   time_t t;
1585   struct lv_read_instance *inst = NULL;
1586   struct lv_read_state *state = NULL;
1587
1588   if (ud->data == NULL) {
1589     ERROR(PLUGIN_NAME " plugin: NULL userdata");
1590     return -1;
1591   }
1592
1593   inst = ud->data;
1594   state = &inst->read_state;
1595
1596   if (inst->id == 0) {
1597     if (lv_connect() < 0)
1598       return -1;
1599   }
1600
1601   time(&t);
1602
1603   /* Need to refresh domain or device lists? */
1604   if ((last_refresh == (time_t)0) ||
1605       ((interval > 0) && ((last_refresh + interval) <= t))) {
1606     if (refresh_lists(inst) != 0) {
1607       if (inst->id == 0)
1608         lv_disconnect();
1609       return -1;
1610     }
1611     last_refresh = t;
1612   }
1613
1614 #if 0
1615     for (int i = 0; i < nr_domains; ++i)
1616         fprintf (stderr, "domain %s\n", virDomainGetName (state->domains[i].ptr));
1617     for (int i = 0; i < nr_block_devices; ++i)
1618         fprintf  (stderr, "block device %d %s:%s\n",
1619                   i, virDomainGetName (block_devices[i].dom),
1620                   block_devices[i].path);
1621     for (int i = 0; i < nr_interface_devices; ++i)
1622         fprintf (stderr, "interface device %d %s:%s\n",
1623                  i, virDomainGetName (interface_devices[i].dom),
1624                  interface_devices[i].path);
1625 #endif
1626
1627   /* Get domains' metrics */
1628   for (int i = 0; i < state->nr_domains; ++i) {
1629     int status = get_domain_metrics(&state->domains[i]);
1630     if (status != 0)
1631       ERROR(PLUGIN_NAME " failed to get metrics for domain=%s",
1632             virDomainGetName(state->domains[i].ptr));
1633   }
1634
1635   /* Get block device stats for each domain. */
1636   for (int i = 0; i < state->nr_block_devices; ++i) {
1637     int status = get_block_stats(&state->block_devices[i]);
1638     if (status != 0)
1639       ERROR(PLUGIN_NAME
1640             " failed to get stats for block device (%s) in domain %s",
1641             state->block_devices[i].path,
1642             virDomainGetName(state->domains[i].ptr));
1643   }
1644
1645   /* Get interface stats for each domain. */
1646   for (int i = 0; i < state->nr_interface_devices; ++i) {
1647     int status = get_if_dev_stats(&state->interface_devices[i]);
1648     if (status != 0)
1649       ERROR(PLUGIN_NAME
1650             " failed to get interface stats for device (%s) in domain %s",
1651             state->interface_devices[i].path,
1652             virDomainGetName(state->interface_devices[i].dom));
1653   }
1654
1655   return 0;
1656 }
1657
1658 static int lv_init_instance(size_t i, plugin_read_cb callback) {
1659   struct lv_user_data *lv_ud = &(lv_read_user_data[i]);
1660   struct lv_read_instance *inst = &(lv_ud->inst);
1661
1662   memset(lv_ud, 0, sizeof(*lv_ud));
1663
1664   snprintf(inst->tag, sizeof(inst->tag), "%s-%" PRIsz, PLUGIN_NAME, i);
1665   inst->id = i;
1666
1667   user_data_t *ud = &(lv_ud->ud);
1668   ud->data = inst;
1669   ud->free_func = NULL;
1670
1671   INFO(PLUGIN_NAME " plugin: reader %s initialized", inst->tag);
1672   return plugin_register_complex_read(NULL, inst->tag, callback, 0, ud);
1673 }
1674
1675 static void lv_clean_read_state(struct lv_read_state *state) {
1676   free_block_devices(state);
1677   free_interface_devices(state);
1678   free_domains(state);
1679 }
1680
1681 static void lv_fini_instance(size_t i) {
1682   struct lv_read_instance *inst = &(lv_read_user_data[i].inst);
1683   struct lv_read_state *state = &(inst->read_state);
1684
1685   lv_clean_read_state(state);
1686   INFO(PLUGIN_NAME " plugin: reader %s finalized", inst->tag);
1687 }
1688
1689 static int lv_init(void) {
1690   if (virInitialize() != 0)
1691     return -1;
1692
1693   if (lv_connect() != 0)
1694     return -1;
1695
1696   DEBUG(PLUGIN_NAME " plugin: starting %i instances", nr_instances);
1697
1698   for (int i = 0; i < nr_instances; ++i)
1699     lv_init_instance(i, lv_read);
1700
1701   return 0;
1702 }
1703
1704 /*
1705  * returns 0 on success and <0 on error
1706  */
1707 static int lv_domain_get_tag(xmlXPathContextPtr xpath_ctx, const char *dom_name,
1708                              char *dom_tag) {
1709   char xpath_str[BUFFER_MAX_LEN] = {'\0'};
1710   xmlXPathObjectPtr xpath_obj = NULL;
1711   xmlNodePtr xml_node = NULL;
1712   int ret = -1;
1713   int err;
1714
1715   err = xmlXPathRegisterNs(xpath_ctx,
1716                            (const xmlChar *)METADATA_VM_PARTITION_PREFIX,
1717                            (const xmlChar *)METADATA_VM_PARTITION_URI);
1718   if (err) {
1719     ERROR(PLUGIN_NAME " plugin: xmlXpathRegisterNs(%s, %s) failed on domain %s",
1720           METADATA_VM_PARTITION_PREFIX, METADATA_VM_PARTITION_URI, dom_name);
1721     goto done;
1722   }
1723
1724   snprintf(xpath_str, sizeof(xpath_str), "/domain/metadata/%s:%s/text()",
1725            METADATA_VM_PARTITION_PREFIX, METADATA_VM_PARTITION_ELEMENT);
1726   xpath_obj = xmlXPathEvalExpression((xmlChar *)xpath_str, xpath_ctx);
1727   if (xpath_obj == NULL) {
1728     ERROR(PLUGIN_NAME " plugin: xmlXPathEval(%s) failed on domain %s",
1729           xpath_str, dom_name);
1730     goto done;
1731   }
1732
1733   if (xpath_obj->type != XPATH_NODESET) {
1734     ERROR(PLUGIN_NAME " plugin: xmlXPathEval(%s) unexpected return type %d "
1735                       "(wanted %d) on domain %s",
1736           xpath_str, xpath_obj->type, XPATH_NODESET, dom_name);
1737     goto done;
1738   }
1739
1740   /*
1741    * from now on there is no real error, it's ok if a domain
1742    * doesn't have the metadata partition tag.
1743    */
1744   ret = 0;
1745   if (xpath_obj->nodesetval == NULL || xpath_obj->nodesetval->nodeNr != 1) {
1746     DEBUG(PLUGIN_NAME " plugin: xmlXPathEval(%s) return nodeset size=%i "
1747                       "expected=1 on domain %s",
1748           xpath_str,
1749           (xpath_obj->nodesetval == NULL) ? 0 : xpath_obj->nodesetval->nodeNr,
1750           dom_name);
1751   } else {
1752     xml_node = xpath_obj->nodesetval->nodeTab[0];
1753     sstrncpy(dom_tag, (const char *)xml_node->content, PARTITION_TAG_MAX_LEN);
1754   }
1755
1756 done:
1757   /* deregister to clean up */
1758   err = xmlXPathRegisterNs(xpath_ctx,
1759                            (const xmlChar *)METADATA_VM_PARTITION_PREFIX, NULL);
1760   if (err) {
1761     /* we can't really recover here */
1762     ERROR(PLUGIN_NAME
1763           " plugin: deregistration of namespace %s failed for domain %s",
1764           METADATA_VM_PARTITION_PREFIX, dom_name);
1765   }
1766   if (xpath_obj)
1767     xmlXPathFreeObject(xpath_obj);
1768
1769   return ret;
1770 }
1771
1772 static int is_known_tag(const char *dom_tag) {
1773   for (int i = 0; i < nr_instances; ++i)
1774     if (!strcmp(dom_tag, lv_read_user_data[i].inst.tag))
1775       return 1;
1776   return 0;
1777 }
1778
1779 static int lv_instance_include_domain(struct lv_read_instance *inst,
1780                                       const char *dom_name,
1781                                       const char *dom_tag) {
1782   if ((dom_tag[0] != '\0') && (strcmp(dom_tag, inst->tag) == 0))
1783     return 1;
1784
1785   /* instance#0 will always be there, so it is in charge of extra duties */
1786   if (inst->id == 0) {
1787     if (dom_tag[0] == '\0' || !is_known_tag(dom_tag)) {
1788       DEBUG(PLUGIN_NAME " plugin#%s: refreshing domain %s "
1789                         "with unknown tag '%s'",
1790             inst->tag, dom_name, dom_tag);
1791       return 1;
1792     }
1793   }
1794
1795   return 0;
1796 }
1797
1798 /*
1799   virConnectListAllDomains() appeared in 0.10.2
1800   Note that LIBVIR_CHECK_VERSION appeared a year later, so
1801   in some systems which actually have virConnectListAllDomains()
1802   we can't detect this.
1803  */
1804 #ifdef LIBVIR_CHECK_VERSION
1805 #if LIBVIR_CHECK_VERSION(0, 10, 2)
1806 #define HAVE_LIST_ALL_DOMAINS 1
1807 #endif
1808 #endif
1809
1810 static int refresh_lists(struct lv_read_instance *inst) {
1811   struct lv_read_state *state = &inst->read_state;
1812   int n;
1813
1814   n = virConnectNumOfDomains(conn);
1815   if (n < 0) {
1816     VIRT_ERROR(conn, "reading number of domains");
1817     return -1;
1818   }
1819
1820   lv_clean_read_state(state);
1821
1822   if (n > 0) {
1823 #ifdef HAVE_LIST_ALL_DOMAINS
1824     virDomainPtr *domains;
1825     n = virConnectListAllDomains(conn, &domains,
1826                                  VIR_CONNECT_LIST_DOMAINS_ACTIVE);
1827 #else
1828     int *domids;
1829
1830     /* Get list of domains. */
1831     domids = malloc(sizeof(*domids) * n);
1832     if (domids == NULL) {
1833       ERROR(PLUGIN_NAME " plugin: malloc failed.");
1834       return -1;
1835     }
1836
1837     n = virConnectListDomains(conn, domids, n);
1838 #endif
1839
1840     if (n < 0) {
1841       VIRT_ERROR(conn, "reading list of domains");
1842 #ifndef HAVE_LIST_ALL_DOMAINS
1843       sfree(domids);
1844 #endif
1845       return -1;
1846     }
1847
1848     /* Fetch each domain and add it to the list, unless ignore. */
1849     for (int i = 0; i < n; ++i) {
1850       const char *name;
1851       char *xml = NULL;
1852       xmlDocPtr xml_doc = NULL;
1853       xmlXPathContextPtr xpath_ctx = NULL;
1854       xmlXPathObjectPtr xpath_obj = NULL;
1855       char tag[PARTITION_TAG_MAX_LEN] = {'\0'};
1856       virDomainInfo info;
1857       int status;
1858
1859 #ifdef HAVE_LIST_ALL_DOMAINS
1860       virDomainPtr dom = domains[i];
1861 #else
1862       virDomainPtr dom = NULL;
1863       dom = virDomainLookupByID(conn, domids[i]);
1864       if (dom == NULL) {
1865         VIRT_ERROR(conn, "virDomainLookupByID");
1866         /* Could be that the domain went away -- ignore it anyway. */
1867         continue;
1868       }
1869 #endif
1870
1871       name = virDomainGetName(dom);
1872       if (name == NULL) {
1873         VIRT_ERROR(conn, "virDomainGetName");
1874         goto cont;
1875       }
1876
1877       status = virDomainGetInfo(dom, &info);
1878       if (status != 0) {
1879         ERROR(PLUGIN_NAME " plugin: virDomainGetInfo failed with status %i.",
1880               status);
1881         continue;
1882       }
1883
1884       if (info.state != VIR_DOMAIN_RUNNING) {
1885         DEBUG(PLUGIN_NAME " plugin: skipping inactive domain %s", name);
1886         continue;
1887       }
1888
1889       if (il_domains && ignorelist_match(il_domains, name) != 0)
1890         goto cont;
1891
1892       /* Get a list of devices for this domain. */
1893       xml = virDomainGetXMLDesc(dom, 0);
1894       if (!xml) {
1895         VIRT_ERROR(conn, "virDomainGetXMLDesc");
1896         goto cont;
1897       }
1898
1899       /* Yuck, XML.  Parse out the devices. */
1900       xml_doc = xmlReadDoc((xmlChar *)xml, NULL, NULL, XML_PARSE_NONET);
1901       if (xml_doc == NULL) {
1902         VIRT_ERROR(conn, "xmlReadDoc");
1903         goto cont;
1904       }
1905
1906       xpath_ctx = xmlXPathNewContext(xml_doc);
1907
1908       if (lv_domain_get_tag(xpath_ctx, name, tag) < 0) {
1909         ERROR(PLUGIN_NAME " plugin: lv_domain_get_tag failed.");
1910         goto cont;
1911       }
1912
1913       if (!lv_instance_include_domain(inst, name, tag))
1914         goto cont;
1915
1916       if (add_domain(state, dom) < 0) {
1917         ERROR(PLUGIN_NAME " plugin: malloc failed.");
1918         goto cont;
1919       }
1920
1921       /* Block devices. */
1922       const char *bd_xmlpath = "/domain/devices/disk/target[@dev]";
1923       if (blockdevice_format == source)
1924         bd_xmlpath = "/domain/devices/disk/source[@dev]";
1925       xpath_obj = xmlXPathEval((const xmlChar *)bd_xmlpath, xpath_ctx);
1926
1927       if (xpath_obj == NULL || xpath_obj->type != XPATH_NODESET ||
1928           xpath_obj->nodesetval == NULL)
1929         goto cont;
1930
1931       for (int j = 0; j < xpath_obj->nodesetval->nodeNr; ++j) {
1932         xmlNodePtr node;
1933         char *path = NULL;
1934
1935         node = xpath_obj->nodesetval->nodeTab[j];
1936         if (!node)
1937           continue;
1938         path = (char *)xmlGetProp(node, (xmlChar *)"dev");
1939         if (!path)
1940           continue;
1941
1942         if (il_block_devices &&
1943             ignore_device_match(il_block_devices, name, path) != 0)
1944           goto cont2;
1945
1946         add_block_device(state, dom, path);
1947       cont2:
1948         if (path)
1949           xmlFree(path);
1950       }
1951       xmlXPathFreeObject(xpath_obj);
1952
1953       /* Network interfaces. */
1954       xpath_obj = xmlXPathEval(
1955           (xmlChar *)"/domain/devices/interface[target[@dev]]", xpath_ctx);
1956       if (xpath_obj == NULL || xpath_obj->type != XPATH_NODESET ||
1957           xpath_obj->nodesetval == NULL)
1958         goto cont;
1959
1960       xmlNodeSetPtr xml_interfaces = xpath_obj->nodesetval;
1961
1962       for (int j = 0; j < xml_interfaces->nodeNr; ++j) {
1963         char *path = NULL;
1964         char *address = NULL;
1965         xmlNodePtr xml_interface;
1966
1967         xml_interface = xml_interfaces->nodeTab[j];
1968         if (!xml_interface)
1969           continue;
1970
1971         for (xmlNodePtr child = xml_interface->children; child;
1972              child = child->next) {
1973           if (child->type != XML_ELEMENT_NODE)
1974             continue;
1975
1976           if (xmlStrEqual(child->name, (const xmlChar *)"target")) {
1977             path = (char *)xmlGetProp(child, (const xmlChar *)"dev");
1978             if (!path)
1979               continue;
1980           } else if (xmlStrEqual(child->name, (const xmlChar *)"mac")) {
1981             address = (char *)xmlGetProp(child, (const xmlChar *)"address");
1982             if (!address)
1983               continue;
1984           }
1985         }
1986
1987         if (il_interface_devices &&
1988             (ignore_device_match(il_interface_devices, name, path) != 0 ||
1989              ignore_device_match(il_interface_devices, name, address) != 0))
1990           goto cont3;
1991
1992         add_interface_device(state, dom, path, address, j + 1);
1993       cont3:
1994         if (path)
1995           xmlFree(path);
1996         if (address)
1997           xmlFree(address);
1998       }
1999
2000     cont:
2001       if (xpath_obj)
2002         xmlXPathFreeObject(xpath_obj);
2003       if (xpath_ctx)
2004         xmlXPathFreeContext(xpath_ctx);
2005       if (xml_doc)
2006         xmlFreeDoc(xml_doc);
2007       sfree(xml);
2008     }
2009
2010 #ifdef HAVE_LIST_ALL_DOMAINS
2011     sfree(domains);
2012 #else
2013     sfree(domids);
2014 #endif
2015   }
2016
2017   DEBUG(PLUGIN_NAME " plugin#%s: refreshing"
2018                     " domains=%i block_devices=%i iface_devices=%i",
2019         inst->tag, state->nr_domains, state->nr_block_devices,
2020         state->nr_interface_devices);
2021
2022   return 0;
2023 }
2024
2025 static void free_domains(struct lv_read_state *state) {
2026   if (state->domains) {
2027     for (int i = 0; i < state->nr_domains; ++i)
2028       virDomainFree(state->domains[i].ptr);
2029     sfree(state->domains);
2030   }
2031   state->domains = NULL;
2032   state->nr_domains = 0;
2033 }
2034
2035 static int add_domain(struct lv_read_state *state, virDomainPtr dom) {
2036   domain_t *new_ptr;
2037   int new_size = sizeof(state->domains[0]) * (state->nr_domains + 1);
2038
2039   if (state->domains)
2040     new_ptr = realloc(state->domains, new_size);
2041   else
2042     new_ptr = malloc(new_size);
2043
2044   if (new_ptr == NULL)
2045     return -1;
2046
2047   state->domains = new_ptr;
2048   state->domains[state->nr_domains].ptr = dom;
2049   memset(&state->domains[state->nr_domains].info, 0,
2050          sizeof(state->domains[state->nr_domains].info));
2051
2052   return state->nr_domains++;
2053 }
2054
2055 static void free_block_devices(struct lv_read_state *state) {
2056   if (state->block_devices) {
2057     for (int i = 0; i < state->nr_block_devices; ++i)
2058       sfree(state->block_devices[i].path);
2059     sfree(state->block_devices);
2060   }
2061   state->block_devices = NULL;
2062   state->nr_block_devices = 0;
2063 }
2064
2065 static int add_block_device(struct lv_read_state *state, virDomainPtr dom,
2066                             const char *path) {
2067   struct block_device *new_ptr;
2068   int new_size =
2069       sizeof(state->block_devices[0]) * (state->nr_block_devices + 1);
2070   char *path_copy;
2071
2072   path_copy = strdup(path);
2073   if (!path_copy)
2074     return -1;
2075
2076   if (state->block_devices)
2077     new_ptr = realloc(state->block_devices, new_size);
2078   else
2079     new_ptr = malloc(new_size);
2080
2081   if (new_ptr == NULL) {
2082     sfree(path_copy);
2083     return -1;
2084   }
2085   state->block_devices = new_ptr;
2086   state->block_devices[state->nr_block_devices].dom = dom;
2087   state->block_devices[state->nr_block_devices].path = path_copy;
2088   return state->nr_block_devices++;
2089 }
2090
2091 static void free_interface_devices(struct lv_read_state *state) {
2092   if (state->interface_devices) {
2093     for (int i = 0; i < state->nr_interface_devices; ++i) {
2094       sfree(state->interface_devices[i].path);
2095       sfree(state->interface_devices[i].address);
2096       sfree(state->interface_devices[i].number);
2097     }
2098     sfree(state->interface_devices);
2099   }
2100   state->interface_devices = NULL;
2101   state->nr_interface_devices = 0;
2102 }
2103
2104 static int add_interface_device(struct lv_read_state *state, virDomainPtr dom,
2105                                 const char *path, const char *address,
2106                                 unsigned int number) {
2107   struct interface_device *new_ptr;
2108   int new_size =
2109       sizeof(state->interface_devices[0]) * (state->nr_interface_devices + 1);
2110   char *path_copy, *address_copy, number_string[15];
2111
2112   if ((path == NULL) || (address == NULL))
2113     return EINVAL;
2114
2115   path_copy = strdup(path);
2116   if (!path_copy)
2117     return -1;
2118
2119   address_copy = strdup(address);
2120   if (!address_copy) {
2121     sfree(path_copy);
2122     return -1;
2123   }
2124
2125   snprintf(number_string, sizeof(number_string), "interface-%u", number);
2126
2127   if (state->interface_devices)
2128     new_ptr = realloc(state->interface_devices, new_size);
2129   else
2130     new_ptr = malloc(new_size);
2131
2132   if (new_ptr == NULL) {
2133     sfree(path_copy);
2134     sfree(address_copy);
2135     return -1;
2136   }
2137   state->interface_devices = new_ptr;
2138   state->interface_devices[state->nr_interface_devices].dom = dom;
2139   state->interface_devices[state->nr_interface_devices].path = path_copy;
2140   state->interface_devices[state->nr_interface_devices].address = address_copy;
2141   state->interface_devices[state->nr_interface_devices].number =
2142       strdup(number_string);
2143   return state->nr_interface_devices++;
2144 }
2145
2146 static int ignore_device_match(ignorelist_t *il, const char *domname,
2147                                const char *devpath) {
2148   char *name;
2149   int n, r;
2150
2151   if ((domname == NULL) || (devpath == NULL))
2152     return 0;
2153
2154   n = strlen(domname) + strlen(devpath) + 2;
2155   name = malloc(n);
2156   if (name == NULL) {
2157     ERROR(PLUGIN_NAME " plugin: malloc failed.");
2158     return 0;
2159   }
2160   snprintf(name, n, "%s:%s", domname, devpath);
2161   r = ignorelist_match(il, name);
2162   sfree(name);
2163   return r;
2164 }
2165
2166 static int lv_shutdown(void) {
2167   for (int i = 0; i < nr_instances; ++i) {
2168     lv_fini_instance(i);
2169   }
2170
2171   lv_disconnect();
2172
2173   ignorelist_free(il_domains);
2174   il_domains = NULL;
2175   ignorelist_free(il_block_devices);
2176   il_block_devices = NULL;
2177   ignorelist_free(il_interface_devices);
2178   il_interface_devices = NULL;
2179
2180   return 0;
2181 }
2182
2183 void module_register(void) {
2184   plugin_register_config(PLUGIN_NAME, lv_config, config_keys, NR_CONFIG_KEYS);
2185   plugin_register_init(PLUGIN_NAME, lv_init);
2186   plugin_register_shutdown(PLUGIN_NAME, lv_shutdown);
2187 }