“a8b12e4f2784e41b0f08bd9d654af0bc6860ba96”上不存在“src/qemu/qemu_driver.c”
qemu_driver.c 208.9 KB
Newer Older
D
Daniel P. Berrange 已提交
1 2 3
/*
 * driver.c: core driver methods for managing qemu guests
 *
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>
D
Daniel P. Berrange 已提交
46

47

48 49
#include "qemu_driver.h"
#include "qemu_conf.h"
50
#include "qemu_capabilities.h"
51
#include "qemu_command.h"
52
#include "qemu_cgroup.h"
53
#include "qemu_hostdev.h"
54
#include "qemu_hotplug.h"
55
#include "qemu_monitor.h"
56
#include "qemu_bridge_filter.h"
57
#include "qemu_audit.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 "event.h"
65
#include "buf.h"
66
#include "util.h"
67
#include "nodeinfo.h"
68
#include "stats_linux.h"
69
#include "capabilities.h"
70
#include "memory.h"
71
#include "uuid.h"
72
#include "domain_conf.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"
85
#include "files.h"
86
#include "fdstream.h"
87
#include "configmake.h"
H
Hu Tao 已提交
88
#include "threadpool.h"
89

90 91
#define VIR_FROM_THIS VIR_FROM_QEMU

92 93
#define QEMU_NB_MEM_PARAM  3

94 95 96
#if HAVE_LINUX_KVM_H
# include <linux/kvm.h>
#endif
97

98 99
/* device for kvm ioctls */
#define KVM_DEVICE "/dev/kvm"
100

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

112
#define QEMU_NB_BLKIO_PARAM  1
113 114

#define timeval_to_ms(tv)       (((tv).tv_sec * 1000ull) + ((tv).tv_usec / 1000))
H
Hu Tao 已提交
115 116 117

static void processWatchdogEvent(void *data, void *opaque);

118 119
static int qemudShutdown(void);

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

125
static int qemudDomainGetMaxVcpus(virDomainPtr dom);
126

127
struct qemud_driver *qemu_driver = NULL;
128 129


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

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

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

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

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

167

168
static void
169 170
qemuAutostartDomains(struct qemud_driver *driver)
{
171 172 173 174 175
    /* XXX: Figure out a better way todo this. The domain
     * startup code needs a connection handle in order
     * to lookup the bridge associated with a virtual
     * network
     */
176 177 178
    virConnectPtr conn = virConnectOpen(driver->privileged ?
                                        "qemu:///system" :
                                        "qemu:///session");
179
    /* Ignoring NULL conn which is mostly harmless here */
180
    struct qemuAutostartData data = { driver, conn };
181

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

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

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

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

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

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

216
    return 0;
217

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

224

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

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

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

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

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

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

257 258 259 260 261 262 263
    doi = virSecurityManagerGetDOI(driver->securityManager);
    model = virSecurityManagerGetModel(driver->securityManager);
    if (STRNEQ(model, "none")) {
        if (!(caps->host.secModel.model = strdup(model)))
            goto no_memory;
        if (!(caps->host.secModel.doi = strdup(doi)))
            goto no_memory;
264
    }
265

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

269
    return caps;
270

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

278
static void qemuDomainSnapshotLoad(void *payload,
279
                                   const void *name ATTRIBUTE_UNUSED,
280
                                   void *data)
281
{
282 283 284 285 286 287 288 289 290 291
    virDomainObjPtr vm = (virDomainObjPtr)payload;
    char *baseDir = (char *)data;
    char *snapDir = NULL;
    DIR *dir = NULL;
    struct dirent *entry;
    char *xmlStr;
    int ret;
    char *fullpath;
    virDomainSnapshotDefPtr def = NULL;
    char ebuf[1024];
292

293 294 295 296
    virDomainObjLock(vm);
    if (virAsprintf(&snapDir, "%s/%s", baseDir, vm->def->name) < 0) {
        VIR_ERROR(_("Failed to allocate memory for snapshot directory for domain %s"),
                   vm->def->name);
297
        goto cleanup;
298 299
    }

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

303 304 305 306 307
    if (!(dir = opendir(snapDir))) {
        if (errno != ENOENT)
            VIR_ERROR(_("Failed to open snapshot directory %s for domain %s: %s"),
                      snapDir, vm->def->name,
                      virStrerror(errno, ebuf, sizeof(ebuf)));
308
        goto cleanup;
309 310
    }

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

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

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

324 325 326 327 328 329 330 331
        ret = virFileReadAll(fullpath, 1024*1024*1, &xmlStr);
        if (ret < 0) {
            /* Nothing we can do here, skip this one */
            VIR_ERROR(_("Failed to read snapshot file %s: %s"), fullpath,
                      virStrerror(errno, ebuf, sizeof(ebuf)));
            VIR_FREE(fullpath);
            continue;
        }
332

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

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

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

348 349 350 351 352 353 354 355
    /* FIXME: qemu keeps internal track of snapshots.  We can get access
     * to this info via the "info snapshots" monitor command for running
     * domains, or via "qemu-img snapshot -l" for shutoff domains.  It would
     * be nice to update our internal state based on that, but there is a
     * a problem.  qemu doesn't track all of the same metadata that we do.
     * In particular we wouldn't be able to fill in the <parent>, which is
     * pretty important in our metadata.
     */
356

357
    virResetLastError();
358

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

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

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

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

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

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

395 396 397 398 399
    /* Init callback list */
    if (VIR_ALLOC(qemu_driver->domainEventCallbacks) < 0)
        goto out_of_memory;
    if (!(qemu_driver->domainEventQueue = virDomainEventQueueNew()))
        goto out_of_memory;
400

401 402 403
    if ((qemu_driver->domainEventTimer =
         virEventAddTimeout(-1, qemuDomainEventFlush, qemu_driver, NULL)) < 0)
        goto error;
404

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

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

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

419 420
        if ((base = strdup (SYSCONFDIR "/libvirt")) == NULL)
            goto out_of_memory;
421

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

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

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

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

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

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

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

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

519
    VIR_FREE(base);
520

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

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

533 534
    if (qemuSecurityInit(qemu_driver) < 0)
        goto error;
535

536 537 538
    if ((qemu_driver->caps = qemuCreateCapabilities(NULL,
                                                    qemu_driver)) == NULL)
        goto error;
539

540
    if ((qemu_driver->activePciHostdevs = pciDeviceListNew()) == NULL)
541
        goto error;
542

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

570 571 572 573 574 575
    /* 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
576
     */
577 578 579 580 581
    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;
582

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

598
        qemu_driver->hugepage_path = mempath;
599
    }
600

601 602 603 604 605 606 607
    /* Get all the running persistent or transient configs first */
    if (virDomainLoadAllConfigs(qemu_driver->caps,
                                &qemu_driver->domains,
                                qemu_driver->stateDir,
                                NULL,
                                1, NULL, NULL) < 0)
        goto error;
608

609 610 611
    conn = virConnectOpen(qemu_driver->privileged ?
                          "qemu:///system" :
                          "qemu:///session");
612

613
    qemuProcessReconnectAll(conn, qemu_driver);
614

615 616 617 618 619 620 621
    /* Then inactive persistent configs */
    if (virDomainLoadAllConfigs(qemu_driver->caps,
                                &qemu_driver->domains,
                                qemu_driver->configDir,
                                qemu_driver->autostartDir,
                                0, NULL, NULL) < 0)
        goto error;
622

623

624 625
    virHashForEach(qemu_driver->domains.objs, qemuDomainSnapshotLoad,
                   qemu_driver->snapshotDir);
626

627
    qemuDriverUnlock(qemu_driver);
628

629
    qemuAutostartDomains(qemu_driver);
630

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

635 636
    if (conn)
        virConnectClose(conn);
637

638
    return 0;
639

640 641 642 643 644 645 646 647 648 649
out_of_memory:
    virReportOOMError();
error:
    if (qemu_driver)
        qemuDriverUnlock(qemu_driver);
    if (conn)
        virConnectClose(conn);
    VIR_FREE(base);
    VIR_FREE(driverConf);
    qemudShutdown();
650
    return -1;
651 652
}

653 654 655
static void qemudNotifyLoadDomain(virDomainObjPtr vm, int newVM, void *opaque)
{
    struct qemud_driver *driver = opaque;
656

657 658 659 660 661 662 663
    if (newVM) {
        virDomainEventPtr event =
            virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_DEFINED,
                                     VIR_DOMAIN_EVENT_DEFINED_ADDED);
        if (event)
            qemuDomainEventQueue(driver, event);
E
Eric Blake 已提交
664
    }
665
}
E
Eric Blake 已提交
666

667 668 669 670 671 672 673 674 675 676
/**
 * 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;
677

678 679 680 681 682 683 684
    qemuDriverLock(qemu_driver);
    virDomainLoadAllConfigs(qemu_driver->caps,
                            &qemu_driver->domains,
                            qemu_driver->configDir,
                            qemu_driver->autostartDir,
                            0, qemudNotifyLoadDomain, qemu_driver);
    qemuDriverUnlock(qemu_driver);
685

686
    qemuAutostartDomains(qemu_driver);
687

688 689
    return 0;
}
S
Stefan Berger 已提交
690

691 692 693 694 695 696 697 698 699 700 701
/**
 * 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;
702

703 704
    if (!qemu_driver)
        return 0;
705

706 707 708 709 710 711
    /* 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;
}
712

713 714 715 716 717 718 719 720
/**
 * qemudShutdown:
 *
 * Shutdown the QEmu daemon, it will stop all active domains and networks
 */
static int
qemudShutdown(void) {
    int i;
721

722 723
    if (!qemu_driver)
        return -1;
724

725 726 727
    qemuDriverLock(qemu_driver);
    pciDeviceListFree(qemu_driver->activePciHostdevs);
    virCapabilitiesFree(qemu_driver->caps);
728

729 730
    virDomainObjListDeinit(&qemu_driver->domains);
    virBitmapFree(qemu_driver->reservedVNCPorts);
731

732
    virSysinfoDefFree(qemu_driver->hostsysinfo);
733

734 735 736 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753
    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);
754

755
    virSecurityManagerFree(qemu_driver->securityManager);
756

757
    ebtablesContextFree(qemu_driver->ebtables);
758

759 760 761 762
    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 已提交
763 764
    }

765 766 767
    /* Free domain callback list */
    virDomainEventCallbackListFree(qemu_driver->domainEventCallbacks);
    virDomainEventQueueFree(qemu_driver->domainEventQueue);
768

769 770
    if (qemu_driver->domainEventTimer != -1)
        virEventRemoveTimeout(qemu_driver->domainEventTimer);
D
Daniel P. Berrange 已提交
771

772 773
    if (qemu_driver->brctl)
        brShutdown(qemu_driver->brctl);
774

775
    virCgroupFree(&qemu_driver->cgroup);
776

777 778 779 780
    qemuDriverUnlock(qemu_driver);
    virMutexDestroy(&qemu_driver->lock);
    virThreadPoolFree(qemu_driver->workerPool);
    VIR_FREE(qemu_driver);
781

782
    return 0;
783 784
}

785 786 787 788 789 790 791

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


792
static virDrvOpenStatus qemudOpen(virConnectPtr conn,
793
                                  virConnectAuthPtr auth ATTRIBUTE_UNUSED,
794
                                  int flags ATTRIBUTE_UNUSED) {
795
    if (conn->uri == NULL) {
796 797 798
        if (qemu_driver == NULL)
            return VIR_DRV_OPEN_DECLINED;

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

816
        if (qemu_driver == NULL) {
817 818
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("qemu state driver is not active"));
819 820 821
            return VIR_DRV_OPEN_ERROR;
        }

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

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

    return VIR_DRV_OPEN_SUCCESS;
}

static int qemudClose(virConnectPtr conn) {
854
    struct qemud_driver *driver = conn->privateData;
855 856

    /* Get rid of callbacks registered for this conn */
857
    qemuDriverLock(driver);
858
    virDomainEventCallbackListRemoveConn(conn, driver->domainEventCallbacks);
859
    qemuDriverUnlock(driver);
860 861 862 863 864 865

    conn->privateData = NULL;

    return 0;
}

D
Daniel Veillard 已提交
866 867 868 869 870
/* Which features are supported by this driver? */
static int
qemudSupportsFeature (virConnectPtr conn ATTRIBUTE_UNUSED, int feature)
{
    switch (feature) {
871 872 873 874 875
    case VIR_DRV_FEATURE_MIGRATION_V2:
    case VIR_DRV_FEATURE_MIGRATION_P2P:
        return 1;
    default:
        return 0;
D
Daniel Veillard 已提交
876 877 878
    }
}

879
static const char *qemudGetType(virConnectPtr conn ATTRIBUTE_UNUSED) {
880
    return "QEMU";
881 882
}

883

884 885 886 887 888 889 890 891 892 893 894 895 896
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;
}


897 898 899 900
static int kvmGetMaxVCPUs(void) {
    int maxvcpus = 1;

    int r, fd;
901

902 903
    fd = open(KVM_DEVICE, O_RDONLY);
    if (fd < 0) {
904
        virReportSystemError(errno, _("Unable to open %s"), KVM_DEVICE);
905
        return -1;
906 907 908 909 910 911
    }

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

912
    VIR_FORCE_CLOSE(fd);
913 914 915 916
    return maxvcpus;
}


E
Eric Blake 已提交
917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932
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, "");
}

933
static int qemudGetMaxVCPUs(virConnectPtr conn ATTRIBUTE_UNUSED, const char *type) {
934 935 936
    if (!type)
        return 16;

937
    if (STRCASEEQ(type, "qemu"))
938 939
        return 16;

940
    if (STRCASEEQ(type, "kvm"))
941
        return kvmGetMaxVCPUs();
942

943
    if (STRCASEEQ(type, "kqemu"))
944
        return 1;
945

946 947
    qemuReportError(VIR_ERR_INVALID_ARG,
                    _("unknown type '%s'"), type);
948 949 950
    return -1;
}

951

952
static char *qemudGetCapabilities(virConnectPtr conn) {
953
    struct qemud_driver *driver = conn->privateData;
954
    virCapsPtr caps = NULL;
955
    char *xml = NULL;
956

957
    qemuDriverLock(driver);
958

959
    if ((caps = qemuCreateCapabilities(qemu_driver->caps,
960
                                       qemu_driver)) == NULL) {
961 962 963
        virCapabilitiesFree(caps);
        goto cleanup;
    }
964

965
    virCapabilitiesFree(qemu_driver->caps);
966 967 968
    qemu_driver->caps = caps;

    if ((xml = virCapabilitiesFormatXML(driver->caps)) == NULL)
969
        virReportOOMError();
970 971

cleanup:
972
    qemuDriverUnlock(driver);
973

974
    return xml;
975 976 977
}


978 979 980 981 982
static int
qemudGetProcessInfo(unsigned long long *cpuTime, int *lastCpu, int pid,
                    int tid)
{
    char *proc;
D
Daniel P. Berrange 已提交
983
    FILE *pidinfo;
984
    unsigned long long usertime, systime;
985 986
    int cpu;
    int ret;
D
Daniel P. Berrange 已提交
987

988
    if (tid)
989
        ret = virAsprintf(&proc, "/proc/%d/task/%d/stat", pid, tid);
990
    else
991 992
        ret = virAsprintf(&proc, "/proc/%d/stat", pid);
    if (ret < 0)
D
Daniel P. Berrange 已提交
993 994 995 996
        return -1;

    if (!(pidinfo = fopen(proc, "r"))) {
        /* VM probably shut down, so fake 0 */
997 998 999 1000
        if (cpuTime)
            *cpuTime = 0;
        if (lastCpu)
            *lastCpu = 0;
1001
        VIR_FREE(proc);
D
Daniel P. Berrange 已提交
1002 1003
        return 0;
    }
1004
    VIR_FREE(proc);
D
Daniel P. Berrange 已提交
1005

1006 1007 1008 1009 1010 1011 1012 1013 1014 1015
    /* 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) {
1016
        VIR_FORCE_FCLOSE(pidinfo);
1017 1018
        VIR_WARN0("cannot parse process status data");
        errno = -EINVAL;
D
Daniel P. Berrange 已提交
1019 1020 1021 1022 1023 1024 1025 1026
        return -1;
    }

    /* We got jiffies
     * We want nanoseconds
     * _SC_CLK_TCK is jiffies per second
     * So calulate thus....
     */
1027 1028 1029 1030 1031
    if (cpuTime)
        *cpuTime = 1000ull * 1000ull * 1000ull * (usertime + systime) / (unsigned long long)sysconf(_SC_CLK_TCK);
    if (lastCpu)
        *lastCpu = cpu;

D
Daniel P. Berrange 已提交
1032

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

1036
    VIR_FORCE_FCLOSE(pidinfo);
D
Daniel P. Berrange 已提交
1037 1038 1039 1040 1041

    return 0;
}


1042
static virDomainPtr qemudDomainLookupByID(virConnectPtr conn,
1043
                                          int id) {
1044 1045 1046 1047
    struct qemud_driver *driver = conn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;

1048
    qemuDriverLock(driver);
1049
    vm  = virDomainFindByID(&driver->domains, id);
1050
    qemuDriverUnlock(driver);
1051 1052

    if (!vm) {
1053 1054
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching id %d"), id);
1055
        goto cleanup;
1056 1057
    }

1058
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1059
    if (dom) dom->id = vm->def->id;
1060 1061

cleanup:
1062 1063
    if (vm)
        virDomainObjUnlock(vm);
1064 1065
    return dom;
}
1066

1067
static virDomainPtr qemudDomainLookupByUUID(virConnectPtr conn,
1068
                                            const unsigned char *uuid) {
1069 1070 1071
    struct qemud_driver *driver = conn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;
1072

1073
    qemuDriverLock(driver);
1074
    vm = virDomainFindByUUID(&driver->domains, uuid);
1075 1076
    qemuDriverUnlock(driver);

1077
    if (!vm) {
1078 1079
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(uuid, uuidstr);
1080 1081
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1082
        goto cleanup;
1083 1084
    }

1085
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1086
    if (dom) dom->id = vm->def->id;
1087 1088

cleanup:
1089 1090
    if (vm)
        virDomainObjUnlock(vm);
1091 1092
    return dom;
}
1093

1094
static virDomainPtr qemudDomainLookupByName(virConnectPtr conn,
1095
                                            const char *name) {
1096 1097 1098
    struct qemud_driver *driver = conn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;
1099

1100
    qemuDriverLock(driver);
1101
    vm = virDomainFindByName(&driver->domains, name);
1102 1103
    qemuDriverUnlock(driver);

1104
    if (!vm) {
1105 1106
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching name '%s'"), name);
1107
        goto cleanup;
1108 1109
    }

1110
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1111
    if (dom) dom->id = vm->def->id;
1112 1113

cleanup:
1114 1115
    if (vm)
        virDomainObjUnlock(vm);
1116 1117 1118
    return dom;
}

1119 1120 1121 1122 1123 1124 1125 1126 1127 1128 1129

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

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

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

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

1192
static int qemudGetVersion(virConnectPtr conn, unsigned long *version) {
1193 1194 1195
    struct qemud_driver *driver = conn->privateData;
    int ret = -1;

1196
    qemuDriverLock(driver);
1197
    if (qemuCapsExtractVersion(driver->caps, &driver->qemuVersion) < 0)
1198
        goto cleanup;
1199

1200
    *version = driver->qemuVersion;
1201 1202 1203
    ret = 0;

cleanup:
1204
    qemuDriverUnlock(driver);
1205
    return ret;
D
Daniel P. Berrange 已提交
1206 1207
}

1208
static int qemudListDomains(virConnectPtr conn, int *ids, int nids) {
1209
    struct qemud_driver *driver = conn->privateData;
1210
    int n;
1211

1212
    qemuDriverLock(driver);
1213
    n = virDomainObjListGetActiveIDs(&driver->domains, ids, nids);
1214
    qemuDriverUnlock(driver);
1215

1216
    return n;
D
Daniel P. Berrange 已提交
1217
}
1218

1219
static int qemudNumDomains(virConnectPtr conn) {
1220
    struct qemud_driver *driver = conn->privateData;
1221
    int n;
1222

1223
    qemuDriverLock(driver);
1224
    n = virDomainObjListNumOfDomains(&driver->domains, 1);
1225
    qemuDriverUnlock(driver);
1226

1227
    return n;
D
Daniel P. Berrange 已提交
1228
}
1229

1230
static virDomainPtr qemudDomainCreate(virConnectPtr conn, const char *xml,
1231
                                      unsigned int flags) {
1232
    struct qemud_driver *driver = conn->privateData;
1233
    virDomainDefPtr def;
1234
    virDomainObjPtr vm = NULL;
1235
    virDomainPtr dom = NULL;
1236
    virDomainEventPtr event = NULL;
D
Daniel P. Berrange 已提交
1237

1238
    virCheckFlags(VIR_DOMAIN_START_PAUSED, NULL);
1239

1240
    qemuDriverLock(driver);
1241
    if (!(def = virDomainDefParseString(driver->caps, xml,
1242
                                        VIR_DOMAIN_XML_INACTIVE)))
1243
        goto cleanup;
1244

1245
    if (virSecurityManagerVerify(driver->securityManager, def) < 0)
1246 1247
        goto cleanup;

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

1251 1252 1253
    if (qemudCanonicalizeMachine(driver, def) < 0)
        goto cleanup;

1254
    if (qemuDomainAssignPCIAddresses(def) < 0)
1255 1256
        goto cleanup;

1257
    if (!(vm = virDomainAssignDef(driver->caps,
1258
                                  &driver->domains,
1259
                                  def, false)))
1260 1261 1262
        goto cleanup;

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

1264 1265 1266
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup; /* XXXX free the 'vm' we created ? */

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

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

1283
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1284
    if (dom) dom->id = vm->def->id;
1285

1286 1287 1288
    if (vm &&
        qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
1289

1290 1291
cleanup:
    virDomainDefFree(def);
1292 1293
    if (vm)
        virDomainObjUnlock(vm);
1294 1295
    if (event)
        qemuDomainEventQueue(driver, event);
1296
    qemuDriverUnlock(driver);
1297
    return dom;
D
Daniel P. Berrange 已提交
1298 1299 1300
}


1301
static int qemudDomainSuspend(virDomainPtr dom) {
1302 1303 1304
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1305
    virDomainEventPtr event = NULL;
1306
    qemuDomainObjPrivatePtr priv;
1307

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

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

    priv = vm->privateData;

1326
    if (priv->jobActive == QEMU_JOB_MIGRATION_OUT) {
1327 1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340
        if (vm->state != VIR_DOMAIN_PAUSED) {
            VIR_DEBUG("Requesting domain pause on %s",
                      vm->def->name);
            priv->jobSignals |= QEMU_JOB_SIGNAL_SUSPEND;
        }
        ret = 0;
        goto cleanup;
    } else {
        if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
            goto cleanup;

        if (!virDomainObjIsActive(vm)) {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s", _("domain is not running"));
1341
            goto endjob;
1342
        }
1343
        if (vm->state != VIR_DOMAIN_PAUSED) {
1344
            if (qemuProcessStopCPUs(driver, vm) < 0) {
1345
                goto endjob;
1346
            }
1347 1348 1349 1350 1351 1352 1353
            event = virDomainEventNewFromObj(vm,
                                             VIR_DOMAIN_EVENT_SUSPENDED,
                                             VIR_DOMAIN_EVENT_SUSPENDED_PAUSED);
        }
        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
            goto endjob;
        ret = 0;
D
Daniel P. Berrange 已提交
1354
    }
1355

1356
endjob:
1357 1358
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
1359

1360
cleanup:
1361 1362
    if (vm)
        virDomainObjUnlock(vm);
1363

1364
    if (event)
1365
        qemuDomainEventQueue(driver, event);
1366
    qemuDriverUnlock(driver);
1367
    return ret;
D
Daniel P. Berrange 已提交
1368 1369 1370
}


1371
static int qemudDomainResume(virDomainPtr dom) {
1372 1373 1374
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1375
    virDomainEventPtr event = NULL;
1376

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

D
Daniel P. Berrange 已提交
1380
    if (!vm) {
1381 1382
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1383 1384
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1385
        goto cleanup;
D
Daniel P. Berrange 已提交
1386
    }
1387 1388 1389 1390

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

D
Daniel P. Berrange 已提交
1391
    if (!virDomainObjIsActive(vm)) {
1392 1393
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
1394
        goto endjob;
D
Daniel P. Berrange 已提交
1395
    }
1396
    if (vm->state == VIR_DOMAIN_PAUSED) {
1397
        if (qemuProcessStartCPUs(driver, vm, dom->conn) < 0) {
1398
            if (virGetLastError() == NULL)
1399 1400
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("resume operation failed"));
1401
            goto endjob;
1402
        }
1403 1404 1405
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_RESUMED,
                                         VIR_DOMAIN_EVENT_RESUMED_UNPAUSED);
D
Daniel P. Berrange 已提交
1406
    }
