qemu_driver.c 248.7 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_audit.h"
59
#include "qemu_process.h"
60
#include "qemu_migration.h"
61 62 63 64

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

92 93
#define VIR_FROM_THIS VIR_FROM_QEMU

94 95
#define QEMU_NB_MEM_PARAM  3

96 97 98
#if HAVE_LINUX_KVM_H
# include <linux/kvm.h>
#endif
99

100 101
/* device for kvm ioctls */
#define KVM_DEVICE "/dev/kvm"
102

103 104 105 106 107 108 109 110 111 112 113
/* 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

114
#define QEMU_NB_BLKIO_PARAM  1
115

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

118 119
static int qemudShutdown(void);

J
Jiri Denemark 已提交
120 121
static int qemudDomainObjStart(virConnectPtr conn,
                               struct qemud_driver *driver,
122 123
                               virDomainObjPtr vm,
                               bool start_paused);
J
Jiri Denemark 已提交
124

125
static int qemudDomainGetMaxVcpus(virDomainPtr dom);
126

127
struct qemud_driver *qemu_driver = NULL;
128 129


130 131 132 133
struct qemuAutostartData {
    struct qemud_driver *driver;
    virConnectPtr conn;
};
134

135
static void
136
qemuAutostartDomain(void *payload, const void *name ATTRIBUTE_UNUSED, void *opaque)
137 138 139
{
    virDomainObjPtr vm = payload;
    struct qemuAutostartData *data = opaque;
140
    virErrorPtr err;
141 142

    virDomainObjLock(vm);
143 144 145 146 147 148 149 150 151
    virResetLastError();
    if (qemuDomainObjBeginJobWithDriver(data->driver, vm) < 0) {
        err = virGetLastError();
        VIR_ERROR(_("Failed to start job on VM '%s': %s"),
                  vm->def->name,
                  err ? err->message : _("unknown error"));
    } else {
        if (vm->autostart &&
            !virDomainObjIsActive(vm) &&
152
            qemudDomainObjStart(data->conn, data->driver, vm, false) < 0) {
153
            err = virGetLastError();
154
            VIR_ERROR(_("Failed to autostart VM '%s': %s"),
155
                      vm->def->name,
156
                      err ? err->message : _("unknown error"));
157
        }
158 159 160

        if (qemuDomainObjEndJob(vm) == 0)
            vm = NULL;
161
    }
162 163 164

    if (vm)
        virDomainObjUnlock(vm);
165 166
}

167

168
static void
169 170
qemuAutostartDomains(struct qemud_driver *driver)
{
171 172 173 174 175
    /* 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
     */
176 177 178
    virConnectPtr conn = virConnectOpen(driver->privileged ?
                                        "qemu:///system" :
                                        "qemu:///session");
179
    /* Ignoring NULL conn which is mostly harmless here */
180
    struct qemuAutostartData data = { driver, conn };
181

182
    qemuDriverLock(driver);
183
    virHashForEach(driver->domains.objs, qemuAutostartDomain, &data);
184
    qemuDriverUnlock(driver);
185

186 187
    if (conn)
        virConnectClose(conn);
188 189
}

190
static int
191
qemuSecurityInit(struct qemud_driver *driver)
192
{
193 194 195 196
    virSecurityManagerPtr mgr = virSecurityManagerNew(driver->securityDriverName,
                                                      driver->allowDiskFormatProbing);
    if (!mgr)
        goto error;
D
Daniel Veillard 已提交
197

198 199 200 201 202 203 204
    if (driver->privileged) {
        virSecurityManagerPtr dac = virSecurityManagerNewDAC(driver->user,
                                                             driver->group,
                                                             driver->allowDiskFormatProbing,
                                                             driver->dynamicOwnership);
        if (!dac)
            goto error;
205

206
        if (!(driver->securityManager = virSecurityManagerNewStack(mgr,
E
Eric Blake 已提交
207 208 209
                                                                   dac))) {

            virSecurityManagerFree(dac);
210
            goto error;
E
Eric Blake 已提交
211
        }
212 213 214
    } else {
        driver->securityManager = mgr;
    }
D
Daniel Veillard 已提交
215

216
    return 0;
217

218
error:
219
    VIR_ERROR(_("Failed to initialize security drivers"));
220 221 222
    virSecurityManagerFree(mgr);
    return -1;
}
223

224

225 226 227 228 229
static virCapsPtr
qemuCreateCapabilities(virCapsPtr oldcaps,
                       struct qemud_driver *driver)
{
    virCapsPtr caps;
230

231 232 233 234
    /* Basic host arch / guest machine capabilities */
    if (!(caps = qemuCapsInit(oldcaps))) {
        virReportOOMError();
        return NULL;
235 236
    }

237 238 239 240 241 242
    if (driver->allowDiskFormatProbing) {
        caps->defaultDiskDriverName = NULL;
        caps->defaultDiskDriverType = NULL;
    } else {
        caps->defaultDiskDriverName = "qemu";
        caps->defaultDiskDriverType = "raw";
243 244
    }

245 246
    qemuDomainSetPrivateDataHooks(caps);
    qemuDomainSetNamespaceHooks(caps);
247

248 249 250 251
    if (virGetHostUUID(caps->host.host_uuid)) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                         "%s", _("cannot get the host uuid"));
        goto err_exit;
252
    }
253

254 255
    /* Security driver data */
    const char *doi, *model;
256

257 258 259 260 261 262 263
    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;
264
    }
265

266 267
    VIR_DEBUG("Initialized caps for security driver \"%s\" with "
              "DOI \"%s\"", model, doi);
268

269
    return caps;
270

271 272 273 274
no_memory:
    virReportOOMError();
err_exit:
    virCapabilitiesFree(caps);
275 276 277
    return NULL;
}

278
static void qemuDomainSnapshotLoad(void *payload,
279
                                   const void *name ATTRIBUTE_UNUSED,
280
                                   void *data)
281
{
282 283 284 285 286 287 288 289 290 291
    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;
    char ebuf[1024];
292

293 294 295 296
    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);
297
        goto cleanup;
298 299
    }

300 301
    VIR_INFO("Scanning for snapshots for domain %s in %s", vm->def->name,
             snapDir);
302

303 304 305 306 307
    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)));
308
        goto cleanup;
309 310
    }

311 312 313
    while ((entry = readdir(dir))) {
        if (entry->d_name[0] == '.')
            continue;
314

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

319
        if (virAsprintf(&fullpath, "%s/%s", snapDir, entry->d_name) < 0) {
320
            VIR_ERROR(_("Failed to allocate memory for path"));
321 322
            continue;
        }
323

324 325 326 327 328 329 330 331
        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;
        }
332

333 334 335 336 337 338 339 340
        def = virDomainSnapshotDefParseString(xmlStr, 0);
        if (def == NULL) {
            /* Nothing we can do here, skip this one */
            VIR_ERROR(_("Failed to parse snapshot XML from file '%s'"), fullpath);
            VIR_FREE(fullpath);
            VIR_FREE(xmlStr);
            continue;
        }
341

342
        virDomainSnapshotAssignDef(&vm->snapshots, def);
343

344 345
        VIR_FREE(fullpath);
        VIR_FREE(xmlStr);
346 347
    }

348 349 350 351 352 353 354 355
    /* 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.
     */
356

357
    virResetLastError();
358

359 360 361 362
cleanup:
    if (dir)
        closedir(dir);
    VIR_FREE(snapDir);
363 364 365
    virDomainObjUnlock(vm);
}

366 367 368 369 370
/**
 * qemudStartup:
 *
 * Initialization function for the QEmu daemon
 */
371
static int
372 373 374 375 376
qemudStartup(int privileged) {
    char *base = NULL;
    char *driverConf = NULL;
    int rc;
    virConnectPtr conn = NULL;
377

378 379
    if (VIR_ALLOC(qemu_driver) < 0)
        return -1;
380

381
    if (virMutexInit(&qemu_driver->lock) < 0) {
382
        VIR_ERROR(_("cannot initialize mutex"));
383 384
        VIR_FREE(qemu_driver);
        return -1;
385
    }
386 387
    qemuDriverLock(qemu_driver);
    qemu_driver->privileged = privileged;
388

389 390
    /* Don't have a dom0 so start from 1 */
    qemu_driver->nextvmid = 1;
391

392 393
    if (virDomainObjListInit(&qemu_driver->domains) < 0)
        goto out_of_memory;
394

395 396 397 398 399 400
    /* Init domain events */
    qemu_driver->domainEventState = virDomainEventStateNew(qemuDomainEventFlush,
                                                           qemu_driver,
                                                           NULL,
                                                           true);
    if (!qemu_driver->domainEventState)
401
        goto error;
402

403 404 405 406
    /* Allocate bitmap for vnc port reservation */
    if ((qemu_driver->reservedVNCPorts =
         virBitmapAlloc(QEMU_VNC_PORT_MAX - QEMU_VNC_PORT_MIN)) == NULL)
        goto out_of_memory;
407

408 409 410
    /* read the host sysinfo */
    if (privileged)
        qemu_driver->hostsysinfo = virSysinfoRead();
411

412 413 414 415
    if (privileged) {
        if (virAsprintf(&qemu_driver->logDir,
                        "%s/log/libvirt/qemu", LOCALSTATEDIR) == -1)
            goto out_of_memory;
416

417 418
        if ((base = strdup (SYSCONFDIR "/libvirt")) == NULL)
            goto out_of_memory;
419

420 421 422
        if (virAsprintf(&qemu_driver->stateDir,
                      "%s/run/libvirt/qemu", LOCALSTATEDIR) == -1)
            goto out_of_memory;
423

424 425 426
        if (virAsprintf(&qemu_driver->libDir,
                      "%s/lib/libvirt/qemu", LOCALSTATEDIR) == -1)
            goto out_of_memory;
427

428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444
        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;
445

446 447 448 449 450
        if (virAsprintf(&qemu_driver->logDir,
                        "%s/.libvirt/qemu/log", userdir) == -1) {
            VIR_FREE(userdir);
            goto out_of_memory;
        }
451

452 453 454 455 456
        if (virAsprintf(&base, "%s/.libvirt", userdir) == -1) {
            VIR_FREE(userdir);
            goto out_of_memory;
        }
        VIR_FREE(userdir);
457

458 459 460 461 462 463 464 465 466 467 468 469
        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;
470
    }
H
Hu Tao 已提交
471

472 473 474 475 476
    if (virFileMakePath(qemu_driver->stateDir) != 0) {
        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 已提交
477
    }
478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506
    if (virFileMakePath(qemu_driver->libDir) != 0) {
        char ebuf[1024];
        VIR_ERROR(_("Failed to create lib dir '%s': %s"),
                  qemu_driver->libDir, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
    }
    if (virFileMakePath(qemu_driver->cacheDir) != 0) {
        char ebuf[1024];
        VIR_ERROR(_("Failed to create cache dir '%s': %s"),
                  qemu_driver->cacheDir, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
    }
    if (virFileMakePath(qemu_driver->saveDir) != 0) {
        char ebuf[1024];
        VIR_ERROR(_("Failed to create save dir '%s': %s"),
                  qemu_driver->saveDir, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
    }
    if (virFileMakePath(qemu_driver->snapshotDir) != 0) {
        char ebuf[1024];
        VIR_ERROR(_("Failed to create save dir '%s': %s"),
                  qemu_driver->snapshotDir, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
    }
    if (virFileMakePath(qemu_driver->autoDumpPath) != 0) {
        char ebuf[1024];
        VIR_ERROR(_("Failed to create dump dir '%s': %s"),
                  qemu_driver->autoDumpPath, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
507 508
    }

509 510 511 512 513 514 515
    /* 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;
516

517
    VIR_FREE(base);
518

519 520 521 522 523
    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)));
524 525
    }

526 527 528 529
    if (qemudLoadDriverConfig(qemu_driver, driverConf) < 0) {
        goto error;
    }
    VIR_FREE(driverConf);
530

531 532 533 534 535 536 537 538
    /* 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;
    }

539 540
    if (qemuSecurityInit(qemu_driver) < 0)
        goto error;
541

542 543 544
    if ((qemu_driver->caps = qemuCreateCapabilities(NULL,
                                                    qemu_driver)) == NULL)
        goto error;
545

546
    if ((qemu_driver->activePciHostdevs = pciDeviceListNew()) == NULL)
547
        goto error;
548

549 550 551 552 553 554
    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;
555
        }
556
        if (chown(qemu_driver->cacheDir, qemu_driver->user, qemu_driver->group) < 0) {
557
            virReportSystemError(errno,
558 559 560
                                 _("unable to set ownership of '%s' to %d:%d"),
                                 qemu_driver->cacheDir, qemu_driver->user, qemu_driver->group);
            goto error;
561
        }
562 563 564 565 566 567 568 569 570 571 572
        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;
573
        }
574
    }
575

576 577 578 579 580 581
    /* 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
582
     */
583 584 585 586 587
    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;
588

589 590 591 592 593
        if ((rc = virFileMakePath(mempath)) != 0) {
            virReportSystemError(rc,
                                 _("unable to create hugepage path %s"), mempath);
            VIR_FREE(mempath);
            goto error;
594
        }
595 596 597 598 599 600 601
        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 已提交
602
        }
E
Eric Blake 已提交
603

604
        qemu_driver->hugepage_path = mempath;
605
    }
606

607 608 609 610 611 612 613
    /* Get all the running persistent or transient configs first */
    if (virDomainLoadAllConfigs(qemu_driver->caps,
                                &qemu_driver->domains,
                                qemu_driver->stateDir,
                                NULL,
                                1, NULL, NULL) < 0)
        goto error;
614

615 616 617
    conn = virConnectOpen(qemu_driver->privileged ?
                          "qemu:///system" :
                          "qemu:///session");
618

619
    qemuProcessReconnectAll(conn, qemu_driver);
620

621 622 623 624 625 626 627
    /* Then inactive persistent configs */
    if (virDomainLoadAllConfigs(qemu_driver->caps,
                                &qemu_driver->domains,
                                qemu_driver->configDir,
                                qemu_driver->autostartDir,
                                0, NULL, NULL) < 0)
        goto error;
628

629

630 631
    virHashForEach(qemu_driver->domains.objs, qemuDomainSnapshotLoad,
                   qemu_driver->snapshotDir);
632

633 634 635
    qemu_driver->workerPool = virThreadPoolNew(0, 1, processWatchdogEvent, qemu_driver);
    if (!qemu_driver->workerPool)
        goto error;
636

637 638 639 640
    qemuDriverUnlock(qemu_driver);

    qemuAutostartDomains(qemu_driver);

641 642
    if (conn)
        virConnectClose(conn);
643

644
    return 0;
645

646 647 648 649 650 651 652 653 654 655
out_of_memory:
    virReportOOMError();
error:
    if (qemu_driver)
        qemuDriverUnlock(qemu_driver);
    if (conn)
        virConnectClose(conn);
    VIR_FREE(base);
    VIR_FREE(driverConf);
    qemudShutdown();
656
    return -1;
657 658
}

659 660 661
static void qemudNotifyLoadDomain(virDomainObjPtr vm, int newVM, void *opaque)
{
    struct qemud_driver *driver = opaque;
662

663 664 665 666 667 668 669
    if (newVM) {
        virDomainEventPtr event =
            virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_DEFINED,
                                     VIR_DOMAIN_EVENT_DEFINED_ADDED);
        if (event)
            qemuDomainEventQueue(driver, event);
E
Eric Blake 已提交
670
    }
671
}
E
Eric Blake 已提交
672

673 674 675 676 677 678 679 680 681 682
/**
 * 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;
683

684 685 686 687 688 689 690
    qemuDriverLock(qemu_driver);
    virDomainLoadAllConfigs(qemu_driver->caps,
                            &qemu_driver->domains,
                            qemu_driver->configDir,
                            qemu_driver->autostartDir,
                            0, qemudNotifyLoadDomain, qemu_driver);
    qemuDriverUnlock(qemu_driver);
691

692
    qemuAutostartDomains(qemu_driver);
693

694 695
    return 0;
}
S
Stefan Berger 已提交
696

697 698 699 700 701 702 703 704 705 706 707
/**
 * 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;
708

709 710
    if (!qemu_driver)
        return 0;
711

712 713 714 715 716 717
    /* 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;
}
718

719 720 721 722 723 724 725 726
/**
 * qemudShutdown:
 *
 * Shutdown the QEmu daemon, it will stop all active domains and networks
 */
static int
qemudShutdown(void) {
    int i;
727

728 729
    if (!qemu_driver)
        return -1;
730

731 732 733
    qemuDriverLock(qemu_driver);
    pciDeviceListFree(qemu_driver->activePciHostdevs);
    virCapabilitiesFree(qemu_driver->caps);
734

735 736
    virDomainObjListDeinit(&qemu_driver->domains);
    virBitmapFree(qemu_driver->reservedVNCPorts);
737

738
    virSysinfoDefFree(qemu_driver->hostsysinfo);
739

740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758 759
    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);
    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);
760

761
    virSecurityManagerFree(qemu_driver->securityManager);
762

763
    ebtablesContextFree(qemu_driver->ebtables);
764

765 766 767 768
    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 已提交
769 770
    }

771
    /* Free domain callback list */
772
    virDomainEventStateFree(qemu_driver->domainEventState);
D
Daniel P. Berrange 已提交
773

774 775
    if (qemu_driver->brctl)
        brShutdown(qemu_driver->brctl);
776

777
    virCgroupFree(&qemu_driver->cgroup);
778

779 780
    virLockManagerPluginUnref(qemu_driver->lockManager);

781 782 783 784
    qemuDriverUnlock(qemu_driver);
    virMutexDestroy(&qemu_driver->lock);
    virThreadPoolFree(qemu_driver->workerPool);
    VIR_FREE(qemu_driver);
785

786
    return 0;
787 788
}

789 790 791 792 793 794 795

static int qemuDomainSnapshotSetCurrentActive(virDomainObjPtr vm,
                                              char *snapshotDir);
static int qemuDomainSnapshotSetCurrentInactive(virDomainObjPtr vm,
                                                char *snapshotDir);


796
static virDrvOpenStatus qemudOpen(virConnectPtr conn,
797
                                  virConnectAuthPtr auth ATTRIBUTE_UNUSED,
798
                                  int flags ATTRIBUTE_UNUSED) {
799
    if (conn->uri == NULL) {
800 801 802
        if (qemu_driver == NULL)
            return VIR_DRV_OPEN_DECLINED;

803
        conn->uri = xmlParseURI(qemu_driver->privileged ?
804 805
                                "qemu:///system" :
                                "qemu:///session");
806
        if (!conn->uri) {
807
            virReportOOMError();
808 809
            return VIR_DRV_OPEN_ERROR;
        }
810 811 812 813 814 815 816 817 818 819
    } 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;

820
        if (qemu_driver == NULL) {
821 822
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("qemu state driver is not active"));
823 824 825
            return VIR_DRV_OPEN_ERROR;
        }

826
        if (conn->uri->path == NULL) {
827 828 829 830 831
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("no QEMU URI path given, try %s"),
                            qemu_driver->privileged
                            ? "qemu:///system"
                            : "qemu:///session");
832 833 834
                return VIR_DRV_OPEN_ERROR;
        }

835
        if (qemu_driver->privileged) {
836 837
            if (STRNEQ (conn->uri->path, "/system") &&
                STRNEQ (conn->uri->path, "/session")) {
838 839 840
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("unexpected QEMU URI path '%s', try qemu:///system"),
                                conn->uri->path);
841 842 843 844
                return VIR_DRV_OPEN_ERROR;
            }
        } else {
            if (STRNEQ (conn->uri->path, "/session")) {
845 846 847
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("unexpected QEMU URI path '%s', try qemu:///session"),
                                conn->uri->path);
848 849 850
                return VIR_DRV_OPEN_ERROR;
            }
        }
851 852 853 854 855 856 857
    }
    conn->privateData = qemu_driver;

    return VIR_DRV_OPEN_SUCCESS;
}

static int qemudClose(virConnectPtr conn) {
858
    struct qemud_driver *driver = conn->privateData;
859 860

    /* Get rid of callbacks registered for this conn */
861
    qemuDriverLock(driver);
862 863
    virDomainEventCallbackListRemoveConn(conn,
                                         driver->domainEventState->callbacks);
864
    qemuDriverUnlock(driver);
865 866 867 868 869 870

    conn->privateData = NULL;

    return 0;
}

D
Daniel Veillard 已提交
871 872 873 874 875
/* Which features are supported by this driver? */
static int
qemudSupportsFeature (virConnectPtr conn ATTRIBUTE_UNUSED, int feature)
{
    switch (feature) {
876
    case VIR_DRV_FEATURE_MIGRATION_V2:
877
    case VIR_DRV_FEATURE_MIGRATION_V3:
878 879 880 881
    case VIR_DRV_FEATURE_MIGRATION_P2P:
        return 1;
    default:
        return 0;
D
Daniel Veillard 已提交
882 883 884
    }
}

885
static const char *qemudGetType(virConnectPtr conn ATTRIBUTE_UNUSED) {
886
    return "QEMU";
887 888
}

889

890 891 892 893 894 895 896 897 898 899 900 901 902
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;
}


903 904 905 906
static int kvmGetMaxVCPUs(void) {
    int maxvcpus = 1;

    int r, fd;
907

908 909
    fd = open(KVM_DEVICE, O_RDONLY);
    if (fd < 0) {
910
        virReportSystemError(errno, _("Unable to open %s"), KVM_DEVICE);
911
        return -1;
912 913 914 915 916 917
    }

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

918
    VIR_FORCE_CLOSE(fd);
919 920 921 922
    return maxvcpus;
}


E
Eric Blake 已提交
923 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938
static char *
qemuGetSysinfo(virConnectPtr conn, unsigned int flags)
{
    struct qemud_driver *driver = conn->privateData;

    virCheckFlags(0, NULL);

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

    return virSysinfoFormat(driver->hostsysinfo, "");
}

939
static int qemudGetMaxVCPUs(virConnectPtr conn ATTRIBUTE_UNUSED, const char *type) {
940 941 942
    if (!type)
        return 16;

943
    if (STRCASEEQ(type, "qemu"))
944 945
        return 16;

946
    if (STRCASEEQ(type, "kvm"))
947
        return kvmGetMaxVCPUs();
948

949
    if (STRCASEEQ(type, "kqemu"))
950
        return 1;
951

952 953
    qemuReportError(VIR_ERR_INVALID_ARG,
                    _("unknown type '%s'"), type);
954 955 956
    return -1;
}

957

958
static char *qemudGetCapabilities(virConnectPtr conn) {
959
    struct qemud_driver *driver = conn->privateData;
960
    virCapsPtr caps = NULL;
961
    char *xml = NULL;
962

963
    qemuDriverLock(driver);
964

965
    if ((caps = qemuCreateCapabilities(qemu_driver->caps,
966
                                       qemu_driver)) == NULL) {
967 968 969
        virCapabilitiesFree(caps);
        goto cleanup;
    }
970

971
    virCapabilitiesFree(qemu_driver->caps);
972 973 974
    qemu_driver->caps = caps;

    if ((xml = virCapabilitiesFormatXML(driver->caps)) == NULL)
975
        virReportOOMError();
976 977

cleanup:
978
    qemuDriverUnlock(driver);
979

980
    return xml;
981 982 983
}


984 985 986 987 988
static int
qemudGetProcessInfo(unsigned long long *cpuTime, int *lastCpu, int pid,
                    int tid)
{
    char *proc;
D
Daniel P. Berrange 已提交
989
    FILE *pidinfo;
990
    unsigned long long usertime, systime;
991 992
    int cpu;
    int ret;
D
Daniel P. Berrange 已提交
993

994
    if (tid)
995
        ret = virAsprintf(&proc, "/proc/%d/task/%d/stat", pid, tid);
996
    else
997 998
        ret = virAsprintf(&proc, "/proc/%d/stat", pid);
    if (ret < 0)
D
Daniel P. Berrange 已提交
999 1000 1001 1002
        return -1;

    if (!(pidinfo = fopen(proc, "r"))) {
        /* VM probably shut down, so fake 0 */
1003 1004 1005 1006
        if (cpuTime)
            *cpuTime = 0;
        if (lastCpu)
            *lastCpu = 0;
1007
        VIR_FREE(proc);
D
Daniel P. Berrange 已提交
1008 1009
        return 0;
    }
1010
    VIR_FREE(proc);
D
Daniel P. Berrange 已提交
1011

1012 1013 1014 1015 1016 1017 1018 1019 1020 1021
    /* 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) {
1022
        VIR_FORCE_FCLOSE(pidinfo);
1023
        VIR_WARN("cannot parse process status data");
1024
        errno = -EINVAL;
D
Daniel P. Berrange 已提交
1025 1026 1027 1028 1029 1030 1031 1032
        return -1;
    }

    /* We got jiffies
     * We want nanoseconds
     * _SC_CLK_TCK is jiffies per second
     * So calulate thus....
     */
1033 1034 1035 1036 1037
    if (cpuTime)
        *cpuTime = 1000ull * 1000ull * 1000ull * (usertime + systime) / (unsigned long long)sysconf(_SC_CLK_TCK);
    if (lastCpu)
        *lastCpu = cpu;

D
Daniel P. Berrange 已提交
1038

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

1042
    VIR_FORCE_FCLOSE(pidinfo);
D
Daniel P. Berrange 已提交
1043 1044 1045 1046 1047

    return 0;
}


1048
static virDomainPtr qemudDomainLookupByID(virConnectPtr conn,
1049
                                          int id) {
1050 1051 1052 1053
    struct qemud_driver *driver = conn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;

1054
    qemuDriverLock(driver);
1055
    vm  = virDomainFindByID(&driver->domains, id);
1056
    qemuDriverUnlock(driver);
1057 1058

    if (!vm) {
1059 1060
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching id %d"), id);
1061
        goto cleanup;
1062 1063
    }

1064
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1065
    if (dom) dom->id = vm->def->id;
1066 1067

cleanup:
1068 1069
    if (vm)
        virDomainObjUnlock(vm);
1070 1071
    return dom;
}
1072

1073
static virDomainPtr qemudDomainLookupByUUID(virConnectPtr conn,
1074
                                            const unsigned char *uuid) {
1075 1076 1077
    struct qemud_driver *driver = conn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;
1078

1079
    qemuDriverLock(driver);
1080
    vm = virDomainFindByUUID(&driver->domains, uuid);
1081 1082
    qemuDriverUnlock(driver);

1083
    if (!vm) {
1084 1085
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(uuid, uuidstr);
1086 1087
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1088
        goto cleanup;
1089 1090
    }

1091
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1092
    if (dom) dom->id = vm->def->id;
1093 1094

cleanup:
1095 1096
    if (vm)
        virDomainObjUnlock(vm);
1097 1098
    return dom;
}
1099

1100
static virDomainPtr qemudDomainLookupByName(virConnectPtr conn,
1101
                                            const char *name) {
1102 1103 1104
    struct qemud_driver *driver = conn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;
1105

1106
    qemuDriverLock(driver);
1107
    vm = virDomainFindByName(&driver->domains, name);
1108 1109
    qemuDriverUnlock(driver);

1110
    if (!vm) {
1111 1112
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching name '%s'"), name);
1113
        goto cleanup;
1114 1115
    }

1116
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1117
    if (dom) dom->id = vm->def->id;
1118 1119

cleanup:
1120 1121
    if (vm)
        virDomainObjUnlock(vm);
1122 1123 1124
    return dom;
}

1125 1126 1127 1128 1129 1130 1131 1132 1133 1134 1135

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 已提交
1136 1137 1138 1139
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159
        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 已提交
1160 1161 1162 1163
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1164 1165 1166 1167 1168 1169 1170 1171 1172 1173
        goto cleanup;
    }
    ret = obj->persistent;

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

