qemu_driver.c 212.2 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>
46
#include <byteswap.h>
D
Daniel P. Berrange 已提交
47

48

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

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

91 92
#define VIR_FROM_THIS VIR_FROM_QEMU

93 94
#define QEMU_NB_MEM_PARAM  3

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

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

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

113
#define QEMU_NB_BLKIO_PARAM  1
114 115

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

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

119 120
static int qemudShutdown(void);

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

126
static int qemudDomainGetMaxVcpus(virDomainPtr dom);
127

128
struct qemud_driver *qemu_driver = NULL;
129 130


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

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

    virDomainObjLock(vm);
144 145 146 147 148 149 150 151 152
    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) &&
153
            qemudDomainObjStart(data->conn, data->driver, vm, false) < 0) {
154
            err = virGetLastError();
155
            VIR_ERROR(_("Failed to autostart VM '%s': %s"),
156
                      vm->def->name,
157
                      err ? err->message : _("unknown error"));
158
        }
159 160 161

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

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

168

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

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

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

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

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

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

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

217
    return 0;
218

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

225

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

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

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

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

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

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

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

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

270
    return caps;
271

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

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

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

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

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

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

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

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

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

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

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

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

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

358
    virResetLastError();
359

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

475 476 477 478 479
    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 已提交
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 509
    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;
510 511
    }

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

520
    VIR_FREE(base);
521

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

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

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

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

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

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

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

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

599
        qemu_driver->hugepage_path = mempath;
600
    }
601

602 603 604 605 606 607 608
    /* 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;
609

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

614
    qemuProcessReconnectAll(conn, qemu_driver);
615

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

624

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

628 629 630
    qemu_driver->workerPool = virThreadPoolNew(0, 1, processWatchdogEvent, qemu_driver);
    if (!qemu_driver->workerPool)
        goto error;
631

632 633 634 635
    qemuDriverUnlock(qemu_driver);

    qemuAutostartDomains(qemu_driver);

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

639
    return 0;
640

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

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

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

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

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

687
    qemuAutostartDomains(qemu_driver);
688

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

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

704 705
    if (!qemu_driver)
        return 0;
706

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

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

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

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

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

733
    virSysinfoDefFree(qemu_driver->hostsysinfo);
734

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

756
    virSecurityManagerFree(qemu_driver->securityManager);
757

758
    ebtablesContextFree(qemu_driver->ebtables);
759

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

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

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

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

776
    virCgroupFree(&qemu_driver->cgroup);
777

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

783
    return 0;
784 785
}

786 787 788 789 790 791 792

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


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

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

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

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

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

    return VIR_DRV_OPEN_SUCCESS;
}

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

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

    conn->privateData = NULL;

    return 0;
}

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

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

884

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


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

    int r, fd;
902

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

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

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


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

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

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

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

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

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

952

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

958
    qemuDriverLock(driver);
959

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

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

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

cleanup:
973
    qemuDriverUnlock(driver);
974

975
    return xml;
976 977 978
}


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

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

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

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

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

D
Daniel P. Berrange 已提交
1033

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

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

    return 0;
}


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

1120 1121 1122 1123 1124 1125 1126 1127 1128 1129 1130

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

1239
    virCheckFlags(VIR_DOMAIN_START_PAUSED, NULL);
1240

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

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

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

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

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

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

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

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

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

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

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

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

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


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

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

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

    priv = vm->privateData;

1327
    if (priv->jobActive == QEMU_JOB_MIGRATION_OUT) {
1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 1341
        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"));
1342
            goto endjob;
1343
        }
1344
        if (vm->state != VIR_DOMAIN_PAUSED) {
1345
            if (qemuProcessStopCPUs(driver, vm) < 0) {
1346
                goto endjob;
1347
            }
1348 1349 1350 1351 1352 1353 1354
            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 已提交
1355
    }
1356

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

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

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


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

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

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

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

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

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

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


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

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

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

1444 1445 1446
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

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

1453
    priv = vm->privateData;
1454 1455 1456
    qemuDomainObjEnterMonitor(vm);
    ret = qemuMonitorSystemPowerdown(priv->mon);
    qemuDomainObjExitMonitor(vm);
1457

1458
endjob:
1459 1460
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
1461

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


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

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

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

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

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

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

1508
endjob:
1509 1510 1511
    if (vm &&
        qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
1512

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


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

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

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

cleanup:
1543 1544
    if (vm)
        virDomainObjUnlock(vm);
1545 1546 1547
    return type;
}

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

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

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

1566
    ret = vm->def->mem.max_balloon;
1567 1568

cleanup:
1569 1570
    if (vm)
        virDomainObjUnlock(vm);
1571
    return ret;
1572 1573
}

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

1583
    virCheckFlags(VIR_DOMAIN_MEM_LIVE |
1584 1585
                  VIR_DOMAIN_MEM_CONFIG |
                  VIR_DOMAIN_MEM_MAXIMUM, -1);
1586

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

1598 1599 1600
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

1601 1602 1603 1604 1605 1606 1607 1608
    isActive = virDomainObjIsActive(vm);

    if (flags == VIR_DOMAIN_MEM_CURRENT) {
        if (isActive)
            flags = VIR_DOMAIN_MEM_LIVE;
        else
            flags = VIR_DOMAIN_MEM_CONFIG;
    }
1609 1610 1611 1612 1613 1614
    if (flags == VIR_DOMAIN_MEM_MAXIMUM) {
        if (isActive)
            flags = VIR_DOMAIN_MEM_LIVE | VIR_DOMAIN_MEM_MAXIMUM;
        else
            flags = VIR_DOMAIN_MEM_CONFIG | VIR_DOMAIN_MEM_MAXIMUM;
    }
1615 1616

    if (!isActive && (flags & VIR_DOMAIN_MEM_LIVE)) {
1617 1618 1619 1620 1621
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }

1622 1623 1624 1625 1626 1627 1628 1629 1630
    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;
    }
1631

1632 1633 1634 1635 1636 1637 1638
    if (flags & VIR_DOMAIN_MEM_MAXIMUM) {
        /* resize the maximum memory */

        if (flags & VIR_DOMAIN_MEM_LIVE) {
            qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                            _("cannot resize the maximum memory on an "
                              "active domain"));
1639
            goto endjob;
1640
        }
1641

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

1650 1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661 1662 1663 1664 1665 1666 1667 1668 1669 1670 1671 1672 1673 1674 1675 1676 1677 1678 1679 1680 1681
    } else {
        /* resize the current memory */

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

        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);
            goto endjob;
        }
1682
    }
1683

1684
    ret = 0;
1685
endjob:
1686 1687
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
1688

1689
cleanup:
1690 1691
    if (vm)
        virDomainObjUnlock(vm);
1692
    return ret;
1693 1694
}

1695 1696
static int qemudDomainSetMemory(virDomainPtr dom, unsigned long newmem)
{
1697 1698 1699
    return qemudDomainSetMemoryFlags(dom, newmem, VIR_DOMAIN_MEM_LIVE);
}

1700 1701 1702 1703 1704
static int qemudDomainSetMaxMemory(virDomainPtr dom, unsigned long memory)
{
    return qemudDomainSetMemoryFlags(dom, memory, VIR_DOMAIN_MEM_MAXIMUM);
}

1705
static int qemudDomainGetInfo(virDomainPtr dom,
1706 1707
                              virDomainInfoPtr info)
{
1708 1709 1710
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1711 1712
    int err;
    unsigned long balloon;
1713

1714
    qemuDriverLock(driver);
1715
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1716
    qemuDriverUnlock(driver);
D
Daniel P. Berrange 已提交
1717
    if (!vm) {
1718 1719
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1720 1721
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1722
        goto cleanup;
D
Daniel P. Berrange 已提交
1723 1724
    }

1725
    info->state = vm->state;
D
Daniel P. Berrange 已提交
1726

D
Daniel P. Berrange 已提交
1727
    if (!virDomainObjIsActive(vm)) {
1728
        info->cpuTime = 0;
D
Daniel P. Berrange 已提交
1729
    } else {
1730
        if (qemudGetProcessInfo(&(info->cpuTime), NULL, vm->pid, 0) < 0) {
E
Eric Blake 已提交
1731 1732
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("cannot read cputime for domain"));
1733
            goto cleanup;
D
Daniel P. Berrange 已提交
1734 1735 1736
        }
    }

1737
    info->maxMem = vm->def->mem.max_balloon;
1738

D
Daniel P. Berrange 已提交
1739
    if (virDomainObjIsActive(vm)) {
1740
        qemuDomainObjPrivatePtr priv = vm->privateData;
1741 1742 1743

        if ((vm->def->memballoon != NULL) &&
            (vm->def->memballoon->model == VIR_DOMAIN_MEMBALLOON_MODEL_NONE)) {
1744
            info->memory = vm->def->mem.max_balloon;
1745
        } else if (!priv->jobActive) {
1746 1747
            if (qemuDomainObjBeginJob(vm) < 0)
                goto cleanup;
1748 1749 1750 1751 1752 1753 1754 1755 1756
            if (!virDomainObjIsActive(vm))
                err = 0;
            else {
                qemuDomainObjEnterMonitor(vm);
                err = qemuMonitorGetBalloonInfo(priv->mon, &balloon);
                qemuDomainObjExitMonitor(vm);
            }
            if (qemuDomainObjEndJob(vm) == 0) {
                vm = NULL;
1757 1758 1759
                goto cleanup;
            }

1760 1761
            if (err < 0)
                goto cleanup;
1762 1763
            if (err == 0)
                /* Balloon not supported, so maxmem is always the allocation */
1764
                info->memory = vm->def->mem.max_balloon;
1765 1766 1767
            else
                info->memory = balloon;
        } else {
1768
            info->memory = vm->def->mem.cur_balloon;
1769
        }
1770
    } else {
1771
        info->memory = vm->def->mem.cur_balloon;
1772 1773
    }

1774
    info->nrVirtCpu = vm->def->vcpus;
1775 1776 1777
    ret = 0;

cleanup:
1778 1779
    if (vm)
        virDomainObjUnlock(vm);
1780
    return ret;
D
Daniel P. Berrange 已提交
1781 1782 1783
}


1784
#define QEMUD_SAVE_MAGIC "LibvirtQemudSave"
1785 1786 1787
#define QEMUD_SAVE_VERSION 2

enum qemud_save_formats {
1788 1789 1790
    QEMUD_SAVE_FORMAT_RAW = 0,
    QEMUD_SAVE_FORMAT_GZIP = 1,
    QEMUD_SAVE_FORMAT_BZIP2 = 2,
1791 1792
    /*
     * Deprecated by xz and never used as part of a release
1793
     * QEMUD_SAVE_FORMAT_LZMA
1794 1795
     */
    QEMUD_SAVE_FORMAT_XZ = 3,
1796
    QEMUD_SAVE_FORMAT_LZOP = 4,
1797 1798 1799
    /* Note: add new members only at the end.
       These values are used in the on-disk format.
       Do not change or re-use numbers. */
1800 1801

    QEMUD_SAVE_FORMAT_LAST
1802
};
1803

1804 1805 1806 1807 1808
VIR_ENUM_DECL(qemudSaveCompression)
VIR_ENUM_IMPL(qemudSaveCompression, QEMUD_SAVE_FORMAT_LAST,
              "raw",
              "gzip",
              "bzip2",
1809 1810
              "xz",
              "lzop")
1811

1812 1813
struct qemud_save_header {
    char magic[sizeof(QEMUD_SAVE_MAGIC)-1];
1814 1815 1816 1817 1818
    uint32_t version;
    uint32_t xml_len;
    uint32_t was_running;
    uint32_t compressed;
    uint32_t unused[15];
1819 1820
};

1821 1822 1823 1824 1825 1826 1827 1828 1829
static inline void
bswap_header(struct qemud_save_header *hdr) {
    hdr->version = bswap_32(hdr->version);
    hdr->xml_len = bswap_32(hdr->xml_len);
    hdr->was_running = bswap_32(hdr->was_running);
    hdr->compressed = bswap_32(hdr->compressed);
}


1830
/* return -errno on failure, or 0 on success */
E
Eric Blake 已提交
1831 1832 1833 1834
static int
qemuDomainSaveHeader(int fd, const char *path, char *xml,
                     struct qemud_save_header *header)
{
1835 1836
    int ret = 0;

E
Eric Blake 已提交
1837
    if (safewrite(fd, header, sizeof(*header)) != sizeof(*header)) {
1838
        ret = -errno;
1839
        qemuReportError(VIR_ERR_OPERATION_FAILED,
1840
                        _("failed to write header to domain save file '%s'"),
E
Eric Blake 已提交
1841
                        path);
1842 1843 1844
        goto endjob;
    }

E
Eric Blake 已提交
1845
    if (safewrite(fd, xml, header->xml_len) != header->xml_len) {
1846
        ret = -errno;
1847
        qemuReportError(VIR_ERR_OPERATION_FAILED,
E
Eric Blake 已提交
1848
                         _("failed to write xml to '%s'"), path);
1849 1850 1851 1852 1853 1854
        goto endjob;
    }
endjob:
    return ret;
}

1855 1856 1857 1858 1859 1860 1861 1862 1863
/* 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));
}

1864 1865 1866
/* This internal function expects the driver lock to already be held on
 * entry and the vm must be active.
 */
1867 1868
static int qemudDomainSaveFlag(struct qemud_driver *driver, virDomainPtr dom,
                               virDomainObjPtr vm, const char *path,
1869
                               int compressed)
1870
{
1871
    char *xml = NULL;
1872
    struct qemud_save_header header;
1873
    bool bypassSecurityDriver = false;
1874
    int ret = -1;
1875
    int rc;
1876
    virDomainEventPtr event = NULL;
1877
    qemuDomainObjPrivatePtr priv;
1878
    struct stat sb;
1879
    bool is_reg = false;
1880
    unsigned long long offset;
1881
    virBitmapPtr qemuCaps = NULL;
1882
    int fd = -1;
1883 1884 1885 1886 1887

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

1888
    header.compressed = compressed;
1889

1890
    priv = vm->privateData;
1891

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

O
Osier Yang 已提交
1895 1896
    priv->jobActive = QEMU_JOB_SAVE;

1897 1898 1899
    memset(&priv->jobInfo, 0, sizeof(priv->jobInfo));
    priv->jobInfo.type = VIR_DOMAIN_JOB_UNBOUNDED;

1900 1901 1902
    /* Pause */
    if (vm->state == VIR_DOMAIN_RUNNING) {
        header.was_running = 1;
1903
        if (qemuProcessStopCPUs(driver, vm) < 0)
1904
            goto endjob;
1905 1906 1907 1908 1909 1910

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

1913 1914 1915 1916 1917
    if (qemuCapsExtractVersionInfo(vm->def->emulator, vm->def->os.arch,
                                   NULL,
                                   &qemuCaps) < 0)
        goto endjob;

1918
    /* Get XML for the domain */
1919
    xml = virDomainDefFormat(vm->def, VIR_DOMAIN_XML_SECURE);
1920
    if (!xml) {
1921 1922
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to get domain xml"));
1923
        goto endjob;
1924 1925 1926
    }
    header.xml_len = strlen(xml) + 1;

1927 1928 1929 1930 1931 1932 1933 1934
    /* 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 */
1935
        is_reg = true;
1936
    } else {
1937
        is_reg = !!S_ISREG(sb.st_mode);
1938 1939
    }

1940 1941 1942 1943 1944
    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
1945 1946
     * it by padding the XML string with NULLs.
     */
1947 1948 1949 1950 1951 1952 1953 1954 1955 1956 1957 1958 1959
    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;
    }
1960

1961
    /* Obtain the file handle.  */
1962

1963
    /* First try creating the file as root */
1964
    if (!is_reg) {
1965
        fd = open(path, O_WRONLY | O_TRUNC);
1966 1967
        if (fd < 0) {
            virReportSystemError(errno, _("unable to open %s"), path);
1968 1969
            goto endjob;
        }
1970
    } else {
1971 1972 1973
        if ((fd = virFileOpenAs(path, O_CREAT|O_TRUNC|O_WRONLY,
                                S_IRUSR|S_IWUSR,
                                getuid(), getgid(), 0)) < 0) {
1974
            /* If we failed as root, and the error was permission-denied
1975 1976
               (EACCES or EPERM), assume it's on a network-connected share
               where root access is restricted (eg, root-squashed NFS). If the
1977 1978 1979
               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 */
1980
            rc = fd;
1981
            if (((rc != -EACCES) && (rc != -EPERM)) ||
1982
                driver->user == getuid()) {
1983 1984
                virReportSystemError(-rc,
                                    _("Failed to create domain save file '%s'"),
1985 1986 1987
                                     path);
                goto endjob;
            }
1988

1989
            /* On Linux we can also verify the FS-type of the directory. */
1990 1991 1992 1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006
            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:
2007
                   /* local file - log the error returned by virFileOpenAs */
2008
                   virReportSystemError(-rc,
2009
                                    _("Failed to create domain save file '%s'"),
2010 2011 2012
                                        path);
                   goto endjob;
                   break;
2013 2014 2015

            }

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

2018 2019 2020 2021
            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) {
2022 2023 2024
                virReportSystemError(-fd,
                                   _("Error from child process creating '%s'"),
                                     path);
2025 2026
                goto endjob;
            }