1407
    if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
1408
        goto endjob;
1409 1410
    ret = 0;

1411
endjob:
1412 1413
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
1414

1415
cleanup:
1416 1417
    if (vm)
        virDomainObjUnlock(vm);
1418
    if (event)
1419
        qemuDomainEventQueue(driver, event);
1420
    qemuDriverUnlock(driver);
1421
    return ret;
D
Daniel P. Berrange 已提交
1422 1423 1424
}


1425
static int qemudDomainShutdown(virDomainPtr dom) {
1426 1427 1428
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1429

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

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

1442 1443 1444
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

D
Daniel P. Berrange 已提交
1445
    if (!virDomainObjIsActive(vm)) {
1446 1447
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
1448
        goto endjob;
1449 1450
    }

1451
    qemuDomainObjPrivatePtr priv = vm->privateData;
1452 1453 1454
    qemuDomainObjEnterMonitor(vm);
    ret = qemuMonitorSystemPowerdown(priv->mon);
    qemuDomainObjExitMonitor(vm);
1455

1456
endjob:
1457 1458
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
1459

1460
cleanup:
1461 1462
    if (vm)
        virDomainObjUnlock(vm);
1463
    return ret;
1464 1465 1466
}


1467
static int qemudDomainDestroy(virDomainPtr dom) {
1468 1469 1470
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1471
    virDomainEventPtr event = NULL;
1472

1473
    qemuDriverLock(driver);
1474
    vm  = virDomainFindByUUID(&driver->domains, dom->uuid);
D
Daniel P. Berrange 已提交
1475
    if (!vm) {
1476 1477
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1478 1479
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1480
        goto cleanup;
D
Daniel P. Berrange 已提交
1481
    }
1482 1483 1484 1485

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

D
Daniel P. Berrange 已提交
1486
    if (!virDomainObjIsActive(vm)) {
1487 1488
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
1489
        goto endjob;
1490
    }
1491

1492
    qemuProcessStop(driver, vm, 0);
1493 1494 1495
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STOPPED,
                                     VIR_DOMAIN_EVENT_STOPPED_DESTROYED);
1496
    qemuAuditDomainStop(vm, "destroyed");
1497

1498
    if (!vm->persistent) {
1499 1500 1501
        if (qemuDomainObjEndJob(vm) > 0)
            virDomainRemoveInactive(&driver->domains,
                                    vm);
1502 1503
        vm = NULL;
    }
1504 1505
    ret = 0;

1506
endjob:
1507 1508 1509
    if (vm &&
        qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
1510

1511
cleanup:
1512 1513
    if (vm)
        virDomainObjUnlock(vm);
1514 1515
    if (event)
        qemuDomainEventQueue(driver, event);
1516
    qemuDriverUnlock(driver);
1517
    return ret;
D
Daniel P. Berrange 已提交
1518 1519 1520
}


1521
static char *qemudDomainGetOSType(virDomainPtr dom) {
1522 1523 1524
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    char *type = NULL;
1525

1526
    qemuDriverLock(driver);
1527
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1528
    qemuDriverUnlock(driver);
1529
    if (!vm) {
1530 1531
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1532 1533
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1534
        goto cleanup;
1535 1536
    }

1537
    if (!(type = strdup(vm->def->os.type)))
1538
        virReportOOMError();
1539 1540

cleanup:
1541 1542
    if (vm)
        virDomainObjUnlock(vm);
1543 1544 1545
    return type;
}

1546 1547
/* Returns max memory in kb, 0 if error */
static unsigned long qemudDomainGetMaxMemory(virDomainPtr dom) {
1548 1549 1550
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    unsigned long ret = 0;
1551

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

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

1564
    ret = vm->def->mem.max_balloon;
1565 1566

cleanup:
1567 1568
    if (vm)
        virDomainObjUnlock(vm);
1569
    return ret;
1570 1571
}

1572 1573
static int qemudDomainSetMemoryFlags(virDomainPtr dom, unsigned long newmem,
                                     unsigned int flags) {
1574
    struct qemud_driver *driver = dom->conn->privateData;
1575
    qemuDomainObjPrivatePtr priv;
1576
    virDomainObjPtr vm;
1577
    virDomainDefPtr persistentDef = NULL;
1578
    int ret = -1, r;
1579

1580 1581 1582 1583 1584 1585 1586 1587
    virCheckFlags(VIR_DOMAIN_MEM_LIVE |
                  VIR_DOMAIN_MEM_CONFIG, -1);

    if ((flags & (VIR_DOMAIN_MEM_LIVE | VIR_DOMAIN_MEM_CONFIG)) == 0) {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid flag combination: (0x%x)"), flags);
    }

1588
    qemuDriverLock(driver);
1589
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1590
    qemuDriverUnlock(driver);
1591
    if (!vm) {
1592 1593
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1594 1595
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1596
        goto cleanup;
1597 1598
    }

1599
    if (newmem > vm->def->mem.max_balloon) {
1600 1601
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("cannot set memory higher than max memory"));
1602
        goto cleanup;
1603 1604
    }

1605 1606 1607
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

1608
    if (!virDomainObjIsActive(vm) && (flags & VIR_DOMAIN_MEM_LIVE)) {
1609 1610 1611 1612 1613
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }

1614 1615 1616 1617 1618 1619 1620 1621 1622
    if (flags & VIR_DOMAIN_MEM_CONFIG) {
        if (!vm->persistent) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("cannot change persistent config of a transient domain"));
            goto endjob;
        }
        if (!(persistentDef = virDomainObjGetPersistentDef(driver->caps, vm)))
            goto endjob;
    }
1623

1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643
    if (flags & VIR_DOMAIN_MEM_LIVE) {
        priv = vm->privateData;
        qemuDomainObjEnterMonitor(vm);
        r = qemuMonitorSetBalloon(priv->mon, newmem);
        qemuDomainObjExitMonitor(vm);
        qemuAuditMemory(vm, vm->def->mem.cur_balloon, newmem, "update", r == 1);
        if (r < 0)
            goto endjob;

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

    if (flags& VIR_DOMAIN_MEM_CONFIG) {
        persistentDef->mem.cur_balloon = newmem;
        ret = virDomainSaveConfig(driver->configDir, persistentDef);
1644
        goto endjob;
1645
    }
1646

1647
    ret = 0;
1648
endjob:
1649 1650
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
1651

1652
cleanup:
1653 1654
    if (vm)
        virDomainObjUnlock(vm);
1655
    return ret;
1656 1657
}

1658 1659 1660 1661
static int qemudDomainSetMemory(virDomainPtr dom, unsigned long newmem) {
    return qemudDomainSetMemoryFlags(dom, newmem, VIR_DOMAIN_MEM_LIVE);
}

1662
static int qemudDomainGetInfo(virDomainPtr dom,
1663
                              virDomainInfoPtr info) {
1664 1665 1666
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1667 1668
    int err;
    unsigned long balloon;
1669

1670
    qemuDriverLock(driver);
1671
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1672
    qemuDriverUnlock(driver);
D
Daniel P. Berrange 已提交
1673
    if (!vm) {
1674 1675
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1676 1677
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1678
        goto cleanup;
D
Daniel P. Berrange 已提交
1679 1680
    }

1681
    info->state = vm->state;
D
Daniel P. Berrange 已提交
1682

D
Daniel P. Berrange 已提交
1683
    if (!virDomainObjIsActive(vm)) {
1684
        info->cpuTime = 0;
D
Daniel P. Berrange 已提交
1685
    } else {
1686
        if (qemudGetProcessInfo(&(info->cpuTime), NULL, vm->pid, 0) < 0) {
E
Eric Blake 已提交
1687 1688
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("cannot read cputime for domain"));
1689
            goto cleanup;
D
Daniel P. Berrange 已提交
1690 1691 1692
        }
    }

1693
    info->maxMem = vm->def->mem.max_balloon;
1694

D
Daniel P. Berrange 已提交
1695
    if (virDomainObjIsActive(vm)) {
1696
        qemuDomainObjPrivatePtr priv = vm->privateData;
1697 1698 1699

        if ((vm->def->memballoon != NULL) &&
            (vm->def->memballoon->model == VIR_DOMAIN_MEMBALLOON_MODEL_NONE)) {
1700
            info->memory = vm->def->mem.max_balloon;
1701
        } else if (!priv->jobActive) {
1702 1703
            if (qemuDomainObjBeginJob(vm) < 0)
                goto cleanup;
1704 1705 1706 1707 1708 1709 1710 1711 1712
            if (!virDomainObjIsActive(vm))
                err = 0;
            else {
                qemuDomainObjEnterMonitor(vm);
                err = qemuMonitorGetBalloonInfo(priv->mon, &balloon);
                qemuDomainObjExitMonitor(vm);
            }
            if (qemuDomainObjEndJob(vm) == 0) {
                vm = NULL;
1713 1714 1715
                goto cleanup;
            }

1716 1717
            if (err < 0)
                goto cleanup;
1718 1719
            if (err == 0)
                /* Balloon not supported, so maxmem is always the allocation */
1720
                info->memory = vm->def->mem.max_balloon;
1721 1722 1723
            else
                info->memory = balloon;
        } else {
1724
            info->memory = vm->def->mem.cur_balloon;
1725
        }
1726
    } else {
1727
        info->memory = vm->def->mem.cur_balloon;
1728 1729
    }

1730
    info->nrVirtCpu = vm->def->vcpus;
1731 1732 1733
    ret = 0;

cleanup:
1734 1735
    if (vm)
        virDomainObjUnlock(vm);
1736
    return ret;
D
Daniel P. Berrange 已提交
1737 1738 1739
}


1740
#define QEMUD_SAVE_MAGIC "LibvirtQemudSave"
1741 1742 1743
#define QEMUD_SAVE_VERSION 2

enum qemud_save_formats {
1744 1745 1746
    QEMUD_SAVE_FORMAT_RAW = 0,
    QEMUD_SAVE_FORMAT_GZIP = 1,
    QEMUD_SAVE_FORMAT_BZIP2 = 2,
1747 1748
    /*
     * Deprecated by xz and never used as part of a release
1749
     * QEMUD_SAVE_FORMAT_LZMA
1750 1751
     */
    QEMUD_SAVE_FORMAT_XZ = 3,
1752
    QEMUD_SAVE_FORMAT_LZOP = 4,
1753 1754 1755
    /* Note: add new members only at the end.
       These values are used in the on-disk format.
       Do not change or re-use numbers. */
1756 1757

    QEMUD_SAVE_FORMAT_LAST
1758
};
1759

1760 1761 1762 1763 1764
VIR_ENUM_DECL(qemudSaveCompression)
VIR_ENUM_IMPL(qemudSaveCompression, QEMUD_SAVE_FORMAT_LAST,
              "raw",
              "gzip",
              "bzip2",
1765 1766
              "xz",
              "lzop")
1767

1768 1769 1770 1771 1772
struct qemud_save_header {
    char magic[sizeof(QEMUD_SAVE_MAGIC)-1];
    int version;
    int xml_len;
    int was_running;
1773 1774
    int compressed;
    int unused[15];
1775 1776
};

1777
/* return -errno on failure, or 0 on success */
E
Eric Blake 已提交
1778 1779 1780 1781
static int
qemuDomainSaveHeader(int fd, const char *path, char *xml,
                     struct qemud_save_header *header)
{
1782 1783
    int ret = 0;

E
Eric Blake 已提交
1784
    if (safewrite(fd, header, sizeof(*header)) != sizeof(*header)) {
1785
        ret = -errno;
1786
        qemuReportError(VIR_ERR_OPERATION_FAILED,
1787
                        _("failed to write header to domain save file '%s'"),
E
Eric Blake 已提交
1788
                        path);
1789 1790 1791
        goto endjob;
    }

E
Eric Blake 已提交
1792
    if (safewrite(fd, xml, header->xml_len) != header->xml_len) {
1793
        ret = -errno;
1794
        qemuReportError(VIR_ERR_OPERATION_FAILED,
E
Eric Blake 已提交
1795
                         _("failed to write xml to '%s'"), path);
1796 1797 1798 1799 1800 1801
        goto endjob;
    }
endjob:
    return ret;
}

1802 1803 1804 1805 1806 1807 1808 1809 1810
/* 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));
}

1811 1812 1813
/* This internal function expects the driver lock to already be held on
 * entry and the vm must be active.
 */
1814 1815
static int qemudDomainSaveFlag(struct qemud_driver *driver, virDomainPtr dom,
                               virDomainObjPtr vm, const char *path,
1816
                               int compressed)
1817
{
1818
    char *xml = NULL;
1819
    struct qemud_save_header header;
1820
    bool bypassSecurityDriver = false;
1821
    int ret = -1;
1822
    int rc;
1823
    virDomainEventPtr event = NULL;
1824
    qemuDomainObjPrivatePtr priv;
1825
    struct stat sb;
1826
    bool is_reg = false;
1827
    unsigned long long offset;
1828
    virBitmapPtr qemuCaps = NULL;
1829
    int fd = -1;
1830 1831 1832 1833 1834

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

1835
    header.compressed = compressed;
1836

1837
    priv = vm->privateData;
1838

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

O
Osier Yang 已提交
1842 1843
    priv->jobActive = QEMU_JOB_SAVE;

1844 1845 1846
    memset(&priv->jobInfo, 0, sizeof(priv->jobInfo));
    priv->jobInfo.type = VIR_DOMAIN_JOB_UNBOUNDED;

1847 1848 1849
    /* Pause */
    if (vm->state == VIR_DOMAIN_RUNNING) {
        header.was_running = 1;
1850
        if (qemuProcessStopCPUs(driver, vm) < 0)
1851
            goto endjob;
1852 1853 1854 1855 1856 1857

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

1860 1861 1862 1863 1864
    if (qemuCapsExtractVersionInfo(vm->def->emulator, vm->def->os.arch,
                                   NULL,
                                   &qemuCaps) < 0)
        goto endjob;

1865
    /* Get XML for the domain */
1866
    xml = virDomainDefFormat(vm->def, VIR_DOMAIN_XML_SECURE);
1867
    if (!xml) {
1868 1869
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to get domain xml"));
1870
        goto endjob;
1871 1872 1873
    }
    header.xml_len = strlen(xml) + 1;

1874 1875 1876 1877 1878 1879 1880 1881
    /* path might be a pre-existing block dev, in which case
     * we need to skip the create step, and also avoid unlink
     * in the failure case */
    if (stat(path, &sb) < 0) {
        /* Avoid throwing an error here, since it is possible
         * that with NFS we can't actually stat() the file.
         * The subsequent codepaths will still raise an error
         * if a truely fatal problem is hit */
1882
        is_reg = true;
1883
    } else {
1884
        is_reg = !!S_ISREG(sb.st_mode);
1885 1886
    }

1887 1888 1889 1890 1891
    offset = sizeof(header) + header.xml_len;

    /* Due to way we append QEMU state on our header with dd,
     * we need to ensure there's a 512 byte boundary. Unfortunately
     * we don't have an explicit offset in the header, so we fake
1892 1893
     * it by padding the XML string with NULLs.
     */
1894 1895 1896 1897 1898 1899 1900 1901 1902 1903 1904 1905 1906
    if (offset % QEMU_MONITOR_MIGRATE_TO_FILE_BS) {
        unsigned long long pad =
            QEMU_MONITOR_MIGRATE_TO_FILE_BS -
            (offset % QEMU_MONITOR_MIGRATE_TO_FILE_BS);

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

1908
    /* Obtain the file handle.  */
1909

1910
    /* First try creating the file as root */
1911
    if (!is_reg) {
1912
        fd = open(path, O_WRONLY | O_TRUNC);
1913 1914
        if (fd < 0) {
            virReportSystemError(errno, _("unable to open %s"), path);
1915 1916
            goto endjob;
        }
1917
    } else {
1918 1919 1920
        if ((fd = virFileOpenAs(path, O_CREAT|O_TRUNC|O_WRONLY,
                                S_IRUSR|S_IWUSR,
                                getuid(), getgid(), 0)) < 0) {
1921
            /* If we failed as root, and the error was permission-denied
1922 1923
               (EACCES or EPERM), assume it's on a network-connected share
               where root access is restricted (eg, root-squashed NFS). If the
1924 1925 1926
               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 */
1927
            rc = fd;
1928
            if (((rc != -EACCES) && (rc != -EPERM)) ||
1929
                driver->user == getuid()) {
1930 1931
                virReportSystemError(-rc,
                                    _("Failed to create domain save file '%s'"),
1932 1933 1934
                                     path);
                goto endjob;
            }
1935

1936
            /* On Linux we can also verify the FS-type of the directory. */
1937 1938 1939 1940 1941 1942 1943 1944 1945 1946 1947 1948 1949 1950 1951 1952 1953
            switch (virStorageFileIsSharedFS(path)) {
                case 1:
                   /* it was on a network share, so we'll continue
                    * as outlined above
                    */
                   break;

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

                case 0:
                default:
1954
                   /* local file - log the error returned by virFileOpenAs */
1955
                   virReportSystemError(-rc,
1956
                                    _("Failed to create domain save file '%s'"),
1957 1958 1959
                                        path);
                   goto endjob;
                   break;
1960 1961 1962

            }

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

1965 1966 1967 1968
            if ((fd = virFileOpenAs(path, O_CREAT|O_TRUNC|O_WRONLY,
                                    S_IRUSR|S_IWUSR|S_IRGRP|S_IWGRP,
                                    driver->user, driver->group,
                                    VIR_FILE_OPEN_AS_UID)) < 0) {
1969 1970 1971
                virReportSystemError(-fd,
                                   _("Error from child process creating '%s'"),
                                     path);
1972 1973
                goto endjob;
            }
1974

1975 1976 1977
            /* 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 */
1978

1979
            bypassSecurityDriver = true;
1980
        }
1981
    }
1982

1983
    /* Write header to file, followed by XML */
E
Eric Blake 已提交
1984
    if (qemuDomainSaveHeader(fd, path, xml, &header) < 0) {
1985 1986 1987 1988
        VIR_FORCE_CLOSE(fd);
        goto endjob;
    }

1989 1990 1991 1992 1993
    /* Perform the migration */
    if (qemuMigrationToFile(driver, vm, qemuCaps, fd, offset, path,
                            qemuCompressProgramName(compressed),
                            is_reg, bypassSecurityDriver) < 0)
        goto cleanup;
1994 1995
    if (VIR_CLOSE(fd) < 0) {
        virReportSystemError(errno, _("unable to close %s"), path);
1996
        goto cleanup;
1997 1998
    }

1999 2000
    ret = 0;

2001
    /* Shut it down */
2002
    qemuProcessStop(driver, vm, 0);
2003
    qemuAuditDomainStop(vm, "saved");
2004 2005 2006
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STOPPED,
                                     VIR_DOMAIN_EVENT_STOPPED_SAVED);
2007
    if (!vm->persistent) {
2008 2009 2010
        if (qemuDomainObjEndJob(vm) > 0)
            virDomainRemoveInactive(&driver->domains,
                                    vm);
2011 2012
        vm = NULL;
    }
2013

2014
endjob:
2015
    if (vm) {
2016
        if (ret != 0) {
2017
            if (header.was_running && virDomainObjIsActive(vm)) {
2018
                rc = qemuProcessStartCPUs(driver, vm, dom->conn);
2019 2020 2021
                if (rc < 0)
                    VIR_WARN0("Unable to resume guest CPUs after save failure");
            }
2022
        }
2023
        if (qemuDomainObjEndJob(vm) == 0)
2024
            vm = NULL;
2025
    }
2026

2027
cleanup:
2028
    qemuCapsFree(qemuCaps);
2029
    VIR_FORCE_CLOSE(fd);
2030
    VIR_FREE(xml);
2031
    if (ret != 0 && is_reg)
2032
        unlink(path);
2033 2034
    if (event)
        qemuDomainEventQueue(driver, event);
2035
    return ret;
D
Daniel P. Berrange 已提交
2036 2037
}

2038 2039 2040 2041 2042 2043 2044 2045 2046 2047 2048 2049 2050 2051 2052 2053
/* 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;
}

2054 2055 2056 2057
static int qemudDomainSave(virDomainPtr dom, const char *path)
{
    struct qemud_driver *driver = dom->conn->privateData;
    int compressed;
2058 2059 2060 2061
    int ret = -1;
    virDomainObjPtr vm = NULL;

    qemuDriverLock(driver);
2062 2063 2064 2065 2066 2067 2068 2069 2070 2071 2072

    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"));
            return -1;
        }
2073 2074 2075 2076 2077 2078
        if (!qemudCompressProgramAvailable(compressed)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("Compression program for image format "
                                    "in configuration file isn't available"));
            return -1;
        }
2079 2080
    }

2081 2082 2083 2084 2085 2086 2087 2088 2089
    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;
    }

2090 2091 2092 2093 2094 2095
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

2096 2097 2098 2099 2100 2101 2102 2103
    ret = qemudDomainSaveFlag(driver, dom, vm, path, compressed);

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

    return ret;
2104 2105 2106 2107 2108 2109 2110 2111 2112 2113 2114 2115 2116 2117 2118 2119 2120 2121 2122 2123 2124 2125 2126
}

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;

2127
    virCheckFlags(0, -1);
2128 2129 2130 2131 2132 2133 2134 2135

    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);
2136
        goto cleanup;
2137 2138
    }

2139 2140 2141 2142 2143 2144
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

2145 2146
    name = qemuDomainManagedSavePath(driver, vm);
    if (name == NULL)
2147
        goto cleanup;
2148 2149 2150 2151

    VIR_DEBUG("Saving state to %s", name);

    compressed = QEMUD_SAVE_FORMAT_RAW;
2152
    ret = qemudDomainSaveFlag(driver, dom, vm, name, compressed);
2153 2154 2155 2156 2157

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
2158 2159 2160
    VIR_FREE(name);

    return ret;
2161 2162 2163 2164 2165 2166 2167 2168 2169 2170
}

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

2171
    virCheckFlags(0, -1);
2172 2173 2174 2175 2176 2177 2178 2179 2180 2181 2182 2183 2184 2185 2186 2187 2188 2189 2190 2191 2192 2193 2194 2195 2196 2197 2198 2199 2200 2201 2202 2203 2204

    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;

2205
    virCheckFlags(0, -1);
2206 2207 2208 2209 2210 2211 2212 2213 2214 2215 2216 2217 2218 2219 2220 2221 2222 2223 2224 2225 2226 2227 2228 2229

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

H
Hu Tao 已提交
2231 2232 2233 2234 2235 2236 2237 2238 2239 2240 2241 2242 2243 2244 2245
static int doCoreDump(struct qemud_driver *driver,
                      virDomainObjPtr vm,
                      const char *path,
                      enum qemud_save_formats compress)
{
    int fd = -1;
    int ret = -1;

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

2246 2247 2248 2249
    if (qemuMigrationToFile(driver, vm, NULL, fd, 0, path,
                            qemuCompressProgramName(compress), true, false) < 0)
        goto cleanup;

H
Hu Tao 已提交
2250 2251 2252 2253 2254 2255 2256
    if (VIR_CLOSE(fd) < 0) {
        virReportSystemError(errno,
                             _("unable to save file %s"),
                             path);
        goto cleanup;
    }

2257
    ret = 0;
H
Hu Tao 已提交
2258 2259 2260 2261 2262 2263 2264

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

2265 2266 2267 2268 2269
static enum qemud_save_formats
getCompressionType(struct qemud_driver *driver)
{
    int compress = QEMUD_SAVE_FORMAT_RAW;

2270 2271 2272 2273 2274 2275 2276
    /*
     * We reuse "save" flag for "dump" here. Then, we can support the same
     * format in "save" and "dump".
     */
    if (driver->dumpImageFormat) {
        compress = qemudSaveCompressionTypeFromString(driver->dumpImageFormat);
        if (compress < 0) {
2277 2278 2279 2280
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("Invalid dump image format specified in "
                              "configuration file, using raw"));
            return QEMUD_SAVE_FORMAT_RAW;
2281
        }
2282 2283 2284
        if (!qemudCompressProgramAvailable(compress)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("Compression program for dump image format "
2285 2286 2287
                                    "in configuration file isn't available, "
                                    "using raw"));
            return QEMUD_SAVE_FORMAT_RAW;
2288
        }