1174 1175 1176 1177 1178 1179 1180 1181 1182 1183
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 已提交
1184 1185 1186 1187
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1188 1189 1190 1191 1192 1193 1194 1195 1196
        goto cleanup;
    }
    ret = obj->updated;

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

1198
static int qemudGetVersion(virConnectPtr conn, unsigned long *version) {
1199 1200 1201
    struct qemud_driver *driver = conn->privateData;
    int ret = -1;

1202
    qemuDriverLock(driver);
1203
    if (qemuCapsExtractVersion(driver->caps, &driver->qemuVersion) < 0)
1204
        goto cleanup;
1205

1206
    *version = driver->qemuVersion;
1207 1208 1209
    ret = 0;

cleanup:
1210
    qemuDriverUnlock(driver);
1211
    return ret;
D
Daniel P. Berrange 已提交
1212 1213
}

1214
static int qemudListDomains(virConnectPtr conn, int *ids, int nids) {
1215
    struct qemud_driver *driver = conn->privateData;
1216
    int n;
1217

1218
    qemuDriverLock(driver);
1219
    n = virDomainObjListGetActiveIDs(&driver->domains, ids, nids);
1220
    qemuDriverUnlock(driver);
1221

1222
    return n;
D
Daniel P. Berrange 已提交
1223
}
1224

1225
static int qemudNumDomains(virConnectPtr conn) {
1226
    struct qemud_driver *driver = conn->privateData;
1227
    int n;
1228

1229
    qemuDriverLock(driver);
1230
    n = virDomainObjListNumOfDomains(&driver->domains, 1);
1231
    qemuDriverUnlock(driver);
1232

1233
    return n;
D
Daniel P. Berrange 已提交
1234
}
1235

1236
static virDomainPtr qemudDomainCreate(virConnectPtr conn, const char *xml,
1237
                                      unsigned int flags) {
1238
    struct qemud_driver *driver = conn->privateData;
1239
    virDomainDefPtr def;
1240
    virDomainObjPtr vm = NULL;
1241
    virDomainPtr dom = NULL;
1242
    virDomainEventPtr event = NULL;
D
Daniel P. Berrange 已提交
1243

1244
    virCheckFlags(VIR_DOMAIN_START_PAUSED, NULL);
1245

1246
    qemuDriverLock(driver);
1247
    if (!(def = virDomainDefParseString(driver->caps, xml,
1248
                                        VIR_DOMAIN_XML_INACTIVE)))
1249
        goto cleanup;
1250

1251
    if (virSecurityManagerVerify(driver->securityManager, def) < 0)
1252 1253
        goto cleanup;

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

1257 1258 1259
    if (qemudCanonicalizeMachine(driver, def) < 0)
        goto cleanup;

1260
    if (qemuDomainAssignPCIAddresses(def) < 0)
1261 1262
        goto cleanup;

1263
    if (!(vm = virDomainAssignDef(driver->caps,
1264
                                  &driver->domains,
1265
                                  def, false)))
1266 1267 1268
        goto cleanup;

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

1270 1271 1272
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup; /* XXXX free the 'vm' we created ? */

1273 1274 1275
    if (qemuProcessStart(conn, driver, vm, NULL,
                         (flags & VIR_DOMAIN_START_PAUSED) != 0,
                         -1, NULL, VIR_VM_OP_CREATE) < 0) {
1276
        qemuAuditDomainStart(vm, "booted", false);
1277 1278 1279
        if (qemuDomainObjEndJob(vm) > 0)
            virDomainRemoveInactive(&driver->domains,
                                    vm);
1280
        vm = NULL;
1281
        goto cleanup;
D
Daniel P. Berrange 已提交
1282
    }
1283 1284 1285 1286

    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_BOOTED);
1287
    qemuAuditDomainStart(vm, "booted", true);
D
Daniel P. Berrange 已提交
1288

1289
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1290
    if (dom) dom->id = vm->def->id;
1291

1292 1293 1294
    if (vm &&
        qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
1295

1296 1297
cleanup:
    virDomainDefFree(def);
1298 1299
    if (vm)
        virDomainObjUnlock(vm);
1300 1301
    if (event)
        qemuDomainEventQueue(driver, event);
1302
    qemuDriverUnlock(driver);
1303
    return dom;
D
Daniel P. Berrange 已提交
1304 1305 1306
}


1307
static int qemudDomainSuspend(virDomainPtr dom) {
1308 1309 1310
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1311
    virDomainEventPtr event = NULL;
1312
    qemuDomainObjPrivatePtr priv;
1313

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

D
Daniel P. Berrange 已提交
1317
    if (!vm) {
1318 1319
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1320 1321
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1322
        goto cleanup;
D
Daniel P. Berrange 已提交
1323
    }
D
Daniel P. Berrange 已提交
1324
    if (!virDomainObjIsActive(vm)) {
1325 1326
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
1327
        goto cleanup;
D
Daniel P. Berrange 已提交
1328
    }
1329 1330 1331

    priv = vm->privateData;

1332
    if (priv->jobActive == QEMU_JOB_MIGRATION_OUT) {
J
Jiri Denemark 已提交
1333
        if (virDomainObjGetState(vm, NULL) != VIR_DOMAIN_PAUSED) {
1334 1335 1336 1337 1338 1339 1340 1341 1342 1343 1344 1345 1346
            VIR_DEBUG("Requesting domain pause on %s",
                      vm->def->name);
            priv->jobSignals |= QEMU_JOB_SIGNAL_SUSPEND;
        }
        ret = 0;
        goto cleanup;
    } else {
        if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
            goto cleanup;

        if (!virDomainObjIsActive(vm)) {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s", _("domain is not running"));
1347
            goto endjob;
1348
        }
J
Jiri Denemark 已提交
1349 1350
        if (virDomainObjGetState(vm, NULL) != VIR_DOMAIN_PAUSED) {
            if (qemuProcessStopCPUs(driver, vm, VIR_DOMAIN_PAUSED_USER) < 0) {
1351
                goto endjob;
1352
            }
1353 1354 1355 1356 1357 1358 1359
            event = virDomainEventNewFromObj(vm,
                                             VIR_DOMAIN_EVENT_SUSPENDED,
                                             VIR_DOMAIN_EVENT_SUSPENDED_PAUSED);
        }
        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
            goto endjob;
        ret = 0;
D
Daniel P. Berrange 已提交
1360
    }
1361

1362
endjob:
1363 1364
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
1365

1366
cleanup:
1367 1368
    if (vm)
        virDomainObjUnlock(vm);
1369

1370
    if (event)
1371
        qemuDomainEventQueue(driver, event);
1372
    qemuDriverUnlock(driver);
1373
    return ret;
D
Daniel P. Berrange 已提交
1374 1375 1376
}


1377
static int qemudDomainResume(virDomainPtr dom) {
1378 1379 1380
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1381
    virDomainEventPtr event = NULL;
1382

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

D
Daniel P. Berrange 已提交
1386
    if (!vm) {
1387 1388
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1389 1390
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1391
        goto cleanup;
D
Daniel P. Berrange 已提交
1392
    }
1393 1394 1395 1396

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

D
Daniel P. Berrange 已提交
1397
    if (!virDomainObjIsActive(vm)) {
1398 1399
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
1400
        goto endjob;
D
Daniel P. Berrange 已提交
1401
    }
J
Jiri Denemark 已提交
1402 1403 1404
    if (virDomainObjGetState(vm, NULL) == VIR_DOMAIN_PAUSED) {
        if (qemuProcessStartCPUs(driver, vm, dom->conn,
                                 VIR_DOMAIN_RUNNING_UNPAUSED) < 0) {
1405
            if (virGetLastError() == NULL)
1406 1407
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("resume operation failed"));
1408
            goto endjob;
1409
        }
1410 1411 1412
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_RESUMED,
                                         VIR_DOMAIN_EVENT_RESUMED_UNPAUSED);
D
Daniel P. Berrange 已提交
1413
    }
1414
    if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
1415
        goto endjob;
1416 1417
    ret = 0;

1418
endjob:
1419 1420
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
1421

1422
cleanup:
1423 1424
    if (vm)
        virDomainObjUnlock(vm);
1425
    if (event)
1426
        qemuDomainEventQueue(driver, event);
1427
    qemuDriverUnlock(driver);
1428
    return ret;
D
Daniel P. Berrange 已提交
1429 1430 1431
}


1432
static int qemudDomainShutdown(virDomainPtr dom) {
1433 1434 1435
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1436
    qemuDomainObjPrivatePtr priv;
1437

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

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

1450 1451 1452
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

D
Daniel P. Berrange 已提交
1453
    if (!virDomainObjIsActive(vm)) {
1454 1455
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
1456
        goto endjob;
1457 1458
    }

1459
    priv = vm->privateData;
1460 1461 1462
    qemuDomainObjEnterMonitor(vm);
    ret = qemuMonitorSystemPowerdown(priv->mon);
    qemuDomainObjExitMonitor(vm);
1463

1464
endjob:
1465 1466
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
1467

1468
cleanup:
1469 1470
    if (vm)
        virDomainObjUnlock(vm);
1471
    return ret;
1472 1473 1474
}


1475
static int qemudDomainDestroy(virDomainPtr dom) {
1476 1477 1478
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1479
    virDomainEventPtr event = NULL;
1480

1481
    qemuDriverLock(driver);
1482
    vm  = virDomainFindByUUID(&driver->domains, dom->uuid);
D
Daniel P. Berrange 已提交
1483
    if (!vm) {
1484 1485
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1486 1487
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1488
        goto cleanup;
D
Daniel P. Berrange 已提交
1489
    }
1490

1491 1492 1493 1494 1495 1496 1497
    /* 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
     */
    qemuProcessKill(vm);

1498 1499 1500
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;

D
Daniel P. Berrange 已提交
1501
    if (!virDomainObjIsActive(vm)) {
1502 1503
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
1504
        goto endjob;
1505
    }
1506

J
Jiri Denemark 已提交
1507
    qemuProcessStop(driver, vm, 0, VIR_DOMAIN_SHUTOFF_DESTROYED);
1508 1509 1510
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STOPPED,
                                     VIR_DOMAIN_EVENT_STOPPED_DESTROYED);
1511
    qemuAuditDomainStop(vm, "destroyed");
1512

1513
    if (!vm->persistent) {
1514 1515 1516
        if (qemuDomainObjEndJob(vm) > 0)
            virDomainRemoveInactive(&driver->domains,
                                    vm);
1517 1518
        vm = NULL;
    }
1519 1520
    ret = 0;

1521
endjob:
1522 1523 1524
    if (vm &&
        qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
1525

1526
cleanup:
1527 1528
    if (vm)
        virDomainObjUnlock(vm);
1529 1530
    if (event)
        qemuDomainEventQueue(driver, event);
1531
    qemuDriverUnlock(driver);
1532
    return ret;
D
Daniel P. Berrange 已提交
1533 1534 1535
}


1536
static char *qemudDomainGetOSType(virDomainPtr dom) {
1537 1538 1539
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    char *type = NULL;
1540

1541
    qemuDriverLock(driver);
1542
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1543
    qemuDriverUnlock(driver);
1544
    if (!vm) {
1545 1546
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1547 1548
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1549
        goto cleanup;
1550 1551
    }

1552
    if (!(type = strdup(vm->def->os.type)))
1553
        virReportOOMError();
1554 1555

cleanup:
1556 1557
    if (vm)
        virDomainObjUnlock(vm);
1558 1559 1560
    return type;
}

1561 1562
/* Returns max memory in kb, 0 if error */
static unsigned long qemudDomainGetMaxMemory(virDomainPtr dom) {
1563 1564 1565
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    unsigned long ret = 0;
1566

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

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

1579
    ret = vm->def->mem.max_balloon;
1580 1581

cleanup:
1582 1583
    if (vm)
        virDomainObjUnlock(vm);
1584
    return ret;
1585 1586
}

1587 1588
static int qemudDomainSetMemoryFlags(virDomainPtr dom, unsigned long newmem,
                                     unsigned int flags) {
1589
    struct qemud_driver *driver = dom->conn->privateData;
1590
    qemuDomainObjPrivatePtr priv;
1591
    virDomainObjPtr vm;
1592
    virDomainDefPtr persistentDef = NULL;
1593
    int ret = -1, r;
1594
    bool isActive;
1595

1596 1597
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG |
1598
                  VIR_DOMAIN_MEM_MAXIMUM, -1);
1599

1600
    qemuDriverLock(driver);
1601
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1602
    qemuDriverUnlock(driver);
1603
    if (!vm) {
1604 1605
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1606 1607
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1608
        goto cleanup;
1609 1610
    }

1611 1612 1613
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

1614 1615
    isActive = virDomainObjIsActive(vm);

1616
    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
1617
        if (isActive)
1618
            flags = VIR_DOMAIN_AFFECT_LIVE;
1619
        else
1620
            flags = VIR_DOMAIN_AFFECT_CONFIG;
1621
    }
1622 1623
    if (flags == VIR_DOMAIN_MEM_MAXIMUM) {
        if (isActive)
1624
            flags = VIR_DOMAIN_AFFECT_LIVE | VIR_DOMAIN_MEM_MAXIMUM;
1625
        else
1626
            flags = VIR_DOMAIN_AFFECT_CONFIG | VIR_DOMAIN_MEM_MAXIMUM;
1627
    }
1628

1629
    if (!isActive && (flags & VIR_DOMAIN_AFFECT_LIVE)) {
1630 1631 1632 1633 1634
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }

1635
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
1636 1637 1638 1639 1640 1641 1642 1643
        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;
    }
1644

1645 1646 1647
    if (flags & VIR_DOMAIN_MEM_MAXIMUM) {
        /* resize the maximum memory */

1648
        if (flags & VIR_DOMAIN_AFFECT_LIVE) {
1649 1650 1651
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("cannot resize the maximum memory on an "
                              "active domain"));
1652
            goto endjob;
1653
        }
1654

1655
        if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
E
Eric Blake 已提交
1656 1657
            /* Help clang 2.8 decipher the logic flow.  */
            sa_assert(persistentDef);
1658 1659 1660 1661
            persistentDef->mem.max_balloon = newmem;
            if (persistentDef->mem.cur_balloon > newmem)
                persistentDef->mem.cur_balloon = newmem;
            ret = virDomainSaveConfig(driver->configDir, persistentDef);
1662 1663 1664
            goto endjob;
        }

1665 1666 1667 1668 1669 1670 1671 1672 1673
    } 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;
        }

1674
        if (flags & VIR_DOMAIN_AFFECT_LIVE) {
1675 1676 1677 1678 1679 1680 1681 1682 1683 1684 1685 1686 1687 1688 1689 1690 1691
            priv = vm->privateData;
            qemuDomainObjEnterMonitor(vm);
            r = qemuMonitorSetBalloon(priv->mon, newmem);
            qemuDomainObjExitMonitor(vm);
            qemuAuditMemory(vm, vm->def->mem.cur_balloon, newmem, "update",
                            r == 1);
            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;
            }
        }

1692
        if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
E
Eric Blake 已提交
1693
            sa_assert(persistentDef);
1694 1695 1696 1697
            persistentDef->mem.cur_balloon = newmem;
            ret = virDomainSaveConfig(driver->configDir, persistentDef);
            goto endjob;
        }
1698
    }
1699

1700
    ret = 0;
1701
endjob:
1702 1703
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
1704

1705
cleanup:
1706 1707
    if (vm)
        virDomainObjUnlock(vm);
1708
    return ret;
1709 1710
}

1711 1712
static int qemudDomainSetMemory(virDomainPtr dom, unsigned long newmem)
{
1713
    return qemudDomainSetMemoryFlags(dom, newmem, VIR_DOMAIN_AFFECT_LIVE);
1714 1715
}

1716 1717 1718 1719 1720
static int qemudDomainSetMaxMemory(virDomainPtr dom, unsigned long memory)
{
    return qemudDomainSetMemoryFlags(dom, memory, VIR_DOMAIN_MEM_MAXIMUM);
}

1721 1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754 1755 1756 1757 1758 1759 1760 1761 1762 1763 1764
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;

    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
    ret = qemuMonitorInjectNMI(priv->mon);
    qemuDomainObjExitMonitorWithDriver(driver, vm);
    if (qemuDomainObjEndJob(vm) == 0) {
        vm = NULL;
        goto cleanup;
    }

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

1765
static int qemudDomainGetInfo(virDomainPtr dom,
1766 1767
                              virDomainInfoPtr info)
{
1768 1769 1770
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1771 1772
    int err;
    unsigned long balloon;
1773

1774
    qemuDriverLock(driver);
1775
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1776
    qemuDriverUnlock(driver);
D
Daniel P. Berrange 已提交
1777
    if (!vm) {
1778 1779
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1780 1781
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1782
        goto cleanup;
D
Daniel P. Berrange 已提交
1783 1784
    }

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

D
Daniel P. Berrange 已提交
1787
    if (!virDomainObjIsActive(vm)) {
1788
        info->cpuTime = 0;
D
Daniel P. Berrange 已提交
1789
    } else {
1790
        if (qemudGetProcessInfo(&(info->cpuTime), NULL, vm->pid, 0) < 0) {
E
Eric Blake 已提交
1791 1792
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("cannot read cputime for domain"));
1793
            goto cleanup;
D
Daniel P. Berrange 已提交
1794 1795 1796
        }
    }

1797
    info->maxMem = vm->def->mem.max_balloon;
1798

D
Daniel P. Berrange 已提交
1799
    if (virDomainObjIsActive(vm)) {
1800
        qemuDomainObjPrivatePtr priv = vm->privateData;
1801 1802 1803

        if ((vm->def->memballoon != NULL) &&
            (vm->def->memballoon->model == VIR_DOMAIN_MEMBALLOON_MODEL_NONE)) {
1804
            info->memory = vm->def->mem.max_balloon;
1805
        } else if (!priv->jobActive) {
1806 1807
            if (qemuDomainObjBeginJob(vm) < 0)
                goto cleanup;
1808 1809 1810 1811 1812 1813 1814 1815 1816
            if (!virDomainObjIsActive(vm))
                err = 0;
            else {
                qemuDomainObjEnterMonitor(vm);
                err = qemuMonitorGetBalloonInfo(priv->mon, &balloon);
                qemuDomainObjExitMonitor(vm);
            }
            if (qemuDomainObjEndJob(vm) == 0) {
                vm = NULL;
1817 1818 1819
                goto cleanup;
            }

1820 1821
            if (err < 0)
                goto cleanup;
1822 1823
            if (err == 0)
                /* Balloon not supported, so maxmem is always the allocation */
1824
                info->memory = vm->def->mem.max_balloon;
1825 1826 1827
            else
                info->memory = balloon;
        } else {
1828
            info->memory = vm->def->mem.cur_balloon;
1829
        }
1830
    } else {
1831
        info->memory = vm->def->mem.cur_balloon;
1832 1833
    }

1834
    info->nrVirtCpu = vm->def->vcpus;
1835 1836 1837
    ret = 0;

cleanup:
1838 1839
    if (vm)
        virDomainObjUnlock(vm);
1840
    return ret;
D
Daniel P. Berrange 已提交
1841 1842
}

1843 1844 1845 1846 1847 1848 1849 1850 1851 1852 1853 1854 1855 1856 1857 1858 1859 1860 1861 1862 1863 1864 1865 1866
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 已提交
1867
    *state = virDomainObjGetState(vm, reason);
1868 1869 1870 1871 1872 1873 1874 1875
    ret = 0;

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

D
Daniel P. Berrange 已提交
1876

1877
#define QEMUD_SAVE_MAGIC "LibvirtQemudSave"
1878 1879 1880
#define QEMUD_SAVE_VERSION 2

enum qemud_save_formats {
1881 1882 1883
    QEMUD_SAVE_FORMAT_RAW = 0,
    QEMUD_SAVE_FORMAT_GZIP = 1,
    QEMUD_SAVE_FORMAT_BZIP2 = 2,
1884 1885
    /*
     * Deprecated by xz and never used as part of a release
1886
     * QEMUD_SAVE_FORMAT_LZMA
1887 1888
     */
    QEMUD_SAVE_FORMAT_XZ = 3,
1889
    QEMUD_SAVE_FORMAT_LZOP = 4,
1890 1891 1892
    /* Note: add new members only at the end.
       These values are used in the on-disk format.
       Do not change or re-use numbers. */
1893 1894

    QEMUD_SAVE_FORMAT_LAST
1895
};
1896

1897 1898 1899 1900 1901
VIR_ENUM_DECL(qemudSaveCompression)
VIR_ENUM_IMPL(qemudSaveCompression, QEMUD_SAVE_FORMAT_LAST,
              "raw",
              "gzip",
              "bzip2",
1902 1903
              "xz",
              "lzop")
1904

1905 1906
struct qemud_save_header {
    char magic[sizeof(QEMUD_SAVE_MAGIC)-1];
1907 1908 1909 1910 1911
    uint32_t version;
    uint32_t xml_len;
    uint32_t was_running;
    uint32_t compressed;
    uint32_t unused[15];
1912 1913
};

1914 1915 1916 1917 1918 1919 1920 1921 1922
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);
}


1923
/* return -errno on failure, or 0 on success */
E
Eric Blake 已提交
1924 1925 1926 1927
static int
qemuDomainSaveHeader(int fd, const char *path, char *xml,
                     struct qemud_save_header *header)
{
1928 1929
    int ret = 0;

E
Eric Blake 已提交
1930
    if (safewrite(fd, header, sizeof(*header)) != sizeof(*header)) {
1931
        ret = -errno;
1932
        qemuReportError(VIR_ERR_OPERATION_FAILED,
1933
                        _("failed to write header to domain save file '%s'"),
E
Eric Blake 已提交
1934
                        path);
1935 1936 1937
        goto endjob;
    }

E
Eric Blake 已提交
1938
    if (safewrite(fd, xml, header->xml_len) != header->xml_len) {
1939
        ret = -errno;
1940
        qemuReportError(VIR_ERR_OPERATION_FAILED,
E
Eric Blake 已提交
1941
                         _("failed to write xml to '%s'"), path);
1942 1943 1944 1945 1946 1947
        goto endjob;
    }
endjob:
    return ret;
}

1948 1949 1950 1951 1952 1953 1954 1955 1956
/* 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));
}

1957 1958 1959
/* This internal function expects the driver lock to already be held on
 * entry and the vm must be active.
 */
1960 1961
static int qemudDomainSaveFlag(struct qemud_driver *driver, virDomainPtr dom,
                               virDomainObjPtr vm, const char *path,
1962
                               int compressed)
1963
{
1964
    char *xml = NULL;
1965
    struct qemud_save_header header;
1966
    bool bypassSecurityDriver = false;
1967
    int ret = -1;
1968
    int rc;
1969
    virDomainEventPtr event = NULL;
1970
    qemuDomainObjPrivatePtr priv;
1971
    struct stat sb;
1972
    bool is_reg = false;
1973
    unsigned long long offset;
1974
    int fd = -1;
1975 1976
    uid_t uid = getuid();
    gid_t gid = getgid();
1977 1978 1979 1980 1981

    memset(&header, 0, sizeof(header));
    memcpy(header.magic, QEMUD_SAVE_MAGIC, sizeof(header.magic));
    header.version = QEMUD_SAVE_VERSION;

1982
    header.compressed = compressed;
1983

1984
    priv = vm->privateData;
1985

1986 1987 1988
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;

O
Osier Yang 已提交
1989 1990
    priv->jobActive = QEMU_JOB_SAVE;

1991 1992 1993
    memset(&priv->jobInfo, 0, sizeof(priv->jobInfo));
    priv->jobInfo.type = VIR_DOMAIN_JOB_UNBOUNDED;

1994
    /* Pause */
J
Jiri Denemark 已提交
1995
    if (virDomainObjGetState(vm, NULL) == VIR_DOMAIN_RUNNING) {
1996
        header.was_running = 1;
J
Jiri Denemark 已提交
1997
        if (qemuProcessStopCPUs(driver, vm, VIR_DOMAIN_PAUSED_SAVE) < 0)
1998
            goto endjob;
1999 2000 2001 2002 2003 2004

        if (!virDomainObjIsActive(vm)) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("guest unexpectedly quit"));
            goto endjob;
        }
2005 2006 2007
    }

    /* Get XML for the domain */
2008
    xml = virDomainDefFormat(vm->def, VIR_DOMAIN_XML_SECURE);
2009
    if (!xml) {
2010 2011
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to get domain xml"));
2012
        goto endjob;
2013 2014 2015
    }
    header.xml_len = strlen(xml) + 1;

2016 2017 2018 2019 2020 2021 2022 2023
    /* 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 (stat(path, &sb) < 0) {
        /* Avoid throwing an error here, since it is possible
         * that with NFS we can't actually stat() the file.
         * The subsequent codepaths will still raise an error
         * if a truely fatal problem is hit */
2024
        is_reg = true;
2025
    } else {
2026
        is_reg = !!S_ISREG(sb.st_mode);
2027 2028 2029 2030 2031 2032 2033 2034
        /* If the path is regular local 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 &&
            virStorageFileIsSharedFS(path) == 0) {
            uid=sb.st_uid;
            gid=sb.st_gid;
        }
2035 2036
    }

2037 2038 2039 2040 2041
    offset = sizeof(header) + header.xml_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
2042 2043
     * it by padding the XML string with NULLs.
     */
2044 2045 2046 2047 2048 2049 2050 2051 2052 2053 2054 2055 2056
    if (offset % QEMU_MONITOR_MIGRATE_TO_FILE_BS) {
        unsigned long long pad =
            QEMU_MONITOR_MIGRATE_TO_FILE_BS -
            (offset % QEMU_MONITOR_MIGRATE_TO_FILE_BS);

        if (VIR_REALLOC_N(xml, header.xml_len + pad) < 0) {
            virReportOOMError();
            goto endjob;
        }
        memset(xml + header.xml_len, 0, pad);
        offset += pad;
        header.xml_len += pad;
    }
2057

2058
    /* Obtain the file handle.  */
2059

2060
    /* First try creating the file as root */
2061
    if (!is_reg) {
2062
        fd = open(path, O_WRONLY | O_TRUNC);
2063 2064
        if (fd < 0) {
            virReportSystemError(errno, _("unable to open %s"), path);
2065 2066
            goto endjob;
        }
2067
    } else {
2068 2069
        if ((fd = virFileOpenAs(path, O_CREAT|O_TRUNC|O_WRONLY,
                                S_IRUSR|S_IWUSR,
2070
                                uid, gid, 0)) < 0) {
2071
            /* If we failed as root, and the error was permission-denied
2072 2073
               (EACCES or EPERM), assume it's on a network-connected share
               where root access is restricted (eg, root-squashed NFS). If the
2074 2075 2076
               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 */
2077
            rc = fd;
2078
            if (((rc != -EACCES) && (rc != -EPERM)) ||
2079
                driver->user == getuid()) {
2080 2081
                virReportSystemError(-rc,
                                    _("Failed to create domain save file '%s'"),
2082 2083 2084
                                     path);
                goto endjob;
            }
2085

2086
            /* On Linux we can also verify the FS-type of the directory. */
2087 2088 2089 2090 2091 2092 2093 2094 2095 2096 2097 2098 2099 2100 2101 2102 2103
            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 domain save file "
                                          "'%s': couldn't determine fs type"),
                                        path);
                   goto endjob;
                   break;

                case 0:
                default:
2104
                   /* local file - log the error returned by virFileOpenAs */
2105
                   virReportSystemError(-rc,
2106
                                    _("Failed to create domain save file '%s'"),
2107 2108 2109
                                        path);
                   goto endjob;
                   break;
2110 2111 2112

            }

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