2027

2028 2029 2030
            /* 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 */
2031

2032
            bypassSecurityDriver = true;
2033
        }
2034
    }
2035

2036
    /* Write header to file, followed by XML */
E
Eric Blake 已提交
2037
    if (qemuDomainSaveHeader(fd, path, xml, &header) < 0) {
2038 2039 2040 2041
        VIR_FORCE_CLOSE(fd);
        goto endjob;
    }

2042 2043 2044 2045
    /* Perform the migration */
    if (qemuMigrationToFile(driver, vm, qemuCaps, fd, offset, path,
                            qemuCompressProgramName(compressed),
                            is_reg, bypassSecurityDriver) < 0)
2046
        goto endjob;
2047 2048
    if (VIR_CLOSE(fd) < 0) {
        virReportSystemError(errno, _("unable to close %s"), path);
2049
        goto endjob;
2050 2051
    }

2052 2053
    ret = 0;

2054
    /* Shut it down */
2055
    qemuProcessStop(driver, vm, 0);
2056
    qemuAuditDomainStop(vm, "saved");
2057 2058 2059
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STOPPED,
                                     VIR_DOMAIN_EVENT_STOPPED_SAVED);
2060
    if (!vm->persistent) {
2061 2062 2063
        if (qemuDomainObjEndJob(vm) > 0)
            virDomainRemoveInactive(&driver->domains,
                                    vm);
2064 2065
        vm = NULL;
    }
2066

2067
endjob:
2068
    if (vm) {
2069
        if (ret != 0) {
2070
            if (header.was_running && virDomainObjIsActive(vm)) {
2071
                rc = qemuProcessStartCPUs(driver, vm, dom->conn);
2072 2073 2074
                if (rc < 0)
                    VIR_WARN0("Unable to resume guest CPUs after save failure");
            }
2075
        }
2076
        if (qemuDomainObjEndJob(vm) == 0)
2077
            vm = NULL;
2078
    }
2079

2080
cleanup:
2081
    qemuCapsFree(qemuCaps);
2082
    VIR_FORCE_CLOSE(fd);
2083
    VIR_FREE(xml);
2084
    if (ret != 0 && is_reg)
2085
        unlink(path);
2086 2087
    if (event)
        qemuDomainEventQueue(driver, event);
2088
    return ret;
D
Daniel P. Berrange 已提交
2089 2090
}

2091 2092 2093 2094 2095 2096 2097 2098 2099 2100 2101 2102 2103 2104 2105 2106
/* 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;
}

2107 2108 2109 2110
static int qemudDomainSave(virDomainPtr dom, const char *path)
{
    struct qemud_driver *driver = dom->conn->privateData;
    int compressed;
2111 2112 2113 2114
    int ret = -1;
    virDomainObjPtr vm = NULL;

    qemuDriverLock(driver);
2115 2116 2117 2118 2119 2120 2121 2122 2123

    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"));
2124
            goto cleanup;
2125
        }
2126 2127 2128 2129
        if (!qemudCompressProgramAvailable(compressed)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("Compression program for image format "
                                    "in configuration file isn't available"));
2130
            goto cleanup;
2131
        }
2132 2133
    }

2134 2135 2136 2137 2138 2139 2140 2141 2142
    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;
    }

2143 2144 2145 2146 2147 2148
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

2149 2150 2151 2152 2153 2154 2155 2156
    ret = qemudDomainSaveFlag(driver, dom, vm, path, compressed);

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

    return ret;
2157 2158 2159 2160 2161 2162 2163 2164 2165 2166 2167 2168 2169 2170 2171 2172 2173 2174 2175 2176 2177 2178 2179
}

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;

2180
    virCheckFlags(0, -1);
2181 2182 2183 2184 2185 2186 2187 2188

    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);
2189
        goto cleanup;
2190 2191
    }

2192 2193 2194 2195 2196 2197
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

2198 2199
    name = qemuDomainManagedSavePath(driver, vm);
    if (name == NULL)
2200
        goto cleanup;
2201

2202
    VIR_INFO("Saving state to %s", name);
2203 2204

    compressed = QEMUD_SAVE_FORMAT_RAW;
2205
    ret = qemudDomainSaveFlag(driver, dom, vm, name, compressed);
2206 2207 2208 2209 2210

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
2211 2212 2213
    VIR_FREE(name);

    return ret;
2214 2215 2216 2217 2218 2219 2220 2221 2222 2223
}

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

2224
    virCheckFlags(0, -1);
2225 2226 2227 2228 2229 2230 2231 2232 2233 2234 2235 2236 2237 2238 2239 2240 2241 2242 2243 2244 2245 2246 2247 2248 2249 2250 2251 2252 2253 2254 2255 2256 2257

    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;

2258
    virCheckFlags(0, -1);
2259 2260 2261 2262 2263 2264 2265 2266 2267 2268 2269 2270 2271 2272 2273 2274 2275 2276 2277 2278 2279 2280 2281 2282

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

H
Hu Tao 已提交
2284 2285 2286 2287 2288 2289 2290 2291 2292 2293 2294 2295 2296 2297 2298
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;
    }

2299 2300 2301 2302
    if (qemuMigrationToFile(driver, vm, NULL, fd, 0, path,
                            qemuCompressProgramName(compress), true, false) < 0)
        goto cleanup;

H
Hu Tao 已提交
2303 2304 2305 2306 2307 2308 2309
    if (VIR_CLOSE(fd) < 0) {
        virReportSystemError(errno,
                             _("unable to save file %s"),
                             path);
        goto cleanup;
    }

2310
    ret = 0;
H
Hu Tao 已提交
2311 2312 2313 2314 2315 2316 2317

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

2318 2319 2320 2321 2322
static enum qemud_save_formats
getCompressionType(struct qemud_driver *driver)
{
    int compress = QEMUD_SAVE_FORMAT_RAW;

2323 2324 2325 2326 2327 2328 2329
    /*
     * 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) {
2330 2331 2332 2333
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("Invalid dump image format specified in "
                              "configuration file, using raw"));
            return QEMUD_SAVE_FORMAT_RAW;
2334
        }
2335 2336 2337
        if (!qemudCompressProgramAvailable(compress)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("Compression program for dump image format "
2338 2339 2340
                                    "in configuration file isn't available, "
                                    "using raw"));
            return QEMUD_SAVE_FORMAT_RAW;
2341
        }
2342
    }
2343 2344 2345 2346 2347 2348 2349 2350 2351
    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 已提交
2352
    int ret = -1;
2353 2354 2355
    virDomainEventPtr event = NULL;
    qemuDomainObjPrivatePtr priv;

P
Paolo Bonzini 已提交
2356 2357 2358 2359 2360 2361
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
2362 2363
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
P
Paolo Bonzini 已提交
2364 2365
        goto cleanup;
    }
2366
    priv = vm->privateData;
P
Paolo Bonzini 已提交
2367

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

D
Daniel P. Berrange 已提交
2371
    if (!virDomainObjIsActive(vm)) {
2372 2373
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
2374
        goto endjob;
P
Paolo Bonzini 已提交
2375 2376
    }

O
Osier Yang 已提交
2377 2378
    priv->jobActive = QEMU_JOB_DUMP;

P
Paolo Bonzini 已提交
2379 2380
    /* Migrate will always stop the VM, so the resume condition is
       independent of whether the stop command is issued.  */
P
Paolo Bonzini 已提交
2381 2382 2383
    resume = (vm->state == VIR_DOMAIN_RUNNING);

    /* Pause domain for non-live dump */
P
Paolo Bonzini 已提交
2384
    if (!(flags & VIR_DUMP_LIVE) && vm->state == VIR_DOMAIN_RUNNING) {
2385
        if (qemuProcessStopCPUs(driver, vm) < 0)
2386
            goto endjob;
P
Paolo Bonzini 已提交
2387
        paused = 1;
2388 2389 2390 2391 2392 2393

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

H
Hu Tao 已提交
2396
    ret = doCoreDump(driver, vm, path, getCompressionType(driver));
2397 2398 2399 2400
    if (ret < 0)
        goto endjob;

    paused = 1;
2401 2402

endjob:
2403
    if ((ret == 0) && (flags & VIR_DUMP_CRASH)) {
2404
        qemuProcessStop(driver, vm, 0);
2405
        qemuAuditDomainStop(vm, "crashed");
2406 2407 2408 2409 2410
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_STOPPED,
                                         VIR_DOMAIN_EVENT_STOPPED_CRASHED);
    }

P
Paolo Bonzini 已提交
2411 2412 2413
    /* 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.  */
2414
    else if (resume && paused && virDomainObjIsActive(vm)) {
2415
        if (qemuProcessStartCPUs(driver, vm, dom->conn) < 0) {
2416
            if (virGetLastError() == NULL)
2417 2418
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("resuming after dump failed"));
P
Paolo Bonzini 已提交
2419 2420
        }
    }
2421

2422 2423
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
2424
    else if ((ret == 0) && (flags & VIR_DUMP_CRASH) && !vm->persistent) {
2425 2426 2427 2428
        virDomainRemoveInactive(&driver->domains,
                                vm);
        vm = NULL;
    }
2429 2430

cleanup:
P
Paolo Bonzini 已提交
2431 2432
    if (vm)
        virDomainObjUnlock(vm);
2433 2434
    if (event)
        qemuDomainEventQueue(driver, event);
2435
    qemuDriverUnlock(driver);
P
Paolo Bonzini 已提交
2436 2437 2438
    return ret;
}

H
Hu Tao 已提交
2439 2440 2441
static void processWatchdogEvent(void *data, void *opaque)
{
    int ret;
2442
    struct qemuDomainWatchdogEvent *wdEvent = data;
H
Hu Tao 已提交
2443 2444 2445 2446 2447 2448 2449
    struct qemud_driver *driver = opaque;

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

E
Eric Blake 已提交
2450
            if (virAsprintf(&dumpfile, "%s/%s-%u",
H
Hu Tao 已提交
2451 2452
                            driver->autoDumpPath,
                            wdEvent->vm->def->name,
E
Eric Blake 已提交
2453 2454 2455 2456
                            (unsigned int)time(NULL)) < 0) {
                virReportOOMError();
                break;
            }
H
Hu Tao 已提交
2457 2458 2459 2460 2461 2462 2463 2464 2465 2466 2467 2468 2469 2470 2471 2472 2473 2474 2475 2476 2477

            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"));

2478
            ret = qemuProcessStartCPUs(driver, wdEvent->vm, NULL);
H
Hu Tao 已提交
2479 2480 2481 2482 2483 2484 2485 2486 2487 2488 2489 2490 2491 2492 2493 2494 2495

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

2497 2498 2499
static int qemudDomainHotplugVcpus(virDomainObjPtr vm, unsigned int nvcpus)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
2500
    int i, rc = 1;
2501
    int ret = -1;
2502
    int oldvcpus = vm->def->vcpus;
E
Eric Blake 已提交
2503
    int vcpus = oldvcpus;
2504

2505 2506
    qemuDomainObjEnterMonitor(vm);

2507 2508 2509
    /* 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 已提交
2510 2511
    if (nvcpus > vcpus) {
        for (i = vcpus ; i < nvcpus ; i++) {
2512 2513 2514 2515 2516 2517 2518
            /* Online new CPU */
            rc = qemuMonitorSetCPU(priv->mon, i, 1);
            if (rc == 0)
                goto unsupported;
            if (rc < 0)
                goto cleanup;

E
Eric Blake 已提交
2519
            vcpus++;
2520 2521
        }
    } else {
E
Eric Blake 已提交
2522
        for (i = vcpus - 1 ; i >= nvcpus ; i--) {
2523 2524 2525 2526 2527 2528 2529
            /* Offline old CPU */
            rc = qemuMonitorSetCPU(priv->mon, i, 0);
            if (rc == 0)
                goto unsupported;
            if (rc < 0)
                goto cleanup;

E
Eric Blake 已提交
2530
            vcpus--;
2531 2532 2533 2534 2535 2536
        }
    }

    ret = 0;

cleanup:
2537
    qemuDomainObjExitMonitor(vm);
E
Eric Blake 已提交
2538
    vm->def->vcpus = vcpus;
2539
    qemuAuditVcpu(vm, oldvcpus, nvcpus, "update", rc == 1);
2540 2541 2542 2543 2544 2545 2546 2547 2548
    return ret;

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


2549 2550 2551 2552
static int
qemudDomainSetVcpusFlags(virDomainPtr dom, unsigned int nvcpus,
                         unsigned int flags)
{
2553 2554
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2555
    virDomainDefPtr persistentDef;
2556 2557
    const char * type;
    int max;
2558
    int ret = -1;
2559

2560 2561 2562 2563 2564 2565 2566 2567 2568 2569 2570 2571 2572 2573 2574 2575
    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);
2576 2577 2578
        return -1;
    }

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

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

2591 2592 2593
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

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

2600 2601 2602 2603 2604 2605
    if (!vm->persistent && (flags & VIR_DOMAIN_VCPU_CONFIG)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("cannot change persistent config of a transient domain"));
        goto endjob;
    }

2606 2607 2608 2609 2610 2611 2612 2613 2614 2615 2616 2617 2618
    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 已提交
2619
    if (!(flags & VIR_DOMAIN_VCPU_MAXIMUM) && vm->def->maxvcpus < max) {
2620 2621 2622
        max = vm->def->maxvcpus;
    }

2623 2624 2625 2626 2627 2628 2629
    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;
    }

2630 2631 2632
    if (!(persistentDef = virDomainObjGetPersistentDef(driver->caps, vm)))
        goto endjob;

2633 2634
    switch (flags) {
    case VIR_DOMAIN_VCPU_MAXIMUM | VIR_DOMAIN_VCPU_CONFIG:
2635 2636 2637
        persistentDef->maxvcpus = nvcpus;
        if (nvcpus < persistentDef->vcpus)
            persistentDef->vcpus = nvcpus;
2638 2639 2640 2641
        ret = 0;
        break;

    case VIR_DOMAIN_VCPU_CONFIG:
2642
        persistentDef->vcpus = nvcpus;
2643 2644 2645 2646 2647 2648 2649 2650 2651
        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);
2652 2653 2654
        if (ret == 0) {
            persistentDef->vcpus = nvcpus;
        }
2655 2656
        break;
    }
2657

2658 2659 2660 2661
    /* Save the persistent config to disk */
    if (flags & VIR_DOMAIN_VCPU_CONFIG)
        ret = virDomainSaveConfig(driver->configDir, persistentDef);

2662 2663 2664
endjob:
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
2665

2666
cleanup:
2667 2668
    if (vm)
        virDomainObjUnlock(vm);
2669
    return ret;
2670 2671
}

2672 2673 2674 2675 2676 2677
static int
qemudDomainSetVcpus(virDomainPtr dom, unsigned int nvcpus)
{
    return qemudDomainSetVcpusFlags(dom, nvcpus, VIR_DOMAIN_VCPU_LIVE);
}

2678 2679 2680 2681 2682 2683

static int
qemudDomainPinVcpu(virDomainPtr dom,
                   unsigned int vcpu,
                   unsigned char *cpumap,
                   int maplen) {
2684 2685
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2686
    int maxcpu, hostcpus;
2687
    virNodeInfo nodeinfo;
2688
    int ret = -1;
2689
    qemuDomainObjPrivatePtr priv;
2690

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

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

D
Daniel P. Berrange 已提交
2703
    if (!virDomainObjIsActive(vm)) {
2704 2705
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s",_("cannot pin vcpus on an inactive domain"));
2706
        goto cleanup;
2707 2708
    }

2709 2710 2711
    priv = vm->privateData;

    if (vcpu > (priv->nvcpupids-1)) {
2712 2713 2714
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("vcpu number out of range %d > %d"),
                        vcpu, priv->nvcpupids);
2715
        goto cleanup;
2716 2717
    }

2718
    if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
2719
        goto cleanup;
2720

2721
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
2722
    maxcpu = maplen * 8;
