qemu_driver.c 211.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>
D
Daniel P. Berrange 已提交
46

47

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

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

90 91
#define VIR_FROM_THIS VIR_FROM_QEMU

92 93
#define QEMU_NB_MEM_PARAM  3

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

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

101 102 103 104 105 106 107 108 109 110 111 112 113
/* add definitions missing in older linux/kvm.h */
#ifndef KVMIO
# define KVMIO 0xAE
#endif
#ifndef KVM_CHECK_EXTENSION
# define KVM_CHECK_EXTENSION       _IO(KVMIO,   0x03)
#endif
#ifndef KVM_CAP_NR_VCPUS
# define KVM_CAP_NR_VCPUS 9       /* returns max vcpus per vm */
#endif


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

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

117 118
static int qemudShutdown(void);

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

124
static int qemudDomainGetMaxVcpus(virDomainPtr dom);
125

126
struct qemud_driver *qemu_driver = NULL;
127 128


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

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

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

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

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

166

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

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

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

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

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

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

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

215
    return 0;
216

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

223

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

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

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

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

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

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

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

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

268
    return caps;
269

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

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

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

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

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

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

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

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

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

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

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

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

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

356
    virResetLastError();
357

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

473 474 475 476 477
    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 已提交
478
    }
479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507
    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;
508 509
    }

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

518
    VIR_FREE(base);
519

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

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

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

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

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

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

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

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

597
        qemu_driver->hugepage_path = mempath;
598
    }
599

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

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

612
    qemuProcessReconnectAll(conn, qemu_driver);
613

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

622

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

626
    qemuDriverUnlock(qemu_driver);
627

628
    qemuAutostartDomains(qemu_driver);
629

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

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

637
    return 0;
638

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

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

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

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

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

685
    qemuAutostartDomains(qemu_driver);
686

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

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

702 703
    if (!qemu_driver)
        return 0;
704

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

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

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

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

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

731
    virSysinfoDefFree(qemu_driver->hostsysinfo);
732

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

754
    virSecurityManagerFree(qemu_driver->securityManager);
755

756
    ebtablesContextFree(qemu_driver->ebtables);
757

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

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

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

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

774
    virCgroupFree(&qemu_driver->cgroup);
775

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

781
    return 0;
782 783
}

784 785 786 787 788 789 790

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


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

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

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

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

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

    return VIR_DRV_OPEN_SUCCESS;
}

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

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

    conn->privateData = NULL;

    return 0;
}

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

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

882

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


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

    int r, fd;
900

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

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

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


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

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

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

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

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

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

950

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

956
    qemuDriverLock(driver);
957

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

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

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

cleanup:
971
    qemuDriverUnlock(driver);
972

973
    return xml;
974 975 976
}


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

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

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

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

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

D
Daniel P. Berrange 已提交
1031

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

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

    return 0;
}


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

1118 1119 1120 1121 1122 1123 1124 1125 1126 1127 1128

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

1237
    virCheckFlags(VIR_DOMAIN_START_PAUSED, NULL);
1238

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

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

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

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

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

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

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

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

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

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

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

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

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


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

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

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

    priv = vm->privateData;

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

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

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

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


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

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

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

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

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

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

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


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

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

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

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

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

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

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

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


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

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

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

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

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

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

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

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


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

1613 1614 1615 1616 1617 1618 1619 1620 1621
    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;
    }
1622

1623 1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635 1636 1637 1638 1639 1640 1641 1642
    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);
1643
        goto endjob;
1644
    }
1645

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

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

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

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

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

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

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

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

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

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

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

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

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


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

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

    QEMUD_SAVE_FORMAT_LAST
1757
};
1758

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

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

1776 1777 1778 1779 1780 1781 1782
struct fileOpHookData {
    virDomainPtr dom;
    const char *path;
    char *xml;
    struct qemud_save_header *header;
};

1783
/* return -errno on failure, or 0 on success */
1784 1785 1786 1787 1788
static int qemudDomainSaveFileOpHook(int fd, void *data) {
    struct fileOpHookData *hdata = data;
    int ret = 0;

    if (safewrite(fd, hdata->header, sizeof(*hdata->header)) != sizeof(*hdata->header)) {
1789
        ret = -errno;
1790
        qemuReportError(VIR_ERR_OPERATION_FAILED,
1791 1792
                        _("failed to write header to domain save file '%s'"),
                        hdata->path);
1793 1794 1795 1796
        goto endjob;
    }

    if (safewrite(fd, hdata->xml, hdata->header->xml_len) != hdata->header->xml_len) {
1797
        ret = -errno;
1798 1799 1800 1801 1802 1803 1804 1805
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                         _("failed to write xml to '%s'"), hdata->path);
        goto endjob;
    }
endjob:
    return ret;
}

1806 1807 1808
/* This internal function expects the driver lock to already be held on
 * entry and the vm must be active.
 */
1809 1810
static int qemudDomainSaveFlag(struct qemud_driver *driver, virDomainPtr dom,
                               virDomainObjPtr vm, const char *path,
1811
                               int compressed)
1812
{
1813
    char *xml = NULL;
1814
    struct qemud_save_header header;
1815 1816
    struct fileOpHookData hdata;
    int bypassSecurityDriver = 0;
1817
    int ret = -1;
1818
    int rc;
1819
    virDomainEventPtr event = NULL;
1820
    qemuDomainObjPrivatePtr priv;
1821 1822
    struct stat sb;
    int is_reg = 0;
1823
    unsigned long long offset;
1824
    virCgroupPtr cgroup = NULL;
1825 1826 1827 1828 1829

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

1830
    header.compressed = compressed;
1831

1832
    priv = vm->privateData;
1833

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

O
Osier Yang 已提交
1837 1838
    priv->jobActive = QEMU_JOB_SAVE;

1839 1840 1841
    memset(&priv->jobInfo, 0, sizeof(priv->jobInfo));
    priv->jobInfo.type = VIR_DOMAIN_JOB_UNBOUNDED;

1842 1843 1844
    /* Pause */
    if (vm->state == VIR_DOMAIN_RUNNING) {
        header.was_running = 1;
1845
        if (qemuProcessStopCPUs(driver, vm) < 0)
1846
            goto endjob;
1847 1848 1849 1850 1851 1852

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

    /* Get XML for the domain */
1856
    xml = virDomainDefFormat(vm->def, VIR_DOMAIN_XML_SECURE);
1857
    if (!xml) {
1858 1859
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to get domain xml"));
1860
        goto endjob;
1861 1862 1863
    }
    header.xml_len = strlen(xml) + 1;

1864 1865 1866 1867 1868 1869 1870 1871 1872 1873 1874 1875 1876
    /* 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 */
        is_reg = 1;
    } else {
        is_reg = S_ISREG(sb.st_mode);
    }

1877 1878 1879 1880 1881
    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
1882 1883
     * it by padding the XML string with NULLs.
     */
1884 1885 1886 1887 1888 1889 1890 1891 1892 1893 1894 1895 1896
    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;
    }
1897

1898 1899 1900 1901 1902 1903
    /* Setup hook data needed by virFileOperation hook function */
    hdata.dom = dom;
    hdata.path = path;
    hdata.xml = xml;
    hdata.header = &header;

1904 1905
    /* Write header to file, followed by XML */

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

1934
            if (((rc != -EACCES) && (rc != -EPERM)) ||
1935
                driver->user == getuid()) {
1936
                virReportSystemError(-rc, _("Failed to create domain save file '%s'"),
1937 1938 1939
                                     path);
                goto endjob;
            }
1940

1941
            /* On Linux we can also verify the FS-type of the directory. */
1942 1943 1944 1945 1946 1947 1948 1949 1950 1951 1952 1953 1954 1955 1956 1957 1958 1959
            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:
                   /* local file - log the error returned by virFileOperation */
1960
                   virReportSystemError(-rc,
1961 1962 1963 1964
                                        _("Failed to create domain save file '%s'"),
                                        path);
                   goto endjob;
                   break;
1965 1966 1967

            }

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

1970 1971 1972 1973
            if ((rc = virFileOperation(path, O_CREAT|O_TRUNC|O_WRONLY,
                                       S_IRUSR|S_IWUSR|S_IRGRP|S_IWGRP,
                                       driver->user, driver->group,
                                       qemudDomainSaveFileOpHook, &hdata,
1974 1975
                                       VIR_FILE_OP_AS_UID)) < 0) {
                virReportSystemError(-rc, _("Error from child process creating '%s'"),
1976
                                 path);
1977 1978
                goto endjob;
            }
1979

1980 1981 1982
            /* 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 */
1983

1984 1985
            bypassSecurityDriver = 1;
        }
1986
    }
1987

1988

1989 1990 1991 1992
    if (!is_reg &&
        qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_DEVICES)) {
        if (virCgroupForDomain(driver->cgroup, vm->def->name, &cgroup, 0) != 0) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
E
Eric Blake 已提交
1993
                            _("Unable to find cgroup for %s"),
1994 1995 1996
                            vm->def->name);
            goto endjob;
        }
1997 1998
        rc = virCgroupAllowDevicePath(cgroup, path,
                                      VIR_CGROUP_DEVICE_RW);
1999
        qemuAuditCgroupPath(vm, cgroup, "allow", path, "rw", rc);
2000
        if (rc < 0) {
2001 2002 2003 2004 2005 2006 2007
            virReportSystemError(-rc,
                                 _("Unable to allow device %s for %s"),
                                 path, vm->def->name);
            goto endjob;
        }
    }

2008
    if ((!bypassSecurityDriver) &&
2009 2010
        virSecurityManagerSetSavedStateLabel(driver->securityManager,
                                             vm, path) < 0)
2011 2012
        goto endjob;

2013 2014
    if (header.compressed == QEMUD_SAVE_FORMAT_RAW) {
        const char *args[] = { "cat", NULL };
M
Matthias Bolte 已提交
2015
        qemuDomainObjEnterMonitorWithDriver(driver, vm);
2016 2017 2018
        rc = qemuMonitorMigrateToFile(priv->mon,
                                      QEMU_MONITOR_MIGRATE_BACKGROUND,
                                      args, path, offset);
M
Matthias Bolte 已提交
2019
        qemuDomainObjExitMonitorWithDriver(driver, vm);
2020
    } else {
2021
        const char *prog = qemudSaveCompressionTypeToString(header.compressed);
2022 2023 2024 2025 2026
        const char *args[] = {
            prog,
            "-c",
            NULL
        };
M
Matthias Bolte 已提交
2027
        qemuDomainObjEnterMonitorWithDriver(driver, vm);
2028 2029 2030
        rc = qemuMonitorMigrateToFile(priv->mon,
                                      QEMU_MONITOR_MIGRATE_BACKGROUND,
                                      args, path, offset);
M
Matthias Bolte 已提交
2031
        qemuDomainObjExitMonitorWithDriver(driver, vm);
2032 2033
    }

2034 2035 2036
    if (rc < 0)
        goto endjob;

2037
    rc = qemuMigrationWaitForCompletion(driver, vm);
2038

2039
    if (rc < 0)
2040
        goto endjob;
2041

2042
    if ((!bypassSecurityDriver) &&
2043 2044
        virSecurityManagerRestoreSavedStateLabel(driver->securityManager,
                                                 vm, path) < 0)
2045
        VIR_WARN("failed to restore save state label on %s", path);
2046

2047
    if (cgroup != NULL) {
2048 2049
        rc = virCgroupDenyDevicePath(cgroup, path,
                                     VIR_CGROUP_DEVICE_RWM);
2050
        qemuAuditCgroupPath(vm, cgroup, "deny", path, "rwm", rc);
2051
        if (rc < 0)
2052 2053
            VIR_WARN("Unable to deny device %s for %s %d",
                     path, vm->def->name, rc);
2054 2055
    }

2056 2057
    ret = 0;

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

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

2080
            if (cgroup != NULL) {
2081 2082
                rc = virCgroupDenyDevicePath(cgroup, path,
                                             VIR_CGROUP_DEVICE_RWM);
2083
                qemuAuditCgroupPath(vm, cgroup, "deny", path, "rwm", rc);
2084
                if (rc < 0)
2085 2086
                    VIR_WARN("Unable to deny device %s for %s: %d",
                             path, vm->def->name, rc);
2087
            }
2088 2089

            if ((!bypassSecurityDriver) &&
2090 2091
                virSecurityManagerRestoreSavedStateLabel(driver->securityManager,
                                                         vm, path) < 0)
2092
                VIR_WARN("failed to restore save state label on %s", path);
2093 2094
        }

2095
        if (qemuDomainObjEndJob(vm) == 0)
2096
            vm = NULL;
2097
    }
2098

2099 2100
cleanup:
    VIR_FREE(xml);
2101
    if (ret != 0 && is_reg)
2102
        unlink(path);
2103 2104
    if (event)
        qemuDomainEventQueue(driver, event);
2105
    virCgroupFree(&cgroup);
2106
    return ret;
D
Daniel P. Berrange 已提交
2107 2108
}

