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

24
#include <config.h>
25

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

48

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

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

120 121 122
static int qemuDomainObjStart(virConnectPtr conn,
                              struct qemud_driver *driver,
                              virDomainObjPtr vm,
123
                              unsigned int flags);
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 137
qemuAutostartDomain(void *payload, const void *name ATTRIBUTE_UNUSED,
                    void *opaque)
138 139 140
{
    virDomainObjPtr vm = payload;
    struct qemuAutostartData *data = opaque;
141
    virErrorPtr err;
142 143 144 145
    int flags = 0;

    if (data->driver->autoStartBypassCache)
        flags |= VIR_DOMAIN_START_BYPASS_CACHE;
146 147

    virDomainObjLock(vm);
148
    virResetLastError();
149 150
    if (qemuDomainObjBeginJobWithDriver(data->driver, vm,
                                        QEMU_JOB_MODIFY) < 0) {
151 152 153 154 155 156 157
        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) &&
158
            qemuDomainObjStart(data->conn, data->driver, vm, flags) < 0) {
159
            err = virGetLastError();
160
            VIR_ERROR(_("Failed to autostart VM '%s': %s"),
161
                      vm->def->name,
162
                      err ? err->message : _("unknown error"));
163
        }
164

165
        if (qemuDomainObjEndJob(data->driver, vm) == 0)
166
            vm = NULL;
167
    }
168 169 170

    if (vm)
        virDomainObjUnlock(vm);
171 172
}

173

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

188
    qemuDriverLock(driver);
189
    virHashForEach(driver->domains.objs, qemuAutostartDomain, &data);
190
    qemuDriverUnlock(driver);
191

192 193
    if (conn)
        virConnectClose(conn);
194 195
}

196
static int
197
qemuSecurityInit(struct qemud_driver *driver)
198
{
199 200 201 202
    virSecurityManagerPtr mgr = virSecurityManagerNew(driver->securityDriverName,
                                                      driver->allowDiskFormatProbing);
    if (!mgr)
        goto error;
D
Daniel Veillard 已提交
203

204 205 206 207 208 209 210
    if (driver->privileged) {
        virSecurityManagerPtr dac = virSecurityManagerNewDAC(driver->user,
                                                             driver->group,
                                                             driver->allowDiskFormatProbing,
                                                             driver->dynamicOwnership);
        if (!dac)
            goto error;
211

212
        if (!(driver->securityManager = virSecurityManagerNewStack(mgr,
E
Eric Blake 已提交
213 214 215
                                                                   dac))) {

            virSecurityManagerFree(dac);
216
            goto error;
E
Eric Blake 已提交
217
        }
218 219 220
    } else {
        driver->securityManager = mgr;
    }
D
Daniel Veillard 已提交
221

222
    return 0;
223

224
error:
225
    VIR_ERROR(_("Failed to initialize security drivers"));
226 227 228
    virSecurityManagerFree(mgr);
    return -1;
}
229

230

231 232 233 234 235
static virCapsPtr
qemuCreateCapabilities(virCapsPtr oldcaps,
                       struct qemud_driver *driver)
{
    virCapsPtr caps;
236

237 238 239 240
    /* Basic host arch / guest machine capabilities */
    if (!(caps = qemuCapsInit(oldcaps))) {
        virReportOOMError();
        return NULL;
241 242
    }

243 244 245 246 247 248
    if (driver->allowDiskFormatProbing) {
        caps->defaultDiskDriverName = NULL;
        caps->defaultDiskDriverType = NULL;
    } else {
        caps->defaultDiskDriverName = "qemu";
        caps->defaultDiskDriverType = "raw";
249 250
    }

251 252
    qemuDomainSetPrivateDataHooks(caps);
    qemuDomainSetNamespaceHooks(caps);
253

254 255 256 257
    if (virGetHostUUID(caps->host.host_uuid)) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                         "%s", _("cannot get the host uuid"));
        goto err_exit;
258
    }
259

260 261
    /* Security driver data */
    const char *doi, *model;
262

263 264 265 266 267 268 269
    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;
270
    }
271

272 273
    VIR_DEBUG("Initialized caps for security driver \"%s\" with "
              "DOI \"%s\"", model, doi);
274

275
    return caps;
276

277 278 279 280
no_memory:
    virReportOOMError();
err_exit:
    virCapabilitiesFree(caps);
281 282 283
    return NULL;
}

284
static void qemuDomainSnapshotLoad(void *payload,
285
                                   const void *name ATTRIBUTE_UNUSED,
286
                                   void *data)
287
{
288 289 290 291 292 293 294 295 296
    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;
297
    virDomainSnapshotObjPtr snap = NULL;
298
    virDomainSnapshotObjPtr current = NULL;
299
    char ebuf[1024];
300

301 302 303 304
    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);
305
        goto cleanup;
306 307
    }

308 309
    VIR_INFO("Scanning for snapshots for domain %s in %s", vm->def->name,
             snapDir);
310

311 312 313 314 315
    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)));
316
        goto cleanup;
317 318
    }

319 320 321
    while ((entry = readdir(dir))) {
        if (entry->d_name[0] == '.')
            continue;
322

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

327
        if (virAsprintf(&fullpath, "%s/%s", snapDir, entry->d_name) < 0) {
328
            VIR_ERROR(_("Failed to allocate memory for path"));
329 330
            continue;
        }
331

332 333 334 335 336 337 338 339
        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;
        }
340

341 342 343
        def = virDomainSnapshotDefParseString(xmlStr, 0);
        if (def == NULL) {
            /* Nothing we can do here, skip this one */
344 345
            VIR_ERROR(_("Failed to parse snapshot XML from file '%s'"),
                      fullpath);
346 347 348 349
            VIR_FREE(fullpath);
            VIR_FREE(xmlStr);
            continue;
        }
350

351 352 353
        snap = virDomainSnapshotAssignDef(&vm->snapshots, def);
        if (snap == NULL) {
            virDomainSnapshotDefFree(def);
354 355 356 357
        } else if (snap->def->current) {
            current = snap;
            if (!vm->current_snapshot)
                vm->current_snapshot = snap;
358
        }
359

360 361
        VIR_FREE(fullpath);
        VIR_FREE(xmlStr);
362 363
    }

364 365 366 367 368 369
    if (vm->current_snapshot != current) {
        VIR_ERROR(_("Too many snapshots claiming to be current for domain %s"),
                  vm->def->name);
        vm->current_snapshot = NULL;
    }

370 371 372 373 374 375 376 377
    /* 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.
     */
378

379
    virResetLastError();
380

381 382 383 384
cleanup:
    if (dir)
        closedir(dir);
    VIR_FREE(snapDir);
385 386 387
    virDomainObjUnlock(vm);
}

388 389 390 391 392
/**
 * qemudStartup:
 *
 * Initialization function for the QEmu daemon
 */
393
static int
394 395 396 397 398
qemudStartup(int privileged) {
    char *base = NULL;
    char *driverConf = NULL;
    int rc;
    virConnectPtr conn = NULL;
399

400 401
    if (VIR_ALLOC(qemu_driver) < 0)
        return -1;
402

403
    if (virMutexInit(&qemu_driver->lock) < 0) {
404
        VIR_ERROR(_("cannot initialize mutex"));
405 406
        VIR_FREE(qemu_driver);
        return -1;
407
    }
408 409
    qemuDriverLock(qemu_driver);
    qemu_driver->privileged = privileged;
410

411 412
    /* Don't have a dom0 so start from 1 */
    qemu_driver->nextvmid = 1;
413

414 415
    if (virDomainObjListInit(&qemu_driver->domains) < 0)
        goto out_of_memory;
416

417 418 419 420 421 422
    /* Init domain events */
    qemu_driver->domainEventState = virDomainEventStateNew(qemuDomainEventFlush,
                                                           qemu_driver,
                                                           NULL,
                                                           true);
    if (!qemu_driver->domainEventState)
423
        goto error;
424

425 426 427 428
    /* Allocate bitmap for vnc port reservation */
    if ((qemu_driver->reservedVNCPorts =
         virBitmapAlloc(QEMU_VNC_PORT_MAX - QEMU_VNC_PORT_MIN)) == NULL)
        goto out_of_memory;
429

430 431 432
    /* read the host sysinfo */
    if (privileged)
        qemu_driver->hostsysinfo = virSysinfoRead();
433

434 435 436 437
    if (privileged) {
        if (virAsprintf(&qemu_driver->logDir,
                        "%s/log/libvirt/qemu", LOCALSTATEDIR) == -1)
            goto out_of_memory;
438

439 440
        if ((base = strdup (SYSCONFDIR "/libvirt")) == NULL)
            goto out_of_memory;
441

442 443 444
        if (virAsprintf(&qemu_driver->stateDir,
                      "%s/run/libvirt/qemu", LOCALSTATEDIR) == -1)
            goto out_of_memory;
445

446 447 448
        if (virAsprintf(&qemu_driver->libDir,
                      "%s/lib/libvirt/qemu", LOCALSTATEDIR) == -1)
            goto out_of_memory;
449

450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466
        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;
467

468 469 470 471 472
        if (virAsprintf(&qemu_driver->logDir,
                        "%s/.libvirt/qemu/log", userdir) == -1) {
            VIR_FREE(userdir);
            goto out_of_memory;
        }
473

474 475 476 477 478
        if (virAsprintf(&base, "%s/.libvirt", userdir) == -1) {
            VIR_FREE(userdir);
            goto out_of_memory;
        }
        VIR_FREE(userdir);
479

480 481 482 483 484 485 486 487 488 489 490 491
        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;
492
    }
H
Hu Tao 已提交
493

494
    if (virFileMakePath(qemu_driver->stateDir) < 0) {
495 496 497 498
        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 已提交
499
    }
500
    if (virFileMakePath(qemu_driver->libDir) < 0) {
501 502 503 504 505
        char ebuf[1024];
        VIR_ERROR(_("Failed to create lib dir '%s': %s"),
                  qemu_driver->libDir, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
    }
506
    if (virFileMakePath(qemu_driver->cacheDir) < 0) {
507 508 509 510 511
        char ebuf[1024];
        VIR_ERROR(_("Failed to create cache dir '%s': %s"),
                  qemu_driver->cacheDir, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
    }
512
    if (virFileMakePath(qemu_driver->saveDir) < 0) {
513 514 515 516 517
        char ebuf[1024];
        VIR_ERROR(_("Failed to create save dir '%s': %s"),
                  qemu_driver->saveDir, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
    }
518
    if (virFileMakePath(qemu_driver->snapshotDir) < 0) {
519 520 521 522 523
        char ebuf[1024];
        VIR_ERROR(_("Failed to create save dir '%s': %s"),
                  qemu_driver->snapshotDir, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
    }
524
    if (virFileMakePath(qemu_driver->autoDumpPath) < 0) {
525 526 527 528
        char ebuf[1024];
        VIR_ERROR(_("Failed to create dump dir '%s': %s"),
                  qemu_driver->autoDumpPath, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
529 530
    }

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

539
    VIR_FREE(base);
540

541 542 543 544 545
    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)));
546 547
    }

548 549 550 551
    if (qemudLoadDriverConfig(qemu_driver, driverConf) < 0) {
        goto error;
    }
    VIR_FREE(driverConf);
552

553 554 555 556 557 558 559 560
    /* 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;
    }

561 562
    if (qemuSecurityInit(qemu_driver) < 0)
        goto error;
563

564 565 566
    if ((qemu_driver->caps = qemuCreateCapabilities(NULL,
                                                    qemu_driver)) == NULL)
        goto error;
567

568
    if ((qemu_driver->activePciHostdevs = pciDeviceListNew()) == NULL)
569
        goto error;
570

571 572 573 574 575 576
    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;
577
        }
578
        if (chown(qemu_driver->cacheDir, qemu_driver->user, qemu_driver->group) < 0) {
579
            virReportSystemError(errno,
580 581 582
                                 _("unable to set ownership of '%s' to %d:%d"),
                                 qemu_driver->cacheDir, qemu_driver->user, qemu_driver->group);
            goto error;
583
        }
584 585 586 587 588 589 590 591 592 593 594
        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;
595
        }
596
    }
597

598 599 600 601 602 603
    /* 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
604
     */
605 606 607 608 609
    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;
610

611 612
        if (virFileMakePath(mempath) < 0) {
            virReportSystemError(errno,
613 614 615
                                 _("unable to create hugepage path %s"), mempath);
            VIR_FREE(mempath);
            goto error;
616
        }
617 618 619 620 621 622 623
        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 已提交
624
        }
E
Eric Blake 已提交
625

626
        qemu_driver->hugepage_path = mempath;
627
    }
628

629 630 631
    if (qemuProcessAutoDestroyInit(qemu_driver) < 0)
        goto error;

632 633 634 635 636
    /* Get all the running persistent or transient configs first */
    if (virDomainLoadAllConfigs(qemu_driver->caps,
                                &qemu_driver->domains,
                                qemu_driver->stateDir,
                                NULL,
M
Matthias Bolte 已提交
637 638
                                1, QEMU_EXPECTED_VIRT_TYPES,
                                NULL, NULL) < 0)
639
        goto error;
640

641 642 643
    conn = virConnectOpen(qemu_driver->privileged ?
                          "qemu:///system" :
                          "qemu:///session");
644

645
    qemuProcessReconnectAll(conn, qemu_driver);
646

647 648 649 650 651
    /* Then inactive persistent configs */
    if (virDomainLoadAllConfigs(qemu_driver->caps,
                                &qemu_driver->domains,
                                qemu_driver->configDir,
                                qemu_driver->autostartDir,
M
Matthias Bolte 已提交
652 653
                                0, QEMU_EXPECTED_VIRT_TYPES,
                                NULL, NULL) < 0)
654
        goto error;
655

656

657 658
    virHashForEach(qemu_driver->domains.objs, qemuDomainSnapshotLoad,
                   qemu_driver->snapshotDir);
659

660 661 662
    qemu_driver->workerPool = virThreadPoolNew(0, 1, processWatchdogEvent, qemu_driver);
    if (!qemu_driver->workerPool)
        goto error;
663

664 665 666 667
    qemuDriverUnlock(qemu_driver);

    qemuAutostartDomains(qemu_driver);

668 669
    if (conn)
        virConnectClose(conn);
670

671
    return 0;
672

673 674 675 676 677 678 679 680 681 682
out_of_memory:
    virReportOOMError();
error:
    if (qemu_driver)
        qemuDriverUnlock(qemu_driver);
    if (conn)
        virConnectClose(conn);
    VIR_FREE(base);
    VIR_FREE(driverConf);
    qemudShutdown();
683
    return -1;
684 685
}

686 687 688
static void qemudNotifyLoadDomain(virDomainObjPtr vm, int newVM, void *opaque)
{
    struct qemud_driver *driver = opaque;
689

690 691 692 693 694 695 696
    if (newVM) {
        virDomainEventPtr event =
            virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_DEFINED,
                                     VIR_DOMAIN_EVENT_DEFINED_ADDED);
        if (event)
            qemuDomainEventQueue(driver, event);
E
Eric Blake 已提交
697
    }
698
}
E
Eric Blake 已提交
699

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

711 712 713 714 715
    qemuDriverLock(qemu_driver);
    virDomainLoadAllConfigs(qemu_driver->caps,
                            &qemu_driver->domains,
                            qemu_driver->configDir,
                            qemu_driver->autostartDir,
M
Matthias Bolte 已提交
716 717
                            0, QEMU_EXPECTED_VIRT_TYPES,
                            qemudNotifyLoadDomain, qemu_driver);
718
    qemuDriverUnlock(qemu_driver);
719

720
    qemuAutostartDomains(qemu_driver);
721

722 723
    return 0;
}
S
Stefan Berger 已提交
724

725 726 727 728 729 730 731 732 733 734 735
/**
 * 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;
736

737 738
    if (!qemu_driver)
        return 0;
739

740 741 742 743 744 745
    /* 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;
}
746

747 748 749 750 751 752 753 754
/**
 * qemudShutdown:
 *
 * Shutdown the QEmu daemon, it will stop all active domains and networks
 */
static int
qemudShutdown(void) {
    int i;
755

756 757
    if (!qemu_driver)
        return -1;
758

759 760 761
    qemuDriverLock(qemu_driver);
    pciDeviceListFree(qemu_driver->activePciHostdevs);
    virCapabilitiesFree(qemu_driver->caps);
762

763 764
    virDomainObjListDeinit(&qemu_driver->domains);
    virBitmapFree(qemu_driver->reservedVNCPorts);
765

766
    virSysinfoDefFree(qemu_driver->hostsysinfo);
767

768 769
    qemuProcessAutoDestroyShutdown(qemu_driver);

770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 787 788 789
    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);
790

791
    virSecurityManagerFree(qemu_driver->securityManager);
792

793
    ebtablesContextFree(qemu_driver->ebtables);
794

795 796 797 798
    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 已提交
799 800
    }

801
    /* Free domain callback list */
802
    virDomainEventStateFree(qemu_driver->domainEventState);
D
Daniel P. Berrange 已提交
803

804 805
    if (qemu_driver->brctl)
        brShutdown(qemu_driver->brctl);
806

807
    virCgroupFree(&qemu_driver->cgroup);
808

809 810
    virLockManagerPluginUnref(qemu_driver->lockManager);

811 812 813 814
    qemuDriverUnlock(qemu_driver);
    virMutexDestroy(&qemu_driver->lock);
    virThreadPoolFree(qemu_driver->workerPool);
    VIR_FREE(qemu_driver);
815

816
    return 0;
817 818
}

819

820
static virDrvOpenStatus qemudOpen(virConnectPtr conn,
821
                                  virConnectAuthPtr auth ATTRIBUTE_UNUSED,
E
Eric Blake 已提交
822
                                  unsigned int flags)
823
{
E
Eric Blake 已提交
824 825
    virCheckFlags(VIR_CONNECT_RO, VIR_DRV_OPEN_ERROR);

826
    if (conn->uri == NULL) {
827 828 829
        if (qemu_driver == NULL)
            return VIR_DRV_OPEN_DECLINED;

830
        conn->uri = xmlParseURI(qemu_driver->privileged ?
831 832
                                "qemu:///system" :
                                "qemu:///session");
833
        if (!conn->uri) {
834
            virReportOOMError();
835 836
            return VIR_DRV_OPEN_ERROR;
        }
837 838 839 840 841 842 843 844 845 846
    } 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;

847
        if (qemu_driver == NULL) {
848 849
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("qemu state driver is not active"));
850 851 852
            return VIR_DRV_OPEN_ERROR;
        }

853
        if (conn->uri->path == NULL) {
854 855 856 857 858
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("no QEMU URI path given, try %s"),
                            qemu_driver->privileged
                            ? "qemu:///system"
                            : "qemu:///session");
859 860 861
                return VIR_DRV_OPEN_ERROR;
        }

862
        if (qemu_driver->privileged) {
863 864
            if (STRNEQ (conn->uri->path, "/system") &&
                STRNEQ (conn->uri->path, "/session")) {
865 866 867
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("unexpected QEMU URI path '%s', try qemu:///system"),
                                conn->uri->path);
868 869 870 871
                return VIR_DRV_OPEN_ERROR;
            }
        } else {
            if (STRNEQ (conn->uri->path, "/session")) {
872 873 874
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("unexpected QEMU URI path '%s', try qemu:///session"),
                                conn->uri->path);
875 876 877
                return VIR_DRV_OPEN_ERROR;
            }
        }
878 879 880 881 882 883 884
    }
    conn->privateData = qemu_driver;

    return VIR_DRV_OPEN_SUCCESS;
}

static int qemudClose(virConnectPtr conn) {
885
    struct qemud_driver *driver = conn->privateData;
886 887

    /* Get rid of callbacks registered for this conn */
888
    qemuDriverLock(driver);
889 890
    virDomainEventCallbackListRemoveConn(conn,
                                         driver->domainEventState->callbacks);
891
    qemuProcessAutoDestroyRun(driver, conn);
892
    qemuDriverUnlock(driver);
893 894 895 896 897 898

    conn->privateData = NULL;

    return 0;
}

D
Daniel Veillard 已提交
899 900 901 902 903
/* Which features are supported by this driver? */
static int
qemudSupportsFeature (virConnectPtr conn ATTRIBUTE_UNUSED, int feature)
{
    switch (feature) {
904
    case VIR_DRV_FEATURE_MIGRATION_V2:
905
    case VIR_DRV_FEATURE_MIGRATION_V3:
906
    case VIR_DRV_FEATURE_MIGRATION_P2P:
907
    case VIR_DRV_FEATURE_MIGRATE_CHANGE_PROTECTION:
908 909 910
        return 1;
    default:
        return 0;
D
Daniel Veillard 已提交
911 912 913
    }
}

914
static const char *qemudGetType(virConnectPtr conn ATTRIBUTE_UNUSED) {
915
    return "QEMU";
916 917
}

918

919 920 921 922 923 924 925 926 927 928 929 930 931
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;
}


932 933 934 935
static int kvmGetMaxVCPUs(void) {
    int maxvcpus = 1;

    int r, fd;
936

937 938
    fd = open(KVM_DEVICE, O_RDONLY);
    if (fd < 0) {
939
        virReportSystemError(errno, _("Unable to open %s"), KVM_DEVICE);
940
        return -1;
941 942 943 944 945 946
    }

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

947
    VIR_FORCE_CLOSE(fd);
948 949 950 951
    return maxvcpus;
}


E
Eric Blake 已提交
952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 967
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, "");
}

968
static int qemudGetMaxVCPUs(virConnectPtr conn ATTRIBUTE_UNUSED, const char *type) {
969 970 971
    if (!type)
        return 16;

972
    if (STRCASEEQ(type, "qemu"))
973 974
        return 16;

975
    if (STRCASEEQ(type, "kvm"))
976
        return kvmGetMaxVCPUs();
977

978
    if (STRCASEEQ(type, "kqemu"))
979
        return 1;
980

981 982
    qemuReportError(VIR_ERR_INVALID_ARG,
                    _("unknown type '%s'"), type);
983 984 985
    return -1;
}

986

987
static char *qemudGetCapabilities(virConnectPtr conn) {
988
    struct qemud_driver *driver = conn->privateData;
989
    virCapsPtr caps = NULL;
990
    char *xml = NULL;
991

992
    qemuDriverLock(driver);
993

994
    if ((caps = qemuCreateCapabilities(qemu_driver->caps,
995
                                       qemu_driver)) == NULL) {
996 997 998
        virCapabilitiesFree(caps);
        goto cleanup;
    }
999

1000
    virCapabilitiesFree(qemu_driver->caps);
1001 1002 1003
    qemu_driver->caps = caps;

    if ((xml = virCapabilitiesFormatXML(driver->caps)) == NULL)
1004
        virReportOOMError();
1005 1006

cleanup:
1007
    qemuDriverUnlock(driver);
1008

1009
    return xml;
1010 1011 1012
}


1013 1014 1015 1016 1017
static int
qemudGetProcessInfo(unsigned long long *cpuTime, int *lastCpu, int pid,
                    int tid)
{
    char *proc;
D
Daniel P. Berrange 已提交
1018
    FILE *pidinfo;
1019
    unsigned long long usertime, systime;
1020 1021
    int cpu;
    int ret;
D
Daniel P. Berrange 已提交
1022

1023
    if (tid)
1024
        ret = virAsprintf(&proc, "/proc/%d/task/%d/stat", pid, tid);
1025
    else
1026 1027
        ret = virAsprintf(&proc, "/proc/%d/stat", pid);
    if (ret < 0)
D
Daniel P. Berrange 已提交
1028 1029 1030 1031
        return -1;

    if (!(pidinfo = fopen(proc, "r"))) {
        /* VM probably shut down, so fake 0 */
1032 1033 1034 1035
        if (cpuTime)
            *cpuTime = 0;
        if (lastCpu)
            *lastCpu = 0;
1036
        VIR_FREE(proc);
D
Daniel P. Berrange 已提交
1037 1038
        return 0;
    }
1039
    VIR_FREE(proc);
D
Daniel P. Berrange 已提交
1040

1041 1042 1043 1044 1045 1046 1047 1048 1049 1050
    /* 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) {
1051
        VIR_FORCE_FCLOSE(pidinfo);
1052
        VIR_WARN("cannot parse process status data");
1053
        errno = -EINVAL;
D
Daniel P. Berrange 已提交
1054 1055 1056 1057 1058 1059 1060 1061
        return -1;
    }

    /* We got jiffies
     * We want nanoseconds
     * _SC_CLK_TCK is jiffies per second
     * So calulate thus....
     */
1062 1063 1064 1065 1066
    if (cpuTime)
        *cpuTime = 1000ull * 1000ull * 1000ull * (usertime + systime) / (unsigned long long)sysconf(_SC_CLK_TCK);
    if (lastCpu)
        *lastCpu = cpu;

D
Daniel P. Berrange 已提交
1067

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

1071
    VIR_FORCE_FCLOSE(pidinfo);
D
Daniel P. Berrange 已提交
1072 1073 1074 1075 1076

    return 0;
}


1077
static virDomainPtr qemudDomainLookupByID(virConnectPtr conn,
1078
                                          int id) {
1079 1080 1081 1082
    struct qemud_driver *driver = conn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;

1083
    qemuDriverLock(driver);
1084
    vm  = virDomainFindByID(&driver->domains, id);
1085
    qemuDriverUnlock(driver);
1086 1087

    if (!vm) {
1088 1089
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching id %d"), id);
1090
        goto cleanup;
1091 1092
    }

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

cleanup:
1097 1098
    if (vm)
        virDomainObjUnlock(vm);
1099 1100
    return dom;
}
1101

1102
static virDomainPtr qemudDomainLookupByUUID(virConnectPtr conn,
1103
                                            const unsigned char *uuid) {
1104 1105 1106
    struct qemud_driver *driver = conn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;
1107

1108
    qemuDriverLock(driver);
1109
    vm = virDomainFindByUUID(&driver->domains, uuid);
1110 1111
    qemuDriverUnlock(driver);

1112
    if (!vm) {
1113 1114
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(uuid, uuidstr);
1115 1116
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1117
        goto cleanup;
1118 1119
    }

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

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

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

1135
    qemuDriverLock(driver);
1136
    vm = virDomainFindByName(&driver->domains, name);
1137 1138
    qemuDriverUnlock(driver);

1139
    if (!vm) {
1140 1141
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching name '%s'"), name);
1142
        goto cleanup;
1143 1144
    }

1145
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1146
    if (dom) dom->id = vm->def->id;
1147 1148

cleanup:
1149 1150
    if (vm)
        virDomainObjUnlock(vm);
1151 1152 1153
    return dom;
}

1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164

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 已提交
1165 1166 1167 1168
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182 1183 1184 1185 1186 1187 1188
        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 已提交
1189 1190 1191 1192
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1193 1194 1195 1196 1197 1198 1199 1200 1201 1202
        goto cleanup;
    }
    ret = obj->persistent;

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

1203 1204 1205 1206 1207 1208 1209 1210 1211 1212
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 已提交
1213 1214 1215 1216
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1217 1218 1219 1220 1221 1222 1223 1224 1225
        goto cleanup;
    }
    ret = obj->updated;

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

1227
static int qemudGetVersion(virConnectPtr conn, unsigned long *version) {
1228 1229 1230
    struct qemud_driver *driver = conn->privateData;
    int ret = -1;

1231
    qemuDriverLock(driver);
1232
    if (qemuCapsExtractVersion(driver->caps, &driver->qemuVersion) < 0)
1233
        goto cleanup;
1234

1235
    *version = driver->qemuVersion;
1236 1237 1238
    ret = 0;

cleanup:
1239
    qemuDriverUnlock(driver);
1240
    return ret;
D
Daniel P. Berrange 已提交
1241 1242
}

1243
static int qemudListDomains(virConnectPtr conn, int *ids, int nids) {
1244
    struct qemud_driver *driver = conn->privateData;
1245
    int n;
1246

1247
    qemuDriverLock(driver);
1248
    n = virDomainObjListGetActiveIDs(&driver->domains, ids, nids);
1249
    qemuDriverUnlock(driver);
1250

1251
    return n;
D
Daniel P. Berrange 已提交
1252
}
1253

1254
static int qemudNumDomains(virConnectPtr conn) {
1255
    struct qemud_driver *driver = conn->privateData;
1256
    int n;
1257

1258
    qemuDriverLock(driver);
1259
    n = virDomainObjListNumOfDomains(&driver->domains, 1);
1260
    qemuDriverUnlock(driver);
1261

1262
    return n;
D
Daniel P. Berrange 已提交
1263
}
1264

1265
static virDomainPtr qemudDomainCreate(virConnectPtr conn, const char *xml,
1266
                                      unsigned int flags) {
1267
    struct qemud_driver *driver = conn->privateData;
1268
    virDomainDefPtr def;
1269
    virDomainObjPtr vm = NULL;
1270
    virDomainPtr dom = NULL;
1271
    virDomainEventPtr event = NULL;
1272
    virDomainEventPtr event2 = NULL;
D
Daniel P. Berrange 已提交
1273

1274 1275
    virCheckFlags(VIR_DOMAIN_START_PAUSED |
                  VIR_DOMAIN_START_AUTODESTROY, NULL);
1276

1277
    qemuDriverLock(driver);
1278
    if (!(def = virDomainDefParseString(driver->caps, xml,
M
Matthias Bolte 已提交
1279
                                        QEMU_EXPECTED_VIRT_TYPES,
1280
                                        VIR_DOMAIN_XML_INACTIVE)))
1281
        goto cleanup;
1282

1283
    if (virSecurityManagerVerify(driver->securityManager, def) < 0)
1284 1285
        goto cleanup;

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

1289 1290 1291
    if (qemudCanonicalizeMachine(driver, def) < 0)
        goto cleanup;

1292
    if (qemuDomainAssignPCIAddresses(def) < 0)
1293 1294
        goto cleanup;

1295
    if (!(vm = virDomainAssignDef(driver->caps,
1296
                                  &driver->domains,
1297
                                  def, false)))
1298 1299 1300
        goto cleanup;

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

1302
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
1303 1304
        goto cleanup; /* XXXX free the 'vm' we created ? */

1305 1306
    if (qemuProcessStart(conn, driver, vm, NULL,
                         (flags & VIR_DOMAIN_START_PAUSED) != 0,
1307
                         (flags & VIR_DOMAIN_START_AUTODESTROY) != 0,
1308
                         -1, NULL, NULL, VIR_VM_OP_CREATE) < 0) {
1309
        virDomainAuditStart(vm, "booted", false);
1310
        if (qemuDomainObjEndJob(driver, vm) > 0)
1311 1312
            virDomainRemoveInactive(&driver->domains,
                                    vm);
1313
        vm = NULL;
1314
        goto cleanup;
D
Daniel P. Berrange 已提交
1315
    }
1316 1317 1318 1319

    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_BOOTED);
1320 1321 1322 1323 1324 1325 1326 1327 1328 1329
    if (event && (flags & VIR_DOMAIN_START_PAUSED)) {
        /* There are two classes of event-watching clients - those
         * that only care about on/off (and must see a started event
         * no matter what, but don't care about suspend events), and
         * those that also care about running/paused.  To satisfy both
         * client types, we have to send two events.  */
        event2 = virDomainEventNewFromObj(vm,
                                          VIR_DOMAIN_EVENT_SUSPENDED,
                                          VIR_DOMAIN_EVENT_SUSPENDED_PAUSED);
    }
1330
    virDomainAuditStart(vm, "booted", true);
D
Daniel P. Berrange 已提交
1331

1332
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1333
    if (dom) dom->id = vm->def->id;
1334

1335
    if (vm &&
1336
        qemuDomainObjEndJob(driver, vm) == 0)
1337
        vm = NULL;
1338

1339 1340
cleanup:
    virDomainDefFree(def);
1341 1342
    if (vm)
        virDomainObjUnlock(vm);
1343
    if (event) {
1344
        qemuDomainEventQueue(driver, event);
1345 1346 1347
        if (event2)
            qemuDomainEventQueue(driver, event2);
    }
1348
    qemuDriverUnlock(driver);
1349
    return dom;
D
Daniel P. Berrange 已提交
1350 1351 1352
}


