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 size_t 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 = (size_t)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 = ud->data;
505 struct lv_read_state *state = &inst->read_state;
506 if (!inst) {
507 ERROR(PLUGIN_NAME " plugin: NULL userdata");
508 return -1;
509 }
511 if (inst->id == 0 && conn == NULL) {
512 /* `conn_string == NULL' is acceptable. */
513 conn = virConnectOpenReadOnly(conn_string);
514 if (conn == NULL) {
515 c_complain(LOG_ERR, &conn_complain,
516 PLUGIN_NAME " plugin: Unable to connect: "
517 "virConnectOpenReadOnly failed.");
518 return -1;
519 }
520 }
521 c_release(LOG_NOTICE, &conn_complain,
522 PLUGIN_NAME " plugin: Connection established.");
524 time(&t);
526 /* Need to refresh domain or device lists? */
527 if ((last_refresh == (time_t)0) ||
528 ((interval > 0) && ((last_refresh + interval) <= t))) {
529 if (refresh_lists(inst) != 0) {
530 if (conn != NULL)
531 virConnectClose(conn);
532 conn = NULL;
533 return -1;
534 }
535 last_refresh = t;
536 }
538 #if 0
539 for (int i = 0; i < nr_domains; ++i)
540 fprintf (stderr, "domain %s\n", virDomainGetName (domains[i]));
541 for (int i = 0; i < nr_block_devices; ++i)
542 fprintf (stderr, "block device %d %s:%s\n",
543 i, virDomainGetName (block_devices[i].dom),
544 block_devices[i].path);
545 for (int i = 0; i < nr_interface_devices; ++i)
546 fprintf (stderr, "interface device %d %s:%s\n",
547 i, virDomainGetName (interface_devices[i].dom),
548 interface_devices[i].path);
549 #endif
551 /* Get CPU usage, memory, VCPU usage for each domain. */
552 for (int i = 0; i < state->nr_domains; ++i) {
553 virDomainInfo info;
554 virVcpuInfoPtr vinfo = NULL;
555 virDomainMemoryStatPtr minfo = NULL;
556 int status;
558 status = virDomainGetInfo(state->domains[i], &info);
559 if (status != 0) {
560 ERROR(PLUGIN_NAME " plugin: virDomainGetInfo failed with status %i.",
561 status);
562 continue;
563 }
565 if (info.state != VIR_DOMAIN_RUNNING) {
566 /* only gather stats for running domains */
567 continue;
568 }
570 cpu_submit(info.cpuTime, state->domains[i], "virt_cpu_total");
571 memory_submit((gauge_t)info.memory * 1024, state->domains[i]);
573 vinfo = malloc(info.nrVirtCpu * sizeof(vinfo[0]));
574 if (vinfo == NULL) {
575 ERROR(PLUGIN_NAME " plugin: malloc failed.");
576 continue;
577 }
579 status = virDomainGetVcpus(state->domains[i], vinfo, info.nrVirtCpu,
580 /* cpu map = */ NULL, /* cpu map length = */ 0);
581 if (status < 0) {
582 ERROR(PLUGIN_NAME " plugin: virDomainGetVcpus failed with status %i.",
583 status);
584 sfree(vinfo);
585 continue;
586 }
588 for (int j = 0; j < info.nrVirtCpu; ++j)
589 vcpu_submit(vinfo[j].cpuTime, state->domains[i], vinfo[j].number,
590 "virt_vcpu");
592 sfree(vinfo);
594 minfo =
595 malloc(VIR_DOMAIN_MEMORY_STAT_NR * sizeof(virDomainMemoryStatStruct));
596 if (minfo == NULL) {
597 ERROR("virt plugin: malloc failed.");
598 continue;
599 }
601 status = virDomainMemoryStats(state->domains[i], minfo,
602 VIR_DOMAIN_MEMORY_STAT_NR, 0);
604 if (status < 0) {
605 ERROR("virt plugin: virDomainMemoryStats failed with status %i.", status);
606 sfree(minfo);
607 continue;
608 }
610 for (int j = 0; j < status; j++) {
611 memory_stats_submit((gauge_t)minfo[j].val * 1024, state->domains[i],
612 minfo[j].tag);
613 }
615 sfree(minfo);
616 }
618 /* Get block device stats for each domain. */
619 for (int i = 0; i < state->nr_block_devices; ++i) {
620 struct _virDomainBlockStats stats;
622 if (virDomainBlockStats(state->block_devices[i].dom,
623 state->block_devices[i].path, &stats,
624 sizeof stats) != 0)
625 continue;
627 char *type_instance = NULL;
628 if (blockdevice_format_basename && blockdevice_format == source)
629 type_instance = strdup(basename(state->block_devices[i].path));
630 else
631 type_instance = strdup(state->block_devices[i].path);
633 if ((stats.rd_req != -1) && (stats.wr_req != -1))
634 submit_derive2("disk_ops", (derive_t)stats.rd_req, (derive_t)stats.wr_req,
635 state->block_devices[i].dom, type_instance);
637 if ((stats.rd_bytes != -1) && (stats.wr_bytes != -1))
638 submit_derive2("disk_octets", (derive_t)stats.rd_bytes,
639 (derive_t)stats.wr_bytes, state->block_devices[i].dom,
640 type_instance);
642 sfree(type_instance);
643 } /* for (nr_block_devices) */
645 /* Get interface stats for each domain. */
646 for (int i = 0; i < state->nr_interface_devices; ++i) {
647 struct _virDomainInterfaceStats stats;
648 char *display_name = NULL;
650 switch (interface_format) {
651 case if_address:
652 display_name = state->interface_devices[i].address;
653 break;
654 case if_number:
655 display_name = state->interface_devices[i].number;
656 break;
657 case if_name:
658 default:
659 display_name = state->interface_devices[i].path;
660 }
662 if (virDomainInterfaceStats(state->interface_devices[i].dom,
663 state->interface_devices[i].path, &stats,
664 sizeof stats) != 0)
665 continue;
667 if ((stats.rx_bytes != -1) && (stats.tx_bytes != -1))
668 submit_derive2("if_octets", (derive_t)stats.rx_bytes,
669 (derive_t)stats.tx_bytes, state->interface_devices[i].dom,
670 display_name);
672 if ((stats.rx_packets != -1) && (stats.tx_packets != -1))
673 submit_derive2("if_packets", (derive_t)stats.rx_packets,
674 (derive_t)stats.tx_packets,
675 state->interface_devices[i].dom, display_name);
677 if ((stats.rx_errs != -1) && (stats.tx_errs != -1))
678 submit_derive2("if_errors", (derive_t)stats.rx_errs,
679 (derive_t)stats.tx_errs, state->interface_devices[i].dom,
680 display_name);
682 if ((stats.rx_drop != -1) && (stats.tx_drop != -1))
683 submit_derive2("if_dropped", (derive_t)stats.rx_drop,
684 (derive_t)stats.tx_drop, state->interface_devices[i].dom,
685 display_name);
686 } /* for (nr_interface_devices) */
688 return 0;
689 }
691 static int lv_init_instance(size_t i, plugin_read_cb callback) {
692 struct lv_user_data *lv_ud = &(lv_read_user_data[i]);
693 struct lv_read_instance *inst = &lv_ud->inst;
695 memset(lv_ud, 0, sizeof(*lv_ud));
697 ssnprintf(inst->tag, sizeof(inst->tag), "%s-%zu", PLUGIN_NAME, i);
698 inst->id = i;
700 user_data_t *ud = &lv_ud->ud;
701 ud->data = inst;
702 ud->free_func = NULL;
704 INFO(PLUGIN_NAME "plugin: reader %s initialized", inst->tag);
705 return plugin_register_complex_read(NULL, inst->tag, callback, 0, ud);
706 }
708 static int lv_init(void) {
709 if (virInitialize() != 0)
710 return -1;
712 for (size_t i = 0; i < nr_instances; ++i)
713 lv_init_instance(i, lv_read);
715 return 0;
716 }
718 static int lv_domain_get_tag(xmlXPathContextPtr xpath_ctx, const char *dom_name,
719 char *dom_tag) {
720 char xpath_str[BUFFER_MAX_LEN] = {'\0'};
721 xmlXPathObjectPtr xpath_obj = NULL;
722 xmlNodePtr xml_node = NULL;
723 int err = -1;
725 err = xmlXPathRegisterNs(xpath_ctx,
726 (const xmlChar *)METADATA_VM_PARTITION_PREFIX,
727 (const xmlChar *)METADATA_VM_PARTITION_URI);
728 if (err) {
729 ERROR(PLUGIN_NAME " plugin: xmlXpathRegisterNs(%s, %s) failed on domain %s",
730 METADATA_VM_PARTITION_PREFIX, METADATA_VM_PARTITION_URI, dom_name);
731 goto done;
732 }
734 ssnprintf(xpath_str, sizeof(xpath_str), "/domain/metadata/%s:%s/text()",
735 METADATA_VM_PARTITION_PREFIX, METADATA_VM_PARTITION_ELEMENT);
736 xpath_obj = xmlXPathEvalExpression((xmlChar *)xpath_str, xpath_ctx);
737 if (xpath_obj == NULL) {
738 ERROR(PLUGIN_NAME " plugin: xmlXPathEval(%s) failed on domain %s",
739 xpath_str, dom_name);
740 goto done;
741 }
743 if (xpath_obj->type != XPATH_NODESET) {
744 ERROR(PLUGIN_NAME " plugin: xmlXPathEval(%s) unexpected return type %d "
745 "(wanted %d) on domain %s",
746 xpath_str, xpath_obj->type, XPATH_NODESET, dom_name);
747 goto done;
748 }
750 /*
751 * from now on there is no real error, it's ok if a domain
752 * doesn't have the metadata partition tag.
753 */
754 err = 0;
756 if (xpath_obj->nodesetval == NULL || xpath_obj->nodesetval->nodeNr != 1) {
757 DEBUG(PLUGIN_NAME " plugin: xmlXPathEval(%s) return nodeset size=%i "
758 "expected=1 on domain %s",
759 xpath_str,
760 (xpath_obj->nodesetval == NULL) ? 0 : xpath_obj->nodesetval->nodeNr,
761 dom_name);
762 } else {
763 xml_node = xpath_obj->nodesetval->nodeTab[0];
764 sstrncpy(dom_tag, (const char *)xml_node->content, PARTITION_TAG_MAX_LEN);
765 }
767 done:
768 if (xpath_obj)
769 xmlXPathFreeObject(xpath_obj);
771 return err;
772 }
774 static int is_known_tag(const char *dom_tag) {
775 for (size_t i = 0; i < nr_instances; ++i)
776 if (!strcmp(dom_tag, lv_read_user_data[i].inst.tag))
777 return 1;
778 return 0;
779 }
781 static int lv_instance_include_domain(struct lv_read_instance *inst,
782 const char *dom_name,
783 const char *dom_tag) {
784 if ((dom_tag[0] != '\0') && (strcmp(dom_tag, inst->tag) == 0))
785 return 1;
787 /* instance#0 will always be there, so it is in charge of extra duties */
788 if (inst->id == 0) {
789 if (dom_tag[0] == '\0' || !is_known_tag(dom_tag)) {
790 DEBUG(PLUGIN_NAME " plugin#%s: adopted domain %s "
791 "with unknown tag '%s'",
792 inst->tag, dom_name, dom_tag);
793 return 1;
794 }
795 }
797 return 0;
798 }
800 static int refresh_lists(struct lv_read_instance *inst) {
801 int n;
803 n = virConnectNumOfDomains(conn);
804 if (n < 0) {
805 VIRT_ERROR(conn, "reading number of domains");
806 return -1;
807 }
809 if (n > 0) {
810 struct lv_read_state *state = &inst->read_state;
811 int *domids;
813 /* Get list of domains. */
814 domids = malloc(sizeof(*domids) * n);
815 if (domids == NULL) {
816 ERROR(PLUGIN_NAME " plugin: malloc failed.");
817 return -1;
818 }
820 n = virConnectListDomains(conn, domids, n);
821 if (n < 0) {
822 VIRT_ERROR(conn, "reading list of domains");
823 sfree(domids);
824 return -1;
825 }
827 free_block_devices(state);
828 free_interface_devices(state);
829 free_domains(state);
831 /* Fetch each domain and add it to the list, unless ignore. */
832 for (int i = 0; i < n; ++i) {
833 virDomainPtr dom = NULL;
834 const char *name;
835 char *xml = NULL;
836 xmlDocPtr xml_doc = NULL;
837 xmlXPathContextPtr xpath_ctx = NULL;
838 xmlXPathObjectPtr xpath_obj = NULL;
839 char tag[PARTITION_TAG_MAX_LEN];
841 dom = virDomainLookupByID(conn, domids[i]);
842 if (dom == NULL) {
843 VIRT_ERROR(conn, "virDomainLookupByID");
844 /* Could be that the domain went away -- ignore it anyway. */
845 continue;
846 }
848 name = virDomainGetName(dom);
849 if (name == NULL) {
850 VIRT_ERROR(conn, "virDomainGetName");
851 goto cont;
852 }
854 if (il_domains && ignorelist_match(il_domains, name) != 0)
855 goto cont;
857 /* Get a list of devices for this domain. */
858 xml = virDomainGetXMLDesc(dom, 0);
859 if (!xml) {
860 VIRT_ERROR(conn, "virDomainGetXMLDesc");
861 goto cont;
862 }
864 /* Yuck, XML. Parse out the devices. */
865 xml_doc = xmlReadDoc((xmlChar *)xml, NULL, NULL, XML_PARSE_NONET);
866 if (xml_doc == NULL) {
867 VIRT_ERROR(conn, "xmlReadDoc");
868 goto cont;
869 }
871 xpath_ctx = xmlXPathNewContext(xml_doc);
873 if (lv_domain_get_tag(xpath_ctx, name, tag) < 0) {
874 ERROR(PLUGIN_NAME " plugin: lv_domain_get_tag failed.");
875 goto cont;
876 }
878 if (!lv_instance_include_domain(inst, name, tag))
879 goto cont;
881 if (add_domain(state, dom) < 0) {
882 ERROR(PLUGIN_NAME " plugin: malloc failed.");
883 goto cont;
884 }
886 /* Block devices. */
887 char *bd_xmlpath = "/domain/devices/disk/target[@dev]";
888 if (blockdevice_format == source)
889 bd_xmlpath = "/domain/devices/disk/source[@dev]";
890 xpath_obj = xmlXPathEval((xmlChar *)bd_xmlpath, xpath_ctx);
892 if (xpath_obj == NULL || xpath_obj->type != XPATH_NODESET ||
893 xpath_obj->nodesetval == NULL)
894 goto cont;
896 for (int j = 0; j < xpath_obj->nodesetval->nodeNr; ++j) {
897 xmlNodePtr node;
898 char *path = NULL;
900 node = xpath_obj->nodesetval->nodeTab[j];
901 if (!node)
902 continue;
903 path = (char *)xmlGetProp(node, (xmlChar *)"dev");
904 if (!path)
905 continue;
907 if (il_block_devices &&
908 ignore_device_match(il_block_devices, name, path) != 0)
909 goto cont2;
911 add_block_device(state, dom, path);
912 cont2:
913 if (path)
914 xmlFree(path);
915 }
916 xmlXPathFreeObject(xpath_obj);
918 /* Network interfaces. */
919 xpath_obj = xmlXPathEval(
920 (xmlChar *)"/domain/devices/interface[target[@dev]]", xpath_ctx);
921 if (xpath_obj == NULL || xpath_obj->type != XPATH_NODESET ||
922 xpath_obj->nodesetval == NULL)
923 goto cont;
925 xmlNodeSetPtr xml_interfaces = xpath_obj->nodesetval;
927 for (int j = 0; j < xml_interfaces->nodeNr; ++j) {
928 char *path = NULL;
929 char *address = NULL;
930 xmlNodePtr xml_interface;
932 xml_interface = xml_interfaces->nodeTab[j];
933 if (!xml_interface)
934 continue;
936 for (xmlNodePtr child = xml_interface->children; child;
937 child = child->next) {
938 if (child->type != XML_ELEMENT_NODE)
939 continue;
941 if (xmlStrEqual(child->name, (const xmlChar *)"target")) {
942 path = (char *)xmlGetProp(child, (const xmlChar *)"dev");
943 if (!path)
944 continue;
945 } else if (xmlStrEqual(child->name, (const xmlChar *)"mac")) {
946 address = (char *)xmlGetProp(child, (const xmlChar *)"address");
947 if (!address)
948 continue;
949 }
950 }
952 if (il_interface_devices &&
953 (ignore_device_match(il_interface_devices, name, path) != 0 ||
954 ignore_device_match(il_interface_devices, name, address) != 0))
955 goto cont3;
957 add_interface_device(state, dom, path, address, j + 1);
958 cont3:
959 if (path)
960 xmlFree(path);
961 if (address)
962 xmlFree(address);
963 }
965 cont:
966 if (xpath_obj)
967 xmlXPathFreeObject(xpath_obj);
968 if (xpath_ctx)
969 xmlXPathFreeContext(xpath_ctx);
970 if (xml_doc)
971 xmlFreeDoc(xml_doc);
972 sfree(xml);
973 }
975 sfree(domids);
976 }
978 return 0;
979 }
981 static void free_domains(struct lv_read_state *state) {
982 if (state->domains) {
983 for (int i = 0; i < state->nr_domains; ++i)
984 virDomainFree(state->domains[i]);
985 sfree(state->domains);
986 }
987 state->domains = NULL;
988 state->nr_domains = 0;
989 }
991 static int add_domain(struct lv_read_state *state, virDomainPtr dom) {
992 virDomainPtr *new_ptr;
993 int new_size = sizeof(state->domains[0]) * (state->nr_domains + 1);
995 if (state->domains)
996 new_ptr = realloc(state->domains, new_size);
997 else
998 new_ptr = malloc(new_size);
1000 if (new_ptr == NULL)
1001 return -1;
1003 state->domains = new_ptr;
1004 state->domains[state->nr_domains] = dom;
1005 return state->nr_domains++;
1006 }
1008 static void free_block_devices(struct lv_read_state *state) {
1009 if (state->block_devices) {
1010 for (int i = 0; i < state->nr_block_devices; ++i)
1011 sfree(state->block_devices[i].path);
1012 sfree(state->block_devices);
1013 }
1014 state->block_devices = NULL;
1015 state->nr_block_devices = 0;
1016 }
1018 static int add_block_device(struct lv_read_state *state, virDomainPtr dom,
1019 const char *path) {
1020 struct block_device *new_ptr;
1021 int new_size =
1022 sizeof(state->block_devices[0]) * (state->nr_block_devices + 1);
1023 char *path_copy;
1025 path_copy = strdup(path);
1026 if (!path_copy)
1027 return -1;
1029 if (state->block_devices)
1030 new_ptr = realloc(state->block_devices, new_size);
1031 else
1032 new_ptr = malloc(new_size);
1034 if (new_ptr == NULL) {
1035 sfree(path_copy);
1036 return -1;
1037 }
1038 state->block_devices = new_ptr;
1039 state->block_devices[state->nr_block_devices].dom = dom;
1040 state->block_devices[state->nr_block_devices].path = path_copy;
1041 return state->nr_block_devices++;
1042 }
1044 static void free_interface_devices(struct lv_read_state *state) {
1045 if (state->interface_devices) {
1046 for (int i = 0; i < state->nr_interface_devices; ++i) {
1047 sfree(state->interface_devices[i].path);
1048 sfree(state->interface_devices[i].address);
1049 sfree(state->interface_devices[i].number);
1050 }
1051 sfree(state->interface_devices);
1052 }
1053 state->interface_devices = NULL;
1054 state->nr_interface_devices = 0;
1055 }
1057 static int add_interface_device(struct lv_read_state *state, virDomainPtr dom,
1058 const char *path, const char *address,
1059 unsigned int number) {
1060 struct interface_device *new_ptr;
1061 int new_size =
1062 sizeof(state->interface_devices[0]) * (state->nr_interface_devices + 1);
1063 char *path_copy, *address_copy, number_string[15];
1065 if ((path == NULL) || (address == NULL))
1066 return EINVAL;
1068 path_copy = strdup(path);
1069 if (!path_copy)
1070 return -1;
1072 address_copy = strdup(address);
1073 if (!address_copy) {
1074 sfree(path_copy);
1075 return -1;
1076 }
1078 snprintf(number_string, sizeof(number_string), "interface-%u", number);
1080 if (state->interface_devices)
1081 new_ptr = realloc(state->interface_devices, new_size);
1082 else
1083 new_ptr = malloc(new_size);
1085 if (new_ptr == NULL) {
1086 sfree(path_copy);
1087 sfree(address_copy);
1088 return -1;
1089 }
1090 state->interface_devices = new_ptr;
1091 state->interface_devices[state->nr_interface_devices].dom = dom;
1092 state->interface_devices[state->nr_interface_devices].path = path_copy;
1093 state->interface_devices[state->nr_interface_devices].address = address_copy;
1094 state->interface_devices[state->nr_interface_devices].number =
1095 strdup(number_string);
1096 return state->nr_interface_devices++;
1097 }
1099 static int ignore_device_match(ignorelist_t *il, const char *domname,
1100 const char *devpath) {
1101 char *name;
1102 int n, r;
1104 if ((domname == NULL) || (devpath == NULL))
1105 return 0;
1107 n = sizeof(char) * (strlen(domname) + strlen(devpath) + 2);
1108 name = malloc(n);
1109 if (name == NULL) {
1110 ERROR(PLUGIN_NAME " plugin: malloc failed.");
1111 return 0;
1112 }
1113 ssnprintf(name, n, "%s:%s", domname, devpath);
1114 r = ignorelist_match(il, name);
1115 sfree(name);
1116 return r;
1117 }
1119 static int lv_shutdown(void) {
1120 for (size_t i = 0; i < nr_instances; ++i) {
1121 struct lv_read_state *state = &(lv_read_user_data[i].inst.read_state);
1122 free_block_devices(state);
1123 free_interface_devices(state);
1124 free_domains(state);
1125 }
1127 if (conn != NULL)
1128 virConnectClose(conn);
1129 conn = NULL;
1131 ignorelist_free(il_domains);
1132 il_domains = NULL;
1133 ignorelist_free(il_block_devices);
1134 il_block_devices = NULL;
1135 ignorelist_free(il_interface_devices);
1136 il_interface_devices = NULL;
1138 return 0;
1139 }
1141 void module_register(void) {
1142 plugin_register_config(PLUGIN_NAME, lv_config, config_keys, NR_CONFIG_KEYS);
1143 plugin_register_init(PLUGIN_NAME, lv_init);
1144 plugin_register_complex_read(NULL, PLUGIN_NAME, lv_read, 0, NULL);
1145 plugin_register_shutdown(PLUGIN_NAME, lv_shutdown);
1146 }
1148 /*
1149 * vim: shiftwidth=4 tabstop=8 softtabstop=4 expandtab fdm=marker
1150 */