2109 2110 2111 2112 2113 2114 2115 2116 2117 2118 2119 2120 2121 2122 2123 2124
/* 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;
}

2125 2126 2127 2128
static int qemudDomainSave(virDomainPtr dom, const char *path)
{
    struct qemud_driver *driver = dom->conn->privateData;
    int compressed;
2129 2130 2131 2132
    int ret = -1;
    virDomainObjPtr vm = NULL;

    qemuDriverLock(driver);
2133 2134 2135 2136 2137 2138 2139 2140 2141 2142 2143

    if (driver->saveImageFormat == NULL)
        compressed = QEMUD_SAVE_FORMAT_RAW;
    else {
        compressed = qemudSaveCompressionTypeFromString(driver->saveImageFormat);
        if (compressed < 0) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("Invalid save image format specified "
                                    "in configuration file"));
            return -1;
        }
2144 2145 2146 2147 2148 2149
        if (!qemudCompressProgramAvailable(compressed)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("Compression program for image format "
                                    "in configuration file isn't available"));
            return -1;
        }
2150 2151
    }

2152 2153 2154 2155 2156 2157 2158 2159 2160
    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;
    }

2161 2162 2163 2164 2165 2166
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

2167 2168 2169 2170 2171 2172 2173 2174
    ret = qemudDomainSaveFlag(driver, dom, vm, path, compressed);

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

    return ret;
2175 2176 2177 2178 2179 2180 2181 2182 2183 2184 2185 2186 2187 2188 2189 2190 2191 2192 2193 2194 2195 2196 2197
}

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;

2198
    virCheckFlags(0, -1);
2199 2200 2201 2202 2203 2204 2205 2206

    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);
2207
        goto cleanup;
2208 2209
    }

2210 2211 2212 2213 2214 2215
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

2216 2217
    name = qemuDomainManagedSavePath(driver, vm);
    if (name == NULL)
2218
        goto cleanup;
2219 2220 2221 2222

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

    compressed = QEMUD_SAVE_FORMAT_RAW;
2223
    ret = qemudDomainSaveFlag(driver, dom, vm, name, compressed);
2224 2225 2226 2227 2228

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
2229 2230 2231
    VIR_FREE(name);

    return ret;
2232 2233 2234 2235 2236 2237 2238 2239 2240 2241
}

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

2242
    virCheckFlags(0, -1);
2243 2244 2245 2246 2247 2248 2249 2250 2251 2252 2253 2254 2255 2256 2257 2258 2259 2260 2261 2262 2263 2264 2265 2266 2267 2268 2269 2270 2271 2272 2273 2274 2275

    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;

2276
    virCheckFlags(0, -1);
2277 2278 2279 2280 2281 2282 2283 2284 2285 2286 2287 2288 2289 2290 2291 2292 2293 2294 2295 2296 2297 2298 2299 2300

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

H
Hu Tao 已提交
2302 2303 2304 2305 2306 2307 2308 2309 2310 2311 2312 2313 2314 2315 2316 2317 2318 2319 2320 2321 2322 2323 2324 2325 2326
static int doCoreDump(struct qemud_driver *driver,
                      virDomainObjPtr vm,
                      const char *path,
                      enum qemud_save_formats compress)
{
    int fd = -1;
    int ret = -1;
    qemuDomainObjPrivatePtr priv;

    priv = vm->privateData;

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

    if (VIR_CLOSE(fd) < 0) {
        virReportSystemError(errno,
                             _("unable to save file %s"),
                             path);
        goto cleanup;
    }

2327 2328
    if (virSecurityManagerSetSavedStateLabel(driver->securityManager,
                                             vm, path) < 0)
H
Hu Tao 已提交
2329 2330 2331 2332 2333 2334 2335 2336 2337 2338 2339 2340 2341 2342 2343 2344 2345 2346 2347 2348 2349 2350 2351 2352 2353 2354
        goto cleanup;

    qemuDomainObjEnterMonitorWithDriver(driver, vm);
    if (compress == QEMUD_SAVE_FORMAT_RAW) {
        const char *args[] = {
            "cat",
            NULL,
        };
        ret = qemuMonitorMigrateToFile(priv->mon,
                                       QEMU_MONITOR_MIGRATE_BACKGROUND,
                                       args, path, 0);
    } else {
        const char *prog = qemudSaveCompressionTypeToString(compress);
        const char *args[] = {
            prog,
            "-c",
            NULL,
        };
        ret = qemuMonitorMigrateToFile(priv->mon,
                                       QEMU_MONITOR_MIGRATE_BACKGROUND,
                                       args, path, 0);
    }
    qemuDomainObjExitMonitorWithDriver(driver, vm);
    if (ret < 0)
        goto cleanup;

2355
    ret = qemuMigrationWaitForCompletion(driver, vm);
H
Hu Tao 已提交
2356 2357 2358 2359

    if (ret < 0)
        goto cleanup;

2360 2361
    if (virSecurityManagerRestoreSavedStateLabel(driver->securityManager,
                                                 vm, path) < 0)
H
Hu Tao 已提交
2362 2363 2364 2365 2366 2367 2368 2369
        goto cleanup;

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

2370 2371 2372 2373 2374
static enum qemud_save_formats
getCompressionType(struct qemud_driver *driver)
{
    int compress = QEMUD_SAVE_FORMAT_RAW;

2375 2376 2377 2378 2379 2380 2381
    /*
     * 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) {
2382 2383 2384 2385
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("Invalid dump image format specified in "
                              "configuration file, using raw"));
            return QEMUD_SAVE_FORMAT_RAW;
2386
        }
2387 2388 2389
        if (!qemudCompressProgramAvailable(compress)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("Compression program for dump image format "
2390 2391 2392
                                    "in configuration file isn't available, "
                                    "using raw"));
            return QEMUD_SAVE_FORMAT_RAW;
2393
        }
2394
    }
2395 2396 2397 2398 2399 2400 2401 2402 2403
    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 已提交
2404
    int ret = -1;
2405 2406 2407
    virDomainEventPtr event = NULL;
    qemuDomainObjPrivatePtr priv;

P
Paolo Bonzini 已提交
2408 2409 2410 2411 2412 2413
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
2414 2415
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
P
Paolo Bonzini 已提交
2416 2417
        goto cleanup;
    }
2418
    priv = vm->privateData;
P
Paolo Bonzini 已提交
2419

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

D
Daniel P. Berrange 已提交
2423
    if (!virDomainObjIsActive(vm)) {
2424 2425
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
2426
        goto endjob;
P
Paolo Bonzini 已提交
2427 2428
    }

O
Osier Yang 已提交
2429 2430
    priv->jobActive = QEMU_JOB_DUMP;

P
Paolo Bonzini 已提交
2431 2432
    /* Migrate will always stop the VM, so the resume condition is
       independent of whether the stop command is issued.  */
P
Paolo Bonzini 已提交
2433 2434 2435
    resume = (vm->state == VIR_DOMAIN_RUNNING);

    /* Pause domain for non-live dump */
P
Paolo Bonzini 已提交
2436
    if (!(flags & VIR_DUMP_LIVE) && vm->state == VIR_DOMAIN_RUNNING) {
2437
        if (qemuProcessStopCPUs(driver, vm) < 0)
2438
            goto endjob;
P
Paolo Bonzini 已提交
2439
        paused = 1;
2440 2441 2442 2443 2444 2445

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

H
Hu Tao 已提交
2448
    ret = doCoreDump(driver, vm, path, getCompressionType(driver));
2449 2450 2451 2452
    if (ret < 0)
        goto endjob;

    paused = 1;
2453 2454

endjob:
2455
    if ((ret == 0) && (flags & VIR_DUMP_CRASH)) {
2456
        qemuProcessStop(driver, vm, 0);
2457
        qemuAuditDomainStop(vm, "crashed");
2458 2459 2460 2461 2462
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_STOPPED,
                                         VIR_DOMAIN_EVENT_STOPPED_CRASHED);
    }

P
Paolo Bonzini 已提交
2463 2464 2465
    /* 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.  */
2466
    else if (resume && paused && virDomainObjIsActive(vm)) {
2467
        if (qemuProcessStartCPUs(driver, vm, dom->conn) < 0) {
2468
            if (virGetLastError() == NULL)
2469 2470
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("resuming after dump failed"));
P
Paolo Bonzini 已提交
2471 2472
        }
    }
2473

2474 2475
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
2476
    else if ((ret == 0) && (flags & VIR_DUMP_CRASH) && !vm->persistent) {
2477 2478 2479 2480
        virDomainRemoveInactive(&driver->domains,
                                vm);
        vm = NULL;
    }
2481 2482

cleanup:
P
Paolo Bonzini 已提交
2483 2484
    if (vm)
        virDomainObjUnlock(vm);
2485 2486
    if (event)
        qemuDomainEventQueue(driver, event);
2487
    qemuDriverUnlock(driver);
P
Paolo Bonzini 已提交
2488 2489 2490
    return ret;
}

H
Hu Tao 已提交
2491 2492 2493
static void processWatchdogEvent(void *data, void *opaque)
{
    int ret;
2494
    struct qemuDomainWatchdogEvent *wdEvent = data;
H
Hu Tao 已提交
2495 2496 2497 2498 2499 2500 2501
    struct qemud_driver *driver = opaque;

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

E
Eric Blake 已提交
2502
            if (virAsprintf(&dumpfile, "%s/%s-%u",
H
Hu Tao 已提交
2503 2504
                            driver->autoDumpPath,
                            wdEvent->vm->def->name,
E
Eric Blake 已提交
2505 2506 2507 2508
                            (unsigned int)time(NULL)) < 0) {
                virReportOOMError();
                break;
            }
H
Hu Tao 已提交
2509 2510 2511 2512 2513 2514 2515 2516 2517 2518 2519 2520 2521 2522 2523 2524 2525 2526 2527 2528 2529

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

2530
            ret = qemuProcessStartCPUs(driver, wdEvent->vm, NULL);
H
Hu Tao 已提交
2531 2532 2533 2534 2535 2536 2537 2538 2539 2540 2541 2542 2543 2544 2545 2546 2547

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

2549 2550 2551
static int qemudDomainHotplugVcpus(virDomainObjPtr vm, unsigned int nvcpus)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
2552
    int i, rc = 1;
2553
    int ret = -1;
2554
    int oldvcpus = vm->def->vcpus;
2555

2556 2557
    qemuDomainObjEnterMonitor(vm);

2558 2559 2560 2561 2562 2563 2564 2565 2566 2567 2568 2569 2570 2571 2572 2573 2574 2575 2576 2577 2578 2579 2580 2581 2582 2583 2584 2585 2586 2587
    /* 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 */
    if (nvcpus > vm->def->vcpus) {
        for (i = vm->def->vcpus ; i < nvcpus ; i++) {
            /* Online new CPU */
            rc = qemuMonitorSetCPU(priv->mon, i, 1);
            if (rc == 0)
                goto unsupported;
            if (rc < 0)
                goto cleanup;

            vm->def->vcpus++;
        }
    } else {
        for (i = vm->def->vcpus - 1 ; i >= nvcpus ; i--) {
            /* Offline old CPU */
            rc = qemuMonitorSetCPU(priv->mon, i, 0);
            if (rc == 0)
                goto unsupported;
            if (rc < 0)
                goto cleanup;

            vm->def->vcpus--;
        }
    }

    ret = 0;

cleanup:
2588
    qemuDomainObjExitMonitor(vm);
2589
    qemuAuditVcpu(vm, oldvcpus, nvcpus, "update", rc == 1);
2590 2591 2592 2593 2594 2595 2596 2597 2598
    return ret;

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


2599 2600 2601 2602
static int
qemudDomainSetVcpusFlags(virDomainPtr dom, unsigned int nvcpus,
                         unsigned int flags)
{
2603 2604
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2605
    virDomainDefPtr persistentDef;
2606 2607
    const char * type;
    int max;
2608
    int ret = -1;
2609

2610 2611 2612 2613 2614 2615 2616 2617 2618 2619 2620 2621 2622 2623 2624 2625
    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);
2626 2627 2628
        return -1;
    }

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

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

2641 2642 2643
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

2644
    if (!virDomainObjIsActive(vm) && (flags & VIR_DOMAIN_VCPU_LIVE)) {
2645 2646
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                         "%s", _("domain is not running"));
2647
        goto endjob;
2648 2649
    }

2650 2651 2652 2653 2654 2655
    if (!vm->persistent && (flags & VIR_DOMAIN_VCPU_CONFIG)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("cannot change persistent config of a transient domain"));
        goto endjob;
    }

2656 2657 2658 2659 2660 2661 2662 2663 2664 2665 2666 2667 2668
    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 已提交
2669
    if (!(flags & VIR_DOMAIN_VCPU_MAXIMUM) && vm->def->maxvcpus < max) {
2670 2671 2672
        max = vm->def->maxvcpus;
    }

2673 2674 2675 2676 2677 2678 2679
    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;
    }

2680 2681 2682
    if (!(persistentDef = virDomainObjGetPersistentDef(driver->caps, vm)))
        goto endjob;

2683 2684
    switch (flags) {
    case VIR_DOMAIN_VCPU_MAXIMUM | VIR_DOMAIN_VCPU_CONFIG:
2685 2686 2687
        persistentDef->maxvcpus = nvcpus;
        if (nvcpus < persistentDef->vcpus)
            persistentDef->vcpus = nvcpus;
2688 2689 2690 2691
        ret = 0;
        break;

    case VIR_DOMAIN_VCPU_CONFIG:
2692
        persistentDef->vcpus = nvcpus;
2693 2694 2695 2696 2697 2698 2699 2700 2701
        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);
2702 2703 2704
        if (ret == 0) {
            persistentDef->vcpus = nvcpus;
        }
2705 2706
        break;
    }
2707

2708 2709 2710 2711
    /* Save the persistent config to disk */
    if (flags & VIR_DOMAIN_VCPU_CONFIG)
        ret = virDomainSaveConfig(driver->configDir, persistentDef);

2712 2713 2714
endjob:
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
2715

2716
cleanup:
2717 2718
    if (vm)
        virDomainObjUnlock(vm);
2719
    return ret;
2720 2721
}

2722 2723 2724 2725 2726 2727
static int
qemudDomainSetVcpus(virDomainPtr dom, unsigned int nvcpus)
{
    return qemudDomainSetVcpusFlags(dom, nvcpus, VIR_DOMAIN_VCPU_LIVE);
}

2728 2729 2730 2731 2732 2733

static int
qemudDomainPinVcpu(virDomainPtr dom,
                   unsigned int vcpu,
                   unsigned char *cpumap,
                   int maplen) {
2734 2735
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2736
    int maxcpu, hostcpus;
2737
    virNodeInfo nodeinfo;
2738
    int ret = -1;
2739
    qemuDomainObjPrivatePtr priv;
2740

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

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

D
Daniel P. Berrange 已提交
2753
    if (!virDomainObjIsActive(vm)) {
2754 2755
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s",_("cannot pin vcpus on an inactive domain"));
2756
        goto cleanup;
2757 2758
    }

2759 2760 2761
    priv = vm->privateData;

    if (vcpu > (priv->nvcpupids-1)) {
2762 2763 2764
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("vcpu number out of range %d > %d"),
                        vcpu, priv->nvcpupids);
2765
        goto cleanup;
2766 2767
    }

2768
    if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
2769
        goto cleanup;
2770

2771
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
2772
    maxcpu = maplen * 8;
2773 2774
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;
2775

2776 2777
    if (priv->vcpupids != NULL) {
        if (virProcessInfoSetAffinity(priv->vcpupids[vcpu],
2778
                                      cpumap, maplen, maxcpu) < 0)
2779
            goto cleanup;
2780
    } else {
2781 2782
        qemuReportError(VIR_ERR_NO_SUPPORT,
                        "%s", _("cpu affinity is not supported"));
2783
        goto cleanup;
2784
    }
2785
    ret = 0;
2786

2787
cleanup:
2788 2789
    if (vm)
        virDomainObjUnlock(vm);
2790
    return ret;
2791 2792 2793 2794 2795 2796 2797 2798
}

static int
qemudDomainGetVcpus(virDomainPtr dom,
                    virVcpuInfoPtr info,
                    int maxinfo,
                    unsigned char *cpumaps,
                    int maplen) {
2799 2800
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2801
    virNodeInfo nodeinfo;
2802
    int i, v, maxcpu, hostcpus;
2803
    int ret = -1;
2804
    qemuDomainObjPrivatePtr priv;
2805

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

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

D
Daniel P. Berrange 已提交
2818
    if (!virDomainObjIsActive(vm)) {
2819 2820 2821
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s",
                        _("cannot list vcpu pinning for an inactive domain"));
2822
        goto cleanup;
2823 2824
    }