2115 2116 2117 2118
            if ((fd = virFileOpenAs(path, O_CREAT|O_TRUNC|O_WRONLY,
                                    S_IRUSR|S_IWUSR|S_IRGRP|S_IWGRP,
                                    driver->user, driver->group,
                                    VIR_FILE_OPEN_AS_UID)) < 0) {
2119 2120 2121
                virReportSystemError(-fd,
                                   _("Error from child process creating '%s'"),
                                     path);
2122 2123
                goto endjob;
            }
2124

2125 2126 2127
            /* 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 */
2128

2129
            bypassSecurityDriver = true;
2130
        }
2131
    }
2132

2133
    /* Write header to file, followed by XML */
E
Eric Blake 已提交
2134
    if (qemuDomainSaveHeader(fd, path, xml, &header) < 0) {
2135 2136 2137 2138
        VIR_FORCE_CLOSE(fd);
        goto endjob;
    }

2139
    /* Perform the migration */
2140
    if (qemuMigrationToFile(driver, vm, fd, offset, path,
2141 2142
                            qemuCompressProgramName(compressed),
                            is_reg, bypassSecurityDriver) < 0)
2143
        goto endjob;
2144 2145
    if (VIR_CLOSE(fd) < 0) {
        virReportSystemError(errno, _("unable to close %s"), path);
2146
        goto endjob;
2147 2148
    }

2149 2150
    ret = 0;

2151
    /* Shut it down */
J
Jiri Denemark 已提交
2152
    qemuProcessStop(driver, vm, 0, VIR_DOMAIN_SHUTOFF_SAVED);
2153
    qemuAuditDomainStop(vm, "saved");
2154 2155 2156
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STOPPED,
                                     VIR_DOMAIN_EVENT_STOPPED_SAVED);
2157
    if (!vm->persistent) {
2158 2159 2160
        if (qemuDomainObjEndJob(vm) > 0)
            virDomainRemoveInactive(&driver->domains,
                                    vm);
2161 2162
        vm = NULL;
    }
2163

2164
endjob:
2165
    if (vm) {
2166
        if (ret != 0) {
2167
            if (header.was_running && virDomainObjIsActive(vm)) {
J
Jiri Denemark 已提交
2168 2169
                rc = qemuProcessStartCPUs(driver, vm, dom->conn,
                                          VIR_DOMAIN_RUNNING_SAVE_CANCELED);
2170
                if (rc < 0)
2171
                    VIR_WARN("Unable to resume guest CPUs after save failure");
2172
            }
2173
        }
2174
        if (qemuDomainObjEndJob(vm) == 0)
2175
            vm = NULL;
2176
    }
2177

2178
cleanup:
2179
    VIR_FORCE_CLOSE(fd);
2180
    VIR_FREE(xml);
2181
    if (ret != 0 && is_reg)
2182
        unlink(path);
2183 2184
    if (event)
        qemuDomainEventQueue(driver, event);
2185
    return ret;
D
Daniel P. Berrange 已提交
2186 2187
}

2188 2189 2190 2191 2192 2193 2194 2195 2196 2197 2198 2199 2200 2201 2202 2203
/* 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;
}

2204 2205 2206 2207
static int qemudDomainSave(virDomainPtr dom, const char *path)
{
    struct qemud_driver *driver = dom->conn->privateData;
    int compressed;
2208 2209 2210 2211
    int ret = -1;
    virDomainObjPtr vm = NULL;

    qemuDriverLock(driver);
2212 2213 2214 2215 2216 2217 2218 2219 2220

    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"));
2221
            goto cleanup;
2222
        }
2223 2224 2225 2226
        if (!qemudCompressProgramAvailable(compressed)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("Compression program for image format "
                                    "in configuration file isn't available"));
2227
            goto cleanup;
2228
        }
2229 2230
    }

2231 2232 2233 2234 2235 2236 2237 2238 2239
    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;
    }

2240 2241 2242 2243 2244 2245
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

2246 2247 2248 2249 2250 2251 2252 2253
    ret = qemudDomainSaveFlag(driver, dom, vm, path, compressed);

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

    return ret;
2254 2255 2256 2257 2258 2259 2260 2261 2262 2263 2264 2265 2266 2267 2268 2269 2270 2271 2272 2273 2274 2275 2276
}

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;

2277
    virCheckFlags(0, -1);
2278 2279 2280 2281 2282 2283 2284 2285

    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);
2286
        goto cleanup;
2287 2288
    }

2289 2290 2291 2292 2293 2294
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

2295 2296
    name = qemuDomainManagedSavePath(driver, vm);
    if (name == NULL)
2297
        goto cleanup;
2298

2299
    VIR_INFO("Saving state to %s", name);
2300 2301

    compressed = QEMUD_SAVE_FORMAT_RAW;
2302
    ret = qemudDomainSaveFlag(driver, dom, vm, name, compressed);
2303 2304 2305 2306 2307

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
2308 2309 2310
    VIR_FREE(name);

    return ret;
2311 2312 2313 2314 2315 2316 2317 2318 2319 2320
}

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

2321
    virCheckFlags(0, -1);
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

    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;

2355
    virCheckFlags(0, -1);
2356 2357 2358 2359 2360 2361 2362 2363 2364 2365 2366 2367 2368 2369 2370 2371 2372 2373 2374 2375 2376 2377 2378 2379

    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 已提交
2380

H
Hu Tao 已提交
2381 2382 2383 2384 2385 2386 2387 2388 2389 2390 2391 2392 2393 2394 2395
static int doCoreDump(struct qemud_driver *driver,
                      virDomainObjPtr vm,
                      const char *path,
                      enum qemud_save_formats compress)
{
    int fd = -1;
    int ret = -1;

    /* Create an empty file with appropriate ownership.  */
    if ((fd = open(path, O_CREAT|O_TRUNC|O_WRONLY, S_IRUSR|S_IWUSR)) < 0) {
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("failed to create '%s'"), path);
        goto cleanup;
    }

2396
    if (qemuMigrationToFile(driver, vm, fd, 0, path,
2397 2398 2399
                            qemuCompressProgramName(compress), true, false) < 0)
        goto cleanup;

H
Hu Tao 已提交
2400 2401 2402 2403 2404 2405 2406
    if (VIR_CLOSE(fd) < 0) {
        virReportSystemError(errno,
                             _("unable to save file %s"),
                             path);
        goto cleanup;
    }

2407
    ret = 0;
H
Hu Tao 已提交
2408 2409 2410 2411 2412 2413 2414

cleanup:
    if (ret != 0)
        unlink(path);
    return ret;
}

2415 2416 2417 2418 2419
static enum qemud_save_formats
getCompressionType(struct qemud_driver *driver)
{
    int compress = QEMUD_SAVE_FORMAT_RAW;

2420 2421 2422 2423 2424 2425 2426
    /*
     * 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);
        if (compress < 0) {
2427 2428 2429 2430
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("Invalid dump image format specified in "
                              "configuration file, using raw"));
            return QEMUD_SAVE_FORMAT_RAW;
2431
        }
2432 2433 2434
        if (!qemudCompressProgramAvailable(compress)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("Compression program for dump image format "
2435 2436 2437
                                    "in configuration file isn't available, "
                                    "using raw"));
            return QEMUD_SAVE_FORMAT_RAW;
2438
        }
2439
    }
2440 2441 2442 2443 2444
    return compress;
}

static int qemudDomainCoreDump(virDomainPtr dom,
                               const char *path,
2445 2446
                               int flags)
{
2447 2448 2449
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int resume = 0, paused = 0;
H
Hu Tao 已提交
2450
    int ret = -1;
2451 2452 2453
    virDomainEventPtr event = NULL;
    qemuDomainObjPrivatePtr priv;

2454 2455
    virCheckFlags(VIR_DUMP_LIVE | VIR_DUMP_CRASH, -1);

P
Paolo Bonzini 已提交
2456 2457 2458 2459 2460 2461
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
2462 2463
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
P
Paolo Bonzini 已提交
2464 2465
        goto cleanup;
    }
2466
    priv = vm->privateData;
P
Paolo Bonzini 已提交
2467

2468
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
2469 2470
        goto cleanup;

D
Daniel P. Berrange 已提交
2471
    if (!virDomainObjIsActive(vm)) {
2472 2473
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
2474
        goto endjob;
P
Paolo Bonzini 已提交
2475 2476
    }

O
Osier Yang 已提交
2477 2478
    priv->jobActive = QEMU_JOB_DUMP;

P
Paolo Bonzini 已提交
2479 2480
    /* Migrate will always stop the VM, so the resume condition is
       independent of whether the stop command is issued.  */
J
Jiri Denemark 已提交
2481
    resume = virDomainObjGetState(vm, NULL) == VIR_DOMAIN_RUNNING;
P
Paolo Bonzini 已提交
2482 2483

    /* Pause domain for non-live dump */
J
Jiri Denemark 已提交
2484 2485 2486
    if (!(flags & VIR_DUMP_LIVE) &&
        virDomainObjGetState(vm, NULL) == VIR_DOMAIN_RUNNING) {
        if (qemuProcessStopCPUs(driver, vm, VIR_DOMAIN_PAUSED_DUMP) < 0)
2487
            goto endjob;
P
Paolo Bonzini 已提交
2488
        paused = 1;
2489 2490 2491 2492 2493 2494

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

H
Hu Tao 已提交
2497
    ret = doCoreDump(driver, vm, path, getCompressionType(driver));
2498 2499 2500 2501
    if (ret < 0)
        goto endjob;

    paused = 1;
2502 2503

endjob:
2504
    if ((ret == 0) && (flags & VIR_DUMP_CRASH)) {
J
Jiri Denemark 已提交
2505
        qemuProcessStop(driver, vm, 0, VIR_DOMAIN_SHUTOFF_CRASHED);
2506
        qemuAuditDomainStop(vm, "crashed");
2507 2508 2509 2510 2511
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_STOPPED,
                                         VIR_DOMAIN_EVENT_STOPPED_CRASHED);
    }

P
Paolo Bonzini 已提交
2512 2513 2514
    /* 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.  */
2515
    else if (resume && paused && virDomainObjIsActive(vm)) {
J
Jiri Denemark 已提交
2516 2517
        if (qemuProcessStartCPUs(driver, vm, dom->conn,
                                 VIR_DOMAIN_RUNNING_UNPAUSED) < 0) {
2518
            if (virGetLastError() == NULL)
2519 2520
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("resuming after dump failed"));
P
Paolo Bonzini 已提交
2521 2522
        }
    }
2523

2524 2525
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
2526
    else if ((ret == 0) && (flags & VIR_DUMP_CRASH) && !vm->persistent) {
2527 2528 2529 2530
        virDomainRemoveInactive(&driver->domains,
                                vm);
        vm = NULL;
    }
2531 2532

cleanup:
P
Paolo Bonzini 已提交
2533 2534
    if (vm)
        virDomainObjUnlock(vm);
2535 2536
    if (event)
        qemuDomainEventQueue(driver, event);
2537
    qemuDriverUnlock(driver);
P
Paolo Bonzini 已提交
2538 2539 2540
    return ret;
}

2541 2542 2543 2544 2545 2546 2547 2548 2549 2550 2551 2552 2553 2554 2555 2556 2557 2558 2559 2560 2561 2562 2563 2564 2565 2566 2567 2568 2569 2570 2571 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 2599 2600 2601 2602 2603 2604 2605 2606 2607 2608 2609 2610 2611 2612 2613 2614 2615 2616 2617 2618 2619 2620 2621 2622 2623 2624 2625 2626 2627 2628
static char *
qemuDomainScreenshot(virDomainPtr dom,
                     virStreamPtr st,
                     unsigned int screen,
                     unsigned int flags ATTRIBUTE_UNUSED)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    qemuDomainObjPrivatePtr priv;
    char *tmp = NULL;
    int tmp_fd = -1;
    char *ret = NULL;

    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(vm) < 0)
        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;
    }

    qemuDomainObjEnterMonitor(vm);
    if (qemuMonitorScreendump(priv->mon, tmp) < 0) {
        qemuDomainObjExitMonitor(vm);
        goto endjob;
    }
    qemuDomainObjExitMonitor(vm);

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

    if (virFDStreamOpenFile(st, tmp, 0, 0, O_RDONLY, true) < 0) {
        qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                        _("unable to open stream"));
        goto endjob;
    }

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

endjob:
    VIR_FORCE_CLOSE(tmp_fd);
    VIR_FREE(tmp);

    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

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

H
Hu Tao 已提交
2629 2630 2631
static void processWatchdogEvent(void *data, void *opaque)
{
    int ret;
2632
    struct qemuDomainWatchdogEvent *wdEvent = data;
H
Hu Tao 已提交
2633 2634
    struct qemud_driver *driver = opaque;

W
Wen Congyang 已提交
2635 2636 2637
    qemuDriverLock(driver);
    virDomainObjLock(wdEvent->vm);

H
Hu Tao 已提交
2638 2639 2640 2641 2642
    switch (wdEvent->action) {
    case VIR_DOMAIN_WATCHDOG_ACTION_DUMP:
        {
            char *dumpfile;

E
Eric Blake 已提交
2643
            if (virAsprintf(&dumpfile, "%s/%s-%u",
H
Hu Tao 已提交
2644 2645
                            driver->autoDumpPath,
                            wdEvent->vm->def->name,
E
Eric Blake 已提交
2646 2647
                            (unsigned int)time(NULL)) < 0) {
                virReportOOMError();
W
Wen Congyang 已提交
2648
                goto unlock;
E
Eric Blake 已提交
2649
            }
H
Hu Tao 已提交
2650

W
Wen Congyang 已提交
2651 2652 2653 2654
            if (qemuDomainObjBeginJobWithDriver(driver, wdEvent->vm) < 0) {
                VIR_FREE(dumpfile);
                goto unlock;
            }
H
Hu Tao 已提交
2655 2656 2657 2658

            if (!virDomainObjIsActive(wdEvent->vm)) {
                qemuReportError(VIR_ERR_OPERATION_INVALID,
                                "%s", _("domain is not running"));
W
Wen Congyang 已提交
2659 2660
                VIR_FREE(dumpfile);
                goto endjob;
H
Hu Tao 已提交
2661 2662 2663 2664 2665 2666 2667 2668 2669 2670
            }

            ret = doCoreDump(driver,
                             wdEvent->vm,
                             dumpfile,
                             getCompressionType(driver));
            if (ret < 0)
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("Dump failed"));

J
Jiri Denemark 已提交
2671 2672
            ret = qemuProcessStartCPUs(driver, wdEvent->vm, NULL,
                                       VIR_DOMAIN_RUNNING_UNPAUSED);
H
Hu Tao 已提交
2673 2674 2675 2676 2677 2678 2679 2680

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

            VIR_FREE(dumpfile);
        }
        break;
W
Wen Congyang 已提交
2681 2682
    default:
        goto unlock;
H
Hu Tao 已提交
2683 2684
    }

W
Wen Congyang 已提交
2685 2686 2687 2688 2689 2690 2691 2692 2693 2694
endjob:
    /* Safe to ignore value since ref count was incremented in
     * qemuProcessHandleWatchdog().
     */
    ignore_value(qemuDomainObjEndJob(wdEvent->vm));

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

2698 2699 2700
static int qemudDomainHotplugVcpus(virDomainObjPtr vm, unsigned int nvcpus)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
2701
    int i, rc = 1;
2702
    int ret = -1;
2703
    int oldvcpus = vm->def->vcpus;
E
Eric Blake 已提交
2704
    int vcpus = oldvcpus;
2705

2706 2707
    qemuDomainObjEnterMonitor(vm);

2708 2709 2710
    /* 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 已提交
2711 2712
    if (nvcpus > vcpus) {
        for (i = vcpus ; i < nvcpus ; i++) {
2713 2714 2715 2716 2717 2718 2719
            /* Online new CPU */
            rc = qemuMonitorSetCPU(priv->mon, i, 1);
            if (rc == 0)
                goto unsupported;
            if (rc < 0)
                goto cleanup;

E
Eric Blake 已提交
2720
            vcpus++;
2721 2722
        }
    } else {
E
Eric Blake 已提交
2723
        for (i = vcpus - 1 ; i >= nvcpus ; i--) {
2724 2725 2726 2727 2728 2729 2730
            /* Offline old CPU */
            rc = qemuMonitorSetCPU(priv->mon, i, 0);
            if (rc == 0)
                goto unsupported;
            if (rc < 0)
                goto cleanup;

E
Eric Blake 已提交
2731
            vcpus--;
2732 2733 2734 2735 2736 2737
        }
    }

    ret = 0;

cleanup:
2738
    qemuDomainObjExitMonitor(vm);
E
Eric Blake 已提交
2739
    vm->def->vcpus = vcpus;
2740
    qemuAuditVcpu(vm, oldvcpus, nvcpus, "update", rc == 1);
2741 2742 2743 2744 2745 2746 2747 2748 2749
    return ret;

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


2750 2751 2752 2753
static int
qemudDomainSetVcpusFlags(virDomainPtr dom, unsigned int nvcpus,
                         unsigned int flags)
{
2754 2755
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2756
    virDomainDefPtr persistentDef;
2757 2758
    const char * type;
    int max;
2759
    int ret = -1;
2760

2761 2762
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG |
2763 2764 2765 2766
                  VIR_DOMAIN_VCPU_MAXIMUM, -1);

    /* At least one of LIVE or CONFIG must be set.  MAXIMUM cannot be
     * mixed with LIVE.  */
2767 2768 2769
    if ((flags & (VIR_DOMAIN_AFFECT_LIVE | VIR_DOMAIN_AFFECT_CONFIG)) == 0 ||
        (flags & (VIR_DOMAIN_VCPU_MAXIMUM | VIR_DOMAIN_AFFECT_LIVE)) ==
         (VIR_DOMAIN_VCPU_MAXIMUM | VIR_DOMAIN_AFFECT_LIVE)) {
2770 2771 2772 2773 2774 2775 2776
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid flag combination: (0x%x)"), flags);
        return -1;
    }
    if (!nvcpus || (unsigned short) nvcpus != nvcpus) {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("argument out of range: %d"), nvcpus);
2777 2778 2779
        return -1;
    }

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

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

2792 2793 2794
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

2795
    if (!virDomainObjIsActive(vm) && (flags & VIR_DOMAIN_AFFECT_LIVE)) {
2796 2797
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                         "%s", _("domain is not running"));
2798
        goto endjob;
2799 2800
    }

2801
    if (!vm->persistent && (flags & VIR_DOMAIN_AFFECT_CONFIG)) {
2802 2803 2804 2805 2806
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("cannot change persistent config of a transient domain"));
        goto endjob;
    }

2807 2808 2809 2810 2811 2812 2813 2814 2815 2816 2817 2818 2819
    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;
    }

C
Cole Robinson 已提交
2820
    if (!(flags & VIR_DOMAIN_VCPU_MAXIMUM) && vm->def->maxvcpus < max) {
2821 2822 2823
        max = vm->def->maxvcpus;
    }

2824 2825 2826 2827 2828 2829 2830
    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;
    }

2831 2832 2833
    if (!(persistentDef = virDomainObjGetPersistentDef(driver->caps, vm)))
        goto endjob;

2834
    switch (flags) {
2835
    case VIR_DOMAIN_VCPU_MAXIMUM | VIR_DOMAIN_AFFECT_CONFIG:
2836 2837 2838
        persistentDef->maxvcpus = nvcpus;
        if (nvcpus < persistentDef->vcpus)
            persistentDef->vcpus = nvcpus;
2839 2840 2841
        ret = 0;
        break;

2842
    case VIR_DOMAIN_AFFECT_CONFIG:
2843
        persistentDef->vcpus = nvcpus;
2844 2845 2846
        ret = 0;
        break;

2847
    case VIR_DOMAIN_AFFECT_LIVE:
2848 2849 2850
        ret = qemudDomainHotplugVcpus(vm, nvcpus);
        break;

2851
    case VIR_DOMAIN_AFFECT_LIVE | VIR_DOMAIN_AFFECT_CONFIG:
2852
        ret = qemudDomainHotplugVcpus(vm, nvcpus);
2853 2854 2855
        if (ret == 0) {
            persistentDef->vcpus = nvcpus;
        }
2856 2857
        break;
    }
2858

2859
    /* Save the persistent config to disk */
2860
    if (flags & VIR_DOMAIN_AFFECT_CONFIG)
2861 2862
        ret = virDomainSaveConfig(driver->configDir, persistentDef);

2863 2864 2865
endjob:
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
2866

2867
cleanup:
2868 2869
    if (vm)
        virDomainObjUnlock(vm);
2870
    return ret;
2871 2872
}

2873 2874 2875
static int
qemudDomainSetVcpus(virDomainPtr dom, unsigned int nvcpus)
{
2876
    return qemudDomainSetVcpusFlags(dom, nvcpus, VIR_DOMAIN_AFFECT_LIVE);
2877 2878
}

2879 2880

static int
2881 2882 2883 2884 2885 2886
qemudDomainPinVcpuFlags(virDomainPtr dom,
                        unsigned int vcpu,
                        unsigned char *cpumap,
                        int maplen,
                        unsigned int flags) {

2887 2888
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2889
    virDomainDefPtr persistentDef = NULL;
2890
    int maxcpu, hostcpus;
2891
    virNodeInfo nodeinfo;
2892
    int ret = -1;
2893
    bool isActive;
2894
    qemuDomainObjPrivatePtr priv;
2895

2896 2897 2898
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);

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

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

2911 2912 2913 2914 2915 2916 2917 2918 2919 2920 2921 2922
    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"));
2923
        goto cleanup;
2924 2925
    }

2926 2927 2928
    priv = vm->privateData;

    if (vcpu > (priv->nvcpupids-1)) {
2929 2930 2931
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("vcpu number out of range %d > %d"),
                        vcpu, priv->nvcpupids);
2932
        goto cleanup;
2933 2934
    }

2935 2936 2937 2938 2939 2940 2941 2942 2943
    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;
    }
2944

2945
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
2946

2947
        if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
2948
            goto cleanup;
2949 2950 2951 2952 2953 2954 2955 2956 2957 2958 2959 2960 2961 2962 2963 2964 2965 2966 2967 2968 2969 2970 2971

        hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
        maxcpu = maplen * 8;
        if (maxcpu > hostcpus)
            maxcpu = hostcpus;

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

        if (virDomainVcpupinAdd(vm->def, cpumap, maplen, vcpu) < 0) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("failed to update or add vcpupin xml of "
                              "a running domain"));
            goto cleanup;
        }

2972
    }
2973

2974 2975 2976 2977 2978 2979 2980 2981 2982
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {

        if (virDomainVcpupinAdd(persistentDef, cpumap, maplen, vcpu) < 0) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("failed to update or add vcpupin xml of "
                              "a persistent domain"));
            goto cleanup;
        }
        ret = virDomainSaveConfig(driver->configDir, persistentDef);
2983 2984 2985
        goto cleanup;
    }

2986
    ret = 0;
2987

2988
cleanup:
2989 2990
    if (vm)
        virDomainObjUnlock(vm);
2991
    return ret;
2992 2993
}

2994 2995 2996 2997 2998 2999 3000 3001 3002
static int
qemudDomainPinVcpu(virDomainPtr dom,
                   unsigned int vcpu,
                   unsigned char *cpumap,
                   int maplen) {
    return qemudDomainPinVcpuFlags(dom, vcpu, cpumap, maplen,
                                   VIR_DOMAIN_AFFECT_LIVE);
}

3003 3004 3005 3006 3007 3008
static int
qemudDomainGetVcpus(virDomainPtr dom,
                    virVcpuInfoPtr info,
                    int maxinfo,
                    unsigned char *cpumaps,
                    int maplen) {
3009 3010
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
3011
    virNodeInfo nodeinfo;
3012
    int i, v, maxcpu, hostcpus;
3013
    int ret = -1;
3014
    qemuDomainObjPrivatePtr priv;
3015

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

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

D
Daniel P. Berrange 已提交
3028
    if (!virDomainObjIsActive(vm)) {
3029 3030 3031
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s",
                        _("cannot list vcpu pinning for an inactive domain"));
3032
        goto cleanup;
3033 3034
    }

3035 3036
    priv = vm->privateData;

3037
    if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
3038
        goto cleanup;
3039

3040
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
3041
    maxcpu = maplen * 8;
3042 3043
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;
3044 3045

    /* Clamp to actual number of vcpus */
3046 3047
    if (maxinfo > priv->nvcpupids)
        maxinfo = priv->nvcpupids;
3048

3049 3050 3051 3052 3053 3054
    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;
3055

3056
                if (priv->vcpupids != NULL &&
3057 3058 3059
                    qemudGetProcessInfo(&(info[i].cpuTime),
                                        &(info[i].cpu),
                                        vm->pid,
3060
                                        priv->vcpupids[i]) < 0) {
3061
                    virReportSystemError(errno, "%s",
3062 3063 3064
                                         _("cannot get vCPU placement & pCPU time"));
                    goto cleanup;
                }
3065
            }
3066 3067
        }

3068 3069
        if (cpumaps != NULL) {
            memset(cpumaps, 0, maplen * maxinfo);
3070
            if (priv->vcpupids != NULL) {
3071 3072 3073
                for (v = 0 ; v < maxinfo ; v++) {
                    unsigned char *cpumap = VIR_GET_CPUMAP(cpumaps, maplen, v);

3074
                    if (virProcessInfoGetAffinity(priv->vcpupids[v],
3075
                                                  cpumap, maplen, maxcpu) < 0)
3076
                        goto cleanup;
3077
                }
3078
            } else {
3079 3080
                qemuReportError(VIR_ERR_NO_SUPPORT,
                                "%s", _("cpu affinity is not available"));
3081
                goto cleanup;
3082 3083 3084
            }
        }
    }
3085
    ret = maxinfo;
3086

3087
cleanup:
3088 3089
    if (vm)
        virDomainObjUnlock(vm);
3090
    return ret;
3091 3092 3093
}


3094 3095 3096
static int
qemudDomainGetVcpusFlags(virDomainPtr dom, unsigned int flags)
{
3097 3098
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
3099
    virDomainDefPtr def;
3100
    int ret = -1;
3101

3102 3103
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG |
3104 3105 3106
                  VIR_DOMAIN_VCPU_MAXIMUM, -1);

    /* Exactly one of LIVE or CONFIG must be set.  */
3107
    if (!(flags & VIR_DOMAIN_AFFECT_LIVE) == !(flags & VIR_DOMAIN_AFFECT_CONFIG)) {
3108 3109
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid flag combination: (0x%x)"), flags);
3110 3111 3112
        return -1;
    }

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

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

3125
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
3126 3127 3128 3129 3130 3131 3132 3133
        if (!virDomainObjIsActive(vm)) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("domain not active"));
            goto cleanup;
        }
        def = vm->def;
    } else {
        def = vm->newDef ? vm->newDef : vm->def;
3134 3135
    }

3136
    ret = (flags & VIR_DOMAIN_VCPU_MAXIMUM) ? def->maxvcpus : def->vcpus;
3137

3138
cleanup:
3139 3140
    if (vm)
        virDomainObjUnlock(vm);
3141 3142 3143
    return ret;
}

3144 3145 3146
static int
qemudDomainGetMaxVcpus(virDomainPtr dom)
{
3147
    return qemudDomainGetVcpusFlags(dom, (VIR_DOMAIN_AFFECT_LIVE |
3148 3149 3150
                                          VIR_DOMAIN_VCPU_MAXIMUM));
}

3151 3152 3153 3154 3155 3156 3157 3158 3159
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);

3160 3161
    memset(seclabel, 0, sizeof(*seclabel));

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

3170
    if (!virDomainVirtTypeToString(vm->def->virtType)) {
3171 3172 3173
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("unknown virt type in domain definition '%d'"),
                        vm->def->virtType);