2289
    }
2290 2291 2292 2293 2294 2295 2296 2297 2298
    return compress;
}

static int qemudDomainCoreDump(virDomainPtr dom,
                               const char *path,
                               int flags ATTRIBUTE_UNUSED) {
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int resume = 0, paused = 0;
H
Hu Tao 已提交
2299
    int ret = -1;
2300 2301 2302
    virDomainEventPtr event = NULL;
    qemuDomainObjPrivatePtr priv;

P
Paolo Bonzini 已提交
2303 2304 2305 2306 2307 2308
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
2309 2310
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
P
Paolo Bonzini 已提交
2311 2312
        goto cleanup;
    }
2313
    priv = vm->privateData;
P
Paolo Bonzini 已提交
2314

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

D
Daniel P. Berrange 已提交
2318
    if (!virDomainObjIsActive(vm)) {
2319 2320
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
2321
        goto endjob;
P
Paolo Bonzini 已提交
2322 2323
    }

O
Osier Yang 已提交
2324 2325
    priv->jobActive = QEMU_JOB_DUMP;

P
Paolo Bonzini 已提交
2326 2327
    /* Migrate will always stop the VM, so the resume condition is
       independent of whether the stop command is issued.  */
P
Paolo Bonzini 已提交
2328 2329 2330
    resume = (vm->state == VIR_DOMAIN_RUNNING);

    /* Pause domain for non-live dump */
P
Paolo Bonzini 已提交
2331
    if (!(flags & VIR_DUMP_LIVE) && vm->state == VIR_DOMAIN_RUNNING) {
2332
        if (qemuProcessStopCPUs(driver, vm) < 0)
2333
            goto endjob;
P
Paolo Bonzini 已提交
2334
        paused = 1;
2335 2336 2337 2338 2339 2340

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

H
Hu Tao 已提交
2343
    ret = doCoreDump(driver, vm, path, getCompressionType(driver));
2344 2345 2346 2347
    if (ret < 0)
        goto endjob;

    paused = 1;
2348 2349

endjob:
2350
    if ((ret == 0) && (flags & VIR_DUMP_CRASH)) {
2351
        qemuProcessStop(driver, vm, 0);
2352
        qemuAuditDomainStop(vm, "crashed");
2353 2354 2355 2356 2357
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_STOPPED,
                                         VIR_DOMAIN_EVENT_STOPPED_CRASHED);
    }

P
Paolo Bonzini 已提交
2358 2359 2360
    /* 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.  */
2361
    else if (resume && paused && virDomainObjIsActive(vm)) {
2362
        if (qemuProcessStartCPUs(driver, vm, dom->conn) < 0) {
2363
            if (virGetLastError() == NULL)
2364 2365
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("resuming after dump failed"));
P
Paolo Bonzini 已提交
2366 2367
        }
    }
2368

2369 2370
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
2371
    else if ((ret == 0) && (flags & VIR_DUMP_CRASH) && !vm->persistent) {
2372 2373 2374 2375
        virDomainRemoveInactive(&driver->domains,
                                vm);
        vm = NULL;
    }
2376 2377

cleanup:
P
Paolo Bonzini 已提交
2378 2379
    if (vm)
        virDomainObjUnlock(vm);
2380 2381
    if (event)
        qemuDomainEventQueue(driver, event);
2382
    qemuDriverUnlock(driver);
P
Paolo Bonzini 已提交
2383 2384 2385
    return ret;
}

H
Hu Tao 已提交
2386 2387 2388
static void processWatchdogEvent(void *data, void *opaque)
{
    int ret;
2389
    struct qemuDomainWatchdogEvent *wdEvent = data;
H
Hu Tao 已提交
2390 2391 2392 2393 2394 2395 2396
    struct qemud_driver *driver = opaque;

    switch (wdEvent->action) {
    case VIR_DOMAIN_WATCHDOG_ACTION_DUMP:
        {
            char *dumpfile;

E
Eric Blake 已提交
2397
            if (virAsprintf(&dumpfile, "%s/%s-%u",
H
Hu Tao 已提交
2398 2399
                            driver->autoDumpPath,
                            wdEvent->vm->def->name,
E
Eric Blake 已提交
2400 2401 2402 2403
                            (unsigned int)time(NULL)) < 0) {
                virReportOOMError();
                break;
            }
H
Hu Tao 已提交
2404 2405 2406 2407 2408 2409 2410 2411 2412 2413 2414 2415 2416 2417 2418 2419 2420 2421 2422 2423 2424

            qemuDriverLock(driver);
            virDomainObjLock(wdEvent->vm);

            if (qemuDomainObjBeginJobWithDriver(driver, wdEvent->vm) < 0)
                break;

            if (!virDomainObjIsActive(wdEvent->vm)) {
                qemuReportError(VIR_ERR_OPERATION_INVALID,
                                "%s", _("domain is not running"));
                break;
            }

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

2425
            ret = qemuProcessStartCPUs(driver, wdEvent->vm, NULL);
H
Hu Tao 已提交
2426 2427 2428 2429 2430 2431 2432 2433 2434 2435 2436 2437 2438 2439 2440 2441 2442

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

            if (qemuDomainObjEndJob(wdEvent->vm) > 0)
                virDomainObjUnlock(wdEvent->vm);

            qemuDriverUnlock(driver);

            VIR_FREE(dumpfile);
        }
        break;
    }

    VIR_FREE(wdEvent);
}
P
Paolo Bonzini 已提交
2443

2444 2445 2446
static int qemudDomainHotplugVcpus(virDomainObjPtr vm, unsigned int nvcpus)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
2447
    int i, rc = 1;
2448
    int ret = -1;
2449
    int oldvcpus = vm->def->vcpus;
E
Eric Blake 已提交
2450
    int vcpus = oldvcpus;
2451

2452 2453
    qemuDomainObjEnterMonitor(vm);

2454 2455 2456
    /* 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 已提交
2457 2458
    if (nvcpus > vcpus) {
        for (i = vcpus ; i < nvcpus ; i++) {
2459 2460 2461 2462 2463 2464 2465
            /* Online new CPU */
            rc = qemuMonitorSetCPU(priv->mon, i, 1);
            if (rc == 0)
                goto unsupported;
            if (rc < 0)
                goto cleanup;

E
Eric Blake 已提交
2466
            vcpus++;
2467 2468
        }
    } else {
E
Eric Blake 已提交
2469
        for (i = vcpus - 1 ; i >= nvcpus ; i--) {
2470 2471 2472 2473 2474 2475 2476
            /* Offline old CPU */
            rc = qemuMonitorSetCPU(priv->mon, i, 0);
            if (rc == 0)
                goto unsupported;
            if (rc < 0)
                goto cleanup;

E
Eric Blake 已提交
2477
            vcpus--;
2478 2479 2480 2481 2482 2483
        }
    }

    ret = 0;

cleanup:
2484
    qemuDomainObjExitMonitor(vm);
E
Eric Blake 已提交
2485
    vm->def->vcpus = vcpus;
2486
    qemuAuditVcpu(vm, oldvcpus, nvcpus, "update", rc == 1);
2487 2488 2489 2490 2491 2492 2493 2494 2495
    return ret;

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


2496 2497 2498 2499
static int
qemudDomainSetVcpusFlags(virDomainPtr dom, unsigned int nvcpus,
                         unsigned int flags)
{
2500 2501
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2502
    virDomainDefPtr persistentDef;
2503 2504
    const char * type;
    int max;
2505
    int ret = -1;
2506

2507 2508 2509 2510 2511 2512 2513 2514 2515 2516 2517 2518 2519 2520 2521 2522
    virCheckFlags(VIR_DOMAIN_VCPU_LIVE |
                  VIR_DOMAIN_VCPU_CONFIG |
                  VIR_DOMAIN_VCPU_MAXIMUM, -1);

    /* At least one of LIVE or CONFIG must be set.  MAXIMUM cannot be
     * mixed with LIVE.  */
    if ((flags & (VIR_DOMAIN_VCPU_LIVE | VIR_DOMAIN_VCPU_CONFIG)) == 0 ||
        (flags & (VIR_DOMAIN_VCPU_MAXIMUM | VIR_DOMAIN_VCPU_LIVE)) ==
         (VIR_DOMAIN_VCPU_MAXIMUM | VIR_DOMAIN_VCPU_LIVE)) {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid flag combination: (0x%x)"), flags);
        return -1;
    }
    if (!nvcpus || (unsigned short) nvcpus != nvcpus) {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("argument out of range: %d"), nvcpus);
2523 2524 2525
        return -1;
    }

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

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

2538 2539 2540
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

2541
    if (!virDomainObjIsActive(vm) && (flags & VIR_DOMAIN_VCPU_LIVE)) {
2542 2543
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                         "%s", _("domain is not running"));
2544
        goto endjob;
2545 2546
    }

2547 2548 2549 2550 2551 2552
    if (!vm->persistent && (flags & VIR_DOMAIN_VCPU_CONFIG)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("cannot change persistent config of a transient domain"));
        goto endjob;
    }

2553 2554 2555 2556 2557 2558 2559 2560 2561 2562 2563 2564 2565
    if (!(type = virDomainVirtTypeToString(vm->def->virtType))) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("unknown virt type in domain definition '%d'"),
                        vm->def->virtType);
        goto endjob;
    }

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

C
Cole Robinson 已提交
2566
    if (!(flags & VIR_DOMAIN_VCPU_MAXIMUM) && vm->def->maxvcpus < max) {
2567 2568 2569
        max = vm->def->maxvcpus;
    }

2570 2571 2572 2573 2574 2575 2576
    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;
    }

2577 2578 2579
    if (!(persistentDef = virDomainObjGetPersistentDef(driver->caps, vm)))
        goto endjob;

2580 2581
    switch (flags) {
    case VIR_DOMAIN_VCPU_MAXIMUM | VIR_DOMAIN_VCPU_CONFIG:
2582 2583 2584
        persistentDef->maxvcpus = nvcpus;
        if (nvcpus < persistentDef->vcpus)
            persistentDef->vcpus = nvcpus;
2585 2586 2587 2588
        ret = 0;
        break;

    case VIR_DOMAIN_VCPU_CONFIG:
2589
        persistentDef->vcpus = nvcpus;
2590 2591 2592 2593 2594 2595 2596 2597 2598
        ret = 0;
        break;

    case VIR_DOMAIN_VCPU_LIVE:
        ret = qemudDomainHotplugVcpus(vm, nvcpus);
        break;

    case VIR_DOMAIN_VCPU_LIVE | VIR_DOMAIN_VCPU_CONFIG:
        ret = qemudDomainHotplugVcpus(vm, nvcpus);
2599 2600 2601
        if (ret == 0) {
            persistentDef->vcpus = nvcpus;
        }
2602 2603
        break;
    }
2604

2605 2606 2607 2608
    /* Save the persistent config to disk */
    if (flags & VIR_DOMAIN_VCPU_CONFIG)
        ret = virDomainSaveConfig(driver->configDir, persistentDef);

2609 2610 2611
endjob:
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
2612

2613
cleanup:
2614 2615
    if (vm)
        virDomainObjUnlock(vm);
2616
    return ret;
2617 2618
}

2619 2620 2621 2622 2623 2624
static int
qemudDomainSetVcpus(virDomainPtr dom, unsigned int nvcpus)
{
    return qemudDomainSetVcpusFlags(dom, nvcpus, VIR_DOMAIN_VCPU_LIVE);
}

2625 2626 2627 2628 2629 2630

static int
qemudDomainPinVcpu(virDomainPtr dom,
                   unsigned int vcpu,
                   unsigned char *cpumap,
                   int maplen) {
2631 2632
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2633
    int maxcpu, hostcpus;
2634
    virNodeInfo nodeinfo;
2635
    int ret = -1;
2636
    qemuDomainObjPrivatePtr priv;
2637

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

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

D
Daniel P. Berrange 已提交
2650
    if (!virDomainObjIsActive(vm)) {
2651 2652
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s",_("cannot pin vcpus on an inactive domain"));
2653
        goto cleanup;
2654 2655
    }

2656 2657 2658
    priv = vm->privateData;

    if (vcpu > (priv->nvcpupids-1)) {
2659 2660 2661
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("vcpu number out of range %d > %d"),
                        vcpu, priv->nvcpupids);
2662
        goto cleanup;
2663 2664
    }

2665
    if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
2666
        goto cleanup;
2667

2668
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
2669
    maxcpu = maplen * 8;
2670 2671
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;
2672

2673 2674
    if (priv->vcpupids != NULL) {
        if (virProcessInfoSetAffinity(priv->vcpupids[vcpu],
2675
                                      cpumap, maplen, maxcpu) < 0)
2676
            goto cleanup;
2677
    } else {
2678 2679
        qemuReportError(VIR_ERR_NO_SUPPORT,
                        "%s", _("cpu affinity is not supported"));
2680
        goto cleanup;
2681
    }
2682
    ret = 0;
2683

2684
cleanup:
2685 2686
    if (vm)
        virDomainObjUnlock(vm);
2687
    return ret;
2688 2689 2690 2691 2692 2693 2694 2695
}

static int
qemudDomainGetVcpus(virDomainPtr dom,
                    virVcpuInfoPtr info,
                    int maxinfo,
                    unsigned char *cpumaps,
                    int maplen) {
2696 2697
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2698
    virNodeInfo nodeinfo;
2699
    int i, v, maxcpu, hostcpus;
2700
    int ret = -1;
2701
    qemuDomainObjPrivatePtr priv;
2702

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

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

D
Daniel P. Berrange 已提交
2715
    if (!virDomainObjIsActive(vm)) {
2716 2717 2718
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s",
                        _("cannot list vcpu pinning for an inactive domain"));
2719
        goto cleanup;
2720 2721
    }

2722 2723
    priv = vm->privateData;

2724
    if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
2725
        goto cleanup;
2726

2727
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
2728
    maxcpu = maplen * 8;
2729 2730
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;
2731 2732

    /* Clamp to actual number of vcpus */
2733 2734
    if (maxinfo > priv->nvcpupids)
        maxinfo = priv->nvcpupids;
2735

2736 2737 2738 2739 2740 2741
    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;
2742

2743
                if (priv->vcpupids != NULL &&
2744 2745 2746
                    qemudGetProcessInfo(&(info[i].cpuTime),
                                        &(info[i].cpu),
                                        vm->pid,
2747
                                        priv->vcpupids[i]) < 0) {
2748
                    virReportSystemError(errno, "%s",
2749 2750 2751
                                         _("cannot get vCPU placement & pCPU time"));
                    goto cleanup;
                }
2752
            }
2753 2754
        }

2755 2756
        if (cpumaps != NULL) {
            memset(cpumaps, 0, maplen * maxinfo);
2757
            if (priv->vcpupids != NULL) {
2758 2759 2760
                for (v = 0 ; v < maxinfo ; v++) {
                    unsigned char *cpumap = VIR_GET_CPUMAP(cpumaps, maplen, v);

2761
                    if (virProcessInfoGetAffinity(priv->vcpupids[v],
2762
                                                  cpumap, maplen, maxcpu) < 0)
2763
                        goto cleanup;
2764
                }
2765
            } else {
2766 2767
                qemuReportError(VIR_ERR_NO_SUPPORT,
                                "%s", _("cpu affinity is not available"));
2768
                goto cleanup;
2769 2770 2771
            }
        }
    }
2772
    ret = maxinfo;
2773

2774
cleanup:
2775 2776
    if (vm)
        virDomainObjUnlock(vm);
2777
    return ret;
2778 2779 2780
}


2781 2782 2783
static int
qemudDomainGetVcpusFlags(virDomainPtr dom, unsigned int flags)
{
2784 2785
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2786
    virDomainDefPtr def;
2787
    int ret = -1;
2788

2789 2790 2791 2792 2793 2794 2795 2796
    virCheckFlags(VIR_DOMAIN_VCPU_LIVE |
                  VIR_DOMAIN_VCPU_CONFIG |
                  VIR_DOMAIN_VCPU_MAXIMUM, -1);

    /* Exactly one of LIVE or CONFIG must be set.  */
    if (!(flags & VIR_DOMAIN_VCPU_LIVE) == !(flags & VIR_DOMAIN_VCPU_CONFIG)) {
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid flag combination: (0x%x)"), flags);
2797 2798 2799
        return -1;
    }

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

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

2812 2813 2814 2815 2816 2817 2818 2819 2820
    if (flags & VIR_DOMAIN_VCPU_LIVE) {
        if (!virDomainObjIsActive(vm)) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("domain not active"));
            goto cleanup;
        }
        def = vm->def;
    } else {
        def = vm->newDef ? vm->newDef : vm->def;
2821 2822
    }

2823
    ret = (flags & VIR_DOMAIN_VCPU_MAXIMUM) ? def->maxvcpus : def->vcpus;
2824

2825
cleanup:
2826 2827
    if (vm)
        virDomainObjUnlock(vm);
2828 2829 2830
    return ret;
}

2831 2832 2833 2834 2835 2836 2837
static int
qemudDomainGetMaxVcpus(virDomainPtr dom)
{
    return qemudDomainGetVcpusFlags(dom, (VIR_DOMAIN_VCPU_LIVE |
                                          VIR_DOMAIN_VCPU_MAXIMUM));
}

2838 2839 2840 2841 2842 2843 2844 2845 2846
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);

2847 2848
    memset(seclabel, 0, sizeof(*seclabel));

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

2857
    if (!virDomainVirtTypeToString(vm->def->virtType)) {
2858 2859 2860
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("unknown virt type in domain definition '%d'"),
                        vm->def->virtType);
2861 2862 2863 2864 2865 2866 2867 2868 2869 2870 2871 2872 2873 2874 2875 2876 2877
        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 已提交
2878
    if (virDomainObjIsActive(vm)) {
2879 2880
        if (virSecurityManagerGetProcessLabel(driver->securityManager,
                                              vm, seclabel) < 0) {
2881 2882 2883
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            "%s", _("Failed to get security label"));
            goto cleanup;
2884 2885 2886 2887 2888 2889 2890 2891
        }
    }

    ret = 0;

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
2892
    qemuDriverUnlock(driver);
2893 2894 2895
    return ret;
}

2896 2897
static int qemudNodeGetSecurityModel(virConnectPtr conn,
                                     virSecurityModelPtr secmodel)
2898 2899 2900
{
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
    char *p;
2901
    int ret = 0;
2902

2903
    qemuDriverLock(driver);
2904 2905 2906 2907 2908
    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)
2909
        goto cleanup;
2910

2911 2912
    p = driver->caps->host.secModel.model;
    if (strlen(p) >= VIR_SECURITY_MODEL_BUFLEN-1) {
2913 2914 2915
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("security model string exceeds max %d bytes"),
                        VIR_SECURITY_MODEL_BUFLEN-1);
2916 2917
        ret = -1;
        goto cleanup;
2918 2919 2920 2921 2922
    }
    strcpy(secmodel->model, p);

    p = driver->caps->host.secModel.doi;
    if (strlen(p) >= VIR_SECURITY_DOI_BUFLEN-1) {
2923 2924 2925
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("security DOI string exceeds max %d bytes"),
                        VIR_SECURITY_DOI_BUFLEN-1);
2926 2927
        ret = -1;
        goto cleanup;
2928 2929
    }
    strcpy(secmodel->doi, p);
2930 2931 2932 2933

cleanup:
    qemuDriverUnlock(driver);
    return ret;
2934 2935
}

2936 2937 2938 2939 2940
static int ATTRIBUTE_NONNULL(3) ATTRIBUTE_NONNULL(4)
qemuDomainSaveImageOpen(struct qemud_driver *driver,
                        const char *path,
                        virDomainDefPtr *ret_def,
                        struct qemud_save_header *ret_header)
J
Jiri Denemark 已提交
2941 2942
{
    int fd;
2943
    struct qemud_save_header header;
J
Jiri Denemark 已提交
2944 2945
    char *xml = NULL;
    virDomainDefPtr def = NULL;
2946

2947 2948 2949
    if ((fd = virFileOpenAs(path, O_RDONLY, 0, getuid(), getgid(), 0)) < 0) {
        if ((fd != -EACCES && fd != -EPERM) ||
            driver->user == getuid()) {
2950 2951
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("cannot read domain image"));
J
Jiri Denemark 已提交
2952
            goto error;
2953 2954 2955
        }

        /* Opening as root failed, but qemu runs as a different user
2956 2957 2958 2959 2960 2961
         * that might have better luck. */
        if ((fd = virFileOpenAs(path, O_RDONLY, 0,
                                driver->user, driver->group,
                                VIR_FILE_OPEN_AS_UID)) < 0) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("cannot read domain image"));
J
Jiri Denemark 已提交
2962
            goto error;
2963
        }
2964 2965 2966
    }

    if (saferead(fd, &header, sizeof(header)) != sizeof(header)) {
2967 2968
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to read qemu header"));
J
Jiri Denemark 已提交
2969
        goto error;
2970 2971 2972
    }

    if (memcmp(header.magic, QEMUD_SAVE_MAGIC, sizeof(header.magic)) != 0) {
2973 2974
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("image magic is incorrect"));
J
Jiri Denemark 已提交
2975
        goto error;