2825 2826
    priv = vm->privateData;

2827
    if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
2828
        goto cleanup;
2829

2830
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
2831
    maxcpu = maplen * 8;
2832 2833
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;
2834 2835

    /* Clamp to actual number of vcpus */
2836 2837
    if (maxinfo > priv->nvcpupids)
        maxinfo = priv->nvcpupids;
2838

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

2846
                if (priv->vcpupids != NULL &&
2847 2848 2849
                    qemudGetProcessInfo(&(info[i].cpuTime),
                                        &(info[i].cpu),
                                        vm->pid,
2850
                                        priv->vcpupids[i]) < 0) {
2851
                    virReportSystemError(errno, "%s",
2852 2853 2854
                                         _("cannot get vCPU placement & pCPU time"));
                    goto cleanup;
                }
2855
            }
2856 2857
        }

2858 2859
        if (cpumaps != NULL) {
            memset(cpumaps, 0, maplen * maxinfo);
2860
            if (priv->vcpupids != NULL) {
2861 2862 2863
                for (v = 0 ; v < maxinfo ; v++) {
                    unsigned char *cpumap = VIR_GET_CPUMAP(cpumaps, maplen, v);

2864
                    if (virProcessInfoGetAffinity(priv->vcpupids[v],
2865
                                                  cpumap, maplen, maxcpu) < 0)
2866
                        goto cleanup;
2867
                }
2868
            } else {
2869 2870
                qemuReportError(VIR_ERR_NO_SUPPORT,
                                "%s", _("cpu affinity is not available"));
2871
                goto cleanup;
2872 2873 2874
            }
        }
    }
2875
    ret = maxinfo;
2876

2877
cleanup:
2878 2879
    if (vm)
        virDomainObjUnlock(vm);
2880
    return ret;
2881 2882 2883
}


2884 2885 2886
static int
qemudDomainGetVcpusFlags(virDomainPtr dom, unsigned int flags)
{
2887 2888
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2889
    virDomainDefPtr def;
2890
    int ret = -1;
2891

2892 2893 2894 2895 2896 2897 2898 2899
    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);
2900 2901 2902
        return -1;
    }

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

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

2915 2916 2917 2918 2919 2920 2921 2922 2923
    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;
2924 2925
    }

2926
    ret = (flags & VIR_DOMAIN_VCPU_MAXIMUM) ? def->maxvcpus : def->vcpus;
2927

2928
cleanup:
2929 2930
    if (vm)
        virDomainObjUnlock(vm);
2931 2932 2933
    return ret;
}

2934 2935 2936 2937 2938 2939 2940
static int
qemudDomainGetMaxVcpus(virDomainPtr dom)
{
    return qemudDomainGetVcpusFlags(dom, (VIR_DOMAIN_VCPU_LIVE |
                                          VIR_DOMAIN_VCPU_MAXIMUM));
}

2941 2942 2943 2944 2945 2946 2947 2948 2949
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);

2950 2951
    memset(seclabel, 0, sizeof(*seclabel));

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

2960
    if (!virDomainVirtTypeToString(vm->def->virtType)) {
2961 2962 2963
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("unknown virt type in domain definition '%d'"),
                        vm->def->virtType);
2964 2965 2966 2967 2968 2969 2970 2971 2972 2973 2974 2975 2976 2977 2978 2979 2980
        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 已提交
2981
    if (virDomainObjIsActive(vm)) {
2982 2983
        if (virSecurityManagerGetProcessLabel(driver->securityManager,
                                              vm, seclabel) < 0) {
2984 2985 2986
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            "%s", _("Failed to get security label"));
            goto cleanup;
2987 2988 2989 2990 2991 2992 2993 2994
        }
    }

    ret = 0;

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
2995
    qemuDriverUnlock(driver);
2996 2997 2998
    return ret;
}

2999 3000
static int qemudNodeGetSecurityModel(virConnectPtr conn,
                                     virSecurityModelPtr secmodel)
3001 3002 3003
{
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
    char *p;
3004
    int ret = 0;
3005

3006
    qemuDriverLock(driver);
3007 3008 3009 3010 3011
    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)
3012
        goto cleanup;
3013

3014 3015
    p = driver->caps->host.secModel.model;
    if (strlen(p) >= VIR_SECURITY_MODEL_BUFLEN-1) {
3016 3017 3018
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("security model string exceeds max %d bytes"),
                        VIR_SECURITY_MODEL_BUFLEN-1);
3019 3020
        ret = -1;
        goto cleanup;
3021 3022 3023 3024 3025
    }
    strcpy(secmodel->model, p);

    p = driver->caps->host.secModel.doi;
    if (strlen(p) >= VIR_SECURITY_DOI_BUFLEN-1) {
3026 3027 3028
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("security DOI string exceeds max %d bytes"),
                        VIR_SECURITY_DOI_BUFLEN-1);
3029 3030
        ret = -1;
        goto cleanup;
3031 3032
    }
    strcpy(secmodel->doi, p);
3033 3034 3035 3036

cleanup:
    qemuDriverUnlock(driver);
    return ret;
3037 3038
}

3039 3040 3041 3042 3043 3044
/* qemudOpenAsUID() - pipe/fork/setuid/open a file, and return the
   pipe fd to caller, so that it can read from the file. Also return
   the pid of the child process, so the caller can wait for it to exit
   after it's finished reading (to avoid a zombie, if nothing
   else). */

3045 3046 3047
static int
qemudOpenAsUID(const char *path, uid_t uid, gid_t gid, pid_t *child_pid)
{
3048 3049 3050 3051 3052 3053 3054 3055 3056 3057 3058 3059 3060 3061 3062 3063 3064 3065 3066 3067 3068 3069 3070 3071 3072 3073 3074
    int pipefd[2];
    int fd = -1;

    *child_pid = -1;

    if (pipe(pipefd) < 0) {
        virReportSystemError(errno,
                             _("failed to create pipe to read '%s'"),
                             path);
        pipefd[0] = pipefd[1] = -1;
        goto parent_cleanup;
    }

    int forkRet = virFork(child_pid);

    if (*child_pid < 0) {
        virReportSystemError(errno,
                             _("failed to fork child to read '%s'"),
                             path);
        goto parent_cleanup;
    }

    if (*child_pid > 0) {

        /* parent */

        /* parent doesn't need the write side of the pipe */
3075
        VIR_FORCE_CLOSE(pipefd[1]);
3076 3077 3078 3079 3080 3081 3082 3083 3084 3085 3086

        if (forkRet < 0) {
            virReportSystemError(errno,
                                 _("failed in parent after forking child to read '%s'"),
                                 path);
            goto parent_cleanup;
        }
        /* caller gets the read side of the pipe */
        fd = pipefd[0];
        pipefd[0] = -1;
parent_cleanup:
3087 3088
        VIR_FORCE_CLOSE(pipefd[0]);
        VIR_FORCE_CLOSE(pipefd[1]);
3089 3090 3091 3092 3093 3094 3095 3096 3097 3098 3099 3100 3101 3102 3103 3104 3105 3106 3107 3108 3109 3110 3111 3112
        if ((fd < 0) && (*child_pid > 0)) {
            /* a child process was started and subsequently an error
               occurred in the parent, so we need to wait for it to
               exit, but its status is inconsequential. */
            while ((waitpid(*child_pid, NULL, 0) == -1)
                   && (errno == EINTR)) {
                /* empty */
            }
            *child_pid = -1;
        }
        return fd;
    }

    /* child */

    /* setuid to the qemu user, then open the file, read it,
       and stuff it into the pipe for the parent process to
       read */
    int exit_code;
    char *buf = NULL;
    size_t bufsize = 1024 * 1024;
    int bytesread;

    /* child doesn't need the read side of the pipe */
3113
    VIR_FORCE_CLOSE(pipefd[0]);
3114 3115 3116 3117 3118 3119 3120 3121 3122

    if (forkRet < 0) {
        exit_code = errno;
        virReportSystemError(errno,
                             _("failed in child after forking to read '%s'"),
                             path);
        goto child_cleanup;
    }

3123 3124 3125
    if (virSetUIDGID(uid, gid) < 0) {
       exit_code = errno;
       goto child_cleanup;
3126 3127
    }

3128 3129 3130 3131 3132 3133 3134 3135
    if ((fd = open(path, O_RDONLY)) < 0) {
        exit_code = errno;
        virReportSystemError(errno,
                             _("cannot open '%s' as uid %d"),
                             path, uid);
        goto child_cleanup;
    }

3136 3137 3138 3139 3140 3141
    if (VIR_ALLOC_N(buf, bufsize) < 0) {
        exit_code = ENOMEM;
        virReportOOMError();
        goto child_cleanup;
    }

3142 3143 3144 3145 3146 3147 3148 3149 3150 3151 3152 3153 3154 3155 3156 3157 3158 3159 3160 3161
    /* read from fd and write to pipefd[1] until EOF */
    do {
        if ((bytesread = saferead(fd, buf, bufsize)) < 0) {
            exit_code = errno;
            virReportSystemError(errno,
                                 _("child failed reading from '%s'"),
                                 path);
            goto child_cleanup;
        }
        if (safewrite(pipefd[1], buf, bytesread) != bytesread) {
            exit_code = errno;
            virReportSystemError(errno, "%s",
                                 _("child failed writing to pipe"));
            goto child_cleanup;
        }
    } while (bytesread > 0);
    exit_code = 0;

child_cleanup:
    VIR_FREE(buf);
3162 3163
    VIR_FORCE_CLOSE(fd);
    VIR_FORCE_CLOSE(pipefd[1]);
3164 3165 3166
    _exit(exit_code);
}

J
Jiri Denemark 已提交
3167 3168 3169 3170
static int qemudDomainSaveImageClose(int fd, pid_t read_pid, int *status)
{
    int ret = 0;

3171 3172 3173 3174
    if (VIR_CLOSE(fd) < 0) {
        virReportSystemError(errno, "%s",
                             _("cannot close file"));
    }
J
Jiri Denemark 已提交
3175 3176 3177 3178 3179 3180 3181 3182 3183 3184 3185 3186 3187 3188 3189 3190

    if (read_pid != -1) {
        /* reap the process that read the file */
        while ((ret = waitpid(read_pid, status, 0)) == -1
               && errno == EINTR) {
            /* empty */
        }
    } else if (status) {
        *status = 0;
    }

    return ret;
}

static int ATTRIBUTE_NONNULL(3) ATTRIBUTE_NONNULL(4) ATTRIBUTE_NONNULL(5)
qemudDomainSaveImageOpen(struct qemud_driver *driver,
3191 3192 3193 3194
                         const char *path,
                         virDomainDefPtr *ret_def,
                         struct qemud_save_header *ret_header,
                         pid_t *ret_read_pid)
J
Jiri Denemark 已提交
3195 3196
{
    int fd;
3197
    pid_t read_pid = -1;
3198
    struct qemud_save_header header;
J
Jiri Denemark 已提交
3199 3200
    char *xml = NULL;
    virDomainDefPtr def = NULL;
3201 3202

    if ((fd = open(path, O_RDONLY)) < 0) {
3203 3204 3205
        if ((driver->user == 0) || (getuid() != 0)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("cannot read domain image"));
J
Jiri Denemark 已提交
3206
            goto error;
3207 3208 3209 3210 3211 3212
        }

        /* Opening as root failed, but qemu runs as a different user
           that might have better luck. Create a pipe, then fork a
           child process to run as the qemu user, which will hopefully
           have the necessary authority to read the file. */
3213 3214
        if ((fd = qemudOpenAsUID(path,
                                 driver->user, driver->group, &read_pid)) < 0) {
3215
            /* error already reported */
J
Jiri Denemark 已提交
3216
            goto error;
3217
        }
3218 3219 3220
    }

    if (saferead(fd, &header, sizeof(header)) != sizeof(header)) {
3221 3222
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to read qemu header"));
J
Jiri Denemark 已提交
3223
        goto error;
3224 3225 3226
    }

    if (memcmp(header.magic, QEMUD_SAVE_MAGIC, sizeof(header.magic)) != 0) {
3227 3228
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("image magic is incorrect"));
J
Jiri Denemark 已提交
3229
        goto error;
3230 3231 3232
    }

    if (header.version > QEMUD_SAVE_VERSION) {
3233 3234 3235
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("image version is not supported (%d > %d)"),
                        header.version, QEMUD_SAVE_VERSION);
J
Jiri Denemark 已提交
3236
        goto error;
3237 3238
    }

3239 3240 3241
    if (header.xml_len <= 0) {
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("invalid XML length: %d"), header.xml_len);
J
Jiri Denemark 已提交
3242
        goto error;
3243 3244
    }

3245 3246
    if (VIR_ALLOC_N(xml, header.xml_len) < 0) {
        virReportOOMError();
J
Jiri Denemark 已提交
3247
        goto error;
3248 3249 3250
    }

    if (saferead(fd, xml, header.xml_len) != header.xml_len) {
3251 3252
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to read XML"));
J
Jiri Denemark 已提交
3253
        goto error;
3254 3255 3256
    }

    /* Create a domain from this XML */
3257
    if (!(def = virDomainDefParseString(driver->caps, xml,
3258
                                        VIR_DOMAIN_XML_INACTIVE)))
J
Jiri Denemark 已提交
3259
        goto error;
3260

J
Jiri Denemark 已提交
3261
    VIR_FREE(xml);
3262

J
Jiri Denemark 已提交
3263 3264 3265
    *ret_def = def;
    *ret_header = header;
    *ret_read_pid = read_pid;
3266

J
Jiri Denemark 已提交
3267
    return fd;
3268

J
Jiri Denemark 已提交
3269 3270 3271 3272 3273 3274 3275 3276 3277 3278 3279 3280
error:
    virDomainDefFree(def);
    VIR_FREE(xml);
    qemudDomainSaveImageClose(fd, read_pid, NULL);

    return -1;
}