1353
static int qemudDomainSuspend(virDomainPtr dom) {
1354 1355 1356
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1357
    virDomainEventPtr event = NULL;
1358
    qemuDomainObjPrivatePtr priv;
1359 1360
    virDomainPausedReason reason;
    int eventDetail;
1361

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

D
Daniel P. Berrange 已提交
1365
    if (!vm) {
1366 1367
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1368 1369
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1370
        goto cleanup;
D
Daniel P. Berrange 已提交
1371
    }
D
Daniel P. Berrange 已提交
1372
    if (!virDomainObjIsActive(vm)) {
1373 1374
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
1375
        goto cleanup;
D
Daniel P. Berrange 已提交
1376
    }
1377 1378 1379

    priv = vm->privateData;

1380
    if (priv->job.asyncJob == QEMU_ASYNC_JOB_MIGRATION_OUT) {
1381 1382
        reason = VIR_DOMAIN_PAUSED_MIGRATION;
        eventDetail = VIR_DOMAIN_EVENT_SUSPENDED_MIGRATED;
1383
    } else {
1384 1385 1386
        reason = VIR_DOMAIN_PAUSED_USER;
        eventDetail = VIR_DOMAIN_EVENT_SUSPENDED_PAUSED;
    }
1387

1388 1389 1390 1391 1392 1393 1394 1395 1396
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_SUSPEND) < 0)
        goto cleanup;

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }
    if (virDomainObjGetState(vm, NULL) != VIR_DOMAIN_PAUSED) {
1397
        if (qemuProcessStopCPUs(driver, vm, reason, QEMU_ASYNC_JOB_NONE) < 0) {
1398
            goto endjob;
1399
        }
1400 1401 1402
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_SUSPENDED,
                                         eventDetail);
D
Daniel P. Berrange 已提交
1403
    }
1404 1405 1406
    if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
        goto endjob;
    ret = 0;
1407

1408
endjob:
1409
    if (qemuDomainObjEndJob(driver, vm) == 0)
1410
        vm = NULL;
1411

1412
cleanup:
1413 1414
    if (vm)
        virDomainObjUnlock(vm);
1415

1416
    if (event)
1417
        qemuDomainEventQueue(driver, event);
1418
    qemuDriverUnlock(driver);
1419
    return ret;
D
Daniel P. Berrange 已提交
1420 1421 1422
}


1423
static int qemudDomainResume(virDomainPtr dom) {
1424 1425 1426
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1427
    virDomainEventPtr event = NULL;
1428

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

D
Daniel P. Berrange 已提交
1432
    if (!vm) {
1433 1434
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1435 1436
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1437
        goto cleanup;
D
Daniel P. Berrange 已提交
1438
    }
1439

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

D
Daniel P. Berrange 已提交
1443
    if (!virDomainObjIsActive(vm)) {
1444 1445
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
1446
        goto endjob;
D
Daniel P. Berrange 已提交
1447
    }
J
Jiri Denemark 已提交
1448 1449
    if (virDomainObjGetState(vm, NULL) == VIR_DOMAIN_PAUSED) {
        if (qemuProcessStartCPUs(driver, vm, dom->conn,
1450 1451
                                 VIR_DOMAIN_RUNNING_UNPAUSED,
                                 QEMU_ASYNC_JOB_NONE) < 0) {
1452
            if (virGetLastError() == NULL)
1453 1454
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("resume operation failed"));
1455
            goto endjob;
1456
        }
1457 1458 1459
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_RESUMED,
                                         VIR_DOMAIN_EVENT_RESUMED_UNPAUSED);
D
Daniel P. Berrange 已提交
1460
    }
1461
    if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
1462
        goto endjob;
1463 1464
    ret = 0;

1465
endjob:
1466
    if (qemuDomainObjEndJob(driver, vm) == 0)
1467
        vm = NULL;
1468

1469
cleanup:
1470 1471
    if (vm)
        virDomainObjUnlock(vm);
1472
    if (event)
1473
        qemuDomainEventQueue(driver, event);
1474
    qemuDriverUnlock(driver);
1475
    return ret;
D
Daniel P. Berrange 已提交
1476 1477 1478
}


1479
static int qemuDomainShutdown(virDomainPtr dom) {
1480 1481 1482
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1483
    qemuDomainObjPrivatePtr priv;
1484

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

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

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

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

1506
    priv = vm->privateData;
1507
    qemuDomainObjEnterMonitor(driver, vm);
1508
    ret = qemuMonitorSystemPowerdown(priv->mon);
1509
    qemuDomainObjExitMonitor(driver, vm);
1510

1511 1512
    priv->fakeReboot = false;

1513
endjob:
1514
    if (qemuDomainObjEndJob(driver, vm) == 0)
1515
        vm = NULL;
1516

1517
cleanup:
1518 1519
    if (vm)
        virDomainObjUnlock(vm);
1520
    return ret;
1521 1522 1523
}


1524 1525 1526 1527
static int qemuDomainReboot(virDomainPtr dom, unsigned int flags) {
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1528
#if HAVE_YAJL
1529
    qemuDomainObjPrivatePtr priv;
1530
#endif
1531 1532 1533 1534 1535 1536 1537 1538 1539 1540 1541 1542 1543 1544 1545 1546

    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 HAVE_YAJL
1547 1548
    priv = vm->privateData;

1549
    if (qemuCapsGet(priv->qemuCaps, QEMU_CAPS_MONITOR_JSON)) {
1550
        if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_MODIFY) < 0)
1551 1552 1553 1554 1555 1556 1557 1558
            goto cleanup;

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

1559
        qemuDomainObjEnterMonitor(driver, vm);
1560
        ret = qemuMonitorSystemPowerdown(priv->mon);
1561
        qemuDomainObjExitMonitor(driver, vm);
1562 1563 1564 1565

        priv->fakeReboot = true;

    endjob:
1566
        if (qemuDomainObjEndJob(driver, vm) == 0)
1567 1568 1569
            vm = NULL;
    } else {
#endif
1570
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
1571 1572 1573 1574 1575 1576 1577 1578 1579 1580 1581 1582
                        _("Reboot is not supported without the JSON monitor"));
#if HAVE_YAJL
    }
#endif

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


1583 1584 1585 1586
static int
qemuDomainDestroyFlags(virDomainPtr dom,
                       unsigned int flags)
{
1587 1588 1589
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1590
    virDomainEventPtr event = NULL;
1591
    qemuDomainObjPrivatePtr priv;
1592

1593 1594
    virCheckFlags(0, -1);

1595
    qemuDriverLock(driver);
1596
    vm  = virDomainFindByUUID(&driver->domains, dom->uuid);
D
Daniel P. Berrange 已提交
1597
    if (!vm) {
1598 1599
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1600 1601
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1602
        goto cleanup;
D
Daniel P. Berrange 已提交
1603
    }
1604

1605 1606 1607
    priv = vm->privateData;
    priv->fakeReboot = false;

1608 1609 1610 1611 1612 1613 1614
    /* 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);

1615
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_DESTROY) < 0)
1616 1617
        goto cleanup;

D
Daniel P. Berrange 已提交
1618
    if (!virDomainObjIsActive(vm)) {
1619 1620
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
1621
        goto endjob;
1622
    }
1623

J
Jiri Denemark 已提交
1624
    qemuProcessStop(driver, vm, 0, VIR_DOMAIN_SHUTOFF_DESTROYED);
1625 1626 1627
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STOPPED,
                                     VIR_DOMAIN_EVENT_STOPPED_DESTROYED);
1628
    virDomainAuditStop(vm, "destroyed");
1629

1630
    if (!vm->persistent) {
1631
        if (qemuDomainObjEndJob(driver, vm) > 0)
1632 1633
            virDomainRemoveInactive(&driver->domains,
                                    vm);
1634 1635
        vm = NULL;
    }
1636 1637
    ret = 0;

1638
endjob:
1639
    if (vm &&
1640
        qemuDomainObjEndJob(driver, vm) == 0)
1641
        vm = NULL;
1642

1643
cleanup:
1644 1645
    if (vm)
        virDomainObjUnlock(vm);
1646 1647
    if (event)
        qemuDomainEventQueue(driver, event);
1648
    qemuDriverUnlock(driver);
1649
    return ret;
D
Daniel P. Berrange 已提交
1650 1651
}

1652 1653 1654 1655 1656
static int
qemuDomainDestroy(virDomainPtr dom)
{
    return qemuDomainDestroyFlags(dom, 0);
}
D
Daniel P. Berrange 已提交
1657

1658
static char *qemudDomainGetOSType(virDomainPtr dom) {
1659 1660 1661
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    char *type = NULL;
1662

1663
    qemuDriverLock(driver);
1664
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1665
    qemuDriverUnlock(driver);
1666
    if (!vm) {
1667 1668
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1669 1670
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1671
        goto cleanup;
1672 1673
    }

1674
    if (!(type = strdup(vm->def->os.type)))
1675
        virReportOOMError();
1676 1677

cleanup:
1678 1679
    if (vm)
        virDomainObjUnlock(vm);
1680 1681 1682
    return type;
}

1683 1684
/* Returns max memory in kb, 0 if error */
static unsigned long qemudDomainGetMaxMemory(virDomainPtr dom) {
1685 1686 1687
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    unsigned long ret = 0;
1688

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

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

1701
    ret = vm->def->mem.max_balloon;
1702 1703

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

1709 1710
static int qemudDomainSetMemoryFlags(virDomainPtr dom, unsigned long newmem,
                                     unsigned int flags) {
1711
    struct qemud_driver *driver = dom->conn->privateData;
1712
    qemuDomainObjPrivatePtr priv;
1713
    virDomainObjPtr vm;
1714
    virDomainDefPtr persistentDef = NULL;
1715
    int ret = -1, r;
1716
    bool isActive;
1717

1718 1719
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG |
1720
                  VIR_DOMAIN_MEM_MAXIMUM, -1);
1721

1722
    qemuDriverLock(driver);
1723
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1724
    qemuDriverUnlock(driver);
1725
    if (!vm) {
1726 1727
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1728 1729
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1730
        goto cleanup;
1731 1732
    }

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

1736 1737
    isActive = virDomainObjIsActive(vm);

1738
    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
1739
        if (isActive)
1740
            flags = VIR_DOMAIN_AFFECT_LIVE;
1741
        else
1742
            flags = VIR_DOMAIN_AFFECT_CONFIG;
1743
    }
1744 1745
    if (flags == VIR_DOMAIN_MEM_MAXIMUM) {
        if (isActive)
1746
            flags = VIR_DOMAIN_AFFECT_LIVE | VIR_DOMAIN_MEM_MAXIMUM;
1747
        else
1748
            flags = VIR_DOMAIN_AFFECT_CONFIG | VIR_DOMAIN_MEM_MAXIMUM;
1749
    }
1750

1751
    if (!isActive && (flags & VIR_DOMAIN_AFFECT_LIVE)) {
1752 1753 1754 1755 1756
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }

1757
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
1758 1759 1760 1761 1762 1763 1764 1765
        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;
    }
1766

1767 1768 1769
    if (flags & VIR_DOMAIN_MEM_MAXIMUM) {
        /* resize the maximum memory */

1770
        if (flags & VIR_DOMAIN_AFFECT_LIVE) {
1771 1772 1773
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("cannot resize the maximum memory on an "
                              "active domain"));
1774
            goto endjob;
1775
        }
1776

1777
        if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
E
Eric Blake 已提交
1778 1779
            /* Help clang 2.8 decipher the logic flow.  */
            sa_assert(persistentDef);
1780 1781 1782 1783
            persistentDef->mem.max_balloon = newmem;
            if (persistentDef->mem.cur_balloon > newmem)
                persistentDef->mem.cur_balloon = newmem;
            ret = virDomainSaveConfig(driver->configDir, persistentDef);
1784 1785 1786
            goto endjob;
        }

1787 1788 1789 1790 1791 1792 1793 1794 1795
    } 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;
        }

1796
        if (flags & VIR_DOMAIN_AFFECT_LIVE) {
1797
            priv = vm->privateData;
1798
            qemuDomainObjEnterMonitor(driver, vm);
1799
            r = qemuMonitorSetBalloon(priv->mon, newmem);
1800
            qemuDomainObjExitMonitor(driver, vm);
1801 1802
            virDomainAuditMemory(vm, vm->def->mem.cur_balloon, newmem, "update",
                                 r == 1);
1803 1804 1805 1806 1807 1808 1809 1810 1811 1812 1813
            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;
            }
        }

1814
        if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
E
Eric Blake 已提交
1815
            sa_assert(persistentDef);
1816 1817 1818 1819
            persistentDef->mem.cur_balloon = newmem;
            ret = virDomainSaveConfig(driver->configDir, persistentDef);
            goto endjob;
        }
1820
    }
1821

1822
    ret = 0;
1823
endjob:
1824
    if (qemuDomainObjEndJob(driver, vm) == 0)
1825
        vm = NULL;
1826

1827
cleanup:
1828 1829
    if (vm)
        virDomainObjUnlock(vm);
1830
    return ret;
1831 1832
}

1833 1834
static int qemudDomainSetMemory(virDomainPtr dom, unsigned long newmem)
{
1835
    return qemudDomainSetMemoryFlags(dom, newmem, VIR_DOMAIN_AFFECT_LIVE);
1836 1837
}

1838 1839 1840 1841 1842
static int qemudDomainSetMaxMemory(virDomainPtr dom, unsigned long memory)
{
    return qemudDomainSetMemoryFlags(dom, memory, VIR_DOMAIN_MEM_MAXIMUM);
}

1843 1844 1845 1846 1847 1848 1849 1850 1851 1852 1853 1854 1855 1856 1857 1858 1859 1860 1861 1862 1863 1864 1865 1866 1867 1868 1869
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;

1870
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
1871
        goto cleanup;
1872
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
1873 1874
    ret = qemuMonitorInjectNMI(priv->mon);
    qemuDomainObjExitMonitorWithDriver(driver, vm);
1875
    if (qemuDomainObjEndJob(driver, vm) == 0) {
1876 1877 1878 1879 1880 1881 1882 1883 1884 1885 1886
        vm = NULL;
        goto cleanup;
    }

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

1887 1888 1889 1890 1891 1892 1893 1894 1895 1896 1897 1898 1899 1900
static int qemuDomainSendKey(virDomainPtr domain,
                             unsigned int codeset,
                             unsigned int holdtime,
                             unsigned int *keycodes,
                             int nkeycodes,
                             unsigned int flags)
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int ret = -1;
    qemuDomainObjPrivatePtr priv;

    virCheckFlags(0, -1);

1901 1902
    /* translate the keycode to RFB for qemu driver */
    if (codeset != VIR_KEYCODE_SET_RFB) {
1903 1904 1905 1906
        int i;
        int keycode;

        for (i = 0; i < nkeycodes; i++) {
1907
            keycode = virKeycodeValueTranslate(codeset, VIR_KEYCODE_SET_RFB,
1908 1909 1910
                                               keycodes[i]);
            if (keycode < 0) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
1911
             _("cannot translate keycode %u of %s codeset to rfb keycode"),
1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940
                                keycodes[i],
                                virKeycodeSetTypeToString(codeset));
                return -1;
            }
            keycodes[i] = keycode;
        }
    }

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

    priv = vm->privateData;

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

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

1941
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
1942 1943 1944 1945 1946 1947 1948 1949 1950 1951 1952 1953 1954 1955
    ret = qemuMonitorSendKey(priv->mon, holdtime, keycodes, nkeycodes);
    qemuDomainObjExitMonitorWithDriver(driver, vm);
    if (qemuDomainObjEndJob(driver, vm) == 0) {
        vm = NULL;
        goto cleanup;
    }

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

1956
static int qemudDomainGetInfo(virDomainPtr dom,
1957 1958
                              virDomainInfoPtr info)
{
1959 1960 1961
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1962 1963
    int err;
    unsigned long balloon;
1964

1965
    qemuDriverLock(driver);
1966
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1967
    qemuDriverUnlock(driver);
D
Daniel P. Berrange 已提交
1968
    if (!vm) {
1969 1970
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1971 1972
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1973
        goto cleanup;
D
Daniel P. Berrange 已提交
1974 1975
    }

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

D
Daniel P. Berrange 已提交
1978
    if (!virDomainObjIsActive(vm)) {
1979
        info->cpuTime = 0;
D
Daniel P. Berrange 已提交
1980
    } else {
1981
        if (qemudGetProcessInfo(&(info->cpuTime), NULL, vm->pid, 0) < 0) {
E
Eric Blake 已提交
1982 1983
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("cannot read cputime for domain"));
1984
            goto cleanup;
D
Daniel P. Berrange 已提交
1985 1986 1987
        }
    }

1988
    info->maxMem = vm->def->mem.max_balloon;
1989

D
Daniel P. Berrange 已提交
1990
    if (virDomainObjIsActive(vm)) {
1991
        qemuDomainObjPrivatePtr priv = vm->privateData;
1992 1993 1994

        if ((vm->def->memballoon != NULL) &&
            (vm->def->memballoon->model == VIR_DOMAIN_MEMBALLOON_MODEL_NONE)) {
1995
            info->memory = vm->def->mem.max_balloon;
1996
        } else if (!priv->job.active) {
1997
            if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_QUERY) < 0)
1998
                goto cleanup;
1999 2000 2001
            if (!virDomainObjIsActive(vm))
                err = 0;
            else {
2002
                qemuDomainObjEnterMonitor(driver, vm);
2003
                err = qemuMonitorGetBalloonInfo(priv->mon, &balloon);
2004
                qemuDomainObjExitMonitor(driver, vm);
2005
            }
2006
            if (qemuDomainObjEndJob(driver, vm) == 0) {
2007
                vm = NULL;
2008 2009 2010
                goto cleanup;
            }

2011 2012
            if (err < 0)
                goto cleanup;
2013 2014
            if (err == 0)
                /* Balloon not supported, so maxmem is always the allocation */
2015
                info->memory = vm->def->mem.max_balloon;
2016 2017 2018
            else
                info->memory = balloon;
        } else {
2019
            info->memory = vm->def->mem.cur_balloon;
2020
        }
2021
    } else {
2022
        info->memory = vm->def->mem.cur_balloon;
2023 2024
    }

2025
    info->nrVirtCpu = vm->def->vcpus;
2026 2027 2028
    ret = 0;

cleanup:
2029 2030
    if (vm)
        virDomainObjUnlock(vm);
2031
    return ret;
D
Daniel P. Berrange 已提交
2032 2033
}

2034 2035 2036 2037 2038 2039 2040 2041 2042 2043 2044 2045 2046 2047 2048 2049 2050 2051 2052 2053 2054 2055 2056 2057
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 已提交
2058
    *state = virDomainObjGetState(vm, reason);
2059 2060 2061 2062 2063 2064 2065 2066
    ret = 0;

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

2067 2068 2069 2070 2071 2072 2073 2074 2075 2076 2077 2078 2079 2080 2081 2082 2083 2084 2085 2086 2087 2088 2089 2090 2091 2092 2093 2094 2095 2096 2097 2098 2099 2100 2101 2102
static int
qemuDomainGetControlInfo(virDomainPtr dom,
                          virDomainControlInfoPtr info,
                          unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    qemuDomainObjPrivatePtr priv;
    int ret = -1;

    virCheckFlags(0, -1);

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

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

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

    priv = vm->privateData;

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

    if (priv->monError) {
        info->state = VIR_DOMAIN_CONTROL_ERROR;
2103
    } else if (priv->job.active) {
2104 2105 2106 2107
        if (!priv->monStart) {
            info->state = VIR_DOMAIN_CONTROL_JOB;
            if (virTimeMs(&info->stateTime) < 0)
                goto cleanup;
2108
            info->stateTime -= priv->job.start;
2109 2110 2111 2112 2113 2114 2115 2116 2117 2118 2119 2120 2121 2122 2123 2124 2125 2126
        } else {
            info->state = VIR_DOMAIN_CONTROL_OCCUPIED;
            if (virTimeMs(&info->stateTime) < 0)
                goto cleanup;
            info->stateTime -= priv->monStart;
        }
    } else {
        info->state = VIR_DOMAIN_CONTROL_OK;
    }

    ret = 0;

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

D
Daniel P. Berrange 已提交
2127

E
Eric Blake 已提交
2128 2129
#define QEMUD_SAVE_MAGIC   "LibvirtQemudSave"
#define QEMUD_SAVE_PARTIAL "LibvirtQemudPart"
2130 2131
#define QEMUD_SAVE_VERSION 2

E
Eric Blake 已提交
2132 2133
verify(sizeof(QEMUD_SAVE_MAGIC) == sizeof(QEMUD_SAVE_PARTIAL));

2134
enum qemud_save_formats {
2135 2136 2137
    QEMUD_SAVE_FORMAT_RAW = 0,
    QEMUD_SAVE_FORMAT_GZIP = 1,
    QEMUD_SAVE_FORMAT_BZIP2 = 2,
2138 2139
    /*
     * Deprecated by xz and never used as part of a release
2140
     * QEMUD_SAVE_FORMAT_LZMA
2141 2142
     */
    QEMUD_SAVE_FORMAT_XZ = 3,
2143
    QEMUD_SAVE_FORMAT_LZOP = 4,
2144 2145 2146
    /* Note: add new members only at the end.
       These values are used in the on-disk format.
       Do not change or re-use numbers. */
2147 2148

    QEMUD_SAVE_FORMAT_LAST
2149
};
2150

2151 2152 2153 2154 2155
VIR_ENUM_DECL(qemudSaveCompression)
VIR_ENUM_IMPL(qemudSaveCompression, QEMUD_SAVE_FORMAT_LAST,
              "raw",
              "gzip",
              "bzip2",
2156 2157
              "xz",
              "lzop")
2158

2159 2160
struct qemud_save_header {
    char magic[sizeof(QEMUD_SAVE_MAGIC)-1];
2161 2162 2163 2164 2165
    uint32_t version;
    uint32_t xml_len;
    uint32_t was_running;
    uint32_t compressed;
    uint32_t unused[15];
2166 2167
};

2168 2169 2170 2171 2172 2173 2174 2175 2176
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);
}


2177
/* return -errno on failure, or 0 on success */
E
Eric Blake 已提交
2178 2179 2180 2181
static int
qemuDomainSaveHeader(int fd, const char *path, char *xml,
                     struct qemud_save_header *header)
{
2182 2183
    int ret = 0;

E
Eric Blake 已提交
2184
    if (safewrite(fd, header, sizeof(*header)) != sizeof(*header)) {
2185
        ret = -errno;
2186
        qemuReportError(VIR_ERR_OPERATION_FAILED,
2187
                        _("failed to write header to domain save file '%s'"),
E
Eric Blake 已提交
2188
                        path);
2189 2190 2191
        goto endjob;
    }

E
Eric Blake 已提交
2192
    if (safewrite(fd, xml, header->xml_len) != header->xml_len) {
2193
        ret = -errno;
2194
        qemuReportError(VIR_ERR_OPERATION_FAILED,
E
Eric Blake 已提交
2195
                         _("failed to write xml to '%s'"), path);
2196 2197 2198 2199 2200 2201
        goto endjob;
    }
endjob:
    return ret;
}

2202 2203 2204 2205 2206 2207 2208 2209 2210
/* Given a enum qemud_save_formats compression level, return the name
 * of the program to run, or NULL if no program is needed.  */
static const char *
qemuCompressProgramName(int compress)
{
    return (compress == QEMUD_SAVE_FORMAT_RAW ? NULL :
            qemudSaveCompressionTypeToString(compress));
}

E
Eric Blake 已提交
2211 2212 2213 2214 2215 2216 2217 2218 2219 2220 2221 2222 2223 2224 2225 2226 2227 2228 2229 2230 2231 2232 2233 2234 2235 2236 2237 2238 2239 2240 2241 2242 2243 2244 2245 2246 2247 2248 2249 2250 2251 2252 2253 2254 2255 2256 2257 2258 2259 2260 2261 2262 2263 2264 2265 2266 2267 2268 2269 2270 2271 2272 2273 2274 2275 2276 2277 2278 2279 2280 2281 2282 2283 2284 2285 2286 2287 2288 2289 2290 2291 2292 2293 2294 2295 2296 2297 2298 2299 2300 2301 2302 2303 2304 2305 2306 2307 2308 2309 2310 2311 2312 2313 2314 2315 2316 2317
/* Internal function to properly create or open existing files, with
 * ownership affected by qemu driver setup.  */
static int
qemuOpenFile(struct qemud_driver *driver, const char *path, int oflags,
             bool *needUnlink, bool *bypassSecurityDriver)
{
    struct stat sb;
    bool is_reg = true;
    bool need_unlink = false;
    bool bypass_security = false;
    int fd = -1;
    uid_t uid = getuid();
    gid_t gid = getgid();

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

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

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

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

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

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

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

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

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

    return fd;
}

2318
/* This internal function expects the driver lock to already be held on
2319 2320 2321 2322
 * entry and the vm must be active + locked. Vm will be unlocked and
 * potentially free'd after this returns (eg transient VMs are freed
 * shutdown). So 'vm' must not be referenced by the caller after
 * this returns (whether returning success or failure).
2323
 */
2324 2325 2326
static int
qemuDomainSaveInternal(struct qemud_driver *driver, virDomainPtr dom,
                       virDomainObjPtr vm, const char *path,
2327
                       int compressed, const char *xmlin, unsigned int flags)
2328
{
2329
    char *xml = NULL;
2330
    struct qemud_save_header header;
2331
    bool bypassSecurityDriver = false;
2332
    int ret = -1;
2333
    int rc;
2334
    virDomainEventPtr event = NULL;
2335
    qemuDomainObjPrivatePtr priv;
E
Eric Blake 已提交
2336
    bool needUnlink = false;
2337
    size_t len;
2338
    unsigned long long offset;
2339
    unsigned long long pad;
2340
    int fd = -1;
2341 2342
    int directFlag = 0;
    virFileDirectFdPtr directFd = NULL;
2343
    bool bypass_cache = flags & VIR_DOMAIN_SAVE_BYPASS_CACHE;
2344

2345 2346 2347
    if (qemuProcessAutoDestroyActive(driver, vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is marked for auto destroy"));
2348
        goto cleanup;
2349 2350
    }

2351
    memset(&header, 0, sizeof(header));
E
Eric Blake 已提交
2352
    memcpy(header.magic, QEMUD_SAVE_PARTIAL, sizeof(header.magic));
2353 2354
    header.version = QEMUD_SAVE_VERSION;

2355
    header.compressed = compressed;
2356

2357
    priv = vm->privateData;
2358

2359 2360
    if (qemuDomainObjBeginAsyncJobWithDriver(driver, vm,
                                             QEMU_ASYNC_JOB_SAVE) < 0)
2361 2362
        goto cleanup;

2363 2364
    memset(&priv->job.info, 0, sizeof(priv->job.info));
    priv->job.info.type = VIR_DOMAIN_JOB_UNBOUNDED;
2365

2366
    /* Pause */
J
Jiri Denemark 已提交
2367
    if (virDomainObjGetState(vm, NULL) == VIR_DOMAIN_RUNNING) {
2368
        header.was_running = 1;
2369 2370
        if (qemuProcessStopCPUs(driver, vm, VIR_DOMAIN_PAUSED_SAVE,
                                QEMU_ASYNC_JOB_SAVE) < 0)
2371
            goto endjob;
2372 2373 2374 2375 2376 2377

        if (!virDomainObjIsActive(vm)) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("guest unexpectedly quit"));
            goto endjob;
        }
2378
    }
2379 2380 2381 2382 2383
    /* libvirt.c already guaranteed these two flags are exclusive.  */
    if (flags & VIR_DOMAIN_SAVE_RUNNING)
        header.was_running = 1;
    else if (flags & VIR_DOMAIN_SAVE_PAUSED)
        header.was_running = 0;
2384

2385 2386 2387 2388 2389 2390 2391 2392 2393 2394 2395 2396 2397 2398 2399 2400 2401 2402 2403 2404 2405 2406
    /* Get XML for the domain.  Restore needs only the inactive xml,
     * including secure.  We should get the same result whether xmlin
     * is NULL or whether it was the live xml of the domain moments
     * before.  */
    if (xmlin) {
        virDomainDefPtr def = NULL;

        if (!(def = virDomainDefParseString(driver->caps, xmlin,
                                            QEMU_EXPECTED_VIRT_TYPES,
                                            VIR_DOMAIN_XML_INACTIVE))) {
            goto endjob;
        }
        if (!virDomainDefCheckABIStability(vm->def, def)) {
            virDomainDefFree(def);
            goto endjob;
        }
        xml = virDomainDefFormat(def, (VIR_DOMAIN_XML_INACTIVE |
                                       VIR_DOMAIN_XML_SECURE));
    } else {
        xml = virDomainDefFormat(vm->def, (VIR_DOMAIN_XML_INACTIVE |
                                           VIR_DOMAIN_XML_SECURE));
    }
2407
    if (!xml) {
2408 2409
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to get domain xml"));
2410
        goto endjob;
2411
    }
2412 2413 2414 2415 2416 2417 2418 2419 2420 2421 2422 2423 2424 2425 2426 2427 2428 2429 2430 2431
    len = strlen(xml) + 1;
    offset = sizeof(header) + len;

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

2433
    /* Obtain the file handle.  */
2434 2435 2436 2437 2438
    if (bypass_cache) {
        directFlag = virFileDirectFdFlag();
        if (directFlag < 0) {
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("bypass cache unsupported by this system"));
E
Eric Blake 已提交
2439
            goto cleanup;
2440
        }
2441
    }
E
Eric Blake 已提交
2442 2443 2444 2445
    fd = qemuOpenFile(driver, path, O_WRONLY | O_TRUNC | O_CREAT | directFlag,
                      &needUnlink, &bypassSecurityDriver);
    if (fd < 0)
        goto endjob;
2446 2447 2448
    if (bypass_cache && (directFd = virFileDirectFdNew(&fd, path)) == NULL)
        goto endjob;

2449
    /* Write header to file, followed by XML */
E
Eric Blake 已提交
2450
    if (qemuDomainSaveHeader(fd, path, xml, &header) < 0) {
2451 2452 2453 2454
        VIR_FORCE_CLOSE(fd);
        goto endjob;
    }

2455
    /* Perform the migration */
2456
    if (qemuMigrationToFile(driver, vm, fd, offset, path,
2457
                            qemuCompressProgramName(compressed),
E
Eric Blake 已提交
2458
                            bypassSecurityDriver,
2459
                            QEMU_ASYNC_JOB_SAVE) < 0)
2460
        goto endjob;
E
Eric Blake 已提交
2461 2462 2463 2464 2465 2466 2467 2468 2469 2470 2471 2472 2473 2474 2475 2476 2477 2478 2479 2480 2481 2482 2483 2484 2485 2486 2487

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

2493 2494
    ret = 0;

2495
    /* Shut it down */
J
Jiri Denemark 已提交
2496
    qemuProcessStop(driver, vm, 0, VIR_DOMAIN_SHUTOFF_SAVED);
2497
    virDomainAuditStop(vm, "saved");
2498 2499 2500
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STOPPED,
                                     VIR_DOMAIN_EVENT_STOPPED_SAVED);
2501
    if (!vm->persistent) {
2502
        if (qemuDomainObjEndAsyncJob(driver, vm) > 0)
2503 2504
            virDomainRemoveInactive(&driver->domains,
                                    vm);
2505 2506
        vm = NULL;
    }
2507

2508
endjob:
2509
    if (vm) {
2510
        if (ret != 0) {
2511
            if (header.was_running && virDomainObjIsActive(vm)) {
J
Jiri Denemark 已提交
2512
                rc = qemuProcessStartCPUs(driver, vm, dom->conn,
2513 2514
                                          VIR_DOMAIN_RUNNING_SAVE_CANCELED,
                                          QEMU_ASYNC_JOB_SAVE);
2515
                if (rc < 0)
2516
                    VIR_WARN("Unable to resume guest CPUs after save failure");
2517
            }
2518
        }
2519
        if (qemuDomainObjEndAsyncJob(driver, vm) == 0)
2520
            vm = NULL;
2521
    }
2522

2523
cleanup:
2524
    VIR_FORCE_CLOSE(fd);
2525
    virFileDirectFdFree(directFd);
2526
    VIR_FREE(xml);
E
Eric Blake 已提交
2527
    if (ret != 0 && needUnlink)
2528
        unlink(path);
2529 2530
    if (event)
        qemuDomainEventQueue(driver, event);
2531 2532
    if (vm)
        virDomainObjUnlock(vm);
2533
    return ret;
D
Daniel P. Berrange 已提交
2534 2535
}