2723 2724
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;
2725

2726 2727
    if (priv->vcpupids != NULL) {
        if (virProcessInfoSetAffinity(priv->vcpupids[vcpu],
2728
                                      cpumap, maplen, maxcpu) < 0)
2729
            goto cleanup;
2730
    } else {
2731 2732
        qemuReportError(VIR_ERR_NO_SUPPORT,
                        "%s", _("cpu affinity is not supported"));
2733
        goto cleanup;
2734
    }
2735 2736 2737 2738 2739 2740 2741

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

2742
    ret = 0;
2743

2744
cleanup:
2745 2746
    if (vm)
        virDomainObjUnlock(vm);
2747
    return ret;
2748 2749 2750 2751 2752 2753 2754 2755
}

static int
qemudDomainGetVcpus(virDomainPtr dom,
                    virVcpuInfoPtr info,
                    int maxinfo,
                    unsigned char *cpumaps,
                    int maplen) {
2756 2757
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2758
    virNodeInfo nodeinfo;
2759
    int i, v, maxcpu, hostcpus;
2760
    int ret = -1;
2761
    qemuDomainObjPrivatePtr priv;
2762

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

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

D
Daniel P. Berrange 已提交
2775
    if (!virDomainObjIsActive(vm)) {
2776 2777 2778
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s",
                        _("cannot list vcpu pinning for an inactive domain"));
2779
        goto cleanup;
2780 2781
    }

2782 2783
    priv = vm->privateData;

2784
    if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
2785
        goto cleanup;
2786

2787
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
2788
    maxcpu = maplen * 8;
2789 2790
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;
2791 2792

    /* Clamp to actual number of vcpus */
2793 2794
    if (maxinfo > priv->nvcpupids)
        maxinfo = priv->nvcpupids;
2795

2796 2797 2798 2799 2800 2801
    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;
2802

2803
                if (priv->vcpupids != NULL &&
2804 2805 2806
                    qemudGetProcessInfo(&(info[i].cpuTime),
                                        &(info[i].cpu),
                                        vm->pid,
2807
                                        priv->vcpupids[i]) < 0) {
2808
                    virReportSystemError(errno, "%s",
2809 2810 2811
                                         _("cannot get vCPU placement & pCPU time"));
                    goto cleanup;
                }
2812
            }
2813 2814
        }

2815 2816
        if (cpumaps != NULL) {
            memset(cpumaps, 0, maplen * maxinfo);
2817
            if (priv->vcpupids != NULL) {
2818 2819 2820
                for (v = 0 ; v < maxinfo ; v++) {
                    unsigned char *cpumap = VIR_GET_CPUMAP(cpumaps, maplen, v);

2821
                    if (virProcessInfoGetAffinity(priv->vcpupids[v],
2822
                                                  cpumap, maplen, maxcpu) < 0)
2823
                        goto cleanup;
2824
                }
2825
            } else {
2826 2827
                qemuReportError(VIR_ERR_NO_SUPPORT,
                                "%s", _("cpu affinity is not available"));
2828
                goto cleanup;
2829 2830 2831
            }
        }
    }
2832
    ret = maxinfo;
2833

2834
cleanup:
2835 2836
    if (vm)
        virDomainObjUnlock(vm);
2837
    return ret;
2838 2839 2840
}


2841 2842 2843
static int
qemudDomainGetVcpusFlags(virDomainPtr dom, unsigned int flags)
{
2844 2845
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2846
    virDomainDefPtr def;
2847
    int ret = -1;
2848

2849 2850 2851 2852 2853 2854 2855 2856
    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);
2857 2858 2859
        return -1;
    }

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

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

2872 2873 2874 2875 2876 2877 2878 2879 2880
    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;
2881 2882
    }

2883
    ret = (flags & VIR_DOMAIN_VCPU_MAXIMUM) ? def->maxvcpus : def->vcpus;
2884

2885
cleanup:
2886 2887
    if (vm)
        virDomainObjUnlock(vm);
2888 2889 2890
    return ret;
}

2891 2892 2893 2894 2895 2896 2897
static int
qemudDomainGetMaxVcpus(virDomainPtr dom)
{
    return qemudDomainGetVcpusFlags(dom, (VIR_DOMAIN_VCPU_LIVE |
                                          VIR_DOMAIN_VCPU_MAXIMUM));
}

2898 2899 2900 2901 2902 2903 2904 2905 2906
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);

2907 2908
    memset(seclabel, 0, sizeof(*seclabel));

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

2917
    if (!virDomainVirtTypeToString(vm->def->virtType)) {
2918 2919 2920
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("unknown virt type in domain definition '%d'"),
                        vm->def->virtType);
2921 2922 2923 2924 2925 2926 2927 2928 2929 2930 2931 2932 2933 2934 2935 2936 2937
        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 已提交
2938
    if (virDomainObjIsActive(vm)) {
2939 2940
        if (virSecurityManagerGetProcessLabel(driver->securityManager,
                                              vm, seclabel) < 0) {
2941 2942 2943
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            "%s", _("Failed to get security label"));
            goto cleanup;
2944 2945 2946 2947 2948 2949 2950 2951
        }
    }

    ret = 0;

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
2952
    qemuDriverUnlock(driver);
2953 2954 2955
    return ret;
}

2956 2957
static int qemudNodeGetSecurityModel(virConnectPtr conn,
                                     virSecurityModelPtr secmodel)
2958 2959 2960
{
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
    char *p;
2961
    int ret = 0;
2962

2963
    qemuDriverLock(driver);
2964 2965 2966 2967 2968
    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)
2969
        goto cleanup;
2970

2971 2972
    p = driver->caps->host.secModel.model;
    if (strlen(p) >= VIR_SECURITY_MODEL_BUFLEN-1) {
2973 2974 2975
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("security model string exceeds max %d bytes"),
                        VIR_SECURITY_MODEL_BUFLEN-1);
2976 2977
        ret = -1;
        goto cleanup;
2978 2979 2980 2981 2982
    }
    strcpy(secmodel->model, p);

    p = driver->caps->host.secModel.doi;
    if (strlen(p) >= VIR_SECURITY_DOI_BUFLEN-1) {
2983 2984 2985
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("security DOI string exceeds max %d bytes"),
                        VIR_SECURITY_DOI_BUFLEN-1);
2986 2987
        ret = -1;
        goto cleanup;
2988 2989
    }
    strcpy(secmodel->doi, p);
2990 2991 2992 2993

cleanup:
    qemuDriverUnlock(driver);
    return ret;
2994 2995
}

2996 2997 2998 2999 3000
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 已提交
3001 3002
{
    int fd;
3003
    struct qemud_save_header header;
J
Jiri Denemark 已提交
3004 3005
    char *xml = NULL;
    virDomainDefPtr def = NULL;
3006

3007 3008 3009
    if ((fd = virFileOpenAs(path, O_RDONLY, 0, getuid(), getgid(), 0)) < 0) {
        if ((fd != -EACCES && fd != -EPERM) ||
            driver->user == getuid()) {
3010 3011
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("cannot read domain image"));
J
Jiri Denemark 已提交
3012
            goto error;
3013 3014 3015
        }

        /* Opening as root failed, but qemu runs as a different user
3016 3017 3018 3019 3020 3021
         * 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 已提交
3022
            goto error;
3023
        }
3024 3025 3026
    }

    if (saferead(fd, &header, sizeof(header)) != sizeof(header)) {
3027 3028
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to read qemu header"));
J
Jiri Denemark 已提交
3029
        goto error;
3030 3031 3032
    }

    if (memcmp(header.magic, QEMUD_SAVE_MAGIC, sizeof(header.magic)) != 0) {
3033 3034
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("image magic is incorrect"));
J
Jiri Denemark 已提交
3035
        goto error;
3036 3037 3038
    }

    if (header.version > QEMUD_SAVE_VERSION) {
3039 3040 3041 3042 3043
        /* convert endianess and try again */
        bswap_header(&header);
    }

    if (header.version > QEMUD_SAVE_VERSION) {
3044 3045 3046
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("image version is not supported (%d > %d)"),
                        header.version, QEMUD_SAVE_VERSION);
J
Jiri Denemark 已提交
3047
        goto error;
3048 3049
    }

3050 3051 3052
    if (header.xml_len <= 0) {
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("invalid XML length: %d"), header.xml_len);
J
Jiri Denemark 已提交
3053
        goto error;
3054 3055
    }

3056 3057
    if (VIR_ALLOC_N(xml, header.xml_len) < 0) {
        virReportOOMError();
J
Jiri Denemark 已提交
3058
        goto error;
3059 3060 3061
    }

    if (saferead(fd, xml, header.xml_len) != header.xml_len) {
3062 3063
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to read XML"));
J
Jiri Denemark 已提交
3064
        goto error;
3065 3066 3067
    }

    /* Create a domain from this XML */
3068
    if (!(def = virDomainDefParseString(driver->caps, xml,
3069
                                        VIR_DOMAIN_XML_INACTIVE)))
J
Jiri Denemark 已提交
3070
        goto error;
3071

J
Jiri Denemark 已提交
3072
    VIR_FREE(xml);
3073

J
Jiri Denemark 已提交
3074 3075
    *ret_def = def;
    *ret_header = header;
3076

J
Jiri Denemark 已提交
3077
    return fd;
3078

J
Jiri Denemark 已提交
3079 3080 3081
error:
    virDomainDefFree(def);
    VIR_FREE(xml);
3082
    VIR_FORCE_CLOSE(fd);
J
Jiri Denemark 已提交
3083 3084 3085 3086

    return -1;
}

3087 3088 3089 3090 3091 3092 3093
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 已提交
3094 3095 3096 3097 3098 3099 3100 3101
{
    int ret = -1;
    virDomainEventPtr event;
    int intermediatefd = -1;
    pid_t intermediate_pid = -1;
    int childstat;

    if (header->version == 2) {
3102
        const char *intermediate_argv[3] = { NULL, "-dc", NULL };
J
Jiri Denemark 已提交
3103
        const char *prog = qemudSaveCompressionTypeToString(header->compressed);
3104
        if (prog == NULL) {
3105 3106
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            _("Invalid compressed save format %d"),
J
Jiri Denemark 已提交
3107 3108
                            header->compressed);
            goto out;
3109
        }
3110

J
Jiri Denemark 已提交
3111
        if (header->compressed != QEMUD_SAVE_FORMAT_RAW) {
3112
            intermediate_argv[0] = prog;
3113 3114
            intermediatefd = *fd;
            *fd = -1;
3115
            if (virExec(intermediate_argv, NULL, NULL,
3116
                        &intermediate_pid, intermediatefd, fd, NULL, 0) < 0) {
3117 3118 3119
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("Failed to start decompression binary %s"),
                                intermediate_argv[0]);
3120
                *fd = intermediatefd;
J
Jiri Denemark 已提交
3121
                goto out;
3122 3123 3124
            }
        }
    }
J
Jiri Denemark 已提交
3125

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

3130
    if (intermediate_pid != -1) {
3131
        if (ret < 0) {
3132 3133 3134
            /* if there was an error setting up qemu, the intermediate
             * process will wait forever to write to stdout, so we
             * must manually kill it.
3135 3136
             */
            VIR_FORCE_CLOSE(intermediatefd);
3137
            VIR_FORCE_CLOSE(*fd);
3138 3139 3140
            kill(intermediate_pid, SIGTERM);
        }

3141 3142
        /* Wait for intermediate process to exit */
        while (waitpid(intermediate_pid, &childstat, 0) == -1 &&
J
Jiri Denemark 已提交
3143 3144 3145
               errno == EINTR) {
            /* empty */
        }
3146
    }
3147
    VIR_FORCE_CLOSE(intermediatefd);
J
Jiri Denemark 已提交
3148

3149 3150 3151
    if (VIR_CLOSE(*fd) < 0) {
        virReportSystemError(errno, _("cannot close file: %s"), path);
        ret = -1;
3152
    }
J
Jiri Denemark 已提交
3153

3154
    if (ret < 0) {
3155
        qemuAuditDomainStart(vm, "restored", false);
J
Jiri Denemark 已提交
3156
        goto out;
3157
    }
3158

3159 3160 3161
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_RESTORED);
3162
    qemuAuditDomainStart(vm, "restored", true);
J
Jiri Denemark 已提交
3163 3164 3165
    if (event)
        qemuDomainEventQueue(driver, event);

3166

3167
    /* If it was running before, resume it now. */
J
Jiri Denemark 已提交
3168
    if (header->was_running) {
3169
        if (qemuProcessStartCPUs(driver, vm, conn) < 0) {
3170
            if (virGetLastError() == NULL)
3171 3172
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("failed to resume domain"));
J
Jiri Denemark 已提交
3173
            goto out;
3174
        }
3175 3176
        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0) {
            VIR_WARN("Failed to save status on vm %s", vm->def->name);
J
Jiri Denemark 已提交
3177
            goto out;
3178
        }
3179
    }
J
Jiri Denemark 已提交
3180

3181
    ret = 0;
3182

J
Jiri Denemark 已提交
3183
out:
3184 3185
    if (virSecurityManagerRestoreSavedStateLabel(driver->securityManager,
                                                 vm, path) < 0)
3186 3187
        VIR_WARN("failed to restore save state label on %s", path);

J
Jiri Denemark 已提交
3188 3189 3190
    return ret;
}

3191 3192 3193 3194
static int
qemuDomainRestore(virConnectPtr conn,
                  const char *path)
{
J
Jiri Denemark 已提交
3195 3196 3197 3198 3199 3200 3201 3202 3203
    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);

3204
    fd = qemuDomainSaveImageOpen(driver, path, &def, &header);
J
Jiri Denemark 已提交
3205 3206 3207 3208 3209 3210 3211 3212 3213
    if (fd < 0)
        goto cleanup;

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

    if (!(vm = virDomainAssignDef(driver->caps,
                                  &driver->domains,
                                  def, true))) {
3214
        /* virDomainAssignDef already set the error */
J
Jiri Denemark 已提交
3215 3216 3217 3218 3219 3220 3221
        goto cleanup;
    }
    def = NULL;

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

3222
    ret = qemuDomainSaveImageStartVM(conn, driver, vm, &fd, &header, path);
J
Jiri Denemark 已提交
3223 3224

    if (qemuDomainObjEndJob(vm) == 0)
3225
        vm = NULL;
J
Jiri Denemark 已提交
3226 3227 3228 3229
    else if (ret < 0 && !vm->persistent) {
        virDomainRemoveInactive(&driver->domains, vm);
        vm = NULL;
    }
3230

3231 3232
cleanup:
    virDomainDefFree(def);
3233
    VIR_FORCE_CLOSE(fd);
3234 3235 3236
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
3237
    return ret;
D
Daniel P. Berrange 已提交
3238 3239
}

3240 3241 3242 3243 3244
static int
qemuDomainObjRestore(virConnectPtr conn,
                     struct qemud_driver *driver,
                     virDomainObjPtr vm,
                     const char *path)
J
Jiri Denemark 已提交
3245 3246 3247 3248 3249 3250
{
    virDomainDefPtr def = NULL;
    int fd = -1;
    int ret = -1;
    struct qemud_save_header header;

3251
    fd = qemuDomainSaveImageOpen(driver, path, &def, &header);
J
Jiri Denemark 已提交
3252 3253 3254 3255 3256 3257 3258 3259 3260 3261 3262 3263 3264 3265 3266 3267 3268 3269 3270 3271
    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;

3272
    ret = qemuDomainSaveImageStartVM(conn, driver, vm, &fd, &header, path);
J
Jiri Denemark 已提交
3273 3274 3275

cleanup:
    virDomainDefFree(def);
3276
    VIR_FORCE_CLOSE(fd);
J
Jiri Denemark 已提交
3277 3278 3279
    return ret;
}

D
Daniel P. Berrange 已提交
3280

3281
static char *qemudDomainDumpXML(virDomainPtr dom,
3282
                                int flags) {
3283 3284 3285
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    char *ret = NULL;
3286 3287
    unsigned long balloon;
    int err;
3288

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

D
Daniel P. Berrange 已提交
3292
    if (!vm) {
3293 3294
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3295 3296
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3297
        goto cleanup;
D
Daniel P. Berrange 已提交
3298 3299
    }

3300 3301 3302 3303
    /* 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))) {
3304
        qemuDomainObjPrivatePtr priv = vm->privateData;
3305 3306 3307
        /* Don't delay if someone's using the monitor, just use
         * existing most recent data instead */
        if (!priv->jobActive) {
3308
            if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
3309 3310
                goto cleanup;

3311
            qemuDomainObjEnterMonitorWithDriver(driver, vm);
3312
            err = qemuMonitorGetBalloonInfo(priv->mon, &balloon);
3313
            qemuDomainObjExitMonitorWithDriver(driver, vm);
3314 3315 3316 3317
            if (qemuDomainObjEndJob(vm) == 0) {
                vm = NULL;
                goto cleanup;
            }
3318 3319 3320
            if (err < 0)
                goto cleanup;
            if (err > 0)
3321
                vm->def->mem.cur_balloon = balloon;
3322 3323
            /* err == 0 indicates no balloon support, so ignore it */
        }
3324
    }