static int ATTRIBUTE_NONNULL(6)
qemudDomainSaveImageStartVM(virConnectPtr conn,
                            struct qemud_driver *driver,
                            virDomainObjPtr vm,
3281 3282
                            int *fd,
                            pid_t *read_pid,
J
Jiri Denemark 已提交
3283 3284 3285 3286 3287 3288 3289 3290 3291 3292 3293 3294
                            const struct qemud_save_header *header,
                            const char *path)
{
    int ret = -1;
    virDomainEventPtr event;
    int intermediatefd = -1;
    pid_t intermediate_pid = -1;
    int childstat;
    int wait_ret;
    int status;

    if (header->version == 2) {
3295
        const char *intermediate_argv[3] = { NULL, "-dc", NULL };
J
Jiri Denemark 已提交
3296
        const char *prog = qemudSaveCompressionTypeToString(header->compressed);
3297
        if (prog == NULL) {
3298 3299
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            _("Invalid compressed save format %d"),
J
Jiri Denemark 已提交
3300 3301
                            header->compressed);
            goto out;
3302
        }
3303

J
Jiri Denemark 已提交
3304
        if (header->compressed != QEMUD_SAVE_FORMAT_RAW) {
3305
            intermediate_argv[0] = prog;
3306 3307
            intermediatefd = *fd;
            *fd = -1;
3308
            if (virExec(intermediate_argv, NULL, NULL,
3309
                        &intermediate_pid, intermediatefd, fd, NULL, 0) < 0) {
3310 3311 3312
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("Failed to start decompression binary %s"),
                                intermediate_argv[0]);
3313
                *fd = intermediatefd;
J
Jiri Denemark 已提交
3314
                goto out;
3315 3316 3317
            }
        }
    }
J
Jiri Denemark 已提交
3318

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

3323
    if (intermediate_pid != -1) {
3324 3325 3326 3327 3328
        if (ret < 0) {
            /* if there was an error setting up qemu, the intermediate process will
             * wait forever to write to stdout, so we must manually kill it.
             */
            VIR_FORCE_CLOSE(intermediatefd);
3329
            VIR_FORCE_CLOSE(*fd);
3330 3331 3332
            kill(intermediate_pid, SIGTERM);
        }

3333 3334
        /* Wait for intermediate process to exit */
        while (waitpid(intermediate_pid, &childstat, 0) == -1 &&
J
Jiri Denemark 已提交
3335 3336 3337
               errno == EINTR) {
            /* empty */
        }
3338
    }
3339
    VIR_FORCE_CLOSE(intermediatefd);
J
Jiri Denemark 已提交
3340

3341 3342 3343
    wait_ret = qemudDomainSaveImageClose(*fd, *read_pid, &status);
    *fd = -1;
    if (*read_pid != -1) {
3344 3345 3346 3347 3348 3349 3350 3351 3352 3353 3354 3355 3356 3357 3358 3359 3360 3361 3362 3363
        if (wait_ret == -1) {
            virReportSystemError(errno,
                                 _("failed to wait for process reading '%s'"),
                                 path);
            ret = -1;
        } else if (!WIFEXITED(status)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            _("child process exited abnormally reading '%s'"),
                            path);
            ret = -1;
        } else {
            int exit_status = WEXITSTATUS(status);
            if (exit_status != 0) {
                virReportSystemError(exit_status,
                                     _("child process returned error reading '%s'"),
                                     path);
                ret = -1;
            }
        }
    }
3364
    *read_pid = -1;
J
Jiri Denemark 已提交
3365

3366
    if (ret < 0) {
3367
        qemuAuditDomainStart(vm, "restored", false);
J
Jiri Denemark 已提交
3368
        goto out;
3369
    }
3370

3371 3372 3373
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_RESTORED);
3374
    qemuAuditDomainStart(vm, "restored", true);
J
Jiri Denemark 已提交
3375 3376 3377
    if (event)
        qemuDomainEventQueue(driver, event);

3378

3379
    /* If it was running before, resume it now. */
J
Jiri Denemark 已提交
3380
    if (header->was_running) {
3381
        if (qemuProcessStartCPUs(driver, vm, conn) < 0) {
3382
            if (virGetLastError() == NULL)
3383 3384
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("failed to resume domain"));
J
Jiri Denemark 已提交
3385
            goto out;
3386
        }
3387 3388
        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0) {
            VIR_WARN("Failed to save status on vm %s", vm->def->name);
J
Jiri Denemark 已提交
3389
            goto out;
3390
        }
3391
    }
J
Jiri Denemark 已提交
3392

3393
    ret = 0;
3394

J
Jiri Denemark 已提交
3395
out:
3396 3397
    if (virSecurityManagerRestoreSavedStateLabel(driver->securityManager,
                                                 vm, path) < 0)
3398 3399
        VIR_WARN("failed to restore save state label on %s", path);

J
Jiri Denemark 已提交
3400 3401 3402 3403 3404 3405 3406 3407 3408 3409 3410 3411 3412 3413 3414 3415 3416 3417 3418 3419 3420 3421 3422 3423 3424
    return ret;
}

static int qemudDomainRestore(virConnectPtr conn,
                              const char *path) {
    struct qemud_driver *driver = conn->privateData;
    virDomainDefPtr def = NULL;
    virDomainObjPtr vm = NULL;
    int fd = -1;
    pid_t read_pid = -1;
    int ret = -1;
    struct qemud_save_header header;

    qemuDriverLock(driver);

    fd = qemudDomainSaveImageOpen(driver, path, &def, &header, &read_pid);
    if (fd < 0)
        goto cleanup;

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

    if (!(vm = virDomainAssignDef(driver->caps,
                                  &driver->domains,
                                  def, true))) {
3425
        /* virDomainAssignDef already set the error */
J
Jiri Denemark 已提交
3426 3427 3428 3429 3430 3431 3432
        goto cleanup;
    }
    def = NULL;

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

3433 3434
    ret = qemudDomainSaveImageStartVM(conn, driver, vm, &fd,
                                      &read_pid, &header, path);
J
Jiri Denemark 已提交
3435 3436

    if (qemuDomainObjEndJob(vm) == 0)
3437
        vm = NULL;
J
Jiri Denemark 已提交
3438 3439 3440 3441
    else if (ret < 0 && !vm->persistent) {
        virDomainRemoveInactive(&driver->domains, vm);
        vm = NULL;
    }
3442

3443 3444
cleanup:
    virDomainDefFree(def);
J
Jiri Denemark 已提交
3445
    qemudDomainSaveImageClose(fd, read_pid, NULL);
3446 3447 3448
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
3449
    return ret;
D
Daniel P. Berrange 已提交
3450 3451
}

J
Jiri Denemark 已提交
3452 3453 3454 3455 3456 3457 3458 3459 3460 3461 3462 3463 3464 3465 3466 3467 3468 3469 3470 3471 3472 3473 3474 3475 3476 3477 3478 3479 3480 3481 3482 3483
static int qemudDomainObjRestore(virConnectPtr conn,
                                 struct qemud_driver *driver,
                                 virDomainObjPtr vm,
                                 const char *path)
{
    virDomainDefPtr def = NULL;
    int fd = -1;
    pid_t read_pid = -1;
    int ret = -1;
    struct qemud_save_header header;

    fd = qemudDomainSaveImageOpen(driver, path, &def, &header, &read_pid);
    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;

3484 3485
    ret = qemudDomainSaveImageStartVM(conn, driver, vm, &fd,
                                      &read_pid, &header, path);
J
Jiri Denemark 已提交
3486 3487 3488 3489 3490 3491 3492

cleanup:
    virDomainDefFree(def);
    qemudDomainSaveImageClose(fd, read_pid, NULL);
    return ret;
}

D
Daniel P. Berrange 已提交
3493

3494
static char *qemudDomainDumpXML(virDomainPtr dom,
3495
                                int flags) {
3496 3497 3498
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    char *ret = NULL;
3499 3500
    unsigned long balloon;
    int err;
3501

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

D
Daniel P. Berrange 已提交
3505
    if (!vm) {
3506 3507
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3508 3509
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3510
        goto cleanup;
D
Daniel P. Berrange 已提交
3511 3512
    }

3513 3514 3515 3516
    /* 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))) {
3517
        qemuDomainObjPrivatePtr priv = vm->privateData;
3518 3519 3520
        /* Don't delay if someone's using the monitor, just use
         * existing most recent data instead */
        if (!priv->jobActive) {
3521
            if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
3522 3523
                goto cleanup;

3524
            qemuDomainObjEnterMonitorWithDriver(driver, vm);
3525
            err = qemuMonitorGetBalloonInfo(priv->mon, &balloon);
3526
            qemuDomainObjExitMonitorWithDriver(driver, vm);
3527 3528 3529 3530
            if (qemuDomainObjEndJob(vm) == 0) {
                vm = NULL;
                goto cleanup;
            }
3531 3532 3533
            if (err < 0)
                goto cleanup;
            if (err > 0)
3534
                vm->def->mem.cur_balloon = balloon;
3535 3536
            /* err == 0 indicates no balloon support, so ignore it */
        }
3537
    }
3538

3539
    ret = qemuDomainFormatXML(driver, vm, flags);
3540 3541

cleanup:
3542 3543
    if (vm)
        virDomainObjUnlock(vm);
3544
    qemuDriverUnlock(driver);
3545
    return ret;
D
Daniel P. Berrange 已提交
3546 3547 3548
}


3549 3550 3551 3552
static char *qemuDomainXMLFromNative(virConnectPtr conn,
                                     const char *format,
                                     const char *config,
                                     unsigned int flags ATTRIBUTE_UNUSED) {
3553
    struct qemud_driver *driver = conn->privateData;
3554 3555 3556 3557
    virDomainDefPtr def = NULL;
    char *xml = NULL;

    if (STRNEQ(format, QEMU_CONFIG_FORMAT_ARGV)) {
3558 3559
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("unsupported config type %s"), format);
3560 3561 3562
        goto cleanup;
    }

3563
    qemuDriverLock(driver);
3564
    def = qemuParseCommandLineString(driver->caps, config);
3565
    qemuDriverUnlock(driver);
3566 3567 3568
    if (!def)
        goto cleanup;

3569
    xml = virDomainDefFormat(def, VIR_DOMAIN_XML_INACTIVE);
3570 3571 3572 3573 3574 3575

cleanup:
    virDomainDefFree(def);
    return xml;
}

3576 3577 3578 3579 3580 3581
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;
3582
    virDomainChrSourceDef monConfig;
3583
    virBitmapPtr qemuCaps = NULL;
E
Eric Blake 已提交
3584
    virCommandPtr cmd = NULL;
3585 3586 3587
    char *ret = NULL;
    int i;

3588 3589
    qemuDriverLock(driver);

3590
    if (STRNEQ(format, QEMU_CONFIG_FORMAT_ARGV)) {
3591 3592
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("unsupported config type %s"), format);
3593 3594 3595
        goto cleanup;
    }

3596
    def = virDomainDefParseString(driver->caps, xmlData, 0);
3597 3598 3599
    if (!def)
        goto cleanup;

3600 3601
    /* Since we're just exporting args, we can't do bridge/network/direct
     * setups, since libvirt will normally create TAP/macvtap devices
3602 3603 3604 3605 3606
     * 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];
3607
        int bootIndex = net->bootIndex;
3608 3609
        if (net->type == VIR_DOMAIN_NET_TYPE_NETWORK ||
            net->type == VIR_DOMAIN_NET_TYPE_DIRECT) {
3610 3611 3612 3613 3614 3615 3616 3617 3618 3619 3620 3621 3622 3623 3624 3625 3626 3627 3628 3629
            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;
        }
3630
        net->bootIndex = bootIndex;
3631 3632 3633 3634
    }
    for (i = 0 ; i < def->ngraphics ; i++) {
        if (def->graphics[i]->type == VIR_DOMAIN_GRAPHICS_TYPE_VNC &&
            def->graphics[i]->data.vnc.autoport)
3635
            def->graphics[i]->data.vnc.port = QEMU_VNC_PORT_MIN;
3636 3637
    }

3638
    if (qemuCapsExtractVersionInfo(def->emulator, def->os.arch,
3639
                                   NULL,
3640
                                   &qemuCaps) < 0)
3641 3642
        goto cleanup;

3643
    if (qemuProcessPrepareMonitorChr(driver, &monConfig, def->name) < 0)
3644
        goto cleanup;
3645

3646
    if (!(cmd = qemuBuildCommandLine(conn, driver, def,
3647
                                     &monConfig, false, qemuCaps,
3648
                                     NULL, -1, NULL, VIR_VM_OP_NO_OP)))
3649 3650
        goto cleanup;

E
Eric Blake 已提交
3651
    ret = virCommandToString(cmd);
3652 3653

cleanup:
3654
    qemuDriverUnlock(driver);
3655

3656
    qemuCapsFree(qemuCaps);
E
Eric Blake 已提交
3657
    virCommandFree(cmd);
3658 3659 3660 3661 3662
    virDomainDefFree(def);
    return ret;
}


3663
static int qemudListDefinedDomains(virConnectPtr conn,
3664
                            char **const names, int nnames) {
3665
    struct qemud_driver *driver = conn->privateData;
3666
    int n;
3667

3668
    qemuDriverLock(driver);
3669
    n = virDomainObjListGetInactiveNames(&driver->domains, names, nnames);
3670
    qemuDriverUnlock(driver);
3671
    return n;
D
Daniel P. Berrange 已提交
3672 3673
}

3674
static int qemudNumDefinedDomains(virConnectPtr conn) {
3675
    struct qemud_driver *driver = conn->privateData;
3676
    int n;
3677

3678
    qemuDriverLock(driver);
3679
    n = virDomainObjListNumOfDomains(&driver->domains, 0);
3680
    qemuDriverUnlock(driver);
3681

3682
    return n;
D
Daniel P. Berrange 已提交
3683 3684 3685
}


J
Jiri Denemark 已提交
3686 3687
static int qemudDomainObjStart(virConnectPtr conn,
                               struct qemud_driver *driver,
3688 3689
                               virDomainObjPtr vm,
                               bool start_paused)
J
Jiri Denemark 已提交
3690 3691 3692 3693 3694 3695 3696 3697 3698 3699 3700 3701 3702 3703 3704 3705 3706 3707 3708 3709
{
    int ret = -1;
    char *managed_save;

    /*
     * If there is a managed saved state restore it instead of starting
     * from scratch. In any case the old state is removed.
     */
    managed_save = qemuDomainManagedSavePath(driver, vm);
    if ((managed_save) && (virFileExists(managed_save))) {
        ret = qemudDomainObjRestore(conn, driver, vm, managed_save);

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

        if (ret == 0)
            goto cleanup;
    }

3710 3711
    ret = qemuProcessStart(conn, driver, vm, NULL, start_paused, -1, NULL,
                           VIR_VM_OP_CREATE);
3712
    qemuAuditDomainStart(vm, "booted", ret >= 0);
3713
    if (ret >= 0) {
J
Jiri Denemark 已提交
3714 3715 3716 3717 3718 3719 3720 3721 3722 3723 3724 3725 3726
        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;
}