2536 2537 2538 2539 2540 2541 2542 2543 2544 2545 2546 2547 2548 2549 2550 2551
/* 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;
}

2552 2553 2554
static int
qemuDomainSaveFlags(virDomainPtr dom, const char *path, const char *dxml,
                    unsigned int flags)
2555 2556 2557
{
    struct qemud_driver *driver = dom->conn->privateData;
    int compressed;
2558 2559 2560
    int ret = -1;
    virDomainObjPtr vm = NULL;

2561 2562 2563
    virCheckFlags(VIR_DOMAIN_SAVE_BYPASS_CACHE |
                  VIR_DOMAIN_SAVE_RUNNING |
                  VIR_DOMAIN_SAVE_PAUSED, -1);
2564

2565
    qemuDriverLock(driver);
2566 2567 2568 2569 2570 2571 2572 2573 2574

    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"));
2575
            goto cleanup;
2576
        }
2577 2578 2579 2580
        if (!qemudCompressProgramAvailable(compressed)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("Compression program for image format "
                                    "in configuration file isn't available"));
2581
            goto cleanup;
2582
        }
2583 2584
    }

2585 2586 2587 2588 2589 2590 2591 2592 2593
    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;
    }

2594 2595 2596 2597 2598 2599
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

2600
    ret = qemuDomainSaveInternal(driver, dom, vm, path, compressed,
2601
                                 dxml, flags);
2602
    vm = NULL;
2603 2604 2605 2606 2607 2608 2609

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

    return ret;
2610 2611
}

2612 2613 2614 2615 2616 2617
static int
qemuDomainSave(virDomainPtr dom, const char *path)
{
    return qemuDomainSaveFlags(dom, path, NULL, 0);
}

2618 2619 2620 2621 2622 2623 2624 2625 2626 2627 2628 2629 2630 2631 2632 2633 2634 2635 2636 2637 2638
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;

2639 2640 2641
    virCheckFlags(VIR_DOMAIN_SAVE_BYPASS_CACHE |
                  VIR_DOMAIN_SAVE_RUNNING |
                  VIR_DOMAIN_SAVE_PAUSED, -1);
2642 2643 2644 2645 2646 2647 2648 2649

    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);
2650
        goto cleanup;
2651 2652
    }

2653 2654 2655 2656 2657
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }
2658 2659 2660 2661 2662
    if (!vm->persistent) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("cannot do managed save for transient domain"));
        goto cleanup;
    }
2663

2664 2665
    name = qemuDomainManagedSavePath(driver, vm);
    if (name == NULL)
2666
        goto cleanup;
2667

2668
    VIR_INFO("Saving state to %s", name);
2669 2670

    compressed = QEMUD_SAVE_FORMAT_RAW;
2671
    ret = qemuDomainSaveInternal(driver, dom, vm, name, compressed,
2672
                                 NULL, flags);
2673
    vm = NULL;
2674 2675 2676 2677 2678

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
2679 2680 2681
    VIR_FREE(name);

    return ret;
2682 2683 2684 2685 2686 2687 2688 2689 2690 2691
}

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

2692
    virCheckFlags(0, -1);
2693 2694 2695 2696 2697 2698 2699 2700 2701 2702 2703 2704 2705 2706 2707 2708 2709 2710 2711 2712 2713 2714 2715 2716 2717 2718 2719 2720 2721 2722 2723 2724 2725

    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;

2726
    virCheckFlags(0, -1);
2727 2728 2729 2730 2731 2732 2733 2734 2735 2736 2737 2738 2739 2740 2741 2742 2743 2744 2745 2746 2747 2748 2749 2750

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

2752 2753 2754 2755
static int
doCoreDump(struct qemud_driver *driver,
           virDomainObjPtr vm,
           const char *path,
2756 2757
           enum qemud_save_formats compress,
           bool bypass_cache)
H
Hu Tao 已提交
2758 2759 2760
{
    int fd = -1;
    int ret = -1;
2761 2762
    virFileDirectFdPtr directFd = NULL;
    int directFlag = 0;
H
Hu Tao 已提交
2763 2764

    /* Create an empty file with appropriate ownership.  */
2765 2766 2767 2768 2769 2770 2771 2772
    if (bypass_cache) {
        directFlag = virFileDirectFdFlag();
        if (directFlag < 0) {
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("bypass cache unsupported by this system"));
            goto cleanup;
        }
    }
E
Eric Blake 已提交
2773 2774 2775 2776 2777 2778
    /* Core dumps usually imply last-ditch analysis efforts are
     * desired, so we intentionally do not unlink even if a file was
     * created.  */
    if ((fd = qemuOpenFile(driver, path,
                           O_CREAT | O_TRUNC | O_WRONLY | directFlag,
                           NULL, NULL)) < 0)
H
Hu Tao 已提交
2779 2780
        goto cleanup;

2781 2782 2783
    if (bypass_cache && (directFd = virFileDirectFdNew(&fd, path)) == NULL)
        goto cleanup;

2784
    if (qemuMigrationToFile(driver, vm, fd, 0, path,
E
Eric Blake 已提交
2785
                            qemuCompressProgramName(compress), false,
2786
                            QEMU_ASYNC_JOB_DUMP) < 0)
2787 2788
        goto cleanup;

H
Hu Tao 已提交
2789 2790 2791 2792 2793 2794
    if (VIR_CLOSE(fd) < 0) {
        virReportSystemError(errno,
                             _("unable to save file %s"),
                             path);
        goto cleanup;
    }
2795 2796
    if (virFileDirectFdClose(directFd) < 0)
        goto cleanup;
H
Hu Tao 已提交
2797

2798
    ret = 0;
H
Hu Tao 已提交
2799 2800

cleanup:
2801
    VIR_FORCE_CLOSE(fd);
2802
    virFileDirectFdFree(directFd);
H
Hu Tao 已提交
2803 2804 2805 2806 2807
    if (ret != 0)
        unlink(path);
    return ret;
}

2808 2809 2810 2811 2812
static enum qemud_save_formats
getCompressionType(struct qemud_driver *driver)
{
    int compress = QEMUD_SAVE_FORMAT_RAW;

2813 2814 2815 2816 2817 2818
    /*
     * 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);
2819 2820 2821
        /* Use "raw" as the format if the specified format is not valid,
         * or the compress program is not available.
         */
2822
        if (compress < 0) {
2823 2824
            VIR_WARN("%s", _("Invalid dump image format specified in "
                             "configuration file, using raw"));
2825
            return QEMUD_SAVE_FORMAT_RAW;
2826
        }
2827
        if (!qemudCompressProgramAvailable(compress)) {
2828 2829 2830
            VIR_WARN("%s", _("Compression program for dump image format "
                             "in configuration file isn't available, "
                             "using raw"));
2831
            return QEMUD_SAVE_FORMAT_RAW;
2832
        }
2833
    }
2834 2835 2836 2837 2838
    return compress;
}

static int qemudDomainCoreDump(virDomainPtr dom,
                               const char *path,
2839
                               unsigned int flags)
2840
{
2841 2842 2843
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int resume = 0, paused = 0;
H
Hu Tao 已提交
2844
    int ret = -1;
2845 2846
    virDomainEventPtr event = NULL;

2847
    virCheckFlags(VIR_DUMP_LIVE | VIR_DUMP_CRASH | VIR_DUMP_BYPASS_CACHE, -1);
2848

P
Paolo Bonzini 已提交
2849 2850 2851 2852 2853 2854
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
2855 2856
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
P
Paolo Bonzini 已提交
2857 2858 2859
        goto cleanup;
    }

2860 2861
    if (qemuDomainObjBeginAsyncJobWithDriver(driver, vm,
                                             QEMU_ASYNC_JOB_DUMP) < 0)
2862 2863
        goto cleanup;

D
Daniel P. Berrange 已提交
2864
    if (!virDomainObjIsActive(vm)) {
2865 2866
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
2867
        goto endjob;
P
Paolo Bonzini 已提交
2868 2869
    }

P
Paolo Bonzini 已提交
2870 2871
    /* Migrate will always stop the VM, so the resume condition is
       independent of whether the stop command is issued.  */
J
Jiri Denemark 已提交
2872
    resume = virDomainObjGetState(vm, NULL) == VIR_DOMAIN_RUNNING;
P
Paolo Bonzini 已提交
2873 2874

    /* Pause domain for non-live dump */
J
Jiri Denemark 已提交
2875 2876
    if (!(flags & VIR_DUMP_LIVE) &&
        virDomainObjGetState(vm, NULL) == VIR_DOMAIN_RUNNING) {
2877 2878
        if (qemuProcessStopCPUs(driver, vm, VIR_DOMAIN_PAUSED_DUMP,
                                QEMU_ASYNC_JOB_DUMP) < 0)
2879
            goto endjob;
P
Paolo Bonzini 已提交
2880
        paused = 1;
2881 2882 2883 2884 2885 2886

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

2889 2890
    ret = doCoreDump(driver, vm, path, getCompressionType(driver),
                     (flags & VIR_DUMP_BYPASS_CACHE) != 0);
2891 2892 2893 2894
    if (ret < 0)
        goto endjob;

    paused = 1;
2895 2896

endjob:
2897
    if ((ret == 0) && (flags & VIR_DUMP_CRASH)) {
J
Jiri Denemark 已提交
2898
        qemuProcessStop(driver, vm, 0, VIR_DOMAIN_SHUTOFF_CRASHED);
2899
        virDomainAuditStop(vm, "crashed");
2900 2901 2902 2903 2904
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_STOPPED,
                                         VIR_DOMAIN_EVENT_STOPPED_CRASHED);
    }

P
Paolo Bonzini 已提交
2905 2906 2907
    /* 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.  */
2908
    else if (resume && paused && virDomainObjIsActive(vm)) {
J
Jiri Denemark 已提交
2909
        if (qemuProcessStartCPUs(driver, vm, dom->conn,
2910 2911
                                 VIR_DOMAIN_RUNNING_UNPAUSED,
                                 QEMU_ASYNC_JOB_DUMP) < 0) {
2912
            if (virGetLastError() == NULL)
2913 2914
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("resuming after dump failed"));
P
Paolo Bonzini 已提交
2915 2916
        }
    }
2917

2918
    if (qemuDomainObjEndAsyncJob(driver, vm) == 0)
2919
        vm = NULL;
2920
    else if ((ret == 0) && (flags & VIR_DUMP_CRASH) && !vm->persistent) {
2921 2922 2923 2924
        virDomainRemoveInactive(&driver->domains,
                                vm);
        vm = NULL;
    }
2925 2926

cleanup:
P
Paolo Bonzini 已提交
2927 2928
    if (vm)
        virDomainObjUnlock(vm);
2929 2930
    if (event)
        qemuDomainEventQueue(driver, event);
2931
    qemuDriverUnlock(driver);
P
Paolo Bonzini 已提交
2932 2933 2934
    return ret;
}

2935 2936 2937 2938
static char *
qemuDomainScreenshot(virDomainPtr dom,
                     virStreamPtr st,
                     unsigned int screen,
E
Eric Blake 已提交
2939
                     unsigned int flags)
2940 2941 2942 2943 2944 2945 2946
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    qemuDomainObjPrivatePtr priv;
    char *tmp = NULL;
    int tmp_fd = -1;
    char *ret = NULL;
E
Eric Blake 已提交
2947
    bool unlink_tmp = false;
2948

E
Eric Blake 已提交
2949 2950
    virCheckFlags(0, NULL);

2951 2952 2953 2954 2955 2956 2957 2958 2959 2960 2961 2962 2963 2964
    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;

2965
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_QUERY) < 0)
2966 2967 2968 2969 2970 2971 2972 2973 2974 2975 2976 2977 2978 2979 2980 2981 2982 2983 2984 2985 2986 2987 2988 2989 2990 2991
        goto cleanup;

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

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

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

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

2994 2995
    virSecurityManagerSetSavedStateLabel(qemu_driver->securityManager, vm, tmp);

2996
    qemuDomainObjEnterMonitor(driver, vm);
2997
    if (qemuMonitorScreendump(priv->mon, tmp) < 0) {
2998
        qemuDomainObjExitMonitor(driver, vm);
2999 3000
        goto endjob;
    }
3001
    qemuDomainObjExitMonitor(driver, vm);
3002 3003 3004 3005 3006 3007

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

E
Eric Blake 已提交
3008
    if (virFDStreamOpenFile(st, tmp, 0, 0, O_RDONLY) < 0) {
3009 3010 3011 3012 3013 3014 3015 3016 3017
        qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                        _("unable to open stream"));
        goto endjob;
    }

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

endjob:
    VIR_FORCE_CLOSE(tmp_fd);
E
Eric Blake 已提交
3018 3019
    if (unlink_tmp)
        unlink(tmp);
E
Eric Blake 已提交
3020
    VIR_FREE(tmp);
3021

3022
    if (qemuDomainObjEndJob(driver, vm) == 0)
3023 3024 3025 3026 3027 3028 3029 3030
        vm = NULL;

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

H
Hu Tao 已提交
3031 3032 3033
static void processWatchdogEvent(void *data, void *opaque)
{
    int ret;
3034
    struct qemuDomainWatchdogEvent *wdEvent = data;
H
Hu Tao 已提交
3035 3036
    struct qemud_driver *driver = opaque;

W
Wen Congyang 已提交
3037 3038 3039
    qemuDriverLock(driver);
    virDomainObjLock(wdEvent->vm);

H
Hu Tao 已提交
3040 3041 3042 3043 3044
    switch (wdEvent->action) {
    case VIR_DOMAIN_WATCHDOG_ACTION_DUMP:
        {
            char *dumpfile;

E
Eric Blake 已提交
3045
            if (virAsprintf(&dumpfile, "%s/%s-%u",
H
Hu Tao 已提交
3046 3047
                            driver->autoDumpPath,
                            wdEvent->vm->def->name,
E
Eric Blake 已提交
3048 3049
                            (unsigned int)time(NULL)) < 0) {
                virReportOOMError();
W
Wen Congyang 已提交
3050
                goto unlock;
E
Eric Blake 已提交
3051
            }
H
Hu Tao 已提交
3052

3053 3054
            if (qemuDomainObjBeginAsyncJobWithDriver(driver, wdEvent->vm,
                                                     QEMU_ASYNC_JOB_DUMP) < 0) {
W
Wen Congyang 已提交
3055 3056 3057
                VIR_FREE(dumpfile);
                goto unlock;
            }
H
Hu Tao 已提交
3058 3059 3060 3061

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

3066
            ret = doCoreDump(driver, wdEvent->vm, dumpfile,
3067 3068
                             getCompressionType(driver),
                             driver->autoDumpBypassCache);
H
Hu Tao 已提交
3069 3070 3071 3072
            if (ret < 0)
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("Dump failed"));

J
Jiri Denemark 已提交
3073
            ret = qemuProcessStartCPUs(driver, wdEvent->vm, NULL,
3074 3075
                                       VIR_DOMAIN_RUNNING_UNPAUSED,
                                       QEMU_ASYNC_JOB_DUMP);
H
Hu Tao 已提交
3076 3077 3078 3079 3080 3081 3082 3083

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

            VIR_FREE(dumpfile);
        }
        break;
W
Wen Congyang 已提交
3084 3085
    default:
        goto unlock;
H
Hu Tao 已提交
3086 3087
    }

W
Wen Congyang 已提交
3088 3089 3090 3091
endjob:
    /* Safe to ignore value since ref count was incremented in
     * qemuProcessHandleWatchdog().
     */
3092
    ignore_value(qemuDomainObjEndAsyncJob(driver, wdEvent->vm));
W
Wen Congyang 已提交
3093 3094 3095 3096 3097

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

3101 3102 3103
static int qemudDomainHotplugVcpus(struct qemud_driver *driver,
                                   virDomainObjPtr vm,
                                   unsigned int nvcpus)
3104 3105
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
3106
    int i, rc = 1;
3107
    int ret = -1;
3108
    int oldvcpus = vm->def->vcpus;
E
Eric Blake 已提交
3109
    int vcpus = oldvcpus;
3110

3111
    qemuDomainObjEnterMonitor(driver, vm);
3112

3113 3114 3115
    /* 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 已提交
3116 3117
    if (nvcpus > vcpus) {
        for (i = vcpus ; i < nvcpus ; i++) {
3118 3119 3120 3121 3122 3123 3124
            /* Online new CPU */
            rc = qemuMonitorSetCPU(priv->mon, i, 1);
            if (rc == 0)
                goto unsupported;
            if (rc < 0)
                goto cleanup;

E
Eric Blake 已提交
3125
            vcpus++;
3126 3127
        }
    } else {
E
Eric Blake 已提交
3128
        for (i = vcpus - 1 ; i >= nvcpus ; i--) {
3129 3130 3131 3132 3133 3134 3135
            /* Offline old CPU */
            rc = qemuMonitorSetCPU(priv->mon, i, 0);
            if (rc == 0)
                goto unsupported;
            if (rc < 0)
                goto cleanup;

E
Eric Blake 已提交
3136
            vcpus--;
3137 3138 3139 3140 3141 3142
        }
    }

    ret = 0;

cleanup:
3143
    qemuDomainObjExitMonitor(driver, vm);
E
Eric Blake 已提交
3144
    vm->def->vcpus = vcpus;
3145
    virDomainAuditVcpu(vm, oldvcpus, nvcpus, "update", rc == 1);
3146 3147 3148 3149 3150 3151 3152 3153 3154
    return ret;

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


3155
static int
3156 3157
qemuDomainSetVcpusFlags(virDomainPtr dom, unsigned int nvcpus,
                        unsigned int flags)
3158
{
3159 3160
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
3161
    virDomainDefPtr persistentDef;
3162 3163
    const char * type;
    int max;
3164
    int ret = -1;
3165 3166
    bool isActive;
    bool maximum;
3167

3168 3169
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG |
3170 3171 3172 3173 3174
                  VIR_DOMAIN_VCPU_MAXIMUM, -1);

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

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

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

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

3193 3194 3195 3196 3197 3198 3199 3200 3201 3202 3203 3204 3205 3206 3207 3208 3209 3210 3211
    isActive = virDomainObjIsActive(vm);
    maximum = (flags & VIR_DOMAIN_VCPU_MAXIMUM) != 0;
    flags &= ~VIR_DOMAIN_VCPU_MAXIMUM;

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

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

    if (!isActive && (flags & VIR_DOMAIN_AFFECT_LIVE)) {
3212 3213
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                         "%s", _("domain is not running"));
3214
        goto endjob;
3215 3216
    }

3217
    if (!vm->persistent && (flags & VIR_DOMAIN_AFFECT_CONFIG)) {
3218 3219 3220 3221 3222
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("cannot change persistent config of a transient domain"));
        goto endjob;
    }

3223 3224 3225 3226 3227 3228 3229 3230 3231 3232 3233 3234 3235
    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;
    }

3236
    if (!maximum && vm->def->maxvcpus < max) {
3237 3238 3239
        max = vm->def->maxvcpus;
    }

3240 3241 3242 3243 3244 3245 3246
    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;
    }

3247 3248 3249
    if (!(persistentDef = virDomainObjGetPersistentDef(driver->caps, vm)))
        goto endjob;

3250
    switch (flags) {
3251
    case VIR_DOMAIN_AFFECT_CONFIG:
3252 3253 3254 3255 3256 3257 3258
        if (maximum) {
            persistentDef->maxvcpus = nvcpus;
            if (nvcpus < persistentDef->vcpus)
                persistentDef->vcpus = nvcpus;
        } else {
            persistentDef->vcpus = nvcpus;
        }
3259 3260 3261
        ret = 0;
        break;

3262
    case VIR_DOMAIN_AFFECT_LIVE:
3263
        ret = qemudDomainHotplugVcpus(driver, vm, nvcpus);
3264 3265
        break;

3266
    case VIR_DOMAIN_AFFECT_LIVE | VIR_DOMAIN_AFFECT_CONFIG:
3267
        ret = qemudDomainHotplugVcpus(driver, vm, nvcpus);
3268 3269 3270
        if (ret == 0) {
            persistentDef->vcpus = nvcpus;
        }
3271 3272
        break;
    }
3273

3274
    /* Save the persistent config to disk */
3275
    if (flags & VIR_DOMAIN_AFFECT_CONFIG)
3276 3277
        ret = virDomainSaveConfig(driver->configDir, persistentDef);

3278
endjob:
3279
    if (qemuDomainObjEndJob(driver, vm) == 0)
3280
        vm = NULL;
3281

3282
cleanup:
3283 3284
    if (vm)
        virDomainObjUnlock(vm);
3285
    return ret;
3286 3287
}

3288
static int
3289
qemuDomainSetVcpus(virDomainPtr dom, unsigned int nvcpus)
3290
{
3291
    return qemuDomainSetVcpusFlags(dom, nvcpus, VIR_DOMAIN_AFFECT_LIVE);
3292 3293
}

3294 3295

static int
3296 3297 3298 3299 3300 3301
qemudDomainPinVcpuFlags(virDomainPtr dom,
                        unsigned int vcpu,
                        unsigned char *cpumap,
                        int maplen,
                        unsigned int flags) {

3302 3303
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
3304
    virDomainDefPtr persistentDef = NULL;
3305
    int maxcpu, hostcpus;
3306
    virNodeInfo nodeinfo;
3307
    int ret = -1;
3308
    bool isActive;
3309
    qemuDomainObjPrivatePtr priv;
3310
    bool canResetting = true;
E
Eric Blake 已提交
3311
    int pcpu;
3312

3313 3314 3315
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);

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

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

3328 3329 3330 3331 3332 3333 3334 3335 3336 3337 3338 3339
    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"));
3340
        goto cleanup;
3341 3342
    }

3343 3344 3345
    priv = vm->privateData;

    if (vcpu > (priv->nvcpupids-1)) {
3346 3347 3348
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("vcpu number out of range %d > %d"),
                        vcpu, priv->nvcpupids);
3349
        goto cleanup;
3350 3351
    }

3352 3353 3354 3355 3356 3357 3358 3359 3360
    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;
    }
3361

3362 3363 3364 3365 3366 3367 3368 3369 3370
    if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
        goto cleanup;
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
    maxcpu = maplen * 8;
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;
    /* pinning to all physical cpus means resetting,
     * so check if we can reset setting.
     */
E
Eric Blake 已提交
3371
    for (pcpu = 0; pcpu < hostcpus; pcpu++) {
3372 3373 3374 3375 3376
        if ((cpumap[pcpu/8] & (1 << (pcpu % 8))) == 0) {
            canResetting = false;
            break;
        }
    }
3377

3378
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
3379 3380 3381 3382 3383 3384

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

3390
        if (canResetting) {
E
Eric Blake 已提交
3391
            if (virDomainVcpuPinDel(vm->def, vcpu) < 0) {
3392 3393 3394 3395 3396 3397
                qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                                _("failed to delete vcpupin xml of "
                                  "a running domain"));
                goto cleanup;
            }
        } else {
E
Eric Blake 已提交
3398
            if (virDomainVcpuPinAdd(vm->def, cpumap, maplen, vcpu) < 0) {
3399 3400 3401 3402 3403
                qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                                _("failed to update or add vcpupin xml of "
                                  "a running domain"));
                goto cleanup;
            }
3404 3405
        }

3406 3407
        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
            goto cleanup;
3408
    }
3409

3410 3411
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {

3412
        if (canResetting) {
E
Eric Blake 已提交
3413
            if (virDomainVcpuPinDel(persistentDef, vcpu) < 0) {
3414 3415 3416 3417 3418 3419
                qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                                _("failed to delete vcpupin xml of "
                                  "a persistent domain"));
                goto cleanup;
            }
        } else {
E
Eric Blake 已提交
3420
            if (virDomainVcpuPinAdd(persistentDef, cpumap, maplen, vcpu) < 0) {
3421 3422 3423 3424 3425
                qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                                _("failed to update or add vcpupin xml of "
                                  "a persistent domain"));
                goto cleanup;
            }
3426
        }
3427

3428
        ret = virDomainSaveConfig(driver->configDir, persistentDef);
3429 3430 3431
        goto cleanup;
    }

3432
    ret = 0;
3433

3434
cleanup:
3435 3436
    if (vm)
        virDomainObjUnlock(vm);
3437
    return ret;
3438 3439
}

3440 3441 3442 3443 3444 3445 3446 3447 3448
static int
qemudDomainPinVcpu(virDomainPtr dom,
                   unsigned int vcpu,
                   unsigned char *cpumap,
                   int maplen) {
    return qemudDomainPinVcpuFlags(dom, vcpu, cpumap, maplen,
                                   VIR_DOMAIN_AFFECT_LIVE);
}

3449
static int
E
Eric Blake 已提交
3450
qemudDomainGetVcpuPinInfo(virDomainPtr dom,
3451 3452 3453 3454 3455 3456
                          int ncpumaps,
                          unsigned char *cpumaps,
                          int maplen,
                          unsigned int flags) {

    struct qemud_driver *driver = dom->conn->privateData;
E
Eric Blake 已提交
3457
    virDomainObjPtr vm = NULL;
3458 3459 3460 3461 3462 3463
    virNodeInfo nodeinfo;
    virDomainDefPtr targetDef = NULL;
    int ret = -1;
    bool isActive;
    int maxcpu, hostcpus, vcpu, pcpu;
    int n;
E
Eric Blake 已提交
3464
    virDomainVcpuPinDefPtr *vcpupin_list;
3465 3466 3467 3468 3469 3470 3471 3472 3473 3474 3475 3476 3477 3478 3479 3480 3481 3482 3483 3484 3485 3486 3487 3488 3489 3490 3491 3492 3493 3494 3495 3496 3497 3498 3499 3500 3501 3502 3503 3504 3505 3506 3507 3508 3509 3510 3511 3512 3513 3514 3515 3516
    char *cpumask = NULL;
    unsigned char *cpumap;

    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);

    if ((flags & (VIR_DOMAIN_AFFECT_LIVE | VIR_DOMAIN_AFFECT_CONFIG)) ==
        (VIR_DOMAIN_AFFECT_LIVE | VIR_DOMAIN_AFFECT_CONFIG)) {
        qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                        _("cannot get live and persistent info concurrently"));
        goto cleanup;
    }

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

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

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

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

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

3517 3518 3519
    /* Coverity didn't realize that targetDef must be set if we got here.  */
    sa_assert(targetDef);

3520 3521 3522 3523 3524 3525 3526 3527 3528 3529 3530 3531 3532 3533 3534 3535 3536 3537 3538 3539 3540 3541 3542 3543 3544 3545 3546 3547 3548 3549 3550 3551 3552 3553 3554 3555 3556 3557 3558 3559 3560 3561 3562
    if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
        goto cleanup;
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
    maxcpu = maplen * 8;
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;

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

    if (ncpumaps < 1) {
        goto cleanup;
    }

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

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

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

3563 3564 3565 3566 3567 3568
static int
qemudDomainGetVcpus(virDomainPtr dom,
                    virVcpuInfoPtr info,
                    int maxinfo,
                    unsigned char *cpumaps,
                    int maplen) {
3569 3570
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
3571
    virNodeInfo nodeinfo;
3572
    int i, v, maxcpu, hostcpus;
3573
    int ret = -1;
3574
    qemuDomainObjPrivatePtr priv;
3575

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

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

D
Daniel P. Berrange 已提交
3588
    if (!virDomainObjIsActive(vm)) {
3589 3590 3591
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s",
                        _("cannot list vcpu pinning for an inactive domain"));
3592
        goto cleanup;
3593 3594
    }

3595 3596
    priv = vm->privateData;

3597
    if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
3598
        goto cleanup;
3599

3600
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
3601
    maxcpu = maplen * 8;
3602 3603
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;
3604 3605

    /* Clamp to actual number of vcpus */
3606 3607
    if (maxinfo > priv->nvcpupids)
        maxinfo = priv->nvcpupids;
3608

3609 3610 3611 3612 3613 3614
    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;
3615

3616
                if (priv->vcpupids != NULL &&
3617 3618 3619
                    qemudGetProcessInfo(&(info[i].cpuTime),
                                        &(info[i].cpu),
                                        vm->pid,
3620
                                        priv->vcpupids[i]) < 0) {
3621
                    virReportSystemError(errno, "%s",
3622 3623 3624
                                         _("cannot get vCPU placement & pCPU time"));
                    goto cleanup;
                }
3625
            }
3626 3627
        }

3628 3629
        if (cpumaps != NULL) {
            memset(cpumaps, 0, maplen * maxinfo);
3630
            if (priv->vcpupids != NULL) {
3631 3632 3633
                for (v = 0 ; v < maxinfo ; v++) {
                    unsigned char *cpumap = VIR_GET_CPUMAP(cpumaps, maplen, v);

3634
                    if (virProcessInfoGetAffinity(priv->vcpupids[v],
3635
                                                  cpumap, maplen, maxcpu) < 0)
3636
                        goto cleanup;
3637
                }
3638
            } else {
3639
                qemuReportError(VIR_ERR_OPERATION_INVALID,
3640
                                "%s", _("cpu affinity is not available"));
3641
                goto cleanup;
3642 3643 3644
            }
        }
    }
3645
    ret = maxinfo;
3646

3647
cleanup:
3648 3649
    if (vm)
        virDomainObjUnlock(vm);
3650
    return ret;
3651 3652 3653
}


3654 3655 3656
static int
qemudDomainGetVcpusFlags(virDomainPtr dom, unsigned int flags)
{
3657 3658
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
3659
    virDomainDefPtr def;
3660
    int ret = -1;
3661
    bool active;
3662

3663 3664
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG |
3665 3666
                  VIR_DOMAIN_VCPU_MAXIMUM, -1);

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

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

3679 3680 3681 3682 3683 3684 3685 3686 3687 3688 3689 3690 3691 3692
    active = virDomainObjIsActive(vm);

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

3693
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
3694
        if (!active) {
3695 3696 3697 3698 3699 3700
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("domain not active"));
            goto cleanup;
        }
        def = vm->def;
    } else {
3701 3702 3703 3704 3705
        if (!vm->persistent) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("domain is transient"));
            goto cleanup;
        }
3706
        def = vm->newDef ? vm->newDef : vm->def;
3707 3708
    }

3709
    ret = (flags & VIR_DOMAIN_VCPU_MAXIMUM) ? def->maxvcpus : def->vcpus;
3710

3711
cleanup:
3712 3713
    if (vm)
        virDomainObjUnlock(vm);
3714 3715 3716
    return ret;
}

3717 3718 3719
static int
qemudDomainGetMaxVcpus(virDomainPtr dom)
{
3720
    return qemudDomainGetVcpusFlags(dom, (VIR_DOMAIN_AFFECT_LIVE |
3721 3722 3723
                                          VIR_DOMAIN_VCPU_MAXIMUM));
}

3724 3725 3726 3727 3728 3729 3730 3731 3732
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);

3733 3734
    memset(seclabel, 0, sizeof(*seclabel));

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

3743
    if (!virDomainVirtTypeToString(vm->def->virtType)) {
3744 3745 3746
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("unknown virt type in domain definition '%d'"),
                        vm->def->virtType);
3747 3748 3749 3750 3751 3752 3753 3754 3755 3756 3757 3758 3759 3760 3761 3762 3763
        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 已提交
3764
    if (virDomainObjIsActive(vm)) {
3765 3766
        if (virSecurityManagerGetProcessLabel(driver->securityManager,
                                              vm, seclabel) < 0) {
3767 3768 3769
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            "%s", _("Failed to get security label"));
            goto cleanup;
3770 3771 3772 3773 3774 3775 3776 3777
        }
    }

    ret = 0;

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
3778
    qemuDriverUnlock(driver);
3779 3780 3781
    return ret;
}

3782 3783
static int qemudNodeGetSecurityModel(virConnectPtr conn,
                                     virSecurityModelPtr secmodel)
3784 3785 3786
{
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
    char *p;
3787
    int ret = 0;
3788

3789
    qemuDriverLock(driver);
3790 3791 3792 3793 3794
    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)
3795
        goto cleanup;
3796

3797 3798
    p = driver->caps->host.secModel.model;
    if (strlen(p) >= VIR_SECURITY_MODEL_BUFLEN-1) {
3799 3800 3801
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("security model string exceeds max %d bytes"),
                        VIR_SECURITY_MODEL_BUFLEN-1);
3802 3803
        ret = -1;
        goto cleanup;
3804 3805 3806 3807 3808
    }
    strcpy(secmodel->model, p);

    p = driver->caps->host.secModel.doi;
    if (strlen(p) >= VIR_SECURITY_DOI_BUFLEN-1) {
3809 3810 3811
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("security DOI string exceeds max %d bytes"),
                        VIR_SECURITY_DOI_BUFLEN-1);
3812 3813
        ret = -1;
        goto cleanup;
3814 3815
    }
    strcpy(secmodel->doi, p);
3816 3817 3818 3819

cleanup:
    qemuDriverUnlock(driver);
    return ret;
3820 3821
}

E
Eric Blake 已提交
3822
/* Return -1 on most failures after raising error, -2 if edit was specified
3823 3824 3825
 * but xmlin and state (-1 for no change, 0 for paused, 1 for running) do
 * not represent any changes (no error raised), -3 if corrupt image was
 * unlinked (no error raised), and opened fd on success.  */
3826
static int ATTRIBUTE_NONNULL(3) ATTRIBUTE_NONNULL(4)
3827 3828 3829
qemuDomainSaveImageOpen(struct qemud_driver *driver,
                        const char *path,
                        virDomainDefPtr *ret_def,
3830
                        struct qemud_save_header *ret_header,
3831
                        bool bypass_cache, virFileDirectFdPtr *directFd,
3832 3833
                        const char *xmlin, int state, bool edit,
                        bool unlink_corrupt)
J
Jiri Denemark 已提交
3834 3835
{
    int fd;
3836
    struct qemud_save_header header;
J
Jiri Denemark 已提交
3837 3838
    char *xml = NULL;
    virDomainDefPtr def = NULL;
3839
    int oflags = edit ? O_RDWR : O_RDONLY;
3840

3841
    if (bypass_cache) {
3842
        int directFlag = virFileDirectFdFlag();
3843 3844 3845 3846 3847
        if (directFlag < 0) {
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("bypass cache unsupported by this system"));
            goto error;
        }
3848
        oflags |= directFlag;
3849
    }