2976 2977 2978
    }

    if (header.version > QEMUD_SAVE_VERSION) {
2979 2980 2981
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("image version is not supported (%d > %d)"),
                        header.version, QEMUD_SAVE_VERSION);
J
Jiri Denemark 已提交
2982
        goto error;
2983 2984
    }

2985 2986 2987
    if (header.xml_len <= 0) {
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("invalid XML length: %d"), header.xml_len);
J
Jiri Denemark 已提交
2988
        goto error;
2989 2990
    }

2991 2992
    if (VIR_ALLOC_N(xml, header.xml_len) < 0) {
        virReportOOMError();
J
Jiri Denemark 已提交
2993
        goto error;
2994 2995 2996
    }

    if (saferead(fd, xml, header.xml_len) != header.xml_len) {
2997 2998
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to read XML"));
J
Jiri Denemark 已提交
2999
        goto error;
3000 3001 3002
    }

    /* Create a domain from this XML */
3003
    if (!(def = virDomainDefParseString(driver->caps, xml,
3004
                                        VIR_DOMAIN_XML_INACTIVE)))
J
Jiri Denemark 已提交
3005
        goto error;
3006

J
Jiri Denemark 已提交
3007
    VIR_FREE(xml);
3008

J
Jiri Denemark 已提交
3009 3010
    *ret_def = def;
    *ret_header = header;
3011

J
Jiri Denemark 已提交
3012
    return fd;
3013

J
Jiri Denemark 已提交
3014 3015 3016
error:
    virDomainDefFree(def);
    VIR_FREE(xml);
3017
    VIR_FORCE_CLOSE(fd);
J
Jiri Denemark 已提交
3018 3019 3020 3021

    return -1;
}

3022 3023 3024 3025 3026 3027 3028
static int ATTRIBUTE_NONNULL(4) ATTRIBUTE_NONNULL(5) ATTRIBUTE_NONNULL(6)
qemuDomainSaveImageStartVM(virConnectPtr conn,
                           struct qemud_driver *driver,
                           virDomainObjPtr vm,
                           int *fd,
                           const struct qemud_save_header *header,
                           const char *path)
J
Jiri Denemark 已提交
3029 3030 3031 3032 3033 3034 3035 3036
{
    int ret = -1;
    virDomainEventPtr event;
    int intermediatefd = -1;
    pid_t intermediate_pid = -1;
    int childstat;

    if (header->version == 2) {
3037
        const char *intermediate_argv[3] = { NULL, "-dc", NULL };
J
Jiri Denemark 已提交
3038
        const char *prog = qemudSaveCompressionTypeToString(header->compressed);
3039
        if (prog == NULL) {
3040 3041
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            _("Invalid compressed save format %d"),
J
Jiri Denemark 已提交
3042 3043
                            header->compressed);
            goto out;
3044
        }
3045

J
Jiri Denemark 已提交
3046
        if (header->compressed != QEMUD_SAVE_FORMAT_RAW) {
3047
            intermediate_argv[0] = prog;
3048 3049
            intermediatefd = *fd;
            *fd = -1;
3050
            if (virExec(intermediate_argv, NULL, NULL,
3051
                        &intermediate_pid, intermediatefd, fd, NULL, 0) < 0) {
3052 3053 3054
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("Failed to start decompression binary %s"),
                                intermediate_argv[0]);
3055
                *fd = intermediatefd;
J
Jiri Denemark 已提交
3056
                goto out;
3057 3058 3059
            }
        }
    }
J
Jiri Denemark 已提交
3060

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

3065
    if (intermediate_pid != -1) {
3066
        if (ret < 0) {
3067 3068 3069
            /* if there was an error setting up qemu, the intermediate
             * process will wait forever to write to stdout, so we
             * must manually kill it.
3070 3071
             */
            VIR_FORCE_CLOSE(intermediatefd);
3072
            VIR_FORCE_CLOSE(*fd);
3073 3074 3075
            kill(intermediate_pid, SIGTERM);
        }

3076 3077
        /* Wait for intermediate process to exit */
        while (waitpid(intermediate_pid, &childstat, 0) == -1 &&
J
Jiri Denemark 已提交
3078 3079 3080
               errno == EINTR) {
            /* empty */
        }
3081
    }
3082
    VIR_FORCE_CLOSE(intermediatefd);
J
Jiri Denemark 已提交
3083

3084 3085 3086
    if (VIR_CLOSE(*fd) < 0) {
        virReportSystemError(errno, _("cannot close file: %s"), path);
        ret = -1;
3087
    }
J
Jiri Denemark 已提交
3088

3089
    if (ret < 0) {
3090
        qemuAuditDomainStart(vm, "restored", false);
J
Jiri Denemark 已提交
3091
        goto out;
3092
    }
3093

3094 3095 3096
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_RESTORED);
3097
    qemuAuditDomainStart(vm, "restored", true);
J
Jiri Denemark 已提交
3098 3099 3100
    if (event)
        qemuDomainEventQueue(driver, event);

3101

3102
    /* If it was running before, resume it now. */
J
Jiri Denemark 已提交
3103
    if (header->was_running) {
3104
        if (qemuProcessStartCPUs(driver, vm, conn) < 0) {
3105
            if (virGetLastError() == NULL)
3106 3107
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("failed to resume domain"));
J
Jiri Denemark 已提交
3108
            goto out;
3109
        }
3110 3111
        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0) {
            VIR_WARN("Failed to save status on vm %s", vm->def->name);
J
Jiri Denemark 已提交
3112
            goto out;
3113
        }
3114
    }
J
Jiri Denemark 已提交
3115

3116
    ret = 0;
3117

J
Jiri Denemark 已提交
3118
out:
3119 3120
    if (virSecurityManagerRestoreSavedStateLabel(driver->securityManager,
                                                 vm, path) < 0)
3121 3122
        VIR_WARN("failed to restore save state label on %s", path);

J
Jiri Denemark 已提交
3123 3124 3125
    return ret;
}

3126 3127 3128 3129
static int
qemuDomainRestore(virConnectPtr conn,
                  const char *path)
{
J
Jiri Denemark 已提交
3130 3131 3132 3133 3134 3135 3136 3137 3138
    struct qemud_driver *driver = conn->privateData;
    virDomainDefPtr def = NULL;
    virDomainObjPtr vm = NULL;
    int fd = -1;
    int ret = -1;
    struct qemud_save_header header;

    qemuDriverLock(driver);

3139
    fd = qemuDomainSaveImageOpen(driver, path, &def, &header);
J
Jiri Denemark 已提交
3140 3141 3142 3143 3144 3145 3146 3147 3148
    if (fd < 0)
        goto cleanup;

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

    if (!(vm = virDomainAssignDef(driver->caps,
                                  &driver->domains,
                                  def, true))) {
3149
        /* virDomainAssignDef already set the error */
J
Jiri Denemark 已提交
3150 3151 3152 3153 3154 3155 3156
        goto cleanup;
    }
    def = NULL;

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

3157
    ret = qemuDomainSaveImageStartVM(conn, driver, vm, &fd, &header, path);
J
Jiri Denemark 已提交
3158 3159

    if (qemuDomainObjEndJob(vm) == 0)
3160
        vm = NULL;
J
Jiri Denemark 已提交
3161 3162 3163 3164
    else if (ret < 0 && !vm->persistent) {
        virDomainRemoveInactive(&driver->domains, vm);
        vm = NULL;
    }
3165

3166 3167
cleanup:
    virDomainDefFree(def);
3168
    VIR_FORCE_CLOSE(fd);
3169 3170 3171
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
3172
    return ret;
D
Daniel P. Berrange 已提交
3173 3174
}

3175 3176 3177 3178 3179
static int
qemuDomainObjRestore(virConnectPtr conn,
                     struct qemud_driver *driver,
                     virDomainObjPtr vm,
                     const char *path)
J
Jiri Denemark 已提交
3180 3181 3182 3183 3184 3185
{
    virDomainDefPtr def = NULL;
    int fd = -1;
    int ret = -1;
    struct qemud_save_header header;

3186
    fd = qemuDomainSaveImageOpen(driver, path, &def, &header);
J
Jiri Denemark 已提交
3187 3188 3189 3190 3191 3192 3193 3194 3195 3196 3197 3198 3199 3200 3201 3202 3203 3204 3205 3206
    if (fd < 0)
        goto cleanup;

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

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

3207
    ret = qemuDomainSaveImageStartVM(conn, driver, vm, &fd, &header, path);
J
Jiri Denemark 已提交
3208 3209 3210

cleanup:
    virDomainDefFree(def);
3211
    VIR_FORCE_CLOSE(fd);
J
Jiri Denemark 已提交
3212 3213 3214
    return ret;
}

D
Daniel P. Berrange 已提交
3215

3216
static char *qemudDomainDumpXML(virDomainPtr dom,
3217
                                int flags) {
3218 3219 3220
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    char *ret = NULL;
3221 3222
    unsigned long balloon;
    int err;
3223

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

D
Daniel P. Berrange 已提交
3227
    if (!vm) {
3228 3229
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3230 3231
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3232
        goto cleanup;
D
Daniel P. Berrange 已提交
3233 3234
    }

3235 3236 3237 3238
    /* 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))) {
3239
        qemuDomainObjPrivatePtr priv = vm->privateData;
3240 3241 3242
        /* Don't delay if someone's using the monitor, just use
         * existing most recent data instead */
        if (!priv->jobActive) {
3243
            if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
3244 3245
                goto cleanup;

3246
            qemuDomainObjEnterMonitorWithDriver(driver, vm);
3247
            err = qemuMonitorGetBalloonInfo(priv->mon, &balloon);
3248
            qemuDomainObjExitMonitorWithDriver(driver, vm);
3249 3250 3251 3252
            if (qemuDomainObjEndJob(vm) == 0) {
                vm = NULL;
                goto cleanup;
            }
3253 3254 3255
            if (err < 0)
                goto cleanup;
            if (err > 0)
3256
                vm->def->mem.cur_balloon = balloon;
3257 3258
            /* err == 0 indicates no balloon support, so ignore it */
        }
3259
    }
3260

3261
    ret = qemuDomainFormatXML(driver, vm, flags);
3262 3263

cleanup:
3264 3265
    if (vm)
        virDomainObjUnlock(vm);
3266
    qemuDriverUnlock(driver);
3267
    return ret;
D
Daniel P. Berrange 已提交
3268 3269 3270
}


3271 3272 3273 3274
static char *qemuDomainXMLFromNative(virConnectPtr conn,
                                     const char *format,
                                     const char *config,
                                     unsigned int flags ATTRIBUTE_UNUSED) {
3275
    struct qemud_driver *driver = conn->privateData;
3276 3277 3278 3279
    virDomainDefPtr def = NULL;
    char *xml = NULL;

    if (STRNEQ(format, QEMU_CONFIG_FORMAT_ARGV)) {
3280 3281
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("unsupported config type %s"), format);
3282 3283 3284
        goto cleanup;
    }

3285
    qemuDriverLock(driver);
3286
    def = qemuParseCommandLineString(driver->caps, config);
3287
    qemuDriverUnlock(driver);
3288 3289 3290
    if (!def)
        goto cleanup;

3291
    xml = virDomainDefFormat(def, VIR_DOMAIN_XML_INACTIVE);
3292 3293 3294 3295 3296 3297

cleanup:
    virDomainDefFree(def);
    return xml;
}

3298 3299 3300 3301 3302 3303
static char *qemuDomainXMLToNative(virConnectPtr conn,
                                   const char *format,
                                   const char *xmlData,
                                   unsigned int flags ATTRIBUTE_UNUSED) {
    struct qemud_driver *driver = conn->privateData;
    virDomainDefPtr def = NULL;
3304
    virDomainChrSourceDef monConfig;
3305
    virBitmapPtr qemuCaps = NULL;
E
Eric Blake 已提交
3306
    virCommandPtr cmd = NULL;
3307 3308 3309
    char *ret = NULL;
    int i;

3310 3311
    qemuDriverLock(driver);

3312
    if (STRNEQ(format, QEMU_CONFIG_FORMAT_ARGV)) {
3313 3314
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("unsupported config type %s"), format);
3315 3316 3317
        goto cleanup;
    }

3318
    def = virDomainDefParseString(driver->caps, xmlData, 0);
3319 3320 3321
    if (!def)
        goto cleanup;

3322 3323
    /* Since we're just exporting args, we can't do bridge/network/direct
     * setups, since libvirt will normally create TAP/macvtap devices
3324 3325 3326 3327 3328
     * 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];
3329
        int bootIndex = net->bootIndex;
3330 3331
        if (net->type == VIR_DOMAIN_NET_TYPE_NETWORK ||
            net->type == VIR_DOMAIN_NET_TYPE_DIRECT) {
3332 3333 3334 3335 3336 3337 3338 3339 3340 3341 3342 3343 3344 3345 3346 3347 3348 3349 3350 3351
            VIR_FREE(net->data.network.name);

            memset(net, 0, sizeof *net);

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

            memset(net, 0, sizeof *net);

            net->type = VIR_DOMAIN_NET_TYPE_ETHERNET;
            net->data.ethernet.dev = brname;
            net->data.ethernet.script = script;
            net->data.ethernet.ipaddr = ipaddr;
        }
3352
        net->bootIndex = bootIndex;
3353 3354 3355 3356
    }
    for (i = 0 ; i < def->ngraphics ; i++) {
        if (def->graphics[i]->type == VIR_DOMAIN_GRAPHICS_TYPE_VNC &&
            def->graphics[i]->data.vnc.autoport)
3357
            def->graphics[i]->data.vnc.port = QEMU_VNC_PORT_MIN;
3358 3359
    }

3360
    if (qemuCapsExtractVersionInfo(def->emulator, def->os.arch,
3361
                                   NULL,
3362
                                   &qemuCaps) < 0)
3363 3364
        goto cleanup;

3365
    if (qemuProcessPrepareMonitorChr(driver, &monConfig, def->name) < 0)
3366
        goto cleanup;
3367

3368
    if (!(cmd = qemuBuildCommandLine(conn, driver, def,
3369
                                     &monConfig, false, qemuCaps,
3370
                                     NULL, -1, NULL, VIR_VM_OP_NO_OP)))
3371 3372
        goto cleanup;

E
Eric Blake 已提交
3373
    ret = virCommandToString(cmd);
3374 3375

cleanup:
3376
    qemuDriverUnlock(driver);
3377

3378
    qemuCapsFree(qemuCaps);
E
Eric Blake 已提交
3379
    virCommandFree(cmd);
3380 3381 3382 3383 3384
    virDomainDefFree(def);
    return ret;
}


3385
static int qemudListDefinedDomains(virConnectPtr conn,
3386
                            char **const names, int nnames) {
3387
    struct qemud_driver *driver = conn->privateData;
3388
    int n;
3389

3390
    qemuDriverLock(driver);
3391
    n = virDomainObjListGetInactiveNames(&driver->domains, names, nnames);
3392
    qemuDriverUnlock(driver);
3393
    return n;
D
Daniel P. Berrange 已提交
3394 3395
}

3396
static int qemudNumDefinedDomains(virConnectPtr conn) {
3397
    struct qemud_driver *driver = conn->privateData;
3398
    int n;
3399

3400
    qemuDriverLock(driver);
3401
    n = virDomainObjListNumOfDomains(&driver->domains, 0);
3402
    qemuDriverUnlock(driver);
3403

3404
    return n;
D
Daniel P. Berrange 已提交
3405 3406 3407
}


J
Jiri Denemark 已提交
3408 3409
static int qemudDomainObjStart(virConnectPtr conn,
                               struct qemud_driver *driver,
3410 3411
                               virDomainObjPtr vm,
                               bool start_paused)
J
Jiri Denemark 已提交
3412 3413 3414 3415 3416 3417 3418 3419 3420 3421
{
    int ret = -1;
    char *managed_save;

    /*
     * If there is a managed saved state restore it instead of starting
     * from scratch. In any case the old state is removed.
     */
    managed_save = qemuDomainManagedSavePath(driver, vm);
    if ((managed_save) && (virFileExists(managed_save))) {
3422
        ret = qemuDomainObjRestore(conn, driver, vm, managed_save);
J
Jiri Denemark 已提交
3423 3424 3425 3426 3427 3428 3429 3430 3431

        if (unlink(managed_save) < 0) {
            VIR_WARN("Failed to remove the managed state %s", managed_save);
        }

        if (ret == 0)
            goto cleanup;
    }

3432 3433
    ret = qemuProcessStart(conn, driver, vm, NULL, start_paused, -1, NULL,
                           VIR_VM_OP_CREATE);
3434
    qemuAuditDomainStart(vm, "booted", ret >= 0);
3435
    if (ret >= 0) {
J
Jiri Denemark 已提交
3436 3437 3438 3439 3440 3441 3442 3443 3444 3445 3446 3447 3448
        virDomainEventPtr event =
            virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_BOOTED);
        if (event)
            qemuDomainEventQueue(driver, event);
    }

cleanup:
    VIR_FREE(managed_save);
    return ret;
}

3449 3450 3451
static int
qemudDomainStartWithFlags(virDomainPtr dom, unsigned int flags)
{
3452 3453 3454
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
3455

3456
    virCheckFlags(VIR_DOMAIN_START_PAUSED, -1);
3457

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

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

3469 3470 3471 3472
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;

    if (virDomainObjIsActive(vm)) {
3473 3474
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is already running"));
3475 3476 3477
        goto endjob;
    }

3478 3479
    ret = qemudDomainObjStart(dom->conn, driver, vm,
                              (flags & VIR_DOMAIN_START_PAUSED) != 0);
3480

3481
endjob:
3482 3483
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
3484

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

3492 3493 3494 3495 3496 3497
static int
qemudDomainStart(virDomainPtr dom)
{
    return qemudDomainStartWithFlags(dom, 0);
}

3498 3499 3500 3501 3502 3503 3504 3505 3506 3507 3508 3509 3510 3511 3512
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;

3513
        if (STRNEQ(def->os.machine, machine->name))
3514 3515 3516
            continue;

        if (!(*canonical = strdup(machine->canonical))) {
3517
            virReportOOMError();
3518 3519 3520 3521 3522 3523 3524 3525 3526
            return -1;
        }

        break;
    }

    return 0;
}

3527 3528 3529 3530 3531 3532
static int
qemudCanonicalizeMachineDirect(virDomainDefPtr def, char **canonical)
{
    virCapsGuestMachinePtr *machines = NULL;
    int i, nmachines = 0;

3533
    if (qemuCapsProbeMachineTypes(def->emulator, &machines, &nmachines) < 0)
3534 3535 3536 3537 3538 3539
        return -1;

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

3540
        if (STRNEQ(def->os.machine, machines[i]->name))
3541 3542 3543 3544 3545 3546 3547 3548 3549 3550 3551 3552
            continue;

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

    virCapabilitiesFreeMachines(machines, nmachines);

    return 0;
}

3553 3554
int
qemudCanonicalizeMachine(struct qemud_driver *driver, virDomainDefPtr def)
3555 3556 3557 3558 3559 3560
{
    char *canonical = NULL;
    int i;

    for (i = 0; i < driver->caps->nguests; i++) {
        virCapsGuestPtr guest = driver->caps->guests[i];
3561
        virCapsGuestDomainInfoPtr info;
3562 3563 3564
        int j;

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

3567 3568 3569 3570 3571 3572 3573 3574 3575
            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;
3576 3577
        }

3578 3579 3580 3581
        info = &guest->arch.defaultInfo;

        if (info->emulator && STREQ(info->emulator, def->emulator)) {
            if (qemudCanonicalizeMachineFromInfo(def, info, &canonical) < 0)
3582 3583 3584 3585
                return -1;
            goto out;
        }
    }
3586 3587 3588 3589

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

3590 3591 3592 3593 3594 3595 3596
out:
    if (canonical) {
        VIR_FREE(def->os.machine);
        def->os.machine = canonical;
    }
    return 0;
}
D
Daniel P. Berrange 已提交
3597

3598
static virDomainPtr qemudDomainDefine(virConnectPtr conn, const char *xml) {
3599
    struct qemud_driver *driver = conn->privateData;
3600
    virDomainDefPtr def;
3601
    virDomainObjPtr vm = NULL;
3602
    virDomainPtr dom = NULL;
3603
    virDomainEventPtr event = NULL;
3604
    int dupVM;
3605

3606
    qemuDriverLock(driver);
3607
    if (!(def = virDomainDefParseString(driver->caps, xml,
3608
                                        VIR_DOMAIN_XML_INACTIVE)))
3609
        goto cleanup;
3610

3611
    if (virSecurityManagerVerify(driver->securityManager, def) < 0)
3612 3613
        goto cleanup;

3614 3615
    if ((dupVM = virDomainObjIsDuplicate(&driver->domains, def, 0)) < 0)
        goto cleanup;
3616

3617
    if (qemudCanonicalizeMachine(driver, def) < 0)
3618 3619
        goto cleanup;

3620
    if (qemuDomainAssignPCIAddresses(def) < 0)
3621 3622
        goto cleanup;

3623
    if (!(vm = virDomainAssignDef(driver->caps,
3624
                                  &driver->domains,
3625
                                  def, false))) {
3626
        goto cleanup;
3627
    }
3628
    def = NULL;
3629
    vm->persistent = 1;
3630

3631
    if (virDomainSaveConfig(driver->configDir,
3632
                            vm->newDef ? vm->newDef : vm->def) < 0) {
3633 3634
        virDomainRemoveInactive(&driver->domains,
                                vm);
3635
        vm = NULL;
3636
        goto cleanup;
3637 3638
    }

3639 3640
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_DEFINED,
3641
                                     !dupVM ?
3642 3643
                                     VIR_DOMAIN_EVENT_DEFINED_ADDED :
                                     VIR_DOMAIN_EVENT_DEFINED_UPDATED);
3644

3645
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
3646
    if (dom) dom->id = vm->def->id;
3647 3648

cleanup:
3649
    virDomainDefFree(def);
3650 3651
    if (vm)
        virDomainObjUnlock(vm);
3652 3653
    if (event)
        qemuDomainEventQueue(driver, event);
3654
    qemuDriverUnlock(driver);
3655
    return dom;
D
Daniel P. Berrange 已提交
3656 3657
}

3658
static int qemudDomainUndefine(virDomainPtr dom) {
3659 3660
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
3661
    virDomainEventPtr event = NULL;
3662
    int ret = -1;
D
Daniel P. Berrange 已提交
3663

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

D
Daniel P. Berrange 已提交
3667
    if (!vm) {
3668 3669
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3670 3671
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3672
        goto cleanup;
D
Daniel P. Berrange 已提交
3673 3674
    }

D
Daniel P. Berrange 已提交
3675
    if (virDomainObjIsActive(vm)) {
3676 3677
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot delete active domain"));
3678
        goto cleanup;
D
Daniel P. Berrange 已提交
3679 3680
    }

3681
    if (!vm->persistent) {
3682
        qemuReportError(VIR_ERR_OPERATION_INVALID,
3683
                        "%s", _("cannot undefine transient domain"));
3684
        goto cleanup;
3685 3686
    }

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

3690 3691 3692
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_UNDEFINED,
                                     VIR_DOMAIN_EVENT_UNDEFINED_REMOVED);
3693

3694 3695
    virDomainRemoveInactive(&driver->domains,
                            vm);