3325

3326
    ret = qemuDomainFormatXML(driver, vm, flags);
3327 3328

cleanup:
3329 3330
    if (vm)
        virDomainObjUnlock(vm);
3331
    qemuDriverUnlock(driver);
3332
    return ret;
D
Daniel P. Berrange 已提交
3333 3334 3335
}


3336 3337 3338 3339
static char *qemuDomainXMLFromNative(virConnectPtr conn,
                                     const char *format,
                                     const char *config,
                                     unsigned int flags ATTRIBUTE_UNUSED) {
3340
    struct qemud_driver *driver = conn->privateData;
3341 3342 3343 3344
    virDomainDefPtr def = NULL;
    char *xml = NULL;

    if (STRNEQ(format, QEMU_CONFIG_FORMAT_ARGV)) {
3345 3346
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("unsupported config type %s"), format);
3347 3348 3349
        goto cleanup;
    }

3350
    qemuDriverLock(driver);
3351
    def = qemuParseCommandLineString(driver->caps, config);
3352
    qemuDriverUnlock(driver);
3353 3354 3355
    if (!def)
        goto cleanup;

3356
    xml = virDomainDefFormat(def, VIR_DOMAIN_XML_INACTIVE);
3357 3358 3359 3360 3361 3362

cleanup:
    virDomainDefFree(def);
    return xml;
}

3363 3364 3365 3366 3367 3368
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;
3369
    virDomainChrSourceDef monConfig;
3370
    virBitmapPtr qemuCaps = NULL;
E
Eric Blake 已提交
3371
    virCommandPtr cmd = NULL;
3372 3373 3374
    char *ret = NULL;
    int i;

3375 3376
    qemuDriverLock(driver);

3377
    if (STRNEQ(format, QEMU_CONFIG_FORMAT_ARGV)) {
3378 3379
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("unsupported config type %s"), format);
3380 3381 3382
        goto cleanup;
    }

3383
    def = virDomainDefParseString(driver->caps, xmlData, 0);
3384 3385 3386
    if (!def)
        goto cleanup;

3387 3388
    /* Since we're just exporting args, we can't do bridge/network/direct
     * setups, since libvirt will normally create TAP/macvtap devices
3389 3390 3391 3392 3393
     * 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];
3394
        int bootIndex = net->bootIndex;
3395 3396
        if (net->type == VIR_DOMAIN_NET_TYPE_NETWORK ||
            net->type == VIR_DOMAIN_NET_TYPE_DIRECT) {
3397 3398 3399 3400 3401 3402 3403 3404 3405 3406 3407 3408 3409 3410 3411 3412 3413 3414 3415 3416
            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;
        }
3417
        net->bootIndex = bootIndex;
3418 3419 3420 3421
    }
    for (i = 0 ; i < def->ngraphics ; i++) {
        if (def->graphics[i]->type == VIR_DOMAIN_GRAPHICS_TYPE_VNC &&
            def->graphics[i]->data.vnc.autoport)
3422
            def->graphics[i]->data.vnc.port = QEMU_VNC_PORT_MIN;
3423 3424
    }

3425
    if (qemuCapsExtractVersionInfo(def->emulator, def->os.arch,
3426
                                   NULL,
3427
                                   &qemuCaps) < 0)
3428 3429
        goto cleanup;

3430
    if (qemuProcessPrepareMonitorChr(driver, &monConfig, def->name) < 0)
3431
        goto cleanup;
3432

3433
    if (!(cmd = qemuBuildCommandLine(conn, driver, def,
3434
                                     &monConfig, false, qemuCaps,
3435
                                     NULL, -1, NULL, VIR_VM_OP_NO_OP)))
3436 3437
        goto cleanup;

E
Eric Blake 已提交
3438
    ret = virCommandToString(cmd);
3439 3440

cleanup:
3441
    qemuDriverUnlock(driver);
3442

3443
    qemuCapsFree(qemuCaps);
E
Eric Blake 已提交
3444
    virCommandFree(cmd);
3445 3446 3447 3448 3449
    virDomainDefFree(def);
    return ret;
}


3450
static int qemudListDefinedDomains(virConnectPtr conn,
3451
                            char **const names, int nnames) {
3452
    struct qemud_driver *driver = conn->privateData;
3453
    int n;
3454

3455
    qemuDriverLock(driver);
3456
    n = virDomainObjListGetInactiveNames(&driver->domains, names, nnames);
3457
    qemuDriverUnlock(driver);
3458
    return n;
D
Daniel P. Berrange 已提交
3459 3460
}

3461
static int qemudNumDefinedDomains(virConnectPtr conn) {
3462
    struct qemud_driver *driver = conn->privateData;
3463
    int n;
3464

3465
    qemuDriverLock(driver);
3466
    n = virDomainObjListNumOfDomains(&driver->domains, 0);
3467
    qemuDriverUnlock(driver);
3468

3469
    return n;
D
Daniel P. Berrange 已提交
3470 3471 3472
}


J
Jiri Denemark 已提交
3473 3474
static int qemudDomainObjStart(virConnectPtr conn,
                               struct qemud_driver *driver,
3475 3476
                               virDomainObjPtr vm,
                               bool start_paused)
J
Jiri Denemark 已提交
3477 3478 3479 3480 3481 3482
{
    int ret = -1;
    char *managed_save;

    /*
     * If there is a managed saved state restore it instead of starting
3483
     * from scratch. The old state is removed once the restoring succeeded.
J
Jiri Denemark 已提交
3484 3485
     */
    managed_save = qemuDomainManagedSavePath(driver, vm);
3486 3487 3488 3489

    if (!managed_save)
        goto cleanup;

E
Eric Blake 已提交
3490
    if (virFileExists(managed_save)) {
3491
        ret = qemuDomainObjRestore(conn, driver, vm, managed_save);
J
Jiri Denemark 已提交
3492

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

3496
        goto cleanup;
J
Jiri Denemark 已提交
3497 3498
    }

3499 3500
    ret = qemuProcessStart(conn, driver, vm, NULL, start_paused, -1, NULL,
                           VIR_VM_OP_CREATE);
3501
    qemuAuditDomainStart(vm, "booted", ret >= 0);
3502
    if (ret >= 0) {
J
Jiri Denemark 已提交
3503 3504 3505 3506 3507 3508 3509 3510 3511 3512 3513 3514 3515
        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;
}

3516 3517 3518
static int
qemudDomainStartWithFlags(virDomainPtr dom, unsigned int flags)
{
3519 3520 3521
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
3522

3523
    virCheckFlags(VIR_DOMAIN_START_PAUSED, -1);
3524

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

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

3536 3537 3538 3539
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;

    if (virDomainObjIsActive(vm)) {
3540 3541
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is already running"));
3542 3543 3544
        goto endjob;
    }

3545 3546
    ret = qemudDomainObjStart(dom->conn, driver, vm,
                              (flags & VIR_DOMAIN_START_PAUSED) != 0);
3547

3548
endjob:
3549 3550
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
3551

3552
cleanup:
3553 3554
    if (vm)
        virDomainObjUnlock(vm);
3555
    qemuDriverUnlock(driver);
3556
    return ret;
D
Daniel P. Berrange 已提交
3557 3558
}

3559 3560 3561 3562 3563 3564
static int
qemudDomainStart(virDomainPtr dom)
{
    return qemudDomainStartWithFlags(dom, 0);
}

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

3580
        if (STRNEQ(def->os.machine, machine->name))
3581 3582 3583
            continue;

        if (!(*canonical = strdup(machine->canonical))) {
3584
            virReportOOMError();
3585 3586 3587 3588 3589 3590 3591 3592 3593
            return -1;
        }

        break;
    }

    return 0;
}

3594 3595 3596 3597 3598 3599
static int
qemudCanonicalizeMachineDirect(virDomainDefPtr def, char **canonical)
{
    virCapsGuestMachinePtr *machines = NULL;
    int i, nmachines = 0;

3600
    if (qemuCapsProbeMachineTypes(def->emulator, &machines, &nmachines) < 0)
3601 3602 3603 3604 3605 3606
        return -1;

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

3607
        if (STRNEQ(def->os.machine, machines[i]->name))
3608 3609 3610 3611 3612 3613 3614 3615 3616 3617 3618 3619
            continue;

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

    virCapabilitiesFreeMachines(machines, nmachines);

    return 0;
}

3620 3621
int
qemudCanonicalizeMachine(struct qemud_driver *driver, virDomainDefPtr def)
3622 3623 3624 3625 3626 3627
{
    char *canonical = NULL;
    int i;

    for (i = 0; i < driver->caps->nguests; i++) {
        virCapsGuestPtr guest = driver->caps->guests[i];
3628
        virCapsGuestDomainInfoPtr info;
3629 3630 3631
        int j;

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

3634 3635 3636 3637 3638 3639 3640 3641 3642
            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;
3643 3644
        }

3645 3646 3647 3648
        info = &guest->arch.defaultInfo;

        if (info->emulator && STREQ(info->emulator, def->emulator)) {
            if (qemudCanonicalizeMachineFromInfo(def, info, &canonical) < 0)
3649 3650 3651 3652
                return -1;
            goto out;
        }
    }
3653 3654 3655 3656

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

3657 3658 3659 3660 3661 3662 3663
out:
    if (canonical) {
        VIR_FREE(def->os.machine);
        def->os.machine = canonical;
    }
    return 0;
}
D
Daniel P. Berrange 已提交
3664

3665
static virDomainPtr qemudDomainDefine(virConnectPtr conn, const char *xml) {
3666
    struct qemud_driver *driver = conn->privateData;
3667
    virDomainDefPtr def;
3668
    virDomainObjPtr vm = NULL;
3669
    virDomainPtr dom = NULL;
3670
    virDomainEventPtr event = NULL;
3671
    int dupVM;
3672

3673
    qemuDriverLock(driver);
3674
    if (!(def = virDomainDefParseString(driver->caps, xml,
3675
                                        VIR_DOMAIN_XML_INACTIVE)))
3676
        goto cleanup;
3677

3678
    if (virSecurityManagerVerify(driver->securityManager, def) < 0)
3679 3680
        goto cleanup;

3681 3682
    if ((dupVM = virDomainObjIsDuplicate(&driver->domains, def, 0)) < 0)
        goto cleanup;
3683

3684
    if (qemudCanonicalizeMachine(driver, def) < 0)
3685 3686
        goto cleanup;

3687
    if (qemuDomainAssignPCIAddresses(def) < 0)
3688 3689
        goto cleanup;

3690
    if (!(vm = virDomainAssignDef(driver->caps,
3691
                                  &driver->domains,
3692
                                  def, false))) {
3693
        goto cleanup;
3694
    }
3695
    def = NULL;
3696
    vm->persistent = 1;
3697

3698
    if (virDomainSaveConfig(driver->configDir,
3699
                            vm->newDef ? vm->newDef : vm->def) < 0) {
3700
        VIR_INFO(_("Defining domain '%s'"), vm->def->name);
3701 3702
        virDomainRemoveInactive(&driver->domains,
                                vm);
3703
        vm = NULL;
3704
        goto cleanup;
3705 3706
    }

3707 3708
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_DEFINED,
3709
                                     !dupVM ?
3710 3711
                                     VIR_DOMAIN_EVENT_DEFINED_ADDED :
                                     VIR_DOMAIN_EVENT_DEFINED_UPDATED);
3712

3713
    VIR_INFO(_("Creating domain '%s'"), vm->def->name);
3714
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
3715
    if (dom) dom->id = vm->def->id;
3716 3717

cleanup:
3718
    virDomainDefFree(def);
3719 3720
    if (vm)
        virDomainObjUnlock(vm);
3721 3722
    if (event)
        qemuDomainEventQueue(driver, event);
3723
    qemuDriverUnlock(driver);
3724
    return dom;
D
Daniel P. Berrange 已提交
3725 3726
}

3727
static int qemudDomainUndefine(virDomainPtr dom) {
3728 3729
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
3730
    virDomainEventPtr event = NULL;
3731
    int ret = -1;
D
Daniel P. Berrange 已提交
3732

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

D
Daniel P. Berrange 已提交
3736
    if (!vm) {
3737 3738
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3739 3740
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3741
        goto cleanup;
D
Daniel P. Berrange 已提交
3742 3743
    }

D
Daniel P. Berrange 已提交
3744
    if (virDomainObjIsActive(vm)) {
3745 3746
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot delete active domain"));
3747
        goto cleanup;
D
Daniel P. Berrange 已提交
3748 3749
    }

3750
    if (!vm->persistent) {
3751
        qemuReportError(VIR_ERR_OPERATION_INVALID,
3752
                        "%s", _("cannot undefine transient domain"));
3753
        goto cleanup;
3754 3755
    }

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

3759 3760 3761
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_UNDEFINED,
                                     VIR_DOMAIN_EVENT_UNDEFINED_REMOVED);
3762

3763
    VIR_INFO(_("Undefining domain '%s'"), vm->def->name);
3764 3765
    virDomainRemoveInactive(&driver->domains,
                            vm);
3766
    vm = NULL;
3767
    ret = 0;
D
Daniel P. Berrange 已提交
3768

3769
cleanup:
3770 3771
    if (vm)
        virDomainObjUnlock(vm);
3772 3773
    if (event)
        qemuDomainEventQueue(driver, event);
3774
    qemuDriverUnlock(driver);
3775
    return ret;
D
Daniel P. Berrange 已提交
3776 3777
}

3778

3779 3780
static int qemudDomainAttachDevice(virDomainPtr dom,
                                   const char *xml)
3781
{
3782 3783 3784
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    virDomainDeviceDefPtr dev = NULL;
3785
    virBitmapPtr qemuCaps = NULL;
3786
    virCgroupPtr cgroup = NULL;
3787
    int ret = -1;
3788

3789 3790 3791 3792 3793 3794 3795
    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);
3796 3797 3798
        goto cleanup;
    }

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

3802 3803 3804 3805 3806
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot attach device on inactive domain"));
        goto endjob;
    }
3807

3808 3809 3810 3811
    dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
                                  VIR_DOMAIN_XML_INACTIVE);
    if (dev == NULL)
        goto endjob;
3812

3813
    if (qemuCapsExtractVersionInfo(vm->def->emulator, vm->def->os.arch,
3814
                                   NULL,
3815
                                   &qemuCaps) < 0)
3816
        goto endjob;
3817

3818
    if (dev->type == VIR_DOMAIN_DEVICE_DISK) {
3819 3820 3821 3822 3823 3824 3825 3826
        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;
        }

3827 3828 3829
        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 已提交
3830
                                _("Unable to find cgroup for %s"),
3831 3832 3833
                                vm->def->name);
                goto endjob;
            }
3834
            if (qemuSetupDiskCgroup(driver, vm, cgroup, dev->data.disk) < 0)
3835
                goto endjob;
3836 3837
        }

3838 3839 3840 3841 3842
        switch (dev->data.disk->device) {
        case VIR_DOMAIN_DISK_DEVICE_CDROM:
        case VIR_DOMAIN_DISK_DEVICE_FLOPPY:
            ret = qemuDomainChangeEjectableMedia(driver, vm,
                                                 dev->data.disk,
3843
                                                 qemuCaps,
3844 3845 3846 3847
                                                 false);
            if (ret == 0)
                dev->data.disk = NULL;
            break;
3848

3849 3850 3851
        case VIR_DOMAIN_DISK_DEVICE_DISK:
            if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_USB) {
                ret = qemuDomainAttachUsbMassstorageDevice(driver, vm,
3852
                                                           dev->data.disk, qemuCaps);
3853 3854 3855 3856
                if (ret == 0)
                    dev->data.disk = NULL;
            } else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_VIRTIO) {
                ret = qemuDomainAttachPciDiskDevice(driver, vm,
3857
                                                    dev->data.disk, qemuCaps);
3858 3859 3860 3861
                if (ret == 0)
                    dev->data.disk = NULL;
            } else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_SCSI) {
                ret = qemuDomainAttachSCSIDisk(driver, vm,
3862
                                               dev->data.disk, qemuCaps);
3863 3864 3865 3866 3867 3868 3869 3870 3871
                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;
3872

3873 3874 3875 3876 3877
        default:
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                            _("disk device type '%s' cannot be hotplugged"),
                            virDomainDiskDeviceTypeToString(dev->data.disk->device));
            /* Fallthrough */