3850

E
Eric Blake 已提交
3851 3852
    if ((fd = qemuOpenFile(driver, path, oflags, NULL, NULL)) < 0)
        goto error;
3853 3854
    if (bypass_cache && (*directFd = virFileDirectFdNew(&fd, path)) == NULL)
        goto error;
3855 3856

    if (saferead(fd, &header, sizeof(header)) != sizeof(header)) {
3857 3858
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to read qemu header"));
J
Jiri Denemark 已提交
3859
        goto error;
3860 3861 3862
    }

    if (memcmp(header.magic, QEMUD_SAVE_MAGIC, sizeof(header.magic)) != 0) {
E
Eric Blake 已提交
3863 3864 3865 3866 3867 3868 3869 3870 3871 3872 3873 3874 3875 3876 3877 3878
        const char *msg = _("image magic is incorrect");

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

    if (header.version > QEMUD_SAVE_VERSION) {
3883 3884 3885 3886 3887
        /* convert endianess and try again */
        bswap_header(&header);
    }

    if (header.version > QEMUD_SAVE_VERSION) {
3888 3889 3890
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("image version is not supported (%d > %d)"),
                        header.version, QEMUD_SAVE_VERSION);
J
Jiri Denemark 已提交
3891
        goto error;
3892 3893
    }

3894 3895 3896
    if (header.xml_len <= 0) {
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("invalid XML length: %d"), header.xml_len);
J
Jiri Denemark 已提交
3897
        goto error;
3898 3899
    }

3900 3901
    if (VIR_ALLOC_N(xml, header.xml_len) < 0) {
        virReportOOMError();
J
Jiri Denemark 已提交
3902
        goto error;
3903 3904 3905
    }

    if (saferead(fd, xml, header.xml_len) != header.xml_len) {
3906 3907
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to read XML"));
J
Jiri Denemark 已提交
3908
        goto error;
3909 3910
    }

3911 3912
    if (edit && STREQ(xml, xmlin) &&
        (state < 0 || state == header.was_running)) {
3913 3914 3915 3916 3917 3918 3919
        VIR_FREE(xml);
        if (VIR_CLOSE(fd) < 0) {
            virReportSystemError(errno, _("cannot close file: %s"), path);
            goto error;
        }
        return -2;
    }
3920 3921
    if (state >= 0)
        header.was_running = state;
3922

3923
    /* Create a domain from this XML */
3924
    if (!(def = virDomainDefParseString(driver->caps, xml,
M
Matthias Bolte 已提交
3925
                                        QEMU_EXPECTED_VIRT_TYPES,
3926
                                        VIR_DOMAIN_XML_INACTIVE)))
J
Jiri Denemark 已提交
3927
        goto error;
3928 3929 3930 3931 3932 3933 3934 3935 3936 3937 3938 3939 3940 3941
    if (xmlin) {
        virDomainDefPtr def2 = NULL;

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

J
Jiri Denemark 已提交
3943
    VIR_FREE(xml);
3944

J
Jiri Denemark 已提交
3945 3946
    *ret_def = def;
    *ret_header = header;
3947

J
Jiri Denemark 已提交
3948
    return fd;
3949

J
Jiri Denemark 已提交
3950 3951 3952
error:
    virDomainDefFree(def);
    VIR_FREE(xml);
3953
    VIR_FORCE_CLOSE(fd);
J
Jiri Denemark 已提交
3954 3955 3956 3957

    return -1;
}

3958 3959 3960 3961 3962 3963
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,
3964 3965
                           const char *path,
                           bool start_paused)
J
Jiri Denemark 已提交
3966 3967 3968 3969
{
    int ret = -1;
    virDomainEventPtr event;
    int intermediatefd = -1;
3970
    virCommandPtr cmd = NULL;
J
Jiri Denemark 已提交
3971 3972 3973

    if (header->version == 2) {
        const char *prog = qemudSaveCompressionTypeToString(header->compressed);
3974
        if (prog == NULL) {
3975 3976
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            _("Invalid compressed save format %d"),
J
Jiri Denemark 已提交
3977 3978
                            header->compressed);
            goto out;
3979
        }
3980

J
Jiri Denemark 已提交
3981
        if (header->compressed != QEMUD_SAVE_FORMAT_RAW) {
3982
            cmd = virCommandNewArgList(prog, "-dc", NULL);
3983 3984
            intermediatefd = *fd;
            *fd = -1;
3985 3986 3987 3988 3989

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

            if (virCommandRunAsync(cmd, NULL) < 0) {
3990 3991
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("Failed to start decompression binary %s"),
3992
                                prog);
3993
                *fd = intermediatefd;
J
Jiri Denemark 已提交
3994
                goto out;
3995 3996 3997
            }
        }
    }
J
Jiri Denemark 已提交
3998

3999
    /* Set the migration source and start it up. */
4000
    ret = qemuProcessStart(conn, driver, vm, "stdio", true,
4001
                           false, *fd, path, NULL, VIR_VM_OP_RESTORE);
J
Jiri Denemark 已提交
4002

4003
    if (intermediatefd != -1) {
4004
        if (ret < 0) {
4005 4006 4007
            /* if there was an error setting up qemu, the intermediate
             * process will wait forever to write to stdout, so we
             * must manually kill it.
4008 4009
             */
            VIR_FORCE_CLOSE(intermediatefd);
4010
            VIR_FORCE_CLOSE(*fd);
4011 4012
        }

4013 4014
        if (virCommandWait(cmd, NULL) < 0)
            ret = -1;
4015
    }
4016
    VIR_FORCE_CLOSE(intermediatefd);
J
Jiri Denemark 已提交
4017

4018 4019 4020
    if (VIR_CLOSE(*fd) < 0) {
        virReportSystemError(errno, _("cannot close file: %s"), path);
        ret = -1;
4021
    }
J
Jiri Denemark 已提交
4022

4023
    if (ret < 0) {
4024
        virDomainAuditStart(vm, "restored", false);
J
Jiri Denemark 已提交
4025
        goto out;
4026
    }
4027

4028 4029 4030
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_RESTORED);
4031
    virDomainAuditStart(vm, "restored", true);
J
Jiri Denemark 已提交
4032 4033 4034
    if (event)
        qemuDomainEventQueue(driver, event);

4035

4036 4037
    /* If it was running before, resume it now unless caller requested pause. */
    if (header->was_running && !start_paused) {
J
Jiri Denemark 已提交
4038
        if (qemuProcessStartCPUs(driver, vm, conn,
4039 4040
                                 VIR_DOMAIN_RUNNING_RESTORED,
                                 QEMU_ASYNC_JOB_NONE) < 0) {
4041
            if (virGetLastError() == NULL)
4042 4043
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("failed to resume domain"));
J
Jiri Denemark 已提交
4044
            goto out;
4045
        }
4046 4047
        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0) {
            VIR_WARN("Failed to save status on vm %s", vm->def->name);
J
Jiri Denemark 已提交
4048
            goto out;
4049
        }
4050 4051 4052 4053 4054 4055 4056 4057
    } else {
        int detail = (start_paused ? VIR_DOMAIN_EVENT_SUSPENDED_PAUSED :
                      VIR_DOMAIN_EVENT_SUSPENDED_RESTORED);
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_SUSPENDED,
                                         detail);
        if (event)
            qemuDomainEventQueue(driver, event);
4058
    }
J
Jiri Denemark 已提交
4059

4060
    ret = 0;
4061

J
Jiri Denemark 已提交
4062
out:
4063
    virCommandFree(cmd);
4064 4065
    if (virSecurityManagerRestoreSavedStateLabel(driver->securityManager,
                                                 vm, path) < 0)
4066 4067
        VIR_WARN("failed to restore save state label on %s", path);

J
Jiri Denemark 已提交
4068 4069 4070
    return ret;
}

4071
static int
4072 4073 4074 4075
qemuDomainRestoreFlags(virConnectPtr conn,
                       const char *path,
                       const char *dxml,
                       unsigned int flags)
4076
{
J
Jiri Denemark 已提交
4077 4078 4079 4080 4081 4082
    struct qemud_driver *driver = conn->privateData;
    virDomainDefPtr def = NULL;
    virDomainObjPtr vm = NULL;
    int fd = -1;
    int ret = -1;
    struct qemud_save_header header;
4083
    virFileDirectFdPtr directFd = NULL;
4084
    int state = -1;
J
Jiri Denemark 已提交
4085

4086 4087 4088
    virCheckFlags(VIR_DOMAIN_SAVE_BYPASS_CACHE |
                  VIR_DOMAIN_SAVE_RUNNING |
                  VIR_DOMAIN_SAVE_PAUSED, -1);
4089

J
Jiri Denemark 已提交
4090 4091
    qemuDriverLock(driver);

4092 4093 4094 4095 4096
    if (flags & VIR_DOMAIN_SAVE_RUNNING)
        state = 1;
    else if (flags & VIR_DOMAIN_SAVE_PAUSED)
        state = 0;

4097 4098
    fd = qemuDomainSaveImageOpen(driver, path, &def, &header,
                                 (flags & VIR_DOMAIN_SAVE_BYPASS_CACHE) != 0,
4099
                                 &directFd, dxml, state, false, false);
J
Jiri Denemark 已提交
4100 4101 4102 4103 4104 4105 4106 4107 4108
    if (fd < 0)
        goto cleanup;

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

    if (!(vm = virDomainAssignDef(driver->caps,
                                  &driver->domains,
                                  def, true))) {
4109
        /* virDomainAssignDef already set the error */
J
Jiri Denemark 已提交
4110 4111 4112 4113
        goto cleanup;
    }
    def = NULL;

4114
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
J
Jiri Denemark 已提交
4115 4116
        goto cleanup;

4117 4118
    ret = qemuDomainSaveImageStartVM(conn, driver, vm, &fd, &header, path,
                                     false);
4119 4120
    if (virFileDirectFdClose(directFd) < 0)
        VIR_WARN("Failed to close %s", path);
J
Jiri Denemark 已提交
4121

4122
    if (qemuDomainObjEndJob(driver, vm) == 0)
4123
        vm = NULL;
J
Jiri Denemark 已提交
4124 4125 4126 4127
    else if (ret < 0 && !vm->persistent) {
        virDomainRemoveInactive(&driver->domains, vm);
        vm = NULL;
    }
4128

4129 4130
cleanup:
    virDomainDefFree(def);
4131
    VIR_FORCE_CLOSE(fd);
4132
    virFileDirectFdFree(directFd);
4133 4134 4135
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
4136
    return ret;
D
Daniel P. Berrange 已提交
4137 4138
}

4139 4140 4141 4142 4143 4144 4145
static int
qemuDomainRestore(virConnectPtr conn,
                  const char *path)
{
    return qemuDomainRestoreFlags(conn, path, NULL, 0);
}

4146 4147 4148 4149 4150 4151 4152 4153 4154 4155 4156 4157 4158 4159 4160 4161
static char *
qemuDomainSaveImageGetXMLDesc(virConnectPtr conn, const char *path,
                              unsigned int flags)
{
    struct qemud_driver *driver = conn->privateData;
    char *ret = NULL;
    virDomainDefPtr def = NULL;
    int fd = -1;
    struct qemud_save_header header;

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

    qemuDriverLock(driver);

    fd = qemuDomainSaveImageOpen(driver, path, &def, &header, false, NULL,
4162
                                 NULL, -1, false, false);
4163 4164 4165 4166 4167 4168 4169 4170 4171 4172 4173 4174 4175 4176 4177 4178 4179 4180 4181 4182 4183 4184 4185 4186

    if (fd < 0)
        goto cleanup;

    ret = qemuDomainDefFormatXML(driver, def, flags);

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

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

4189 4190
    virCheckFlags(VIR_DOMAIN_SAVE_RUNNING |
                  VIR_DOMAIN_SAVE_PAUSED, -1);
4191 4192 4193

    qemuDriverLock(driver);

4194 4195 4196 4197 4198
    if (flags & VIR_DOMAIN_SAVE_RUNNING)
        state = 1;
    else if (flags & VIR_DOMAIN_SAVE_PAUSED)
        state = 0;

4199
    fd = qemuDomainSaveImageOpen(driver, path, &def, &header, false, NULL,
4200
                                 dxml, state, true, false);
4201 4202 4203 4204 4205 4206 4207 4208 4209 4210 4211 4212 4213 4214 4215 4216 4217 4218 4219 4220 4221 4222 4223 4224

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

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

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

4225
    if (lseek(fd, 0, SEEK_SET) != 0) {
4226 4227 4228
        virReportSystemError(errno, _("cannot seek in '%s'"), path);
        goto cleanup;
    }
4229 4230
    if (safewrite(fd, &header, sizeof(header)) != sizeof(header) ||
        safewrite(fd, xml, len) != len ||
4231 4232 4233 4234 4235 4236 4237 4238 4239 4240 4241 4242 4243 4244 4245
        VIR_CLOSE(fd) < 0) {
        virReportSystemError(errno, _("failed to write xml to '%s'"), path);
        goto cleanup;
    }

    ret = 0;

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

E
Eric Blake 已提交
4246 4247
/* Return 0 on success, 1 if incomplete saved image was silently unlinked,
 * and -1 on failure with error raised.  */
4248 4249 4250 4251
static int
qemuDomainObjRestore(virConnectPtr conn,
                     struct qemud_driver *driver,
                     virDomainObjPtr vm,
4252
                     const char *path,
4253
                     bool start_paused,
4254
                     bool bypass_cache)
J
Jiri Denemark 已提交
4255 4256 4257 4258 4259
{
    virDomainDefPtr def = NULL;
    int fd = -1;
    int ret = -1;
    struct qemud_save_header header;
4260
    virFileDirectFdPtr directFd = NULL;
J
Jiri Denemark 已提交
4261

4262
    fd = qemuDomainSaveImageOpen(driver, path, &def, &header,
4263 4264
                                 bypass_cache, &directFd, NULL, -1, false,
                                 true);
E
Eric Blake 已提交
4265 4266 4267
    if (fd < 0) {
        if (fd == -3)
            ret = 1;
J
Jiri Denemark 已提交
4268
        goto cleanup;
E
Eric Blake 已提交
4269
    }
J
Jiri Denemark 已提交
4270 4271 4272 4273 4274 4275 4276 4277 4278 4279 4280 4281 4282 4283 4284 4285 4286 4287

    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;

4288 4289
    ret = qemuDomainSaveImageStartVM(conn, driver, vm, &fd, &header, path,
                                     start_paused);
4290 4291
    if (virFileDirectFdClose(directFd) < 0)
        VIR_WARN("Failed to close %s", path);
J
Jiri Denemark 已提交
4292 4293 4294

cleanup:
    virDomainDefFree(def);
4295
    VIR_FORCE_CLOSE(fd);
4296
    virFileDirectFdFree(directFd);
J
Jiri Denemark 已提交
4297 4298 4299
    return ret;
}

D
Daniel P. Berrange 已提交
4300

4301
static char *qemuDomainGetXMLDesc(virDomainPtr dom,
4302 4303
                                  unsigned int flags)
{
4304 4305 4306
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    char *ret = NULL;
4307 4308
    unsigned long balloon;
    int err;
4309

4310
    /* Flags checked by virDomainDefFormat */
4311

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

D
Daniel P. Berrange 已提交
4315
    if (!vm) {
4316 4317
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4318 4319
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4320
        goto cleanup;
D
Daniel P. Berrange 已提交
4321 4322
    }

4323 4324 4325 4326
    /* 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))) {
4327
        qemuDomainObjPrivatePtr priv = vm->privateData;
4328 4329
        /* Don't delay if someone's using the monitor, just use
         * existing most recent data instead */
4330
        if (!priv->job.active) {
4331
            if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_QUERY) < 0)
4332 4333
                goto cleanup;

4334
            qemuDomainObjEnterMonitorWithDriver(driver, vm);
4335
            err = qemuMonitorGetBalloonInfo(priv->mon, &balloon);
4336
            qemuDomainObjExitMonitorWithDriver(driver, vm);
4337
            if (qemuDomainObjEndJob(driver, vm) == 0) {
4338 4339 4340
                vm = NULL;
                goto cleanup;
            }
4341 4342 4343
            if (err < 0)
                goto cleanup;
            if (err > 0)
4344
                vm->def->mem.cur_balloon = balloon;
4345 4346
            /* err == 0 indicates no balloon support, so ignore it */
        }
4347
    }
4348

4349
    ret = qemuDomainFormatXML(driver, vm, flags);
4350 4351

cleanup:
4352 4353
    if (vm)
        virDomainObjUnlock(vm);
4354
    qemuDriverUnlock(driver);
4355
    return ret;
D
Daniel P. Berrange 已提交
4356 4357 4358
}


4359 4360 4361
static char *qemuDomainXMLFromNative(virConnectPtr conn,
                                     const char *format,
                                     const char *config,
E
Eric Blake 已提交
4362 4363
                                     unsigned int flags)
{
4364
    struct qemud_driver *driver = conn->privateData;
4365 4366 4367
    virDomainDefPtr def = NULL;
    char *xml = NULL;

E
Eric Blake 已提交
4368 4369
    virCheckFlags(0, NULL);

4370
    if (STRNEQ(format, QEMU_CONFIG_FORMAT_ARGV)) {
4371 4372
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("unsupported config type %s"), format);
4373 4374 4375
        goto cleanup;
    }

4376
    qemuDriverLock(driver);
4377 4378
    def = qemuParseCommandLineString(driver->caps, config,
                                     NULL, NULL, NULL);
4379
    qemuDriverUnlock(driver);
4380 4381 4382
    if (!def)
        goto cleanup;

4383 4384 4385 4386 4387 4388
    if (!def->name &&
        !(def->name = strdup("unnamed"))) {
        virReportOOMError();
        goto cleanup;
    }

4389
    xml = virDomainDefFormat(def, VIR_DOMAIN_XML_INACTIVE);
4390 4391 4392 4393 4394 4395

cleanup:
    virDomainDefFree(def);
    return xml;
}

4396 4397 4398
static char *qemuDomainXMLToNative(virConnectPtr conn,
                                   const char *format,
                                   const char *xmlData,
E
Eric Blake 已提交
4399 4400
                                   unsigned int flags)
{
4401 4402
    struct qemud_driver *driver = conn->privateData;
    virDomainDefPtr def = NULL;
4403
    virDomainChrSourceDef monConfig;
4404
    virBitmapPtr qemuCaps = NULL;
E
Eric Blake 已提交
4405
    virCommandPtr cmd = NULL;
4406 4407 4408
    char *ret = NULL;
    int i;

E
Eric Blake 已提交
4409 4410
    virCheckFlags(0, NULL);

4411 4412
    qemuDriverLock(driver);

4413
    if (STRNEQ(format, QEMU_CONFIG_FORMAT_ARGV)) {
4414 4415
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("unsupported config type %s"), format);
4416 4417 4418
        goto cleanup;
    }

M
Matthias Bolte 已提交
4419 4420
    def = virDomainDefParseString(driver->caps, xmlData,
                                  QEMU_EXPECTED_VIRT_TYPES, 0);
4421 4422 4423
    if (!def)
        goto cleanup;

4424 4425
    /* Since we're just exporting args, we can't do bridge/network/direct
     * setups, since libvirt will normally create TAP/macvtap devices
4426 4427 4428 4429 4430
     * 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];
4431
        int bootIndex = net->bootIndex;
4432 4433 4434 4435
        if (net->type == VIR_DOMAIN_NET_TYPE_NETWORK) {
            int actualType = virDomainNetGetActualType(net);
            const char *brname;

4436
            VIR_FREE(net->data.network.name);
4437 4438 4439 4440 4441 4442 4443 4444 4445 4446 4447 4448 4449 4450 4451 4452 4453 4454 4455 4456 4457 4458 4459 4460 4461 4462 4463 4464 4465 4466 4467 4468 4469
            VIR_FREE(net->data.network.portgroup);
            if ((actualType == VIR_DOMAIN_NET_TYPE_BRIDGE) &&
                (brname = virDomainNetGetActualBridgeName(net))) {

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

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

                memset(net, 0, sizeof *net);

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

                net->type = VIR_DOMAIN_NET_TYPE_ETHERNET;
                net->data.ethernet.dev = NULL;
                net->data.ethernet.script = NULL;
                net->data.ethernet.ipaddr = NULL;
            }
        } else if (net->type == VIR_DOMAIN_NET_TYPE_DIRECT) {
            VIR_FREE(net->data.direct.linkdev);
            VIR_FREE(net->data.direct.virtPortProfile);
4470 4471 4472 4473 4474 4475 4476 4477 4478 4479 4480 4481 4482 4483 4484 4485 4486 4487 4488

            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;
        }
4489
        net->bootIndex = bootIndex;
4490 4491 4492 4493
    }
    for (i = 0 ; i < def->ngraphics ; i++) {
        if (def->graphics[i]->type == VIR_DOMAIN_GRAPHICS_TYPE_VNC &&
            def->graphics[i]->data.vnc.autoport)
4494
            def->graphics[i]->data.vnc.port = QEMU_VNC_PORT_MIN;
4495 4496
    }

4497
    if (qemuCapsExtractVersionInfo(def->emulator, def->os.arch,
4498
                                   NULL,
4499
                                   &qemuCaps) < 0)
4500 4501
        goto cleanup;

4502
    if (qemuProcessPrepareMonitorChr(driver, &monConfig, def->name) < 0)
4503
        goto cleanup;
4504

4505
    if (!(cmd = qemuBuildCommandLine(conn, driver, def,
4506
                                     &monConfig, false, qemuCaps,
4507
                                     NULL, -1, NULL, VIR_VM_OP_NO_OP)))
4508 4509
        goto cleanup;

E
Eric Blake 已提交
4510
    ret = virCommandToString(cmd);
4511 4512

cleanup:
4513
    qemuDriverUnlock(driver);
4514

4515
    qemuCapsFree(qemuCaps);
E
Eric Blake 已提交
4516
    virCommandFree(cmd);
4517 4518 4519 4520 4521
    virDomainDefFree(def);
    return ret;
}


4522
static int qemudListDefinedDomains(virConnectPtr conn,
4523
                            char **const names, int nnames) {
4524
    struct qemud_driver *driver = conn->privateData;
4525
    int n;
4526

4527
    qemuDriverLock(driver);
4528
    n = virDomainObjListGetInactiveNames(&driver->domains, names, nnames);
4529
    qemuDriverUnlock(driver);
4530
    return n;
D
Daniel P. Berrange 已提交
4531 4532
}

4533
static int qemudNumDefinedDomains(virConnectPtr conn) {
4534
    struct qemud_driver *driver = conn->privateData;
4535
    int n;
4536

4537
    qemuDriverLock(driver);
4538
    n = virDomainObjListNumOfDomains(&driver->domains, 0);
4539
    qemuDriverUnlock(driver);
4540

4541
    return n;
D
Daniel P. Berrange 已提交
4542 4543 4544
}


4545 4546 4547 4548
static int
qemuDomainObjStart(virConnectPtr conn,
                   struct qemud_driver *driver,
                   virDomainObjPtr vm,
4549
                   unsigned int flags)
J
Jiri Denemark 已提交
4550 4551 4552
{
    int ret = -1;
    char *managed_save;
4553 4554 4555 4556
    bool start_paused = (flags & VIR_DOMAIN_START_PAUSED) != 0;
    bool autodestroy = (flags & VIR_DOMAIN_START_AUTODESTROY) != 0;
    bool bypass_cache = (flags & VIR_DOMAIN_START_BYPASS_CACHE) != 0;
    bool force_boot = (flags & VIR_DOMAIN_START_FORCE_BOOT) != 0;
J
Jiri Denemark 已提交
4557 4558 4559

    /*
     * If there is a managed saved state restore it instead of starting
4560
     * from scratch. The old state is removed once the restoring succeeded.
J
Jiri Denemark 已提交
4561 4562
     */
    managed_save = qemuDomainManagedSavePath(driver, vm);
4563 4564 4565 4566

    if (!managed_save)
        goto cleanup;

E
Eric Blake 已提交
4567
    if (virFileExists(managed_save)) {
4568 4569 4570 4571 4572 4573 4574 4575 4576
        if (force_boot) {
            if (unlink(managed_save) < 0) {
                virReportSystemError(errno,
                                     _("cannot remove managed save file %s"),
                                     managed_save);
                goto cleanup;
            }
        } else {
            ret = qemuDomainObjRestore(conn, driver, vm, managed_save,
4577
                                       start_paused, bypass_cache);
J
Jiri Denemark 已提交
4578

E
Eric Blake 已提交
4579
            if (ret == 0 && unlink(managed_save) < 0)
4580
                VIR_WARN("Failed to remove the managed state %s", managed_save);
E
Eric Blake 已提交
4581 4582 4583 4584
            if (ret > 0)
                VIR_WARN("Ignoring incomplete managed state %s", managed_save);
            else
                goto cleanup;
4585
        }
J
Jiri Denemark 已提交
4586 4587
    }

4588
    ret = qemuProcessStart(conn, driver, vm, NULL, start_paused,
4589
                           autodestroy, -1, NULL, NULL, VIR_VM_OP_CREATE);
4590
    virDomainAuditStart(vm, "booted", ret >= 0);
4591
    if (ret >= 0) {
J
Jiri Denemark 已提交
4592 4593 4594 4595
        virDomainEventPtr event =
            virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_BOOTED);
4596
        if (event) {
J
Jiri Denemark 已提交
4597
            qemuDomainEventQueue(driver, event);
4598 4599 4600 4601 4602 4603 4604 4605
            if (start_paused) {
                event = virDomainEventNewFromObj(vm,
                                                 VIR_DOMAIN_EVENT_SUSPENDED,
                                                 VIR_DOMAIN_EVENT_SUSPENDED_PAUSED);
                if (event)
                    qemuDomainEventQueue(driver, event);
            }
        }
J
Jiri Denemark 已提交
4606 4607 4608 4609 4610 4611 4612
    }

cleanup:
    VIR_FREE(managed_save);
    return ret;
}

4613
static int
4614
qemuDomainStartWithFlags(virDomainPtr dom, unsigned int flags)
4615
{
4616 4617 4618
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
4619

4620
    virCheckFlags(VIR_DOMAIN_START_PAUSED |
4621
                  VIR_DOMAIN_START_AUTODESTROY |
4622 4623
                  VIR_DOMAIN_START_BYPASS_CACHE |
                  VIR_DOMAIN_START_FORCE_BOOT, -1);
4624

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

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

4636
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
4637 4638 4639
        goto cleanup;

    if (virDomainObjIsActive(vm)) {
4640 4641
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is already running"));
4642 4643 4644
        goto endjob;
    }

4645
    if (qemuDomainObjStart(dom->conn, driver, vm, flags) < 0)
4646 4647 4648
        goto endjob;

    ret = 0;
4649

4650
endjob:
4651
    if (qemuDomainObjEndJob(driver, vm) == 0)
4652
        vm = NULL;
4653

4654
cleanup:
4655 4656
    if (vm)
        virDomainObjUnlock(vm);
4657
    qemuDriverUnlock(driver);
4658
    return ret;
D
Daniel P. Berrange 已提交
4659 4660
}

4661
static int
4662
qemuDomainStart(virDomainPtr dom)
4663
{
4664
    return qemuDomainStartWithFlags(dom, 0);
4665 4666
}

4667 4668 4669 4670 4671 4672 4673 4674 4675 4676 4677 4678 4679 4680 4681
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;

4682
        if (def->os.machine && STRNEQ(def->os.machine, machine->name))
4683 4684 4685
            continue;

        if (!(*canonical = strdup(machine->canonical))) {
4686
            virReportOOMError();
4687 4688 4689 4690 4691 4692 4693 4694 4695
            return -1;
        }

        break;
    }

    return 0;
}

4696 4697 4698 4699 4700 4701
static int
qemudCanonicalizeMachineDirect(virDomainDefPtr def, char **canonical)
{
    virCapsGuestMachinePtr *machines = NULL;
    int i, nmachines = 0;

4702
    if (qemuCapsProbeMachineTypes(def->emulator, &machines, &nmachines) < 0)
4703 4704 4705 4706 4707 4708
        return -1;

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

4709
        if (def->os.machine && STRNEQ(def->os.machine, machines[i]->name))
4710 4711 4712 4713 4714 4715 4716 4717 4718 4719 4720 4721
            continue;

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

    virCapabilitiesFreeMachines(machines, nmachines);

    return 0;
}

4722 4723
int
qemudCanonicalizeMachine(struct qemud_driver *driver, virDomainDefPtr def)
4724 4725 4726 4727 4728 4729
{
    char *canonical = NULL;
    int i;

    for (i = 0; i < driver->caps->nguests; i++) {
        virCapsGuestPtr guest = driver->caps->guests[i];
4730
        virCapsGuestDomainInfoPtr info;
4731 4732 4733
        int j;

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

4736 4737 4738 4739 4740 4741 4742 4743 4744
            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;
4745 4746
        }

4747 4748 4749 4750
        info = &guest->arch.defaultInfo;

        if (info->emulator && STREQ(info->emulator, def->emulator)) {
            if (qemudCanonicalizeMachineFromInfo(def, info, &canonical) < 0)
4751 4752 4753 4754
                return -1;
            goto out;
        }
    }
4755 4756 4757 4758

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

4759 4760 4761 4762 4763 4764 4765
out:
    if (canonical) {
        VIR_FREE(def->os.machine);
        def->os.machine = canonical;
    }
    return 0;
}
D
Daniel P. Berrange 已提交
4766

4767
static virDomainPtr qemudDomainDefine(virConnectPtr conn, const char *xml) {
4768
    struct qemud_driver *driver = conn->privateData;
4769
    virDomainDefPtr def;
4770
    virDomainObjPtr vm = NULL;
4771
    virDomainPtr dom = NULL;
4772
    virDomainEventPtr event = NULL;
4773
    int dupVM;
4774

4775
    qemuDriverLock(driver);
4776
    if (!(def = virDomainDefParseString(driver->caps, xml,
M
Matthias Bolte 已提交
4777
                                        QEMU_EXPECTED_VIRT_TYPES,
4778
                                        VIR_DOMAIN_XML_INACTIVE)))
4779
        goto cleanup;
4780

4781
    if (virSecurityManagerVerify(driver->securityManager, def) < 0)
4782 4783
        goto cleanup;

4784 4785
    if ((dupVM = virDomainObjIsDuplicate(&driver->domains, def, 0)) < 0)
        goto cleanup;
4786

4787
    if (qemudCanonicalizeMachine(driver, def) < 0)
4788 4789
        goto cleanup;

4790
    if (qemuDomainAssignPCIAddresses(def) < 0)
4791 4792
        goto cleanup;

4793
    if (!(vm = virDomainAssignDef(driver->caps,
4794
                                  &driver->domains,
4795
                                  def, false))) {
4796
        goto cleanup;
4797
    }
4798
    def = NULL;
4799
    vm->persistent = 1;
4800

4801
    if (virDomainSaveConfig(driver->configDir,
4802
                            vm->newDef ? vm->newDef : vm->def) < 0) {
4803
        VIR_INFO("Defining domain '%s'", vm->def->name);
4804 4805
        virDomainRemoveInactive(&driver->domains,
                                vm);
4806
        vm = NULL;
4807
        goto cleanup;
4808 4809
    }

4810 4811
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_DEFINED,
4812
                                     !dupVM ?
4813 4814
                                     VIR_DOMAIN_EVENT_DEFINED_ADDED :
                                     VIR_DOMAIN_EVENT_DEFINED_UPDATED);
4815

4816
    VIR_INFO("Creating domain '%s'", vm->def->name);
4817
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
4818
    if (dom) dom->id = vm->def->id;
4819 4820

cleanup:
4821
    virDomainDefFree(def);
4822 4823
    if (vm)
        virDomainObjUnlock(vm);
4824 4825
    if (event)
        qemuDomainEventQueue(driver, event);
4826
    qemuDriverUnlock(driver);
4827
    return dom;
D
Daniel P. Berrange 已提交
4828 4829
}

4830 4831 4832 4833
static int
qemuDomainUndefineFlags(virDomainPtr dom,
                         unsigned int flags)
{
4834 4835
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
4836
    virDomainEventPtr event = NULL;
4837
    char *name = NULL;
4838
    int ret = -1;
D
Daniel P. Berrange 已提交
4839

4840 4841
    virCheckFlags(VIR_DOMAIN_UNDEFINE_MANAGED_SAVE, -1);

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

D
Daniel P. Berrange 已提交
4845
    if (!vm) {
4846 4847
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4848 4849
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4850
        goto cleanup;
D
Daniel P. Berrange 已提交
4851 4852
    }

4853
    if (!vm->persistent) {
4854
        qemuReportError(VIR_ERR_OPERATION_INVALID,
4855
                        "%s", _("cannot undefine transient domain"));
4856
        goto cleanup;
4857 4858
    }

4859 4860 4861 4862 4863 4864 4865 4866 4867 4868 4869 4870 4871 4872 4873 4874 4875 4876 4877 4878
    name = qemuDomainManagedSavePath(driver, vm);
    if (name == NULL)
        goto cleanup;

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

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

4882 4883 4884
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_UNDEFINED,
                                     VIR_DOMAIN_EVENT_UNDEFINED_REMOVED);
