df/domains.c

   1 /* virt-df
   2  * Copyright (C) 2010 Red Hat Inc.
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation; either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  17  */
  18
  19 #include <config.h>
  20
  21 #include <stdio.h>
  22 #include <stdlib.h>
  23 #include <string.h>
  24 #include <assert.h>
  25
  26 #ifdef HAVE_LIBVIRT
  27 #include <libvirt/libvirt.h>
  28 #include <libvirt/virterror.h>
  29 #endif
  30
  31 #include "progname.h"
  32
  33 #define GUESTFS_PRIVATE_FOR_EACH_DISK 1
  34
  35 #include "guestfs.h"
  36 #include "options.h"
  37 #include "virt-df.h"
  38
  39 #ifdef HAVE_LIBVIRT
  40
  41 /* Limit the number of devices we will ever add to the appliance.  The
  42  * overall limit in current libguestfs is 25: 26 = number of letters
  43  * in the English alphabet since we are only confident that
  44  * /dev/sd[a-z] will work because of various limits, minus 1 because
  45  * that may be used by the ext2 initial filesystem.  (RHBZ#635373).
  46  */
  47 #define MAX_DISKS 25
  48
  49 /* The list of domains and disks that we build up in
  50  * get_domains_from_libvirt.
  51  */
  52 struct disk {
  53   struct disk *next;
  54   char *filename;
  55   char *format; /* could be NULL */
  56 };
  57
  58 struct domain {
  59   char *name;
  60   char *uuid;
  61   struct disk *disks;
  62   size_t nr_disks;
  63 };
  64
  65 struct domain *domains = NULL;
  66 size_t nr_domains;
  67
  68 static int
  69 compare_domain_names (const void *p1, const void *p2)
  70 {
  71   const struct domain *d1 = p1;
  72   const struct domain *d2 = p2;
  73
  74   return strcmp (d1->name, d2->name);
  75 }
  76
  77 static void
  78 free_domain (struct domain *domain)
  79 {
  80   struct disk *disk, *next;
  81
  82   for (disk = domain->disks; disk; disk = next) {
  83     next = disk->next;
  84     free (disk->filename);
  85     free (disk->format);
  86     free (disk);
  87   }
  88
  89   free (domain->name);
  90   free (domain->uuid);
  91 }
  92
  93 static void add_domains_by_id (virConnectPtr conn, int *ids, size_t n);
  94 static void add_domains_by_name (virConnectPtr conn, char **names, size_t n);
  95 static void add_domain (virDomainPtr dom);
  96 static int add_disk (guestfs_h *g, const char *filename, const char *format, int readonly, void *domain_vp);
  97 static void multi_df (struct domain *, size_t n);
  98
  99 void
 100 get_domains_from_libvirt (void)
 101 {
 102   virErrorPtr err;
 103   virConnectPtr conn;
 104   int n;
 105   size_t i, j, nr_disks_added;
 106
 107   nr_domains = 0;
 108   domains = NULL;
 109
 110   /* Get the list of all domains. */
 111   conn = virConnectOpenReadOnly (libvirt_uri);
 112   if (!conn) {
 113     err = virGetLastError ();
 114     fprintf (stderr,
 115              _("%s: could not connect to libvirt (code %d, domain %d): %s"),
 116              program_name, err->code, err->domain, err->message);
 117     exit (EXIT_FAILURE);
 118   }
 119
 120   n = virConnectNumOfDomains (conn);
 121   if (n == -1) {
 122     err = virGetLastError ();
 123     fprintf (stderr,
 124              _("%s: could not get number of running domains (code %d, domain %d): %s"),
 125              program_name, err->code, err->domain, err->message);
 126     exit (EXIT_FAILURE);
 127   }
 128
 129   int ids[n];
 130   n = virConnectListDomains (conn, ids, n);
 131   if (n == -1) {
 132     err = virGetLastError ();
 133     fprintf (stderr,
 134              _("%s: could not list running domains (code %d, domain %d): %s"),
 135              program_name, err->code, err->domain, err->message);
 136     exit (EXIT_FAILURE);
 137   }
 138
 139   add_domains_by_id (conn, ids, n);
 140
 141   n = virConnectNumOfDefinedDomains (conn);
 142   if (n == -1) {
 143     err = virGetLastError ();
 144     fprintf (stderr,
 145              _("%s: could not get number of inactive domains (code %d, domain %d): %s"),
 146              program_name, err->code, err->domain, err->message);
 147     exit (EXIT_FAILURE);
 148   }
 149
 150   char *names[n];
 151   n = virConnectListDefinedDomains (conn, names, n);
 152   if (n == -1) {
 153     err = virGetLastError ();
 154     fprintf (stderr,
 155              _("%s: could not list inactive domains (code %d, domain %d): %s"),
 156              program_name, err->code, err->domain, err->message);
 157     exit (EXIT_FAILURE);
 158   }
 159
 160   add_domains_by_name (conn, names, n);
 161
 162   /* You must free these even though the libvirt documentation doesn't
 163    * mention it.
 164    */
 165   for (i = 0; i < (size_t) n; ++i)
 166     free (names[i]);
 167
 168   virConnectClose (conn);
 169
 170   /* No domains? */
 171   if (nr_domains == 0)
 172     return;
 173
 174   /* Sort the domains alphabetically by name for display. */
 175   qsort (domains, nr_domains, sizeof (struct domain), compare_domain_names);
 176
 177   print_title ();
 178
 179   /* To minimize the number of times we have to launch the appliance,
 180    * shuffle as many domains together as we can, but not exceeding
 181    * MAX_DISKS per request.  If --one-per-guest was requested then only
 182    * request disks from a single guest each time.
 183    * Interesting application for NP-complete knapsack problem here.
 184    */
 185   if (one_per_guest) {
 186     for (i = 0; i < nr_domains; ++i)
 187       multi_df (&domains[i], 1);
 188   } else {
 189     for (i = 0; i < nr_domains; /**/) {
 190       nr_disks_added = 0;
 191
 192       /* Make a request with domains [i..j-1]. */
 193       for (j = i; j < nr_domains; ++j) {
 194         if (nr_disks_added + domains[j].nr_disks > MAX_DISKS)
 195           break;
 196         nr_disks_added += domains[j].nr_disks;
 197       }
 198       multi_df (&domains[i], j-i);
 199
 200       i = j;
 201     }
 202   }
 203
 204   /* Free up domains structure. */
 205   for (i = 0; i < nr_domains; ++i)
 206     free_domain (&domains[i]);
 207   free (domains);
 208 }
 209
 210 static void
 211 add_domains_by_id (virConnectPtr conn, int *ids, size_t n)
 212 {
 213   size_t i;
 214   virDomainPtr dom;
 215
 216   for (i = 0; i < n; ++i) {
 217     if (ids[i] != 0) {          /* RHBZ#538041 */
 218       dom = virDomainLookupByID (conn, ids[i]);
 219       if (dom) { /* transient errors are possible here, ignore them */
 220         add_domain (dom);
 221         virDomainFree (dom);
 222       }
 223     }
 224   }
 225 }
 226
 227 static void
 228 add_domains_by_name (virConnectPtr conn, char **names, size_t n)
 229 {
 230   size_t i;
 231   virDomainPtr dom;
 232
 233   for (i = 0; i < n; ++i) {
 234     dom = virDomainLookupByName (conn, names[i]);
 235     if (dom) { /* transient errors are possible here, ignore them */
 236       add_domain (dom);
 237       virDomainFree (dom);
 238     }
 239   }
 240 }
 241
 242 static void
 243 add_domain (virDomainPtr dom)
 244 {
 245   struct domain *domain;
 246
 247   domains = realloc (domains, (nr_domains + 1) * sizeof (struct domain));
 248   if (domains == NULL) {
 249     perror ("realloc");
 250     exit (EXIT_FAILURE);
 251   }
 252
 253   domain = &domains[nr_domains];
 254   nr_domains++;
 255
 256   domain->name = strdup (virDomainGetName (dom));
 257   if (domain->name == NULL) {
 258     perror ("strdup");
 259     exit (EXIT_FAILURE);
 260   }
 261
 262   char uuid[VIR_UUID_STRING_BUFLEN];
 263   if (virDomainGetUUIDString (dom, uuid) == 0) {
 264     domain->uuid = strdup (uuid);
 265     if (domain->uuid == NULL) {
 266       perror ("strdup");
 267       exit (EXIT_FAILURE);
 268     }
 269   }
 270   else
 271     domain->uuid = NULL;
 272
 273   domain->disks = NULL;
 274   int n = guestfs___for_each_disk (g, dom, add_disk, domain);
 275   if (n == -1)
 276     exit (EXIT_FAILURE);
 277   domain->nr_disks = n;
 278
 279   if (domain->nr_disks > MAX_DISKS) {
 280     fprintf (stderr,
 281              _("%s: ignoring %s, it has too many disks (%zu > %d)"),
 282              program_name, domain->name, domain->nr_disks, MAX_DISKS);
 283     free_domain (domain);
 284     nr_domains--;
 285     return;
 286   }
 287 }
 288
 289 static int
 290 add_disk (guestfs_h *g,
 291           const char *filename, const char *format, int readonly,
 292           void *domain_vp)
 293 {
 294   struct domain *domain = domain_vp;
 295   struct disk *disk;
 296
 297   disk = malloc (sizeof *disk);
 298   if (disk == NULL) {
 299     perror ("malloc");
 300     return -1;
 301   }
 302
 303   disk->next = domain->disks;
 304   domain->disks = disk;
 305
 306   disk->filename = strdup (filename);
 307   if (disk->filename == NULL) {
 308     perror ("malloc");
 309     return -1;
 310   }
 311   if (format) {
 312     disk->format = strdup (format);
 313     if (disk->format == NULL) {
 314       perror ("malloc");
 315       return -1;
 316     }
 317   }
 318   else
 319     disk->format = NULL;
 320
 321   return 0;
 322 }
 323
 324 static size_t
 325 count_strings (char **argv)
 326 {
 327   size_t i;
 328
 329   for (i = 0; argv[i] != NULL; ++i)
 330     ;
 331   return i;
 332 }
 333
 334 static void reset_guestfs_handle (void);
 335 static void add_disks_to_handle_reverse (struct disk *disk);
 336
 337 /* Perform 'df' operation on the domain(s) given in the list. */
 338 static void
 339 multi_df (struct domain *domains, size_t n)
 340 {
 341   size_t i;
 342   size_t nd;
 343   int r;
 344   char **devices;
 345
 346   /* Add all the disks to the handle (since they were added in reverse
 347    * order, we must add them here in reverse too).
 348    */
 349   for (i = 0; i < n; ++i)
 350     add_disks_to_handle_reverse (domains[i].disks);
 351
 352   /* Launch the handle. */
 353   if (guestfs_launch (g) == -1)
 354     exit (EXIT_FAILURE);
 355
 356   devices = guestfs_list_devices (g);
 357   if (devices == NULL)
 358     exit (EXIT_FAILURE);
 359
 360   /* Check the number of disks we think we added is the same as the
 361    * number of devices returned by libguestfs.
 362    */
 363   nd = 0;
 364   for (i = 0; i < n; ++i)
 365     nd += domains[i].nr_disks;
 366   assert (nd == count_strings (devices));
 367
 368   nd = 0;
 369   for (i = 0; i < n; ++i) {
 370     /* So that &devices[nd] is a NULL-terminated list of strings. */
 371     char *p = devices[nd + domains[i].nr_disks];
 372     devices[nd + domains[i].nr_disks] = NULL;
 373
 374     r = df_on_handle (domains[i].name, domains[i].uuid, &devices[nd], nd);
 375
 376     /* Restore devices to original. */
 377     devices[nd + domains[i].nr_disks] = p;
 378     nd += domains[i].nr_disks;
 379
 380     /* Something broke in df_on_handle.  Give up on the remaining
 381      * devices for this handle, but keep going on the next handle.
 382      */
 383     if (r == -1)
 384       break;
 385   }
 386
 387   for (i = 0; devices[i] != NULL; ++i)
 388     free (devices[i]);
 389   free (devices);
 390
 391   /* Reset the handle. */
 392   reset_guestfs_handle ();
 393 }
 394
 395 static void
 396 add_disks_to_handle_reverse (struct disk *disk)
 397 {
 398   if (disk == NULL)
 399     return;
 400
 401   add_disks_to_handle_reverse (disk->next);
 402
 403   struct guestfs_add_drive_opts_argv optargs = { .bitmask = 0 };
 404
 405   optargs.bitmask |= GUESTFS_ADD_DRIVE_OPTS_READONLY_BITMASK;
 406   optargs.readonly = 1;
 407
 408   if (disk->format) {
 409     optargs.bitmask |= GUESTFS_ADD_DRIVE_OPTS_FORMAT_BITMASK;
 410     optargs.format = disk->format;
 411   }
 412
 413   if (guestfs_add_drive_opts_argv (g, disk->filename, &optargs) == -1)
 414     exit (EXIT_FAILURE);
 415 }
 416
 417 /* Close and reopen the libguestfs handle. */
 418 static void
 419 reset_guestfs_handle (void)
 420 {
 421   /* Copy the settings from the old handle. */
 422   int verbose = guestfs_get_verbose (g);
 423   int trace = guestfs_get_trace (g);
 424
 425   guestfs_close (g);
 426
 427   g = guestfs_create ();
 428   if (g == NULL) {
 429     fprintf (stderr, _("guestfs_create: failed to create handle\n"));
 430     exit (EXIT_FAILURE);
 431   }
 432
 433   guestfs_set_verbose (g, verbose);
 434   guestfs_set_trace (g, trace);
 435 }
 436
 437 #endif