3174 3175 3176 3177 3178 3179 3180 3181 3182 3183 3184 3185 3186 3187 3188 3189 3190
        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 已提交
3191
    if (virDomainObjIsActive(vm)) {
3192 3193
        if (virSecurityManagerGetProcessLabel(driver->securityManager,
                                              vm, seclabel) < 0) {
3194 3195 3196
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            "%s", _("Failed to get security label"));
            goto cleanup;
3197 3198 3199 3200 3201 3202 3203 3204
        }
    }

    ret = 0;

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
3205
    qemuDriverUnlock(driver);
3206 3207 3208
    return ret;
}

3209 3210
static int qemudNodeGetSecurityModel(virConnectPtr conn,
                                     virSecurityModelPtr secmodel)
3211 3212 3213
{
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
    char *p;
3214
    int ret = 0;
3215

3216
    qemuDriverLock(driver);
3217 3218 3219 3220 3221
    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)
3222
        goto cleanup;
3223

3224 3225
    p = driver->caps->host.secModel.model;
    if (strlen(p) >= VIR_SECURITY_MODEL_BUFLEN-1) {
3226 3227 3228
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("security model string exceeds max %d bytes"),
                        VIR_SECURITY_MODEL_BUFLEN-1);
3229 3230
        ret = -1;
        goto cleanup;
3231 3232 3233 3234 3235
    }
    strcpy(secmodel->model, p);

    p = driver->caps->host.secModel.doi;
    if (strlen(p) >= VIR_SECURITY_DOI_BUFLEN-1) {
3236 3237 3238
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("security DOI string exceeds max %d bytes"),
                        VIR_SECURITY_DOI_BUFLEN-1);
3239 3240
        ret = -1;
        goto cleanup;
3241 3242
    }
    strcpy(secmodel->doi, p);
3243 3244 3245 3246

cleanup:
    qemuDriverUnlock(driver);
    return ret;
3247 3248
}

3249 3250 3251 3252 3253
static int ATTRIBUTE_NONNULL(3) ATTRIBUTE_NONNULL(4)
qemuDomainSaveImageOpen(struct qemud_driver *driver,
                        const char *path,
                        virDomainDefPtr *ret_def,
                        struct qemud_save_header *ret_header)
J
Jiri Denemark 已提交
3254 3255
{
    int fd;
3256
    struct qemud_save_header header;
J
Jiri Denemark 已提交
3257 3258
    char *xml = NULL;
    virDomainDefPtr def = NULL;
3259

3260 3261 3262
    if ((fd = virFileOpenAs(path, O_RDONLY, 0, getuid(), getgid(), 0)) < 0) {
        if ((fd != -EACCES && fd != -EPERM) ||
            driver->user == getuid()) {
3263 3264
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("cannot read domain image"));
J
Jiri Denemark 已提交
3265
            goto error;
3266 3267 3268
        }

        /* Opening as root failed, but qemu runs as a different user
3269 3270 3271 3272 3273 3274
         * that might have better luck. */
        if ((fd = virFileOpenAs(path, O_RDONLY, 0,
                                driver->user, driver->group,
                                VIR_FILE_OPEN_AS_UID)) < 0) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("cannot read domain image"));
J
Jiri Denemark 已提交
3275
            goto error;
3276
        }
3277 3278 3279
    }

    if (saferead(fd, &header, sizeof(header)) != sizeof(header)) {
3280 3281
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to read qemu header"));
J
Jiri Denemark 已提交
3282
        goto error;
3283 3284 3285
    }

    if (memcmp(header.magic, QEMUD_SAVE_MAGIC, sizeof(header.magic)) != 0) {
3286 3287
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("image magic is incorrect"));
J
Jiri Denemark 已提交
3288
        goto error;
3289 3290 3291
    }

    if (header.version > QEMUD_SAVE_VERSION) {
3292 3293 3294 3295 3296
        /* convert endianess and try again */
        bswap_header(&header);
    }

    if (header.version > QEMUD_SAVE_VERSION) {
3297 3298 3299
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("image version is not supported (%d > %d)"),
                        header.version, QEMUD_SAVE_VERSION);
J
Jiri Denemark 已提交
3300
        goto error;
3301 3302
    }

3303 3304 3305
    if (header.xml_len <= 0) {
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("invalid XML length: %d"), header.xml_len);
J
Jiri Denemark 已提交
3306
        goto error;
3307 3308
    }

3309 3310
    if (VIR_ALLOC_N(xml, header.xml_len) < 0) {
        virReportOOMError();
J
Jiri Denemark 已提交
3311
        goto error;
3312 3313 3314
    }

    if (saferead(fd, xml, header.xml_len) != header.xml_len) {
3315 3316
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to read XML"));
J
Jiri Denemark 已提交
3317
        goto error;
3318 3319 3320
    }

    /* Create a domain from this XML */
3321
    if (!(def = virDomainDefParseString(driver->caps, xml,
3322
                                        VIR_DOMAIN_XML_INACTIVE)))
J
Jiri Denemark 已提交
3323
        goto error;
3324

J
Jiri Denemark 已提交
3325
    VIR_FREE(xml);
3326

J
Jiri Denemark 已提交
3327 3328
    *ret_def = def;
    *ret_header = header;
3329

J
Jiri Denemark 已提交
3330
    return fd;
3331

J
Jiri Denemark 已提交
3332 3333 3334
error:
    virDomainDefFree(def);
    VIR_FREE(xml);
3335
    VIR_FORCE_CLOSE(fd);
J
Jiri Denemark 已提交
3336 3337 3338 3339

    return -1;
}

3340 3341 3342 3343 3344 3345 3346
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,
                           const char *path)
J
Jiri Denemark 已提交
3347 3348 3349 3350
{
    int ret = -1;
    virDomainEventPtr event;
    int intermediatefd = -1;
3351
    virCommandPtr cmd = NULL;
J
Jiri Denemark 已提交
3352 3353 3354

    if (header->version == 2) {
        const char *prog = qemudSaveCompressionTypeToString(header->compressed);
3355
        if (prog == NULL) {
3356 3357
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            _("Invalid compressed save format %d"),
J
Jiri Denemark 已提交
3358 3359
                            header->compressed);
            goto out;
3360
        }
3361

J
Jiri Denemark 已提交
3362
        if (header->compressed != QEMUD_SAVE_FORMAT_RAW) {
3363
            cmd = virCommandNewArgList(prog, "-dc", NULL);
3364 3365
            intermediatefd = *fd;
            *fd = -1;
3366 3367 3368 3369 3370

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

            if (virCommandRunAsync(cmd, NULL) < 0) {
3371 3372
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("Failed to start decompression binary %s"),
3373
                                prog);
3374
                *fd = intermediatefd;
J
Jiri Denemark 已提交
3375
                goto out;
3376 3377 3378
            }
        }
    }
J
Jiri Denemark 已提交
3379

3380
    /* Set the migration source and start it up. */
3381
    ret = qemuProcessStart(conn, driver, vm, "stdio", true, *fd, path,
3382
                           VIR_VM_OP_RESTORE);
J
Jiri Denemark 已提交
3383

3384
    if (intermediatefd != -1) {
3385
        if (ret < 0) {
3386 3387 3388
            /* if there was an error setting up qemu, the intermediate
             * process will wait forever to write to stdout, so we
             * must manually kill it.
3389 3390
             */
            VIR_FORCE_CLOSE(intermediatefd);
3391
            VIR_FORCE_CLOSE(*fd);
3392 3393
        }

3394 3395
        if (virCommandWait(cmd, NULL) < 0)
            ret = -1;
3396
    }
3397
    VIR_FORCE_CLOSE(intermediatefd);
J
Jiri Denemark 已提交
3398

3399 3400 3401
    if (VIR_CLOSE(*fd) < 0) {
        virReportSystemError(errno, _("cannot close file: %s"), path);
        ret = -1;
3402
    }
J
Jiri Denemark 已提交
3403

3404
    if (ret < 0) {
3405
        qemuAuditDomainStart(vm, "restored", false);
J
Jiri Denemark 已提交
3406
        goto out;
3407
    }
3408

3409 3410 3411
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_RESTORED);
3412
    qemuAuditDomainStart(vm, "restored", true);
J
Jiri Denemark 已提交
3413 3414 3415
    if (event)
        qemuDomainEventQueue(driver, event);

3416

3417
    /* If it was running before, resume it now. */
J
Jiri Denemark 已提交
3418
    if (header->was_running) {
J
Jiri Denemark 已提交
3419 3420
        if (qemuProcessStartCPUs(driver, vm, conn,
                                 VIR_DOMAIN_RUNNING_RESTORED) < 0) {
3421
            if (virGetLastError() == NULL)
3422 3423
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("failed to resume domain"));
J
Jiri Denemark 已提交
3424
            goto out;
3425
        }
3426 3427
        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0) {
            VIR_WARN("Failed to save status on vm %s", vm->def->name);
J
Jiri Denemark 已提交
3428
            goto out;
3429
        }
3430
    }
J
Jiri Denemark 已提交
3431

3432
    ret = 0;
3433

J
Jiri Denemark 已提交
3434
out:
3435
    virCommandFree(cmd);
3436 3437
    if (virSecurityManagerRestoreSavedStateLabel(driver->securityManager,
                                                 vm, path) < 0)
3438 3439
        VIR_WARN("failed to restore save state label on %s", path);

J
Jiri Denemark 已提交
3440 3441 3442
    return ret;
}

3443 3444 3445 3446
static int
qemuDomainRestore(virConnectPtr conn,
                  const char *path)
{
J
Jiri Denemark 已提交
3447 3448 3449 3450 3451 3452 3453 3454 3455
    struct qemud_driver *driver = conn->privateData;
    virDomainDefPtr def = NULL;
    virDomainObjPtr vm = NULL;
    int fd = -1;
    int ret = -1;
    struct qemud_save_header header;

    qemuDriverLock(driver);

3456
    fd = qemuDomainSaveImageOpen(driver, path, &def, &header);
J
Jiri Denemark 已提交
3457 3458 3459 3460 3461 3462 3463 3464 3465
    if (fd < 0)
        goto cleanup;

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

    if (!(vm = virDomainAssignDef(driver->caps,
                                  &driver->domains,
                                  def, true))) {
3466
        /* virDomainAssignDef already set the error */
J
Jiri Denemark 已提交
3467 3468 3469 3470 3471 3472 3473
        goto cleanup;
    }
    def = NULL;

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

3474
    ret = qemuDomainSaveImageStartVM(conn, driver, vm, &fd, &header, path);
J
Jiri Denemark 已提交
3475 3476

    if (qemuDomainObjEndJob(vm) == 0)
3477
        vm = NULL;
J
Jiri Denemark 已提交
3478 3479 3480 3481
    else if (ret < 0 && !vm->persistent) {
        virDomainRemoveInactive(&driver->domains, vm);
        vm = NULL;
    }
3482

3483 3484
cleanup:
    virDomainDefFree(def);
3485
    VIR_FORCE_CLOSE(fd);
3486 3487 3488
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
3489
    return ret;
D
Daniel P. Berrange 已提交
3490 3491
}

3492 3493 3494 3495 3496
static int
qemuDomainObjRestore(virConnectPtr conn,
                     struct qemud_driver *driver,
                     virDomainObjPtr vm,
                     const char *path)
J
Jiri Denemark 已提交
3497 3498 3499 3500 3501 3502
{
    virDomainDefPtr def = NULL;
    int fd = -1;
    int ret = -1;
    struct qemud_save_header header;

3503
    fd = qemuDomainSaveImageOpen(driver, path, &def, &header);
J
Jiri Denemark 已提交
3504 3505 3506 3507 3508 3509 3510 3511 3512 3513 3514 3515 3516 3517 3518 3519 3520 3521 3522 3523
    if (fd < 0)
        goto cleanup;

    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;

3524
    ret = qemuDomainSaveImageStartVM(conn, driver, vm, &fd, &header, path);
J
Jiri Denemark 已提交
3525 3526 3527

cleanup:
    virDomainDefFree(def);
3528
    VIR_FORCE_CLOSE(fd);
J
Jiri Denemark 已提交
3529 3530 3531
    return ret;
}

D
Daniel P. Berrange 已提交
3532

3533 3534
static char *qemuDomainGetXMLDesc(virDomainPtr dom,
                                  int flags) {
3535 3536 3537
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    char *ret = NULL;
3538 3539
    unsigned long balloon;
    int err;
3540

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

D
Daniel P. Berrange 已提交
3544
    if (!vm) {
3545 3546
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3547 3548
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3549
        goto cleanup;
D
Daniel P. Berrange 已提交
3550 3551
    }

3552 3553 3554 3555
    /* 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))) {
3556
        qemuDomainObjPrivatePtr priv = vm->privateData;
3557 3558 3559
        /* Don't delay if someone's using the monitor, just use
         * existing most recent data instead */
        if (!priv->jobActive) {
3560
            if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
3561 3562
                goto cleanup;

3563
            qemuDomainObjEnterMonitorWithDriver(driver, vm);
3564
            err = qemuMonitorGetBalloonInfo(priv->mon, &balloon);
3565
            qemuDomainObjExitMonitorWithDriver(driver, vm);
3566 3567 3568 3569
            if (qemuDomainObjEndJob(vm) == 0) {
                vm = NULL;
                goto cleanup;
            }
3570 3571 3572
            if (err < 0)
                goto cleanup;
            if (err > 0)
3573
                vm->def->mem.cur_balloon = balloon;
3574 3575
            /* err == 0 indicates no balloon support, so ignore it */
        }
3576
    }
3577

3578
    ret = qemuDomainFormatXML(driver, vm, flags);
3579 3580

cleanup:
3581 3582
    if (vm)
        virDomainObjUnlock(vm);
3583
    qemuDriverUnlock(driver);
3584
    return ret;
D
Daniel P. Berrange 已提交
3585 3586 3587
}


3588 3589 3590 3591
static char *qemuDomainXMLFromNative(virConnectPtr conn,
                                     const char *format,
                                     const char *config,
                                     unsigned int flags ATTRIBUTE_UNUSED) {
3592
    struct qemud_driver *driver = conn->privateData;
3593 3594 3595 3596
    virDomainDefPtr def = NULL;
    char *xml = NULL;

    if (STRNEQ(format, QEMU_CONFIG_FORMAT_ARGV)) {
3597 3598
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("unsupported config type %s"), format);
3599 3600 3601
        goto cleanup;
    }

3602
    qemuDriverLock(driver);
3603
    def = qemuParseCommandLineString(driver->caps, config);
3604
    qemuDriverUnlock(driver);
3605 3606 3607
    if (!def)
        goto cleanup;

3608
    xml = virDomainDefFormat(def, VIR_DOMAIN_XML_INACTIVE);
3609 3610 3611 3612 3613 3614

cleanup:
    virDomainDefFree(def);
    return xml;
}

3615 3616 3617 3618 3619 3620
static char *qemuDomainXMLToNative(virConnectPtr conn,
                                   const char *format,
                                   const char *xmlData,
                                   unsigned int flags ATTRIBUTE_UNUSED) {
    struct qemud_driver *driver = conn->privateData;
    virDomainDefPtr def = NULL;
3621
    virDomainChrSourceDef monConfig;
3622
    virBitmapPtr qemuCaps = NULL;
E
Eric Blake 已提交
3623
    virCommandPtr cmd = NULL;
3624 3625 3626
    char *ret = NULL;
    int i;

3627 3628
    qemuDriverLock(driver);

3629
    if (STRNEQ(format, QEMU_CONFIG_FORMAT_ARGV)) {
3630 3631
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("unsupported config type %s"), format);
3632 3633 3634
        goto cleanup;
    }

3635
    def = virDomainDefParseString(driver->caps, xmlData, 0);
3636 3637 3638
    if (!def)
        goto cleanup;

3639 3640
    /* Since we're just exporting args, we can't do bridge/network/direct
     * setups, since libvirt will normally create TAP/macvtap devices
3641 3642 3643 3644 3645
     * 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];
3646
        int bootIndex = net->bootIndex;
3647 3648
        if (net->type == VIR_DOMAIN_NET_TYPE_NETWORK ||
            net->type == VIR_DOMAIN_NET_TYPE_DIRECT) {
3649 3650 3651 3652 3653 3654 3655 3656 3657 3658 3659 3660 3661 3662 3663 3664 3665 3666 3667 3668
            VIR_FREE(net->data.network.name);

            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;
        }
3669
        net->bootIndex = bootIndex;
3670 3671 3672 3673
    }
    for (i = 0 ; i < def->ngraphics ; i++) {
        if (def->graphics[i]->type == VIR_DOMAIN_GRAPHICS_TYPE_VNC &&
            def->graphics[i]->data.vnc.autoport)
3674
            def->graphics[i]->data.vnc.port = QEMU_VNC_PORT_MIN;
3675 3676
    }

3677
    if (qemuCapsExtractVersionInfo(def->emulator, def->os.arch,
3678
                                   NULL,
3679
                                   &qemuCaps) < 0)
3680 3681
        goto cleanup;

3682
    if (qemuProcessPrepareMonitorChr(driver, &monConfig, def->name) < 0)
3683
        goto cleanup;
3684

3685
    if (!(cmd = qemuBuildCommandLine(conn, driver, def,
3686
                                     &monConfig, false, qemuCaps,
3687
                                     NULL, -1, NULL, VIR_VM_OP_NO_OP)))
3688 3689
        goto cleanup;

E
Eric Blake 已提交
3690
    ret = virCommandToString(cmd);
3691 3692

cleanup:
3693
    qemuDriverUnlock(driver);
3694

3695
    qemuCapsFree(qemuCaps);
E
Eric Blake 已提交
3696
    virCommandFree(cmd);
3697 3698 3699 3700 3701
    virDomainDefFree(def);
    return ret;
}


3702
static int qemudListDefinedDomains(virConnectPtr conn,
3703
                            char **const names, int nnames) {
3704
    struct qemud_driver *driver = conn->privateData;
3705
    int n;
3706

3707
    qemuDriverLock(driver);
3708
    n = virDomainObjListGetInactiveNames(&driver->domains, names, nnames);
3709
    qemuDriverUnlock(driver);
3710
    return n;
D
Daniel P. Berrange 已提交
3711 3712
}

3713
static int qemudNumDefinedDomains(virConnectPtr conn) {
3714
    struct qemud_driver *driver = conn->privateData;
3715
    int n;
3716

3717
    qemuDriverLock(driver);
3718
    n = virDomainObjListNumOfDomains(&driver->domains, 0);
3719
    qemuDriverUnlock(driver);
3720

3721
    return n;
D
Daniel P. Berrange 已提交
3722 3723 3724
}


J
Jiri Denemark 已提交
3725 3726
static int qemudDomainObjStart(virConnectPtr conn,
                               struct qemud_driver *driver,
3727 3728
                               virDomainObjPtr vm,
                               bool start_paused)
J
Jiri Denemark 已提交
3729 3730 3731 3732 3733 3734
{
    int ret = -1;
    char *managed_save;

    /*
     * If there is a managed saved state restore it instead of starting
3735
     * from scratch. The old state is removed once the restoring succeeded.
J
Jiri Denemark 已提交
3736 3737
     */
    managed_save = qemuDomainManagedSavePath(driver, vm);
3738 3739 3740 3741

    if (!managed_save)
        goto cleanup;

E
Eric Blake 已提交
3742
    if (virFileExists(managed_save)) {
3743
        ret = qemuDomainObjRestore(conn, driver, vm, managed_save);
J
Jiri Denemark 已提交
3744

3745
        if ((ret == 0) && (unlink(managed_save) < 0))
J
Jiri Denemark 已提交
3746 3747
            VIR_WARN("Failed to remove the managed state %s", managed_save);

3748
        goto cleanup;
J
Jiri Denemark 已提交
3749 3750
    }

3751 3752
    ret = qemuProcessStart(conn, driver, vm, NULL, start_paused, -1, NULL,
                           VIR_VM_OP_CREATE);
3753
    qemuAuditDomainStart(vm, "booted", ret >= 0);
3754
    if (ret >= 0) {
J
Jiri Denemark 已提交
3755 3756 3757 3758 3759 3760 3761 3762 3763 3764 3765 3766 3767
        virDomainEventPtr event =
            virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_BOOTED);
        if (event)
            qemuDomainEventQueue(driver, event);
    }

cleanup:
    VIR_FREE(managed_save);
    return ret;
}

3768 3769 3770
static int
qemudDomainStartWithFlags(virDomainPtr dom, unsigned int flags)
{
3771 3772 3773
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
3774

3775
    virCheckFlags(VIR_DOMAIN_START_PAUSED, -1);
3776

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

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

3788 3789 3790 3791
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;

    if (virDomainObjIsActive(vm)) {
3792 3793
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is already running"));
3794 3795 3796
        goto endjob;
    }

3797 3798
    ret = qemudDomainObjStart(dom->conn, driver, vm,
                              (flags & VIR_DOMAIN_START_PAUSED) != 0);
3799

3800
endjob:
3801 3802
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
3803

3804
cleanup:
3805 3806
    if (vm)
        virDomainObjUnlock(vm);
3807
    qemuDriverUnlock(driver);
3808
    return ret;
D
Daniel P. Berrange 已提交
3809 3810
}

3811 3812 3813 3814 3815 3816
static int
qemudDomainStart(virDomainPtr dom)
{
    return qemudDomainStartWithFlags(dom, 0);
}

3817 3818 3819 3820 3821 3822 3823 3824 3825 3826 3827 3828 3829 3830 3831
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;

3832
        if (STRNEQ(def->os.machine, machine->name))
3833 3834 3835
            continue;

        if (!(*canonical = strdup(machine->canonical))) {
3836
            virReportOOMError();
3837 3838 3839 3840 3841 3842 3843 3844 3845
            return -1;
        }

        break;
    }

    return 0;
}

3846 3847 3848 3849 3850 3851
static int
qemudCanonicalizeMachineDirect(virDomainDefPtr def, char **canonical)
{
    virCapsGuestMachinePtr *machines = NULL;
    int i, nmachines = 0;

3852
    if (qemuCapsProbeMachineTypes(def->emulator, &machines, &nmachines) < 0)
3853 3854 3855 3856 3857 3858
        return -1;

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

3859
        if (STRNEQ(def->os.machine, machines[i]->name))
3860 3861 3862 3863 3864 3865 3866 3867 3868 3869 3870 3871
            continue;

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

    virCapabilitiesFreeMachines(machines, nmachines);

    return 0;
}

3872 3873
int
qemudCanonicalizeMachine(struct qemud_driver *driver, virDomainDefPtr def)
3874 3875 3876 3877 3878 3879
{
    char *canonical = NULL;
    int i;

    for (i = 0; i < driver->caps->nguests; i++) {
        virCapsGuestPtr guest = driver->caps->guests[i];
3880
        virCapsGuestDomainInfoPtr info;
3881 3882 3883
        int j;

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

3886 3887 3888 3889 3890 3891 3892 3893 3894
            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;
3895 3896
        }

3897 3898 3899 3900
        info = &guest->arch.defaultInfo;

        if (info->emulator && STREQ(info->emulator, def->emulator)) {
            if (qemudCanonicalizeMachineFromInfo(def, info, &canonical) < 0)
3901 3902 3903 3904
                return -1;
            goto out;
        }
    }
3905 3906 3907 3908

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

3909 3910 3911 3912 3913 3914 3915
out:
    if (canonical) {
        VIR_FREE(def->os.machine);
        def->os.machine = canonical;
    }
    return 0;
}
D
Daniel P. Berrange 已提交
3916

3917
static virDomainPtr qemudDomainDefine(virConnectPtr conn, const char *xml) {
3918
    struct qemud_driver *driver = conn->privateData;
3919
    virDomainDefPtr def;
3920
    virDomainObjPtr vm = NULL;
3921
    virDomainPtr dom = NULL;
3922
    virDomainEventPtr event = NULL;
3923
    int dupVM;
3924

3925
    qemuDriverLock(driver);
3926
    if (!(def = virDomainDefParseString(driver->caps, xml,
3927
                                        VIR_DOMAIN_XML_INACTIVE)))
3928
        goto cleanup;
3929

3930
    if (virSecurityManagerVerify(driver->securityManager, def) < 0)
3931 3932
        goto cleanup;

3933 3934
    if ((dupVM = virDomainObjIsDuplicate(&driver->domains, def, 0)) < 0)
        goto cleanup;
3935

3936
    if (qemudCanonicalizeMachine(driver, def) < 0)
3937 3938
        goto cleanup;

3939
    if (qemuDomainAssignPCIAddresses(def) < 0)
3940 3941
        goto cleanup;

3942
    if (!(vm = virDomainAssignDef(driver->caps,
3943
                                  &driver->domains,
3944
                                  def, false))) {
3945
        goto cleanup;
3946
    }
3947
    def = NULL;
3948
    vm->persistent = 1;
3949

3950
    if (virDomainSaveConfig(driver->configDir,
3951
                            vm->newDef ? vm->newDef : vm->def) < 0) {
3952
        VIR_INFO("Defining domain '%s'", vm->def->name);
3953 3954
        virDomainRemoveInactive(&driver->domains,
                                vm);
3955
        vm = NULL;
3956
        goto cleanup;
3957 3958
    }

3959 3960
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_DEFINED,
3961
                                     !dupVM ?
3962 3963
                                     VIR_DOMAIN_EVENT_DEFINED_ADDED :
                                     VIR_DOMAIN_EVENT_DEFINED_UPDATED);
3964

3965
    VIR_INFO("Creating domain '%s'", vm->def->name);
3966
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
3967
    if (dom) dom->id = vm->def->id;
3968 3969

cleanup:
3970
    virDomainDefFree(def);
3971 3972
    if (vm)
        virDomainObjUnlock(vm);
3973 3974
    if (event)
        qemuDomainEventQueue(driver, event);
3975
    qemuDriverUnlock(driver);
3976
    return dom;
D
Daniel P. Berrange 已提交
3977 3978
}

3979
static int qemudDomainUndefine(virDomainPtr dom) {
3980 3981
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
3982
    virDomainEventPtr event = NULL;
3983
    int ret = -1;
D
Daniel P. Berrange 已提交
3984

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

D
Daniel P. Berrange 已提交
3988
    if (!vm) {
3989 3990
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3991 3992
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3993
        goto cleanup;
D
Daniel P. Berrange 已提交
3994 3995
    }

D
Daniel P. Berrange 已提交
3996
    if (virDomainObjIsActive(vm)) {
3997 3998
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot delete active domain"));
3999
        goto cleanup;
D
Daniel P. Berrange 已提交
4000 4001
    }

4002
    if (!vm->persistent) {
4003
        qemuReportError(VIR_ERR_OPERATION_INVALID,
4004
                        "%s", _("cannot undefine transient domain"));
4005
        goto cleanup;
4006 4007
    }

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

4011 4012 4013
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_UNDEFINED,
                                     VIR_DOMAIN_EVENT_UNDEFINED_REMOVED);
4014

4015
    VIR_INFO("Undefining domain '%s'", vm->def->name);
4016 4017
    virDomainRemoveInactive(&driver->domains,
                            vm);
4018
    vm = NULL;
4019
    ret = 0;
D
Daniel P. Berrange 已提交
4020

4021
cleanup:
4022 4023
    if (vm)
        virDomainObjUnlock(vm);
4024 4025
    if (event)
        qemuDomainEventQueue(driver, event);
4026
    qemuDriverUnlock(driver);
4027
    return ret;
D
Daniel P. Berrange 已提交
4028 4029
}

4030 4031 4032
static int
qemuDomainAttachDeviceDiskLive(struct qemud_driver *driver,
                               virDomainObjPtr vm,
4033
                               virDomainDeviceDefPtr dev)