3878
        }
3879
        if (ret != 0 && cgroup) {
3880
            if (qemuTeardownDiskCgroup(driver, vm, cgroup, dev->data.disk) < 0)
3881 3882
                VIR_WARN("Failed to teardown cgroup for disk path %s",
                         NULLSTR(dev->data.disk->src));
3883
        }
3884 3885 3886
    } else if (dev->type == VIR_DOMAIN_DEVICE_CONTROLLER) {
        if (dev->data.controller->type == VIR_DOMAIN_CONTROLLER_TYPE_SCSI) {
            ret = qemuDomainAttachPciControllerDevice(driver, vm,
3887
                                                      dev->data.controller, qemuCaps);
3888 3889 3890 3891 3892 3893 3894
            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 */
3895
        }
3896 3897
    } else if (dev->type == VIR_DOMAIN_DEVICE_NET) {
        ret = qemuDomainAttachNetDevice(dom->conn, driver, vm,
3898
                                        dev->data.net, qemuCaps);
3899 3900 3901 3902
        if (ret == 0)
            dev->data.net = NULL;
    } else if (dev->type == VIR_DOMAIN_DEVICE_HOSTDEV) {
        ret = qemuDomainAttachHostDevice(driver, vm,
3903
                                         dev->data.hostdev, qemuCaps);
3904 3905
        if (ret == 0)
            dev->data.hostdev = NULL;
3906
    } else {
3907 3908 3909 3910
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("device type '%s' cannot be attached"),
                        virDomainDeviceTypeToString(dev->type));
        goto endjob;
3911 3912
    }

3913 3914 3915 3916 3917
    /* 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)
3918 3919 3920 3921 3922 3923 3924 3925 3926 3927
        ret = -1;

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

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

3928
    qemuCapsFree(qemuCaps);
3929 3930 3931 3932
    virDomainDeviceDefFree(dev);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
3933 3934 3935
    return ret;
}

3936 3937 3938 3939 3940 3941 3942 3943
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;
    }
3944

3945 3946
    return qemudDomainAttachDevice(dom, xml);
}
3947

3948

3949 3950 3951 3952 3953 3954 3955
static int qemuDomainUpdateDeviceFlags(virDomainPtr dom,
                                       const char *xml,
                                       unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    virDomainDeviceDefPtr dev = NULL;
3956
    virBitmapPtr qemuCaps = NULL;
3957 3958 3959
    virCgroupPtr cgroup = NULL;
    int ret = -1;
    bool force = (flags & VIR_DOMAIN_DEVICE_MODIFY_FORCE) != 0;
3960

3961 3962 3963 3964
    virCheckFlags(VIR_DOMAIN_DEVICE_MODIFY_CURRENT |
                  VIR_DOMAIN_DEVICE_MODIFY_LIVE |
                  VIR_DOMAIN_DEVICE_MODIFY_CONFIG |
                  VIR_DOMAIN_DEVICE_MODIFY_FORCE, -1);
3965

3966 3967 3968
    if (flags & VIR_DOMAIN_DEVICE_MODIFY_CONFIG) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot modify the persistent configuration of a domain"));
3969 3970 3971
        return -1;
    }

3972 3973 3974 3975 3976 3977 3978 3979
    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;
3980 3981
    }

3982 3983 3984 3985 3986 3987 3988
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;

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

3991 3992 3993 3994 3995
    dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
                                  VIR_DOMAIN_XML_INACTIVE);
    if (dev == NULL)
        goto endjob;

3996
    if (qemuCapsExtractVersionInfo(vm->def->emulator, vm->def->os.arch,
3997
                                   NULL,
3998
                                   &qemuCaps) < 0)
3999
        goto endjob;
4000

4001 4002 4003 4004 4005
    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 已提交
4006
                                _("Unable to find cgroup for %s"),
4007 4008 4009
                                vm->def->name);
                goto endjob;
            }
4010
            if (qemuSetupDiskCgroup(driver, vm, cgroup, dev->data.disk) < 0)
4011
                goto endjob;
4012 4013
        }

4014 4015 4016 4017 4018
        switch (dev->data.disk->device) {
        case VIR_DOMAIN_DISK_DEVICE_CDROM:
        case VIR_DOMAIN_DISK_DEVICE_FLOPPY:
            ret = qemuDomainChangeEjectableMedia(driver, vm,
                                                 dev->data.disk,
4019
                                                 qemuCaps,
4020 4021 4022 4023
                                                 force);
            if (ret == 0)
                dev->data.disk = NULL;
            break;
4024

4025

4026 4027 4028 4029 4030 4031
        default:
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                            _("disk bus '%s' cannot be updated."),
                            virDomainDiskBusTypeToString(dev->data.disk->bus));
            break;
        }
4032

4033
        if (ret != 0 && cgroup) {
4034
            if (qemuTeardownDiskCgroup(driver, vm, cgroup, dev->data.disk) < 0)
4035 4036 4037
                VIR_WARN("Failed to teardown cgroup for disk path %s",
                         NULLSTR(dev->data.disk->src));
        }
4038
        break;
4039 4040 4041

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

4044
    default:
4045
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
4046 4047
                        _("device type '%s' cannot be updated"),
                        virDomainDeviceTypeToString(dev->type));
4048
        break;
4049 4050
    }

4051 4052 4053 4054 4055 4056 4057 4058 4059 4060
    if (!ret && virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
        ret = -1;

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

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

4062
    qemuCapsFree(qemuCaps);
4063 4064 4065 4066
    virDomainDeviceDefFree(dev);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
4067 4068 4069
    return ret;
}

4070

4071 4072
static int qemudDomainDetachDevice(virDomainPtr dom,
                                   const char *xml) {
4073 4074
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
4075
    virBitmapPtr qemuCaps = NULL;
4076 4077
    virDomainDeviceDefPtr dev = NULL;
    int ret = -1;
4078

4079
    qemuDriverLock(driver);
4080
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
4081
    if (!vm) {
4082 4083
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4084 4085
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4086
        goto cleanup;
4087 4088
    }

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

D
Daniel P. Berrange 已提交
4092
    if (!virDomainObjIsActive(vm)) {
4093 4094
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot detach device on inactive domain"));
4095
        goto endjob;
4096 4097
    }

4098
    dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
4099
                                  VIR_DOMAIN_XML_INACTIVE);
4100
    if (dev == NULL)
4101
        goto endjob;
4102

4103
    if (qemuCapsExtractVersionInfo(vm->def->emulator, vm->def->os.arch,
4104
                                   NULL,
4105
                                   &qemuCaps) < 0)
4106
        goto endjob;
4107 4108

    if (dev->type == VIR_DOMAIN_DEVICE_DISK &&
4109 4110
        dev->data.disk->device == VIR_DOMAIN_DISK_DEVICE_DISK) {
        if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_VIRTIO) {
4111
            ret = qemuDomainDetachPciDiskDevice(driver, vm, dev, qemuCaps);
4112 4113
        }
        else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_SCSI) {
4114
            ret = qemuDomainDetachDiskDevice(driver, vm, dev, qemuCaps);
W
Wen Congyang 已提交
4115 4116
        } else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_USB) {
            ret = qemuDomainDetachDiskDevice(driver, vm, dev, qemuCaps);
4117 4118
        }
        else {
4119
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
4120 4121
                            _("This type of disk cannot be hot unplugged"));
        }
4122
    } else if (dev->type == VIR_DOMAIN_DEVICE_NET) {
4123
        ret = qemuDomainDetachNetDevice(driver, vm, dev, qemuCaps);
4124 4125
    } else if (dev->type == VIR_DOMAIN_DEVICE_CONTROLLER) {
        if (dev->data.controller->type == VIR_DOMAIN_CONTROLLER_TYPE_SCSI) {
4126
            ret = qemuDomainDetachPciControllerDevice(driver, vm, dev,
4127
                                                      qemuCaps);
4128
        } else {
4129
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
4130 4131
                            _("disk controller bus '%s' cannot be hotunplugged."),
                            virDomainControllerTypeToString(dev->data.controller->type));
4132 4133
            /* fallthrough */
        }
4134
    } else if (dev->type == VIR_DOMAIN_DEVICE_HOSTDEV) {
4135
        ret = qemuDomainDetachHostDevice(driver, vm, dev, qemuCaps);
4136
    } else {
4137
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
4138
                        "%s", _("This type of device cannot be hot unplugged"));
4139
    }
4140

4141
    if (!ret && virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
4142 4143
        ret = -1;

4144
endjob:
4145 4146
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
4147

4148
cleanup:
4149
    qemuCapsFree(qemuCaps);
4150
    virDomainDeviceDefFree(dev);
4151 4152
    if (vm)
        virDomainObjUnlock(vm);
4153
    qemuDriverUnlock(driver);
4154 4155 4156
    return ret;
}

4157 4158 4159 4160
static int qemudDomainDetachDeviceFlags(virDomainPtr dom,
                                        const char *xml,
                                        unsigned int flags) {
    if (flags & VIR_DOMAIN_DEVICE_MODIFY_CONFIG) {
4161 4162
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot modify the persistent configuration of a domain"));
4163 4164 4165 4166 4167 4168
        return -1;
    }

    return qemudDomainDetachDevice(dom, xml);
}

4169
static int qemudDomainGetAutostart(virDomainPtr dom,
4170
                                   int *autostart) {
4171 4172 4173
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
4174

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

4179
    if (!vm) {
4180 4181
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4182 4183
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4184
        goto cleanup;
4185 4186 4187
    }

    *autostart = vm->autostart;
4188
    ret = 0;
4189

4190
cleanup:
4191 4192
    if (vm)
        virDomainObjUnlock(vm);
4193
    return ret;
4194 4195
}

4196
static int qemudDomainSetAutostart(virDomainPtr dom,
4197
                                   int autostart) {
4198 4199
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
4200 4201
    char *configFile = NULL, *autostartLink = NULL;
    int ret = -1;
4202

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

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

4214
    if (!vm->persistent) {
4215
        qemuReportError(VIR_ERR_OPERATION_INVALID,
4216
                        "%s", _("cannot set autostart for transient domain"));
4217
        goto cleanup;
4218 4219
    }

4220 4221
    autostart = (autostart != 0);

4222
    if (vm->autostart != autostart) {
4223
        if ((configFile = virDomainConfigFile(driver->configDir, vm->def->name)) == NULL)
4224
            goto cleanup;
4225
        if ((autostartLink = virDomainConfigFile(driver->autostartDir, vm->def->name)) == NULL)
4226
            goto cleanup;
4227

4228 4229
        if (autostart) {
            int err;
4230

4231
            if ((err = virFileMakePath(driver->autostartDir))) {
4232
                virReportSystemError(err,
4233 4234
                                     _("cannot create autostart directory %s"),
                                     driver->autostartDir);
4235 4236
                goto cleanup;
            }
4237

4238
            if (symlink(configFile, autostartLink) < 0) {
4239
                virReportSystemError(errno,
4240 4241
                                     _("Failed to create symlink '%s to '%s'"),
                                     autostartLink, configFile);
4242 4243 4244 4245
                goto cleanup;
            }
        } else {
            if (unlink(autostartLink) < 0 && errno != ENOENT && errno != ENOTDIR) {
4246
                virReportSystemError(errno,
4247 4248
                                     _("Failed to delete symlink '%s'"),
                                     autostartLink);
4249 4250
                goto cleanup;
            }
4251 4252
        }

4253
        vm->autostart = autostart;
4254
    }
4255
    ret = 0;
4256

4257 4258 4259
cleanup:
    VIR_FREE(configFile);
    VIR_FREE(autostartLink);
4260 4261
    if (vm)
        virDomainObjUnlock(vm);
4262
    qemuDriverUnlock(driver);
4263
    return ret;
4264 4265
}

4266 4267 4268 4269 4270

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

4273
    qemuDriverLock(driver);
4274
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
4275 4276
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup CPU controller is not mounted"));
4277
        goto cleanup;
4278 4279 4280 4281 4282 4283 4284
    }

    if (nparams)
        *nparams = 1;

    ret = strdup("posix");
    if (!ret)
4285
        virReportOOMError();
4286 4287 4288

cleanup:
    qemuDriverUnlock(driver);
4289 4290 4291
    return ret;
}

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

4318 4319 4320 4321 4322 4323
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

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 4381 4382 4383 4384 4385 4386 4387 4388 4389 4390 4391 4392 4393 4394 4395 4396 4397 4398 4399
    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;
    }

4400 4401 4402 4403 4404 4405
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

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 4448 4449 4450 4451 4452 4453 4454 4455 4456 4457 4458 4459 4460 4461 4462
    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;
}
4463 4464 4465 4466 4467 4468 4469 4470 4471 4472 4473 4474 4475 4476

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)) {
4477 4478
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup memory controller is not mounted"));
4479 4480 4481 4482 4483 4484 4485 4486 4487 4488 4489
        goto cleanup;
    }

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

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

4490 4491 4492 4493 4494 4495
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

4496 4497 4498 4499 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
    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;
            }
4536
        } else if (STREQ(param->field, VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT)) {
4537 4538 4539 4540 4541 4542 4543 4544
            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;
            }

4545
            rc = virCgroupSetMemSwapHardLimit(group, params[i].value.ul);
4546 4547 4548 4549 4550 4551 4552 4553 4554 4555 4556 4557 4558 4559 4560 4561 4562 4563 4564 4565 4566 4567 4568 4569
            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;
}

4570 4571 4572 4573 4574 4575 4576 4577 4578
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;
4579
    unsigned long long val;
4580 4581 4582 4583 4584 4585
    int ret = -1;
    int rc;

    qemuDriverLock(driver);

    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_MEMORY)) {
4586 4587
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup memory controller is not mounted"));
4588 4589 4590 4591 4592 4593 4594 4595 4596 4597 4598
        goto cleanup;
    }

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

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

4599 4600 4601 4602 4603 4604
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

4605 4606 4607 4608 4609 4610 4611 4612 4613 4614 4615 4616 4617 4618 4619 4620 4621 4622 4623 4624 4625 4626 4627 4628 4629 4630 4631 4632 4633 4634 4635
    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"));
4636
                goto cleanup;
4637 4638 4639 4640
            }
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_HARD_LIMIT) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field memory hard limit too long for destination"));
4641
                goto cleanup;
4642 4643 4644 4645 4646 4647 4648 4649 4650
            }
            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"));
4651
                goto cleanup;
4652 4653 4654 4655
            }
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SOFT_LIMIT) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field memory soft limit too long for destination"));
4656
                goto cleanup;
4657 4658 4659 4660 4661
            }
            param->value.ul = val;
            break;

        case 2: /* fill swap hard limit here */
4662
            rc = virCgroupGetMemSwapHardLimit(group, &val);
4663 4664 4665
            if (rc != 0) {
                virReportSystemError(-rc, "%s",
                                     _("unable to get swap hard limit"));
4666
                goto cleanup;
4667
            }
4668
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT) == NULL) {
4669 4670
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field swap hard limit too long for destination"));
4671
                goto cleanup;
4672 4673 4674 4675 4676 4677 4678 4679 4680 4681
            }
            param->value.ul = val;
            break;

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

4682 4683
    ret = 0;

4684 4685 4686 4687 4688 4689 4690 4691 4692
cleanup:
    if (group)
        virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

4693 4694 4695 4696 4697 4698 4699 4700 4701 4702
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;

4703
    qemuDriverLock(driver);
4704
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
4705 4706
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup CPU controller is not mounted"));
4707
        goto cleanup;
4708 4709 4710 4711 4712
    }

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

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

4718 4719 4720 4721 4722 4723
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

4724
    if (virCgroupForDomain(driver->cgroup, vm->def->name, &group, 0) != 0) {
4725 4726
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("cannot find cgroup for domain %s"), vm->def->name);
4727 4728 4729 4730 4731 4732 4733 4734 4735
        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) {
4736 4737
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for cpu_shares tunable, expected a 'ullong'"));
4738 4739 4740 4741 4742
                goto cleanup;
            }

            rc = virCgroupSetCpuShares(group, params[i].value.ul);
            if (rc != 0) {
4743
                virReportSystemError(-rc, "%s",
4744 4745 4746
                                     _("unable to set cpu shares tunable"));
                goto cleanup;
            }
4747 4748

            vm->def->cputune.shares = params[i].value.ul;