3696
    vm = NULL;
3697
    ret = 0;
D
Daniel P. Berrange 已提交
3698

3699
cleanup:
3700 3701
    if (vm)
        virDomainObjUnlock(vm);
3702 3703
    if (event)
        qemuDomainEventQueue(driver, event);
3704
    qemuDriverUnlock(driver);
3705
    return ret;
D
Daniel P. Berrange 已提交
3706 3707
}

3708

3709 3710
static int qemudDomainAttachDevice(virDomainPtr dom,
                                   const char *xml)
3711
{
3712 3713 3714
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    virDomainDeviceDefPtr dev = NULL;
3715
    virBitmapPtr qemuCaps = NULL;
3716
    virCgroupPtr cgroup = NULL;
3717
    int ret = -1;
3718

3719 3720 3721 3722 3723 3724 3725
    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);
3726 3727 3728
        goto cleanup;
    }

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

3732 3733 3734 3735 3736
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot attach device on inactive domain"));
        goto endjob;
    }
3737

3738 3739 3740 3741
    dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
                                  VIR_DOMAIN_XML_INACTIVE);
    if (dev == NULL)
        goto endjob;
3742

3743
    if (qemuCapsExtractVersionInfo(vm->def->emulator, vm->def->os.arch,
3744
                                   NULL,
3745
                                   &qemuCaps) < 0)
3746
        goto endjob;
3747

3748
    if (dev->type == VIR_DOMAIN_DEVICE_DISK) {
3749 3750 3751 3752 3753 3754 3755 3756
        if (dev->data.disk->driverName != NULL &&
            !STREQ(dev->data.disk->driverName, "qemu")) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("unsupported driver name '%s' for disk '%s'"),
                            dev->data.disk->driverName, dev->data.disk->src);
            goto endjob;
        }

3757 3758 3759
        if (qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_DEVICES)) {
            if (virCgroupForDomain(driver->cgroup, vm->def->name, &cgroup, 0) !=0 ) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
E
Eric Blake 已提交
3760
                                _("Unable to find cgroup for %s"),
3761 3762 3763
                                vm->def->name);
                goto endjob;
            }
3764
            if (qemuSetupDiskCgroup(driver, vm, cgroup, dev->data.disk) < 0)
3765
                goto endjob;
3766 3767
        }

3768 3769 3770 3771 3772
        switch (dev->data.disk->device) {
        case VIR_DOMAIN_DISK_DEVICE_CDROM:
        case VIR_DOMAIN_DISK_DEVICE_FLOPPY:
            ret = qemuDomainChangeEjectableMedia(driver, vm,
                                                 dev->data.disk,
3773
                                                 qemuCaps,
3774 3775 3776 3777
                                                 false);
            if (ret == 0)
                dev->data.disk = NULL;
            break;
3778

3779 3780 3781
        case VIR_DOMAIN_DISK_DEVICE_DISK:
            if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_USB) {
                ret = qemuDomainAttachUsbMassstorageDevice(driver, vm,
3782
                                                           dev->data.disk, qemuCaps);
3783 3784 3785 3786
                if (ret == 0)
                    dev->data.disk = NULL;
            } else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_VIRTIO) {
                ret = qemuDomainAttachPciDiskDevice(driver, vm,
3787
                                                    dev->data.disk, qemuCaps);
3788 3789 3790 3791
                if (ret == 0)
                    dev->data.disk = NULL;
            } else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_SCSI) {
                ret = qemuDomainAttachSCSIDisk(driver, vm,
3792
                                               dev->data.disk, qemuCaps);
3793 3794 3795 3796 3797 3798 3799 3800 3801
                if (ret == 0)
                    dev->data.disk = NULL;
            } else {
                qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                                _("disk bus '%s' cannot be hotplugged."),
                                virDomainDiskBusTypeToString(dev->data.disk->bus));
                /* fallthrough */
            }
            break;
3802

3803 3804 3805 3806 3807
        default:
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                            _("disk device type '%s' cannot be hotplugged"),
                            virDomainDiskDeviceTypeToString(dev->data.disk->device));
            /* Fallthrough */
3808
        }
3809
        if (ret != 0 && cgroup) {
3810
            if (qemuTeardownDiskCgroup(driver, vm, cgroup, dev->data.disk) < 0)
3811 3812
                VIR_WARN("Failed to teardown cgroup for disk path %s",
                         NULLSTR(dev->data.disk->src));
3813
        }
3814 3815 3816
    } else if (dev->type == VIR_DOMAIN_DEVICE_CONTROLLER) {
        if (dev->data.controller->type == VIR_DOMAIN_CONTROLLER_TYPE_SCSI) {
            ret = qemuDomainAttachPciControllerDevice(driver, vm,
3817
                                                      dev->data.controller, qemuCaps);
3818 3819 3820 3821 3822 3823 3824
            if (ret == 0)
                dev->data.controller = NULL;
        } else {
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                            _("disk controller bus '%s' cannot be hotplugged."),
                            virDomainControllerTypeToString(dev->data.controller->type));
            /* fallthrough */
3825
        }
3826 3827
    } else if (dev->type == VIR_DOMAIN_DEVICE_NET) {
        ret = qemuDomainAttachNetDevice(dom->conn, driver, vm,
3828
                                        dev->data.net, qemuCaps);
3829 3830 3831 3832
        if (ret == 0)
            dev->data.net = NULL;
    } else if (dev->type == VIR_DOMAIN_DEVICE_HOSTDEV) {
        ret = qemuDomainAttachHostDevice(driver, vm,
3833
                                         dev->data.hostdev, qemuCaps);
3834 3835
        if (ret == 0)
            dev->data.hostdev = NULL;
3836
    } else {
3837 3838 3839 3840
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("device type '%s' cannot be attached"),
                        virDomainDeviceTypeToString(dev->type));
        goto endjob;
3841 3842
    }

3843 3844 3845 3846 3847
    /* update domain status forcibly because the domain status may be changed
     * even if we attach the device failed. For example, a new controller may
     * be created.
     */
    if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
3848 3849 3850 3851 3852 3853 3854 3855 3856 3857
        ret = -1;

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

cleanup:
    if (cgroup)
        virCgroupFree(&cgroup);

3858
    qemuCapsFree(qemuCaps);
3859 3860 3861 3862
    virDomainDeviceDefFree(dev);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
3863 3864 3865
    return ret;
}

3866 3867 3868 3869 3870 3871 3872 3873
static int qemudDomainAttachDeviceFlags(virDomainPtr dom,
                                        const char *xml,
                                        unsigned int flags) {
    if (flags & VIR_DOMAIN_DEVICE_MODIFY_CONFIG) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot modify the persistent configuration of a domain"));
        return -1;
    }
3874

3875 3876
    return qemudDomainAttachDevice(dom, xml);
}
3877

3878

3879 3880 3881 3882 3883 3884 3885
static int qemuDomainUpdateDeviceFlags(virDomainPtr dom,
                                       const char *xml,
                                       unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    virDomainDeviceDefPtr dev = NULL;
3886
    virBitmapPtr qemuCaps = NULL;
3887 3888 3889
    virCgroupPtr cgroup = NULL;
    int ret = -1;
    bool force = (flags & VIR_DOMAIN_DEVICE_MODIFY_FORCE) != 0;
3890

3891 3892 3893 3894
    virCheckFlags(VIR_DOMAIN_DEVICE_MODIFY_CURRENT |
                  VIR_DOMAIN_DEVICE_MODIFY_LIVE |
                  VIR_DOMAIN_DEVICE_MODIFY_CONFIG |
                  VIR_DOMAIN_DEVICE_MODIFY_FORCE, -1);
3895

3896 3897 3898
    if (flags & VIR_DOMAIN_DEVICE_MODIFY_CONFIG) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot modify the persistent configuration of a domain"));
3899 3900 3901
        return -1;
    }

3902 3903 3904 3905 3906 3907 3908 3909
    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;
3910 3911
    }

3912 3913 3914 3915 3916 3917 3918
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;

    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot attach device on inactive domain"));
        goto endjob;
3919 3920
    }

3921 3922 3923 3924 3925
    dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
                                  VIR_DOMAIN_XML_INACTIVE);
    if (dev == NULL)
        goto endjob;

3926
    if (qemuCapsExtractVersionInfo(vm->def->emulator, vm->def->os.arch,
3927
                                   NULL,
3928
                                   &qemuCaps) < 0)
3929
        goto endjob;
3930

3931 3932 3933 3934 3935
    switch (dev->type) {
    case VIR_DOMAIN_DEVICE_DISK:
        if (qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_DEVICES)) {
            if (virCgroupForDomain(driver->cgroup, vm->def->name, &cgroup, 0) !=0 ) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
E
Eric Blake 已提交
3936
                                _("Unable to find cgroup for %s"),
3937 3938 3939
                                vm->def->name);
                goto endjob;
            }
3940
            if (qemuSetupDiskCgroup(driver, vm, cgroup, dev->data.disk) < 0)
3941
                goto endjob;
3942 3943
        }

3944 3945 3946 3947 3948
        switch (dev->data.disk->device) {
        case VIR_DOMAIN_DISK_DEVICE_CDROM:
        case VIR_DOMAIN_DISK_DEVICE_FLOPPY:
            ret = qemuDomainChangeEjectableMedia(driver, vm,
                                                 dev->data.disk,
3949
                                                 qemuCaps,
3950 3951 3952 3953
                                                 force);
            if (ret == 0)
                dev->data.disk = NULL;
            break;
3954

3955

3956 3957 3958 3959 3960 3961
        default:
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                            _("disk bus '%s' cannot be updated."),
                            virDomainDiskBusTypeToString(dev->data.disk->bus));
            break;
        }
3962

3963
        if (ret != 0 && cgroup) {
3964
            if (qemuTeardownDiskCgroup(driver, vm, cgroup, dev->data.disk) < 0)
3965 3966 3967
                VIR_WARN("Failed to teardown cgroup for disk path %s",
                         NULLSTR(dev->data.disk->src));
        }
3968
        break;
3969 3970 3971

    case VIR_DOMAIN_DEVICE_GRAPHICS:
        ret = qemuDomainChangeGraphics(driver, vm, dev->data.graphics);
3972
        break;
3973

3974
    default:
3975
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
3976 3977
                        _("device type '%s' cannot be updated"),
                        virDomainDeviceTypeToString(dev->type));
3978
        break;
3979 3980
    }

3981 3982 3983 3984 3985 3986 3987 3988 3989 3990
    if (!ret && virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
        ret = -1;

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

cleanup:
    if (cgroup)
        virCgroupFree(&cgroup);
3991

3992
    qemuCapsFree(qemuCaps);
3993 3994 3995 3996
    virDomainDeviceDefFree(dev);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
3997 3998 3999
    return ret;
}

4000

4001 4002
static int qemudDomainDetachDevice(virDomainPtr dom,
                                   const char *xml) {
4003 4004
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
4005
    virBitmapPtr qemuCaps = NULL;
4006 4007
    virDomainDeviceDefPtr dev = NULL;
    int ret = -1;
4008

4009
    qemuDriverLock(driver);
4010
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
4011
    if (!vm) {
4012 4013
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4014 4015
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4016
        goto cleanup;
4017 4018
    }

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

D
Daniel P. Berrange 已提交
4022
    if (!virDomainObjIsActive(vm)) {
4023 4024
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot detach device on inactive domain"));
4025
        goto endjob;
4026 4027
    }

4028
    dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
4029
                                  VIR_DOMAIN_XML_INACTIVE);
4030
    if (dev == NULL)
4031
        goto endjob;
4032

4033
    if (qemuCapsExtractVersionInfo(vm->def->emulator, vm->def->os.arch,
4034
                                   NULL,
4035
                                   &qemuCaps) < 0)
4036
        goto endjob;
4037 4038

    if (dev->type == VIR_DOMAIN_DEVICE_DISK &&
4039 4040
        dev->data.disk->device == VIR_DOMAIN_DISK_DEVICE_DISK) {
        if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_VIRTIO) {
4041
            ret = qemuDomainDetachPciDiskDevice(driver, vm, dev, qemuCaps);
4042 4043
        }
        else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_SCSI) {
4044
            ret = qemuDomainDetachDiskDevice(driver, vm, dev, qemuCaps);
W
Wen Congyang 已提交
4045 4046
        } else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_USB) {
            ret = qemuDomainDetachDiskDevice(driver, vm, dev, qemuCaps);
4047 4048
        }
        else {
4049
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
4050 4051
                            _("This type of disk cannot be hot unplugged"));
        }
4052
    } else if (dev->type == VIR_DOMAIN_DEVICE_NET) {
4053
        ret = qemuDomainDetachNetDevice(driver, vm, dev, qemuCaps);
4054 4055
    } else if (dev->type == VIR_DOMAIN_DEVICE_CONTROLLER) {
        if (dev->data.controller->type == VIR_DOMAIN_CONTROLLER_TYPE_SCSI) {
4056
            ret = qemuDomainDetachPciControllerDevice(driver, vm, dev,
4057
                                                      qemuCaps);
4058
        } else {
4059
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
4060 4061
                            _("disk controller bus '%s' cannot be hotunplugged."),
                            virDomainControllerTypeToString(dev->data.controller->type));
4062 4063
            /* fallthrough */
        }
4064
    } else if (dev->type == VIR_DOMAIN_DEVICE_HOSTDEV) {
4065
        ret = qemuDomainDetachHostDevice(driver, vm, dev, qemuCaps);
4066
    } else {
4067
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
4068
                        "%s", _("This type of device cannot be hot unplugged"));
4069
    }
4070

4071
    if (!ret && virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
4072 4073
        ret = -1;

4074
endjob:
4075 4076
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
4077

4078
cleanup:
4079
    qemuCapsFree(qemuCaps);
4080
    virDomainDeviceDefFree(dev);
4081 4082
    if (vm)
        virDomainObjUnlock(vm);
4083
    qemuDriverUnlock(driver);
4084 4085 4086
    return ret;
}

4087 4088 4089 4090
static int qemudDomainDetachDeviceFlags(virDomainPtr dom,
                                        const char *xml,
                                        unsigned int flags) {
    if (flags & VIR_DOMAIN_DEVICE_MODIFY_CONFIG) {
4091 4092
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot modify the persistent configuration of a domain"));
4093 4094 4095 4096 4097 4098
        return -1;
    }

    return qemudDomainDetachDevice(dom, xml);
}

4099
static int qemudDomainGetAutostart(virDomainPtr dom,
4100
                                   int *autostart) {
4101 4102 4103
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
4104

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

4109
    if (!vm) {
4110 4111
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4112 4113
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4114
        goto cleanup;
4115 4116 4117
    }

    *autostart = vm->autostart;
4118
    ret = 0;
4119

4120
cleanup:
4121 4122
    if (vm)
        virDomainObjUnlock(vm);
4123
    return ret;
4124 4125
}

4126
static int qemudDomainSetAutostart(virDomainPtr dom,
4127
                                   int autostart) {
4128 4129
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
4130 4131
    char *configFile = NULL, *autostartLink = NULL;
    int ret = -1;
4132

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

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

4144
    if (!vm->persistent) {
4145
        qemuReportError(VIR_ERR_OPERATION_INVALID,
4146
                        "%s", _("cannot set autostart for transient domain"));
4147
        goto cleanup;
4148 4149
    }

4150 4151
    autostart = (autostart != 0);

4152
    if (vm->autostart != autostart) {
4153
        if ((configFile = virDomainConfigFile(driver->configDir, vm->def->name)) == NULL)
4154
            goto cleanup;
4155
        if ((autostartLink = virDomainConfigFile(driver->autostartDir, vm->def->name)) == NULL)
4156
            goto cleanup;
4157

4158 4159
        if (autostart) {
            int err;
4160

4161
            if ((err = virFileMakePath(driver->autostartDir))) {
4162
                virReportSystemError(err,
4163 4164
                                     _("cannot create autostart directory %s"),
                                     driver->autostartDir);
4165 4166
                goto cleanup;
            }
4167

4168
            if (symlink(configFile, autostartLink) < 0) {
4169
                virReportSystemError(errno,
4170 4171
                                     _("Failed to create symlink '%s to '%s'"),
                                     autostartLink, configFile);
4172 4173 4174 4175
                goto cleanup;
            }
        } else {
            if (unlink(autostartLink) < 0 && errno != ENOENT && errno != ENOTDIR) {
4176
                virReportSystemError(errno,
4177 4178
                                     _("Failed to delete symlink '%s'"),
                                     autostartLink);
4179 4180
                goto cleanup;
            }
4181 4182
        }

4183
        vm->autostart = autostart;
4184
    }
4185
    ret = 0;
4186

4187 4188 4189
cleanup:
    VIR_FREE(configFile);
    VIR_FREE(autostartLink);
4190 4191
    if (vm)
        virDomainObjUnlock(vm);
4192
    qemuDriverUnlock(driver);
4193
    return ret;
4194 4195
}

4196 4197 4198 4199 4200

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

4203
    qemuDriverLock(driver);
4204
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
4205 4206
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup CPU controller is not mounted"));
4207
        goto cleanup;
4208 4209 4210 4211 4212 4213 4214
    }

    if (nparams)
        *nparams = 1;

    ret = strdup("posix");
    if (!ret)
4215
        virReportOOMError();
4216 4217 4218

cleanup:
    qemuDriverUnlock(driver);
4219 4220 4221
    return ret;
}

4222 4223 4224 4225 4226 4227 4228 4229 4230 4231 4232 4233 4234 4235 4236 4237 4238 4239 4240 4241 4242 4243 4244 4245 4246 4247 4248 4249 4250 4251 4252 4253 4254 4255 4256 4257 4258 4259 4260 4261 4262 4263 4264 4265 4266 4267 4268 4269 4270 4271 4272 4273 4274 4275 4276 4277 4278 4279 4280 4281 4282 4283 4284 4285 4286 4287 4288 4289 4290 4291 4292 4293 4294 4295 4296 4297 4298 4299 4300 4301 4302 4303 4304 4305 4306 4307 4308 4309 4310 4311 4312 4313 4314 4315 4316 4317 4318 4319 4320 4321 4322 4323 4324 4325 4326 4327 4328 4329 4330 4331 4332 4333 4334 4335 4336 4337 4338 4339 4340 4341 4342 4343 4344 4345 4346 4347 4348 4349 4350 4351 4352 4353 4354 4355 4356 4357 4358 4359 4360 4361 4362 4363 4364 4365 4366 4367 4368 4369 4370 4371 4372 4373 4374 4375 4376 4377 4378 4379 4380
static int qemuDomainSetBlkioParameters(virDomainPtr dom,
                                         virBlkioParameterPtr params,
                                         int nparams,
                                         unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
    int ret = -1;

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

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

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

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

    ret = 0;
    for (i = 0; i < nparams; i++) {
        virBlkioParameterPtr param = &params[i];

        if (STREQ(param->field, VIR_DOMAIN_BLKIO_WEIGHT)) {
            int rc;
            if (param->type != VIR_DOMAIN_BLKIO_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;
            }

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

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

static int qemuDomainGetBlkioParameters(virDomainPtr dom,
                                         virBlkioParameterPtr params,
                                         int *nparams,
                                         unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
    unsigned int val;
    int ret = -1;
    int rc;

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

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

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

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

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

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

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

    for (i = 0; i < *nparams; i++) {
        virBlkioParameterPtr param = &params[i];
        val = 0;
        param->value.ui = 0;
        param->type = VIR_DOMAIN_BLKIO_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 */
        }
    }

    ret = 0;

cleanup:
    if (group)
        virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}
4381 4382 4383 4384 4385 4386 4387 4388 4389 4390 4391 4392 4393 4394

static int qemuDomainSetMemoryParameters(virDomainPtr dom,
                                         virMemoryParameterPtr params,
                                         int nparams,
                                         unsigned int flags ATTRIBUTE_UNUSED)
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
    int ret = -1;

    qemuDriverLock(driver);
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_MEMORY)) {
4395 4396
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup memory controller is not mounted"));
4397 4398 4399 4400 4401 4402 4403 4404 4405 4406 4407 4408 4409 4410 4411 4412 4413 4414 4415 4416 4417 4418 4419 4420 4421 4422 4423 4424 4425 4426 4427 4428 4429 4430 4431 4432 4433 4434 4435 4436 4437 4438 4439 4440 4441 4442 4443 4444 4445 4446 4447
        goto cleanup;
    }

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

    if (vm == NULL) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("No such domain %s"), dom->uuid);
        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;
    }

    ret = 0;
    for (i = 0; i < nparams; i++) {
        virMemoryParameterPtr param = &params[i];

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

            rc = virCgroupSetMemoryHardLimit(group, params[i].value.ul);
            if (rc != 0) {
                virReportSystemError(-rc, "%s",
                                     _("unable to set memory hard_limit tunable"));
                ret = -1;
            }
        } else if (STREQ(param->field, VIR_DOMAIN_MEMORY_SOFT_LIMIT)) {
            int rc;
            if (param->type != VIR_DOMAIN_MEMORY_PARAM_ULLONG) {
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for memory soft_limit tunable, expected a 'ullong'"));
                ret = -1;
                continue;
            }

            rc = virCgroupSetMemorySoftLimit(group, params[i].value.ul);
            if (rc != 0) {
                virReportSystemError(-rc, "%s",
                                     _("unable to set memory soft_limit tunable"));
                ret = -1;
            }
4448
        } else if (STREQ(param->field, VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT)) {
4449 4450 4451 4452 4453 4454 4455 4456
            int rc;
            if (param->type != VIR_DOMAIN_MEMORY_PARAM_ULLONG) {
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for swap_hard_limit tunable, expected a 'ullong'"));
                ret = -1;
                continue;
            }

4457
            rc = virCgroupSetMemSwapHardLimit(group, params[i].value.ul);
4458 4459 4460 4461 4462 4463 4464 4465 4466 4467 4468 4469 4470 4471 4472 4473 4474 4475 4476 4477 4478 4479 4480 4481
            if (rc != 0) {
                virReportSystemError(-rc, "%s",
                                     _("unable to set swap_hard_limit tunable"));
                ret = -1;
            }
        } 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;
        }
    }

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

4482 4483 4484 4485 4486 4487 4488 4489 4490
static int qemuDomainGetMemoryParameters(virDomainPtr dom,
                                         virMemoryParameterPtr params,
                                         int *nparams,
                                         unsigned int flags ATTRIBUTE_UNUSED)
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
4491
    unsigned long long val;
4492 4493 4494 4495 4496 4497
    int ret = -1;
    int rc;

    qemuDriverLock(driver);

    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_MEMORY)) {
4498 4499
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup memory controller is not mounted"));
4500 4501 4502 4503 4504 4505 4506 4507 4508 4509 4510 4511 4512 4513 4514 4515 4516 4517 4518 4519 4520 4521 4522 4523 4524 4525 4526 4527 4528 4529 4530 4531 4532 4533 4534 4535 4536 4537 4538 4539 4540 4541
        goto cleanup;
    }

    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 memory parameters supported by cgroups */
        *nparams = QEMU_NB_MEM_PARAM;
        ret = 0;
        goto cleanup;
    }

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

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

    for (i = 0; i < *nparams; i++) {
        virMemoryParameterPtr param = &params[i];
        val = 0;
        param->value.ul = 0;
        param->type = VIR_DOMAIN_MEMORY_PARAM_ULLONG;

        switch(i) {
        case 0: /* fill memory hard limit here */
            rc = virCgroupGetMemoryHardLimit(group, &val);
            if (rc != 0) {
                virReportSystemError(-rc, "%s",
                                     _("unable to get memory hard limit"));
4542
                goto cleanup;
4543 4544 4545 4546
            }
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_HARD_LIMIT) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field memory hard limit too long for destination"));
4547
                goto cleanup;
4548 4549 4550 4551 4552 4553 4554 4555 4556
            }
            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"));