4034 4035 4036 4037
{
    virDomainDiskDefPtr disk = dev->data.disk;
    virCgroupPtr cgroup = NULL;
    int ret = -1;
4038

4039 4040 4041 4042 4043 4044 4045 4046 4047 4048 4049 4050 4051 4052 4053 4054 4055 4056 4057 4058
    if (disk->driverName != NULL && !STREQ(disk->driverName, "qemu")) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("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:
4059
        ret = qemuDomainChangeEjectableMedia(driver, vm, disk, false);
4060 4061 4062 4063
        break;
    case VIR_DOMAIN_DISK_DEVICE_DISK:
        if (disk->bus == VIR_DOMAIN_DISK_BUS_USB)
            ret = qemuDomainAttachUsbMassstorageDevice(driver, vm,
4064
                                                       disk);
4065
        else if (disk->bus == VIR_DOMAIN_DISK_BUS_VIRTIO)
4066
            ret = qemuDomainAttachPciDiskDevice(driver, vm, disk);
4067
        else if (disk->bus == VIR_DOMAIN_DISK_BUS_SCSI)
4068
            ret = qemuDomainAttachSCSIDisk(driver, vm, disk);
4069 4070 4071 4072 4073 4074 4075 4076 4077 4078 4079 4080 4081 4082 4083 4084 4085 4086 4087 4088 4089 4090 4091 4092 4093 4094
        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,
4095
                                     virDomainDeviceDefPtr dev)
4096 4097 4098 4099 4100 4101
{
    virDomainControllerDefPtr cont = dev->data.controller;
    int ret = -1;

    switch (cont->type) {
    case VIR_DOMAIN_CONTROLLER_TYPE_SCSI:
4102
        ret = qemuDomainAttachPciControllerDevice(driver, vm, cont);
4103 4104 4105 4106 4107 4108 4109 4110 4111 4112 4113 4114 4115
        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,
4116
                           virDomainPtr dom)
4117 4118 4119 4120 4121 4122
{
    struct qemud_driver *driver = dom->conn->privateData;
    int ret = -1;

    switch (dev->type) {
    case VIR_DOMAIN_DEVICE_DISK:
4123
        qemuDomainObjCheckDiskTaint(driver, vm, dev->data.disk, -1);
4124
        ret = qemuDomainAttachDeviceDiskLive(driver, vm, dev);
4125 4126 4127 4128 4129
        if (!ret)
            dev->data.disk = NULL;
        break;

    case VIR_DOMAIN_DEVICE_CONTROLLER:
4130
        ret = qemuDomainAttachDeviceControllerLive(driver, vm, dev);
4131 4132 4133 4134
        if (!ret)
            dev->data.controller = NULL;
        break;

4135 4136 4137 4138 4139 4140 4141
    case VIR_DOMAIN_DEVICE_LEASE:
        ret = qemuDomainAttachLease(driver, vm,
                                    dev->data.lease);
        if (ret == 0)
            dev->data.lease = NULL;
        break;

4142
    case VIR_DOMAIN_DEVICE_NET:
4143
        qemuDomainObjCheckNetTaint(driver, vm, dev->data.net, -1);
4144
        ret = qemuDomainAttachNetDevice(dom->conn, driver, vm,
4145
                                        dev->data.net);
4146 4147 4148 4149 4150 4151
        if (!ret)
            dev->data.net = NULL;
        break;

    case VIR_DOMAIN_DEVICE_HOSTDEV:
        ret = qemuDomainAttachHostDevice(driver, vm,
4152
                                         dev->data.hostdev);
4153 4154 4155 4156 4157 4158 4159 4160 4161 4162 4163 4164 4165 4166 4167 4168 4169
        if (!ret)
            dev->data.hostdev = NULL;
        break;

    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,
4170
                               virDomainDeviceDefPtr dev)
4171 4172 4173 4174 4175 4176 4177
{
    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)
4178
            ret = qemuDomainDetachPciDiskDevice(driver, vm, dev);
4179
        else if (disk->bus == VIR_DOMAIN_DISK_BUS_SCSI)
4180
            ret =  qemuDomainDetachDiskDevice(driver, vm, dev);
4181
        else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_USB)
4182
            ret = qemuDomainDetachDiskDevice(driver, vm, dev);
4183 4184 4185 4186 4187 4188 4189 4190 4191 4192 4193 4194 4195 4196 4197 4198
        else
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                            _("This type of disk cannot be hot unplugged"));
        break;
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("device type '%s' cannot be detached"),
                        virDomainDeviceTypeToString(dev->type));
        break;
    }
    return ret;
}

static int
qemuDomainDetachDeviceControllerLive(struct qemud_driver *driver,
                                     virDomainObjPtr vm,
4199
                                     virDomainDeviceDefPtr dev)
4200 4201 4202 4203 4204 4205
{
    virDomainControllerDefPtr cont = dev->data.controller;
    int ret = -1;

    switch (cont->type) {
    case VIR_DOMAIN_CONTROLLER_TYPE_SCSI:
4206
        ret = qemuDomainDetachPciControllerDevice(driver, vm, dev);
4207 4208 4209 4210 4211 4212 4213 4214 4215 4216 4217 4218
        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,
4219
                           virDomainPtr dom)
4220 4221 4222 4223 4224 4225
{
    struct qemud_driver *driver = dom->conn->privateData;
    int ret = -1;

    switch (dev->type) {
    case VIR_DOMAIN_DEVICE_DISK:
4226
        ret = qemuDomainDetachDeviceDiskLive(driver, vm, dev);
4227 4228
        break;
    case VIR_DOMAIN_DEVICE_CONTROLLER:
4229
        ret = qemuDomainDetachDeviceControllerLive(driver, vm, dev);
4230
        break;
4231 4232 4233
    case VIR_DOMAIN_DEVICE_LEASE:
        ret = qemuDomainDetachLease(driver, vm, dev->data.lease);
        break;
4234
    case VIR_DOMAIN_DEVICE_NET:
4235
        ret = qemuDomainDetachNetDevice(driver, vm, dev);
4236 4237
        break;
    case VIR_DOMAIN_DEVICE_HOSTDEV:
4238
        ret = qemuDomainDetachHostDevice(driver, vm, dev);
4239 4240 4241 4242 4243 4244 4245 4246 4247 4248
        break;
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        "%s", _("This type of device cannot be hot unplugged"));
        break;
    }

    return ret;
}

4249 4250 4251 4252 4253 4254 4255 4256
static int
qemuDomainChangeDiskMediaLive(virDomainObjPtr vm,
                              virDomainDeviceDefPtr dev,
                              struct qemud_driver *driver,
                              bool force)
{
    virDomainDiskDefPtr disk = dev->data.disk;
    virCgroupPtr cgroup = NULL;
4257
    int ret = -1;
4258 4259 4260

    if (qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_DEVICES)) {
        if (virCgroupForDomain(driver->cgroup,
4261
                               vm->def->name, &cgroup, 0) != 0) {
4262 4263 4264 4265 4266 4267 4268 4269 4270 4271 4272 4273
            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:
4274
        ret = qemuDomainChangeEjectableMedia(driver, vm, disk, force);
4275 4276 4277 4278 4279 4280 4281 4282 4283 4284 4285 4286 4287 4288 4289 4290 4291 4292 4293 4294 4295 4296 4297 4298 4299 4300 4301 4302 4303 4304 4305 4306
        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:
4307
        ret = qemuDomainChangeDiskMediaLive(vm, dev, driver, force);
4308 4309 4310 4311 4312 4313 4314 4315 4316 4317 4318 4319 4320 4321
        break;
    case VIR_DOMAIN_DEVICE_GRAPHICS:
        ret = qemuDomainChangeGraphics(driver, vm, dev->data.graphics);
        break;
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("device type '%s' cannot be updated"),
                        virDomainDeviceTypeToString(dev->type));
        break;
    }

    return ret;
}

4322
static int
4323
qemuDomainAttachDeviceConfig(virDomainDefPtr vmdef,
4324 4325
                             virDomainDeviceDefPtr dev)
{
4326
    virDomainDiskDefPtr disk;
4327
    virDomainNetDefPtr net;
4328
    virDomainLeaseDefPtr lease;
4329

4330
    switch (dev->type) {
4331 4332 4333 4334 4335 4336 4337 4338 4339 4340 4341 4342 4343 4344 4345 4346 4347 4348 4349 4350
    case VIR_DOMAIN_DEVICE_DISK:
        disk = dev->data.disk;
        if (virDomainDiskIndexByName(vmdef, disk->dst) >= 0) {
            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;
        if (qemuDomainAssignPCIAddresses(vmdef) < 0)
            return -1;
        break;

4351 4352 4353 4354 4355 4356 4357 4358 4359 4360 4361 4362 4363 4364 4365 4366 4367
    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;
        if (qemuDomainAssignPCIAddresses(vmdef) < 0)
            return -1;
        break;
4368 4369 4370 4371 4372 4373 4374 4375 4376 4377 4378 4379 4380 4381 4382 4383

    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;

4384 4385 4386 4387 4388 4389 4390 4391 4392 4393
    default:
         qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                         _("persistent attach of device is not supported"));
         return -1;
    }
    return 0;
}


static int
4394
qemuDomainDetachDeviceConfig(virDomainDefPtr vmdef,
4395 4396
                             virDomainDeviceDefPtr dev)
{
4397
    virDomainDiskDefPtr disk;
4398
    virDomainNetDefPtr net;
4399
    virDomainLeaseDefPtr lease;
4400

4401
    switch (dev->type) {
4402 4403 4404 4405 4406 4407 4408 4409
    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;
4410

4411 4412 4413 4414 4415 4416 4417 4418 4419 4420 4421
    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;
4422 4423 4424 4425 4426 4427 4428 4429 4430 4431 4432

    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;

4433 4434 4435 4436 4437 4438 4439 4440 4441
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                        _("persistent detach of device is not supported"));
        return -1;
    }
    return 0;
}

static int
4442
qemuDomainUpdateDeviceConfig(virDomainDefPtr vmdef,
4443 4444
                             virDomainDeviceDefPtr dev)
{
4445 4446 4447
    virDomainDiskDefPtr orig, disk;
    int pos;

4448
    switch (dev->type) {
4449 4450 4451 4452 4453 4454 4455 4456 4457 4458 4459 4460 4461 4462 4463 4464 4465 4466 4467 4468 4469 4470 4471 4472 4473 4474 4475 4476 4477 4478 4479 4480 4481 4482 4483
    case VIR_DOMAIN_DEVICE_DISK:
        disk = dev->data.disk;
        pos = virDomainDiskIndexByName(vmdef, disk->dst);
        if (pos < 0) {
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("target %s doesn't exists."), disk->dst);
            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;
4484 4485 4486 4487 4488 4489 4490 4491
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                         _("persistent update of device is not supported"));
        return -1;
    }
    return 0;
}

4492 4493 4494 4495 4496 4497 4498 4499 4500 4501 4502
/* 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)
4503
{
4504
    struct qemud_driver *driver = dom->conn->privateData;
4505
    virDomainObjPtr vm = NULL;
4506
    virDomainDefPtr vmdef = NULL;
4507
    virDomainDeviceDefPtr dev = NULL;
4508
    bool force = (flags & VIR_DOMAIN_DEVICE_MODIFY_FORCE) != 0;
4509
    int ret = -1;
4510

4511 4512
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG |
4513 4514 4515
                  (action == QEMU_DEVICE_UPDATE ?
                   VIR_DOMAIN_DEVICE_MODIFY_FORCE : 0), -1);

4516 4517 4518 4519 4520 4521 4522
    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);
4523 4524 4525
        goto cleanup;
    }

4526 4527
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;
4528

4529
    if (virDomainObjIsActive(vm)) {
4530 4531
        if (flags == VIR_DOMAIN_AFFECT_CURRENT)
            flags |= VIR_DOMAIN_AFFECT_LIVE;
4532
    } else {
4533 4534
        if (flags == VIR_DOMAIN_AFFECT_CURRENT)
            flags |= VIR_DOMAIN_AFFECT_CONFIG;
4535
        /* check consistency between flags and the vm state */
4536
        if (flags & VIR_DOMAIN_AFFECT_LIVE) {
4537 4538 4539 4540 4541 4542
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s",
                            _("cannot do live update a device on "
                              "inactive domain"));
            goto endjob;
        }
4543
    }
4544

4545
    if ((flags & VIR_DOMAIN_AFFECT_CONFIG) && !vm->persistent) {
4546 4547 4548 4549
         qemuReportError(VIR_ERR_OPERATION_INVALID,
                         "%s", _("cannot modify device on transient domain"));
         goto endjob;
    }
4550

4551
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
4552 4553 4554 4555 4556
        dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
                                      VIR_DOMAIN_XML_INACTIVE);
        if (dev == NULL)
            goto endjob;

4557 4558 4559 4560 4561 4562 4563 4564 4565 4566 4567 4568 4569 4570 4571 4572 4573 4574 4575 4576 4577
        /* 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;
        }
    } else
        ret = 0;
4578

4579
    if (!ret && (flags & VIR_DOMAIN_AFFECT_LIVE)) {
4580 4581 4582 4583 4584 4585 4586
        /* 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);
        if (dev == NULL)
            goto endjob;

4587 4588
        switch (action) {
        case QEMU_DEVICE_ATTACH:
4589
            ret = qemuDomainAttachDeviceLive(vm, dev, dom);
4590 4591
            break;
        case QEMU_DEVICE_DETACH:
4592
            ret = qemuDomainDetachDeviceLive(vm, dev, dom);
4593 4594
            break;
        case QEMU_DEVICE_UPDATE:
4595
            ret = qemuDomainUpdateDeviceLive(vm, dev, dom, force);
4596 4597 4598 4599 4600 4601 4602 4603 4604 4605 4606 4607 4608 4609 4610
            break;
        default:
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("unknown domain modify action %d"), action);
            break;
        }
        /*
         * update domain status forcibly because the domain status may be
         * changed even if we attach the device failed. For example, a
         * For example, a new controller may be created.
         */
        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
            ret = -1;
    }
    /* Finally, if no error until here, we can save config. */
4611
    if (!ret && (flags & VIR_DOMAIN_AFFECT_CONFIG)) {
4612 4613 4614 4615 4616 4617
        ret = virDomainSaveConfig(driver->configDir, vmdef);
        if (!ret) {
            virDomainObjAssignDef(vm, vmdef, false);
            vmdef = NULL;
        }
    }
4618 4619 4620 4621 4622 4623

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

cleanup:
4624
    virDomainDefFree(vmdef);
4625 4626 4627 4628
    virDomainDeviceDefFree(dev);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
4629 4630 4631
    return ret;
}

4632 4633 4634 4635 4636 4637
static int qemuDomainAttachDeviceFlags(virDomainPtr dom, const char *xml,
                                       unsigned int flags)
{
    return qemuDomainModifyDeviceFlags(dom, xml, flags, QEMU_DEVICE_ATTACH);
}

4638 4639 4640
static int qemuDomainAttachDevice(virDomainPtr dom, const char *xml)
{
    return qemuDomainAttachDeviceFlags(dom, xml,
4641
                                       VIR_DOMAIN_AFFECT_LIVE);
4642
}
4643

4644

4645 4646 4647 4648
static int qemuDomainUpdateDeviceFlags(virDomainPtr dom,
                                       const char *xml,
                                       unsigned int flags)
{
4649
    return qemuDomainModifyDeviceFlags(dom, xml, flags, QEMU_DEVICE_UPDATE);
4650 4651
}

4652 4653 4654
static int qemuDomainDetachDeviceFlags(virDomainPtr dom, const char *xml,
                                       unsigned int flags)
{
4655
    return qemuDomainModifyDeviceFlags(dom, xml, flags, QEMU_DEVICE_DETACH);
4656 4657
}

4658 4659 4660
static int qemuDomainDetachDevice(virDomainPtr dom, const char *xml)
{
    return qemuDomainDetachDeviceFlags(dom, xml,
4661
                                       VIR_DOMAIN_AFFECT_LIVE);
4662 4663
}

4664
static int qemudDomainGetAutostart(virDomainPtr dom,
4665
                                   int *autostart) {
4666 4667 4668
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
4669

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

4674
    if (!vm) {
4675 4676
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4677 4678
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4679
        goto cleanup;
4680 4681 4682
    }

    *autostart = vm->autostart;
4683
    ret = 0;
4684

4685
cleanup:
4686 4687
    if (vm)
        virDomainObjUnlock(vm);
4688
    return ret;
4689 4690
}

4691
static int qemudDomainSetAutostart(virDomainPtr dom,
4692
                                   int autostart) {
4693 4694
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
4695 4696
    char *configFile = NULL, *autostartLink = NULL;
    int ret = -1;
4697

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

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

4709
    if (!vm->persistent) {
4710
        qemuReportError(VIR_ERR_OPERATION_INVALID,
4711
                        "%s", _("cannot set autostart for transient domain"));
4712
        goto cleanup;
4713 4714
    }

4715 4716
    autostart = (autostart != 0);

4717
    if (vm->autostart != autostart) {
4718
        if ((configFile = virDomainConfigFile(driver->configDir, vm->def->name)) == NULL)
4719
            goto cleanup;
4720
        if ((autostartLink = virDomainConfigFile(driver->autostartDir, vm->def->name)) == NULL)
4721
            goto cleanup;
4722

4723 4724
        if (autostart) {
            int err;
4725

4726
            if ((err = virFileMakePath(driver->autostartDir))) {
4727
                virReportSystemError(err,
4728 4729
                                     _("cannot create autostart directory %s"),
                                     driver->autostartDir);
4730 4731
                goto cleanup;
            }
4732

4733
            if (symlink(configFile, autostartLink) < 0) {
4734
                virReportSystemError(errno,
4735 4736
                                     _("Failed to create symlink '%s to '%s'"),
                                     autostartLink, configFile);
4737 4738 4739 4740
                goto cleanup;
            }
        } else {
            if (unlink(autostartLink) < 0 && errno != ENOENT && errno != ENOTDIR) {
4741
                virReportSystemError(errno,
4742 4743
                                     _("Failed to delete symlink '%s'"),
                                     autostartLink);
4744 4745
                goto cleanup;
            }
4746 4747
        }

4748
        vm->autostart = autostart;
4749
    }
4750
    ret = 0;
4751

4752 4753 4754
cleanup:
    VIR_FREE(configFile);
    VIR_FREE(autostartLink);
4755 4756
    if (vm)
        virDomainObjUnlock(vm);
4757
    qemuDriverUnlock(driver);
4758
    return ret;
4759 4760
}

4761 4762 4763 4764 4765

static char *qemuGetSchedulerType(virDomainPtr dom,
                                  int *nparams)
{
    struct qemud_driver *driver = dom->conn->privateData;
4766
    char *ret = NULL;
4767

4768
    qemuDriverLock(driver);
4769
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
4770 4771
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup CPU controller is not mounted"));
4772
        goto cleanup;
4773 4774 4775 4776 4777 4778 4779
    }

    if (nparams)
        *nparams = 1;

    ret = strdup("posix");
    if (!ret)
4780
        virReportOOMError();
4781 4782 4783

cleanup:
    qemuDriverUnlock(driver);
4784 4785 4786
    return ret;
}

4787
static int qemuDomainSetBlkioParameters(virDomainPtr dom,
4788
                                         virTypedParameterPtr params,
4789 4790 4791 4792 4793 4794 4795 4796 4797 4798 4799 4800 4801 4802 4803 4804 4805 4806 4807 4808 4809 4810 4811 4812
                                         int nparams,
                                         unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
    int ret = -1;

    virCheckFlags(0, -1);
    qemuDriverLock(driver);
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_BLKIO)) {
        qemuReportError(VIR_ERR_NO_SUPPORT, _("blkio cgroup isn't mounted"));
        goto cleanup;
    }

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

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

4813 4814 4815 4816 4817 4818
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

4819 4820 4821 4822 4823 4824 4825 4826
    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;
    }

    ret = 0;
    for (i = 0; i < nparams; i++) {
4827
        virTypedParameterPtr param = &params[i];
4828 4829 4830

        if (STREQ(param->field, VIR_DOMAIN_BLKIO_WEIGHT)) {
            int rc;
4831
            if (param->type != VIR_TYPED_PARAM_UINT) {
4832 4833 4834 4835 4836 4837 4838 4839 4840 4841 4842 4843 4844 4845 4846 4847 4848 4849 4850 4851 4852 4853 4854 4855 4856 4857 4858 4859 4860 4861 4862 4863 4864 4865 4866
                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;
            }

            rc = virCgroupSetBlkioWeight(group, params[i].value.ui);
            if (rc != 0) {
                virReportSystemError(-rc, "%s",
                                     _("unable to set blkio weight tunable"));
                ret = -1;
            }
        } else {
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("Parameter `%s' not supported"), param->field);
            ret = -1;
        }
    }

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

static int qemuDomainGetBlkioParameters(virDomainPtr dom,
4867
                                         virTypedParameterPtr params,
4868 4869 4870 4871 4872 4873 4874 4875 4876 4877 4878 4879 4880 4881 4882 4883 4884 4885 4886 4887 4888 4889 4890 4891 4892 4893 4894
                                         int *nparams,
                                         unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
    unsigned int val;
    int ret = -1;
    int rc;

    virCheckFlags(0, -1);
    qemuDriverLock(driver);

    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_BLKIO)) {
        qemuReportError(VIR_ERR_NO_SUPPORT, _("blkio cgroup isn't mounted"));
        goto cleanup;
    }

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

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

4895 4896 4897 4898 4899 4900
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

4901 4902 4903 4904 4905 4906 4907 4908 4909 4910 4911 4912 4913 4914 4915 4916 4917 4918 4919 4920
    if ((*nparams) == 0) {
        /* Current number of blkio parameters supported by cgroups */
        *nparams = QEMU_NB_BLKIO_PARAM;
        ret = 0;
        goto cleanup;
    }

    if ((*nparams) != QEMU_NB_BLKIO_PARAM) {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("Invalid parameter count"));
        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;
    }

    for (i = 0; i < *nparams; i++) {
4921
        virTypedParameterPtr param = &params[i];
4922 4923
        val = 0;
        param->value.ui = 0;
4924
        param->type = VIR_TYPED_PARAM_UINT;
4925

4926
        switch (i) {
4927 4928 4929 4930 4931 4932 4933 4934 4935 4936 4937 4938 4939 4940 4941 4942 4943 4944 4945 4946 4947 4948 4949 4950 4951 4952 4953 4954 4955 4956 4957
        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,
                                "%s", _("Field blkio weight too long for destination"));
                goto cleanup;
            }
            param->value.ui = val;
            break;

        default:
            break;
            /* should not hit here */
        }
    }

    ret = 0;

cleanup:
    if (group)
        virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}
4958 4959

static int qemuDomainSetMemoryParameters(virDomainPtr dom,
4960
                                         virTypedParameterPtr params,
4961
                                         int nparams,
4962
                                         unsigned int flags)
4963 4964 4965
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
4966
    virDomainDefPtr persistentDef = NULL;
4967 4968 4969
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
    int ret = -1;
4970 4971
    bool isActive;

4972 4973
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);
4974 4975 4976 4977 4978 4979 4980 4981 4982 4983 4984

    qemuDriverLock(driver);

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

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

4985 4986
    isActive = virDomainObjIsActive(vm);

4987
    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
4988
        if (isActive)
4989
            flags = VIR_DOMAIN_AFFECT_LIVE;
4990
        else
4991
            flags = VIR_DOMAIN_AFFECT_CONFIG;
4992 4993
    }

4994
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
4995 4996 4997 4998 4999 5000 5001 5002 5003 5004 5005 5006 5007 5008 5009 5010 5011 5012 5013
        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;
        }
    }

5014
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
5015 5016 5017 5018 5019 5020 5021
        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;
5022 5023 5024 5025
    }

    ret = 0;
    for (i = 0; i < nparams; i++) {
5026
        virTypedParameterPtr param = &params[i];
5027 5028 5029

        if (STREQ(param->field, VIR_DOMAIN_MEMORY_HARD_LIMIT)) {
            int rc;
5030
            if (param->type != VIR_TYPED_PARAM_ULLONG) {
5031 5032 5033 5034 5035 5036
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for memory hard_limit tunable, expected a 'ullong'"));
                ret = -1;
                continue;
            }

5037
            if (flags & VIR_DOMAIN_AFFECT_LIVE) {
5038 5039 5040 5041 5042 5043 5044 5045
                rc = virCgroupSetMemoryHardLimit(group, params[i].value.ul);
                if (rc != 0) {
                    virReportSystemError(-rc, "%s",
                                         _("unable to set memory hard_limit tunable"));
                    ret = -1;
                }
            }

5046
            if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
5047
                persistentDef->mem.hard_limit = params[i].value.ul;
5048 5049 5050
            }
        } else if (STREQ(param->field, VIR_DOMAIN_MEMORY_SOFT_LIMIT)) {
            int rc;
5051
            if (param->type != VIR_TYPED_PARAM_ULLONG) {
5052 5053 5054 5055 5056 5057
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for memory soft_limit tunable, expected a 'ullong'"));
                ret = -1;
                continue;
            }

5058
            if (flags & VIR_DOMAIN_AFFECT_LIVE) {
5059 5060 5061 5062 5063 5064 5065 5066
                rc = virCgroupSetMemorySoftLimit(group, params[i].value.ul);
                if (rc != 0) {
                    virReportSystemError(-rc, "%s",
                                         _("unable to set memory soft_limit tunable"));
                    ret = -1;
                }
            }

5067
            if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
5068
                persistentDef->mem.soft_limit = params[i].value.ul;
5069
            }
5070
        } else if (STREQ(param->field, VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT)) {
5071
            int rc;
5072
            if (param->type != VIR_TYPED_PARAM_ULLONG) {
5073 5074 5075 5076 5077 5078
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for swap_hard_limit tunable, expected a 'ullong'"));
                ret = -1;
                continue;
            }

5079
            if (flags & VIR_DOMAIN_AFFECT_LIVE) {
5080 5081 5082 5083 5084 5085 5086
                rc = virCgroupSetMemSwapHardLimit(group, params[i].value.ul);
                if (rc != 0) {
                    virReportSystemError(-rc, "%s",
                                         _("unable to set swap_hard_limit tunable"));
                    ret = -1;
                }
            }
5087
            if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
5088
                persistentDef->mem.swap_hard_limit = params[i].value.ul;
5089 5090 5091 5092 5093 5094 5095 5096 5097 5098 5099 5100
            }
        } else if (STREQ(param->field, VIR_DOMAIN_MEMORY_MIN_GUARANTEE)) {
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("Memory tunable `%s' not implemented"), param->field);
            ret = -1;
        } else {
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("Parameter `%s' not supported"), param->field);
            ret = -1;
        }
    }

5101
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
5102 5103 5104
        ret = virDomainSaveConfig(driver->configDir, persistentDef);
    }

5105 5106 5107 5108 5109 5110 5111 5112
cleanup:
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

5113
static int qemuDomainGetMemoryParameters(virDomainPtr dom,
5114
                                         virTypedParameterPtr params,
5115
                                         int *nparams,
5116
                                         unsigned int flags)
5117 5118 5119 5120 5121
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
5122
    virDomainDefPtr persistentDef = NULL;
5123
    unsigned long long val;
5124 5125
    int ret = -1;
    int rc;
5126
    bool isActive;
5127

5128 5129
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);
5130

5131
    qemuDriverLock(driver);
5132 5133 5134 5135 5136 5137 5138 5139 5140

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

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

5141 5142
    isActive = virDomainObjIsActive(vm);

5143
    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
5144
        if (isActive)
5145
            flags = VIR_DOMAIN_AFFECT_LIVE;
5146
        else
5147
            flags = VIR_DOMAIN_AFFECT_CONFIG;
5148 5149
    }