3727 3728 3729
static int
qemudDomainStartWithFlags(virDomainPtr dom, unsigned int flags)
{
3730 3731 3732
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
3733

3734
    virCheckFlags(VIR_DOMAIN_START_PAUSED, -1);
3735

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

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

3747 3748 3749 3750
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;

    if (virDomainObjIsActive(vm)) {
3751 3752
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is already running"));
3753 3754 3755
        goto endjob;
    }

3756 3757
    ret = qemudDomainObjStart(dom->conn, driver, vm,
                              (flags & VIR_DOMAIN_START_PAUSED) != 0);
3758

3759
endjob:
3760 3761
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
3762

3763
cleanup:
3764 3765
    if (vm)
        virDomainObjUnlock(vm);
3766
    qemuDriverUnlock(driver);
3767
    return ret;
D
Daniel P. Berrange 已提交
3768 3769
}

3770 3771 3772 3773 3774 3775
static int
qemudDomainStart(virDomainPtr dom)
{
    return qemudDomainStartWithFlags(dom, 0);
}

3776 3777 3778 3779 3780 3781 3782 3783 3784 3785 3786 3787 3788 3789 3790
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;

3791
        if (STRNEQ(def->os.machine, machine->name))
3792 3793 3794
            continue;

        if (!(*canonical = strdup(machine->canonical))) {
3795
            virReportOOMError();
3796 3797 3798 3799 3800 3801 3802 3803 3804
            return -1;
        }

        break;
    }

    return 0;
}

3805 3806 3807 3808 3809 3810
static int
qemudCanonicalizeMachineDirect(virDomainDefPtr def, char **canonical)
{
    virCapsGuestMachinePtr *machines = NULL;
    int i, nmachines = 0;

3811
    if (qemuCapsProbeMachineTypes(def->emulator, &machines, &nmachines) < 0)
3812 3813 3814 3815 3816 3817
        return -1;

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

3818
        if (STRNEQ(def->os.machine, machines[i]->name))
3819 3820 3821 3822 3823 3824 3825 3826 3827 3828 3829 3830
            continue;

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

    virCapabilitiesFreeMachines(machines, nmachines);

    return 0;
}

3831 3832
int
qemudCanonicalizeMachine(struct qemud_driver *driver, virDomainDefPtr def)
3833 3834 3835 3836 3837 3838
{
    char *canonical = NULL;
    int i;

    for (i = 0; i < driver->caps->nguests; i++) {
        virCapsGuestPtr guest = driver->caps->guests[i];
3839
        virCapsGuestDomainInfoPtr info;
3840 3841 3842
        int j;

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

3845 3846 3847 3848 3849 3850 3851 3852 3853
            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;
3854 3855
        }

3856 3857 3858 3859
        info = &guest->arch.defaultInfo;

        if (info->emulator && STREQ(info->emulator, def->emulator)) {
            if (qemudCanonicalizeMachineFromInfo(def, info, &canonical) < 0)
3860 3861 3862 3863
                return -1;
            goto out;
        }
    }
3864 3865 3866 3867

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

3868 3869 3870 3871 3872 3873 3874
out:
    if (canonical) {
        VIR_FREE(def->os.machine);
        def->os.machine = canonical;
    }
    return 0;
}
D
Daniel P. Berrange 已提交
3875

3876
static virDomainPtr qemudDomainDefine(virConnectPtr conn, const char *xml) {
3877
    struct qemud_driver *driver = conn->privateData;
3878
    virDomainDefPtr def;
3879
    virDomainObjPtr vm = NULL;
3880
    virDomainPtr dom = NULL;
3881
    virDomainEventPtr event = NULL;
3882
    int dupVM;
3883

3884
    qemuDriverLock(driver);
3885
    if (!(def = virDomainDefParseString(driver->caps, xml,
3886
                                        VIR_DOMAIN_XML_INACTIVE)))
3887
        goto cleanup;
3888

3889
    if (virSecurityManagerVerify(driver->securityManager, def) < 0)
3890 3891
        goto cleanup;

3892 3893
    if ((dupVM = virDomainObjIsDuplicate(&driver->domains, def, 0)) < 0)
        goto cleanup;
3894

3895
    if (qemudCanonicalizeMachine(driver, def) < 0)
3896 3897
        goto cleanup;

3898
    if (qemuDomainAssignPCIAddresses(def) < 0)
3899 3900
        goto cleanup;

3901
    if (!(vm = virDomainAssignDef(driver->caps,
3902
                                  &driver->domains,
3903
                                  def, false))) {
3904
        goto cleanup;
3905
    }
3906
    def = NULL;
3907
    vm->persistent = 1;
3908

3909
    if (virDomainSaveConfig(driver->configDir,
3910
                            vm->newDef ? vm->newDef : vm->def) < 0) {
3911 3912
        virDomainRemoveInactive(&driver->domains,
                                vm);
3913
        vm = NULL;
3914
        goto cleanup;
3915 3916
    }

3917 3918
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_DEFINED,
3919
                                     !dupVM ?
3920 3921
                                     VIR_DOMAIN_EVENT_DEFINED_ADDED :
                                     VIR_DOMAIN_EVENT_DEFINED_UPDATED);
3922

3923
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
3924
    if (dom) dom->id = vm->def->id;
3925 3926

cleanup:
3927
    virDomainDefFree(def);
3928 3929
    if (vm)
        virDomainObjUnlock(vm);
3930 3931
    if (event)
        qemuDomainEventQueue(driver, event);
3932
    qemuDriverUnlock(driver);
3933
    return dom;
D
Daniel P. Berrange 已提交
3934 3935
}

3936
static int qemudDomainUndefine(virDomainPtr dom) {
3937 3938
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
3939
    virDomainEventPtr event = NULL;
3940
    int ret = -1;
D
Daniel P. Berrange 已提交
3941

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

D
Daniel P. Berrange 已提交
3945
    if (!vm) {
3946 3947
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3948 3949
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3950
        goto cleanup;
D
Daniel P. Berrange 已提交
3951 3952
    }

D
Daniel P. Berrange 已提交
3953
    if (virDomainObjIsActive(vm)) {
3954 3955
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot delete active domain"));
3956
        goto cleanup;
D
Daniel P. Berrange 已提交
3957 3958
    }

3959
    if (!vm->persistent) {
3960
        qemuReportError(VIR_ERR_OPERATION_INVALID,
3961
                        "%s", _("cannot undefine transient domain"));
3962
        goto cleanup;
3963 3964
    }

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

3968 3969 3970
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_UNDEFINED,
                                     VIR_DOMAIN_EVENT_UNDEFINED_REMOVED);
3971

3972 3973
    virDomainRemoveInactive(&driver->domains,
                            vm);
3974
    vm = NULL;
3975
    ret = 0;
D
Daniel P. Berrange 已提交
3976

3977
cleanup:
3978 3979
    if (vm)
        virDomainObjUnlock(vm);
3980 3981
    if (event)
        qemuDomainEventQueue(driver, event);
3982
    qemuDriverUnlock(driver);
3983
    return ret;
D
Daniel P. Berrange 已提交
3984 3985
}

3986

3987 3988
static int qemudDomainAttachDevice(virDomainPtr dom,
                                   const char *xml)
3989
{
3990 3991 3992
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    virDomainDeviceDefPtr dev = NULL;
3993
    virBitmapPtr qemuCaps = NULL;
3994
    virCgroupPtr cgroup = NULL;
3995
    int ret = -1;
3996

3997 3998 3999 4000 4001 4002 4003
    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);
4004 4005 4006
        goto cleanup;
    }

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

4010 4011 4012 4013 4014
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot attach device on inactive domain"));
        goto endjob;
    }
4015

4016 4017 4018 4019
    dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
                                  VIR_DOMAIN_XML_INACTIVE);
    if (dev == NULL)
        goto endjob;
4020

4021
    if (qemuCapsExtractVersionInfo(vm->def->emulator, vm->def->os.arch,
4022
                                   NULL,
4023
                                   &qemuCaps) < 0)
4024
        goto endjob;
4025

4026 4027 4028 4029
    if (dev->type == 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 已提交
4030
                                _("Unable to find cgroup for %s"),
4031 4032 4033
                                vm->def->name);
                goto endjob;
            }
4034
            if (qemuSetupDiskCgroup(driver, vm, cgroup, dev->data.disk) < 0)
4035
                goto endjob;
4036 4037
        }

4038 4039 4040 4041 4042
        switch (dev->data.disk->device) {
        case VIR_DOMAIN_DISK_DEVICE_CDROM:
        case VIR_DOMAIN_DISK_DEVICE_FLOPPY:
            ret = qemuDomainChangeEjectableMedia(driver, vm,
                                                 dev->data.disk,
4043
                                                 qemuCaps,
4044 4045 4046 4047
                                                 false);
            if (ret == 0)
                dev->data.disk = NULL;
            break;
4048

4049 4050 4051
        case VIR_DOMAIN_DISK_DEVICE_DISK:
            if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_USB) {
                ret = qemuDomainAttachUsbMassstorageDevice(driver, vm,
4052
                                                           dev->data.disk, qemuCaps);
4053 4054 4055 4056
                if (ret == 0)
                    dev->data.disk = NULL;
            } else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_VIRTIO) {
                ret = qemuDomainAttachPciDiskDevice(driver, vm,
4057
                                                    dev->data.disk, qemuCaps);
4058 4059 4060 4061
                if (ret == 0)
                    dev->data.disk = NULL;
            } else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_SCSI) {
                ret = qemuDomainAttachSCSIDisk(driver, vm,
4062
                                               dev->data.disk, qemuCaps);
4063 4064 4065 4066 4067 4068 4069 4070 4071
                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;
4072

4073 4074 4075 4076 4077
        default:
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                            _("disk device type '%s' cannot be hotplugged"),
                            virDomainDiskDeviceTypeToString(dev->data.disk->device));
            /* Fallthrough */
4078
        }
4079
        if (ret != 0 && cgroup) {
4080
            if (qemuTeardownDiskCgroup(driver, vm, cgroup, dev->data.disk) < 0)
4081 4082
                VIR_WARN("Failed to teardown cgroup for disk path %s",
                         NULLSTR(dev->data.disk->src));
4083
        }
4084 4085 4086
    } else if (dev->type == VIR_DOMAIN_DEVICE_CONTROLLER) {
        if (dev->data.controller->type == VIR_DOMAIN_CONTROLLER_TYPE_SCSI) {
            ret = qemuDomainAttachPciControllerDevice(driver, vm,
4087
                                                      dev->data.controller, qemuCaps);
4088 4089 4090 4091 4092 4093 4094
            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 */
4095
        }
4096 4097
    } else if (dev->type == VIR_DOMAIN_DEVICE_NET) {
        ret = qemuDomainAttachNetDevice(dom->conn, driver, vm,
4098
                                        dev->data.net, qemuCaps);
4099 4100 4101 4102
        if (ret == 0)
            dev->data.net = NULL;
    } else if (dev->type == VIR_DOMAIN_DEVICE_HOSTDEV) {
        ret = qemuDomainAttachHostDevice(driver, vm,
4103
                                         dev->data.hostdev, qemuCaps);
4104 4105
        if (ret == 0)
            dev->data.hostdev = NULL;
4106
    } else {
4107 4108 4109 4110
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("device type '%s' cannot be attached"),
                        virDomainDeviceTypeToString(dev->type));
        goto endjob;
4111 4112
    }

4113 4114 4115 4116 4117 4118 4119 4120 4121 4122 4123
    if (!ret && virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
        ret = -1;

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

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

4124
    qemuCapsFree(qemuCaps);
4125 4126 4127 4128
    virDomainDeviceDefFree(dev);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
4129 4130 4131
    return ret;
}

4132 4133 4134 4135 4136 4137 4138 4139
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;
    }
4140

4141 4142
    return qemudDomainAttachDevice(dom, xml);
}
4143

4144

4145 4146 4147 4148 4149 4150 4151
static int qemuDomainUpdateDeviceFlags(virDomainPtr dom,
                                       const char *xml,
                                       unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    virDomainDeviceDefPtr dev = NULL;
4152
    virBitmapPtr qemuCaps = NULL;
4153 4154 4155
    virCgroupPtr cgroup = NULL;
    int ret = -1;
    bool force = (flags & VIR_DOMAIN_DEVICE_MODIFY_FORCE) != 0;
4156

4157 4158 4159 4160
    virCheckFlags(VIR_DOMAIN_DEVICE_MODIFY_CURRENT |
                  VIR_DOMAIN_DEVICE_MODIFY_LIVE |
                  VIR_DOMAIN_DEVICE_MODIFY_CONFIG |
                  VIR_DOMAIN_DEVICE_MODIFY_FORCE, -1);
4161

4162 4163 4164
    if (flags & VIR_DOMAIN_DEVICE_MODIFY_CONFIG) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot modify the persistent configuration of a domain"));
4165 4166 4167
        return -1;
    }

4168 4169 4170 4171 4172 4173 4174 4175
    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;
4176 4177
    }

4178 4179 4180 4181 4182 4183 4184
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;

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

4187 4188 4189 4190 4191
    dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
                                  VIR_DOMAIN_XML_INACTIVE);
    if (dev == NULL)
        goto endjob;

4192
    if (qemuCapsExtractVersionInfo(vm->def->emulator, vm->def->os.arch,
4193
                                   NULL,
4194
                                   &qemuCaps) < 0)
4195
        goto endjob;
4196

4197 4198 4199 4200 4201
    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 已提交
4202
                                _("Unable to find cgroup for %s"),
4203 4204 4205
                                vm->def->name);
                goto endjob;
            }
4206
            if (qemuSetupDiskCgroup(driver, vm, cgroup, dev->data.disk) < 0)
4207
                goto endjob;
4208 4209
        }

4210 4211 4212 4213 4214
        switch (dev->data.disk->device) {
        case VIR_DOMAIN_DISK_DEVICE_CDROM:
        case VIR_DOMAIN_DISK_DEVICE_FLOPPY:
            ret = qemuDomainChangeEjectableMedia(driver, vm,
                                                 dev->data.disk,
4215
                                                 qemuCaps,
4216 4217 4218 4219
                                                 force);
            if (ret == 0)
                dev->data.disk = NULL;
            break;
4220

4221

4222 4223 4224 4225 4226 4227
        default:
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                            _("disk bus '%s' cannot be updated."),
                            virDomainDiskBusTypeToString(dev->data.disk->bus));
            break;
        }
4228

4229
        if (ret != 0 && cgroup) {
4230
            if (qemuTeardownDiskCgroup(driver, vm, cgroup, dev->data.disk) < 0)
4231 4232 4233
                VIR_WARN("Failed to teardown cgroup for disk path %s",
                         NULLSTR(dev->data.disk->src));
        }
4234
        break;
4235 4236 4237

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

4240
    default:
4241
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
4242 4243
                        _("device type '%s' cannot be updated"),
                        virDomainDeviceTypeToString(dev->type));
4244
        break;
4245 4246
    }

4247 4248 4249 4250 4251 4252 4253 4254 4255 4256
    if (!ret && virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
        ret = -1;

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

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

4258
    qemuCapsFree(qemuCaps);
4259 4260 4261 4262
    virDomainDeviceDefFree(dev);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
4263 4264 4265
    return ret;
}

