qemu_driver.c 365.5 KB
Newer Older
D
Daniel P. Berrange 已提交
1
/*
2
 * qemu_driver.c: core driver methods for managing qemu guests
D
Daniel P. Berrange 已提交
3
 *
4
 * Copyright (C) 2006-2011 Red Hat, Inc.
D
Daniel P. Berrange 已提交
5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
 * Copyright (C) 2006 Daniel P. Berrange
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307  USA
 *
 * Author: Daniel P. Berrange <berrange@redhat.com>
 */

24
#include <config.h>
25

D
Daniel P. Berrange 已提交
26 27
#include <sys/types.h>
#include <sys/poll.h>
28
#include <sys/time.h>
D
Daniel P. Berrange 已提交
29 30 31 32 33 34 35 36
#include <dirent.h>
#include <limits.h>
#include <string.h>
#include <stdio.h>
#include <stdarg.h>
#include <stdlib.h>
#include <unistd.h>
#include <errno.h>
37
#include <sys/utsname.h>
38 39 40 41
#include <sys/stat.h>
#include <fcntl.h>
#include <signal.h>
#include <paths.h>
42
#include <stdio.h>
43
#include <sys/wait.h>
44
#include <sys/ioctl.h>
45
#include <sys/un.h>
46
#include <byteswap.h>
D
Daniel P. Berrange 已提交
47

48

49 50
#include "qemu_driver.h"
#include "qemu_conf.h"
51
#include "qemu_capabilities.h"
52
#include "qemu_command.h"
53
#include "qemu_cgroup.h"
54
#include "qemu_hostdev.h"
55
#include "qemu_hotplug.h"
56
#include "qemu_monitor.h"
57
#include "qemu_bridge_filter.h"
58
#include "qemu_process.h"
59
#include "qemu_migration.h"
60 61 62 63

#include "virterror_internal.h"
#include "logging.h"
#include "datatypes.h"
64
#include "buf.h"
65
#include "util.h"
66
#include "nodeinfo.h"
67
#include "stats_linux.h"
68
#include "capabilities.h"
69
#include "memory.h"
70
#include "uuid.h"
71
#include "domain_conf.h"
72
#include "domain_audit.h"
73 74
#include "node_device_conf.h"
#include "pci.h"
75
#include "hostusb.h"
76
#include "processinfo.h"
C
Chris Lalancette 已提交
77
#include "libvirt_internal.h"
78
#include "xml.h"
79
#include "cpu/cpu.h"
80
#include "sysinfo.h"
81
#include "domain_nwfilter.h"
82
#include "hooks.h"
83
#include "storage_file.h"
E
Eric Blake 已提交
84
#include "virfile.h"
85
#include "fdstream.h"
86
#include "configmake.h"
H
Hu Tao 已提交
87
#include "threadpool.h"
88
#include "locking/lock_manager.h"
89
#include "locking/domain_lock.h"
90
#include "virkeycode.h"
91
#include "virnodesuspend.h"
92
#include "virtime.h"
93

94 95
#define VIR_FROM_THIS VIR_FROM_QEMU

96 97
#define QEMU_NB_MEM_PARAM  3

98 99
#define QEMU_NB_BLOCK_IO_TUNE_PARAM  6

100 101 102
#if HAVE_LINUX_KVM_H
# include <linux/kvm.h>
#endif
103

104 105
/* device for kvm ioctls */
#define KVM_DEVICE "/dev/kvm"
106

107 108 109 110 111 112 113 114 115 116 117
/* add definitions missing in older linux/kvm.h */
#ifndef KVMIO
# define KVMIO 0xAE
#endif
#ifndef KVM_CHECK_EXTENSION
# define KVM_CHECK_EXTENSION       _IO(KVMIO,   0x03)
#endif
#ifndef KVM_CAP_NR_VCPUS
# define KVM_CAP_NR_VCPUS 9       /* returns max vcpus per vm */
#endif

118
#define QEMU_NB_BLKIO_PARAM  2
119

H
Hu Tao 已提交
120 121
static void processWatchdogEvent(void *data, void *opaque);

122 123
static int qemudShutdown(void);

124 125 126
static int qemuDomainObjStart(virConnectPtr conn,
                              struct qemud_driver *driver,
                              virDomainObjPtr vm,
127
                              unsigned int flags);
J
Jiri Denemark 已提交
128

129
static int qemudDomainGetMaxVcpus(virDomainPtr dom);
130

131
struct qemud_driver *qemu_driver = NULL;
132 133


134 135 136 137
struct qemuAutostartData {
    struct qemud_driver *driver;
    virConnectPtr conn;
};
138

139
static void
140 141
qemuAutostartDomain(void *payload, const void *name ATTRIBUTE_UNUSED,
                    void *opaque)
142 143 144
{
    virDomainObjPtr vm = payload;
    struct qemuAutostartData *data = opaque;
145
    virErrorPtr err;
146 147 148 149
    int flags = 0;

    if (data->driver->autoStartBypassCache)
        flags |= VIR_DOMAIN_START_BYPASS_CACHE;
150 151

    virDomainObjLock(vm);
152
    virResetLastError();
153 154 155 156 157 158 159 160 161 162 163 164
    if (vm->autostart &&
        !virDomainObjIsActive(vm)) {
        if (qemuDomainObjBeginJobWithDriver(data->driver, vm,
                                            QEMU_JOB_MODIFY) < 0) {
            err = virGetLastError();
            VIR_ERROR(_("Failed to start job on VM '%s': %s"),
                      vm->def->name,
                      err ? err->message : _("unknown error"));
            goto cleanup;
        }

        if (qemuDomainObjStart(data->conn, data->driver, vm, flags) < 0) {
165
            err = virGetLastError();
166
            VIR_ERROR(_("Failed to autostart VM '%s': %s"),
167
                      vm->def->name,
168
                      err ? err->message : _("unknown error"));
169
        }
170

171
        if (qemuDomainObjEndJob(data->driver, vm) == 0)
172
            vm = NULL;
173
    }
174

175
cleanup:
176 177
    if (vm)
        virDomainObjUnlock(vm);
178 179
}

180

181
static void
182 183
qemuAutostartDomains(struct qemud_driver *driver)
{
184 185 186 187 188
    /* XXX: Figure out a better way todo this. The domain
     * startup code needs a connection handle in order
     * to lookup the bridge associated with a virtual
     * network
     */
189 190 191
    virConnectPtr conn = virConnectOpen(driver->privileged ?
                                        "qemu:///system" :
                                        "qemu:///session");
192
    /* Ignoring NULL conn which is mostly harmless here */
193
    struct qemuAutostartData data = { driver, conn };
194

195
    qemuDriverLock(driver);
196
    virHashForEach(driver->domains.objs, qemuAutostartDomain, &data);
197
    qemuDriverUnlock(driver);
198

199 200
    if (conn)
        virConnectClose(conn);
201 202
}

203
static int
204
qemuSecurityInit(struct qemud_driver *driver)
205
{
206 207 208 209
    virSecurityManagerPtr mgr = virSecurityManagerNew(driver->securityDriverName,
                                                      driver->allowDiskFormatProbing);
    if (!mgr)
        goto error;
D
Daniel Veillard 已提交
210

211 212 213 214 215 216 217
    if (driver->privileged) {
        virSecurityManagerPtr dac = virSecurityManagerNewDAC(driver->user,
                                                             driver->group,
                                                             driver->allowDiskFormatProbing,
                                                             driver->dynamicOwnership);
        if (!dac)
            goto error;
218

219
        if (!(driver->securityManager = virSecurityManagerNewStack(mgr,
E
Eric Blake 已提交
220 221 222
                                                                   dac))) {

            virSecurityManagerFree(dac);
223
            goto error;
E
Eric Blake 已提交
224
        }
225 226 227
    } else {
        driver->securityManager = mgr;
    }
D
Daniel Veillard 已提交
228

229
    return 0;
230

231
error:
232
    VIR_ERROR(_("Failed to initialize security drivers"));
233 234 235
    virSecurityManagerFree(mgr);
    return -1;
}
236

237

238 239 240 241 242
static virCapsPtr
qemuCreateCapabilities(virCapsPtr oldcaps,
                       struct qemud_driver *driver)
{
    virCapsPtr caps;
243

244 245 246 247
    /* Basic host arch / guest machine capabilities */
    if (!(caps = qemuCapsInit(oldcaps))) {
        virReportOOMError();
        return NULL;
248 249
    }

250 251 252 253 254 255
    if (driver->allowDiskFormatProbing) {
        caps->defaultDiskDriverName = NULL;
        caps->defaultDiskDriverType = NULL;
    } else {
        caps->defaultDiskDriverName = "qemu";
        caps->defaultDiskDriverType = "raw";
256 257
    }

258 259
    qemuDomainSetPrivateDataHooks(caps);
    qemuDomainSetNamespaceHooks(caps);
260

261 262 263 264
    if (virGetHostUUID(caps->host.host_uuid)) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                         "%s", _("cannot get the host uuid"));
        goto err_exit;
265
    }
266

267 268
    /* Security driver data */
    const char *doi, *model;
269

270 271 272 273 274 275 276
    doi = virSecurityManagerGetDOI(driver->securityManager);
    model = virSecurityManagerGetModel(driver->securityManager);
    if (STRNEQ(model, "none")) {
        if (!(caps->host.secModel.model = strdup(model)))
            goto no_memory;
        if (!(caps->host.secModel.doi = strdup(doi)))
            goto no_memory;
277
    }
278

279 280
    VIR_DEBUG("Initialized caps for security driver \"%s\" with "
              "DOI \"%s\"", model, doi);
281

282
    return caps;
283

284 285 286 287
no_memory:
    virReportOOMError();
err_exit:
    virCapabilitiesFree(caps);
288 289 290
    return NULL;
}

291
static void qemuDomainSnapshotLoad(void *payload,
292
                                   const void *name ATTRIBUTE_UNUSED,
293
                                   void *data)
294
{
295 296 297 298 299 300 301 302 303
    virDomainObjPtr vm = (virDomainObjPtr)payload;
    char *baseDir = (char *)data;
    char *snapDir = NULL;
    DIR *dir = NULL;
    struct dirent *entry;
    char *xmlStr;
    int ret;
    char *fullpath;
    virDomainSnapshotDefPtr def = NULL;
304
    virDomainSnapshotObjPtr snap = NULL;
305
    virDomainSnapshotObjPtr current = NULL;
306
    char ebuf[1024];
307
    unsigned int flags = (VIR_DOMAIN_SNAPSHOT_PARSE_REDEFINE |
308
                          VIR_DOMAIN_SNAPSHOT_PARSE_DISKS |
309
                          VIR_DOMAIN_SNAPSHOT_PARSE_INTERNAL);
310

311 312 313 314
    virDomainObjLock(vm);
    if (virAsprintf(&snapDir, "%s/%s", baseDir, vm->def->name) < 0) {
        VIR_ERROR(_("Failed to allocate memory for snapshot directory for domain %s"),
                   vm->def->name);
315
        goto cleanup;
316 317
    }

318 319
    VIR_INFO("Scanning for snapshots for domain %s in %s", vm->def->name,
             snapDir);
320

321 322 323 324 325
    if (!(dir = opendir(snapDir))) {
        if (errno != ENOENT)
            VIR_ERROR(_("Failed to open snapshot directory %s for domain %s: %s"),
                      snapDir, vm->def->name,
                      virStrerror(errno, ebuf, sizeof(ebuf)));
326
        goto cleanup;
327 328
    }

329 330 331
    while ((entry = readdir(dir))) {
        if (entry->d_name[0] == '.')
            continue;
332

333 334 335
        /* NB: ignoring errors, so one malformed config doesn't
           kill the whole process */
        VIR_INFO("Loading snapshot file '%s'", entry->d_name);
336

337
        if (virAsprintf(&fullpath, "%s/%s", snapDir, entry->d_name) < 0) {
338
            VIR_ERROR(_("Failed to allocate memory for path"));
339 340
            continue;
        }
341

342 343 344 345 346 347 348 349
        ret = virFileReadAll(fullpath, 1024*1024*1, &xmlStr);
        if (ret < 0) {
            /* Nothing we can do here, skip this one */
            VIR_ERROR(_("Failed to read snapshot file %s: %s"), fullpath,
                      virStrerror(errno, ebuf, sizeof(ebuf)));
            VIR_FREE(fullpath);
            continue;
        }
350

351 352 353
        def = virDomainSnapshotDefParseString(xmlStr, qemu_driver->caps,
                                              QEMU_EXPECTED_VIRT_TYPES,
                                              flags);
354 355
        if (def == NULL) {
            /* Nothing we can do here, skip this one */
356 357
            VIR_ERROR(_("Failed to parse snapshot XML from file '%s'"),
                      fullpath);
358 359 360 361
            VIR_FREE(fullpath);
            VIR_FREE(xmlStr);
            continue;
        }
362

363 364 365
        snap = virDomainSnapshotAssignDef(&vm->snapshots, def);
        if (snap == NULL) {
            virDomainSnapshotDefFree(def);
366 367 368 369
        } else if (snap->def->current) {
            current = snap;
            if (!vm->current_snapshot)
                vm->current_snapshot = snap;
370
        }
371

372 373
        VIR_FREE(fullpath);
        VIR_FREE(xmlStr);
374 375
    }

376 377 378 379 380 381
    if (vm->current_snapshot != current) {
        VIR_ERROR(_("Too many snapshots claiming to be current for domain %s"),
                  vm->def->name);
        vm->current_snapshot = NULL;
    }

382 383 384 385
    if (virDomainSnapshotUpdateRelations(&vm->snapshots) < 0)
        VIR_ERROR(_("Snapshots have inconsistent relations for domain %s"),
                  vm->def->name);

386 387 388 389 390 391 392 393
    /* FIXME: qemu keeps internal track of snapshots.  We can get access
     * to this info via the "info snapshots" monitor command for running
     * domains, or via "qemu-img snapshot -l" for shutoff domains.  It would
     * be nice to update our internal state based on that, but there is a
     * a problem.  qemu doesn't track all of the same metadata that we do.
     * In particular we wouldn't be able to fill in the <parent>, which is
     * pretty important in our metadata.
     */
394

395
    virResetLastError();
396

397 398 399 400
cleanup:
    if (dir)
        closedir(dir);
    VIR_FREE(snapDir);
401 402 403
    virDomainObjUnlock(vm);
}

404 405 406 407 408
/**
 * qemudStartup:
 *
 * Initialization function for the QEmu daemon
 */
409
static int
410 411 412 413 414
qemudStartup(int privileged) {
    char *base = NULL;
    char *driverConf = NULL;
    int rc;
    virConnectPtr conn = NULL;
415

416 417
    if (VIR_ALLOC(qemu_driver) < 0)
        return -1;
418

419
    if (virMutexInit(&qemu_driver->lock) < 0) {
420
        VIR_ERROR(_("cannot initialize mutex"));
421 422
        VIR_FREE(qemu_driver);
        return -1;
423
    }
424 425
    qemuDriverLock(qemu_driver);
    qemu_driver->privileged = privileged;
426

427 428
    /* Don't have a dom0 so start from 1 */
    qemu_driver->nextvmid = 1;
429

430 431
    if (virDomainObjListInit(&qemu_driver->domains) < 0)
        goto out_of_memory;
432

433 434 435 436 437 438
    /* Init domain events */
    qemu_driver->domainEventState = virDomainEventStateNew(qemuDomainEventFlush,
                                                           qemu_driver,
                                                           NULL,
                                                           true);
    if (!qemu_driver->domainEventState)
439
        goto error;
440

441 442 443 444
    /* Allocate bitmap for vnc port reservation */
    if ((qemu_driver->reservedVNCPorts =
         virBitmapAlloc(QEMU_VNC_PORT_MAX - QEMU_VNC_PORT_MIN)) == NULL)
        goto out_of_memory;
445

446 447 448
    /* read the host sysinfo */
    if (privileged)
        qemu_driver->hostsysinfo = virSysinfoRead();
449

450 451 452 453
    if (privileged) {
        if (virAsprintf(&qemu_driver->logDir,
                        "%s/log/libvirt/qemu", LOCALSTATEDIR) == -1)
            goto out_of_memory;
454

455 456
        if ((base = strdup (SYSCONFDIR "/libvirt")) == NULL)
            goto out_of_memory;
457

458 459 460
        if (virAsprintf(&qemu_driver->stateDir,
                      "%s/run/libvirt/qemu", LOCALSTATEDIR) == -1)
            goto out_of_memory;
461

462 463 464
        if (virAsprintf(&qemu_driver->libDir,
                      "%s/lib/libvirt/qemu", LOCALSTATEDIR) == -1)
            goto out_of_memory;
465

466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482
        if (virAsprintf(&qemu_driver->cacheDir,
                      "%s/cache/libvirt/qemu", LOCALSTATEDIR) == -1)
            goto out_of_memory;
        if (virAsprintf(&qemu_driver->saveDir,
                      "%s/lib/libvirt/qemu/save", LOCALSTATEDIR) == -1)
            goto out_of_memory;
        if (virAsprintf(&qemu_driver->snapshotDir,
                        "%s/lib/libvirt/qemu/snapshot", LOCALSTATEDIR) == -1)
            goto out_of_memory;
        if (virAsprintf(&qemu_driver->autoDumpPath,
                        "%s/lib/libvirt/qemu/dump", LOCALSTATEDIR) == -1)
            goto out_of_memory;
    } else {
        uid_t uid = geteuid();
        char *userdir = virGetUserDirectory(uid);
        if (!userdir)
            goto error;
483

484 485 486 487 488
        if (virAsprintf(&qemu_driver->logDir,
                        "%s/.libvirt/qemu/log", userdir) == -1) {
            VIR_FREE(userdir);
            goto out_of_memory;
        }
489

490 491 492 493 494
        if (virAsprintf(&base, "%s/.libvirt", userdir) == -1) {
            VIR_FREE(userdir);
            goto out_of_memory;
        }
        VIR_FREE(userdir);
495

496 497 498 499 500 501 502 503 504 505 506 507
        if (virAsprintf(&qemu_driver->stateDir, "%s/qemu/run", base) == -1)
            goto out_of_memory;
        if (virAsprintf(&qemu_driver->libDir, "%s/qemu/lib", base) == -1)
            goto out_of_memory;
        if (virAsprintf(&qemu_driver->cacheDir, "%s/qemu/cache", base) == -1)
            goto out_of_memory;
        if (virAsprintf(&qemu_driver->saveDir, "%s/qemu/save", base) == -1)
            goto out_of_memory;
        if (virAsprintf(&qemu_driver->snapshotDir, "%s/qemu/snapshot", base) == -1)
            goto out_of_memory;
        if (virAsprintf(&qemu_driver->autoDumpPath, "%s/qemu/dump", base) == -1)
            goto out_of_memory;
508
    }
H
Hu Tao 已提交
509

510
    if (virFileMakePath(qemu_driver->stateDir) < 0) {
511 512 513 514
        char ebuf[1024];
        VIR_ERROR(_("Failed to create state dir '%s': %s"),
                  qemu_driver->stateDir, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
H
Hu Tao 已提交
515
    }
516
    if (virFileMakePath(qemu_driver->libDir) < 0) {
517 518 519 520 521
        char ebuf[1024];
        VIR_ERROR(_("Failed to create lib dir '%s': %s"),
                  qemu_driver->libDir, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
    }
522
    if (virFileMakePath(qemu_driver->cacheDir) < 0) {
523 524 525 526 527
        char ebuf[1024];
        VIR_ERROR(_("Failed to create cache dir '%s': %s"),
                  qemu_driver->cacheDir, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
    }
528
    if (virFileMakePath(qemu_driver->saveDir) < 0) {
529 530 531 532 533
        char ebuf[1024];
        VIR_ERROR(_("Failed to create save dir '%s': %s"),
                  qemu_driver->saveDir, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
    }
534
    if (virFileMakePath(qemu_driver->snapshotDir) < 0) {
535 536 537 538 539
        char ebuf[1024];
        VIR_ERROR(_("Failed to create save dir '%s': %s"),
                  qemu_driver->snapshotDir, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
    }
540
    if (virFileMakePath(qemu_driver->autoDumpPath) < 0) {
541 542 543 544
        char ebuf[1024];
        VIR_ERROR(_("Failed to create dump dir '%s': %s"),
                  qemu_driver->autoDumpPath, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
545 546
    }

547 548 549 550 551 552 553
    /* Configuration paths are either ~/.libvirt/qemu/... (session) or
     * /etc/libvirt/qemu/... (system).
     */
    if (virAsprintf(&driverConf, "%s/qemu.conf", base) < 0 ||
        virAsprintf(&qemu_driver->configDir, "%s/qemu", base) < 0 ||
        virAsprintf(&qemu_driver->autostartDir, "%s/qemu/autostart", base) < 0)
        goto out_of_memory;
554

555
    VIR_FREE(base);
556

557 558 559 560 561
    rc = virCgroupForDriver("qemu", &qemu_driver->cgroup, privileged, 1);
    if (rc < 0) {
        char buf[1024];
        VIR_INFO("Unable to create cgroup for driver: %s",
                 virStrerror(-rc, buf, sizeof(buf)));
562 563
    }

564 565 566 567
    if (qemudLoadDriverConfig(qemu_driver, driverConf) < 0) {
        goto error;
    }
    VIR_FREE(driverConf);
568

569 570 571 572 573 574 575 576
    /* We should always at least have the 'nop' manager, so
     * NULLs here are a fatal error
     */
    if (!qemu_driver->lockManager) {
        VIR_ERROR(_("Missing lock manager implementation"));
        goto error;
    }

577 578
    if (qemuSecurityInit(qemu_driver) < 0)
        goto error;
579

580 581 582
    if ((qemu_driver->caps = qemuCreateCapabilities(NULL,
                                                    qemu_driver)) == NULL)
        goto error;
583

584
    if ((qemu_driver->activePciHostdevs = pciDeviceListNew()) == NULL)
585
        goto error;
586

587 588 589 590 591 592
    if (privileged) {
        if (chown(qemu_driver->libDir, qemu_driver->user, qemu_driver->group) < 0) {
            virReportSystemError(errno,
                                 _("unable to set ownership of '%s' to user %d:%d"),
                                 qemu_driver->libDir, qemu_driver->user, qemu_driver->group);
            goto error;
593
        }
594
        if (chown(qemu_driver->cacheDir, qemu_driver->user, qemu_driver->group) < 0) {
595
            virReportSystemError(errno,
596 597 598
                                 _("unable to set ownership of '%s' to %d:%d"),
                                 qemu_driver->cacheDir, qemu_driver->user, qemu_driver->group);
            goto error;
599
        }
600 601 602 603 604 605 606 607 608 609 610
        if (chown(qemu_driver->saveDir, qemu_driver->user, qemu_driver->group) < 0) {
            virReportSystemError(errno,
                                 _("unable to set ownership of '%s' to %d:%d"),
                                 qemu_driver->saveDir, qemu_driver->user, qemu_driver->group);
            goto error;
        }
        if (chown(qemu_driver->snapshotDir, qemu_driver->user, qemu_driver->group) < 0) {
            virReportSystemError(errno,
                                 _("unable to set ownership of '%s' to %d:%d"),
                                 qemu_driver->snapshotDir, qemu_driver->user, qemu_driver->group);
            goto error;
611
        }
612
    }
613

614 615 616 617 618 619
    /* If hugetlbfs is present, then we need to create a sub-directory within
     * it, since we can't assume the root mount point has permissions that
     * will let our spawned QEMU instances use it.
     *
     * NB the check for '/', since user may config "" to disable hugepages
     * even when mounted
620
     */
621 622 623 624 625
    if (qemu_driver->hugetlbfs_mount &&
        qemu_driver->hugetlbfs_mount[0] == '/') {
        char *mempath = NULL;
        if (virAsprintf(&mempath, "%s/libvirt/qemu", qemu_driver->hugetlbfs_mount) < 0)
            goto out_of_memory;
626

627 628
        if (virFileMakePath(mempath) < 0) {
            virReportSystemError(errno,
629 630 631
                                 _("unable to create hugepage path %s"), mempath);
            VIR_FREE(mempath);
            goto error;
632
        }
633 634 635 636 637 638 639
        if (qemu_driver->privileged &&
            chown(mempath, qemu_driver->user, qemu_driver->group) < 0) {
            virReportSystemError(errno,
                                 _("unable to set ownership on %s to %d:%d"),
                                 mempath, qemu_driver->user, qemu_driver->group);
            VIR_FREE(mempath);
            goto error;
G
Guido Günther 已提交
640
        }
E
Eric Blake 已提交
641

642
        qemu_driver->hugepage_path = mempath;
643
    }
644

645 646 647
    if (qemuProcessAutoDestroyInit(qemu_driver) < 0)
        goto error;

648 649 650 651 652
    /* Get all the running persistent or transient configs first */
    if (virDomainLoadAllConfigs(qemu_driver->caps,
                                &qemu_driver->domains,
                                qemu_driver->stateDir,
                                NULL,
M
Matthias Bolte 已提交
653 654
                                1, QEMU_EXPECTED_VIRT_TYPES,
                                NULL, NULL) < 0)
655
        goto error;
656

657 658 659
    conn = virConnectOpen(qemu_driver->privileged ?
                          "qemu:///system" :
                          "qemu:///session");
660

661
    qemuProcessReconnectAll(conn, qemu_driver);
662

663 664 665 666 667
    /* Then inactive persistent configs */
    if (virDomainLoadAllConfigs(qemu_driver->caps,
                                &qemu_driver->domains,
                                qemu_driver->configDir,
                                qemu_driver->autostartDir,
M
Matthias Bolte 已提交
668 669
                                0, QEMU_EXPECTED_VIRT_TYPES,
                                NULL, NULL) < 0)
670
        goto error;
671

672

673 674
    virHashForEach(qemu_driver->domains.objs, qemuDomainSnapshotLoad,
                   qemu_driver->snapshotDir);
675

676
    qemu_driver->workerPool = virThreadPoolNew(0, 1, 0, processWatchdogEvent, qemu_driver);
677 678
    if (!qemu_driver->workerPool)
        goto error;
679

680 681 682 683
    qemuDriverUnlock(qemu_driver);

    qemuAutostartDomains(qemu_driver);

684 685
    if (conn)
        virConnectClose(conn);
686

687
    return 0;
688

689 690 691 692 693 694 695 696 697 698
out_of_memory:
    virReportOOMError();
error:
    if (qemu_driver)
        qemuDriverUnlock(qemu_driver);
    if (conn)
        virConnectClose(conn);
    VIR_FREE(base);
    VIR_FREE(driverConf);
    qemudShutdown();
699
    return -1;
700 701
}

702 703 704
static void qemudNotifyLoadDomain(virDomainObjPtr vm, int newVM, void *opaque)
{
    struct qemud_driver *driver = opaque;
705

706 707 708 709 710 711 712
    if (newVM) {
        virDomainEventPtr event =
            virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_DEFINED,
                                     VIR_DOMAIN_EVENT_DEFINED_ADDED);
        if (event)
            qemuDomainEventQueue(driver, event);
E
Eric Blake 已提交
713
    }
714
}
E
Eric Blake 已提交
715

716 717 718 719 720 721 722 723 724 725
/**
 * qemudReload:
 *
 * Function to restart the QEmu daemon, it will recheck the configuration
 * files and update its state and the networking
 */
static int
qemudReload(void) {
    if (!qemu_driver)
        return 0;
726

727 728 729 730 731
    qemuDriverLock(qemu_driver);
    virDomainLoadAllConfigs(qemu_driver->caps,
                            &qemu_driver->domains,
                            qemu_driver->configDir,
                            qemu_driver->autostartDir,
M
Matthias Bolte 已提交
732 733
                            0, QEMU_EXPECTED_VIRT_TYPES,
                            qemudNotifyLoadDomain, qemu_driver);
734
    qemuDriverUnlock(qemu_driver);
735

736
    qemuAutostartDomains(qemu_driver);
737

738 739
    return 0;
}
S
Stefan Berger 已提交
740

741 742 743 744 745 746 747 748 749 750 751
/**
 * qemudActive:
 *
 * Checks if the QEmu daemon is active, i.e. has an active domain or
 * an active network
 *
 * Returns 1 if active, 0 otherwise
 */
static int
qemudActive(void) {
    int active = 0;
752

753 754
    if (!qemu_driver)
        return 0;
755

756 757 758 759 760 761
    /* XXX having to iterate here is not great because it requires many locks */
    qemuDriverLock(qemu_driver);
    active = virDomainObjListNumOfDomains(&qemu_driver->domains, 1);
    qemuDriverUnlock(qemu_driver);
    return active;
}
762

763 764 765 766 767 768 769 770
/**
 * qemudShutdown:
 *
 * Shutdown the QEmu daemon, it will stop all active domains and networks
 */
static int
qemudShutdown(void) {
    int i;
771

772 773
    if (!qemu_driver)
        return -1;
774

775 776 777
    qemuDriverLock(qemu_driver);
    pciDeviceListFree(qemu_driver->activePciHostdevs);
    virCapabilitiesFree(qemu_driver->caps);
778

779 780
    virDomainObjListDeinit(&qemu_driver->domains);
    virBitmapFree(qemu_driver->reservedVNCPorts);
781

782
    virSysinfoDefFree(qemu_driver->hostsysinfo);
783

784 785
    qemuProcessAutoDestroyShutdown(qemu_driver);

786 787 788 789 790 791 792 793
    VIR_FREE(qemu_driver->configDir);
    VIR_FREE(qemu_driver->autostartDir);
    VIR_FREE(qemu_driver->logDir);
    VIR_FREE(qemu_driver->stateDir);
    VIR_FREE(qemu_driver->libDir);
    VIR_FREE(qemu_driver->cacheDir);
    VIR_FREE(qemu_driver->saveDir);
    VIR_FREE(qemu_driver->snapshotDir);
E
Eric Blake 已提交
794
    VIR_FREE(qemu_driver->qemuImgBinary);
795 796 797 798 799 800 801 802 803 804 805 806
    VIR_FREE(qemu_driver->autoDumpPath);
    VIR_FREE(qemu_driver->vncTLSx509certdir);
    VIR_FREE(qemu_driver->vncListen);
    VIR_FREE(qemu_driver->vncPassword);
    VIR_FREE(qemu_driver->vncSASLdir);
    VIR_FREE(qemu_driver->spiceTLSx509certdir);
    VIR_FREE(qemu_driver->spiceListen);
    VIR_FREE(qemu_driver->spicePassword);
    VIR_FREE(qemu_driver->hugetlbfs_mount);
    VIR_FREE(qemu_driver->hugepage_path);
    VIR_FREE(qemu_driver->saveImageFormat);
    VIR_FREE(qemu_driver->dumpImageFormat);
807

808
    virSecurityManagerFree(qemu_driver->securityManager);
809

810
    ebtablesContextFree(qemu_driver->ebtables);
811

812 813 814 815
    if (qemu_driver->cgroupDeviceACL) {
        for (i = 0 ; qemu_driver->cgroupDeviceACL[i] != NULL ; i++)
            VIR_FREE(qemu_driver->cgroupDeviceACL[i]);
        VIR_FREE(qemu_driver->cgroupDeviceACL);
S
Stefan Berger 已提交
816 817
    }

818
    /* Free domain callback list */
819
    virDomainEventStateFree(qemu_driver->domainEventState);
D
Daniel P. Berrange 已提交
820

821
    virCgroupFree(&qemu_driver->cgroup);
822

823 824
    virLockManagerPluginUnref(qemu_driver->lockManager);

825 826 827 828
    qemuDriverUnlock(qemu_driver);
    virMutexDestroy(&qemu_driver->lock);
    virThreadPoolFree(qemu_driver->workerPool);
    VIR_FREE(qemu_driver);
829

830
    return 0;
831 832
}

833

834
static virDrvOpenStatus qemudOpen(virConnectPtr conn,
835
                                  virConnectAuthPtr auth ATTRIBUTE_UNUSED,
E
Eric Blake 已提交
836
                                  unsigned int flags)
837
{
E
Eric Blake 已提交
838 839
    virCheckFlags(VIR_CONNECT_RO, VIR_DRV_OPEN_ERROR);

840
    if (conn->uri == NULL) {
841 842 843
        if (qemu_driver == NULL)
            return VIR_DRV_OPEN_DECLINED;

844
        conn->uri = xmlParseURI(qemu_driver->privileged ?
845 846
                                "qemu:///system" :
                                "qemu:///session");
847
        if (!conn->uri) {
848
            virReportOOMError();
849 850
            return VIR_DRV_OPEN_ERROR;
        }
851 852 853 854 855 856 857 858 859 860
    } else {
        /* If URI isn't 'qemu' its definitely not for us */
        if (conn->uri->scheme == NULL ||
            STRNEQ(conn->uri->scheme, "qemu"))
            return VIR_DRV_OPEN_DECLINED;

        /* Allow remote driver to deal with URIs with hostname server */
        if (conn->uri->server != NULL)
            return VIR_DRV_OPEN_DECLINED;

861
        if (qemu_driver == NULL) {
862 863
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("qemu state driver is not active"));
864 865 866
            return VIR_DRV_OPEN_ERROR;
        }

867
        if (conn->uri->path == NULL) {
868 869 870 871 872
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("no QEMU URI path given, try %s"),
                            qemu_driver->privileged
                            ? "qemu:///system"
                            : "qemu:///session");
873 874 875
                return VIR_DRV_OPEN_ERROR;
        }

876
        if (qemu_driver->privileged) {
877 878
            if (STRNEQ (conn->uri->path, "/system") &&
                STRNEQ (conn->uri->path, "/session")) {
879 880 881
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("unexpected QEMU URI path '%s', try qemu:///system"),
                                conn->uri->path);
882 883 884 885
                return VIR_DRV_OPEN_ERROR;
            }
        } else {
            if (STRNEQ (conn->uri->path, "/session")) {
886 887 888
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("unexpected QEMU URI path '%s', try qemu:///session"),
                                conn->uri->path);
889 890 891
                return VIR_DRV_OPEN_ERROR;
            }
        }
892 893 894 895 896 897 898
    }
    conn->privateData = qemu_driver;

    return VIR_DRV_OPEN_SUCCESS;
}

static int qemudClose(virConnectPtr conn) {
899
    struct qemud_driver *driver = conn->privateData;
900 901

    /* Get rid of callbacks registered for this conn */
902
    qemuDriverLock(driver);
903 904
    virDomainEventCallbackListRemoveConn(conn,
                                         driver->domainEventState->callbacks);
905
    qemuProcessAutoDestroyRun(driver, conn);
906
    qemuDriverUnlock(driver);
907 908 909 910 911 912

    conn->privateData = NULL;

    return 0;
}

D
Daniel Veillard 已提交
913 914 915 916 917
/* Which features are supported by this driver? */
static int
qemudSupportsFeature (virConnectPtr conn ATTRIBUTE_UNUSED, int feature)
{
    switch (feature) {
918
    case VIR_DRV_FEATURE_MIGRATION_V2:
919
    case VIR_DRV_FEATURE_MIGRATION_V3:
920
    case VIR_DRV_FEATURE_MIGRATION_P2P:
921
    case VIR_DRV_FEATURE_MIGRATE_CHANGE_PROTECTION:
922
    case VIR_DRV_FEATURE_FD_PASSING:
923
    case VIR_DRV_FEATURE_TYPED_PARAM_STRING:
924 925 926
        return 1;
    default:
        return 0;
D
Daniel Veillard 已提交
927 928 929
    }
}

930
static const char *qemudGetType(virConnectPtr conn ATTRIBUTE_UNUSED) {
931
    return "QEMU";
932 933
}

934

935 936 937 938 939 940 941 942 943 944 945 946
static int qemuIsSecure(virConnectPtr conn ATTRIBUTE_UNUSED)
{
    /* Trivially secure, since always inside the daemon */
    return 1;
}

static int qemuIsEncrypted(virConnectPtr conn ATTRIBUTE_UNUSED)
{
    /* Not encrypted, but remote driver takes care of that */
    return 0;
}

947 948 949 950 951
static int qemuIsAlive(virConnectPtr conn ATTRIBUTE_UNUSED)
{
    return 1;
}

952

953 954 955 956
static int kvmGetMaxVCPUs(void) {
    int maxvcpus = 1;

    int r, fd;
957

958 959
    fd = open(KVM_DEVICE, O_RDONLY);
    if (fd < 0) {
960
        virReportSystemError(errno, _("Unable to open %s"), KVM_DEVICE);
961
        return -1;
962 963 964 965 966 967
    }

    r = ioctl(fd, KVM_CHECK_EXTENSION, KVM_CAP_NR_VCPUS);
    if (r > 0)
        maxvcpus = r;

968
    VIR_FORCE_CLOSE(fd);
969 970 971 972
    return maxvcpus;
}


E
Eric Blake 已提交
973 974 975 976
static char *
qemuGetSysinfo(virConnectPtr conn, unsigned int flags)
{
    struct qemud_driver *driver = conn->privateData;
977
    virBuffer buf = VIR_BUFFER_INITIALIZER;
E
Eric Blake 已提交
978 979 980 981 982 983 984 985 986

    virCheckFlags(0, NULL);

    if (!driver->hostsysinfo) {
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                        _("Host SMBIOS information is not available"));
        return NULL;
    }

987 988 989 990 991 992 993
    if (virSysinfoFormat(&buf, driver->hostsysinfo) < 0)
        return NULL;
    if (virBufferError(&buf)) {
        virReportOOMError();
        return NULL;
    }
    return virBufferContentAndReset(&buf);
E
Eric Blake 已提交
994 995
}

996
static int qemudGetMaxVCPUs(virConnectPtr conn ATTRIBUTE_UNUSED, const char *type) {
997 998 999
    if (!type)
        return 16;

1000
    if (STRCASEEQ(type, "qemu"))
1001 1002
        return 16;

1003
    if (STRCASEEQ(type, "kvm"))
1004
        return kvmGetMaxVCPUs();
1005

1006
    if (STRCASEEQ(type, "kqemu"))
1007
        return 1;
1008

1009 1010
    qemuReportError(VIR_ERR_INVALID_ARG,
                    _("unknown type '%s'"), type);
1011 1012 1013
    return -1;
}

1014

1015
static char *qemudGetCapabilities(virConnectPtr conn) {
1016
    struct qemud_driver *driver = conn->privateData;
1017
    virCapsPtr caps = NULL;
1018
    char *xml = NULL;
1019

1020
    qemuDriverLock(driver);
1021

1022
    if ((caps = qemuCreateCapabilities(qemu_driver->caps,
1023
                                       qemu_driver)) == NULL) {
1024 1025 1026
        virCapabilitiesFree(caps);
        goto cleanup;
    }
1027

1028
    virCapabilitiesFree(qemu_driver->caps);
1029 1030 1031
    qemu_driver->caps = caps;

    if ((xml = virCapabilitiesFormatXML(driver->caps)) == NULL)
1032
        virReportOOMError();
1033 1034

cleanup:
1035
    qemuDriverUnlock(driver);
1036

1037
    return xml;
1038 1039 1040
}


1041 1042 1043 1044 1045
static int
qemudGetProcessInfo(unsigned long long *cpuTime, int *lastCpu, int pid,
                    int tid)
{
    char *proc;
D
Daniel P. Berrange 已提交
1046
    FILE *pidinfo;
1047
    unsigned long long usertime, systime;
1048 1049
    int cpu;
    int ret;
D
Daniel P. Berrange 已提交
1050

1051
    if (tid)
1052
        ret = virAsprintf(&proc, "/proc/%d/task/%d/stat", pid, tid);
1053
    else
1054 1055
        ret = virAsprintf(&proc, "/proc/%d/stat", pid);
    if (ret < 0)
D
Daniel P. Berrange 已提交
1056 1057 1058 1059
        return -1;

    if (!(pidinfo = fopen(proc, "r"))) {
        /* VM probably shut down, so fake 0 */
1060 1061 1062 1063
        if (cpuTime)
            *cpuTime = 0;
        if (lastCpu)
            *lastCpu = 0;
1064
        VIR_FREE(proc);
D
Daniel P. Berrange 已提交
1065 1066
        return 0;
    }
1067
    VIR_FREE(proc);
D
Daniel P. Berrange 已提交
1068

1069 1070 1071 1072 1073 1074 1075 1076 1077 1078
    /* See 'man proc' for information about what all these fields are. We're
     * only interested in a very few of them */
    if (fscanf(pidinfo,
               /* pid -> stime */
               "%*d %*s %*c %*d %*d %*d %*d %*d %*u %*u %*u %*u %*u %llu %llu"
               /* cutime -> endcode */
               "%*d %*d %*d %*d %*d %*u %*u %*d %*u %*u %*u %*u"
               /* startstack -> processor */
               "%*u %*u %*u %*u %*u %*u %*u %*u %*u %*u %*d %d",
               &usertime, &systime, &cpu) != 3) {
1079
        VIR_FORCE_FCLOSE(pidinfo);
1080
        VIR_WARN("cannot parse process status data");
1081
        errno = -EINVAL;
D
Daniel P. Berrange 已提交
1082 1083 1084 1085 1086 1087 1088 1089
        return -1;
    }

    /* We got jiffies
     * We want nanoseconds
     * _SC_CLK_TCK is jiffies per second
     * So calulate thus....
     */
1090 1091 1092 1093 1094
    if (cpuTime)
        *cpuTime = 1000ull * 1000ull * 1000ull * (usertime + systime) / (unsigned long long)sysconf(_SC_CLK_TCK);
    if (lastCpu)
        *lastCpu = cpu;

D
Daniel P. Berrange 已提交
1095

1096 1097
    VIR_DEBUG("Got status for %d/%d user=%llu sys=%llu cpu=%d",
              pid, tid, usertime, systime, cpu);
D
Daniel P. Berrange 已提交
1098

1099
    VIR_FORCE_FCLOSE(pidinfo);
D
Daniel P. Berrange 已提交
1100 1101 1102 1103 1104

    return 0;
}


1105
static virDomainPtr qemudDomainLookupByID(virConnectPtr conn,
1106
                                          int id) {
1107 1108 1109 1110
    struct qemud_driver *driver = conn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;

1111
    qemuDriverLock(driver);
1112
    vm  = virDomainFindByID(&driver->domains, id);
1113
    qemuDriverUnlock(driver);
1114 1115

    if (!vm) {
1116 1117
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching id %d"), id);
1118
        goto cleanup;
1119 1120
    }

1121
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1122
    if (dom) dom->id = vm->def->id;
1123 1124

cleanup:
1125 1126
    if (vm)
        virDomainObjUnlock(vm);
1127 1128
    return dom;
}
1129

1130
static virDomainPtr qemudDomainLookupByUUID(virConnectPtr conn,
1131
                                            const unsigned char *uuid) {
1132 1133 1134
    struct qemud_driver *driver = conn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;
1135

1136
    qemuDriverLock(driver);
1137
    vm = virDomainFindByUUID(&driver->domains, uuid);
1138 1139
    qemuDriverUnlock(driver);

1140
    if (!vm) {
1141 1142
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(uuid, uuidstr);
1143 1144
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1145
        goto cleanup;
1146 1147
    }

1148
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1149
    if (dom) dom->id = vm->def->id;
1150 1151

cleanup:
1152 1153
    if (vm)
        virDomainObjUnlock(vm);
1154 1155
    return dom;
}
1156

1157
static virDomainPtr qemudDomainLookupByName(virConnectPtr conn,
1158
                                            const char *name) {
1159 1160 1161
    struct qemud_driver *driver = conn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;
1162

1163
    qemuDriverLock(driver);
1164
    vm = virDomainFindByName(&driver->domains, name);
1165 1166
    qemuDriverUnlock(driver);

1167
    if (!vm) {
1168 1169
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching name '%s'"), name);
1170
        goto cleanup;
1171 1172
    }

1173
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1174
    if (dom) dom->id = vm->def->id;
1175 1176

cleanup:
1177 1178
    if (vm)
        virDomainObjUnlock(vm);
1179 1180 1181
    return dom;
}

1182 1183 1184 1185 1186 1187 1188 1189 1190 1191 1192

static int qemuDomainIsActive(virDomainPtr dom)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr obj;
    int ret = -1;

    qemuDriverLock(driver);
    obj = virDomainFindByUUID(&driver->domains, dom->uuid);
    qemuDriverUnlock(driver);
    if (!obj) {
E
Eric Blake 已提交
1193 1194 1195 1196
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1197 1198 1199 1200 1201 1202 1203 1204 1205 1206 1207 1208 1209 1210 1211 1212 1213 1214 1215 1216
        goto cleanup;
    }
    ret = virDomainObjIsActive(obj);

cleanup:
    if (obj)
        virDomainObjUnlock(obj);
    return ret;
}

static int qemuDomainIsPersistent(virDomainPtr dom)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr obj;
    int ret = -1;

    qemuDriverLock(driver);
    obj = virDomainFindByUUID(&driver->domains, dom->uuid);
    qemuDriverUnlock(driver);
    if (!obj) {
E
Eric Blake 已提交
1217 1218 1219 1220
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1221 1222 1223 1224 1225 1226 1227 1228 1229 1230
        goto cleanup;
    }
    ret = obj->persistent;

cleanup:
    if (obj)
        virDomainObjUnlock(obj);
    return ret;
}

1231 1232 1233 1234 1235 1236 1237 1238 1239 1240
static int qemuDomainIsUpdated(virDomainPtr dom)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr obj;
    int ret = -1;

    qemuDriverLock(driver);
    obj = virDomainFindByUUID(&driver->domains, dom->uuid);
    qemuDriverUnlock(driver);
    if (!obj) {
E
Eric Blake 已提交
1241 1242 1243 1244
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1245 1246 1247 1248 1249 1250 1251 1252 1253
        goto cleanup;
    }
    ret = obj->updated;

cleanup:
    if (obj)
        virDomainObjUnlock(obj);
    return ret;
}
1254

1255
static int qemudGetVersion(virConnectPtr conn, unsigned long *version) {
1256 1257 1258
    struct qemud_driver *driver = conn->privateData;
    int ret = -1;

1259
    qemuDriverLock(driver);
1260
    if (qemuCapsExtractVersion(driver->caps, &driver->qemuVersion) < 0)
1261
        goto cleanup;
1262

1263
    *version = driver->qemuVersion;
1264 1265 1266
    ret = 0;

cleanup:
1267
    qemuDriverUnlock(driver);
1268
    return ret;
D
Daniel P. Berrange 已提交
1269 1270
}

1271
static int qemudListDomains(virConnectPtr conn, int *ids, int nids) {
1272
    struct qemud_driver *driver = conn->privateData;
1273
    int n;
1274

1275
    qemuDriverLock(driver);
1276
    n = virDomainObjListGetActiveIDs(&driver->domains, ids, nids);
1277
    qemuDriverUnlock(driver);
1278

1279
    return n;
D
Daniel P. Berrange 已提交
1280
}
1281

1282
static int qemudNumDomains(virConnectPtr conn) {
1283
    struct qemud_driver *driver = conn->privateData;
1284
    int n;
1285

1286
    qemuDriverLock(driver);
1287
    n = virDomainObjListNumOfDomains(&driver->domains, 1);
1288
    qemuDriverUnlock(driver);
1289

1290
    return n;
D
Daniel P. Berrange 已提交
1291
}
1292

1293
static virDomainPtr qemudDomainCreate(virConnectPtr conn, const char *xml,
1294
                                      unsigned int flags) {
1295
    struct qemud_driver *driver = conn->privateData;
1296
    virDomainDefPtr def;
1297
    virDomainObjPtr vm = NULL;
1298
    virDomainPtr dom = NULL;
1299
    virDomainEventPtr event = NULL;
1300
    virDomainEventPtr event2 = NULL;
D
Daniel P. Berrange 已提交
1301

1302 1303
    virCheckFlags(VIR_DOMAIN_START_PAUSED |
                  VIR_DOMAIN_START_AUTODESTROY, NULL);
1304

1305
    qemuDriverLock(driver);
1306
    if (!(def = virDomainDefParseString(driver->caps, xml,
M
Matthias Bolte 已提交
1307
                                        QEMU_EXPECTED_VIRT_TYPES,
1308
                                        VIR_DOMAIN_XML_INACTIVE)))
1309
        goto cleanup;
1310

1311
    if (virSecurityManagerVerify(driver->securityManager, def) < 0)
1312 1313
        goto cleanup;

1314 1315
    if (virDomainObjIsDuplicate(&driver->domains, def, 1) < 0)
        goto cleanup;
1316

1317 1318 1319
    if (qemudCanonicalizeMachine(driver, def) < 0)
        goto cleanup;

1320
    if (qemuDomainAssignAddresses(def) < 0)
1321 1322
        goto cleanup;

1323
    if (!(vm = virDomainAssignDef(driver->caps,
1324
                                  &driver->domains,
1325
                                  def, false)))
1326 1327 1328
        goto cleanup;

    def = NULL;
D
Daniel P. Berrange 已提交
1329

1330
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
1331 1332
        goto cleanup; /* XXXX free the 'vm' we created ? */

1333 1334
    if (qemuProcessStart(conn, driver, vm, NULL,
                         (flags & VIR_DOMAIN_START_PAUSED) != 0,
1335
                         (flags & VIR_DOMAIN_START_AUTODESTROY) != 0,
1336
                         -1, NULL, NULL, VIR_NETDEV_VPORT_PROFILE_OP_CREATE) < 0) {
1337
        virDomainAuditStart(vm, "booted", false);
1338
        if (qemuDomainObjEndJob(driver, vm) > 0)
1339
            qemuDomainRemoveInactive(driver, vm);
1340
        vm = NULL;
1341
        goto cleanup;
D
Daniel P. Berrange 已提交
1342
    }
1343 1344 1345 1346

    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_BOOTED);
1347 1348 1349 1350 1351 1352 1353 1354 1355 1356
    if (event && (flags & VIR_DOMAIN_START_PAUSED)) {
        /* There are two classes of event-watching clients - those
         * that only care about on/off (and must see a started event
         * no matter what, but don't care about suspend events), and
         * those that also care about running/paused.  To satisfy both
         * client types, we have to send two events.  */
        event2 = virDomainEventNewFromObj(vm,
                                          VIR_DOMAIN_EVENT_SUSPENDED,
                                          VIR_DOMAIN_EVENT_SUSPENDED_PAUSED);
    }
1357
    virDomainAuditStart(vm, "booted", true);
D
Daniel P. Berrange 已提交
1358

1359
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1360
    if (dom) dom->id = vm->def->id;
1361

1362
    if (vm &&
1363
        qemuDomainObjEndJob(driver, vm) == 0)
1364
        vm = NULL;
1365

1366 1367
cleanup:
    virDomainDefFree(def);
1368 1369
    if (vm)
        virDomainObjUnlock(vm);
1370
    if (event) {
1371
        qemuDomainEventQueue(driver, event);
1372 1373 1374
        if (event2)
            qemuDomainEventQueue(driver, event2);
    }
1375
    qemuDriverUnlock(driver);
1376
    return dom;
D
Daniel P. Berrange 已提交
1377 1378 1379
}


1380
static int qemudDomainSuspend(virDomainPtr dom) {
1381 1382 1383
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1384
    virDomainEventPtr event = NULL;
1385
    qemuDomainObjPrivatePtr priv;
1386 1387
    virDomainPausedReason reason;
    int eventDetail;
1388

1389
    qemuDriverLock(driver);
1390
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1391

D
Daniel P. Berrange 已提交
1392
    if (!vm) {
1393 1394
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1395 1396
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1397
        goto cleanup;
D
Daniel P. Berrange 已提交
1398
    }
D
Daniel P. Berrange 已提交
1399
    if (!virDomainObjIsActive(vm)) {
1400 1401
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
1402
        goto cleanup;
D
Daniel P. Berrange 已提交
1403
    }
1404 1405 1406

    priv = vm->privateData;

1407
    if (priv->job.asyncJob == QEMU_ASYNC_JOB_MIGRATION_OUT) {
1408 1409
        reason = VIR_DOMAIN_PAUSED_MIGRATION;
        eventDetail = VIR_DOMAIN_EVENT_SUSPENDED_MIGRATED;
1410
    } else {
1411 1412 1413
        reason = VIR_DOMAIN_PAUSED_USER;
        eventDetail = VIR_DOMAIN_EVENT_SUSPENDED_PAUSED;
    }
1414

1415 1416 1417 1418 1419 1420 1421 1422 1423
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_SUSPEND) < 0)
        goto cleanup;

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }
    if (virDomainObjGetState(vm, NULL) != VIR_DOMAIN_PAUSED) {
1424
        if (qemuProcessStopCPUs(driver, vm, reason, QEMU_ASYNC_JOB_NONE) < 0) {
1425
            goto endjob;
1426
        }
1427 1428 1429
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_SUSPENDED,
                                         eventDetail);
D
Daniel P. Berrange 已提交
1430
    }
1431 1432 1433
    if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
        goto endjob;
    ret = 0;
1434

1435
endjob:
1436
    if (qemuDomainObjEndJob(driver, vm) == 0)
1437
        vm = NULL;
1438

1439
cleanup:
1440 1441
    if (vm)
        virDomainObjUnlock(vm);
1442

1443
    if (event)
1444
        qemuDomainEventQueue(driver, event);
1445
    qemuDriverUnlock(driver);
1446
    return ret;
D
Daniel P. Berrange 已提交
1447 1448 1449
}


1450
static int qemudDomainResume(virDomainPtr dom) {
1451 1452 1453
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1454
    virDomainEventPtr event = NULL;
1455

1456
    qemuDriverLock(driver);
1457
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1458

D
Daniel P. Berrange 已提交
1459
    if (!vm) {
1460 1461
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1462 1463
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1464
        goto cleanup;
D
Daniel P. Berrange 已提交
1465
    }
1466

1467
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
1468 1469
        goto cleanup;

D
Daniel P. Berrange 已提交
1470
    if (!virDomainObjIsActive(vm)) {
1471 1472
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
1473
        goto endjob;
D
Daniel P. Berrange 已提交
1474
    }
J
Jiri Denemark 已提交
1475 1476
    if (virDomainObjGetState(vm, NULL) == VIR_DOMAIN_PAUSED) {
        if (qemuProcessStartCPUs(driver, vm, dom->conn,
1477 1478
                                 VIR_DOMAIN_RUNNING_UNPAUSED,
                                 QEMU_ASYNC_JOB_NONE) < 0) {
1479
            if (virGetLastError() == NULL)
1480 1481
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("resume operation failed"));
1482
            goto endjob;
1483
        }
1484 1485 1486
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_RESUMED,
                                         VIR_DOMAIN_EVENT_RESUMED_UNPAUSED);
D
Daniel P. Berrange 已提交
1487
    }
1488
    if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
1489
        goto endjob;
1490 1491
    ret = 0;

1492
endjob:
1493
    if (qemuDomainObjEndJob(driver, vm) == 0)
1494
        vm = NULL;
1495

1496
cleanup:
1497 1498
    if (vm)
        virDomainObjUnlock(vm);
1499
    if (event)
1500
        qemuDomainEventQueue(driver, event);
1501
    qemuDriverUnlock(driver);
1502
    return ret;
D
Daniel P. Berrange 已提交
1503 1504 1505
}


1506
static int qemuDomainShutdown(virDomainPtr dom) {
1507 1508 1509
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1510
    qemuDomainObjPrivatePtr priv;
1511

1512
    qemuDriverLock(driver);
1513
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1514 1515
    qemuDriverUnlock(driver);

1516
    if (!vm) {
1517 1518
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1519 1520
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1521
        goto cleanup;
1522 1523
    }

1524
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_MODIFY) < 0)
1525 1526
        goto cleanup;

D
Daniel P. Berrange 已提交
1527
    if (!virDomainObjIsActive(vm)) {
1528 1529
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
1530
        goto endjob;
1531 1532
    }

1533 1534
    qemuDomainSetFakeReboot(driver, vm, false);

1535
    priv = vm->privateData;
1536
    qemuDomainObjEnterMonitor(driver, vm);
1537
    ret = qemuMonitorSystemPowerdown(priv->mon);
1538
    qemuDomainObjExitMonitor(driver, vm);
1539

1540
endjob:
1541
    if (qemuDomainObjEndJob(driver, vm) == 0)
1542
        vm = NULL;
1543

1544
cleanup:
1545 1546
    if (vm)
        virDomainObjUnlock(vm);
1547
    return ret;
1548 1549 1550
}


1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570
static int qemuDomainReboot(virDomainPtr dom, unsigned int flags) {
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
    qemuDomainObjPrivatePtr priv;

    virCheckFlags(0, -1);

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    qemuDriverUnlock(driver);

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

1571 1572
    priv = vm->privateData;

1573
    if (qemuCapsGet(priv->qemuCaps, QEMU_CAPS_MONITOR_JSON)) {
1574 1575 1576 1577 1578 1579
        if (!qemuCapsGet(priv->qemuCaps, QEMU_CAPS_NO_SHUTDOWN)) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("Reboot is not supported with this QEMU binary"));
            goto cleanup;
        }

1580
        if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_MODIFY) < 0)
1581 1582 1583 1584 1585 1586 1587 1588
            goto cleanup;

        if (!virDomainObjIsActive(vm)) {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s", _("domain is not running"));
            goto endjob;
        }

1589
        qemuDomainObjEnterMonitor(driver, vm);
1590
        ret = qemuMonitorSystemPowerdown(priv->mon);
1591
        qemuDomainObjExitMonitor(driver, vm);
1592

1593 1594
        if (ret == 0)
            qemuDomainSetFakeReboot(driver, vm, true);
1595 1596

    endjob:
1597
        if (qemuDomainObjEndJob(driver, vm) == 0)
1598 1599
            vm = NULL;
    } else {
1600
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
1601 1602 1603 1604 1605 1606 1607 1608 1609 1610
                        _("Reboot is not supported without the JSON monitor"));
    }

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}


1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659
static int
qemuDomainReset(virDomainPtr dom, unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
    qemuDomainObjPrivatePtr priv;

    virCheckFlags(0, -1);

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    qemuDriverUnlock(driver);

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_MODIFY) < 0)
        goto cleanup;

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }

    priv = vm->privateData;
    qemuDomainObjEnterMonitor(driver, vm);
    ret = qemuMonitorSystemReset(priv->mon);
    qemuDomainObjExitMonitor(driver, vm);

    priv->fakeReboot = false;

endjob:
    if (qemuDomainObjEndJob(driver, vm) == 0)
        vm = NULL;

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}


1660 1661 1662 1663 1664 1665 1666 1667 1668 1669 1670 1671 1672
/* Count how many snapshots in a set have external disk snapshots.  */
static void
qemuDomainSnapshotCountExternal(void *payload,
                                const void *name ATTRIBUTE_UNUSED,
                                void *data)
{
    virDomainSnapshotObjPtr snap = payload;
    int *count = data;

    if (snap->def->state == VIR_DOMAIN_DISK_SNAPSHOT)
        (*count)++;
}

1673 1674 1675 1676
static int
qemuDomainDestroyFlags(virDomainPtr dom,
                       unsigned int flags)
{
1677 1678 1679
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1680
    virDomainEventPtr event = NULL;
1681
    qemuDomainObjPrivatePtr priv;
1682

1683 1684
    virCheckFlags(0, -1);

1685
    qemuDriverLock(driver);
1686
    vm  = virDomainFindByUUID(&driver->domains, dom->uuid);
D
Daniel P. Berrange 已提交
1687
    if (!vm) {
1688 1689
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1690 1691
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1692
        goto cleanup;
D
Daniel P. Berrange 已提交
1693
    }
1694

1695 1696
    priv = vm->privateData;

1697
    qemuDomainSetFakeReboot(driver, vm, false);
1698

1699 1700 1701 1702 1703
    /* Although qemuProcessStop does this already, there may
     * be an outstanding job active. We want to make sure we
     * can kill the process even if a job is active. Killing
     * it now means the job will be released
     */
1704
    qemuProcessKill(vm, false);
1705

1706 1707 1708 1709 1710
    /* We need to prevent monitor EOF callback from doing our work (and sending
     * misleading events) while the vm is unlocked inside BeginJob API
     */
    priv->beingDestroyed = true;

1711
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_DESTROY) < 0)
1712 1713
        goto cleanup;

1714 1715
    priv->beingDestroyed = false;

D
Daniel P. Berrange 已提交
1716
    if (!virDomainObjIsActive(vm)) {
1717 1718
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
1719
        goto endjob;
1720
    }
1721

J
Jiri Denemark 已提交
1722
    qemuProcessStop(driver, vm, 0, VIR_DOMAIN_SHUTOFF_DESTROYED);
1723 1724 1725
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STOPPED,
                                     VIR_DOMAIN_EVENT_STOPPED_DESTROYED);
1726
    virDomainAuditStop(vm, "destroyed");
1727

1728
    if (!vm->persistent) {
1729
        if (qemuDomainObjEndJob(driver, vm) > 0)
1730
            qemuDomainRemoveInactive(driver, vm);
1731 1732
        vm = NULL;
    }
1733 1734
    ret = 0;

1735
endjob:
1736
    if (vm &&
1737
        qemuDomainObjEndJob(driver, vm) == 0)
1738
        vm = NULL;
1739

1740
cleanup:
1741 1742
    if (vm)
        virDomainObjUnlock(vm);
1743 1744
    if (event)
        qemuDomainEventQueue(driver, event);
1745
    qemuDriverUnlock(driver);
1746
    return ret;
D
Daniel P. Berrange 已提交
1747 1748
}

1749 1750 1751 1752 1753
static int
qemuDomainDestroy(virDomainPtr dom)
{
    return qemuDomainDestroyFlags(dom, 0);
}
D
Daniel P. Berrange 已提交
1754

1755
static char *qemudDomainGetOSType(virDomainPtr dom) {
1756 1757 1758
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    char *type = NULL;
1759

1760
    qemuDriverLock(driver);
1761
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1762
    qemuDriverUnlock(driver);
1763
    if (!vm) {
1764 1765
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1766 1767
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1768
        goto cleanup;
1769 1770
    }

1771
    if (!(type = strdup(vm->def->os.type)))
1772
        virReportOOMError();
1773 1774

cleanup:
1775 1776
    if (vm)
        virDomainObjUnlock(vm);
1777 1778 1779
    return type;
}

1780 1781
/* Returns max memory in kb, 0 if error */
static unsigned long qemudDomainGetMaxMemory(virDomainPtr dom) {
1782 1783 1784
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    unsigned long ret = 0;
1785

1786
    qemuDriverLock(driver);
1787
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1788 1789
    qemuDriverUnlock(driver);

1790
    if (!vm) {
1791 1792
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1793 1794
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1795
        goto cleanup;
1796 1797
    }

1798
    ret = vm->def->mem.max_balloon;
1799 1800

cleanup:
1801 1802
    if (vm)
        virDomainObjUnlock(vm);
1803
    return ret;
1804 1805
}

1806 1807
static int qemudDomainSetMemoryFlags(virDomainPtr dom, unsigned long newmem,
                                     unsigned int flags) {
1808
    struct qemud_driver *driver = dom->conn->privateData;
1809
    qemuDomainObjPrivatePtr priv;
1810
    virDomainObjPtr vm;
1811
    virDomainDefPtr persistentDef = NULL;
1812
    int ret = -1, r;
1813
    bool isActive;
1814

1815 1816
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG |
1817
                  VIR_DOMAIN_MEM_MAXIMUM, -1);
1818

1819
    qemuDriverLock(driver);
1820
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1821
    qemuDriverUnlock(driver);
1822
    if (!vm) {
1823 1824
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1825 1826
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1827
        goto cleanup;
1828 1829
    }

1830
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_MODIFY) < 0)
1831 1832
        goto cleanup;

1833 1834
    isActive = virDomainObjIsActive(vm);

1835
    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
1836
        if (isActive)
1837
            flags = VIR_DOMAIN_AFFECT_LIVE;
1838
        else
1839
            flags = VIR_DOMAIN_AFFECT_CONFIG;
1840
    }
1841 1842
    if (flags == VIR_DOMAIN_MEM_MAXIMUM) {
        if (isActive)
1843
            flags = VIR_DOMAIN_AFFECT_LIVE | VIR_DOMAIN_MEM_MAXIMUM;
1844
        else
1845
            flags = VIR_DOMAIN_AFFECT_CONFIG | VIR_DOMAIN_MEM_MAXIMUM;
1846
    }
1847

1848
    if (!isActive && (flags & VIR_DOMAIN_AFFECT_LIVE)) {
1849 1850 1851 1852 1853
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }

1854
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
1855 1856 1857 1858 1859 1860 1861 1862
        if (!vm->persistent) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("cannot change persistent config of a transient domain"));
            goto endjob;
        }
        if (!(persistentDef = virDomainObjGetPersistentDef(driver->caps, vm)))
            goto endjob;
    }
1863

1864 1865 1866
    if (flags & VIR_DOMAIN_MEM_MAXIMUM) {
        /* resize the maximum memory */

1867
        if (flags & VIR_DOMAIN_AFFECT_LIVE) {
1868 1869 1870
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("cannot resize the maximum memory on an "
                              "active domain"));
1871
            goto endjob;
1872
        }
1873

1874
        if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
E
Eric Blake 已提交
1875 1876
            /* Help clang 2.8 decipher the logic flow.  */
            sa_assert(persistentDef);
1877 1878 1879 1880
            persistentDef->mem.max_balloon = newmem;
            if (persistentDef->mem.cur_balloon > newmem)
                persistentDef->mem.cur_balloon = newmem;
            ret = virDomainSaveConfig(driver->configDir, persistentDef);
1881 1882 1883
            goto endjob;
        }

1884 1885 1886 1887 1888 1889 1890 1891 1892
    } else {
        /* resize the current memory */

        if (newmem > vm->def->mem.max_balloon) {
            qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                            _("cannot set memory higher than max memory"));
            goto endjob;
        }

1893
        if (flags & VIR_DOMAIN_AFFECT_LIVE) {
1894
            priv = vm->privateData;
1895
            qemuDomainObjEnterMonitor(driver, vm);
1896
            r = qemuMonitorSetBalloon(priv->mon, newmem);
1897
            qemuDomainObjExitMonitor(driver, vm);
1898 1899
            virDomainAuditMemory(vm, vm->def->mem.cur_balloon, newmem, "update",
                                 r == 1);
1900 1901 1902 1903 1904 1905 1906 1907 1908 1909 1910
            if (r < 0)
                goto endjob;

            /* Lack of balloon support is a fatal error */
            if (r == 0) {
                qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                                _("cannot set memory of an active domain"));
                goto endjob;
            }
        }

1911
        if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
E
Eric Blake 已提交
1912
            sa_assert(persistentDef);
1913 1914 1915 1916
            persistentDef->mem.cur_balloon = newmem;
            ret = virDomainSaveConfig(driver->configDir, persistentDef);
            goto endjob;
        }
1917
    }
1918

1919
    ret = 0;
1920
endjob:
1921
    if (qemuDomainObjEndJob(driver, vm) == 0)
1922
        vm = NULL;
1923

1924
cleanup:
1925 1926
    if (vm)
        virDomainObjUnlock(vm);
1927
    return ret;
1928 1929
}

1930 1931
static int qemudDomainSetMemory(virDomainPtr dom, unsigned long newmem)
{
1932
    return qemudDomainSetMemoryFlags(dom, newmem, VIR_DOMAIN_AFFECT_LIVE);
1933 1934
}

1935 1936 1937 1938 1939
static int qemudDomainSetMaxMemory(virDomainPtr dom, unsigned long memory)
{
    return qemudDomainSetMemoryFlags(dom, memory, VIR_DOMAIN_MEM_MAXIMUM);
}

1940 1941 1942 1943 1944 1945 1946 1947 1948 1949 1950 1951 1952 1953 1954 1955 1956 1957 1958 1959 1960 1961 1962 1963 1964 1965 1966
static int qemuDomainInjectNMI(virDomainPtr domain, unsigned int flags)
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int ret = -1;
    qemuDomainObjPrivatePtr priv;

    virCheckFlags(0, -1);

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, domain->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(domain->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

    priv = vm->privateData;

1967
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
1968
        goto cleanup;
1969 1970 1971 1972 1973 1974 1975

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }

1976
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
1977 1978
    ret = qemuMonitorInjectNMI(priv->mon);
    qemuDomainObjExitMonitorWithDriver(driver, vm);
1979 1980

endjob:
1981
    if (qemuDomainObjEndJob(driver, vm) == 0) {
1982 1983 1984 1985 1986 1987 1988 1989 1990 1991 1992
        vm = NULL;
        goto cleanup;
    }

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006
static int qemuDomainSendKey(virDomainPtr domain,
                             unsigned int codeset,
                             unsigned int holdtime,
                             unsigned int *keycodes,
                             int nkeycodes,
                             unsigned int flags)
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int ret = -1;
    qemuDomainObjPrivatePtr priv;

    virCheckFlags(0, -1);

2007 2008
    /* translate the keycode to RFB for qemu driver */
    if (codeset != VIR_KEYCODE_SET_RFB) {
2009 2010 2011 2012
        int i;
        int keycode;

        for (i = 0; i < nkeycodes; i++) {
2013
            keycode = virKeycodeValueTranslate(codeset, VIR_KEYCODE_SET_RFB,
2014 2015 2016
                                               keycodes[i]);
            if (keycode < 0) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
2017
             _("cannot translate keycode %u of %s codeset to rfb keycode"),
2018 2019 2020 2021 2022 2023 2024 2025 2026 2027 2028 2029 2030 2031 2032 2033 2034 2035 2036 2037 2038 2039 2040 2041 2042 2043
                                keycodes[i],
                                virKeycodeSetTypeToString(codeset));
                return -1;
            }
            keycodes[i] = keycode;
        }
    }

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, domain->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(domain->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    priv = vm->privateData;

    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
        goto cleanup;

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
2044
        goto endjob;
2045 2046
    }

2047
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
2048 2049
    ret = qemuMonitorSendKey(priv->mon, holdtime, keycodes, nkeycodes);
    qemuDomainObjExitMonitorWithDriver(driver, vm);
2050 2051 2052

endjob:
    if (qemuDomainObjEndJob(driver, vm) == 0)
2053 2054 2055 2056 2057 2058 2059 2060 2061
        vm = NULL;

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

2062
static int qemudDomainGetInfo(virDomainPtr dom,
2063 2064
                              virDomainInfoPtr info)
{
2065 2066 2067
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
2068 2069
    int err;
    unsigned long balloon;
2070

2071
    qemuDriverLock(driver);
2072
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
2073
    qemuDriverUnlock(driver);
D
Daniel P. Berrange 已提交
2074
    if (!vm) {
2075 2076
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
2077 2078
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
2079
        goto cleanup;
D
Daniel P. Berrange 已提交
2080 2081
    }

J
Jiri Denemark 已提交
2082
    info->state = virDomainObjGetState(vm, NULL);
D
Daniel P. Berrange 已提交
2083

D
Daniel P. Berrange 已提交
2084
    if (!virDomainObjIsActive(vm)) {
2085
        info->cpuTime = 0;
D
Daniel P. Berrange 已提交
2086
    } else {
2087
        if (qemudGetProcessInfo(&(info->cpuTime), NULL, vm->pid, 0) < 0) {
E
Eric Blake 已提交
2088 2089
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("cannot read cputime for domain"));
2090
            goto cleanup;
D
Daniel P. Berrange 已提交
2091 2092 2093
        }
    }

2094
    info->maxMem = vm->def->mem.max_balloon;
2095

D
Daniel P. Berrange 已提交
2096
    if (virDomainObjIsActive(vm)) {
2097
        qemuDomainObjPrivatePtr priv = vm->privateData;
2098 2099 2100

        if ((vm->def->memballoon != NULL) &&
            (vm->def->memballoon->model == VIR_DOMAIN_MEMBALLOON_MODEL_NONE)) {
2101
            info->memory = vm->def->mem.max_balloon;
2102
        } else if (qemuDomainJobAllowed(priv, QEMU_JOB_QUERY)) {
2103
            if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_QUERY) < 0)
2104
                goto cleanup;
2105 2106 2107
            if (!virDomainObjIsActive(vm))
                err = 0;
            else {
2108
                qemuDomainObjEnterMonitor(driver, vm);
2109
                err = qemuMonitorGetBalloonInfo(priv->mon, &balloon);
2110
                qemuDomainObjExitMonitor(driver, vm);
2111
            }
2112
            if (qemuDomainObjEndJob(driver, vm) == 0) {
2113
                vm = NULL;
2114 2115 2116
                goto cleanup;
            }

2117 2118 2119 2120 2121 2122 2123
            if (err < 0) {
                /* We couldn't get current memory allocation but that's not
                 * a show stopper; we wouldn't get it if there was a job
                 * active either
                 */
                info->memory = vm->def->mem.cur_balloon;
            } else if (err == 0) {
2124
                /* Balloon not supported, so maxmem is always the allocation */
2125
                info->memory = vm->def->mem.max_balloon;
2126
            } else {
2127
                info->memory = balloon;
2128
            }
2129
        } else {
2130
            info->memory = vm->def->mem.cur_balloon;
2131
        }
2132
    } else {
2133
        info->memory = vm->def->mem.cur_balloon;
2134 2135
    }

2136
    info->nrVirtCpu = vm->def->vcpus;
2137 2138 2139
    ret = 0;

cleanup:
2140 2141
    if (vm)
        virDomainObjUnlock(vm);
2142
    return ret;
D
Daniel P. Berrange 已提交
2143 2144
}

2145 2146 2147 2148 2149 2150 2151 2152 2153 2154 2155 2156 2157 2158 2159 2160 2161 2162 2163 2164 2165 2166 2167 2168
static int
qemuDomainGetState(virDomainPtr dom,
                   int *state,
                   int *reason,
                   unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;

    virCheckFlags(0, -1);

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    qemuDriverUnlock(driver);

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

J
Jiri Denemark 已提交
2169
    *state = virDomainObjGetState(vm, reason);
2170 2171 2172 2173 2174 2175 2176 2177
    ret = 0;

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}

2178 2179 2180 2181 2182 2183 2184 2185 2186 2187 2188 2189 2190 2191 2192 2193 2194 2195 2196 2197 2198 2199 2200 2201 2202 2203 2204 2205 2206 2207 2208 2209 2210 2211 2212 2213
static int
qemuDomainGetControlInfo(virDomainPtr dom,
                          virDomainControlInfoPtr info,
                          unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    qemuDomainObjPrivatePtr priv;
    int ret = -1;

    virCheckFlags(0, -1);

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    qemuDriverUnlock(driver);

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

    priv = vm->privateData;

    memset(info, 0, sizeof(*info));

    if (priv->monError) {
        info->state = VIR_DOMAIN_CONTROL_ERROR;
2214
    } else if (priv->job.active) {
2215 2216
        if (!priv->monStart) {
            info->state = VIR_DOMAIN_CONTROL_JOB;
2217
            if (virTimeMillisNow(&info->stateTime) < 0)
2218
                goto cleanup;
2219
            info->stateTime -= priv->job.start;
2220 2221
        } else {
            info->state = VIR_DOMAIN_CONTROL_OCCUPIED;
2222
            if (virTimeMillisNow(&info->stateTime) < 0)
2223 2224 2225 2226 2227 2228 2229 2230 2231 2232 2233 2234 2235 2236 2237
                goto cleanup;
            info->stateTime -= priv->monStart;
        }
    } else {
        info->state = VIR_DOMAIN_CONTROL_OK;
    }

    ret = 0;

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}

D
Daniel P. Berrange 已提交
2238

E
Eric Blake 已提交
2239 2240
#define QEMUD_SAVE_MAGIC   "LibvirtQemudSave"
#define QEMUD_SAVE_PARTIAL "LibvirtQemudPart"
2241 2242
#define QEMUD_SAVE_VERSION 2

E
Eric Blake 已提交
2243 2244
verify(sizeof(QEMUD_SAVE_MAGIC) == sizeof(QEMUD_SAVE_PARTIAL));

2245
enum qemud_save_formats {
2246 2247 2248
    QEMUD_SAVE_FORMAT_RAW = 0,
    QEMUD_SAVE_FORMAT_GZIP = 1,
    QEMUD_SAVE_FORMAT_BZIP2 = 2,
2249 2250
    /*
     * Deprecated by xz and never used as part of a release
2251
     * QEMUD_SAVE_FORMAT_LZMA
2252 2253
     */
    QEMUD_SAVE_FORMAT_XZ = 3,
2254
    QEMUD_SAVE_FORMAT_LZOP = 4,
2255 2256 2257
    /* Note: add new members only at the end.
       These values are used in the on-disk format.
       Do not change or re-use numbers. */
2258 2259

    QEMUD_SAVE_FORMAT_LAST
2260
};
2261

2262 2263 2264 2265 2266
VIR_ENUM_DECL(qemudSaveCompression)
VIR_ENUM_IMPL(qemudSaveCompression, QEMUD_SAVE_FORMAT_LAST,
              "raw",
              "gzip",
              "bzip2",
2267 2268
              "xz",
              "lzop")
2269

2270 2271
struct qemud_save_header {
    char magic[sizeof(QEMUD_SAVE_MAGIC)-1];
2272 2273 2274 2275 2276
    uint32_t version;
    uint32_t xml_len;
    uint32_t was_running;
    uint32_t compressed;
    uint32_t unused[15];
2277 2278
};

2279 2280 2281 2282 2283 2284 2285 2286 2287
static inline void
bswap_header(struct qemud_save_header *hdr) {
    hdr->version = bswap_32(hdr->version);
    hdr->xml_len = bswap_32(hdr->xml_len);
    hdr->was_running = bswap_32(hdr->was_running);
    hdr->compressed = bswap_32(hdr->compressed);
}


2288
/* return -errno on failure, or 0 on success */
E
Eric Blake 已提交
2289 2290 2291 2292
static int
qemuDomainSaveHeader(int fd, const char *path, char *xml,
                     struct qemud_save_header *header)
{
2293 2294
    int ret = 0;

E
Eric Blake 已提交
2295
    if (safewrite(fd, header, sizeof(*header)) != sizeof(*header)) {
2296
        ret = -errno;
2297
        qemuReportError(VIR_ERR_OPERATION_FAILED,
2298
                        _("failed to write header to domain save file '%s'"),
E
Eric Blake 已提交
2299
                        path);
2300 2301 2302
        goto endjob;
    }

E
Eric Blake 已提交
2303
    if (safewrite(fd, xml, header->xml_len) != header->xml_len) {
2304
        ret = -errno;
2305
        qemuReportError(VIR_ERR_OPERATION_FAILED,
E
Eric Blake 已提交
2306
                         _("failed to write xml to '%s'"), path);
2307 2308 2309 2310 2311 2312
        goto endjob;
    }
endjob:
    return ret;
}

2313 2314 2315 2316 2317 2318 2319 2320 2321
/* Given a enum qemud_save_formats compression level, return the name
 * of the program to run, or NULL if no program is needed.  */
static const char *
qemuCompressProgramName(int compress)
{
    return (compress == QEMUD_SAVE_FORMAT_RAW ? NULL :
            qemudSaveCompressionTypeToString(compress));
}

E
Eric Blake 已提交
2322 2323 2324 2325 2326 2327 2328 2329 2330 2331 2332 2333 2334 2335 2336 2337 2338 2339 2340 2341 2342 2343 2344 2345 2346 2347 2348 2349 2350 2351 2352 2353 2354 2355 2356 2357 2358 2359 2360 2361 2362 2363 2364 2365 2366 2367 2368 2369 2370 2371 2372 2373 2374 2375 2376 2377 2378 2379 2380 2381 2382 2383 2384 2385 2386 2387 2388 2389 2390 2391 2392 2393 2394 2395 2396 2397 2398 2399 2400 2401 2402 2403 2404 2405 2406 2407 2408 2409 2410 2411 2412 2413 2414 2415 2416 2417 2418 2419 2420 2421 2422 2423 2424 2425 2426 2427 2428
/* Internal function to properly create or open existing files, with
 * ownership affected by qemu driver setup.  */
static int
qemuOpenFile(struct qemud_driver *driver, const char *path, int oflags,
             bool *needUnlink, bool *bypassSecurityDriver)
{
    struct stat sb;
    bool is_reg = true;
    bool need_unlink = false;
    bool bypass_security = false;
    int fd = -1;
    uid_t uid = getuid();
    gid_t gid = getgid();

    /* path might be a pre-existing block dev, in which case
     * we need to skip the create step, and also avoid unlink
     * in the failure case */
    if (oflags & O_CREAT) {
        need_unlink = true;
        if (stat(path, &sb) == 0) {
            is_reg = !!S_ISREG(sb.st_mode);
            /* If the path is regular file which exists
             * already and dynamic_ownership is off, we don't
             * want to change it's ownership, just open it as-is */
            if (is_reg && !driver->dynamicOwnership) {
                uid = sb.st_uid;
                gid = sb.st_gid;
            }
        }
    }

    /* First try creating the file as root */
    if (!is_reg) {
        fd = open(path, oflags & ~O_CREAT);
        if (fd < 0) {
            virReportSystemError(errno, _("unable to open %s"), path);
            goto cleanup;
        }
    } else {
        if ((fd = virFileOpenAs(path, oflags, S_IRUSR | S_IWUSR,
                                uid, gid, 0)) < 0) {
            /* If we failed as root, and the error was permission-denied
               (EACCES or EPERM), assume it's on a network-connected share
               where root access is restricted (eg, root-squashed NFS). If the
               qemu user (driver->user) is non-root, just set a flag to
               bypass security driver shenanigans, and retry the operation
               after doing setuid to qemu user */
            if ((fd != -EACCES && fd != -EPERM) ||
                driver->user == getuid()) {
                virReportSystemError(-fd,
                                     _("Failed to create file '%s'"),
                                     path);
                goto cleanup;
            }

            /* On Linux we can also verify the FS-type of the directory. */
            switch (virStorageFileIsSharedFS(path)) {
                case 1:
                   /* it was on a network share, so we'll continue
                    * as outlined above
                    */
                   break;

                case -1:
                   virReportSystemError(errno,
                                        _("Failed to create file "
                                          "'%s': couldn't determine fs type"),
                                        path);
                   goto cleanup;

                case 0:
                default:
                   /* local file - log the error returned by virFileOpenAs */
                   virReportSystemError(-fd,
                                        _("Failed to create file '%s'"),
                                        path);
                   goto cleanup;
            }

            /* Retry creating the file as driver->user */

            if ((fd = virFileOpenAs(path, oflags,
                                    S_IRUSR|S_IWUSR|S_IRGRP|S_IWGRP,
                                    driver->user, driver->group,
                                    VIR_FILE_OPEN_AS_UID)) < 0) {
                virReportSystemError(-fd,
                                   _("Error from child process creating '%s'"),
                                     path);
                goto cleanup;
            }

            /* Since we had to setuid to create the file, and the fstype
               is NFS, we assume it's a root-squashing NFS share, and that
               the security driver stuff would have failed anyway */

            bypass_security = true;
        }
    }
cleanup:
    if (needUnlink)
        *needUnlink = need_unlink;
    if (bypassSecurityDriver)
        *bypassSecurityDriver = bypass_security;

    return fd;
}

2429
/* This internal function expects the driver lock to already be held on
2430 2431 2432 2433
 * entry and the vm must be active + locked. Vm will be unlocked and
 * potentially free'd after this returns (eg transient VMs are freed
 * shutdown). So 'vm' must not be referenced by the caller after
 * this returns (whether returning success or failure).
2434
 */
2435 2436 2437
static int
qemuDomainSaveInternal(struct qemud_driver *driver, virDomainPtr dom,
                       virDomainObjPtr vm, const char *path,
2438
                       int compressed, const char *xmlin, unsigned int flags)
2439
{
2440
    char *xml = NULL;
2441
    struct qemud_save_header header;
2442
    bool bypassSecurityDriver = false;
2443
    int ret = -1;
2444
    int rc;
2445
    virDomainEventPtr event = NULL;
2446
    qemuDomainObjPrivatePtr priv;
E
Eric Blake 已提交
2447
    bool needUnlink = false;
2448
    size_t len;
2449
    unsigned long long offset;
2450
    unsigned long long pad;
2451
    int fd = -1;
2452 2453
    int directFlag = 0;
    virFileDirectFdPtr directFd = NULL;
2454
    bool bypass_cache = flags & VIR_DOMAIN_SAVE_BYPASS_CACHE;
2455

2456 2457 2458
    if (qemuProcessAutoDestroyActive(driver, vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is marked for auto destroy"));
2459
        goto cleanup;
2460 2461
    }

2462
    memset(&header, 0, sizeof(header));
E
Eric Blake 已提交
2463
    memcpy(header.magic, QEMUD_SAVE_PARTIAL, sizeof(header.magic));
2464 2465
    header.version = QEMUD_SAVE_VERSION;

2466
    header.compressed = compressed;
2467

2468
    priv = vm->privateData;
2469

2470 2471
    if (qemuDomainObjBeginAsyncJobWithDriver(driver, vm,
                                             QEMU_ASYNC_JOB_SAVE) < 0)
2472 2473
        goto cleanup;

2474 2475
    memset(&priv->job.info, 0, sizeof(priv->job.info));
    priv->job.info.type = VIR_DOMAIN_JOB_UNBOUNDED;
2476

2477
    /* Pause */
J
Jiri Denemark 已提交
2478
    if (virDomainObjGetState(vm, NULL) == VIR_DOMAIN_RUNNING) {
2479
        header.was_running = 1;
2480 2481
        if (qemuProcessStopCPUs(driver, vm, VIR_DOMAIN_PAUSED_SAVE,
                                QEMU_ASYNC_JOB_SAVE) < 0)
2482
            goto endjob;
2483 2484 2485 2486 2487 2488

        if (!virDomainObjIsActive(vm)) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("guest unexpectedly quit"));
            goto endjob;
        }
2489
    }
2490 2491 2492 2493 2494
    /* libvirt.c already guaranteed these two flags are exclusive.  */
    if (flags & VIR_DOMAIN_SAVE_RUNNING)
        header.was_running = 1;
    else if (flags & VIR_DOMAIN_SAVE_PAUSED)
        header.was_running = 0;
2495

2496 2497 2498 2499 2500 2501 2502 2503 2504 2505 2506 2507 2508 2509 2510 2511 2512 2513 2514 2515 2516 2517
    /* Get XML for the domain.  Restore needs only the inactive xml,
     * including secure.  We should get the same result whether xmlin
     * is NULL or whether it was the live xml of the domain moments
     * before.  */
    if (xmlin) {
        virDomainDefPtr def = NULL;

        if (!(def = virDomainDefParseString(driver->caps, xmlin,
                                            QEMU_EXPECTED_VIRT_TYPES,
                                            VIR_DOMAIN_XML_INACTIVE))) {
            goto endjob;
        }
        if (!virDomainDefCheckABIStability(vm->def, def)) {
            virDomainDefFree(def);
            goto endjob;
        }
        xml = virDomainDefFormat(def, (VIR_DOMAIN_XML_INACTIVE |
                                       VIR_DOMAIN_XML_SECURE));
    } else {
        xml = virDomainDefFormat(vm->def, (VIR_DOMAIN_XML_INACTIVE |
                                           VIR_DOMAIN_XML_SECURE));
    }
2518
    if (!xml) {
2519 2520
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to get domain xml"));
2521
        goto endjob;
2522
    }
2523 2524 2525 2526 2527 2528 2529 2530 2531 2532 2533 2534 2535 2536 2537 2538 2539 2540 2541 2542
    len = strlen(xml) + 1;
    offset = sizeof(header) + len;

    /* Due to way we append QEMU state on our header with dd,
     * we need to ensure there's a 512 byte boundary. Unfortunately
     * we don't have an explicit offset in the header, so we fake
     * it by padding the XML string with NUL bytes.  Additionally,
     * we want to ensure that virDomainSaveImageDefineXML can supply
     * slightly larger XML, so we add a miminum padding prior to
     * rounding out to page boundaries.
     */
    pad = 1024;
    pad += (QEMU_MONITOR_MIGRATE_TO_FILE_BS -
            ((offset + pad) % QEMU_MONITOR_MIGRATE_TO_FILE_BS));
    if (VIR_EXPAND_N(xml, len, pad) < 0) {
        virReportOOMError();
        goto endjob;
    }
    offset += pad;
    header.xml_len = len;
2543

2544
    /* Obtain the file handle.  */
2545 2546 2547 2548 2549
    if (bypass_cache) {
        directFlag = virFileDirectFdFlag();
        if (directFlag < 0) {
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("bypass cache unsupported by this system"));
E
Eric Blake 已提交
2550
            goto cleanup;
2551
        }
2552
    }
E
Eric Blake 已提交
2553 2554 2555 2556
    fd = qemuOpenFile(driver, path, O_WRONLY | O_TRUNC | O_CREAT | directFlag,
                      &needUnlink, &bypassSecurityDriver);
    if (fd < 0)
        goto endjob;
2557 2558 2559
    if (bypass_cache && (directFd = virFileDirectFdNew(&fd, path)) == NULL)
        goto endjob;

2560
    /* Write header to file, followed by XML */
E
Eric Blake 已提交
2561
    if (qemuDomainSaveHeader(fd, path, xml, &header) < 0) {
2562 2563 2564 2565
        VIR_FORCE_CLOSE(fd);
        goto endjob;
    }

2566
    /* Perform the migration */
2567
    if (qemuMigrationToFile(driver, vm, fd, offset, path,
2568
                            qemuCompressProgramName(compressed),
E
Eric Blake 已提交
2569
                            bypassSecurityDriver,
2570
                            QEMU_ASYNC_JOB_SAVE) < 0)
2571
        goto endjob;
E
Eric Blake 已提交
2572 2573 2574 2575 2576 2577 2578 2579 2580 2581 2582 2583 2584 2585 2586 2587 2588 2589 2590 2591 2592 2593 2594 2595 2596 2597 2598

    /* Touch up file header to mark image complete.  */
    if (bypass_cache) {
        /* Reopen the file to touch up the header, since we aren't set
         * up to seek backwards on directFd.  The reopened fd will
         * trigger a single page of file system cache pollution, but
         * that's acceptable.  */
        if (VIR_CLOSE(fd) < 0) {
            virReportSystemError(errno, _("unable to close %s"), path);
            goto endjob;
        }
        if (virFileDirectFdClose(directFd) < 0)
            goto endjob;
        fd = qemuOpenFile(driver, path, O_WRONLY, NULL, NULL);
        if (fd < 0)
            goto endjob;
    } else {
        if (lseek(fd, 0, SEEK_SET) != 0) {
            virReportSystemError(errno, _("unable to seek %s"), path);
            goto endjob;
        }
    }
    memcpy(header.magic, QEMUD_SAVE_MAGIC, sizeof(header.magic));
    if (safewrite(fd, &header, sizeof(header)) != sizeof(header)) {
        virReportSystemError(errno, _("unable to write %s"), path);
        goto endjob;
    }
2599 2600
    if (VIR_CLOSE(fd) < 0) {
        virReportSystemError(errno, _("unable to close %s"), path);
2601
        goto endjob;
2602 2603
    }

2604 2605
    ret = 0;

2606
    /* Shut it down */
J
Jiri Denemark 已提交
2607
    qemuProcessStop(driver, vm, 0, VIR_DOMAIN_SHUTOFF_SAVED);
2608
    virDomainAuditStop(vm, "saved");
2609 2610 2611
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STOPPED,
                                     VIR_DOMAIN_EVENT_STOPPED_SAVED);
2612
    if (!vm->persistent) {
2613
        if (qemuDomainObjEndAsyncJob(driver, vm) > 0)
2614
            qemuDomainRemoveInactive(driver, vm);
2615 2616
        vm = NULL;
    }
2617

2618
endjob:
2619
    if (vm) {
2620
        if (ret != 0) {
2621
            if (header.was_running && virDomainObjIsActive(vm)) {
J
Jiri Denemark 已提交
2622
                rc = qemuProcessStartCPUs(driver, vm, dom->conn,
2623 2624
                                          VIR_DOMAIN_RUNNING_SAVE_CANCELED,
                                          QEMU_ASYNC_JOB_SAVE);
2625
                if (rc < 0)
2626
                    VIR_WARN("Unable to resume guest CPUs after save failure");
2627
            }
2628
        }
2629
        if (qemuDomainObjEndAsyncJob(driver, vm) == 0)
2630
            vm = NULL;
2631
    }
2632

2633
cleanup:
2634
    VIR_FORCE_CLOSE(fd);
2635
    virFileDirectFdFree(directFd);
2636
    VIR_FREE(xml);
E
Eric Blake 已提交
2637
    if (ret != 0 && needUnlink)
2638
        unlink(path);
2639 2640
    if (event)
        qemuDomainEventQueue(driver, event);
2641 2642
    if (vm)
        virDomainObjUnlock(vm);
2643
    return ret;
D
Daniel P. Berrange 已提交
2644 2645
}

2646 2647 2648 2649 2650 2651 2652 2653 2654 2655 2656 2657 2658 2659 2660 2661
/* Returns true if a compression program is available in PATH */
static bool qemudCompressProgramAvailable(enum qemud_save_formats compress)
{
    const char *prog;
    char *c;

    if (compress == QEMUD_SAVE_FORMAT_RAW)
        return true;
    prog = qemudSaveCompressionTypeToString(compress);
    c = virFindFileInPath(prog);
    if (!c)
        return false;
    VIR_FREE(c);
    return true;
}

2662 2663 2664
static int
qemuDomainSaveFlags(virDomainPtr dom, const char *path, const char *dxml,
                    unsigned int flags)
2665 2666 2667
{
    struct qemud_driver *driver = dom->conn->privateData;
    int compressed;
2668 2669 2670
    int ret = -1;
    virDomainObjPtr vm = NULL;

2671 2672 2673
    virCheckFlags(VIR_DOMAIN_SAVE_BYPASS_CACHE |
                  VIR_DOMAIN_SAVE_RUNNING |
                  VIR_DOMAIN_SAVE_PAUSED, -1);
2674

2675
    qemuDriverLock(driver);
2676 2677 2678 2679 2680 2681 2682 2683 2684

    if (driver->saveImageFormat == NULL)
        compressed = QEMUD_SAVE_FORMAT_RAW;
    else {
        compressed = qemudSaveCompressionTypeFromString(driver->saveImageFormat);
        if (compressed < 0) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("Invalid save image format specified "
                                    "in configuration file"));
2685
            goto cleanup;
2686
        }
2687 2688 2689 2690
        if (!qemudCompressProgramAvailable(compressed)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("Compression program for image format "
                                    "in configuration file isn't available"));
2691
            goto cleanup;
2692
        }
2693 2694
    }

2695 2696 2697 2698 2699 2700 2701 2702 2703
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

2704 2705 2706 2707 2708 2709
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

2710
    ret = qemuDomainSaveInternal(driver, dom, vm, path, compressed,
2711
                                 dxml, flags);
2712
    vm = NULL;
2713 2714 2715 2716 2717 2718 2719

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);

    return ret;
2720 2721
}

2722 2723 2724 2725 2726 2727
static int
qemuDomainSave(virDomainPtr dom, const char *path)
{
    return qemuDomainSaveFlags(dom, path, NULL, 0);
}

2728 2729 2730 2731 2732 2733 2734 2735 2736 2737 2738 2739 2740 2741 2742 2743 2744 2745 2746 2747 2748
static char *
qemuDomainManagedSavePath(struct qemud_driver *driver, virDomainObjPtr vm) {
    char *ret;

    if (virAsprintf(&ret, "%s/%s.save", driver->saveDir, vm->def->name) < 0) {
        virReportOOMError();
        return(NULL);
    }

    return(ret);
}

static int
qemuDomainManagedSave(virDomainPtr dom, unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm = NULL;
    char *name = NULL;
    int ret = -1;
    int compressed;

2749 2750 2751
    virCheckFlags(VIR_DOMAIN_SAVE_BYPASS_CACHE |
                  VIR_DOMAIN_SAVE_RUNNING |
                  VIR_DOMAIN_SAVE_PAUSED, -1);
2752 2753 2754 2755 2756 2757 2758 2759

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
2760
        goto cleanup;
2761 2762
    }

2763 2764 2765 2766 2767
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }
2768 2769 2770 2771 2772
    if (!vm->persistent) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("cannot do managed save for transient domain"));
        goto cleanup;
    }
2773

2774 2775
    name = qemuDomainManagedSavePath(driver, vm);
    if (name == NULL)
2776
        goto cleanup;
2777

2778
    VIR_INFO("Saving state to %s", name);
2779 2780

    compressed = QEMUD_SAVE_FORMAT_RAW;
2781
    ret = qemuDomainSaveInternal(driver, dom, vm, name, compressed,
2782
                                 NULL, flags);
2783
    vm = NULL;
2784 2785 2786 2787 2788

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
2789 2790 2791
    VIR_FREE(name);

    return ret;
2792 2793 2794 2795 2796 2797 2798 2799 2800 2801
}

static int
qemuDomainHasManagedSaveImage(virDomainPtr dom, unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm = NULL;
    int ret = -1;
    char *name = NULL;

2802
    virCheckFlags(0, -1);
2803 2804 2805 2806 2807 2808 2809 2810 2811 2812 2813 2814 2815 2816 2817 2818 2819 2820 2821 2822 2823 2824 2825 2826 2827 2828 2829 2830 2831 2832 2833 2834 2835

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    name = qemuDomainManagedSavePath(driver, vm);
    if (name == NULL)
        goto cleanup;

    ret = virFileExists(name);

cleanup:
    VIR_FREE(name);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

static int
qemuDomainManagedSaveRemove(virDomainPtr dom, unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm = NULL;
    int ret = -1;
    char *name = NULL;

2836
    virCheckFlags(0, -1);
2837 2838 2839 2840 2841 2842 2843 2844 2845 2846 2847 2848 2849 2850 2851 2852 2853 2854 2855 2856 2857 2858 2859 2860

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    name = qemuDomainManagedSavePath(driver, vm);
    if (name == NULL)
        goto cleanup;

    ret = unlink(name);

cleanup:
    VIR_FREE(name);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}
D
Daniel P. Berrange 已提交
2861

2862 2863 2864 2865
static int
doCoreDump(struct qemud_driver *driver,
           virDomainObjPtr vm,
           const char *path,
2866 2867
           enum qemud_save_formats compress,
           bool bypass_cache)
H
Hu Tao 已提交
2868 2869 2870
{
    int fd = -1;
    int ret = -1;
2871 2872
    virFileDirectFdPtr directFd = NULL;
    int directFlag = 0;
H
Hu Tao 已提交
2873 2874

    /* Create an empty file with appropriate ownership.  */
2875 2876 2877 2878 2879 2880 2881 2882
    if (bypass_cache) {
        directFlag = virFileDirectFdFlag();
        if (directFlag < 0) {
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("bypass cache unsupported by this system"));
            goto cleanup;
        }
    }
E
Eric Blake 已提交
2883 2884 2885 2886 2887 2888
    /* Core dumps usually imply last-ditch analysis efforts are
     * desired, so we intentionally do not unlink even if a file was
     * created.  */
    if ((fd = qemuOpenFile(driver, path,
                           O_CREAT | O_TRUNC | O_WRONLY | directFlag,
                           NULL, NULL)) < 0)
H
Hu Tao 已提交
2889 2890
        goto cleanup;

2891 2892 2893
    if (bypass_cache && (directFd = virFileDirectFdNew(&fd, path)) == NULL)
        goto cleanup;

2894
    if (qemuMigrationToFile(driver, vm, fd, 0, path,
E
Eric Blake 已提交
2895
                            qemuCompressProgramName(compress), false,
2896
                            QEMU_ASYNC_JOB_DUMP) < 0)
2897 2898
        goto cleanup;

H
Hu Tao 已提交
2899 2900 2901 2902 2903 2904
    if (VIR_CLOSE(fd) < 0) {
        virReportSystemError(errno,
                             _("unable to save file %s"),
                             path);
        goto cleanup;
    }
2905 2906
    if (virFileDirectFdClose(directFd) < 0)
        goto cleanup;
H
Hu Tao 已提交
2907

2908
    ret = 0;
H
Hu Tao 已提交
2909 2910

cleanup:
2911
    VIR_FORCE_CLOSE(fd);
2912
    virFileDirectFdFree(directFd);
H
Hu Tao 已提交
2913 2914 2915 2916 2917
    if (ret != 0)
        unlink(path);
    return ret;
}

2918 2919 2920 2921 2922
static enum qemud_save_formats
getCompressionType(struct qemud_driver *driver)
{
    int compress = QEMUD_SAVE_FORMAT_RAW;

2923 2924 2925 2926 2927 2928
    /*
     * We reuse "save" flag for "dump" here. Then, we can support the same
     * format in "save" and "dump".
     */
    if (driver->dumpImageFormat) {
        compress = qemudSaveCompressionTypeFromString(driver->dumpImageFormat);
2929 2930 2931
        /* Use "raw" as the format if the specified format is not valid,
         * or the compress program is not available.
         */
2932
        if (compress < 0) {
2933 2934
            VIR_WARN("%s", _("Invalid dump image format specified in "
                             "configuration file, using raw"));
2935
            return QEMUD_SAVE_FORMAT_RAW;
2936
        }
2937
        if (!qemudCompressProgramAvailable(compress)) {
2938 2939 2940
            VIR_WARN("%s", _("Compression program for dump image format "
                             "in configuration file isn't available, "
                             "using raw"));
2941
            return QEMUD_SAVE_FORMAT_RAW;
2942
        }
2943
    }
2944 2945 2946 2947 2948
    return compress;
}

static int qemudDomainCoreDump(virDomainPtr dom,
                               const char *path,
2949
                               unsigned int flags)
2950
{
2951 2952
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
M
Michal Privoznik 已提交
2953
    qemuDomainObjPrivatePtr priv;
2954
    int resume = 0, paused = 0;
H
Hu Tao 已提交
2955
    int ret = -1;
2956 2957
    virDomainEventPtr event = NULL;

M
Michal Privoznik 已提交
2958 2959
    virCheckFlags(VIR_DUMP_LIVE | VIR_DUMP_CRASH |
                  VIR_DUMP_BYPASS_CACHE | VIR_DUMP_RESET, -1);
2960

P
Paolo Bonzini 已提交
2961 2962 2963 2964 2965 2966
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
2967 2968
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
P
Paolo Bonzini 已提交
2969 2970 2971
        goto cleanup;
    }

2972 2973
    if (qemuDomainObjBeginAsyncJobWithDriver(driver, vm,
                                             QEMU_ASYNC_JOB_DUMP) < 0)
2974 2975
        goto cleanup;

D
Daniel P. Berrange 已提交
2976
    if (!virDomainObjIsActive(vm)) {
2977 2978
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
2979
        goto endjob;
P
Paolo Bonzini 已提交
2980 2981
    }

P
Paolo Bonzini 已提交
2982 2983
    /* Migrate will always stop the VM, so the resume condition is
       independent of whether the stop command is issued.  */
J
Jiri Denemark 已提交
2984
    resume = virDomainObjGetState(vm, NULL) == VIR_DOMAIN_RUNNING;
P
Paolo Bonzini 已提交
2985 2986

    /* Pause domain for non-live dump */
J
Jiri Denemark 已提交
2987 2988
    if (!(flags & VIR_DUMP_LIVE) &&
        virDomainObjGetState(vm, NULL) == VIR_DOMAIN_RUNNING) {
2989 2990
        if (qemuProcessStopCPUs(driver, vm, VIR_DOMAIN_PAUSED_DUMP,
                                QEMU_ASYNC_JOB_DUMP) < 0)
2991
            goto endjob;
P
Paolo Bonzini 已提交
2992
        paused = 1;
2993 2994 2995 2996 2997 2998

        if (!virDomainObjIsActive(vm)) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("guest unexpectedly quit"));
            goto endjob;
        }
P
Paolo Bonzini 已提交
2999 3000
    }

3001 3002
    ret = doCoreDump(driver, vm, path, getCompressionType(driver),
                     (flags & VIR_DUMP_BYPASS_CACHE) != 0);
3003 3004 3005 3006
    if (ret < 0)
        goto endjob;

    paused = 1;
3007 3008

endjob:
3009
    if ((ret == 0) && (flags & VIR_DUMP_CRASH)) {
J
Jiri Denemark 已提交
3010
        qemuProcessStop(driver, vm, 0, VIR_DOMAIN_SHUTOFF_CRASHED);
3011
        virDomainAuditStop(vm, "crashed");
3012 3013 3014 3015 3016
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_STOPPED,
                                         VIR_DOMAIN_EVENT_STOPPED_CRASHED);
    }

P
Paolo Bonzini 已提交
3017 3018 3019
    /* Since the monitor is always attached to a pty for libvirt, it
       will support synchronous operations so we always get here after
       the migration is complete.  */
M
Michal Privoznik 已提交
3020 3021 3022 3023 3024 3025 3026 3027 3028 3029 3030 3031
    else if (((resume && paused) || (flags & VIR_DUMP_RESET)) &&
             virDomainObjIsActive(vm)) {
        if ((ret == 0) && (flags & VIR_DUMP_RESET)) {
            priv =  vm->privateData;
            qemuDomainObjEnterMonitorWithDriver(driver, vm);
            ret = qemuMonitorSystemReset(priv->mon);
            qemuDomainObjExitMonitorWithDriver(driver, vm);
        }

        if (resume && qemuProcessStartCPUs(driver, vm, dom->conn,
                                           VIR_DOMAIN_RUNNING_UNPAUSED,
                                           QEMU_ASYNC_JOB_DUMP) < 0) {
3032
            if (virGetLastError() == NULL)
3033 3034
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("resuming after dump failed"));
P
Paolo Bonzini 已提交
3035 3036
        }
    }
3037

3038
    if (qemuDomainObjEndAsyncJob(driver, vm) == 0)
3039
        vm = NULL;
3040
    else if ((ret == 0) && (flags & VIR_DUMP_CRASH) && !vm->persistent) {
3041
        qemuDomainRemoveInactive(driver, vm);
3042 3043
        vm = NULL;
    }
3044 3045

cleanup:
P
Paolo Bonzini 已提交
3046 3047
    if (vm)
        virDomainObjUnlock(vm);
3048 3049
    if (event)
        qemuDomainEventQueue(driver, event);
3050
    qemuDriverUnlock(driver);
P
Paolo Bonzini 已提交
3051 3052 3053
    return ret;
}

3054 3055 3056 3057
static char *
qemuDomainScreenshot(virDomainPtr dom,
                     virStreamPtr st,
                     unsigned int screen,
E
Eric Blake 已提交
3058
                     unsigned int flags)
3059 3060 3061 3062 3063 3064 3065
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    qemuDomainObjPrivatePtr priv;
    char *tmp = NULL;
    int tmp_fd = -1;
    char *ret = NULL;
E
Eric Blake 已提交
3066
    bool unlink_tmp = false;
3067

E
Eric Blake 已提交
3068 3069
    virCheckFlags(0, NULL);

3070 3071 3072 3073 3074 3075 3076 3077 3078 3079 3080 3081 3082 3083
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    qemuDriverUnlock(driver);

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    priv = vm->privateData;

3084
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_QUERY) < 0)
3085 3086 3087 3088 3089 3090 3091 3092 3093 3094 3095 3096 3097 3098 3099 3100 3101 3102 3103 3104 3105 3106 3107 3108 3109 3110
        goto cleanup;

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }

    /* Well, even if qemu allows multiple graphic cards, heads, whatever,
     * screenshot command does not */
    if (screen) {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("currently is supported only taking "
                                "screenshots of screen ID 0"));
        goto endjob;
    }

    if (virAsprintf(&tmp, "%s/qemu.screendump.XXXXXX", driver->cacheDir) < 0) {
        virReportOOMError();
        goto endjob;
    }

    if ((tmp_fd = mkstemp(tmp)) == -1) {
        virReportSystemError(errno, _("mkstemp(\"%s\") failed"), tmp);
        goto endjob;
    }
E
Eric Blake 已提交
3111
    unlink_tmp = true;
3112

3113 3114
    virSecurityManagerSetSavedStateLabel(qemu_driver->securityManager, vm, tmp);

3115
    qemuDomainObjEnterMonitor(driver, vm);
3116
    if (qemuMonitorScreendump(priv->mon, tmp) < 0) {
3117
        qemuDomainObjExitMonitor(driver, vm);
3118 3119
        goto endjob;
    }
3120
    qemuDomainObjExitMonitor(driver, vm);
3121 3122 3123 3124 3125 3126

    if (VIR_CLOSE(tmp_fd) < 0) {
        virReportSystemError(errno, _("unable to close %s"), tmp);
        goto endjob;
    }

E
Eric Blake 已提交
3127
    if (virFDStreamOpenFile(st, tmp, 0, 0, O_RDONLY) < 0) {
3128 3129 3130 3131 3132 3133 3134 3135 3136
        qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                        _("unable to open stream"));
        goto endjob;
    }

    ret = strdup("image/x-portable-pixmap");

endjob:
    VIR_FORCE_CLOSE(tmp_fd);
E
Eric Blake 已提交
3137 3138
    if (unlink_tmp)
        unlink(tmp);
E
Eric Blake 已提交
3139
    VIR_FREE(tmp);
3140

3141
    if (qemuDomainObjEndJob(driver, vm) == 0)
3142 3143 3144 3145 3146 3147 3148 3149
        vm = NULL;

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}

H
Hu Tao 已提交
3150 3151 3152
static void processWatchdogEvent(void *data, void *opaque)
{
    int ret;
3153
    struct qemuDomainWatchdogEvent *wdEvent = data;
H
Hu Tao 已提交
3154 3155
    struct qemud_driver *driver = opaque;

W
Wen Congyang 已提交
3156 3157 3158
    qemuDriverLock(driver);
    virDomainObjLock(wdEvent->vm);

H
Hu Tao 已提交
3159 3160 3161 3162 3163
    switch (wdEvent->action) {
    case VIR_DOMAIN_WATCHDOG_ACTION_DUMP:
        {
            char *dumpfile;

E
Eric Blake 已提交
3164
            if (virAsprintf(&dumpfile, "%s/%s-%u",
H
Hu Tao 已提交
3165 3166
                            driver->autoDumpPath,
                            wdEvent->vm->def->name,
E
Eric Blake 已提交
3167 3168
                            (unsigned int)time(NULL)) < 0) {
                virReportOOMError();
W
Wen Congyang 已提交
3169
                goto unlock;
E
Eric Blake 已提交
3170
            }
H
Hu Tao 已提交
3171

3172 3173
            if (qemuDomainObjBeginAsyncJobWithDriver(driver, wdEvent->vm,
                                                     QEMU_ASYNC_JOB_DUMP) < 0) {
W
Wen Congyang 已提交
3174 3175 3176
                VIR_FREE(dumpfile);
                goto unlock;
            }
H
Hu Tao 已提交
3177 3178 3179 3180

            if (!virDomainObjIsActive(wdEvent->vm)) {
                qemuReportError(VIR_ERR_OPERATION_INVALID,
                                "%s", _("domain is not running"));
W
Wen Congyang 已提交
3181 3182
                VIR_FREE(dumpfile);
                goto endjob;
H
Hu Tao 已提交
3183 3184
            }

3185
            ret = doCoreDump(driver, wdEvent->vm, dumpfile,
3186 3187
                             getCompressionType(driver),
                             driver->autoDumpBypassCache);
H
Hu Tao 已提交
3188 3189 3190 3191
            if (ret < 0)
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("Dump failed"));

J
Jiri Denemark 已提交
3192
            ret = qemuProcessStartCPUs(driver, wdEvent->vm, NULL,
3193 3194
                                       VIR_DOMAIN_RUNNING_UNPAUSED,
                                       QEMU_ASYNC_JOB_DUMP);
H
Hu Tao 已提交
3195 3196 3197 3198 3199 3200 3201 3202

            if (ret < 0)
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("Resuming after dump failed"));

            VIR_FREE(dumpfile);
        }
        break;
W
Wen Congyang 已提交
3203 3204
    default:
        goto unlock;
H
Hu Tao 已提交
3205 3206
    }

W
Wen Congyang 已提交
3207 3208 3209 3210
endjob:
    /* Safe to ignore value since ref count was incremented in
     * qemuProcessHandleWatchdog().
     */
3211
    ignore_value(qemuDomainObjEndAsyncJob(driver, wdEvent->vm));
W
Wen Congyang 已提交
3212 3213 3214 3215 3216

unlock:
    if (virDomainObjUnref(wdEvent->vm) > 0)
        virDomainObjUnlock(wdEvent->vm);
    qemuDriverUnlock(driver);
H
Hu Tao 已提交
3217 3218
    VIR_FREE(wdEvent);
}
P
Paolo Bonzini 已提交
3219

3220 3221 3222
static int qemudDomainHotplugVcpus(struct qemud_driver *driver,
                                   virDomainObjPtr vm,
                                   unsigned int nvcpus)
3223 3224
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
3225
    int i, rc = 1;
3226
    int ret = -1;
3227
    int oldvcpus = vm->def->vcpus;
E
Eric Blake 已提交
3228
    int vcpus = oldvcpus;
3229

3230
    qemuDomainObjEnterMonitor(driver, vm);
3231

3232 3233 3234
    /* We need different branches here, because we want to offline
     * in reverse order to onlining, so any partial fail leaves us in a
     * reasonably sensible state */
E
Eric Blake 已提交
3235 3236
    if (nvcpus > vcpus) {
        for (i = vcpus ; i < nvcpus ; i++) {
3237 3238 3239 3240 3241 3242 3243
            /* Online new CPU */
            rc = qemuMonitorSetCPU(priv->mon, i, 1);
            if (rc == 0)
                goto unsupported;
            if (rc < 0)
                goto cleanup;

E
Eric Blake 已提交
3244
            vcpus++;
3245 3246
        }
    } else {
E
Eric Blake 已提交
3247
        for (i = vcpus - 1 ; i >= nvcpus ; i--) {
3248 3249 3250 3251 3252 3253 3254
            /* Offline old CPU */
            rc = qemuMonitorSetCPU(priv->mon, i, 0);
            if (rc == 0)
                goto unsupported;
            if (rc < 0)
                goto cleanup;

E
Eric Blake 已提交
3255
            vcpus--;
3256 3257 3258 3259 3260 3261
        }
    }

    ret = 0;

cleanup:
3262
    qemuDomainObjExitMonitor(driver, vm);
E
Eric Blake 已提交
3263
    vm->def->vcpus = vcpus;
3264
    virDomainAuditVcpu(vm, oldvcpus, nvcpus, "update", rc == 1);
3265 3266 3267 3268 3269 3270 3271 3272 3273
    return ret;

unsupported:
    qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                    _("cannot change vcpu count of this domain"));
    goto cleanup;
}


3274
static int
3275 3276
qemuDomainSetVcpusFlags(virDomainPtr dom, unsigned int nvcpus,
                        unsigned int flags)
3277
{
3278 3279
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
3280
    virDomainDefPtr persistentDef;
3281 3282
    const char * type;
    int max;
3283
    int ret = -1;
3284 3285
    bool isActive;
    bool maximum;
3286

3287 3288
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG |
3289 3290 3291 3292 3293
                  VIR_DOMAIN_VCPU_MAXIMUM, -1);

    if (!nvcpus || (unsigned short) nvcpus != nvcpus) {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("argument out of range: %d"), nvcpus);
3294 3295 3296
        return -1;
    }

3297
    qemuDriverLock(driver);
3298
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
3299 3300
    qemuDriverUnlock(driver);

3301
    if (!vm) {
3302 3303
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3304 3305
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3306
        goto cleanup;
3307 3308
    }

3309
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_MODIFY) < 0)
3310 3311
        goto cleanup;

3312 3313 3314 3315 3316 3317 3318 3319 3320 3321 3322 3323 3324 3325 3326 3327 3328 3329 3330
    isActive = virDomainObjIsActive(vm);
    maximum = (flags & VIR_DOMAIN_VCPU_MAXIMUM) != 0;
    flags &= ~VIR_DOMAIN_VCPU_MAXIMUM;

    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
        if (isActive)
            flags |= VIR_DOMAIN_AFFECT_LIVE;
        else
            flags |= VIR_DOMAIN_AFFECT_CONFIG;
    }

    /* MAXIMUM cannot be mixed with LIVE.  */
    if (maximum && (flags & VIR_DOMAIN_AFFECT_LIVE)) {
        qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                        _("cannot adjust maximum on running domain"));
        goto endjob;
    }

    if (!isActive && (flags & VIR_DOMAIN_AFFECT_LIVE)) {
3331 3332
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                         "%s", _("domain is not running"));
3333
        goto endjob;
3334 3335
    }

3336
    if (!vm->persistent && (flags & VIR_DOMAIN_AFFECT_CONFIG)) {
3337 3338 3339 3340 3341
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("cannot change persistent config of a transient domain"));
        goto endjob;
    }

3342 3343 3344 3345 3346 3347 3348 3349 3350 3351 3352 3353 3354
    if (!(type = virDomainVirtTypeToString(vm->def->virtType))) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("unknown virt type in domain definition '%d'"),
                        vm->def->virtType);
        goto endjob;
    }

    if ((max = qemudGetMaxVCPUs(NULL, type)) < 0) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                        _("could not determine max vcpus for the domain"));
        goto endjob;
    }

3355
    if (!maximum && vm->def->maxvcpus < max) {
3356 3357 3358
        max = vm->def->maxvcpus;
    }

3359 3360 3361 3362 3363 3364 3365
    if (nvcpus > max) {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("requested vcpus is greater than max allowable"
                          " vcpus for the domain: %d > %d"), nvcpus, max);
        goto endjob;
    }

3366 3367 3368
    if (!(persistentDef = virDomainObjGetPersistentDef(driver->caps, vm)))
        goto endjob;

3369
    switch (flags) {
3370
    case VIR_DOMAIN_AFFECT_CONFIG:
3371 3372 3373 3374 3375 3376 3377
        if (maximum) {
            persistentDef->maxvcpus = nvcpus;
            if (nvcpus < persistentDef->vcpus)
                persistentDef->vcpus = nvcpus;
        } else {
            persistentDef->vcpus = nvcpus;
        }
3378 3379 3380
        ret = 0;
        break;

3381
    case VIR_DOMAIN_AFFECT_LIVE:
3382
        ret = qemudDomainHotplugVcpus(driver, vm, nvcpus);
3383 3384
        break;

3385
    case VIR_DOMAIN_AFFECT_LIVE | VIR_DOMAIN_AFFECT_CONFIG:
3386
        ret = qemudDomainHotplugVcpus(driver, vm, nvcpus);
3387 3388 3389
        if (ret == 0) {
            persistentDef->vcpus = nvcpus;
        }
3390 3391
        break;
    }
3392

3393
    /* Save the persistent config to disk */
3394
    if (flags & VIR_DOMAIN_AFFECT_CONFIG)
3395 3396
        ret = virDomainSaveConfig(driver->configDir, persistentDef);

3397
endjob:
3398
    if (qemuDomainObjEndJob(driver, vm) == 0)
3399
        vm = NULL;
3400

3401
cleanup:
3402 3403
    if (vm)
        virDomainObjUnlock(vm);
3404
    return ret;
3405 3406
}

3407
static int
3408
qemuDomainSetVcpus(virDomainPtr dom, unsigned int nvcpus)
3409
{
3410
    return qemuDomainSetVcpusFlags(dom, nvcpus, VIR_DOMAIN_AFFECT_LIVE);
3411 3412
}

3413 3414

static int
3415 3416 3417 3418 3419 3420
qemudDomainPinVcpuFlags(virDomainPtr dom,
                        unsigned int vcpu,
                        unsigned char *cpumap,
                        int maplen,
                        unsigned int flags) {

3421 3422
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
3423
    virDomainDefPtr persistentDef = NULL;
3424
    int maxcpu, hostcpus;
3425
    virNodeInfo nodeinfo;
3426
    int ret = -1;
3427
    bool isActive;
3428
    qemuDomainObjPrivatePtr priv;
3429
    bool canResetting = true;
E
Eric Blake 已提交
3430
    int pcpu;
3431

3432 3433 3434
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);

3435
    qemuDriverLock(driver);
3436
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
3437 3438
    qemuDriverUnlock(driver);

3439 3440 3441
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3442 3443
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3444 3445 3446
        goto cleanup;
    }

3447 3448 3449 3450 3451 3452 3453 3454 3455 3456 3457 3458
    isActive = virDomainObjIsActive(vm);
    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
        if (isActive)
            flags = VIR_DOMAIN_AFFECT_LIVE;
        else
            flags = VIR_DOMAIN_AFFECT_CONFIG;
    }

    if (!isActive && (flags & VIR_DOMAIN_AFFECT_LIVE)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("a domain is inactive; can change only "
                          "persistent config"));
3459
        goto cleanup;
3460 3461
    }

3462 3463 3464
    priv = vm->privateData;

    if (vcpu > (priv->nvcpupids-1)) {
3465 3466 3467
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("vcpu number out of range %d > %d"),
                        vcpu, priv->nvcpupids);
3468
        goto cleanup;
3469 3470
    }

3471 3472 3473 3474 3475 3476 3477 3478 3479
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
        if (!vm->persistent) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                   _("cannot change persistent config of a transient domain"));
            goto cleanup;
        }
        if (!(persistentDef = virDomainObjGetPersistentDef(driver->caps, vm)))
            goto cleanup;
    }
3480

3481 3482 3483 3484 3485 3486 3487 3488 3489
    if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
        goto cleanup;
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
    maxcpu = maplen * 8;
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;
    /* pinning to all physical cpus means resetting,
     * so check if we can reset setting.
     */
E
Eric Blake 已提交
3490
    for (pcpu = 0; pcpu < hostcpus; pcpu++) {
3491 3492 3493 3494 3495
        if ((cpumap[pcpu/8] & (1 << (pcpu % 8))) == 0) {
            canResetting = false;
            break;
        }
    }
3496

3497
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
3498 3499 3500 3501 3502 3503

        if (priv->vcpupids != NULL) {
            if (virProcessInfoSetAffinity(priv->vcpupids[vcpu],
                                          cpumap, maplen, maxcpu) < 0)
                goto cleanup;
        } else {
3504
            qemuReportError(VIR_ERR_OPERATION_INVALID,
3505 3506 3507 3508
                            "%s", _("cpu affinity is not supported"));
            goto cleanup;
        }

3509
        if (canResetting) {
E
Eric Blake 已提交
3510
            if (virDomainVcpuPinDel(vm->def, vcpu) < 0) {
3511 3512 3513 3514 3515 3516
                qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                                _("failed to delete vcpupin xml of "
                                  "a running domain"));
                goto cleanup;
            }
        } else {
E
Eric Blake 已提交
3517
            if (virDomainVcpuPinAdd(vm->def, cpumap, maplen, vcpu) < 0) {
3518 3519 3520 3521 3522
                qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                                _("failed to update or add vcpupin xml of "
                                  "a running domain"));
                goto cleanup;
            }
3523 3524
        }

3525 3526
        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
            goto cleanup;
3527
    }
3528

3529 3530
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {

3531
        if (canResetting) {
E
Eric Blake 已提交
3532
            if (virDomainVcpuPinDel(persistentDef, vcpu) < 0) {
3533 3534 3535 3536 3537 3538
                qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                                _("failed to delete vcpupin xml of "
                                  "a persistent domain"));
                goto cleanup;
            }
        } else {
E
Eric Blake 已提交
3539
            if (virDomainVcpuPinAdd(persistentDef, cpumap, maplen, vcpu) < 0) {
3540 3541 3542 3543 3544
                qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                                _("failed to update or add vcpupin xml of "
                                  "a persistent domain"));
                goto cleanup;
            }
3545
        }
3546

3547
        ret = virDomainSaveConfig(driver->configDir, persistentDef);
3548 3549 3550
        goto cleanup;
    }

3551
    ret = 0;
3552

3553
cleanup:
3554 3555
    if (vm)
        virDomainObjUnlock(vm);
3556
    return ret;
3557 3558
}

3559 3560 3561 3562 3563 3564 3565 3566 3567
static int
qemudDomainPinVcpu(virDomainPtr dom,
                   unsigned int vcpu,
                   unsigned char *cpumap,
                   int maplen) {
    return qemudDomainPinVcpuFlags(dom, vcpu, cpumap, maplen,
                                   VIR_DOMAIN_AFFECT_LIVE);
}

3568
static int
E
Eric Blake 已提交
3569
qemudDomainGetVcpuPinInfo(virDomainPtr dom,
3570 3571 3572 3573 3574 3575
                          int ncpumaps,
                          unsigned char *cpumaps,
                          int maplen,
                          unsigned int flags) {

    struct qemud_driver *driver = dom->conn->privateData;
E
Eric Blake 已提交
3576
    virDomainObjPtr vm = NULL;
3577 3578 3579 3580 3581 3582
    virNodeInfo nodeinfo;
    virDomainDefPtr targetDef = NULL;
    int ret = -1;
    bool isActive;
    int maxcpu, hostcpus, vcpu, pcpu;
    int n;
E
Eric Blake 已提交
3583
    virDomainVcpuPinDefPtr *vcpupin_list;
3584 3585 3586 3587 3588 3589 3590 3591 3592 3593 3594 3595 3596 3597 3598 3599 3600 3601 3602 3603 3604 3605 3606 3607 3608 3609 3610 3611 3612 3613 3614 3615 3616 3617 3618 3619 3620 3621 3622 3623 3624 3625 3626 3627 3628
    char *cpumask = NULL;
    unsigned char *cpumap;

    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    qemuDriverUnlock(driver);

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    isActive = virDomainObjIsActive(vm);
    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
        if (isActive)
            flags = VIR_DOMAIN_AFFECT_LIVE;
        else
            flags = VIR_DOMAIN_AFFECT_CONFIG;
    }

    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
        if (!isActive) {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s", _("domain is not running"));
            goto cleanup;
        }
        targetDef = vm->def;
    }

    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
        if (!vm->persistent) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                   _("cannot get persistent config of a transient domain"));
            goto cleanup;
        }
        if (!(targetDef = virDomainObjGetPersistentDef(driver->caps, vm)))
            goto cleanup;
    }

3629 3630 3631
    /* Coverity didn't realize that targetDef must be set if we got here.  */
    sa_assert(targetDef);

3632 3633 3634 3635 3636 3637 3638 3639 3640 3641 3642 3643 3644 3645 3646 3647 3648 3649 3650 3651 3652 3653 3654 3655 3656 3657 3658 3659 3660 3661 3662 3663 3664 3665 3666 3667 3668 3669 3670 3671 3672 3673 3674
    if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
        goto cleanup;
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
    maxcpu = maplen * 8;
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;

    /* Clamp to actual number of vcpus */
    if (ncpumaps > targetDef->vcpus)
        ncpumaps = targetDef->vcpus;

    if (ncpumaps < 1) {
        goto cleanup;
    }

    /* initialize cpumaps */
    memset(cpumaps, 0xff, maplen * ncpumaps);
    if (maxcpu % 8) {
        for (vcpu = 0; vcpu < ncpumaps; vcpu++) {
            cpumap = VIR_GET_CPUMAP(cpumaps, maplen, vcpu);
            cpumap[maplen - 1] &= (1 << maxcpu % 8) - 1;
        }
    }

    /* if vcpupin setting exists, there are unused physical cpus */
    for (n = 0; n < targetDef->cputune.nvcpupin; n++) {
        vcpupin_list = targetDef->cputune.vcpupin;
        vcpu = vcpupin_list[n]->vcpuid;
        cpumask = vcpupin_list[n]->cpumask;
        cpumap = VIR_GET_CPUMAP(cpumaps, maplen, vcpu);
        for (pcpu = 0; pcpu < maxcpu; pcpu++) {
            if (cpumask[pcpu] == 0)
                VIR_UNUSE_CPU(cpumap, pcpu);
        }
    }
    ret = ncpumaps;

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}

3675 3676 3677 3678 3679 3680
static int
qemudDomainGetVcpus(virDomainPtr dom,
                    virVcpuInfoPtr info,
                    int maxinfo,
                    unsigned char *cpumaps,
                    int maplen) {
3681 3682
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
3683
    virNodeInfo nodeinfo;
3684
    int i, v, maxcpu, hostcpus;
3685
    int ret = -1;
3686
    qemuDomainObjPrivatePtr priv;
3687

3688
    qemuDriverLock(driver);
3689
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
3690 3691
    qemuDriverUnlock(driver);

3692 3693 3694
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3695 3696
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3697 3698 3699
        goto cleanup;
    }

D
Daniel P. Berrange 已提交
3700
    if (!virDomainObjIsActive(vm)) {
3701 3702 3703
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s",
                        _("cannot list vcpu pinning for an inactive domain"));
3704
        goto cleanup;
3705 3706
    }

3707 3708
    priv = vm->privateData;

3709
    if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
3710
        goto cleanup;
3711

3712
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
3713
    maxcpu = maplen * 8;
3714 3715
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;
3716 3717

    /* Clamp to actual number of vcpus */
3718 3719
    if (maxinfo > priv->nvcpupids)
        maxinfo = priv->nvcpupids;
3720

3721 3722 3723 3724 3725 3726
    if (maxinfo >= 1) {
        if (info != NULL) {
            memset(info, 0, sizeof(*info) * maxinfo);
            for (i = 0 ; i < maxinfo ; i++) {
                info[i].number = i;
                info[i].state = VIR_VCPU_RUNNING;
3727

3728
                if (priv->vcpupids != NULL &&
3729 3730 3731
                    qemudGetProcessInfo(&(info[i].cpuTime),
                                        &(info[i].cpu),
                                        vm->pid,
3732
                                        priv->vcpupids[i]) < 0) {
3733
                    virReportSystemError(errno, "%s",
3734 3735 3736
                                         _("cannot get vCPU placement & pCPU time"));
                    goto cleanup;
                }
3737
            }
3738 3739
        }

3740 3741
        if (cpumaps != NULL) {
            memset(cpumaps, 0, maplen * maxinfo);
3742
            if (priv->vcpupids != NULL) {
3743 3744 3745
                for (v = 0 ; v < maxinfo ; v++) {
                    unsigned char *cpumap = VIR_GET_CPUMAP(cpumaps, maplen, v);

3746
                    if (virProcessInfoGetAffinity(priv->vcpupids[v],
3747
                                                  cpumap, maplen, maxcpu) < 0)
3748
                        goto cleanup;
3749
                }
3750
            } else {
3751
                qemuReportError(VIR_ERR_OPERATION_INVALID,
3752
                                "%s", _("cpu affinity is not available"));
3753
                goto cleanup;
3754 3755 3756
            }
        }
    }
3757
    ret = maxinfo;
3758

3759
cleanup:
3760 3761
    if (vm)
        virDomainObjUnlock(vm);
3762
    return ret;
3763 3764 3765
}


3766 3767 3768
static int
qemudDomainGetVcpusFlags(virDomainPtr dom, unsigned int flags)
{
3769 3770
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
3771
    virDomainDefPtr def;
3772
    int ret = -1;
3773
    bool active;
3774

3775 3776
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG |
3777 3778
                  VIR_DOMAIN_VCPU_MAXIMUM, -1);

3779
    qemuDriverLock(driver);
3780
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
3781 3782
    qemuDriverUnlock(driver);

3783
    if (!vm) {
3784 3785
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3786 3787
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3788
        goto cleanup;
3789 3790
    }

3791 3792 3793 3794 3795 3796 3797 3798 3799 3800 3801 3802 3803 3804
    active = virDomainObjIsActive(vm);

    if ((flags & (VIR_DOMAIN_VCPU_LIVE | VIR_DOMAIN_VCPU_CONFIG)) == 0) {
        if (active)
            flags |= VIR_DOMAIN_VCPU_LIVE;
        else
            flags |= VIR_DOMAIN_VCPU_CONFIG;
    }
    if ((flags & VIR_DOMAIN_AFFECT_LIVE) && (flags & VIR_DOMAIN_AFFECT_CONFIG)) {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid flag combination: (0x%x)"), flags);
        return -1;
    }

3805
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
3806
        if (!active) {
3807 3808 3809 3810 3811 3812
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("domain not active"));
            goto cleanup;
        }
        def = vm->def;
    } else {
3813 3814 3815 3816 3817
        if (!vm->persistent) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("domain is transient"));
            goto cleanup;
        }
3818
        def = vm->newDef ? vm->newDef : vm->def;
3819 3820
    }

3821
    ret = (flags & VIR_DOMAIN_VCPU_MAXIMUM) ? def->maxvcpus : def->vcpus;
3822

3823
cleanup:
3824 3825
    if (vm)
        virDomainObjUnlock(vm);
3826 3827 3828
    return ret;
}

3829 3830 3831
static int
qemudDomainGetMaxVcpus(virDomainPtr dom)
{
3832
    return qemudDomainGetVcpusFlags(dom, (VIR_DOMAIN_AFFECT_LIVE |
3833 3834 3835
                                          VIR_DOMAIN_VCPU_MAXIMUM));
}

3836 3837 3838 3839 3840 3841 3842 3843 3844
static int qemudDomainGetSecurityLabel(virDomainPtr dom, virSecurityLabelPtr seclabel)
{
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);

3845 3846
    memset(seclabel, 0, sizeof(*seclabel));

3847 3848 3849
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3850 3851
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3852 3853 3854
        goto cleanup;
    }

3855
    if (!virDomainVirtTypeToString(vm->def->virtType)) {
3856 3857 3858
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("unknown virt type in domain definition '%d'"),
                        vm->def->virtType);
3859 3860 3861 3862 3863 3864 3865 3866 3867 3868 3869 3870 3871 3872 3873 3874 3875
        goto cleanup;
    }

    /*
     * Theoretically, the pid can be replaced during this operation and
     * return the label of a different process.  If atomicity is needed,
     * further validation will be required.
     *
     * Comment from Dan Berrange:
     *
     *   Well the PID as stored in the virDomainObjPtr can't be changed
     *   because you've got a locked object.  The OS level PID could have
     *   exited, though and in extreme circumstances have cycled through all
     *   PIDs back to ours. We could sanity check that our PID still exists
     *   after reading the label, by checking that our FD connecting to the
     *   QEMU monitor hasn't seen SIGHUP/ERR on poll().
     */
D
Daniel P. Berrange 已提交
3876
    if (virDomainObjIsActive(vm)) {
3877 3878
        if (virSecurityManagerGetProcessLabel(driver->securityManager,
                                              vm, seclabel) < 0) {
3879 3880 3881
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            "%s", _("Failed to get security label"));
            goto cleanup;
3882 3883 3884 3885 3886 3887 3888 3889
        }
    }

    ret = 0;

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
3890
    qemuDriverUnlock(driver);
3891 3892 3893
    return ret;
}

3894 3895
static int qemudNodeGetSecurityModel(virConnectPtr conn,
                                     virSecurityModelPtr secmodel)
3896 3897 3898
{
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
    char *p;
3899
    int ret = 0;
3900

3901
    qemuDriverLock(driver);
3902 3903 3904 3905 3906
    memset(secmodel, 0, sizeof(*secmodel));

    /* NULL indicates no driver, which we treat as
     * success, but simply return no data in *secmodel */
    if (driver->caps->host.secModel.model == NULL)
3907
        goto cleanup;
3908

3909 3910
    p = driver->caps->host.secModel.model;
    if (strlen(p) >= VIR_SECURITY_MODEL_BUFLEN-1) {
3911 3912 3913
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("security model string exceeds max %d bytes"),
                        VIR_SECURITY_MODEL_BUFLEN-1);
3914 3915
        ret = -1;
        goto cleanup;
3916 3917 3918 3919 3920
    }
    strcpy(secmodel->model, p);

    p = driver->caps->host.secModel.doi;
    if (strlen(p) >= VIR_SECURITY_DOI_BUFLEN-1) {
3921 3922 3923
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("security DOI string exceeds max %d bytes"),
                        VIR_SECURITY_DOI_BUFLEN-1);
3924 3925
        ret = -1;
        goto cleanup;
3926 3927
    }
    strcpy(secmodel->doi, p);
3928 3929 3930 3931

cleanup:
    qemuDriverUnlock(driver);
    return ret;
3932 3933
}

E
Eric Blake 已提交
3934
/* Return -1 on most failures after raising error, -2 if edit was specified
3935 3936 3937
 * but xmlin and state (-1 for no change, 0 for paused, 1 for running) do
 * not represent any changes (no error raised), -3 if corrupt image was
 * unlinked (no error raised), and opened fd on success.  */
3938
static int ATTRIBUTE_NONNULL(3) ATTRIBUTE_NONNULL(4)
3939 3940 3941
qemuDomainSaveImageOpen(struct qemud_driver *driver,
                        const char *path,
                        virDomainDefPtr *ret_def,
3942
                        struct qemud_save_header *ret_header,
3943
                        bool bypass_cache, virFileDirectFdPtr *directFd,
3944 3945
                        const char *xmlin, int state, bool edit,
                        bool unlink_corrupt)
J
Jiri Denemark 已提交
3946 3947
{
    int fd;
3948
    struct qemud_save_header header;
J
Jiri Denemark 已提交
3949 3950
    char *xml = NULL;
    virDomainDefPtr def = NULL;
3951
    int oflags = edit ? O_RDWR : O_RDONLY;
3952

3953
    if (bypass_cache) {
3954
        int directFlag = virFileDirectFdFlag();
3955 3956 3957 3958 3959
        if (directFlag < 0) {
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("bypass cache unsupported by this system"));
            goto error;
        }
3960
        oflags |= directFlag;
3961
    }
3962

E
Eric Blake 已提交
3963 3964
    if ((fd = qemuOpenFile(driver, path, oflags, NULL, NULL)) < 0)
        goto error;
3965 3966
    if (bypass_cache && (*directFd = virFileDirectFdNew(&fd, path)) == NULL)
        goto error;
3967 3968

    if (saferead(fd, &header, sizeof(header)) != sizeof(header)) {
3969 3970
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to read qemu header"));
J
Jiri Denemark 已提交
3971
        goto error;
3972 3973 3974
    }

    if (memcmp(header.magic, QEMUD_SAVE_MAGIC, sizeof(header.magic)) != 0) {
E
Eric Blake 已提交
3975 3976 3977 3978 3979 3980 3981 3982 3983 3984 3985 3986 3987 3988 3989 3990
        const char *msg = _("image magic is incorrect");

        if (memcmp(header.magic, QEMUD_SAVE_PARTIAL,
                   sizeof(header.magic)) == 0) {
            msg = _("save image is incomplete");
            if (unlink_corrupt) {
                if (VIR_CLOSE(fd) < 0 || unlink(path) < 0) {
                    virReportSystemError(errno,
                                         _("cannot remove corrupt file: %s"),
                                         path);
                    goto error;
                }
                return -3;
            }
        }
        qemuReportError(VIR_ERR_OPERATION_FAILED, "%s", msg);
J
Jiri Denemark 已提交
3991
        goto error;
3992 3993 3994
    }

    if (header.version > QEMUD_SAVE_VERSION) {
3995 3996 3997 3998 3999
        /* convert endianess and try again */
        bswap_header(&header);
    }

    if (header.version > QEMUD_SAVE_VERSION) {
4000 4001 4002
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("image version is not supported (%d > %d)"),
                        header.version, QEMUD_SAVE_VERSION);
J
Jiri Denemark 已提交
4003
        goto error;
4004 4005
    }

4006 4007 4008
    if (header.xml_len <= 0) {
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("invalid XML length: %d"), header.xml_len);
J
Jiri Denemark 已提交
4009
        goto error;
4010 4011
    }

4012 4013
    if (VIR_ALLOC_N(xml, header.xml_len) < 0) {
        virReportOOMError();
J
Jiri Denemark 已提交
4014
        goto error;
4015 4016 4017
    }

    if (saferead(fd, xml, header.xml_len) != header.xml_len) {
4018 4019
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to read XML"));
J
Jiri Denemark 已提交
4020
        goto error;
4021 4022
    }

4023 4024
    if (edit && STREQ(xml, xmlin) &&
        (state < 0 || state == header.was_running)) {
4025 4026 4027 4028 4029 4030 4031
        VIR_FREE(xml);
        if (VIR_CLOSE(fd) < 0) {
            virReportSystemError(errno, _("cannot close file: %s"), path);
            goto error;
        }
        return -2;
    }
4032 4033
    if (state >= 0)
        header.was_running = state;
4034

4035
    /* Create a domain from this XML */
4036
    if (!(def = virDomainDefParseString(driver->caps, xml,
M
Matthias Bolte 已提交
4037
                                        QEMU_EXPECTED_VIRT_TYPES,
4038
                                        VIR_DOMAIN_XML_INACTIVE)))
J
Jiri Denemark 已提交
4039
        goto error;
4040 4041 4042 4043 4044 4045 4046 4047 4048 4049 4050 4051 4052 4053
    if (xmlin) {
        virDomainDefPtr def2 = NULL;

        if (!(def2 = virDomainDefParseString(driver->caps, xmlin,
                                             QEMU_EXPECTED_VIRT_TYPES,
                                             VIR_DOMAIN_XML_INACTIVE)))
            goto error;
        if (!virDomainDefCheckABIStability(def, def2)) {
            virDomainDefFree(def2);
            goto error;
        }
        virDomainDefFree(def);
        def = def2;
    }
4054

J
Jiri Denemark 已提交
4055
    VIR_FREE(xml);
4056

J
Jiri Denemark 已提交
4057 4058
    *ret_def = def;
    *ret_header = header;
4059

J
Jiri Denemark 已提交
4060
    return fd;
4061

J
Jiri Denemark 已提交
4062 4063 4064
error:
    virDomainDefFree(def);
    VIR_FREE(xml);
4065
    VIR_FORCE_CLOSE(fd);
J
Jiri Denemark 已提交
4066 4067 4068 4069

    return -1;
}

4070 4071 4072 4073 4074 4075
static int ATTRIBUTE_NONNULL(4) ATTRIBUTE_NONNULL(5) ATTRIBUTE_NONNULL(6)
qemuDomainSaveImageStartVM(virConnectPtr conn,
                           struct qemud_driver *driver,
                           virDomainObjPtr vm,
                           int *fd,
                           const struct qemud_save_header *header,
4076 4077
                           const char *path,
                           bool start_paused)
J
Jiri Denemark 已提交
4078 4079 4080 4081
{
    int ret = -1;
    virDomainEventPtr event;
    int intermediatefd = -1;
4082
    virCommandPtr cmd = NULL;
J
Jiri Denemark 已提交
4083 4084 4085

    if (header->version == 2) {
        const char *prog = qemudSaveCompressionTypeToString(header->compressed);
4086
        if (prog == NULL) {
4087 4088
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            _("Invalid compressed save format %d"),
J
Jiri Denemark 已提交
4089 4090
                            header->compressed);
            goto out;
4091
        }
4092

J
Jiri Denemark 已提交
4093
        if (header->compressed != QEMUD_SAVE_FORMAT_RAW) {
4094
            cmd = virCommandNewArgList(prog, "-dc", NULL);
4095 4096
            intermediatefd = *fd;
            *fd = -1;
4097 4098 4099 4100 4101

            virCommandSetInputFD(cmd, intermediatefd);
            virCommandSetOutputFD(cmd, fd);

            if (virCommandRunAsync(cmd, NULL) < 0) {
4102 4103
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("Failed to start decompression binary %s"),
4104
                                prog);
4105
                *fd = intermediatefd;
J
Jiri Denemark 已提交
4106
                goto out;
4107 4108 4109
            }
        }
    }
J
Jiri Denemark 已提交
4110

4111
    /* Set the migration source and start it up. */
4112
    ret = qemuProcessStart(conn, driver, vm, "stdio", true,
4113
                           false, *fd, path, NULL, VIR_NETDEV_VPORT_PROFILE_OP_RESTORE);
J
Jiri Denemark 已提交
4114

4115
    if (intermediatefd != -1) {
4116
        if (ret < 0) {
4117 4118 4119
            /* if there was an error setting up qemu, the intermediate
             * process will wait forever to write to stdout, so we
             * must manually kill it.
4120 4121
             */
            VIR_FORCE_CLOSE(intermediatefd);
4122
            VIR_FORCE_CLOSE(*fd);
4123 4124
        }

4125 4126
        if (virCommandWait(cmd, NULL) < 0)
            ret = -1;
4127
    }
4128
    VIR_FORCE_CLOSE(intermediatefd);
J
Jiri Denemark 已提交
4129

4130 4131 4132
    if (VIR_CLOSE(*fd) < 0) {
        virReportSystemError(errno, _("cannot close file: %s"), path);
        ret = -1;
4133
    }
J
Jiri Denemark 已提交
4134

4135
    if (ret < 0) {
4136
        virDomainAuditStart(vm, "restored", false);
J
Jiri Denemark 已提交
4137
        goto out;
4138
    }
4139

4140 4141 4142
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_RESTORED);
4143
    virDomainAuditStart(vm, "restored", true);
J
Jiri Denemark 已提交
4144 4145 4146
    if (event)
        qemuDomainEventQueue(driver, event);

4147

4148 4149
    /* If it was running before, resume it now unless caller requested pause. */
    if (header->was_running && !start_paused) {
J
Jiri Denemark 已提交
4150
        if (qemuProcessStartCPUs(driver, vm, conn,
4151 4152
                                 VIR_DOMAIN_RUNNING_RESTORED,
                                 QEMU_ASYNC_JOB_NONE) < 0) {
4153
            if (virGetLastError() == NULL)
4154 4155
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("failed to resume domain"));
J
Jiri Denemark 已提交
4156
            goto out;
4157
        }
4158 4159
        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0) {
            VIR_WARN("Failed to save status on vm %s", vm->def->name);
J
Jiri Denemark 已提交
4160
            goto out;
4161
        }
4162 4163 4164 4165 4166 4167 4168 4169
    } else {
        int detail = (start_paused ? VIR_DOMAIN_EVENT_SUSPENDED_PAUSED :
                      VIR_DOMAIN_EVENT_SUSPENDED_RESTORED);
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_SUSPENDED,
                                         detail);
        if (event)
            qemuDomainEventQueue(driver, event);
4170
    }
J
Jiri Denemark 已提交
4171

4172
    ret = 0;
4173

J
Jiri Denemark 已提交
4174
out:
4175
    virCommandFree(cmd);
4176 4177
    if (virSecurityManagerRestoreSavedStateLabel(driver->securityManager,
                                                 vm, path) < 0)
4178 4179
        VIR_WARN("failed to restore save state label on %s", path);

J
Jiri Denemark 已提交
4180 4181 4182
    return ret;
}

4183
static int
4184 4185 4186 4187
qemuDomainRestoreFlags(virConnectPtr conn,
                       const char *path,
                       const char *dxml,
                       unsigned int flags)
4188
{
J
Jiri Denemark 已提交
4189 4190 4191 4192 4193 4194
    struct qemud_driver *driver = conn->privateData;
    virDomainDefPtr def = NULL;
    virDomainObjPtr vm = NULL;
    int fd = -1;
    int ret = -1;
    struct qemud_save_header header;
4195
    virFileDirectFdPtr directFd = NULL;
4196
    int state = -1;
J
Jiri Denemark 已提交
4197

4198 4199 4200
    virCheckFlags(VIR_DOMAIN_SAVE_BYPASS_CACHE |
                  VIR_DOMAIN_SAVE_RUNNING |
                  VIR_DOMAIN_SAVE_PAUSED, -1);
4201

J
Jiri Denemark 已提交
4202 4203
    qemuDriverLock(driver);

4204 4205 4206 4207 4208
    if (flags & VIR_DOMAIN_SAVE_RUNNING)
        state = 1;
    else if (flags & VIR_DOMAIN_SAVE_PAUSED)
        state = 0;

4209 4210
    fd = qemuDomainSaveImageOpen(driver, path, &def, &header,
                                 (flags & VIR_DOMAIN_SAVE_BYPASS_CACHE) != 0,
4211
                                 &directFd, dxml, state, false, false);
J
Jiri Denemark 已提交
4212 4213 4214 4215 4216 4217 4218 4219 4220
    if (fd < 0)
        goto cleanup;

    if (virDomainObjIsDuplicate(&driver->domains, def, 1) < 0)
        goto cleanup;

    if (!(vm = virDomainAssignDef(driver->caps,
                                  &driver->domains,
                                  def, true))) {
4221
        /* virDomainAssignDef already set the error */
J
Jiri Denemark 已提交
4222 4223 4224 4225
        goto cleanup;
    }
    def = NULL;

4226
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
J
Jiri Denemark 已提交
4227 4228
        goto cleanup;

4229 4230
    ret = qemuDomainSaveImageStartVM(conn, driver, vm, &fd, &header, path,
                                     false);
4231 4232
    if (virFileDirectFdClose(directFd) < 0)
        VIR_WARN("Failed to close %s", path);
J
Jiri Denemark 已提交
4233

4234
    if (qemuDomainObjEndJob(driver, vm) == 0)
4235
        vm = NULL;
J
Jiri Denemark 已提交
4236
    else if (ret < 0 && !vm->persistent) {
4237
        qemuDomainRemoveInactive(driver, vm);
J
Jiri Denemark 已提交
4238 4239
        vm = NULL;
    }
4240

4241 4242
cleanup:
    virDomainDefFree(def);
4243
    VIR_FORCE_CLOSE(fd);
4244
    virFileDirectFdFree(directFd);
4245 4246 4247
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
4248
    return ret;
D
Daniel P. Berrange 已提交
4249 4250
}

4251 4252 4253 4254 4255 4256 4257
static int
qemuDomainRestore(virConnectPtr conn,
                  const char *path)
{
    return qemuDomainRestoreFlags(conn, path, NULL, 0);
}

4258 4259 4260 4261 4262 4263 4264 4265 4266 4267 4268 4269 4270 4271 4272 4273
static char *
qemuDomainSaveImageGetXMLDesc(virConnectPtr conn, const char *path,
                              unsigned int flags)
{
    struct qemud_driver *driver = conn->privateData;
    char *ret = NULL;
    virDomainDefPtr def = NULL;
    int fd = -1;
    struct qemud_save_header header;

    /* We only take subset of virDomainDefFormat flags.  */
    virCheckFlags(VIR_DOMAIN_XML_SECURE, NULL);

    qemuDriverLock(driver);

    fd = qemuDomainSaveImageOpen(driver, path, &def, &header, false, NULL,
4274
                                 NULL, -1, false, false);
4275 4276 4277 4278 4279 4280 4281 4282 4283 4284 4285 4286 4287 4288 4289 4290 4291 4292 4293 4294 4295 4296 4297 4298

    if (fd < 0)
        goto cleanup;

    ret = qemuDomainDefFormatXML(driver, def, flags);

cleanup:
    virDomainDefFree(def);
    VIR_FORCE_CLOSE(fd);
    qemuDriverUnlock(driver);
    return ret;
}

static int
qemuDomainSaveImageDefineXML(virConnectPtr conn, const char *path,
                             const char *dxml, unsigned int flags)
{
    struct qemud_driver *driver = conn->privateData;
    int ret = -1;
    virDomainDefPtr def = NULL;
    int fd = -1;
    struct qemud_save_header header;
    char *xml = NULL;
    size_t len;
4299
    int state = -1;
4300

4301 4302
    virCheckFlags(VIR_DOMAIN_SAVE_RUNNING |
                  VIR_DOMAIN_SAVE_PAUSED, -1);
4303 4304 4305

    qemuDriverLock(driver);

4306 4307 4308 4309 4310
    if (flags & VIR_DOMAIN_SAVE_RUNNING)
        state = 1;
    else if (flags & VIR_DOMAIN_SAVE_PAUSED)
        state = 0;

4311
    fd = qemuDomainSaveImageOpen(driver, path, &def, &header, false, NULL,
4312
                                 dxml, state, true, false);
4313 4314 4315 4316 4317 4318 4319 4320 4321 4322 4323 4324 4325 4326 4327 4328 4329 4330 4331 4332 4333 4334 4335 4336

    if (fd < 0) {
        /* Check for special case of no change needed.  */
        if (fd == -2)
            ret = 0;
        goto cleanup;
    }

    xml = qemuDomainDefFormatXML(driver, def, (VIR_DOMAIN_XML_INACTIVE |
                                               VIR_DOMAIN_XML_SECURE));
    if (!xml)
        goto cleanup;
    len = strlen(xml) + 1;

    if (len > header.xml_len) {
        qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                        _("new xml too large to fit in file"));
        goto cleanup;
    }
    if (VIR_EXPAND_N(xml, len, header.xml_len - len) < 0) {
        virReportOOMError();
        goto cleanup;
    }

4337
    if (lseek(fd, 0, SEEK_SET) != 0) {
4338 4339 4340
        virReportSystemError(errno, _("cannot seek in '%s'"), path);
        goto cleanup;
    }
4341 4342
    if (safewrite(fd, &header, sizeof(header)) != sizeof(header) ||
        safewrite(fd, xml, len) != len ||
4343 4344 4345 4346 4347 4348 4349 4350 4351 4352 4353 4354 4355 4356 4357
        VIR_CLOSE(fd) < 0) {
        virReportSystemError(errno, _("failed to write xml to '%s'"), path);
        goto cleanup;
    }

    ret = 0;

cleanup:
    virDomainDefFree(def);
    VIR_FORCE_CLOSE(fd);
    VIR_FREE(xml);
    qemuDriverUnlock(driver);
    return ret;
}

E
Eric Blake 已提交
4358 4359
/* Return 0 on success, 1 if incomplete saved image was silently unlinked,
 * and -1 on failure with error raised.  */
4360 4361 4362 4363
static int
qemuDomainObjRestore(virConnectPtr conn,
                     struct qemud_driver *driver,
                     virDomainObjPtr vm,
4364
                     const char *path,
4365
                     bool start_paused,
4366
                     bool bypass_cache)
J
Jiri Denemark 已提交
4367 4368 4369 4370 4371
{
    virDomainDefPtr def = NULL;
    int fd = -1;
    int ret = -1;
    struct qemud_save_header header;
4372
    virFileDirectFdPtr directFd = NULL;
J
Jiri Denemark 已提交
4373

4374
    fd = qemuDomainSaveImageOpen(driver, path, &def, &header,
4375 4376
                                 bypass_cache, &directFd, NULL, -1, false,
                                 true);
E
Eric Blake 已提交
4377 4378 4379
    if (fd < 0) {
        if (fd == -3)
            ret = 1;
J
Jiri Denemark 已提交
4380
        goto cleanup;
E
Eric Blake 已提交
4381
    }
J
Jiri Denemark 已提交
4382 4383 4384 4385 4386 4387 4388 4389 4390 4391 4392 4393 4394 4395 4396 4397 4398 4399

    if (STRNEQ(vm->def->name, def->name) ||
        memcmp(vm->def->uuid, def->uuid, VIR_UUID_BUFLEN)) {
        char vm_uuidstr[VIR_UUID_STRING_BUFLEN];
        char def_uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(vm->def->uuid, vm_uuidstr);
        virUUIDFormat(def->uuid, def_uuidstr);
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("cannot restore domain '%s' uuid %s from a file"
                          " which belongs to domain '%s' uuid %s"),
                        vm->def->name, vm_uuidstr,
                        def->name, def_uuidstr);
        goto cleanup;
    }

    virDomainObjAssignDef(vm, def, true);
    def = NULL;

4400 4401
    ret = qemuDomainSaveImageStartVM(conn, driver, vm, &fd, &header, path,
                                     start_paused);
4402 4403
    if (virFileDirectFdClose(directFd) < 0)
        VIR_WARN("Failed to close %s", path);
J
Jiri Denemark 已提交
4404 4405 4406

cleanup:
    virDomainDefFree(def);
4407
    VIR_FORCE_CLOSE(fd);
4408
    virFileDirectFdFree(directFd);
J
Jiri Denemark 已提交
4409 4410 4411
    return ret;
}

D
Daniel P. Berrange 已提交
4412

4413
static char *qemuDomainGetXMLDesc(virDomainPtr dom,
4414 4415
                                  unsigned int flags)
{
4416 4417 4418
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    char *ret = NULL;
4419
    unsigned long balloon;
4420
    int err = 0;
4421

4422
    /* Flags checked by virDomainDefFormat */
4423

4424
    qemuDriverLock(driver);
4425
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
4426

D
Daniel P. Berrange 已提交
4427
    if (!vm) {
4428 4429
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4430 4431
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4432
        goto cleanup;
D
Daniel P. Berrange 已提交
4433 4434
    }

4435 4436 4437 4438
    /* Refresh current memory based on balloon info if supported */
    if ((vm->def->memballoon != NULL) &&
        (vm->def->memballoon->model != VIR_DOMAIN_MEMBALLOON_MODEL_NONE) &&
        (virDomainObjIsActive(vm))) {
4439
        qemuDomainObjPrivatePtr priv = vm->privateData;
4440 4441
        /* Don't delay if someone's using the monitor, just use
         * existing most recent data instead */
4442
        if (qemuDomainJobAllowed(priv, QEMU_JOB_QUERY)) {
4443
            if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_QUERY) < 0)
4444 4445
                goto cleanup;

4446 4447 4448 4449 4450 4451
            if (!virDomainObjIsActive(vm)) {
                qemuReportError(VIR_ERR_OPERATION_INVALID,
                                "%s", _("domain is not running"));
                goto endjob;
            }

4452
            qemuDomainObjEnterMonitorWithDriver(driver, vm);
4453
            err = qemuMonitorGetBalloonInfo(priv->mon, &balloon);
4454
            qemuDomainObjExitMonitorWithDriver(driver, vm);
4455 4456

endjob:
4457
            if (qemuDomainObjEndJob(driver, vm) == 0) {
4458 4459 4460
                vm = NULL;
                goto cleanup;
            }
4461 4462 4463
            if (err < 0)
                goto cleanup;
            if (err > 0)
4464
                vm->def->mem.cur_balloon = balloon;
4465 4466
            /* err == 0 indicates no balloon support, so ignore it */
        }
4467
    }
4468

4469
    ret = qemuDomainFormatXML(driver, vm, flags);
4470 4471

cleanup:
4472 4473
    if (vm)
        virDomainObjUnlock(vm);
4474
    qemuDriverUnlock(driver);
4475
    return ret;
D
Daniel P. Berrange 已提交
4476 4477 4478
}


4479 4480 4481
static char *qemuDomainXMLFromNative(virConnectPtr conn,
                                     const char *format,
                                     const char *config,
E
Eric Blake 已提交
4482 4483
                                     unsigned int flags)
{
4484
    struct qemud_driver *driver = conn->privateData;
4485 4486 4487
    virDomainDefPtr def = NULL;
    char *xml = NULL;

E
Eric Blake 已提交
4488 4489
    virCheckFlags(0, NULL);

4490
    if (STRNEQ(format, QEMU_CONFIG_FORMAT_ARGV)) {
4491 4492
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("unsupported config type %s"), format);
4493 4494 4495
        goto cleanup;
    }

4496
    qemuDriverLock(driver);
4497 4498
    def = qemuParseCommandLineString(driver->caps, config,
                                     NULL, NULL, NULL);
4499
    qemuDriverUnlock(driver);
4500 4501 4502
    if (!def)
        goto cleanup;

4503 4504 4505 4506 4507 4508
    if (!def->name &&
        !(def->name = strdup("unnamed"))) {
        virReportOOMError();
        goto cleanup;
    }

4509
    xml = virDomainDefFormat(def, VIR_DOMAIN_XML_INACTIVE);
4510 4511 4512 4513 4514 4515

cleanup:
    virDomainDefFree(def);
    return xml;
}

4516 4517 4518
static char *qemuDomainXMLToNative(virConnectPtr conn,
                                   const char *format,
                                   const char *xmlData,
E
Eric Blake 已提交
4519 4520
                                   unsigned int flags)
{
4521 4522
    struct qemud_driver *driver = conn->privateData;
    virDomainDefPtr def = NULL;
4523
    virDomainChrSourceDef monConfig;
4524
    virBitmapPtr qemuCaps = NULL;
T
tangchen 已提交
4525
    bool monitor_json = false;
E
Eric Blake 已提交
4526
    virCommandPtr cmd = NULL;
4527 4528 4529
    char *ret = NULL;
    int i;

E
Eric Blake 已提交
4530 4531
    virCheckFlags(0, NULL);

4532 4533
    qemuDriverLock(driver);

4534
    if (STRNEQ(format, QEMU_CONFIG_FORMAT_ARGV)) {
4535 4536
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("unsupported config type %s"), format);
4537 4538 4539
        goto cleanup;
    }

M
Matthias Bolte 已提交
4540 4541
    def = virDomainDefParseString(driver->caps, xmlData,
                                  QEMU_EXPECTED_VIRT_TYPES, 0);
4542 4543 4544
    if (!def)
        goto cleanup;

4545 4546
    /* Since we're just exporting args, we can't do bridge/network/direct
     * setups, since libvirt will normally create TAP/macvtap devices
4547 4548 4549 4550 4551
     * directly. We convert those configs into generic 'ethernet'
     * config and assume the user has suitable 'ifup-qemu' scripts
     */
    for (i = 0 ; i < def->nnets ; i++) {
        virDomainNetDefPtr net = def->nets[i];
4552
        int bootIndex = net->bootIndex;
4553 4554 4555 4556
        if (net->type == VIR_DOMAIN_NET_TYPE_NETWORK) {
            int actualType = virDomainNetGetActualType(net);
            const char *brname;

4557
            VIR_FREE(net->data.network.name);
4558 4559 4560 4561 4562 4563 4564 4565 4566 4567 4568 4569 4570 4571 4572 4573 4574 4575 4576 4577 4578 4579 4580 4581 4582 4583 4584 4585 4586 4587 4588 4589 4590
            VIR_FREE(net->data.network.portgroup);
            if ((actualType == VIR_DOMAIN_NET_TYPE_BRIDGE) &&
                (brname = virDomainNetGetActualBridgeName(net))) {

                char *brnamecopy = strdup(brname);
                if (!brnamecopy) {
                    virReportOOMError();
                    goto cleanup;
                }

                virDomainActualNetDefFree(net->data.network.actual);

                memset(net, 0, sizeof *net);

                net->type = VIR_DOMAIN_NET_TYPE_ETHERNET;
                net->data.ethernet.dev = brnamecopy;
                net->data.ethernet.script = NULL;
                net->data.ethernet.ipaddr = NULL;
            } else {
                /* actualType is either NETWORK or DIRECT. In either
                 * case, the best we can do is NULL everything out.
                 */
                virDomainActualNetDefFree(net->data.network.actual);
                memset(net, 0, sizeof *net);

                net->type = VIR_DOMAIN_NET_TYPE_ETHERNET;
                net->data.ethernet.dev = NULL;
                net->data.ethernet.script = NULL;
                net->data.ethernet.ipaddr = NULL;
            }
        } else if (net->type == VIR_DOMAIN_NET_TYPE_DIRECT) {
            VIR_FREE(net->data.direct.linkdev);
            VIR_FREE(net->data.direct.virtPortProfile);
4591 4592 4593 4594 4595 4596 4597 4598 4599 4600 4601 4602 4603 4604 4605 4606 4607 4608 4609

            memset(net, 0, sizeof *net);

            net->type = VIR_DOMAIN_NET_TYPE_ETHERNET;
            net->data.ethernet.dev = NULL;
            net->data.ethernet.script = NULL;
            net->data.ethernet.ipaddr = NULL;
        } else if (net->type == VIR_DOMAIN_NET_TYPE_BRIDGE) {
            char *brname = net->data.bridge.brname;
            char *script = net->data.bridge.script;
            char *ipaddr = net->data.bridge.ipaddr;

            memset(net, 0, sizeof *net);

            net->type = VIR_DOMAIN_NET_TYPE_ETHERNET;
            net->data.ethernet.dev = brname;
            net->data.ethernet.script = script;
            net->data.ethernet.ipaddr = ipaddr;
        }
4610
        net->bootIndex = bootIndex;
4611 4612 4613 4614
    }
    for (i = 0 ; i < def->ngraphics ; i++) {
        if (def->graphics[i]->type == VIR_DOMAIN_GRAPHICS_TYPE_VNC &&
            def->graphics[i]->data.vnc.autoport)
4615
            def->graphics[i]->data.vnc.port = QEMU_VNC_PORT_MIN;
4616 4617
    }

4618
    if (qemuCapsExtractVersionInfo(def->emulator, def->os.arch,
4619
                                   NULL,
4620
                                   &qemuCaps) < 0)
4621 4622
        goto cleanup;

T
tangchen 已提交
4623 4624
    monitor_json = qemuCapsGet(qemuCaps, QEMU_CAPS_MONITOR_JSON);

4625
    if (qemuProcessPrepareMonitorChr(driver, &monConfig, def->name) < 0)
4626
        goto cleanup;
4627

4628 4629 4630
    if (qemuAssignDeviceAliases(def, qemuCaps) < 0)
        goto cleanup;

4631
    if (!(cmd = qemuBuildCommandLine(conn, driver, def,
T
tangchen 已提交
4632
                                     &monConfig, monitor_json, qemuCaps,
4633
                                     NULL, -1, NULL, VIR_NETDEV_VPORT_PROFILE_OP_NO_OP)))
4634 4635
        goto cleanup;

E
Eric Blake 已提交
4636
    ret = virCommandToString(cmd);
4637 4638

cleanup:
4639
    qemuDriverUnlock(driver);
4640

4641
    qemuCapsFree(qemuCaps);
E
Eric Blake 已提交
4642
    virCommandFree(cmd);
4643 4644 4645 4646 4647
    virDomainDefFree(def);
    return ret;
}


4648
static int qemudListDefinedDomains(virConnectPtr conn,
4649
                            char **const names, int nnames) {
4650
    struct qemud_driver *driver = conn->privateData;
4651
    int n;
4652

4653
    qemuDriverLock(driver);
4654
    n = virDomainObjListGetInactiveNames(&driver->domains, names, nnames);
4655
    qemuDriverUnlock(driver);
4656
    return n;
D
Daniel P. Berrange 已提交
4657 4658
}

4659
static int qemudNumDefinedDomains(virConnectPtr conn) {
4660
    struct qemud_driver *driver = conn->privateData;
4661
    int n;
4662

4663
    qemuDriverLock(driver);
4664
    n = virDomainObjListNumOfDomains(&driver->domains, 0);
4665
    qemuDriverUnlock(driver);
4666

4667
    return n;
D
Daniel P. Berrange 已提交
4668 4669 4670
}


4671 4672 4673 4674
static int
qemuDomainObjStart(virConnectPtr conn,
                   struct qemud_driver *driver,
                   virDomainObjPtr vm,
4675
                   unsigned int flags)
J
Jiri Denemark 已提交
4676 4677 4678
{
    int ret = -1;
    char *managed_save;
4679 4680 4681 4682
    bool start_paused = (flags & VIR_DOMAIN_START_PAUSED) != 0;
    bool autodestroy = (flags & VIR_DOMAIN_START_AUTODESTROY) != 0;
    bool bypass_cache = (flags & VIR_DOMAIN_START_BYPASS_CACHE) != 0;
    bool force_boot = (flags & VIR_DOMAIN_START_FORCE_BOOT) != 0;
J
Jiri Denemark 已提交
4683 4684 4685

    /*
     * If there is a managed saved state restore it instead of starting
4686
     * from scratch. The old state is removed once the restoring succeeded.
J
Jiri Denemark 已提交
4687 4688
     */
    managed_save = qemuDomainManagedSavePath(driver, vm);
4689 4690 4691 4692

    if (!managed_save)
        goto cleanup;

E
Eric Blake 已提交
4693
    if (virFileExists(managed_save)) {
4694 4695 4696 4697 4698 4699 4700 4701 4702
        if (force_boot) {
            if (unlink(managed_save) < 0) {
                virReportSystemError(errno,
                                     _("cannot remove managed save file %s"),
                                     managed_save);
                goto cleanup;
            }
        } else {
            ret = qemuDomainObjRestore(conn, driver, vm, managed_save,
4703
                                       start_paused, bypass_cache);
J
Jiri Denemark 已提交
4704

E
Eric Blake 已提交
4705
            if (ret == 0 && unlink(managed_save) < 0)
4706
                VIR_WARN("Failed to remove the managed state %s", managed_save);
E
Eric Blake 已提交
4707 4708 4709 4710
            if (ret > 0)
                VIR_WARN("Ignoring incomplete managed state %s", managed_save);
            else
                goto cleanup;
4711
        }
J
Jiri Denemark 已提交
4712 4713
    }

4714
    ret = qemuProcessStart(conn, driver, vm, NULL, start_paused,
4715
                           autodestroy, -1, NULL, NULL, VIR_NETDEV_VPORT_PROFILE_OP_CREATE);
4716
    virDomainAuditStart(vm, "booted", ret >= 0);
4717
    if (ret >= 0) {
J
Jiri Denemark 已提交
4718 4719 4720 4721
        virDomainEventPtr event =
            virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_BOOTED);
4722
        if (event) {
J
Jiri Denemark 已提交
4723
            qemuDomainEventQueue(driver, event);
4724 4725 4726 4727 4728 4729 4730 4731
            if (start_paused) {
                event = virDomainEventNewFromObj(vm,
                                                 VIR_DOMAIN_EVENT_SUSPENDED,
                                                 VIR_DOMAIN_EVENT_SUSPENDED_PAUSED);
                if (event)
                    qemuDomainEventQueue(driver, event);
            }
        }
J
Jiri Denemark 已提交
4732 4733 4734 4735 4736 4737 4738
    }

cleanup:
    VIR_FREE(managed_save);
    return ret;
}

4739
static int
4740
qemuDomainStartWithFlags(virDomainPtr dom, unsigned int flags)
4741
{
4742 4743 4744
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
4745

4746
    virCheckFlags(VIR_DOMAIN_START_PAUSED |
4747
                  VIR_DOMAIN_START_AUTODESTROY |
4748 4749
                  VIR_DOMAIN_START_BYPASS_CACHE |
                  VIR_DOMAIN_START_FORCE_BOOT, -1);
4750

4751
    qemuDriverLock(driver);
4752
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
4753

4754
    if (!vm) {
4755 4756
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4757 4758
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4759
        goto cleanup;
4760 4761
    }

4762
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
4763 4764 4765
        goto cleanup;

    if (virDomainObjIsActive(vm)) {
4766 4767
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is already running"));
4768 4769 4770
        goto endjob;
    }

4771
    if (qemuDomainObjStart(dom->conn, driver, vm, flags) < 0)
4772 4773 4774
        goto endjob;

    ret = 0;
4775

4776
endjob:
4777
    if (qemuDomainObjEndJob(driver, vm) == 0)
4778
        vm = NULL;
4779

4780
cleanup:
4781 4782
    if (vm)
        virDomainObjUnlock(vm);
4783
    qemuDriverUnlock(driver);
4784
    return ret;
D
Daniel P. Berrange 已提交
4785 4786
}

4787
static int
4788
qemuDomainStart(virDomainPtr dom)
4789
{
4790
    return qemuDomainStartWithFlags(dom, 0);
4791 4792
}

4793 4794 4795 4796 4797 4798 4799 4800 4801 4802 4803 4804 4805 4806 4807
static int
qemudCanonicalizeMachineFromInfo(virDomainDefPtr def,
                                 virCapsGuestDomainInfoPtr info,
                                 char **canonical)
{
    int i;

    *canonical = NULL;

    for (i = 0; i < info->nmachines; i++) {
        virCapsGuestMachinePtr machine = info->machines[i];

        if (!machine->canonical)
            continue;

4808
        if (def->os.machine && STRNEQ(def->os.machine, machine->name))
4809 4810 4811
            continue;

        if (!(*canonical = strdup(machine->canonical))) {
4812
            virReportOOMError();
4813 4814 4815 4816 4817 4818 4819 4820 4821
            return -1;
        }

        break;
    }

    return 0;
}

4822 4823 4824 4825 4826 4827
static int
qemudCanonicalizeMachineDirect(virDomainDefPtr def, char **canonical)
{
    virCapsGuestMachinePtr *machines = NULL;
    int i, nmachines = 0;

4828
    if (qemuCapsProbeMachineTypes(def->emulator, &machines, &nmachines) < 0)
4829 4830 4831 4832 4833 4834
        return -1;

    for (i = 0; i < nmachines; i++) {
        if (!machines[i]->canonical)
            continue;

4835
        if (def->os.machine && STRNEQ(def->os.machine, machines[i]->name))
4836 4837 4838 4839 4840 4841 4842 4843 4844 4845 4846 4847
            continue;

        *canonical = machines[i]->canonical;
        machines[i]->canonical = NULL;
        break;
    }

    virCapabilitiesFreeMachines(machines, nmachines);

    return 0;
}

4848 4849
int
qemudCanonicalizeMachine(struct qemud_driver *driver, virDomainDefPtr def)
4850 4851 4852 4853 4854 4855
{
    char *canonical = NULL;
    int i;

    for (i = 0; i < driver->caps->nguests; i++) {
        virCapsGuestPtr guest = driver->caps->guests[i];
4856
        virCapsGuestDomainInfoPtr info;
4857 4858 4859
        int j;

        for (j = 0; j < guest->arch.ndomains; j++) {
4860
            info = &guest->arch.domains[j]->info;
4861

4862 4863 4864 4865 4866 4867 4868 4869 4870
            if (!info->emulator || !STREQ(info->emulator, def->emulator))
                continue;

            if (!info->nmachines)
                info = &guest->arch.defaultInfo;

            if (qemudCanonicalizeMachineFromInfo(def, info, &canonical) < 0)
                return -1;
            goto out;
4871 4872
        }

4873 4874 4875 4876
        info = &guest->arch.defaultInfo;

        if (info->emulator && STREQ(info->emulator, def->emulator)) {
            if (qemudCanonicalizeMachineFromInfo(def, info, &canonical) < 0)
4877 4878 4879 4880
                return -1;
            goto out;
        }
    }
4881 4882 4883 4884

    if (qemudCanonicalizeMachineDirect(def, &canonical) < 0)
        return -1;

4885 4886 4887 4888 4889 4890 4891
out:
    if (canonical) {
        VIR_FREE(def->os.machine);
        def->os.machine = canonical;
    }
    return 0;
}
D
Daniel P. Berrange 已提交
4892

4893
static virDomainPtr qemudDomainDefine(virConnectPtr conn, const char *xml) {
4894
    struct qemud_driver *driver = conn->privateData;
4895
    virDomainDefPtr def;
4896
    virDomainObjPtr vm = NULL;
4897
    virDomainPtr dom = NULL;
4898
    virDomainEventPtr event = NULL;
4899
    int dupVM;
4900

4901
    qemuDriverLock(driver);
4902
    if (!(def = virDomainDefParseString(driver->caps, xml,
M
Matthias Bolte 已提交
4903
                                        QEMU_EXPECTED_VIRT_TYPES,
4904
                                        VIR_DOMAIN_XML_INACTIVE)))
4905
        goto cleanup;
4906

4907
    if (virSecurityManagerVerify(driver->securityManager, def) < 0)
4908 4909
        goto cleanup;

4910 4911
    if ((dupVM = virDomainObjIsDuplicate(&driver->domains, def, 0)) < 0)
        goto cleanup;
4912

4913
    if (qemudCanonicalizeMachine(driver, def) < 0)
4914 4915
        goto cleanup;

4916
    if (qemuDomainAssignAddresses(def) < 0)
4917 4918
        goto cleanup;

4919
    if (!(vm = virDomainAssignDef(driver->caps,
4920
                                  &driver->domains,
4921
                                  def, false))) {
4922
        goto cleanup;
4923
    }
4924
    def = NULL;
4925
    vm->persistent = 1;
4926

4927
    if (virDomainSaveConfig(driver->configDir,
4928
                            vm->newDef ? vm->newDef : vm->def) < 0) {
4929
        VIR_INFO("Defining domain '%s'", vm->def->name);
4930
        qemuDomainRemoveInactive(driver, vm);
4931
        vm = NULL;
4932
        goto cleanup;
4933 4934
    }

4935 4936
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_DEFINED,
4937
                                     !dupVM ?
4938 4939
                                     VIR_DOMAIN_EVENT_DEFINED_ADDED :
                                     VIR_DOMAIN_EVENT_DEFINED_UPDATED);
4940

4941
    VIR_INFO("Creating domain '%s'", vm->def->name);
4942
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
4943
    if (dom) dom->id = vm->def->id;
4944 4945

cleanup:
4946
    virDomainDefFree(def);
4947 4948
    if (vm)
        virDomainObjUnlock(vm);
4949 4950
    if (event)
        qemuDomainEventQueue(driver, event);
4951
    qemuDriverUnlock(driver);
4952
    return dom;
D
Daniel P. Berrange 已提交
4953 4954
}

4955 4956
static int
qemuDomainUndefineFlags(virDomainPtr dom,
4957
                        unsigned int flags)
4958
{
4959 4960
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
4961
    virDomainEventPtr event = NULL;
4962
    char *name = NULL;
4963
    int ret = -1;
4964
    int nsnapshots;
D
Daniel P. Berrange 已提交
4965

4966 4967
    virCheckFlags(VIR_DOMAIN_UNDEFINE_MANAGED_SAVE |
                  VIR_DOMAIN_UNDEFINE_SNAPSHOTS_METADATA, -1);
4968

4969
    qemuDriverLock(driver);
4970
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
4971

D
Daniel P. Berrange 已提交
4972
    if (!vm) {
4973 4974
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4975 4976
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4977
        goto cleanup;
D
Daniel P. Berrange 已提交
4978 4979
    }

4980 4981 4982 4983 4984 4985
    if (!vm->persistent) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot undefine transient domain"));
        goto cleanup;
    }

4986 4987
    if (!virDomainObjIsActive(vm) &&
        (nsnapshots = virDomainSnapshotObjListNum(&vm->snapshots, 0))) {
4988
        if (!(flags & VIR_DOMAIN_UNDEFINE_SNAPSHOTS_METADATA)) {
4989 4990 4991 4992 4993 4994
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            _("cannot delete inactive domain with %d "
                              "snapshots"),
                            nsnapshots);
            goto cleanup;
        }
4995
        if (qemuDomainSnapshotDiscardAllMetadata(driver, vm) < 0)
4996
            goto cleanup;
4997 4998
    }

4999 5000 5001 5002 5003 5004 5005 5006 5007 5008 5009 5010 5011 5012 5013 5014 5015 5016 5017 5018
    name = qemuDomainManagedSavePath(driver, vm);
    if (name == NULL)
        goto cleanup;

    if (virFileExists(name)) {
        if (flags & VIR_DOMAIN_UNDEFINE_MANAGED_SAVE) {
            if (unlink(name) < 0) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                                _("Failed to remove domain managed "
                                  "save image"));
                goto cleanup;
            }
        } else {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("Refusing to undefine while domain managed "
                              "save image exists"));
            goto cleanup;
        }
    }

5019
    if (virDomainDeleteConfig(driver->configDir, driver->autostartDir, vm) < 0)
5020
        goto cleanup;
D
Daniel P. Berrange 已提交
5021

5022 5023 5024
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_UNDEFINED,
                                     VIR_DOMAIN_EVENT_UNDEFINED_REMOVED);
5025

5026
    VIR_INFO("Undefining domain '%s'", vm->def->name);
5027 5028 5029 5030 5031 5032 5033 5034

    /* If the domain is active, keep it running but set it as transient.
     * domainDestroy and domainShutdown will take care of removing the
     * domain obj from the hash table.
     */
    if (virDomainObjIsActive(vm)) {
        vm->persistent = 0;
    } else {
5035
        qemuDomainRemoveInactive(driver, vm);
5036 5037 5038
        vm = NULL;
    }

5039
    ret = 0;
D
Daniel P. Berrange 已提交
5040

5041
cleanup:
5042
    VIR_FREE(name);
5043 5044
    if (vm)
        virDomainObjUnlock(vm);
5045 5046
    if (event)
        qemuDomainEventQueue(driver, event);
5047
    qemuDriverUnlock(driver);
5048
    return ret;
D
Daniel P. Berrange 已提交
5049 5050
}

5051 5052 5053 5054 5055 5056
static int
qemudDomainUndefine(virDomainPtr dom)
{
    return qemuDomainUndefineFlags(dom, 0);
}

5057
static int
5058 5059
qemuDomainAttachDeviceDiskLive(virConnectPtr conn,
                               struct qemud_driver *driver,
5060
                               virDomainObjPtr vm,
5061
                               virDomainDeviceDefPtr dev)
5062 5063 5064 5065
{
    virDomainDiskDefPtr disk = dev->data.disk;
    virCgroupPtr cgroup = NULL;
    int ret = -1;
5066

5067
    if (disk->driverName != NULL && !STREQ(disk->driverName, "qemu")) {
5068
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
5069 5070 5071 5072 5073 5074 5075 5076 5077 5078 5079 5080 5081 5082 5083 5084 5085 5086
                        _("unsupported driver name '%s' for disk '%s'"),
                        disk->driverName, disk->src);
        goto end;
    }

    if (qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_DEVICES)) {
        if (virCgroupForDomain(driver->cgroup, vm->def->name, &cgroup, 0)) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("Unable to find cgroup for %s"),
                            vm->def->name);
            goto end;
        }
        if (qemuSetupDiskCgroup(driver, vm, cgroup, disk) < 0)
            goto end;
    }
    switch (disk->device)  {
    case VIR_DOMAIN_DISK_DEVICE_CDROM:
    case VIR_DOMAIN_DISK_DEVICE_FLOPPY:
5087
        ret = qemuDomainChangeEjectableMedia(driver, vm, disk, false);
5088 5089 5090
        break;
    case VIR_DOMAIN_DISK_DEVICE_DISK:
        if (disk->bus == VIR_DOMAIN_DISK_BUS_USB)
5091
            ret = qemuDomainAttachUsbMassstorageDevice(conn, driver, vm,
5092
                                                       disk);
5093
        else if (disk->bus == VIR_DOMAIN_DISK_BUS_VIRTIO)
5094
            ret = qemuDomainAttachPciDiskDevice(conn, driver, vm, disk);
5095
        else if (disk->bus == VIR_DOMAIN_DISK_BUS_SCSI)
5096
            ret = qemuDomainAttachSCSIDisk(conn, driver, vm, disk);
5097 5098 5099 5100 5101 5102 5103 5104 5105 5106 5107 5108 5109 5110 5111 5112 5113 5114 5115 5116 5117 5118 5119 5120 5121 5122
        else
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                            _("disk bus '%s' cannot be hotplugged."),
                            virDomainDiskBusTypeToString(disk->bus));
        break;
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("disk device type '%s' cannot be hotplugged"),
                        virDomainDiskDeviceTypeToString(disk->device));
        break;
    }

    if (ret != 0 && cgroup) {
        if (qemuTeardownDiskCgroup(driver, vm, cgroup, disk) < 0)
            VIR_WARN("Failed to teardown cgroup for disk path %s",
                     NULLSTR(disk->src));
    }
end:
    if (cgroup)
        virCgroupFree(&cgroup);
    return ret;
}

static int
qemuDomainAttachDeviceControllerLive(struct qemud_driver *driver,
                                     virDomainObjPtr vm,
5123
                                     virDomainDeviceDefPtr dev)
5124 5125 5126 5127 5128 5129
{
    virDomainControllerDefPtr cont = dev->data.controller;
    int ret = -1;

    switch (cont->type) {
    case VIR_DOMAIN_CONTROLLER_TYPE_SCSI:
5130
        ret = qemuDomainAttachPciControllerDevice(driver, vm, cont);
5131 5132 5133 5134 5135 5136 5137 5138 5139 5140 5141 5142 5143
        break;
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("disk controller bus '%s' cannot be hotplugged."),
                        virDomainControllerTypeToString(cont->type));
        break;
    }
    return ret;
}

static int
qemuDomainAttachDeviceLive(virDomainObjPtr vm,
                           virDomainDeviceDefPtr dev,
5144
                           virDomainPtr dom)
5145 5146 5147 5148 5149 5150
{
    struct qemud_driver *driver = dom->conn->privateData;
    int ret = -1;

    switch (dev->type) {
    case VIR_DOMAIN_DEVICE_DISK:
5151
        qemuDomainObjCheckDiskTaint(driver, vm, dev->data.disk, -1);
5152
        ret = qemuDomainAttachDeviceDiskLive(dom->conn, driver, vm, dev);
5153 5154 5155 5156 5157
        if (!ret)
            dev->data.disk = NULL;
        break;

    case VIR_DOMAIN_DEVICE_CONTROLLER:
5158
        ret = qemuDomainAttachDeviceControllerLive(driver, vm, dev);
5159 5160 5161 5162
        if (!ret)
            dev->data.controller = NULL;
        break;

5163 5164 5165 5166 5167 5168 5169
    case VIR_DOMAIN_DEVICE_LEASE:
        ret = qemuDomainAttachLease(driver, vm,
                                    dev->data.lease);
        if (ret == 0)
            dev->data.lease = NULL;
        break;

5170
    case VIR_DOMAIN_DEVICE_NET:
5171
        qemuDomainObjCheckNetTaint(driver, vm, dev->data.net, -1);
5172
        ret = qemuDomainAttachNetDevice(dom->conn, driver, vm,
5173
                                        dev->data.net);
5174 5175 5176 5177 5178 5179
        if (!ret)
            dev->data.net = NULL;
        break;

    case VIR_DOMAIN_DEVICE_HOSTDEV:
        ret = qemuDomainAttachHostDevice(driver, vm,
5180
                                         dev->data.hostdev);
5181 5182 5183 5184
        if (!ret)
            dev->data.hostdev = NULL;
        break;

5185 5186 5187 5188 5189 5190 5191
    case VIR_DOMAIN_DEVICE_REDIRDEV:
        ret = qemuDomainAttachRedirdevDevice(driver, vm,
                                             dev->data.redirdev);
        if (!ret)
            dev->data.redirdev = NULL;
        break;

5192 5193 5194 5195 5196 5197 5198 5199 5200 5201 5202 5203 5204
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("device type '%s' cannot be attached"),
                        virDomainDeviceTypeToString(dev->type));
        break;
    }

    return ret;
}

static int
qemuDomainDetachDeviceDiskLive(struct qemud_driver *driver,
                               virDomainObjPtr vm,
5205
                               virDomainDeviceDefPtr dev)
5206 5207 5208 5209 5210 5211 5212
{
    virDomainDiskDefPtr disk = dev->data.disk;
    int ret = -1;

    switch (disk->device) {
    case VIR_DOMAIN_DISK_DEVICE_DISK:
        if (disk->bus == VIR_DOMAIN_DISK_BUS_VIRTIO)
5213
            ret = qemuDomainDetachPciDiskDevice(driver, vm, dev);
5214
        else if (disk->bus == VIR_DOMAIN_DISK_BUS_SCSI)
5215
            ret =  qemuDomainDetachDiskDevice(driver, vm, dev);
5216
        else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_USB)
5217
            ret = qemuDomainDetachDiskDevice(driver, vm, dev);
5218 5219 5220 5221 5222 5223
        else
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                            _("This type of disk cannot be hot unplugged"));
        break;
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
5224 5225
                        _("disk device type '%s' cannot be detached"),
                        virDomainDiskDeviceTypeToString(disk->type));
5226 5227 5228 5229 5230 5231 5232 5233
        break;
    }
    return ret;
}

static int
qemuDomainDetachDeviceControllerLive(struct qemud_driver *driver,
                                     virDomainObjPtr vm,
5234
                                     virDomainDeviceDefPtr dev)
5235 5236 5237 5238 5239 5240
{
    virDomainControllerDefPtr cont = dev->data.controller;
    int ret = -1;

    switch (cont->type) {
    case VIR_DOMAIN_CONTROLLER_TYPE_SCSI:
5241
        ret = qemuDomainDetachPciControllerDevice(driver, vm, dev);
5242 5243 5244 5245 5246 5247 5248 5249 5250 5251 5252 5253
        break;
    default :
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("disk controller bus '%s' cannot be hotunplugged."),
                        virDomainControllerTypeToString(cont->type));
    }
    return ret;
}

static int
qemuDomainDetachDeviceLive(virDomainObjPtr vm,
                           virDomainDeviceDefPtr dev,
5254
                           virDomainPtr dom)
5255 5256 5257 5258 5259 5260
{
    struct qemud_driver *driver = dom->conn->privateData;
    int ret = -1;

    switch (dev->type) {
    case VIR_DOMAIN_DEVICE_DISK:
5261
        ret = qemuDomainDetachDeviceDiskLive(driver, vm, dev);
5262 5263
        break;
    case VIR_DOMAIN_DEVICE_CONTROLLER:
5264
        ret = qemuDomainDetachDeviceControllerLive(driver, vm, dev);
5265
        break;
5266 5267 5268
    case VIR_DOMAIN_DEVICE_LEASE:
        ret = qemuDomainDetachLease(driver, vm, dev->data.lease);
        break;
5269
    case VIR_DOMAIN_DEVICE_NET:
5270
        ret = qemuDomainDetachNetDevice(driver, vm, dev);
5271 5272
        break;
    case VIR_DOMAIN_DEVICE_HOSTDEV:
5273
        ret = qemuDomainDetachHostDevice(driver, vm, dev);
5274 5275 5276 5277 5278 5279 5280 5281 5282 5283
        break;
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        "%s", _("This type of device cannot be hot unplugged"));
        break;
    }

    return ret;
}

5284 5285 5286 5287 5288 5289 5290 5291
static int
qemuDomainChangeDiskMediaLive(virDomainObjPtr vm,
                              virDomainDeviceDefPtr dev,
                              struct qemud_driver *driver,
                              bool force)
{
    virDomainDiskDefPtr disk = dev->data.disk;
    virCgroupPtr cgroup = NULL;
5292
    int ret = -1;
5293 5294 5295

    if (qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_DEVICES)) {
        if (virCgroupForDomain(driver->cgroup,
5296
                               vm->def->name, &cgroup, 0) != 0) {
5297 5298 5299 5300 5301 5302 5303 5304 5305 5306 5307 5308
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("Unable to find cgroup for %s"),
                            vm->def->name);
            goto end;
        }
        if (qemuSetupDiskCgroup(driver, vm, cgroup, disk) < 0)
            goto end;
    }

    switch (disk->device) {
    case VIR_DOMAIN_DISK_DEVICE_CDROM:
    case VIR_DOMAIN_DISK_DEVICE_FLOPPY:
5309
        ret = qemuDomainChangeEjectableMedia(driver, vm, disk, force);
5310 5311 5312 5313 5314 5315 5316 5317 5318 5319 5320 5321 5322 5323 5324 5325 5326 5327 5328 5329 5330 5331 5332 5333 5334 5335 5336 5337 5338 5339 5340 5341
        if (ret == 0)
            dev->data.disk = NULL;
        break;
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("disk bus '%s' cannot be updated."),
                        virDomainDiskBusTypeToString(disk->bus));
        break;
    }

    if (ret != 0 && cgroup) {
        if (qemuTeardownDiskCgroup(driver, vm, cgroup, disk) < 0)
             VIR_WARN("Failed to teardown cgroup for disk path %s",
                      NULLSTR(disk->src));
    }
end:
    if (cgroup)
        virCgroupFree(&cgroup);
    return ret;
}

static int
qemuDomainUpdateDeviceLive(virDomainObjPtr vm,
                           virDomainDeviceDefPtr dev,
                           virDomainPtr dom,
                           bool force)
{
    struct qemud_driver *driver = dom->conn->privateData;
    int ret = -1;

    switch (dev->type) {
    case VIR_DOMAIN_DEVICE_DISK:
5342
        ret = qemuDomainChangeDiskMediaLive(vm, dev, driver, force);
5343 5344 5345 5346
        break;
    case VIR_DOMAIN_DEVICE_GRAPHICS:
        ret = qemuDomainChangeGraphics(driver, vm, dev->data.graphics);
        break;
5347 5348 5349
    case VIR_DOMAIN_DEVICE_NET:
        ret = qemuDomainChangeNet(driver, vm, dom, dev->data.net);
        break;
5350 5351 5352 5353 5354 5355 5356 5357 5358 5359
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("device type '%s' cannot be updated"),
                        virDomainDeviceTypeToString(dev->type));
        break;
    }

    return ret;
}

5360
static int
5361
qemuDomainAttachDeviceConfig(virDomainDefPtr vmdef,
5362 5363
                             virDomainDeviceDefPtr dev)
{
5364
    virDomainDiskDefPtr disk;
5365
    virDomainNetDefPtr net;
5366
    virDomainLeaseDefPtr lease;
5367

5368
    switch (dev->type) {
5369 5370
    case VIR_DOMAIN_DEVICE_DISK:
        disk = dev->data.disk;
5371
        if (virDomainDiskIndexByName(vmdef, disk->dst, true) >= 0) {
5372 5373 5374 5375 5376 5377 5378 5379 5380 5381 5382 5383 5384
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("target %s already exists."), disk->dst);
            return -1;
        }
        if (virDomainDiskInsert(vmdef, disk)) {
            virReportOOMError();
            return -1;
        }
        /* vmdef has the pointer. Generic codes for vmdef will do all jobs */
        dev->data.disk = NULL;
        if (disk->bus != VIR_DOMAIN_DISK_BUS_VIRTIO)
            if (virDomainDefAddImplicitControllers(vmdef) < 0)
                return -1;
5385
        if (qemuDomainAssignAddresses(vmdef) < 0)
5386 5387 5388
            return -1;
        break;

5389 5390 5391 5392 5393 5394 5395 5396 5397 5398 5399 5400 5401 5402
    case VIR_DOMAIN_DEVICE_NET:
        net = dev->data.net;
        if (virDomainNetIndexByMac(vmdef, net->mac) >= 0) {
            char macbuf[VIR_MAC_STRING_BUFLEN];
            virFormatMacAddr(net->mac, macbuf);
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("mac %s already exists"), macbuf);
            return -1;
        }
        if (virDomainNetInsert(vmdef, net)) {
            virReportOOMError();
            return -1;
        }
        dev->data.net = NULL;
5403
        if (qemuDomainAssignAddresses(vmdef) < 0)
5404 5405
            return -1;
        break;
5406 5407 5408 5409 5410 5411 5412 5413 5414 5415 5416 5417 5418 5419 5420 5421

    case VIR_DOMAIN_DEVICE_LEASE:
        lease = dev->data.lease;
        if (virDomainLeaseIndex(vmdef, lease) >= 0) {
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("Lease %s in lockspace %s already exists"),
                            lease->key, NULLSTR(lease->lockspace));
            return -1;
        }
        if (virDomainLeaseInsert(vmdef, lease) < 0)
            return -1;

        /* vmdef has the pointer. Generic codes for vmdef will do all jobs */
        dev->data.lease = NULL;
        break;

5422 5423 5424 5425 5426 5427 5428 5429 5430 5431
    default:
         qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                         _("persistent attach of device is not supported"));
         return -1;
    }
    return 0;
}


static int
5432
qemuDomainDetachDeviceConfig(virDomainDefPtr vmdef,
5433 5434
                             virDomainDeviceDefPtr dev)
{
5435
    virDomainDiskDefPtr disk;
5436
    virDomainNetDefPtr net;
5437
    virDomainLeaseDefPtr lease;
5438

5439
    switch (dev->type) {
5440 5441 5442 5443 5444 5445 5446 5447
    case VIR_DOMAIN_DEVICE_DISK:
        disk = dev->data.disk;
        if (virDomainDiskRemoveByName(vmdef, disk->dst)) {
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("no target device %s"), disk->dst);
            return -1;
        }
        break;
5448

5449 5450 5451 5452 5453 5454 5455 5456 5457 5458 5459
    case VIR_DOMAIN_DEVICE_NET:
        net = dev->data.net;
        if (virDomainNetRemoveByMac(vmdef, net->mac)) {
            char macbuf[VIR_MAC_STRING_BUFLEN];

            virFormatMacAddr(net->mac, macbuf);
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("no nic of mac %s"), macbuf);
            return -1;
        }
        break;
5460 5461 5462 5463 5464 5465 5466 5467 5468 5469 5470

    case VIR_DOMAIN_DEVICE_LEASE:
        lease = dev->data.lease;
        if (virDomainLeaseRemove(vmdef, lease) < 0) {
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("Lease %s in lockspace %s does not exist"),
                            lease->key, NULLSTR(lease->lockspace));
            return -1;
        }
        break;

5471 5472 5473 5474 5475 5476 5477 5478 5479
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                        _("persistent detach of device is not supported"));
        return -1;
    }
    return 0;
}

static int
5480
qemuDomainUpdateDeviceConfig(virDomainDefPtr vmdef,
5481 5482
                             virDomainDeviceDefPtr dev)
{
5483
    virDomainDiskDefPtr orig, disk;
5484
    virDomainNetDefPtr net;
5485 5486
    int pos;

5487
    switch (dev->type) {
5488 5489
    case VIR_DOMAIN_DEVICE_DISK:
        disk = dev->data.disk;
5490
        pos = virDomainDiskIndexByName(vmdef, disk->dst, false);
5491 5492
        if (pos < 0) {
            qemuReportError(VIR_ERR_INVALID_ARG,
5493
                            _("target %s doesn't exist."), disk->dst);
5494 5495 5496 5497 5498 5499 5500 5501 5502 5503 5504 5505 5506 5507 5508 5509 5510 5511 5512 5513 5514 5515 5516 5517 5518 5519 5520 5521 5522
            return -1;
        }
        orig = vmdef->disks[pos];
        if (!(orig->device == VIR_DOMAIN_DISK_DEVICE_CDROM) &&
            !(orig->device == VIR_DOMAIN_DISK_DEVICE_FLOPPY)) {
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("this disk doesn't support update"));
            return -1;
        }
        /*
         * Update 'orig'
         * We allow updating src/type//driverType/cachemode/
         */
        VIR_FREE(orig->src);
        orig->src = disk->src;
        orig->type = disk->type;
        orig->cachemode = disk->cachemode;
        if (disk->driverName) {
            VIR_FREE(orig->driverName);
            orig->driverName = disk->driverName;
            disk->driverName = NULL;
        }
        if (disk->driverType) {
            VIR_FREE(orig->driverType);
            orig->driverType = disk->driverType;
            disk->driverType = NULL;
        }
        disk->src = NULL;
        break;
5523 5524 5525 5526 5527 5528 5529 5530 5531 5532 5533 5534 5535 5536 5537 5538

    case VIR_DOMAIN_DEVICE_NET:
        net = dev->data.net;
        if ((pos = virDomainNetIndexByMac(vmdef, net->mac)) < 0) {
            char macbuf[VIR_MAC_STRING_BUFLEN];
            virFormatMacAddr(net->mac, macbuf);
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("mac %s doesn't exist"), macbuf);
            return -1;
        }

        VIR_FREE(vmdef->nets[pos]);

        vmdef->nets[pos] = net;
        dev->data.net = NULL;

5539
        if (qemuDomainAssignAddresses(vmdef) < 0)
5540 5541 5542
            return -1;
        break;

5543 5544 5545 5546 5547 5548 5549 5550
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                         _("persistent update of device is not supported"));
        return -1;
    }
    return 0;
}

5551 5552 5553 5554 5555 5556 5557 5558 5559 5560 5561
/* Actions for qemuDomainModifyDeviceFlags */
enum {
    QEMU_DEVICE_ATTACH,
    QEMU_DEVICE_DETACH,
    QEMU_DEVICE_UPDATE,
};


static int
qemuDomainModifyDeviceFlags(virDomainPtr dom, const char *xml,
                            unsigned int flags, int action)
5562
{
5563
    struct qemud_driver *driver = dom->conn->privateData;
5564
    virDomainObjPtr vm = NULL;
5565
    virDomainDefPtr vmdef = NULL;
5566
    virDomainDeviceDefPtr dev = NULL;
5567
    bool force = (flags & VIR_DOMAIN_DEVICE_MODIFY_FORCE) != 0;
5568
    int ret = -1;
5569
    unsigned int affect;
5570

5571 5572
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG |
5573 5574 5575
                  (action == QEMU_DEVICE_UPDATE ?
                   VIR_DOMAIN_DEVICE_MODIFY_FORCE : 0), -1);

5576 5577
    affect = flags & (VIR_DOMAIN_AFFECT_LIVE | VIR_DOMAIN_AFFECT_CONFIG);

5578 5579 5580 5581 5582 5583 5584
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
5585 5586 5587
        goto cleanup;
    }

5588
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
5589
        goto cleanup;
5590

5591
    if (virDomainObjIsActive(vm)) {
5592
        if (affect == VIR_DOMAIN_AFFECT_CURRENT)
5593
            flags |= VIR_DOMAIN_AFFECT_LIVE;
5594
    } else {
5595
        if (affect == VIR_DOMAIN_AFFECT_CURRENT)
5596
            flags |= VIR_DOMAIN_AFFECT_CONFIG;
5597
        /* check consistency between flags and the vm state */
5598
        if (flags & VIR_DOMAIN_AFFECT_LIVE) {
5599 5600 5601 5602 5603 5604
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s",
                            _("cannot do live update a device on "
                              "inactive domain"));
            goto endjob;
        }
5605
    }
5606

5607
    if ((flags & VIR_DOMAIN_AFFECT_CONFIG) && !vm->persistent) {
5608 5609 5610 5611
         qemuReportError(VIR_ERR_OPERATION_INVALID,
                         "%s", _("cannot modify device on transient domain"));
         goto endjob;
    }
5612

5613
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
5614 5615 5616 5617 5618
        dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
                                      VIR_DOMAIN_XML_INACTIVE);
        if (dev == NULL)
            goto endjob;

5619 5620 5621 5622 5623 5624 5625 5626 5627 5628 5629 5630 5631 5632 5633 5634 5635 5636 5637
        /* Make a copy for updated domain. */
        vmdef = virDomainObjCopyPersistentDef(driver->caps, vm);
        if (!vmdef)
            goto endjob;
        switch (action) {
        case QEMU_DEVICE_ATTACH:
            ret = qemuDomainAttachDeviceConfig(vmdef, dev);
            break;
        case QEMU_DEVICE_DETACH:
            ret = qemuDomainDetachDeviceConfig(vmdef, dev);
            break;
        case QEMU_DEVICE_UPDATE:
            ret = qemuDomainUpdateDeviceConfig(vmdef, dev);
            break;
        default:
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("unknown domain modify action %d"), action);
            break;
        }
5638

5639 5640 5641 5642 5643
        if (ret == -1)
            goto endjob;
    }

    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
5644 5645 5646 5647
        /* If dev exists it was created to modify the domain config. Free it. */
        virDomainDeviceDefFree(dev);
        dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
                                      VIR_DOMAIN_XML_INACTIVE);
5648 5649
        if (dev == NULL) {
            ret = -1;
5650
            goto endjob;
5651
        }
5652

5653 5654
        switch (action) {
        case QEMU_DEVICE_ATTACH:
5655
            ret = qemuDomainAttachDeviceLive(vm, dev, dom);
5656 5657
            break;
        case QEMU_DEVICE_DETACH:
5658
            ret = qemuDomainDetachDeviceLive(vm, dev, dom);
5659 5660
            break;
        case QEMU_DEVICE_UPDATE:
5661
            ret = qemuDomainUpdateDeviceLive(vm, dev, dom, force);
5662 5663 5664 5665
            break;
        default:
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("unknown domain modify action %d"), action);
5666
            ret = -1;
5667 5668
            break;
        }
5669 5670 5671

        if (ret == -1)
            goto endjob;
5672 5673
        /*
         * update domain status forcibly because the domain status may be
5674 5675
         * changed even if we failed to attach the device. For example,
         * a new controller may be created.
5676
         */
5677
        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0) {
5678
            ret = -1;
5679 5680
            goto endjob;
        }
5681
    }
5682

5683
    /* Finally, if no error until here, we can save config. */
5684
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
5685 5686 5687 5688 5689 5690
        ret = virDomainSaveConfig(driver->configDir, vmdef);
        if (!ret) {
            virDomainObjAssignDef(vm, vmdef, false);
            vmdef = NULL;
        }
    }
5691 5692

endjob:
5693
    if (qemuDomainObjEndJob(driver, vm) == 0)
5694 5695 5696
        vm = NULL;

cleanup:
5697
    virDomainDefFree(vmdef);
5698 5699 5700 5701
    virDomainDeviceDefFree(dev);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
5702 5703 5704
    return ret;
}

5705 5706 5707 5708 5709 5710
static int qemuDomainAttachDeviceFlags(virDomainPtr dom, const char *xml,
                                       unsigned int flags)
{
    return qemuDomainModifyDeviceFlags(dom, xml, flags, QEMU_DEVICE_ATTACH);
}

5711 5712 5713
static int qemuDomainAttachDevice(virDomainPtr dom, const char *xml)
{
    return qemuDomainAttachDeviceFlags(dom, xml,
5714
                                       VIR_DOMAIN_AFFECT_LIVE);
5715
}
5716

5717

5718 5719 5720 5721
static int qemuDomainUpdateDeviceFlags(virDomainPtr dom,
                                       const char *xml,
                                       unsigned int flags)
{
5722
    return qemuDomainModifyDeviceFlags(dom, xml, flags, QEMU_DEVICE_UPDATE);
5723 5724
}

5725 5726 5727
static int qemuDomainDetachDeviceFlags(virDomainPtr dom, const char *xml,
                                       unsigned int flags)
{
5728
    return qemuDomainModifyDeviceFlags(dom, xml, flags, QEMU_DEVICE_DETACH);
5729 5730
}

5731 5732 5733
static int qemuDomainDetachDevice(virDomainPtr dom, const char *xml)
{
    return qemuDomainDetachDeviceFlags(dom, xml,
5734
                                       VIR_DOMAIN_AFFECT_LIVE);
5735 5736
}

5737
static int qemudDomainGetAutostart(virDomainPtr dom,
5738
                                   int *autostart) {
5739 5740 5741
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
5742

5743
    qemuDriverLock(driver);
5744
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
5745 5746
    qemuDriverUnlock(driver);

5747
    if (!vm) {
5748 5749
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
5750 5751
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
5752
        goto cleanup;
5753 5754 5755
    }

    *autostart = vm->autostart;
5756
    ret = 0;
5757

5758
cleanup:
5759 5760
    if (vm)
        virDomainObjUnlock(vm);
5761
    return ret;
5762 5763
}

5764
static int qemudDomainSetAutostart(virDomainPtr dom,
5765
                                   int autostart) {
5766 5767
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
5768 5769
    char *configFile = NULL, *autostartLink = NULL;
    int ret = -1;
5770

5771
    qemuDriverLock(driver);
5772
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
5773

5774
    if (!vm) {
5775 5776
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
5777 5778
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
5779
        goto cleanup;
5780 5781
    }

5782
    if (!vm->persistent) {
5783
        qemuReportError(VIR_ERR_OPERATION_INVALID,
5784
                        "%s", _("cannot set autostart for transient domain"));
5785
        goto cleanup;
5786 5787
    }

5788 5789
    autostart = (autostart != 0);

5790
    if (vm->autostart != autostart) {
5791
        if ((configFile = virDomainConfigFile(driver->configDir, vm->def->name)) == NULL)
5792
            goto cleanup;
5793
        if ((autostartLink = virDomainConfigFile(driver->autostartDir, vm->def->name)) == NULL)
5794
            goto cleanup;
5795

5796
        if (autostart) {
5797 5798
            if (virFileMakePath(driver->autostartDir) < 0) {
                virReportSystemError(errno,
5799 5800
                                     _("cannot create autostart directory %s"),
                                     driver->autostartDir);
5801 5802
                goto cleanup;
            }
5803

5804
            if (symlink(configFile, autostartLink) < 0) {
5805
                virReportSystemError(errno,
5806 5807
                                     _("Failed to create symlink '%s to '%s'"),
                                     autostartLink, configFile);
5808 5809 5810 5811
                goto cleanup;
            }
        } else {
            if (unlink(autostartLink) < 0 && errno != ENOENT && errno != ENOTDIR) {
5812
                virReportSystemError(errno,
5813 5814
                                     _("Failed to delete symlink '%s'"),
                                     autostartLink);
5815 5816
                goto cleanup;
            }
5817 5818
        }

5819
        vm->autostart = autostart;
5820
    }
5821
    ret = 0;
5822

5823 5824 5825
cleanup:
    VIR_FREE(configFile);
    VIR_FREE(autostartLink);
5826 5827
    if (vm)
        virDomainObjUnlock(vm);
5828
    qemuDriverUnlock(driver);
5829
    return ret;
5830 5831
}

5832

5833 5834 5835 5836 5837 5838 5839 5840 5841 5842 5843 5844 5845 5846 5847 5848 5849 5850 5851 5852 5853 5854 5855 5856 5857 5858 5859 5860 5861 5862 5863 5864 5865
/*
 * check whether the host supports CFS bandwidth
 *
 * Return 1 when CFS bandwidth is supported, 0 when CFS bandwidth is not
 * supported, -1 on error.
 */
static int qemuGetCpuBWStatus(virCgroupPtr cgroup)
{
    char *cfs_period_path = NULL;
    int ret = -1;

    if (!cgroup)
        return 0;

    if (virCgroupPathOfController(cgroup, VIR_CGROUP_CONTROLLER_CPU,
                                  "cpu.cfs_period_us", &cfs_period_path) < 0) {
        VIR_INFO("cannot get the path of cgroup CPU controller");
        ret = 0;
        goto cleanup;
    }

    if (access(cfs_period_path, F_OK) < 0) {
        ret = 0;
    } else {
        ret = 1;
    }

cleanup:
    VIR_FREE(cfs_period_path);
    return ret;
}


5866 5867 5868 5869
static char *qemuGetSchedulerType(virDomainPtr dom,
                                  int *nparams)
{
    struct qemud_driver *driver = dom->conn->privateData;
5870
    char *ret = NULL;
5871
    int rc;
5872

5873
    qemuDriverLock(driver);
5874
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
5875 5876
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup CPU controller is not mounted"));
5877
        goto cleanup;
5878 5879
    }

5880 5881 5882 5883 5884 5885 5886 5887 5888
    if (nparams) {
        rc = qemuGetCpuBWStatus(driver->cgroup);
        if (rc < 0)
            goto cleanup;
        else if (rc == 0)
            *nparams = 1;
        else
            *nparams = 3;
    }
5889 5890 5891

    ret = strdup("posix");
    if (!ret)
5892
        virReportOOMError();
5893 5894 5895

cleanup:
    qemuDriverUnlock(driver);
5896 5897 5898
    return ret;
}

5899 5900 5901 5902
/* deviceWeightStr in the form of /device/path,weight,/device/path,weight
 * for example, /dev/disk/by-path/pci-0000:00:1f.2-scsi-0:0:0:0,800
 */
static int
5903 5904
qemuDomainParseDeviceWeightStr(char *deviceWeightStr,
                               virBlkioDeviceWeightPtr *dw, size_t *size)
5905 5906 5907 5908 5909 5910 5911 5912 5913 5914 5915 5916 5917 5918 5919 5920 5921 5922 5923 5924 5925 5926 5927 5928 5929 5930 5931 5932 5933 5934 5935 5936 5937 5938 5939 5940 5941 5942 5943 5944 5945 5946 5947 5948 5949 5950 5951 5952 5953 5954 5955 5956 5957 5958 5959 5960 5961 5962 5963 5964 5965 5966 5967 5968 5969 5970 5971 5972 5973 5974 5975 5976 5977 5978 5979 5980
{
    char *temp;
    int ndevices = 0;
    int nsep = 0;
    int i;
    virBlkioDeviceWeightPtr result = NULL;

    temp = deviceWeightStr;
    while (temp) {
        temp = strchr(temp, ',');
        if (temp) {
            temp++;
            nsep++;
        }
    }

    /* A valid string must have even number of fields, hence an odd
     * number of commas.  */
    if (!(nsep & 1))
        goto error;

    ndevices = (nsep + 1) / 2;

    if (VIR_ALLOC_N(result, ndevices) < 0) {
        virReportOOMError();
        return -1;
    }

    i = 0;
    temp = deviceWeightStr;
    while (temp) {
        char *p = temp;

        /* device path */
        p = strchr(p, ',');
        if (!p)
            goto error;

        result[i].path = strndup(temp, p - temp);
        if (!result[i].path) {
            virReportOOMError();
            goto cleanup;
        }

        /* weight */
        temp = p + 1;

        if (virStrToLong_ui(temp, &p, 10, &result[i].weight) < 0)
            goto error;

        i++;

        if (*p == '\0')
            break;
        else if (*p != ',')
            goto error;
        temp = p + 1;
    }

    if (!i)
        VIR_FREE(result);

    *dw = result;
    *size = i;

    return 0;

error:
    qemuReportError(VIR_ERR_INVALID_ARG,
                    _("unable to parse %s"), deviceWeightStr);
cleanup:
    virBlkioDeviceWeightArrayClear(result, ndevices);
    VIR_FREE(result);
    return -1;
}

5981 5982 5983 5984 5985 5986 5987 5988 5989 5990 5991 5992 5993 5994 5995 5996 5997 5998 5999 6000 6001 6002 6003 6004 6005 6006 6007 6008 6009 6010 6011 6012 6013 6014 6015
/* Modify def to reflect all device weight changes described in tmp.  */
static int
qemuDomainMergeDeviceWeights(virBlkioDeviceWeightPtr *def, size_t *def_size,
                             virBlkioDeviceWeightPtr tmp, size_t tmp_size)
{
    int i, j;
    virBlkioDeviceWeightPtr dw;

    for (i = 0; i < tmp_size; i++) {
        bool found = false;

        dw = &tmp[i];
        for (j = 0; j < *def_size; j++) {
            if (STREQ(dw->path, (*def)[j].path)) {
                found = true;
                (*def)[j].weight = dw->weight;
                break;
            }
        }
        if (!found) {
            if (!dw->weight)
                continue;
            if (VIR_EXPAND_N(*def, *def_size, 1) < 0) {
                virReportOOMError();
                return -1;
            }
            (*def)[*def_size - 1].path = dw->path;
            (*def)[*def_size - 1].weight = dw->weight;
            dw->path = NULL;
        }
    }

    return 0;
}

6016
static int qemuDomainSetBlkioParameters(virDomainPtr dom,
6017
                                         virTypedParameterPtr params,
6018 6019 6020 6021 6022 6023 6024
                                         int nparams,
                                         unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
6025
    virDomainDefPtr persistentDef = NULL;
6026
    int ret = -1;
6027
    bool isActive;
6028

6029 6030
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);
6031 6032 6033 6034 6035 6036 6037 6038 6039 6040
    qemuDriverLock(driver);

    vm = virDomainFindByUUID(&driver->domains, dom->uuid);

    if (vm == NULL) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("No such domain %s"), dom->uuid);
        goto cleanup;
    }

6041 6042 6043 6044 6045 6046 6047
    isActive = virDomainObjIsActive(vm);

    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
        if (isActive)
            flags = VIR_DOMAIN_AFFECT_LIVE;
        else
            flags = VIR_DOMAIN_AFFECT_CONFIG;
6048 6049
    }

6050 6051 6052 6053 6054 6055 6056 6057
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
        if (!isActive) {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s", _("domain is not running"));
            goto cleanup;
        }

        if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_BLKIO)) {
6058
            qemuReportError(VIR_ERR_OPERATION_INVALID, _("blkio cgroup isn't mounted"));
6059 6060 6061 6062 6063 6064 6065 6066 6067 6068 6069 6070 6071 6072 6073 6074 6075 6076
            goto cleanup;
        }

        if (virCgroupForDomain(driver->cgroup, vm->def->name, &group, 0) != 0) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("cannot find cgroup for domain %s"), vm->def->name);
            goto cleanup;
        }
    }

    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
        if (!vm->persistent) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("cannot change persistent config of a transient domain"));
            goto cleanup;
        }
        if (!(persistentDef = virDomainObjGetPersistentDef(driver->caps, vm)))
            goto cleanup;
6077 6078 6079
    }

    ret = 0;
6080 6081
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
        for (i = 0; i < nparams; i++) {
6082
            int rc;
6083 6084 6085 6086 6087 6088 6089 6090 6091 6092 6093 6094 6095 6096 6097 6098
            virTypedParameterPtr param = &params[i];

            if (STREQ(param->field, VIR_DOMAIN_BLKIO_WEIGHT)) {
                if (param->type != VIR_TYPED_PARAM_UINT) {
                    qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                    _("invalid type for blkio weight tunable, expected a 'unsigned int'"));
                    ret = -1;
                    continue;
                }

                if (params[i].value.ui > 1000 || params[i].value.ui < 100) {
                    qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                    _("out of blkio weight range."));
                    ret = -1;
                    continue;
                }
6099

6100 6101 6102 6103 6104 6105
                rc = virCgroupSetBlkioWeight(group, params[i].value.ui);
                if (rc != 0) {
                    virReportSystemError(-rc, "%s",
                                         _("unable to set blkio weight tunable"));
                    ret = -1;
                }
6106
            } else if (STREQ(param->field, VIR_DOMAIN_BLKIO_DEVICE_WEIGHT)) {
6107
                size_t ndevices;
6108 6109 6110 6111 6112 6113 6114 6115 6116
                virBlkioDeviceWeightPtr devices = NULL;
                if (param->type != VIR_TYPED_PARAM_STRING) {
                    qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                    _("invalid type for device_weight tunable, "
                                      "expected a 'char *'"));
                    ret = -1;
                    continue;
                }

6117 6118 6119
                if (qemuDomainParseDeviceWeightStr(params[i].value.s,
                                                   &devices,
                                                   &ndevices) < 0) {
6120 6121 6122 6123 6124 6125 6126 6127 6128 6129 6130 6131 6132 6133 6134 6135 6136 6137 6138
                    ret = -1;
                    continue;
                }
                for (i = 0; i < ndevices; i++) {
                    rc = virCgroupSetBlkioDeviceWeight(group,
                                                       devices[i].path,
                                                       devices[i].weight);
                    if (rc < 0) {
                        virReportSystemError(-rc,
                                             _("Unable to set io device weight "
                                               "for path %s"),
                                             devices[i].path);
                        break;
                    }
                }
                if (i != ndevices) {
                    ret = -1;
                    continue;
                }
6139 6140 6141 6142 6143 6144
                if (qemuDomainMergeDeviceWeights(&vm->def->blkio.devices,
                                                 &vm->def->blkio.ndevices,
                                                 devices, ndevices) < 0)
                    ret = -1;
                virBlkioDeviceWeightArrayClear(devices, ndevices);
                VIR_FREE(devices);
6145 6146
            } else {
                qemuReportError(VIR_ERR_INVALID_ARG,
6147 6148
                                _("Parameter `%s' not supported"),
                                param->field);
6149 6150
                ret = -1;
            }
6151
        }
E
Eric Blake 已提交
6152 6153 6154 6155
    }
    if (ret < 0)
        goto cleanup;
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
E
Eric Blake 已提交
6156 6157 6158
        /* Clang can't see that if we get here, persistentDef was set.  */
        sa_assert(persistentDef);

6159 6160 6161 6162 6163 6164 6165 6166 6167 6168
        for (i = 0; i < nparams; i++) {
            virTypedParameterPtr param = &params[i];

            if (STREQ(param->field, VIR_DOMAIN_BLKIO_WEIGHT)) {
                if (param->type != VIR_TYPED_PARAM_UINT) {
                    qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                    _("invalid type for blkio weight tunable, expected a 'unsigned int'"));
                    ret = -1;
                    continue;
                }
6169

6170 6171 6172 6173 6174 6175 6176 6177
                if (params[i].value.ui > 1000 || params[i].value.ui < 100) {
                    qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                    _("out of blkio weight range."));
                    ret = -1;
                    continue;
                }

                persistentDef->blkio.weight = params[i].value.ui;
6178 6179
            } else if (STREQ(param->field, VIR_DOMAIN_BLKIO_DEVICE_WEIGHT)) {
                virBlkioDeviceWeightPtr devices = NULL;
6180
                size_t ndevices;
6181 6182 6183 6184 6185 6186 6187
                if (param->type != VIR_TYPED_PARAM_STRING) {
                    qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                    _("invalid type for device_weight tunable, "
                                      "expected a 'char *'"));
                    ret = -1;
                    continue;
                }
6188 6189 6190
                if (qemuDomainParseDeviceWeightStr(params[i].value.s,
                                                   &devices,
                                                   &ndevices) < 0) {
6191 6192 6193
                    ret = -1;
                    continue;
                }
6194 6195 6196 6197 6198 6199
                if (qemuDomainMergeDeviceWeights(&vm->def->blkio.devices,
                                                 &vm->def->blkio.ndevices,
                                                 devices, ndevices) < 0)
                    ret = -1;
                virBlkioDeviceWeightArrayClear(devices, ndevices);
                VIR_FREE(devices);
6200 6201
            } else {
                qemuReportError(VIR_ERR_INVALID_ARG,
6202 6203
                                _("Parameter `%s' not supported"),
                                param->field);
6204 6205 6206
                ret = -1;
            }
        }
A
Alex Jia 已提交
6207 6208 6209

        if (virDomainSaveConfig(driver->configDir, persistentDef) < 0)
            ret = -1;
6210 6211 6212 6213 6214 6215 6216 6217 6218 6219 6220
    }

cleanup:
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

static int qemuDomainGetBlkioParameters(virDomainPtr dom,
6221
                                         virTypedParameterPtr params,
6222 6223 6224 6225
                                         int *nparams,
                                         unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
6226
    int i, j;
6227 6228
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
6229
    virDomainDefPtr persistentDef = NULL;
6230 6231 6232
    unsigned int val;
    int ret = -1;
    int rc;
6233
    bool isActive;
6234

6235
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
6236 6237
                  VIR_DOMAIN_AFFECT_CONFIG |
                  VIR_TYPED_PARAM_STRING_OKAY, -1);
6238 6239
    qemuDriverLock(driver);

6240 6241 6242
    /* We blindly return a string, and let libvirt.c and
     * remote_driver.c do the filtering on behalf of older clients
     * that can't parse it.  */
6243 6244
    flags &= ~VIR_TYPED_PARAM_STRING_OKAY;

6245 6246 6247 6248 6249 6250 6251 6252 6253 6254 6255 6256 6257 6258 6259
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);

    if (vm == NULL) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("No such domain %s"), dom->uuid);
        goto cleanup;
    }

    if ((*nparams) == 0) {
        /* Current number of blkio parameters supported by cgroups */
        *nparams = QEMU_NB_BLKIO_PARAM;
        ret = 0;
        goto cleanup;
    }

6260 6261 6262 6263 6264 6265 6266
    isActive = virDomainObjIsActive(vm);

    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
        if (isActive)
            flags = VIR_DOMAIN_AFFECT_LIVE;
        else
            flags = VIR_DOMAIN_AFFECT_CONFIG;
6267 6268
    }

6269 6270 6271 6272 6273 6274
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
        if (!isActive) {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s", _("domain is not running"));
            goto cleanup;
        }
6275

6276
        if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_BLKIO)) {
6277
            qemuReportError(VIR_ERR_OPERATION_INVALID, _("blkio cgroup isn't mounted"));
6278 6279 6280 6281 6282 6283 6284 6285 6286 6287 6288 6289 6290 6291 6292 6293 6294 6295 6296 6297 6298
            goto cleanup;
        }

        if (virCgroupForDomain(driver->cgroup, vm->def->name, &group, 0) != 0) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("cannot find cgroup for domain %s"), vm->def->name);
            goto cleanup;
        }
    }

    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
        if (!vm->persistent) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("cannot change persistent config of a transient domain"));
            goto cleanup;
        }
        if (!(persistentDef = virDomainObjGetPersistentDef(driver->caps, vm)))
            goto cleanup;
    }

    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
6299
        for (i = 0; i < *nparams && i < QEMU_NB_BLKIO_PARAM; i++) {
6300 6301 6302 6303 6304 6305 6306 6307 6308 6309 6310 6311 6312 6313 6314
            virTypedParameterPtr param = &params[i];
            val = 0;
            param->value.ui = 0;
            param->type = VIR_TYPED_PARAM_UINT;

            switch (i) {
            case 0: /* fill blkio weight here */
                rc = virCgroupGetBlkioWeight(group, &val);
                if (rc != 0) {
                    virReportSystemError(-rc, "%s",
                                         _("unable to get blkio weight"));
                    goto cleanup;
                }
                if (virStrcpyStatic(param->field, VIR_DOMAIN_BLKIO_WEIGHT) == NULL) {
                    qemuReportError(VIR_ERR_INTERNAL_ERROR,
6315 6316
                                    _("Field name '%s' too long"),
                                    VIR_DOMAIN_BLKIO_WEIGHT);
6317 6318 6319 6320
                    goto cleanup;
                }
                param->value.ui = val;
                break;
6321 6322 6323 6324
            case 1: /* blkiotune.device_weight */
                if (vm->def->blkio.ndevices > 0) {
                    virBuffer buf = VIR_BUFFER_INITIALIZER;
                    bool comma = false;
6325

6326 6327 6328 6329 6330 6331 6332 6333 6334 6335 6336 6337 6338 6339 6340 6341 6342 6343 6344 6345 6346 6347 6348 6349 6350 6351 6352 6353 6354 6355 6356 6357 6358
                    for (j = 0; j < vm->def->blkio.ndevices; j++) {
                        if (!vm->def->blkio.devices[j].weight)
                            continue;
                        if (comma)
                            virBufferAddChar(&buf, ',');
                        else
                            comma = true;
                        virBufferAsprintf(&buf, "%s,%u",
                                          vm->def->blkio.devices[j].path,
                                          vm->def->blkio.devices[j].weight);
                    }
                    if (virBufferError(&buf)) {
                        virReportOOMError();
                        goto cleanup;
                    }
                    param->value.s = virBufferContentAndReset(&buf);
                }
                if (!param->value.s) {
                    param->value.s = strdup("");
                    if (!param->value.s) {
                        virReportOOMError();
                        goto cleanup;
                    }
                }
                param->type = VIR_TYPED_PARAM_STRING;
                if (virStrcpyStatic(param->field,
                                    VIR_DOMAIN_BLKIO_DEVICE_WEIGHT) == NULL) {
                    qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                    _("Field name '%s' too long"),
                                    VIR_DOMAIN_BLKIO_DEVICE_WEIGHT);
                    goto cleanup;
                }
                break;
6359 6360 6361 6362

            default:
                break;
                /* should not hit here */
6363
            }
6364 6365
        }
    } else if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
6366
        for (i = 0; i < *nparams && i < QEMU_NB_BLKIO_PARAM; i++) {
6367 6368 6369 6370 6371 6372 6373 6374 6375
            virTypedParameterPtr param = &params[i];
            val = 0;
            param->value.ui = 0;
            param->type = VIR_TYPED_PARAM_UINT;

            switch (i) {
            case 0: /* fill blkio weight here */
                if (virStrcpyStatic(param->field, VIR_DOMAIN_BLKIO_WEIGHT) == NULL) {
                    qemuReportError(VIR_ERR_INTERNAL_ERROR,
6376 6377
                                    _("Field name '%s' too long"),
                                    VIR_DOMAIN_BLKIO_WEIGHT);
6378 6379 6380 6381
                    goto cleanup;
                }
                param->value.ui = persistentDef->blkio.weight;
                break;
6382

6383 6384 6385
            case 1: /* blkiotune.device_weight */
                if (persistentDef->blkio.ndevices > 0) {
                    virBuffer buf = VIR_BUFFER_INITIALIZER;
6386 6387
                    bool comma = false;

6388
                    for (j = 0; j < persistentDef->blkio.ndevices; j++) {
6389 6390 6391
                        if (!persistentDef->blkio.devices[j].weight)
                            continue;
                        if (comma)
6392
                            virBufferAddChar(&buf, ',');
6393 6394
                        else
                            comma = true;
6395 6396 6397 6398 6399 6400 6401 6402 6403
                        virBufferAsprintf(&buf, "%s,%u",
                                          persistentDef->blkio.devices[j].path,
                                          persistentDef->blkio.devices[j].weight);
                    }
                    if (virBufferError(&buf)) {
                        virReportOOMError();
                        goto cleanup;
                    }
                    param->value.s = virBufferContentAndReset(&buf);
6404 6405
                }
                if (!param->value.s) {
6406 6407 6408 6409 6410 6411 6412 6413 6414 6415 6416 6417 6418 6419 6420 6421
                    param->value.s = strdup("");
                    if (!param->value.s) {
                        virReportOOMError();
                        goto cleanup;
                    }
                }
                param->type = VIR_TYPED_PARAM_STRING;
                if (virStrcpyStatic(param->field,
                                    VIR_DOMAIN_BLKIO_DEVICE_WEIGHT) == NULL) {
                    qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                    _("Field name '%s' too long"),
                                    VIR_DOMAIN_BLKIO_DEVICE_WEIGHT);
                    goto cleanup;
                }
                break;

6422 6423 6424 6425
            default:
                break;
                /* should not hit here */
            }
6426 6427 6428
        }
    }

6429 6430
    if (QEMU_NB_BLKIO_PARAM < *nparams)
        *nparams = QEMU_NB_BLKIO_PARAM;
6431 6432 6433 6434 6435 6436 6437 6438 6439 6440
    ret = 0;

cleanup:
    if (group)
        virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}
6441 6442

static int qemuDomainSetMemoryParameters(virDomainPtr dom,
6443
                                         virTypedParameterPtr params,
6444
                                         int nparams,
6445
                                         unsigned int flags)
6446 6447 6448
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
6449
    virDomainDefPtr persistentDef = NULL;
6450 6451 6452
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
    int ret = -1;
6453 6454
    bool isActive;

6455 6456
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);
6457 6458 6459 6460 6461 6462 6463 6464 6465 6466 6467

    qemuDriverLock(driver);

    vm = virDomainFindByUUID(&driver->domains, dom->uuid);

    if (vm == NULL) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("No such domain %s"), dom->uuid);
        goto cleanup;
    }

6468 6469
    isActive = virDomainObjIsActive(vm);

6470
    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
6471
        if (isActive)
6472
            flags = VIR_DOMAIN_AFFECT_LIVE;
6473
        else
6474
            flags = VIR_DOMAIN_AFFECT_CONFIG;
6475 6476
    }

6477
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
6478 6479 6480 6481 6482 6483 6484 6485 6486 6487 6488 6489 6490 6491 6492 6493 6494 6495 6496
        if (!isActive) {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s", _("domain is not running"));
            goto cleanup;
        }

        if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_MEMORY)) {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s", _("cgroup memory controller is not mounted"));
            goto cleanup;
        }

        if (virCgroupForDomain(driver->cgroup, vm->def->name, &group, 0) != 0) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("cannot find cgroup for domain %s"), vm->def->name);
            goto cleanup;
        }
    }

6497
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
6498 6499 6500 6501 6502 6503 6504
        if (!vm->persistent) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("cannot change persistent config of a transient domain"));
            goto cleanup;
        }
        if (!(persistentDef = virDomainObjGetPersistentDef(driver->caps, vm)))
            goto cleanup;
6505 6506 6507 6508
    }

    ret = 0;
    for (i = 0; i < nparams; i++) {
6509
        virTypedParameterPtr param = &params[i];
6510 6511 6512

        if (STREQ(param->field, VIR_DOMAIN_MEMORY_HARD_LIMIT)) {
            int rc;
6513
            if (param->type != VIR_TYPED_PARAM_ULLONG) {
6514 6515 6516 6517 6518 6519
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for memory hard_limit tunable, expected a 'ullong'"));
                ret = -1;
                continue;
            }

6520
            if (flags & VIR_DOMAIN_AFFECT_LIVE) {
6521 6522 6523 6524 6525 6526 6527 6528
                rc = virCgroupSetMemoryHardLimit(group, params[i].value.ul);
                if (rc != 0) {
                    virReportSystemError(-rc, "%s",
                                         _("unable to set memory hard_limit tunable"));
                    ret = -1;
                }
            }

6529
            if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
6530
                persistentDef->mem.hard_limit = params[i].value.ul;
6531 6532 6533
            }
        } else if (STREQ(param->field, VIR_DOMAIN_MEMORY_SOFT_LIMIT)) {
            int rc;
6534
            if (param->type != VIR_TYPED_PARAM_ULLONG) {
6535 6536 6537 6538 6539 6540
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for memory soft_limit tunable, expected a 'ullong'"));
                ret = -1;
                continue;
            }

6541
            if (flags & VIR_DOMAIN_AFFECT_LIVE) {
6542 6543 6544 6545 6546 6547 6548 6549
                rc = virCgroupSetMemorySoftLimit(group, params[i].value.ul);
                if (rc != 0) {
                    virReportSystemError(-rc, "%s",
                                         _("unable to set memory soft_limit tunable"));
                    ret = -1;
                }
            }

6550
            if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
6551
                persistentDef->mem.soft_limit = params[i].value.ul;
6552
            }
6553
        } else if (STREQ(param->field, VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT)) {
6554
            int rc;
6555
            if (param->type != VIR_TYPED_PARAM_ULLONG) {
6556 6557 6558 6559 6560 6561
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for swap_hard_limit tunable, expected a 'ullong'"));
                ret = -1;
                continue;
            }

6562
            if (flags & VIR_DOMAIN_AFFECT_LIVE) {
6563 6564 6565 6566 6567 6568 6569
                rc = virCgroupSetMemSwapHardLimit(group, params[i].value.ul);
                if (rc != 0) {
                    virReportSystemError(-rc, "%s",
                                         _("unable to set swap_hard_limit tunable"));
                    ret = -1;
                }
            }
6570
            if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
6571
                persistentDef->mem.swap_hard_limit = params[i].value.ul;
6572 6573 6574
            }
        } else if (STREQ(param->field, VIR_DOMAIN_MEMORY_MIN_GUARANTEE)) {
            qemuReportError(VIR_ERR_INVALID_ARG,
6575 6576
                            _("Memory tunable `%s' not implemented"),
                            param->field);
6577 6578 6579 6580 6581 6582 6583 6584
            ret = -1;
        } else {
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("Parameter `%s' not supported"), param->field);
            ret = -1;
        }
    }

6585
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
6586 6587
        if (virDomainSaveConfig(driver->configDir, persistentDef) < 0)
            ret = -1;
6588 6589
    }

6590 6591 6592 6593 6594 6595 6596 6597
cleanup:
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

6598
static int qemuDomainGetMemoryParameters(virDomainPtr dom,
6599
                                         virTypedParameterPtr params,
6600
                                         int *nparams,
6601
                                         unsigned int flags)
6602 6603 6604 6605 6606
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
6607
    virDomainDefPtr persistentDef = NULL;
6608
    unsigned long long val;
6609 6610
    int ret = -1;
    int rc;
6611
    bool isActive;
6612

6613
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
6614 6615
                  VIR_DOMAIN_AFFECT_CONFIG |
                  VIR_TYPED_PARAM_STRING_OKAY, -1);
6616

6617
    qemuDriverLock(driver);
6618

6619 6620 6621
    /* We don't return strings, and thus trivially support this flag.  */
    flags &= ~VIR_TYPED_PARAM_STRING_OKAY;

6622 6623 6624 6625 6626 6627 6628 6629
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);

    if (vm == NULL) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("No such domain %s"), dom->uuid);
        goto cleanup;
    }

6630 6631
    isActive = virDomainObjIsActive(vm);

6632
    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
6633
        if (isActive)
6634
            flags = VIR_DOMAIN_AFFECT_LIVE;
6635
        else
6636
            flags = VIR_DOMAIN_AFFECT_CONFIG;
6637 6638
    }

6639
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
6640 6641 6642 6643 6644 6645 6646 6647 6648 6649 6650 6651 6652 6653 6654 6655 6656 6657 6658
        if (!isActive) {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s", _("domain is not running"));
            goto cleanup;
        }

        if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_MEMORY)) {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s", _("cgroup memory controller is not mounted"));
            goto cleanup;
        }

        if (virCgroupForDomain(driver->cgroup, vm->def->name, &group, 0) != 0) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("cannot find cgroup for domain %s"), vm->def->name);
            goto cleanup;
        }
    }

6659
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
6660 6661 6662 6663 6664 6665 6666
        if (!vm->persistent) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("cannot change persistent config of a transient domain"));
            goto cleanup;
        }
        if (!(persistentDef = virDomainObjGetPersistentDef(driver->caps, vm)))
            goto cleanup;
6667 6668
    }

6669 6670 6671 6672 6673 6674 6675
    if ((*nparams) == 0) {
        /* Current number of memory parameters supported by cgroups */
        *nparams = QEMU_NB_MEM_PARAM;
        ret = 0;
        goto cleanup;
    }

6676
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
6677
        for (i = 0; i < *nparams && i < QEMU_NB_MEM_PARAM; i++) {
6678 6679 6680
            virMemoryParameterPtr param = &params[i];
            val = 0;
            param->value.ul = 0;
6681
            param->type = VIR_TYPED_PARAM_ULLONG;
6682 6683 6684 6685 6686

            switch (i) {
            case 0: /* fill memory hard limit here */
                if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_HARD_LIMIT) == NULL) {
                    qemuReportError(VIR_ERR_INTERNAL_ERROR,
6687 6688
                                    _("Field name '%s' too long"),
                                    VIR_DOMAIN_MEMORY_HARD_LIMIT);
6689 6690 6691 6692 6693 6694 6695 6696
                    goto cleanup;
                }
                param->value.ul = persistentDef->mem.hard_limit;
                break;

            case 1: /* fill memory soft limit here */
                if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SOFT_LIMIT) == NULL) {
                    qemuReportError(VIR_ERR_INTERNAL_ERROR,
6697 6698
                                    _("Field name '%s' too long"),
                                    VIR_DOMAIN_MEMORY_SOFT_LIMIT);
6699 6700 6701 6702 6703 6704 6705 6706
                    goto cleanup;
                }
                param->value.ul = persistentDef->mem.soft_limit;
                break;

            case 2: /* fill swap hard limit here */
                if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT) == NULL) {
                    qemuReportError(VIR_ERR_INTERNAL_ERROR,
6707 6708
                                    _("Field name '%s' too long"),
                                    VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT);
6709 6710 6711 6712 6713 6714 6715 6716 6717 6718 6719
                    goto cleanup;
                }
                param->value.ul = persistentDef->mem.swap_hard_limit;
                break;

            default:
                break;
                /* should not hit here */
            }
        }
        goto out;
6720 6721
    }

6722
    for (i = 0; i < *nparams && i < QEMU_NB_MEM_PARAM; i++) {
6723
        virTypedParameterPtr param = &params[i];
6724 6725
        val = 0;
        param->value.ul = 0;
6726
        param->type = VIR_TYPED_PARAM_ULLONG;
6727

6728 6729 6730
        /* Coverity does not realize that if we get here, group is set.  */
        sa_assert(group);

6731
        switch (i) {
6732 6733 6734 6735 6736
        case 0: /* fill memory hard limit here */
            rc = virCgroupGetMemoryHardLimit(group, &val);
            if (rc != 0) {
                virReportSystemError(-rc, "%s",
                                     _("unable to get memory hard limit"));
6737
                goto cleanup;
6738 6739 6740
            }
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_HARD_LIMIT) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
6741 6742
                                _("Field name '%s' too long"),
                                VIR_DOMAIN_MEMORY_HARD_LIMIT);
6743
                goto cleanup;
6744 6745 6746 6747 6748 6749 6750 6751 6752
            }
            param->value.ul = val;
            break;

        case 1: /* fill memory soft limit here */
            rc = virCgroupGetMemorySoftLimit(group, &val);
            if (rc != 0) {
                virReportSystemError(-rc, "%s",
                                     _("unable to get memory soft limit"));
6753
                goto cleanup;
6754 6755 6756
            }
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SOFT_LIMIT) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
6757 6758
                                _("Field name '%s' too long"),
                                VIR_DOMAIN_MEMORY_SOFT_LIMIT);
6759
                goto cleanup;
6760 6761 6762 6763 6764
            }
            param->value.ul = val;
            break;

        case 2: /* fill swap hard limit here */
6765
            rc = virCgroupGetMemSwapHardLimit(group, &val);
6766 6767 6768
            if (rc != 0) {
                virReportSystemError(-rc, "%s",
                                     _("unable to get swap hard limit"));
6769
                goto cleanup;
6770
            }
6771
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT) == NULL) {
6772
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
6773 6774
                                _("Field name '%s' too long"),
                                VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT);
6775
                goto cleanup;
6776 6777 6778 6779 6780 6781 6782 6783 6784 6785
            }
            param->value.ul = val;
            break;

        default:
            break;
            /* should not hit here */
        }
    }

6786
out:
6787 6788
    if (QEMU_NB_MEM_PARAM < *nparams)
        *nparams = QEMU_NB_MEM_PARAM;
6789 6790
    ret = 0;

6791 6792 6793 6794 6795 6796 6797 6798 6799
cleanup:
    if (group)
        virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

6800 6801 6802 6803 6804 6805 6806 6807
static int
qemuSetVcpusBWLive(virDomainObjPtr vm, virCgroupPtr cgroup,
                   unsigned long long period, long long quota)
{
    int i;
    qemuDomainObjPrivatePtr priv = vm->privateData;
    virCgroupPtr cgroup_vcpu = NULL;
    int rc;
W
Wen Congyang 已提交
6808 6809 6810
    long long vm_quota = 0;
    long long old_quota = 0;
    unsigned long long old_period = 0;
6811 6812 6813 6814

    if (period == 0 && quota == 0)
        return 0;

W
Wen Congyang 已提交
6815 6816 6817 6818 6819 6820 6821 6822 6823 6824 6825 6826 6827 6828 6829 6830 6831 6832 6833
    /* Ensure that we can multiply by vcpus without overflowing. */
    if (quota > LLONG_MAX / vm->def->vcpus) {
        virReportSystemError(EINVAL,
                             _("%s"),
                             "Unable to set cpu bandwidth quota");
        goto cleanup;
    }

    if (quota > 0)
        vm_quota = quota * vm->def->vcpus;
    else
        vm_quota = quota;

    rc = virCgroupGetCpuCfsQuota(cgroup, &old_quota);
    if (rc < 0) {
        virReportSystemError(-rc, "%s",
                             _("unable to get cpu bandwidth tunable"));
        goto cleanup;
    }
6834

W
Wen Congyang 已提交
6835 6836 6837 6838 6839
    rc = virCgroupGetCpuCfsPeriod(cgroup, &old_period);
    if (rc < 0) {
        virReportSystemError(-rc, "%s",
                             _("unable to get cpu bandwidth period tunable"));
        goto cleanup;
6840 6841
    }

W
Wen Congyang 已提交
6842 6843 6844 6845 6846 6847 6848 6849 6850 6851 6852 6853 6854 6855 6856 6857 6858 6859 6860 6861 6862
    /*
     * If quota will be changed to a small value, we should modify vcpu's quota
     * first. Otherwise, we should modify vm's quota first.
     *
     * If period will be changed to a small value, we should modify vm's period
     * first. Otherwise, we should modify vcpu's period first.
     *
     * If both quota and period will be changed to a big/small value, we cannot
     * modify period and quota together.
     */
    if ((quota != 0) && (period != 0)) {
        if (((quota > old_quota) && (period > old_period)) ||
            ((quota < old_quota) && (period < old_period))) {
            /* modify period */
            if (qemuSetVcpusBWLive(vm, cgroup, period, 0) < 0)
                goto cleanup;

            /* modify quota */
            if (qemuSetVcpusBWLive(vm, cgroup, 0, quota) < 0)
                goto cleanup;
            return 0;
6863
        }
W
Wen Congyang 已提交
6864
    }
6865

W
Wen Congyang 已提交
6866 6867 6868 6869
    if (((vm_quota != 0) && (vm_quota > old_quota)) ||
        ((period != 0) && (period < old_period)))
        /* Set cpu bandwidth for the vm */
        if (qemuSetupCgroupVcpuBW(cgroup, period, vm_quota) < 0)
6870 6871
            goto cleanup;

W
Wen Congyang 已提交
6872 6873 6874 6875 6876 6877 6878 6879 6880 6881 6882 6883 6884 6885 6886 6887 6888 6889 6890 6891
    /* If we does not know VCPU<->PID mapping or all vcpu runs in the same
     * thread, we cannot control each vcpu. So we only modify cpu bandwidth
     * when each vcpu has a separated thread.
     */
    if (priv->nvcpupids != 0 && priv->vcpupids[0] != vm->pid) {
        for (i = 0; i < priv->nvcpupids; i++) {
            rc = virCgroupForVcpu(cgroup, i, &cgroup_vcpu, 0);
            if (rc < 0) {
                virReportSystemError(-rc,
                                     _("Unable to find vcpu cgroup for %s(vcpu:"
                                       " %d)"),
                                     vm->def->name, i);
                goto cleanup;
            }

            if (qemuSetupCgroupVcpuBW(cgroup_vcpu, period, quota) < 0)
                goto cleanup;

            virCgroupFree(&cgroup_vcpu);
        }
6892 6893
    }

W
Wen Congyang 已提交
6894 6895 6896 6897 6898 6899
    if (((vm_quota != 0) && (vm_quota <= old_quota)) ||
        ((period != 0) && (period >= old_period)))
        /* Set cpu bandwidth for the vm */
        if (qemuSetupCgroupVcpuBW(cgroup, period, vm_quota) < 0)
            goto cleanup;

6900 6901 6902 6903 6904 6905 6906
    return 0;

cleanup:
    virCgroupFree(&cgroup_vcpu);
    return -1;
}

6907
static int qemuSetSchedulerParametersFlags(virDomainPtr dom,
6908
                                           virTypedParameterPtr params,
6909 6910
                                           int nparams,
                                           unsigned int flags)
6911 6912 6913 6914 6915
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
6916
    virDomainDefPtr vmdef = NULL;
6917
    int ret = -1;
6918
    bool isActive;
6919
    int rc;
6920

6921 6922
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);
6923

6924
    qemuDriverLock(driver);
6925 6926 6927 6928

    vm = virDomainFindByUUID(&driver->domains, dom->uuid);

    if (vm == NULL) {
6929 6930
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("No such domain %s"), dom->uuid);
6931 6932 6933
        goto cleanup;
    }

6934 6935
    isActive = virDomainObjIsActive(vm);

6936
    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
6937
        if (isActive)
6938
            flags = VIR_DOMAIN_AFFECT_LIVE;
6939
        else
6940
            flags = VIR_DOMAIN_AFFECT_CONFIG;
6941 6942
    }

6943 6944 6945 6946 6947 6948 6949 6950 6951 6952 6953
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
        if (!vm->persistent) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("cannot change persistent config of a transient domain"));
            goto cleanup;
        }

        /* Make a copy for updated domain. */
        vmdef = virDomainObjCopyPersistentDef(driver->caps, vm);
        if (!vmdef)
            goto cleanup;
6954 6955
    }

6956
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
6957 6958 6959 6960 6961 6962 6963 6964 6965 6966 6967 6968 6969 6970 6971 6972 6973 6974 6975
        if (!isActive) {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s", _("domain is not running"));
            goto cleanup;
        }

        if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s", _("cgroup CPU controller is not mounted"));
            goto cleanup;
        }
        if (virCgroupForDomain(driver->cgroup, vm->def->name, &group, 0) != 0) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("cannot find cgroup for domain %s"),
                            vm->def->name);
            goto cleanup;
        }
    }

6976
    for (i = 0; i < nparams; i++) {
6977
        virTypedParameterPtr param = &params[i];
6978

6979
        if (STREQ(param->field, VIR_DOMAIN_SCHEDULER_CPU_SHARES)) {
6980
            if (param->type != VIR_TYPED_PARAM_ULLONG) {
6981 6982
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for cpu_shares tunable, expected a 'ullong'"));
6983 6984 6985
                goto cleanup;
            }

6986
            if (flags & VIR_DOMAIN_AFFECT_LIVE) {
6987 6988 6989 6990 6991 6992 6993 6994
                rc = virCgroupSetCpuShares(group, params[i].value.ul);
                if (rc != 0) {
                    virReportSystemError(-rc, "%s",
                                         _("unable to set cpu shares tunable"));
                    goto cleanup;
                }

                vm->def->cputune.shares = params[i].value.ul;
6995
            }
6996

6997
            if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
6998 6999
                vmdef->cputune.shares = params[i].value.ul;
            }
7000
        } else if (STREQ(param->field, VIR_DOMAIN_SCHEDULER_VCPU_PERIOD)) {
7001 7002
            if (param->type != VIR_TYPED_PARAM_ULLONG) {
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
W
Wen Congyang 已提交
7003
                                _("invalid type for vcpu_period tunable,"
7004 7005 7006 7007 7008 7009 7010
                                  " expected a 'ullong'"));
                goto cleanup;
            }

            if (flags & VIR_DOMAIN_AFFECT_LIVE) {
                rc = qemuSetVcpusBWLive(vm, group, params[i].value.ul, 0);
                if (rc != 0)
7011
                    goto cleanup;
7012 7013 7014 7015 7016 7017 7018 7019

                if (params[i].value.ul)
                    vm->def->cputune.period = params[i].value.ul;
            }

            if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
                vmdef->cputune.period = params[i].value.ul;
            }
7020
        } else if (STREQ(param->field, VIR_DOMAIN_SCHEDULER_VCPU_QUOTA)) {
7021 7022
            if (param->type != VIR_TYPED_PARAM_LLONG) {
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
W
Wen Congyang 已提交
7023
                                _("invalid type for vcpu_quota tunable,"
7024 7025 7026 7027 7028 7029 7030
                                  " expected a 'llong'"));
                goto cleanup;
            }

            if (flags & VIR_DOMAIN_AFFECT_LIVE) {
                rc = qemuSetVcpusBWLive(vm, group, 0, params[i].value.l);
                if (rc != 0)
7031
                    goto cleanup;
7032 7033 7034 7035 7036 7037 7038

                if (params[i].value.l)
                    vm->def->cputune.quota = params[i].value.l;
            }

            if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
                vmdef->cputune.quota = params[i].value.l;
7039
            }
7040
        } else {
7041 7042
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("Invalid parameter `%s'"), param->field);
7043 7044 7045
            goto cleanup;
        }
    }
7046

7047 7048 7049 7050 7051 7052 7053 7054 7055 7056 7057 7058 7059
    if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
        goto cleanup;


    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
        rc = virDomainSaveConfig(driver->configDir, vmdef);
        if (rc < 0)
            goto cleanup;

        virDomainObjAssignDef(vm, vmdef, false);
        vmdef = NULL;
    }

7060 7061 7062
    ret = 0;

cleanup:
7063
    virDomainDefFree(vmdef);
7064 7065 7066
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
7067
    qemuDriverUnlock(driver);
7068 7069 7070
    return ret;
}

7071
static int qemuSetSchedulerParameters(virDomainPtr dom,
7072
                                      virTypedParameterPtr params,
7073 7074 7075 7076 7077
                                      int nparams)
{
    return qemuSetSchedulerParametersFlags(dom,
                                           params,
                                           nparams,
7078
                                           VIR_DOMAIN_AFFECT_LIVE);
7079 7080
}

7081 7082 7083 7084 7085 7086 7087 7088 7089 7090 7091 7092 7093 7094 7095 7096 7097 7098 7099 7100 7101 7102 7103 7104 7105 7106 7107 7108 7109 7110 7111 7112 7113 7114 7115 7116 7117 7118 7119 7120 7121 7122 7123 7124 7125 7126 7127 7128 7129 7130 7131 7132 7133 7134 7135 7136 7137 7138 7139 7140 7141 7142 7143 7144 7145
static int
qemuGetVcpuBWLive(virCgroupPtr cgroup, unsigned long long *period,
                  long long *quota)
{
    int rc;

    rc = virCgroupGetCpuCfsPeriod(cgroup, period);
    if (rc < 0) {
        virReportSystemError(-rc, "%s",
                             _("unable to get cpu bandwidth period tunable"));
        return -1;
    }

    rc = virCgroupGetCpuCfsQuota(cgroup, quota);
    if (rc < 0) {
        virReportSystemError(-rc, "%s",
                             _("unable to get cpu bandwidth tunable"));
        return -1;
    }

    return 0;
}

static int
qemuGetVcpusBWLive(virDomainObjPtr vm, virCgroupPtr cgroup,
                   unsigned long long *period, long long *quota)
{
    virCgroupPtr cgroup_vcpu = NULL;
    qemuDomainObjPrivatePtr priv = NULL;
    int rc;
    int ret = -1;

    priv = vm->privateData;
    if (priv->nvcpupids == 0 || priv->vcpupids[0] == vm->pid) {
        /* We do not create sub dir for each vcpu */
        rc = qemuGetVcpuBWLive(cgroup, period, quota);
        if (rc < 0)
            goto cleanup;

        if (*quota > 0)
            *quota /= vm->def->vcpus;
        goto out;
    }

    /* get period and quota for vcpu0 */
    rc = virCgroupForVcpu(cgroup, 0, &cgroup_vcpu, 0);
    if (!cgroup_vcpu) {
        virReportSystemError(-rc,
                             _("Unable to find vcpu cgroup for %s(vcpu: 0)"),
                             vm->def->name);
        goto cleanup;
    }

    rc = qemuGetVcpuBWLive(cgroup_vcpu, period, quota);
    if (rc < 0)
        goto cleanup;

out:
    ret = 0;

cleanup:
    virCgroupFree(&cgroup_vcpu);
    return ret;
}

7146 7147 7148 7149 7150
static int
qemuGetSchedulerParametersFlags(virDomainPtr dom,
                                virTypedParameterPtr params,
                                int *nparams,
                                unsigned int flags)
7151 7152 7153 7154
{
    struct qemud_driver *driver = dom->conn->privateData;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
7155 7156 7157
    unsigned long long shares;
    unsigned long long period;
    long long quota;
7158 7159
    int ret = -1;
    int rc;
7160
    bool isActive;
7161
    bool cpu_bw_status = false;
7162
    int saved_nparams = 0;
7163

7164
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
7165 7166
                  VIR_DOMAIN_AFFECT_CONFIG |
                  VIR_TYPED_PARAM_STRING_OKAY, -1);
7167

7168 7169
    qemuDriverLock(driver);

7170 7171 7172
    /* We don't return strings, and thus trivially support this flag.  */
    flags &= ~VIR_TYPED_PARAM_STRING_OKAY;

7173 7174 7175 7176 7177 7178 7179
    if (*nparams > 1) {
        rc = qemuGetCpuBWStatus(driver->cgroup);
        if (rc < 0)
            goto cleanup;
        cpu_bw_status = !!rc;
    }

7180 7181 7182
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);

    if (vm == NULL) {
7183 7184
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("No such domain %s"), dom->uuid);
7185 7186 7187
        goto cleanup;
    }

7188 7189
    isActive = virDomainObjIsActive(vm);

7190
    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
7191
        if (isActive)
7192
            flags = VIR_DOMAIN_AFFECT_LIVE;
7193
        else
7194
            flags = VIR_DOMAIN_AFFECT_CONFIG;
7195 7196
    }

7197
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
7198 7199 7200 7201 7202 7203 7204 7205 7206 7207 7208 7209 7210 7211 7212
        if (!vm->persistent) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("cannot query persistent config of a transient domain"));
            goto cleanup;
        }

        if (isActive) {
            virDomainDefPtr persistentDef;

            persistentDef = virDomainObjGetPersistentDef(driver->caps, vm);
            if (!persistentDef) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                                _("can't get persistentDef"));
                goto cleanup;
            }
7213 7214 7215 7216 7217
            shares = persistentDef->cputune.shares;
            if (*nparams > 1 && cpu_bw_status) {
                period = persistentDef->cputune.period;
                quota = persistentDef->cputune.quota;
            }
7218
        } else {
7219 7220 7221 7222 7223
            shares = vm->def->cputune.shares;
            if (*nparams > 1 && cpu_bw_status) {
                period = vm->def->cputune.period;
                quota = vm->def->cputune.quota;
            }
7224
        }
7225
        goto out;
7226 7227
    }

7228 7229 7230 7231 7232 7233 7234 7235 7236 7237 7238 7239
    if (!isActive) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("domain is not running"));
        goto cleanup;
    }

    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup CPU controller is not mounted"));
        goto cleanup;
    }

7240
    if (virCgroupForDomain(driver->cgroup, vm->def->name, &group, 0) != 0) {
7241 7242
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("cannot find cgroup for domain %s"), vm->def->name);
7243 7244 7245
        goto cleanup;
    }

7246
    rc = virCgroupGetCpuShares(group, &shares);
7247
    if (rc != 0) {
7248
        virReportSystemError(-rc, "%s",
7249 7250 7251
                             _("unable to get cpu shares tunable"));
        goto cleanup;
    }
7252 7253 7254 7255 7256 7257

    if (*nparams > 1 && cpu_bw_status) {
        rc = qemuGetVcpusBWLive(vm, group, &period, &quota);
        if (rc != 0)
            goto cleanup;
    }
7258
out:
7259
    params[0].value.ul = shares;
7260
    params[0].type = VIR_TYPED_PARAM_ULLONG;
7261 7262
    if (virStrcpyStatic(params[0].field,
                        VIR_DOMAIN_SCHEDULER_CPU_SHARES) == NULL) {
7263
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
7264
                        _("Field name '%s' too long"),
7265
                        VIR_DOMAIN_SCHEDULER_CPU_SHARES);
C
Chris Lalancette 已提交
7266 7267
        goto cleanup;
    }
7268

7269 7270 7271 7272 7273 7274
    saved_nparams++;

    if (cpu_bw_status) {
        if (*nparams > saved_nparams) {
            params[1].value.ul = period;
            params[1].type = VIR_TYPED_PARAM_ULLONG;
7275 7276
            if (virStrcpyStatic(params[1].field,
                                VIR_DOMAIN_SCHEDULER_VCPU_PERIOD) == NULL) {
7277
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
7278
                                _("Field name '%s' too long"),
7279
                                VIR_DOMAIN_SCHEDULER_VCPU_PERIOD);
7280 7281 7282 7283 7284 7285 7286 7287
                goto cleanup;
            }
            saved_nparams++;
        }

        if (*nparams > saved_nparams) {
            params[2].value.ul = quota;
            params[2].type = VIR_TYPED_PARAM_LLONG;
7288 7289
            if (virStrcpyStatic(params[2].field,
                                VIR_DOMAIN_SCHEDULER_VCPU_QUOTA) == NULL) {
7290
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
7291
                                _("Field name '%s' too long"),
7292
                                VIR_DOMAIN_SCHEDULER_VCPU_QUOTA);
7293 7294 7295 7296 7297 7298 7299 7300
                goto cleanup;
            }
            saved_nparams++;
        }
    }

    *nparams = saved_nparams;

7301 7302 7303 7304 7305 7306
    ret = 0;

cleanup:
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
7307
    qemuDriverUnlock(driver);
7308 7309 7310
    return ret;
}

7311 7312 7313 7314 7315 7316
static int
qemuGetSchedulerParameters(virDomainPtr dom,
                           virTypedParameterPtr params,
                           int *nparams)
{
    return qemuGetSchedulerParametersFlags(dom, params, nparams,
7317
                                           VIR_DOMAIN_AFFECT_CURRENT);
7318
}
7319

7320 7321 7322 7323 7324 7325 7326 7327 7328 7329 7330 7331 7332 7333 7334 7335 7336 7337 7338 7339 7340 7341 7342 7343 7344 7345 7346 7347 7348 7349 7350 7351 7352 7353 7354 7355 7356 7357 7358 7359 7360 7361 7362 7363 7364 7365 7366 7367 7368 7369 7370 7371 7372 7373 7374 7375 7376 7377 7378 7379 7380 7381 7382 7383 7384 7385 7386 7387 7388 7389 7390 7391 7392 7393 7394 7395 7396 7397 7398 7399 7400 7401 7402 7403 7404 7405 7406 7407 7408 7409
/**
 * Resize a block device while a guest is running. Resize to a lower size
 * is supported, but should be used with extreme caution.  Note that it
 * only supports to resize image files, it can't resize block devices
 * like LVM volumes.
 */
static int
qemuDomainBlockResize (virDomainPtr dom,
                       const char *path,
                       unsigned long long size,
                       unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    qemuDomainObjPrivatePtr priv;
    int ret = -1, i;
    char *device = NULL;
    virDomainDiskDefPtr disk = NULL;

    virCheckFlags(0, -1);

    if (path[0] == '\0') {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("empty path"));
        return -1;
    }

    if (size > ULLONG_MAX / 1024) {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("size must be less than %llu"),
                        ULLONG_MAX / 1024);
        return -1;
    }

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    qemuDriverUnlock(driver);

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    priv = vm->privateData;

    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_MODIFY) < 0)
        goto cleanup;

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }

    if ((i = virDomainDiskIndexByName(vm->def, path, false)) < 0) {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path: %s"), path);
        goto cleanup;
    }
    disk = vm->def->disks[i];

    if (virAsprintf(&device, "%s%s", QEMU_DRIVE_HOST_PREFIX,
                    disk->info.alias) < 0) {
        virReportOOMError();
        goto endjob;
    }

    qemuDomainObjEnterMonitor(driver, vm);
    if (qemuMonitorBlockResize(priv->mon, device, size) < 0) {
        qemuDomainObjExitMonitor(driver, vm);
        goto endjob;
    }
    qemuDomainObjExitMonitor(driver, vm);

    ret = 0;

endjob:
    if (qemuDomainObjEndJob(driver, vm) == 0)
        vm = NULL;

cleanup:
    VIR_FREE(device);
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}

7410 7411 7412 7413 7414
/* This uses the 'info blockstats' monitor command which was
 * integrated into both qemu & kvm in late 2007.  If the command is
 * not supported we detect this and return the appropriate error.
 */
static int
7415 7416 7417
qemuDomainBlockStats(virDomainPtr dom,
                     const char *path,
                     struct _virDomainBlockStats *stats)
7418
{
7419
    struct qemud_driver *driver = dom->conn->privateData;
7420
    int i, ret = -1;
7421
    virDomainObjPtr vm;
7422
    virDomainDiskDefPtr disk = NULL;
7423
    qemuDomainObjPrivatePtr priv;
7424

7425
    qemuDriverLock(driver);
7426
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
7427
    qemuDriverUnlock(driver);
7428
    if (!vm) {
7429 7430
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
7431 7432
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
7433
        goto cleanup;
7434
    }
7435

7436 7437 7438 7439 7440 7441
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

7442
    if ((i = virDomainDiskIndexByName(vm->def, path, false)) < 0) {
7443 7444
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path: %s"), path);
7445
        goto cleanup;
7446
    }
7447
    disk = vm->def->disks[i];
7448

7449
    if (!disk->info.alias) {
7450 7451
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("missing disk device alias name for %s"), disk->dst);
7452
        goto cleanup;
7453
    }
7454

7455
    priv = vm->privateData;
7456 7457
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_QUERY) < 0)
        goto cleanup;
7458

7459 7460 7461 7462 7463
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }
7464

7465
    qemuDomainObjEnterMonitor(driver, vm);
7466 7467 7468 7469
    ret = qemuMonitorGetBlockStatsInfo(priv->mon,
                                       disk->info.alias,
                                       &stats->rd_req,
                                       &stats->rd_bytes,
7470
                                       NULL,
7471 7472
                                       &stats->wr_req,
                                       &stats->wr_bytes,
7473 7474 7475
                                       NULL,
                                       NULL,
                                       NULL,
7476 7477
                                       &stats->errs);
    qemuDomainObjExitMonitor(driver, vm);
7478

7479
endjob:
7480 7481
    if (qemuDomainObjEndJob(driver, vm) == 0)
        vm = NULL;
7482

7483
cleanup:
7484 7485
    if (vm)
        virDomainObjUnlock(vm);
7486
    return ret;
7487 7488
}

7489
static int
7490 7491 7492 7493 7494
qemuDomainBlockStatsFlags(virDomainPtr dom,
                          const char *path,
                          virTypedParameterPtr params,
                          int *nparams,
                          unsigned int flags)
7495 7496 7497 7498 7499 7500 7501 7502
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i, tmp, ret = -1;
    virDomainObjPtr vm;
    virDomainDiskDefPtr disk = NULL;
    qemuDomainObjPrivatePtr priv;
    long long rd_req, rd_bytes, wr_req, wr_bytes, rd_total_times;
    long long wr_total_times, flush_req, flush_total_times, errs;
7503
    virTypedParameterPtr param;
7504

7505 7506 7507 7508
    virCheckFlags(VIR_TYPED_PARAM_STRING_OKAY, -1);

    /* We don't return strings, and thus trivially support this flag.  */
    flags &= ~VIR_TYPED_PARAM_STRING_OKAY;
7509 7510 7511 7512 7513 7514 7515 7516 7517 7518 7519 7520 7521 7522 7523 7524 7525 7526 7527

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    qemuDriverUnlock(driver);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

    if (*nparams != 0) {
7528
        if ((i = virDomainDiskIndexByName(vm->def, path, false)) < 0) {
7529 7530 7531 7532
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("invalid path: %s"), path);
            goto cleanup;
        }
7533
        disk = vm->def->disks[i];
7534 7535 7536

        if (!disk->info.alias) {
             qemuReportError(VIR_ERR_INTERNAL_ERROR,
7537 7538
                             _("missing disk device alias name for %s"),
                             disk->dst);
7539 7540 7541 7542 7543 7544 7545 7546 7547 7548
             goto cleanup;
        }
    }

    priv = vm->privateData;
    VIR_DEBUG("priv=%p, params=%p, flags=%x", priv, params, flags);

    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_QUERY) < 0)
        goto cleanup;

7549 7550 7551 7552 7553 7554
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }

7555 7556 7557 7558
    qemuDomainObjEnterMonitor(driver, vm);
    tmp = *nparams;
    ret = qemuMonitorGetBlockStatsParamsNumber(priv->mon, nparams);

7559
    if (tmp == 0 || ret < 0) {
7560 7561 7562 7563 7564 7565 7566 7567 7568 7569 7570 7571 7572 7573 7574 7575 7576 7577 7578 7579 7580
        qemuDomainObjExitMonitor(driver, vm);
        goto endjob;
    }

    ret = qemuMonitorGetBlockStatsInfo(priv->mon,
                                       disk->info.alias,
                                       &rd_req,
                                       &rd_bytes,
                                       &rd_total_times,
                                       &wr_req,
                                       &wr_bytes,
                                       &wr_total_times,
                                       &flush_req,
                                       &flush_total_times,
                                       &errs);

    qemuDomainObjExitMonitor(driver, vm);

    if (ret < 0)
        goto endjob;

7581 7582
    tmp = 0;
    ret = -1;
7583

7584 7585 7586 7587 7588 7589 7590 7591 7592 7593 7594 7595 7596
    if (tmp < *nparams && wr_bytes != -1) {
        param = &params[tmp];
        if (virStrcpyStatic(param->field,
                            VIR_DOMAIN_BLOCK_STATS_WRITE_BYTES) == NULL) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("Field name '%s' too long"),
                            VIR_DOMAIN_BLOCK_STATS_WRITE_BYTES);
            goto endjob;
        }
        param->type = VIR_TYPED_PARAM_LLONG;
        param->value.l = wr_bytes;
        tmp++;
    }
7597

7598
    if (tmp < *nparams && wr_req != -1) {
7599
        param = &params[tmp];
7600 7601 7602 7603 7604 7605 7606 7607 7608 7609 7610
        if (virStrcpyStatic(param->field,
                            VIR_DOMAIN_BLOCK_STATS_WRITE_REQ) == NULL) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("Field name '%s' too long"),
                            VIR_DOMAIN_BLOCK_STATS_WRITE_REQ);
            goto endjob;
        }
        param->type = VIR_TYPED_PARAM_LLONG;
        param->value.l = wr_req;
        tmp++;
    }
7611

7612
    if (tmp < *nparams && rd_bytes != -1) {
7613
        param = &params[tmp];
7614 7615 7616 7617 7618 7619 7620 7621 7622 7623 7624
        if (virStrcpyStatic(param->field,
                            VIR_DOMAIN_BLOCK_STATS_READ_BYTES) == NULL) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("Field name '%s' too long"),
                            VIR_DOMAIN_BLOCK_STATS_READ_BYTES);
            goto endjob;
        }
        param->type = VIR_TYPED_PARAM_LLONG;
        param->value.l = rd_bytes;
        tmp++;
    }
7625

7626
    if (tmp < *nparams && rd_req != -1) {
7627
        param = &params[tmp];
7628 7629 7630 7631 7632 7633 7634 7635 7636 7637 7638
        if (virStrcpyStatic(param->field,
                            VIR_DOMAIN_BLOCK_STATS_READ_REQ) == NULL) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("Field name '%s' too long"),
                            VIR_DOMAIN_BLOCK_STATS_READ_REQ);
            goto endjob;
        }
        param->type = VIR_TYPED_PARAM_LLONG;
        param->value.l = rd_req;
        tmp++;
    }
7639

7640
    if (tmp < *nparams && flush_req != -1) {
7641
        param = &params[tmp];
7642 7643 7644 7645 7646 7647 7648 7649 7650 7651 7652
        if (virStrcpyStatic(param->field,
                            VIR_DOMAIN_BLOCK_STATS_FLUSH_REQ) == NULL) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("Field name '%s' too long"),
                            VIR_DOMAIN_BLOCK_STATS_FLUSH_REQ);
            goto endjob;
        }
        param->type = VIR_TYPED_PARAM_LLONG;
        param->value.l = flush_req;
        tmp++;
    }
7653

7654
    if (tmp < *nparams && wr_total_times != -1) {
7655
        param = &params[tmp];
7656 7657 7658 7659 7660 7661 7662 7663 7664 7665 7666
        if (virStrcpyStatic(param->field,
                            VIR_DOMAIN_BLOCK_STATS_WRITE_TOTAL_TIMES) == NULL) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("Field name '%s' too long"),
                            VIR_DOMAIN_BLOCK_STATS_WRITE_TOTAL_TIMES);
            goto endjob;
        }
        param->type = VIR_TYPED_PARAM_LLONG;
        param->value.l = wr_total_times;
        tmp++;
    }
7667

7668
    if (tmp < *nparams && rd_total_times != -1) {
7669
        param = &params[tmp];
7670 7671 7672 7673 7674 7675 7676 7677 7678 7679 7680
        if (virStrcpyStatic(param->field,
                            VIR_DOMAIN_BLOCK_STATS_READ_TOTAL_TIMES) == NULL) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("Field name '%s' too long"),
                            VIR_DOMAIN_BLOCK_STATS_READ_TOTAL_TIMES);
            goto endjob;
        }
        param->type = VIR_TYPED_PARAM_LLONG;
        param->value.l = rd_total_times;
        tmp++;
    }
7681

7682
    if (tmp < *nparams && flush_total_times != -1) {
7683
        param = &params[tmp];
7684 7685 7686 7687 7688 7689
        if (virStrcpyStatic(param->field,
                            VIR_DOMAIN_BLOCK_STATS_READ_TOTAL_TIMES) == NULL) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("Field name '%s' too long"),
                            VIR_DOMAIN_BLOCK_STATS_READ_TOTAL_TIMES);
            goto endjob;
7690
        }
7691 7692 7693
        param->type = VIR_TYPED_PARAM_LLONG;
        param->value.l = flush_total_times;
        tmp++;
7694 7695
    }

7696 7697 7698 7699 7700
    /* Field 'errs' is meaningless for QEMU, won't set it. */

    ret = 0;
    *nparams = tmp;

7701 7702 7703 7704 7705 7706 7707 7708 7709 7710
endjob:
    if (qemuDomainObjEndJob(driver, vm) == 0)
        vm = NULL;

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}

7711
#ifdef __linux__
7712 7713 7714 7715 7716
static int
qemudDomainInterfaceStats (virDomainPtr dom,
                           const char *path,
                           struct _virDomainInterfaceStats *stats)
{
7717 7718
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
7719
    int i;
7720
    int ret = -1;
7721

7722
    qemuDriverLock(driver);
7723
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
7724 7725
    qemuDriverUnlock(driver);

7726
    if (!vm) {
7727 7728
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
7729 7730
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
7731
        goto cleanup;
7732 7733
    }

D
Daniel P. Berrange 已提交
7734
    if (!virDomainObjIsActive(vm)) {
7735 7736
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
7737
        goto cleanup;
7738 7739 7740
    }

    /* Check the path is one of the domain's network interfaces. */
7741 7742
    for (i = 0 ; i < vm->def->nnets ; i++) {
        if (vm->def->nets[i]->ifname &&
7743 7744 7745 7746
            STREQ (vm->def->nets[i]->ifname, path)) {
            ret = 0;
            break;
        }
7747 7748
    }

7749
    if (ret == 0)
7750
        ret = linuxDomainInterfaceStats(path, stats);
7751
    else
7752 7753
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path, '%s' is not a known interface"), path);
7754

7755
cleanup:
7756 7757
    if (vm)
        virDomainObjUnlock(vm);
7758 7759
    return ret;
}
7760
#else
7761 7762 7763 7764
static int
qemudDomainInterfaceStats (virDomainPtr dom,
                           const char *path ATTRIBUTE_UNUSED,
                           struct _virDomainInterfaceStats *stats ATTRIBUTE_UNUSED)
7765
{
7766 7767
    qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                    _("interface stats not implemented on this platform"));
7768 7769
    return -1;
}
7770
#endif
7771

7772 7773 7774
static int
qemudDomainMemoryStats (virDomainPtr dom,
                        struct _virDomainMemoryStat *stats,
7775 7776
                        unsigned int nr_stats,
                        unsigned int flags)
7777 7778 7779 7780 7781
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    unsigned int ret = -1;

7782 7783
    virCheckFlags(0, -1);

7784 7785 7786 7787 7788 7789 7790
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    qemuDriverUnlock(driver);

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
7791 7792
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
7793 7794 7795
        goto cleanup;
    }

7796
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_QUERY) < 0)
7797 7798
        goto cleanup;

7799 7800
    if (virDomainObjIsActive(vm)) {
        qemuDomainObjPrivatePtr priv = vm->privateData;
7801
        qemuDomainObjEnterMonitor(driver, vm);
7802
        ret = qemuMonitorGetMemoryStats(priv->mon, stats, nr_stats);
7803
        qemuDomainObjExitMonitor(driver, vm);
7804
    } else {
7805 7806
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
7807 7808
    }

7809
    if (qemuDomainObjEndJob(driver, vm) == 0)
7810 7811
        vm = NULL;

7812 7813 7814 7815 7816 7817
cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}

7818 7819 7820 7821 7822
static int
qemudDomainBlockPeek (virDomainPtr dom,
                      const char *path,
                      unsigned long long offset, size_t size,
                      void *buffer,
E
Eric Blake 已提交
7823
                      unsigned int flags)
7824
{
7825 7826
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
7827 7828
    int fd = -1, ret = -1;
    const char *actual;
7829

E
Eric Blake 已提交
7830 7831
    virCheckFlags(0, -1);

7832
    qemuDriverLock(driver);
7833
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
7834 7835
    qemuDriverUnlock(driver);

7836
    if (!vm) {
7837 7838
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
7839 7840
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
7841
        goto cleanup;
7842 7843 7844
    }

    if (!path || path[0] == '\0') {
7845 7846
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("NULL or empty path"));
7847
        goto cleanup;
7848 7849
    }

7850 7851 7852 7853 7854
    /* Check the path belongs to this domain.  */
    if (!(actual = virDomainDiskPathByName(vm->def, path))) {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path '%s'"), path);
        goto cleanup;
7855
    }
7856
    path = actual;
7857

7858 7859 7860 7861 7862 7863 7864
    /* The path is correct, now try to open it and get its size. */
    fd = open(path, O_RDONLY);
    if (fd == -1) {
        virReportSystemError(errno,
                             _("%s: failed to open"), path);
        goto cleanup;
    }
7865

7866 7867 7868 7869 7870 7871 7872 7873 7874
    /* Seek and read. */
    /* NB. Because we configure with AC_SYS_LARGEFILE, off_t should
     * be 64 bits on all platforms.
     */
    if (lseek(fd, offset, SEEK_SET) == (off_t) -1 ||
        saferead(fd, buffer, size) == (ssize_t) -1) {
        virReportSystemError(errno,
                             _("%s: failed to seek or read"), path);
        goto cleanup;
7875 7876
    }

7877 7878
    ret = 0;

7879
cleanup:
7880
    VIR_FORCE_CLOSE(fd);
7881 7882
    if (vm)
        virDomainObjUnlock(vm);
7883 7884 7885
    return ret;
}

R
Richard W.M. Jones 已提交
7886 7887 7888 7889 7890 7891
static int
qemudDomainMemoryPeek (virDomainPtr dom,
                       unsigned long long offset, size_t size,
                       void *buffer,
                       unsigned int flags)
{
7892 7893
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
7894
    char *tmp = NULL;
R
Richard W.M. Jones 已提交
7895
    int fd = -1, ret = -1;
7896
    qemuDomainObjPrivatePtr priv;
R
Richard W.M. Jones 已提交
7897

7898 7899
    virCheckFlags(VIR_MEMORY_VIRTUAL | VIR_MEMORY_PHYSICAL, -1);

7900
    qemuDriverLock(driver);
7901
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
7902
    qemuDriverUnlock(driver);
R
Richard W.M. Jones 已提交
7903 7904

    if (!vm) {
7905 7906
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
7907 7908
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
7909 7910 7911
        goto cleanup;
    }

7912
    if (flags != VIR_MEMORY_VIRTUAL && flags != VIR_MEMORY_PHYSICAL) {
7913 7914
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("flags parameter must be VIR_MEMORY_VIRTUAL or VIR_MEMORY_PHYSICAL"));
7915
        goto cleanup;
R
Richard W.M. Jones 已提交
7916 7917
    }

7918
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_QUERY) < 0)
7919 7920
        goto cleanup;

D
Daniel P. Berrange 已提交
7921
    if (!virDomainObjIsActive(vm)) {
7922 7923
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
7924
        goto endjob;
R
Richard W.M. Jones 已提交
7925 7926
    }

7927
    if (virAsprintf(&tmp, "%s/qemu.mem.XXXXXX", driver->cacheDir) < 0) {
7928
        virReportOOMError();
7929
        goto endjob;
7930 7931
    }

R
Richard W.M. Jones 已提交
7932 7933
    /* Create a temporary filename. */
    if ((fd = mkstemp (tmp)) == -1) {
7934 7935
        virReportSystemError(errno,
                             _("mkstemp(\"%s\") failed"), tmp);
7936
        goto endjob;
R
Richard W.M. Jones 已提交
7937 7938
    }

7939 7940
    virSecurityManagerSetSavedStateLabel(qemu_driver->securityManager, vm, tmp);

7941
    priv = vm->privateData;
7942
    qemuDomainObjEnterMonitor(driver, vm);
7943
    if (flags == VIR_MEMORY_VIRTUAL) {
7944
        if (qemuMonitorSaveVirtualMemory(priv->mon, offset, size, tmp) < 0) {
7945
            qemuDomainObjExitMonitor(driver, vm);
7946
            goto endjob;
7947
        }
7948
    } else {
7949
        if (qemuMonitorSavePhysicalMemory(priv->mon, offset, size, tmp) < 0) {
7950
            qemuDomainObjExitMonitor(driver, vm);
7951
            goto endjob;
7952
        }
R
Richard W.M. Jones 已提交
7953
    }
7954
    qemuDomainObjExitMonitor(driver, vm);
R
Richard W.M. Jones 已提交
7955 7956

    /* Read the memory file into buffer. */
7957
    if (saferead(fd, buffer, size) == (ssize_t) -1) {
7958 7959 7960
        virReportSystemError(errno,
                             _("failed to read temporary file "
                               "created with template %s"), tmp);
7961
        goto endjob;
R
Richard W.M. Jones 已提交
7962 7963 7964
    }

    ret = 0;
7965

7966
endjob:
7967
    if (qemuDomainObjEndJob(driver, vm) == 0)
7968
        vm = NULL;
7969

7970
cleanup:
7971
    VIR_FORCE_CLOSE(fd);
7972 7973
    if (tmp)
        unlink(tmp);
W
Wen Congyang 已提交
7974
    VIR_FREE(tmp);
7975 7976
    if (vm)
        virDomainObjUnlock(vm);
R
Richard W.M. Jones 已提交
7977 7978 7979
    return ret;
}

7980

7981 7982 7983 7984 7985 7986 7987 7988 7989
static int qemuDomainGetBlockInfo(virDomainPtr dom,
                                  const char *path,
                                  virDomainBlockInfoPtr info,
                                  unsigned int flags) {
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
    int fd = -1;
    off_t end;
7990
    virStorageFileMetadata *meta = NULL;
7991
    virDomainDiskDefPtr disk = NULL;
7992
    struct stat sb;
7993
    int i;
7994
    int format;
7995 7996 7997 7998 7999 8000 8001 8002 8003 8004 8005 8006 8007 8008 8009 8010 8011 8012 8013 8014 8015

    virCheckFlags(0, -1);

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    qemuDriverUnlock(driver);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    if (!path || path[0] == '\0') {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("NULL or empty path"));
        goto cleanup;
    }

    /* Check the path belongs to this domain. */
8016
    if ((i = virDomainDiskIndexByName(vm->def, path, false)) < 0) {
8017 8018 8019 8020
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path %s not assigned to domain"), path);
        goto cleanup;
    }
8021 8022 8023 8024 8025 8026 8027 8028
    disk = vm->def->disks[i];
    if (!disk->src) {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("disk %s does not currently have a source assigned"),
                        path);
        goto cleanup;
    }
    path = disk->src;
8029 8030

    /* The path is correct, now try to open it and get its size. */
8031
    fd = open(path, O_RDONLY);
8032 8033 8034 8035 8036 8037 8038
    if (fd == -1) {
        virReportSystemError(errno,
                             _("failed to open path '%s'"), path);
        goto cleanup;
    }

    /* Probe for magic formats */
8039 8040 8041 8042 8043 8044 8045 8046
    if (disk->driverType) {
        if ((format = virStorageFileFormatTypeFromString(disk->driverType)) < 0) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("unknown disk format %s for %s"),
                            disk->driverType, disk->src);
            goto cleanup;
        }
    } else {
8047 8048 8049 8050 8051 8052 8053
        if (driver->allowDiskFormatProbing) {
            if ((format = virStorageFileProbeFormat(disk->src)) < 0)
                goto cleanup;
        } else {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("no disk format for %s and probing is disabled"),
                            disk->src);
8054
            goto cleanup;
8055
        }
8056 8057
    }

8058 8059 8060 8061 8062
    if (VIR_ALLOC(meta) < 0) {
        virReportOOMError();
        goto cleanup;
    }

8063 8064
    if (virStorageFileGetMetadataFromFD(path, fd,
                                        format,
8065
                                        meta) < 0)
8066 8067 8068 8069 8070 8071 8072 8073 8074 8075
        goto cleanup;

    /* Get info for normal formats */
    if (fstat(fd, &sb) < 0) {
        virReportSystemError(errno,
                             _("cannot stat file '%s'"), path);
        goto cleanup;
    }

    if (S_ISREG(sb.st_mode)) {
8076
#ifndef WIN32
8077 8078 8079 8080 8081 8082 8083 8084 8085 8086 8087 8088 8089
        info->physical = (unsigned long long)sb.st_blocks *
            (unsigned long long)DEV_BSIZE;
#else
        info->physical = sb.st_size;
#endif
        /* Regular files may be sparse, so logical size (capacity) is not same
         * as actual physical above
         */
        info->capacity = sb.st_size;
    } else {
        /* NB. Because we configure with AC_SYS_LARGEFILE, off_t should
         * be 64 bits on all platforms.
         */
8090
        end = lseek(fd, 0, SEEK_END);
8091 8092 8093 8094 8095 8096 8097 8098 8099 8100 8101
        if (end == (off_t)-1) {
            virReportSystemError(errno,
                                 _("failed to seek to end of %s"), path);
            goto cleanup;
        }
        info->physical = end;
        info->capacity = end;
    }

    /* If the file we probed has a capacity set, then override
     * what we calculated from file/block extents */
8102 8103
    if (meta->capacity)
        info->capacity = meta->capacity;
8104

8105
    /* Set default value .. */
8106 8107
    info->allocation = info->physical;

8108 8109 8110
    /* ..but if guest is running & not using raw
       disk format and on a block device, then query
       highest allocated extent from QEMU */
8111
    if (disk->type == VIR_DOMAIN_DISK_TYPE_BLOCK &&
8112
        format != VIR_STORAGE_FILE_RAW &&
8113 8114
        S_ISBLK(sb.st_mode) &&
        virDomainObjIsActive(vm)) {
8115
        qemuDomainObjPrivatePtr priv = vm->privateData;
8116

8117 8118
        if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_QUERY) < 0)
            goto cleanup;
8119

8120
        if (virDomainObjIsActive(vm)) {
8121
            qemuDomainObjEnterMonitor(driver, vm);
8122 8123 8124 8125
            ret = qemuMonitorGetBlockExtent(priv->mon,
                                            disk->info.alias,
                                            &info->allocation);
            qemuDomainObjExitMonitor(driver, vm);
8126
        } else {
8127
            ret = 0;
8128
        }
8129 8130 8131

        if (qemuDomainObjEndJob(driver, vm) == 0)
            vm = NULL;
8132 8133 8134
    } else {
        ret = 0;
    }
8135 8136

cleanup:
8137
    virStorageFileFreeMetadata(meta);
8138
    VIR_FORCE_CLOSE(fd);
8139 8140 8141 8142 8143 8144
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}


8145
static int
8146 8147 8148 8149
qemuDomainEventRegister(virConnectPtr conn,
                        virConnectDomainEventCallback callback,
                        void *opaque,
                        virFreeCallback freecb)
8150
{
8151 8152 8153
    struct qemud_driver *driver = conn->privateData;
    int ret;

8154
    qemuDriverLock(driver);
8155 8156
    ret = virDomainEventCallbackListAdd(conn,
                                        driver->domainEventState->callbacks,
8157
                                        callback, opaque, freecb);
8158
    qemuDriverUnlock(driver);
8159

8160
    return ret;
8161 8162
}

8163

8164
static int
8165 8166
qemuDomainEventDeregister(virConnectPtr conn,
                          virConnectDomainEventCallback callback)
8167
{
8168 8169 8170
    struct qemud_driver *driver = conn->privateData;
    int ret;

8171
    qemuDriverLock(driver);
8172 8173 8174
    ret = virDomainEventStateDeregister(conn,
                                        driver->domainEventState,
                                        callback);
8175
    qemuDriverUnlock(driver);
8176

8177
    return ret;
8178 8179
}

8180 8181 8182 8183 8184 8185 8186 8187 8188 8189 8190 8191 8192 8193

static int
qemuDomainEventRegisterAny(virConnectPtr conn,
                           virDomainPtr dom,
                           int eventID,
                           virConnectDomainEventGenericCallback callback,
                           void *opaque,
                           virFreeCallback freecb)
{
    struct qemud_driver *driver = conn->privateData;
    int ret;

    qemuDriverLock(driver);
    ret = virDomainEventCallbackListAddID(conn,
8194
                                          driver->domainEventState->callbacks,
8195 8196 8197 8198 8199 8200 8201 8202 8203 8204 8205 8206 8207 8208 8209 8210
                                          dom, eventID,
                                          callback, opaque, freecb);
    qemuDriverUnlock(driver);

    return ret;
}


static int
qemuDomainEventDeregisterAny(virConnectPtr conn,
                             int callbackID)
{
    struct qemud_driver *driver = conn->privateData;
    int ret;

    qemuDriverLock(driver);
8211 8212 8213
    ret = virDomainEventStateDeregisterAny(conn,
                                           driver->domainEventState,
                                           callbackID);
8214 8215 8216 8217 8218 8219
    qemuDriverUnlock(driver);

    return ret;
}


8220 8221 8222
/*******************************************************************
 * Migration Protocol Version 2
 *******************************************************************/
D
Daniel Veillard 已提交
8223

C
Chris Lalancette 已提交
8224 8225 8226 8227 8228 8229 8230 8231 8232 8233 8234 8235 8236 8237 8238
/* Prepare is the first step, and it runs on the destination host.
 *
 * This version starts an empty VM listening on a localhost TCP port, and
 * sets up the corresponding virStream to handle the incoming data.
 */
static int
qemudDomainMigratePrepareTunnel(virConnectPtr dconn,
                                virStreamPtr st,
                                unsigned long flags,
                                const char *dname,
                                unsigned long resource ATTRIBUTE_UNUSED,
                                const char *dom_xml)
{
    struct qemud_driver *driver = dconn->privateData;
    int ret = -1;
8239

8240
    virCheckFlags(QEMU_MIGRATION_FLAGS, -1);
8241

8242 8243
    qemuDriverLock(driver);

C
Chris Lalancette 已提交
8244
    if (!dom_xml) {
8245 8246
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("no domain XML passed"));
C
Chris Lalancette 已提交
8247 8248 8249
        goto cleanup;
    }
    if (!(flags & VIR_MIGRATE_TUNNELLED)) {
8250
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
C
Chris Lalancette 已提交
8251 8252 8253 8254
                         "%s", _("PrepareTunnel called but no TUNNELLED flag set"));
        goto cleanup;
    }
    if (st == NULL) {
8255 8256
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("tunnelled migration requested but NULL stream passed"));
C
Chris Lalancette 已提交
8257 8258 8259
        goto cleanup;
    }

8260 8261 8262 8263 8264 8265 8266
    if (virLockManagerPluginUsesState(driver->lockManager)) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("Cannot use migrate v2 protocol with lock manager %s"),
                        virLockManagerPluginGetName(driver->lockManager));
        goto cleanup;
    }

8267 8268 8269
    ret = qemuMigrationPrepareTunnel(driver, dconn,
                                     NULL, 0, NULL, NULL, /* No cookies in v2 */
                                     st, dname, dom_xml);
8270

C
Chris Lalancette 已提交
8271
cleanup:
8272
    qemuDriverUnlock(driver);
C
Chris Lalancette 已提交
8273 8274 8275
    return ret;
}

D
Daniel Veillard 已提交
8276 8277 8278 8279
/* Prepare is the first step, and it runs on the destination host.
 *
 * This starts an empty VM listening on a TCP port.
 */
8280
static int ATTRIBUTE_NONNULL (5)
D
Daniel Veillard 已提交
8281
qemudDomainMigratePrepare2 (virConnectPtr dconn,
8282 8283
                            char **cookie ATTRIBUTE_UNUSED,
                            int *cookielen ATTRIBUTE_UNUSED,
D
Daniel Veillard 已提交
8284 8285
                            const char *uri_in,
                            char **uri_out,
C
Chris Lalancette 已提交
8286
                            unsigned long flags,
D
Daniel Veillard 已提交
8287 8288 8289 8290
                            const char *dname,
                            unsigned long resource ATTRIBUTE_UNUSED,
                            const char *dom_xml)
{
8291
    struct qemud_driver *driver = dconn->privateData;
8292
    int ret = -1;
8293

8294
    virCheckFlags(QEMU_MIGRATION_FLAGS, -1);
C
Chris Lalancette 已提交
8295

8296
    *uri_out = NULL;
D
Daniel Veillard 已提交
8297

8298
    qemuDriverLock(driver);
8299 8300 8301 8302 8303 8304 8305 8306

    if (virLockManagerPluginUsesState(driver->lockManager)) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("Cannot use migrate v2 protocol with lock manager %s"),
                        virLockManagerPluginGetName(driver->lockManager));
        goto cleanup;
    }

C
Chris Lalancette 已提交
8307 8308 8309 8310
    if (flags & VIR_MIGRATE_TUNNELLED) {
        /* this is a logical error; we never should have gotten here with
         * VIR_MIGRATE_TUNNELLED set
         */
8311 8312
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("Tunnelled migration requested but invalid RPC method called"));
C
Chris Lalancette 已提交
8313 8314 8315
        goto cleanup;
    }

D
Daniel Veillard 已提交
8316
    if (!dom_xml) {
8317 8318
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("no domain XML passed"));
8319
        goto cleanup;
D
Daniel Veillard 已提交
8320 8321
    }

8322 8323 8324 8325
    /* Do not use cookies in v2 protocol, since the cookie
     * length was not sufficiently large, causing failures
     * migrating between old & new libvirtd
     */
8326
    ret = qemuMigrationPrepareDirect(driver, dconn,
8327
                                     NULL, 0, NULL, NULL, /* No cookies */
8328 8329
                                     uri_in, uri_out,
                                     dname, dom_xml);
D
Daniel Veillard 已提交
8330

8331 8332 8333 8334
cleanup:
    qemuDriverUnlock(driver);
    return ret;
}
C
Chris Lalancette 已提交
8335

D
Daniel Veillard 已提交
8336

8337 8338 8339
/* Perform is the second step, and it runs on the source host. */
static int
qemudDomainMigratePerform (virDomainPtr dom,
8340 8341
                           const char *cookie,
                           int cookielen,
8342 8343 8344 8345 8346 8347 8348 8349
                           const char *uri,
                           unsigned long flags,
                           const char *dname,
                           unsigned long resource)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
8350
    const char *dconnuri = NULL;
8351

8352
    virCheckFlags(QEMU_MIGRATION_FLAGS, -1);
C
Chris Lalancette 已提交
8353

8354
    qemuDriverLock(driver);
8355 8356 8357 8358 8359 8360 8361
    if (virLockManagerPluginUsesState(driver->lockManager)) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("Cannot use migrate v2 protocol with lock manager %s"),
                        virLockManagerPluginGetName(driver->lockManager));
        goto cleanup;
    }

8362
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
D
Daniel Veillard 已提交
8363
    if (!vm) {
8364 8365
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
8366 8367
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
8368
        goto cleanup;
D
Daniel Veillard 已提交
8369 8370
    }

8371 8372 8373 8374 8375
    if (flags & VIR_MIGRATE_PEER2PEER) {
        dconnuri = uri;
        uri = NULL;
    }

8376 8377 8378 8379 8380 8381
    /* Do not output cookies in v2 protocol, since the cookie
     * length was not sufficiently large, causing failures
     * migrating between old & new libvirtd.
     *
     * Consume any cookie we were able to decode though
     */
8382
    ret = qemuMigrationPerform(driver, dom->conn, vm,
8383
                               NULL, dconnuri, uri, cookie, cookielen,
8384
                               NULL, NULL, /* No output cookies in v2 */
8385
                               flags, dname, resource, false);
8386

8387
cleanup:
8388
    qemuDriverUnlock(driver);
8389
    return ret;
D
Daniel Veillard 已提交
8390 8391
}

8392

D
Daniel Veillard 已提交
8393 8394 8395 8396 8397 8398 8399
/* Finish is the third and final step, and it runs on the destination host. */
static virDomainPtr
qemudDomainMigrateFinish2 (virConnectPtr dconn,
                           const char *dname,
                           const char *cookie ATTRIBUTE_UNUSED,
                           int cookielen ATTRIBUTE_UNUSED,
                           const char *uri ATTRIBUTE_UNUSED,
C
Chris Lalancette 已提交
8400
                           unsigned long flags,
D
Daniel Veillard 已提交
8401 8402
                           int retcode)
{
8403 8404 8405
    struct qemud_driver *driver = dconn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;
D
Daniel Veillard 已提交
8406

8407
    virCheckFlags(QEMU_MIGRATION_FLAGS, NULL);
C
Chris Lalancette 已提交
8408

8409
    qemuDriverLock(driver);
8410
    vm = virDomainFindByName(&driver->domains, dname);
D
Daniel Veillard 已提交
8411
    if (!vm) {
8412 8413
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching name '%s'"), dname);
8414
        goto cleanup;
D
Daniel Veillard 已提交
8415 8416
    }

8417 8418 8419 8420
    /* Do not use cookies in v2 protocol, since the cookie
     * length was not sufficiently large, causing failures
     * migrating between old & new libvirtd
     */
8421
    dom = qemuMigrationFinish(driver, dconn, vm,
8422
                              NULL, 0, NULL, NULL, /* No cookies */
8423
                              flags, retcode, false);
8424

8425
cleanup:
8426
    qemuDriverUnlock(driver);
8427
    return dom;
D
Daniel Veillard 已提交
8428 8429
}

8430

8431 8432 8433 8434 8435 8436
/*******************************************************************
 * Migration Protocol Version 3
 *******************************************************************/

static char *
qemuDomainMigrateBegin3(virDomainPtr domain,
8437
                        const char *xmlin,
8438 8439 8440
                        char **cookieout,
                        int *cookieoutlen,
                        unsigned long flags,
8441
                        const char *dname,
8442 8443 8444 8445 8446 8447
                        unsigned long resource ATTRIBUTE_UNUSED)
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    char *xml = NULL;

8448
    virCheckFlags(QEMU_MIGRATION_FLAGS, NULL);
8449 8450 8451 8452 8453 8454 8455 8456 8457 8458 8459

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, domain->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(domain->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

8460 8461 8462 8463 8464 8465 8466 8467 8468 8469 8470 8471 8472 8473
    if ((flags & VIR_MIGRATE_CHANGE_PROTECTION)) {
        if (qemuMigrationJobStart(driver, vm, QEMU_ASYNC_JOB_MIGRATION_OUT) < 0)
            goto cleanup;
    } else {
        if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_MODIFY) < 0)
            goto cleanup;
    }

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }

8474 8475 8476 8477 8478 8479 8480
    /* Check if there is any ejected media.
     * We don't want to require them on the destination.
     */

    if (qemuDomainCheckEjectableMedia(driver, vm) < 0)
        goto endjob;

8481
    if (!(xml = qemuMigrationBegin(driver, vm, xmlin, dname,
8482 8483 8484 8485 8486 8487 8488 8489 8490 8491 8492 8493 8494 8495 8496 8497 8498 8499 8500
                                   cookieout, cookieoutlen)))
        goto endjob;

    if ((flags & VIR_MIGRATE_CHANGE_PROTECTION)) {
        /* We keep the job active across API calls until the confirm() call.
         * This prevents any other APIs being invoked while migration is taking
         * place.
         */
        if (qemuMigrationJobContinue(vm) == 0) {
            vm = NULL;
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("domain disappeared"));
            VIR_FREE(xml);
            if (cookieout)
                VIR_FREE(*cookieout);
        }
    } else {
        goto endjob;
    }
8501 8502

cleanup:
8503 8504
    if (vm)
        virDomainObjUnlock(vm);
8505 8506
    qemuDriverUnlock(driver);
    return xml;
8507 8508 8509 8510 8511 8512 8513 8514 8515 8516

endjob:
    if ((flags & VIR_MIGRATE_CHANGE_PROTECTION)) {
        if (qemuMigrationJobFinish(driver, vm) == 0)
            vm = NULL;
    } else {
        if (qemuDomainObjEndJob(driver, vm) == 0)
            vm = NULL;
    }
    goto cleanup;
8517 8518 8519 8520 8521 8522 8523 8524 8525 8526 8527 8528 8529 8530 8531 8532 8533 8534
}

static int
qemuDomainMigratePrepare3(virConnectPtr dconn,
                          const char *cookiein,
                          int cookieinlen,
                          char **cookieout,
                          int *cookieoutlen,
                          const char *uri_in,
                          char **uri_out,
                          unsigned long flags,
                          const char *dname,
                          unsigned long resource ATTRIBUTE_UNUSED,
                          const char *dom_xml)
{
    struct qemud_driver *driver = dconn->privateData;
    int ret = -1;

8535
    virCheckFlags(QEMU_MIGRATION_FLAGS, -1);
8536 8537 8538 8539 8540 8541 8542 8543 8544 8545 8546 8547 8548 8549 8550 8551 8552 8553 8554 8555 8556 8557 8558 8559 8560 8561 8562 8563 8564 8565 8566 8567 8568 8569 8570 8571 8572 8573 8574 8575 8576 8577 8578 8579 8580 8581

    *uri_out = NULL;

    qemuDriverLock(driver);
    if (flags & VIR_MIGRATE_TUNNELLED) {
        /* this is a logical error; we never should have gotten here with
         * VIR_MIGRATE_TUNNELLED set
         */
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("Tunnelled migration requested but invalid RPC method called"));
        goto cleanup;
    }

    if (!dom_xml) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("no domain XML passed"));
        goto cleanup;
    }

    ret = qemuMigrationPrepareDirect(driver, dconn,
                                     cookiein, cookieinlen,
                                     cookieout, cookieoutlen,
                                     uri_in, uri_out,
                                     dname, dom_xml);

cleanup:
    qemuDriverUnlock(driver);
    return ret;
}


static int
qemuDomainMigratePrepareTunnel3(virConnectPtr dconn,
                                virStreamPtr st,
                                const char *cookiein,
                                int cookieinlen,
                                char **cookieout,
                                int *cookieoutlen,
                                unsigned long flags,
                                const char *dname,
                                unsigned long resource ATTRIBUTE_UNUSED,
                                const char *dom_xml)
{
    struct qemud_driver *driver = dconn->privateData;
    int ret = -1;

8582
    virCheckFlags(QEMU_MIGRATION_FLAGS, -1);
8583 8584 8585 8586 8587 8588 8589 8590 8591 8592 8593 8594 8595 8596 8597 8598 8599 8600 8601 8602 8603 8604 8605 8606 8607 8608 8609 8610 8611 8612 8613

    if (!dom_xml) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("no domain XML passed"));
        goto cleanup;
    }
    if (!(flags & VIR_MIGRATE_TUNNELLED)) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                         "%s", _("PrepareTunnel called but no TUNNELLED flag set"));
        goto cleanup;
    }
    if (st == NULL) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("tunnelled migration requested but NULL stream passed"));
        goto cleanup;
    }

    qemuDriverLock(driver);
    ret = qemuMigrationPrepareTunnel(driver, dconn,
                                     cookiein, cookieinlen,
                                     cookieout, cookieoutlen,
                                     st, dname, dom_xml);
    qemuDriverUnlock(driver);

cleanup:
    return ret;
}


static int
qemuDomainMigratePerform3(virDomainPtr dom,
8614
                          const char *xmlin,
8615 8616 8617 8618
                          const char *cookiein,
                          int cookieinlen,
                          char **cookieout,
                          int *cookieoutlen,
8619
                          const char *dconnuri,
8620 8621 8622 8623 8624 8625 8626 8627 8628
                          const char *uri,
                          unsigned long flags,
                          const char *dname,
                          unsigned long resource)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;

8629
    virCheckFlags(QEMU_MIGRATION_FLAGS, -1);
8630 8631 8632 8633 8634 8635 8636 8637 8638 8639 8640

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

8641
    ret = qemuMigrationPerform(driver, dom->conn, vm, xmlin,
8642
                               dconnuri, uri, cookiein, cookieinlen,
8643
                               cookieout, cookieoutlen,
8644
                               flags, dname, resource, true);
8645 8646 8647 8648 8649 8650 8651

cleanup:
    qemuDriverUnlock(driver);
    return ret;
}


8652
static virDomainPtr
8653 8654 8655 8656 8657 8658
qemuDomainMigrateFinish3(virConnectPtr dconn,
                         const char *dname,
                         const char *cookiein,
                         int cookieinlen,
                         char **cookieout,
                         int *cookieoutlen,
8659
                         const char *dconnuri ATTRIBUTE_UNUSED,
8660 8661
                         const char *uri ATTRIBUTE_UNUSED,
                         unsigned long flags,
8662
                         int cancelled)
8663 8664 8665
{
    struct qemud_driver *driver = dconn->privateData;
    virDomainObjPtr vm;
8666
    virDomainPtr dom = NULL;
8667

8668
    virCheckFlags(QEMU_MIGRATION_FLAGS, NULL);
8669 8670 8671 8672 8673 8674 8675 8676 8677

    qemuDriverLock(driver);
    vm = virDomainFindByName(&driver->domains, dname);
    if (!vm) {
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching name '%s'"), dname);
        goto cleanup;
    }

8678 8679 8680 8681
    dom = qemuMigrationFinish(driver, dconn, vm,
                              cookiein, cookieinlen,
                              cookieout, cookieoutlen,
                              flags, cancelled, true);
8682 8683 8684

cleanup:
    qemuDriverUnlock(driver);
8685
    return dom;
8686 8687 8688 8689 8690 8691 8692 8693 8694 8695 8696 8697
}

static int
qemuDomainMigrateConfirm3(virDomainPtr domain,
                          const char *cookiein,
                          int cookieinlen,
                          unsigned long flags,
                          int cancelled)
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
8698
    enum qemuMigrationJobPhase phase;
8699

8700
    virCheckFlags(QEMU_MIGRATION_FLAGS, -1);
8701 8702 8703 8704 8705 8706 8707 8708 8709 8710 8711

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, domain->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(domain->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

8712
    if (!qemuMigrationJobIsActive(vm, QEMU_ASYNC_JOB_MIGRATION_OUT))
8713 8714
        goto cleanup;

8715 8716 8717 8718 8719 8720 8721
    if (cancelled)
        phase = QEMU_MIGRATION_PHASE_CONFIRM3_CANCELLED;
    else
        phase = QEMU_MIGRATION_PHASE_CONFIRM3;

    qemuMigrationJobStartPhase(driver, vm, phase);

8722 8723
    ret = qemuMigrationConfirm(driver, domain->conn, vm,
                               cookiein, cookieinlen,
8724 8725
                               flags, cancelled);

8726
    if (qemuMigrationJobFinish(driver, vm) == 0) {
8727 8728 8729 8730 8731
        vm = NULL;
    } else if (!virDomainObjIsActive(vm) &&
               (!vm->persistent || (flags & VIR_MIGRATE_UNDEFINE_SOURCE))) {
        if (flags & VIR_MIGRATE_UNDEFINE_SOURCE)
            virDomainDeleteConfig(driver->configDir, driver->autostartDir, vm);
8732
        qemuDomainRemoveInactive(driver, vm);
8733 8734 8735
        vm = NULL;
    }

8736
cleanup:
8737 8738
    if (vm)
        virDomainObjUnlock(vm);
8739 8740 8741 8742 8743
    qemuDriverUnlock(driver);
    return ret;
}


8744 8745 8746 8747 8748 8749 8750 8751 8752 8753 8754 8755 8756 8757 8758 8759
static int
qemudNodeDeviceGetPciInfo (virNodeDevicePtr dev,
                           unsigned *domain,
                           unsigned *bus,
                           unsigned *slot,
                           unsigned *function)
{
    virNodeDeviceDefPtr def = NULL;
    virNodeDevCapsDefPtr cap;
    char *xml = NULL;
    int ret = -1;

    xml = virNodeDeviceGetXMLDesc(dev, 0);
    if (!xml)
        goto out;

8760
    def = virNodeDeviceDefParseString(xml, EXISTING_DEVICE);
8761 8762 8763 8764 8765 8766 8767 8768 8769 8770 8771 8772 8773 8774 8775 8776 8777
    if (!def)
        goto out;

    cap = def->caps;
    while (cap) {
        if (cap->type == VIR_NODE_DEV_CAP_PCI_DEV) {
            *domain   = cap->data.pci_dev.domain;
            *bus      = cap->data.pci_dev.bus;
            *slot     = cap->data.pci_dev.slot;
            *function = cap->data.pci_dev.function;
            break;
        }

        cap = cap->next;
    }

    if (!cap) {
8778 8779
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("device %s is not a PCI device"), dev->name);
8780 8781 8782 8783 8784 8785 8786 8787 8788 8789 8790 8791 8792
        goto out;
    }

    ret = 0;
out:
    virNodeDeviceDefFree(def);
    VIR_FREE(xml);
    return ret;
}

static int
qemudNodeDeviceDettach (virNodeDevicePtr dev)
{
8793
    struct qemud_driver *driver = dev->conn->privateData;
8794 8795 8796 8797 8798 8799 8800
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

    if (qemudNodeDeviceGetPciInfo(dev, &domain, &bus, &slot, &function) < 0)
        return -1;

8801
    pci = pciGetDevice(domain, bus, slot, function);
8802 8803 8804
    if (!pci)
        return -1;

8805 8806
    qemuDriverLock(driver);
    if (pciDettachDevice(pci, driver->activePciHostdevs) < 0)
8807 8808 8809 8810
        goto out;

    ret = 0;
out:
8811
    qemuDriverUnlock(driver);
8812
    pciFreeDevice(pci);
8813 8814 8815 8816 8817 8818
    return ret;
}

static int
qemudNodeDeviceReAttach (virNodeDevicePtr dev)
{
8819
    struct qemud_driver *driver = dev->conn->privateData;
8820 8821 8822 8823 8824 8825 8826
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

    if (qemudNodeDeviceGetPciInfo(dev, &domain, &bus, &slot, &function) < 0)
        return -1;

8827
    pci = pciGetDevice(domain, bus, slot, function);
8828 8829 8830
    if (!pci)
        return -1;

8831 8832
    pciDeviceReAttachInit(pci);

8833 8834
    qemuDriverLock(driver);
    if (pciReAttachDevice(pci, driver->activePciHostdevs) < 0)
8835 8836 8837 8838
        goto out;

    ret = 0;
out:
8839
    qemuDriverUnlock(driver);
8840
    pciFreeDevice(pci);
8841 8842 8843 8844 8845 8846
    return ret;
}

static int
qemudNodeDeviceReset (virNodeDevicePtr dev)
{
8847
    struct qemud_driver *driver = dev->conn->privateData;
8848 8849 8850 8851 8852 8853 8854
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

    if (qemudNodeDeviceGetPciInfo(dev, &domain, &bus, &slot, &function) < 0)
        return -1;

8855
    pci = pciGetDevice(domain, bus, slot, function);
8856 8857 8858
    if (!pci)
        return -1;

8859 8860
    qemuDriverLock(driver);

8861
    if (pciResetDevice(pci, driver->activePciHostdevs, NULL) < 0)
8862 8863 8864 8865
        goto out;

    ret = 0;
out:
8866
    qemuDriverUnlock(driver);
8867
    pciFreeDevice(pci);
8868 8869 8870
    return ret;
}

8871 8872 8873
static int
qemuCPUCompare(virConnectPtr conn,
               const char *xmlDesc,
E
Eric Blake 已提交
8874
               unsigned int flags)
8875 8876 8877 8878
{
    struct qemud_driver *driver = conn->privateData;
    int ret = VIR_CPU_COMPARE_ERROR;

E
Eric Blake 已提交
8879 8880
    virCheckFlags(0, VIR_CPU_COMPARE_ERROR);

8881 8882 8883
    qemuDriverLock(driver);

    if (!driver->caps || !driver->caps->host.cpu) {
8884
        qemuReportError(VIR_ERR_OPERATION_INVALID,
8885
                        "%s", _("cannot get host CPU capabilities"));
E
Eric Blake 已提交
8886
    } else {
8887
        ret = cpuCompareXML(driver->caps->host.cpu, xmlDesc);
E
Eric Blake 已提交
8888
    }
8889 8890 8891 8892 8893 8894

    qemuDriverUnlock(driver);

    return ret;
}

8895

8896 8897 8898 8899
static char *
qemuCPUBaseline(virConnectPtr conn ATTRIBUTE_UNUSED,
                const char **xmlCPUs,
                unsigned int ncpus,
E
Eric Blake 已提交
8900
                unsigned int flags)
8901 8902 8903
{
    char *cpu;

E
Eric Blake 已提交
8904 8905
    virCheckFlags(0, NULL);

8906 8907 8908 8909 8910
    cpu = cpuBaselineXML(xmlCPUs, ncpus, NULL, 0);

    return cpu;
}

8911 8912 8913 8914 8915 8916 8917 8918 8919 8920 8921 8922 8923 8924 8925 8926 8927 8928 8929 8930 8931 8932

static int qemuDomainGetJobInfo(virDomainPtr dom,
                                virDomainJobInfoPtr info) {
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
    qemuDomainObjPrivatePtr priv;

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    qemuDriverUnlock(driver);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    priv = vm->privateData;

    if (virDomainObjIsActive(vm)) {
8933
        if (priv->job.asyncJob) {
8934
            memcpy(info, &priv->job.info, sizeof(*info));
8935 8936 8937 8938 8939 8940

            /* Refresh elapsed time again just to ensure it
             * is fully updated. This is primarily for benefit
             * of incoming migration which we don't currently
             * monitor actively in the background thread
             */
8941
            if (virTimeMillisNow(&info->timeElapsed) < 0)
8942
                goto cleanup;
8943
            info->timeElapsed -= priv->job.start;
8944 8945 8946 8947 8948 8949 8950 8951 8952 8953 8954 8955 8956 8957 8958 8959 8960 8961 8962
        } else {
            memset(info, 0, sizeof(*info));
            info->type = VIR_DOMAIN_JOB_NONE;
        }
    } else {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

    ret = 0;

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}


8963 8964 8965 8966 8967 8968 8969 8970 8971 8972 8973 8974 8975 8976 8977 8978 8979
static int qemuDomainAbortJob(virDomainPtr dom) {
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
    qemuDomainObjPrivatePtr priv;

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    qemuDriverUnlock(driver);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

8980 8981
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_ABORT) < 0)
        goto cleanup;
8982

8983
    if (!virDomainObjIsActive(vm)) {
8984 8985
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
8986
        goto endjob;
8987 8988
    }

8989 8990 8991 8992 8993 8994 8995 8996 8997 8998 8999 9000 9001 9002
    priv = vm->privateData;

    if (!priv->job.asyncJob) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("no job is active on the domain"));
        goto endjob;
    } else if (priv->job.asyncJob == QEMU_ASYNC_JOB_MIGRATION_IN) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("cannot abort incoming migration;"
                          " use virDomainDestroy instead"));
        goto endjob;
    }

    VIR_DEBUG("Cancelling job at client request");
9003
    qemuDomainObjEnterMonitor(driver, vm);
9004 9005 9006 9007 9008 9009
    ret = qemuMonitorMigrateCancel(priv->mon);
    qemuDomainObjExitMonitor(driver, vm);

endjob:
    if (qemuDomainObjEndJob(driver, vm) == 0)
        vm = NULL;
9010 9011 9012 9013 9014 9015 9016 9017

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}


9018 9019 9020 9021 9022 9023 9024 9025 9026 9027
static int
qemuDomainMigrateSetMaxDowntime(virDomainPtr dom,
                                unsigned long long downtime,
                                unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    qemuDomainObjPrivatePtr priv;
    int ret = -1;

9028
    virCheckFlags(0, -1);
9029 9030 9031

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
9032
    qemuDriverUnlock(driver);
9033 9034 9035 9036 9037 9038

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
9039
        return -1;
9040 9041
    }

9042 9043 9044
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_MIGRATION_OP) < 0)
        goto cleanup;

9045 9046 9047
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
9048
        goto endjob;
9049 9050 9051 9052
    }

    priv = vm->privateData;

9053
    if (priv->job.asyncJob != QEMU_ASYNC_JOB_MIGRATION_OUT) {
9054 9055
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not being migrated"));
9056
        goto endjob;
9057 9058
    }

9059
    VIR_DEBUG("Setting migration downtime to %llums", downtime);
9060
    qemuDomainObjEnterMonitor(driver, vm);
9061 9062 9063 9064 9065 9066
    ret = qemuMonitorSetMigrationDowntime(priv->mon, downtime);
    qemuDomainObjExitMonitor(driver, vm);

endjob:
    if (qemuDomainObjEndJob(driver, vm) == 0)
        vm = NULL;
9067 9068 9069 9070 9071 9072 9073

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}

9074 9075 9076 9077 9078 9079 9080 9081 9082 9083 9084 9085 9086 9087
static int
qemuDomainMigrateSetMaxSpeed(virDomainPtr dom,
                             unsigned long bandwidth,
                             unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    qemuDomainObjPrivatePtr priv;
    int ret = -1;

    virCheckFlags(0, -1);

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
9088
    qemuDriverUnlock(driver);
9089 9090 9091 9092 9093 9094

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
9095
        return -1;
9096 9097 9098
    }

    priv = vm->privateData;
9099 9100 9101
    if (virDomainObjIsActive(vm)) {
        if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_MIGRATION_OP) < 0)
            goto cleanup;
9102

9103 9104 9105 9106 9107 9108
        if (!virDomainObjIsActive(vm)) {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s", _("domain is not running"));
            goto endjob;
        }

9109 9110 9111 9112
        VIR_DEBUG("Setting migration bandwidth to %luMbs", bandwidth);
        qemuDomainObjEnterMonitor(driver, vm);
        ret = qemuMonitorSetMigrationSpeed(priv->mon, bandwidth);
        qemuDomainObjExitMonitor(driver, vm);
9113

9114 9115
        if (ret == 0)
            priv->migMaxBandwidth = bandwidth;
9116

9117
endjob:
9118 9119 9120 9121 9122 9123
        if (qemuDomainObjEndJob(driver, vm) == 0)
            vm = NULL;
    } else {
        priv->migMaxBandwidth = bandwidth;
        ret = 0;
    }
9124 9125 9126 9127 9128 9129 9130

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}

9131 9132 9133 9134 9135 9136 9137
static int
qemuDomainMigrateGetMaxSpeed(virDomainPtr dom,
                             unsigned long *bandwidth,
                             unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
J
Jim Fehlig 已提交
9138
    qemuDomainObjPrivatePtr priv;
9139 9140 9141 9142 9143 9144 9145 9146 9147 9148 9149 9150 9151 9152 9153 9154
    int ret = -1;

    virCheckFlags(0, -1);

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    qemuDriverUnlock(driver);

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

J
Jim Fehlig 已提交
9155 9156
    priv = vm->privateData;
    *bandwidth = priv->migMaxBandwidth;
9157 9158 9159 9160 9161 9162 9163 9164
    ret = 0;

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}

C
Chris Lalancette 已提交
9165 9166 9167 9168 9169 9170 9171 9172 9173 9174 9175 9176 9177
static int qemuDomainSnapshotIsAllowed(virDomainObjPtr vm)
{
    int i;

    /* FIXME: we need to figure out what else here might succeed; in
     * particular, if it's a raw device but on LVM, we could probably make
     * that succeed as well
     */
    for (i = 0; i < vm->def->ndisks; i++) {
        if (vm->def->disks[i]->device == VIR_DOMAIN_DISK_DEVICE_DISK &&
            (!vm->def->disks[i]->driverType ||
             STRNEQ(vm->def->disks[i]->driverType, "qcow2"))) {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
9178 9179
                            _("Disk '%s' does not support snapshotting"),
                            vm->def->disks[i]->src);
C
Chris Lalancette 已提交
9180 9181 9182 9183 9184 9185 9186
            return 0;
        }
    }

    return 1;
}

9187 9188
/* The domain is expected to be locked and inactive. */
static int
E
Eric Blake 已提交
9189 9190
qemuDomainSnapshotCreateInactive(struct qemud_driver *driver,
                                 virDomainObjPtr vm,
9191 9192
                                 virDomainSnapshotObjPtr snap)
{
E
Eric Blake 已提交
9193
    return qemuDomainSnapshotForEachQcow2(driver, vm, snap, "-c", false);
9194 9195
}

9196 9197
/* The domain is expected to be locked and active. */
static int
9198 9199
qemuDomainSnapshotCreateActive(virConnectPtr conn,
                               struct qemud_driver *driver,
9200
                               virDomainObjPtr *vmptr,
9201 9202
                               virDomainSnapshotObjPtr snap,
                               unsigned int flags)
9203 9204 9205
{
    virDomainObjPtr vm = *vmptr;
    qemuDomainObjPrivatePtr priv = vm->privateData;
9206 9207
    bool resume = false;
    int ret = -1;
9208

9209
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
9210 9211
        return -1;

9212 9213 9214 9215 9216 9217
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }

J
Jiri Denemark 已提交
9218
    if (virDomainObjGetState(vm, NULL) == VIR_DOMAIN_RUNNING) {
9219 9220 9221 9222
        /* savevm monitor command pauses the domain emitting an event which
         * confuses libvirt since it's not notified when qemu resumes the
         * domain. Thus we stop and start CPUs ourselves.
         */
9223 9224
        if (qemuProcessStopCPUs(driver, vm, VIR_DOMAIN_PAUSED_SAVE,
                                QEMU_ASYNC_JOB_NONE) < 0)
9225 9226 9227 9228 9229 9230 9231 9232 9233 9234
            goto cleanup;

        resume = true;
        if (!virDomainObjIsActive(vm)) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("guest unexpectedly quit"));
            goto cleanup;
        }
    }

9235
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
9236 9237
    ret = qemuMonitorCreateSnapshot(priv->mon, snap->def->name);
    qemuDomainObjExitMonitorWithDriver(driver, vm);
9238 9239 9240 9241 9242 9243 9244 9245 9246 9247 9248 9249 9250 9251 9252 9253 9254 9255
    if (ret < 0)
        goto cleanup;

    if (flags & VIR_DOMAIN_SNAPSHOT_CREATE_HALT) {
        virDomainEventPtr event;

        event = virDomainEventNewFromObj(vm, VIR_DOMAIN_EVENT_STOPPED,
                                         VIR_DOMAIN_EVENT_STOPPED_FROM_SNAPSHOT);
        qemuProcessStop(driver, vm, 0, VIR_DOMAIN_SHUTOFF_FROM_SNAPSHOT);
        virDomainAuditStop(vm, "from-snapshot");
        /* We already filtered the _HALT flag for persistent domains
         * only, so this end job never drops the last reference.  */
        ignore_value(qemuDomainObjEndJob(driver, vm));
        resume = false;
        vm = NULL;
        if (event)
            qemuDomainEventQueue(driver, event);
    }
9256

9257 9258
cleanup:
    if (resume && virDomainObjIsActive(vm) &&
J
Jiri Denemark 已提交
9259
        qemuProcessStartCPUs(driver, vm, conn,
9260 9261
                             VIR_DOMAIN_RUNNING_UNPAUSED,
                             QEMU_ASYNC_JOB_NONE) < 0 &&
9262 9263 9264 9265 9266
        virGetLastError() == NULL) {
        qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                        _("resuming after snapshot failed"));
    }

9267
endjob:
9268
    if (vm && qemuDomainObjEndJob(driver, vm) == 0) {
9269 9270
        /* Only possible if a transient vm quit while our locks were down,
         * in which case we don't want to save snapshot metadata.  */
9271
        *vmptr = NULL;
9272 9273
        ret = -1;
    }
9274 9275 9276 9277

    return ret;
}

9278 9279 9280 9281 9282 9283 9284 9285 9286 9287 9288 9289 9290 9291 9292 9293 9294 9295 9296 9297 9298 9299 9300 9301 9302 9303 9304 9305 9306 9307 9308 9309 9310 9311 9312 9313 9314 9315 9316 9317 9318 9319 9320 9321 9322 9323 9324 9325 9326 9327 9328 9329 9330 9331 9332 9333 9334 9335 9336 9337 9338 9339 9340 9341 9342 9343 9344 9345 9346 9347 9348 9349 9350 9351 9352 9353 9354 9355 9356 9357 9358 9359 9360 9361 9362 9363 9364 9365 9366 9367
static int
qemuDomainSnapshotDiskPrepare(virDomainObjPtr vm, virDomainSnapshotDefPtr def)
{
    int ret = -1;
    int i;
    bool found = false;
    bool active = virDomainObjIsActive(vm);
    struct stat st;

    for (i = 0; i < def->ndisks; i++) {
        virDomainSnapshotDiskDefPtr disk = &def->disks[i];

        switch (disk->snapshot) {
        case VIR_DOMAIN_DISK_SNAPSHOT_INTERNAL:
            if (active) {
                qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                                _("active qemu domains require external disk "
                                  "snapshots; disk %s requested internal"),
                                disk->name);
                goto cleanup;
            }
            if (!vm->def->disks[i]->driverType ||
                STRNEQ(vm->def->disks[i]->driverType, "qcow2")) {
                qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                                _("internal snapshot for disk %s unsupported "
                                  "for storage type %s"),
                                disk->name,
                                NULLSTR(vm->def->disks[i]->driverType));
                goto cleanup;
            }
            found = true;
            break;

        case VIR_DOMAIN_DISK_SNAPSHOT_EXTERNAL:
            if (!disk->driverType) {
                if (!(disk->driverType = strdup("qcow2"))) {
                    virReportOOMError();
                    goto cleanup;
                }
            } else if (STRNEQ(disk->driverType, "qcow2")) {
                /* XXX We should also support QED */
                qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                                _("external snapshot format for disk %s "
                                  "is unsupported: %s"),
                                disk->name, disk->driverType);
                goto cleanup;
            }
            if (stat(disk->file, &st) < 0) {
                if (errno != ENOENT) {
                    virReportSystemError(errno,
                                         _("unable to stat for disk %s: %s"),
                                         disk->name, disk->file);
                    goto cleanup;
                }
            } else if (!S_ISBLK(st.st_mode)) {
                qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                                _("external snapshot file for disk %s already "
                                  "exists and is not a block device: %s"),
                                disk->name, disk->file);
                goto cleanup;
            }
            found = true;
            break;

        case VIR_DOMAIN_DISK_SNAPSHOT_NO:
            break;

        case VIR_DOMAIN_DISK_SNAPSHOT_DEFAULT:
        default:
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("unexpected code path"));
            goto cleanup;
        }
    }

    if (!found) {
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                        _("disk snapshots require at least one disk to be "
                          "selected for snapshot"));
        goto cleanup;
    }

    ret = 0;

cleanup:
    return ret;
}

/* The domain is expected to hold monitor lock.  */
static int
9368 9369
qemuDomainSnapshotCreateSingleDiskActive(struct qemud_driver *driver,
                                         virDomainObjPtr vm,
9370
                                         virDomainSnapshotDiskDefPtr snap,
9371 9372
                                         virDomainDiskDefPtr disk,
                                         virDomainDiskDefPtr persistDisk)
9373 9374 9375 9376 9377
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
    char *device = NULL;
    char *source = NULL;
    char *driverType = NULL;
9378 9379
    char *persistSource = NULL;
    char *persistDriverType = NULL;
9380
    int ret = -1;
9381 9382 9383 9384
    int fd = -1;
    char *origsrc = NULL;
    char *origdriver = NULL;
    bool need_unlink = false;
9385 9386 9387 9388 9389 9390 9391 9392 9393 9394

    if (snap->snapshot != VIR_DOMAIN_DISK_SNAPSHOT_EXTERNAL) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                        _("unexpected code path"));
        return -1;
    }

    if (virAsprintf(&device, "drive-%s", disk->info.alias) < 0 ||
        !(source = strdup(snap->file)) ||
        (STRNEQ_NULLABLE(disk->driverType, "qcow2") &&
9395 9396 9397 9398 9399
         !(driverType = strdup("qcow2"))) ||
        (persistDisk &&
         (!(persistSource = strdup(source)) ||
          (STRNEQ_NULLABLE(persistDisk->driverType, "qcow2") &&
           !(persistDriverType = strdup("qcow2")))))) {
9400 9401 9402 9403
        virReportOOMError();
        goto cleanup;
    }

9404 9405 9406 9407 9408 9409 9410 9411 9412 9413 9414
    /* create the stub file and set selinux labels; manipulate disk in
     * place, in a way that can be reverted on failure. */
    fd = qemuOpenFile(driver, source, O_WRONLY | O_TRUNC | O_CREAT,
                      &need_unlink, NULL);
    if (fd < 0)
        goto cleanup;
    VIR_FORCE_CLOSE(fd);

    origsrc = disk->src;
    disk->src = source;
    origdriver = disk->driverType;
9415
    disk->driverType = (char *) "raw"; /* Don't want to probe backing files */
9416 9417 9418 9419 9420 9421 9422 9423 9424 9425 9426 9427 9428 9429 9430 9431

    if (virDomainLockDiskAttach(driver->lockManager, vm, disk) < 0)
        goto cleanup;
    if (virSecurityManagerSetImageLabel(driver->securityManager, vm,
                                        disk) < 0) {
        if (virDomainLockDiskDetach(driver->lockManager, vm, disk) < 0)
            VIR_WARN("Unable to release lock on %s", source);
        goto cleanup;
    }

    disk->src = origsrc;
    origsrc = NULL;
    disk->driverType = origdriver;
    origdriver = NULL;

    /* create the actual snapshot */
9432 9433 9434 9435 9436 9437
    ret = qemuMonitorDiskSnapshot(priv->mon, device, source);
    virDomainAuditDisk(vm, disk->src, source, "snapshot", ret >= 0);
    if (ret < 0)
        goto cleanup;

    /* Update vm in place to match changes.  */
9438
    need_unlink = false;
9439 9440 9441 9442 9443 9444 9445 9446
    VIR_FREE(disk->src);
    disk->src = source;
    source = NULL;
    if (driverType) {
        VIR_FREE(disk->driverType);
        disk->driverType = driverType;
        driverType = NULL;
    }
9447 9448 9449 9450 9451 9452 9453 9454 9455 9456
    if (persistDisk) {
        VIR_FREE(persistDisk->src);
        persistDisk->src = persistSource;
        persistSource = NULL;
        if (persistDriverType) {
            VIR_FREE(persistDisk->driverType);
            persistDisk->driverType = persistDriverType;
            persistDriverType = NULL;
        }
    }
9457 9458

cleanup:
9459 9460 9461 9462 9463 9464
    if (origsrc) {
        disk->src = origsrc;
        disk->driverType = origdriver;
    }
    if (need_unlink && unlink(source))
        VIR_WARN("unable to unlink just-created %s", source);
9465 9466 9467
    VIR_FREE(device);
    VIR_FREE(source);
    VIR_FREE(driverType);
9468 9469
    VIR_FREE(persistSource);
    VIR_FREE(persistDriverType);
9470 9471 9472 9473 9474 9475 9476 9477 9478 9479 9480 9481 9482 9483 9484
    return ret;
}

/* The domain is expected to be locked and active. */
static int
qemuDomainSnapshotCreateDiskActive(virConnectPtr conn,
                                   struct qemud_driver *driver,
                                   virDomainObjPtr *vmptr,
                                   virDomainSnapshotObjPtr snap,
                                   unsigned int flags)
{
    virDomainObjPtr vm = *vmptr;
    bool resume = false;
    int ret = -1;
    int i;
9485
    bool persist = false;
9486 9487 9488 9489

    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
        return -1;

9490 9491 9492 9493 9494 9495 9496
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }


9497 9498 9499 9500 9501 9502 9503 9504 9505 9506 9507 9508 9509 9510 9511 9512 9513 9514 9515 9516 9517 9518 9519 9520 9521 9522
    if (virDomainObjGetState(vm, NULL) == VIR_DOMAIN_RUNNING) {
        /* In qemu, snapshot_blkdev on a single disk will pause cpus,
         * but this confuses libvirt since notifications are not given
         * when qemu resumes.  And for multiple disks, libvirt must
         * pause externally to get all snapshots to be at the same
         * point in time.  For simplicitly, we always pause ourselves
         * rather than relying on qemu doing pause.
         */
        if (qemuProcessStopCPUs(driver, vm, VIR_DOMAIN_PAUSED_SAVE,
                                QEMU_ASYNC_JOB_NONE) < 0)
            goto cleanup;

        resume = true;
        if (!virDomainObjIsActive(vm)) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("guest unexpectedly quit"));
            goto cleanup;
        }
    }

    /* No way to roll back if first disk succeeds but later disks
     * fail.  Based on earlier qemuDomainSnapshotDiskPrepare, all
     * disks in this list are now either SNAPSHOT_NO, or
     * SNAPSHOT_EXTERNAL with a valid file name and qcow2 format.  */
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
    for (i = 0; i < snap->def->ndisks; i++) {
9523 9524
        virDomainDiskDefPtr persistDisk = NULL;

9525 9526
        if (snap->def->disks[i].snapshot == VIR_DOMAIN_DISK_SNAPSHOT_NO)
            continue;
9527 9528 9529 9530 9531 9532 9533 9534 9535
        if (vm->newDef) {
            int indx = virDomainDiskIndexByName(vm->newDef,
                                                vm->def->disks[i]->dst,
                                                false);
            if (indx >= 0) {
                persistDisk = vm->newDef->disks[indx];
                persist = true;
            }
        }
9536

9537
        ret = qemuDomainSnapshotCreateSingleDiskActive(driver, vm,
9538
                                                       &snap->def->disks[i],
9539 9540
                                                       vm->def->disks[i],
                                                       persistDisk);
9541 9542 9543 9544 9545 9546 9547 9548 9549 9550 9551 9552 9553 9554 9555 9556 9557 9558 9559 9560 9561 9562 9563 9564 9565 9566 9567 9568 9569 9570 9571 9572 9573 9574
        if (ret < 0)
            break;
    }
    qemuDomainObjExitMonitorWithDriver(driver, vm);
    if (ret < 0)
        goto cleanup;

    if (flags & VIR_DOMAIN_SNAPSHOT_CREATE_HALT) {
        virDomainEventPtr event;

        event = virDomainEventNewFromObj(vm, VIR_DOMAIN_EVENT_STOPPED,
                                         VIR_DOMAIN_EVENT_STOPPED_FROM_SNAPSHOT);
        qemuProcessStop(driver, vm, 0, VIR_DOMAIN_SHUTOFF_FROM_SNAPSHOT);
        virDomainAuditStop(vm, "from-snapshot");
        /* We already filtered the _HALT flag for persistent domains
         * only, so this end job never drops the last reference.  */
        ignore_value(qemuDomainObjEndJob(driver, vm));
        resume = false;
        vm = NULL;
        if (event)
            qemuDomainEventQueue(driver, event);
    }

cleanup:
    if (resume && virDomainObjIsActive(vm) &&
        qemuProcessStartCPUs(driver, vm, conn,
                             VIR_DOMAIN_RUNNING_UNPAUSED,
                             QEMU_ASYNC_JOB_NONE) < 0 &&
        virGetLastError() == NULL) {
        qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                        _("resuming after snapshot failed"));
    }

    if (vm) {
9575 9576 9577
        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0 ||
            (persist &&
             virDomainSaveConfig(driver->configDir, vm->newDef) < 0))
9578
            ret = -1;
9579 9580 9581 9582
    }

endjob:
    if (vm && (qemuDomainObjEndJob(driver, vm) == 0)) {
9583 9584 9585 9586 9587 9588 9589 9590 9591
            /* Only possible if a transient vm quit while our locks were down,
             * in which case we don't want to save snapshot metadata.  */
            *vmptr = NULL;
            ret = -1;
    }

    return ret;
}

9592 9593 9594 9595
static virDomainSnapshotPtr
qemuDomainSnapshotCreateXML(virDomainPtr domain,
                            const char *xmlDesc,
                            unsigned int flags)
C
Chris Lalancette 已提交
9596 9597 9598
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
9599
    char *xml = NULL;
C
Chris Lalancette 已提交
9600 9601 9602
    virDomainSnapshotObjPtr snap = NULL;
    virDomainSnapshotPtr snapshot = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];
9603
    virDomainSnapshotDefPtr def = NULL;
9604 9605
    bool update_current = true;
    unsigned int parse_flags = 0;
9606
    virDomainSnapshotObjPtr other = NULL;
C
Chris Lalancette 已提交
9607

9608 9609
    virCheckFlags(VIR_DOMAIN_SNAPSHOT_CREATE_REDEFINE |
                  VIR_DOMAIN_SNAPSHOT_CREATE_CURRENT |
9610
                  VIR_DOMAIN_SNAPSHOT_CREATE_NO_METADATA |
9611 9612
                  VIR_DOMAIN_SNAPSHOT_CREATE_HALT |
                  VIR_DOMAIN_SNAPSHOT_CREATE_DISK_ONLY, NULL);
9613 9614 9615 9616 9617 9618 9619

    if (((flags & VIR_DOMAIN_SNAPSHOT_CREATE_REDEFINE) &&
         !(flags & VIR_DOMAIN_SNAPSHOT_CREATE_CURRENT)) ||
        (flags & VIR_DOMAIN_SNAPSHOT_CREATE_NO_METADATA))
        update_current = false;
    if (flags & VIR_DOMAIN_SNAPSHOT_CREATE_REDEFINE)
        parse_flags |= VIR_DOMAIN_SNAPSHOT_PARSE_REDEFINE;
9620 9621
    if (flags & VIR_DOMAIN_SNAPSHOT_CREATE_DISK_ONLY)
        parse_flags |= VIR_DOMAIN_SNAPSHOT_PARSE_DISKS;
9622

C
Chris Lalancette 已提交
9623 9624 9625 9626 9627 9628 9629 9630 9631
    qemuDriverLock(driver);
    virUUIDFormat(domain->uuid, uuidstr);
    vm = virDomainFindByUUID(&driver->domains, domain->uuid);
    if (!vm) {
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

9632 9633 9634 9635 9636
    if (qemuProcessAutoDestroyActive(driver, vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is marked for auto destroy"));
        goto cleanup;
    }
9637 9638 9639 9640 9641
    if (!vm->persistent && (flags & VIR_DOMAIN_SNAPSHOT_CREATE_HALT)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("cannot halt after transient domain snapshot"));
        goto cleanup;
    }
9642

9643 9644 9645
    if (!(def = virDomainSnapshotDefParseString(xmlDesc, driver->caps,
                                                QEMU_EXPECTED_VIRT_TYPES,
                                                parse_flags)))
C
Chris Lalancette 已提交
9646 9647
        goto cleanup;

9648 9649 9650 9651 9652 9653 9654 9655 9656 9657 9658 9659 9660 9661 9662 9663 9664 9665 9666 9667 9668 9669 9670 9671 9672 9673 9674 9675 9676 9677 9678 9679 9680 9681
    if (flags & VIR_DOMAIN_SNAPSHOT_CREATE_REDEFINE) {
        /* Prevent circular chains */
        if (def->parent) {
            if (STREQ(def->name, def->parent)) {
                qemuReportError(VIR_ERR_INVALID_ARG,
                                _("cannot set snapshot %s as its own parent"),
                                def->name);
                goto cleanup;
            }
            other = virDomainSnapshotFindByName(&vm->snapshots, def->parent);
            if (!other) {
                qemuReportError(VIR_ERR_INVALID_ARG,
                                _("parent %s for snapshot %s not found"),
                                def->parent, def->name);
                goto cleanup;
            }
            while (other->def->parent) {
                if (STREQ(other->def->parent, def->name)) {
                    qemuReportError(VIR_ERR_INVALID_ARG,
                                    _("parent %s would create cycle to %s"),
                                    other->def->name, def->name);
                    goto cleanup;
                }
                other = virDomainSnapshotFindByName(&vm->snapshots,
                                                    other->def->parent);
                if (!other) {
                    VIR_WARN("snapshots are inconsistent for %s",
                             vm->def->name);
                    break;
                }
            }
        }

        /* Check that any replacement is compatible */
9682 9683 9684 9685 9686 9687 9688
        if (def->dom &&
            memcmp(def->dom->uuid, domain->uuid, VIR_UUID_BUFLEN)) {
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("definition for snapshot %s must use uuid %s"),
                            def->name, uuidstr);
            goto cleanup;
        }
9689 9690 9691 9692 9693 9694 9695 9696 9697 9698 9699 9700
        other = virDomainSnapshotFindByName(&vm->snapshots, def->name);
        if (other) {
            if ((other->def->state == VIR_DOMAIN_RUNNING ||
                 other->def->state == VIR_DOMAIN_PAUSED) !=
                (def->state == VIR_DOMAIN_RUNNING ||
                 def->state == VIR_DOMAIN_PAUSED)) {
                qemuReportError(VIR_ERR_INVALID_ARG,
                                _("cannot change between online and offline "
                                  "snapshot state in snapshot %s"),
                                def->name);
                goto cleanup;
            }
9701 9702 9703 9704 9705 9706 9707 9708
            if ((other->def->state == VIR_DOMAIN_DISK_SNAPSHOT) !=
                (def->state == VIR_DOMAIN_DISK_SNAPSHOT)) {
                qemuReportError(VIR_ERR_INVALID_ARG,
                                _("cannot change between disk snapshot and "
                                  "system checkpoint in snapshot %s"),
                                def->name);
                goto cleanup;
            }
9709 9710 9711 9712 9713 9714 9715 9716 9717 9718 9719
            if (other->def->dom) {
                if (def->dom) {
                    if (!virDomainDefCheckABIStability(other->def->dom,
                                                       def->dom))
                        goto cleanup;
                } else {
                    /* Transfer the domain def */
                    def->dom = other->def->dom;
                    other->def->dom = NULL;
                }
            }
9720 9721 9722 9723
            if (other == vm->current_snapshot) {
                update_current = true;
                vm->current_snapshot = NULL;
            }
9724 9725 9726 9727 9728 9729
            /* Drop and rebuild the parent relationship, but keep all
             * child relations by reusing snap.  */
            virDomainSnapshotDropParent(&vm->snapshots, other);
            virDomainSnapshotDefFree(other->def);
            other->def = NULL;
            snap = other;
9730
        }
9731 9732 9733 9734 9735 9736
        if (def->state == VIR_DOMAIN_DISK_SNAPSHOT && def->dom) {
            if (virDomainSnapshotAlignDisks(def,
                                            VIR_DOMAIN_DISK_SNAPSHOT_EXTERNAL,
                                            false) < 0)
                goto cleanup;
        }
9737 9738 9739 9740 9741 9742 9743 9744 9745 9746
    } else {
        /* Easiest way to clone inactive portion of vm->def is via
         * conversion in and back out of xml.  */
        if (!(xml = virDomainDefFormat(vm->def, (VIR_DOMAIN_XML_INACTIVE |
                                                 VIR_DOMAIN_XML_SECURE))) ||
            !(def->dom = virDomainDefParseString(driver->caps, xml,
                                                 QEMU_EXPECTED_VIRT_TYPES,
                                                 VIR_DOMAIN_XML_INACTIVE)))
            goto cleanup;

9747 9748 9749 9750 9751 9752 9753 9754 9755 9756 9757 9758 9759 9760 9761 9762 9763 9764 9765 9766 9767 9768
        if (flags & VIR_DOMAIN_SNAPSHOT_CREATE_DISK_ONLY) {
            if (virDomainSnapshotAlignDisks(def,
                                            VIR_DOMAIN_DISK_SNAPSHOT_EXTERNAL,
                                            false) < 0)
                goto cleanup;
            if (qemuDomainSnapshotDiskPrepare(vm, def) < 0)
                goto cleanup;
            def->state = VIR_DOMAIN_DISK_SNAPSHOT;
        } else {
            /* In a perfect world, we would allow qemu to tell us this.
             * The problem is that qemu only does this check
             * device-by-device; so if you had a domain that booted from a
             * large qcow2 device, but had a secondary raw device
             * attached, you wouldn't find out that you can't snapshot
             * your guest until *after* it had spent the time to snapshot
             * the boot device.  This is probably a bug in qemu, but we'll
             * work around it here for now.
             */
            if (!qemuDomainSnapshotIsAllowed(vm))
                goto cleanup;
            def->state = virDomainObjGetState(vm, NULL);
        }
9769 9770
    }

9771 9772 9773
    if (snap)
        snap->def = def;
    else if (!(snap = virDomainSnapshotAssignDef(&vm->snapshots, def)))
C
Chris Lalancette 已提交
9774
        goto cleanup;
9775
    def = NULL;
C
Chris Lalancette 已提交
9776

9777 9778
    if (update_current)
        snap->def->current = true;
9779
    if (vm->current_snapshot) {
9780 9781 9782 9783 9784 9785
        if (!(flags & VIR_DOMAIN_SNAPSHOT_CREATE_REDEFINE)) {
            snap->def->parent = strdup(vm->current_snapshot->def->name);
            if (snap->def->parent == NULL) {
                virReportOOMError();
                goto cleanup;
            }
9786
        }
9787
        if (update_current) {
9788 9789 9790 9791 9792 9793
            vm->current_snapshot->def->current = false;
            if (qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                                driver->snapshotDir) < 0)
                goto cleanup;
            vm->current_snapshot = NULL;
        }
9794
    }
9795

C
Chris Lalancette 已提交
9796
    /* actually do the snapshot */
9797 9798
    if (flags & VIR_DOMAIN_SNAPSHOT_CREATE_REDEFINE) {
        /* XXX Should we validate that the redefined snapshot even
9799 9800
         * makes sense, such as checking that qemu-img recognizes the
         * snapshot name in at least one of the domain's disks?  */
9801 9802 9803 9804 9805 9806 9807 9808 9809 9810
    } else if (flags & VIR_DOMAIN_SNAPSHOT_CREATE_DISK_ONLY) {
        if (!virDomainObjIsActive(vm)) {
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                            _("disk snapshots of inactive domains not "
                              "implemented yet"));
            goto cleanup;
        }
        if (qemuDomainSnapshotCreateDiskActive(domain->conn, driver,
                                               &vm, snap, flags) < 0)
            goto cleanup;
9811
    } else if (!virDomainObjIsActive(vm)) {
E
Eric Blake 已提交
9812
        if (qemuDomainSnapshotCreateInactive(driver, vm, snap) < 0)
C
Chris Lalancette 已提交
9813
            goto cleanup;
E
Eric Blake 已提交
9814
    } else {
9815
        if (qemuDomainSnapshotCreateActive(domain->conn, driver,
9816
                                           &vm, snap, flags) < 0)
9817
            goto cleanup;
C
Chris Lalancette 已提交
9818 9819
    }

9820
    /* If we fail after this point, there's not a whole lot we can
C
Chris Lalancette 已提交
9821 9822 9823 9824 9825 9826
     * do; we've successfully taken the snapshot, and we are now running
     * on it, so we have to go forward the best we can
     */
    snapshot = virGetDomainSnapshot(domain, snap->def->name);

cleanup:
9827
    if (vm) {
9828
        if (snapshot && !(flags & VIR_DOMAIN_SNAPSHOT_CREATE_NO_METADATA)) {
9829
            if (qemuDomainSnapshotWriteMetadata(vm, snap,
9830
                                                driver->snapshotDir) < 0) {
9831 9832
                VIR_WARN("unable to save metadata for snapshot %s",
                         snap->def->name);
9833 9834 9835 9836 9837 9838 9839 9840 9841 9842 9843 9844 9845 9846 9847 9848
            } else {
                if (update_current)
                    vm->current_snapshot = snap;
                if (snap->def->parent) {
                    other = virDomainSnapshotFindByName(&vm->snapshots,
                                                        snap->def->parent);
                    snap->parent = other;
                    other->nchildren++;
                    snap->sibling = other->first_child;
                    other->first_child = snap;
                } else {
                    vm->snapshots.nroots++;
                    snap->sibling = vm->snapshots.first_root;
                    vm->snapshots.first_root = snap;
                }
            }
9849
        } else if (snap) {
9850
            virDomainSnapshotObjListRemove(&vm->snapshots, snap);
9851
        }
C
Chris Lalancette 已提交
9852
        virDomainObjUnlock(vm);
9853 9854
    }
    virDomainSnapshotDefFree(def);
9855
    VIR_FREE(xml);
C
Chris Lalancette 已提交
9856 9857 9858 9859 9860 9861
    qemuDriverUnlock(driver);
    return snapshot;
}

static int qemuDomainSnapshotListNames(virDomainPtr domain, char **names,
                                       int nameslen,
9862
                                       unsigned int flags)
C
Chris Lalancette 已提交
9863 9864 9865 9866 9867
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int n = -1;

9868
    virCheckFlags(VIR_DOMAIN_SNAPSHOT_LIST_ROOTS |
9869 9870
                  VIR_DOMAIN_SNAPSHOT_LIST_METADATA |
                  VIR_DOMAIN_SNAPSHOT_LIST_LEAVES, -1);
9871

C
Chris Lalancette 已提交
9872 9873 9874 9875 9876 9877 9878 9879 9880 9881
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, domain->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(domain->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

9882 9883
    n = virDomainSnapshotObjListGetNames(&vm->snapshots, names, nameslen,
                                         flags);
C
Chris Lalancette 已提交
9884 9885 9886 9887 9888 9889 9890 9891 9892

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return n;
}

static int qemuDomainSnapshotNum(virDomainPtr domain,
9893
                                 unsigned int flags)
C
Chris Lalancette 已提交
9894 9895 9896 9897 9898
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int n = -1;

9899
    virCheckFlags(VIR_DOMAIN_SNAPSHOT_LIST_ROOTS |
9900 9901
                  VIR_DOMAIN_SNAPSHOT_LIST_METADATA |
                  VIR_DOMAIN_SNAPSHOT_LIST_LEAVES, -1);
9902

C
Chris Lalancette 已提交
9903 9904 9905 9906 9907 9908 9909 9910 9911 9912
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, domain->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(domain->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

9913 9914 9915 9916
    /* All qemu snapshots have libvirt metadata, so
     * VIR_DOMAIN_SNAPSHOT_LIST_METADATA makes no difference to our
     * answer.  */

9917
    n = virDomainSnapshotObjListNum(&vm->snapshots, flags);
C
Chris Lalancette 已提交
9918 9919 9920 9921 9922 9923 9924 9925

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return n;
}

9926 9927 9928 9929 9930 9931 9932 9933 9934 9935 9936 9937
static int
qemuDomainSnapshotListChildrenNames(virDomainSnapshotPtr snapshot,
                                    char **names,
                                    int nameslen,
                                    unsigned int flags)
{
    struct qemud_driver *driver = snapshot->domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    virDomainSnapshotObjPtr snap = NULL;
    int n = -1;

    virCheckFlags(VIR_DOMAIN_SNAPSHOT_LIST_DESCENDANTS |
9938 9939
                  VIR_DOMAIN_SNAPSHOT_LIST_METADATA |
                  VIR_DOMAIN_SNAPSHOT_LIST_LEAVES, -1);
9940 9941 9942 9943 9944 9945 9946 9947 9948 9949 9950 9951 9952 9953 9954 9955 9956 9957 9958

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, snapshot->domain->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(snapshot->domain->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    snap = virDomainSnapshotFindByName(&vm->snapshots, snapshot->name);
    if (!snap) {
        qemuReportError(VIR_ERR_NO_DOMAIN_SNAPSHOT,
                        _("no domain snapshot with matching name '%s'"),
                        snapshot->name);
        goto cleanup;
    }

E
Eric Blake 已提交
9959
    n = virDomainSnapshotObjListGetNamesFrom(snap, names, nameslen, flags);
9960 9961 9962 9963 9964 9965 9966 9967 9968 9969 9970 9971 9972 9973 9974 9975 9976 9977

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return n;
}

static int
qemuDomainSnapshotNumChildren(virDomainSnapshotPtr snapshot,
                              unsigned int flags)
{
    struct qemud_driver *driver = snapshot->domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    virDomainSnapshotObjPtr snap = NULL;
    int n = -1;

    virCheckFlags(VIR_DOMAIN_SNAPSHOT_LIST_DESCENDANTS |
9978 9979
                  VIR_DOMAIN_SNAPSHOT_LIST_METADATA |
                  VIR_DOMAIN_SNAPSHOT_LIST_LEAVES, -1);
9980 9981 9982 9983 9984 9985 9986 9987 9988 9989 9990 9991 9992 9993 9994 9995 9996 9997 9998 9999 10000 10001 10002

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, snapshot->domain->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(snapshot->domain->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    snap = virDomainSnapshotFindByName(&vm->snapshots, snapshot->name);
    if (!snap) {
        qemuReportError(VIR_ERR_NO_DOMAIN_SNAPSHOT,
                        _("no domain snapshot with matching name '%s'"),
                        snapshot->name);
        goto cleanup;
    }

    /* All qemu snapshots have libvirt metadata, so
     * VIR_DOMAIN_SNAPSHOT_LIST_METADATA makes no difference to our
     * answer.  */

E
Eric Blake 已提交
10003
    n = virDomainSnapshotObjListNumFrom(snap, flags);
10004 10005 10006 10007 10008 10009 10010 10011

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return n;
}

C
Chris Lalancette 已提交
10012 10013
static virDomainSnapshotPtr qemuDomainSnapshotLookupByName(virDomainPtr domain,
                                                           const char *name,
10014
                                                           unsigned int flags)
C
Chris Lalancette 已提交
10015 10016 10017 10018 10019 10020
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    virDomainSnapshotObjPtr snap = NULL;
    virDomainSnapshotPtr snapshot = NULL;

10021 10022
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
10023 10024 10025 10026 10027 10028 10029 10030 10031 10032 10033 10034 10035 10036 10037 10038 10039 10040 10041 10042 10043 10044 10045 10046 10047 10048 10049
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, domain->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(domain->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    snap = virDomainSnapshotFindByName(&vm->snapshots, name);
    if (!snap) {
        qemuReportError(VIR_ERR_NO_DOMAIN_SNAPSHOT,
                        _("no snapshot with matching name '%s'"), name);
        goto cleanup;
    }

    snapshot = virGetDomainSnapshot(domain, snap->def->name);

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return snapshot;
}

static int qemuDomainHasCurrentSnapshot(virDomainPtr domain,
10050
                                        unsigned int flags)
C
Chris Lalancette 已提交
10051 10052 10053 10054 10055
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;

10056 10057
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
10058 10059 10060 10061 10062 10063 10064 10065 10066 10067 10068 10069 10070 10071 10072 10073 10074 10075 10076
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, domain->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(domain->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    ret = (vm->current_snapshot != NULL);

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

10077 10078 10079 10080 10081 10082 10083 10084 10085 10086 10087 10088 10089 10090 10091 10092 10093 10094 10095 10096 10097 10098 10099 10100 10101 10102 10103 10104 10105 10106 10107 10108 10109 10110 10111 10112 10113 10114 10115 10116 10117 10118 10119 10120 10121
static virDomainSnapshotPtr
qemuDomainSnapshotGetParent(virDomainSnapshotPtr snapshot,
                            unsigned int flags)
{
    struct qemud_driver *driver = snapshot->domain->conn->privateData;
    virDomainObjPtr vm;
    virDomainSnapshotObjPtr snap = NULL;
    virDomainSnapshotPtr parent = NULL;

    virCheckFlags(0, NULL);

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, snapshot->domain->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(snapshot->domain->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    snap = virDomainSnapshotFindByName(&vm->snapshots, snapshot->name);
    if (!snap) {
        qemuReportError(VIR_ERR_NO_DOMAIN_SNAPSHOT,
                        _("no domain snapshot with matching name '%s'"),
                        snapshot->name);
        goto cleanup;
    }

    if (!snap->def->parent) {
        qemuReportError(VIR_ERR_NO_DOMAIN_SNAPSHOT,
                        _("snapshot '%s' does not have a parent"),
                        snap->def->name);
        goto cleanup;
    }

    parent = virGetDomainSnapshot(snapshot->domain, snap->def->parent);

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return parent;
}

C
Chris Lalancette 已提交
10122
static virDomainSnapshotPtr qemuDomainSnapshotCurrent(virDomainPtr domain,
10123
                                                      unsigned int flags)
C
Chris Lalancette 已提交
10124 10125 10126 10127 10128
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    virDomainSnapshotPtr snapshot = NULL;

10129 10130
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
10131 10132 10133 10134 10135 10136 10137 10138 10139 10140 10141 10142 10143 10144 10145 10146 10147 10148 10149 10150 10151 10152 10153 10154 10155
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, domain->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(domain->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    if (!vm->current_snapshot) {
        qemuReportError(VIR_ERR_NO_DOMAIN_SNAPSHOT, "%s",
                        _("the domain does not have a current snapshot"));
        goto cleanup;
    }

    snapshot = virGetDomainSnapshot(domain, vm->current_snapshot->def->name);

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return snapshot;
}

10156 10157
static char *qemuDomainSnapshotGetXMLDesc(virDomainSnapshotPtr snapshot,
                                          unsigned int flags)
C
Chris Lalancette 已提交
10158 10159 10160 10161 10162 10163 10164
{
    struct qemud_driver *driver = snapshot->domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    char *xml = NULL;
    virDomainSnapshotObjPtr snap = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];

10165
    virCheckFlags(VIR_DOMAIN_XML_SECURE, NULL);
10166

C
Chris Lalancette 已提交
10167 10168 10169 10170 10171 10172 10173 10174 10175 10176 10177 10178 10179 10180 10181 10182 10183
    qemuDriverLock(driver);
    virUUIDFormat(snapshot->domain->uuid, uuidstr);
    vm = virDomainFindByUUID(&driver->domains, snapshot->domain->uuid);
    if (!vm) {
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    snap = virDomainSnapshotFindByName(&vm->snapshots, snapshot->name);
    if (!snap) {
        qemuReportError(VIR_ERR_NO_DOMAIN_SNAPSHOT,
                        _("no domain snapshot with matching name '%s'"),
                        snapshot->name);
        goto cleanup;
    }

10184
    xml = virDomainSnapshotDefFormat(uuidstr, snap->def, flags, 0);
C
Chris Lalancette 已提交
10185 10186 10187 10188 10189 10190 10191 10192

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return xml;
}

10193 10194
/* The domain is expected to be locked and inactive. */
static int
E
Eric Blake 已提交
10195 10196
qemuDomainSnapshotRevertInactive(struct qemud_driver *driver,
                                 virDomainObjPtr vm,
10197 10198 10199
                                 virDomainSnapshotObjPtr snap)
{
    /* Try all disks, but report failure if we skipped any.  */
E
Eric Blake 已提交
10200
    int ret = qemuDomainSnapshotForEachQcow2(driver, vm, snap, "-a", true);
10201 10202 10203
    return ret > 0 ? -1 : ret;
}

C
Chris Lalancette 已提交
10204
static int qemuDomainRevertToSnapshot(virDomainSnapshotPtr snapshot,
10205
                                      unsigned int flags)
C
Chris Lalancette 已提交
10206 10207 10208 10209 10210 10211 10212
{
    struct qemud_driver *driver = snapshot->domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int ret = -1;
    virDomainSnapshotObjPtr snap = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];
    virDomainEventPtr event = NULL;
10213
    virDomainEventPtr event2 = NULL;
10214
    int detail;
C
Chris Lalancette 已提交
10215 10216
    qemuDomainObjPrivatePtr priv;
    int rc;
10217
    virDomainDefPtr config = NULL;
C
Chris Lalancette 已提交
10218

10219
    virCheckFlags(VIR_DOMAIN_SNAPSHOT_REVERT_RUNNING |
10220 10221
                  VIR_DOMAIN_SNAPSHOT_REVERT_PAUSED |
                  VIR_DOMAIN_SNAPSHOT_REVERT_FORCE, -1);
10222

10223 10224 10225 10226 10227 10228 10229 10230 10231 10232
    /* We have the following transitions, which create the following events:
     * 1. inactive -> inactive: none
     * 2. inactive -> running:  EVENT_STARTED
     * 3. inactive -> paused:   EVENT_STARTED, EVENT_PAUSED
     * 4. running  -> inactive: EVENT_STOPPED
     * 5. running  -> running:  none
     * 6. running  -> paused:   EVENT_PAUSED
     * 7. paused   -> inactive: EVENT_STOPPED
     * 8. paused   -> running:  EVENT_RESUMED
     * 9. paused   -> paused:   none
10233 10234
     * Also, several transitions occur even if we fail partway through,
     * and use of FORCE can cause multiple transitions.
10235 10236
     */

C
Chris Lalancette 已提交
10237 10238 10239 10240 10241 10242 10243 10244 10245 10246 10247 10248 10249 10250 10251 10252 10253
    qemuDriverLock(driver);
    virUUIDFormat(snapshot->domain->uuid, uuidstr);
    vm = virDomainFindByUUID(&driver->domains, snapshot->domain->uuid);
    if (!vm) {
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    snap = virDomainSnapshotFindByName(&vm->snapshots, snapshot->name);
    if (!snap) {
        qemuReportError(VIR_ERR_NO_DOMAIN_SNAPSHOT,
                        _("no domain snapshot with matching name '%s'"),
                        snapshot->name);
        goto cleanup;
    }

10254 10255 10256 10257 10258 10259 10260 10261 10262 10263
    if (!vm->persistent &&
        snap->def->state != VIR_DOMAIN_RUNNING &&
        snap->def->state != VIR_DOMAIN_PAUSED &&
        (flags & (VIR_DOMAIN_SNAPSHOT_REVERT_RUNNING |
                  VIR_DOMAIN_SNAPSHOT_REVERT_PAUSED)) == 0) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("transient domain needs to request run or pause "
                          "to revert to inactive snapshot"));
        goto cleanup;
    }
10264 10265 10266 10267 10268 10269
    if (snap->def->state == VIR_DOMAIN_DISK_SNAPSHOT) {
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                        _("revert to external disk snapshot not supported "
                          "yet"));
        goto cleanup;
    }
10270 10271 10272 10273 10274 10275 10276 10277 10278 10279 10280 10281 10282 10283 10284 10285 10286 10287
    if (!(flags & VIR_DOMAIN_SNAPSHOT_REVERT_FORCE)) {
        if (!snap->def->dom) {
            qemuReportError(VIR_ERR_SNAPSHOT_REVERT_RISKY,
                            _("snapshot '%s' lacks domain '%s' rollback info"),
                            snap->def->name, vm->def->name);
            goto cleanup;
        }
        if (virDomainObjIsActive(vm) &&
            !(snap->def->state == VIR_DOMAIN_RUNNING
              || snap->def->state == VIR_DOMAIN_PAUSED) &&
            (flags & (VIR_DOMAIN_SNAPSHOT_REVERT_RUNNING |
                      VIR_DOMAIN_SNAPSHOT_REVERT_PAUSED))) {
            qemuReportError(VIR_ERR_SNAPSHOT_REVERT_RISKY,
                            _("must respawn qemu to start inactive snapshot"));
            goto cleanup;
        }
    }

10288

10289 10290 10291 10292 10293 10294 10295 10296 10297 10298
    if (vm->current_snapshot) {
        vm->current_snapshot->def->current = false;
        if (qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                            driver->snapshotDir) < 0)
            goto cleanup;
        vm->current_snapshot = NULL;
        /* XXX Should we restore vm->current_snapshot after this point
         * in the failure cases where we know there was no change?  */
    }

10299 10300 10301 10302 10303
    /* Prepare to copy the snapshot inactive xml as the config of this
     * domain.  Easiest way is by a round trip through xml.
     *
     * XXX Should domain snapshots track live xml rather
     * than inactive xml?  */
10304
    snap->def->current = true;
10305 10306 10307 10308 10309 10310 10311 10312 10313 10314 10315 10316 10317
    if (snap->def->dom) {
        char *xml;
        if (!(xml = virDomainDefFormat(snap->def->dom,
                                       (VIR_DOMAIN_XML_INACTIVE |
                                        VIR_DOMAIN_XML_SECURE))))
            goto cleanup;
        config = virDomainDefParseString(driver->caps, xml,
                                         QEMU_EXPECTED_VIRT_TYPES,
                                         VIR_DOMAIN_XML_INACTIVE);
        VIR_FREE(xml);
        if (!config)
            goto cleanup;
    }
C
Chris Lalancette 已提交
10318

10319
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
C
Chris Lalancette 已提交
10320 10321 10322 10323
        goto cleanup;

    if (snap->def->state == VIR_DOMAIN_RUNNING
        || snap->def->state == VIR_DOMAIN_PAUSED) {
10324 10325 10326 10327 10328 10329 10330 10331 10332
        /* Transitions 2, 3, 5, 6, 8, 9 */
        bool was_running = false;
        bool was_stopped = false;

        /* When using the loadvm monitor command, qemu does not know
         * whether to pause or run the reverted domain, and just stays
         * in the same state as before the monitor command, whether
         * that is paused or running.  We always pause before loadvm,
         * to have finer control.  */
C
Chris Lalancette 已提交
10333
        if (virDomainObjIsActive(vm)) {
10334
            /* Transitions 5, 6, 8, 9 */
10335 10336
            /* Check for ABI compatibility.  */
            if (config && !virDomainDefCheckABIStability(vm->def, config)) {
10337 10338 10339 10340 10341 10342 10343 10344 10345 10346 10347 10348 10349 10350 10351 10352 10353 10354 10355 10356
                virErrorPtr err = virGetLastError();

                if (!(flags & VIR_DOMAIN_SNAPSHOT_REVERT_FORCE)) {
                    /* Re-spawn error using correct category. */
                    if (err->code == VIR_ERR_CONFIG_UNSUPPORTED)
                        qemuReportError(VIR_ERR_SNAPSHOT_REVERT_RISKY, "%s",
                                        err->str2);
                    goto endjob;
                }
                virResetError(err);
                qemuProcessStop(driver, vm, 0,
                                VIR_DOMAIN_SHUTOFF_FROM_SNAPSHOT);
                virDomainAuditStop(vm, "from-snapshot");
                detail = VIR_DOMAIN_EVENT_STOPPED_FROM_SNAPSHOT;
                event = virDomainEventNewFromObj(vm,
                                                 VIR_DOMAIN_EVENT_STOPPED,
                                                 detail);
                if (event)
                    qemuDomainEventQueue(driver, event);
                goto load;
10357 10358
            }

C
Chris Lalancette 已提交
10359
            priv = vm->privateData;
10360 10361 10362 10363 10364 10365 10366 10367 10368 10369 10370 10371 10372 10373 10374 10375 10376 10377 10378 10379
            if (virDomainObjGetState(vm, NULL) == VIR_DOMAIN_RUNNING) {
                /* Transitions 5, 6 */
                was_running = true;
                if (qemuProcessStopCPUs(driver, vm,
                                        VIR_DOMAIN_PAUSED_FROM_SNAPSHOT,
                                        QEMU_ASYNC_JOB_NONE) < 0)
                    goto endjob;
                /* Create an event now in case the restore fails, so
                 * that user will be alerted that they are now paused.
                 * If restore later succeeds, we might replace this. */
                detail = VIR_DOMAIN_EVENT_SUSPENDED_FROM_SNAPSHOT;
                event = virDomainEventNewFromObj(vm,
                                                 VIR_DOMAIN_EVENT_SUSPENDED,
                                                 detail);
                if (!virDomainObjIsActive(vm)) {
                    qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                                    _("guest unexpectedly quit"));
                    goto endjob;
                }
            }
10380
            qemuDomainObjEnterMonitorWithDriver(driver, vm);
C
Chris Lalancette 已提交
10381 10382
            rc = qemuMonitorLoadSnapshot(priv->mon, snap->def->name);
            qemuDomainObjExitMonitorWithDriver(driver, vm);
10383 10384 10385
            if (rc < 0) {
                /* XXX resume domain if it was running before the
                 * failed loadvm attempt? */
10386
                goto endjob;
10387
            }
10388 10389
            if (config)
                virDomainObjAssignDef(vm, config, false);
E
Eric Blake 已提交
10390
        } else {
10391
            /* Transitions 2, 3 */
10392
        load:
10393
            was_stopped = true;
10394 10395 10396
            if (config)
                virDomainObjAssignDef(vm, config, false);

10397
            rc = qemuProcessStart(snapshot->domain->conn, driver, vm, NULL,
10398
                                  true, false, -1, NULL, snap,
10399
                                  VIR_NETDEV_VPORT_PROFILE_OP_CREATE);
10400
            virDomainAuditStart(vm, "from-snapshot", rc >= 0);
10401 10402 10403 10404
            detail = VIR_DOMAIN_EVENT_STARTED_FROM_SNAPSHOT;
            event = virDomainEventNewFromObj(vm,
                                             VIR_DOMAIN_EVENT_STARTED,
                                             detail);
C
Chris Lalancette 已提交
10405
            if (rc < 0)
10406
                goto endjob;
C
Chris Lalancette 已提交
10407 10408
        }

10409
        /* Touch up domain state.  */
10410 10411 10412
        if (!(flags & VIR_DOMAIN_SNAPSHOT_REVERT_RUNNING) &&
            (snap->def->state == VIR_DOMAIN_PAUSED ||
             (flags & VIR_DOMAIN_SNAPSHOT_REVERT_PAUSED))) {
10413 10414 10415 10416 10417 10418 10419 10420 10421 10422 10423 10424 10425 10426 10427 10428 10429 10430 10431 10432
            /* Transitions 3, 6, 9 */
            virDomainObjSetState(vm, VIR_DOMAIN_PAUSED,
                                 VIR_DOMAIN_PAUSED_FROM_SNAPSHOT);
            if (was_stopped) {
                /* Transition 3, use event as-is and add event2 */
                detail = VIR_DOMAIN_EVENT_SUSPENDED_FROM_SNAPSHOT;
                event2 = virDomainEventNewFromObj(vm,
                                                  VIR_DOMAIN_EVENT_SUSPENDED,
                                                  detail);
            } /* else transition 6 and 9 use event as-is */
        } else {
            /* Transitions 2, 5, 8 */
            if (!virDomainObjIsActive(vm)) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                                _("guest unexpectedly quit"));
                goto endjob;
            }
            rc = qemuProcessStartCPUs(driver, vm, snapshot->domain->conn,
                                      VIR_DOMAIN_RUNNING_FROM_SNAPSHOT,
                                      QEMU_ASYNC_JOB_NONE);
H
Hu Tao 已提交
10433
            if (rc < 0)
10434
                goto endjob;
10435 10436 10437 10438 10439 10440 10441 10442 10443 10444 10445 10446 10447 10448 10449
            virDomainEventFree(event);
            event = NULL;
            if (was_stopped) {
                /* Transition 2 */
                detail = VIR_DOMAIN_EVENT_STARTED_FROM_SNAPSHOT;
                event = virDomainEventNewFromObj(vm,
                                                 VIR_DOMAIN_EVENT_STARTED,
                                                 detail);
            } else if (was_running) {
                /* Transition 8 */
                detail = VIR_DOMAIN_EVENT_RESUMED;
                event = virDomainEventNewFromObj(vm,
                                                 VIR_DOMAIN_EVENT_RESUMED,
                                                 detail);
            }
C
Chris Lalancette 已提交
10450
        }
E
Eric Blake 已提交
10451
    } else {
10452
        /* Transitions 1, 4, 7 */
10453 10454 10455
        /* Newer qemu -loadvm refuses to revert to the state of a snapshot
         * created by qemu-img snapshot -c.  If the domain is running, we
         * must take it offline; then do the revert using qemu-img.
C
Chris Lalancette 已提交
10456 10457 10458
         */

        if (virDomainObjIsActive(vm)) {
10459
            /* Transitions 4, 7 */
J
Jiri Denemark 已提交
10460
            qemuProcessStop(driver, vm, 0, VIR_DOMAIN_SHUTOFF_FROM_SNAPSHOT);
10461
            virDomainAuditStop(vm, "from-snapshot");
10462
            detail = VIR_DOMAIN_EVENT_STOPPED_FROM_SNAPSHOT;
C
Chris Lalancette 已提交
10463 10464
            event = virDomainEventNewFromObj(vm,
                                             VIR_DOMAIN_EVENT_STOPPED,
10465
                                             detail);
10466 10467
        }

E
Eric Blake 已提交
10468
        if (qemuDomainSnapshotRevertInactive(driver, vm, snap) < 0) {
10469
            if (!vm->persistent) {
10470
                if (qemuDomainObjEndJob(driver, vm) > 0)
10471
                    qemuDomainRemoveInactive(driver, vm);
10472
                vm = NULL;
10473
                goto cleanup;
10474
            }
10475
            goto endjob;
C
Chris Lalancette 已提交
10476
        }
10477 10478
        if (config)
            virDomainObjAssignDef(vm, config, false);
10479

10480 10481 10482 10483 10484 10485 10486 10487 10488
        if (flags & (VIR_DOMAIN_SNAPSHOT_REVERT_RUNNING |
                     VIR_DOMAIN_SNAPSHOT_REVERT_PAUSED)) {
            /* Flush first event, now do transition 2 or 3 */
            bool paused = (flags & VIR_DOMAIN_SNAPSHOT_REVERT_PAUSED) != 0;

            if (event)
                qemuDomainEventQueue(driver, event);
            rc = qemuProcessStart(snapshot->domain->conn, driver, vm, NULL,
                                  paused, false, -1, NULL, NULL,
10489
                                  VIR_NETDEV_VPORT_PROFILE_OP_CREATE);
10490 10491 10492 10493
            virDomainAuditStart(vm, "from-snapshot", rc >= 0);
            if (rc < 0) {
                if (!vm->persistent) {
                    if (qemuDomainObjEndJob(driver, vm) > 0)
10494
                        qemuDomainRemoveInactive(driver, vm);
10495 10496 10497 10498 10499 10500 10501 10502 10503 10504 10505 10506 10507 10508 10509 10510
                    vm = NULL;
                    goto cleanup;
                }
                goto endjob;
            }
            detail = VIR_DOMAIN_EVENT_STARTED_FROM_SNAPSHOT;
            event = virDomainEventNewFromObj(vm,
                                             VIR_DOMAIN_EVENT_STARTED,
                                             detail);
            if (paused) {
                detail = VIR_DOMAIN_EVENT_SUSPENDED_FROM_SNAPSHOT;
                event2 = virDomainEventNewFromObj(vm,
                                                  VIR_DOMAIN_EVENT_SUSPENDED,
                                                  detail);
            }
        }
C
Chris Lalancette 已提交
10511 10512 10513 10514
    }

    ret = 0;

10515
endjob:
10516
    if (vm && qemuDomainObjEndJob(driver, vm) == 0)
C
Chris Lalancette 已提交
10517 10518
        vm = NULL;

10519
cleanup:
10520 10521 10522 10523 10524 10525 10526 10527 10528
    if (vm && ret == 0) {
        if (qemuDomainSnapshotWriteMetadata(vm, snap,
                                            driver->snapshotDir) < 0)
            ret = -1;
        else
            vm->current_snapshot = snap;
    } else if (snap) {
        snap->def->current = false;
    }
10529
    if (event) {
C
Chris Lalancette 已提交
10530
        qemuDomainEventQueue(driver, event);
10531 10532 10533
        if (event2)
            qemuDomainEventQueue(driver, event2);
    }
C
Chris Lalancette 已提交
10534 10535 10536 10537 10538 10539 10540
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);

    return ret;
}

10541 10542
struct snap_reparent {
    struct qemud_driver *driver;
10543
    virDomainSnapshotObjPtr parent;
10544 10545
    virDomainObjPtr vm;
    int err;
10546
    virDomainSnapshotObjPtr last;
10547 10548 10549 10550
};

static void
qemuDomainSnapshotReparentChildren(void *payload,
10551
                                   const void *name ATTRIBUTE_UNUSED,
10552 10553 10554 10555 10556 10557 10558 10559 10560
                                   void *data)
{
    virDomainSnapshotObjPtr snap = payload;
    struct snap_reparent *rep = data;

    if (rep->err < 0) {
        return;
    }

10561
    VIR_FREE(snap->def->parent);
10562
    snap->parent = rep->parent;
10563

10564 10565
    if (rep->parent) {
        snap->def->parent = strdup(rep->parent->def->name);
10566

10567 10568 10569 10570
        if (snap->def->parent == NULL) {
            virReportOOMError();
            rep->err = -1;
            return;
10571 10572
        }
    }
10573

10574 10575 10576
    if (!snap->sibling)
        rep->last = snap;

10577 10578
    rep->err = qemuDomainSnapshotWriteMetadata(rep->vm, snap,
                                               rep->driver->snapshotDir);
10579 10580
}

C
Chris Lalancette 已提交
10581 10582 10583 10584 10585 10586 10587 10588
static int qemuDomainSnapshotDelete(virDomainSnapshotPtr snapshot,
                                    unsigned int flags)
{
    struct qemud_driver *driver = snapshot->domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int ret = -1;
    virDomainSnapshotObjPtr snap = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];
10589
    struct qemu_snap_remove rem;
10590
    struct snap_reparent rep;
10591
    bool metadata_only = !!(flags & VIR_DOMAIN_SNAPSHOT_DELETE_METADATA_ONLY);
10592
    int external = 0;
C
Chris Lalancette 已提交
10593

10594
    virCheckFlags(VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN |
10595 10596
                  VIR_DOMAIN_SNAPSHOT_DELETE_METADATA_ONLY |
                  VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN_ONLY, -1);
10597

C
Chris Lalancette 已提交
10598 10599 10600 10601 10602 10603 10604 10605 10606 10607 10608 10609 10610 10611 10612 10613 10614
    qemuDriverLock(driver);
    virUUIDFormat(snapshot->domain->uuid, uuidstr);
    vm = virDomainFindByUUID(&driver->domains, snapshot->domain->uuid);
    if (!vm) {
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    snap = virDomainSnapshotFindByName(&vm->snapshots, snapshot->name);
    if (!snap) {
        qemuReportError(VIR_ERR_NO_DOMAIN_SNAPSHOT,
                        _("no domain snapshot with matching name '%s'"),
                        snapshot->name);
        goto cleanup;
    }

10615 10616 10617 10618 10619
    if (!(flags & VIR_DOMAIN_SNAPSHOT_DELETE_METADATA_ONLY)) {
        if (!(flags & VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN_ONLY) &&
            snap->def->state == VIR_DOMAIN_DISK_SNAPSHOT)
            external++;
        if (flags & VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN)
E
Eric Blake 已提交
10620
            virDomainSnapshotForEachDescendant(snap,
10621 10622 10623 10624 10625 10626 10627 10628 10629 10630
                                               qemuDomainSnapshotCountExternal,
                                               &external);
        if (external) {
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                            _("deletion of %d external disk snapshots not "
                              "supported yet"), external);
            goto cleanup;
        }
    }

10631
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
10632 10633
        goto cleanup;

10634 10635
    if (flags & (VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN |
                 VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN_ONLY)) {
C
Chris Lalancette 已提交
10636 10637
        rem.driver = driver;
        rem.vm = vm;
10638
        rem.metadata_only = metadata_only;
C
Chris Lalancette 已提交
10639
        rem.err = 0;
10640
        rem.current = false;
E
Eric Blake 已提交
10641
        virDomainSnapshotForEachDescendant(snap,
E
Eric Blake 已提交
10642
                                           qemuDomainSnapshotDiscardAll,
10643
                                           &rem);
C
Chris Lalancette 已提交
10644
        if (rem.err < 0)
10645
            goto endjob;
10646 10647 10648 10649 10650 10651 10652 10653 10654 10655 10656 10657
        if (rem.current) {
            if (flags & VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN_ONLY) {
                snap->def->current = true;
                if (qemuDomainSnapshotWriteMetadata(vm, snap,
                                                    driver->snapshotDir) < 0) {
                    qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                    _("failed to set snapshot '%s' as current"),
                                    snap->def->name);
                    snap->def->current = false;
                    goto endjob;
                }
            }
10658
            vm->current_snapshot = snap;
10659
        }
10660
    } else if (snap->nchildren) {
10661
        rep.driver = driver;
10662
        rep.parent = snap->parent;
10663 10664
        rep.vm = vm;
        rep.err = 0;
10665
        rep.last = NULL;
E
Eric Blake 已提交
10666
        virDomainSnapshotForEachChild(snap,
10667 10668
                                      qemuDomainSnapshotReparentChildren,
                                      &rep);
10669 10670
        if (rep.err < 0)
            goto endjob;
10671 10672 10673 10674 10675 10676 10677 10678 10679 10680
        /* Can't modify siblings during ForEachChild, so do it now.  */
        if (snap->parent) {
            snap->parent->nchildren += snap->nchildren;
            rep.last->sibling = snap->parent->first_child;
            snap->parent->first_child = snap->first_child;
        } else {
            vm->snapshots.nroots += snap->nchildren;
            rep.last->sibling = vm->snapshots.first_root;
            vm->snapshots.first_root = snap->first_child;
        }
C
Chris Lalancette 已提交
10681 10682
    }

10683 10684 10685
    if (flags & VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN_ONLY) {
        snap->nchildren = 0;
        snap->first_child = NULL;
10686
        ret = 0;
10687 10688
    } else {
        virDomainSnapshotDropParent(&vm->snapshots, snap);
10689
        ret = qemuDomainSnapshotDiscard(driver, vm, snap, true, metadata_only);
10690
    }
C
Chris Lalancette 已提交
10691

10692
endjob:
10693
    if (qemuDomainObjEndJob(driver, vm) == 0)
10694 10695
        vm = NULL;

C
Chris Lalancette 已提交
10696 10697 10698 10699 10700 10701
cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}
10702

10703 10704 10705 10706 10707 10708 10709
static int qemuDomainMonitorCommand(virDomainPtr domain, const char *cmd,
                                    char **result, unsigned int flags)
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int ret = -1;
    qemuDomainObjPrivatePtr priv;
10710
    bool hmp;
10711

10712
    virCheckFlags(VIR_DOMAIN_QEMU_MONITOR_COMMAND_HMP, -1);
10713 10714 10715 10716 10717 10718 10719 10720 10721 10722 10723 10724 10725 10726 10727 10728 10729

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, domain->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(domain->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
   }

10730 10731 10732 10733 10734 10735 10736 10737 10738
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
        goto cleanup;

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("domain is not running"));
        goto endjob;
    }

10739 10740
    priv = vm->privateData;

10741
    qemuDomainObjTaint(driver, vm, VIR_DOMAIN_TAINT_CUSTOM_MONITOR, -1);
10742

10743 10744
    hmp = !!(flags & VIR_DOMAIN_QEMU_MONITOR_COMMAND_HMP);

10745
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
10746
    ret = qemuMonitorArbitraryCommand(priv->mon, cmd, result, hmp);
10747
    qemuDomainObjExitMonitorWithDriver(driver, vm);
10748 10749

endjob:
10750
    if (qemuDomainObjEndJob(driver, vm) == 0) {
10751 10752 10753 10754 10755 10756 10757 10758 10759 10760
        vm = NULL;
    }

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

10761

10762 10763 10764 10765 10766 10767 10768 10769 10770 10771
static virDomainPtr qemuDomainAttach(virConnectPtr conn,
                                     unsigned int pid,
                                     unsigned int flags)
{
    struct qemud_driver *driver = conn->privateData;
    virDomainObjPtr vm = NULL;
    virDomainDefPtr def = NULL;
    virDomainPtr dom = NULL;
    virDomainChrSourceDefPtr monConfig = NULL;
    bool monJSON = false;
10772
    char *pidfile = NULL;
10773 10774 10775 10776 10777 10778 10779 10780 10781 10782 10783 10784 10785 10786 10787 10788 10789 10790 10791 10792 10793 10794 10795 10796 10797 10798 10799 10800 10801 10802 10803 10804 10805 10806

    virCheckFlags(0, NULL);

    qemuDriverLock(driver);

    if (!(def = qemuParseCommandLinePid(driver->caps, pid,
                                        &pidfile, &monConfig, &monJSON)))
        goto cleanup;

    if (!monConfig) {
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("No monitor connection for pid %u"),
                        pid);
        goto cleanup;
    }
    if (monConfig->type != VIR_DOMAIN_CHR_TYPE_UNIX) {
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("Cannot connect to monitor connection of type '%s' for pid %u"),
                        virDomainChrTypeToString(monConfig->type), pid);
        goto cleanup;
    }

    if (!(def->name) &&
        virAsprintf(&def->name, "attach-pid-%u", pid) < 0) {
        virReportOOMError();
        goto cleanup;
    }

    if (virDomainObjIsDuplicate(&driver->domains, def, 1) < 0)
        goto cleanup;

    if (qemudCanonicalizeMachine(driver, def) < 0)
        goto cleanup;

10807
    if (qemuDomainAssignAddresses(def) < 0)
10808 10809 10810 10811 10812 10813 10814 10815 10816
        goto cleanup;

    if (!(vm = virDomainAssignDef(driver->caps,
                                  &driver->domains,
                                  def, false)))
        goto cleanup;

    def = NULL;

10817
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
10818 10819 10820 10821 10822 10823 10824 10825 10826 10827 10828 10829 10830 10831
        goto cleanup;

    if (qemuProcessAttach(conn, driver, vm, pid,
                          pidfile, monConfig, monJSON) < 0) {
        monConfig = NULL;
        goto endjob;
    }

    monConfig = NULL;

    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
    if (dom) dom->id = vm->def->id;

endjob:
10832
    if (qemuDomainObjEndJob(driver, vm) == 0) {
10833 10834 10835 10836 10837 10838 10839 10840 10841 10842 10843 10844 10845 10846 10847
        vm = NULL;
        goto cleanup;
    }

cleanup:
    virDomainDefFree(def);
    virDomainChrSourceDefFree(monConfig);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    VIR_FREE(pidfile);
    return dom;
}


10848 10849
static int
qemuDomainOpenConsole(virDomainPtr dom,
10850
                      const char *dev_name,
10851 10852 10853 10854 10855 10856 10857 10858 10859 10860 10861 10862 10863 10864 10865 10866 10867 10868 10869 10870 10871 10872 10873 10874 10875 10876 10877
                      virStreamPtr st,
                      unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];
    int ret = -1;
    int i;
    virDomainChrDefPtr chr = NULL;

    virCheckFlags(0, -1);

    qemuDriverLock(driver);
    virUUIDFormat(dom->uuid, uuidstr);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    if (!vm) {
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

10878
    if (dev_name) {
10879 10880 10881 10882 10883
        for (i = 0 ; !chr && i < vm->def->nconsoles ; i++) {
            if (vm->def->consoles[i]->info.alias &&
                STREQ(dev_name, vm->def->consoles[i]->info.alias))
                chr = vm->def->consoles[i];
        }
10884
        for (i = 0 ; !chr && i < vm->def->nserials ; i++) {
10885
            if (STREQ(dev_name, vm->def->serials[i]->info.alias))
10886 10887 10888
                chr = vm->def->serials[i];
        }
        for (i = 0 ; !chr && i < vm->def->nparallels ; i++) {
10889
            if (STREQ(dev_name, vm->def->parallels[i]->info.alias))
10890 10891 10892
                chr = vm->def->parallels[i];
        }
    } else {
10893 10894
        if (vm->def->nconsoles)
            chr = vm->def->consoles[0];
10895 10896 10897 10898 10899 10900 10901
        else if (vm->def->nserials)
            chr = vm->def->serials[0];
    }

    if (!chr) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("cannot find character device %s"),
10902
                        NULLSTR(dev_name));
10903 10904 10905
        goto cleanup;
    }

10906
    if (chr->source.type != VIR_DOMAIN_CHR_TYPE_PTY) {
10907 10908
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("character device %s is not using a PTY"),
10909
                        NULLSTR(dev_name));
10910 10911 10912
        goto cleanup;
    }

10913
    if (virFDStreamOpenFile(st, chr->source.data.file.path,
E
Eric Blake 已提交
10914
                            0, 0, O_RDWR) < 0)
10915 10916 10917 10918 10919 10920 10921 10922 10923 10924
        goto cleanup;

    ret = 0;
cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

E
Eric Blake 已提交
10925 10926 10927
static char *
qemuDiskPathToAlias(virDomainObjPtr vm, const char *path)
{
10928 10929
    int i;
    char *ret = NULL;
10930
    virDomainDiskDefPtr disk;
10931

10932 10933 10934
    i = virDomainDiskIndexByName(vm->def, path, true);
    if (i < 0)
        goto cleanup;
10935

10936
    disk = vm->def->disks[i];
10937

10938 10939 10940 10941 10942 10943 10944 10945
    if (disk->type != VIR_DOMAIN_DISK_TYPE_BLOCK &&
        disk->type != VIR_DOMAIN_DISK_TYPE_FILE)
        goto cleanup;

    if (disk->src) {
        if (virAsprintf(&ret, "drive-%s", disk->info.alias) < 0) {
            virReportOOMError();
            return NULL;
10946 10947 10948
        }
    }

10949
cleanup:
10950 10951 10952 10953 10954 10955 10956 10957 10958 10959 10960 10961 10962 10963 10964 10965
    if (!ret) {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("No device found for specified path"));
    }
    return ret;
}

static int
qemuDomainBlockJobImpl(virDomainPtr dom, const char *path,
                       unsigned long bandwidth, virDomainBlockJobInfoPtr info,
                       int mode)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm = NULL;
    qemuDomainObjPrivatePtr priv;
    char uuidstr[VIR_UUID_STRING_BUFLEN];
E
Eric Blake 已提交
10966
    char *device = NULL;
10967 10968 10969 10970 10971 10972 10973 10974 10975 10976 10977 10978 10979 10980 10981 10982 10983 10984 10985 10986 10987 10988 10989 10990
    int ret = -1;

    qemuDriverLock(driver);
    virUUIDFormat(dom->uuid, uuidstr);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    if (!vm) {
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

    device = qemuDiskPathToAlias(vm, path);
    if (!device) {
        goto cleanup;
    }

    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
        goto cleanup;
10991 10992 10993 10994 10995 10996 10997

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("domain is not running"));
        goto endjob;
    }

10998
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
10999 11000 11001
    priv = vm->privateData;
    ret = qemuMonitorBlockJob(priv->mon, device, bandwidth, info, mode);
    qemuDomainObjExitMonitorWithDriver(driver, vm);
11002 11003

endjob:
11004 11005 11006 11007 11008 11009 11010 11011 11012 11013 11014 11015 11016 11017 11018 11019 11020 11021 11022 11023 11024 11025 11026 11027 11028 11029 11030 11031 11032 11033 11034 11035 11036 11037 11038 11039 11040 11041 11042 11043
    if (qemuDomainObjEndJob(driver, vm) == 0) {
        vm = NULL;
        goto cleanup;
    }

cleanup:
    VIR_FREE(device);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

static int
qemuDomainBlockJobAbort(virDomainPtr dom, const char *path, unsigned int flags)
{
    virCheckFlags(0, -1);
    return qemuDomainBlockJobImpl(dom, path, 0, NULL, BLOCK_JOB_ABORT);
}

static int
qemuDomainGetBlockJobInfo(virDomainPtr dom, const char *path,
                           virDomainBlockJobInfoPtr info, unsigned int flags)
{
    virCheckFlags(0, -1);
    return qemuDomainBlockJobImpl(dom, path, 0, info, BLOCK_JOB_INFO);
}

static int
qemuDomainBlockJobSetSpeed(virDomainPtr dom, const char *path,
                           unsigned long bandwidth, unsigned int flags)
{
    virCheckFlags(0, -1);
    return qemuDomainBlockJobImpl(dom, path, bandwidth, NULL, BLOCK_JOB_SPEED);
}

static int
qemuDomainBlockPull(virDomainPtr dom, const char *path, unsigned long bandwidth,
                    unsigned int flags)
{
11044 11045
    int ret;

11046
    virCheckFlags(0, -1);
11047 11048 11049 11050 11051
    ret = qemuDomainBlockJobImpl(dom, path, bandwidth, NULL, BLOCK_JOB_PULL);
    if (ret == 0 && bandwidth != 0)
        ret = qemuDomainBlockJobImpl(dom, path, bandwidth, NULL,
                                     BLOCK_JOB_SPEED);
    return ret;
11052
}
11053

11054 11055 11056 11057 11058 11059 11060 11061 11062 11063 11064 11065 11066 11067 11068 11069 11070 11071 11072 11073 11074 11075 11076 11077 11078 11079 11080 11081 11082 11083 11084 11085 11086 11087 11088 11089 11090 11091 11092 11093 11094 11095 11096 11097 11098 11099 11100 11101 11102 11103 11104 11105 11106 11107 11108 11109 11110 11111 11112 11113 11114 11115 11116 11117 11118 11119 11120 11121 11122
static int
qemuDomainOpenGraphics(virDomainPtr dom,
                       unsigned int idx,
                       int fd,
                       unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];
    int ret = -1;
    qemuDomainObjPrivatePtr priv;
    const char *protocol;

    virCheckFlags(VIR_DOMAIN_OPEN_GRAPHICS_SKIPAUTH, -1);

    qemuDriverLock(driver);
    virUUIDFormat(dom->uuid, uuidstr);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    if (!vm) {
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

    priv = vm->privateData;

    if (idx >= vm->def->ngraphics) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("No graphics backend with index %d"), idx);
        goto cleanup;
    }
    switch (vm->def->graphics[idx]->type) {
    case VIR_DOMAIN_GRAPHICS_TYPE_VNC:
        protocol = "vnc";
        break;
    case VIR_DOMAIN_GRAPHICS_TYPE_SPICE:
        protocol = "spice";
        break;
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("Can only open VNC or SPICE graphics backends, not %s"),
                        virDomainGraphicsTypeToString(vm->def->graphics[idx]->type));
        goto cleanup;
    }

    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
        goto cleanup;
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
    ret = qemuMonitorOpenGraphics(priv->mon, protocol, fd, "graphicsfd",
                                  (flags & VIR_DOMAIN_OPEN_GRAPHICS_SKIPAUTH) != 0);
    qemuDomainObjExitMonitorWithDriver(driver, vm);
    if (qemuDomainObjEndJob(driver, vm) == 0) {
        vm = NULL;
        goto cleanup;
    }

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

11123 11124 11125 11126 11127 11128 11129 11130 11131 11132 11133 11134 11135 11136 11137 11138 11139 11140 11141 11142 11143 11144 11145 11146 11147 11148 11149 11150 11151 11152 11153 11154 11155 11156 11157 11158 11159 11160 11161 11162 11163 11164 11165 11166 11167 11168 11169 11170 11171 11172 11173 11174 11175 11176 11177 11178 11179 11180 11181 11182 11183 11184 11185 11186 11187 11188 11189 11190 11191 11192 11193 11194 11195 11196 11197 11198 11199 11200 11201 11202 11203 11204 11205 11206 11207 11208 11209 11210 11211 11212 11213 11214 11215 11216 11217 11218 11219 11220 11221 11222 11223 11224 11225 11226 11227 11228 11229 11230 11231 11232 11233 11234 11235 11236 11237 11238 11239 11240 11241 11242 11243 11244 11245
static int
qemuDomainSetBlockIoTune(virDomainPtr dom,
                         const char *disk,
                         virTypedParameterPtr params,
                         int nparams,
                         unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm = NULL;
    qemuDomainObjPrivatePtr priv;
    virDomainDefPtr persistentDef = NULL;
    virDomainBlockIoTuneInfo info;
    char uuidstr[VIR_UUID_STRING_BUFLEN];
    const char *device = NULL;
    int ret = -1;
    int i;
    bool isActive;
    int idx = -1;

    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);

    memset(&info, 0, sizeof(info));

    qemuDriverLock(driver);
    virUUIDFormat(dom->uuid, uuidstr);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    if (!vm) {
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    device = qemuDiskPathToAlias(vm, disk);
    if (!device) {
        goto cleanup;
    }

    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
        goto cleanup;

    isActive = virDomainObjIsActive(vm);

    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
        if (isActive)
            flags = VIR_DOMAIN_AFFECT_LIVE;
        else
            flags = VIR_DOMAIN_AFFECT_CONFIG;
    }

    if (!isActive && (flags & VIR_DOMAIN_AFFECT_LIVE)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("domain is not running"));
        goto endjob;
    }

    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
        if (!vm->persistent) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("cannot change persistent config of a transient domain"));
            goto endjob;
        }
        if (!(persistentDef = virDomainObjGetPersistentDef(driver->caps, vm)))
            goto endjob;
        idx = virDomainDiskIndexByName(persistentDef, disk, true);
        if (idx < 0)
            goto endjob;
    }

    for (i = 0; i < nparams; i++) {
        virTypedParameterPtr param = &params[i];

        if (param->type != VIR_TYPED_PARAM_ULLONG) {
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("expected unsigned long long for parameter %s"),
                            param->field);
            goto endjob;
        }

        if (STREQ(param->field, VIR_DOMAIN_BLOCK_IOTUNE_TOTAL_BYTES_SEC)) {
            info.total_bytes_sec = param->value.ul;
        } else if (STREQ(param->field,
                         VIR_DOMAIN_BLOCK_IOTUNE_READ_BYTES_SEC)) {
            info.read_bytes_sec = param->value.ul;
        } else if (STREQ(param->field,
                         VIR_DOMAIN_BLOCK_IOTUNE_WRITE_BYTES_SEC)) {
            info.write_bytes_sec = param->value.ul;
        } else if (STREQ(param->field,
                         VIR_DOMAIN_BLOCK_IOTUNE_TOTAL_IOPS_SEC)) {
            info.total_iops_sec = param->value.ul;
        } else if (STREQ(param->field,
                         VIR_DOMAIN_BLOCK_IOTUNE_READ_IOPS_SEC)) {
            info.read_iops_sec = param->value.ul;
        } else if (STREQ(param->field,
                         VIR_DOMAIN_BLOCK_IOTUNE_WRITE_IOPS_SEC)) {
            info.write_iops_sec = param->value.ul;
        } else {
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("Unrecognized parameter %s"),
                            param->field);
            goto endjob;
        }
    }

    if ((info.total_bytes_sec && info.read_bytes_sec) ||
        (info.total_bytes_sec && info.write_bytes_sec)) {
        qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                        _("total and read/write of bytes_sec cannot be set at the same time"));
        goto endjob;
    }

    if ((info.total_iops_sec && info.read_iops_sec) ||
        (info.total_iops_sec && info.write_iops_sec)) {
        qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                        _("total and read/write of iops_sec cannot be set at the same time"));
        goto endjob;
    }

    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
        priv = vm->privateData;
        qemuDomainObjEnterMonitorWithDriver(driver, vm);
        ret = qemuMonitorSetBlockIoThrottle(priv->mon, device, &info);
        qemuDomainObjExitMonitorWithDriver(driver, vm);
L
Lei Li 已提交
11246 11247
        if (ret < 0)
            goto endjob;
11248 11249 11250 11251 11252 11253 11254 11255 11256 11257 11258 11259 11260 11261 11262 11263 11264 11265 11266 11267 11268 11269 11270 11271 11272 11273 11274 11275 11276 11277 11278 11279 11280 11281 11282 11283 11284 11285 11286 11287 11288 11289 11290 11291 11292 11293 11294 11295 11296 11297 11298 11299 11300 11301 11302 11303 11304 11305 11306 11307 11308 11309 11310 11311 11312 11313 11314 11315 11316 11317 11318 11319 11320 11321 11322 11323 11324 11325 11326 11327 11328 11329 11330 11331 11332 11333 11334 11335 11336 11337 11338 11339 11340 11341 11342 11343 11344 11345 11346 11347 11348 11349 11350 11351 11352 11353 11354 11355 11356 11357 11358 11359 11360 11361 11362 11363 11364 11365 11366 11367 11368 11369 11370 11371 11372 11373 11374 11375 11376 11377 11378 11379 11380 11381 11382 11383 11384 11385 11386 11387 11388 11389 11390 11391 11392 11393 11394 11395 11396 11397 11398 11399 11400 11401 11402 11403 11404 11405 11406 11407 11408 11409 11410 11411 11412 11413 11414 11415 11416 11417 11418 11419 11420 11421 11422 11423 11424 11425 11426 11427 11428 11429 11430 11431 11432 11433 11434 11435 11436 11437 11438 11439 11440 11441 11442 11443 11444 11445 11446 11447 11448 11449 11450 11451 11452
    }

    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
        sa_assert(persistentDef && idx >= 0);
        persistentDef->disks[idx]->blkdeviotune = info;
        ret = virDomainSaveConfig(driver->configDir, persistentDef);
        if (ret < 0) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                           _("Write to config file failed"));
            goto endjob;
        }
    }

endjob:
    if (qemuDomainObjEndJob(driver, vm) == 0)
        vm = NULL;

cleanup:
    VIR_FREE(device);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

static int
qemuDomainGetBlockIoTune(virDomainPtr dom,
                         const char *disk,
                         virTypedParameterPtr params,
                         int *nparams,
                         unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm = NULL;
    qemuDomainObjPrivatePtr priv;
    virDomainDefPtr persistentDef = NULL;
    virDomainBlockIoTuneInfo reply;
    char uuidstr[VIR_UUID_STRING_BUFLEN];
    const char *device = NULL;
    int ret = -1;
    int i;
    bool isActive;

    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG |
                  VIR_TYPED_PARAM_STRING_OKAY, -1);

    /* We don't return strings, and thus trivially support this flag.  */
    flags &= ~VIR_TYPED_PARAM_STRING_OKAY;

    qemuDriverLock(driver);
    virUUIDFormat(dom->uuid, uuidstr);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    if (!vm) {
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    if ((*nparams) == 0) {
        /* Current number of parameters supported by QEMU Block I/O Throttling */
        *nparams = QEMU_NB_BLOCK_IO_TUNE_PARAM;
        ret = 0;
        goto cleanup;
    }

    device = qemuDiskPathToAlias(vm, disk);

    if (!device) {
        goto cleanup;
    }

    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
        goto cleanup;

    isActive = virDomainObjIsActive(vm);

    if (flags  == VIR_DOMAIN_AFFECT_CURRENT) {
        if (isActive)
            flags = VIR_DOMAIN_AFFECT_LIVE;
        else
            flags = VIR_DOMAIN_AFFECT_CONFIG;
    }

    if (!isActive && (flags & VIR_DOMAIN_AFFECT_LIVE)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("domain is not running"));
        goto endjob;
    }

    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
        priv = vm->privateData;
        qemuDomainObjEnterMonitorWithDriver(driver, vm);
        ret = qemuMonitorGetBlockIoThrottle(priv->mon, device, &reply);
        qemuDomainObjExitMonitorWithDriver(driver, vm);
        if (ret < 0)
            goto endjob;
    }

    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
        if (!vm->persistent) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("domain is transient"));
            goto endjob;
        }
        if (!(persistentDef = virDomainObjGetPersistentDef(driver->caps, vm)))
            goto endjob;

        int idx = virDomainDiskIndexByName(vm->def, disk, true);
        if (idx < 0)
            goto endjob;
        reply = persistentDef->disks[idx]->blkdeviotune;
    }

    for (i = 0; i < QEMU_NB_BLOCK_IO_TUNE_PARAM && i < *nparams; i++) {
        virTypedParameterPtr param = &params[i];
        param->value.ul = 0;
        param->type = VIR_TYPED_PARAM_ULLONG;

        switch(i) {
        case 0:
            if (virStrcpyStatic(param->field,
                                VIR_DOMAIN_BLOCK_IOTUNE_TOTAL_BYTES_SEC) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("Field name '%s' too long"),
                                VIR_DOMAIN_BLOCK_IOTUNE_TOTAL_BYTES_SEC);
                goto endjob;
            }
            param->value.ul = reply.total_bytes_sec;
            break;

        case 1:
            if (virStrcpyStatic(param->field,
                                VIR_DOMAIN_BLOCK_IOTUNE_READ_BYTES_SEC) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("Field name '%s' too long"),
                                VIR_DOMAIN_BLOCK_IOTUNE_READ_BYTES_SEC);
                goto endjob;
            }
            param->value.ul = reply.read_bytes_sec;
            break;

        case 2:
            if (virStrcpyStatic(param->field,
                                VIR_DOMAIN_BLOCK_IOTUNE_WRITE_BYTES_SEC) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("Field name '%s' too long"),
                                VIR_DOMAIN_BLOCK_IOTUNE_WRITE_BYTES_SEC);
                goto endjob;
            }
            param->value.ul = reply.write_bytes_sec;
            break;

        case 3:
            if (virStrcpyStatic(param->field,
                                VIR_DOMAIN_BLOCK_IOTUNE_TOTAL_IOPS_SEC) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("Field name '%s' too long"),
                                VIR_DOMAIN_BLOCK_IOTUNE_TOTAL_IOPS_SEC);
                goto endjob;
            }
            param->value.ul = reply.total_iops_sec;
            break;

        case 4:
            if (virStrcpyStatic(param->field,
                                VIR_DOMAIN_BLOCK_IOTUNE_READ_IOPS_SEC) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("Field name '%s' too long"),
                                VIR_DOMAIN_BLOCK_IOTUNE_READ_IOPS_SEC);
                goto endjob;
            }
            param->value.ul = reply.read_iops_sec;
            break;

        case 5:
            if (virStrcpyStatic(param->field,
                                VIR_DOMAIN_BLOCK_IOTUNE_WRITE_IOPS_SEC) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("Field name '%s' too long"),
                                VIR_DOMAIN_BLOCK_IOTUNE_WRITE_IOPS_SEC);
                goto endjob;
            }
            param->value.ul = reply.write_iops_sec;
            break;
        default:
            break;
        }
    }

    if (*nparams > QEMU_NB_BLOCK_IO_TUNE_PARAM)
        *nparams = QEMU_NB_BLOCK_IO_TUNE_PARAM;
    ret = 0;

endjob:
    if (qemuDomainObjEndJob(driver, vm) == 0)
        vm = NULL;

cleanup:
    VIR_FREE(device);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}
11453

11454
static virDriver qemuDriver = {
11455 11456
    .no = VIR_DRV_QEMU,
    .name = "QEMU",
11457 11458 11459 11460 11461 11462 11463 11464 11465 11466 11467 11468 11469 11470 11471 11472 11473 11474
    .open = qemudOpen, /* 0.2.0 */
    .close = qemudClose, /* 0.2.0 */
    .supports_feature = qemudSupportsFeature, /* 0.5.0 */
    .type = qemudGetType, /* 0.2.0 */
    .version = qemudGetVersion, /* 0.2.0 */
    .getHostname = virGetHostname, /* 0.3.3 */
    .getSysinfo = qemuGetSysinfo, /* 0.8.8 */
    .getMaxVcpus = qemudGetMaxVCPUs, /* 0.2.1 */
    .nodeGetInfo = nodeGetInfo, /* 0.2.0 */
    .getCapabilities = qemudGetCapabilities, /* 0.2.1 */
    .listDomains = qemudListDomains, /* 0.2.0 */
    .numOfDomains = qemudNumDomains, /* 0.2.0 */
    .domainCreateXML = qemudDomainCreate, /* 0.2.0 */
    .domainLookupByID = qemudDomainLookupByID, /* 0.2.0 */
    .domainLookupByUUID = qemudDomainLookupByUUID, /* 0.2.0 */
    .domainLookupByName = qemudDomainLookupByName, /* 0.2.0 */
    .domainSuspend = qemudDomainSuspend, /* 0.2.0 */
    .domainResume = qemudDomainResume, /* 0.2.0 */
11475 11476
    .domainShutdown = qemuDomainShutdown, /* 0.2.0 */
    .domainReboot = qemuDomainReboot, /* 0.9.3 */
11477
    .domainReset = qemuDomainReset, /* 0.9.7 */
11478 11479
    .domainDestroy = qemuDomainDestroy, /* 0.2.0 */
    .domainDestroyFlags = qemuDomainDestroyFlags, /* 0.9.4 */
11480 11481 11482 11483 11484 11485 11486 11487 11488 11489 11490
    .domainGetOSType = qemudDomainGetOSType, /* 0.2.2 */
    .domainGetMaxMemory = qemudDomainGetMaxMemory, /* 0.4.2 */
    .domainSetMaxMemory = qemudDomainSetMaxMemory, /* 0.4.2 */
    .domainSetMemory = qemudDomainSetMemory, /* 0.4.2 */
    .domainSetMemoryFlags = qemudDomainSetMemoryFlags, /* 0.9.0 */
    .domainSetMemoryParameters = qemuDomainSetMemoryParameters, /* 0.8.5 */
    .domainGetMemoryParameters = qemuDomainGetMemoryParameters, /* 0.8.5 */
    .domainSetBlkioParameters = qemuDomainSetBlkioParameters, /* 0.9.0 */
    .domainGetBlkioParameters = qemuDomainGetBlkioParameters, /* 0.9.0 */
    .domainGetInfo = qemudDomainGetInfo, /* 0.2.0 */
    .domainGetState = qemuDomainGetState, /* 0.9.2 */
11491
    .domainGetControlInfo = qemuDomainGetControlInfo, /* 0.9.3 */
11492 11493
    .domainSave = qemuDomainSave, /* 0.2.0 */
    .domainSaveFlags = qemuDomainSaveFlags, /* 0.9.4 */
11494
    .domainRestore = qemuDomainRestore, /* 0.2.0 */
11495
    .domainRestoreFlags = qemuDomainRestoreFlags, /* 0.9.4 */
11496 11497
    .domainSaveImageGetXMLDesc = qemuDomainSaveImageGetXMLDesc, /* 0.9.4 */
    .domainSaveImageDefineXML = qemuDomainSaveImageDefineXML, /* 0.9.4 */
11498 11499
    .domainCoreDump = qemudDomainCoreDump, /* 0.7.0 */
    .domainScreenshot = qemuDomainScreenshot, /* 0.9.2 */
11500 11501
    .domainSetVcpus = qemuDomainSetVcpus, /* 0.4.4 */
    .domainSetVcpusFlags = qemuDomainSetVcpusFlags, /* 0.8.5 */
11502 11503
    .domainGetVcpusFlags = qemudDomainGetVcpusFlags, /* 0.8.5 */
    .domainPinVcpu = qemudDomainPinVcpu, /* 0.4.4 */
11504
    .domainPinVcpuFlags = qemudDomainPinVcpuFlags, /* 0.9.3 */
E
Eric Blake 已提交
11505
    .domainGetVcpuPinInfo = qemudDomainGetVcpuPinInfo, /* 0.9.3 */
11506 11507 11508 11509 11510 11511 11512 11513 11514
    .domainGetVcpus = qemudDomainGetVcpus, /* 0.4.4 */
    .domainGetMaxVcpus = qemudDomainGetMaxVcpus, /* 0.4.4 */
    .domainGetSecurityLabel = qemudDomainGetSecurityLabel, /* 0.6.1 */
    .nodeGetSecurityModel = qemudNodeGetSecurityModel, /* 0.6.1 */
    .domainGetXMLDesc = qemuDomainGetXMLDesc, /* 0.2.0 */
    .domainXMLFromNative = qemuDomainXMLFromNative, /* 0.6.4 */
    .domainXMLToNative = qemuDomainXMLToNative, /* 0.6.4 */
    .listDefinedDomains = qemudListDefinedDomains, /* 0.2.0 */
    .numOfDefinedDomains = qemudNumDefinedDomains, /* 0.2.0 */
11515 11516
    .domainCreate = qemuDomainStart, /* 0.2.0 */
    .domainCreateWithFlags = qemuDomainStartWithFlags, /* 0.8.2 */
11517 11518
    .domainDefineXML = qemudDomainDefine, /* 0.2.0 */
    .domainUndefine = qemudDomainUndefine, /* 0.2.0 */
11519
    .domainUndefineFlags = qemuDomainUndefineFlags, /* 0.9.4 */
11520 11521 11522 11523 11524 11525 11526 11527 11528
    .domainAttachDevice = qemuDomainAttachDevice, /* 0.4.1 */
    .domainAttachDeviceFlags = qemuDomainAttachDeviceFlags, /* 0.7.7 */
    .domainDetachDevice = qemuDomainDetachDevice, /* 0.5.0 */
    .domainDetachDeviceFlags = qemuDomainDetachDeviceFlags, /* 0.7.7 */
    .domainUpdateDeviceFlags = qemuDomainUpdateDeviceFlags, /* 0.8.0 */
    .domainGetAutostart = qemudDomainGetAutostart, /* 0.2.1 */
    .domainSetAutostart = qemudDomainSetAutostart, /* 0.2.1 */
    .domainGetSchedulerType = qemuGetSchedulerType, /* 0.7.0 */
    .domainGetSchedulerParameters = qemuGetSchedulerParameters, /* 0.7.0 */
11529
    .domainGetSchedulerParametersFlags = qemuGetSchedulerParametersFlags, /* 0.9.2 */
11530
    .domainSetSchedulerParameters = qemuSetSchedulerParameters, /* 0.7.0 */
11531
    .domainSetSchedulerParametersFlags = qemuSetSchedulerParametersFlags, /* 0.9.2 */
11532
    .domainMigratePerform = qemudDomainMigratePerform, /* 0.5.0 */
11533
    .domainBlockResize = qemuDomainBlockResize, /* 0.9.8 */
11534 11535
    .domainBlockStats = qemuDomainBlockStats, /* 0.4.1 */
    .domainBlockStatsFlags = qemuDomainBlockStatsFlags, /* 0.9.5 */
11536 11537 11538 11539 11540
    .domainInterfaceStats = qemudDomainInterfaceStats, /* 0.4.1 */
    .domainMemoryStats = qemudDomainMemoryStats, /* 0.7.5 */
    .domainBlockPeek = qemudDomainBlockPeek, /* 0.4.4 */
    .domainMemoryPeek = qemudDomainMemoryPeek, /* 0.4.4 */
    .domainGetBlockInfo = qemuDomainGetBlockInfo, /* 0.8.1 */
11541
    .nodeGetCPUStats = nodeGetCPUStats, /* 0.9.3 */
11542
    .nodeGetMemoryStats = nodeGetMemoryStats, /* 0.9.3 */
11543 11544 11545 11546 11547 11548 11549 11550 11551 11552 11553 11554 11555 11556 11557 11558 11559 11560 11561 11562 11563
    .nodeGetCellsFreeMemory = nodeGetCellsFreeMemory, /* 0.4.4 */
    .nodeGetFreeMemory = nodeGetFreeMemory, /* 0.4.4 */
    .domainEventRegister = qemuDomainEventRegister, /* 0.5.0 */
    .domainEventDeregister = qemuDomainEventDeregister, /* 0.5.0 */
    .domainMigratePrepare2 = qemudDomainMigratePrepare2, /* 0.5.0 */
    .domainMigrateFinish2 = qemudDomainMigrateFinish2, /* 0.5.0 */
    .nodeDeviceDettach = qemudNodeDeviceDettach, /* 0.6.1 */
    .nodeDeviceReAttach = qemudNodeDeviceReAttach, /* 0.6.1 */
    .nodeDeviceReset = qemudNodeDeviceReset, /* 0.6.1 */
    .domainMigratePrepareTunnel = qemudDomainMigratePrepareTunnel, /* 0.7.2 */
    .isEncrypted = qemuIsEncrypted, /* 0.7.3 */
    .isSecure = qemuIsSecure, /* 0.7.3 */
    .domainIsActive = qemuDomainIsActive, /* 0.7.3 */
    .domainIsPersistent = qemuDomainIsPersistent, /* 0.7.3 */
    .domainIsUpdated = qemuDomainIsUpdated, /* 0.8.6 */
    .cpuCompare = qemuCPUCompare, /* 0.7.5 */
    .cpuBaseline = qemuCPUBaseline, /* 0.7.7 */
    .domainGetJobInfo = qemuDomainGetJobInfo, /* 0.7.7 */
    .domainAbortJob = qemuDomainAbortJob, /* 0.7.7 */
    .domainMigrateSetMaxDowntime = qemuDomainMigrateSetMaxDowntime, /* 0.8.0 */
    .domainMigrateSetMaxSpeed = qemuDomainMigrateSetMaxSpeed, /* 0.9.0 */
11564
    .domainMigrateGetMaxSpeed = qemuDomainMigrateGetMaxSpeed, /* 0.9.5 */
11565 11566 11567 11568 11569 11570 11571 11572 11573
    .domainEventRegisterAny = qemuDomainEventRegisterAny, /* 0.8.0 */
    .domainEventDeregisterAny = qemuDomainEventDeregisterAny, /* 0.8.0 */
    .domainManagedSave = qemuDomainManagedSave, /* 0.8.0 */
    .domainHasManagedSaveImage = qemuDomainHasManagedSaveImage, /* 0.8.0 */
    .domainManagedSaveRemove = qemuDomainManagedSaveRemove, /* 0.8.0 */
    .domainSnapshotCreateXML = qemuDomainSnapshotCreateXML, /* 0.8.0 */
    .domainSnapshotGetXMLDesc = qemuDomainSnapshotGetXMLDesc, /* 0.8.0 */
    .domainSnapshotNum = qemuDomainSnapshotNum, /* 0.8.0 */
    .domainSnapshotListNames = qemuDomainSnapshotListNames, /* 0.8.0 */
11574 11575
    .domainSnapshotNumChildren = qemuDomainSnapshotNumChildren, /* 0.9.7 */
    .domainSnapshotListChildrenNames = qemuDomainSnapshotListChildrenNames, /* 0.9.7 */
11576 11577
    .domainSnapshotLookupByName = qemuDomainSnapshotLookupByName, /* 0.8.0 */
    .domainHasCurrentSnapshot = qemuDomainHasCurrentSnapshot, /* 0.8.0 */
11578
    .domainSnapshotGetParent = qemuDomainSnapshotGetParent, /* 0.9.7 */
11579 11580 11581 11582
    .domainSnapshotCurrent = qemuDomainSnapshotCurrent, /* 0.8.0 */
    .domainRevertToSnapshot = qemuDomainRevertToSnapshot, /* 0.8.0 */
    .domainSnapshotDelete = qemuDomainSnapshotDelete, /* 0.8.0 */
    .qemuDomainMonitorCommand = qemuDomainMonitorCommand, /* 0.8.3 */
11583
    .qemuDomainAttach = qemuDomainAttach, /* 0.9.4 */
11584
    .domainOpenConsole = qemuDomainOpenConsole, /* 0.8.6 */
11585
    .domainOpenGraphics = qemuDomainOpenGraphics, /* 0.9.7 */
11586
    .domainInjectNMI = qemuDomainInjectNMI, /* 0.9.2 */
11587 11588 11589 11590 11591 11592
    .domainMigrateBegin3 = qemuDomainMigrateBegin3, /* 0.9.2 */
    .domainMigratePrepare3 = qemuDomainMigratePrepare3, /* 0.9.2 */
    .domainMigratePrepareTunnel3 = qemuDomainMigratePrepareTunnel3, /* 0.9.2 */
    .domainMigratePerform3 = qemuDomainMigratePerform3, /* 0.9.2 */
    .domainMigrateFinish3 = qemuDomainMigrateFinish3, /* 0.9.2 */
    .domainMigrateConfirm3 = qemuDomainMigrateConfirm3, /* 0.9.2 */
11593
    .domainSendKey = qemuDomainSendKey, /* 0.9.4 */
11594 11595 11596 11597
    .domainBlockJobAbort = qemuDomainBlockJobAbort, /* 0.9.4 */
    .domainGetBlockJobInfo = qemuDomainGetBlockJobInfo, /* 0.9.4 */
    .domainBlockJobSetSpeed = qemuDomainBlockJobSetSpeed, /* 0.9.4 */
    .domainBlockPull = qemuDomainBlockPull, /* 0.9.4 */
11598
    .isAlive = qemuIsAlive, /* 0.9.8 */
11599
    .nodeSuspendForDuration = nodeSuspendForDuration, /* 0.9.8 */
11600 11601
    .domainSetBlockIoTune = qemuDomainSetBlockIoTune, /* 0.9.8 */
    .domainGetBlockIoTune = qemuDomainGetBlockIoTune, /* 0.9.8 */
11602 11603 11604
};


11605
static virStateDriver qemuStateDriver = {
11606
    .name = "QEMU",
11607 11608 11609 11610
    .initialize = qemudStartup,
    .cleanup = qemudShutdown,
    .reload = qemudReload,
    .active = qemudActive,
11611
};
11612

11613
static void
11614
qemuVMDriverLock(void) {
11615 11616 11617 11618 11619
    qemuDriverLock(qemu_driver);
};


static void
11620
qemuVMDriverUnlock(void) {
11621 11622 11623 11624
    qemuDriverUnlock(qemu_driver);
};


11625 11626 11627 11628 11629 11630 11631 11632 11633
static int
qemuVMFilterRebuild(virConnectPtr conn ATTRIBUTE_UNUSED,
                    virHashIterator iter, void *data)
{
    virHashForEach(qemu_driver->domains.objs, iter, data);

    return 0;
}

S
Stefan Berger 已提交
11634 11635
static virNWFilterCallbackDriver qemuCallbackDriver = {
    .name = "QEMU",
11636 11637 11638
    .vmFilterRebuild = qemuVMFilterRebuild,
    .vmDriverLock = qemuVMDriverLock,
    .vmDriverUnlock = qemuVMDriverUnlock,
S
Stefan Berger 已提交
11639 11640
};

11641
int qemuRegister(void) {
11642 11643
    virRegisterDriver(&qemuDriver);
    virRegisterStateDriver(&qemuStateDriver);
S
Stefan Berger 已提交
11644
    virNWFilterRegisterCallbackDriver(&qemuCallbackDriver);
11645 11646
    return 0;
}