5150
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
5151 5152 5153 5154 5155 5156 5157 5158 5159 5160 5161 5162 5163 5164 5165 5166 5167 5168 5169
        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;
        }
    }

5170
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
5171 5172 5173 5174 5175 5176 5177
        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;
5178 5179
    }

5180 5181 5182 5183 5184 5185 5186
    if ((*nparams) == 0) {
        /* Current number of memory parameters supported by cgroups */
        *nparams = QEMU_NB_MEM_PARAM;
        ret = 0;
        goto cleanup;
    }

5187
    if ((*nparams) < QEMU_NB_MEM_PARAM) {
5188 5189 5190 5191 5192
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("Invalid parameter count"));
        goto cleanup;
    }

5193
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
5194 5195 5196 5197
        for (i = 0; i < *nparams; i++) {
            virMemoryParameterPtr param = &params[i];
            val = 0;
            param->value.ul = 0;
5198
            param->type = VIR_TYPED_PARAM_ULLONG;
5199 5200 5201 5202 5203 5204 5205 5206 5207 5208 5209 5210 5211 5212 5213 5214 5215 5216 5217 5218 5219 5220 5221 5222 5223 5224 5225 5226 5227 5228 5229 5230 5231 5232 5233

            switch (i) {
            case 0: /* fill memory hard limit here */
                if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_HARD_LIMIT) == NULL) {
                    qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                    "%s", _("Field memory hard limit too long for destination"));
                    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,
                                    "%s", _("Field memory soft limit too long for destination"));
                    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,
                                    "%s", _("Field swap hard limit too long for destination"));
                    goto cleanup;
                }
                param->value.ul = persistentDef->mem.swap_hard_limit;
                break;

            default:
                break;
                /* should not hit here */
            }
        }
        goto out;
5234 5235
    }

5236
    for (i = 0; i < QEMU_NB_MEM_PARAM; i++) {
5237
        virTypedParameterPtr param = &params[i];
5238 5239
        val = 0;
        param->value.ul = 0;
5240
        param->type = VIR_TYPED_PARAM_ULLONG;
5241

5242
        switch (i) {
5243 5244 5245 5246 5247
        case 0: /* fill memory hard limit here */
            rc = virCgroupGetMemoryHardLimit(group, &val);
            if (rc != 0) {
                virReportSystemError(-rc, "%s",
                                     _("unable to get memory hard limit"));
5248
                goto cleanup;
5249 5250 5251 5252
            }
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_HARD_LIMIT) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field memory hard limit too long for destination"));
5253
                goto cleanup;
5254 5255 5256 5257 5258 5259 5260 5261 5262
            }
            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"));
5263
                goto cleanup;
5264 5265 5266 5267
            }
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SOFT_LIMIT) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field memory soft limit too long for destination"));
5268
                goto cleanup;
5269 5270 5271 5272 5273
            }
            param->value.ul = val;
            break;

        case 2: /* fill swap hard limit here */
5274
            rc = virCgroupGetMemSwapHardLimit(group, &val);
5275 5276 5277
            if (rc != 0) {
                virReportSystemError(-rc, "%s",
                                     _("unable to get swap hard limit"));
5278
                goto cleanup;
5279
            }
5280
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT) == NULL) {
5281 5282
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field swap hard limit too long for destination"));
5283
                goto cleanup;
5284 5285 5286 5287 5288 5289 5290 5291 5292 5293
            }
            param->value.ul = val;
            break;

        default:
            break;
            /* should not hit here */
        }
    }

5294
out:
5295
    *nparams = QEMU_NB_MEM_PARAM;
5296 5297
    ret = 0;

5298 5299 5300 5301 5302 5303 5304 5305 5306
cleanup:
    if (group)
        virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

5307
static int qemuSetSchedulerParametersFlags(virDomainPtr dom,
5308
                                           virTypedParameterPtr params,
5309 5310
                                           int nparams,
                                           unsigned int flags)
5311 5312 5313 5314 5315
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
5316
    virDomainDefPtr persistentDef = NULL;
5317
    int ret = -1;
5318 5319
    bool isActive;

5320 5321
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);
5322

5323
    qemuDriverLock(driver);
5324 5325 5326 5327

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

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

5333 5334
    isActive = virDomainObjIsActive(vm);

5335
    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
5336
        if (isActive)
5337
            flags = VIR_DOMAIN_AFFECT_LIVE;
5338
        else
5339
            flags = VIR_DOMAIN_AFFECT_CONFIG;
5340 5341
    }

5342
    if ((flags & VIR_DOMAIN_AFFECT_CONFIG) && !vm->persistent) {
5343 5344
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("cannot change persistent config of a transient domain"));
5345 5346 5347
        goto cleanup;
    }

5348
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
5349 5350 5351 5352 5353 5354 5355 5356 5357 5358 5359 5360 5361 5362 5363 5364 5365 5366 5367
        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;
        }
    }

5368
    for (i = 0; i < nparams; i++) {
5369
        virTypedParameterPtr param = &params[i];
5370 5371 5372

        if (STREQ(param->field, "cpu_shares")) {
            int rc;
5373
            if (param->type != VIR_TYPED_PARAM_ULLONG) {
5374 5375
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for cpu_shares tunable, expected a 'ullong'"));
5376 5377 5378
                goto cleanup;
            }

5379
            if (flags & VIR_DOMAIN_AFFECT_LIVE) {
5380 5381 5382 5383 5384 5385 5386 5387
                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;
5388
            }
5389

5390
            if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
5391 5392 5393 5394 5395 5396 5397 5398 5399 5400 5401 5402 5403 5404
                persistentDef = virDomainObjGetPersistentDef(driver->caps, vm);
                if (!persistentDef) {
                    qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                                    _("can't get persistentDef"));
                    goto cleanup;
                }
                persistentDef->cputune.shares = params[i].value.ul;
                rc = virDomainSaveConfig(driver->configDir, persistentDef);
                if (rc) {
                    qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                                    _("can't save config"));
                    goto cleanup;
                }
            }
5405
        } else {
5406 5407
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("Invalid parameter `%s'"), param->field);
5408 5409 5410
            goto cleanup;
        }
    }
5411

5412 5413 5414 5415 5416 5417
    ret = 0;

cleanup:
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
5418
    qemuDriverUnlock(driver);
5419 5420 5421
    return ret;
}

5422
static int qemuSetSchedulerParameters(virDomainPtr dom,
5423
                                      virTypedParameterPtr params,
5424 5425 5426 5427 5428
                                      int nparams)
{
    return qemuSetSchedulerParametersFlags(dom,
                                           params,
                                           nparams,
5429
                                           VIR_DOMAIN_AFFECT_LIVE);
5430 5431
}

5432 5433 5434 5435 5436
static int
qemuGetSchedulerParametersFlags(virDomainPtr dom,
                                virTypedParameterPtr params,
                                int *nparams,
                                unsigned int flags)
5437 5438 5439 5440 5441 5442 5443
{
    struct qemud_driver *driver = dom->conn->privateData;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
    unsigned long long val;
    int ret = -1;
    int rc;
5444
    bool isActive;
5445

5446 5447
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);
5448

5449 5450
    if ((flags & (VIR_DOMAIN_AFFECT_LIVE | VIR_DOMAIN_AFFECT_CONFIG)) ==
        (VIR_DOMAIN_AFFECT_LIVE | VIR_DOMAIN_AFFECT_CONFIG)) {
5451 5452
        qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                        _("cannot query live and config together"));
5453
        goto cleanup;
5454 5455
    }

5456
    if (*nparams < 1) {
5457 5458
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("Invalid parameter count"));
5459
        goto cleanup;
5460 5461
    }

5462
    qemuDriverLock(driver);
5463 5464 5465
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);

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

5471 5472
    isActive = virDomainObjIsActive(vm);

5473
    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
5474
        if (isActive)
5475
            flags = VIR_DOMAIN_AFFECT_LIVE;
5476
        else
5477
            flags = VIR_DOMAIN_AFFECT_CONFIG;
5478 5479
    }

5480
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
5481 5482 5483 5484 5485 5486 5487 5488 5489 5490 5491 5492 5493 5494 5495 5496 5497 5498 5499
        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;
            }
            val = persistentDef->cputune.shares;
        } else {
            val = vm->def->cputune.shares;
        }
5500
        goto out;
5501 5502
    }

5503 5504 5505 5506 5507 5508 5509 5510 5511 5512 5513 5514
    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;
    }

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

    rc = virCgroupGetCpuShares(group, &val);
    if (rc != 0) {
5523
        virReportSystemError(-rc, "%s",
5524 5525 5526
                             _("unable to get cpu shares tunable"));
        goto cleanup;
    }
5527
out:
5528
    params[0].value.ul = val;
5529
    params[0].type = VIR_TYPED_PARAM_ULLONG;
C
Chris Lalancette 已提交
5530
    if (virStrcpyStatic(params[0].field, "cpu_shares") == NULL) {
5531 5532
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("Field cpu_shares too long for destination"));
C
Chris Lalancette 已提交
5533 5534
        goto cleanup;
    }
5535

5536
    *nparams = 1;
5537 5538 5539 5540 5541 5542
    ret = 0;

cleanup:
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
5543
    qemuDriverUnlock(driver);
5544 5545 5546
    return ret;
}

5547 5548 5549 5550 5551 5552
static int
qemuGetSchedulerParameters(virDomainPtr dom,
                           virTypedParameterPtr params,
                           int *nparams)
{
    return qemuGetSchedulerParametersFlags(dom, params, nparams,
5553
                                           VIR_DOMAIN_AFFECT_CURRENT);
5554
}
5555

5556 5557 5558 5559 5560 5561 5562 5563 5564
/* 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
qemudDomainBlockStats (virDomainPtr dom,
                       const char *path,
                       struct _virDomainBlockStats *stats)
{
5565
    struct qemud_driver *driver = dom->conn->privateData;
5566
    int i, ret = -1;
5567
    virDomainObjPtr vm;
5568
    virDomainDiskDefPtr disk = NULL;
5569
    qemuDomainObjPrivatePtr priv;
5570

5571
    qemuDriverLock(driver);
5572
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
5573
    qemuDriverUnlock(driver);
5574
    if (!vm) {
5575 5576
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
5577 5578
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
5579
        goto cleanup;
5580
    }
5581

5582 5583 5584 5585 5586 5587
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

5588 5589 5590 5591 5592 5593 5594 5595
    for (i = 0 ; i < vm->def->ndisks ; i++) {
        if (STREQ(path, vm->def->disks[i]->dst)) {
            disk = vm->def->disks[i];
            break;
        }
    }

    if (!disk) {
5596 5597
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path: %s"), path);
5598
        goto cleanup;
5599 5600
    }

5601
    if (!disk->info.alias) {
5602 5603
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("missing disk device alias name for %s"), disk->dst);
5604
        goto cleanup;
5605
    }
5606

5607
    priv = vm->privateData;
5608 5609 5610 5611 5612 5613 5614 5615 5616 5617 5618 5619 5620 5621 5622 5623 5624 5625 5626 5627 5628 5629 5630 5631 5632 5633 5634 5635 5636 5637 5638 5639 5640 5641 5642
    if ((priv->jobActive == QEMU_JOB_MIGRATION_OUT)
        || (priv->jobActive == QEMU_JOB_SAVE)) {
        virDomainObjRef(vm);
        while (priv->jobSignals & QEMU_JOB_SIGNAL_BLKSTAT)
            ignore_value(virCondWait(&priv->signalCond, &vm->lock));

        priv->jobSignalsData.statDevName = disk->info.alias;
        priv->jobSignalsData.blockStat = stats;
        priv->jobSignalsData.statRetCode = &ret;
        priv->jobSignals |= QEMU_JOB_SIGNAL_BLKSTAT;

        while (priv->jobSignals & QEMU_JOB_SIGNAL_BLKSTAT)
            ignore_value(virCondWait(&priv->signalCond, &vm->lock));

        if (virDomainObjUnref(vm) == 0)
            vm = NULL;
    } else {
        if (qemuDomainObjBeginJob(vm) < 0)
            goto cleanup;

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

        qemuDomainObjEnterMonitor(vm);
        ret = qemuMonitorGetBlockStatsInfo(priv->mon,
                                           disk->info.alias,
                                           &stats->rd_req,
                                           &stats->rd_bytes,
                                           &stats->wr_req,
                                           &stats->wr_bytes,
                                           &stats->errs);
        qemuDomainObjExitMonitor(vm);
5643

5644
endjob:
5645 5646 5647
        if (qemuDomainObjEndJob(vm) == 0)
            vm = NULL;
    }
5648

5649
cleanup:
5650 5651
    if (vm)
        virDomainObjUnlock(vm);
5652
    return ret;
5653 5654
}

5655
#ifdef __linux__
5656 5657 5658 5659 5660
static int
qemudDomainInterfaceStats (virDomainPtr dom,
                           const char *path,
                           struct _virDomainInterfaceStats *stats)
{
5661 5662
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
5663
    int i;
5664
    int ret = -1;
5665

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

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

D
Daniel P. Berrange 已提交
5678
    if (!virDomainObjIsActive(vm)) {
5679 5680
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
5681
        goto cleanup;
5682 5683 5684
    }

    /* Check the path is one of the domain's network interfaces. */
5685 5686
    for (i = 0 ; i < vm->def->nnets ; i++) {
        if (vm->def->nets[i]->ifname &&
5687 5688 5689 5690
            STREQ (vm->def->nets[i]->ifname, path)) {
            ret = 0;
            break;
        }
5691 5692
    }

5693
    if (ret == 0)
5694
        ret = linuxDomainInterfaceStats(path, stats);
5695
    else
5696 5697
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path, '%s' is not a known interface"), path);
5698

5699
cleanup:
5700 5701
    if (vm)
        virDomainObjUnlock(vm);
5702 5703
    return ret;
}
5704
#else
5705 5706 5707 5708
static int
qemudDomainInterfaceStats (virDomainPtr dom,
                           const char *path ATTRIBUTE_UNUSED,
                           struct _virDomainInterfaceStats *stats ATTRIBUTE_UNUSED)
5709
{
5710 5711
    qemuReportError(VIR_ERR_NO_SUPPORT,
                    "%s", __FUNCTION__);
5712 5713
    return -1;
}
5714
#endif
5715

5716 5717 5718 5719 5720 5721 5722 5723 5724 5725 5726 5727 5728 5729 5730 5731
static int
qemudDomainMemoryStats (virDomainPtr dom,
                        struct _virDomainMemoryStat *stats,
                        unsigned int nr_stats)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    unsigned int ret = -1;

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

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

5737 5738 5739
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

5740 5741 5742
    if (virDomainObjIsActive(vm)) {
        qemuDomainObjPrivatePtr priv = vm->privateData;
        qemuDomainObjEnterMonitor(vm);
5743
        ret = qemuMonitorGetMemoryStats(priv->mon, stats, nr_stats);
5744 5745
        qemuDomainObjExitMonitor(vm);
    } else {
5746 5747
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
5748 5749
    }

5750 5751 5752
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

5753 5754 5755 5756 5757 5758
cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}

5759 5760 5761 5762 5763 5764 5765
static int
qemudDomainBlockPeek (virDomainPtr dom,
                      const char *path,
                      unsigned long long offset, size_t size,
                      void *buffer,
                      unsigned int flags ATTRIBUTE_UNUSED)
{
5766 5767 5768
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int fd = -1, ret = -1, i;
5769

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

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 (!path || path[0] == '\0') {
5783 5784
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("NULL or empty path"));
5785
        goto cleanup;
5786 5787 5788
    }

    /* Check the path belongs to this domain. */
5789 5790
    for (i = 0 ; i < vm->def->ndisks ; i++) {
        if (vm->def->disks[i]->src != NULL &&
5791 5792 5793 5794
            STREQ (vm->def->disks[i]->src, path)) {
            ret = 0;
            break;
        }
5795 5796
    }

5797 5798 5799 5800 5801
    if (ret == 0) {
        ret = -1;
        /* The path is correct, now try to open it and get its size. */
        fd = open (path, O_RDONLY);
        if (fd == -1) {
5802 5803
            virReportSystemError(errno,
                                 _("%s: failed to open"), path);
5804 5805
            goto cleanup;
        }
5806

5807 5808 5809 5810 5811 5812
        /* 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) {
5813 5814
            virReportSystemError(errno,
                                 _("%s: failed to seek or read"), path);
5815 5816 5817 5818 5819
            goto cleanup;
        }

        ret = 0;
    } else {
5820 5821
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("invalid path"));
5822 5823
    }

5824
cleanup:
5825
    VIR_FORCE_CLOSE(fd);
5826 5827
    if (vm)
        virDomainObjUnlock(vm);
5828 5829 5830
    return ret;
}

R
Richard W.M. Jones 已提交
5831 5832 5833 5834 5835 5836
static int
qemudDomainMemoryPeek (virDomainPtr dom,
                       unsigned long long offset, size_t size,
                       void *buffer,
                       unsigned int flags)
{
5837 5838
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
5839
    char *tmp = NULL;
R
Richard W.M. Jones 已提交
5840
    int fd = -1, ret = -1;
5841
    qemuDomainObjPrivatePtr priv;
R
Richard W.M. Jones 已提交
5842

5843
    qemuDriverLock(driver);
5844
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
5845
    qemuDriverUnlock(driver);
R
Richard W.M. Jones 已提交
5846 5847

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

5855
    if (flags != VIR_MEMORY_VIRTUAL && flags != VIR_MEMORY_PHYSICAL) {
5856 5857
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("flags parameter must be VIR_MEMORY_VIRTUAL or VIR_MEMORY_PHYSICAL"));
5858
        goto cleanup;
R
Richard W.M. Jones 已提交
5859 5860
    }

5861 5862 5863
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

D
Daniel P. Berrange 已提交
5864
    if (!virDomainObjIsActive(vm)) {
5865 5866
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
5867
        goto endjob;
R
Richard W.M. Jones 已提交
5868 5869
    }

5870
    if (virAsprintf(&tmp, "%s/qemu.mem.XXXXXX", driver->cacheDir) < 0) {
5871
        virReportOOMError();
5872
        goto endjob;
5873 5874
    }

R
Richard W.M. Jones 已提交
5875 5876
    /* Create a temporary filename. */
    if ((fd = mkstemp (tmp)) == -1) {
5877 5878
        virReportSystemError(errno,
                             _("mkstemp(\"%s\") failed"), tmp);
5879
        goto endjob;
R
Richard W.M. Jones 已提交
5880 5881
    }

5882 5883
    virSecurityManagerSetSavedStateLabel(qemu_driver->securityManager, vm, tmp);

5884
    priv = vm->privateData;
5885
    qemuDomainObjEnterMonitor(vm);
5886
    if (flags == VIR_MEMORY_VIRTUAL) {
5887 5888
        if (qemuMonitorSaveVirtualMemory(priv->mon, offset, size, tmp) < 0) {
            qemuDomainObjExitMonitor(vm);
5889
            goto endjob;
5890
        }
5891
    } else {
5892 5893
        if (qemuMonitorSavePhysicalMemory(priv->mon, offset, size, tmp) < 0) {
            qemuDomainObjExitMonitor(vm);
5894
            goto endjob;
5895
        }
R
Richard W.M. Jones 已提交
5896
    }
5897
    qemuDomainObjExitMonitor(vm);
R
Richard W.M. Jones 已提交
5898 5899 5900

    /* Read the memory file into buffer. */
    if (saferead (fd, buffer, size) == (ssize_t) -1) {
5901 5902 5903
        virReportSystemError(errno,
                             _("failed to read temporary file "
                               "created with template %s"), tmp);
5904
        goto endjob;
R
Richard W.M. Jones 已提交
5905 5906 5907
    }

    ret = 0;
5908

5909
endjob:
5910 5911
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
5912

5913
cleanup:
5914
    VIR_FORCE_CLOSE(fd);
5915 5916
    if (tmp)
        unlink(tmp);
W
Wen Congyang 已提交
5917
    VIR_FREE(tmp);
5918 5919
    if (vm)
        virDomainObjUnlock(vm);
R
Richard W.M. Jones 已提交
5920 5921 5922
    return ret;
}

5923

5924 5925 5926 5927 5928 5929 5930 5931 5932 5933
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;
    virStorageFileMetadata meta;
5934
    virDomainDiskDefPtr disk = NULL;
5935 5936
    struct stat sb;
    int i;
5937
    int format;
5938 5939 5940 5941 5942 5943 5944 5945 5946 5947 5948 5949 5950 5951 5952 5953 5954 5955 5956 5957 5958 5959 5960 5961

    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. */
    for (i = 0 ; i < vm->def->ndisks ; i++) {
        if (vm->def->disks[i]->src != NULL &&
            STREQ (vm->def->disks[i]->src, path)) {
5962
            disk = vm->def->disks[i];
5963 5964 5965 5966
            break;
        }
    }

5967
    if (!disk) {
5968 5969 5970 5971 5972 5973 5974 5975 5976 5977 5978 5979 5980 5981
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path %s not assigned to domain"), path);
        goto cleanup;
    }

    /* The path is correct, now try to open it and get its size. */
    fd = open (path, O_RDONLY);
    if (fd == -1) {
        virReportSystemError(errno,
                             _("failed to open path '%s'"), path);
        goto cleanup;
    }

    /* Probe for magic formats */
5982 5983 5984 5985 5986 5987 5988 5989
    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 {
5990 5991 5992 5993 5994 5995 5996
        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);
5997
            goto cleanup;
5998
        }
5999 6000 6001 6002 6003
    }

    if (virStorageFileGetMetadataFromFD(path, fd,
                                        format,
                                        &meta) < 0)
6004 6005 6006 6007 6008 6009 6010 6011 6012 6013
        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)) {
6014
#ifndef WIN32
6015 6016 6017 6018 6019 6020 6021 6022 6023 6024 6025 6026 6027 6028 6029 6030 6031 6032 6033 6034 6035 6036 6037 6038 6039 6040 6041 6042
        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.
         */
        end = lseek (fd, 0, SEEK_END);
        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 */
    if (meta.capacity)
        info->capacity = meta.capacity;

6043
    /* Set default value .. */
6044 6045
    info->allocation = info->physical;

6046 6047 6048
    /* ..but if guest is running & not using raw
       disk format and on a block device, then query
       highest allocated extent from QEMU */
6049
    if (disk->type == VIR_DOMAIN_DISK_TYPE_BLOCK &&
6050
        format != VIR_STORAGE_FILE_RAW &&
6051 6052
        S_ISBLK(sb.st_mode) &&
        virDomainObjIsActive(vm)) {
6053
        qemuDomainObjPrivatePtr priv = vm->privateData;
6054 6055 6056 6057 6058 6059 6060 6061 6062 6063 6064 6065 6066 6067 6068 6069 6070 6071 6072 6073 6074

        if ((priv->jobActive == QEMU_JOB_MIGRATION_OUT)
            || (priv->jobActive == QEMU_JOB_SAVE)) {
            virDomainObjRef(vm);
            while (priv->jobSignals & QEMU_JOB_SIGNAL_BLKINFO)
                ignore_value(virCondWait(&priv->signalCond, &vm->lock));

            priv->jobSignalsData.infoDevName = disk->info.alias;
            priv->jobSignalsData.blockInfo = info;
            priv->jobSignalsData.infoRetCode = &ret;
            priv->jobSignals |= QEMU_JOB_SIGNAL_BLKINFO;

            while (priv->jobSignals & QEMU_JOB_SIGNAL_BLKINFO)
                ignore_value(virCondWait(&priv->signalCond, &vm->lock));

            if (virDomainObjUnref(vm) == 0)
                vm = NULL;
        } else {
            if (qemuDomainObjBeginJob(vm) < 0)
                goto cleanup;

6075 6076 6077 6078 6079 6080 6081 6082
            if (virDomainObjIsActive(vm)) {
                qemuDomainObjEnterMonitor(vm);
                ret = qemuMonitorGetBlockExtent(priv->mon,
                                                disk->info.alias,
                                                &info->allocation);
                qemuDomainObjExitMonitor(vm);
            } else {
                ret = 0;
6083 6084 6085 6086 6087
            }

            if (qemuDomainObjEndJob(vm) == 0)
                vm = NULL;
        }
6088 6089 6090
    } else {
        ret = 0;
    }
6091 6092

cleanup:
6093
    VIR_FORCE_CLOSE(fd);
6094 6095 6096 6097 6098 6099
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}


6100
static int
6101 6102 6103 6104
qemuDomainEventRegister(virConnectPtr conn,
                        virConnectDomainEventCallback callback,
                        void *opaque,
                        virFreeCallback freecb)
6105
{
6106 6107 6108
    struct qemud_driver *driver = conn->privateData;
    int ret;

6109
    qemuDriverLock(driver);
6110 6111
    ret = virDomainEventCallbackListAdd(conn,
                                        driver->domainEventState->callbacks,
6112
                                        callback, opaque, freecb);
6113
    qemuDriverUnlock(driver);
6114

6115
    return ret;
6116 6117
}

6118

6119
static int
6120 6121
qemuDomainEventDeregister(virConnectPtr conn,
                          virConnectDomainEventCallback callback)
6122
{
6123 6124 6125
    struct qemud_driver *driver = conn->privateData;
    int ret;

6126
    qemuDriverLock(driver);
6127 6128 6129
    ret = virDomainEventStateDeregister(conn,
                                        driver->domainEventState,
                                        callback);
6130
    qemuDriverUnlock(driver);
6131

6132
    return ret;
6133 6134
}

6135 6136 6137 6138 6139 6140 6141 6142 6143 6144 6145 6146 6147 6148

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,
6149
                                          driver->domainEventState->callbacks,
6150 6151 6152 6153 6154 6155 6156 6157 6158 6159 6160 6161 6162 6163 6164 6165
                                          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);
6166 6167 6168
    ret = virDomainEventStateDeregisterAny(conn,
                                           driver->domainEventState,
                                           callbackID);
6169 6170 6171 6172 6173 6174
    qemuDriverUnlock(driver);

    return ret;
}


6175 6176 6177
/*******************************************************************
 * Migration Protocol Version 2
 *******************************************************************/
D
Daniel Veillard 已提交
6178

C
Chris Lalancette 已提交
6179 6180 6181 6182 6183 6184 6185 6186 6187 6188 6189 6190 6191 6192 6193
/* 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;
6194

6195 6196 6197 6198 6199 6200 6201 6202 6203
    virCheckFlags(VIR_MIGRATE_LIVE |
                  VIR_MIGRATE_PEER2PEER |
                  VIR_MIGRATE_TUNNELLED |
                  VIR_MIGRATE_PERSIST_DEST |
                  VIR_MIGRATE_UNDEFINE_SOURCE |
                  VIR_MIGRATE_PAUSED |
                  VIR_MIGRATE_NON_SHARED_DISK |
                  VIR_MIGRATE_NON_SHARED_INC, -1);

6204 6205
    qemuDriverLock(driver);

C
Chris Lalancette 已提交
6206
    if (!dom_xml) {
6207 6208
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("no domain XML passed"));
C
Chris Lalancette 已提交
6209 6210 6211
        goto cleanup;
    }
    if (!(flags & VIR_MIGRATE_TUNNELLED)) {
6212
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
C
Chris Lalancette 已提交
6213 6214 6215 6216
                         "%s", _("PrepareTunnel called but no TUNNELLED flag set"));
        goto cleanup;
    }
    if (st == NULL) {
6217 6218
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("tunnelled migration requested but NULL stream passed"));
C
Chris Lalancette 已提交
6219 6220 6221
        goto cleanup;
    }

6222 6223 6224 6225 6226 6227 6228
    if (virLockManagerPluginUsesState(driver->lockManager)) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("Cannot use migrate v2 protocol with lock manager %s"),
                        virLockManagerPluginGetName(driver->lockManager));
        goto cleanup;
    }

6229 6230 6231
    ret = qemuMigrationPrepareTunnel(driver, dconn,
                                     NULL, 0, NULL, NULL, /* No cookies in v2 */
                                     st, dname, dom_xml);