4266

4267 4268
static int qemudDomainDetachDevice(virDomainPtr dom,
                                   const char *xml) {
4269 4270
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
4271
    virBitmapPtr qemuCaps = NULL;
4272 4273
    virDomainDeviceDefPtr dev = NULL;
    int ret = -1;
4274

4275
    qemuDriverLock(driver);
4276
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
4277
    if (!vm) {
4278 4279
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4280 4281
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4282
        goto cleanup;
4283 4284
    }

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

D
Daniel P. Berrange 已提交
4288
    if (!virDomainObjIsActive(vm)) {
4289 4290
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot detach device on inactive domain"));
4291
        goto endjob;
4292 4293
    }

4294
    dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
4295
                                  VIR_DOMAIN_XML_INACTIVE);
4296
    if (dev == NULL)
4297
        goto endjob;
4298

4299
    if (qemuCapsExtractVersionInfo(vm->def->emulator, vm->def->os.arch,
4300
                                   NULL,
4301
                                   &qemuCaps) < 0)
4302
        goto endjob;
4303 4304

    if (dev->type == VIR_DOMAIN_DEVICE_DISK &&
4305 4306
        dev->data.disk->device == VIR_DOMAIN_DISK_DEVICE_DISK) {
        if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_VIRTIO) {
4307
            ret = qemuDomainDetachPciDiskDevice(driver, vm, dev, qemuCaps);
4308 4309
        }
        else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_SCSI) {
4310
            ret = qemuDomainDetachDiskDevice(driver, vm, dev, qemuCaps);
W
Wen Congyang 已提交
4311 4312
        } else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_USB) {
            ret = qemuDomainDetachDiskDevice(driver, vm, dev, qemuCaps);
4313 4314
        }
        else {
4315
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
4316 4317
                            _("This type of disk cannot be hot unplugged"));
        }
4318
    } else if (dev->type == VIR_DOMAIN_DEVICE_NET) {
4319
        ret = qemuDomainDetachNetDevice(driver, vm, dev, qemuCaps);
4320 4321
    } else if (dev->type == VIR_DOMAIN_DEVICE_CONTROLLER) {
        if (dev->data.controller->type == VIR_DOMAIN_CONTROLLER_TYPE_SCSI) {
4322
            ret = qemuDomainDetachPciControllerDevice(driver, vm, dev,
4323
                                                      qemuCaps);
4324
        } else {
4325
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
4326 4327
                            _("disk controller bus '%s' cannot be hotunplugged."),
                            virDomainControllerTypeToString(dev->data.controller->type));
4328 4329
            /* fallthrough */
        }
4330
    } else if (dev->type == VIR_DOMAIN_DEVICE_HOSTDEV) {
4331
        ret = qemuDomainDetachHostDevice(driver, vm, dev, qemuCaps);
4332
    } else {
4333
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
4334
                        "%s", _("This type of device cannot be hot unplugged"));
4335
    }
4336

4337
    if (!ret && virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
4338 4339
        ret = -1;

4340
endjob:
4341 4342
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
4343

4344
cleanup:
4345
    qemuCapsFree(qemuCaps);
4346
    virDomainDeviceDefFree(dev);
4347 4348
    if (vm)
        virDomainObjUnlock(vm);
4349
    qemuDriverUnlock(driver);
4350 4351 4352
    return ret;
}

4353 4354 4355 4356
static int qemudDomainDetachDeviceFlags(virDomainPtr dom,
                                        const char *xml,
                                        unsigned int flags) {
    if (flags & VIR_DOMAIN_DEVICE_MODIFY_CONFIG) {
4357 4358
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot modify the persistent configuration of a domain"));
4359 4360 4361 4362 4363 4364
        return -1;
    }

    return qemudDomainDetachDevice(dom, xml);
}

4365
static int qemudDomainGetAutostart(virDomainPtr dom,
4366
                                   int *autostart) {
4367 4368 4369
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
4370

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

4375
    if (!vm) {
4376 4377
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4378 4379
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4380
        goto cleanup;
4381 4382 4383
    }

    *autostart = vm->autostart;
4384
    ret = 0;
4385

4386
cleanup:
4387 4388
    if (vm)
        virDomainObjUnlock(vm);
4389
    return ret;
4390 4391
}

4392
static int qemudDomainSetAutostart(virDomainPtr dom,
4393
                                   int autostart) {
4394 4395
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
4396 4397
    char *configFile = NULL, *autostartLink = NULL;
    int ret = -1;
4398

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

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

4410
    if (!vm->persistent) {
4411
        qemuReportError(VIR_ERR_OPERATION_INVALID,
4412
                        "%s", _("cannot set autostart for transient domain"));
4413
        goto cleanup;
4414 4415
    }

4416 4417
    autostart = (autostart != 0);

4418
    if (vm->autostart != autostart) {
4419
        if ((configFile = virDomainConfigFile(driver->configDir, vm->def->name)) == NULL)
4420
            goto cleanup;
4421
        if ((autostartLink = virDomainConfigFile(driver->autostartDir, vm->def->name)) == NULL)
4422
            goto cleanup;
4423

4424 4425
        if (autostart) {
            int err;
4426

4427
            if ((err = virFileMakePath(driver->autostartDir))) {
4428
                virReportSystemError(err,
4429 4430
                                     _("cannot create autostart directory %s"),
                                     driver->autostartDir);
4431 4432
                goto cleanup;
            }
4433

4434
            if (symlink(configFile, autostartLink) < 0) {
4435
                virReportSystemError(errno,
4436 4437
                                     _("Failed to create symlink '%s to '%s'"),
                                     autostartLink, configFile);
4438 4439 4440 4441
                goto cleanup;
            }
        } else {
            if (unlink(autostartLink) < 0 && errno != ENOENT && errno != ENOTDIR) {
4442
                virReportSystemError(errno,
4443 4444
                                     _("Failed to delete symlink '%s'"),
                                     autostartLink);
4445 4446
                goto cleanup;
            }
4447 4448
        }

4449
        vm->autostart = autostart;
4450
    }
4451
    ret = 0;
4452

4453 4454 4455
cleanup:
    VIR_FREE(configFile);
    VIR_FREE(autostartLink);
4456 4457
    if (vm)
        virDomainObjUnlock(vm);
4458
    qemuDriverUnlock(driver);
4459
    return ret;
4460 4461
}

4462 4463 4464 4465 4466

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

4469
    qemuDriverLock(driver);
4470
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
4471 4472
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup CPU controller is not mounted"));
4473
        goto cleanup;
4474 4475 4476 4477 4478 4479 4480
    }

    if (nparams)
        *nparams = 1;

    ret = strdup("posix");
    if (!ret)
4481
        virReportOOMError();
4482 4483 4484

cleanup:
    qemuDriverUnlock(driver);
4485 4486 4487
    return ret;
}

4488 4489 4490 4491 4492 4493 4494 4495 4496 4497 4498 4499 4500 4501

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)) {
4502 4503
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup memory controller is not mounted"));
4504 4505 4506 4507 4508 4509 4510 4511 4512 4513 4514 4515 4516 4517 4518 4519 4520 4521 4522 4523 4524 4525 4526 4527 4528 4529 4530 4531 4532 4533 4534 4535 4536 4537 4538 4539 4540 4541 4542 4543 4544 4545 4546 4547 4548 4549 4550 4551 4552 4553 4554
        goto cleanup;
    }

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

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

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

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

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

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

            rc = virCgroupSetMemorySoftLimit(group, params[i].value.ul);
            if (rc != 0) {
                virReportSystemError(-rc, "%s",
                                     _("unable to set memory soft_limit tunable"));
                ret = -1;
            }
4555
        } else if (STREQ(param->field, VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT)) {
4556 4557 4558 4559 4560 4561 4562 4563 4564 4565 4566 4567 4568 4569 4570 4571 4572 4573 4574 4575 4576 4577 4578 4579 4580 4581 4582 4583 4584 4585 4586 4587 4588
            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;
            }

            rc = virCgroupSetSwapHardLimit(group, params[i].value.ul);
            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;
}

4589 4590 4591 4592 4593 4594 4595 4596 4597
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;
4598
    unsigned long long val;
4599 4600 4601 4602 4603 4604
    int ret = -1;
    int rc;

    qemuDriverLock(driver);

    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_MEMORY)) {
4605 4606
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup memory controller is not mounted"));
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 4636 4637 4638 4639 4640 4641 4642 4643 4644 4645 4646 4647 4648
        goto cleanup;
    }

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

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

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

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

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

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

        switch(i) {
        case 0: /* fill memory hard limit here */
            rc = virCgroupGetMemoryHardLimit(group, &val);
            if (rc != 0) {
                virReportSystemError(-rc, "%s",
                                     _("unable to get memory hard limit"));
4649
                goto cleanup;
4650 4651 4652 4653
            }
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_HARD_LIMIT) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field memory hard limit too long for destination"));
4654
                goto cleanup;
4655 4656 4657 4658 4659 4660 4661 4662 4663
            }
            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"));
4664
                goto cleanup;
4665 4666 4667 4668
            }
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SOFT_LIMIT) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field memory soft limit too long for destination"));
4669
                goto cleanup;
4670 4671 4672 4673 4674 4675 4676 4677 4678
            }
            param->value.ul = val;
            break;

        case 2: /* fill swap hard limit here */
            rc = virCgroupGetSwapHardLimit(group, &val);
            if (rc != 0) {
                virReportSystemError(-rc, "%s",
                                     _("unable to get swap hard limit"));
4679
                goto cleanup;
4680
            }
4681
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT) == NULL) {
4682 4683
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field swap hard limit too long for destination"));
4684
                goto cleanup;
4685 4686 4687 4688 4689 4690 4691 4692 4693 4694
            }
            param->value.ul = val;
            break;

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

4695 4696
    ret = 0;

4697 4698 4699 4700 4701 4702 4703 4704 4705
cleanup:
    if (group)
        virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

4706 4707 4708 4709 4710 4711 4712 4713 4714 4715
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;

4716
    qemuDriverLock(driver);
4717
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
4718 4719
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup CPU controller is not mounted"));
4720
        goto cleanup;
4721 4722 4723 4724 4725
    }

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

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

    if (virCgroupForDomain(driver->cgroup, vm->def->name, &group, 0) != 0) {
4732 4733
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("cannot find cgroup for domain %s"), vm->def->name);
4734 4735 4736 4737 4738 4739 4740 4741 4742
        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) {
4743 4744
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for cpu_shares tunable, expected a 'ullong'"));
4745 4746 4747 4748 4749
                goto cleanup;
            }

            rc = virCgroupSetCpuShares(group, params[i].value.ul);
            if (rc != 0) {
4750
                virReportSystemError(-rc, "%s",
4751 4752 4753 4754
                                     _("unable to set cpu shares tunable"));
                goto cleanup;
            }
        } else {
4755 4756
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("Invalid parameter `%s'"), param->field);
4757 4758 4759 4760 4761 4762 4763 4764 4765
            goto cleanup;
        }
    }
    ret = 0;

cleanup:
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
4766
    qemuDriverUnlock(driver);
4767 4768 4769 4770 4771 4772 4773 4774 4775 4776 4777 4778 4779 4780
    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;

4781
    qemuDriverLock(driver);
4782
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
4783 4784
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup CPU controller is not mounted"));
4785
        goto cleanup;
4786 4787 4788
    }

    if ((*nparams) != 1) {
4789 4790
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("Invalid parameter count"));
4791
        goto cleanup;
4792 4793 4794 4795 4796
    }

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

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

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

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

    ret = 0;

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


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

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

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

D
Daniel P. Berrange 已提交
4861
    if (!virDomainObjIsActive (vm)) {
4862 4863
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
4864
        goto endjob;
4865 4866
    }

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

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

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

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

4897
endjob:
4898 4899
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
4900

4901
cleanup:
4902 4903
    if (vm)
        virDomainObjUnlock(vm);
4904
    return ret;
4905 4906
}

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

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

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

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

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

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

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

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

4988 4989 4990
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

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

5001 5002 5003
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

5004 5005 5006 5007 5008 5009
cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}

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

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

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

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

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

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

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

        ret = 0;
    } else {
5071 5072
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("invalid path"));
5073 5074
    }

5075
cleanup:
5076
    VIR_FORCE_CLOSE(fd);
5077 5078
    if (vm)
        virDomainObjUnlock(vm);
5079 5080 5081
    return ret;
}

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

5093
    qemuDriverLock(driver);
5094
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
5095
    qemuDriverUnlock(driver);
R
Richard W.M. Jones 已提交
5096 5097

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

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

5111 5112 5113
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

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

5120
    if (virAsprintf(&tmp, "%s/qemu.mem.XXXXXX", driver->cacheDir) < 0) {
5121
        virReportOOMError();
5122
        goto endjob;
5123 5124
    }

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

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

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

    ret = 0;
5156

5157
endjob:
5158 5159
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
5160

5161
cleanup:
5162
    VIR_FREE(tmp);
5163
    VIR_FORCE_CLOSE(fd);
R
Richard W.M. Jones 已提交
5164
    unlink (tmp);
5165 5166
    if (vm)
        virDomainObjUnlock(vm);
R
Richard W.M. Jones 已提交
5167 5168 5169
    return ret;
}

5170

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

    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)) {
5209
            disk = vm->def->disks[i];
5210 5211 5212 5213
            break;
        }
    }

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

    if (virStorageFileGetMetadataFromFD(path, fd,
                                        format,
                                        &meta) < 0)
5251 5252 5253 5254 5255 5256 5257 5258 5259 5260
        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)) {
5261
#ifndef WIN32
5262 5263 5264 5265 5266 5267 5268 5269 5270 5271 5272 5273 5274 5275 5276 5277 5278 5279 5280 5281 5282 5283 5284 5285 5286 5287 5288 5289
        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;

5290
    /* Set default value .. */
5291 5292
    info->allocation = info->physical;

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

        if (qemuDomainObjEndJob(vm) == 0)
            vm = NULL;
    } else {
        ret = 0;
    }
5317 5318

cleanup:
5319
    VIR_FORCE_CLOSE(fd);
5320 5321 5322 5323 5324 5325
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}


5326
static int
5327 5328 5329 5330
qemuDomainEventRegister(virConnectPtr conn,
                        virConnectDomainEventCallback callback,
                        void *opaque,
                        virFreeCallback freecb)
5331
{
5332 5333 5334
    struct qemud_driver *driver = conn->privateData;
    int ret;

5335
    qemuDriverLock(driver);
5336 5337
    ret = virDomainEventCallbackListAdd(conn, driver->domainEventCallbacks,
                                        callback, opaque, freecb);
5338
    qemuDriverUnlock(driver);
5339

5340
    return ret;
5341 5342
}