4749
        } else {
4750 4751
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("Invalid parameter `%s'"), param->field);
4752 4753 4754 4755 4756 4757 4758 4759 4760
            goto cleanup;
        }
    }
    ret = 0;

cleanup:
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
4761
    qemuDriverUnlock(driver);
4762 4763 4764 4765 4766 4767 4768 4769 4770 4771 4772 4773 4774 4775
    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;

4776
    qemuDriverLock(driver);
4777
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
4778 4779
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup CPU controller is not mounted"));
4780
        goto cleanup;
4781 4782 4783
    }

    if ((*nparams) != 1) {
4784 4785
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("Invalid parameter count"));
4786
        goto cleanup;
4787 4788 4789 4790 4791
    }

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

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

4797 4798 4799 4800 4801 4802
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

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

    rc = virCgroupGetCpuShares(group, &val);
    if (rc != 0) {
4811
        virReportSystemError(-rc, "%s",
4812 4813 4814 4815 4816
                             _("unable to get cpu shares tunable"));
        goto cleanup;
    }
    params[0].value.ul = val;
    params[0].type = VIR_DOMAIN_SCHED_FIELD_ULLONG;
C
Chris Lalancette 已提交
4817
    if (virStrcpyStatic(params[0].field, "cpu_shares") == NULL) {
4818 4819
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("Field cpu_shares too long for destination"));
C
Chris Lalancette 已提交
4820 4821
        goto cleanup;
    }
4822 4823 4824 4825 4826 4827 4828

    ret = 0;

cleanup:
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
4829
    qemuDriverUnlock(driver);
4830 4831 4832 4833
    return ret;
}


4834 4835 4836 4837 4838 4839 4840 4841 4842
/* 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)
{
4843
    struct qemud_driver *driver = dom->conn->privateData;
4844
    int i, ret = -1;
4845
    virDomainObjPtr vm;
4846
    virDomainDiskDefPtr disk = NULL;
4847
    qemuDomainObjPrivatePtr priv;
4848

4849
    qemuDriverLock(driver);
4850
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
4851
    qemuDriverUnlock(driver);
4852
    if (!vm) {
4853 4854
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4855 4856
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4857
        goto cleanup;
4858
    }
4859 4860 4861 4862

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

4863
    if (!virDomainObjIsActive(vm)) {
4864 4865
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
4866
        goto endjob;
4867 4868
    }

4869 4870 4871 4872 4873 4874 4875 4876
    for (i = 0 ; i < vm->def->ndisks ; i++) {
        if (STREQ(path, vm->def->disks[i]->dst)) {
            disk = vm->def->disks[i];
            break;
        }
    }

    if (!disk) {
4877 4878
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path: %s"), path);
4879
        goto endjob;
4880 4881
    }

4882
    if (!disk->info.alias) {
4883 4884
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("missing disk device alias name for %s"), disk->dst);
4885
        goto endjob;
4886
    }
4887

4888
    priv = vm->privateData;
4889 4890
    qemuDomainObjEnterMonitor(vm);
    ret = qemuMonitorGetBlockStatsInfo(priv->mon,
4891
                                       disk->info.alias,
4892 4893 4894 4895 4896 4897
                                       &stats->rd_req,
                                       &stats->rd_bytes,
                                       &stats->wr_req,
                                       &stats->wr_bytes,
                                       &stats->errs);
    qemuDomainObjExitMonitor(vm);
4898

4899
endjob:
4900 4901
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
4902

4903
cleanup:
4904 4905
    if (vm)
        virDomainObjUnlock(vm);
4906
    return ret;
4907 4908
}

4909
#ifdef __linux__
4910 4911 4912 4913 4914
static int
qemudDomainInterfaceStats (virDomainPtr dom,
                           const char *path,
                           struct _virDomainInterfaceStats *stats)
{
4915 4916
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
4917
    int i;
4918
    int ret = -1;
4919

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

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

D
Daniel P. Berrange 已提交
4932
    if (!virDomainObjIsActive(vm)) {
4933 4934
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
4935
        goto cleanup;
4936 4937 4938
    }

    /* Check the path is one of the domain's network interfaces. */
4939 4940
    for (i = 0 ; i < vm->def->nnets ; i++) {
        if (vm->def->nets[i]->ifname &&
4941 4942 4943 4944
            STREQ (vm->def->nets[i]->ifname, path)) {
            ret = 0;
            break;
        }
4945 4946
    }

4947
    if (ret == 0)
4948
        ret = linuxDomainInterfaceStats(path, stats);
4949
    else
4950 4951
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path, '%s' is not a known interface"), path);
4952

4953
cleanup:
4954 4955
    if (vm)
        virDomainObjUnlock(vm);
4956 4957
    return ret;
}
4958
#else
4959 4960 4961 4962
static int
qemudDomainInterfaceStats (virDomainPtr dom,
                           const char *path ATTRIBUTE_UNUSED,
                           struct _virDomainInterfaceStats *stats ATTRIBUTE_UNUSED)
4963
{
4964 4965
    qemuReportError(VIR_ERR_NO_SUPPORT,
                    "%s", __FUNCTION__);
4966 4967
    return -1;
}
4968
#endif
4969

4970 4971 4972 4973 4974 4975 4976 4977 4978 4979 4980 4981 4982 4983 4984 4985
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);
4986 4987
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4988 4989 4990
        goto cleanup;
    }

4991 4992 4993
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

4994 4995 4996
    if (virDomainObjIsActive(vm)) {
        qemuDomainObjPrivatePtr priv = vm->privateData;
        qemuDomainObjEnterMonitor(vm);
4997
        ret = qemuMonitorGetMemoryStats(priv->mon, stats, nr_stats);
4998 4999
        qemuDomainObjExitMonitor(vm);
    } else {
5000 5001
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
5002 5003
    }

5004 5005 5006
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

5007 5008 5009 5010 5011 5012
cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}

5013 5014 5015 5016 5017 5018 5019
static int
qemudDomainBlockPeek (virDomainPtr dom,
                      const char *path,
                      unsigned long long offset, size_t size,
                      void *buffer,
                      unsigned int flags ATTRIBUTE_UNUSED)
{
5020 5021 5022
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int fd = -1, ret = -1, i;
5023

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

5028
    if (!vm) {
5029 5030
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
5031 5032
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
5033
        goto cleanup;
5034 5035 5036
    }

    if (!path || path[0] == '\0') {
5037 5038
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("NULL or empty path"));
5039
        goto cleanup;
5040 5041 5042
    }

    /* Check the path belongs to this domain. */
5043 5044
    for (i = 0 ; i < vm->def->ndisks ; i++) {
        if (vm->def->disks[i]->src != NULL &&
5045 5046 5047 5048
            STREQ (vm->def->disks[i]->src, path)) {
            ret = 0;
            break;
        }
5049 5050
    }

5051 5052 5053 5054 5055
    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) {
5056 5057
            virReportSystemError(errno,
                                 _("%s: failed to open"), path);
5058 5059
            goto cleanup;
        }
5060

5061 5062 5063 5064 5065 5066
        /* 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) {
5067 5068
            virReportSystemError(errno,
                                 _("%s: failed to seek or read"), path);
5069 5070 5071 5072 5073
            goto cleanup;
        }

        ret = 0;
    } else {
5074 5075
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("invalid path"));
5076 5077
    }

5078
cleanup:
5079
    VIR_FORCE_CLOSE(fd);
5080 5081
    if (vm)
        virDomainObjUnlock(vm);
5082 5083 5084
    return ret;
}

R
Richard W.M. Jones 已提交
5085 5086 5087 5088 5089 5090
static int
qemudDomainMemoryPeek (virDomainPtr dom,
                       unsigned long long offset, size_t size,
                       void *buffer,
                       unsigned int flags)
{
5091 5092
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
5093
    char *tmp = NULL;
R
Richard W.M. Jones 已提交
5094
    int fd = -1, ret = -1;
5095
    qemuDomainObjPrivatePtr priv;
R
Richard W.M. Jones 已提交
5096

5097
    qemuDriverLock(driver);
5098
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
5099
    qemuDriverUnlock(driver);
R
Richard W.M. Jones 已提交
5100 5101

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

5109
    if (flags != VIR_MEMORY_VIRTUAL && flags != VIR_MEMORY_PHYSICAL) {
5110 5111
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("flags parameter must be VIR_MEMORY_VIRTUAL or VIR_MEMORY_PHYSICAL"));
5112
        goto cleanup;
R
Richard W.M. Jones 已提交
5113 5114
    }

5115 5116 5117
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

D
Daniel P. Berrange 已提交
5118
    if (!virDomainObjIsActive(vm)) {
5119 5120
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
5121
        goto endjob;
R
Richard W.M. Jones 已提交
5122 5123
    }

5124
    if (virAsprintf(&tmp, "%s/qemu.mem.XXXXXX", driver->cacheDir) < 0) {
5125
        virReportOOMError();
5126
        goto endjob;
5127 5128
    }

R
Richard W.M. Jones 已提交
5129 5130
    /* Create a temporary filename. */
    if ((fd = mkstemp (tmp)) == -1) {
5131 5132
        virReportSystemError(errno,
                             _("mkstemp(\"%s\") failed"), tmp);
5133
        goto endjob;
R
Richard W.M. Jones 已提交
5134 5135
    }

5136
    priv = vm->privateData;
5137
    qemuDomainObjEnterMonitor(vm);
5138
    if (flags == VIR_MEMORY_VIRTUAL) {
5139 5140
        if (qemuMonitorSaveVirtualMemory(priv->mon, offset, size, tmp) < 0) {
            qemuDomainObjExitMonitor(vm);
5141
            goto endjob;
5142
        }
5143
    } else {
5144 5145
        if (qemuMonitorSavePhysicalMemory(priv->mon, offset, size, tmp) < 0) {
            qemuDomainObjExitMonitor(vm);
5146
            goto endjob;
5147
        }
R
Richard W.M. Jones 已提交
5148
    }
5149
    qemuDomainObjExitMonitor(vm);
R
Richard W.M. Jones 已提交
5150 5151 5152

    /* Read the memory file into buffer. */
    if (saferead (fd, buffer, size) == (ssize_t) -1) {
5153 5154 5155
        virReportSystemError(errno,
                             _("failed to read temporary file "
                               "created with template %s"), tmp);
5156
        goto endjob;
R
Richard W.M. Jones 已提交
5157 5158 5159
    }

    ret = 0;
5160

5161
endjob:
5162 5163
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
5164

5165
cleanup:
5166
    VIR_FORCE_CLOSE(fd);
R
Richard W.M. Jones 已提交
5167
    unlink (tmp);
W
Wen Congyang 已提交
5168
    VIR_FREE(tmp);
5169 5170
    if (vm)
        virDomainObjUnlock(vm);
R
Richard W.M. Jones 已提交
5171 5172 5173
    return ret;
}

5174

5175 5176 5177 5178 5179 5180 5181 5182 5183 5184
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;
5185
    virDomainDiskDefPtr disk = NULL;
5186 5187
    struct stat sb;
    int i;
5188
    int format;
5189 5190 5191 5192 5193 5194 5195 5196 5197 5198 5199 5200 5201 5202 5203 5204 5205 5206 5207 5208 5209 5210 5211 5212

    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)) {
5213
            disk = vm->def->disks[i];
5214 5215 5216 5217
            break;
        }
    }

5218
    if (!disk) {
5219 5220 5221 5222 5223 5224 5225 5226 5227 5228 5229 5230 5231 5232
        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 */
5233 5234 5235 5236 5237 5238 5239 5240
    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 {
5241 5242 5243 5244 5245 5246 5247
        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);
5248
            goto cleanup;
5249
        }
5250 5251 5252 5253 5254
    }

    if (virStorageFileGetMetadataFromFD(path, fd,
                                        format,
                                        &meta) < 0)
5255 5256 5257 5258 5259 5260 5261 5262 5263 5264
        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)) {
5265
#ifndef WIN32
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
        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;

5294
    /* Set default value .. */
5295 5296
    info->allocation = info->physical;

5297 5298 5299
    /* ..but if guest is running & not using raw
       disk format and on a block device, then query
       highest allocated extent from QEMU */
5300
    if (disk->type == VIR_DOMAIN_DISK_TYPE_BLOCK &&
5301
        format != VIR_STORAGE_FILE_RAW &&
5302 5303 5304 5305
        S_ISBLK(sb.st_mode)) {
        qemuDomainObjPrivatePtr priv = vm->privateData;
        if (qemuDomainObjBeginJob(vm) < 0)
            goto cleanup;
5306 5307 5308 5309 5310 5311 5312 5313 5314
        if (!virDomainObjIsActive(vm))
            ret = 0;
        else {
            qemuDomainObjEnterMonitor(vm);
            ret = qemuMonitorGetBlockExtent(priv->mon,
                                            disk->info.alias,
                                            &info->allocation);
            qemuDomainObjExitMonitor(vm);
        }
5315 5316 5317 5318 5319 5320

        if (qemuDomainObjEndJob(vm) == 0)
            vm = NULL;
    } else {
        ret = 0;
    }
5321 5322

cleanup:
5323
    VIR_FORCE_CLOSE(fd);
5324 5325 5326 5327 5328 5329
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}


5330
static int
5331 5332 5333 5334
qemuDomainEventRegister(virConnectPtr conn,
                        virConnectDomainEventCallback callback,
                        void *opaque,
                        virFreeCallback freecb)
5335
{
5336 5337 5338
    struct qemud_driver *driver = conn->privateData;
    int ret;

5339
    qemuDriverLock(driver);
5340 5341
    ret = virDomainEventCallbackListAdd(conn, driver->domainEventCallbacks,
                                        callback, opaque, freecb);
5342
    qemuDriverUnlock(driver);
5343

5344
    return ret;
5345 5346
}

5347

5348
static int
5349 5350
qemuDomainEventDeregister(virConnectPtr conn,
                          virConnectDomainEventCallback callback)
5351
{
5352 5353 5354
    struct qemud_driver *driver = conn->privateData;
    int ret;

5355
    qemuDriverLock(driver);
5356 5357 5358 5359 5360 5361
    if (driver->domainEventDispatching)
        ret = virDomainEventCallbackListMarkDelete(conn, driver->domainEventCallbacks,
                                                   callback);
    else
        ret = virDomainEventCallbackListRemove(conn, driver->domainEventCallbacks,
                                               callback);
5362
    qemuDriverUnlock(driver);
5363

5364
    return ret;
5365 5366
}

5367 5368 5369 5370 5371 5372 5373 5374 5375 5376 5377 5378 5379 5380 5381 5382 5383 5384 5385 5386 5387 5388 5389 5390 5391 5392 5393 5394 5395 5396 5397 5398 5399 5400 5401 5402 5403 5404 5405 5406 5407 5408 5409

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 已提交
5410 5411
/* Migration support. */

C
Chris Lalancette 已提交
5412 5413 5414 5415 5416 5417 5418 5419 5420 5421 5422 5423 5424 5425 5426
/* 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;
5427

C
Chris Lalancette 已提交
5428
    if (!dom_xml) {
5429 5430
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("no domain XML passed"));
C
Chris Lalancette 已提交
5431 5432 5433
        goto cleanup;
    }
    if (!(flags & VIR_MIGRATE_TUNNELLED)) {
5434
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
C
Chris Lalancette 已提交
5435 5436 5437 5438
                         "%s", _("PrepareTunnel called but no TUNNELLED flag set"));
        goto cleanup;
    }
    if (st == NULL) {
5439 5440
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("tunnelled migration requested but NULL stream passed"));
C
Chris Lalancette 已提交
5441 5442 5443
        goto cleanup;
    }

5444 5445 5446 5447
    qemuDriverLock(driver);
    ret = qemuMigrationPrepareTunnel(driver, dconn, st,
                                     dname, dom_xml);
    qemuDriverUnlock(driver);
5448

C
Chris Lalancette 已提交
5449 5450 5451 5452
cleanup:
    return ret;
}

D
Daniel Veillard 已提交
5453 5454 5455 5456
/* Prepare is the first step, and it runs on the destination host.
 *
 * This starts an empty VM listening on a TCP port.
 */
5457
static int ATTRIBUTE_NONNULL (5)
D
Daniel Veillard 已提交
5458 5459 5460 5461 5462
qemudDomainMigratePrepare2 (virConnectPtr dconn,
                            char **cookie ATTRIBUTE_UNUSED,
                            int *cookielen ATTRIBUTE_UNUSED,
                            const char *uri_in,
                            char **uri_out,
C
Chris Lalancette 已提交
5463
                            unsigned long flags,
D
Daniel Veillard 已提交
5464 5465 5466 5467
                            const char *dname,
                            unsigned long resource ATTRIBUTE_UNUSED,
                            const char *dom_xml)
{
5468
    struct qemud_driver *driver = dconn->privateData;
5469
    int ret = -1;
5470

C
Chris Lalancette 已提交
5471 5472 5473 5474 5475 5476 5477 5478 5479
    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);