4885

4886
    VIR_INFO("Undefining domain '%s'", vm->def->name);
4887 4888 4889 4890 4891 4892 4893 4894 4895 4896 4897 4898 4899

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

4900
    ret = 0;
D
Daniel P. Berrange 已提交
4901

4902
cleanup:
4903
    VIR_FREE(name);
4904 4905
    if (vm)
        virDomainObjUnlock(vm);
4906 4907
    if (event)
        qemuDomainEventQueue(driver, event);
4908
    qemuDriverUnlock(driver);
4909
    return ret;
D
Daniel P. Berrange 已提交
4910 4911
}

4912 4913 4914 4915 4916 4917
static int
qemudDomainUndefine(virDomainPtr dom)
{
    return qemuDomainUndefineFlags(dom, 0);
}

4918 4919 4920
static int
qemuDomainAttachDeviceDiskLive(struct qemud_driver *driver,
                               virDomainObjPtr vm,
4921
                               virDomainDeviceDefPtr dev)
4922 4923 4924 4925
{
    virDomainDiskDefPtr disk = dev->data.disk;
    virCgroupPtr cgroup = NULL;
    int ret = -1;
4926

4927 4928 4929 4930 4931 4932 4933 4934 4935 4936 4937 4938 4939 4940 4941 4942 4943 4944 4945 4946
    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:
4947
        ret = qemuDomainChangeEjectableMedia(driver, vm, disk, false);
4948 4949 4950 4951
        break;
    case VIR_DOMAIN_DISK_DEVICE_DISK:
        if (disk->bus == VIR_DOMAIN_DISK_BUS_USB)
            ret = qemuDomainAttachUsbMassstorageDevice(driver, vm,
4952
                                                       disk);
4953
        else if (disk->bus == VIR_DOMAIN_DISK_BUS_VIRTIO)
4954
            ret = qemuDomainAttachPciDiskDevice(driver, vm, disk);
4955
        else if (disk->bus == VIR_DOMAIN_DISK_BUS_SCSI)
4956
            ret = qemuDomainAttachSCSIDisk(driver, vm, disk);
4957 4958 4959 4960 4961 4962 4963 4964 4965 4966 4967 4968 4969 4970 4971 4972 4973 4974 4975 4976 4977 4978 4979 4980 4981 4982
        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,
4983
                                     virDomainDeviceDefPtr dev)
4984 4985 4986 4987 4988 4989
{
    virDomainControllerDefPtr cont = dev->data.controller;
    int ret = -1;

    switch (cont->type) {
    case VIR_DOMAIN_CONTROLLER_TYPE_SCSI:
4990
        ret = qemuDomainAttachPciControllerDevice(driver, vm, cont);
4991 4992 4993 4994 4995 4996 4997 4998 4999 5000 5001 5002 5003
        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,
5004
                           virDomainPtr dom)
5005 5006 5007 5008 5009 5010
{
    struct qemud_driver *driver = dom->conn->privateData;
    int ret = -1;

    switch (dev->type) {
    case VIR_DOMAIN_DEVICE_DISK:
5011
        qemuDomainObjCheckDiskTaint(driver, vm, dev->data.disk, -1);
5012
        ret = qemuDomainAttachDeviceDiskLive(driver, vm, dev);
5013 5014 5015 5016 5017
        if (!ret)
            dev->data.disk = NULL;
        break;

    case VIR_DOMAIN_DEVICE_CONTROLLER:
5018
        ret = qemuDomainAttachDeviceControllerLive(driver, vm, dev);
5019 5020 5021 5022
        if (!ret)
            dev->data.controller = NULL;
        break;

5023 5024 5025 5026 5027 5028 5029
    case VIR_DOMAIN_DEVICE_LEASE:
        ret = qemuDomainAttachLease(driver, vm,
                                    dev->data.lease);
        if (ret == 0)
            dev->data.lease = NULL;
        break;

5030
    case VIR_DOMAIN_DEVICE_NET:
5031
        qemuDomainObjCheckNetTaint(driver, vm, dev->data.net, -1);
5032
        ret = qemuDomainAttachNetDevice(dom->conn, driver, vm,
5033
                                        dev->data.net);
5034 5035 5036 5037 5038 5039
        if (!ret)
            dev->data.net = NULL;
        break;

    case VIR_DOMAIN_DEVICE_HOSTDEV:
        ret = qemuDomainAttachHostDevice(driver, vm,
5040
                                         dev->data.hostdev);
5041 5042 5043 5044
        if (!ret)
            dev->data.hostdev = NULL;
        break;

5045 5046 5047 5048 5049 5050 5051
    case VIR_DOMAIN_DEVICE_REDIRDEV:
        ret = qemuDomainAttachRedirdevDevice(driver, vm,
                                             dev->data.redirdev);
        if (!ret)
            dev->data.redirdev = NULL;
        break;

5052 5053 5054 5055 5056 5057 5058 5059 5060 5061 5062 5063 5064
    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,
5065
                               virDomainDeviceDefPtr dev)
5066 5067 5068 5069 5070 5071 5072
{
    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)
5073
            ret = qemuDomainDetachPciDiskDevice(driver, vm, dev);
5074
        else if (disk->bus == VIR_DOMAIN_DISK_BUS_SCSI)
5075
            ret =  qemuDomainDetachDiskDevice(driver, vm, dev);
5076
        else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_USB)
5077
            ret = qemuDomainDetachDiskDevice(driver, vm, dev);
5078 5079 5080 5081 5082 5083 5084 5085 5086 5087 5088 5089 5090 5091 5092 5093
        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,
5094
                                     virDomainDeviceDefPtr dev)
5095 5096 5097 5098 5099 5100
{
    virDomainControllerDefPtr cont = dev->data.controller;
    int ret = -1;

    switch (cont->type) {
    case VIR_DOMAIN_CONTROLLER_TYPE_SCSI:
5101
        ret = qemuDomainDetachPciControllerDevice(driver, vm, dev);
5102 5103 5104 5105 5106 5107 5108 5109 5110 5111 5112 5113
        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,
5114
                           virDomainPtr dom)
5115 5116 5117 5118 5119 5120
{
    struct qemud_driver *driver = dom->conn->privateData;
    int ret = -1;

    switch (dev->type) {
    case VIR_DOMAIN_DEVICE_DISK:
5121
        ret = qemuDomainDetachDeviceDiskLive(driver, vm, dev);
5122 5123
        break;
    case VIR_DOMAIN_DEVICE_CONTROLLER:
5124
        ret = qemuDomainDetachDeviceControllerLive(driver, vm, dev);
5125
        break;
5126 5127 5128
    case VIR_DOMAIN_DEVICE_LEASE:
        ret = qemuDomainDetachLease(driver, vm, dev->data.lease);
        break;
5129
    case VIR_DOMAIN_DEVICE_NET:
5130
        ret = qemuDomainDetachNetDevice(driver, vm, dev);
5131 5132
        break;
    case VIR_DOMAIN_DEVICE_HOSTDEV:
5133
        ret = qemuDomainDetachHostDevice(driver, vm, dev);
5134 5135 5136 5137 5138 5139 5140 5141 5142 5143
        break;
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        "%s", _("This type of device cannot be hot unplugged"));
        break;
    }

    return ret;
}

5144 5145 5146 5147 5148 5149 5150 5151
static int
qemuDomainChangeDiskMediaLive(virDomainObjPtr vm,
                              virDomainDeviceDefPtr dev,
                              struct qemud_driver *driver,
                              bool force)
{
    virDomainDiskDefPtr disk = dev->data.disk;
    virCgroupPtr cgroup = NULL;
5152
    int ret = -1;
5153 5154 5155

    if (qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_DEVICES)) {
        if (virCgroupForDomain(driver->cgroup,
5156
                               vm->def->name, &cgroup, 0) != 0) {
5157 5158 5159 5160 5161 5162 5163 5164 5165 5166 5167 5168
            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:
5169
        ret = qemuDomainChangeEjectableMedia(driver, vm, disk, force);
5170 5171 5172 5173 5174 5175 5176 5177 5178 5179 5180 5181 5182 5183 5184 5185 5186 5187 5188 5189 5190 5191 5192 5193 5194 5195 5196 5197 5198 5199 5200 5201
        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:
5202
        ret = qemuDomainChangeDiskMediaLive(vm, dev, driver, force);
5203 5204 5205 5206 5207 5208 5209 5210 5211 5212 5213 5214 5215 5216
        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;
}

5217
static int
5218
qemuDomainAttachDeviceConfig(virDomainDefPtr vmdef,
5219 5220
                             virDomainDeviceDefPtr dev)
{
5221
    virDomainDiskDefPtr disk;
5222
    virDomainNetDefPtr net;
5223
    virDomainLeaseDefPtr lease;
5224

5225
    switch (dev->type) {
5226 5227 5228 5229 5230 5231 5232 5233 5234 5235 5236 5237 5238 5239 5240 5241 5242 5243 5244 5245
    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;

5246 5247 5248 5249 5250 5251 5252 5253 5254 5255 5256 5257 5258 5259 5260 5261 5262
    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;
5263 5264 5265 5266 5267 5268 5269 5270 5271 5272 5273 5274 5275 5276 5277 5278

    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;

5279 5280 5281 5282 5283 5284 5285 5286 5287 5288
    default:
         qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                         _("persistent attach of device is not supported"));
         return -1;
    }
    return 0;
}


static int
5289
qemuDomainDetachDeviceConfig(virDomainDefPtr vmdef,
5290 5291
                             virDomainDeviceDefPtr dev)
{
5292
    virDomainDiskDefPtr disk;
5293
    virDomainNetDefPtr net;
5294
    virDomainLeaseDefPtr lease;
5295

5296
    switch (dev->type) {
5297 5298 5299 5300 5301 5302 5303 5304
    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;
5305

5306 5307 5308 5309 5310 5311 5312 5313 5314 5315 5316
    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;
5317 5318 5319 5320 5321 5322 5323 5324 5325 5326 5327

    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;

5328 5329 5330 5331 5332 5333 5334 5335 5336
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                        _("persistent detach of device is not supported"));
        return -1;
    }
    return 0;
}

static int
5337
qemuDomainUpdateDeviceConfig(virDomainDefPtr vmdef,
5338 5339
                             virDomainDeviceDefPtr dev)
{
5340 5341 5342
    virDomainDiskDefPtr orig, disk;
    int pos;

5343
    switch (dev->type) {
5344 5345 5346 5347 5348 5349 5350 5351 5352 5353 5354 5355 5356 5357 5358 5359 5360 5361 5362 5363 5364 5365 5366 5367 5368 5369 5370 5371 5372 5373 5374 5375 5376 5377 5378
    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;
5379 5380 5381 5382 5383 5384 5385 5386
    default:
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                         _("persistent update of device is not supported"));
        return -1;
    }
    return 0;
}

5387 5388 5389 5390 5391 5392 5393 5394 5395 5396 5397
/* 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)
5398
{
5399
    struct qemud_driver *driver = dom->conn->privateData;
5400
    virDomainObjPtr vm = NULL;
5401
    virDomainDefPtr vmdef = NULL;
5402
    virDomainDeviceDefPtr dev = NULL;
5403
    bool force = (flags & VIR_DOMAIN_DEVICE_MODIFY_FORCE) != 0;
5404
    int ret = -1;
5405
    unsigned int affect;
5406

5407 5408
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG |
5409 5410 5411
                  (action == QEMU_DEVICE_UPDATE ?
                   VIR_DOMAIN_DEVICE_MODIFY_FORCE : 0), -1);

5412 5413
    affect = flags & (VIR_DOMAIN_AFFECT_LIVE | VIR_DOMAIN_AFFECT_CONFIG);

5414 5415 5416 5417 5418 5419 5420
    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);
5421 5422 5423
        goto cleanup;
    }

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

5427
    if (virDomainObjIsActive(vm)) {
5428
        if (affect == VIR_DOMAIN_AFFECT_CURRENT)
5429
            flags |= VIR_DOMAIN_AFFECT_LIVE;
5430
    } else {
5431
        if (affect == VIR_DOMAIN_AFFECT_CURRENT)
5432
            flags |= VIR_DOMAIN_AFFECT_CONFIG;
5433
        /* check consistency between flags and the vm state */
5434
        if (flags & VIR_DOMAIN_AFFECT_LIVE) {
5435 5436 5437 5438 5439 5440
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s",
                            _("cannot do live update a device on "
                              "inactive domain"));
            goto endjob;
        }
5441
    }
5442

5443
    if ((flags & VIR_DOMAIN_AFFECT_CONFIG) && !vm->persistent) {
5444 5445 5446 5447
         qemuReportError(VIR_ERR_OPERATION_INVALID,
                         "%s", _("cannot modify device on transient domain"));
         goto endjob;
    }
5448

5449
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
5450 5451 5452 5453 5454
        dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
                                      VIR_DOMAIN_XML_INACTIVE);
        if (dev == NULL)
            goto endjob;

5455 5456 5457 5458 5459 5460 5461 5462 5463 5464 5465 5466 5467 5468 5469 5470 5471 5472 5473
        /* 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;
        }
5474

5475 5476 5477 5478 5479
        if (ret == -1)
            goto endjob;
    }

    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
5480 5481 5482 5483
        /* 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);
5484 5485
        if (dev == NULL) {
            ret = -1;
5486
            goto endjob;
5487
        }
5488

5489 5490
        switch (action) {
        case QEMU_DEVICE_ATTACH:
5491
            ret = qemuDomainAttachDeviceLive(vm, dev, dom);
5492 5493
            break;
        case QEMU_DEVICE_DETACH:
5494
            ret = qemuDomainDetachDeviceLive(vm, dev, dom);
5495 5496
            break;
        case QEMU_DEVICE_UPDATE:
5497
            ret = qemuDomainUpdateDeviceLive(vm, dev, dom, force);
5498 5499 5500 5501
            break;
        default:
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("unknown domain modify action %d"), action);
5502
            ret = -1;
5503 5504
            break;
        }
5505 5506 5507

        if (ret == -1)
            goto endjob;
5508 5509
        /*
         * update domain status forcibly because the domain status may be
5510 5511
         * changed even if we failed to attach the device. For example,
         * a new controller may be created.
5512
         */
5513
        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0) {
5514
            ret = -1;
5515 5516
            goto endjob;
        }
5517
    }
5518

5519
    /* Finally, if no error until here, we can save config. */
5520
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
5521 5522 5523 5524 5525 5526
        ret = virDomainSaveConfig(driver->configDir, vmdef);
        if (!ret) {
            virDomainObjAssignDef(vm, vmdef, false);
            vmdef = NULL;
        }
    }
5527 5528

endjob:
5529
    if (qemuDomainObjEndJob(driver, vm) == 0)
5530 5531 5532
        vm = NULL;

cleanup:
5533
    virDomainDefFree(vmdef);
5534 5535 5536 5537
    virDomainDeviceDefFree(dev);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
5538 5539 5540
    return ret;
}

5541 5542 5543 5544 5545 5546
static int qemuDomainAttachDeviceFlags(virDomainPtr dom, const char *xml,
                                       unsigned int flags)
{
    return qemuDomainModifyDeviceFlags(dom, xml, flags, QEMU_DEVICE_ATTACH);
}

5547 5548 5549
static int qemuDomainAttachDevice(virDomainPtr dom, const char *xml)
{
    return qemuDomainAttachDeviceFlags(dom, xml,
5550
                                       VIR_DOMAIN_AFFECT_LIVE);
5551
}
5552

5553

5554 5555 5556 5557
static int qemuDomainUpdateDeviceFlags(virDomainPtr dom,
                                       const char *xml,
                                       unsigned int flags)
{
5558
    return qemuDomainModifyDeviceFlags(dom, xml, flags, QEMU_DEVICE_UPDATE);
5559 5560
}

5561 5562 5563
static int qemuDomainDetachDeviceFlags(virDomainPtr dom, const char *xml,
                                       unsigned int flags)
{
5564
    return qemuDomainModifyDeviceFlags(dom, xml, flags, QEMU_DEVICE_DETACH);
5565 5566
}

5567 5568 5569
static int qemuDomainDetachDevice(virDomainPtr dom, const char *xml)
{
    return qemuDomainDetachDeviceFlags(dom, xml,
5570
                                       VIR_DOMAIN_AFFECT_LIVE);
5571 5572
}

5573
static int qemudDomainGetAutostart(virDomainPtr dom,
5574
                                   int *autostart) {
5575 5576 5577
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
5578

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

5583
    if (!vm) {
5584 5585
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
5586 5587
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
5588
        goto cleanup;
5589 5590 5591
    }

    *autostart = vm->autostart;
5592
    ret = 0;
5593

5594
cleanup:
5595 5596
    if (vm)
        virDomainObjUnlock(vm);
5597
    return ret;
5598 5599
}

5600
static int qemudDomainSetAutostart(virDomainPtr dom,
5601
                                   int autostart) {
5602 5603
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
5604 5605
    char *configFile = NULL, *autostartLink = NULL;
    int ret = -1;
5606

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

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

5618
    if (!vm->persistent) {
5619
        qemuReportError(VIR_ERR_OPERATION_INVALID,
5620
                        "%s", _("cannot set autostart for transient domain"));
5621
        goto cleanup;
5622 5623
    }

5624 5625
    autostart = (autostart != 0);

5626
    if (vm->autostart != autostart) {
5627
        if ((configFile = virDomainConfigFile(driver->configDir, vm->def->name)) == NULL)
5628
            goto cleanup;
5629
        if ((autostartLink = virDomainConfigFile(driver->autostartDir, vm->def->name)) == NULL)
5630
            goto cleanup;
5631

5632
        if (autostart) {
5633 5634
            if (virFileMakePath(driver->autostartDir) < 0) {
                virReportSystemError(errno,
5635 5636
                                     _("cannot create autostart directory %s"),
                                     driver->autostartDir);
5637 5638
                goto cleanup;
            }
5639

5640
            if (symlink(configFile, autostartLink) < 0) {
5641
                virReportSystemError(errno,
5642 5643
                                     _("Failed to create symlink '%s to '%s'"),
                                     autostartLink, configFile);
5644 5645 5646 5647
                goto cleanup;
            }
        } else {
            if (unlink(autostartLink) < 0 && errno != ENOENT && errno != ENOTDIR) {
5648
                virReportSystemError(errno,
5649 5650
                                     _("Failed to delete symlink '%s'"),
                                     autostartLink);
5651 5652
                goto cleanup;
            }
5653 5654
        }

5655
        vm->autostart = autostart;
5656
    }
5657
    ret = 0;
5658

5659 5660 5661
cleanup:
    VIR_FREE(configFile);
    VIR_FREE(autostartLink);
5662 5663
    if (vm)
        virDomainObjUnlock(vm);
5664
    qemuDriverUnlock(driver);
5665
    return ret;
5666 5667
}

5668

5669 5670 5671 5672 5673 5674 5675 5676 5677 5678 5679 5680 5681 5682 5683 5684 5685 5686 5687 5688 5689 5690 5691 5692 5693 5694 5695 5696 5697 5698 5699 5700 5701
/*
 * check whether the host supports CFS bandwidth
 *
 * Return 1 when CFS bandwidth is supported, 0 when CFS bandwidth is not
 * supported, -1 on error.
 */
static int qemuGetCpuBWStatus(virCgroupPtr cgroup)
{
    char *cfs_period_path = NULL;
    int ret = -1;

    if (!cgroup)
        return 0;

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

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

cleanup:
    VIR_FREE(cfs_period_path);
    return ret;
}


5702 5703 5704 5705
static char *qemuGetSchedulerType(virDomainPtr dom,
                                  int *nparams)
{
    struct qemud_driver *driver = dom->conn->privateData;
5706
    char *ret = NULL;
5707
    int rc;
5708

5709
    qemuDriverLock(driver);
5710
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
5711 5712
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup CPU controller is not mounted"));
5713
        goto cleanup;
5714 5715
    }

5716 5717 5718 5719 5720 5721 5722 5723 5724
    if (nparams) {
        rc = qemuGetCpuBWStatus(driver->cgroup);
        if (rc < 0)
            goto cleanup;
        else if (rc == 0)
            *nparams = 1;
        else
            *nparams = 3;
    }
5725 5726 5727

    ret = strdup("posix");
    if (!ret)
5728
        virReportOOMError();
5729 5730 5731

cleanup:
    qemuDriverUnlock(driver);
5732 5733 5734
    return ret;
}

5735
static int qemuDomainSetBlkioParameters(virDomainPtr dom,
5736
                                         virTypedParameterPtr params,
5737 5738 5739 5740 5741 5742 5743
                                         int nparams,
                                         unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
5744
    virDomainDefPtr persistentDef = NULL;
5745
    int ret = -1;
5746
    bool isActive;
5747

5748 5749
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);
5750 5751 5752 5753 5754 5755 5756 5757 5758 5759
    qemuDriverLock(driver);

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

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

5760 5761 5762 5763 5764 5765 5766
    isActive = virDomainObjIsActive(vm);

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

5769 5770 5771 5772 5773 5774 5775 5776
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
        if (!isActive) {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s", _("domain is not running"));
            goto cleanup;
        }

        if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_BLKIO)) {
5777
            qemuReportError(VIR_ERR_OPERATION_INVALID, _("blkio cgroup isn't mounted"));
5778 5779 5780 5781 5782 5783 5784 5785 5786 5787 5788 5789 5790 5791 5792 5793 5794 5795
            goto cleanup;
        }

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

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

    ret = 0;
5799 5800 5801 5802 5803 5804 5805 5806 5807 5808 5809 5810 5811 5812 5813 5814 5815 5816 5817
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
        for (i = 0; i < nparams; i++) {
            virTypedParameterPtr param = &params[i];

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

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

5819 5820 5821 5822 5823 5824 5825 5826 5827
                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);
5828 5829
                ret = -1;
            }
5830 5831
        }
    } else if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
E
Eric Blake 已提交
5832 5833 5834
        /* Clang can't see that if we get here, persistentDef was set.  */
        sa_assert(persistentDef);

5835 5836 5837 5838 5839 5840 5841 5842 5843 5844
        for (i = 0; i < nparams; i++) {
            virTypedParameterPtr param = &params[i];

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

5846 5847 5848 5849 5850 5851 5852 5853 5854 5855 5856
                if (params[i].value.ui > 1000 || params[i].value.ui < 100) {
                    qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                    _("out of blkio weight range."));
                    ret = -1;
                    continue;
                }

                persistentDef->blkio.weight = params[i].value.ui;
            } else {
                qemuReportError(VIR_ERR_INVALID_ARG,
                                _("Parameter `%s' not supported"), param->field);
5857 5858 5859
                ret = -1;
            }
        }
A
Alex Jia 已提交
5860 5861 5862

        if (virDomainSaveConfig(driver->configDir, persistentDef) < 0)
            ret = -1;
5863 5864 5865 5866 5867 5868 5869 5870 5871 5872 5873
    }

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

static int qemuDomainGetBlkioParameters(virDomainPtr dom,
5874
                                         virTypedParameterPtr params,
5875 5876 5877 5878 5879 5880 5881
                                         int *nparams,
                                         unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
5882
    virDomainDefPtr persistentDef = NULL;
5883 5884 5885
    unsigned int val;
    int ret = -1;
    int rc;
5886
    bool isActive;
5887

5888 5889
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);
5890 5891 5892 5893 5894 5895 5896 5897 5898 5899 5900 5901 5902 5903 5904 5905 5906 5907 5908 5909 5910 5911 5912
    qemuDriverLock(driver);

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

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

    if ((*nparams) == 0) {
        /* Current number of blkio parameters supported by cgroups */
        *nparams = QEMU_NB_BLKIO_PARAM;
        ret = 0;
        goto cleanup;
    }

    if ((*nparams) != QEMU_NB_BLKIO_PARAM) {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("Invalid parameter count"));
        goto cleanup;
    }

5913 5914 5915 5916 5917 5918 5919
    isActive = virDomainObjIsActive(vm);

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

5922 5923 5924 5925 5926 5927
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
        if (!isActive) {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s", _("domain is not running"));
            goto cleanup;
        }
5928

5929
        if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_BLKIO)) {
5930
            qemuReportError(VIR_ERR_OPERATION_INVALID, _("blkio cgroup isn't mounted"));
5931 5932 5933 5934 5935 5936 5937 5938 5939 5940 5941 5942 5943 5944 5945 5946 5947 5948 5949 5950 5951 5952 5953 5954 5955 5956 5957 5958 5959 5960 5961 5962 5963 5964 5965 5966 5967 5968 5969 5970 5971 5972 5973 5974 5975 5976
            goto cleanup;
        }

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

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

    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
        for (i = 0; i < *nparams; i++) {
            virTypedParameterPtr param = &params[i];
            val = 0;
            param->value.ui = 0;
            param->type = VIR_TYPED_PARAM_UINT;

            switch (i) {
            case 0: /* fill blkio weight here */
                rc = virCgroupGetBlkioWeight(group, &val);
                if (rc != 0) {
                    virReportSystemError(-rc, "%s",
                                         _("unable to get blkio weight"));
                    goto cleanup;
                }
                if (virStrcpyStatic(param->field, VIR_DOMAIN_BLKIO_WEIGHT) == NULL) {
                    qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                    "%s", _("Field blkio weight too long for destination"));
                    goto cleanup;
                }
                param->value.ui = val;
                break;

            default:
                break;
                /* should not hit here */
5977
            }
5978 5979 5980 5981 5982 5983 5984 5985 5986 5987 5988 5989 5990 5991 5992 5993 5994
        }
    } else if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
        for (i = 0; i < *nparams; i++) {
            virTypedParameterPtr param = &params[i];
            val = 0;
            param->value.ui = 0;
            param->type = VIR_TYPED_PARAM_UINT;

            switch (i) {
            case 0: /* fill blkio weight here */
                if (virStrcpyStatic(param->field, VIR_DOMAIN_BLKIO_WEIGHT) == NULL) {
                    qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                    "%s", _("Field blkio weight too long for destination"));
                    goto cleanup;
                }
                param->value.ui = persistentDef->blkio.weight;
                break;
5995

5996 5997 5998 5999
            default:
                break;
                /* should not hit here */
            }
6000 6001 6002 6003 6004 6005 6006 6007 6008 6009 6010 6011 6012
        }
    }

    ret = 0;

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

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

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

    qemuDriverLock(driver);

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

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

6040 6041
    isActive = virDomainObjIsActive(vm);

6042
    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
6043
        if (isActive)
6044
            flags = VIR_DOMAIN_AFFECT_LIVE;
6045
        else
6046
            flags = VIR_DOMAIN_AFFECT_CONFIG;
6047 6048
    }

6049
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
6050 6051 6052 6053 6054 6055 6056 6057 6058 6059 6060 6061 6062 6063 6064 6065 6066 6067 6068
        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;
        }
    }

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

    ret = 0;
    for (i = 0; i < nparams; i++) {
6081
        virTypedParameterPtr param = &params[i];
6082 6083 6084

        if (STREQ(param->field, VIR_DOMAIN_MEMORY_HARD_LIMIT)) {
            int rc;
6085
            if (param->type != VIR_TYPED_PARAM_ULLONG) {
6086 6087 6088 6089 6090 6091
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for memory hard_limit tunable, expected a 'ullong'"));
                ret = -1;
                continue;
            }

6092
            if (flags & VIR_DOMAIN_AFFECT_LIVE) {
6093 6094 6095 6096 6097 6098 6099 6100
                rc = virCgroupSetMemoryHardLimit(group, params[i].value.ul);
                if (rc != 0) {
                    virReportSystemError(-rc, "%s",
                                         _("unable to set memory hard_limit tunable"));
                    ret = -1;
                }
            }

6101
            if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
6102
                persistentDef->mem.hard_limit = params[i].value.ul;
6103 6104 6105
            }
        } else if (STREQ(param->field, VIR_DOMAIN_MEMORY_SOFT_LIMIT)) {
            int rc;
6106
            if (param->type != VIR_TYPED_PARAM_ULLONG) {
6107 6108 6109 6110 6111 6112
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for memory soft_limit tunable, expected a 'ullong'"));
                ret = -1;
                continue;
            }

6113
            if (flags & VIR_DOMAIN_AFFECT_LIVE) {
6114 6115 6116 6117 6118 6119 6120 6121
                rc = virCgroupSetMemorySoftLimit(group, params[i].value.ul);
                if (rc != 0) {
                    virReportSystemError(-rc, "%s",
                                         _("unable to set memory soft_limit tunable"));
                    ret = -1;
                }
            }

6122
            if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
6123
                persistentDef->mem.soft_limit = params[i].value.ul;
6124
            }
6125
        } else if (STREQ(param->field, VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT)) {
6126
            int rc;
6127
            if (param->type != VIR_TYPED_PARAM_ULLONG) {
6128 6129 6130 6131 6132 6133
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for swap_hard_limit tunable, expected a 'ullong'"));
                ret = -1;
                continue;
            }

6134
            if (flags & VIR_DOMAIN_AFFECT_LIVE) {
6135 6136 6137 6138 6139 6140 6141
                rc = virCgroupSetMemSwapHardLimit(group, params[i].value.ul);
                if (rc != 0) {
                    virReportSystemError(-rc, "%s",
                                         _("unable to set swap_hard_limit tunable"));
                    ret = -1;
                }
            }
6142
            if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
6143
                persistentDef->mem.swap_hard_limit = params[i].value.ul;
6144 6145 6146 6147 6148 6149 6150 6151 6152 6153 6154 6155
            }
        } 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;
        }
    }

6156
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
6157 6158
        if (virDomainSaveConfig(driver->configDir, persistentDef) < 0)
            ret = -1;
6159 6160
    }

6161 6162 6163 6164 6165 6166 6167 6168
cleanup:
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

6169
static int qemuDomainGetMemoryParameters(virDomainPtr dom,
6170
                                         virTypedParameterPtr params,
6171
                                         int *nparams,
6172
                                         unsigned int flags)
6173 6174 6175 6176 6177
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
6178
    virDomainDefPtr persistentDef = NULL;
6179
    unsigned long long val;
6180 6181
    int ret = -1;
    int rc;
6182
    bool isActive;
6183

6184 6185
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);
6186

6187
    qemuDriverLock(driver);
6188 6189 6190 6191 6192 6193 6194 6195 6196

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

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

6197 6198
    isActive = virDomainObjIsActive(vm);

6199
    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
6200
        if (isActive)
6201
            flags = VIR_DOMAIN_AFFECT_LIVE;
6202
        else
6203
            flags = VIR_DOMAIN_AFFECT_CONFIG;
6204 6205
    }

6206
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
6207 6208 6209 6210 6211 6212 6213 6214 6215 6216 6217 6218 6219 6220 6221 6222 6223 6224 6225
        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;
        }
    }

6226
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
6227 6228 6229 6230 6231 6232 6233
        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;
6234 6235
    }

6236 6237 6238 6239 6240 6241 6242
    if ((*nparams) == 0) {
        /* Current number of memory parameters supported by cgroups */
        *nparams = QEMU_NB_MEM_PARAM;
        ret = 0;
        goto cleanup;
    }

6243
    if ((*nparams) < QEMU_NB_MEM_PARAM) {
6244 6245 6246 6247 6248
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("Invalid parameter count"));
        goto cleanup;
    }

6249
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
6250 6251 6252 6253
        for (i = 0; i < *nparams; i++) {
            virMemoryParameterPtr param = &params[i];
            val = 0;
            param->value.ul = 0;
6254
            param->type = VIR_TYPED_PARAM_ULLONG;
6255 6256 6257 6258 6259 6260 6261 6262 6263 6264 6265 6266 6267 6268 6269 6270 6271 6272 6273 6274 6275 6276 6277 6278 6279 6280 6281 6282 6283 6284 6285 6286 6287 6288 6289

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

6292
    for (i = 0; i < QEMU_NB_MEM_PARAM; i++) {
6293
        virTypedParameterPtr param = &params[i];
6294 6295
        val = 0;
        param->value.ul = 0;
6296
        param->type = VIR_TYPED_PARAM_ULLONG;
6297

6298 6299 6300
        /* Coverity does not realize that if we get here, group is set.  */
        sa_assert(group);

6301
        switch (i) {
6302 6303 6304 6305 6306
        case 0: /* fill memory hard limit here */
            rc = virCgroupGetMemoryHardLimit(group, &val);
            if (rc != 0) {
                virReportSystemError(-rc, "%s",
                                     _("unable to get memory hard limit"));
6307
                goto cleanup;
6308 6309 6310 6311
            }
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_HARD_LIMIT) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field memory hard limit too long for destination"));
6312
                goto cleanup;
6313 6314 6315 6316 6317 6318 6319 6320 6321
            }
            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"));
6322
                goto cleanup;
6323 6324 6325 6326
            }
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SOFT_LIMIT) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field memory soft limit too long for destination"));
6327
                goto cleanup;