5343

5344
static int
5345 5346
qemuDomainEventDeregister(virConnectPtr conn,
                          virConnectDomainEventCallback callback)
5347
{
5348 5349 5350
    struct qemud_driver *driver = conn->privateData;
    int ret;

5351
    qemuDriverLock(driver);
5352 5353 5354 5355 5356 5357
    if (driver->domainEventDispatching)
        ret = virDomainEventCallbackListMarkDelete(conn, driver->domainEventCallbacks,
                                                   callback);
    else
        ret = virDomainEventCallbackListRemove(conn, driver->domainEventCallbacks,
                                               callback);
5358
    qemuDriverUnlock(driver);
5359

5360
    return ret;
5361 5362
}

5363 5364 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

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

C
Chris Lalancette 已提交
5408 5409 5410 5411 5412 5413 5414 5415 5416 5417 5418 5419 5420 5421 5422
/* 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;
5423

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

5440 5441 5442 5443
    qemuDriverLock(driver);
    ret = qemuMigrationPrepareTunnel(driver, dconn, st,
                                     dname, dom_xml);
    qemuDriverUnlock(driver);
5444

C
Chris Lalancette 已提交
5445 5446 5447 5448
cleanup:
    return ret;
}

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

C
Chris Lalancette 已提交
5467 5468 5469 5470 5471 5472 5473 5474 5475
    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);

5476
    *uri_out = NULL;
D
Daniel Veillard 已提交
5477

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

D
Daniel Veillard 已提交
5488
    if (!dom_xml) {
5489 5490
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("no domain XML passed"));
5491
        goto cleanup;
D
Daniel Veillard 已提交
5492 5493
    }

5494 5495 5496
    ret = qemuMigrationPrepareDirect(driver, dconn,
                                     uri_in, uri_out,
                                     dname, dom_xml);
D
Daniel Veillard 已提交
5497

5498 5499 5500 5501
cleanup:
    qemuDriverUnlock(driver);
    return ret;
}
C
Chris Lalancette 已提交
5502

D
Daniel Veillard 已提交
5503

5504 5505 5506 5507 5508 5509 5510 5511 5512 5513 5514 5515 5516
/* 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;
5517

5518 5519 5520 5521 5522 5523 5524 5525
    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 已提交
5526

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

5537 5538 5539
    ret = qemuMigrationPerform(driver, dom->conn, vm,
                               uri, flags,
                               dname, resource);
5540

5541
cleanup:
5542
    qemuDriverUnlock(driver);
5543
    return ret;
D
Daniel Veillard 已提交
5544 5545
}

5546

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

C
Chris Lalancette 已提交
5562 5563 5564 5565 5566 5567 5568 5569 5570
    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);

5571 5572 5573
    /* Migration failed. Save the current error so nothing squashes it */
    orig_err = virSaveLastError();

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

5582
    dom = qemuMigrationFinish(driver, dconn, vm, flags, retcode);
5583

5584
cleanup:
5585 5586 5587 5588
    if (orig_err) {
        virSetError(orig_err);
        virFreeError(orig_err);
    }
5589
    qemuDriverUnlock(driver);
5590
    return dom;
D
Daniel Veillard 已提交
5591 5592
}

5593

5594 5595 5596 5597 5598 5599 5600 5601 5602 5603 5604 5605 5606 5607 5608 5609
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;

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

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

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

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

5651
    pci = pciGetDevice(domain, bus, slot, function);
5652 5653 5654
    if (!pci)
        return -1;

5655 5656
    qemuDriverLock(driver);
    if (pciDettachDevice(pci, driver->activePciHostdevs) < 0)
5657 5658 5659 5660
        goto out;

    ret = 0;
out:
5661
    qemuDriverUnlock(driver);
5662
    pciFreeDevice(pci);
5663 5664 5665 5666 5667 5668
    return ret;
}

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

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

5677
    pci = pciGetDevice(domain, bus, slot, function);
5678 5679 5680
    if (!pci)
        return -1;

5681 5682
    qemuDriverLock(driver);
    if (pciReAttachDevice(pci, driver->activePciHostdevs) < 0)
5683 5684 5685 5686
        goto out;

    ret = 0;
out:
5687
    qemuDriverUnlock(driver);
5688
    pciFreeDevice(pci);
5689 5690 5691 5692 5693 5694
    return ret;
}

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

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

5703
    pci = pciGetDevice(domain, bus, slot, function);
5704 5705 5706
    if (!pci)
        return -1;

5707 5708
    qemuDriverLock(driver);

5709
    if (pciResetDevice(pci, driver->activePciHostdevs, NULL) < 0)
5710 5711 5712 5713
        goto out;

    ret = 0;
out:
5714
    qemuDriverUnlock(driver);
5715
    pciFreeDevice(pci);
5716 5717 5718
    return ret;
}

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

    qemuDriverUnlock(driver);

    return ret;
}

5741

5742 5743 5744 5745 5746 5747 5748 5749 5750 5751 5752 5753 5754
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;
}

5755 5756 5757 5758 5759 5760 5761 5762 5763 5764 5765 5766 5767 5768 5769 5770 5771 5772 5773 5774 5775 5776 5777

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) {
5778 5779
            struct timeval now;

5780
            memcpy(info, &priv->jobInfo, sizeof(*info));
5781 5782 5783 5784 5785 5786 5787 5788 5789 5790 5791

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


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


5855 5856 5857 5858 5859 5860 5861 5862 5863 5864
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;

5865
    virCheckFlags(0, -1);
5866 5867 5868 5869 5870 5871 5872 5873 5874 5875 5876 5877 5878 5879 5880 5881 5882 5883 5884 5885

    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;

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

C
Chris Lalancette 已提交
5904 5905 5906 5907 5908 5909 5910 5911 5912 5913 5914 5915 5916 5917
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;
}

5918 5919 5920
static int qemuDomainSnapshotWriteMetadata(virDomainObjPtr vm,
                                           virDomainSnapshotObjPtr snapshot,
                                           char *snapshotDir)
C
Chris Lalancette 已提交
5921 5922 5923 5924 5925 5926 5927 5928 5929 5930
{
    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);
5931
    newxml = virDomainSnapshotDefFormat(uuidstr, snapshot->def, 1);
C
Chris Lalancette 已提交
5932 5933 5934 5935 5936 5937 5938 5939 5940 5941 5942 5943 5944 5945 5946 5947
    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;
    }

5948
    if (virAsprintf(&snapFile, "%s/%s.xml", snapDir, snapshot->def->name) < 0) {
C
Chris Lalancette 已提交
5949 5950 5951 5952 5953 5954 5955 5956 5957 5958 5959 5960 5961 5962 5963 5964 5965 5966 5967 5968 5969
        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);
5970
    VIR_FORCE_CLOSE(fd);
C
Chris Lalancette 已提交
5971 5972 5973
    return ret;
}

5974 5975
static int qemuDomainSnapshotSetCurrentActive(virDomainObjPtr vm,
                                              char *snapshotDir)
C
Chris Lalancette 已提交
5976 5977 5978 5979
{
    if (vm->current_snapshot) {
        vm->current_snapshot->def->active = 1;

5980 5981
        return qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                               snapshotDir);
C
Chris Lalancette 已提交
5982 5983 5984 5985 5986
    }

    return 0;
}

5987 5988
static int qemuDomainSnapshotSetCurrentInactive(virDomainObjPtr vm,
                                                char *snapshotDir)
C
Chris Lalancette 已提交
5989 5990 5991 5992
{
    if (vm->current_snapshot) {
        vm->current_snapshot->def->active = 0;

5993 5994
        return qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                               snapshotDir);
C
Chris Lalancette 已提交
5995 5996 5997 5998 5999 6000 6001 6002 6003 6004 6005 6006 6007 6008 6009 6010 6011 6012 6013
    }

    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,
6014 6015
                            _("Disk '%s' does not support snapshotting"),
                            vm->def->disks[i]->src);
C
Chris Lalancette 已提交
6016 6017 6018 6019 6020 6021 6022
            return 0;
        }
    }

    return 1;
}

6023 6024 6025 6026 6027 6028 6029 6030 6031 6032 6033 6034 6035 6036 6037 6038 6039 6040 6041 6042 6043 6044 6045 6046 6047 6048 6049 6050 6051 6052 6053 6054 6055 6056 6057 6058 6059 6060 6061 6062 6063 6064 6065 6066 6067 6068 6069 6070
/* 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
6071 6072
qemuDomainSnapshotCreateActive(virConnectPtr conn,
                               struct qemud_driver *driver,
6073 6074 6075 6076 6077
                               virDomainObjPtr *vmptr,
                               virDomainSnapshotObjPtr snap)
{
    virDomainObjPtr vm = *vmptr;
    qemuDomainObjPrivatePtr priv = vm->privateData;
6078 6079
    bool resume = false;
    int ret = -1;
6080 6081 6082 6083

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

6084 6085 6086 6087 6088 6089 6090 6091 6092 6093 6094 6095 6096 6097 6098 6099
    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;
        }
    }

6100 6101 6102 6103
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
    ret = qemuMonitorCreateSnapshot(priv->mon, snap->def->name);
    qemuDomainObjExitMonitorWithDriver(driver, vm);

6104 6105 6106 6107 6108 6109 6110 6111
cleanup:
    if (resume && virDomainObjIsActive(vm) &&
        qemuProcessStartCPUs(driver, vm, conn) < 0 &&
        virGetLastError() == NULL) {
        qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                        _("resuming after snapshot failed"));
    }

6112 6113 6114 6115 6116 6117
    if (qemuDomainObjEndJob(vm) == 0)
        *vmptr = NULL;

    return ret;
}

C
Chris Lalancette 已提交
6118 6119
static virDomainSnapshotPtr qemuDomainSnapshotCreateXML(virDomainPtr domain,
                                                        const char *xmlDesc,
6120
                                                        unsigned int flags)
C
Chris Lalancette 已提交
6121 6122 6123 6124 6125 6126 6127 6128
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    virDomainSnapshotObjPtr snap = NULL;
    virDomainSnapshotPtr snapshot = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];
    virDomainSnapshotDefPtr def;

6129 6130
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
6131 6132 6133 6134 6135 6136 6137 6138 6139 6140 6141 6142 6143 6144 6145 6146 6147 6148 6149 6150 6151 6152 6153 6154 6155
    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;

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

C
Chris Lalancette 已提交
6158 6159
    /* actually do the snapshot */
    if (!virDomainObjIsActive(vm)) {
6160
        if (qemuDomainSnapshotCreateInactive(vm, snap) < 0)
C
Chris Lalancette 已提交
6161 6162 6163
            goto cleanup;
    }
    else {
6164 6165
        if (qemuDomainSnapshotCreateActive(domain->conn, driver,
                                           &vm, snap) < 0)
6166
            goto cleanup;
C
Chris Lalancette 已提交
6167 6168 6169 6170 6171 6172 6173 6174 6175 6176 6177 6178 6179 6180 6181 6182 6183 6184
    }

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

6185 6186 6187
    if (qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                        driver->snapshotDir) < 0)
        /* qemuDomainSnapshotWriteMetadata set the error */
C
Chris Lalancette 已提交
6188 6189 6190 6191 6192 6193 6194 6195 6196 6197 6198 6199 6200
        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,
6201
                                       unsigned int flags)
C
Chris Lalancette 已提交
6202 6203 6204 6205 6206
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int n = -1;

6207 6208
    virCheckFlags(0, -1);

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

6235 6236
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
6237 6238 6239 6240 6241 6242 6243 6244 6245 6246 6247 6248 6249 6250 6251 6252 6253 6254 6255 6256 6257
    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,
6258
                                                           unsigned int flags)
C
Chris Lalancette 已提交
6259 6260 6261 6262 6263 6264
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    virDomainSnapshotObjPtr snap = NULL;
    virDomainSnapshotPtr snapshot = NULL;

6265 6266
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
6267 6268 6269 6270 6271 6272 6273 6274 6275 6276 6277 6278 6279 6280 6281 6282 6283 6284 6285 6286 6287 6288 6289 6290 6291 6292 6293
    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,
6294
                                        unsigned int flags)
C
Chris Lalancette 已提交
6295 6296 6297 6298 6299
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;

6300 6301
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
6302 6303 6304 6305 6306 6307 6308 6309 6310 6311 6312 6313 6314 6315 6316 6317 6318 6319 6320 6321
    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,
6322
                                                      unsigned int flags)
C
Chris Lalancette 已提交
6323 6324 6325 6326 6327
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    virDomainSnapshotPtr snapshot = NULL;

6328 6329
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
6330 6331 6332 6333 6334 6335 6336 6337 6338 6339 6340 6341 6342 6343 6344 6345 6346 6347 6348 6349 6350 6351 6352 6353 6354 6355
    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,
6356
                                       unsigned int flags)
C
Chris Lalancette 已提交
6357 6358 6359 6360 6361 6362 6363
{
    struct qemud_driver *driver = snapshot->domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    char *xml = NULL;
    virDomainSnapshotObjPtr snap = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];

6364 6365
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
6366 6367 6368 6369 6370 6371 6372 6373 6374 6375 6376 6377 6378 6379 6380 6381 6382 6383 6384 6385 6386 6387 6388 6389 6390 6391 6392
    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,
6393
                                      unsigned int flags)
C
Chris Lalancette 已提交
6394 6395 6396 6397 6398 6399 6400 6401 6402 6403
{
    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;

6404 6405
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
6406 6407 6408 6409 6410 6411 6412 6413 6414 6415 6416 6417 6418 6419 6420 6421 6422 6423 6424 6425 6426 6427 6428 6429 6430 6431 6432 6433 6434 6435 6436
    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)
6437
                goto endjob;
C
Chris Lalancette 已提交
6438 6439
        }
        else {
6440
            if (qemuDomainSnapshotSetCurrentActive(vm, driver->snapshotDir) < 0)
6441
                goto endjob;
C
Chris Lalancette 已提交
6442

6443 6444
            rc = qemuProcessStart(snapshot->domain->conn, driver, vm, NULL,
                                  false, -1, NULL, VIR_VM_OP_CREATE);
6445
            qemuAuditDomainStart(vm, "from-snapshot", rc >= 0);
6446
            if (qemuDomainSnapshotSetCurrentInactive(vm, driver->snapshotDir) < 0)
6447
                goto endjob;
C
Chris Lalancette 已提交
6448
            if (rc < 0)
6449
                goto endjob;
C
Chris Lalancette 已提交
6450 6451 6452 6453 6454 6455
        }

        if (snap->def->state == VIR_DOMAIN_PAUSED) {
            /* qemu unconditionally starts the domain running again after
             * loadvm, so let's pause it to keep consistency
             */
6456
            rc = qemuProcessStopCPUs(driver, vm);
H
Hu Tao 已提交
6457
            if (rc < 0)
6458
                goto endjob;
C
Chris Lalancette 已提交
6459 6460 6461 6462 6463 6464 6465 6466 6467 6468 6469 6470 6471 6472 6473 6474 6475 6476
        }

        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)) {
6477
            qemuProcessStop(driver, vm, 0);
6478
            qemuAuditDomainStop(vm, "from-snapshot");
C
Chris Lalancette 已提交
6479 6480 6481
            event = virDomainEventNewFromObj(vm,
                                             VIR_DOMAIN_EVENT_STOPPED,
                                             VIR_DOMAIN_EVENT_STOPPED_FROM_SNAPSHOT);
6482 6483 6484 6485
            if (!vm->persistent) {
                if (qemuDomainObjEndJob(vm) > 0)
                    virDomainRemoveInactive(&driver->domains, vm);
                vm = NULL;
6486
                goto cleanup;
6487
            }
C
Chris Lalancette 已提交
6488 6489
        }