4557
                goto cleanup;
4558 4559 4560 4561
            }
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SOFT_LIMIT) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field memory soft limit too long for destination"));
4562
                goto cleanup;
4563 4564 4565 4566 4567
            }
            param->value.ul = val;
            break;

        case 2: /* fill swap hard limit here */
4568
            rc = virCgroupGetMemSwapHardLimit(group, &val);
4569 4570 4571
            if (rc != 0) {
                virReportSystemError(-rc, "%s",
                                     _("unable to get swap hard limit"));
4572
                goto cleanup;
4573
            }
4574
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT) == NULL) {
4575 4576
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field swap hard limit too long for destination"));
4577
                goto cleanup;
4578 4579 4580 4581 4582 4583 4584 4585 4586 4587
            }
            param->value.ul = val;
            break;

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

4588 4589
    ret = 0;

4590 4591 4592 4593 4594 4595 4596 4597 4598
cleanup:
    if (group)
        virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

4599 4600 4601 4602 4603 4604 4605 4606 4607 4608
static int qemuSetSchedulerParameters(virDomainPtr dom,
                                      virSchedParameterPtr params,
                                      int nparams)
{
    struct qemud_driver *driver = dom->conn->privateData;
    int i;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
    int ret = -1;

4609
    qemuDriverLock(driver);
4610
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
4611 4612
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup CPU controller is not mounted"));
4613
        goto cleanup;
4614 4615 4616 4617 4618
    }

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

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

    if (virCgroupForDomain(driver->cgroup, vm->def->name, &group, 0) != 0) {
4625 4626
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("cannot find cgroup for domain %s"), vm->def->name);
4627 4628 4629 4630 4631 4632 4633 4634 4635
        goto cleanup;
    }

    for (i = 0; i < nparams; i++) {
        virSchedParameterPtr param = &params[i];

        if (STREQ(param->field, "cpu_shares")) {
            int rc;
            if (param->type != VIR_DOMAIN_SCHED_FIELD_ULLONG) {
4636 4637
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for cpu_shares tunable, expected a 'ullong'"));
4638 4639 4640 4641 4642
                goto cleanup;
            }

            rc = virCgroupSetCpuShares(group, params[i].value.ul);
            if (rc != 0) {
4643
                virReportSystemError(-rc, "%s",
4644 4645 4646 4647
                                     _("unable to set cpu shares tunable"));
                goto cleanup;
            }
        } else {
4648 4649
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("Invalid parameter `%s'"), param->field);
4650 4651 4652 4653 4654 4655 4656 4657 4658
            goto cleanup;
        }
    }
    ret = 0;

cleanup:
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
4659
    qemuDriverUnlock(driver);
4660 4661 4662 4663 4664 4665 4666 4667 4668 4669 4670 4671 4672 4673
    return ret;
}

static int qemuGetSchedulerParameters(virDomainPtr dom,
                                      virSchedParameterPtr params,
                                      int *nparams)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virCgroupPtr group = NULL;
    virDomainObjPtr vm = NULL;
    unsigned long long val;
    int ret = -1;
    int rc;

4674
    qemuDriverLock(driver);
4675
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
4676 4677
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup CPU controller is not mounted"));
4678
        goto cleanup;
4679 4680 4681
    }

    if ((*nparams) != 1) {
4682 4683
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("Invalid parameter count"));
4684
        goto cleanup;
4685 4686 4687 4688 4689
    }

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

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

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

    rc = virCgroupGetCpuShares(group, &val);
    if (rc != 0) {
4703
        virReportSystemError(-rc, "%s",
4704 4705 4706 4707 4708
                             _("unable to get cpu shares tunable"));
        goto cleanup;
    }
    params[0].value.ul = val;
    params[0].type = VIR_DOMAIN_SCHED_FIELD_ULLONG;
C
Chris Lalancette 已提交
4709
    if (virStrcpyStatic(params[0].field, "cpu_shares") == NULL) {
4710 4711
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("Field cpu_shares too long for destination"));
C
Chris Lalancette 已提交
4712 4713
        goto cleanup;
    }
4714 4715 4716 4717 4718 4719 4720

    ret = 0;

cleanup:
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
4721
    qemuDriverUnlock(driver);
4722 4723 4724 4725
    return ret;
}


4726 4727 4728 4729 4730 4731 4732 4733 4734
/* 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)
{
4735
    struct qemud_driver *driver = dom->conn->privateData;
4736
    int i, ret = -1;
4737
    virDomainObjPtr vm;
4738
    virDomainDiskDefPtr disk = NULL;
4739

4740
    qemuDriverLock(driver);
4741
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
4742
    qemuDriverUnlock(driver);
4743
    if (!vm) {
4744 4745
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4746 4747
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4748
        goto cleanup;
4749
    }
4750 4751 4752 4753

    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

D
Daniel P. Berrange 已提交
4754
    if (!virDomainObjIsActive (vm)) {
4755 4756
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
4757
        goto endjob;
4758 4759
    }

4760 4761 4762 4763 4764 4765 4766 4767
    for (i = 0 ; i < vm->def->ndisks ; i++) {
        if (STREQ(path, vm->def->disks[i]->dst)) {
            disk = vm->def->disks[i];
            break;
        }
    }

    if (!disk) {
4768 4769
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path: %s"), path);
4770
        goto endjob;
4771 4772
    }

4773
    if (!disk->info.alias) {
4774 4775
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("missing disk device alias name for %s"), disk->dst);
4776
        goto endjob;
4777
    }
4778

4779
    qemuDomainObjPrivatePtr priv = vm->privateData;
4780 4781
    qemuDomainObjEnterMonitor(vm);
    ret = qemuMonitorGetBlockStatsInfo(priv->mon,
4782
                                       disk->info.alias,
4783 4784 4785 4786 4787 4788
                                       &stats->rd_req,
                                       &stats->rd_bytes,
                                       &stats->wr_req,
                                       &stats->wr_bytes,
                                       &stats->errs);
    qemuDomainObjExitMonitor(vm);
4789

4790
endjob:
4791 4792
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
4793

4794
cleanup:
4795 4796
    if (vm)
        virDomainObjUnlock(vm);
4797
    return ret;
4798 4799
}

4800
#ifdef __linux__
4801 4802 4803 4804 4805
static int
qemudDomainInterfaceStats (virDomainPtr dom,
                           const char *path,
                           struct _virDomainInterfaceStats *stats)
{
4806 4807
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
4808
    int i;
4809
    int ret = -1;
4810

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

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

D
Daniel P. Berrange 已提交
4823
    if (!virDomainObjIsActive(vm)) {
4824 4825
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
4826
        goto cleanup;
4827 4828 4829
    }

    /* Check the path is one of the domain's network interfaces. */
4830 4831
    for (i = 0 ; i < vm->def->nnets ; i++) {
        if (vm->def->nets[i]->ifname &&
4832 4833 4834 4835
            STREQ (vm->def->nets[i]->ifname, path)) {
            ret = 0;
            break;
        }
4836 4837
    }

4838
    if (ret == 0)
4839
        ret = linuxDomainInterfaceStats(path, stats);
4840
    else
4841 4842
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path, '%s' is not a known interface"), path);
4843

4844
cleanup:
4845 4846
    if (vm)
        virDomainObjUnlock(vm);
4847 4848
    return ret;
}
4849
#else
4850 4851 4852 4853
static int
qemudDomainInterfaceStats (virDomainPtr dom,
                           const char *path ATTRIBUTE_UNUSED,
                           struct _virDomainInterfaceStats *stats ATTRIBUTE_UNUSED)
4854
{
4855 4856
    qemuReportError(VIR_ERR_NO_SUPPORT,
                    "%s", __FUNCTION__);
4857 4858
    return -1;
}
4859
#endif
4860

4861 4862 4863 4864 4865 4866 4867 4868 4869 4870 4871 4872 4873 4874 4875 4876
static int
qemudDomainMemoryStats (virDomainPtr dom,
                        struct _virDomainMemoryStat *stats,
                        unsigned int nr_stats)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    unsigned int ret = -1;

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

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

4882 4883 4884
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

4885 4886 4887
    if (virDomainObjIsActive(vm)) {
        qemuDomainObjPrivatePtr priv = vm->privateData;
        qemuDomainObjEnterMonitor(vm);
4888
        ret = qemuMonitorGetMemoryStats(priv->mon, stats, nr_stats);
4889 4890
        qemuDomainObjExitMonitor(vm);
    } else {
4891 4892
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
4893 4894
    }

4895 4896 4897
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

4898 4899 4900 4901 4902 4903
cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}

4904 4905 4906 4907 4908 4909 4910
static int
qemudDomainBlockPeek (virDomainPtr dom,
                      const char *path,
                      unsigned long long offset, size_t size,
                      void *buffer,
                      unsigned int flags ATTRIBUTE_UNUSED)
{
4911 4912 4913
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int fd = -1, ret = -1, i;
4914

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

4919
    if (!vm) {
4920 4921
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4922 4923
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4924
        goto cleanup;
4925 4926 4927
    }

    if (!path || path[0] == '\0') {
4928 4929
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("NULL or empty path"));
4930
        goto cleanup;
4931 4932 4933
    }

    /* Check the path belongs to this domain. */
4934 4935
    for (i = 0 ; i < vm->def->ndisks ; i++) {
        if (vm->def->disks[i]->src != NULL &&
4936 4937 4938 4939
            STREQ (vm->def->disks[i]->src, path)) {
            ret = 0;
            break;
        }
4940 4941
    }

4942 4943 4944 4945 4946
    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) {
4947 4948
            virReportSystemError(errno,
                                 _("%s: failed to open"), path);
4949 4950
            goto cleanup;
        }
4951

4952 4953 4954 4955 4956 4957
        /* 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) {
4958 4959
            virReportSystemError(errno,
                                 _("%s: failed to seek or read"), path);
4960 4961 4962 4963 4964
            goto cleanup;
        }

        ret = 0;
    } else {
4965 4966
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("invalid path"));
4967 4968
    }

4969
cleanup:
4970
    VIR_FORCE_CLOSE(fd);
4971 4972
    if (vm)
        virDomainObjUnlock(vm);
4973 4974 4975
    return ret;
}

R
Richard W.M. Jones 已提交
4976 4977 4978 4979 4980 4981
static int
qemudDomainMemoryPeek (virDomainPtr dom,
                       unsigned long long offset, size_t size,
                       void *buffer,
                       unsigned int flags)
{
4982 4983
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
4984
    char *tmp = NULL;
R
Richard W.M. Jones 已提交
4985 4986
    int fd = -1, ret = -1;

4987
    qemuDriverLock(driver);
4988
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
4989
    qemuDriverUnlock(driver);
R
Richard W.M. Jones 已提交
4990 4991

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

4999
    if (flags != VIR_MEMORY_VIRTUAL && flags != VIR_MEMORY_PHYSICAL) {
5000 5001
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("flags parameter must be VIR_MEMORY_VIRTUAL or VIR_MEMORY_PHYSICAL"));
5002
        goto cleanup;
R
Richard W.M. Jones 已提交
5003 5004
    }

5005 5006 5007
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

D
Daniel P. Berrange 已提交
5008
    if (!virDomainObjIsActive(vm)) {
5009 5010
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
5011
        goto endjob;
R
Richard W.M. Jones 已提交
5012 5013
    }

5014
    if (virAsprintf(&tmp, "%s/qemu.mem.XXXXXX", driver->cacheDir) < 0) {
5015
        virReportOOMError();
5016
        goto endjob;
5017 5018
    }

R
Richard W.M. Jones 已提交
5019 5020
    /* Create a temporary filename. */
    if ((fd = mkstemp (tmp)) == -1) {
5021 5022
        virReportSystemError(errno,
                             _("mkstemp(\"%s\") failed"), tmp);
5023
        goto endjob;
R
Richard W.M. Jones 已提交
5024 5025
    }

5026
    qemuDomainObjPrivatePtr priv = vm->privateData;
5027
    qemuDomainObjEnterMonitor(vm);
5028
    if (flags == VIR_MEMORY_VIRTUAL) {
5029 5030
        if (qemuMonitorSaveVirtualMemory(priv->mon, offset, size, tmp) < 0) {
            qemuDomainObjExitMonitor(vm);
5031
            goto endjob;
5032
        }
5033
    } else {
5034 5035
        if (qemuMonitorSavePhysicalMemory(priv->mon, offset, size, tmp) < 0) {
            qemuDomainObjExitMonitor(vm);
5036
            goto endjob;
5037
        }
R
Richard W.M. Jones 已提交
5038
    }
5039
    qemuDomainObjExitMonitor(vm);
R
Richard W.M. Jones 已提交
5040 5041 5042

    /* Read the memory file into buffer. */
    if (saferead (fd, buffer, size) == (ssize_t) -1) {
5043 5044 5045
        virReportSystemError(errno,
                             _("failed to read temporary file "
                               "created with template %s"), tmp);
5046
        goto endjob;
R
Richard W.M. Jones 已提交
5047 5048 5049
    }

    ret = 0;
5050

5051
endjob:
5052 5053
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
5054

5055
cleanup:
5056
    VIR_FREE(tmp);
5057
    VIR_FORCE_CLOSE(fd);
R
Richard W.M. Jones 已提交
5058
    unlink (tmp);
5059 5060
    if (vm)
        virDomainObjUnlock(vm);
R
Richard W.M. Jones 已提交
5061 5062 5063
    return ret;
}

5064

5065 5066 5067 5068 5069 5070 5071 5072 5073 5074
static int qemuDomainGetBlockInfo(virDomainPtr dom,
                                  const char *path,
                                  virDomainBlockInfoPtr info,
                                  unsigned int flags) {
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
    int fd = -1;
    off_t end;
    virStorageFileMetadata meta;
5075
    virDomainDiskDefPtr disk = NULL;
5076 5077
    struct stat sb;
    int i;
5078
    int format;
5079 5080 5081 5082 5083 5084 5085 5086 5087 5088 5089 5090 5091 5092 5093 5094 5095 5096 5097 5098 5099 5100 5101 5102

    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)) {
5103
            disk = vm->def->disks[i];
5104 5105 5106 5107
            break;
        }
    }

5108
    if (!disk) {
5109 5110 5111 5112 5113 5114 5115 5116 5117 5118 5119 5120 5121 5122
        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 */
5123 5124 5125 5126 5127 5128 5129 5130
    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 {
5131 5132 5133 5134 5135 5136 5137
        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);
5138
            goto cleanup;
5139
        }
5140 5141 5142 5143 5144
    }

    if (virStorageFileGetMetadataFromFD(path, fd,
                                        format,
                                        &meta) < 0)
5145 5146 5147 5148 5149 5150 5151 5152 5153 5154
        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)) {
5155
#ifndef WIN32
5156 5157 5158 5159 5160 5161 5162 5163 5164 5165 5166 5167 5168 5169 5170 5171 5172 5173 5174 5175 5176 5177 5178 5179 5180 5181 5182 5183
        info->physical = (unsigned long long)sb.st_blocks *
            (unsigned long long)DEV_BSIZE;
#else
        info->physical = sb.st_size;
#endif
        /* Regular files may be sparse, so logical size (capacity) is not same
         * as actual physical above
         */
        info->capacity = sb.st_size;
    } else {
        /* NB. Because we configure with AC_SYS_LARGEFILE, off_t should
         * be 64 bits on all platforms.
         */
        end = lseek (fd, 0, SEEK_END);
        if (end == (off_t)-1) {
            virReportSystemError(errno,
                                 _("failed to seek to end of %s"), path);
            goto cleanup;
        }
        info->physical = end;
        info->capacity = end;
    }

    /* If the file we probed has a capacity set, then override
     * what we calculated from file/block extents */
    if (meta.capacity)
        info->capacity = meta.capacity;

5184
    /* Set default value .. */
5185 5186
    info->allocation = info->physical;

5187 5188 5189
    /* ..but if guest is running & not using raw
       disk format and on a block device, then query
       highest allocated extent from QEMU */
5190
    if (disk->type == VIR_DOMAIN_DISK_TYPE_BLOCK &&
5191
        format != VIR_STORAGE_FILE_RAW &&
5192 5193 5194 5195
        S_ISBLK(sb.st_mode)) {
        qemuDomainObjPrivatePtr priv = vm->privateData;
        if (qemuDomainObjBeginJob(vm) < 0)
            goto cleanup;
5196 5197 5198 5199 5200 5201 5202 5203 5204
        if (!virDomainObjIsActive(vm))
            ret = 0;
        else {
            qemuDomainObjEnterMonitor(vm);
            ret = qemuMonitorGetBlockExtent(priv->mon,
                                            disk->info.alias,
                                            &info->allocation);
            qemuDomainObjExitMonitor(vm);
        }
5205 5206 5207 5208 5209 5210

        if (qemuDomainObjEndJob(vm) == 0)
            vm = NULL;
    } else {
        ret = 0;
    }
5211 5212

cleanup:
5213
    VIR_FORCE_CLOSE(fd);
5214 5215 5216 5217 5218 5219
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}


5220
static int
5221 5222 5223 5224
qemuDomainEventRegister(virConnectPtr conn,
                        virConnectDomainEventCallback callback,
                        void *opaque,
                        virFreeCallback freecb)
5225
{
5226 5227 5228
    struct qemud_driver *driver = conn->privateData;
    int ret;

5229
    qemuDriverLock(driver);
5230 5231
    ret = virDomainEventCallbackListAdd(conn, driver->domainEventCallbacks,
                                        callback, opaque, freecb);
5232
    qemuDriverUnlock(driver);
5233

5234
    return ret;
5235 5236
}

5237

5238
static int
5239 5240
qemuDomainEventDeregister(virConnectPtr conn,
                          virConnectDomainEventCallback callback)
5241
{
5242 5243 5244
    struct qemud_driver *driver = conn->privateData;
    int ret;

5245
    qemuDriverLock(driver);
5246 5247 5248 5249 5250 5251
    if (driver->domainEventDispatching)
        ret = virDomainEventCallbackListMarkDelete(conn, driver->domainEventCallbacks,
                                                   callback);
    else
        ret = virDomainEventCallbackListRemove(conn, driver->domainEventCallbacks,
                                               callback);
5252
    qemuDriverUnlock(driver);
5253

5254
    return ret;
5255 5256
}

5257 5258 5259 5260 5261 5262 5263 5264 5265 5266 5267 5268 5269 5270 5271 5272 5273 5274 5275 5276 5277 5278 5279 5280 5281 5282 5283 5284 5285 5286 5287 5288 5289 5290 5291 5292 5293 5294 5295 5296 5297 5298 5299

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,
                                          driver->domainEventCallbacks,
                                          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);
    if (driver->domainEventDispatching)
        ret = virDomainEventCallbackListMarkDeleteID(conn, driver->domainEventCallbacks,
                                                     callbackID);
    else
        ret = virDomainEventCallbackListRemoveID(conn, driver->domainEventCallbacks,
                                                 callbackID);
    qemuDriverUnlock(driver);

    return ret;
}


D
Daniel Veillard 已提交
5300 5301
/* Migration support. */

C
Chris Lalancette 已提交
5302 5303 5304 5305 5306 5307 5308 5309 5310 5311 5312 5313 5314 5315 5316
/* 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;
5317

C
Chris Lalancette 已提交
5318
    if (!dom_xml) {
5319 5320
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("no domain XML passed"));
C
Chris Lalancette 已提交
5321 5322 5323
        goto cleanup;
    }
    if (!(flags & VIR_MIGRATE_TUNNELLED)) {
5324
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
C
Chris Lalancette 已提交
5325 5326 5327 5328
                         "%s", _("PrepareTunnel called but no TUNNELLED flag set"));
        goto cleanup;
    }
    if (st == NULL) {
5329 5330
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("tunnelled migration requested but NULL stream passed"));
C
Chris Lalancette 已提交
5331 5332 5333
        goto cleanup;
    }

5334 5335 5336 5337
    qemuDriverLock(driver);
    ret = qemuMigrationPrepareTunnel(driver, dconn, st,
                                     dname, dom_xml);
    qemuDriverUnlock(driver);
5338

C
Chris Lalancette 已提交
5339 5340 5341 5342
cleanup:
    return ret;
}

D
Daniel Veillard 已提交
5343 5344 5345 5346
/* Prepare is the first step, and it runs on the destination host.
 *
 * This starts an empty VM listening on a TCP port.
 */
5347
static int ATTRIBUTE_NONNULL (5)
D
Daniel Veillard 已提交
5348 5349 5350 5351 5352
qemudDomainMigratePrepare2 (virConnectPtr dconn,
                            char **cookie ATTRIBUTE_UNUSED,
                            int *cookielen ATTRIBUTE_UNUSED,
                            const char *uri_in,
                            char **uri_out,
C
Chris Lalancette 已提交
5353
                            unsigned long flags,
D
Daniel Veillard 已提交
5354 5355 5356 5357
                            const char *dname,
                            unsigned long resource ATTRIBUTE_UNUSED,
                            const char *dom_xml)
{
5358
    struct qemud_driver *driver = dconn->privateData;
5359
    int ret = -1;
5360

C
Chris Lalancette 已提交
5361 5362 5363 5364 5365 5366 5367 5368 5369
    virCheckFlags(VIR_MIGRATE_LIVE |
                  VIR_MIGRATE_PEER2PEER |
                  VIR_MIGRATE_TUNNELLED |
                  VIR_MIGRATE_PERSIST_DEST |
                  VIR_MIGRATE_UNDEFINE_SOURCE |
                  VIR_MIGRATE_PAUSED |
                  VIR_MIGRATE_NON_SHARED_DISK |
                  VIR_MIGRATE_NON_SHARED_INC, -1);

5370
    *uri_out = NULL;
D
Daniel Veillard 已提交
5371

5372
    qemuDriverLock(driver);
C
Chris Lalancette 已提交
5373 5374 5375 5376
    if (flags & VIR_MIGRATE_TUNNELLED) {
        /* this is a logical error; we never should have gotten here with
         * VIR_MIGRATE_TUNNELLED set
         */
5377 5378
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("Tunnelled migration requested but invalid RPC method called"));
C
Chris Lalancette 已提交
5379 5380 5381
        goto cleanup;
    }

D
Daniel Veillard 已提交
5382
    if (!dom_xml) {
5383 5384
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("no domain XML passed"));
5385
        goto cleanup;
D
Daniel Veillard 已提交
5386 5387
    }

5388 5389 5390
    ret = qemuMigrationPrepareDirect(driver, dconn,
                                     uri_in, uri_out,
                                     dname, dom_xml);
D
Daniel Veillard 已提交
5391

5392 5393 5394 5395
cleanup:
    qemuDriverUnlock(driver);
    return ret;
}
C
Chris Lalancette 已提交
5396

D
Daniel Veillard 已提交
5397

5398 5399 5400 5401 5402 5403 5404 5405 5406 5407 5408 5409 5410
/* Perform is the second step, and it runs on the source host. */
static int
qemudDomainMigratePerform (virDomainPtr dom,
                           const char *cookie ATTRIBUTE_UNUSED,
                           int cookielen ATTRIBUTE_UNUSED,
                           const char *uri,
                           unsigned long flags,
                           const char *dname,
                           unsigned long resource)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