6232

C
Chris Lalancette 已提交
6233
cleanup:
6234
    qemuDriverUnlock(driver);
C
Chris Lalancette 已提交
6235 6236 6237
    return ret;
}

D
Daniel Veillard 已提交
6238 6239 6240 6241
/* Prepare is the first step, and it runs on the destination host.
 *
 * This starts an empty VM listening on a TCP port.
 */
6242
static int ATTRIBUTE_NONNULL (5)
D
Daniel Veillard 已提交
6243
qemudDomainMigratePrepare2 (virConnectPtr dconn,
6244 6245
                            char **cookie ATTRIBUTE_UNUSED,
                            int *cookielen ATTRIBUTE_UNUSED,
D
Daniel Veillard 已提交
6246 6247
                            const char *uri_in,
                            char **uri_out,
C
Chris Lalancette 已提交
6248
                            unsigned long flags,
D
Daniel Veillard 已提交
6249 6250 6251 6252
                            const char *dname,
                            unsigned long resource ATTRIBUTE_UNUSED,
                            const char *dom_xml)
{
6253
    struct qemud_driver *driver = dconn->privateData;
6254
    int ret = -1;
6255

C
Chris Lalancette 已提交
6256 6257 6258 6259 6260 6261 6262 6263 6264
    virCheckFlags(VIR_MIGRATE_LIVE |
                  VIR_MIGRATE_PEER2PEER |
                  VIR_MIGRATE_TUNNELLED |
                  VIR_MIGRATE_PERSIST_DEST |
                  VIR_MIGRATE_UNDEFINE_SOURCE |
                  VIR_MIGRATE_PAUSED |
                  VIR_MIGRATE_NON_SHARED_DISK |
                  VIR_MIGRATE_NON_SHARED_INC, -1);

6265
    *uri_out = NULL;
D
Daniel Veillard 已提交
6266

6267
    qemuDriverLock(driver);
6268 6269 6270 6271 6272 6273 6274 6275

    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 已提交
6276 6277 6278 6279
    if (flags & VIR_MIGRATE_TUNNELLED) {
        /* this is a logical error; we never should have gotten here with
         * VIR_MIGRATE_TUNNELLED set
         */
6280 6281
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("Tunnelled migration requested but invalid RPC method called"));
C
Chris Lalancette 已提交
6282 6283 6284
        goto cleanup;
    }

D
Daniel Veillard 已提交
6285
    if (!dom_xml) {
6286 6287
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("no domain XML passed"));
6288
        goto cleanup;
D
Daniel Veillard 已提交
6289 6290
    }

6291 6292 6293 6294
    /* Do not use cookies in v2 protocol, since the cookie
     * length was not sufficiently large, causing failures
     * migrating between old & new libvirtd
     */
6295
    ret = qemuMigrationPrepareDirect(driver, dconn,
6296
                                     NULL, 0, NULL, NULL, /* No cookies */
6297 6298
                                     uri_in, uri_out,
                                     dname, dom_xml);
D
Daniel Veillard 已提交
6299

6300 6301 6302 6303
cleanup:
    qemuDriverUnlock(driver);
    return ret;
}
C
Chris Lalancette 已提交
6304

D
Daniel Veillard 已提交
6305

6306 6307 6308
/* Perform is the second step, and it runs on the source host. */
static int
qemudDomainMigratePerform (virDomainPtr dom,
6309 6310
                           const char *cookie,
                           int cookielen,
6311 6312 6313 6314 6315 6316 6317 6318
                           const char *uri,
                           unsigned long flags,
                           const char *dname,
                           unsigned long resource)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
6319
    const char *dconnuri = NULL;
6320

6321 6322 6323 6324 6325 6326 6327 6328
    virCheckFlags(VIR_MIGRATE_LIVE |
                  VIR_MIGRATE_PEER2PEER |
                  VIR_MIGRATE_TUNNELLED |
                  VIR_MIGRATE_PERSIST_DEST |
                  VIR_MIGRATE_UNDEFINE_SOURCE |
                  VIR_MIGRATE_PAUSED |
                  VIR_MIGRATE_NON_SHARED_DISK |
                  VIR_MIGRATE_NON_SHARED_INC, -1);
C
Chris Lalancette 已提交
6329

6330
    qemuDriverLock(driver);
6331 6332 6333 6334 6335 6336 6337
    if (virLockManagerPluginUsesState(driver->lockManager)) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("Cannot use migrate v2 protocol with lock manager %s"),
                        virLockManagerPluginGetName(driver->lockManager));
        goto cleanup;
    }

6338
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
D
Daniel Veillard 已提交
6339
    if (!vm) {
6340 6341
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
6342 6343
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
6344
        goto cleanup;
D
Daniel Veillard 已提交
6345 6346
    }

6347 6348 6349 6350 6351
    if (flags & VIR_MIGRATE_PEER2PEER) {
        dconnuri = uri;
        uri = NULL;
    }

6352 6353 6354 6355 6356 6357
    /* 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
     */
6358
    ret = qemuMigrationPerform(driver, dom->conn, vm,
6359
                               NULL, dconnuri, uri, cookie, cookielen,
6360
                               NULL, NULL, /* No output cookies in v2 */
6361
                               flags, dname, resource, false);
6362

6363
cleanup:
6364
    qemuDriverUnlock(driver);
6365
    return ret;
D
Daniel Veillard 已提交
6366 6367
}

6368

D
Daniel Veillard 已提交
6369 6370 6371 6372 6373 6374 6375
/* 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 已提交
6376
                           unsigned long flags,
D
Daniel Veillard 已提交
6377 6378
                           int retcode)
{
6379 6380 6381
    struct qemud_driver *driver = dconn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;
D
Daniel Veillard 已提交
6382

C
Chris Lalancette 已提交
6383 6384 6385 6386 6387 6388 6389 6390 6391
    virCheckFlags(VIR_MIGRATE_LIVE |
                  VIR_MIGRATE_PEER2PEER |
                  VIR_MIGRATE_TUNNELLED |
                  VIR_MIGRATE_PERSIST_DEST |
                  VIR_MIGRATE_UNDEFINE_SOURCE |
                  VIR_MIGRATE_PAUSED |
                  VIR_MIGRATE_NON_SHARED_DISK |
                  VIR_MIGRATE_NON_SHARED_INC, NULL);

6392
    qemuDriverLock(driver);
6393
    vm = virDomainFindByName(&driver->domains, dname);
D
Daniel Veillard 已提交
6394
    if (!vm) {
6395 6396
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching name '%s'"), dname);
6397
        goto cleanup;
D
Daniel Veillard 已提交
6398 6399
    }

6400 6401 6402 6403
    /* Do not use cookies in v2 protocol, since the cookie
     * length was not sufficiently large, causing failures
     * migrating between old & new libvirtd
     */
6404
    dom = qemuMigrationFinish(driver, dconn, vm,
6405
                              NULL, 0, NULL, NULL, /* No cookies */
6406
                              flags, retcode, false);
6407

6408
cleanup:
6409
    qemuDriverUnlock(driver);
6410
    return dom;
D
Daniel Veillard 已提交
6411 6412
}

6413

6414 6415 6416 6417 6418 6419
/*******************************************************************
 * Migration Protocol Version 3
 *******************************************************************/

static char *
qemuDomainMigrateBegin3(virDomainPtr domain,
6420
                        const char *xmlin,
6421 6422 6423 6424 6425 6426 6427 6428 6429 6430 6431 6432 6433 6434 6435 6436 6437 6438 6439 6440 6441 6442 6443 6444 6445 6446 6447 6448 6449
                        char **cookieout,
                        int *cookieoutlen,
                        unsigned long flags,
                        const char *dname ATTRIBUTE_UNUSED,
                        unsigned long resource ATTRIBUTE_UNUSED)
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    char *xml = NULL;

    virCheckFlags(VIR_MIGRATE_LIVE |
                  VIR_MIGRATE_PEER2PEER |
                  VIR_MIGRATE_TUNNELLED |
                  VIR_MIGRATE_PERSIST_DEST |
                  VIR_MIGRATE_UNDEFINE_SOURCE |
                  VIR_MIGRATE_PAUSED |
                  VIR_MIGRATE_NON_SHARED_DISK |
                  VIR_MIGRATE_NON_SHARED_INC, NULL);

    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;
    }

6450
    xml = qemuMigrationBegin(driver, vm, xmlin,
6451 6452 6453 6454 6455 6456 6457 6458 6459 6460 6461 6462 6463 6464 6465 6466 6467 6468 6469 6470 6471 6472 6473 6474 6475 6476 6477 6478 6479 6480 6481 6482 6483 6484 6485 6486 6487 6488 6489 6490 6491 6492 6493 6494 6495 6496 6497 6498 6499 6500 6501 6502 6503 6504 6505 6506 6507 6508 6509 6510 6511 6512 6513 6514 6515 6516 6517 6518 6519 6520 6521 6522 6523 6524 6525 6526 6527 6528 6529 6530 6531 6532 6533 6534 6535 6536 6537 6538 6539 6540 6541 6542 6543 6544 6545 6546 6547 6548 6549 6550 6551 6552 6553 6554 6555 6556 6557 6558 6559 6560 6561 6562 6563 6564 6565 6566
                             cookieout, cookieoutlen);

cleanup:
    qemuDriverUnlock(driver);
    return xml;
}

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;

    virCheckFlags(VIR_MIGRATE_LIVE |
                  VIR_MIGRATE_PEER2PEER |
                  VIR_MIGRATE_TUNNELLED |
                  VIR_MIGRATE_PERSIST_DEST |
                  VIR_MIGRATE_UNDEFINE_SOURCE |
                  VIR_MIGRATE_PAUSED |
                  VIR_MIGRATE_NON_SHARED_DISK |
                  VIR_MIGRATE_NON_SHARED_INC, -1);

    *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;

    virCheckFlags(VIR_MIGRATE_LIVE |
                  VIR_MIGRATE_PEER2PEER |
                  VIR_MIGRATE_TUNNELLED |
                  VIR_MIGRATE_PERSIST_DEST |
                  VIR_MIGRATE_UNDEFINE_SOURCE |
                  VIR_MIGRATE_PAUSED |
                  VIR_MIGRATE_NON_SHARED_DISK |
                  VIR_MIGRATE_NON_SHARED_INC, -1);

    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,
6567
                          const char *xmlin,
6568 6569 6570 6571
                          const char *cookiein,
                          int cookieinlen,
                          char **cookieout,
                          int *cookieoutlen,
6572
                          const char *dconnuri,
6573 6574 6575 6576 6577 6578 6579 6580 6581 6582 6583 6584 6585 6586 6587 6588 6589 6590 6591 6592 6593 6594 6595 6596 6597 6598 6599 6600
                          const char *uri,
                          unsigned long flags,
                          const char *dname,
                          unsigned long resource)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;

    virCheckFlags(VIR_MIGRATE_LIVE |
                  VIR_MIGRATE_PEER2PEER |
                  VIR_MIGRATE_TUNNELLED |
                  VIR_MIGRATE_PERSIST_DEST |
                  VIR_MIGRATE_UNDEFINE_SOURCE |
                  VIR_MIGRATE_PAUSED |
                  VIR_MIGRATE_NON_SHARED_DISK |
                  VIR_MIGRATE_NON_SHARED_INC, -1);

    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;
    }

6601
    ret = qemuMigrationPerform(driver, dom->conn, vm, xmlin,
6602
                               dconnuri, uri, cookiein, cookieinlen,
6603
                               cookieout, cookieoutlen,
6604
                               flags, dname, resource, true);
6605 6606 6607 6608 6609 6610 6611

cleanup:
    qemuDriverUnlock(driver);
    return ret;
}


6612
static virDomainPtr
6613 6614 6615 6616 6617 6618
qemuDomainMigrateFinish3(virConnectPtr dconn,
                         const char *dname,
                         const char *cookiein,
                         int cookieinlen,
                         char **cookieout,
                         int *cookieoutlen,
6619
                         const char *dconnuri ATTRIBUTE_UNUSED,
6620 6621
                         const char *uri ATTRIBUTE_UNUSED,
                         unsigned long flags,
6622
                         int cancelled)
6623 6624 6625
{
    struct qemud_driver *driver = dconn->privateData;
    virDomainObjPtr vm;
6626
    virDomainPtr dom = NULL;
6627 6628 6629 6630 6631 6632 6633 6634

    virCheckFlags(VIR_MIGRATE_LIVE |
                  VIR_MIGRATE_PEER2PEER |
                  VIR_MIGRATE_TUNNELLED |
                  VIR_MIGRATE_PERSIST_DEST |
                  VIR_MIGRATE_UNDEFINE_SOURCE |
                  VIR_MIGRATE_PAUSED |
                  VIR_MIGRATE_NON_SHARED_DISK |
6635
                  VIR_MIGRATE_NON_SHARED_INC, NULL);
6636 6637 6638 6639 6640 6641 6642 6643 6644

    qemuDriverLock(driver);
    vm = virDomainFindByName(&driver->domains, dname);
    if (!vm) {
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching name '%s'"), dname);
        goto cleanup;
    }

6645 6646 6647 6648
    dom = qemuMigrationFinish(driver, dconn, vm,
                              cookiein, cookieinlen,
                              cookieout, cookieoutlen,
                              flags, cancelled, true);
6649 6650 6651

cleanup:
    qemuDriverUnlock(driver);
6652
    return dom;
6653 6654 6655 6656 6657 6658 6659 6660 6661 6662 6663 6664 6665 6666 6667 6668 6669 6670 6671 6672 6673 6674 6675 6676 6677 6678 6679 6680 6681 6682 6683 6684
}

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;

    virCheckFlags(VIR_MIGRATE_LIVE |
                  VIR_MIGRATE_PEER2PEER |
                  VIR_MIGRATE_TUNNELLED |
                  VIR_MIGRATE_PERSIST_DEST |
                  VIR_MIGRATE_UNDEFINE_SOURCE |
                  VIR_MIGRATE_PAUSED |
                  VIR_MIGRATE_NON_SHARED_DISK |
                  VIR_MIGRATE_NON_SHARED_INC, -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;
    }

6685 6686 6687
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;

6688 6689
    ret = qemuMigrationConfirm(driver, domain->conn, vm,
                               cookiein, cookieinlen,
6690 6691 6692 6693 6694 6695 6696 6697 6698 6699 6700 6701
                               flags, cancelled);

    if (qemuDomainObjEndJob(vm) == 0) {
        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);
        virDomainRemoveInactive(&driver->domains, vm);
        vm = NULL;
    }

6702
cleanup:
6703 6704
    if (vm)
        virDomainObjUnlock(vm);
6705 6706 6707 6708 6709
    qemuDriverUnlock(driver);
    return ret;
}


6710 6711 6712 6713 6714 6715 6716 6717 6718 6719 6720 6721 6722 6723 6724 6725
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;

6726
    def = virNodeDeviceDefParseString(xml, EXISTING_DEVICE);
6727 6728 6729 6730 6731 6732 6733 6734 6735 6736 6737 6738 6739 6740 6741 6742 6743
    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) {
6744 6745
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("device %s is not a PCI device"), dev->name);
6746 6747 6748 6749 6750 6751 6752 6753 6754 6755 6756 6757 6758
        goto out;
    }

    ret = 0;
out:
    virNodeDeviceDefFree(def);
    VIR_FREE(xml);
    return ret;
}

static int
qemudNodeDeviceDettach (virNodeDevicePtr dev)
{
6759
    struct qemud_driver *driver = dev->conn->privateData;
6760 6761 6762 6763 6764 6765 6766
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

    if (qemudNodeDeviceGetPciInfo(dev, &domain, &bus, &slot, &function) < 0)
        return -1;

6767
    pci = pciGetDevice(domain, bus, slot, function);
6768 6769 6770
    if (!pci)
        return -1;

6771 6772
    qemuDriverLock(driver);
    if (pciDettachDevice(pci, driver->activePciHostdevs) < 0)
6773 6774 6775 6776
        goto out;

    ret = 0;
out:
6777
    qemuDriverUnlock(driver);
6778
    pciFreeDevice(pci);
6779 6780 6781 6782 6783 6784
    return ret;
}

static int
qemudNodeDeviceReAttach (virNodeDevicePtr dev)
{
6785
    struct qemud_driver *driver = dev->conn->privateData;
6786 6787 6788 6789 6790 6791 6792
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

    if (qemudNodeDeviceGetPciInfo(dev, &domain, &bus, &slot, &function) < 0)
        return -1;

6793
    pci = pciGetDevice(domain, bus, slot, function);
6794 6795 6796
    if (!pci)
        return -1;

6797 6798
    qemuDriverLock(driver);
    if (pciReAttachDevice(pci, driver->activePciHostdevs) < 0)
6799 6800 6801 6802
        goto out;

    ret = 0;
out:
6803
    qemuDriverUnlock(driver);
6804
    pciFreeDevice(pci);
6805 6806 6807 6808 6809 6810
    return ret;
}

static int
qemudNodeDeviceReset (virNodeDevicePtr dev)
{
6811
    struct qemud_driver *driver = dev->conn->privateData;
6812 6813 6814 6815 6816 6817 6818
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

    if (qemudNodeDeviceGetPciInfo(dev, &domain, &bus, &slot, &function) < 0)
        return -1;

6819
    pci = pciGetDevice(domain, bus, slot, function);
6820 6821 6822
    if (!pci)
        return -1;

6823 6824
    qemuDriverLock(driver);

6825
    if (pciResetDevice(pci, driver->activePciHostdevs, NULL) < 0)
6826 6827 6828 6829
        goto out;

    ret = 0;
out:
6830
    qemuDriverUnlock(driver);
6831
    pciFreeDevice(pci);
6832 6833 6834
    return ret;
}

6835 6836 6837 6838 6839 6840 6841 6842 6843 6844 6845
static int
qemuCPUCompare(virConnectPtr conn,
               const char *xmlDesc,
               unsigned int flags ATTRIBUTE_UNUSED)
{
    struct qemud_driver *driver = conn->privateData;
    int ret = VIR_CPU_COMPARE_ERROR;

    qemuDriverLock(driver);

    if (!driver->caps || !driver->caps->host.cpu) {
6846 6847
        qemuReportError(VIR_ERR_NO_SUPPORT,
                        "%s", _("cannot get host CPU capabilities"));
6848 6849
    }
    else
6850
        ret = cpuCompareXML(driver->caps->host.cpu, xmlDesc);
6851 6852 6853 6854 6855 6856

    qemuDriverUnlock(driver);

    return ret;
}

6857

6858 6859 6860 6861 6862 6863 6864 6865 6866 6867 6868 6869 6870
static char *
qemuCPUBaseline(virConnectPtr conn ATTRIBUTE_UNUSED,
                const char **xmlCPUs,
                unsigned int ncpus,
                unsigned int flags ATTRIBUTE_UNUSED)
{
    char *cpu;

    cpu = cpuBaselineXML(xmlCPUs, ncpus, NULL, 0);

    return cpu;
}

6871 6872 6873 6874 6875 6876 6877 6878 6879 6880 6881 6882 6883 6884 6885 6886 6887 6888 6889 6890 6891 6892 6893 6894

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)) {
        if (priv->jobActive) {
            memcpy(info, &priv->jobInfo, sizeof(*info));
6895 6896 6897 6898 6899 6900

            /* 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
             */
J
Jiri Denemark 已提交
6901
            if (virTimeMs(&info->timeElapsed) < 0)
6902
                goto cleanup;
J
Jiri Denemark 已提交
6903
            info->timeElapsed -= priv->jobStart;
6904 6905 6906 6907 6908 6909 6910 6911 6912 6913 6914 6915 6916 6917 6918 6919 6920 6921 6922
        } 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;
}


6923 6924 6925 6926 6927 6928 6929 6930 6931 6932 6933 6934 6935 6936 6937 6938 6939 6940 6941 6942 6943 6944
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;
    }

    priv = vm->privateData;

    if (virDomainObjIsActive(vm)) {
        if (priv->jobActive) {
            VIR_DEBUG("Requesting cancellation of job on vm %s", vm->def->name);
6945
            priv->jobSignals |= QEMU_JOB_SIGNAL_CANCEL;
6946 6947 6948 6949 6950 6951 6952 6953 6954 6955 6956 6957 6958 6959 6960 6961 6962 6963 6964 6965
        } else {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s", _("no job is active on the domain"));
            goto cleanup;
        }
    } else {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

    ret = 0;

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


6966 6967 6968 6969 6970 6971 6972 6973 6974 6975
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;

6976
    virCheckFlags(0, -1);
6977 6978 6979 6980 6981 6982 6983 6984 6985 6986 6987 6988 6989 6990 6991 6992 6993 6994 6995 6996

    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;
    }

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

    priv = vm->privateData;

6997
    if (priv->jobActive != QEMU_JOB_MIGRATION_OUT) {
6998 6999 7000 7001 7002 7003 7004
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not being migrated"));
        goto cleanup;
    }

    VIR_DEBUG("Requesting migration downtime change to %llums", downtime);
    priv->jobSignalsData.migrateDowntime = downtime;
7005
    priv->jobSignals |= QEMU_JOB_SIGNAL_MIGRATE_DOWNTIME;
7006 7007 7008 7009 7010 7011 7012 7013 7014
    ret = 0;

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

7015 7016 7017 7018 7019 7020 7021 7022 7023 7024 7025 7026 7027 7028 7029 7030 7031 7032 7033 7034 7035 7036 7037 7038 7039 7040 7041 7042 7043 7044 7045 7046 7047 7048 7049 7050 7051 7052 7053
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);

    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;

    if (priv->jobActive != QEMU_JOB_MIGRATION_OUT) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not being migrated"));
        goto cleanup;
    }

    VIR_DEBUG("Requesting migration speed change to %luMbs", bandwidth);
    priv->jobSignalsData.migrateBandwidth = bandwidth;
7054
    priv->jobSignals |= QEMU_JOB_SIGNAL_MIGRATE_SPEED;
7055 7056 7057 7058 7059 7060 7061 7062 7063
    ret = 0;

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

C
Chris Lalancette 已提交
7064 7065 7066 7067 7068 7069 7070 7071 7072 7073 7074 7075 7076 7077
static char *qemuFindQemuImgBinary(void)
{
    char *ret;

    ret = virFindFileInPath("kvm-img");
    if (ret == NULL)
        ret = virFindFileInPath("qemu-img");
    if (ret == NULL)
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("unable to find kvm-img or qemu-img"));

    return ret;
}

7078 7079 7080
static int qemuDomainSnapshotWriteMetadata(virDomainObjPtr vm,
                                           virDomainSnapshotObjPtr snapshot,
                                           char *snapshotDir)
C
Chris Lalancette 已提交
7081 7082 7083 7084 7085 7086 7087 7088 7089 7090
{
    int fd = -1;
    char *newxml = NULL;
    int ret = -1;
    char *snapDir = NULL;
    char *snapFile = NULL;
    int err;
    char uuidstr[VIR_UUID_STRING_BUFLEN];

    virUUIDFormat(vm->def->uuid, uuidstr);
7091
    newxml = virDomainSnapshotDefFormat(uuidstr, snapshot->def, 1);
C
Chris Lalancette 已提交
7092 7093 7094 7095 7096 7097 7098 7099 7100 7101 7102 7103 7104 7105 7106 7107
    if (newxml == NULL) {
        virReportOOMError();
        return -1;
    }

    if (virAsprintf(&snapDir, "%s/%s", snapshotDir, vm->def->name) < 0) {
        virReportOOMError();
        goto cleanup;
    }
    err = virFileMakePath(snapDir);
    if (err < 0) {
        virReportSystemError(err, _("cannot create snapshot directory '%s'"),
                             snapDir);
        goto cleanup;
    }

7108
    if (virAsprintf(&snapFile, "%s/%s.xml", snapDir, snapshot->def->name) < 0) {
C
Chris Lalancette 已提交
7109 7110 7111 7112 7113 7114 7115 7116 7117 7118 7119 7120 7121 7122 7123 7124 7125 7126 7127 7128 7129
        virReportOOMError();
        goto cleanup;
    }
    fd = open(snapFile, O_CREAT|O_TRUNC|O_WRONLY, S_IRUSR|S_IWUSR);
    if (fd < 0) {
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("failed to create snapshot file '%s'"), snapFile);
        goto cleanup;
    }
    if (safewrite(fd, newxml, strlen(newxml)) != strlen(newxml)) {
        virReportSystemError(errno, _("Failed to write snapshot data to %s"),
                             snapFile);
        goto cleanup;
    }

    ret = 0;

cleanup:
    VIR_FREE(snapFile);
    VIR_FREE(snapDir);
    VIR_FREE(newxml);
7130
    VIR_FORCE_CLOSE(fd);
C
Chris Lalancette 已提交
7131 7132 7133
    return ret;
}

7134 7135
static int qemuDomainSnapshotSetCurrentActive(virDomainObjPtr vm,
                                              char *snapshotDir)
C
Chris Lalancette 已提交
7136 7137 7138 7139
{
    if (vm->current_snapshot) {
        vm->current_snapshot->def->active = 1;

7140 7141
        return qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                               snapshotDir);
C
Chris Lalancette 已提交
7142 7143 7144 7145 7146
    }

    return 0;
}

7147 7148
static int qemuDomainSnapshotSetCurrentInactive(virDomainObjPtr vm,
                                                char *snapshotDir)
C
Chris Lalancette 已提交
7149 7150 7151 7152
{
    if (vm->current_snapshot) {
        vm->current_snapshot->def->active = 0;

7153 7154
        return qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                               snapshotDir);
C
Chris Lalancette 已提交
7155 7156 7157 7158 7159 7160 7161 7162 7163 7164 7165 7166 7167 7168 7169 7170 7171 7172 7173
    }

    return 0;
}


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,
7174 7175
                            _("Disk '%s' does not support snapshotting"),
                            vm->def->disks[i]->src);
C
Chris Lalancette 已提交
7176 7177 7178 7179 7180 7181 7182
            return 0;
        }
    }

    return 1;
}

7183 7184 7185 7186 7187 7188 7189 7190 7191 7192 7193 7194 7195 7196 7197 7198 7199 7200 7201 7202 7203 7204 7205 7206 7207 7208 7209 7210 7211 7212 7213 7214 7215 7216 7217 7218 7219 7220 7221 7222 7223 7224 7225 7226 7227 7228 7229 7230
/* The domain is expected to be locked and inactive. */
static int
qemuDomainSnapshotCreateInactive(virDomainObjPtr vm,
                                 virDomainSnapshotObjPtr snap)
{
    const char *qemuimgarg[] = { NULL, "snapshot", "-c", NULL, NULL, NULL };
    int ret = -1;
    int i;

    qemuimgarg[0] = qemuFindQemuImgBinary();
    if (qemuimgarg[0] == NULL) {
        /* qemuFindQemuImgBinary set the error */
        goto cleanup;
    }

    qemuimgarg[3] = snap->def->name;

    for (i = 0; i < vm->def->ndisks; i++) {
        /* FIXME: we also need to handle LVM here */
        /* FIXME: if we fail halfway through this loop, we are in an
         * inconsistent state.  I'm not quite sure what to do about that
         */
        if (vm->def->disks[i]->device == VIR_DOMAIN_DISK_DEVICE_DISK) {
            if (!vm->def->disks[i]->driverType ||
                STRNEQ(vm->def->disks[i]->driverType, "qcow2")) {
                qemuReportError(VIR_ERR_OPERATION_INVALID,
                                _("Disk device '%s' does not support"
                                  " snapshotting"),
                                vm->def->disks[i]->info.alias);
                goto cleanup;
            }

            qemuimgarg[4] = vm->def->disks[i]->src;

            if (virRun(qemuimgarg, NULL) < 0)
                goto cleanup;
        }
    }

    ret = 0;

cleanup:
    VIR_FREE(qemuimgarg[0]);
    return ret;
}