6328 6329 6330 6331 6332
            }
            param->value.ul = val;
            break;

        case 2: /* fill swap hard limit here */
6333
            rc = virCgroupGetMemSwapHardLimit(group, &val);
6334 6335 6336
            if (rc != 0) {
                virReportSystemError(-rc, "%s",
                                     _("unable to get swap hard limit"));
6337
                goto cleanup;
6338
            }
6339
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT) == NULL) {
6340 6341
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field swap hard limit too long for destination"));
6342
                goto cleanup;
6343 6344 6345 6346 6347 6348 6349 6350 6351 6352
            }
            param->value.ul = val;
            break;

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

6353
out:
6354
    *nparams = QEMU_NB_MEM_PARAM;
6355 6356
    ret = 0;

6357 6358 6359 6360 6361 6362 6363 6364 6365
cleanup:
    if (group)
        virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

6366 6367 6368 6369 6370 6371 6372 6373
static int
qemuSetVcpusBWLive(virDomainObjPtr vm, virCgroupPtr cgroup,
                   unsigned long long period, long long quota)
{
    int i;
    qemuDomainObjPrivatePtr priv = vm->privateData;
    virCgroupPtr cgroup_vcpu = NULL;
    int rc;
W
Wen Congyang 已提交
6374 6375 6376
    long long vm_quota = 0;
    long long old_quota = 0;
    unsigned long long old_period = 0;
6377 6378 6379 6380

    if (period == 0 && quota == 0)
        return 0;

W
Wen Congyang 已提交
6381 6382 6383 6384 6385 6386 6387 6388 6389 6390 6391 6392 6393 6394 6395 6396 6397 6398 6399
    /* Ensure that we can multiply by vcpus without overflowing. */
    if (quota > LLONG_MAX / vm->def->vcpus) {
        virReportSystemError(EINVAL,
                             _("%s"),
                             "Unable to set cpu bandwidth quota");
        goto cleanup;
    }

    if (quota > 0)
        vm_quota = quota * vm->def->vcpus;
    else
        vm_quota = quota;

    rc = virCgroupGetCpuCfsQuota(cgroup, &old_quota);
    if (rc < 0) {
        virReportSystemError(-rc, "%s",
                             _("unable to get cpu bandwidth tunable"));
        goto cleanup;
    }
6400

W
Wen Congyang 已提交
6401 6402 6403 6404 6405
    rc = virCgroupGetCpuCfsPeriod(cgroup, &old_period);
    if (rc < 0) {
        virReportSystemError(-rc, "%s",
                             _("unable to get cpu bandwidth period tunable"));
        goto cleanup;
6406 6407
    }

W
Wen Congyang 已提交
6408 6409 6410 6411 6412 6413 6414 6415 6416 6417 6418 6419 6420 6421 6422 6423 6424 6425 6426 6427 6428
    /*
     * If quota will be changed to a small value, we should modify vcpu's quota
     * first. Otherwise, we should modify vm's quota first.
     *
     * If period will be changed to a small value, we should modify vm's period
     * first. Otherwise, we should modify vcpu's period first.
     *
     * If both quota and period will be changed to a big/small value, we cannot
     * modify period and quota together.
     */
    if ((quota != 0) && (period != 0)) {
        if (((quota > old_quota) && (period > old_period)) ||
            ((quota < old_quota) && (period < old_period))) {
            /* modify period */
            if (qemuSetVcpusBWLive(vm, cgroup, period, 0) < 0)
                goto cleanup;

            /* modify quota */
            if (qemuSetVcpusBWLive(vm, cgroup, 0, quota) < 0)
                goto cleanup;
            return 0;
6429
        }
W
Wen Congyang 已提交
6430
    }
6431

W
Wen Congyang 已提交
6432 6433 6434 6435
    if (((vm_quota != 0) && (vm_quota > old_quota)) ||
        ((period != 0) && (period < old_period)))
        /* Set cpu bandwidth for the vm */
        if (qemuSetupCgroupVcpuBW(cgroup, period, vm_quota) < 0)
6436 6437
            goto cleanup;

W
Wen Congyang 已提交
6438 6439 6440 6441 6442 6443 6444 6445 6446 6447 6448 6449 6450 6451 6452 6453 6454 6455 6456 6457
    /* If we does not know VCPU<->PID mapping or all vcpu runs in the same
     * thread, we cannot control each vcpu. So we only modify cpu bandwidth
     * when each vcpu has a separated thread.
     */
    if (priv->nvcpupids != 0 && priv->vcpupids[0] != vm->pid) {
        for (i = 0; i < priv->nvcpupids; i++) {
            rc = virCgroupForVcpu(cgroup, i, &cgroup_vcpu, 0);
            if (rc < 0) {
                virReportSystemError(-rc,
                                     _("Unable to find vcpu cgroup for %s(vcpu:"
                                       " %d)"),
                                     vm->def->name, i);
                goto cleanup;
            }

            if (qemuSetupCgroupVcpuBW(cgroup_vcpu, period, quota) < 0)
                goto cleanup;

            virCgroupFree(&cgroup_vcpu);
        }
6458 6459
    }

W
Wen Congyang 已提交
6460 6461 6462 6463 6464 6465
    if (((vm_quota != 0) && (vm_quota <= old_quota)) ||
        ((period != 0) && (period >= old_period)))
        /* Set cpu bandwidth for the vm */
        if (qemuSetupCgroupVcpuBW(cgroup, period, vm_quota) < 0)
            goto cleanup;

6466 6467 6468 6469 6470 6471 6472
    return 0;

cleanup:
    virCgroupFree(&cgroup_vcpu);
    return -1;
}

6473
static int qemuSetSchedulerParametersFlags(virDomainPtr dom,
6474
                                           virTypedParameterPtr params,
6475 6476
                                           int nparams,
                                           unsigned int flags)
6477 6478 6479 6480 6481
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
6482
    virDomainDefPtr vmdef = NULL;
6483
    int ret = -1;
6484
    bool isActive;
6485
    int rc;
6486

6487 6488
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);
6489

6490
    qemuDriverLock(driver);
6491 6492 6493 6494

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

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

6500 6501
    isActive = virDomainObjIsActive(vm);

6502
    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
6503
        if (isActive)
6504
            flags = VIR_DOMAIN_AFFECT_LIVE;
6505
        else
6506
            flags = VIR_DOMAIN_AFFECT_CONFIG;
6507 6508
    }

6509 6510 6511 6512 6513 6514 6515 6516 6517 6518 6519
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
        if (!vm->persistent) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("cannot change persistent config of a transient domain"));
            goto cleanup;
        }

        /* Make a copy for updated domain. */
        vmdef = virDomainObjCopyPersistentDef(driver->caps, vm);
        if (!vmdef)
            goto cleanup;
6520 6521
    }

6522
    if (flags & VIR_DOMAIN_AFFECT_LIVE) {
6523 6524 6525 6526 6527 6528 6529 6530 6531 6532 6533 6534 6535 6536 6537 6538 6539 6540 6541
        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;
        }
    }

6542
    for (i = 0; i < nparams; i++) {
6543
        virTypedParameterPtr param = &params[i];
6544 6545

        if (STREQ(param->field, "cpu_shares")) {
6546
            if (param->type != VIR_TYPED_PARAM_ULLONG) {
6547 6548
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for cpu_shares tunable, expected a 'ullong'"));
6549 6550 6551
                goto cleanup;
            }

6552
            if (flags & VIR_DOMAIN_AFFECT_LIVE) {
6553 6554 6555 6556 6557 6558 6559 6560
                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;
6561
            }
6562

6563
            if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
6564 6565
                vmdef->cputune.shares = params[i].value.ul;
            }
W
Wen Congyang 已提交
6566
        } else if (STREQ(param->field, "vcpu_period")) {
6567 6568
            if (param->type != VIR_TYPED_PARAM_ULLONG) {
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
W
Wen Congyang 已提交
6569
                                _("invalid type for vcpu_period tunable,"
6570 6571 6572 6573 6574 6575 6576
                                  " expected a 'ullong'"));
                goto cleanup;
            }

            if (flags & VIR_DOMAIN_AFFECT_LIVE) {
                rc = qemuSetVcpusBWLive(vm, group, params[i].value.ul, 0);
                if (rc != 0)
6577
                    goto cleanup;
6578 6579 6580 6581 6582 6583 6584 6585

                if (params[i].value.ul)
                    vm->def->cputune.period = params[i].value.ul;
            }

            if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
                vmdef->cputune.period = params[i].value.ul;
            }
W
Wen Congyang 已提交
6586
        } else if (STREQ(param->field, "vcpu_quota")) {
6587 6588
            if (param->type != VIR_TYPED_PARAM_LLONG) {
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
W
Wen Congyang 已提交
6589
                                _("invalid type for vcpu_quota tunable,"
6590 6591 6592 6593 6594 6595 6596
                                  " expected a 'llong'"));
                goto cleanup;
            }

            if (flags & VIR_DOMAIN_AFFECT_LIVE) {
                rc = qemuSetVcpusBWLive(vm, group, 0, params[i].value.l);
                if (rc != 0)
6597
                    goto cleanup;
6598 6599 6600 6601 6602 6603 6604

                if (params[i].value.l)
                    vm->def->cputune.quota = params[i].value.l;
            }

            if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
                vmdef->cputune.quota = params[i].value.l;
6605
            }
6606
        } else {
6607 6608
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("Invalid parameter `%s'"), param->field);
6609 6610 6611
            goto cleanup;
        }
    }
6612

6613 6614 6615 6616 6617 6618 6619 6620 6621 6622 6623 6624 6625
    if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
        goto cleanup;


    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
        rc = virDomainSaveConfig(driver->configDir, vmdef);
        if (rc < 0)
            goto cleanup;

        virDomainObjAssignDef(vm, vmdef, false);
        vmdef = NULL;
    }

6626 6627 6628
    ret = 0;

cleanup:
6629
    virDomainDefFree(vmdef);
6630 6631 6632
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
6633
    qemuDriverUnlock(driver);
6634 6635 6636
    return ret;
}

6637
static int qemuSetSchedulerParameters(virDomainPtr dom,
6638
                                      virTypedParameterPtr params,
6639 6640 6641 6642 6643
                                      int nparams)
{
    return qemuSetSchedulerParametersFlags(dom,
                                           params,
                                           nparams,
6644
                                           VIR_DOMAIN_AFFECT_LIVE);
6645 6646
}

6647 6648 6649 6650 6651 6652 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 6685 6686 6687 6688 6689 6690 6691 6692 6693 6694 6695 6696 6697 6698 6699 6700 6701 6702 6703 6704 6705 6706 6707 6708 6709 6710 6711
static int
qemuGetVcpuBWLive(virCgroupPtr cgroup, unsigned long long *period,
                  long long *quota)
{
    int rc;

    rc = virCgroupGetCpuCfsPeriod(cgroup, period);
    if (rc < 0) {
        virReportSystemError(-rc, "%s",
                             _("unable to get cpu bandwidth period tunable"));
        return -1;
    }

    rc = virCgroupGetCpuCfsQuota(cgroup, quota);
    if (rc < 0) {
        virReportSystemError(-rc, "%s",
                             _("unable to get cpu bandwidth tunable"));
        return -1;
    }

    return 0;
}

static int
qemuGetVcpusBWLive(virDomainObjPtr vm, virCgroupPtr cgroup,
                   unsigned long long *period, long long *quota)
{
    virCgroupPtr cgroup_vcpu = NULL;
    qemuDomainObjPrivatePtr priv = NULL;
    int rc;
    int ret = -1;

    priv = vm->privateData;
    if (priv->nvcpupids == 0 || priv->vcpupids[0] == vm->pid) {
        /* We do not create sub dir for each vcpu */
        rc = qemuGetVcpuBWLive(cgroup, period, quota);
        if (rc < 0)
            goto cleanup;

        if (*quota > 0)
            *quota /= vm->def->vcpus;
        goto out;
    }

    /* get period and quota for vcpu0 */
    rc = virCgroupForVcpu(cgroup, 0, &cgroup_vcpu, 0);
    if (!cgroup_vcpu) {
        virReportSystemError(-rc,
                             _("Unable to find vcpu cgroup for %s(vcpu: 0)"),
                             vm->def->name);
        goto cleanup;
    }

    rc = qemuGetVcpuBWLive(cgroup_vcpu, period, quota);
    if (rc < 0)
        goto cleanup;

out:
    ret = 0;

cleanup:
    virCgroupFree(&cgroup_vcpu);
    return ret;
}

6712 6713 6714 6715 6716
static int
qemuGetSchedulerParametersFlags(virDomainPtr dom,
                                virTypedParameterPtr params,
                                int *nparams,
                                unsigned int flags)
6717 6718 6719 6720
{
    struct qemud_driver *driver = dom->conn->privateData;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
6721 6722 6723
    unsigned long long shares;
    unsigned long long period;
    long long quota;
6724 6725
    int ret = -1;
    int rc;
6726
    bool isActive;
6727
    bool cpu_bw_status = false;
6728
    int saved_nparams = 0;
6729

6730 6731
    virCheckFlags(VIR_DOMAIN_AFFECT_LIVE |
                  VIR_DOMAIN_AFFECT_CONFIG, -1);
6732

6733 6734
    qemuDriverLock(driver);

6735 6736
    if ((flags & (VIR_DOMAIN_AFFECT_LIVE | VIR_DOMAIN_AFFECT_CONFIG)) ==
        (VIR_DOMAIN_AFFECT_LIVE | VIR_DOMAIN_AFFECT_CONFIG)) {
6737 6738
        qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                        _("cannot query live and config together"));
6739
        goto cleanup;
6740 6741
    }

6742
    if (*nparams < 1) {
6743 6744
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("Invalid parameter count"));
6745
        goto cleanup;
6746 6747
    }

6748 6749 6750 6751 6752 6753 6754
    if (*nparams > 1) {
        rc = qemuGetCpuBWStatus(driver->cgroup);
        if (rc < 0)
            goto cleanup;
        cpu_bw_status = !!rc;
    }

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

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

6763 6764
    isActive = virDomainObjIsActive(vm);

6765
    if (flags == VIR_DOMAIN_AFFECT_CURRENT) {
6766
        if (isActive)
6767
            flags = VIR_DOMAIN_AFFECT_LIVE;
6768
        else
6769
            flags = VIR_DOMAIN_AFFECT_CONFIG;
6770 6771
    }

6772
    if (flags & VIR_DOMAIN_AFFECT_CONFIG) {
6773 6774 6775 6776 6777 6778 6779 6780 6781 6782 6783 6784 6785 6786 6787
        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;
            }
6788 6789 6790 6791 6792
            shares = persistentDef->cputune.shares;
            if (*nparams > 1 && cpu_bw_status) {
                period = persistentDef->cputune.period;
                quota = persistentDef->cputune.quota;
            }
6793
        } else {
6794 6795 6796 6797 6798
            shares = vm->def->cputune.shares;
            if (*nparams > 1 && cpu_bw_status) {
                period = vm->def->cputune.period;
                quota = vm->def->cputune.quota;
            }
6799
        }
6800
        goto out;
6801 6802
    }

6803 6804 6805 6806 6807 6808 6809 6810 6811 6812 6813 6814
    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;
    }

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

6821
    rc = virCgroupGetCpuShares(group, &shares);
6822
    if (rc != 0) {
6823
        virReportSystemError(-rc, "%s",
6824 6825 6826
                             _("unable to get cpu shares tunable"));
        goto cleanup;
    }
6827 6828 6829 6830 6831 6832

    if (*nparams > 1 && cpu_bw_status) {
        rc = qemuGetVcpusBWLive(vm, group, &period, &quota);
        if (rc != 0)
            goto cleanup;
    }
6833
out:
6834
    params[0].value.ul = shares;
6835
    params[0].type = VIR_TYPED_PARAM_ULLONG;
C
Chris Lalancette 已提交
6836
    if (virStrcpyStatic(params[0].field, "cpu_shares") == NULL) {
6837 6838
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("Field cpu_shares too long for destination"));
C
Chris Lalancette 已提交
6839 6840
        goto cleanup;
    }
6841

6842 6843 6844 6845 6846 6847
    saved_nparams++;

    if (cpu_bw_status) {
        if (*nparams > saved_nparams) {
            params[1].value.ul = period;
            params[1].type = VIR_TYPED_PARAM_ULLONG;
W
Wen Congyang 已提交
6848
            if (virStrcpyStatic(params[1].field, "vcpu_period") == NULL) {
6849 6850
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s",
W
Wen Congyang 已提交
6851
                                _("Field vcpu_period too long for destination"));
6852 6853 6854 6855 6856 6857 6858 6859
                goto cleanup;
            }
            saved_nparams++;
        }

        if (*nparams > saved_nparams) {
            params[2].value.ul = quota;
            params[2].type = VIR_TYPED_PARAM_LLONG;
W
Wen Congyang 已提交
6860
            if (virStrcpyStatic(params[2].field, "vcpu_quota") == NULL) {
6861 6862
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s",
W
Wen Congyang 已提交
6863
                                _("Field vcpu_quota too long for destination"));
6864 6865 6866 6867 6868 6869 6870 6871
                goto cleanup;
            }
            saved_nparams++;
        }
    }

    *nparams = saved_nparams;

6872 6873 6874 6875 6876 6877
    ret = 0;

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

6882 6883 6884 6885 6886 6887
static int
qemuGetSchedulerParameters(virDomainPtr dom,
                           virTypedParameterPtr params,
                           int *nparams)
{
    return qemuGetSchedulerParametersFlags(dom, params, nparams,
6888
                                           VIR_DOMAIN_AFFECT_CURRENT);
6889
}
6890

6891 6892 6893 6894 6895 6896 6897 6898 6899
/* 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)
{
6900
    struct qemud_driver *driver = dom->conn->privateData;
6901
    int i, ret = -1;
6902
    virDomainObjPtr vm;
6903
    virDomainDiskDefPtr disk = NULL;
6904
    qemuDomainObjPrivatePtr priv;
6905

6906
    qemuDriverLock(driver);
6907
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
6908
    qemuDriverUnlock(driver);
6909
    if (!vm) {
6910 6911
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
6912 6913
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
6914
        goto cleanup;
6915
    }
6916

6917 6918 6919 6920 6921 6922
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

6923 6924 6925 6926 6927 6928 6929 6930
    for (i = 0 ; i < vm->def->ndisks ; i++) {
        if (STREQ(path, vm->def->disks[i]->dst)) {
            disk = vm->def->disks[i];
            break;
        }
    }

    if (!disk) {
6931 6932
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path: %s"), path);
6933
        goto cleanup;
6934 6935
    }

6936
    if (!disk->info.alias) {
6937 6938
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("missing disk device alias name for %s"), disk->dst);
6939
        goto cleanup;
6940
    }
6941

6942
    priv = vm->privateData;
6943 6944
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_QUERY) < 0)
        goto cleanup;
6945

6946 6947 6948 6949 6950
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }
6951

6952
    qemuDomainObjEnterMonitor(driver, vm);
6953 6954 6955 6956 6957 6958 6959 6960
    ret = qemuMonitorGetBlockStatsInfo(priv->mon,
                                       disk->info.alias,
                                       &stats->rd_req,
                                       &stats->rd_bytes,
                                       &stats->wr_req,
                                       &stats->wr_bytes,
                                       &stats->errs);
    qemuDomainObjExitMonitor(driver, vm);
6961

6962
endjob:
6963 6964
    if (qemuDomainObjEndJob(driver, vm) == 0)
        vm = NULL;
6965

6966
cleanup:
6967 6968
    if (vm)
        virDomainObjUnlock(vm);
6969
    return ret;
6970 6971
}

6972
#ifdef __linux__
6973 6974 6975 6976 6977
static int
qemudDomainInterfaceStats (virDomainPtr dom,
                           const char *path,
                           struct _virDomainInterfaceStats *stats)
{
6978 6979
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
6980
    int i;
6981
    int ret = -1;
6982

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

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

D
Daniel P. Berrange 已提交
6995
    if (!virDomainObjIsActive(vm)) {
6996 6997
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
6998
        goto cleanup;
6999 7000 7001
    }

    /* Check the path is one of the domain's network interfaces. */
7002 7003
    for (i = 0 ; i < vm->def->nnets ; i++) {
        if (vm->def->nets[i]->ifname &&
7004 7005 7006 7007
            STREQ (vm->def->nets[i]->ifname, path)) {
            ret = 0;
            break;
        }
7008 7009
    }

7010
    if (ret == 0)
7011
        ret = linuxDomainInterfaceStats(path, stats);
7012
    else
7013 7014
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path, '%s' is not a known interface"), path);
7015

7016
cleanup:
7017 7018
    if (vm)
        virDomainObjUnlock(vm);
7019 7020
    return ret;
}
7021
#else
7022 7023 7024 7025
static int
qemudDomainInterfaceStats (virDomainPtr dom,
                           const char *path ATTRIBUTE_UNUSED,
                           struct _virDomainInterfaceStats *stats ATTRIBUTE_UNUSED)
7026
{
7027 7028
    qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                    _("interface stats not implemented on this platform"));
7029 7030
    return -1;
}
7031
#endif
7032

7033 7034 7035
static int
qemudDomainMemoryStats (virDomainPtr dom,
                        struct _virDomainMemoryStat *stats,
7036 7037
                        unsigned int nr_stats,
                        unsigned int flags)
7038 7039 7040 7041 7042
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    unsigned int ret = -1;

7043 7044
    virCheckFlags(0, -1);

7045 7046 7047 7048 7049 7050 7051
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
    qemuDriverUnlock(driver);

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

7057
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_QUERY) < 0)
7058 7059
        goto cleanup;

7060 7061
    if (virDomainObjIsActive(vm)) {
        qemuDomainObjPrivatePtr priv = vm->privateData;
7062
        qemuDomainObjEnterMonitor(driver, vm);
7063
        ret = qemuMonitorGetMemoryStats(priv->mon, stats, nr_stats);
7064
        qemuDomainObjExitMonitor(driver, vm);
7065
    } else {
7066 7067
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
7068 7069
    }

7070
    if (qemuDomainObjEndJob(driver, vm) == 0)
7071 7072
        vm = NULL;

7073 7074 7075 7076 7077 7078
cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}

7079 7080 7081 7082 7083
static int
qemudDomainBlockPeek (virDomainPtr dom,
                      const char *path,
                      unsigned long long offset, size_t size,
                      void *buffer,
E
Eric Blake 已提交
7084
                      unsigned int flags)
7085
{
7086 7087 7088
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int fd = -1, ret = -1, i;
7089

E
Eric Blake 已提交
7090 7091
    virCheckFlags(0, -1);

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

7096
    if (!vm) {
7097 7098
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
7099 7100
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
7101
        goto cleanup;
7102 7103 7104
    }

    if (!path || path[0] == '\0') {
7105 7106
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("NULL or empty path"));
7107
        goto cleanup;
7108 7109 7110
    }

    /* Check the path belongs to this domain. */
7111 7112
    for (i = 0 ; i < vm->def->ndisks ; i++) {
        if (vm->def->disks[i]->src != NULL &&
7113 7114 7115 7116
            STREQ (vm->def->disks[i]->src, path)) {
            ret = 0;
            break;
        }
7117 7118
    }

7119 7120 7121 7122 7123
    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) {
7124 7125
            virReportSystemError(errno,
                                 _("%s: failed to open"), path);
7126 7127
            goto cleanup;
        }
7128

7129 7130 7131 7132 7133 7134
        /* 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) {
7135 7136
            virReportSystemError(errno,
                                 _("%s: failed to seek or read"), path);
7137 7138 7139 7140 7141
            goto cleanup;
        }

        ret = 0;
    } else {
7142 7143
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("invalid path"));
7144 7145
    }

7146
cleanup:
7147
    VIR_FORCE_CLOSE(fd);
7148 7149
    if (vm)
        virDomainObjUnlock(vm);
7150 7151 7152
    return ret;
}

R
Richard W.M. Jones 已提交
7153 7154 7155 7156 7157 7158
static int
qemudDomainMemoryPeek (virDomainPtr dom,
                       unsigned long long offset, size_t size,
                       void *buffer,
                       unsigned int flags)
{
7159 7160
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
7161
    char *tmp = NULL;
R
Richard W.M. Jones 已提交
7162
    int fd = -1, ret = -1;
7163
    qemuDomainObjPrivatePtr priv;
R
Richard W.M. Jones 已提交
7164

7165 7166
    virCheckFlags(VIR_MEMORY_VIRTUAL | VIR_MEMORY_PHYSICAL, -1);

7167
    qemuDriverLock(driver);
7168
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
7169
    qemuDriverUnlock(driver);
R
Richard W.M. Jones 已提交
7170 7171

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

7179
    if (flags != VIR_MEMORY_VIRTUAL && flags != VIR_MEMORY_PHYSICAL) {
7180 7181
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("flags parameter must be VIR_MEMORY_VIRTUAL or VIR_MEMORY_PHYSICAL"));
7182
        goto cleanup;
R
Richard W.M. Jones 已提交
7183 7184
    }

7185
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_QUERY) < 0)
7186 7187
        goto cleanup;

D
Daniel P. Berrange 已提交
7188
    if (!virDomainObjIsActive(vm)) {
7189 7190
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
7191
        goto endjob;
R
Richard W.M. Jones 已提交
7192 7193
    }

7194
    if (virAsprintf(&tmp, "%s/qemu.mem.XXXXXX", driver->cacheDir) < 0) {
7195
        virReportOOMError();
7196
        goto endjob;
7197 7198
    }

R
Richard W.M. Jones 已提交
7199 7200
    /* Create a temporary filename. */
    if ((fd = mkstemp (tmp)) == -1) {
7201 7202
        virReportSystemError(errno,
                             _("mkstemp(\"%s\") failed"), tmp);
7203
        goto endjob;
R
Richard W.M. Jones 已提交
7204 7205
    }

7206 7207
    virSecurityManagerSetSavedStateLabel(qemu_driver->securityManager, vm, tmp);

7208
    priv = vm->privateData;
7209
    qemuDomainObjEnterMonitor(driver, vm);
7210
    if (flags == VIR_MEMORY_VIRTUAL) {
7211
        if (qemuMonitorSaveVirtualMemory(priv->mon, offset, size, tmp) < 0) {
7212
            qemuDomainObjExitMonitor(driver, vm);
7213
            goto endjob;
7214
        }
7215
    } else {
7216
        if (qemuMonitorSavePhysicalMemory(priv->mon, offset, size, tmp) < 0) {
7217
            qemuDomainObjExitMonitor(driver, vm);
7218
            goto endjob;
7219
        }
R
Richard W.M. Jones 已提交
7220
    }
7221
    qemuDomainObjExitMonitor(driver, vm);
R
Richard W.M. Jones 已提交
7222 7223 7224

    /* Read the memory file into buffer. */
    if (saferead (fd, buffer, size) == (ssize_t) -1) {
7225 7226 7227
        virReportSystemError(errno,
                             _("failed to read temporary file "
                               "created with template %s"), tmp);
7228
        goto endjob;
R
Richard W.M. Jones 已提交
7229 7230 7231
    }

    ret = 0;
7232

7233
endjob:
7234
    if (qemuDomainObjEndJob(driver, vm) == 0)
7235
        vm = NULL;
7236

7237
cleanup:
7238
    VIR_FORCE_CLOSE(fd);
7239 7240
    if (tmp)
        unlink(tmp);
W
Wen Congyang 已提交
7241
    VIR_FREE(tmp);
7242 7243
    if (vm)
        virDomainObjUnlock(vm);
R
Richard W.M. Jones 已提交
7244 7245 7246
    return ret;
}

7247

7248 7249 7250 7251 7252 7253 7254 7255 7256
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;
7257
    virStorageFileMetadata *meta = NULL;
7258
    virDomainDiskDefPtr disk = NULL;
7259 7260
    struct stat sb;
    int i;
7261
    int format;
7262 7263 7264 7265 7266 7267 7268 7269 7270 7271 7272 7273 7274 7275 7276 7277 7278 7279 7280 7281 7282 7283 7284 7285

    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)) {
7286
            disk = vm->def->disks[i];
7287 7288 7289 7290
            break;
        }
    }

7291
    if (!disk) {
7292 7293 7294 7295 7296 7297 7298 7299 7300 7301 7302 7303 7304 7305
        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 */
7306 7307 7308 7309 7310 7311 7312 7313
    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 {
7314 7315 7316 7317 7318 7319 7320
        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);
7321
            goto cleanup;
7322
        }
7323 7324
    }

7325 7326 7327 7328 7329
    if (VIR_ALLOC(meta) < 0) {
        virReportOOMError();
        goto cleanup;
    }

7330 7331
    if (virStorageFileGetMetadataFromFD(path, fd,
                                        format,
7332
                                        meta) < 0)
7333 7334 7335 7336 7337 7338 7339 7340 7341 7342
        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)) {
7343
#ifndef WIN32
7344 7345 7346 7347 7348 7349 7350 7351 7352 7353 7354 7355 7356 7357 7358 7359 7360 7361 7362 7363 7364 7365 7366 7367 7368
        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 */
7369 7370
    if (meta->capacity)
        info->capacity = meta->capacity;
7371

7372
    /* Set default value .. */
7373 7374
    info->allocation = info->physical;

7375 7376 7377
    /* ..but if guest is running & not using raw
       disk format and on a block device, then query
       highest allocated extent from QEMU */
7378
    if (disk->type == VIR_DOMAIN_DISK_TYPE_BLOCK &&
7379
        format != VIR_STORAGE_FILE_RAW &&
7380 7381
        S_ISBLK(sb.st_mode) &&
        virDomainObjIsActive(vm)) {
7382
        qemuDomainObjPrivatePtr priv = vm->privateData;
7383

7384 7385
        if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_QUERY) < 0)
            goto cleanup;
7386

7387
        if (virDomainObjIsActive(vm)) {
7388
            qemuDomainObjEnterMonitor(driver, vm);
7389 7390 7391 7392
            ret = qemuMonitorGetBlockExtent(priv->mon,
                                            disk->info.alias,
                                            &info->allocation);
            qemuDomainObjExitMonitor(driver, vm);
7393
        } else {
7394
            ret = 0;
7395
        }
7396 7397 7398

        if (qemuDomainObjEndJob(driver, vm) == 0)
            vm = NULL;
7399 7400 7401
    } else {
        ret = 0;
    }
7402 7403

cleanup:
7404
    virStorageFileFreeMetadata(meta);
7405
    VIR_FORCE_CLOSE(fd);
7406 7407 7408 7409 7410 7411
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}


7412
static int
7413 7414 7415 7416
qemuDomainEventRegister(virConnectPtr conn,
                        virConnectDomainEventCallback callback,
                        void *opaque,
                        virFreeCallback freecb)
7417
{
7418 7419 7420
    struct qemud_driver *driver = conn->privateData;
    int ret;

7421
    qemuDriverLock(driver);
7422 7423
    ret = virDomainEventCallbackListAdd(conn,
                                        driver->domainEventState->callbacks,
7424
                                        callback, opaque, freecb);
7425
    qemuDriverUnlock(driver);
7426

7427
    return ret;
7428 7429
}

7430

7431
static int
7432 7433
qemuDomainEventDeregister(virConnectPtr conn,
                          virConnectDomainEventCallback callback)
7434
{
7435 7436 7437
    struct qemud_driver *driver = conn->privateData;
    int ret;

7438
    qemuDriverLock(driver);
7439 7440 7441
    ret = virDomainEventStateDeregister(conn,
                                        driver->domainEventState,
                                        callback);
7442
    qemuDriverUnlock(driver);
7443

7444
    return ret;
7445 7446
}

7447 7448 7449 7450 7451 7452 7453 7454 7455 7456 7457 7458 7459 7460

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,
7461
                                          driver->domainEventState->callbacks,
7462 7463 7464 7465 7466 7467 7468 7469 7470 7471 7472 7473 7474 7475 7476 7477
                                          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);
7478 7479 7480
    ret = virDomainEventStateDeregisterAny(conn,
                                           driver->domainEventState,
                                           callbackID);
7481 7482 7483 7484 7485 7486
    qemuDriverUnlock(driver);

    return ret;
}


7487 7488 7489
/*******************************************************************
 * Migration Protocol Version 2
 *******************************************************************/
D
Daniel Veillard 已提交
7490