5480
    *uri_out = NULL;
D
Daniel Veillard 已提交
5481

5482
    qemuDriverLock(driver);
C
Chris Lalancette 已提交
5483 5484 5485 5486
    if (flags & VIR_MIGRATE_TUNNELLED) {
        /* this is a logical error; we never should have gotten here with
         * VIR_MIGRATE_TUNNELLED set
         */
5487 5488
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("Tunnelled migration requested but invalid RPC method called"));
C
Chris Lalancette 已提交
5489 5490 5491
        goto cleanup;
    }

D
Daniel Veillard 已提交
5492
    if (!dom_xml) {
5493 5494
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("no domain XML passed"));
5495
        goto cleanup;
D
Daniel Veillard 已提交
5496 5497
    }

5498 5499 5500
    ret = qemuMigrationPrepareDirect(driver, dconn,
                                     uri_in, uri_out,
                                     dname, dom_xml);
D
Daniel Veillard 已提交
5501

5502 5503 5504 5505
cleanup:
    qemuDriverUnlock(driver);
    return ret;
}
C
Chris Lalancette 已提交
5506

D
Daniel Veillard 已提交
5507

5508 5509 5510 5511 5512 5513 5514 5515 5516 5517 5518 5519 5520
/* 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;
5521

5522 5523 5524 5525 5526 5527 5528 5529
    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 已提交
5530

5531
    qemuDriverLock(driver);
5532
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
D
Daniel Veillard 已提交
5533
    if (!vm) {
5534 5535
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
5536 5537
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
5538
        goto cleanup;
D
Daniel Veillard 已提交
5539 5540
    }

5541 5542 5543
    ret = qemuMigrationPerform(driver, dom->conn, vm,
                               uri, flags,
                               dname, resource);
5544

5545
cleanup:
5546
    qemuDriverUnlock(driver);
5547
    return ret;
D
Daniel Veillard 已提交
5548 5549
}

5550

D
Daniel Veillard 已提交
5551 5552 5553 5554 5555 5556 5557
/* 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 已提交
5558
                           unsigned long flags,
D
Daniel Veillard 已提交
5559 5560
                           int retcode)
{
5561 5562 5563
    struct qemud_driver *driver = dconn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;
5564
    virErrorPtr orig_err;
D
Daniel Veillard 已提交
5565

C
Chris Lalancette 已提交
5566 5567 5568 5569 5570 5571 5572 5573 5574
    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);

5575 5576 5577
    /* Migration failed. Save the current error so nothing squashes it */
    orig_err = virSaveLastError();

5578
    qemuDriverLock(driver);
5579
    vm = virDomainFindByName(&driver->domains, dname);
D
Daniel Veillard 已提交
5580
    if (!vm) {
5581 5582
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching name '%s'"), dname);
5583
        goto cleanup;
D
Daniel Veillard 已提交
5584 5585
    }

5586
    dom = qemuMigrationFinish(driver, dconn, vm, flags, retcode);
5587

5588
cleanup:
5589 5590 5591 5592
    if (orig_err) {
        virSetError(orig_err);
        virFreeError(orig_err);
    }
5593
    qemuDriverUnlock(driver);
5594
    return dom;
D
Daniel Veillard 已提交
5595 5596
}

5597

5598 5599 5600 5601 5602 5603 5604 5605 5606 5607 5608 5609 5610 5611 5612 5613
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;

5614
    def = virNodeDeviceDefParseString(xml, EXISTING_DEVICE);
5615 5616 5617 5618 5619 5620 5621 5622 5623 5624 5625 5626 5627 5628 5629 5630 5631
    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) {
5632 5633
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("device %s is not a PCI device"), dev->name);
5634 5635 5636 5637 5638 5639 5640 5641 5642 5643 5644 5645 5646
        goto out;
    }

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

static int
qemudNodeDeviceDettach (virNodeDevicePtr dev)
{
5647
    struct qemud_driver *driver = dev->conn->privateData;
5648 5649 5650 5651 5652 5653 5654
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

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

5655
    pci = pciGetDevice(domain, bus, slot, function);
5656 5657 5658
    if (!pci)
        return -1;

5659 5660
    qemuDriverLock(driver);
    if (pciDettachDevice(pci, driver->activePciHostdevs) < 0)
5661 5662 5663 5664
        goto out;

    ret = 0;
out:
5665
    qemuDriverUnlock(driver);
5666
    pciFreeDevice(pci);
5667 5668 5669 5670 5671 5672
    return ret;
}

static int
qemudNodeDeviceReAttach (virNodeDevicePtr dev)
{
5673
    struct qemud_driver *driver = dev->conn->privateData;
5674 5675 5676 5677 5678 5679 5680
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

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

5681
    pci = pciGetDevice(domain, bus, slot, function);
5682 5683 5684
    if (!pci)
        return -1;

5685 5686
    qemuDriverLock(driver);
    if (pciReAttachDevice(pci, driver->activePciHostdevs) < 0)
5687 5688 5689 5690
        goto out;

    ret = 0;
out:
5691
    qemuDriverUnlock(driver);
5692
    pciFreeDevice(pci);
5693 5694 5695 5696 5697 5698
    return ret;
}

static int
qemudNodeDeviceReset (virNodeDevicePtr dev)
{
5699
    struct qemud_driver *driver = dev->conn->privateData;
5700 5701 5702 5703 5704 5705 5706
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

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

5707
    pci = pciGetDevice(domain, bus, slot, function);
5708 5709 5710
    if (!pci)
        return -1;

5711 5712
    qemuDriverLock(driver);

5713
    if (pciResetDevice(pci, driver->activePciHostdevs, NULL) < 0)
5714 5715 5716 5717
        goto out;

    ret = 0;
out:
5718
    qemuDriverUnlock(driver);
5719
    pciFreeDevice(pci);
5720 5721 5722
    return ret;
}

5723 5724 5725 5726 5727 5728 5729 5730 5731 5732 5733
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) {
5734 5735
        qemuReportError(VIR_ERR_NO_SUPPORT,
                        "%s", _("cannot get host CPU capabilities"));
5736 5737
    }
    else
5738
        ret = cpuCompareXML(driver->caps->host.cpu, xmlDesc);
5739 5740 5741 5742 5743 5744

    qemuDriverUnlock(driver);

    return ret;
}

5745

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

5759 5760 5761 5762 5763 5764 5765 5766 5767 5768 5769 5770 5771 5772 5773 5774 5775 5776 5777 5778 5779 5780 5781

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) {
5782 5783
            struct timeval now;

5784
            memcpy(info, &priv->jobInfo, sizeof(*info));
5785 5786 5787 5788 5789 5790 5791 5792 5793 5794 5795

            /* 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;
            }
5796
            info->timeElapsed = timeval_to_ms(now) - priv->jobStart;
5797 5798 5799 5800 5801 5802 5803 5804 5805 5806 5807 5808 5809 5810 5811 5812 5813 5814 5815
        } 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;
}


5816 5817 5818 5819 5820 5821 5822 5823 5824 5825 5826 5827 5828 5829 5830 5831 5832 5833 5834 5835 5836 5837
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);
5838
            priv->jobSignals |= QEMU_JOB_SIGNAL_CANCEL;
5839 5840 5841 5842 5843 5844 5845 5846 5847 5848 5849 5850 5851 5852 5853 5854 5855 5856 5857 5858
        } 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;
}


5859 5860 5861 5862 5863 5864 5865 5866 5867 5868
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;

5869
    virCheckFlags(0, -1);
5870 5871 5872 5873 5874 5875 5876 5877 5878 5879 5880 5881 5882 5883 5884 5885 5886 5887 5888 5889

    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;

5890
    if (priv->jobActive != QEMU_JOB_MIGRATION_OUT) {
5891 5892 5893 5894 5895 5896 5897 5898 5899 5900 5901 5902 5903 5904 5905 5906 5907
        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;
}

5908 5909 5910 5911 5912 5913 5914 5915 5916 5917 5918 5919 5920 5921 5922 5923 5924 5925 5926 5927 5928 5929 5930 5931 5932 5933 5934 5935 5936 5937 5938 5939 5940 5941 5942 5943 5944 5945 5946 5947 5948 5949 5950 5951 5952 5953 5954 5955 5956
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 已提交
5957 5958 5959 5960 5961 5962 5963 5964 5965 5966 5967 5968 5969 5970
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;
}

5971 5972 5973
static int qemuDomainSnapshotWriteMetadata(virDomainObjPtr vm,
                                           virDomainSnapshotObjPtr snapshot,
                                           char *snapshotDir)
C
Chris Lalancette 已提交
5974 5975 5976 5977 5978 5979 5980 5981 5982 5983
{
    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);
5984
    newxml = virDomainSnapshotDefFormat(uuidstr, snapshot->def, 1);
C
Chris Lalancette 已提交
5985 5986 5987 5988 5989 5990 5991 5992 5993 5994 5995 5996 5997 5998 5999 6000
    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;
    }

6001
    if (virAsprintf(&snapFile, "%s/%s.xml", snapDir, snapshot->def->name) < 0) {
C
Chris Lalancette 已提交
6002 6003 6004 6005 6006 6007 6008 6009 6010 6011 6012 6013 6014 6015 6016 6017 6018 6019 6020 6021 6022
        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);
6023
    VIR_FORCE_CLOSE(fd);
C
Chris Lalancette 已提交
6024 6025 6026
    return ret;
}

6027 6028
static int qemuDomainSnapshotSetCurrentActive(virDomainObjPtr vm,
                                              char *snapshotDir)
C
Chris Lalancette 已提交
6029 6030 6031 6032
{
    if (vm->current_snapshot) {
        vm->current_snapshot->def->active = 1;

6033 6034
        return qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                               snapshotDir);
C
Chris Lalancette 已提交
6035 6036 6037 6038 6039
    }

    return 0;
}

6040 6041
static int qemuDomainSnapshotSetCurrentInactive(virDomainObjPtr vm,
                                                char *snapshotDir)
C
Chris Lalancette 已提交
6042 6043 6044 6045
{
    if (vm->current_snapshot) {
        vm->current_snapshot->def->active = 0;

6046 6047
        return qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                               snapshotDir);
C
Chris Lalancette 已提交
6048 6049 6050 6051 6052 6053 6054 6055 6056 6057 6058 6059 6060 6061 6062 6063 6064 6065 6066
    }

    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,
6067 6068
                            _("Disk '%s' does not support snapshotting"),
                            vm->def->disks[i]->src);
C
Chris Lalancette 已提交
6069 6070 6071 6072 6073 6074 6075
            return 0;
        }
    }

    return 1;
}

6076 6077 6078 6079 6080 6081 6082 6083 6084 6085 6086 6087 6088 6089 6090 6091 6092 6093 6094 6095 6096 6097 6098 6099 6100 6101 6102 6103 6104 6105 6106 6107 6108 6109 6110 6111 6112 6113 6114 6115 6116 6117 6118 6119 6120 6121 6122 6123
/* 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
6124 6125
qemuDomainSnapshotCreateActive(virConnectPtr conn,
                               struct qemud_driver *driver,
6126 6127 6128 6129 6130
                               virDomainObjPtr *vmptr,
                               virDomainSnapshotObjPtr snap)
{
    virDomainObjPtr vm = *vmptr;
    qemuDomainObjPrivatePtr priv = vm->privateData;
6131 6132
    bool resume = false;
    int ret = -1;
6133 6134 6135 6136

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

6137 6138 6139 6140 6141 6142 6143 6144 6145 6146 6147 6148 6149 6150 6151 6152
    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;
        }
    }

6153 6154 6155 6156
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
    ret = qemuMonitorCreateSnapshot(priv->mon, snap->def->name);
    qemuDomainObjExitMonitorWithDriver(driver, vm);

6157 6158 6159 6160 6161 6162 6163 6164
cleanup:
    if (resume && virDomainObjIsActive(vm) &&
        qemuProcessStartCPUs(driver, vm, conn) < 0 &&
        virGetLastError() == NULL) {
        qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                        _("resuming after snapshot failed"));
    }

6165 6166 6167 6168 6169 6170
    if (qemuDomainObjEndJob(vm) == 0)
        *vmptr = NULL;

    return ret;
}

C
Chris Lalancette 已提交
6171 6172
static virDomainSnapshotPtr qemuDomainSnapshotCreateXML(virDomainPtr domain,
                                                        const char *xmlDesc,
6173
                                                        unsigned int flags)
C
Chris Lalancette 已提交
6174 6175 6176 6177 6178 6179 6180 6181
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    virDomainSnapshotObjPtr snap = NULL;
    virDomainSnapshotPtr snapshot = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];
    virDomainSnapshotDefPtr def;

6182 6183
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
6184 6185 6186 6187 6188 6189 6190 6191 6192 6193 6194 6195 6196 6197 6198 6199 6200 6201 6202 6203 6204 6205 6206 6207 6208
    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;

6209 6210
    snap->def->state = vm->state;

C
Chris Lalancette 已提交
6211 6212
    /* actually do the snapshot */
    if (!virDomainObjIsActive(vm)) {
6213
        if (qemuDomainSnapshotCreateInactive(vm, snap) < 0)
C
Chris Lalancette 已提交
6214 6215 6216
            goto cleanup;
    }
    else {
6217 6218
        if (qemuDomainSnapshotCreateActive(domain->conn, driver,
                                           &vm, snap) < 0)
6219
            goto cleanup;
C
Chris Lalancette 已提交
6220 6221 6222 6223 6224 6225 6226 6227 6228 6229 6230 6231 6232 6233 6234 6235 6236 6237
    }

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

6238 6239 6240
    if (qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                        driver->snapshotDir) < 0)
        /* qemuDomainSnapshotWriteMetadata set the error */
C
Chris Lalancette 已提交
6241 6242 6243 6244 6245 6246 6247 6248 6249 6250 6251 6252 6253
        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,
6254
                                       unsigned int flags)
C
Chris Lalancette 已提交
6255 6256 6257 6258 6259
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int n = -1;

6260 6261
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
6262 6263 6264 6265 6266 6267 6268 6269 6270 6271 6272 6273 6274 6275 6276 6277 6278 6279 6280 6281
    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,
6282
                                 unsigned int flags)
C
Chris Lalancette 已提交
6283 6284 6285 6286 6287
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int n = -1;

6288 6289
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
6290 6291 6292 6293 6294 6295 6296 6297 6298 6299 6300 6301 6302 6303 6304 6305 6306 6307 6308 6309 6310
    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,
6311
                                                           unsigned int flags)
C
Chris Lalancette 已提交
6312 6313 6314 6315 6316 6317
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    virDomainSnapshotObjPtr snap = NULL;
    virDomainSnapshotPtr snapshot = NULL;

6318 6319
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
6320 6321 6322 6323 6324 6325 6326 6327 6328 6329 6330 6331 6332 6333 6334 6335 6336 6337 6338 6339 6340 6341 6342 6343 6344 6345 6346
    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,
6347
                                        unsigned int flags)
C
Chris Lalancette 已提交
6348 6349 6350 6351 6352
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;

6353 6354
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
6355 6356 6357 6358 6359 6360 6361 6362 6363 6364 6365 6366 6367 6368 6369 6370 6371 6372 6373 6374
    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,
6375
                                                      unsigned int flags)
C
Chris Lalancette 已提交
6376 6377 6378 6379 6380
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    virDomainSnapshotPtr snapshot = NULL;

6381 6382
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
6383 6384 6385 6386 6387 6388 6389 6390 6391 6392 6393 6394 6395 6396 6397 6398 6399 6400 6401 6402 6403 6404 6405 6406 6407 6408
    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,
6409
                                       unsigned int flags)
C
Chris Lalancette 已提交
6410 6411 6412 6413 6414 6415 6416
{
    struct qemud_driver *driver = snapshot->domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    char *xml = NULL;
    virDomainSnapshotObjPtr snap = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];

6417 6418
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
6419 6420 6421 6422 6423 6424 6425 6426 6427 6428 6429 6430 6431 6432 6433 6434 6435 6436 6437 6438 6439 6440 6441 6442 6443 6444 6445
    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,
6446
                                      unsigned int flags)
C
Chris Lalancette 已提交
6447 6448 6449 6450 6451 6452 6453 6454 6455 6456
{
    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;

6457 6458
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
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
    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)