/* The domain is expected to be locked and active. */
static int
7231 7232
qemuDomainSnapshotCreateActive(virConnectPtr conn,
                               struct qemud_driver *driver,
7233 7234 7235 7236 7237
                               virDomainObjPtr *vmptr,
                               virDomainSnapshotObjPtr snap)
{
    virDomainObjPtr vm = *vmptr;
    qemuDomainObjPrivatePtr priv = vm->privateData;
7238 7239
    bool resume = false;
    int ret = -1;
7240 7241 7242 7243

    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        return -1;

J
Jiri Denemark 已提交
7244
    if (virDomainObjGetState(vm, NULL) == VIR_DOMAIN_RUNNING) {
7245 7246 7247 7248
        /* 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.
         */
J
Jiri Denemark 已提交
7249
        if (qemuProcessStopCPUs(driver, vm, VIR_DOMAIN_PAUSED_SAVE) < 0)
7250 7251 7252 7253 7254 7255 7256 7257 7258 7259
            goto cleanup;

        resume = true;
        if (!virDomainObjIsActive(vm)) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("guest unexpectedly quit"));
            goto cleanup;
        }
    }

7260 7261 7262 7263
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
    ret = qemuMonitorCreateSnapshot(priv->mon, snap->def->name);
    qemuDomainObjExitMonitorWithDriver(driver, vm);

7264 7265
cleanup:
    if (resume && virDomainObjIsActive(vm) &&
J
Jiri Denemark 已提交
7266 7267
        qemuProcessStartCPUs(driver, vm, conn,
                             VIR_DOMAIN_RUNNING_UNPAUSED) < 0 &&
7268 7269 7270 7271 7272
        virGetLastError() == NULL) {
        qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                        _("resuming after snapshot failed"));
    }

7273 7274 7275 7276 7277 7278
    if (qemuDomainObjEndJob(vm) == 0)
        *vmptr = NULL;

    return ret;
}

C
Chris Lalancette 已提交
7279 7280
static virDomainSnapshotPtr qemuDomainSnapshotCreateXML(virDomainPtr domain,
                                                        const char *xmlDesc,
7281
                                                        unsigned int flags)
C
Chris Lalancette 已提交
7282 7283 7284 7285 7286 7287 7288 7289
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    virDomainSnapshotObjPtr snap = NULL;
    virDomainSnapshotPtr snapshot = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];
    virDomainSnapshotDefPtr def;

7290 7291
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
7292 7293 7294 7295 7296 7297 7298 7299 7300 7301 7302 7303 7304 7305 7306 7307 7308 7309 7310 7311 7312 7313 7314 7315 7316
    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;
    }

    /* 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;

    if (!(def = virDomainSnapshotDefParseString(xmlDesc, 1)))
        goto cleanup;

    if (!(snap = virDomainSnapshotAssignDef(&vm->snapshots, def)))
        goto cleanup;

J
Jiri Denemark 已提交
7317
    snap->def->state = virDomainObjGetState(vm, NULL);
7318

C
Chris Lalancette 已提交
7319 7320
    /* actually do the snapshot */
    if (!virDomainObjIsActive(vm)) {
7321
        if (qemuDomainSnapshotCreateInactive(vm, snap) < 0)
C
Chris Lalancette 已提交
7322 7323 7324
            goto cleanup;
    }
    else {
7325 7326
        if (qemuDomainSnapshotCreateActive(domain->conn, driver,
                                           &vm, snap) < 0)
7327
            goto cleanup;
C
Chris Lalancette 已提交
7328 7329 7330 7331 7332 7333 7334 7335 7336 7337 7338 7339 7340 7341 7342 7343 7344 7345
    }

    /* FIXME: if we fail after this point, there's not a whole lot we can
     * do; we've successfully taken the snapshot, and we are now running
     * on it, so we have to go forward the best we can
     */

    if (vm->current_snapshot) {
        def->parent = strdup(vm->current_snapshot->def->name);
        if (def->parent == NULL) {
            virReportOOMError();
            goto cleanup;
        }
    }

    /* Now we set the new current_snapshot for the domain */
    vm->current_snapshot = snap;

7346 7347 7348
    if (qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                        driver->snapshotDir) < 0)
        /* qemuDomainSnapshotWriteMetadata set the error */
C
Chris Lalancette 已提交
7349 7350 7351 7352 7353 7354 7355 7356 7357 7358 7359 7360 7361
        goto cleanup;

    snapshot = virGetDomainSnapshot(domain, snap->def->name);

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

static int qemuDomainSnapshotListNames(virDomainPtr domain, char **names,
                                       int nameslen,
7362
                                       unsigned int flags)
C
Chris Lalancette 已提交
7363 7364 7365 7366 7367
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int n = -1;

7368 7369
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
7370 7371 7372 7373 7374 7375 7376 7377 7378 7379 7380 7381 7382 7383 7384 7385 7386 7387 7388 7389
    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;
    }

    n = virDomainSnapshotObjListGetNames(&vm->snapshots, names, nameslen);

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

static int qemuDomainSnapshotNum(virDomainPtr domain,
7390
                                 unsigned int flags)
C
Chris Lalancette 已提交
7391 7392 7393 7394 7395
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int n = -1;

7396 7397
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
7398 7399 7400 7401 7402 7403 7404 7405 7406 7407 7408 7409 7410 7411 7412 7413 7414 7415 7416 7417 7418
    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;
    }

    n = virDomainSnapshotObjListNum(&vm->snapshots);

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

static virDomainSnapshotPtr qemuDomainSnapshotLookupByName(virDomainPtr domain,
                                                           const char *name,
7419
                                                           unsigned int flags)
C
Chris Lalancette 已提交
7420 7421 7422 7423 7424 7425
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    virDomainSnapshotObjPtr snap = NULL;
    virDomainSnapshotPtr snapshot = NULL;

7426 7427
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
7428 7429 7430 7431 7432 7433 7434 7435 7436 7437 7438 7439 7440 7441 7442 7443 7444 7445 7446 7447 7448 7449 7450 7451 7452 7453 7454
    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,
7455
                                        unsigned int flags)
C
Chris Lalancette 已提交
7456 7457 7458 7459 7460
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;

7461 7462
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
7463 7464 7465 7466 7467 7468 7469 7470 7471 7472 7473 7474 7475 7476 7477 7478 7479 7480 7481 7482
    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;
}

static virDomainSnapshotPtr qemuDomainSnapshotCurrent(virDomainPtr domain,
7483
                                                      unsigned int flags)
C
Chris Lalancette 已提交
7484 7485 7486 7487 7488
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    virDomainSnapshotPtr snapshot = NULL;

7489 7490
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
7491 7492 7493 7494 7495 7496 7497 7498 7499 7500 7501 7502 7503 7504 7505 7506 7507 7508 7509 7510 7511 7512 7513 7514 7515
    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;
}

7516 7517
static char *qemuDomainSnapshotGetXMLDesc(virDomainSnapshotPtr snapshot,
                                          unsigned int flags)
C
Chris Lalancette 已提交
7518 7519 7520 7521 7522 7523 7524
{
    struct qemud_driver *driver = snapshot->domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    char *xml = NULL;
    virDomainSnapshotObjPtr snap = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];

7525 7526
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
7527 7528 7529 7530 7531 7532 7533 7534 7535 7536 7537 7538 7539 7540 7541 7542 7543 7544 7545 7546 7547 7548 7549 7550 7551 7552 7553
    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;
    }

    xml = virDomainSnapshotDefFormat(uuidstr, snap->def, 0);

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

static int qemuDomainRevertToSnapshot(virDomainSnapshotPtr snapshot,
7554
                                      unsigned int flags)
C
Chris Lalancette 已提交
7555 7556 7557 7558 7559 7560 7561 7562 7563 7564
{
    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;
    qemuDomainObjPrivatePtr priv;
    int rc;

7565 7566
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
7567 7568 7569 7570 7571 7572 7573 7574 7575 7576 7577 7578 7579 7580 7581 7582 7583 7584 7585 7586 7587 7588 7589 7590 7591 7592 7593 7594 7595 7596 7597
    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;
    }

    vm->current_snapshot = snap;

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

    if (snap->def->state == VIR_DOMAIN_RUNNING
        || snap->def->state == VIR_DOMAIN_PAUSED) {

        if (virDomainObjIsActive(vm)) {
            priv = vm->privateData;
            qemuDomainObjEnterMonitorWithDriver(driver, vm);
            rc = qemuMonitorLoadSnapshot(priv->mon, snap->def->name);
            qemuDomainObjExitMonitorWithDriver(driver, vm);
            if (rc < 0)
7598
                goto endjob;
C
Chris Lalancette 已提交
7599 7600
        }
        else {
7601
            if (qemuDomainSnapshotSetCurrentActive(vm, driver->snapshotDir) < 0)
7602
                goto endjob;
C
Chris Lalancette 已提交
7603

7604 7605
            rc = qemuProcessStart(snapshot->domain->conn, driver, vm, NULL,
                                  false, -1, NULL, VIR_VM_OP_CREATE);
7606
            qemuAuditDomainStart(vm, "from-snapshot", rc >= 0);
7607
            if (qemuDomainSnapshotSetCurrentInactive(vm, driver->snapshotDir) < 0)
7608
                goto endjob;
C
Chris Lalancette 已提交
7609
            if (rc < 0)
7610
                goto endjob;
C
Chris Lalancette 已提交
7611 7612 7613 7614 7615 7616
        }

        if (snap->def->state == VIR_DOMAIN_PAUSED) {
            /* qemu unconditionally starts the domain running again after
             * loadvm, so let's pause it to keep consistency
             */
J
Jiri Denemark 已提交
7617 7618
            rc = qemuProcessStopCPUs(driver, vm,
                                     VIR_DOMAIN_PAUSED_FROM_SNAPSHOT);
H
Hu Tao 已提交
7619
            if (rc < 0)
7620
                goto endjob;
J
Jiri Denemark 已提交
7621 7622 7623
        } else {
            virDomainObjSetState(vm, VIR_DOMAIN_RUNNING,
                                 VIR_DOMAIN_RUNNING_FROM_SNAPSHOT);
C
Chris Lalancette 已提交
7624 7625 7626 7627 7628 7629 7630 7631 7632 7633 7634 7635 7636 7637 7638 7639 7640 7641
        }

        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_STARTED,
                                         VIR_DOMAIN_EVENT_STARTED_FROM_SNAPSHOT);
    }
    else {
        /* qemu is a little funny with running guests and the restoration
         * of snapshots.  If the snapshot was taken online,
         * then after a "loadvm" monitor command, the VM is set running
         * again.  If the snapshot was taken offline, then after a "loadvm"
         * monitor command the VM is left paused.  Unpausing it leads to
         * the memory state *before* the loadvm with the disk *after* the
         * loadvm, which obviously is bound to corrupt something.
         * Therefore we destroy the domain and set it to "off" in this case.
         */

        if (virDomainObjIsActive(vm)) {
J
Jiri Denemark 已提交
7642
            qemuProcessStop(driver, vm, 0, VIR_DOMAIN_SHUTOFF_FROM_SNAPSHOT);
7643
            qemuAuditDomainStop(vm, "from-snapshot");
C
Chris Lalancette 已提交
7644 7645 7646
            event = virDomainEventNewFromObj(vm,
                                             VIR_DOMAIN_EVENT_STOPPED,
                                             VIR_DOMAIN_EVENT_STOPPED_FROM_SNAPSHOT);
7647 7648 7649 7650
            if (!vm->persistent) {
                if (qemuDomainObjEndJob(vm) > 0)
                    virDomainRemoveInactive(&driver->domains, vm);
                vm = NULL;
7651
                goto cleanup;
7652
            }
C
Chris Lalancette 已提交
7653 7654
        }

7655
        if (qemuDomainSnapshotSetCurrentActive(vm, driver->snapshotDir) < 0)
7656
            goto endjob;
C
Chris Lalancette 已提交
7657 7658 7659 7660
    }

    ret = 0;

7661
endjob:
C
Chris Lalancette 已提交
7662 7663 7664
    if (vm && qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

7665
cleanup:
C
Chris Lalancette 已提交
7666 7667 7668 7669 7670 7671 7672 7673 7674 7675 7676 7677 7678 7679 7680 7681 7682 7683 7684 7685 7686 7687 7688 7689 7690 7691 7692 7693 7694 7695 7696 7697 7698 7699 7700 7701 7702 7703 7704 7705 7706 7707 7708 7709 7710 7711 7712 7713 7714 7715 7716 7717 7718 7719 7720 7721 7722 7723 7724 7725 7726 7727 7728 7729 7730 7731 7732 7733 7734 7735 7736 7737 7738 7739 7740 7741 7742 7743 7744 7745 7746 7747 7748 7749 7750 7751 7752 7753 7754 7755 7756 7757 7758 7759 7760 7761 7762 7763 7764 7765 7766 7767
    if (event)
        qemuDomainEventQueue(driver, event);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);

    return ret;
}

static int qemuDomainSnapshotDiscard(struct qemud_driver *driver,
                                     virDomainObjPtr vm,
                                     virDomainSnapshotObjPtr snap)
{
    const char *qemuimgarg[] = { NULL, "snapshot", "-d", NULL, NULL, NULL };
    char *snapFile = NULL;
    int ret = -1;
    int i;
    qemuDomainObjPrivatePtr priv;
    virDomainSnapshotObjPtr parentsnap;

    if (!virDomainObjIsActive(vm)) {
        qemuimgarg[0] = qemuFindQemuImgBinary();
        if (qemuimgarg[0] == NULL)
            /* qemuFindQemuImgBinary set the error */
            goto cleanup;

        qemuimgarg[3] = snap->def->name;

        for (i = 0; i < vm->def->ndisks; i++) {
            /* FIXME: we also need to handle LVM here */
            if (vm->def->disks[i]->device == VIR_DOMAIN_DISK_DEVICE_DISK) {
                if (!vm->def->disks[i]->driverType ||
                    STRNEQ(vm->def->disks[i]->driverType, "qcow2")) {
                    /* we continue on even in the face of error, since other
                     * disks in this VM may have this snapshot in place
                     */
                    continue;
                }

                qemuimgarg[4] = vm->def->disks[i]->src;

                if (virRun(qemuimgarg, NULL) < 0) {
                    /* we continue on even in the face of error, since other
                     * disks in this VM may have this snapshot in place
                     */
                    continue;
                }
            }
        }
    }
    else {
        priv = vm->privateData;
        qemuDomainObjEnterMonitorWithDriver(driver, vm);
        /* we continue on even in the face of error */
        qemuMonitorDeleteSnapshot(priv->mon, snap->def->name);
        qemuDomainObjExitMonitorWithDriver(driver, vm);
    }

    if (snap == vm->current_snapshot) {
        if (snap->def->parent) {
            parentsnap = virDomainSnapshotFindByName(&vm->snapshots,
                                                     snap->def->parent);
            if (!parentsnap) {
                qemuReportError(VIR_ERR_NO_DOMAIN_SNAPSHOT,
                                _("no domain snapshot parent with matching name '%s'"),
                                snap->def->parent);
                goto cleanup;
            }

            /* Now we set the new current_snapshot for the domain */
            vm->current_snapshot = parentsnap;
        }
        else
            vm->current_snapshot = NULL;
    }

    if (virAsprintf(&snapFile, "%s/%s/%s.xml", driver->snapshotDir,
                    vm->def->name, snap->def->name) < 0) {
        virReportOOMError();
        goto cleanup;
    }
    unlink(snapFile);

    virDomainSnapshotObjListRemove(&vm->snapshots, snap);

    ret = 0;

cleanup:
    VIR_FREE(snapFile);
    VIR_FREE(qemuimgarg[0]);

    return ret;
}

struct snap_remove {
    struct qemud_driver *driver;
    virDomainObjPtr vm;
    char *parent;
    int err;
};

static void qemuDomainSnapshotDiscardChildren(void *payload,
7768
                                              const void *name ATTRIBUTE_UNUSED,
C
Chris Lalancette 已提交
7769 7770 7771 7772 7773 7774 7775 7776 7777 7778 7779 7780 7781 7782 7783 7784 7785 7786 7787 7788 7789
                                              void *data)
{
    virDomainSnapshotObjPtr snap = payload;
    struct snap_remove *curr = data;
    struct snap_remove this;

    if (snap->def->parent && STREQ(snap->def->parent, curr->parent)) {
        this.driver = curr->driver;
        this.vm = curr->vm;
        this.parent = snap->def->name;
        this.err = 0;
        virHashForEach(curr->vm->snapshots.objs,
                       qemuDomainSnapshotDiscardChildren, &this);

        if (this.err)
            curr->err = this.err;
        else
            this.err = qemuDomainSnapshotDiscard(curr->driver, curr->vm, snap);
    }
}

7790 7791 7792 7793 7794 7795 7796 7797 7798
struct snap_reparent {
    struct qemud_driver *driver;
    virDomainSnapshotObjPtr snap;
    virDomainObjPtr vm;
    int err;
};

static void
qemuDomainSnapshotReparentChildren(void *payload,
7799
                                   const void *name ATTRIBUTE_UNUSED,
7800 7801 7802 7803 7804 7805 7806 7807 7808 7809 7810 7811 7812 7813 7814 7815 7816 7817 7818 7819 7820 7821 7822 7823 7824 7825 7826
                                   void *data)
{
    virDomainSnapshotObjPtr snap = payload;
    struct snap_reparent *rep = data;

    if (rep->err < 0) {
        return;
    }

    if (snap->def->parent && STREQ(snap->def->parent, rep->snap->def->name)) {
        VIR_FREE(snap->def->parent);

        if (rep->snap->def->parent != NULL) {
            snap->def->parent = strdup(rep->snap->def->parent);

            if (snap->def->parent == NULL) {
                virReportOOMError();
                rep->err = -1;
                return;
            }
        }

        rep->err = qemuDomainSnapshotWriteMetadata(rep->vm, snap,
                                                   rep->driver->snapshotDir);
    }
}

C
Chris Lalancette 已提交
7827 7828 7829 7830 7831 7832 7833 7834 7835
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];
    struct snap_remove rem;
7836
    struct snap_reparent rep;
C
Chris Lalancette 已提交
7837

7838 7839
    virCheckFlags(VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN, -1);

C
Chris Lalancette 已提交
7840 7841 7842 7843 7844 7845 7846 7847 7848 7849 7850 7851 7852 7853 7854 7855 7856
    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;
    }

7857 7858 7859
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;

C
Chris Lalancette 已提交
7860 7861 7862 7863 7864 7865 7866 7867
    if (flags & VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN) {
        rem.driver = driver;
        rem.vm = vm;
        rem.parent = snap->def->name;
        rem.err = 0;
        virHashForEach(vm->snapshots.objs, qemuDomainSnapshotDiscardChildren,
                       &rem);
        if (rem.err < 0)
7868
            goto endjob;
7869 7870 7871 7872 7873 7874 7875 7876 7877
    } else {
        rep.driver = driver;
        rep.snap = snap;
        rep.vm = vm;
        rep.err = 0;
        virHashForEach(vm->snapshots.objs, qemuDomainSnapshotReparentChildren,
                       &rep);
        if (rep.err < 0)
            goto endjob;
C
Chris Lalancette 已提交
7878 7879 7880 7881
    }

    ret = qemuDomainSnapshotDiscard(driver, vm, snap);

7882 7883 7884 7885
endjob:
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

C
Chris Lalancette 已提交
7886 7887 7888 7889 7890 7891
cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}
7892

7893 7894 7895 7896 7897 7898 7899
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;
7900
    bool hmp;
7901

7902
    virCheckFlags(VIR_DOMAIN_QEMU_MONITOR_COMMAND_HMP, -1);
7903 7904 7905 7906 7907 7908 7909 7910 7911 7912 7913 7914 7915 7916 7917 7918 7919 7920 7921

    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;

7922
    qemuDomainObjTaint(driver, vm, VIR_DOMAIN_TAINT_CUSTOM_MONITOR, -1);
7923

7924 7925
    hmp = !!(flags & VIR_DOMAIN_QEMU_MONITOR_COMMAND_HMP);

7926 7927 7928
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
7929
    ret = qemuMonitorArbitraryCommand(priv->mon, cmd, result, hmp);
7930 7931 7932 7933 7934 7935 7936 7937 7938 7939 7940 7941 7942
    qemuDomainObjExitMonitorWithDriver(driver, vm);
    if (qemuDomainObjEndJob(vm) == 0) {
        vm = NULL;
        goto cleanup;
    }

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

7943 7944 7945 7946 7947 7948 7949 7950 7951 7952 7953 7954 7955 7956 7957 7958 7959 7960 7961 7962 7963 7964 7965 7966 7967 7968 7969 7970 7971 7972 7973 7974 7975 7976 7977 7978 7979 7980 7981 7982 7983 7984 7985 7986 7987 7988 7989 7990 7991 7992 7993 7994 7995 7996 7997 7998 7999

static int
qemuDomainOpenConsole(virDomainPtr dom,
                      const char *devname,
                      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;
    }

    if (devname) {
        if (vm->def->console &&
            STREQ(devname, vm->def->console->info.alias))
            chr = vm->def->console;
        for (i = 0 ; !chr && i < vm->def->nserials ; i++) {
            if (STREQ(devname, vm->def->serials[i]->info.alias))
                chr = vm->def->serials[i];
        }
        for (i = 0 ; !chr && i < vm->def->nparallels ; i++) {
            if (STREQ(devname, vm->def->parallels[i]->info.alias))
                chr = vm->def->parallels[i];
        }
    } else {
        if (vm->def->console)
            chr = vm->def->console;
        else if (vm->def->nserials)
            chr = vm->def->serials[0];
    }

    if (!chr) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("cannot find character device %s"),
                        NULLSTR(devname));
        goto cleanup;
    }

8000
    if (chr->source.type != VIR_DOMAIN_CHR_TYPE_PTY) {
8001 8002 8003 8004 8005 8006
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("character device %s is not using a PTY"),
                        NULLSTR(devname));
        goto cleanup;
    }

8007 8008
    if (virFDStreamOpenFile(st, chr->source.data.file.path,
                            0, 0, O_RDWR, false) < 0)
8009 8010 8011 8012 8013 8014 8015 8016 8017 8018 8019
        goto cleanup;

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


8020
static virDriver qemuDriver = {
8021 8022
    .no = VIR_DRV_QEMU,
    .name = "QEMU",
8023 8024 8025 8026 8027 8028 8029 8030 8031 8032 8033 8034 8035 8036 8037 8038 8039 8040 8041 8042 8043 8044 8045 8046 8047 8048 8049 8050 8051 8052 8053 8054 8055 8056 8057 8058 8059 8060 8061
    .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 */
    .domainShutdown = qemudDomainShutdown, /* 0.2.0 */
    .domainDestroy = qemudDomainDestroy, /* 0.2.0 */
    .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 */
    .domainSave = qemudDomainSave, /* 0.2.0 */
    .domainRestore = qemuDomainRestore, /* 0.2.0 */
    .domainCoreDump = qemudDomainCoreDump, /* 0.7.0 */
    .domainScreenshot = qemuDomainScreenshot, /* 0.9.2 */
    .domainSetVcpus = qemudDomainSetVcpus, /* 0.4.4 */
    .domainSetVcpusFlags = qemudDomainSetVcpusFlags, /* 0.8.5 */
    .domainGetVcpusFlags = qemudDomainGetVcpusFlags, /* 0.8.5 */
    .domainPinVcpu = qemudDomainPinVcpu, /* 0.4.4 */
8062
    .domainPinVcpuFlags = qemudDomainPinVcpuFlags, /* 0.9.3 */
8063 8064 8065 8066 8067 8068 8069 8070 8071 8072 8073 8074 8075 8076 8077 8078 8079 8080 8081 8082 8083 8084
    .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 */
    .domainCreate = qemudDomainStart, /* 0.2.0 */
    .domainCreateWithFlags = qemudDomainStartWithFlags, /* 0.8.2 */
    .domainDefineXML = qemudDomainDefine, /* 0.2.0 */
    .domainUndefine = qemudDomainUndefine, /* 0.2.0 */
    .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 */
8085
    .domainGetSchedulerParametersFlags = qemuGetSchedulerParametersFlags, /* 0.9.2 */
8086
    .domainSetSchedulerParameters = qemuSetSchedulerParameters, /* 0.7.0 */
8087
    .domainSetSchedulerParametersFlags = qemuSetSchedulerParametersFlags, /* 0.9.2 */
8088 8089 8090 8091 8092 8093 8094 8095 8096 8097 8098 8099 8100 8101 8102 8103 8104 8105 8106 8107 8108 8109 8110 8111 8112 8113 8114 8115 8116 8117 8118 8119 8120 8121 8122 8123 8124 8125 8126 8127 8128 8129 8130 8131 8132
    .domainMigratePerform = qemudDomainMigratePerform, /* 0.5.0 */
    .domainBlockStats = qemudDomainBlockStats, /* 0.4.1 */
    .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 */
    .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 */
    .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 */
    .domainSnapshotLookupByName = qemuDomainSnapshotLookupByName, /* 0.8.0 */
    .domainHasCurrentSnapshot = qemuDomainHasCurrentSnapshot, /* 0.8.0 */
    .domainSnapshotCurrent = qemuDomainSnapshotCurrent, /* 0.8.0 */
    .domainRevertToSnapshot = qemuDomainRevertToSnapshot, /* 0.8.0 */
    .domainSnapshotDelete = qemuDomainSnapshotDelete, /* 0.8.0 */
    .qemuDomainMonitorCommand = qemuDomainMonitorCommand, /* 0.8.3 */
    .domainOpenConsole = qemuDomainOpenConsole, /* 0.8.6 */
    .domainInjectNMI = qemuDomainInjectNMI, /* 0.9.2 */
8133 8134 8135 8136 8137 8138
    .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 */
8139 8140 8141
};


8142
static virStateDriver qemuStateDriver = {
8143
    .name = "QEMU",
8144 8145 8146 8147
    .initialize = qemudStartup,
    .cleanup = qemudShutdown,
    .reload = qemudReload,
    .active = qemudActive,
8148
};
8149

8150
static void
8151
qemuVMDriverLock(void) {
8152 8153 8154 8155 8156
    qemuDriverLock(qemu_driver);
};


static void
8157
qemuVMDriverUnlock(void) {
8158 8159 8160 8161
    qemuDriverUnlock(qemu_driver);
};


8162 8163 8164 8165 8166 8167 8168 8169 8170
static int
qemuVMFilterRebuild(virConnectPtr conn ATTRIBUTE_UNUSED,
                    virHashIterator iter, void *data)
{
    virHashForEach(qemu_driver->domains.objs, iter, data);

    return 0;
}

S
Stefan Berger 已提交
8171 8172
static virNWFilterCallbackDriver qemuCallbackDriver = {
    .name = "QEMU",
8173 8174 8175
    .vmFilterRebuild = qemuVMFilterRebuild,
    .vmDriverLock = qemuVMDriverLock,
    .vmDriverUnlock = qemuVMDriverUnlock,
S
Stefan Berger 已提交
8176 8177
};

8178
int qemuRegister(void) {
8179 8180
    virRegisterDriver(&qemuDriver);
    virRegisterStateDriver(&qemuStateDriver);
S
Stefan Berger 已提交
8181
    virNWFilterRegisterCallbackDriver(&qemuCallbackDriver);
8182 8183
    return 0;
}