5411

5412 5413 5414 5415 5416 5417 5418 5419
    virCheckFlags(VIR_MIGRATE_LIVE |
                  VIR_MIGRATE_PEER2PEER |
                  VIR_MIGRATE_TUNNELLED |
                  VIR_MIGRATE_PERSIST_DEST |
                  VIR_MIGRATE_UNDEFINE_SOURCE |
                  VIR_MIGRATE_PAUSED |
                  VIR_MIGRATE_NON_SHARED_DISK |
                  VIR_MIGRATE_NON_SHARED_INC, -1);
C
Chris Lalancette 已提交
5420

5421
    qemuDriverLock(driver);
5422
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
D
Daniel Veillard 已提交
5423
    if (!vm) {
5424 5425
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
5426 5427
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
5428
        goto cleanup;
D
Daniel Veillard 已提交
5429 5430
    }

5431 5432 5433
    ret = qemuMigrationPerform(driver, dom->conn, vm,
                               uri, flags,
                               dname, resource);
5434

5435
cleanup:
5436
    qemuDriverUnlock(driver);
5437
    return ret;
D
Daniel Veillard 已提交
5438 5439
}

5440

D
Daniel Veillard 已提交
5441 5442 5443 5444 5445 5446 5447
/* 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 已提交
5448
                           unsigned long flags,
D
Daniel Veillard 已提交
5449 5450
                           int retcode)
{
5451 5452 5453
    struct qemud_driver *driver = dconn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;
5454
    virErrorPtr orig_err;
D
Daniel Veillard 已提交
5455

C
Chris Lalancette 已提交
5456 5457 5458 5459 5460 5461 5462 5463 5464
    virCheckFlags(VIR_MIGRATE_LIVE |
                  VIR_MIGRATE_PEER2PEER |
                  VIR_MIGRATE_TUNNELLED |
                  VIR_MIGRATE_PERSIST_DEST |
                  VIR_MIGRATE_UNDEFINE_SOURCE |
                  VIR_MIGRATE_PAUSED |
                  VIR_MIGRATE_NON_SHARED_DISK |
                  VIR_MIGRATE_NON_SHARED_INC, NULL);

5465 5466 5467
    /* Migration failed. Save the current error so nothing squashes it */
    orig_err = virSaveLastError();

5468
    qemuDriverLock(driver);
5469
    vm = virDomainFindByName(&driver->domains, dname);
D
Daniel Veillard 已提交
5470
    if (!vm) {
5471 5472
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching name '%s'"), dname);
5473
        goto cleanup;
D
Daniel Veillard 已提交
5474 5475
    }

5476
    dom = qemuMigrationFinish(driver, dconn, vm, flags, retcode);
5477

5478
cleanup:
5479 5480 5481 5482
    if (orig_err) {
        virSetError(orig_err);
        virFreeError(orig_err);
    }
5483
    qemuDriverUnlock(driver);
5484
    return dom;
D
Daniel Veillard 已提交
5485 5486
}

5487

5488 5489 5490 5491 5492 5493 5494 5495 5496 5497 5498 5499 5500 5501 5502 5503
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;

5504
    def = virNodeDeviceDefParseString(xml, EXISTING_DEVICE);
5505 5506 5507 5508 5509 5510 5511 5512 5513 5514 5515 5516 5517 5518 5519 5520 5521
    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) {
5522 5523
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("device %s is not a PCI device"), dev->name);
5524 5525 5526 5527 5528 5529 5530 5531 5532 5533 5534 5535 5536
        goto out;
    }

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

static int
qemudNodeDeviceDettach (virNodeDevicePtr dev)
{
5537
    struct qemud_driver *driver = dev->conn->privateData;
5538 5539 5540 5541 5542 5543 5544
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

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

5545
    pci = pciGetDevice(domain, bus, slot, function);
5546 5547 5548
    if (!pci)
        return -1;

5549 5550
    qemuDriverLock(driver);
    if (pciDettachDevice(pci, driver->activePciHostdevs) < 0)
5551 5552 5553 5554
        goto out;

    ret = 0;
out:
5555
    qemuDriverUnlock(driver);
5556
    pciFreeDevice(pci);
5557 5558 5559 5560 5561 5562
    return ret;
}

static int
qemudNodeDeviceReAttach (virNodeDevicePtr dev)
{
5563
    struct qemud_driver *driver = dev->conn->privateData;
5564 5565 5566 5567 5568 5569 5570
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

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

5571
    pci = pciGetDevice(domain, bus, slot, function);
5572 5573 5574
    if (!pci)
        return -1;

5575 5576
    qemuDriverLock(driver);
    if (pciReAttachDevice(pci, driver->activePciHostdevs) < 0)
5577 5578 5579 5580
        goto out;

    ret = 0;
out:
5581
    qemuDriverUnlock(driver);
5582
    pciFreeDevice(pci);
5583 5584 5585 5586 5587 5588
    return ret;
}

static int
qemudNodeDeviceReset (virNodeDevicePtr dev)
{
5589
    struct qemud_driver *driver = dev->conn->privateData;
5590 5591 5592 5593 5594 5595 5596
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

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

5597
    pci = pciGetDevice(domain, bus, slot, function);
5598 5599 5600
    if (!pci)
        return -1;

5601 5602
    qemuDriverLock(driver);

5603
    if (pciResetDevice(pci, driver->activePciHostdevs, NULL) < 0)
5604 5605 5606 5607
        goto out;

    ret = 0;
out:
5608
    qemuDriverUnlock(driver);
5609
    pciFreeDevice(pci);
5610 5611 5612
    return ret;
}

5613 5614 5615 5616 5617 5618 5619 5620 5621 5622 5623
static int
qemuCPUCompare(virConnectPtr conn,
               const char *xmlDesc,
               unsigned int flags ATTRIBUTE_UNUSED)
{
    struct qemud_driver *driver = conn->privateData;
    int ret = VIR_CPU_COMPARE_ERROR;

    qemuDriverLock(driver);

    if (!driver->caps || !driver->caps->host.cpu) {
5624 5625
        qemuReportError(VIR_ERR_NO_SUPPORT,
                        "%s", _("cannot get host CPU capabilities"));
5626 5627
    }
    else
5628
        ret = cpuCompareXML(driver->caps->host.cpu, xmlDesc);
5629 5630 5631 5632 5633 5634

    qemuDriverUnlock(driver);

    return ret;
}

5635

5636 5637 5638 5639 5640 5641 5642 5643 5644 5645 5646 5647 5648
static char *
qemuCPUBaseline(virConnectPtr conn ATTRIBUTE_UNUSED,
                const char **xmlCPUs,
                unsigned int ncpus,
                unsigned int flags ATTRIBUTE_UNUSED)
{
    char *cpu;

    cpu = cpuBaselineXML(xmlCPUs, ncpus, NULL, 0);

    return cpu;
}

5649 5650 5651 5652 5653 5654 5655 5656 5657 5658 5659 5660 5661 5662 5663 5664 5665 5666 5667 5668 5669 5670 5671

static int qemuDomainGetJobInfo(virDomainPtr dom,
                                virDomainJobInfoPtr info) {
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
    qemuDomainObjPrivatePtr priv;

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

    priv = vm->privateData;

    if (virDomainObjIsActive(vm)) {
        if (priv->jobActive) {
5672 5673
            struct timeval now;

5674
            memcpy(info, &priv->jobInfo, sizeof(*info));
5675 5676 5677 5678 5679 5680 5681 5682 5683 5684 5685

            /* 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
             */
            if (gettimeofday(&now, NULL) < 0) {
                virReportSystemError(errno, "%s",
                                     _("cannot get time of day"));
                goto cleanup;
            }
5686
            info->timeElapsed = timeval_to_ms(now) - priv->jobStart;
5687 5688 5689 5690 5691 5692 5693 5694 5695 5696 5697 5698 5699 5700 5701 5702 5703 5704 5705
        } 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;
}


5706 5707 5708 5709 5710 5711 5712 5713 5714 5715 5716 5717 5718 5719 5720 5721 5722 5723 5724 5725 5726 5727
static int qemuDomainAbortJob(virDomainPtr dom) {
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
    qemuDomainObjPrivatePtr priv;

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

    priv = vm->privateData;

    if (virDomainObjIsActive(vm)) {
        if (priv->jobActive) {
            VIR_DEBUG("Requesting cancellation of job on vm %s", vm->def->name);
5728
            priv->jobSignals |= QEMU_JOB_SIGNAL_CANCEL;
5729 5730 5731 5732 5733 5734 5735 5736 5737 5738 5739 5740 5741 5742 5743 5744 5745 5746 5747 5748
        } else {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
                            "%s", _("no job is active on the domain"));
            goto cleanup;
        }
    } else {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

    ret = 0;

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


5749 5750 5751 5752 5753 5754 5755 5756 5757 5758
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;

5759
    virCheckFlags(0, -1);
5760 5761 5762 5763 5764 5765 5766 5767 5768 5769 5770 5771 5772 5773 5774 5775 5776 5777 5778 5779

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

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

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

    priv = vm->privateData;

5780
    if (priv->jobActive != QEMU_JOB_MIGRATION_OUT) {
5781 5782 5783 5784 5785 5786 5787 5788 5789 5790 5791 5792 5793 5794 5795 5796 5797
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not being migrated"));
        goto cleanup;
    }

    VIR_DEBUG("Requesting migration downtime change to %llums", downtime);
    priv->jobSignals |= QEMU_JOB_SIGNAL_MIGRATE_DOWNTIME;
    priv->jobSignalsData.migrateDowntime = downtime;
    ret = 0;

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

5798 5799 5800 5801 5802 5803 5804 5805 5806 5807 5808 5809 5810 5811 5812 5813 5814 5815 5816 5817 5818 5819 5820 5821 5822 5823 5824 5825 5826 5827 5828 5829 5830 5831 5832 5833 5834 5835 5836 5837 5838 5839 5840 5841 5842 5843 5844 5845 5846
static int
qemuDomainMigrateSetMaxSpeed(virDomainPtr dom,
                             unsigned long bandwidth,
                             unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    qemuDomainObjPrivatePtr priv;
    int ret = -1;

    virCheckFlags(0, -1);

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

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

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

    priv = vm->privateData;

    if (priv->jobActive != QEMU_JOB_MIGRATION_OUT) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not being migrated"));
        goto cleanup;
    }

    VIR_DEBUG("Requesting migration speed change to %luMbs", bandwidth);
    priv->jobSignals |= QEMU_JOB_SIGNAL_MIGRATE_SPEED;
    priv->jobSignalsData.migrateBandwidth = bandwidth;
    ret = 0;

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

C
Chris Lalancette 已提交
5847 5848 5849 5850 5851 5852 5853 5854 5855 5856 5857 5858 5859 5860
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;
}

5861 5862 5863
static int qemuDomainSnapshotWriteMetadata(virDomainObjPtr vm,
                                           virDomainSnapshotObjPtr snapshot,
                                           char *snapshotDir)
C
Chris Lalancette 已提交
5864 5865 5866 5867 5868 5869 5870 5871 5872 5873
{
    int fd = -1;
    char *newxml = NULL;
    int ret = -1;
    char *snapDir = NULL;
    char *snapFile = NULL;
    int err;
    char uuidstr[VIR_UUID_STRING_BUFLEN];

    virUUIDFormat(vm->def->uuid, uuidstr);
5874
    newxml = virDomainSnapshotDefFormat(uuidstr, snapshot->def, 1);
C
Chris Lalancette 已提交
5875 5876 5877 5878 5879 5880 5881 5882 5883 5884 5885 5886 5887 5888 5889 5890
    if (newxml == NULL) {
        virReportOOMError();
        return -1;
    }

    if (virAsprintf(&snapDir, "%s/%s", snapshotDir, vm->def->name) < 0) {
        virReportOOMError();
        goto cleanup;
    }
    err = virFileMakePath(snapDir);
    if (err < 0) {
        virReportSystemError(err, _("cannot create snapshot directory '%s'"),
                             snapDir);
        goto cleanup;
    }

5891
    if (virAsprintf(&snapFile, "%s/%s.xml", snapDir, snapshot->def->name) < 0) {
C
Chris Lalancette 已提交
5892 5893 5894 5895 5896 5897 5898 5899 5900 5901 5902 5903 5904 5905 5906 5907 5908 5909 5910 5911 5912
        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);
5913
    VIR_FORCE_CLOSE(fd);
C
Chris Lalancette 已提交
5914 5915 5916
    return ret;
}

5917 5918
static int qemuDomainSnapshotSetCurrentActive(virDomainObjPtr vm,
                                              char *snapshotDir)
C
Chris Lalancette 已提交
5919 5920 5921 5922
{
    if (vm->current_snapshot) {
        vm->current_snapshot->def->active = 1;

5923 5924
        return qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                               snapshotDir);
C
Chris Lalancette 已提交
5925 5926 5927 5928 5929
    }

    return 0;
}

5930 5931
static int qemuDomainSnapshotSetCurrentInactive(virDomainObjPtr vm,
                                                char *snapshotDir)
C
Chris Lalancette 已提交
5932 5933 5934 5935
{
    if (vm->current_snapshot) {
        vm->current_snapshot->def->active = 0;

5936 5937
        return qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                               snapshotDir);
C
Chris Lalancette 已提交
5938 5939 5940 5941 5942 5943 5944 5945 5946 5947 5948 5949 5950 5951 5952 5953 5954 5955 5956
    }

    return 0;
}


static int qemuDomainSnapshotIsAllowed(virDomainObjPtr vm)
{
    int i;

    /* FIXME: we need to figure out what else here might succeed; in
     * particular, if it's a raw device but on LVM, we could probably make
     * that succeed as well
     */
    for (i = 0; i < vm->def->ndisks; i++) {
        if (vm->def->disks[i]->device == VIR_DOMAIN_DISK_DEVICE_DISK &&
            (!vm->def->disks[i]->driverType ||
             STRNEQ(vm->def->disks[i]->driverType, "qcow2"))) {
            qemuReportError(VIR_ERR_OPERATION_INVALID,
5957 5958
                            _("Disk '%s' does not support snapshotting"),
                            vm->def->disks[i]->src);
C
Chris Lalancette 已提交
5959 5960 5961 5962 5963 5964 5965
            return 0;
        }
    }

    return 1;
}

5966 5967 5968 5969 5970 5971 5972 5973 5974 5975 5976 5977 5978 5979 5980 5981 5982 5983 5984 5985 5986 5987 5988 5989 5990 5991 5992 5993 5994 5995 5996 5997 5998 5999 6000 6001 6002 6003 6004 6005 6006 6007 6008 6009 6010 6011 6012 6013
/* The domain is expected to be locked and inactive. */
static int
qemuDomainSnapshotCreateInactive(virDomainObjPtr vm,
                                 virDomainSnapshotObjPtr snap)
{
    const char *qemuimgarg[] = { NULL, "snapshot", "-c", NULL, NULL, NULL };
    int ret = -1;
    int i;

    qemuimgarg[0] = qemuFindQemuImgBinary();
    if (qemuimgarg[0] == NULL) {
        /* qemuFindQemuImgBinary set the error */
        goto cleanup;
    }

    qemuimgarg[3] = snap->def->name;

    for (i = 0; i < vm->def->ndisks; i++) {
        /* FIXME: we also need to handle LVM here */
        /* FIXME: if we fail halfway through this loop, we are in an
         * inconsistent state.  I'm not quite sure what to do about that
         */
        if (vm->def->disks[i]->device == VIR_DOMAIN_DISK_DEVICE_DISK) {
            if (!vm->def->disks[i]->driverType ||
                STRNEQ(vm->def->disks[i]->driverType, "qcow2")) {
                qemuReportError(VIR_ERR_OPERATION_INVALID,
                                _("Disk device '%s' does not support"
                                  " snapshotting"),
                                vm->def->disks[i]->info.alias);
                goto cleanup;
            }

            qemuimgarg[4] = vm->def->disks[i]->src;

            if (virRun(qemuimgarg, NULL) < 0)
                goto cleanup;
        }
    }

    ret = 0;

cleanup:
    VIR_FREE(qemuimgarg[0]);
    return ret;
}

/* The domain is expected to be locked and active. */
static int
6014 6015
qemuDomainSnapshotCreateActive(virConnectPtr conn,
                               struct qemud_driver *driver,
6016 6017 6018 6019 6020
                               virDomainObjPtr *vmptr,
                               virDomainSnapshotObjPtr snap)
{
    virDomainObjPtr vm = *vmptr;
    qemuDomainObjPrivatePtr priv = vm->privateData;
6021 6022
    bool resume = false;
    int ret = -1;
6023 6024 6025 6026

    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        return -1;

6027 6028 6029 6030 6031 6032 6033 6034 6035 6036 6037 6038 6039 6040 6041 6042
    if (vm->state == VIR_DOMAIN_RUNNING) {
        /* 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.
         */
        if (qemuProcessStopCPUs(driver, vm) < 0)
            goto cleanup;

        resume = true;
        if (!virDomainObjIsActive(vm)) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("guest unexpectedly quit"));
            goto cleanup;
        }
    }

6043 6044 6045 6046
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
    ret = qemuMonitorCreateSnapshot(priv->mon, snap->def->name);
    qemuDomainObjExitMonitorWithDriver(driver, vm);

6047 6048 6049 6050 6051 6052 6053 6054
cleanup:
    if (resume && virDomainObjIsActive(vm) &&
        qemuProcessStartCPUs(driver, vm, conn) < 0 &&
        virGetLastError() == NULL) {
        qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                        _("resuming after snapshot failed"));
    }

6055 6056 6057 6058 6059 6060
    if (qemuDomainObjEndJob(vm) == 0)
        *vmptr = NULL;

    return ret;
}

C
Chris Lalancette 已提交
6061 6062
static virDomainSnapshotPtr qemuDomainSnapshotCreateXML(virDomainPtr domain,
                                                        const char *xmlDesc,
6063
                                                        unsigned int flags)
C
Chris Lalancette 已提交
6064 6065 6066 6067 6068 6069 6070 6071
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    virDomainSnapshotObjPtr snap = NULL;
    virDomainSnapshotPtr snapshot = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];
    virDomainSnapshotDefPtr def;

6072 6073
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
6074 6075 6076 6077 6078 6079 6080 6081 6082 6083 6084 6085 6086 6087 6088 6089 6090 6091 6092 6093 6094 6095 6096 6097 6098
    qemuDriverLock(driver);
    virUUIDFormat(domain->uuid, uuidstr);
    vm = virDomainFindByUUID(&driver->domains, domain->uuid);
    if (!vm) {
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    /* in a perfect world, we would allow qemu to tell us this.  The problem
     * is that qemu only does this check device-by-device; so if you had a
     * domain that booted from a large qcow2 device, but had a secondary raw
     * device attached, you wouldn't find out that you can't snapshot your
     * guest until *after* it had spent the time to snapshot the boot device.
     * This is probably a bug in qemu, but we'll work around it here for now.
     */
    if (!qemuDomainSnapshotIsAllowed(vm))
        goto cleanup;

    if (!(def = virDomainSnapshotDefParseString(xmlDesc, 1)))
        goto cleanup;

    if (!(snap = virDomainSnapshotAssignDef(&vm->snapshots, def)))
        goto cleanup;

6099 6100
    snap->def->state = vm->state;

C
Chris Lalancette 已提交
6101 6102
    /* actually do the snapshot */
    if (!virDomainObjIsActive(vm)) {
6103
        if (qemuDomainSnapshotCreateInactive(vm, snap) < 0)
C
Chris Lalancette 已提交
6104 6105 6106
            goto cleanup;
    }
    else {
6107 6108
        if (qemuDomainSnapshotCreateActive(domain->conn, driver,
                                           &vm, snap) < 0)
6109
            goto cleanup;
C
Chris Lalancette 已提交
6110 6111 6112 6113 6114 6115 6116 6117 6118 6119 6120 6121 6122 6123 6124 6125 6126 6127
    }

    /* FIXME: if we fail after this point, there's not a whole lot we can
     * do; we've successfully taken the snapshot, and we are now running
     * on it, so we have to go forward the best we can
     */

    if (vm->current_snapshot) {
        def->parent = strdup(vm->current_snapshot->def->name);
        if (def->parent == NULL) {
            virReportOOMError();
            goto cleanup;
        }
    }

    /* Now we set the new current_snapshot for the domain */
    vm->current_snapshot = snap;

6128 6129 6130
    if (qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                        driver->snapshotDir) < 0)
        /* qemuDomainSnapshotWriteMetadata set the error */
C
Chris Lalancette 已提交
6131 6132 6133 6134 6135 6136 6137 6138 6139 6140 6141 6142 6143
        goto cleanup;

    snapshot = virGetDomainSnapshot(domain, snap->def->name);

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

static int qemuDomainSnapshotListNames(virDomainPtr domain, char **names,
                                       int nameslen,
6144
                                       unsigned int flags)
C
Chris Lalancette 已提交
6145 6146 6147 6148 6149
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int n = -1;

6150 6151
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
6152 6153 6154 6155 6156 6157 6158 6159 6160 6161 6162 6163 6164 6165 6166 6167 6168 6169 6170 6171
    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,
6172
                                 unsigned int flags)
C
Chris Lalancette 已提交
6173 6174 6175 6176 6177
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int n = -1;

6178 6179
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
6180 6181 6182 6183 6184 6185 6186 6187 6188 6189 6190 6191 6192 6193 6194 6195 6196 6197 6198 6199 6200
    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,
6201
                                                           unsigned int flags)
C
Chris Lalancette 已提交
6202 6203 6204 6205 6206 6207
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    virDomainSnapshotObjPtr snap = NULL;
    virDomainSnapshotPtr snapshot = NULL;

6208 6209
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
6210 6211 6212 6213 6214 6215 6216 6217 6218 6219 6220 6221 6222 6223 6224 6225 6226 6227 6228 6229 6230 6231 6232 6233 6234 6235 6236
    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,
6237
                                        unsigned int flags)
C
Chris Lalancette 已提交
6238 6239 6240 6241 6242
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;

6243 6244
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
6245 6246 6247 6248 6249 6250 6251 6252 6253 6254 6255 6256 6257 6258 6259 6260 6261 6262 6263 6264
    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,
6265
                                                      unsigned int flags)
C
Chris Lalancette 已提交
6266 6267 6268 6269 6270
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    virDomainSnapshotPtr snapshot = NULL;

6271 6272
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
6273 6274 6275 6276 6277 6278 6279 6280 6281 6282 6283 6284 6285 6286 6287 6288 6289 6290 6291 6292 6293 6294 6295 6296 6297 6298
    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;
}

static char *qemuDomainSnapshotDumpXML(virDomainSnapshotPtr snapshot,
6299
                                       unsigned int flags)
C
Chris Lalancette 已提交
6300 6301 6302 6303 6304 6305 6306
{
    struct qemud_driver *driver = snapshot->domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    char *xml = NULL;
    virDomainSnapshotObjPtr snap = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];

