Run all changed files 68 8.c/1*.h through clang-format
[collectd.git] / 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 "plugin.h"
26 #include "utils/common/common.h"
27 #include "utils/ignorelist/ignorelist.h"
28 #include "utils_complain.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 #include <stdbool.h>
38
39 /* Plugin name */
40 #define PLUGIN_NAME "virt"
41
42 /* Secure strcat macro assuring null termination. Parameter (n) is the size of
43    buffer (d), allowing this macro to be safe for static and dynamic buffers */
44 #define SSTRNCAT(d, s, n)                                                      \
45   do {                                                                         \
46     size_t _l = strlen(d);                                                     \
47     sstrncpy((d) + _l, (s), (n)-_l);                                           \
48   } while (0)
49
50 #ifdef LIBVIR_CHECK_VERSION
51
52 #if LIBVIR_CHECK_VERSION(0, 9, 2)
53 #define HAVE_DOM_REASON 1
54 #endif
55
56 #if LIBVIR_CHECK_VERSION(0, 9, 5)
57 #define HAVE_BLOCK_STATS_FLAGS 1
58 #define HAVE_DOM_REASON_PAUSED_SHUTTING_DOWN 1
59 #endif
60
61 #if LIBVIR_CHECK_VERSION(0, 9, 10)
62 #define HAVE_DISK_ERR 1
63 #endif
64
65 #if LIBVIR_CHECK_VERSION(0, 9, 11)
66 #define HAVE_CPU_STATS 1
67 #define HAVE_DOM_STATE_PMSUSPENDED 1
68 #define HAVE_DOM_REASON_RUNNING_WAKEUP 1
69 #endif
70
71 /*
72   virConnectListAllDomains() appeared in 0.10.2 (Sep 2012)
73   Note that LIBVIR_CHECK_VERSION appeared a year later (Dec 2013,
74   libvirt-1.2.0),
75   so in some systems which actually have virConnectListAllDomains()
76   we can't detect this.
77  */
78 #if LIBVIR_CHECK_VERSION(0, 10, 2)
79 #define HAVE_LIST_ALL_DOMAINS 1
80 #endif
81
82 #if LIBVIR_CHECK_VERSION(1, 0, 1)
83 #define HAVE_DOM_REASON_PAUSED_SNAPSHOT 1
84 #endif
85
86 #if LIBVIR_CHECK_VERSION(1, 1, 1)
87 #define HAVE_DOM_REASON_PAUSED_CRASHED 1
88 #endif
89
90 #if LIBVIR_CHECK_VERSION(1, 2, 9)
91 #define HAVE_JOB_STATS 1
92 #endif
93
94 #if LIBVIR_CHECK_VERSION(1, 2, 10)
95 #define HAVE_DOM_REASON_CRASHED 1
96 #endif
97
98 #if LIBVIR_CHECK_VERSION(1, 2, 11)
99 #define HAVE_FS_INFO 1
100 #endif
101
102 #if LIBVIR_CHECK_VERSION(1, 2, 15)
103 #define HAVE_DOM_REASON_PAUSED_STARTING_UP 1
104 #endif
105
106 #if LIBVIR_CHECK_VERSION(1, 3, 3)
107 #define HAVE_PERF_STATS 1
108 #define HAVE_DOM_REASON_POSTCOPY 1
109 #endif
110
111 #if LIBVIR_CHECK_VERSION(4, 10, 0)
112 #define HAVE_DOM_REASON_SHUTOFF_DAEMON 1
113 #endif
114 #endif /* LIBVIR_CHECK_VERSION */
115
116 /* structure used for aggregating notification-thread data*/
117 typedef struct virt_notif_thread_s {
118   pthread_t event_loop_tid;
119   int domain_event_cb_id;
120   pthread_mutex_t active_mutex; /* protects 'is_active' member access*/
121   bool is_active;
122 } virt_notif_thread_t;
123
124 /* PersistentNotification is false by default */
125 static bool persistent_notification = false;
126
127 static bool report_block_devices = true;
128 static bool report_network_interfaces = true;
129
130 /* Thread used for handling libvirt notifications events */
131 static virt_notif_thread_t notif_thread;
132
133 const char *domain_states[] = {
134     [VIR_DOMAIN_NOSTATE] = "no state",
135     [VIR_DOMAIN_RUNNING] = "the domain is running",
136     [VIR_DOMAIN_BLOCKED] = "the domain is blocked on resource",
137     [VIR_DOMAIN_PAUSED] = "the domain is paused by user",
138     [VIR_DOMAIN_SHUTDOWN] = "the domain is being shut down",
139     [VIR_DOMAIN_SHUTOFF] = "the domain is shut off",
140     [VIR_DOMAIN_CRASHED] = "the domain is crashed",
141 #ifdef HAVE_DOM_STATE_PMSUSPENDED
142     [VIR_DOMAIN_PMSUSPENDED] =
143         "the domain is suspended by guest power management",
144 #endif
145 };
146
147 static int map_domain_event_to_state(int event) {
148   int ret;
149   switch (event) {
150   case VIR_DOMAIN_EVENT_STARTED:
151     ret = VIR_DOMAIN_RUNNING;
152     break;
153   case VIR_DOMAIN_EVENT_SUSPENDED:
154     ret = VIR_DOMAIN_PAUSED;
155     break;
156   case VIR_DOMAIN_EVENT_RESUMED:
157     ret = VIR_DOMAIN_RUNNING;
158     break;
159   case VIR_DOMAIN_EVENT_STOPPED:
160     ret = VIR_DOMAIN_SHUTOFF;
161     break;
162   case VIR_DOMAIN_EVENT_SHUTDOWN:
163     ret = VIR_DOMAIN_SHUTDOWN;
164     break;
165 #ifdef HAVE_DOM_STATE_PMSUSPENDED
166   case VIR_DOMAIN_EVENT_PMSUSPENDED:
167     ret = VIR_DOMAIN_PMSUSPENDED;
168     break;
169 #endif
170 #ifdef HAVE_DOM_REASON_CRASHED
171   case VIR_DOMAIN_EVENT_CRASHED:
172     ret = VIR_DOMAIN_CRASHED;
173     break;
174 #endif
175   default:
176     ret = VIR_DOMAIN_NOSTATE;
177   }
178   return ret;
179 }
180
181 #ifdef HAVE_DOM_REASON
182 static int map_domain_event_detail_to_reason(int event, int detail) {
183   int ret;
184   switch (event) {
185   case VIR_DOMAIN_EVENT_STARTED:
186     switch (detail) {
187     case VIR_DOMAIN_EVENT_STARTED_BOOTED: /* Normal startup from boot */
188       ret = VIR_DOMAIN_RUNNING_BOOTED;
189       break;
190     case VIR_DOMAIN_EVENT_STARTED_MIGRATED: /* Incoming migration from another
191                                                host */
192       ret = VIR_DOMAIN_RUNNING_MIGRATED;
193       break;
194     case VIR_DOMAIN_EVENT_STARTED_RESTORED: /* Restored from a state file */
195       ret = VIR_DOMAIN_RUNNING_RESTORED;
196       break;
197     case VIR_DOMAIN_EVENT_STARTED_FROM_SNAPSHOT: /* Restored from snapshot */
198       ret = VIR_DOMAIN_RUNNING_FROM_SNAPSHOT;
199       break;
200 #ifdef HAVE_DOM_REASON_RUNNING_WAKEUP
201     case VIR_DOMAIN_EVENT_STARTED_WAKEUP: /* Started due to wakeup event */
202       ret = VIR_DOMAIN_RUNNING_WAKEUP;
203       break;
204 #endif
205     default:
206       ret = VIR_DOMAIN_RUNNING_UNKNOWN;
207     }
208     break;
209   case VIR_DOMAIN_EVENT_SUSPENDED:
210     switch (detail) {
211     case VIR_DOMAIN_EVENT_SUSPENDED_PAUSED: /* Normal suspend due to admin
212                                                pause */
213       ret = VIR_DOMAIN_PAUSED_USER;
214       break;
215     case VIR_DOMAIN_EVENT_SUSPENDED_MIGRATED: /* Suspended for offline
216                                                  migration */
217       ret = VIR_DOMAIN_PAUSED_MIGRATION;
218       break;
219     case VIR_DOMAIN_EVENT_SUSPENDED_IOERROR: /* Suspended due to a disk I/O
220                                                 error */
221       ret = VIR_DOMAIN_PAUSED_IOERROR;
222       break;
223     case VIR_DOMAIN_EVENT_SUSPENDED_WATCHDOG: /* Suspended due to a watchdog
224                                                  firing */
225       ret = VIR_DOMAIN_PAUSED_WATCHDOG;
226       break;
227     case VIR_DOMAIN_EVENT_SUSPENDED_RESTORED: /* Restored from paused state
228                                                  file */
229       ret = VIR_DOMAIN_PAUSED_UNKNOWN;
230       break;
231     case VIR_DOMAIN_EVENT_SUSPENDED_FROM_SNAPSHOT: /* Restored from paused
232                                                       snapshot */
233       ret = VIR_DOMAIN_PAUSED_FROM_SNAPSHOT;
234       break;
235     case VIR_DOMAIN_EVENT_SUSPENDED_API_ERROR: /* Suspended after failure during
236                                                   libvirt API call */
237       ret = VIR_DOMAIN_PAUSED_UNKNOWN;
238       break;
239 #ifdef HAVE_DOM_REASON_POSTCOPY
240     case VIR_DOMAIN_EVENT_SUSPENDED_POSTCOPY: /* Suspended for post-copy
241                                                  migration */
242       ret = VIR_DOMAIN_PAUSED_POSTCOPY;
243       break;
244     case VIR_DOMAIN_EVENT_SUSPENDED_POSTCOPY_FAILED: /* Suspended after failed
245                                                         post-copy */
246       ret = VIR_DOMAIN_PAUSED_POSTCOPY_FAILED;
247       break;
248 #endif
249     default:
250       ret = VIR_DOMAIN_PAUSED_UNKNOWN;
251     }
252     break;
253   case VIR_DOMAIN_EVENT_RESUMED:
254     switch (detail) {
255     case VIR_DOMAIN_EVENT_RESUMED_UNPAUSED: /* Normal resume due to admin
256                                                unpause */
257       ret = VIR_DOMAIN_RUNNING_UNPAUSED;
258       break;
259     case VIR_DOMAIN_EVENT_RESUMED_MIGRATED: /* Resumed for completion of
260                                                migration */
261       ret = VIR_DOMAIN_RUNNING_MIGRATED;
262       break;
263     case VIR_DOMAIN_EVENT_RESUMED_FROM_SNAPSHOT: /* Resumed from snapshot */
264       ret = VIR_DOMAIN_RUNNING_FROM_SNAPSHOT;
265       break;
266 #ifdef HAVE_DOM_REASON_POSTCOPY
267     case VIR_DOMAIN_EVENT_RESUMED_POSTCOPY: /* Resumed, but migration is still
268                                                running in post-copy mode */
269       ret = VIR_DOMAIN_RUNNING_POSTCOPY;
270       break;
271 #endif
272     default:
273       ret = VIR_DOMAIN_RUNNING_UNKNOWN;
274     }
275     break;
276   case VIR_DOMAIN_EVENT_STOPPED:
277     switch (detail) {
278     case VIR_DOMAIN_EVENT_STOPPED_SHUTDOWN: /* Normal shutdown */
279       ret = VIR_DOMAIN_SHUTOFF_SHUTDOWN;
280       break;
281     case VIR_DOMAIN_EVENT_STOPPED_DESTROYED: /* Forced poweroff from host */
282       ret = VIR_DOMAIN_SHUTOFF_DESTROYED;
283       break;
284     case VIR_DOMAIN_EVENT_STOPPED_CRASHED: /* Guest crashed */
285       ret = VIR_DOMAIN_SHUTOFF_CRASHED;
286       break;
287     case VIR_DOMAIN_EVENT_STOPPED_MIGRATED: /* Migrated off to another host */
288       ret = VIR_DOMAIN_SHUTOFF_MIGRATED;
289       break;
290     case VIR_DOMAIN_EVENT_STOPPED_SAVED: /* Saved to a state file */
291       ret = VIR_DOMAIN_SHUTOFF_SAVED;
292       break;
293     case VIR_DOMAIN_EVENT_STOPPED_FAILED: /* Host emulator/mgmt failed */
294       ret = VIR_DOMAIN_SHUTOFF_FAILED;
295       break;
296     case VIR_DOMAIN_EVENT_STOPPED_FROM_SNAPSHOT: /* Offline snapshot loaded */
297       ret = VIR_DOMAIN_SHUTOFF_FROM_SNAPSHOT;
298       break;
299     default:
300       ret = VIR_DOMAIN_SHUTOFF_UNKNOWN;
301     }
302     break;
303   case VIR_DOMAIN_EVENT_SHUTDOWN:
304     switch (detail) {
305     case VIR_DOMAIN_EVENT_SHUTDOWN_FINISHED: /* Guest finished shutdown
306                                                 sequence */
307 #ifdef LIBVIR_CHECK_VERSION
308 #if LIBVIR_CHECK_VERSION(3, 4, 0)
309     case VIR_DOMAIN_EVENT_SHUTDOWN_GUEST: /* Domain finished shutting down after
310                                              request from the guest itself (e.g.
311                                              hardware-specific action) */
312     case VIR_DOMAIN_EVENT_SHUTDOWN_HOST:  /* Domain finished shutting down after
313                                              request from the host (e.g. killed
314                                              by a signal) */
315 #endif
316 #endif
317       ret = VIR_DOMAIN_SHUTDOWN_USER;
318       break;
319     default:
320       ret = VIR_DOMAIN_SHUTDOWN_UNKNOWN;
321     }
322     break;
323 #ifdef HAVE_DOM_STATE_PMSUSPENDED
324   case VIR_DOMAIN_EVENT_PMSUSPENDED:
325     switch (detail) {
326     case VIR_DOMAIN_EVENT_PMSUSPENDED_MEMORY: /* Guest was PM suspended to
327                                                  memory */
328       ret = VIR_DOMAIN_PMSUSPENDED_UNKNOWN;
329       break;
330     case VIR_DOMAIN_EVENT_PMSUSPENDED_DISK: /* Guest was PM suspended to disk */
331       ret = VIR_DOMAIN_PMSUSPENDED_DISK_UNKNOWN;
332       break;
333     default:
334       ret = VIR_DOMAIN_PMSUSPENDED_UNKNOWN;
335     }
336     break;
337 #endif
338   case VIR_DOMAIN_EVENT_CRASHED:
339     switch (detail) {
340     case VIR_DOMAIN_EVENT_CRASHED_PANICKED: /* Guest was panicked */
341       ret = VIR_DOMAIN_CRASHED_PANICKED;
342       break;
343     default:
344       ret = VIR_DOMAIN_CRASHED_UNKNOWN;
345     }
346     break;
347   default:
348     ret = VIR_DOMAIN_NOSTATE_UNKNOWN;
349   }
350   return ret;
351 }
352
353 #define DOMAIN_STATE_REASON_MAX_SIZE 20
354 const char *domain_reasons[][DOMAIN_STATE_REASON_MAX_SIZE] = {
355     [VIR_DOMAIN_NOSTATE][VIR_DOMAIN_NOSTATE_UNKNOWN] = "the reason is unknown",
356
357     [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_UNKNOWN] = "the reason is unknown",
358     [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_BOOTED] =
359         "normal startup from boot",
360     [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_MIGRATED] =
361         "migrated from another host",
362     [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_RESTORED] =
363         "restored from a state file",
364     [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_FROM_SNAPSHOT] =
365         "restored from snapshot",
366     [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_UNPAUSED] =
367         "returned from paused state",
368     [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_MIGRATION_CANCELED] =
369         "returned from migration",
370     [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_SAVE_CANCELED] =
371         "returned from failed save process",
372 #ifdef HAVE_DOM_REASON_RUNNING_WAKEUP
373     [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_WAKEUP] =
374         "returned from pmsuspended due to wakeup event",
375 #endif
376 #ifdef HAVE_DOM_REASON_CRASHED
377     [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_CRASHED] = "resumed from crashed",
378 #endif
379 #ifdef HAVE_DOM_REASON_POSTCOPY
380     [VIR_DOMAIN_RUNNING][VIR_DOMAIN_RUNNING_POSTCOPY] =
381         "running in post-copy migration mode",
382 #endif
383     [VIR_DOMAIN_BLOCKED][VIR_DOMAIN_BLOCKED_UNKNOWN] = "the reason is unknown",
384
385     [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_UNKNOWN] = "the reason is unknown",
386     [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_USER] = "paused on user request",
387     [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_MIGRATION] =
388         "paused for offline migration",
389     [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_SAVE] = "paused for save",
390     [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_DUMP] =
391         "paused for offline core dump",
392     [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_IOERROR] =
393         "paused due to a disk I/O error",
394     [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_WATCHDOG] =
395         "paused due to a watchdog event",
396     [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_FROM_SNAPSHOT] =
397         "paused after restoring from snapshot",
398 #ifdef HAVE_DOM_REASON_PAUSED_SHUTTING_DOWN
399     [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_SHUTTING_DOWN] =
400         "paused during shutdown process",
401 #endif
402 #ifdef HAVE_DOM_REASON_PAUSED_SNAPSHOT
403     [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_SNAPSHOT] =
404         "paused while creating a snapshot",
405 #endif
406 #ifdef HAVE_DOM_REASON_PAUSED_CRASHED
407     [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_CRASHED] =
408         "paused due to a guest crash",
409 #endif
410 #ifdef HAVE_DOM_REASON_PAUSED_STARTING_UP
411     [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_STARTING_UP] =
412         "the domain is being started",
413 #endif
414 #ifdef HAVE_DOM_REASON_POSTCOPY
415     [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_POSTCOPY] =
416         "paused for post-copy migration",
417     [VIR_DOMAIN_PAUSED][VIR_DOMAIN_PAUSED_POSTCOPY_FAILED] =
418         "paused after failed post-copy",
419 #endif
420     [VIR_DOMAIN_SHUTDOWN][VIR_DOMAIN_SHUTDOWN_UNKNOWN] =
421         "the reason is unknown",
422     [VIR_DOMAIN_SHUTDOWN][VIR_DOMAIN_SHUTDOWN_USER] =
423         "shutting down on user request",
424
425     [VIR_DOMAIN_SHUTOFF][VIR_DOMAIN_SHUTOFF_UNKNOWN] = "the reason is unknown",
426     [VIR_DOMAIN_SHUTOFF][VIR_DOMAIN_SHUTOFF_SHUTDOWN] = "normal shutdown",
427     [VIR_DOMAIN_SHUTOFF][VIR_DOMAIN_SHUTOFF_DESTROYED] = "forced poweroff",
428     [VIR_DOMAIN_SHUTOFF][VIR_DOMAIN_SHUTOFF_CRASHED] = "domain crashed",
429     [VIR_DOMAIN_SHUTOFF][VIR_DOMAIN_SHUTOFF_MIGRATED] =
430         "migrated to another host",
431     [VIR_DOMAIN_SHUTOFF][VIR_DOMAIN_SHUTOFF_SAVED] = "saved to a file",
432     [VIR_DOMAIN_SHUTOFF][VIR_DOMAIN_SHUTOFF_FAILED] = "domain failed to start",
433     [VIR_DOMAIN_SHUTOFF][VIR_DOMAIN_SHUTOFF_FROM_SNAPSHOT] =
434         "restored from a snapshot which was taken while domain was shutoff",
435 #ifdef HAVE_DOM_REASON_SHUTOFF_DAEMON
436     [VIR_DOMAIN_SHUTOFF][VIR_DOMAIN_SHUTOFF_DAEMON] =
437         "daemon decides to kill domain during reconnection processing",
438 #endif
439
440     [VIR_DOMAIN_CRASHED][VIR_DOMAIN_CRASHED_UNKNOWN] = "the reason is unknown",
441 #ifdef VIR_DOMAIN_CRASHED_PANICKED
442     [VIR_DOMAIN_CRASHED][VIR_DOMAIN_CRASHED_PANICKED] = "domain panicked",
443 #endif
444
445 #ifdef HAVE_DOM_STATE_PMSUSPENDED
446     [VIR_DOMAIN_PMSUSPENDED][VIR_DOMAIN_PMSUSPENDED_UNKNOWN] =
447         "the reason is unknown",
448 #endif
449 };
450 #endif /* HAVE_DOM_REASON */
451
452 #define NANOSEC_IN_SEC 1e9
453
454 #define GET_STATS(_f, _name, ...)                                              \
455   do {                                                                         \
456     status = _f(__VA_ARGS__);                                                  \
457     if (status != 0)                                                           \
458       ERROR(PLUGIN_NAME " plugin: Failed to get " _name);                      \
459   } while (0)
460
461 /* Connection. */
462 static virConnectPtr conn;
463 static char *conn_string;
464 static c_complain_t conn_complain = C_COMPLAIN_INIT_STATIC;
465
466 /* Node information required for %CPU */
467 static virNodeInfo nodeinfo;
468
469 /* Seconds between list refreshes, 0 disables completely. */
470 static int interval = 60;
471
472 /* List of domains, if specified. */
473 static ignorelist_t *il_domains;
474 /* List of block devices, if specified. */
475 static ignorelist_t *il_block_devices;
476 /* List of network interface devices, if specified. */
477 static ignorelist_t *il_interface_devices;
478
479 static int ignore_device_match(ignorelist_t *, const char *domname,
480                                const char *devpath);
481
482 /* Actual list of block devices found on last refresh. */
483 struct block_device {
484   virDomainPtr dom; /* domain */
485   char *path;       /* name of block device */
486   bool has_source;  /* information whether source is defined or not */
487 };
488
489 /* Actual list of network interfaces found on last refresh. */
490 struct interface_device {
491   virDomainPtr dom; /* domain */
492   char *path;       /* name of interface device */
493   char *address;    /* mac address of interface device */
494   char *number;     /* interface device number */
495 };
496
497 typedef struct domain_s {
498   virDomainPtr ptr;
499   virDomainInfo info;
500   bool active;
501 } domain_t;
502
503 struct lv_read_state {
504   /* Actual list of domains found on last refresh. */
505   domain_t *domains;
506   int nr_domains;
507
508   struct block_device *block_devices;
509   int nr_block_devices;
510
511   struct interface_device *interface_devices;
512   int nr_interface_devices;
513 };
514
515 static void free_domains(struct lv_read_state *state);
516 static int add_domain(struct lv_read_state *state, virDomainPtr dom,
517                       bool active);
518
519 static void free_block_devices(struct lv_read_state *state);
520 static int add_block_device(struct lv_read_state *state, virDomainPtr dom,
521                             const char *path, bool has_source);
522
523 static void free_interface_devices(struct lv_read_state *state);
524 static int add_interface_device(struct lv_read_state *state, virDomainPtr dom,
525                                 const char *path, const char *address,
526                                 unsigned int number);
527
528 #define METADATA_VM_PARTITION_URI "http://ovirt.org/ovirtmap/tag/1.0"
529 #define METADATA_VM_PARTITION_ELEMENT "tag"
530 #define METADATA_VM_PARTITION_PREFIX "ovirtmap"
531
532 #define BUFFER_MAX_LEN 256
533 #define PARTITION_TAG_MAX_LEN 32
534
535 struct lv_read_instance {
536   struct lv_read_state read_state;
537   char tag[PARTITION_TAG_MAX_LEN];
538   size_t id;
539 };
540
541 struct lv_user_data {
542   struct lv_read_instance inst;
543   user_data_t ud;
544 };
545
546 #define NR_INSTANCES_DEFAULT 1
547 #define NR_INSTANCES_MAX 128
548 static int nr_instances = NR_INSTANCES_DEFAULT;
549 static struct lv_user_data lv_read_user_data[NR_INSTANCES_MAX];
550
551 /* HostnameFormat. */
552 #define HF_MAX_FIELDS 4
553
554 enum hf_field { hf_none = 0, hf_hostname, hf_name, hf_uuid, hf_metadata };
555
556 static enum hf_field hostname_format[HF_MAX_FIELDS] = {hf_name};
557
558 /* PluginInstanceFormat */
559 #define PLGINST_MAX_FIELDS 3
560
561 enum plginst_field {
562   plginst_none = 0,
563   plginst_name,
564   plginst_uuid,
565   plginst_metadata
566 };
567
568 static enum plginst_field plugin_instance_format[PLGINST_MAX_FIELDS] = {
569     plginst_none};
570
571 /* HostnameMetadataNS && HostnameMetadataXPath */
572 static char *hm_xpath;
573 static char *hm_ns;
574
575 /* BlockDeviceFormat */
576 enum bd_field { target, source };
577
578 /* InterfaceFormat. */
579 enum if_field { if_address, if_name, if_number };
580
581 /* ExtraStats */
582 #define EX_STATS_MAX_FIELDS 15
583 enum ex_stats {
584   ex_stats_none = 0,
585   ex_stats_disk = 1 << 0,
586   ex_stats_pcpu = 1 << 1,
587   ex_stats_cpu_util = 1 << 2,
588   ex_stats_domain_state = 1 << 3,
589 #ifdef HAVE_PERF_STATS
590   ex_stats_perf = 1 << 4,
591 #endif
592   ex_stats_vcpupin = 1 << 5,
593 #ifdef HAVE_DISK_ERR
594   ex_stats_disk_err = 1 << 6,
595 #endif
596 #ifdef HAVE_FS_INFO
597   ex_stats_fs_info = 1 << 7,
598 #endif
599 #ifdef HAVE_JOB_STATS
600   ex_stats_job_stats_completed = 1 << 8,
601   ex_stats_job_stats_background = 1 << 9,
602 #endif
603   ex_stats_disk_allocation = 1 << 10,
604   ex_stats_disk_capacity = 1 << 11,
605   ex_stats_disk_physical = 1 << 12,
606   ex_stats_memory = 1 << 13,
607   ex_stats_vcpu = 1 << 14
608 };
609
610 static unsigned int extra_stats = ex_stats_none;
611
612 struct ex_stats_item {
613   const char *name;
614   enum ex_stats flag;
615 };
616 static const struct ex_stats_item ex_stats_table[] = {
617     {"disk", ex_stats_disk},
618     {"pcpu", ex_stats_pcpu},
619     {"cpu_util", ex_stats_cpu_util},
620     {"domain_state", ex_stats_domain_state},
621 #ifdef HAVE_PERF_STATS
622     {"perf", ex_stats_perf},
623 #endif
624     {"vcpupin", ex_stats_vcpupin},
625 #ifdef HAVE_DISK_ERR
626     {"disk_err", ex_stats_disk_err},
627 #endif
628 #ifdef HAVE_FS_INFO
629     {"fs_info", ex_stats_fs_info},
630 #endif
631 #ifdef HAVE_JOB_STATS
632     {"job_stats_completed", ex_stats_job_stats_completed},
633     {"job_stats_background", ex_stats_job_stats_background},
634 #endif
635     {"disk_allocation", ex_stats_disk_allocation},
636     {"disk_capacity", ex_stats_disk_capacity},
637     {"disk_physical", ex_stats_disk_physical},
638     {"memory", ex_stats_memory},
639     {"vcpu", ex_stats_vcpu},
640     {NULL, ex_stats_none},
641 };
642
643 /* BlockDeviceFormatBasename */
644 static bool blockdevice_format_basename;
645 static enum bd_field blockdevice_format = target;
646 static enum if_field interface_format = if_name;
647
648 /* Time that we last refreshed. */
649 static time_t last_refresh = (time_t)0;
650
651 static int refresh_lists(struct lv_read_instance *inst);
652 static int register_event_impl(void);
653 static int start_event_loop(virt_notif_thread_t *thread_data);
654
655 struct lv_block_stats {
656   virDomainBlockStatsStruct bi;
657
658   long long rd_total_times;
659   long long wr_total_times;
660
661   long long fl_req;
662   long long fl_total_times;
663 };
664
665 static void init_block_stats(struct lv_block_stats *bstats) {
666   if (bstats == NULL)
667     return;
668
669   bstats->bi.rd_req = -1;
670   bstats->bi.wr_req = -1;
671   bstats->bi.rd_bytes = -1;
672   bstats->bi.wr_bytes = -1;
673
674   bstats->rd_total_times = -1;
675   bstats->wr_total_times = -1;
676   bstats->fl_req = -1;
677   bstats->fl_total_times = -1;
678 }
679
680 static void init_block_info(virDomainBlockInfoPtr binfo) {
681   binfo->allocation = -1;
682   binfo->capacity = -1;
683   binfo->physical = -1;
684 }
685
686 #ifdef HAVE_BLOCK_STATS_FLAGS
687
688 #define GET_BLOCK_STATS_VALUE(NAME, FIELD)                                     \
689   if (!strcmp(param[i].field, NAME)) {                                         \
690     bstats->FIELD = param[i].value.l;                                          \
691     continue;                                                                  \
692   }
693
694 static int get_block_stats(struct lv_block_stats *bstats,
695                            virTypedParameterPtr param, int nparams) {
696   if (bstats == NULL || param == NULL)
697     return -1;
698
699   for (int i = 0; i < nparams; ++i) {
700     /* ignore type. Everything must be LLONG anyway. */
701     GET_BLOCK_STATS_VALUE("rd_operations", bi.rd_req);
702     GET_BLOCK_STATS_VALUE("wr_operations", bi.wr_req);
703     GET_BLOCK_STATS_VALUE("rd_bytes", bi.rd_bytes);
704     GET_BLOCK_STATS_VALUE("wr_bytes", bi.wr_bytes);
705     GET_BLOCK_STATS_VALUE("rd_total_times", rd_total_times);
706     GET_BLOCK_STATS_VALUE("wr_total_times", wr_total_times);
707     GET_BLOCK_STATS_VALUE("flush_operations", fl_req);
708     GET_BLOCK_STATS_VALUE("flush_total_times", fl_total_times);
709   }
710
711   return 0;
712 }
713
714 #undef GET_BLOCK_STATS_VALUE
715
716 #endif /* HAVE_BLOCK_STATS_FLAGS */
717
718 /* ERROR(...) macro for virterrors. */
719 #define VIRT_ERROR(conn, s)                                                    \
720   do {                                                                         \
721     virErrorPtr err;                                                           \
722     err = (conn) ? virConnGetLastError((conn)) : virGetLastError();            \
723     if (err)                                                                   \
724       ERROR(PLUGIN_NAME " plugin: %s failed: %s", (s), err->message);          \
725   } while (0)
726
727 static char *metadata_get_hostname(virDomainPtr dom) {
728   const char *xpath_str = NULL;
729   if (hm_xpath == NULL)
730     xpath_str = "/instance/name/text()";
731   else
732     xpath_str = hm_xpath;
733
734   const char *namespace = NULL;
735   if (hm_ns == NULL) {
736     namespace = "http://openstack.org/xmlns/libvirt/nova/1.0";
737   } else {
738     namespace = hm_ns;
739   }
740
741   char *metadata_str = virDomainGetMetadata(
742       dom, VIR_DOMAIN_METADATA_ELEMENT, namespace, VIR_DOMAIN_AFFECT_CURRENT);
743   if (metadata_str == NULL) {
744     return NULL;
745   }
746
747   char *hostname = NULL;
748   xmlXPathContextPtr xpath_ctx = NULL;
749   xmlXPathObjectPtr xpath_obj = NULL;
750   xmlNodePtr xml_node = NULL;
751
752   xmlDocPtr xml_doc =
753       xmlReadDoc((xmlChar *)metadata_str, NULL, NULL, XML_PARSE_NONET);
754   if (xml_doc == NULL) {
755     ERROR(PLUGIN_NAME " plugin: xmlReadDoc failed to read metadata");
756     goto metadata_end;
757   }
758
759   xpath_ctx = xmlXPathNewContext(xml_doc);
760   if (xpath_ctx == NULL) {
761     ERROR(PLUGIN_NAME " plugin: xmlXPathNewContext(%s) failed for metadata",
762           metadata_str);
763     goto metadata_end;
764   }
765   xpath_obj = xmlXPathEval((xmlChar *)xpath_str, xpath_ctx);
766   if (xpath_obj == NULL) {
767     ERROR(PLUGIN_NAME " plugin: xmlXPathEval(%s) failed for metadata",
768           xpath_str);
769     goto metadata_end;
770   }
771
772   if (xpath_obj->type != XPATH_NODESET) {
773     ERROR(PLUGIN_NAME " plugin: xmlXPathEval(%s) unexpected return type %d "
774                       "(wanted %d) for metadata",
775           xpath_str, xpath_obj->type, XPATH_NODESET);
776     goto metadata_end;
777   }
778
779   // TODO(sileht): We can support || operator by looping on nodes here
780   if (xpath_obj->nodesetval == NULL || xpath_obj->nodesetval->nodeNr != 1) {
781     WARNING(PLUGIN_NAME " plugin: xmlXPathEval(%s) return nodeset size=%i "
782                         "expected=1 for metadata",
783             xpath_str,
784             (xpath_obj->nodesetval == NULL) ? 0
785                                             : xpath_obj->nodesetval->nodeNr);
786     goto metadata_end;
787   }
788
789   xml_node = xpath_obj->nodesetval->nodeTab[0];
790   if (xml_node->type == XML_TEXT_NODE) {
791     hostname = strdup((const char *)xml_node->content);
792   } else if (xml_node->type == XML_ATTRIBUTE_NODE) {
793     hostname = strdup((const char *)xml_node->children->content);
794   } else {
795     ERROR(PLUGIN_NAME " plugin: xmlXPathEval(%s) unsupported node type %d",
796           xpath_str, xml_node->type);
797     goto metadata_end;
798   }
799
800   if (hostname == NULL) {
801     ERROR(PLUGIN_NAME " plugin: strdup(%s) hostname failed", xpath_str);
802     goto metadata_end;
803   }
804
805 metadata_end:
806   if (xpath_obj)
807     xmlXPathFreeObject(xpath_obj);
808   if (xpath_ctx)
809     xmlXPathFreeContext(xpath_ctx);
810   if (xml_doc)
811     xmlFreeDoc(xml_doc);
812   sfree(metadata_str);
813   return hostname;
814 }
815
816 static void init_value_list(value_list_t *vl, virDomainPtr dom) {
817   const char *name;
818   char uuid[VIR_UUID_STRING_BUFLEN];
819
820   sstrncpy(vl->plugin, PLUGIN_NAME, sizeof(vl->plugin));
821
822   vl->host[0] = '\0';
823
824   /* Construct the hostname field according to HostnameFormat. */
825   for (int i = 0; i < HF_MAX_FIELDS; ++i) {
826     if (hostname_format[i] == hf_none)
827       continue;
828
829     if (i > 0)
830       SSTRNCAT(vl->host, ":", sizeof(vl->host));
831
832     switch (hostname_format[i]) {
833     case hf_none:
834       break;
835     case hf_hostname:
836       SSTRNCAT(vl->host, hostname_g, sizeof(vl->host));
837       break;
838     case hf_name:
839       name = virDomainGetName(dom);
840       if (name)
841         SSTRNCAT(vl->host, name, sizeof(vl->host));
842       break;
843     case hf_uuid:
844       if (virDomainGetUUIDString(dom, uuid) == 0)
845         SSTRNCAT(vl->host, uuid, sizeof(vl->host));
846       break;
847     case hf_metadata:
848       name = metadata_get_hostname(dom);
849       if (name)
850         SSTRNCAT(vl->host, name, sizeof(vl->host));
851       break;
852     }
853   }
854
855   /* Construct the plugin instance field according to PluginInstanceFormat. */
856   for (int i = 0; i < PLGINST_MAX_FIELDS; ++i) {
857     if (plugin_instance_format[i] == plginst_none)
858       continue;
859
860     if (i > 0)
861       SSTRNCAT(vl->plugin_instance, ":", sizeof(vl->plugin_instance));
862
863     switch (plugin_instance_format[i]) {
864     case plginst_none:
865       break;
866     case plginst_name:
867       name = virDomainGetName(dom);
868       if (name)
869         SSTRNCAT(vl->plugin_instance, name, sizeof(vl->plugin_instance));
870       break;
871     case plginst_uuid:
872       if (virDomainGetUUIDString(dom, uuid) == 0)
873         SSTRNCAT(vl->plugin_instance, uuid, sizeof(vl->plugin_instance));
874       break;
875     case plginst_metadata:
876       name = metadata_get_hostname(dom);
877       if (name)
878         SSTRNCAT(vl->plugin_instance, name, sizeof(vl->plugin_instance));
879       break;
880     }
881   }
882
883 } /* void init_value_list */
884
885 static int init_notif(notification_t *notif, const virDomainPtr domain,
886                       int severity, const char *msg, const char *type,
887                       const char *type_instance) {
888   value_list_t vl = VALUE_LIST_INIT;
889
890   if (!notif) {
891     ERROR(PLUGIN_NAME " plugin: init_notif: NULL pointer");
892     return -1;
893   }
894
895   init_value_list(&vl, domain);
896   notification_init(notif, severity, msg, vl.host, vl.plugin,
897                     vl.plugin_instance, type, type_instance);
898   notif->time = cdtime();
899   return 0;
900 }
901
902 static void submit_notif(const virDomainPtr domain, int severity,
903                          const char *msg, const char *type,
904                          const char *type_instance) {
905   notification_t notif;
906
907   init_notif(&notif, domain, severity, msg, type, type_instance);
908   plugin_dispatch_notification(&notif);
909   if (notif.meta)
910     plugin_notification_meta_free(notif.meta);
911 }
912
913 static void submit(virDomainPtr dom, char const *type,
914                    char const *type_instance, value_t *values,
915                    size_t values_len) {
916   value_list_t vl = VALUE_LIST_INIT;
917   init_value_list(&vl, dom);
918
919   vl.values = values;
920   vl.values_len = values_len;
921
922   sstrncpy(vl.type, type, sizeof(vl.type));
923   if (type_instance != NULL)
924     sstrncpy(vl.type_instance, type_instance, sizeof(vl.type_instance));
925
926   plugin_dispatch_values(&vl);
927 }
928
929 static void memory_submit(virDomainPtr dom, gauge_t value) {
930   submit(dom, "memory", "total", &(value_t){.gauge = value}, 1);
931 }
932
933 static void memory_stats_submit(gauge_t value, virDomainPtr dom,
934                                 int tag_index) {
935   static const char *tags[] = {"swap_in",        "swap_out",   "major_fault",
936                                "minor_fault",    "unused",     "available",
937                                "actual_balloon", "rss",        "usable",
938                                "last_update",    "disk_caches"};
939
940   if ((tag_index < 0) || (tag_index >= (int)STATIC_ARRAY_SIZE(tags))) {
941     ERROR(PLUGIN_NAME " plugin: Array index out of bounds: tag_index = %d",
942           tag_index);
943     return;
944   }
945
946   submit(dom, "memory", tags[tag_index], &(value_t){.gauge = value}, 1);
947 }
948
949 static void submit_derive2(const char *type, derive_t v0, derive_t v1,
950                            virDomainPtr dom, const char *devname) {
951   value_t values[] = {
952       {.derive = v0},
953       {.derive = v1},
954   };
955
956   submit(dom, type, devname, values, STATIC_ARRAY_SIZE(values));
957 } /* void submit_derive2 */
958
959 static double cpu_ns_to_percent(unsigned int node_cpus,
960                                 unsigned long long cpu_time_old,
961                                 unsigned long long cpu_time_new) {
962   double percent = 0.0;
963   unsigned long long cpu_time_diff = 0;
964   double time_diff_sec = CDTIME_T_TO_DOUBLE(plugin_get_interval());
965
966   if (node_cpus != 0 && time_diff_sec != 0 && cpu_time_old != 0) {
967     cpu_time_diff = cpu_time_new - cpu_time_old;
968     percent = ((double)(100 * cpu_time_diff)) /
969               (time_diff_sec * node_cpus * NANOSEC_IN_SEC);
970   }
971
972   DEBUG(PLUGIN_NAME " plugin: node_cpus=%u cpu_time_old=%" PRIu64
973                     " cpu_time_new=%" PRIu64 " cpu_time_diff=%" PRIu64
974                     " time_diff_sec=%f percent=%f",
975         node_cpus, (uint64_t)cpu_time_old, (uint64_t)cpu_time_new,
976         (uint64_t)cpu_time_diff, time_diff_sec, percent);
977
978   return percent;
979 }
980
981 static void cpu_submit(const domain_t *dom, unsigned long long cpuTime_new) {
982
983   if (!dom)
984     return;
985
986   if (extra_stats & ex_stats_cpu_util) {
987     /* Computing %CPU requires 2 samples of cpuTime */
988     if (dom->info.cpuTime != 0 && cpuTime_new != 0) {
989
990       submit(dom->ptr, "percent", "virt_cpu_total",
991              &(value_t){.gauge = cpu_ns_to_percent(
992                             nodeinfo.cpus, dom->info.cpuTime, cpuTime_new)},
993              1);
994     }
995   }
996
997   submit(dom->ptr, "virt_cpu_total", NULL, &(value_t){.derive = cpuTime_new},
998          1);
999 }
1000
1001 static void vcpu_submit(derive_t value, virDomainPtr dom, int vcpu_nr,
1002                         const char *type) {
1003   char type_instance[DATA_MAX_NAME_LEN];
1004
1005   ssnprintf(type_instance, sizeof(type_instance), "%d", vcpu_nr);
1006   submit(dom, type, type_instance, &(value_t){.derive = value}, 1);
1007 }
1008
1009 static void disk_block_stats_submit(struct lv_block_stats *bstats,
1010                                     virDomainPtr dom, const char *dev,
1011                                     virDomainBlockInfoPtr binfo) {
1012   char *dev_copy = strdup(dev);
1013   const char *type_instance = dev_copy;
1014
1015   if (!dev_copy)
1016     return;
1017
1018   if (blockdevice_format_basename && blockdevice_format == source)
1019     type_instance = basename(dev_copy);
1020
1021   if (!type_instance) {
1022     sfree(dev_copy);
1023     return;
1024   }
1025
1026   char flush_type_instance[DATA_MAX_NAME_LEN];
1027   ssnprintf(flush_type_instance, sizeof(flush_type_instance), "flush-%s",
1028             type_instance);
1029
1030   if ((bstats->bi.rd_req != -1) && (bstats->bi.wr_req != -1))
1031     submit_derive2("disk_ops", (derive_t)bstats->bi.rd_req,
1032                    (derive_t)bstats->bi.wr_req, dom, type_instance);
1033
1034   if ((bstats->bi.rd_bytes != -1) && (bstats->bi.wr_bytes != -1))
1035     submit_derive2("disk_octets", (derive_t)bstats->bi.rd_bytes,
1036                    (derive_t)bstats->bi.wr_bytes, dom, type_instance);
1037
1038   if (extra_stats & ex_stats_disk) {
1039     if ((bstats->rd_total_times != -1) && (bstats->wr_total_times != -1))
1040       submit_derive2("disk_time", (derive_t)bstats->rd_total_times,
1041                      (derive_t)bstats->wr_total_times, dom, type_instance);
1042
1043     if (bstats->fl_req != -1)
1044       submit(dom, "total_requests", flush_type_instance,
1045              &(value_t){.derive = (derive_t)bstats->fl_req}, 1);
1046     if (bstats->fl_total_times != -1) {
1047       derive_t value = bstats->fl_total_times / 1000; // ns -> ms
1048       submit(dom, "total_time_in_ms", flush_type_instance,
1049              &(value_t){.derive = value}, 1);
1050     }
1051   }
1052
1053   /* disk_allocation, disk_capacity and disk_physical are stored only
1054    * if corresponding extrastats are set in collectd configuration file */
1055   if ((extra_stats & ex_stats_disk_allocation) && binfo->allocation != -1)
1056     submit(dom, "disk_allocation", type_instance,
1057            &(value_t){.gauge = (gauge_t)binfo->allocation}, 1);
1058
1059   if ((extra_stats & ex_stats_disk_capacity) && binfo->capacity != -1)
1060     submit(dom, "disk_capacity", type_instance,
1061            &(value_t){.gauge = (gauge_t)binfo->capacity}, 1);
1062
1063   if ((extra_stats & ex_stats_disk_physical) && binfo->physical != -1)
1064     submit(dom, "disk_physical", type_instance,
1065            &(value_t){.gauge = (gauge_t)binfo->physical}, 1);
1066
1067   sfree(dev_copy);
1068 }
1069
1070 /**
1071  * Function for parsing ExtraStats configuration options.
1072  * Result of parsing is stored under 'out_parsed_flags' pointer.
1073  *
1074  * Returns 0 in case of success and 1 in case of parsing error
1075  */
1076 static int parse_ex_stats_flags(unsigned int *out_parsed_flags, char **exstats,
1077                                 int numexstats) {
1078   unsigned int ex_stats_flags = ex_stats_none;
1079
1080   assert(out_parsed_flags != NULL);
1081
1082   for (int i = 0; i < numexstats; i++) {
1083     for (int j = 0; ex_stats_table[j].name != NULL; j++) {
1084       if (strcasecmp(exstats[i], ex_stats_table[j].name) == 0) {
1085         DEBUG(PLUGIN_NAME " plugin: enabling extra stats for '%s'",
1086               ex_stats_table[j].name);
1087         ex_stats_flags |= ex_stats_table[j].flag;
1088         break;
1089       }
1090
1091       if (ex_stats_table[j + 1].name == NULL) {
1092         ERROR(PLUGIN_NAME " plugin: Unmatched ExtraStats option: %s",
1093               exstats[i]);
1094         return 1;
1095       }
1096     }
1097   }
1098
1099   *out_parsed_flags = ex_stats_flags;
1100   return 0;
1101 }
1102
1103 static void domain_state_submit_notif(virDomainPtr dom, int state, int reason) {
1104   if ((state < 0) || ((size_t)state >= STATIC_ARRAY_SIZE(domain_states))) {
1105     ERROR(PLUGIN_NAME " plugin: Array index out of bounds: state=%d", state);
1106     return;
1107   }
1108
1109   char msg[DATA_MAX_NAME_LEN];
1110   const char *state_str = domain_states[state];
1111 #ifdef HAVE_DOM_REASON
1112   if ((reason < 0) ||
1113       ((size_t)reason >= STATIC_ARRAY_SIZE(domain_reasons[0]))) {
1114     ERROR(PLUGIN_NAME " plugin: Array index out of bounds: reason=%d", reason);
1115     return;
1116   }
1117
1118   const char *reason_str = domain_reasons[state][reason];
1119   /* Array size for domain reasons is fixed, but different domain states can
1120    * have different number of reasons. We need to check if reason was
1121    * successfully parsed */
1122   if (!reason_str) {
1123     ERROR(PLUGIN_NAME " plugin: Invalid reason (%d) for domain state: %s",
1124           reason, state_str);
1125     return;
1126   }
1127 #else
1128   const char *reason_str = "N/A";
1129 #endif
1130
1131   ssnprintf(msg, sizeof(msg), "Domain state: %s. Reason: %s", state_str,
1132             reason_str);
1133
1134   int severity;
1135   switch (state) {
1136   case VIR_DOMAIN_NOSTATE:
1137   case VIR_DOMAIN_RUNNING:
1138   case VIR_DOMAIN_SHUTDOWN:
1139   case VIR_DOMAIN_SHUTOFF:
1140     severity = NOTIF_OKAY;
1141     break;
1142   case VIR_DOMAIN_BLOCKED:
1143   case VIR_DOMAIN_PAUSED:
1144 #ifdef DOM_STATE_PMSUSPENDED
1145   case VIR_DOMAIN_PMSUSPENDED:
1146 #endif
1147     severity = NOTIF_WARNING;
1148     break;
1149   case VIR_DOMAIN_CRASHED:
1150     severity = NOTIF_FAILURE;
1151     break;
1152   default:
1153     ERROR(PLUGIN_NAME " plugin: Unrecognized domain state (%d)", state);
1154     return;
1155   }
1156   submit_notif(dom, severity, msg, "domain_state", NULL);
1157 }
1158
1159 static int lv_init_ignorelists() {
1160   if (il_domains == NULL)
1161     il_domains = ignorelist_create(1);
1162   if (il_block_devices == NULL)
1163     il_block_devices = ignorelist_create(1);
1164   if (il_interface_devices == NULL)
1165     il_interface_devices = ignorelist_create(1);
1166
1167   if (!il_domains || !il_block_devices || !il_interface_devices)
1168     return 1;
1169
1170   return 0;
1171 }
1172
1173 /* Validates config option that may take multiple strings arguments.
1174  * Returns 0 on success, -1 otherwise */
1175 static int check_config_multiple_string_entry(const oconfig_item_t *ci) {
1176   if (ci == NULL) {
1177     ERROR(PLUGIN_NAME " plugin: ci oconfig_item can't be NULL");
1178     return -1;
1179   }
1180
1181   if (ci->values_num < 1) {
1182     ERROR(PLUGIN_NAME
1183           " plugin: the '%s' option requires at least one string argument",
1184           ci->key);
1185     return -1;
1186   }
1187
1188   for (int i = 0; i < ci->values_num; ++i) {
1189     if (ci->values[i].type != OCONFIG_TYPE_STRING) {
1190       ERROR(PLUGIN_NAME
1191             " plugin: one of the '%s' options is not a valid string",
1192             ci->key);
1193       return -1;
1194     }
1195   }
1196
1197   return 0;
1198 }
1199
1200 static int lv_config(oconfig_item_t *ci) {
1201   if (lv_init_ignorelists() != 0) {
1202     ERROR(PLUGIN_NAME " plugin: lv_init_ignorelist failed.");
1203     return -1;
1204   }
1205
1206   for (int i = 0; i < ci->children_num; ++i) {
1207     oconfig_item_t *c = ci->children + i;
1208
1209     if (strcasecmp(c->key, "Connection") == 0) {
1210       if (cf_util_get_string(c, &conn_string) != 0 || conn_string == NULL)
1211         return -1;
1212
1213       continue;
1214     } else if (strcasecmp(c->key, "RefreshInterval") == 0) {
1215       if (cf_util_get_int(c, &interval) != 0)
1216         return -1;
1217
1218       continue;
1219     } else if (strcasecmp(c->key, "Domain") == 0) {
1220       char *domain_name = NULL;
1221       if (cf_util_get_string(c, &domain_name) != 0)
1222         return -1;
1223
1224       if (ignorelist_add(il_domains, domain_name)) {
1225         ERROR(PLUGIN_NAME " plugin: Adding '%s' to domain-ignorelist failed",
1226               domain_name);
1227         sfree(domain_name);
1228         return -1;
1229       }
1230
1231       sfree(domain_name);
1232       continue;
1233     } else if (strcasecmp(c->key, "BlockDevice") == 0) {
1234       char *device_name = NULL;
1235       if (cf_util_get_string(c, &device_name) != 0)
1236         return -1;
1237
1238       if (ignorelist_add(il_block_devices, device_name) != 0) {
1239         ERROR(PLUGIN_NAME
1240               " plugin: Adding '%s' to block-device-ignorelist failed",
1241               device_name);
1242         sfree(device_name);
1243         return -1;
1244       }
1245
1246       sfree(device_name);
1247       continue;
1248     } else if (strcasecmp(c->key, "BlockDeviceFormat") == 0) {
1249       char *device_format = NULL;
1250       if (cf_util_get_string(c, &device_format) != 0)
1251         return -1;
1252
1253       if (strcasecmp(device_format, "target") == 0)
1254         blockdevice_format = target;
1255       else if (strcasecmp(device_format, "source") == 0)
1256         blockdevice_format = source;
1257       else {
1258         ERROR(PLUGIN_NAME " plugin: unknown BlockDeviceFormat: %s",
1259               device_format);
1260         sfree(device_format);
1261         return -1;
1262       }
1263
1264       sfree(device_format);
1265       continue;
1266     } else if (strcasecmp(c->key, "BlockDeviceFormatBasename") == 0) {
1267       if (cf_util_get_boolean(c, &blockdevice_format_basename) != 0)
1268         return -1;
1269
1270       continue;
1271     } else if (strcasecmp(c->key, "InterfaceDevice") == 0) {
1272       char *interface_name = NULL;
1273       if (cf_util_get_string(c, &interface_name) != 0)
1274         return -1;
1275
1276       if (ignorelist_add(il_interface_devices, interface_name)) {
1277         ERROR(PLUGIN_NAME " plugin: Adding '%s' to interface-ignorelist failed",
1278               interface_name);
1279         sfree(interface_name);
1280         return -1;
1281       }
1282
1283       sfree(interface_name);
1284       continue;
1285     } else if (strcasecmp(c->key, "IgnoreSelected") == 0) {
1286       bool ignore_selected = false;
1287       if (cf_util_get_boolean(c, &ignore_selected) != 0)
1288         return -1;
1289
1290       if (ignore_selected) {
1291         ignorelist_set_invert(il_domains, 0);
1292         ignorelist_set_invert(il_block_devices, 0);
1293         ignorelist_set_invert(il_interface_devices, 0);
1294       } else {
1295         ignorelist_set_invert(il_domains, 1);
1296         ignorelist_set_invert(il_block_devices, 1);
1297         ignorelist_set_invert(il_interface_devices, 1);
1298       }
1299
1300       continue;
1301     } else if (strcasecmp(c->key, "HostnameMetadataNS") == 0) {
1302       if (cf_util_get_string(c, &hm_ns) != 0)
1303         return -1;
1304
1305       continue;
1306     } else if (strcasecmp(c->key, "HostnameMetadataXPath") == 0) {
1307       if (cf_util_get_string(c, &hm_xpath) != 0)
1308         return -1;
1309
1310       continue;
1311     } else if (strcasecmp(c->key, "HostnameFormat") == 0) {
1312       /* this option can take multiple strings arguments in one config line*/
1313       if (check_config_multiple_string_entry(c) != 0) {
1314         ERROR(PLUGIN_NAME " plugin: Could not get 'HostnameFormat' parameter");
1315         return -1;
1316       }
1317
1318       const int params_num = c->values_num;
1319       for (int i = 0; i < params_num; ++i) {
1320         const char *param_name = c->values[i].value.string;
1321         if (strcasecmp(param_name, "hostname") == 0)
1322           hostname_format[i] = hf_hostname;
1323         else if (strcasecmp(param_name, "name") == 0)
1324           hostname_format[i] = hf_name;
1325         else if (strcasecmp(param_name, "uuid") == 0)
1326           hostname_format[i] = hf_uuid;
1327         else if (strcasecmp(param_name, "metadata") == 0)
1328           hostname_format[i] = hf_metadata;
1329         else {
1330           ERROR(PLUGIN_NAME " plugin: unknown HostnameFormat field: %s",
1331                 param_name);
1332           return -1;
1333         }
1334       }
1335
1336       for (int i = params_num; i < HF_MAX_FIELDS; ++i)
1337         hostname_format[i] = hf_none;
1338
1339       continue;
1340     } else if (strcasecmp(c->key, "PluginInstanceFormat") == 0) {
1341       /* this option can handle list of string parameters in one line*/
1342       if (check_config_multiple_string_entry(c) != 0) {
1343         ERROR(PLUGIN_NAME
1344               " plugin: Could not get 'PluginInstanceFormat' parameter");
1345         return -1;
1346       }
1347
1348       const int params_num = c->values_num;
1349       for (int i = 0; i < params_num; ++i) {
1350         const char *param_name = c->values[i].value.string;
1351         if (strcasecmp(param_name, "none") == 0) {
1352           plugin_instance_format[i] = plginst_none;
1353           break;
1354         } else if (strcasecmp(param_name, "name") == 0)
1355           plugin_instance_format[i] = plginst_name;
1356         else if (strcasecmp(param_name, "uuid") == 0)
1357           plugin_instance_format[i] = plginst_uuid;
1358         else if (strcasecmp(param_name, "metadata") == 0)
1359           plugin_instance_format[i] = plginst_metadata;
1360         else {
1361           ERROR(PLUGIN_NAME " plugin: unknown PluginInstanceFormat field: %s",
1362                 param_name);
1363
1364           return -1;
1365         }
1366       }
1367
1368       for (int i = params_num; i < PLGINST_MAX_FIELDS; ++i)
1369         plugin_instance_format[i] = plginst_none;
1370
1371       continue;
1372     } else if (strcasecmp(c->key, "InterfaceFormat") == 0) {
1373       char *format = NULL;
1374       if (cf_util_get_string(c, &format) != 0)
1375         return -1;
1376
1377       if (strcasecmp(format, "name") == 0)
1378         interface_format = if_name;
1379       else if (strcasecmp(format, "address") == 0)
1380         interface_format = if_address;
1381       else if (strcasecmp(format, "number") == 0)
1382         interface_format = if_number;
1383       else {
1384         ERROR(PLUGIN_NAME " plugin: unknown InterfaceFormat: %s", format);
1385         sfree(format);
1386         return -1;
1387       }
1388
1389       sfree(format);
1390       continue;
1391     } else if (strcasecmp(c->key, "Instances") == 0) {
1392       if (cf_util_get_int(c, &nr_instances) != 0)
1393         return -1;
1394
1395       if (nr_instances <= 0) {
1396         ERROR(PLUGIN_NAME " plugin: Instances <= 0 makes no sense.");
1397         return -1;
1398       }
1399       if (nr_instances > NR_INSTANCES_MAX) {
1400         ERROR(PLUGIN_NAME " plugin: Instances=%i > NR_INSTANCES_MAX=%i"
1401                           " use a lower setting or recompile the plugin.",
1402               nr_instances, NR_INSTANCES_MAX);
1403         return -1;
1404       }
1405
1406       DEBUG(PLUGIN_NAME " plugin: configured %i instances", nr_instances);
1407       continue;
1408     } else if (strcasecmp(c->key, "ExtraStats") == 0) {
1409       char *ex_str = NULL;
1410
1411       if (cf_util_get_string(c, &ex_str) != 0)
1412         return -1;
1413
1414       char *exstats[EX_STATS_MAX_FIELDS];
1415       int numexstats = strsplit(ex_str, exstats, STATIC_ARRAY_SIZE(exstats));
1416       int status = parse_ex_stats_flags(&extra_stats, exstats, numexstats);
1417       sfree(ex_str);
1418       if (status != 0) {
1419         ERROR(PLUGIN_NAME " plugin: parsing 'ExtraStats' option failed");
1420         return status;
1421       }
1422
1423 #ifdef HAVE_JOB_STATS
1424       if ((extra_stats & ex_stats_job_stats_completed) &&
1425           (extra_stats & ex_stats_job_stats_background)) {
1426         ERROR(PLUGIN_NAME " plugin: Invalid job stats configuration. Only one "
1427                           "type of job statistics can be collected at the same "
1428                           "time");
1429         return -1;
1430       }
1431 #endif
1432
1433       /* ExtraStats parsed successfully */
1434       continue;
1435     } else if (strcasecmp(c->key, "PersistentNotification") == 0) {
1436       if (cf_util_get_boolean(c, &persistent_notification) != 0)
1437         return -1;
1438
1439       continue;
1440     } else if (strcasecmp(c->key, "ReportBlockDevices") == 0) {
1441       if (cf_util_get_boolean(c, &report_block_devices) != 0)
1442         return -1;
1443
1444       continue;
1445     } else if (strcasecmp(c->key, "ReportNetworkInterfaces") == 0) {
1446       if (cf_util_get_boolean(c, &report_network_interfaces) != 0)
1447         return -1;
1448
1449       continue;
1450     } else {
1451       /* Unrecognised option. */
1452       ERROR(PLUGIN_NAME " plugin: Unrecognized option: '%s'", c->key);
1453       return -1;
1454     }
1455   }
1456
1457   return 0;
1458 }
1459
1460 static int lv_connect(void) {
1461   if (conn == NULL) {
1462     /* event implementation must be registered before connection is opened */
1463     if (!persistent_notification)
1464       if (register_event_impl() != 0)
1465         return -1;
1466
1467 /* `conn_string == NULL' is acceptable */
1468 #ifdef HAVE_FS_INFO
1469     /* virDomainGetFSInfo requires full read-write access connection */
1470     if (extra_stats & ex_stats_fs_info)
1471       conn = virConnectOpen(conn_string);
1472     else
1473 #endif
1474       conn = virConnectOpenReadOnly(conn_string);
1475     if (conn == NULL) {
1476       c_complain(LOG_ERR, &conn_complain,
1477                  PLUGIN_NAME " plugin: Unable to connect: "
1478                              "virConnectOpen failed.");
1479       return -1;
1480     }
1481     int status = virNodeGetInfo(conn, &nodeinfo);
1482     if (status != 0) {
1483       ERROR(PLUGIN_NAME " plugin: virNodeGetInfo failed");
1484       virConnectClose(conn);
1485       conn = NULL;
1486       return -1;
1487     }
1488
1489     if (!persistent_notification)
1490       if (start_event_loop(&notif_thread) != 0) {
1491         virConnectClose(conn);
1492         conn = NULL;
1493         return -1;
1494       }
1495   }
1496   c_release(LOG_NOTICE, &conn_complain,
1497             PLUGIN_NAME " plugin: Connection established.");
1498   return 0;
1499 }
1500
1501 static void lv_disconnect(void) {
1502   if (conn != NULL)
1503     virConnectClose(conn);
1504   conn = NULL;
1505   WARNING(PLUGIN_NAME " plugin: closed connection to libvirt");
1506 }
1507
1508 static int lv_domain_block_stats(virDomainPtr dom, const char *path,
1509                                  struct lv_block_stats *bstats) {
1510 #ifdef HAVE_BLOCK_STATS_FLAGS
1511   int nparams = 0;
1512   if (virDomainBlockStatsFlags(dom, path, NULL, &nparams, 0) < 0 ||
1513       nparams <= 0) {
1514     VIRT_ERROR(conn, "getting the disk params count");
1515     return -1;
1516   }
1517
1518   virTypedParameterPtr params = calloc(nparams, sizeof(*params));
1519   if (params == NULL) {
1520     ERROR(PLUGIN_NAME " plugin: alloc(%i) for block=%s parameters failed.",
1521           nparams, path);
1522     return -1;
1523   }
1524
1525   int rc = -1;
1526   if (virDomainBlockStatsFlags(dom, path, params, &nparams, 0) < 0) {
1527     VIRT_ERROR(conn, "getting the disk params values");
1528   } else {
1529     rc = get_block_stats(bstats, params, nparams);
1530   }
1531
1532   virTypedParamsClear(params, nparams);
1533   sfree(params);
1534   return rc;
1535 #else
1536   return virDomainBlockStats(dom, path, &(bstats->bi), sizeof(bstats->bi));
1537 #endif /* HAVE_BLOCK_STATS_FLAGS */
1538 }
1539
1540 #ifdef HAVE_PERF_STATS
1541 static void perf_submit(virDomainStatsRecordPtr stats) {
1542   for (int i = 0; i < stats->nparams; ++i) {
1543     /* Replace '.' with '_' in event field to match other metrics' naming
1544      * convention */
1545     char *c = strchr(stats->params[i].field, '.');
1546     if (c)
1547       *c = '_';
1548     submit(stats->dom, "perf", stats->params[i].field,
1549            &(value_t){.derive = stats->params[i].value.ul}, 1);
1550   }
1551 }
1552
1553 static int get_perf_events(virDomainPtr domain) {
1554   virDomainStatsRecordPtr *stats = NULL;
1555   /* virDomainListGetStats requires a NULL terminated list of domains */
1556   virDomainPtr domain_array[] = {domain, NULL};
1557
1558   int status =
1559       virDomainListGetStats(domain_array, VIR_DOMAIN_STATS_PERF, &stats, 0);
1560   if (status == -1) {
1561     ERROR(PLUGIN_NAME " plugin: virDomainListGetStats failed with status %i.",
1562           status);
1563
1564     virErrorPtr err = virGetLastError();
1565     if (err->code == VIR_ERR_NO_SUPPORT) {
1566       ERROR(PLUGIN_NAME
1567             " plugin: Disabled unsupported ExtraStats selector: perf");
1568       extra_stats &= ~(ex_stats_perf);
1569     }
1570
1571     return -1;
1572   }
1573
1574   for (int i = 0; i < status; ++i)
1575     perf_submit(stats[i]);
1576
1577   virDomainStatsRecordListFree(stats);
1578   return 0;
1579 }
1580 #endif /* HAVE_PERF_STATS */
1581
1582 static void vcpu_pin_submit(virDomainPtr dom, int max_cpus, int vcpu,
1583                             unsigned char *cpu_maps, int cpu_map_len) {
1584   for (int cpu = 0; cpu < max_cpus; ++cpu) {
1585     char type_instance[DATA_MAX_NAME_LEN];
1586     bool is_set = VIR_CPU_USABLE(cpu_maps, cpu_map_len, vcpu, cpu);
1587
1588     ssnprintf(type_instance, sizeof(type_instance), "vcpu_%d-cpu_%d", vcpu,
1589               cpu);
1590     submit(dom, "cpu_affinity", type_instance, &(value_t){.gauge = is_set}, 1);
1591   }
1592 }
1593
1594 static int get_vcpu_stats(virDomainPtr domain, unsigned short nr_virt_cpu) {
1595   int max_cpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
1596
1597   virVcpuInfoPtr vinfo = calloc(nr_virt_cpu, sizeof(*vinfo));
1598   if (vinfo == NULL) {
1599     ERROR(PLUGIN_NAME " plugin: calloc failed.");
1600     return -1;
1601   }
1602
1603   int cpu_map_len = 0;
1604   unsigned char *cpumaps = NULL;
1605   if (extra_stats & ex_stats_vcpupin) {
1606     cpu_map_len = VIR_CPU_MAPLEN(max_cpus);
1607     cpumaps = calloc(nr_virt_cpu, cpu_map_len);
1608
1609     if (cpumaps == NULL) {
1610       ERROR(PLUGIN_NAME " plugin: calloc failed.");
1611       sfree(vinfo);
1612       return -1;
1613     }
1614   }
1615
1616   int status =
1617       virDomainGetVcpus(domain, vinfo, nr_virt_cpu, cpumaps, cpu_map_len);
1618   if (status < 0) {
1619     ERROR(PLUGIN_NAME " plugin: virDomainGetVcpus failed with status %i.",
1620           status);
1621
1622     virErrorPtr err = virGetLastError();
1623     if (err->code == VIR_ERR_NO_SUPPORT) {
1624       if (extra_stats & ex_stats_vcpu)
1625         ERROR(PLUGIN_NAME
1626               " plugin: Disabled unsupported ExtraStats selector: vcpu");
1627       if (extra_stats & ex_stats_vcpupin)
1628         ERROR(PLUGIN_NAME
1629               " plugin: Disabled unsupported ExtraStats selector: vcpupin");
1630       extra_stats &= ~(ex_stats_vcpu | ex_stats_vcpupin);
1631     }
1632
1633     sfree(cpumaps);
1634     sfree(vinfo);
1635     return -1;
1636   }
1637
1638   for (int i = 0; i < nr_virt_cpu; ++i) {
1639     if (extra_stats & ex_stats_vcpu)
1640       vcpu_submit(vinfo[i].cpuTime, domain, vinfo[i].number, "virt_vcpu");
1641     if (extra_stats & ex_stats_vcpupin)
1642       vcpu_pin_submit(domain, max_cpus, i, cpumaps, cpu_map_len);
1643   }
1644
1645   sfree(cpumaps);
1646   sfree(vinfo);
1647   return 0;
1648 }
1649
1650 #ifdef HAVE_CPU_STATS
1651 static int get_pcpu_stats(virDomainPtr dom) {
1652   int nparams = virDomainGetCPUStats(dom, NULL, 0, -1, 1, 0);
1653   if (nparams < 0) {
1654     VIRT_ERROR(conn, "getting the CPU params count");
1655
1656     virErrorPtr err = virGetLastError();
1657     if (err->code == VIR_ERR_NO_SUPPORT) {
1658       ERROR(PLUGIN_NAME
1659             " plugin: Disabled unsupported ExtraStats selector: pcpu");
1660       extra_stats &= ~(ex_stats_pcpu);
1661     }
1662
1663     return -1;
1664   }
1665
1666   virTypedParameterPtr param = calloc(nparams, sizeof(*param));
1667   if (param == NULL) {
1668     ERROR(PLUGIN_NAME " plugin: alloc(%i) for cpu parameters failed.", nparams);
1669     return -1;
1670   }
1671
1672   int ret = virDomainGetCPUStats(dom, param, nparams, -1, 1, 0); // total stats.
1673   if (ret < 0) {
1674     virTypedParamsClear(param, nparams);
1675     sfree(param);
1676     VIRT_ERROR(conn, "getting the CPU params values");
1677     return -1;
1678   }
1679
1680   unsigned long long total_user_cpu_time = 0;
1681   unsigned long long total_syst_cpu_time = 0;
1682
1683   for (int i = 0; i < nparams; ++i) {
1684     if (!strcmp(param[i].field, "user_time"))
1685       total_user_cpu_time = param[i].value.ul;
1686     else if (!strcmp(param[i].field, "system_time"))
1687       total_syst_cpu_time = param[i].value.ul;
1688   }
1689
1690   if (total_user_cpu_time > 0 || total_syst_cpu_time > 0)
1691     submit_derive2("ps_cputime", total_user_cpu_time, total_syst_cpu_time, dom,
1692                    NULL);
1693
1694   virTypedParamsClear(param, nparams);
1695   sfree(param);
1696
1697   return 0;
1698 }
1699 #endif /* HAVE_CPU_STATS */
1700
1701 #ifdef HAVE_DOM_REASON
1702 static int submit_domain_state(virDomainPtr domain) {
1703   int domain_state = 0;
1704   int domain_reason = 0;
1705
1706   int status = virDomainGetState(domain, &domain_state, &domain_reason, 0);
1707   if (status != 0) {
1708     ERROR(PLUGIN_NAME " plugin: virDomainGetState failed with status %i.",
1709           status);
1710     return status;
1711   }
1712
1713   value_t values[] = {
1714       {.gauge = (gauge_t)domain_state},
1715       {.gauge = (gauge_t)domain_reason},
1716   };
1717
1718   submit(domain, "domain_state", NULL, values, STATIC_ARRAY_SIZE(values));
1719
1720   return 0;
1721 }
1722
1723 #ifdef HAVE_LIST_ALL_DOMAINS
1724 static int get_domain_state_notify(virDomainPtr domain) {
1725   int domain_state = 0;
1726   int domain_reason = 0;
1727
1728   int status = virDomainGetState(domain, &domain_state, &domain_reason, 0);
1729   if (status != 0) {
1730     ERROR(PLUGIN_NAME " plugin: virDomainGetState failed with status %i.",
1731           status);
1732     return status;
1733   }
1734
1735   domain_state_submit_notif(domain, domain_state, domain_reason);
1736
1737   return status;
1738 }
1739 #endif /* HAVE_LIST_ALL_DOMAINS */
1740 #endif /* HAVE_DOM_REASON */
1741
1742 static int get_memory_stats(virDomainPtr domain) {
1743   virDomainMemoryStatPtr minfo =
1744       calloc(VIR_DOMAIN_MEMORY_STAT_NR, sizeof(*minfo));
1745   if (minfo == NULL) {
1746     ERROR(PLUGIN_NAME " plugin: calloc failed.");
1747     return -1;
1748   }
1749
1750   int mem_stats =
1751       virDomainMemoryStats(domain, minfo, VIR_DOMAIN_MEMORY_STAT_NR, 0);
1752   if (mem_stats < 0) {
1753     ERROR(PLUGIN_NAME " plugin: virDomainMemoryStats failed with mem_stats %i.",
1754           mem_stats);
1755     sfree(minfo);
1756
1757     virErrorPtr err = virGetLastError();
1758     if (err->code == VIR_ERR_NO_SUPPORT) {
1759       ERROR(PLUGIN_NAME
1760             " plugin: Disabled unsupported ExtraStats selector: memory");
1761       extra_stats &= ~(ex_stats_memory);
1762     }
1763
1764     return -1;
1765   }
1766
1767   derive_t swap_in = -1;
1768   derive_t swap_out = -1;
1769   derive_t min_flt = -1;
1770   derive_t maj_flt = -1;
1771
1772   for (int i = 0; i < mem_stats; i++) {
1773     if (minfo[i].tag == VIR_DOMAIN_MEMORY_STAT_SWAP_IN)
1774       swap_in = minfo[i].val;
1775     else if (minfo[i].tag == VIR_DOMAIN_MEMORY_STAT_SWAP_OUT)
1776       swap_out = minfo[i].val;
1777     else if (minfo[i].tag == VIR_DOMAIN_MEMORY_STAT_MINOR_FAULT)
1778       min_flt = minfo[i].val;
1779     else if (minfo[i].tag == VIR_DOMAIN_MEMORY_STAT_MAJOR_FAULT)
1780       maj_flt = minfo[i].val;
1781 #ifdef LIBVIR_CHECK_VERSION
1782 #if LIBVIR_CHECK_VERSION(2, 1, 0)
1783     else if (minfo[i].tag == VIR_DOMAIN_MEMORY_STAT_LAST_UPDATE)
1784       /* Skip 'last_update' reporting as that is not memory but timestamp */
1785       continue;
1786 #endif
1787 #endif
1788     else
1789       memory_stats_submit((gauge_t)minfo[i].val * 1024, domain, minfo[i].tag);
1790   }
1791
1792   if (swap_in > 0 || swap_out > 0) {
1793     submit(domain, "swap_io", "in", &(value_t){.gauge = swap_in}, 1);
1794     submit(domain, "swap_io", "out", &(value_t){.gauge = swap_out}, 1);
1795   }
1796
1797   if (min_flt > 0 || maj_flt > 0) {
1798     value_t values[] = {
1799         {.gauge = (gauge_t)min_flt},
1800         {.gauge = (gauge_t)maj_flt},
1801     };
1802     submit(domain, "ps_pagefaults", NULL, values, STATIC_ARRAY_SIZE(values));
1803   }
1804
1805   sfree(minfo);
1806   return 0;
1807 }
1808
1809 #ifdef HAVE_DISK_ERR
1810 static void disk_err_submit(virDomainPtr domain,
1811                             virDomainDiskErrorPtr disk_err) {
1812   submit(domain, "disk_error", disk_err->disk,
1813          &(value_t){.gauge = disk_err->error}, 1);
1814 }
1815
1816 static int get_disk_err(virDomainPtr domain) {
1817   /* Get preferred size of disk errors array */
1818   int disk_err_count = virDomainGetDiskErrors(domain, NULL, 0, 0);
1819   if (disk_err_count == -1) {
1820     ERROR(PLUGIN_NAME
1821           " plugin: failed to get preferred size of disk errors array");
1822
1823     virErrorPtr err = virGetLastError();
1824
1825     if (err->code == VIR_ERR_NO_SUPPORT) {
1826       ERROR(PLUGIN_NAME
1827             " plugin: Disabled unsupported ExtraStats selector: disk_err");
1828       extra_stats &= ~(ex_stats_disk_err);
1829     }
1830
1831     return -1;
1832   }
1833
1834   DEBUG(PLUGIN_NAME
1835         " plugin: preferred size of disk errors array: %d for domain %s",
1836         disk_err_count, virDomainGetName(domain));
1837   virDomainDiskError disk_err[disk_err_count];
1838
1839   disk_err_count = virDomainGetDiskErrors(domain, disk_err, disk_err_count, 0);
1840   if (disk_err_count == -1) {
1841     ERROR(PLUGIN_NAME " plugin: virDomainGetDiskErrors failed with status %d",
1842           disk_err_count);
1843     return -1;
1844   }
1845
1846   DEBUG(PLUGIN_NAME " plugin: detected %d disk errors in domain %s",
1847         disk_err_count, virDomainGetName(domain));
1848
1849   for (int i = 0; i < disk_err_count; ++i) {
1850     disk_err_submit(domain, &disk_err[i]);
1851     sfree(disk_err[i].disk);
1852   }
1853
1854   return 0;
1855 }
1856 #endif /* HAVE_DISK_ERR */
1857
1858 static int get_block_device_stats(struct block_device *block_dev) {
1859   if (!block_dev) {
1860     ERROR(PLUGIN_NAME " plugin: get_block_stats NULL pointer");
1861     return -1;
1862   }
1863
1864   virDomainBlockInfo binfo;
1865   init_block_info(&binfo);
1866
1867   /* Fetching block info stats only if needed*/
1868   if (extra_stats & (ex_stats_disk_allocation | ex_stats_disk_capacity |
1869                      ex_stats_disk_physical)) {
1870     /* Block info statistics can be only fetched from devices with 'source'
1871      * defined */
1872     if (block_dev->has_source) {
1873       if (virDomainGetBlockInfo(block_dev->dom, block_dev->path, &binfo, 0) <
1874           0) {
1875         ERROR(PLUGIN_NAME " plugin: virDomainGetBlockInfo failed for path: %s",
1876               block_dev->path);
1877
1878         virErrorPtr err = virGetLastError();
1879         if (err->code == VIR_ERR_NO_SUPPORT) {
1880
1881           if (extra_stats & ex_stats_disk_allocation)
1882             ERROR(PLUGIN_NAME " plugin: Disabled unsupported ExtraStats "
1883                               "selector: disk_allocation");
1884           if (extra_stats & ex_stats_disk_capacity)
1885             ERROR(PLUGIN_NAME " plugin: Disabled unsupported ExtraStats "
1886                               "selector: disk_capacity");
1887           if (extra_stats & ex_stats_disk_physical)
1888             ERROR(PLUGIN_NAME " plugin: Disabled unsupported ExtraStats "
1889                               "selector: disk_physical");
1890
1891           extra_stats &= ~(ex_stats_disk_allocation | ex_stats_disk_capacity |
1892                            ex_stats_disk_physical);
1893         }
1894
1895         return -1;
1896       }
1897     }
1898   }
1899
1900   struct lv_block_stats bstats;
1901   init_block_stats(&bstats);
1902
1903   if (lv_domain_block_stats(block_dev->dom, block_dev->path, &bstats) < 0) {
1904     ERROR(PLUGIN_NAME " plugin: lv_domain_block_stats failed");
1905     return -1;
1906   }
1907
1908   disk_block_stats_submit(&bstats, block_dev->dom, block_dev->path, &binfo);
1909   return 0;
1910 }
1911
1912 #ifdef HAVE_FS_INFO
1913
1914 #define NM_ADD_ITEM(_fun, _name, _val)                                         \
1915   do {                                                                         \
1916     ret = _fun(&notif, _name, _val);                                           \
1917     if (ret != 0) {                                                            \
1918       ERROR(PLUGIN_NAME " plugin: failed to add notification metadata");       \
1919       goto cleanup;                                                            \
1920     }                                                                          \
1921   } while (0)
1922
1923 #define NM_ADD_STR_ITEMS(_items, _size)                                        \
1924   do {                                                                         \
1925     for (size_t _i = 0; _i < _size; ++_i) {                                    \
1926       DEBUG(PLUGIN_NAME                                                        \
1927             " plugin: Adding notification metadata name=%s value=%s",          \
1928             _items[_i].name, _items[_i].value);                                \
1929       NM_ADD_ITEM(plugin_notification_meta_add_string, _items[_i].name,        \
1930                   _items[_i].value);                                           \
1931     }                                                                          \
1932   } while (0)
1933
1934 static int fs_info_notify(virDomainPtr domain, virDomainFSInfoPtr fs_info) {
1935   notification_t notif;
1936   int ret = 0;
1937
1938   /* Local struct, just for the purpose of this function. */
1939   typedef struct nm_str_item_s {
1940     const char *name;
1941     const char *value;
1942   } nm_str_item_t;
1943
1944   nm_str_item_t fs_dev_alias[fs_info->ndevAlias];
1945   nm_str_item_t fs_str_items[] = {
1946       {.name = "mountpoint", .value = fs_info->mountpoint},
1947       {.name = "name", .value = fs_info->name},
1948       {.name = "fstype", .value = fs_info->fstype}};
1949
1950   for (size_t i = 0; i < fs_info->ndevAlias; ++i) {
1951     fs_dev_alias[i].name = "devAlias";
1952     fs_dev_alias[i].value = fs_info->devAlias[i];
1953   }
1954
1955   init_notif(&notif, domain, NOTIF_OKAY, "File system information",
1956              "file_system", NULL);
1957   NM_ADD_STR_ITEMS(fs_str_items, STATIC_ARRAY_SIZE(fs_str_items));
1958   NM_ADD_ITEM(plugin_notification_meta_add_unsigned_int, "ndevAlias",
1959               fs_info->ndevAlias);
1960   NM_ADD_STR_ITEMS(fs_dev_alias, fs_info->ndevAlias);
1961
1962   plugin_dispatch_notification(&notif);
1963
1964 cleanup:
1965   if (notif.meta)
1966     plugin_notification_meta_free(notif.meta);
1967   return ret;
1968 }
1969
1970 #undef RETURN_ON_ERR
1971 #undef NM_ADD_STR_ITEMS
1972
1973 static int get_fs_info(virDomainPtr domain) {
1974   virDomainFSInfoPtr *fs_info = NULL;
1975   int ret = 0;
1976
1977   int mount_points_cnt = virDomainGetFSInfo(domain, &fs_info, 0);
1978   if (mount_points_cnt == -1) {
1979     ERROR(PLUGIN_NAME " plugin: virDomainGetFSInfo failed: %d",
1980           mount_points_cnt);
1981
1982     virErrorPtr err = virGetLastError();
1983     if (err->code == VIR_ERR_NO_SUPPORT) {
1984       ERROR(PLUGIN_NAME
1985             " plugin: Disabled unsupported ExtraStats selector: fs_info");
1986       extra_stats &= ~(ex_stats_fs_info);
1987     }
1988
1989     return -1;
1990   }
1991
1992   for (int i = 0; i < mount_points_cnt; ++i) {
1993     if (fs_info_notify(domain, fs_info[i]) != 0) {
1994       ERROR(PLUGIN_NAME " plugin: failed to send file system notification "
1995                         "for mount point %s",
1996             fs_info[i]->mountpoint);
1997       ret = -1;
1998     }
1999     virDomainFSInfoFree(fs_info[i]);
2000   }
2001
2002   sfree(fs_info);
2003   return ret;
2004 }
2005
2006 #endif /* HAVE_FS_INFO */
2007
2008 #ifdef HAVE_JOB_STATS
2009 static void job_stats_submit(virDomainPtr domain, virTypedParameterPtr param) {
2010   value_t vl = {0};
2011
2012   if (param->type == VIR_TYPED_PARAM_INT)
2013     vl.derive = param->value.i;
2014   else if (param->type == VIR_TYPED_PARAM_UINT)
2015     vl.derive = param->value.ui;
2016   else if (param->type == VIR_TYPED_PARAM_LLONG)
2017     vl.derive = param->value.l;
2018   else if (param->type == VIR_TYPED_PARAM_ULLONG)
2019     vl.derive = param->value.ul;
2020   else if (param->type == VIR_TYPED_PARAM_DOUBLE)
2021     vl.derive = param->value.d;
2022   else if (param->type == VIR_TYPED_PARAM_BOOLEAN)
2023     vl.derive = param->value.b;
2024   else if (param->type == VIR_TYPED_PARAM_STRING) {
2025     submit_notif(domain, NOTIF_OKAY, param->value.s, "job_stats", param->field);
2026     return;
2027   } else {
2028     ERROR(PLUGIN_NAME " plugin: unrecognized virTypedParameterType");
2029     return;
2030   }
2031
2032   submit(domain, "job_stats", param->field, &vl, 1);
2033 }
2034
2035 static int get_job_stats(virDomainPtr domain) {
2036   int job_type = 0;
2037   int nparams = 0;
2038   virTypedParameterPtr params = NULL;
2039   int flags = (extra_stats & ex_stats_job_stats_completed)
2040                   ? VIR_DOMAIN_JOB_STATS_COMPLETED
2041                   : 0;
2042
2043   int ret = virDomainGetJobStats(domain, &job_type, &params, &nparams, flags);
2044   if (ret != 0) {
2045     ERROR(PLUGIN_NAME " plugin: virDomainGetJobStats failed: %d", ret);
2046
2047     virErrorPtr err = virGetLastError();
2048     // VIR_ERR_INVALID_ARG returned when VIR_DOMAIN_JOB_STATS_COMPLETED flag is
2049     // not supported by driver
2050     if (err->code == VIR_ERR_NO_SUPPORT || err->code == VIR_ERR_INVALID_ARG) {
2051       if (extra_stats & ex_stats_job_stats_completed)
2052         ERROR(PLUGIN_NAME " plugin: Disabled unsupported ExtraStats selector: "
2053                           "job_stats_completed");
2054       if (extra_stats & ex_stats_job_stats_background)
2055         ERROR(PLUGIN_NAME " plugin: Disabled unsupported ExtraStats selector: "
2056                           "job_stats_background");
2057       extra_stats &=
2058           ~(ex_stats_job_stats_completed | ex_stats_job_stats_background);
2059     }
2060     return -1;
2061   }
2062
2063   DEBUG(PLUGIN_NAME " plugin: job_type=%d nparams=%d", job_type, nparams);
2064
2065   for (int i = 0; i < nparams; ++i) {
2066     DEBUG(PLUGIN_NAME " plugin: param[%d] field=%s type=%d", i, params[i].field,
2067           params[i].type);
2068     job_stats_submit(domain, &params[i]);
2069   }
2070
2071   virTypedParamsFree(params, nparams);
2072   return 0;
2073 }
2074 #endif /* HAVE_JOB_STATS */
2075
2076 static int get_domain_metrics(domain_t *domain) {
2077   if (!domain || !domain->ptr) {
2078     ERROR(PLUGIN_NAME " plugin: get_domain_metrics: NULL pointer");
2079     return -1;
2080   }
2081
2082   virDomainInfo info;
2083   int status = virDomainGetInfo(domain->ptr, &info);
2084   if (status != 0) {
2085     ERROR(PLUGIN_NAME " plugin: virDomainGetInfo failed with status %i.",
2086           status);
2087     return -1;
2088   }
2089
2090   if (extra_stats & ex_stats_domain_state) {
2091 #ifdef HAVE_DOM_REASON
2092     /* At this point we already know domain's state from virDomainGetInfo call,
2093      * however it doesn't provide a reason for entering particular state.
2094      * We need to get it from virDomainGetState.
2095      */
2096     GET_STATS(submit_domain_state, "domain reason", domain->ptr);
2097 #endif
2098   }
2099
2100   /* Gather remaining stats only for running domains */
2101   if (info.state != VIR_DOMAIN_RUNNING)
2102     return 0;
2103
2104 #ifdef HAVE_CPU_STATS
2105   if (extra_stats & ex_stats_pcpu)
2106     get_pcpu_stats(domain->ptr);
2107 #endif
2108
2109   cpu_submit(domain, info.cpuTime);
2110
2111   memory_submit(domain->ptr, (gauge_t)info.memory * 1024);
2112
2113   if (extra_stats & (ex_stats_vcpu | ex_stats_vcpupin))
2114     GET_STATS(get_vcpu_stats, "vcpu stats", domain->ptr, info.nrVirtCpu);
2115   if (extra_stats & ex_stats_memory)
2116     GET_STATS(get_memory_stats, "memory stats", domain->ptr);
2117
2118 #ifdef HAVE_PERF_STATS
2119   if (extra_stats & ex_stats_perf)
2120     GET_STATS(get_perf_events, "performance monitoring events", domain->ptr);
2121 #endif
2122
2123 #ifdef HAVE_FS_INFO
2124   if (extra_stats & ex_stats_fs_info)
2125     GET_STATS(get_fs_info, "file system info", domain->ptr);
2126 #endif
2127
2128 #ifdef HAVE_DISK_ERR
2129   if (extra_stats & ex_stats_disk_err)
2130     GET_STATS(get_disk_err, "disk errors", domain->ptr);
2131 #endif
2132
2133 #ifdef HAVE_JOB_STATS
2134   if (extra_stats &
2135       (ex_stats_job_stats_completed | ex_stats_job_stats_background))
2136     GET_STATS(get_job_stats, "job stats", domain->ptr);
2137 #endif
2138
2139   /* Update cached virDomainInfo. It has to be done after cpu_submit */
2140   memcpy(&domain->info, &info, sizeof(domain->info));
2141
2142   return 0;
2143 }
2144
2145 static int get_if_dev_stats(struct interface_device *if_dev) {
2146   virDomainInterfaceStatsStruct stats = {0};
2147   char *display_name = NULL;
2148
2149   if (!if_dev) {
2150     ERROR(PLUGIN_NAME " plugin: get_if_dev_stats: NULL pointer");
2151     return -1;
2152   }
2153
2154   switch (interface_format) {
2155   case if_address:
2156     display_name = if_dev->address;
2157     break;
2158   case if_number:
2159     display_name = if_dev->number;
2160     break;
2161   case if_name:
2162   default:
2163     display_name = if_dev->path;
2164   }
2165
2166   if (virDomainInterfaceStats(if_dev->dom, if_dev->path, &stats,
2167                               sizeof(stats)) != 0) {
2168     ERROR(PLUGIN_NAME " plugin: virDomainInterfaceStats failed");
2169     return -1;
2170   }
2171
2172   if ((stats.rx_bytes != -1) && (stats.tx_bytes != -1))
2173     submit_derive2("if_octets", (derive_t)stats.rx_bytes,
2174                    (derive_t)stats.tx_bytes, if_dev->dom, display_name);
2175
2176   if ((stats.rx_packets != -1) && (stats.tx_packets != -1))
2177     submit_derive2("if_packets", (derive_t)stats.rx_packets,
2178                    (derive_t)stats.tx_packets, if_dev->dom, display_name);
2179
2180   if ((stats.rx_errs != -1) && (stats.tx_errs != -1))
2181     submit_derive2("if_errors", (derive_t)stats.rx_errs,
2182                    (derive_t)stats.tx_errs, if_dev->dom, display_name);
2183
2184   if ((stats.rx_drop != -1) && (stats.tx_drop != -1))
2185     submit_derive2("if_dropped", (derive_t)stats.rx_drop,
2186                    (derive_t)stats.tx_drop, if_dev->dom, display_name);
2187   return 0;
2188 }
2189
2190 static int domain_lifecycle_event_cb(__attribute__((unused)) virConnectPtr con_,
2191                                      virDomainPtr dom, int event, int detail,
2192                                      __attribute__((unused)) void *opaque) {
2193   int domain_state = map_domain_event_to_state(event);
2194   int domain_reason = 0; /* 0 means UNKNOWN reason for any state */
2195 #ifdef HAVE_DOM_REASON
2196   domain_reason = map_domain_event_detail_to_reason(event, detail);
2197 #endif
2198   domain_state_submit_notif(dom, domain_state, domain_reason);
2199
2200   return 0;
2201 }
2202
2203 static void virt_eventloop_timeout_cb(int timer ATTRIBUTE_UNUSED,
2204                                       void *timer_info) {}
2205
2206 static int register_event_impl(void) {
2207   if (virEventRegisterDefaultImpl() < 0) {
2208     virErrorPtr err = virGetLastError();
2209     ERROR(PLUGIN_NAME
2210           " plugin: error while event implementation registering: %s",
2211           err && err->message ? err->message : "Unknown error");
2212     return -1;
2213   }
2214
2215   if (virEventAddTimeout(CDTIME_T_TO_MS(plugin_get_interval()),
2216                          virt_eventloop_timeout_cb, NULL, NULL) < 0) {
2217     virErrorPtr err = virGetLastError();
2218     ERROR(PLUGIN_NAME " plugin: virEventAddTimeout failed: %s",
2219           err && err->message ? err->message : "Unknown error");
2220     return -1;
2221   }
2222
2223   return 0;
2224 }
2225
2226 static void virt_notif_thread_set_active(virt_notif_thread_t *thread_data,
2227                                          const bool active) {
2228   assert(thread_data != NULL);
2229   pthread_mutex_lock(&thread_data->active_mutex);
2230   thread_data->is_active = active;
2231   pthread_mutex_unlock(&thread_data->active_mutex);
2232 }
2233
2234 static bool virt_notif_thread_is_active(virt_notif_thread_t *thread_data) {
2235   bool active = false;
2236
2237   assert(thread_data != NULL);
2238   pthread_mutex_lock(&thread_data->active_mutex);
2239   active = thread_data->is_active;
2240   pthread_mutex_unlock(&thread_data->active_mutex);
2241
2242   return active;
2243 }
2244
2245 /* worker function running default event implementation */
2246 static void *event_loop_worker(void *arg) {
2247   virt_notif_thread_t *thread_data = (virt_notif_thread_t *)arg;
2248
2249   while (virt_notif_thread_is_active(thread_data)) {
2250     if (virEventRunDefaultImpl() < 0) {
2251       virErrorPtr err = virGetLastError();
2252       ERROR(PLUGIN_NAME " plugin: failed to run event loop: %s\n",
2253             err && err->message ? err->message : "Unknown error");
2254     }
2255   }
2256
2257   return NULL;
2258 }
2259
2260 static int virt_notif_thread_init(virt_notif_thread_t *thread_data) {
2261   assert(thread_data != NULL);
2262
2263   int ret = pthread_mutex_init(&thread_data->active_mutex, NULL);
2264   if (ret != 0) {
2265     ERROR(PLUGIN_NAME " plugin: Failed to initialize mutex, err %u", ret);
2266     return ret;
2267   }
2268
2269   /**
2270    * '0' and positive integers are meaningful ID's, therefore setting
2271    * domain_event_cb_id to '-1'
2272    */
2273   thread_data->domain_event_cb_id = -1;
2274   pthread_mutex_lock(&thread_data->active_mutex);
2275   thread_data->is_active = false;
2276   pthread_mutex_unlock(&thread_data->active_mutex);
2277
2278   return 0;
2279 }
2280
2281 /* register domain event callback and start event loop thread */
2282 static int start_event_loop(virt_notif_thread_t *thread_data) {
2283   assert(thread_data != NULL);
2284   thread_data->domain_event_cb_id = virConnectDomainEventRegisterAny(
2285       conn, NULL, VIR_DOMAIN_EVENT_ID_LIFECYCLE,
2286       VIR_DOMAIN_EVENT_CALLBACK(domain_lifecycle_event_cb), NULL, NULL);
2287   if (thread_data->domain_event_cb_id == -1) {
2288     ERROR(PLUGIN_NAME " plugin: error while callback registering");
2289     return -1;
2290   }
2291
2292   DEBUG(PLUGIN_NAME " plugin: starting event loop");
2293
2294   virt_notif_thread_set_active(thread_data, 1);
2295   if (pthread_create(&thread_data->event_loop_tid, NULL, event_loop_worker,
2296                      thread_data)) {
2297     ERROR(PLUGIN_NAME " plugin: failed event loop thread creation");
2298     virt_notif_thread_set_active(thread_data, 0);
2299     virConnectDomainEventDeregisterAny(conn, thread_data->domain_event_cb_id);
2300     thread_data->domain_event_cb_id = -1;
2301     return -1;
2302   }
2303
2304   return 0;
2305 }
2306
2307 /* stop event loop thread and deregister callback */
2308 static void stop_event_loop(virt_notif_thread_t *thread_data) {
2309
2310   DEBUG(PLUGIN_NAME " plugin: stopping event loop");
2311
2312   /* Stopping loop */
2313   if (virt_notif_thread_is_active(thread_data)) {
2314     virt_notif_thread_set_active(thread_data, 0);
2315     if (pthread_join(notif_thread.event_loop_tid, NULL) != 0)
2316       ERROR(PLUGIN_NAME " plugin: stopping notification thread failed");
2317   }
2318
2319   /* ... and de-registering event handler */
2320   if (conn != NULL && thread_data->domain_event_cb_id != -1) {
2321     virConnectDomainEventDeregisterAny(conn, thread_data->domain_event_cb_id);
2322     thread_data->domain_event_cb_id = -1;
2323   }
2324 }
2325
2326 static int persistent_domains_state_notification(void) {
2327   int status = 0;
2328   int n;
2329 #ifdef HAVE_LIST_ALL_DOMAINS
2330   virDomainPtr *domains = NULL;
2331   n = virConnectListAllDomains(conn, &domains,
2332                                VIR_CONNECT_LIST_DOMAINS_PERSISTENT);
2333   if (n < 0) {
2334     VIRT_ERROR(conn, "reading list of persistent domains");
2335     status = -1;
2336   } else {
2337     DEBUG(PLUGIN_NAME " plugin: getting state of %i persistent domains", n);
2338     /* Fetch each persistent domain's state and notify it */
2339     int n_notified = n;
2340     for (int i = 0; i < n; ++i) {
2341       status = get_domain_state_notify(domains[i]);
2342       if (status != 0) {
2343         n_notified--;
2344         ERROR(PLUGIN_NAME " plugin: could not notify state of domain %s",
2345               virDomainGetName(domains[i]));
2346       }
2347       virDomainFree(domains[i]);
2348     }
2349
2350     sfree(domains);
2351     DEBUG(PLUGIN_NAME " plugin: notified state of %i persistent domains",
2352           n_notified);
2353   }
2354 #else
2355   n = virConnectNumOfDomains(conn);
2356   if (n > 0) {
2357     int *domids;
2358     /* Get list of domains. */
2359     domids = calloc(n, sizeof(*domids));
2360     if (domids == NULL) {
2361       ERROR(PLUGIN_NAME " plugin: calloc failed.");
2362       return -1;
2363     }
2364     n = virConnectListDomains(conn, domids, n);
2365     if (n < 0) {
2366       VIRT_ERROR(conn, "reading list of domains");
2367       sfree(domids);
2368       return -1;
2369     }
2370     /* Fetch info of each active domain and notify it */
2371     for (int i = 0; i < n; ++i) {
2372       virDomainInfo info;
2373       virDomainPtr dom = NULL;
2374       dom = virDomainLookupByID(conn, domids[i]);
2375       if (dom == NULL) {
2376         VIRT_ERROR(conn, "virDomainLookupByID");
2377         /* Could be that the domain went away -- ignore it anyway. */
2378         continue;
2379       }
2380       status = virDomainGetInfo(dom, &info);
2381       if (status == 0)
2382         /* virDomainGetState is not available. Submit 0, which corresponds to
2383          * unknown reason. */
2384         domain_state_submit_notif(dom, info.state, 0);
2385       else
2386         ERROR(PLUGIN_NAME " plugin: virDomainGetInfo failed with status %i.",
2387               status);
2388
2389       virDomainFree(dom);
2390     }
2391     sfree(domids);
2392   }
2393 #endif
2394
2395   return status;
2396 }
2397
2398 static int lv_read(user_data_t *ud) {
2399   if (ud->data == NULL) {
2400     ERROR(PLUGIN_NAME " plugin: NULL userdata");
2401     return -1;
2402   }
2403
2404   struct lv_read_instance *inst = ud->data;
2405   struct lv_read_state *state = &inst->read_state;
2406
2407   if (inst->id == 0)
2408     if (lv_connect() < 0)
2409       return -1;
2410
2411   /* Wait until inst#0 establish connection */
2412   if (conn == NULL) {
2413     DEBUG(PLUGIN_NAME " plugin#%s: Wait until inst#0 establish connection",
2414           inst->tag);
2415     return 0;
2416   }
2417
2418   int ret = virConnectIsAlive(conn);
2419   if (ret == 0) { /* Connection lost */
2420     if (inst->id == 0) {
2421       c_complain(LOG_ERR, &conn_complain,
2422                  PLUGIN_NAME " plugin: Lost connection.");
2423
2424       if (!persistent_notification)
2425         stop_event_loop(&notif_thread);
2426
2427       lv_disconnect();
2428       last_refresh = 0;
2429     }
2430     return -1;
2431   }
2432
2433   time_t t;
2434   time(&t);
2435
2436   /* Need to refresh domain or device lists? */
2437   if ((last_refresh == (time_t)0) ||
2438       ((interval > 0) && ((last_refresh + interval) <= t))) {
2439     if (refresh_lists(inst) != 0) {
2440       if (inst->id == 0) {
2441         if (!persistent_notification)
2442           stop_event_loop(&notif_thread);
2443         lv_disconnect();
2444       }
2445       return -1;
2446     }
2447     last_refresh = t;
2448   }
2449
2450   /* persistent domains state notifications are handled by instance 0 */
2451   if (inst->id == 0 && persistent_notification) {
2452     int status = persistent_domains_state_notification();
2453     if (status != 0)
2454       DEBUG(PLUGIN_NAME " plugin: persistent_domains_state_notifications "
2455                         "returned with status %i",
2456             status);
2457   }
2458
2459 #if COLLECT_DEBUG
2460   for (int i = 0; i < state->nr_domains; ++i)
2461     DEBUG(PLUGIN_NAME " plugin: domain %s",
2462           virDomainGetName(state->domains[i].ptr));
2463   for (int i = 0; i < state->nr_block_devices; ++i)
2464     DEBUG(PLUGIN_NAME " plugin: block device %d %s:%s", i,
2465           virDomainGetName(state->block_devices[i].dom),
2466           state->block_devices[i].path);
2467   for (int i = 0; i < state->nr_interface_devices; ++i)
2468     DEBUG(PLUGIN_NAME " plugin: interface device %d %s:%s", i,
2469           virDomainGetName(state->interface_devices[i].dom),
2470           state->interface_devices[i].path);
2471 #endif
2472
2473   /* Get domains' metrics */
2474   for (int i = 0; i < state->nr_domains; ++i) {
2475     domain_t *dom = &state->domains[i];
2476     int status = 0;
2477     if (dom->active)
2478       status = get_domain_metrics(dom);
2479 #ifdef HAVE_DOM_REASON
2480     else if (extra_stats & ex_stats_domain_state)
2481       status = submit_domain_state(dom->ptr);
2482 #endif
2483
2484     if (status != 0)
2485       ERROR(PLUGIN_NAME " plugin: failed to get metrics for domain=%s",
2486             virDomainGetName(dom->ptr));
2487   }
2488
2489   /* Get block device stats for each domain. */
2490   for (int i = 0; i < state->nr_block_devices; ++i) {
2491     int status = get_block_device_stats(&state->block_devices[i]);
2492     if (status != 0)
2493       ERROR(PLUGIN_NAME
2494             " plugin: failed to get stats for block device (%s) in domain %s",
2495             state->block_devices[i].path,
2496             virDomainGetName(state->block_devices[i].dom));
2497   }
2498
2499   /* Get interface stats for each domain. */
2500   for (int i = 0; i < state->nr_interface_devices; ++i) {
2501     int status = get_if_dev_stats(&state->interface_devices[i]);
2502     if (status != 0)
2503       ERROR(
2504           PLUGIN_NAME
2505           " plugin: failed to get interface stats for device (%s) in domain %s",
2506           state->interface_devices[i].path,
2507           virDomainGetName(state->interface_devices[i].dom));
2508   }
2509
2510   return 0;
2511 }
2512
2513 static int lv_init_instance(size_t i, plugin_read_cb callback) {
2514   struct lv_user_data *lv_ud = &(lv_read_user_data[i]);
2515   struct lv_read_instance *inst = &(lv_ud->inst);
2516
2517   memset(lv_ud, 0, sizeof(*lv_ud));
2518
2519   ssnprintf(inst->tag, sizeof(inst->tag), "%s-%" PRIsz, PLUGIN_NAME, i);
2520   inst->id = i;
2521
2522   user_data_t *ud = &(lv_ud->ud);
2523   ud->data = inst;
2524   ud->free_func = NULL;
2525
2526   INFO(PLUGIN_NAME " plugin: reader %s initialized", inst->tag);
2527
2528   return plugin_register_complex_read(NULL, inst->tag, callback, 0, ud);
2529 }
2530
2531 static void lv_clean_read_state(struct lv_read_state *state) {
2532   free_block_devices(state);
2533   free_interface_devices(state);
2534   free_domains(state);
2535 }
2536
2537 static void lv_fini_instance(size_t i) {
2538   struct lv_read_instance *inst = &(lv_read_user_data[i].inst);
2539   struct lv_read_state *state = &(inst->read_state);
2540
2541   lv_clean_read_state(state);
2542
2543   INFO(PLUGIN_NAME " plugin: reader %s finalized", inst->tag);
2544 }
2545
2546 static int lv_init(void) {
2547   if (virInitialize() != 0)
2548     return -1;
2549
2550   /* Init ignorelists if there was no explicit configuration */
2551   if (lv_init_ignorelists() != 0)
2552     return -1;
2553
2554   if (!persistent_notification)
2555     if (virt_notif_thread_init(&notif_thread) != 0)
2556       return -1;
2557
2558   lv_connect();
2559
2560   DEBUG(PLUGIN_NAME " plugin: starting %i instances", nr_instances);
2561
2562   for (int i = 0; i < nr_instances; ++i)
2563     if (lv_init_instance(i, lv_read) != 0)
2564       return -1;
2565
2566   return 0;
2567 }
2568
2569 /*
2570  * returns 0 on success and <0 on error
2571  */
2572 static int lv_domain_get_tag(xmlXPathContextPtr xpath_ctx, const char *dom_name,
2573                              char *dom_tag) {
2574   char xpath_str[BUFFER_MAX_LEN] = {'\0'};
2575   xmlXPathObjectPtr xpath_obj = NULL;
2576   xmlNodePtr xml_node = NULL;
2577   int ret = -1;
2578   int err;
2579
2580   err = xmlXPathRegisterNs(xpath_ctx,
2581                            (const xmlChar *)METADATA_VM_PARTITION_PREFIX,
2582                            (const xmlChar *)METADATA_VM_PARTITION_URI);
2583   if (err) {
2584     ERROR(PLUGIN_NAME " plugin: xmlXpathRegisterNs(%s, %s) failed on domain %s",
2585           METADATA_VM_PARTITION_PREFIX, METADATA_VM_PARTITION_URI, dom_name);
2586     goto done;
2587   }
2588
2589   ssnprintf(xpath_str, sizeof(xpath_str), "/domain/metadata/%s:%s/text()",
2590             METADATA_VM_PARTITION_PREFIX, METADATA_VM_PARTITION_ELEMENT);
2591   xpath_obj = xmlXPathEvalExpression((xmlChar *)xpath_str, xpath_ctx);
2592   if (xpath_obj == NULL) {
2593     ERROR(PLUGIN_NAME " plugin: xmlXPathEval(%s) failed on domain %s",
2594           xpath_str, dom_name);
2595     goto done;
2596   }
2597
2598   if (xpath_obj->type != XPATH_NODESET) {
2599     ERROR(PLUGIN_NAME " plugin: xmlXPathEval(%s) unexpected return type %d "
2600                       "(wanted %d) on domain %s",
2601           xpath_str, xpath_obj->type, XPATH_NODESET, dom_name);
2602     goto done;
2603   }
2604
2605   /*
2606    * from now on there is no real error, it's ok if a domain
2607    * doesn't have the metadata partition tag.
2608    */
2609   ret = 0;
2610   if (xpath_obj->nodesetval == NULL || xpath_obj->nodesetval->nodeNr != 1) {
2611     DEBUG(PLUGIN_NAME " plugin: xmlXPathEval(%s) return nodeset size=%i "
2612                       "expected=1 on domain %s",
2613           xpath_str,
2614           (xpath_obj->nodesetval == NULL) ? 0 : xpath_obj->nodesetval->nodeNr,
2615           dom_name);
2616   } else {
2617     xml_node = xpath_obj->nodesetval->nodeTab[0];
2618     sstrncpy(dom_tag, (const char *)xml_node->content, PARTITION_TAG_MAX_LEN);
2619   }
2620
2621 done:
2622   /* deregister to clean up */
2623   err = xmlXPathRegisterNs(xpath_ctx,
2624                            (const xmlChar *)METADATA_VM_PARTITION_PREFIX, NULL);
2625   if (err) {
2626     /* we can't really recover here */
2627     ERROR(PLUGIN_NAME
2628           " plugin: deregistration of namespace %s failed for domain %s",
2629           METADATA_VM_PARTITION_PREFIX, dom_name);
2630   }
2631   if (xpath_obj)
2632     xmlXPathFreeObject(xpath_obj);
2633
2634   return ret;
2635 }
2636
2637 static int is_known_tag(const char *dom_tag) {
2638   for (int i = 0; i < nr_instances; ++i)
2639     if (!strcmp(dom_tag, lv_read_user_data[i].inst.tag))
2640       return 1;
2641   return 0;
2642 }
2643
2644 static int lv_instance_include_domain(struct lv_read_instance *inst,
2645                                       const char *dom_name,
2646                                       const char *dom_tag) {
2647   if ((dom_tag[0] != '\0') && (strcmp(dom_tag, inst->tag) == 0))
2648     return 1;
2649
2650   /* instance#0 will always be there, so it is in charge of extra duties */
2651   if (inst->id == 0) {
2652     if (dom_tag[0] == '\0' || !is_known_tag(dom_tag)) {
2653       DEBUG(PLUGIN_NAME " plugin#%s: refreshing domain %s "
2654                         "with unknown tag '%s'",
2655             inst->tag, dom_name, dom_tag);
2656       return 1;
2657     }
2658   }
2659
2660   return 0;
2661 }
2662
2663 static void lv_add_block_devices(struct lv_read_state *state, virDomainPtr dom,
2664                                  const char *domname,
2665                                  xmlXPathContextPtr xpath_ctx) {
2666   xmlXPathObjectPtr xpath_obj =
2667       xmlXPathEval((const xmlChar *)"/domain/devices/disk", xpath_ctx);
2668
2669   if (xpath_obj == NULL) {
2670     DEBUG(PLUGIN_NAME " plugin: no disk xpath-object found for domain %s",
2671           domname);
2672     return;
2673   }
2674
2675   if (xpath_obj->type != XPATH_NODESET || xpath_obj->nodesetval == NULL) {
2676     DEBUG(PLUGIN_NAME " plugin: no disk node found for domain %s", domname);
2677     goto cleanup;
2678   }
2679
2680   xmlNodeSetPtr xml_block_devices = xpath_obj->nodesetval;
2681   for (int i = 0; i < xml_block_devices->nodeNr; ++i) {
2682     xmlNodePtr xml_device = xpath_obj->nodesetval->nodeTab[i];
2683     char *path_str = NULL;
2684     char *source_str = NULL;
2685
2686     if (!xml_device)
2687       continue;
2688
2689     /* Fetching path and source for block device */
2690     for (xmlNodePtr child = xml_device->children; child; child = child->next) {
2691       if (child->type != XML_ELEMENT_NODE)
2692         continue;
2693
2694       /* we are interested only in either "target" or "source" elements */
2695       if (xmlStrEqual(child->name, (const xmlChar *)"target"))
2696         path_str = (char *)xmlGetProp(child, (const xmlChar *)"dev");
2697       else if (xmlStrEqual(child->name, (const xmlChar *)"source")) {
2698         /* name of the source is located in "dev" or "file" element (it depends
2699          * on type of source). Trying "dev" at first*/
2700         source_str = (char *)xmlGetProp(child, (const xmlChar *)"dev");
2701         if (!source_str)
2702           source_str = (char *)xmlGetProp(child, (const xmlChar *)"file");
2703       }
2704       /* ignoring any other element*/
2705     }
2706
2707     /* source_str will be interpreted as a device path if blockdevice_format
2708      *  param is set to 'source'. */
2709     const char *device_path =
2710         (blockdevice_format == source) ? source_str : path_str;
2711
2712     if (!device_path) {
2713       /* no path found and we can't add block_device without it */
2714       WARNING(PLUGIN_NAME " plugin: could not generate device path for disk in "
2715                           "domain %s - disk device will be ignored in reports",
2716               domname);
2717       goto cont;
2718     }
2719
2720     if (ignore_device_match(il_block_devices, domname, device_path) == 0) {
2721       /* we only have to store information whether 'source' exists or not */
2722       bool has_source = (source_str != NULL) ? true : false;
2723
2724       add_block_device(state, dom, device_path, has_source);
2725     }
2726
2727   cont:
2728     if (path_str)
2729       xmlFree(path_str);
2730
2731     if (source_str)
2732       xmlFree(source_str);
2733   }
2734
2735 cleanup:
2736   xmlXPathFreeObject(xpath_obj);
2737 }
2738
2739 static void lv_add_network_interfaces(struct lv_read_state *state,
2740                                       virDomainPtr dom, const char *domname,
2741                                       xmlXPathContextPtr xpath_ctx) {
2742   xmlXPathObjectPtr xpath_obj = xmlXPathEval(
2743       (xmlChar *)"/domain/devices/interface[target[@dev]]", xpath_ctx);
2744
2745   if (xpath_obj == NULL)
2746     return;
2747
2748   if (xpath_obj->type != XPATH_NODESET || xpath_obj->nodesetval == NULL) {
2749     xmlXPathFreeObject(xpath_obj);
2750     return;
2751   }
2752
2753   xmlNodeSetPtr xml_interfaces = xpath_obj->nodesetval;
2754
2755   for (int j = 0; j < xml_interfaces->nodeNr; ++j) {
2756     char *path = NULL;
2757     char *address = NULL;
2758     const int itf_number = j + 1;
2759
2760     xmlNodePtr xml_interface = xml_interfaces->nodeTab[j];
2761     if (!xml_interface)
2762       continue;
2763
2764     for (xmlNodePtr child = xml_interface->children; child;
2765          child = child->next) {
2766       if (child->type != XML_ELEMENT_NODE)
2767         continue;
2768
2769       if (xmlStrEqual(child->name, (const xmlChar *)"target")) {
2770         path = (char *)xmlGetProp(child, (const xmlChar *)"dev");
2771         if (!path)
2772           continue;
2773       } else if (xmlStrEqual(child->name, (const xmlChar *)"mac")) {
2774         address = (char *)xmlGetProp(child, (const xmlChar *)"address");
2775         if (!address)
2776           continue;
2777       }
2778     }
2779
2780     bool device_ignored = false;
2781     switch (interface_format) {
2782     case if_name:
2783       if (ignore_device_match(il_interface_devices, domname, path) != 0)
2784         device_ignored = true;
2785       break;
2786     case if_address:
2787       if (ignore_device_match(il_interface_devices, domname, address) != 0)
2788         device_ignored = true;
2789       break;
2790     case if_number: {
2791       char number_string[4];
2792       ssnprintf(number_string, sizeof(number_string), "%d", itf_number);
2793       if (ignore_device_match(il_interface_devices, domname, number_string) !=
2794           0)
2795         device_ignored = true;
2796     } break;
2797     default:
2798       ERROR(PLUGIN_NAME " plugin: Unknown interface_format option: %d",
2799             interface_format);
2800     }
2801
2802     if (!device_ignored)
2803       add_interface_device(state, dom, path, address, itf_number);
2804
2805     if (path)
2806       xmlFree(path);
2807     if (address)
2808       xmlFree(address);
2809   }
2810   xmlXPathFreeObject(xpath_obj);
2811 }
2812
2813 static bool is_domain_ignored(virDomainPtr dom) {
2814   const char *domname = virDomainGetName(dom);
2815
2816   if (domname == NULL) {
2817     VIRT_ERROR(conn, "virDomainGetName failed, ignoring domain");
2818     return true;
2819   }
2820
2821   if (ignorelist_match(il_domains, domname) != 0) {
2822     DEBUG(PLUGIN_NAME
2823           " plugin: ignoring domain '%s' because of ignorelist option",
2824           domname);
2825     return true;
2826   }
2827
2828   return false;
2829 }
2830
2831 static int refresh_lists(struct lv_read_instance *inst) {
2832   struct lv_read_state *state = &inst->read_state;
2833   int n;
2834
2835 #ifndef HAVE_LIST_ALL_DOMAINS
2836   n = virConnectNumOfDomains(conn);
2837   if (n < 0) {
2838     VIRT_ERROR(conn, "reading number of domains");
2839     return -1;
2840   }
2841 #endif
2842
2843   lv_clean_read_state(state);
2844
2845 #ifndef HAVE_LIST_ALL_DOMAINS
2846   if (n == 0)
2847     goto end;
2848 #endif
2849
2850 #ifdef HAVE_LIST_ALL_DOMAINS
2851   virDomainPtr *domains, *domains_inactive;
2852   int m = virConnectListAllDomains(conn, &domains_inactive,
2853                                    VIR_CONNECT_LIST_DOMAINS_INACTIVE);
2854   n = virConnectListAllDomains(conn, &domains, VIR_CONNECT_LIST_DOMAINS_ACTIVE);
2855 #else
2856   /* Get list of domains. */
2857   int *domids = calloc(n, sizeof(*domids));
2858   if (domids == NULL) {
2859     ERROR(PLUGIN_NAME " plugin: calloc failed.");
2860     return -1;
2861   }
2862
2863   n = virConnectListDomains(conn, domids, n);
2864 #endif
2865
2866   if (n < 0) {
2867     VIRT_ERROR(conn, "reading list of domains");
2868 #ifndef HAVE_LIST_ALL_DOMAINS
2869     sfree(domids);
2870 #else
2871     for (int i = 0; i < m; ++i)
2872       virDomainFree(domains_inactive[i]);
2873     sfree(domains_inactive);
2874 #endif
2875     return -1;
2876   }
2877
2878 #ifdef HAVE_LIST_ALL_DOMAINS
2879   for (int i = 0; i < m; ++i)
2880     if (is_domain_ignored(domains_inactive[i]) ||
2881         add_domain(state, domains_inactive[i], 0) < 0) {
2882       /* domain ignored or failed during adding to domains list*/
2883       virDomainFree(domains_inactive[i]);
2884       domains_inactive[i] = NULL;
2885       continue;
2886     }
2887 #endif
2888
2889   /* Fetch each domain and add it to the list, unless ignore. */
2890   for (int i = 0; i < n; ++i) {
2891
2892 #ifdef HAVE_LIST_ALL_DOMAINS
2893     virDomainPtr dom = domains[i];
2894 #else
2895     virDomainPtr dom = virDomainLookupByID(conn, domids[i]);
2896     if (dom == NULL) {
2897       VIRT_ERROR(conn, "virDomainLookupByID");
2898       /* Could be that the domain went away -- ignore it anyway. */
2899       continue;
2900     }
2901 #endif
2902
2903     if (is_domain_ignored(dom) || add_domain(state, dom, 1) < 0) {
2904       /*
2905        * domain ignored or failed during adding to domains list
2906        *
2907        * When domain is already tracked, then there is
2908        * no problem with memory handling (will be freed
2909        * with the rest of domains cached data)
2910        * But in case of error like this (error occurred
2911        * before adding domain to track) we have to take
2912        * care it ourselves and call virDomainFree
2913        */
2914       virDomainFree(dom);
2915       continue;
2916     }
2917
2918     const char *domname = virDomainGetName(dom);
2919     if (domname == NULL) {
2920       VIRT_ERROR(conn, "virDomainGetName");
2921       continue;
2922     }
2923
2924     virDomainInfo info;
2925     int status = virDomainGetInfo(dom, &info);
2926     if (status != 0) {
2927       ERROR(PLUGIN_NAME " plugin: virDomainGetInfo failed with status %i.",
2928             status);
2929       continue;
2930     }
2931
2932     if (info.state != VIR_DOMAIN_RUNNING) {
2933       DEBUG(PLUGIN_NAME " plugin: skipping inactive domain %s", domname);
2934       continue;
2935     }
2936
2937     /* Get a list of devices for this domain. */
2938     xmlDocPtr xml_doc = NULL;
2939     xmlXPathContextPtr xpath_ctx = NULL;
2940
2941     char *xml = virDomainGetXMLDesc(dom, 0);
2942     if (!xml) {
2943       VIRT_ERROR(conn, "virDomainGetXMLDesc");
2944       goto cont;
2945     }
2946
2947     /* Yuck, XML.  Parse out the devices. */
2948     xml_doc = xmlReadDoc((xmlChar *)xml, NULL, NULL, XML_PARSE_NONET);
2949     if (xml_doc == NULL) {
2950       VIRT_ERROR(conn, "xmlReadDoc");
2951       goto cont;
2952     }
2953
2954     xpath_ctx = xmlXPathNewContext(xml_doc);
2955
2956     char tag[PARTITION_TAG_MAX_LEN] = {'\0'};
2957     if (lv_domain_get_tag(xpath_ctx, domname, tag) < 0) {
2958       ERROR(PLUGIN_NAME " plugin: lv_domain_get_tag failed.");
2959       goto cont;
2960     }
2961
2962     if (!lv_instance_include_domain(inst, domname, tag))
2963       goto cont;
2964
2965     /* Block devices. */
2966     if (report_block_devices)
2967       lv_add_block_devices(state, dom, domname, xpath_ctx);
2968
2969     /* Network interfaces. */
2970     if (report_network_interfaces)
2971       lv_add_network_interfaces(state, dom, domname, xpath_ctx);
2972
2973   cont:
2974     if (xpath_ctx)
2975       xmlXPathFreeContext(xpath_ctx);
2976     if (xml_doc)
2977       xmlFreeDoc(xml_doc);
2978     sfree(xml);
2979   }
2980
2981 #ifdef HAVE_LIST_ALL_DOMAINS
2982   /* NOTE: domains_active and domains_inactive data will be cleared during
2983      refresh of all domains (inside lv_clean_read_state function) so we need
2984      to free here only allocated arrays */
2985   sfree(domains);
2986   sfree(domains_inactive);
2987 #else
2988   sfree(domids);
2989
2990 end:
2991 #endif
2992
2993   DEBUG(PLUGIN_NAME " plugin#%s: refreshing"
2994                     " domains=%i block_devices=%i iface_devices=%i",
2995         inst->tag, state->nr_domains, state->nr_block_devices,
2996         state->nr_interface_devices);
2997
2998   return 0;
2999 }
3000
3001 static void free_domains(struct lv_read_state *state) {
3002   if (state->domains) {
3003     for (int i = 0; i < state->nr_domains; ++i)
3004       virDomainFree(state->domains[i].ptr);
3005     sfree(state->domains);
3006   }
3007   state->domains = NULL;
3008   state->nr_domains = 0;
3009 }
3010
3011 static int add_domain(struct lv_read_state *state, virDomainPtr dom,
3012                       bool active) {
3013   int new_size = sizeof(state->domains[0]) * (state->nr_domains + 1);
3014
3015   domain_t *new_ptr = realloc(state->domains, new_size);
3016   if (new_ptr == NULL) {
3017     ERROR(PLUGIN_NAME " plugin: realloc failed in add_domain()");
3018     return -1;
3019   }
3020
3021   state->domains = new_ptr;
3022   state->domains[state->nr_domains].ptr = dom;
3023   state->domains[state->nr_domains].active = active;
3024   memset(&state->domains[state->nr_domains].info, 0,
3025          sizeof(state->domains[state->nr_domains].info));
3026
3027   return state->nr_domains++;
3028 }
3029
3030 static void free_block_devices(struct lv_read_state *state) {
3031   if (state->block_devices) {
3032     for (int i = 0; i < state->nr_block_devices; ++i)
3033       sfree(state->block_devices[i].path);
3034     sfree(state->block_devices);
3035   }
3036   state->block_devices = NULL;
3037   state->nr_block_devices = 0;
3038 }
3039
3040 static int add_block_device(struct lv_read_state *state, virDomainPtr dom,
3041                             const char *path, bool has_source) {
3042
3043   char *path_copy = strdup(path);
3044   if (!path_copy)
3045     return -1;
3046
3047   int new_size =
3048       sizeof(state->block_devices[0]) * (state->nr_block_devices + 1);
3049
3050   struct block_device *new_ptr = realloc(state->block_devices, new_size);
3051   if (new_ptr == NULL) {
3052     sfree(path_copy);
3053     return -1;
3054   }
3055   state->block_devices = new_ptr;
3056   state->block_devices[state->nr_block_devices].dom = dom;
3057   state->block_devices[state->nr_block_devices].path = path_copy;
3058   state->block_devices[state->nr_block_devices].has_source = has_source;
3059   return state->nr_block_devices++;
3060 }
3061
3062 static void free_interface_devices(struct lv_read_state *state) {
3063   if (state->interface_devices) {
3064     for (int i = 0; i < state->nr_interface_devices; ++i) {
3065       sfree(state->interface_devices[i].path);
3066       sfree(state->interface_devices[i].address);
3067       sfree(state->interface_devices[i].number);
3068     }
3069     sfree(state->interface_devices);
3070   }
3071   state->interface_devices = NULL;
3072   state->nr_interface_devices = 0;
3073 }
3074
3075 static int add_interface_device(struct lv_read_state *state, virDomainPtr dom,
3076                                 const char *path, const char *address,
3077                                 unsigned int number) {
3078
3079   if ((path == NULL) || (address == NULL))
3080     return EINVAL;
3081
3082   char *path_copy = strdup(path);
3083   if (!path_copy)
3084     return -1;
3085
3086   char *address_copy = strdup(address);
3087   if (!address_copy) {
3088     sfree(path_copy);
3089     return -1;
3090   }
3091
3092   char number_string[21];
3093   ssnprintf(number_string, sizeof(number_string), "interface-%u", number);
3094   char *number_copy = strdup(number_string);
3095   if (!number_copy) {
3096     sfree(path_copy);
3097     sfree(address_copy);
3098     return -1;
3099   }
3100
3101   int new_size =
3102       sizeof(state->interface_devices[0]) * (state->nr_interface_devices + 1);
3103
3104   struct interface_device *new_ptr =
3105       realloc(state->interface_devices, new_size);
3106   if (new_ptr == NULL) {
3107     sfree(path_copy);
3108     sfree(address_copy);
3109     sfree(number_copy);
3110     return -1;
3111   }
3112
3113   state->interface_devices = new_ptr;
3114   state->interface_devices[state->nr_interface_devices].dom = dom;
3115   state->interface_devices[state->nr_interface_devices].path = path_copy;
3116   state->interface_devices[state->nr_interface_devices].address = address_copy;
3117   state->interface_devices[state->nr_interface_devices].number = number_copy;
3118   return state->nr_interface_devices++;
3119 }
3120
3121 static int ignore_device_match(ignorelist_t *il, const char *domname,
3122                                const char *devpath) {
3123   if ((domname == NULL) || (devpath == NULL))
3124     return 0;
3125
3126   size_t n = strlen(domname) + strlen(devpath) + 2;
3127   char *name = malloc(n);
3128   if (name == NULL) {
3129     ERROR(PLUGIN_NAME " plugin: malloc failed.");
3130     return 0;
3131   }
3132   ssnprintf(name, n, "%s:%s", domname, devpath);
3133   int r = ignorelist_match(il, name);
3134   sfree(name);
3135   return r;
3136 }
3137
3138 static int lv_shutdown(void) {
3139   for (int i = 0; i < nr_instances; ++i) {
3140     lv_fini_instance(i);
3141   }
3142
3143   if (!persistent_notification)
3144     stop_event_loop(&notif_thread);
3145
3146   lv_disconnect();
3147
3148   ignorelist_free(il_domains);
3149   il_domains = NULL;
3150   ignorelist_free(il_block_devices);
3151   il_block_devices = NULL;
3152   ignorelist_free(il_interface_devices);
3153   il_interface_devices = NULL;
3154
3155   return 0;
3156 }
3157
3158 void module_register(void) {
3159   plugin_register_complex_config("virt", lv_config);
3160   plugin_register_init(PLUGIN_NAME, lv_init);
3161   plugin_register_shutdown(PLUGIN_NAME, lv_shutdown);
3162 }