C
Chris Lalancette 已提交
7491 7492 7493 7494 7495 7496 7497 7498 7499 7500 7501 7502 7503 7504 7505
/* 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;
7506

7507
    virCheckFlags(QEMU_MIGRATION_FLAGS, -1);
7508

7509 7510
    qemuDriverLock(driver);

C
Chris Lalancette 已提交
7511
    if (!dom_xml) {
7512 7513
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("no domain XML passed"));
C
Chris Lalancette 已提交
7514 7515 7516
        goto cleanup;
    }
    if (!(flags & VIR_MIGRATE_TUNNELLED)) {
7517
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
C
Chris Lalancette 已提交
7518 7519 7520 7521
                         "%s", _("PrepareTunnel called but no TUNNELLED flag set"));
        goto cleanup;
    }
    if (st == NULL) {
7522 7523
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("tunnelled migration requested but NULL stream passed"));
C
Chris Lalancette 已提交
7524 7525 7526
        goto cleanup;
    }

7527 7528 7529 7530 7531 7532 7533
    if (virLockManagerPluginUsesState(driver->lockManager)) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("Cannot use migrate v2 protocol with lock manager %s"),
                        virLockManagerPluginGetName(driver->lockManager));
        goto cleanup;
    }

7534 7535 7536
    ret = qemuMigrationPrepareTunnel(driver, dconn,
                                     NULL, 0, NULL, NULL, /* No cookies in v2 */
                                     st, dname, dom_xml);
7537

C
Chris Lalancette 已提交
7538
cleanup:
7539
    qemuDriverUnlock(driver);
C
Chris Lalancette 已提交
7540 7541 7542
    return ret;
}

D
Daniel Veillard 已提交
7543 7544 7545 7546
/* Prepare is the first step, and it runs on the destination host.
 *
 * This starts an empty VM listening on a TCP port.
 */
7547
static int ATTRIBUTE_NONNULL (5)
D
Daniel Veillard 已提交
7548
qemudDomainMigratePrepare2 (virConnectPtr dconn,
7549 7550
                            char **cookie ATTRIBUTE_UNUSED,
                            int *cookielen ATTRIBUTE_UNUSED,
D
Daniel Veillard 已提交
7551 7552
                            const char *uri_in,
                            char **uri_out,
C
Chris Lalancette 已提交
7553
                            unsigned long flags,
D
Daniel Veillard 已提交
7554 7555 7556 7557
                            const char *dname,
                            unsigned long resource ATTRIBUTE_UNUSED,
                            const char *dom_xml)
{
7558
    struct qemud_driver *driver = dconn->privateData;
7559
    int ret = -1;
7560

7561
    virCheckFlags(QEMU_MIGRATION_FLAGS, -1);
C
Chris Lalancette 已提交
7562

7563
    *uri_out = NULL;
D
Daniel Veillard 已提交
7564

7565
    qemuDriverLock(driver);
7566 7567 7568 7569 7570 7571 7572 7573

    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 已提交
7574 7575 7576 7577
    if (flags & VIR_MIGRATE_TUNNELLED) {
        /* this is a logical error; we never should have gotten here with
         * VIR_MIGRATE_TUNNELLED set
         */
7578 7579
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("Tunnelled migration requested but invalid RPC method called"));
C
Chris Lalancette 已提交
7580 7581 7582
        goto cleanup;
    }

D
Daniel Veillard 已提交
7583
    if (!dom_xml) {
7584 7585
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("no domain XML passed"));
7586
        goto cleanup;
D
Daniel Veillard 已提交
7587 7588
    }

7589 7590 7591 7592
    /* Do not use cookies in v2 protocol, since the cookie
     * length was not sufficiently large, causing failures
     * migrating between old & new libvirtd
     */
7593
    ret = qemuMigrationPrepareDirect(driver, dconn,
7594
                                     NULL, 0, NULL, NULL, /* No cookies */
7595 7596
                                     uri_in, uri_out,
                                     dname, dom_xml);
D
Daniel Veillard 已提交
7597

7598 7599 7600 7601
cleanup:
    qemuDriverUnlock(driver);
    return ret;
}
C
Chris Lalancette 已提交
7602

D
Daniel Veillard 已提交
7603

7604 7605 7606
/* Perform is the second step, and it runs on the source host. */
static int
qemudDomainMigratePerform (virDomainPtr dom,
7607 7608
                           const char *cookie,
                           int cookielen,
7609 7610 7611 7612 7613 7614 7615 7616
                           const char *uri,
                           unsigned long flags,
                           const char *dname,
                           unsigned long resource)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
7617
    const char *dconnuri = NULL;
7618

7619
    virCheckFlags(QEMU_MIGRATION_FLAGS, -1);
C
Chris Lalancette 已提交
7620

7621
    qemuDriverLock(driver);
7622 7623 7624 7625 7626 7627 7628
    if (virLockManagerPluginUsesState(driver->lockManager)) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("Cannot use migrate v2 protocol with lock manager %s"),
                        virLockManagerPluginGetName(driver->lockManager));
        goto cleanup;
    }

7629
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
D
Daniel Veillard 已提交
7630
    if (!vm) {
7631 7632
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
7633 7634
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
7635
        goto cleanup;
D
Daniel Veillard 已提交
7636 7637
    }

7638 7639 7640 7641 7642
    if (flags & VIR_MIGRATE_PEER2PEER) {
        dconnuri = uri;
        uri = NULL;
    }

7643 7644 7645 7646 7647 7648
    /* 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
     */
7649
    ret = qemuMigrationPerform(driver, dom->conn, vm,
7650
                               NULL, dconnuri, uri, cookie, cookielen,
7651
                               NULL, NULL, /* No output cookies in v2 */
7652
                               flags, dname, resource, false);
7653

7654
cleanup:
7655
    qemuDriverUnlock(driver);
7656
    return ret;
D
Daniel Veillard 已提交
7657 7658
}

7659

D
Daniel Veillard 已提交
7660 7661 7662 7663 7664 7665 7666
/* 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 已提交
7667
                           unsigned long flags,
D
Daniel Veillard 已提交
7668 7669
                           int retcode)
{
7670 7671 7672
    struct qemud_driver *driver = dconn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;
D
Daniel Veillard 已提交
7673

7674
    virCheckFlags(QEMU_MIGRATION_FLAGS, NULL);
C
Chris Lalancette 已提交
7675

7676
    qemuDriverLock(driver);
7677
    vm = virDomainFindByName(&driver->domains, dname);
D
Daniel Veillard 已提交
7678
    if (!vm) {
7679 7680
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching name '%s'"), dname);
7681
        goto cleanup;
D
Daniel Veillard 已提交
7682 7683
    }

7684 7685 7686 7687
    /* Do not use cookies in v2 protocol, since the cookie
     * length was not sufficiently large, causing failures
     * migrating between old & new libvirtd
     */
7688
    dom = qemuMigrationFinish(driver, dconn, vm,
7689
                              NULL, 0, NULL, NULL, /* No cookies */
7690
                              flags, retcode, false);
7691

7692
cleanup:
7693
    qemuDriverUnlock(driver);
7694
    return dom;
D
Daniel Veillard 已提交
7695 7696
}

7697

7698 7699 7700 7701 7702 7703
/*******************************************************************
 * Migration Protocol Version 3
 *******************************************************************/

static char *
qemuDomainMigrateBegin3(virDomainPtr domain,
7704
                        const char *xmlin,
7705 7706 7707 7708 7709 7710 7711 7712 7713 7714
                        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;

7715
    virCheckFlags(QEMU_MIGRATION_FLAGS, NULL);
7716 7717 7718 7719 7720 7721 7722 7723 7724 7725 7726

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

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
    if ((flags & VIR_MIGRATE_CHANGE_PROTECTION)) {
        if (qemuMigrationJobStart(driver, vm, QEMU_ASYNC_JOB_MIGRATION_OUT) < 0)
            goto cleanup;
    } else {
        if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_MODIFY) < 0)
            goto cleanup;
    }

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

    if (!(xml = qemuMigrationBegin(driver, vm, xmlin,
                                   cookieout, cookieoutlen)))
        goto endjob;

    if ((flags & VIR_MIGRATE_CHANGE_PROTECTION)) {
        /* We keep the job active across API calls until the confirm() call.
         * This prevents any other APIs being invoked while migration is taking
         * place.
         */
        if (qemuMigrationJobContinue(vm) == 0) {
            vm = NULL;
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("domain disappeared"));
            VIR_FREE(xml);
            if (cookieout)
                VIR_FREE(*cookieout);
        }
    } else {
        goto endjob;
    }
7761 7762

cleanup:
7763 7764
    if (vm)
        virDomainObjUnlock(vm);
7765 7766
    qemuDriverUnlock(driver);
    return xml;
7767 7768 7769 7770 7771 7772 7773 7774 7775 7776

endjob:
    if ((flags & VIR_MIGRATE_CHANGE_PROTECTION)) {
        if (qemuMigrationJobFinish(driver, vm) == 0)
            vm = NULL;
    } else {
        if (qemuDomainObjEndJob(driver, vm) == 0)
            vm = NULL;
    }
    goto cleanup;
7777 7778 7779 7780 7781 7782 7783 7784 7785 7786 7787 7788 7789 7790 7791 7792 7793 7794
}

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;

7795
    virCheckFlags(QEMU_MIGRATION_FLAGS, -1);
7796 7797 7798 7799 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 7827 7828 7829 7830 7831 7832 7833 7834 7835 7836 7837 7838 7839 7840 7841

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

7842
    virCheckFlags(QEMU_MIGRATION_FLAGS, -1);
7843 7844 7845 7846 7847 7848 7849 7850 7851 7852 7853 7854 7855 7856 7857 7858 7859 7860 7861 7862 7863 7864 7865 7866 7867 7868 7869 7870 7871 7872 7873

    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,
7874
                          const char *xmlin,
7875 7876 7877 7878
                          const char *cookiein,
                          int cookieinlen,
                          char **cookieout,
                          int *cookieoutlen,
7879
                          const char *dconnuri,
7880 7881 7882 7883 7884 7885 7886 7887 7888
                          const char *uri,
                          unsigned long flags,
                          const char *dname,
                          unsigned long resource)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;

7889
    virCheckFlags(QEMU_MIGRATION_FLAGS, -1);
7890 7891 7892 7893 7894 7895 7896 7897 7898 7899 7900

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

7901
    ret = qemuMigrationPerform(driver, dom->conn, vm, xmlin,
7902
                               dconnuri, uri, cookiein, cookieinlen,
7903
                               cookieout, cookieoutlen,
7904
                               flags, dname, resource, true);
7905 7906 7907 7908 7909 7910 7911

cleanup:
    qemuDriverUnlock(driver);
    return ret;
}


7912
static virDomainPtr
7913 7914 7915 7916 7917 7918
qemuDomainMigrateFinish3(virConnectPtr dconn,
                         const char *dname,
                         const char *cookiein,
                         int cookieinlen,
                         char **cookieout,
                         int *cookieoutlen,
7919
                         const char *dconnuri ATTRIBUTE_UNUSED,
7920 7921
                         const char *uri ATTRIBUTE_UNUSED,
                         unsigned long flags,
7922
                         int cancelled)
7923 7924 7925
{
    struct qemud_driver *driver = dconn->privateData;
    virDomainObjPtr vm;
7926
    virDomainPtr dom = NULL;
7927

7928
    virCheckFlags(QEMU_MIGRATION_FLAGS, NULL);
7929 7930 7931 7932 7933 7934 7935 7936 7937

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

7938 7939 7940 7941
    dom = qemuMigrationFinish(driver, dconn, vm,
                              cookiein, cookieinlen,
                              cookieout, cookieoutlen,
                              flags, cancelled, true);
7942 7943 7944

cleanup:
    qemuDriverUnlock(driver);
7945
    return dom;
7946 7947 7948 7949 7950 7951 7952 7953 7954 7955 7956 7957
}

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;
7958
    enum qemuMigrationJobPhase phase;
7959

7960
    virCheckFlags(QEMU_MIGRATION_FLAGS, -1);
7961 7962 7963 7964 7965 7966 7967 7968 7969 7970 7971

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

7972
    if (!qemuMigrationJobIsActive(vm, QEMU_ASYNC_JOB_MIGRATION_OUT))
7973 7974
        goto cleanup;

7975 7976 7977 7978 7979 7980 7981
    if (cancelled)
        phase = QEMU_MIGRATION_PHASE_CONFIRM3_CANCELLED;
    else
        phase = QEMU_MIGRATION_PHASE_CONFIRM3;

    qemuMigrationJobStartPhase(driver, vm, phase);

7982 7983
    ret = qemuMigrationConfirm(driver, domain->conn, vm,
                               cookiein, cookieinlen,
7984 7985
                               flags, cancelled);

7986
    if (qemuMigrationJobFinish(driver, vm) == 0) {
7987 7988 7989 7990 7991 7992 7993 7994 7995
        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;
    }

7996
cleanup:
7997 7998
    if (vm)
        virDomainObjUnlock(vm);
7999 8000 8001 8002 8003
    qemuDriverUnlock(driver);
    return ret;
}


8004 8005 8006 8007 8008 8009 8010 8011 8012 8013 8014 8015 8016 8017 8018 8019
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;

8020
    def = virNodeDeviceDefParseString(xml, EXISTING_DEVICE);
8021 8022 8023 8024 8025 8026 8027 8028 8029 8030 8031 8032 8033 8034 8035 8036 8037
    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) {
8038 8039
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("device %s is not a PCI device"), dev->name);
8040 8041 8042 8043 8044 8045 8046 8047 8048 8049 8050 8051 8052
        goto out;
    }

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

static int
qemudNodeDeviceDettach (virNodeDevicePtr dev)
{
8053
    struct qemud_driver *driver = dev->conn->privateData;
8054 8055 8056 8057 8058 8059 8060
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

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

8061
    pci = pciGetDevice(domain, bus, slot, function);
8062 8063 8064
    if (!pci)
        return -1;

8065 8066
    qemuDriverLock(driver);
    if (pciDettachDevice(pci, driver->activePciHostdevs) < 0)
8067 8068 8069 8070
        goto out;

    ret = 0;
out:
8071
    qemuDriverUnlock(driver);
8072
    pciFreeDevice(pci);
8073 8074 8075 8076 8077 8078
    return ret;
}

static int
qemudNodeDeviceReAttach (virNodeDevicePtr dev)
{
8079
    struct qemud_driver *driver = dev->conn->privateData;
8080 8081 8082 8083 8084 8085 8086
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

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

8087
    pci = pciGetDevice(domain, bus, slot, function);
8088 8089 8090
    if (!pci)
        return -1;

8091 8092
    pciDeviceReAttachInit(pci);

8093 8094
    qemuDriverLock(driver);
    if (pciReAttachDevice(pci, driver->activePciHostdevs) < 0)
8095 8096 8097 8098
        goto out;

    ret = 0;
out:
8099
    qemuDriverUnlock(driver);
8100
    pciFreeDevice(pci);
8101 8102 8103 8104 8105 8106
    return ret;
}

static int
qemudNodeDeviceReset (virNodeDevicePtr dev)
{
8107
    struct qemud_driver *driver = dev->conn->privateData;
8108 8109 8110 8111 8112 8113 8114
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

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

8115
    pci = pciGetDevice(domain, bus, slot, function);
8116 8117 8118
    if (!pci)
        return -1;

8119 8120
    qemuDriverLock(driver);

8121
    if (pciResetDevice(pci, driver->activePciHostdevs, NULL) < 0)
8122 8123 8124 8125
        goto out;

    ret = 0;
out:
8126
    qemuDriverUnlock(driver);
8127
    pciFreeDevice(pci);
8128 8129 8130
    return ret;
}

8131 8132 8133
static int
qemuCPUCompare(virConnectPtr conn,
               const char *xmlDesc,
E
Eric Blake 已提交
8134
               unsigned int flags)
8135 8136 8137 8138
{
    struct qemud_driver *driver = conn->privateData;
    int ret = VIR_CPU_COMPARE_ERROR;

E
Eric Blake 已提交
8139 8140
    virCheckFlags(0, VIR_CPU_COMPARE_ERROR);

8141 8142 8143
    qemuDriverLock(driver);

    if (!driver->caps || !driver->caps->host.cpu) {
8144
        qemuReportError(VIR_ERR_OPERATION_INVALID,
8145
                        "%s", _("cannot get host CPU capabilities"));
E
Eric Blake 已提交
8146
    } else {
8147
        ret = cpuCompareXML(driver->caps->host.cpu, xmlDesc);
E
Eric Blake 已提交
8148
    }
8149 8150 8151 8152 8153 8154

    qemuDriverUnlock(driver);

    return ret;
}

8155

8156 8157 8158 8159
static char *
qemuCPUBaseline(virConnectPtr conn ATTRIBUTE_UNUSED,
                const char **xmlCPUs,
                unsigned int ncpus,
E
Eric Blake 已提交
8160
                unsigned int flags)
8161 8162 8163
{
    char *cpu;

E
Eric Blake 已提交
8164 8165
    virCheckFlags(0, NULL);

8166 8167 8168 8169 8170
    cpu = cpuBaselineXML(xmlCPUs, ncpus, NULL, 0);

    return cpu;
}

8171 8172 8173 8174 8175 8176 8177 8178 8179 8180 8181 8182 8183 8184 8185 8186 8187 8188 8189 8190 8191 8192

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)) {
8193
        if (priv->job.asyncJob) {
8194
            memcpy(info, &priv->job.info, sizeof(*info));
8195 8196 8197 8198 8199 8200

            /* 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 已提交
8201
            if (virTimeMs(&info->timeElapsed) < 0)
8202
                goto cleanup;
8203
            info->timeElapsed -= priv->job.start;
8204 8205 8206 8207 8208 8209 8210 8211 8212 8213 8214 8215 8216 8217 8218 8219 8220 8221 8222
        } 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;
}


8223 8224 8225 8226 8227 8228 8229 8230 8231 8232 8233 8234 8235 8236 8237 8238 8239
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;
    }

8240 8241
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_ABORT) < 0)
        goto cleanup;
8242

8243
    if (!virDomainObjIsActive(vm)) {
8244 8245
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
8246
        goto endjob;
8247 8248
    }

8249 8250 8251 8252 8253 8254 8255 8256 8257 8258 8259 8260 8261 8262
    priv = vm->privateData;

    if (!priv->job.asyncJob) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("no job is active on the domain"));
        goto endjob;
    } else if (priv->job.asyncJob == QEMU_ASYNC_JOB_MIGRATION_IN) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("cannot abort incoming migration;"
                          " use virDomainDestroy instead"));
        goto endjob;
    }

    VIR_DEBUG("Cancelling job at client request");
8263
    qemuDomainObjEnterMonitor(driver, vm);
8264 8265 8266 8267 8268 8269
    ret = qemuMonitorMigrateCancel(priv->mon);
    qemuDomainObjExitMonitor(driver, vm);

endjob:
    if (qemuDomainObjEndJob(driver, vm) == 0)
        vm = NULL;
8270 8271 8272 8273 8274 8275 8276 8277

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


8278 8279 8280 8281 8282 8283 8284 8285 8286 8287
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;

8288
    virCheckFlags(0, -1);
8289 8290 8291

    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
8292
    qemuDriverUnlock(driver);
8293 8294 8295 8296 8297 8298

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

8302 8303 8304
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_MIGRATION_OP) < 0)
        goto cleanup;

8305 8306 8307
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
8308
        goto endjob;
8309 8310 8311 8312
    }

    priv = vm->privateData;

8313
    if (priv->job.asyncJob != QEMU_ASYNC_JOB_MIGRATION_OUT) {
8314 8315
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not being migrated"));
8316
        goto endjob;
8317 8318
    }

8319
    VIR_DEBUG("Setting migration downtime to %llums", downtime);
8320
    qemuDomainObjEnterMonitor(driver, vm);
8321 8322 8323 8324 8325 8326
    ret = qemuMonitorSetMigrationDowntime(priv->mon, downtime);
    qemuDomainObjExitMonitor(driver, vm);

endjob:
    if (qemuDomainObjEndJob(driver, vm) == 0)
        vm = NULL;
8327 8328 8329 8330 8331 8332 8333

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

8334 8335 8336 8337 8338 8339 8340 8341 8342 8343 8344 8345 8346 8347
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);
8348
    qemuDriverUnlock(driver);
8349 8350 8351 8352 8353 8354

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

8358 8359 8360
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_MIGRATION_OP) < 0)
        goto cleanup;

8361 8362 8363
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
8364
        goto endjob;
8365 8366 8367 8368
    }

    priv = vm->privateData;

8369
    if (priv->job.asyncJob != QEMU_ASYNC_JOB_MIGRATION_OUT) {
8370 8371
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not being migrated"));
8372
        goto endjob;
8373 8374
    }

8375
    VIR_DEBUG("Setting migration bandwidth to %luMbs", bandwidth);
8376
    qemuDomainObjEnterMonitor(driver, vm);
8377 8378 8379 8380 8381 8382
    ret = qemuMonitorSetMigrationSpeed(priv->mon, bandwidth);
    qemuDomainObjExitMonitor(driver, vm);

endjob:
    if (qemuDomainObjEndJob(driver, vm) == 0)
        vm = NULL;
8383 8384 8385 8386 8387 8388 8389

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

C
Chris Lalancette 已提交
8390 8391 8392 8393 8394 8395 8396 8397 8398 8399 8400 8401 8402 8403
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;
}

8404 8405 8406
static int qemuDomainSnapshotWriteMetadata(virDomainObjPtr vm,
                                           virDomainSnapshotObjPtr snapshot,
                                           char *snapshotDir)
C
Chris Lalancette 已提交
8407 8408 8409 8410 8411 8412 8413 8414 8415
{
    int fd = -1;
    char *newxml = NULL;
    int ret = -1;
    char *snapDir = NULL;
    char *snapFile = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];

    virUUIDFormat(vm->def->uuid, uuidstr);
8416
    newxml = virDomainSnapshotDefFormat(uuidstr, snapshot->def, 1);
C
Chris Lalancette 已提交
8417 8418 8419 8420 8421 8422 8423 8424 8425
    if (newxml == NULL) {
        virReportOOMError();
        return -1;
    }

    if (virAsprintf(&snapDir, "%s/%s", snapshotDir, vm->def->name) < 0) {
        virReportOOMError();
        goto cleanup;
    }
8426 8427
    if (virFileMakePath(snapDir) < 0) {
        virReportSystemError(errno, _("cannot create snapshot directory '%s'"),
C
Chris Lalancette 已提交
8428 8429 8430 8431
                             snapDir);
        goto cleanup;
    }

8432
    if (virAsprintf(&snapFile, "%s/%s.xml", snapDir, snapshot->def->name) < 0) {
C
Chris Lalancette 已提交
8433 8434 8435 8436 8437 8438 8439 8440 8441 8442 8443 8444 8445 8446 8447 8448 8449 8450 8451 8452 8453
        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);
8454
    VIR_FORCE_CLOSE(fd);
C
Chris Lalancette 已提交
8455 8456 8457 8458 8459 8460 8461 8462 8463 8464 8465 8466 8467 8468 8469 8470 8471
    return ret;
}


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,
8472 8473
                            _("Disk '%s' does not support snapshotting"),
                            vm->def->disks[i]->src);
C
Chris Lalancette 已提交
8474 8475 8476 8477 8478 8479 8480
            return 0;
        }
    }

    return 1;
}

8481 8482
/* The domain is expected to be locked and inactive. Return -1 on normal
 * failure, 1 if we skipped a disk due to try_all.  */
8483
static int
8484 8485 8486 8487
qemuDomainSnapshotForEachQcow2(virDomainObjPtr vm,
                               virDomainSnapshotObjPtr snap,
                               const char *op,
                               bool try_all)
8488
{
8489
    const char *qemuimgarg[] = { NULL, "snapshot", NULL, NULL, NULL, NULL };
8490 8491
    int ret = -1;
    int i;
8492
    bool skipped = false;
8493 8494 8495 8496 8497 8498 8499

    qemuimgarg[0] = qemuFindQemuImgBinary();
    if (qemuimgarg[0] == NULL) {
        /* qemuFindQemuImgBinary set the error */
        goto cleanup;
    }

8500
    qemuimgarg[2] = op;
8501 8502 8503 8504 8505 8506 8507 8508 8509 8510
    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")) {
8511 8512 8513 8514 8515 8516 8517 8518 8519
                if (try_all) {
                    /* Continue on even in the face of error, since other
                     * disks in this VM may have the same snapshot name.
                     */
                    VIR_WARN("skipping snapshot action on %s",
                             vm->def->disks[i]->info.alias);
                    skipped = true;
                    continue;
                }
8520 8521 8522 8523 8524 8525 8526 8527 8528
                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;

8529 8530 8531 8532 8533 8534 8535
            if (virRun(qemuimgarg, NULL) < 0) {
                if (try_all) {
                    VIR_WARN("skipping snapshot action on %s",
                             vm->def->disks[i]->info.alias);
                    skipped = true;
                    continue;
                }
8536
                goto cleanup;
8537
            }
8538 8539 8540
        }
    }

8541
    ret = skipped ? 1 : 0;
8542 8543 8544 8545 8546 8547

cleanup:
    VIR_FREE(qemuimgarg[0]);
    return ret;
}

8548 8549 8550 8551 8552 8553 8554 8555
/* The domain is expected to be locked and inactive. */
static int
qemuDomainSnapshotCreateInactive(virDomainObjPtr vm,
                                 virDomainSnapshotObjPtr snap)
{
    return qemuDomainSnapshotForEachQcow2(vm, snap, "-c", false);
}

8556 8557
/* The domain is expected to be locked and active. */
static int
8558 8559
qemuDomainSnapshotCreateActive(virConnectPtr conn,
                               struct qemud_driver *driver,
8560 8561 8562 8563 8564
                               virDomainObjPtr *vmptr,
                               virDomainSnapshotObjPtr snap)
{
    virDomainObjPtr vm = *vmptr;
    qemuDomainObjPrivatePtr priv = vm->privateData;
8565 8566
    bool resume = false;
    int ret = -1;
8567

8568
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
8569 8570
        return -1;

J
Jiri Denemark 已提交
8571
    if (virDomainObjGetState(vm, NULL) == VIR_DOMAIN_RUNNING) {
8572 8573 8574 8575
        /* 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.
         */
8576 8577
        if (qemuProcessStopCPUs(driver, vm, VIR_DOMAIN_PAUSED_SAVE,
                                QEMU_ASYNC_JOB_NONE) < 0)
8578 8579 8580 8581 8582 8583 8584 8585 8586 8587
            goto cleanup;

        resume = true;
        if (!virDomainObjIsActive(vm)) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("guest unexpectedly quit"));
            goto cleanup;
        }
    }

8588
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
8589 8590 8591
    ret = qemuMonitorCreateSnapshot(priv->mon, snap->def->name);
    qemuDomainObjExitMonitorWithDriver(driver, vm);

8592 8593
cleanup:
    if (resume && virDomainObjIsActive(vm) &&
J
Jiri Denemark 已提交
8594
        qemuProcessStartCPUs(driver, vm, conn,
8595 8596
                             VIR_DOMAIN_RUNNING_UNPAUSED,
                             QEMU_ASYNC_JOB_NONE) < 0 &&
8597 8598 8599 8600 8601
        virGetLastError() == NULL) {
        qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                        _("resuming after snapshot failed"));
    }

8602 8603 8604
    if (qemuDomainObjEndJob(driver, vm) == 0) {
        /* Only possible if a transient vm quit while our locks were down,
         * in which case we don't want to save snapshot metadata.  */
8605
        *vmptr = NULL;
8606 8607
        ret = -1;
    }
8608 8609 8610 8611

    return ret;
}

C
Chris Lalancette 已提交
8612 8613
static virDomainSnapshotPtr qemuDomainSnapshotCreateXML(virDomainPtr domain,
                                                        const char *xmlDesc,
8614
                                                        unsigned int flags)
C
Chris Lalancette 已提交
8615 8616 8617 8618 8619 8620
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    virDomainSnapshotObjPtr snap = NULL;
    virDomainSnapshotPtr snapshot = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];
8621
    virDomainSnapshotDefPtr def = NULL;
C
Chris Lalancette 已提交
8622

8623 8624
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
8625 8626 8627 8628 8629 8630 8631 8632 8633
    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;
    }

8634 8635 8636 8637 8638 8639
    if (qemuProcessAutoDestroyActive(driver, vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is marked for auto destroy"));
        goto cleanup;
    }

C
Chris Lalancette 已提交
8640 8641 8642 8643 8644 8645 8646 8647 8648 8649 8650 8651 8652 8653 8654
    /* 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;
8655
    def = NULL;
C
Chris Lalancette 已提交
8656

J
Jiri Denemark 已提交
8657
    snap->def->state = virDomainObjGetState(vm, NULL);
8658
    snap->def->current = true;
8659 8660 8661 8662 8663 8664
    if (vm->current_snapshot) {
        snap->def->parent = strdup(vm->current_snapshot->def->name);
        if (snap->def->parent == NULL) {
            virReportOOMError();
            goto cleanup;
        }
8665 8666 8667 8668
        vm->current_snapshot->def->current = false;
        if (qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                            driver->snapshotDir) < 0)
            goto cleanup;
8669 8670
        vm->current_snapshot = NULL;
    }
8671

C
Chris Lalancette 已提交
8672 8673
    /* actually do the snapshot */
    if (!virDomainObjIsActive(vm)) {
8674
        if (qemuDomainSnapshotCreateInactive(vm, snap) < 0)
C
Chris Lalancette 已提交
8675
            goto cleanup;
E
Eric Blake 已提交
8676
    } else {
8677 8678
        if (qemuDomainSnapshotCreateActive(domain->conn, driver,
                                           &vm, snap) < 0)
8679
            goto cleanup;
C
Chris Lalancette 已提交
8680 8681
    }

8682
    /* If we fail after this point, there's not a whole lot we can
C
Chris Lalancette 已提交
8683 8684 8685 8686 8687 8688
     * do; we've successfully taken the snapshot, and we are now running
     * on it, so we have to go forward the best we can
     */
    snapshot = virGetDomainSnapshot(domain, snap->def->name);

cleanup:
8689
    if (vm) {
8690 8691 8692 8693 8694 8695 8696 8697
        if (snapshot) {
            if (qemuDomainSnapshotWriteMetadata(vm, snap,
                                                driver->snapshotDir) < 0)
                VIR_WARN("unable to save metadata for snapshot %s",
                         snap->def->name);
            else
                vm->current_snapshot = snap;
        } else if (snap) {
8698
            virDomainSnapshotObjListRemove(&vm->snapshots, snap);
8699
        }
C
Chris Lalancette 已提交
8700
        virDomainObjUnlock(vm);
8701 8702
    }
    virDomainSnapshotDefFree(def);
C
Chris Lalancette 已提交
8703 8704 8705 8706 8707 8708
    qemuDriverUnlock(driver);
    return snapshot;
}

static int qemuDomainSnapshotListNames(virDomainPtr domain, char **names,
                                       int nameslen,
8709
                                       unsigned int flags)
C
Chris Lalancette 已提交
8710 8711 8712 8713 8714
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int n = -1;

8715 8716
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
8717 8718 8719 8720 8721 8722 8723 8724 8725 8726 8727 8728 8729 8730 8731 8732 8733 8734 8735 8736
    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,
8737
                                 unsigned int flags)
C
Chris Lalancette 已提交
8738 8739 8740 8741 8742
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int n = -1;

8743 8744
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
8745 8746 8747 8748 8749 8750 8751 8752 8753 8754 8755 8756 8757 8758 8759 8760 8761 8762 8763 8764 8765
    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,
8766
                                                           unsigned int flags)
C
Chris Lalancette 已提交
8767 8768 8769 8770 8771 8772
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    virDomainSnapshotObjPtr snap = NULL;
    virDomainSnapshotPtr snapshot = NULL;

8773 8774
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
8775 8776 8777 8778 8779 8780 8781 8782 8783 8784 8785 8786 8787 8788 8789 8790 8791 8792 8793 8794 8795 8796 8797 8798 8799 8800 8801
    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,
8802
                                        unsigned int flags)
C
Chris Lalancette 已提交
8803 8804 8805 8806 8807
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;

8808 8809
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
8810 8811 8812 8813 8814 8815 8816 8817 8818 8819 8820 8821 8822 8823 8824 8825 8826 8827 8828 8829
    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,
8830
                                                      unsigned int flags)
C
Chris Lalancette 已提交
8831 8832 8833 8834 8835
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    virDomainSnapshotPtr snapshot = NULL;

8836 8837
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
8838 8839 8840 8841 8842 8843 8844 8845 8846 8847 8848 8849 8850 8851 8852 8853 8854 8855 8856 8857 8858 8859 8860 8861 8862
    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;
}

8863 8864
static char *qemuDomainSnapshotGetXMLDesc(virDomainSnapshotPtr snapshot,
                                          unsigned int flags)
C
Chris Lalancette 已提交
8865 8866 8867 8868 8869 8870 8871
{
    struct qemud_driver *driver = snapshot->domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    char *xml = NULL;
    virDomainSnapshotObjPtr snap = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];

