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 **/
22 #include "collectd.h"
24 #include "common.h"
25 #include "plugin.h"
26 #include "utils_complain.h"
27 #include "utils_ignorelist.h"
29 #include <libgen.h> /* for basename(3) */
30 #include <libvirt/libvirt.h>
31 #include <libvirt/virterror.h>
32 #include <libxml/parser.h>
33 #include <libxml/tree.h>
34 #include <libxml/xpath.h>
35 #include <libxml/xpathInternals.h>
37 /* Plugin name */
38 #define PLUGIN_NAME "virt"
40 static const char *config_keys[] = {"Connection",
42 "RefreshInterval",
44 "Domain",
45 "BlockDevice",
46 "BlockDeviceFormat",
47 "BlockDeviceFormatBasename",
48 "InterfaceDevice",
49 "IgnoreSelected",
51 "HostnameFormat",
52 "InterfaceFormat",
54 "PluginInstanceFormat",
56 "Instances",
58 NULL};
59 #define NR_CONFIG_KEYS ((sizeof config_keys / sizeof config_keys[0]) - 1)
61 /* Connection. */
62 static virConnectPtr conn = 0;
63 static char *conn_string = NULL;
64 static c_complain_t conn_complain = C_COMPLAIN_INIT_STATIC;
66 /* Seconds between list refreshes, 0 disables completely. */
67 static int interval = 60;
69 /* List of domains, if specified. */
70 static ignorelist_t *il_domains = NULL;
71 /* List of block devices, if specified. */
72 static ignorelist_t *il_block_devices = NULL;
73 /* List of network interface devices, if specified. */
74 static ignorelist_t *il_interface_devices = NULL;
76 static int ignore_device_match(ignorelist_t *, const char *domname,
77 const char *devpath);
79 /* Actual list of block devices found on last refresh. */
80 struct block_device {
81 virDomainPtr dom; /* domain */
82 char *path; /* name of block device */
83 };
85 /* Actual list of network interfaces found on last refresh. */
86 struct interface_device {
87 virDomainPtr dom; /* domain */
88 char *path; /* name of interface device */
89 char *address; /* mac address of interface device */
90 char *number; /* interface device number */
91 };
93 struct lv_read_state {
94 /* Actual list of domains found on last refresh. */
95 virDomainPtr *domains;
96 int nr_domains;
98 struct block_device *block_devices;
99 int nr_block_devices;
101 struct interface_device *interface_devices;
102 int nr_interface_devices;
103 };
105 static void free_domains(struct lv_read_state *state);
106 static int add_domain(struct lv_read_state *state, virDomainPtr dom);
108 static void free_block_devices(struct lv_read_state *state);
109 static int add_block_device(struct lv_read_state *state, virDomainPtr dom,
110 const char *path);
112 static void free_interface_devices(struct lv_read_state *state);
113 static int add_interface_device(struct lv_read_state *state, virDomainPtr dom,
114 const char *path, const char *address,
115 unsigned int number);
117 #define METADATA_VM_PARTITION_URI "http://ovirt.org/ovirtmap/tag/1.0"
118 #define METADATA_VM_PARTITION_ELEMENT "tag"
119 #define METADATA_VM_PARTITION_PREFIX "ovirtmap"
121 #define BUFFER_MAX_LEN 256
122 #define PARTITION_TAG_MAX_LEN 32
124 struct lv_read_instance {
125 struct lv_read_state read_state;
126 char tag[PARTITION_TAG_MAX_LEN];
127 size_t id;
128 };
130 struct lv_user_data {
131 struct lv_read_instance inst;
132 user_data_t ud;
133 };
135 #define NR_INSTANCES_DEFAULT 1
136 #define NR_INSTANCES_MAX 128
137 static int nr_instances = NR_INSTANCES_DEFAULT;
138 static struct lv_user_data lv_read_user_data[NR_INSTANCES_MAX];
140 /* HostnameFormat. */
141 #define HF_MAX_FIELDS 3
143 enum hf_field { hf_none = 0, hf_hostname, hf_name, hf_uuid };
145 static enum hf_field hostname_format[HF_MAX_FIELDS] = {hf_name};
147 /* PluginInstanceFormat */
148 #define PLGINST_MAX_FIELDS 2
150 enum plginst_field { plginst_none = 0, plginst_name, plginst_uuid };
152 static enum plginst_field plugin_instance_format[PLGINST_MAX_FIELDS] = {
153 plginst_none};
155 /* BlockDeviceFormat */
156 enum bd_field { target, source };
158 /* InterfaceFormat. */
159 enum if_field { if_address, if_name, if_number };
161 /* BlockDeviceFormatBasename */
162 _Bool blockdevice_format_basename = 0;
163 static enum bd_field blockdevice_format = target;
164 static enum if_field interface_format = if_name;
166 /* Time that we last refreshed. */
167 static time_t last_refresh = (time_t)0;
169 static int refresh_lists(struct lv_read_instance *inst);
171 /* ERROR(...) macro for virterrors. */
172 #define VIRT_ERROR(conn, s) \
173 do { \
174 virErrorPtr err; \
175 err = (conn) ? virConnGetLastError((conn)) : virGetLastError(); \
176 if (err) \
177 ERROR("%s: %s", (s), err->message); \
178 } while (0)
180 static void init_value_list(value_list_t *vl, virDomainPtr dom) {
181 int n;
182 const char *name;
183 char uuid[VIR_UUID_STRING_BUFLEN];
185 sstrncpy(vl->plugin, PLUGIN_NAME, sizeof(vl->plugin));
187 vl->host[0] = '\0';
189 /* Construct the hostname field according to HostnameFormat. */
190 for (int i = 0; i < HF_MAX_FIELDS; ++i) {
191 if (hostname_format[i] == hf_none)
192 continue;
194 n = DATA_MAX_NAME_LEN - strlen(vl->host) - 2;
196 if (i > 0 && n >= 1) {
197 strncat(vl->host, ":", 1);
198 n--;
199 }
201 switch (hostname_format[i]) {
202 case hf_none:
203 break;
204 case hf_hostname:
205 strncat(vl->host, hostname_g, n);
206 break;
207 case hf_name:
208 name = virDomainGetName(dom);
209 if (name)
210 strncat(vl->host, name, n);
211 break;
212 case hf_uuid:
213 if (virDomainGetUUIDString(dom, uuid) == 0)
214 strncat(vl->host, uuid, n);
215 break;
216 }
217 }
219 vl->host[sizeof(vl->host) - 1] = '\0';
221 /* Construct the plugin instance field according to PluginInstanceFormat. */
222 for (int i = 0; i < PLGINST_MAX_FIELDS; ++i) {
223 if (plugin_instance_format[i] == plginst_none)
224 continue;
226 n = sizeof(vl->plugin_instance) - strlen(vl->plugin_instance) - 2;
228 if (i > 0 && n >= 1) {
229 strncat(vl->plugin_instance, ":", 1);
230 n--;
231 }
233 switch (plugin_instance_format[i]) {
234 case plginst_none:
235 break;
236 case plginst_name:
237 name = virDomainGetName(dom);
238 if (name)
239 strncat(vl->plugin_instance, name, n);
240 break;
241 case plginst_uuid:
242 if (virDomainGetUUIDString(dom, uuid) == 0)
243 strncat(vl->plugin_instance, uuid, n);
244 break;
245 }
246 }
248 vl->plugin_instance[sizeof(vl->plugin_instance) - 1] = '\0';
250 } /* void init_value_list */
252 static void submit(virDomainPtr dom, char const *type,
253 char const *type_instance, value_t *values,
254 size_t values_len) {
255 value_list_t vl = VALUE_LIST_INIT;
256 init_value_list(&vl, dom);
258 vl.values = values;
259 vl.values_len = values_len;
261 sstrncpy(vl.type, type, sizeof(vl.type));
262 if (type_instance != NULL)
263 sstrncpy(vl.type_instance, type_instance, sizeof(vl.type_instance));
265 plugin_dispatch_values(&vl);
266 }
268 static void memory_submit(gauge_t value, virDomainPtr dom) {
269 submit(dom, "memory", "total", &(value_t){.gauge = value}, 1);
270 }
272 static void memory_stats_submit(gauge_t value, virDomainPtr dom,
273 int tag_index) {
274 static const char *tags[] = {"swap_in", "swap_out", "major_fault",
275 "minor_fault", "unused", "available",
276 "actual_balloon", "rss"};
278 if ((tag_index < 0) || (tag_index >= STATIC_ARRAY_SIZE(tags))) {
279 ERROR("virt plugin: Array index out of bounds: tag_index = %d", tag_index);
280 return;
281 }
283 submit(dom, "memory", tags[tag_index], &(value_t){.gauge = value}, 1);
284 }
286 static void cpu_submit(unsigned long long value, virDomainPtr dom,
287 const char *type) {
288 submit(dom, type, NULL, &(value_t){.derive = (derive_t)value}, 1);
289 }
291 static void vcpu_submit(derive_t value, virDomainPtr dom, int vcpu_nr,
292 const char *type) {
293 char type_instance[DATA_MAX_NAME_LEN];
295 ssnprintf(type_instance, sizeof(type_instance), "%d", vcpu_nr);
297 submit(dom, type, type_instance, &(value_t){.derive = value}, 1);
298 }
300 static void submit_derive2(const char *type, derive_t v0, derive_t v1,
301 virDomainPtr dom, const char *devname) {
302 value_t values[] = {
303 {.derive = v0}, {.derive = v1},
304 };
306 submit(dom, type, devname, values, STATIC_ARRAY_SIZE(values));
307 } /* void submit_derive2 */
309 static int lv_config(const char *key, const char *value) {
310 if (virInitialize() != 0)
311 return 1;
313 if (il_domains == NULL)
314 il_domains = ignorelist_create(1);
315 if (il_block_devices == NULL)
316 il_block_devices = ignorelist_create(1);
317 if (il_interface_devices == NULL)
318 il_interface_devices = ignorelist_create(1);
320 if (strcasecmp(key, "Connection") == 0) {
321 char *tmp = strdup(value);
322 if (tmp == NULL) {
323 ERROR(PLUGIN_NAME " plugin: Connection strdup failed.");
324 return 1;
325 }
326 sfree(conn_string);
327 conn_string = tmp;
328 return 0;
329 }
331 if (strcasecmp(key, "RefreshInterval") == 0) {
332 char *eptr = NULL;
333 interval = strtol(value, &eptr, 10);
334 if (eptr == NULL || *eptr != '\0')
335 return 1;
336 return 0;
337 }
339 if (strcasecmp(key, "Domain") == 0) {
340 if (ignorelist_add(il_domains, value))
341 return 1;
342 return 0;
343 }
344 if (strcasecmp(key, "BlockDevice") == 0) {
345 if (ignorelist_add(il_block_devices, value))
346 return 1;
347 return 0;
348 }
350 if (strcasecmp(key, "BlockDeviceFormat") == 0) {
351 if (strcasecmp(value, "target") == 0)
352 blockdevice_format = target;
353 else if (strcasecmp(value, "source") == 0)
354 blockdevice_format = source;
355 else {
356 ERROR(PLUGIN_NAME " plugin: unknown BlockDeviceFormat: %s", value);
357 return -1;
358 }
359 return 0;
360 }
361 if (strcasecmp(key, "BlockDeviceFormatBasename") == 0) {
362 blockdevice_format_basename = IS_TRUE(value);
363 return 0;
364 }
365 if (strcasecmp(key, "InterfaceDevice") == 0) {
366 if (ignorelist_add(il_interface_devices, value))
367 return 1;
368 return 0;
369 }
371 if (strcasecmp(key, "IgnoreSelected") == 0) {
372 if (IS_TRUE(value)) {
373 ignorelist_set_invert(il_domains, 0);
374 ignorelist_set_invert(il_block_devices, 0);
375 ignorelist_set_invert(il_interface_devices, 0);
376 } else {
377 ignorelist_set_invert(il_domains, 1);
378 ignorelist_set_invert(il_block_devices, 1);
379 ignorelist_set_invert(il_interface_devices, 1);
380 }
381 return 0;
382 }
384 if (strcasecmp(key, "HostnameFormat") == 0) {
385 char *value_copy;
386 char *fields[HF_MAX_FIELDS];
387 int n;
389 value_copy = strdup(value);
390 if (value_copy == NULL) {
391 ERROR(PLUGIN_NAME " plugin: strdup failed.");
392 return -1;
393 }
395 n = strsplit(value_copy, fields, HF_MAX_FIELDS);
396 if (n < 1) {
397 sfree(value_copy);
398 ERROR(PLUGIN_NAME " plugin: HostnameFormat: no fields");
399 return -1;
400 }
402 for (int i = 0; i < n; ++i) {
403 if (strcasecmp(fields[i], "hostname") == 0)
404 hostname_format[i] = hf_hostname;
405 else if (strcasecmp(fields[i], "name") == 0)
406 hostname_format[i] = hf_name;
407 else if (strcasecmp(fields[i], "uuid") == 0)
408 hostname_format[i] = hf_uuid;
409 else {
410 ERROR(PLUGIN_NAME " plugin: unknown HostnameFormat field: %s",
411 fields[i]);
412 sfree(value_copy);
413 return -1;
414 }
415 }
416 sfree(value_copy);
418 for (int i = n; i < HF_MAX_FIELDS; ++i)
419 hostname_format[i] = hf_none;
421 return 0;
422 }
424 if (strcasecmp(key, "PluginInstanceFormat") == 0) {
425 char *value_copy;
426 char *fields[PLGINST_MAX_FIELDS];
427 int n;
429 value_copy = strdup(value);
430 if (value_copy == NULL) {
431 ERROR(PLUGIN_NAME " plugin: strdup failed.");
432 return -1;
433 }
435 n = strsplit(value_copy, fields, PLGINST_MAX_FIELDS);
436 if (n < 1) {
437 sfree(value_copy);
438 ERROR(PLUGIN_NAME " plugin: PluginInstanceFormat: no fields");
439 return -1;
440 }
442 for (int i = 0; i < n; ++i) {
443 if (strcasecmp(fields[i], "none") == 0) {
444 plugin_instance_format[i] = plginst_none;
445 break;
446 } else if (strcasecmp(fields[i], "name") == 0)
447 plugin_instance_format[i] = plginst_name;
448 else if (strcasecmp(fields[i], "uuid") == 0)
449 plugin_instance_format[i] = plginst_uuid;
450 else {
451 ERROR(PLUGIN_NAME " plugin: unknown PluginInstanceFormat field: %s",
452 fields[i]);
453 sfree(value_copy);
454 return -1;
455 }
456 }
457 sfree(value_copy);
459 for (int i = n; i < PLGINST_MAX_FIELDS; ++i)
460 plugin_instance_format[i] = plginst_none;
462 return 0;
463 }
465 if (strcasecmp(key, "InterfaceFormat") == 0) {
466 if (strcasecmp(value, "name") == 0)
467 interface_format = if_name;
468 else if (strcasecmp(value, "address") == 0)
469 interface_format = if_address;
470 else if (strcasecmp(value, "number") == 0)
471 interface_format = if_number;
472 else {
473 ERROR(PLUGIN_NAME " plugin: unknown InterfaceFormat: %s", value);
474 return -1;
475 }
476 return 0;
477 }
479 if (strcasecmp(key, "Instances") == 0) {
480 char *eptr = NULL;
481 long val = strtol(value, &eptr, 10);
482 if (eptr == NULL || *eptr != '\0')
483 return 1;
484 if (val <= 0) {
485 ERROR(PLUGIN_NAME " plugin: Instances <= 0 makes no sense.");
486 return 1;
487 }
488 if (val > NR_INSTANCES_MAX) {
489 ERROR(PLUGIN_NAME " plugin: Instances=%li > NR_INSTANCES_MAX=%i"
490 " use a lower setting or recompile the plugin.",
491 val, NR_INSTANCES_MAX);
492 return 1;
493 }
494 nr_instances = (int)val;
495 return 0;
496 }
498 /* Unrecognised option. */
499 return -1;
500 }
502 static int lv_read(user_data_t *ud) {
503 time_t t;
504 struct lv_read_instance *inst = NULL;
505 struct lv_read_state *state = NULL;
506 if (ud->data == NULL) {
507 ERROR(PLUGIN_NAME " plugin: NULL userdata");
508 return -1;
509 }
511 inst = ud->data;
512 state = &inst->read_state;
514 if (inst->id == 0 && conn == NULL) {
515 /* `conn_string == NULL' is acceptable. */
516 conn = virConnectOpenReadOnly(conn_string);
517 if (conn == NULL) {
518 c_complain(LOG_ERR, &conn_complain,
519 PLUGIN_NAME " plugin: Unable to connect: "
520 "virConnectOpenReadOnly failed.");
521 return -1;
522 }
523 }
524 c_release(LOG_NOTICE, &conn_complain,
525 PLUGIN_NAME " plugin: Connection established.");
527 time(&t);
529 /* Need to refresh domain or device lists? */
530 if ((last_refresh == (time_t)0) ||
531 ((interval > 0) && ((last_refresh + interval) <= t))) {
532 if (refresh_lists(inst) != 0) {
533 if (conn != NULL)
534 virConnectClose(conn);
535 conn = NULL;
536 return -1;
537 }
538 last_refresh = t;
539 }
541 #if 0
542 for (int i = 0; i < nr_domains; ++i)
543 fprintf (stderr, "domain %s\n", virDomainGetName (domains[i]));
544 for (int i = 0; i < nr_block_devices; ++i)
545 fprintf (stderr, "block device %d %s:%s\n",
546 i, virDomainGetName (block_devices[i].dom),
547 block_devices[i].path);
548 for (int i = 0; i < nr_interface_devices; ++i)
549 fprintf (stderr, "interface device %d %s:%s\n",
550 i, virDomainGetName (interface_devices[i].dom),
551 interface_devices[i].path);
552 #endif
554 /* Get CPU usage, memory, VCPU usage for each domain. */
555 for (int i = 0; i < state->nr_domains; ++i) {
556 virDomainInfo info;
557 virVcpuInfoPtr vinfo = NULL;
558 virDomainMemoryStatPtr minfo = NULL;
559 int status;
561 status = virDomainGetInfo(state->domains[i], &info);
562 if (status != 0) {
563 ERROR(PLUGIN_NAME " plugin: virDomainGetInfo failed with status %i.",
564 status);
565 continue;
566 }
568 if (info.state != VIR_DOMAIN_RUNNING) {
569 /* only gather stats for running domains */
570 continue;
571 }
573 cpu_submit(info.cpuTime, state->domains[i], "virt_cpu_total");
574 memory_submit((gauge_t)info.memory * 1024, state->domains[i]);
576 vinfo = malloc(info.nrVirtCpu * sizeof(vinfo[0]));
577 if (vinfo == NULL) {
578 ERROR(PLUGIN_NAME " plugin: malloc failed.");
579 continue;
580 }
582 status = virDomainGetVcpus(state->domains[i], vinfo, info.nrVirtCpu,
583 /* cpu map = */ NULL, /* cpu map length = */ 0);
584 if (status < 0) {
585 ERROR(PLUGIN_NAME " plugin: virDomainGetVcpus failed with status %i.",
586 status);
587 sfree(vinfo);
588 continue;
589 }
591 for (int j = 0; j < info.nrVirtCpu; ++j)
592 vcpu_submit(vinfo[j].cpuTime, state->domains[i], vinfo[j].number,
593 "virt_vcpu");
595 sfree(vinfo);
597 minfo =
598 malloc(VIR_DOMAIN_MEMORY_STAT_NR * sizeof(virDomainMemoryStatStruct));
599 if (minfo == NULL) {
600 ERROR("virt plugin: malloc failed.");
601 continue;
602 }
604 status = virDomainMemoryStats(state->domains[i], minfo,
605 VIR_DOMAIN_MEMORY_STAT_NR, 0);
607 if (status < 0) {
608 ERROR("virt plugin: virDomainMemoryStats failed with status %i.", status);
609 sfree(minfo);
610 continue;
611 }
613 for (int j = 0; j < status; j++) {
614 memory_stats_submit((gauge_t)minfo[j].val * 1024, state->domains[i],
615 minfo[j].tag);
616 }
618 sfree(minfo);
619 }
621 /* Get block device stats for each domain. */
622 for (int i = 0; i < state->nr_block_devices; ++i) {
623 struct _virDomainBlockStats stats;
625 if (virDomainBlockStats(state->block_devices[i].dom,
626 state->block_devices[i].path, &stats,
627 sizeof stats) != 0)
628 continue;
630 char *type_instance = NULL;
631 if (blockdevice_format_basename && blockdevice_format == source)
632 type_instance = strdup(basename(state->block_devices[i].path));
633 else
634 type_instance = strdup(state->block_devices[i].path);
636 if ((stats.rd_req != -1) && (stats.wr_req != -1))
637 submit_derive2("disk_ops", (derive_t)stats.rd_req, (derive_t)stats.wr_req,
638 state->block_devices[i].dom, type_instance);
640 if ((stats.rd_bytes != -1) && (stats.wr_bytes != -1))
641 submit_derive2("disk_octets", (derive_t)stats.rd_bytes,
642 (derive_t)stats.wr_bytes, state->block_devices[i].dom,
643 type_instance);
645 sfree(type_instance);
646 } /* for (nr_block_devices) */
648 /* Get interface stats for each domain. */
649 for (int i = 0; i < state->nr_interface_devices; ++i) {
650 struct _virDomainInterfaceStats stats;
651 char *display_name = NULL;
653 switch (interface_format) {
654 case if_address:
655 display_name = state->interface_devices[i].address;
656 break;
657 case if_number:
658 display_name = state->interface_devices[i].number;
659 break;
660 case if_name:
661 default:
662 display_name = state->interface_devices[i].path;
663 }
665 if (virDomainInterfaceStats(state->interface_devices[i].dom,
666 state->interface_devices[i].path, &stats,
667 sizeof stats) != 0)
668 continue;
670 if ((stats.rx_bytes != -1) && (stats.tx_bytes != -1))
671 submit_derive2("if_octets", (derive_t)stats.rx_bytes,
672 (derive_t)stats.tx_bytes, state->interface_devices[i].dom,
673 display_name);
675 if ((stats.rx_packets != -1) && (stats.tx_packets != -1))
676 submit_derive2("if_packets", (derive_t)stats.rx_packets,
677 (derive_t)stats.tx_packets,
678 state->interface_devices[i].dom, display_name);
680 if ((stats.rx_errs != -1) && (stats.tx_errs != -1))
681 submit_derive2("if_errors", (derive_t)stats.rx_errs,
682 (derive_t)stats.tx_errs, state->interface_devices[i].dom,
683 display_name);
685 if ((stats.rx_drop != -1) && (stats.tx_drop != -1))
686 submit_derive2("if_dropped", (derive_t)stats.rx_drop,
687 (derive_t)stats.tx_drop, state->interface_devices[i].dom,
688 display_name);
689 } /* for (nr_interface_devices) */
691 return 0;
692 }
694 static int lv_init_instance(size_t i, plugin_read_cb callback) {
695 struct lv_user_data *lv_ud = &(lv_read_user_data[i]);
696 struct lv_read_instance *inst = &lv_ud->inst;
698 memset(lv_ud, 0, sizeof(*lv_ud));
700 ssnprintf(inst->tag, sizeof(inst->tag), "%s-%zu", PLUGIN_NAME, i);
701 inst->id = i;
703 user_data_t *ud = &lv_ud->ud;
704 ud->data = inst;
705 ud->free_func = NULL;
707 INFO(PLUGIN_NAME "plugin: reader %s initialized", inst->tag);
708 return plugin_register_complex_read(NULL, inst->tag, callback, 0, ud);
709 }
711 static int lv_init(void) {
712 if (virInitialize() != 0)
713 return -1;
715 for (int i = 0; i < nr_instances; ++i)
716 lv_init_instance(i, lv_read);
718 return 0;
719 }
721 static int lv_domain_get_tag(xmlXPathContextPtr xpath_ctx, const char *dom_name,
722 char *dom_tag) {
723 char xpath_str[BUFFER_MAX_LEN] = {'\0'};
724 xmlXPathObjectPtr xpath_obj = NULL;
725 xmlNodePtr xml_node = NULL;
726 int err = -1;
728 err = xmlXPathRegisterNs(xpath_ctx,
729 (const xmlChar *)METADATA_VM_PARTITION_PREFIX,
730 (const xmlChar *)METADATA_VM_PARTITION_URI);
731 if (err) {
732 ERROR(PLUGIN_NAME " plugin: xmlXpathRegisterNs(%s, %s) failed on domain %s",
733 METADATA_VM_PARTITION_PREFIX, METADATA_VM_PARTITION_URI, dom_name);
734 goto done;
735 }
737 ssnprintf(xpath_str, sizeof(xpath_str), "/domain/metadata/%s:%s/text()",
738 METADATA_VM_PARTITION_PREFIX, METADATA_VM_PARTITION_ELEMENT);
739 xpath_obj = xmlXPathEvalExpression((xmlChar *)xpath_str, xpath_ctx);
740 if (xpath_obj == NULL) {
741 ERROR(PLUGIN_NAME " plugin: xmlXPathEval(%s) failed on domain %s",
742 xpath_str, dom_name);
743 goto done;
744 }
746 if (xpath_obj->type != XPATH_NODESET) {
747 ERROR(PLUGIN_NAME " plugin: xmlXPathEval(%s) unexpected return type %d "
748 "(wanted %d) on domain %s",
749 xpath_str, xpath_obj->type, XPATH_NODESET, dom_name);
750 goto done;
751 }
753 /*
754 * from now on there is no real error, it's ok if a domain
755 * doesn't have the metadata partition tag.
756 */
757 err = 0;
759 if (xpath_obj->nodesetval == NULL || xpath_obj->nodesetval->nodeNr != 1) {
760 DEBUG(PLUGIN_NAME " plugin: xmlXPathEval(%s) return nodeset size=%i "
761 "expected=1 on domain %s",
762 xpath_str,
763 (xpath_obj->nodesetval == NULL) ? 0 : xpath_obj->nodesetval->nodeNr,
764 dom_name);
765 } else {
766 xml_node = xpath_obj->nodesetval->nodeTab[0];
767 sstrncpy(dom_tag, (const char *)xml_node->content, PARTITION_TAG_MAX_LEN);
768 }
770 done:
771 if (xpath_obj)
772 xmlXPathFreeObject(xpath_obj);
774 return err;
775 }
777 static int is_known_tag(const char *dom_tag) {
778 for (int i = 0; i < nr_instances; ++i)
779 if (!strcmp(dom_tag, lv_read_user_data[i].inst.tag))
780 return 1;
781 return 0;
782 }
784 static int lv_instance_include_domain(struct lv_read_instance *inst,
785 const char *dom_name,
786 const char *dom_tag) {
787 if ((dom_tag[0] != '\0') && (strcmp(dom_tag, inst->tag) == 0))
788 return 1;
790 /* instance#0 will always be there, so it is in charge of extra duties */
791 if (inst->id == 0) {
792 if (dom_tag[0] == '\0' || !is_known_tag(dom_tag)) {
793 DEBUG(PLUGIN_NAME " plugin#%s: adopted domain %s "
794 "with unknown tag '%s'",
795 inst->tag, dom_name, dom_tag);
796 return 1;
797 }
798 }
800 return 0;
801 }
803 static int refresh_lists(struct lv_read_instance *inst) {
804 int n;
806 n = virConnectNumOfDomains(conn);
807 if (n < 0) {
808 VIRT_ERROR(conn, "reading number of domains");
809 return -1;
810 }
812 if (n > 0) {
813 struct lv_read_state *state = &inst->read_state;
814 int *domids;
816 /* Get list of domains. */
817 domids = malloc(sizeof(*domids) * n);
818 if (domids == NULL) {
819 ERROR(PLUGIN_NAME " plugin: malloc failed.");
820 return -1;
821 }
823 n = virConnectListDomains(conn, domids, n);
824 if (n < 0) {
825 VIRT_ERROR(conn, "reading list of domains");
826 sfree(domids);
827 return -1;
828 }
830 free_block_devices(state);
831 free_interface_devices(state);
832 free_domains(state);
834 /* Fetch each domain and add it to the list, unless ignore. */
835 for (int i = 0; i < n; ++i) {
836 virDomainPtr dom = NULL;
837 const char *name;
838 char *xml = NULL;
839 xmlDocPtr xml_doc = NULL;
840 xmlXPathContextPtr xpath_ctx = NULL;
841 xmlXPathObjectPtr xpath_obj = NULL;
842 char tag[PARTITION_TAG_MAX_LEN];
844 dom = virDomainLookupByID(conn, domids[i]);
845 if (dom == NULL) {
846 VIRT_ERROR(conn, "virDomainLookupByID");
847 /* Could be that the domain went away -- ignore it anyway. */
848 continue;
849 }
851 name = virDomainGetName(dom);
852 if (name == NULL) {
853 VIRT_ERROR(conn, "virDomainGetName");
854 goto cont;
855 }
857 if (il_domains && ignorelist_match(il_domains, name) != 0)
858 goto cont;
860 /* Get a list of devices for this domain. */
861 xml = virDomainGetXMLDesc(dom, 0);
862 if (!xml) {
863 VIRT_ERROR(conn, "virDomainGetXMLDesc");
864 goto cont;
865 }
867 /* Yuck, XML. Parse out the devices. */
868 xml_doc = xmlReadDoc((xmlChar *)xml, NULL, NULL, XML_PARSE_NONET);
869 if (xml_doc == NULL) {
870 VIRT_ERROR(conn, "xmlReadDoc");
871 goto cont;
872 }
874 xpath_ctx = xmlXPathNewContext(xml_doc);
876 if (lv_domain_get_tag(xpath_ctx, name, tag) < 0) {
877 ERROR(PLUGIN_NAME " plugin: lv_domain_get_tag failed.");
878 goto cont;
879 }
881 if (!lv_instance_include_domain(inst, name, tag))
882 goto cont;
884 if (add_domain(state, dom) < 0) {
885 ERROR(PLUGIN_NAME " plugin: malloc failed.");
886 goto cont;
887 }
889 /* Block devices. */
890 char *bd_xmlpath = "/domain/devices/disk/target[@dev]";
891 if (blockdevice_format == source)
892 bd_xmlpath = "/domain/devices/disk/source[@dev]";
893 xpath_obj = xmlXPathEval((xmlChar *)bd_xmlpath, xpath_ctx);
895 if (xpath_obj == NULL || xpath_obj->type != XPATH_NODESET ||
896 xpath_obj->nodesetval == NULL)
897 goto cont;
899 for (int j = 0; j < xpath_obj->nodesetval->nodeNr; ++j) {
900 xmlNodePtr node;
901 char *path = NULL;
903 node = xpath_obj->nodesetval->nodeTab[j];
904 if (!node)
905 continue;
906 path = (char *)xmlGetProp(node, (xmlChar *)"dev");
907 if (!path)
908 continue;
910 if (il_block_devices &&
911 ignore_device_match(il_block_devices, name, path) != 0)
912 goto cont2;
914 add_block_device(state, dom, path);
915 cont2:
916 if (path)
917 xmlFree(path);
918 }
919 xmlXPathFreeObject(xpath_obj);
921 /* Network interfaces. */
922 xpath_obj = xmlXPathEval(
923 (xmlChar *)"/domain/devices/interface[target[@dev]]", xpath_ctx);
924 if (xpath_obj == NULL || xpath_obj->type != XPATH_NODESET ||
925 xpath_obj->nodesetval == NULL)
926 goto cont;
928 xmlNodeSetPtr xml_interfaces = xpath_obj->nodesetval;
930 for (int j = 0; j < xml_interfaces->nodeNr; ++j) {
931 char *path = NULL;
932 char *address = NULL;
933 xmlNodePtr xml_interface;
935 xml_interface = xml_interfaces->nodeTab[j];
936 if (!xml_interface)
937 continue;
939 for (xmlNodePtr child = xml_interface->children; child;
940 child = child->next) {
941 if (child->type != XML_ELEMENT_NODE)
942 continue;
944 if (xmlStrEqual(child->name, (const xmlChar *)"target")) {
945 path = (char *)xmlGetProp(child, (const xmlChar *)"dev");
946 if (!path)
947 continue;
948 } else if (xmlStrEqual(child->name, (const xmlChar *)"mac")) {
949 address = (char *)xmlGetProp(child, (const xmlChar *)"address");
950 if (!address)
951 continue;
952 }
953 }
955 if (il_interface_devices &&
956 (ignore_device_match(il_interface_devices, name, path) != 0 ||
957 ignore_device_match(il_interface_devices, name, address) != 0))
958 goto cont3;
960 add_interface_device(state, dom, path, address, j + 1);
961 cont3:
962 if (path)
963 xmlFree(path);
964 if (address)
965 xmlFree(address);
966 }
968 cont:
969 if (xpath_obj)
970 xmlXPathFreeObject(xpath_obj);
971 if (xpath_ctx)
972 xmlXPathFreeContext(xpath_ctx);
973 if (xml_doc)
974 xmlFreeDoc(xml_doc);
975 sfree(xml);
976 }
978 sfree(domids);
979 }
981 return 0;
982 }
984 static void free_domains(struct lv_read_state *state) {
985 if (state->domains) {
986 for (int i = 0; i < state->nr_domains; ++i)
987 virDomainFree(state->domains[i]);
988 sfree(state->domains);
989 }
990 state->domains = NULL;
991 state->nr_domains = 0;
992 }
994 static int add_domain(struct lv_read_state *state, virDomainPtr dom) {
995 virDomainPtr *new_ptr;
996 int new_size = sizeof(state->domains[0]) * (state->nr_domains + 1);
998 if (state->domains)
999 new_ptr = realloc(state->domains, new_size);
1000 else
1001 new_ptr = malloc(new_size);
1003 if (new_ptr == NULL)
1004 return -1;
1006 state->domains = new_ptr;
1007 state->domains[state->nr_domains] = dom;
1008 return state->nr_domains++;
1009 }
1011 static void free_block_devices(struct lv_read_state *state) {
1012 if (state->block_devices) {
1013 for (int i = 0; i < state->nr_block_devices; ++i)
1014 sfree(state->block_devices[i].path);
1015 sfree(state->block_devices);
1016 }
1017 state->block_devices = NULL;
1018 state->nr_block_devices = 0;
1019 }
1021 static int add_block_device(struct lv_read_state *state, virDomainPtr dom,
1022 const char *path) {
1023 struct block_device *new_ptr;
1024 int new_size =
1025 sizeof(state->block_devices[0]) * (state->nr_block_devices + 1);
1026 char *path_copy;
1028 path_copy = strdup(path);
1029 if (!path_copy)
1030 return -1;
1032 if (state->block_devices)
1033 new_ptr = realloc(state->block_devices, new_size);
1034 else
1035 new_ptr = malloc(new_size);
1037 if (new_ptr == NULL) {
1038 sfree(path_copy);
1039 return -1;
1040 }
1041 state->block_devices = new_ptr;
1042 state->block_devices[state->nr_block_devices].dom = dom;
1043 state->block_devices[state->nr_block_devices].path = path_copy;
1044 return state->nr_block_devices++;
1045 }
1047 static void free_interface_devices(struct lv_read_state *state) {
1048 if (state->interface_devices) {
1049 for (int i = 0; i < state->nr_interface_devices; ++i) {
1050 sfree(state->interface_devices[i].path);
1051 sfree(state->interface_devices[i].address);
1052 sfree(state->interface_devices[i].number);
1053 }
1054 sfree(state->interface_devices);
1055 }
1056 state->interface_devices = NULL;
1057 state->nr_interface_devices = 0;
1058 }
1060 static int add_interface_device(struct lv_read_state *state, virDomainPtr dom,
1061 const char *path, const char *address,
1062 unsigned int number) {
1063 struct interface_device *new_ptr;
1064 int new_size =
1065 sizeof(state->interface_devices[0]) * (state->nr_interface_devices + 1);
1066 char *path_copy, *address_copy, number_string[15];
1068 if ((path == NULL) || (address == NULL))
1069 return EINVAL;
1071 path_copy = strdup(path);
1072 if (!path_copy)
1073 return -1;
1075 address_copy = strdup(address);
1076 if (!address_copy) {
1077 sfree(path_copy);
1078 return -1;
1079 }
1081 snprintf(number_string, sizeof(number_string), "interface-%u", number);
1083 if (state->interface_devices)
1084 new_ptr = realloc(state->interface_devices, new_size);
1085 else
1086 new_ptr = malloc(new_size);
1088 if (new_ptr == NULL) {
1089 sfree(path_copy);
1090 sfree(address_copy);
1091 return -1;
1092 }
1093 state->interface_devices = new_ptr;
1094 state->interface_devices[state->nr_interface_devices].dom = dom;
1095 state->interface_devices[state->nr_interface_devices].path = path_copy;
1096 state->interface_devices[state->nr_interface_devices].address = address_copy;
1097 state->interface_devices[state->nr_interface_devices].number =
1098 strdup(number_string);
1099 return state->nr_interface_devices++;
1100 }
1102 static int ignore_device_match(ignorelist_t *il, const char *domname,
1103 const char *devpath) {
1104 char *name;
1105 int n, r;
1107 if ((domname == NULL) || (devpath == NULL))
1108 return 0;
1110 n = sizeof(char) * (strlen(domname) + strlen(devpath) + 2);
1111 name = malloc(n);
1112 if (name == NULL) {
1113 ERROR(PLUGIN_NAME " plugin: malloc failed.");
1114 return 0;
1115 }
1116 ssnprintf(name, n, "%s:%s", domname, devpath);
1117 r = ignorelist_match(il, name);
1118 sfree(name);
1119 return r;
1120 }
1122 static int lv_shutdown(void) {
1123 for (int i = 0; i < nr_instances; ++i) {
1124 struct lv_read_state *state = &(lv_read_user_data[i].inst.read_state);
1125 free_block_devices(state);
1126 free_interface_devices(state);
1127 free_domains(state);
1128 }
1130 if (conn != NULL)
1131 virConnectClose(conn);
1132 conn = NULL;
1134 ignorelist_free(il_domains);
1135 il_domains = NULL;
1136 ignorelist_free(il_block_devices);
1137 il_block_devices = NULL;
1138 ignorelist_free(il_interface_devices);
1139 il_interface_devices = NULL;
1141 return 0;
1142 }
1144 void module_register(void) {
1145 plugin_register_config(PLUGIN_NAME, lv_config, config_keys, NR_CONFIG_KEYS);
1146 plugin_register_init(PLUGIN_NAME, lv_init);
1147 plugin_register_complex_read(NULL, PLUGIN_NAME, lv_read, 0, NULL);
1148 plugin_register_shutdown(PLUGIN_NAME, lv_shutdown);
1149 }
1151 /*
1152 * vim: shiftwidth=4 tabstop=8 softtabstop=4 expandtab fdm=marker
1153 */