6490
        if (qemuDomainSnapshotSetCurrentActive(vm, driver->snapshotDir) < 0)
6491
            goto endjob;
C
Chris Lalancette 已提交
6492 6493 6494 6495 6496 6497
    }

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

    ret = 0;

6498
endjob:
C
Chris Lalancette 已提交
6499 6500 6501
    if (vm && qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

6502
cleanup:
C
Chris Lalancette 已提交
6503 6504 6505 6506 6507 6508 6509 6510 6511 6512 6513 6514 6515 6516 6517 6518 6519 6520 6521 6522 6523 6524 6525 6526 6527 6528 6529 6530 6531 6532 6533 6534 6535 6536 6537 6538 6539 6540 6541 6542 6543 6544 6545 6546 6547 6548 6549 6550 6551 6552 6553 6554 6555 6556 6557 6558 6559 6560 6561 6562 6563 6564 6565 6566 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
    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,
6605
                                              const void *name ATTRIBUTE_UNUSED,
C
Chris Lalancette 已提交
6606 6607 6608 6609 6610 6611 6612 6613 6614 6615 6616 6617 6618 6619 6620 6621 6622 6623 6624 6625 6626
                                              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);
    }
}

6627 6628 6629 6630 6631 6632 6633 6634 6635
struct snap_reparent {
    struct qemud_driver *driver;
    virDomainSnapshotObjPtr snap;
    virDomainObjPtr vm;
    int err;
};

static void
qemuDomainSnapshotReparentChildren(void *payload,
6636
                                   const void *name ATTRIBUTE_UNUSED,
6637 6638 6639 6640 6641 6642 6643 6644 6645 6646 6647 6648 6649 6650 6651 6652 6653 6654 6655 6656 6657 6658 6659 6660 6661 6662 6663
                                   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 已提交
6664 6665 6666 6667 6668 6669 6670 6671 6672
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;
6673
    struct snap_reparent rep;
C
Chris Lalancette 已提交
6674

6675 6676
    virCheckFlags(VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN, -1);

C
Chris Lalancette 已提交
6677 6678 6679 6680 6681 6682 6683 6684 6685 6686 6687 6688 6689 6690 6691 6692 6693
    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;
    }

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

C
Chris Lalancette 已提交
6697 6698 6699 6700 6701 6702 6703 6704
    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)
6705
            goto endjob;
6706 6707 6708 6709 6710 6711 6712 6713 6714
    } 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 已提交
6715 6716 6717 6718
    }

    ret = qemuDomainSnapshotDiscard(driver, vm, snap);

6719 6720 6721 6722
endjob:
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

C
Chris Lalancette 已提交
6723 6724 6725 6726 6727 6728
cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}
6729

6730 6731 6732 6733 6734 6735 6736
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;
6737
    bool hmp;
6738

6739
    virCheckFlags(VIR_DOMAIN_QEMU_MONITOR_COMMAND_HMP, -1);
6740 6741 6742 6743 6744 6745 6746 6747 6748 6749 6750 6751 6752 6753 6754 6755 6756 6757 6758 6759 6760 6761 6762 6763 6764

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

6765 6766
    hmp = !!(flags & VIR_DOMAIN_QEMU_MONITOR_COMMAND_HMP);

6767 6768 6769
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
6770
    ret = qemuMonitorArbitraryCommand(priv->mon, cmd, result, hmp);
6771 6772 6773 6774 6775 6776 6777 6778 6779 6780 6781 6782 6783
    qemuDomainObjExitMonitorWithDriver(driver, vm);
    if (qemuDomainObjEndJob(vm) == 0) {
        vm = NULL;
        goto cleanup;
    }

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

6784 6785 6786 6787 6788 6789 6790 6791 6792 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 6818 6819 6820 6821 6822 6823 6824 6825 6826 6827 6828 6829 6830 6831 6832 6833 6834 6835 6836 6837 6838 6839 6840

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

6841
    if (chr->source.type != VIR_DOMAIN_CHR_TYPE_PTY) {
6842 6843 6844 6845 6846 6847
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("character device %s is not using a PTY"),
                        NULLSTR(devname));
        goto cleanup;
    }

6848
    if (virFDStreamOpenFile(st, chr->source.data.file.path, O_RDWR) < 0)
6849 6850 6851 6852 6853 6854 6855 6856 6857 6858 6859
        goto cleanup;

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


6860 6861 6862 6863 6864
static virDriver qemuDriver = {
    VIR_DRV_QEMU,
    "QEMU",
    qemudOpen, /* open */
    qemudClose, /* close */
D
Daniel Veillard 已提交
6865
    qemudSupportsFeature, /* supports_feature */
6866 6867
    qemudGetType, /* type */
    qemudGetVersion, /* version */
6868
    NULL, /* libvirtVersion (impl. in libvirt.c) */
6869
    virGetHostname, /* getHostname */
E
Eric Blake 已提交
6870
    qemuGetSysinfo, /* getSysinfo */
6871
    qemudGetMaxVCPUs, /* getMaxVcpus */
6872
    nodeGetInfo, /* nodeGetInfo */
6873 6874 6875
    qemudGetCapabilities, /* getCapabilities */
    qemudListDomains, /* listDomains */
    qemudNumDomains, /* numOfDomains */
6876
    qemudDomainCreate, /* domainCreateXML */
6877 6878 6879 6880 6881
    qemudDomainLookupByID, /* domainLookupByID */
    qemudDomainLookupByUUID, /* domainLookupByUUID */
    qemudDomainLookupByName, /* domainLookupByName */
    qemudDomainSuspend, /* domainSuspend */
    qemudDomainResume, /* domainResume */
6882
    qemudDomainShutdown, /* domainShutdown */
6883 6884 6885
    NULL, /* domainReboot */
    qemudDomainDestroy, /* domainDestroy */
    qemudDomainGetOSType, /* domainGetOSType */
6886
    qemudDomainGetMaxMemory, /* domainGetMaxMemory */
6887
    NULL, /* domainSetMaxMemory */
6888
    qemudDomainSetMemory, /* domainSetMemory */
6889
    qemudDomainSetMemoryFlags, /* domainSetMemoryFlags */
6890 6891 6892
    qemudDomainGetInfo, /* domainGetInfo */
    qemudDomainSave, /* domainSave */
    qemudDomainRestore, /* domainRestore */
P
Paolo Bonzini 已提交
6893
    qemudDomainCoreDump, /* domainCoreDump */
6894
    qemudDomainSetVcpus, /* domainSetVcpus */
6895 6896
    qemudDomainSetVcpusFlags, /* domainSetVcpusFlags */
    qemudDomainGetVcpusFlags, /* domainGetVcpusFlags */
6897 6898
    qemudDomainPinVcpu, /* domainPinVcpu */
    qemudDomainGetVcpus, /* domainGetVcpus */
6899
    qemudDomainGetMaxVcpus, /* domainGetMaxVcpus */
6900 6901
    qemudDomainGetSecurityLabel, /* domainGetSecurityLabel */
    qemudNodeGetSecurityModel, /* nodeGetSecurityModel */
6902
    qemudDomainDumpXML, /* domainDumpXML */
6903
    qemuDomainXMLFromNative, /* domainXmlFromNative */
6904
    qemuDomainXMLToNative, /* domainXMLToNative */
6905 6906
    qemudListDefinedDomains, /* listDefinedDomains */
    qemudNumDefinedDomains, /* numOfDefinedDomains */
6907
    qemudDomainStart, /* domainCreate */
6908
    qemudDomainStartWithFlags, /* domainCreateWithFlags */
6909 6910
    qemudDomainDefine, /* domainDefineXML */
    qemudDomainUndefine, /* domainUndefine */
6911
    qemudDomainAttachDevice, /* domainAttachDevice */
6912
    qemudDomainAttachDeviceFlags, /* domainAttachDeviceFlags */
6913
    qemudDomainDetachDevice, /* domainDetachDevice */
6914
    qemudDomainDetachDeviceFlags, /* domainDetachDeviceFlags */
6915
    qemuDomainUpdateDeviceFlags, /* domainUpdateDeviceFlags */
6916 6917
    qemudDomainGetAutostart, /* domainGetAutostart */
    qemudDomainSetAutostart, /* domainSetAutostart */
6918 6919 6920
    qemuGetSchedulerType, /* domainGetSchedulerType */
    qemuGetSchedulerParameters, /* domainGetSchedulerParameters */
    qemuSetSchedulerParameters, /* domainSetSchedulerParameters */
D
Daniel Veillard 已提交
6921 6922
    NULL, /* domainMigratePrepare (v1) */
    qemudDomainMigratePerform, /* domainMigratePerform */
6923
    NULL, /* domainMigrateFinish */
6924
    qemudDomainBlockStats, /* domainBlockStats */
6925
    qemudDomainInterfaceStats, /* domainInterfaceStats */
6926
    qemudDomainMemoryStats, /* domainMemoryStats */
6927
    qemudDomainBlockPeek, /* domainBlockPeek */
R
Richard W.M. Jones 已提交
6928
    qemudDomainMemoryPeek, /* domainMemoryPeek */
6929
    qemuDomainGetBlockInfo, /* domainGetBlockInfo */
6930 6931
    nodeGetCellsFreeMemory, /* nodeGetCellsFreeMemory */
    nodeGetFreeMemory,  /* getFreeMemory */
6932 6933
    qemuDomainEventRegister, /* domainEventRegister */
    qemuDomainEventDeregister, /* domainEventDeregister */
D
Daniel Veillard 已提交
6934 6935
    qemudDomainMigratePrepare2, /* domainMigratePrepare2 */
    qemudDomainMigrateFinish2, /* domainMigrateFinish2 */
6936 6937 6938
    qemudNodeDeviceDettach, /* nodeDeviceDettach */
    qemudNodeDeviceReAttach, /* nodeDeviceReAttach */
    qemudNodeDeviceReset, /* nodeDeviceReset */
C
Chris Lalancette 已提交
6939
    qemudDomainMigratePrepareTunnel, /* domainMigratePrepareTunnel */
6940 6941 6942 6943
    qemuIsEncrypted, /* isEncrypted */
    qemuIsSecure, /* isSecure */
    qemuDomainIsActive, /* domainIsActive */
    qemuDomainIsPersistent, /* domainIsPersistent */
6944
    qemuDomainIsUpdated, /* domainIsUpdated */
6945
    qemuCPUCompare, /* cpuCompare */
6946
    qemuCPUBaseline, /* cpuBaseline */
6947
    qemuDomainGetJobInfo, /* domainGetJobInfo */
6948
    qemuDomainAbortJob, /* domainAbortJob */
6949
    qemuDomainMigrateSetMaxDowntime, /* domainMigrateSetMaxDowntime */
6950 6951
    qemuDomainEventRegisterAny, /* domainEventRegisterAny */
    qemuDomainEventDeregisterAny, /* domainEventDeregisterAny */
6952 6953 6954
    qemuDomainManagedSave, /* domainManagedSave */
    qemuDomainHasManagedSaveImage, /* domainHasManagedSaveImage */
    qemuDomainManagedSaveRemove, /* domainManagedSaveRemove */
C
Chris Lalancette 已提交
6955 6956 6957 6958 6959 6960 6961 6962 6963
    qemuDomainSnapshotCreateXML, /* domainSnapshotCreateXML */
    qemuDomainSnapshotDumpXML, /* domainSnapshotDumpXML */
    qemuDomainSnapshotNum, /* domainSnapshotNum */
    qemuDomainSnapshotListNames, /* domainSnapshotListNames */
    qemuDomainSnapshotLookupByName, /* domainSnapshotLookupByName */
    qemuDomainHasCurrentSnapshot, /* domainHasCurrentSnapshot */
    qemuDomainSnapshotCurrent, /* domainSnapshotCurrent */
    qemuDomainRevertToSnapshot, /* domainRevertToSnapshot */
    qemuDomainSnapshotDelete, /* domainSnapshotDelete */
6964
    qemuDomainMonitorCommand, /* qemuDomainMonitorCommand */
6965
    qemuDomainSetMemoryParameters, /* domainSetMemoryParameters */
6966
    qemuDomainGetMemoryParameters, /* domainGetMemoryParameters */
6967
    qemuDomainOpenConsole, /* domainOpenConsole */
6968 6969 6970
};


6971
static virStateDriver qemuStateDriver = {
6972
    .name = "QEMU",
6973 6974 6975 6976
    .initialize = qemudStartup,
    .cleanup = qemudShutdown,
    .reload = qemudReload,
    .active = qemudActive,
6977
};
6978

6979
static void
6980
qemuVMDriverLock(void) {
6981 6982 6983 6984 6985
    qemuDriverLock(qemu_driver);
};


static void
6986
qemuVMDriverUnlock(void) {
6987 6988 6989 6990
    qemuDriverUnlock(qemu_driver);
};


6991 6992 6993 6994 6995 6996 6997 6998 6999
static int
qemuVMFilterRebuild(virConnectPtr conn ATTRIBUTE_UNUSED,
                    virHashIterator iter, void *data)
{
    virHashForEach(qemu_driver->domains.objs, iter, data);

    return 0;
}

S
Stefan Berger 已提交
7000 7001
static virNWFilterCallbackDriver qemuCallbackDriver = {
    .name = "QEMU",
7002 7003 7004
    .vmFilterRebuild = qemuVMFilterRebuild,
    .vmDriverLock = qemuVMDriverLock,
    .vmDriverUnlock = qemuVMDriverUnlock,
S
Stefan Berger 已提交
7005 7006
};

7007
int qemuRegister(void) {
7008 7009
    virRegisterDriver(&qemuDriver);
    virRegisterStateDriver(&qemuStateDriver);
S
Stefan Berger 已提交
7010
    virNWFilterRegisterCallbackDriver(&qemuCallbackDriver);
7011 7012
    return 0;
}