6307 6308
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
6309 6310 6311 6312 6313 6314 6315 6316 6317 6318 6319 6320 6321 6322 6323 6324 6325 6326 6327 6328 6329 6330 6331 6332 6333 6334 6335
    qemuDriverLock(driver);
    virUUIDFormat(snapshot->domain->uuid, uuidstr);
    vm = virDomainFindByUUID(&driver->domains, snapshot->domain->uuid);
    if (!vm) {
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    snap = virDomainSnapshotFindByName(&vm->snapshots, snapshot->name);
    if (!snap) {
        qemuReportError(VIR_ERR_NO_DOMAIN_SNAPSHOT,
                        _("no domain snapshot with matching name '%s'"),
                        snapshot->name);
        goto cleanup;
    }

    xml = virDomainSnapshotDefFormat(uuidstr, snap->def, 0);

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

static int qemuDomainRevertToSnapshot(virDomainSnapshotPtr snapshot,
6336
                                      unsigned int flags)
C
Chris Lalancette 已提交
6337 6338 6339 6340 6341 6342 6343 6344 6345 6346
{
    struct qemud_driver *driver = snapshot->domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int ret = -1;
    virDomainSnapshotObjPtr snap = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];
    virDomainEventPtr event = NULL;
    qemuDomainObjPrivatePtr priv;
    int rc;

6347 6348
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
6349 6350 6351 6352 6353 6354 6355 6356 6357 6358 6359 6360 6361 6362 6363 6364 6365 6366 6367 6368 6369 6370 6371 6372 6373 6374 6375 6376 6377 6378 6379
    qemuDriverLock(driver);
    virUUIDFormat(snapshot->domain->uuid, uuidstr);
    vm = virDomainFindByUUID(&driver->domains, snapshot->domain->uuid);
    if (!vm) {
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    snap = virDomainSnapshotFindByName(&vm->snapshots, snapshot->name);
    if (!snap) {
        qemuReportError(VIR_ERR_NO_DOMAIN_SNAPSHOT,
                        _("no domain snapshot with matching name '%s'"),
                        snapshot->name);
        goto cleanup;
    }

    vm->current_snapshot = snap;

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

    if (snap->def->state == VIR_DOMAIN_RUNNING
        || snap->def->state == VIR_DOMAIN_PAUSED) {

        if (virDomainObjIsActive(vm)) {
            priv = vm->privateData;
            qemuDomainObjEnterMonitorWithDriver(driver, vm);
            rc = qemuMonitorLoadSnapshot(priv->mon, snap->def->name);
            qemuDomainObjExitMonitorWithDriver(driver, vm);
            if (rc < 0)
6380
                goto endjob;
C
Chris Lalancette 已提交
6381 6382
        }
        else {
6383
            if (qemuDomainSnapshotSetCurrentActive(vm, driver->snapshotDir) < 0)
6384
                goto endjob;
C
Chris Lalancette 已提交
6385

6386 6387
            rc = qemuProcessStart(snapshot->domain->conn, driver, vm, NULL,
                                  false, -1, NULL, VIR_VM_OP_CREATE);
6388
            qemuAuditDomainStart(vm, "from-snapshot", rc >= 0);
6389
            if (qemuDomainSnapshotSetCurrentInactive(vm, driver->snapshotDir) < 0)
6390
                goto endjob;
C
Chris Lalancette 已提交
6391
            if (rc < 0)
6392
                goto endjob;
C
Chris Lalancette 已提交
6393 6394 6395 6396 6397 6398
        }

        if (snap->def->state == VIR_DOMAIN_PAUSED) {
            /* qemu unconditionally starts the domain running again after
             * loadvm, so let's pause it to keep consistency
             */
6399
            rc = qemuProcessStopCPUs(driver, vm);
H
Hu Tao 已提交
6400
            if (rc < 0)
6401
                goto endjob;
C
Chris Lalancette 已提交
6402 6403 6404 6405 6406 6407 6408 6409 6410 6411 6412 6413 6414 6415 6416 6417 6418 6419
        }

        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_STARTED,
                                         VIR_DOMAIN_EVENT_STARTED_FROM_SNAPSHOT);
    }
    else {
        /* qemu is a little funny with running guests and the restoration
         * of snapshots.  If the snapshot was taken online,
         * then after a "loadvm" monitor command, the VM is set running
         * again.  If the snapshot was taken offline, then after a "loadvm"
         * monitor command the VM is left paused.  Unpausing it leads to
         * the memory state *before* the loadvm with the disk *after* the
         * loadvm, which obviously is bound to corrupt something.
         * Therefore we destroy the domain and set it to "off" in this case.
         */

        if (virDomainObjIsActive(vm)) {
6420
            qemuProcessStop(driver, vm, 0);
6421
            qemuAuditDomainStop(vm, "from-snapshot");
C
Chris Lalancette 已提交
6422 6423 6424
            event = virDomainEventNewFromObj(vm,
                                             VIR_DOMAIN_EVENT_STOPPED,
                                             VIR_DOMAIN_EVENT_STOPPED_FROM_SNAPSHOT);
6425 6426 6427 6428
            if (!vm->persistent) {
                if (qemuDomainObjEndJob(vm) > 0)
                    virDomainRemoveInactive(&driver->domains, vm);
                vm = NULL;
6429
                goto cleanup;
6430
            }
C
Chris Lalancette 已提交
6431 6432
        }

6433
        if (qemuDomainSnapshotSetCurrentActive(vm, driver->snapshotDir) < 0)
6434
            goto endjob;
C
Chris Lalancette 已提交
6435 6436 6437 6438 6439 6440
    }

    vm->state = snap->def->state;

    ret = 0;

6441
endjob:
C
Chris Lalancette 已提交
6442 6443 6444
    if (vm && qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

6445
cleanup:
C
Chris Lalancette 已提交
6446 6447 6448 6449 6450 6451 6452 6453 6454 6455 6456 6457 6458 6459 6460 6461 6462 6463 6464 6465 6466 6467 6468 6469 6470 6471 6472 6473 6474 6475 6476 6477 6478 6479 6480 6481 6482 6483 6484 6485 6486 6487 6488 6489 6490 6491 6492 6493 6494 6495 6496 6497 6498 6499 6500 6501 6502 6503 6504 6505 6506 6507 6508 6509 6510 6511 6512 6513 6514 6515 6516 6517 6518 6519 6520 6521 6522 6523 6524 6525 6526 6527 6528 6529 6530 6531 6532 6533 6534 6535 6536 6537 6538 6539 6540 6541 6542 6543 6544 6545 6546 6547
    if (event)
        qemuDomainEventQueue(driver, event);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);

    return ret;
}

static int qemuDomainSnapshotDiscard(struct qemud_driver *driver,
                                     virDomainObjPtr vm,
                                     virDomainSnapshotObjPtr snap)
{
    const char *qemuimgarg[] = { NULL, "snapshot", "-d", NULL, NULL, NULL };
    char *snapFile = NULL;
    int ret = -1;
    int i;
    qemuDomainObjPrivatePtr priv;
    virDomainSnapshotObjPtr parentsnap;

    if (!virDomainObjIsActive(vm)) {
        qemuimgarg[0] = qemuFindQemuImgBinary();
        if (qemuimgarg[0] == NULL)
            /* qemuFindQemuImgBinary set the error */
            goto cleanup;

        qemuimgarg[3] = snap->def->name;

        for (i = 0; i < vm->def->ndisks; i++) {
            /* FIXME: we also need to handle LVM here */
            if (vm->def->disks[i]->device == VIR_DOMAIN_DISK_DEVICE_DISK) {
                if (!vm->def->disks[i]->driverType ||
                    STRNEQ(vm->def->disks[i]->driverType, "qcow2")) {
                    /* we continue on even in the face of error, since other
                     * disks in this VM may have this snapshot in place
                     */
                    continue;
                }

                qemuimgarg[4] = vm->def->disks[i]->src;

                if (virRun(qemuimgarg, NULL) < 0) {
                    /* we continue on even in the face of error, since other
                     * disks in this VM may have this snapshot in place
                     */
                    continue;
                }
            }
        }
    }
    else {
        priv = vm->privateData;
        qemuDomainObjEnterMonitorWithDriver(driver, vm);
        /* we continue on even in the face of error */
        qemuMonitorDeleteSnapshot(priv->mon, snap->def->name);
        qemuDomainObjExitMonitorWithDriver(driver, vm);
    }

    if (snap == vm->current_snapshot) {
        if (snap->def->parent) {
            parentsnap = virDomainSnapshotFindByName(&vm->snapshots,
                                                     snap->def->parent);
            if (!parentsnap) {
                qemuReportError(VIR_ERR_NO_DOMAIN_SNAPSHOT,
                                _("no domain snapshot parent with matching name '%s'"),
                                snap->def->parent);
                goto cleanup;
            }

            /* Now we set the new current_snapshot for the domain */
            vm->current_snapshot = parentsnap;
        }
        else
            vm->current_snapshot = NULL;
    }

    if (virAsprintf(&snapFile, "%s/%s/%s.xml", driver->snapshotDir,
                    vm->def->name, snap->def->name) < 0) {
        virReportOOMError();
        goto cleanup;
    }
    unlink(snapFile);

    virDomainSnapshotObjListRemove(&vm->snapshots, snap);

    ret = 0;

cleanup:
    VIR_FREE(snapFile);
    VIR_FREE(qemuimgarg[0]);

    return ret;
}

struct snap_remove {
    struct qemud_driver *driver;
    virDomainObjPtr vm;
    char *parent;
    int err;
};

static void qemuDomainSnapshotDiscardChildren(void *payload,
6548
                                              const void *name ATTRIBUTE_UNUSED,
C
Chris Lalancette 已提交
6549 6550 6551 6552 6553 6554 6555 6556 6557 6558 6559 6560 6561 6562 6563 6564 6565 6566 6567 6568 6569
                                              void *data)
{
    virDomainSnapshotObjPtr snap = payload;
    struct snap_remove *curr = data;
    struct snap_remove this;

    if (snap->def->parent && STREQ(snap->def->parent, curr->parent)) {
        this.driver = curr->driver;
        this.vm = curr->vm;
        this.parent = snap->def->name;
        this.err = 0;
        virHashForEach(curr->vm->snapshots.objs,
                       qemuDomainSnapshotDiscardChildren, &this);

        if (this.err)
            curr->err = this.err;
        else
            this.err = qemuDomainSnapshotDiscard(curr->driver, curr->vm, snap);
    }
}

6570 6571 6572 6573 6574 6575 6576 6577 6578
struct snap_reparent {
    struct qemud_driver *driver;
    virDomainSnapshotObjPtr snap;
    virDomainObjPtr vm;
    int err;
};

static void
qemuDomainSnapshotReparentChildren(void *payload,
6579
                                   const void *name ATTRIBUTE_UNUSED,
6580 6581 6582 6583 6584 6585 6586 6587 6588 6589 6590 6591 6592 6593 6594 6595 6596 6597 6598 6599 6600 6601 6602 6603 6604 6605 6606
                                   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 已提交
6607 6608 6609 6610 6611 6612 6613 6614 6615
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;
6616
    struct snap_reparent rep;
C
Chris Lalancette 已提交
6617

6618 6619
    virCheckFlags(VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN, -1);

C
Chris Lalancette 已提交
6620 6621 6622 6623 6624 6625 6626 6627 6628 6629 6630 6631 6632 6633 6634 6635 6636
    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;
    }

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

C
Chris Lalancette 已提交
6640 6641 6642 6643 6644 6645 6646 6647
    if (flags & VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN) {
        rem.driver = driver;
        rem.vm = vm;
        rem.parent = snap->def->name;
        rem.err = 0;
        virHashForEach(vm->snapshots.objs, qemuDomainSnapshotDiscardChildren,
                       &rem);
        if (rem.err < 0)
6648
            goto endjob;
6649 6650 6651 6652 6653 6654 6655 6656 6657
    } 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 已提交
6658 6659 6660 6661
    }

    ret = qemuDomainSnapshotDiscard(driver, vm, snap);

6662 6663 6664 6665
endjob:
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

C
Chris Lalancette 已提交
6666 6667 6668 6669 6670 6671
cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}
6672

6673 6674 6675 6676 6677 6678 6679
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;
6680
    bool hmp;
6681

6682
    virCheckFlags(VIR_DOMAIN_QEMU_MONITOR_COMMAND_HMP, -1);
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

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

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

    priv = vm->privateData;

    if (!priv->monitor_warned) {
        VIR_INFO("Qemu monitor command '%s' executed; libvirt results may be unpredictable!",
                 cmd);
        priv->monitor_warned = 1;
    }

6708 6709
    hmp = !!(flags & VIR_DOMAIN_QEMU_MONITOR_COMMAND_HMP);

6710 6711 6712
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
6713
    ret = qemuMonitorArbitraryCommand(priv->mon, cmd, result, hmp);
6714 6715 6716 6717 6718 6719 6720 6721 6722 6723 6724 6725 6726
    qemuDomainObjExitMonitorWithDriver(driver, vm);
    if (qemuDomainObjEndJob(vm) == 0) {
        vm = NULL;
        goto cleanup;
    }

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

6727 6728 6729 6730 6731 6732 6733 6734 6735 6736 6737 6738 6739 6740 6741 6742 6743 6744 6745 6746 6747 6748 6749 6750 6751 6752 6753 6754 6755 6756 6757 6758 6759 6760 6761 6762 6763 6764 6765 6766 6767 6768 6769 6770 6771 6772 6773 6774 6775 6776 6777 6778 6779 6780 6781 6782 6783

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

6784
    if (chr->source.type != VIR_DOMAIN_CHR_TYPE_PTY) {
6785 6786 6787 6788 6789 6790
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("character device %s is not using a PTY"),
                        NULLSTR(devname));
        goto cleanup;
    }

6791
    if (virFDStreamOpenFile(st, chr->source.data.file.path, O_RDWR) < 0)
6792 6793 6794 6795 6796 6797 6798 6799 6800 6801 6802
        goto cleanup;

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


6803 6804 6805 6806 6807
static virDriver qemuDriver = {
    VIR_DRV_QEMU,
    "QEMU",
    qemudOpen, /* open */
    qemudClose, /* close */
D
Daniel Veillard 已提交
6808
    qemudSupportsFeature, /* supports_feature */
6809 6810
    qemudGetType, /* type */
    qemudGetVersion, /* version */
6811
    NULL, /* libvirtVersion (impl. in libvirt.c) */
6812
    virGetHostname, /* getHostname */
E
Eric Blake 已提交
6813
    qemuGetSysinfo, /* getSysinfo */
6814
    qemudGetMaxVCPUs, /* getMaxVcpus */
6815
    nodeGetInfo, /* nodeGetInfo */
6816 6817 6818
    qemudGetCapabilities, /* getCapabilities */
    qemudListDomains, /* listDomains */
    qemudNumDomains, /* numOfDomains */
6819
    qemudDomainCreate, /* domainCreateXML */
6820 6821 6822 6823 6824
    qemudDomainLookupByID, /* domainLookupByID */
    qemudDomainLookupByUUID, /* domainLookupByUUID */
    qemudDomainLookupByName, /* domainLookupByName */
    qemudDomainSuspend, /* domainSuspend */
    qemudDomainResume, /* domainResume */
6825
    qemudDomainShutdown, /* domainShutdown */
6826 6827 6828
    NULL, /* domainReboot */
    qemudDomainDestroy, /* domainDestroy */
    qemudDomainGetOSType, /* domainGetOSType */
6829
    qemudDomainGetMaxMemory, /* domainGetMaxMemory */
6830
    NULL, /* domainSetMaxMemory */
6831
    qemudDomainSetMemory, /* domainSetMemory */
6832
    qemudDomainSetMemoryFlags, /* domainSetMemoryFlags */
6833 6834
    qemuDomainSetMemoryParameters, /* domainSetMemoryParameters */
    qemuDomainGetMemoryParameters, /* domainGetMemoryParameters */
6835 6836
    qemuDomainSetBlkioParameters, /* domainSetBlkioParameters */
    qemuDomainGetBlkioParameters, /* domainGetBlkioParameters */
6837 6838
    qemudDomainGetInfo, /* domainGetInfo */
    qemudDomainSave, /* domainSave */
6839
    qemuDomainRestore, /* domainRestore */
P
Paolo Bonzini 已提交
6840
    qemudDomainCoreDump, /* domainCoreDump */
6841
    qemudDomainSetVcpus, /* domainSetVcpus */
6842 6843
    qemudDomainSetVcpusFlags, /* domainSetVcpusFlags */
    qemudDomainGetVcpusFlags, /* domainGetVcpusFlags */
6844 6845
    qemudDomainPinVcpu, /* domainPinVcpu */
    qemudDomainGetVcpus, /* domainGetVcpus */
6846
    qemudDomainGetMaxVcpus, /* domainGetMaxVcpus */
6847 6848
    qemudDomainGetSecurityLabel, /* domainGetSecurityLabel */
    qemudNodeGetSecurityModel, /* nodeGetSecurityModel */
6849
    qemudDomainDumpXML, /* domainDumpXML */
6850
    qemuDomainXMLFromNative, /* domainXmlFromNative */
6851
    qemuDomainXMLToNative, /* domainXMLToNative */
6852 6853
    qemudListDefinedDomains, /* listDefinedDomains */
    qemudNumDefinedDomains, /* numOfDefinedDomains */
6854
    qemudDomainStart, /* domainCreate */
6855
    qemudDomainStartWithFlags, /* domainCreateWithFlags */
6856 6857
    qemudDomainDefine, /* domainDefineXML */
    qemudDomainUndefine, /* domainUndefine */
6858
    qemudDomainAttachDevice, /* domainAttachDevice */
6859
    qemudDomainAttachDeviceFlags, /* domainAttachDeviceFlags */
6860
    qemudDomainDetachDevice, /* domainDetachDevice */
6861
    qemudDomainDetachDeviceFlags, /* domainDetachDeviceFlags */
6862
    qemuDomainUpdateDeviceFlags, /* domainUpdateDeviceFlags */
6863 6864
    qemudDomainGetAutostart, /* domainGetAutostart */
    qemudDomainSetAutostart, /* domainSetAutostart */
6865 6866 6867
    qemuGetSchedulerType, /* domainGetSchedulerType */
    qemuGetSchedulerParameters, /* domainGetSchedulerParameters */
    qemuSetSchedulerParameters, /* domainSetSchedulerParameters */
D
Daniel Veillard 已提交
6868 6869
    NULL, /* domainMigratePrepare (v1) */
    qemudDomainMigratePerform, /* domainMigratePerform */
6870
    NULL, /* domainMigrateFinish */
6871
    qemudDomainBlockStats, /* domainBlockStats */
6872
    qemudDomainInterfaceStats, /* domainInterfaceStats */
6873
    qemudDomainMemoryStats, /* domainMemoryStats */
6874
    qemudDomainBlockPeek, /* domainBlockPeek */
R
Richard W.M. Jones 已提交
6875
    qemudDomainMemoryPeek, /* domainMemoryPeek */
6876
    qemuDomainGetBlockInfo, /* domainGetBlockInfo */
6877 6878
    nodeGetCellsFreeMemory, /* nodeGetCellsFreeMemory */
    nodeGetFreeMemory,  /* getFreeMemory */
6879 6880
    qemuDomainEventRegister, /* domainEventRegister */
    qemuDomainEventDeregister, /* domainEventDeregister */
D
Daniel Veillard 已提交
6881 6882
    qemudDomainMigratePrepare2, /* domainMigratePrepare2 */
    qemudDomainMigrateFinish2, /* domainMigrateFinish2 */
6883 6884 6885
    qemudNodeDeviceDettach, /* nodeDeviceDettach */
    qemudNodeDeviceReAttach, /* nodeDeviceReAttach */
    qemudNodeDeviceReset, /* nodeDeviceReset */
C
Chris Lalancette 已提交
6886
    qemudDomainMigratePrepareTunnel, /* domainMigratePrepareTunnel */
6887 6888 6889 6890
    qemuIsEncrypted, /* isEncrypted */
    qemuIsSecure, /* isSecure */
    qemuDomainIsActive, /* domainIsActive */
    qemuDomainIsPersistent, /* domainIsPersistent */
6891
    qemuDomainIsUpdated, /* domainIsUpdated */
6892
    qemuCPUCompare, /* cpuCompare */
6893
    qemuCPUBaseline, /* cpuBaseline */
6894
    qemuDomainGetJobInfo, /* domainGetJobInfo */
6895
    qemuDomainAbortJob, /* domainAbortJob */
6896
    qemuDomainMigrateSetMaxDowntime, /* domainMigrateSetMaxDowntime */
6897
    qemuDomainMigrateSetMaxSpeed, /* domainMigrateSetMaxSpeed */
6898 6899
    qemuDomainEventRegisterAny, /* domainEventRegisterAny */
    qemuDomainEventDeregisterAny, /* domainEventDeregisterAny */
6900 6901 6902
    qemuDomainManagedSave, /* domainManagedSave */
    qemuDomainHasManagedSaveImage, /* domainHasManagedSaveImage */
    qemuDomainManagedSaveRemove, /* domainManagedSaveRemove */
C
Chris Lalancette 已提交
6903 6904 6905 6906 6907 6908 6909 6910 6911
    qemuDomainSnapshotCreateXML, /* domainSnapshotCreateXML */
    qemuDomainSnapshotDumpXML, /* domainSnapshotDumpXML */
    qemuDomainSnapshotNum, /* domainSnapshotNum */
    qemuDomainSnapshotListNames, /* domainSnapshotListNames */
    qemuDomainSnapshotLookupByName, /* domainSnapshotLookupByName */
    qemuDomainHasCurrentSnapshot, /* domainHasCurrentSnapshot */
    qemuDomainSnapshotCurrent, /* domainSnapshotCurrent */
    qemuDomainRevertToSnapshot, /* domainRevertToSnapshot */
    qemuDomainSnapshotDelete, /* domainSnapshotDelete */
6912
    qemuDomainMonitorCommand, /* qemuDomainMonitorCommand */
6913
    qemuDomainOpenConsole, /* domainOpenConsole */
6914 6915 6916
};


6917
static virStateDriver qemuStateDriver = {
6918
    .name = "QEMU",
6919 6920 6921 6922
    .initialize = qemudStartup,
    .cleanup = qemudShutdown,
    .reload = qemudReload,
    .active = qemudActive,
6923
};
6924

6925
static void
6926
qemuVMDriverLock(void) {
6927 6928 6929 6930 6931
    qemuDriverLock(qemu_driver);
};


static void
6932
qemuVMDriverUnlock(void) {
6933 6934 6935 6936
    qemuDriverUnlock(qemu_driver);
};


6937 6938 6939 6940 6941 6942 6943 6944 6945
static int
qemuVMFilterRebuild(virConnectPtr conn ATTRIBUTE_UNUSED,
                    virHashIterator iter, void *data)
{
    virHashForEach(qemu_driver->domains.objs, iter, data);

    return 0;
}

S
Stefan Berger 已提交
6946 6947
static virNWFilterCallbackDriver qemuCallbackDriver = {
    .name = "QEMU",
6948 6949 6950
    .vmFilterRebuild = qemuVMFilterRebuild,
    .vmDriverLock = qemuVMDriverLock,
    .vmDriverUnlock = qemuVMDriverUnlock,
S
Stefan Berger 已提交
6951 6952
};

6953
int qemuRegister(void) {
6954 6955
    virRegisterDriver(&qemuDriver);
    virRegisterStateDriver(&qemuStateDriver);
S
Stefan Berger 已提交
6956
    virNWFilterRegisterCallbackDriver(&qemuCallbackDriver);
6957 6958
    return 0;
}