6490
                goto endjob;
C
Chris Lalancette 已提交
6491 6492
        }
        else {
6493
            if (qemuDomainSnapshotSetCurrentActive(vm, driver->snapshotDir) < 0)
6494
                goto endjob;
C
Chris Lalancette 已提交
6495

6496 6497
            rc = qemuProcessStart(snapshot->domain->conn, driver, vm, NULL,
                                  false, -1, NULL, VIR_VM_OP_CREATE);
6498
            qemuAuditDomainStart(vm, "from-snapshot", rc >= 0);
6499
            if (qemuDomainSnapshotSetCurrentInactive(vm, driver->snapshotDir) < 0)
6500
                goto endjob;
C
Chris Lalancette 已提交
6501
            if (rc < 0)
6502
                goto endjob;
C
Chris Lalancette 已提交
6503 6504 6505 6506 6507 6508
        }

        if (snap->def->state == VIR_DOMAIN_PAUSED) {
            /* qemu unconditionally starts the domain running again after
             * loadvm, so let's pause it to keep consistency
             */
6509
            rc = qemuProcessStopCPUs(driver, vm);
H
Hu Tao 已提交
6510
            if (rc < 0)
6511
                goto endjob;
C
Chris Lalancette 已提交
6512 6513 6514 6515 6516 6517 6518 6519 6520 6521 6522 6523 6524 6525 6526 6527 6528 6529
        }

        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)) {
6530
            qemuProcessStop(driver, vm, 0);
6531
            qemuAuditDomainStop(vm, "from-snapshot");
C
Chris Lalancette 已提交
6532 6533 6534
            event = virDomainEventNewFromObj(vm,
                                             VIR_DOMAIN_EVENT_STOPPED,
                                             VIR_DOMAIN_EVENT_STOPPED_FROM_SNAPSHOT);
6535 6536 6537 6538
            if (!vm->persistent) {
                if (qemuDomainObjEndJob(vm) > 0)
                    virDomainRemoveInactive(&driver->domains, vm);
                vm = NULL;
6539
                goto cleanup;
6540
            }
C
Chris Lalancette 已提交
6541 6542
        }

6543
        if (qemuDomainSnapshotSetCurrentActive(vm, driver->snapshotDir) < 0)
6544
            goto endjob;
C
Chris Lalancette 已提交
6545 6546 6547 6548 6549 6550
    }

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

    ret = 0;

6551
endjob:
C
Chris Lalancette 已提交
6552 6553 6554
    if (vm && qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

6555
cleanup:
C
Chris Lalancette 已提交
6556 6557 6558 6559 6560 6561 6562 6563 6564 6565 6566 6567 6568 6569 6570 6571 6572 6573 6574 6575 6576 6577 6578 6579 6580 6581 6582 6583 6584 6585 6586 6587 6588 6589 6590 6591 6592 6593 6594 6595 6596 6597 6598 6599 6600 6601 6602 6603 6604 6605 6606 6607 6608 6609 6610 6611 6612 6613 6614 6615 6616 6617 6618 6619 6620 6621 6622 6623 6624 6625 6626 6627 6628 6629 6630 6631 6632 6633 6634 6635 6636 6637 6638 6639 6640 6641 6642 6643 6644 6645 6646 6647 6648 6649 6650 6651 6652 6653 6654 6655 6656 6657
    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,
6658
                                              const void *name ATTRIBUTE_UNUSED,
C
Chris Lalancette 已提交
6659 6660 6661 6662 6663 6664 6665 6666 6667 6668 6669 6670 6671 6672 6673 6674 6675 6676 6677 6678 6679
                                              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);
    }
}

6680 6681 6682 6683 6684 6685 6686 6687 6688
struct snap_reparent {
    struct qemud_driver *driver;
    virDomainSnapshotObjPtr snap;
    virDomainObjPtr vm;
    int err;
};

static void
qemuDomainSnapshotReparentChildren(void *payload,
6689
                                   const void *name ATTRIBUTE_UNUSED,
6690 6691 6692 6693 6694 6695 6696 6697 6698 6699 6700 6701 6702 6703 6704 6705 6706 6707 6708 6709 6710 6711 6712 6713 6714 6715 6716
                                   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 已提交
6717 6718 6719 6720 6721 6722 6723 6724 6725
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;
6726
    struct snap_reparent rep;
C
Chris Lalancette 已提交
6727

6728 6729
    virCheckFlags(VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN, -1);

C
Chris Lalancette 已提交
6730 6731 6732 6733 6734 6735 6736 6737 6738 6739 6740 6741 6742 6743 6744 6745 6746
    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;
    }

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

C
Chris Lalancette 已提交
6750 6751 6752 6753 6754 6755 6756 6757
    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)
6758
            goto endjob;
6759 6760 6761 6762 6763 6764 6765 6766 6767
    } 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 已提交
6768 6769 6770 6771
    }

    ret = qemuDomainSnapshotDiscard(driver, vm, snap);

6772 6773 6774 6775
endjob:
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

C
Chris Lalancette 已提交
6776 6777 6778 6779 6780 6781
cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}
6782

6783 6784 6785 6786 6787 6788 6789
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;
6790
    bool hmp;
6791

6792
    virCheckFlags(VIR_DOMAIN_QEMU_MONITOR_COMMAND_HMP, -1);
6793 6794 6795 6796 6797 6798 6799 6800 6801 6802 6803 6804 6805 6806 6807 6808 6809 6810 6811 6812 6813 6814 6815 6816 6817

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

6818 6819
    hmp = !!(flags & VIR_DOMAIN_QEMU_MONITOR_COMMAND_HMP);

6820 6821 6822
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
6823
    ret = qemuMonitorArbitraryCommand(priv->mon, cmd, result, hmp);
6824 6825 6826 6827 6828 6829 6830 6831 6832 6833 6834 6835 6836
    qemuDomainObjExitMonitorWithDriver(driver, vm);
    if (qemuDomainObjEndJob(vm) == 0) {
        vm = NULL;
        goto cleanup;
    }

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

6837 6838 6839 6840 6841 6842 6843 6844 6845 6846 6847 6848 6849 6850 6851 6852 6853 6854 6855 6856 6857 6858 6859 6860 6861 6862 6863 6864 6865 6866 6867 6868 6869 6870 6871 6872 6873 6874 6875 6876 6877 6878 6879 6880 6881 6882 6883 6884 6885 6886 6887 6888 6889 6890 6891 6892 6893

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

6894
    if (chr->source.type != VIR_DOMAIN_CHR_TYPE_PTY) {
6895 6896 6897 6898 6899 6900
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("character device %s is not using a PTY"),
                        NULLSTR(devname));
        goto cleanup;
    }

6901
    if (virFDStreamOpenFile(st, chr->source.data.file.path, 0, 0, O_RDWR) < 0)
6902 6903 6904 6905 6906 6907 6908 6909 6910 6911 6912
        goto cleanup;

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


6913 6914 6915 6916 6917
static virDriver qemuDriver = {
    VIR_DRV_QEMU,
    "QEMU",
    qemudOpen, /* open */
    qemudClose, /* close */
D
Daniel Veillard 已提交
6918
    qemudSupportsFeature, /* supports_feature */
6919 6920
    qemudGetType, /* type */
    qemudGetVersion, /* version */
6921
    NULL, /* libvirtVersion (impl. in libvirt.c) */
6922
    virGetHostname, /* getHostname */
E
Eric Blake 已提交
6923
    qemuGetSysinfo, /* getSysinfo */
6924
    qemudGetMaxVCPUs, /* getMaxVcpus */
6925
    nodeGetInfo, /* nodeGetInfo */
6926 6927 6928
    qemudGetCapabilities, /* getCapabilities */
    qemudListDomains, /* listDomains */
    qemudNumDomains, /* numOfDomains */
6929
    qemudDomainCreate, /* domainCreateXML */
6930 6931 6932 6933 6934
    qemudDomainLookupByID, /* domainLookupByID */
    qemudDomainLookupByUUID, /* domainLookupByUUID */
    qemudDomainLookupByName, /* domainLookupByName */
    qemudDomainSuspend, /* domainSuspend */
    qemudDomainResume, /* domainResume */
6935
    qemudDomainShutdown, /* domainShutdown */
6936 6937 6938
    NULL, /* domainReboot */
    qemudDomainDestroy, /* domainDestroy */
    qemudDomainGetOSType, /* domainGetOSType */
6939
    qemudDomainGetMaxMemory, /* domainGetMaxMemory */
6940
    qemudDomainSetMaxMemory, /* domainSetMaxMemory */
6941
    qemudDomainSetMemory, /* domainSetMemory */
6942
    qemudDomainSetMemoryFlags, /* domainSetMemoryFlags */
6943 6944
    qemuDomainSetMemoryParameters, /* domainSetMemoryParameters */
    qemuDomainGetMemoryParameters, /* domainGetMemoryParameters */
6945 6946
    qemuDomainSetBlkioParameters, /* domainSetBlkioParameters */
    qemuDomainGetBlkioParameters, /* domainGetBlkioParameters */
6947 6948
    qemudDomainGetInfo, /* domainGetInfo */
    qemudDomainSave, /* domainSave */
6949
    qemuDomainRestore, /* domainRestore */
P
Paolo Bonzini 已提交
6950
    qemudDomainCoreDump, /* domainCoreDump */
6951
    qemudDomainSetVcpus, /* domainSetVcpus */
6952 6953
    qemudDomainSetVcpusFlags, /* domainSetVcpusFlags */
    qemudDomainGetVcpusFlags, /* domainGetVcpusFlags */
6954 6955
    qemudDomainPinVcpu, /* domainPinVcpu */
    qemudDomainGetVcpus, /* domainGetVcpus */
6956
    qemudDomainGetMaxVcpus, /* domainGetMaxVcpus */
6957 6958
    qemudDomainGetSecurityLabel, /* domainGetSecurityLabel */
    qemudNodeGetSecurityModel, /* nodeGetSecurityModel */
6959
    qemudDomainDumpXML, /* domainDumpXML */
6960
    qemuDomainXMLFromNative, /* domainXmlFromNative */
6961
    qemuDomainXMLToNative, /* domainXMLToNative */
6962 6963
    qemudListDefinedDomains, /* listDefinedDomains */
    qemudNumDefinedDomains, /* numOfDefinedDomains */
6964
    qemudDomainStart, /* domainCreate */
6965
    qemudDomainStartWithFlags, /* domainCreateWithFlags */
6966 6967
    qemudDomainDefine, /* domainDefineXML */
    qemudDomainUndefine, /* domainUndefine */
6968
    qemudDomainAttachDevice, /* domainAttachDevice */
6969
    qemudDomainAttachDeviceFlags, /* domainAttachDeviceFlags */
6970
    qemudDomainDetachDevice, /* domainDetachDevice */
6971
    qemudDomainDetachDeviceFlags, /* domainDetachDeviceFlags */
6972
    qemuDomainUpdateDeviceFlags, /* domainUpdateDeviceFlags */
6973 6974
    qemudDomainGetAutostart, /* domainGetAutostart */
    qemudDomainSetAutostart, /* domainSetAutostart */
6975 6976 6977
    qemuGetSchedulerType, /* domainGetSchedulerType */
    qemuGetSchedulerParameters, /* domainGetSchedulerParameters */
    qemuSetSchedulerParameters, /* domainSetSchedulerParameters */
D
Daniel Veillard 已提交
6978 6979
    NULL, /* domainMigratePrepare (v1) */
    qemudDomainMigratePerform, /* domainMigratePerform */
6980
    NULL, /* domainMigrateFinish */
6981
    qemudDomainBlockStats, /* domainBlockStats */
6982
    qemudDomainInterfaceStats, /* domainInterfaceStats */
6983
    qemudDomainMemoryStats, /* domainMemoryStats */
6984
    qemudDomainBlockPeek, /* domainBlockPeek */
R
Richard W.M. Jones 已提交
6985
    qemudDomainMemoryPeek, /* domainMemoryPeek */
6986
    qemuDomainGetBlockInfo, /* domainGetBlockInfo */
6987 6988
    nodeGetCellsFreeMemory, /* nodeGetCellsFreeMemory */
    nodeGetFreeMemory,  /* getFreeMemory */
6989 6990
    qemuDomainEventRegister, /* domainEventRegister */
    qemuDomainEventDeregister, /* domainEventDeregister */
D
Daniel Veillard 已提交
6991 6992
    qemudDomainMigratePrepare2, /* domainMigratePrepare2 */
    qemudDomainMigrateFinish2, /* domainMigrateFinish2 */
6993 6994 6995
    qemudNodeDeviceDettach, /* nodeDeviceDettach */
    qemudNodeDeviceReAttach, /* nodeDeviceReAttach */
    qemudNodeDeviceReset, /* nodeDeviceReset */
C
Chris Lalancette 已提交
6996
    qemudDomainMigratePrepareTunnel, /* domainMigratePrepareTunnel */
6997 6998 6999 7000
    qemuIsEncrypted, /* isEncrypted */
    qemuIsSecure, /* isSecure */
    qemuDomainIsActive, /* domainIsActive */
    qemuDomainIsPersistent, /* domainIsPersistent */
7001
    qemuDomainIsUpdated, /* domainIsUpdated */
7002
    qemuCPUCompare, /* cpuCompare */
7003
    qemuCPUBaseline, /* cpuBaseline */
7004
    qemuDomainGetJobInfo, /* domainGetJobInfo */
7005
    qemuDomainAbortJob, /* domainAbortJob */
7006
    qemuDomainMigrateSetMaxDowntime, /* domainMigrateSetMaxDowntime */
7007
    qemuDomainMigrateSetMaxSpeed, /* domainMigrateSetMaxSpeed */
7008 7009
    qemuDomainEventRegisterAny, /* domainEventRegisterAny */
    qemuDomainEventDeregisterAny, /* domainEventDeregisterAny */
7010 7011 7012
    qemuDomainManagedSave, /* domainManagedSave */
    qemuDomainHasManagedSaveImage, /* domainHasManagedSaveImage */
    qemuDomainManagedSaveRemove, /* domainManagedSaveRemove */
C
Chris Lalancette 已提交
7013 7014 7015 7016 7017 7018 7019 7020 7021
    qemuDomainSnapshotCreateXML, /* domainSnapshotCreateXML */
    qemuDomainSnapshotDumpXML, /* domainSnapshotDumpXML */
    qemuDomainSnapshotNum, /* domainSnapshotNum */
    qemuDomainSnapshotListNames, /* domainSnapshotListNames */
    qemuDomainSnapshotLookupByName, /* domainSnapshotLookupByName */
    qemuDomainHasCurrentSnapshot, /* domainHasCurrentSnapshot */
    qemuDomainSnapshotCurrent, /* domainSnapshotCurrent */
    qemuDomainRevertToSnapshot, /* domainRevertToSnapshot */
    qemuDomainSnapshotDelete, /* domainSnapshotDelete */
7022
    qemuDomainMonitorCommand, /* qemuDomainMonitorCommand */
7023
    qemuDomainOpenConsole, /* domainOpenConsole */
7024 7025 7026
};


7027
static virStateDriver qemuStateDriver = {
7028
    .name = "QEMU",
7029 7030 7031 7032
    .initialize = qemudStartup,
    .cleanup = qemudShutdown,
    .reload = qemudReload,
    .active = qemudActive,
7033
};
7034

7035
static void
7036
qemuVMDriverLock(void) {
7037 7038 7039 7040 7041
    qemuDriverLock(qemu_driver);
};


static void
7042
qemuVMDriverUnlock(void) {
7043 7044 7045 7046
    qemuDriverUnlock(qemu_driver);
};


7047 7048 7049 7050 7051 7052 7053 7054 7055
static int
qemuVMFilterRebuild(virConnectPtr conn ATTRIBUTE_UNUSED,
                    virHashIterator iter, void *data)
{
    virHashForEach(qemu_driver->domains.objs, iter, data);

    return 0;
}

S
Stefan Berger 已提交
7056 7057
static virNWFilterCallbackDriver qemuCallbackDriver = {
    .name = "QEMU",
7058 7059 7060
    .vmFilterRebuild = qemuVMFilterRebuild,
    .vmDriverLock = qemuVMDriverLock,
    .vmDriverUnlock = qemuVMDriverUnlock,
S
Stefan Berger 已提交
7061 7062
};

7063
int qemuRegister(void) {
7064 7065
    virRegisterDriver(&qemuDriver);
    virRegisterStateDriver(&qemuStateDriver);
S
Stefan Berger 已提交
7066
    virNWFilterRegisterCallbackDriver(&qemuCallbackDriver);
7067 7068
    return 0;
}