8872 8873
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
8874 8875 8876 8877 8878 8879 8880 8881 8882 8883 8884 8885 8886 8887 8888 8889 8890 8891 8892 8893 8894 8895 8896 8897 8898 8899
    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;
}

8900 8901 8902 8903 8904 8905 8906 8907 8908 8909
/* The domain is expected to be locked and inactive. */
static int
qemuDomainSnapshotRevertInactive(virDomainObjPtr vm,
                                 virDomainSnapshotObjPtr snap)
{
    /* Try all disks, but report failure if we skipped any.  */
    int ret = qemuDomainSnapshotForEachQcow2(vm, snap, "-a", true);
    return ret > 0 ? -1 : ret;
}

C
Chris Lalancette 已提交
8910
static int qemuDomainRevertToSnapshot(virDomainSnapshotPtr snapshot,
8911
                                      unsigned int flags)
C
Chris Lalancette 已提交
8912 8913 8914 8915 8916 8917 8918
{
    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;
8919
    virDomainEventPtr event2 = NULL;
8920
    int detail;
C
Chris Lalancette 已提交
8921 8922 8923
    qemuDomainObjPrivatePtr priv;
    int rc;

8924 8925
    virCheckFlags(VIR_DOMAIN_SNAPSHOT_REVERT_RUNNING |
                  VIR_DOMAIN_SNAPSHOT_REVERT_PAUSED, -1);
8926

8927 8928 8929 8930 8931 8932 8933 8934 8935 8936 8937 8938 8939
    /* We have the following transitions, which create the following events:
     * 1. inactive -> inactive: none
     * 2. inactive -> running:  EVENT_STARTED
     * 3. inactive -> paused:   EVENT_STARTED, EVENT_PAUSED
     * 4. running  -> inactive: EVENT_STOPPED
     * 5. running  -> running:  none
     * 6. running  -> paused:   EVENT_PAUSED
     * 7. paused   -> inactive: EVENT_STOPPED
     * 8. paused   -> running:  EVENT_RESUMED
     * 9. paused   -> paused:   none
     * Also, several transitions occur even if we fail partway through.
     */

C
Chris Lalancette 已提交
8940 8941 8942 8943 8944 8945 8946 8947 8948 8949 8950 8951 8952 8953 8954 8955 8956
    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;
    }

8957 8958 8959 8960 8961 8962 8963 8964 8965 8966 8967
    if (!vm->persistent &&
        snap->def->state != VIR_DOMAIN_RUNNING &&
        snap->def->state != VIR_DOMAIN_PAUSED &&
        (flags & (VIR_DOMAIN_SNAPSHOT_REVERT_RUNNING |
                  VIR_DOMAIN_SNAPSHOT_REVERT_PAUSED)) == 0) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("transient domain needs to request run or pause "
                          "to revert to inactive snapshot"));
        goto cleanup;
    }

8968 8969 8970 8971 8972 8973 8974 8975 8976 8977 8978
    if (vm->current_snapshot) {
        vm->current_snapshot->def->current = false;
        if (qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                            driver->snapshotDir) < 0)
            goto cleanup;
        vm->current_snapshot = NULL;
        /* XXX Should we restore vm->current_snapshot after this point
         * in the failure cases where we know there was no change?  */
    }

    snap->def->current = true;
C
Chris Lalancette 已提交
8979

8980
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
C
Chris Lalancette 已提交
8981 8982 8983 8984
        goto cleanup;

    if (snap->def->state == VIR_DOMAIN_RUNNING
        || snap->def->state == VIR_DOMAIN_PAUSED) {
8985 8986 8987 8988 8989 8990 8991 8992 8993
        /* Transitions 2, 3, 5, 6, 8, 9 */
        bool was_running = false;
        bool was_stopped = false;

        /* When using the loadvm monitor command, qemu does not know
         * whether to pause or run the reverted domain, and just stays
         * in the same state as before the monitor command, whether
         * that is paused or running.  We always pause before loadvm,
         * to have finer control.  */
C
Chris Lalancette 已提交
8994
        if (virDomainObjIsActive(vm)) {
8995
            /* Transitions 5, 6, 8, 9 */
C
Chris Lalancette 已提交
8996
            priv = vm->privateData;
8997 8998 8999 9000 9001 9002 9003 9004 9005 9006 9007 9008 9009 9010 9011 9012 9013 9014 9015 9016
            if (virDomainObjGetState(vm, NULL) == VIR_DOMAIN_RUNNING) {
                /* Transitions 5, 6 */
                was_running = true;
                if (qemuProcessStopCPUs(driver, vm,
                                        VIR_DOMAIN_PAUSED_FROM_SNAPSHOT,
                                        QEMU_ASYNC_JOB_NONE) < 0)
                    goto endjob;
                /* Create an event now in case the restore fails, so
                 * that user will be alerted that they are now paused.
                 * If restore later succeeds, we might replace this. */
                detail = VIR_DOMAIN_EVENT_SUSPENDED_FROM_SNAPSHOT;
                event = virDomainEventNewFromObj(vm,
                                                 VIR_DOMAIN_EVENT_SUSPENDED,
                                                 detail);
                if (!virDomainObjIsActive(vm)) {
                    qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                                    _("guest unexpectedly quit"));
                    goto endjob;
                }
            }
9017
            qemuDomainObjEnterMonitorWithDriver(driver, vm);
C
Chris Lalancette 已提交
9018 9019
            rc = qemuMonitorLoadSnapshot(priv->mon, snap->def->name);
            qemuDomainObjExitMonitorWithDriver(driver, vm);
9020 9021 9022
            if (rc < 0) {
                /* XXX resume domain if it was running before the
                 * failed loadvm attempt? */
9023
                goto endjob;
9024
            }
E
Eric Blake 已提交
9025
        } else {
9026 9027
            /* Transitions 2, 3 */
            was_stopped = true;
9028
            rc = qemuProcessStart(snapshot->domain->conn, driver, vm, NULL,
9029
                                  true, false, -1, NULL, snap,
9030
                                  VIR_VM_OP_CREATE);
9031
            virDomainAuditStart(vm, "from-snapshot", rc >= 0);
9032 9033 9034 9035
            detail = VIR_DOMAIN_EVENT_STARTED_FROM_SNAPSHOT;
            event = virDomainEventNewFromObj(vm,
                                             VIR_DOMAIN_EVENT_STARTED,
                                             detail);
C
Chris Lalancette 已提交
9036
            if (rc < 0)
9037
                goto endjob;
C
Chris Lalancette 已提交
9038 9039
        }

9040
        /* Touch up domain state.  */
9041 9042 9043
        if (!(flags & VIR_DOMAIN_SNAPSHOT_REVERT_RUNNING) &&
            (snap->def->state == VIR_DOMAIN_PAUSED ||
             (flags & VIR_DOMAIN_SNAPSHOT_REVERT_PAUSED))) {
9044 9045 9046 9047 9048 9049 9050 9051 9052 9053 9054 9055 9056 9057 9058 9059 9060 9061 9062 9063
            /* Transitions 3, 6, 9 */
            virDomainObjSetState(vm, VIR_DOMAIN_PAUSED,
                                 VIR_DOMAIN_PAUSED_FROM_SNAPSHOT);
            if (was_stopped) {
                /* Transition 3, use event as-is and add event2 */
                detail = VIR_DOMAIN_EVENT_SUSPENDED_FROM_SNAPSHOT;
                event2 = virDomainEventNewFromObj(vm,
                                                  VIR_DOMAIN_EVENT_SUSPENDED,
                                                  detail);
            } /* else transition 6 and 9 use event as-is */
        } else {
            /* Transitions 2, 5, 8 */
            if (!virDomainObjIsActive(vm)) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                                _("guest unexpectedly quit"));
                goto endjob;
            }
            rc = qemuProcessStartCPUs(driver, vm, snapshot->domain->conn,
                                      VIR_DOMAIN_RUNNING_FROM_SNAPSHOT,
                                      QEMU_ASYNC_JOB_NONE);
H
Hu Tao 已提交
9064
            if (rc < 0)
9065
                goto endjob;
9066 9067 9068 9069 9070 9071 9072 9073 9074 9075 9076 9077 9078 9079 9080
            virDomainEventFree(event);
            event = NULL;
            if (was_stopped) {
                /* Transition 2 */
                detail = VIR_DOMAIN_EVENT_STARTED_FROM_SNAPSHOT;
                event = virDomainEventNewFromObj(vm,
                                                 VIR_DOMAIN_EVENT_STARTED,
                                                 detail);
            } else if (was_running) {
                /* Transition 8 */
                detail = VIR_DOMAIN_EVENT_RESUMED;
                event = virDomainEventNewFromObj(vm,
                                                 VIR_DOMAIN_EVENT_RESUMED,
                                                 detail);
            }
C
Chris Lalancette 已提交
9081
        }
E
Eric Blake 已提交
9082
    } else {
9083
        /* Transitions 1, 4, 7 */
9084 9085 9086
        /* Newer qemu -loadvm refuses to revert to the state of a snapshot
         * created by qemu-img snapshot -c.  If the domain is running, we
         * must take it offline; then do the revert using qemu-img.
C
Chris Lalancette 已提交
9087 9088 9089
         */

        if (virDomainObjIsActive(vm)) {
9090
            /* Transitions 4, 7 */
J
Jiri Denemark 已提交
9091
            qemuProcessStop(driver, vm, 0, VIR_DOMAIN_SHUTOFF_FROM_SNAPSHOT);
9092
            virDomainAuditStop(vm, "from-snapshot");
9093
            detail = VIR_DOMAIN_EVENT_STOPPED_FROM_SNAPSHOT;
C
Chris Lalancette 已提交
9094 9095
            event = virDomainEventNewFromObj(vm,
                                             VIR_DOMAIN_EVENT_STOPPED,
9096
                                             detail);
9097 9098 9099
        }

        if (qemuDomainSnapshotRevertInactive(vm, snap) < 0) {
9100
            if (!vm->persistent) {
9101
                if (qemuDomainObjEndJob(driver, vm) > 0)
9102 9103
                    virDomainRemoveInactive(&driver->domains, vm);
                vm = NULL;
9104
                goto cleanup;
9105
            }
9106
            goto endjob;
C
Chris Lalancette 已提交
9107
        }
9108

9109 9110 9111 9112 9113 9114 9115 9116 9117 9118 9119 9120 9121 9122 9123 9124 9125 9126 9127 9128 9129 9130 9131 9132 9133 9134 9135 9136 9137 9138 9139
        if (flags & (VIR_DOMAIN_SNAPSHOT_REVERT_RUNNING |
                     VIR_DOMAIN_SNAPSHOT_REVERT_PAUSED)) {
            /* Flush first event, now do transition 2 or 3 */
            bool paused = (flags & VIR_DOMAIN_SNAPSHOT_REVERT_PAUSED) != 0;

            if (event)
                qemuDomainEventQueue(driver, event);
            rc = qemuProcessStart(snapshot->domain->conn, driver, vm, NULL,
                                  paused, false, -1, NULL, NULL,
                                  VIR_VM_OP_CREATE);
            virDomainAuditStart(vm, "from-snapshot", rc >= 0);
            if (rc < 0) {
                if (!vm->persistent) {
                    if (qemuDomainObjEndJob(driver, vm) > 0)
                        virDomainRemoveInactive(&driver->domains, vm);
                    vm = NULL;
                    goto cleanup;
                }
                goto endjob;
            }
            detail = VIR_DOMAIN_EVENT_STARTED_FROM_SNAPSHOT;
            event = virDomainEventNewFromObj(vm,
                                             VIR_DOMAIN_EVENT_STARTED,
                                             detail);
            if (paused) {
                detail = VIR_DOMAIN_EVENT_SUSPENDED_FROM_SNAPSHOT;
                event2 = virDomainEventNewFromObj(vm,
                                                  VIR_DOMAIN_EVENT_SUSPENDED,
                                                  detail);
            }
        }
C
Chris Lalancette 已提交
9140 9141 9142 9143
    }

    ret = 0;

9144
endjob:
9145
    if (vm && qemuDomainObjEndJob(driver, vm) == 0)
C
Chris Lalancette 已提交
9146 9147
        vm = NULL;

9148
cleanup:
9149 9150 9151 9152 9153 9154 9155 9156 9157
    if (vm && ret == 0) {
        if (qemuDomainSnapshotWriteMetadata(vm, snap,
                                            driver->snapshotDir) < 0)
            ret = -1;
        else
            vm->current_snapshot = snap;
    } else if (snap) {
        snap->def->current = false;
    }
9158
    if (event) {
C
Chris Lalancette 已提交
9159
        qemuDomainEventQueue(driver, event);
9160 9161 9162
        if (event2)
            qemuDomainEventQueue(driver, event2);
    }
C
Chris Lalancette 已提交
9163 9164 9165 9166 9167 9168 9169
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);

    return ret;
}

9170 9171 9172 9173 9174
static int
qemuDomainSnapshotDiscard(struct qemud_driver *driver,
                          virDomainObjPtr vm,
                          virDomainSnapshotObjPtr snap,
                          bool update_current)
C
Chris Lalancette 已提交
9175 9176 9177 9178
{
    char *snapFile = NULL;
    int ret = -1;
    qemuDomainObjPrivatePtr priv;
9179
    virDomainSnapshotObjPtr parentsnap = NULL;
C
Chris Lalancette 已提交
9180 9181

    if (!virDomainObjIsActive(vm)) {
9182 9183
        /* Ignore any skipped disks */
        if (qemuDomainSnapshotForEachQcow2(vm, snap, "-d", true) < 0)
C
Chris Lalancette 已提交
9184
            goto cleanup;
E
Eric Blake 已提交
9185
    } else {
C
Chris Lalancette 已提交
9186
        priv = vm->privateData;
9187
        qemuDomainObjEnterMonitorWithDriver(driver, vm);
C
Chris Lalancette 已提交
9188 9189 9190 9191 9192
        /* we continue on even in the face of error */
        qemuMonitorDeleteSnapshot(priv->mon, snap->def->name);
        qemuDomainObjExitMonitorWithDriver(driver, vm);
    }

9193 9194 9195 9196 9197 9198
    if (virAsprintf(&snapFile, "%s/%s/%s.xml", driver->snapshotDir,
                    vm->def->name, snap->def->name) < 0) {
        virReportOOMError();
        goto cleanup;
    }

C
Chris Lalancette 已提交
9199
    if (snap == vm->current_snapshot) {
9200
        if (update_current && snap->def->parent) {
C
Chris Lalancette 已提交
9201 9202 9203
            parentsnap = virDomainSnapshotFindByName(&vm->snapshots,
                                                     snap->def->parent);
            if (!parentsnap) {
9204 9205 9206 9207 9208 9209 9210 9211 9212 9213 9214
                VIR_WARN("missing parent snapshot matching name '%s'",
                         snap->def->parent);
            } else {
                parentsnap->def->current = true;
                if (qemuDomainSnapshotWriteMetadata(vm, parentsnap,
                                                    driver->snapshotDir) < 0) {
                    VIR_WARN("failed to set parent snapshot '%s' as current",
                             snap->def->parent);
                    parentsnap->def->current = false;
                    parentsnap = NULL;
                }
C
Chris Lalancette 已提交
9215
            }
E
Eric Blake 已提交
9216
        }
9217
        vm->current_snapshot = parentsnap;
C
Chris Lalancette 已提交
9218 9219
    }

9220 9221
    if (unlink(snapFile) < 0)
        VIR_WARN("Failed to unlink %s", snapFile);
C
Chris Lalancette 已提交
9222 9223 9224 9225 9226 9227 9228 9229 9230 9231 9232 9233 9234 9235
    virDomainSnapshotObjListRemove(&vm->snapshots, snap);

    ret = 0;

cleanup:
    VIR_FREE(snapFile);

    return ret;
}

struct snap_remove {
    struct qemud_driver *driver;
    virDomainObjPtr vm;
    int err;
9236
    bool current;
C
Chris Lalancette 已提交
9237 9238
};

9239 9240 9241 9242
static void
qemuDomainSnapshotDiscardDescendant(void *payload,
                                    const void *name ATTRIBUTE_UNUSED,
                                    void *data)
C
Chris Lalancette 已提交
9243 9244 9245
{
    virDomainSnapshotObjPtr snap = payload;
    struct snap_remove *curr = data;
9246 9247
    int err;

9248 9249 9250
    if (snap->def->current)
        curr->current = true;
    err = qemuDomainSnapshotDiscard(curr->driver, curr->vm, snap, false);
9251 9252
    if (err && !curr->err)
        curr->err = err;
C
Chris Lalancette 已提交
9253 9254
}

9255 9256 9257 9258 9259 9260 9261 9262 9263
struct snap_reparent {
    struct qemud_driver *driver;
    virDomainSnapshotObjPtr snap;
    virDomainObjPtr vm;
    int err;
};

static void
qemuDomainSnapshotReparentChildren(void *payload,
9264
                                   const void *name ATTRIBUTE_UNUSED,
9265 9266 9267 9268 9269 9270 9271 9272 9273 9274 9275 9276 9277 9278 9279 9280 9281 9282 9283 9284 9285 9286 9287 9288 9289 9290 9291
                                   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 已提交
9292 9293 9294 9295 9296 9297 9298 9299 9300
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;
9301
    struct snap_reparent rep;
C
Chris Lalancette 已提交
9302

9303 9304
    virCheckFlags(VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN, -1);

C
Chris Lalancette 已提交
9305 9306 9307 9308 9309 9310 9311 9312 9313 9314 9315 9316 9317 9318 9319 9320 9321
    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;
    }

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

C
Chris Lalancette 已提交
9325 9326 9327 9328
    if (flags & VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN) {
        rem.driver = driver;
        rem.vm = vm;
        rem.err = 0;
9329
        rem.current = false;
9330 9331 9332 9333
        virDomainSnapshotForEachDescendant(&vm->snapshots,
                                           snap,
                                           qemuDomainSnapshotDiscardDescendant,
                                           &rem);
C
Chris Lalancette 已提交
9334
        if (rem.err < 0)
9335
            goto endjob;
9336 9337
        if (rem.current)
            vm->current_snapshot = snap;
9338 9339 9340 9341 9342 9343 9344 9345 9346
    } 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 已提交
9347 9348
    }

9349
    ret = qemuDomainSnapshotDiscard(driver, vm, snap, true);
C
Chris Lalancette 已提交
9350

9351
endjob:
9352
    if (qemuDomainObjEndJob(driver, vm) == 0)
9353 9354
        vm = NULL;

C
Chris Lalancette 已提交
9355 9356 9357 9358 9359 9360
cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}
9361

9362 9363 9364 9365 9366 9367 9368
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;
9369
    bool hmp;
9370

9371
    virCheckFlags(VIR_DOMAIN_QEMU_MONITOR_COMMAND_HMP, -1);
9372 9373 9374 9375 9376 9377 9378 9379 9380 9381 9382 9383 9384 9385 9386 9387 9388 9389 9390

    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;

9391
    qemuDomainObjTaint(driver, vm, VIR_DOMAIN_TAINT_CUSTOM_MONITOR, -1);
9392

9393 9394
    hmp = !!(flags & VIR_DOMAIN_QEMU_MONITOR_COMMAND_HMP);

9395
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
9396
        goto cleanup;
9397
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
9398
    ret = qemuMonitorArbitraryCommand(priv->mon, cmd, result, hmp);
9399
    qemuDomainObjExitMonitorWithDriver(driver, vm);
9400
    if (qemuDomainObjEndJob(driver, vm) == 0) {
9401 9402 9403 9404 9405 9406 9407 9408 9409 9410 9411
        vm = NULL;
        goto cleanup;
    }

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

9412

9413 9414 9415 9416 9417 9418 9419 9420 9421 9422 9423 9424 9425 9426 9427 9428 9429 9430 9431 9432 9433 9434 9435 9436 9437 9438 9439 9440 9441 9442 9443 9444 9445 9446 9447 9448 9449 9450 9451 9452 9453 9454 9455 9456 9457 9458 9459 9460 9461 9462 9463 9464 9465 9466 9467
static virDomainPtr qemuDomainAttach(virConnectPtr conn,
                                     unsigned int pid,
                                     unsigned int flags)
{
    struct qemud_driver *driver = conn->privateData;
    virDomainObjPtr vm = NULL;
    virDomainDefPtr def = NULL;
    virDomainPtr dom = NULL;
    virDomainChrSourceDefPtr monConfig = NULL;
    bool monJSON = false;
    char *pidfile;

    virCheckFlags(0, NULL);

    qemuDriverLock(driver);

    if (!(def = qemuParseCommandLinePid(driver->caps, pid,
                                        &pidfile, &monConfig, &monJSON)))
        goto cleanup;

    if (!monConfig) {
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("No monitor connection for pid %u"),
                        pid);
        goto cleanup;
    }
    if (monConfig->type != VIR_DOMAIN_CHR_TYPE_UNIX) {
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("Cannot connect to monitor connection of type '%s' for pid %u"),
                        virDomainChrTypeToString(monConfig->type), pid);
        goto cleanup;
    }

    if (!(def->name) &&
        virAsprintf(&def->name, "attach-pid-%u", pid) < 0) {
        virReportOOMError();
        goto cleanup;
    }

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

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

    if (qemuDomainAssignPCIAddresses(def) < 0)
        goto cleanup;

    if (!(vm = virDomainAssignDef(driver->caps,
                                  &driver->domains,
                                  def, false)))
        goto cleanup;

    def = NULL;

9468
    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
9469 9470 9471 9472 9473 9474 9475 9476 9477 9478 9479 9480 9481 9482
        goto cleanup;

    if (qemuProcessAttach(conn, driver, vm, pid,
                          pidfile, monConfig, monJSON) < 0) {
        monConfig = NULL;
        goto endjob;
    }

    monConfig = NULL;

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

endjob:
9483
    if (qemuDomainObjEndJob(driver, vm) == 0) {
9484 9485 9486 9487 9488 9489 9490 9491 9492 9493 9494 9495 9496 9497 9498
        vm = NULL;
        goto cleanup;
    }

cleanup:
    virDomainDefFree(def);
    virDomainChrSourceDefFree(monConfig);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    VIR_FREE(pidfile);
    return dom;
}


9499 9500 9501 9502 9503 9504 9505 9506 9507 9508 9509 9510 9511 9512 9513 9514 9515 9516 9517 9518 9519 9520 9521 9522 9523 9524 9525 9526 9527 9528 9529 9530 9531 9532 9533 9534 9535 9536 9537 9538 9539 9540 9541 9542 9543 9544 9545 9546 9547 9548 9549 9550 9551 9552 9553 9554
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;
    }

9555
    if (chr->source.type != VIR_DOMAIN_CHR_TYPE_PTY) {
9556 9557 9558 9559 9560 9561
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("character device %s is not using a PTY"),
                        NULLSTR(devname));
        goto cleanup;
    }

9562
    if (virFDStreamOpenFile(st, chr->source.data.file.path,
E
Eric Blake 已提交
9563
                            0, 0, O_RDWR) < 0)
9564 9565 9566 9567 9568 9569 9570 9571 9572 9573
        goto cleanup;

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

9574 9575 9576 9577 9578 9579 9580 9581 9582 9583 9584 9585 9586 9587 9588 9589 9590 9591 9592 9593 9594 9595 9596 9597 9598 9599 9600 9601 9602 9603 9604 9605 9606 9607 9608 9609 9610 9611 9612 9613 9614 9615 9616 9617 9618 9619 9620 9621 9622 9623 9624 9625 9626 9627 9628 9629 9630 9631 9632 9633 9634 9635
static const char *
qemuDiskPathToAlias(virDomainObjPtr vm, const char *path) {
    int i;
    char *ret = NULL;

    for (i = 0 ; i < vm->def->ndisks ; i++) {
        virDomainDiskDefPtr disk = vm->def->disks[i];

        if (disk->type != VIR_DOMAIN_DISK_TYPE_BLOCK &&
            disk->type != VIR_DOMAIN_DISK_TYPE_FILE)
            continue;

        if (disk->src != NULL && STREQ(disk->src, path)) {
            if (virAsprintf(&ret, "drive-%s", disk->info.alias) < 0) {
                virReportOOMError();
                return NULL;
            }
            break;
        }
    }

    if (!ret) {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("No device found for specified path"));
    }
    return ret;
}

static int
qemuDomainBlockJobImpl(virDomainPtr dom, const char *path,
                       unsigned long bandwidth, virDomainBlockJobInfoPtr info,
                       int mode)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm = NULL;
    qemuDomainObjPrivatePtr priv;
    char uuidstr[VIR_UUID_STRING_BUFLEN];
    const char *device = NULL;
    int ret = -1;

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

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

    device = qemuDiskPathToAlias(vm, path);
    if (!device) {
        goto cleanup;
    }

    if (qemuDomainObjBeginJobWithDriver(driver, vm, QEMU_JOB_MODIFY) < 0)
        goto cleanup;
9636
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
9637 9638 9639 9640 9641 9642 9643 9644 9645 9646 9647 9648 9649 9650 9651 9652 9653 9654 9655 9656 9657 9658 9659 9660 9661 9662 9663 9664 9665 9666 9667 9668 9669 9670 9671 9672 9673 9674 9675 9676 9677 9678 9679
    priv = vm->privateData;
    ret = qemuMonitorBlockJob(priv->mon, device, bandwidth, info, mode);
    qemuDomainObjExitMonitorWithDriver(driver, vm);
    if (qemuDomainObjEndJob(driver, vm) == 0) {
        vm = NULL;
        goto cleanup;
    }

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

static int
qemuDomainBlockJobAbort(virDomainPtr dom, const char *path, unsigned int flags)
{
    virCheckFlags(0, -1);
    return qemuDomainBlockJobImpl(dom, path, 0, NULL, BLOCK_JOB_ABORT);
}

static int
qemuDomainGetBlockJobInfo(virDomainPtr dom, const char *path,
                           virDomainBlockJobInfoPtr info, unsigned int flags)
{
    virCheckFlags(0, -1);
    return qemuDomainBlockJobImpl(dom, path, 0, info, BLOCK_JOB_INFO);
}

static int
qemuDomainBlockJobSetSpeed(virDomainPtr dom, const char *path,
                           unsigned long bandwidth, unsigned int flags)
{
    virCheckFlags(0, -1);
    return qemuDomainBlockJobImpl(dom, path, bandwidth, NULL, BLOCK_JOB_SPEED);
}

static int
qemuDomainBlockPull(virDomainPtr dom, const char *path, unsigned long bandwidth,
                    unsigned int flags)
{
9680 9681
    int ret;

9682
    virCheckFlags(0, -1);
9683 9684 9685 9686 9687
    ret = qemuDomainBlockJobImpl(dom, path, bandwidth, NULL, BLOCK_JOB_PULL);
    if (ret == 0 && bandwidth != 0)
        ret = qemuDomainBlockJobImpl(dom, path, bandwidth, NULL,
                                     BLOCK_JOB_SPEED);
    return ret;
9688
}
9689

9690
static virDriver qemuDriver = {
9691 9692
    .no = VIR_DRV_QEMU,
    .name = "QEMU",
9693 9694 9695 9696 9697 9698 9699 9700 9701 9702 9703 9704 9705 9706 9707 9708 9709 9710
    .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 */
9711 9712
    .domainShutdown = qemuDomainShutdown, /* 0.2.0 */
    .domainReboot = qemuDomainReboot, /* 0.9.3 */
9713 9714
    .domainDestroy = qemuDomainDestroy, /* 0.2.0 */
    .domainDestroyFlags = qemuDomainDestroyFlags, /* 0.9.4 */
9715 9716 9717 9718 9719 9720 9721 9722 9723 9724 9725
    .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 */
9726
    .domainGetControlInfo = qemuDomainGetControlInfo, /* 0.9.3 */
9727 9728
    .domainSave = qemuDomainSave, /* 0.2.0 */
    .domainSaveFlags = qemuDomainSaveFlags, /* 0.9.4 */
9729
    .domainRestore = qemuDomainRestore, /* 0.2.0 */
9730
    .domainRestoreFlags = qemuDomainRestoreFlags, /* 0.9.4 */
9731 9732
    .domainSaveImageGetXMLDesc = qemuDomainSaveImageGetXMLDesc, /* 0.9.4 */
    .domainSaveImageDefineXML = qemuDomainSaveImageDefineXML, /* 0.9.4 */
9733 9734
    .domainCoreDump = qemudDomainCoreDump, /* 0.7.0 */
    .domainScreenshot = qemuDomainScreenshot, /* 0.9.2 */
9735 9736
    .domainSetVcpus = qemuDomainSetVcpus, /* 0.4.4 */
    .domainSetVcpusFlags = qemuDomainSetVcpusFlags, /* 0.8.5 */
9737 9738
    .domainGetVcpusFlags = qemudDomainGetVcpusFlags, /* 0.8.5 */
    .domainPinVcpu = qemudDomainPinVcpu, /* 0.4.4 */
9739
    .domainPinVcpuFlags = qemudDomainPinVcpuFlags, /* 0.9.3 */
E
Eric Blake 已提交
9740
    .domainGetVcpuPinInfo = qemudDomainGetVcpuPinInfo, /* 0.9.3 */
9741 9742 9743 9744 9745 9746 9747 9748 9749
    .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 */
9750 9751
    .domainCreate = qemuDomainStart, /* 0.2.0 */
    .domainCreateWithFlags = qemuDomainStartWithFlags, /* 0.8.2 */
9752 9753
    .domainDefineXML = qemudDomainDefine, /* 0.2.0 */
    .domainUndefine = qemudDomainUndefine, /* 0.2.0 */
9754
    .domainUndefineFlags = qemuDomainUndefineFlags, /* 0.9.4 */
9755 9756 9757 9758 9759 9760 9761 9762 9763
    .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 */
9764
    .domainGetSchedulerParametersFlags = qemuGetSchedulerParametersFlags, /* 0.9.2 */
9765
    .domainSetSchedulerParameters = qemuSetSchedulerParameters, /* 0.7.0 */
9766
    .domainSetSchedulerParametersFlags = qemuSetSchedulerParametersFlags, /* 0.9.2 */
9767 9768 9769 9770 9771 9772 9773
    .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 */
9774
    .nodeGetCPUStats = nodeGetCPUStats, /* 0.9.3 */
9775
    .nodeGetMemoryStats = nodeGetMemoryStats, /* 0.9.3 */
9776 9777 9778 9779 9780 9781 9782 9783 9784 9785 9786 9787 9788 9789 9790 9791 9792 9793 9794 9795 9796 9797 9798 9799 9800 9801 9802 9803 9804 9805 9806 9807 9808 9809 9810 9811
    .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 */
9812
    .qemuDomainAttach = qemuDomainAttach, /* 0.9.4 */
9813 9814
    .domainOpenConsole = qemuDomainOpenConsole, /* 0.8.6 */
    .domainInjectNMI = qemuDomainInjectNMI, /* 0.9.2 */
9815 9816 9817 9818 9819 9820
    .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 */
9821
    .domainSendKey = qemuDomainSendKey, /* 0.9.4 */
9822 9823 9824 9825
    .domainBlockJobAbort = qemuDomainBlockJobAbort, /* 0.9.4 */
    .domainGetBlockJobInfo = qemuDomainGetBlockJobInfo, /* 0.9.4 */
    .domainBlockJobSetSpeed = qemuDomainBlockJobSetSpeed, /* 0.9.4 */
    .domainBlockPull = qemuDomainBlockPull, /* 0.9.4 */
9826 9827 9828
};


9829
static virStateDriver qemuStateDriver = {
9830
    .name = "QEMU",
9831 9832 9833 9834
    .initialize = qemudStartup,
    .cleanup = qemudShutdown,
    .reload = qemudReload,
    .active = qemudActive,
9835
};
9836

9837
static void
9838
qemuVMDriverLock(void) {
9839 9840 9841 9842 9843
    qemuDriverLock(qemu_driver);
};


static void
9844
qemuVMDriverUnlock(void) {
9845 9846 9847 9848
    qemuDriverUnlock(qemu_driver);
};


9849 9850 9851 9852 9853 9854 9855 9856 9857
static int
qemuVMFilterRebuild(virConnectPtr conn ATTRIBUTE_UNUSED,
                    virHashIterator iter, void *data)
{
    virHashForEach(qemu_driver->domains.objs, iter, data);

    return 0;
}

S
Stefan Berger 已提交
9858 9859
static virNWFilterCallbackDriver qemuCallbackDriver = {
    .name = "QEMU",
9860 9861 9862
    .vmFilterRebuild = qemuVMFilterRebuild,
    .vmDriverLock = qemuVMDriverLock,
    .vmDriverUnlock = qemuVMDriverUnlock,
S
Stefan Berger 已提交
9863 9864
};

9865
int qemuRegister(void) {
9866 9867
    virRegisterDriver(&qemuDriver);
    virRegisterStateDriver(&qemuStateDriver);
S
Stefan Berger 已提交
9868
    virNWFilterRegisterCallbackDriver(&qemuCallbackDriver);
9869 9870
    return 0;
}