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