qemu_driver.c 208.5 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
}

static int qemudDomainSetMemory(virDomainPtr dom, unsigned long newmem) {
1572
    struct qemud_driver *driver = dom->conn->privateData;
1573
    qemuDomainObjPrivatePtr priv;
1574
    virDomainObjPtr vm;
1575
    int ret = -1, r;
1576

1577
    qemuDriverLock(driver);
1578
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1579
    qemuDriverUnlock(driver);
1580
    if (!vm) {
1581 1582
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1583 1584
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1585
        goto cleanup;
1586 1587
    }

1588
    if (newmem > vm->def->mem.max_balloon) {
1589 1590
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("cannot set memory higher than max memory"));
1591
        goto cleanup;
1592 1593
    }

1594 1595 1596
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

1597 1598 1599 1600 1601 1602
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }

1603 1604 1605 1606
    priv = vm->privateData;
    qemuDomainObjEnterMonitor(vm);
    r = qemuMonitorSetBalloon(priv->mon, newmem);
    qemuDomainObjExitMonitor(vm);
1607
    qemuAuditMemory(vm, vm->def->mem.cur_balloon, newmem, "update", r == 1);
1608 1609
    if (r < 0)
        goto endjob;
1610

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

1618
    ret = 0;
1619
endjob:
1620 1621
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
1622

1623
cleanup:
1624 1625
    if (vm)
        virDomainObjUnlock(vm);
1626
    return ret;
1627 1628
}

1629
static int qemudDomainGetInfo(virDomainPtr dom,
1630
                              virDomainInfoPtr info) {
1631 1632 1633
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
1634 1635
    int err;
    unsigned long balloon;
1636

1637
    qemuDriverLock(driver);
1638
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
1639
    qemuDriverUnlock(driver);
D
Daniel P. Berrange 已提交
1640
    if (!vm) {
1641 1642
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
1643 1644
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
1645
        goto cleanup;
D
Daniel P. Berrange 已提交
1646 1647
    }

1648
    info->state = vm->state;
D
Daniel P. Berrange 已提交
1649

D
Daniel P. Berrange 已提交
1650
    if (!virDomainObjIsActive(vm)) {
1651
        info->cpuTime = 0;
D
Daniel P. Berrange 已提交
1652
    } else {
1653
        if (qemudGetProcessInfo(&(info->cpuTime), NULL, vm->pid, 0) < 0) {
E
Eric Blake 已提交
1654 1655
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("cannot read cputime for domain"));
1656
            goto cleanup;
D
Daniel P. Berrange 已提交
1657 1658 1659
        }
    }

1660
    info->maxMem = vm->def->mem.max_balloon;
1661

D
Daniel P. Berrange 已提交
1662
    if (virDomainObjIsActive(vm)) {
1663
        qemuDomainObjPrivatePtr priv = vm->privateData;
1664 1665 1666

        if ((vm->def->memballoon != NULL) &&
            (vm->def->memballoon->model == VIR_DOMAIN_MEMBALLOON_MODEL_NONE)) {
1667
            info->memory = vm->def->mem.max_balloon;
1668
        } else if (!priv->jobActive) {
1669 1670
            if (qemuDomainObjBeginJob(vm) < 0)
                goto cleanup;
1671 1672 1673 1674 1675 1676 1677 1678 1679
            if (!virDomainObjIsActive(vm))
                err = 0;
            else {
                qemuDomainObjEnterMonitor(vm);
                err = qemuMonitorGetBalloonInfo(priv->mon, &balloon);
                qemuDomainObjExitMonitor(vm);
            }
            if (qemuDomainObjEndJob(vm) == 0) {
                vm = NULL;
1680 1681 1682
                goto cleanup;
            }

1683 1684
            if (err < 0)
                goto cleanup;
1685 1686
            if (err == 0)
                /* Balloon not supported, so maxmem is always the allocation */
1687
                info->memory = vm->def->mem.max_balloon;
1688 1689 1690
            else
                info->memory = balloon;
        } else {
1691
            info->memory = vm->def->mem.cur_balloon;
1692
        }
1693
    } else {
1694
        info->memory = vm->def->mem.cur_balloon;
1695 1696
    }

1697
    info->nrVirtCpu = vm->def->vcpus;
1698 1699 1700
    ret = 0;

cleanup:
1701 1702
    if (vm)
        virDomainObjUnlock(vm);
1703
    return ret;
D
Daniel P. Berrange 已提交
1704 1705 1706
}


1707
#define QEMUD_SAVE_MAGIC "LibvirtQemudSave"
1708 1709 1710
#define QEMUD_SAVE_VERSION 2

enum qemud_save_formats {
1711 1712 1713
    QEMUD_SAVE_FORMAT_RAW = 0,
    QEMUD_SAVE_FORMAT_GZIP = 1,
    QEMUD_SAVE_FORMAT_BZIP2 = 2,
1714 1715
    /*
     * Deprecated by xz and never used as part of a release
1716
     * QEMUD_SAVE_FORMAT_LZMA
1717 1718
     */
    QEMUD_SAVE_FORMAT_XZ = 3,
1719
    QEMUD_SAVE_FORMAT_LZOP = 4,
1720 1721 1722
    /* Note: add new members only at the end.
       These values are used in the on-disk format.
       Do not change or re-use numbers. */
1723 1724

    QEMUD_SAVE_FORMAT_LAST
1725
};
1726

1727 1728 1729 1730 1731
VIR_ENUM_DECL(qemudSaveCompression)
VIR_ENUM_IMPL(qemudSaveCompression, QEMUD_SAVE_FORMAT_LAST,
              "raw",
              "gzip",
              "bzip2",
1732 1733
              "xz",
              "lzop")
1734

1735 1736 1737 1738 1739
struct qemud_save_header {
    char magic[sizeof(QEMUD_SAVE_MAGIC)-1];
    int version;
    int xml_len;
    int was_running;
1740 1741
    int compressed;
    int unused[15];
1742 1743
};

1744 1745 1746 1747 1748 1749 1750
struct fileOpHookData {
    virDomainPtr dom;
    const char *path;
    char *xml;
    struct qemud_save_header *header;
};

1751
/* return -errno on failure, or 0 on success */
1752 1753 1754 1755 1756
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)) {
1757
        ret = -errno;
1758
        qemuReportError(VIR_ERR_OPERATION_FAILED,
1759 1760
                        _("failed to write header to domain save file '%s'"),
                        hdata->path);
1761 1762 1763 1764
        goto endjob;
    }

    if (safewrite(fd, hdata->xml, hdata->header->xml_len) != hdata->header->xml_len) {
1765
        ret = -errno;
1766 1767 1768 1769 1770 1771 1772 1773
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                         _("failed to write xml to '%s'"), hdata->path);
        goto endjob;
    }
endjob:
    return ret;
}

1774 1775 1776
/* This internal function expects the driver lock to already be held on
 * entry and the vm must be active.
 */
1777 1778
static int qemudDomainSaveFlag(struct qemud_driver *driver, virDomainPtr dom,
                               virDomainObjPtr vm, const char *path,
1779
                               int compressed)
1780
{
1781
    char *xml = NULL;
1782
    struct qemud_save_header header;
1783 1784
    struct fileOpHookData hdata;
    int bypassSecurityDriver = 0;
1785
    int ret = -1;
1786
    int rc;
1787
    virDomainEventPtr event = NULL;
1788
    qemuDomainObjPrivatePtr priv;
1789 1790
    struct stat sb;
    int is_reg = 0;
1791
    unsigned long long offset;
1792
    virCgroupPtr cgroup = NULL;
1793 1794 1795 1796 1797

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

1798
    header.compressed = compressed;
1799

1800
    priv = vm->privateData;
1801

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

O
Osier Yang 已提交
1805 1806
    priv->jobActive = QEMU_JOB_SAVE;

1807 1808 1809
    memset(&priv->jobInfo, 0, sizeof(priv->jobInfo));
    priv->jobInfo.type = VIR_DOMAIN_JOB_UNBOUNDED;

1810 1811 1812
    /* Pause */
    if (vm->state == VIR_DOMAIN_RUNNING) {
        header.was_running = 1;
1813
        if (qemuProcessStopCPUs(driver, vm) < 0)
1814
            goto endjob;
1815 1816 1817 1818 1819 1820

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

    /* Get XML for the domain */
1824
    xml = virDomainDefFormat(vm->def, VIR_DOMAIN_XML_SECURE);
1825
    if (!xml) {
1826 1827
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to get domain xml"));
1828
        goto endjob;
1829 1830 1831
    }
    header.xml_len = strlen(xml) + 1;

1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844
    /* 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);
    }

1845 1846 1847 1848 1849
    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
1850 1851
     * it by padding the XML string with NULLs.
     */
1852 1853 1854 1855 1856 1857 1858 1859 1860 1861 1862 1863 1864
    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;
    }
1865

1866 1867 1868 1869 1870 1871
    /* Setup hook data needed by virFileOperation hook function */
    hdata.dom = dom;
    hdata.path = path;
    hdata.xml = xml;
    hdata.header = &header;

1872 1873
    /* Write header to file, followed by XML */

1874
    /* First try creating the file as root */
1875 1876 1877 1878
    if (!is_reg) {
        int fd = open(path, O_WRONLY | O_TRUNC);
        if (fd < 0) {
            virReportSystemError(errno, _("unable to open %s"), path);
1879 1880
            goto endjob;
        }
1881
        if (qemudDomainSaveFileOpHook(fd, &hdata) < 0) {
1882
            VIR_FORCE_CLOSE(fd);
1883 1884
            goto endjob;
        }
1885
        if (VIR_CLOSE(fd) < 0) {
1886
            virReportSystemError(errno, _("unable to close %s"), path);
1887 1888
            goto endjob;
        }
1889 1890 1891 1892 1893
    } else {
        if ((rc = virFileOperation(path, O_CREAT|O_TRUNC|O_WRONLY,
                                  S_IRUSR|S_IWUSR,
                                  getuid(), getgid(),
                                  qemudDomainSaveFileOpHook, &hdata,
1894
                                  0)) < 0) {
1895
            /* If we failed as root, and the error was permission-denied
1896 1897
               (EACCES or EPERM), assume it's on a network-connected share
               where root access is restricted (eg, root-squashed NFS). If the
1898 1899 1900 1901
               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 */

1902
            if (((rc != -EACCES) && (rc != -EPERM)) ||
1903
                driver->user == getuid()) {
1904
                virReportSystemError(-rc, _("Failed to create domain save file '%s'"),
1905 1906 1907
                                     path);
                goto endjob;
            }
1908

1909
            /* On Linux we can also verify the FS-type of the directory. */
1910 1911 1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 1923 1924 1925 1926 1927
            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 */
1928
                   virReportSystemError(-rc,
1929 1930 1931 1932
                                        _("Failed to create domain save file '%s'"),
                                        path);
                   goto endjob;
                   break;
1933 1934 1935

            }

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

1938 1939 1940 1941
            if ((rc = virFileOperation(path, O_CREAT|O_TRUNC|O_WRONLY,
                                       S_IRUSR|S_IWUSR|S_IRGRP|S_IWGRP,
                                       driver->user, driver->group,
                                       qemudDomainSaveFileOpHook, &hdata,
1942 1943
                                       VIR_FILE_OP_AS_UID)) < 0) {
                virReportSystemError(-rc, _("Error from child process creating '%s'"),
1944
                                 path);
1945 1946
                goto endjob;
            }
1947

1948 1949 1950
            /* 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 */
1951

1952 1953
            bypassSecurityDriver = 1;
        }
1954
    }
1955

1956

1957 1958 1959 1960
    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 已提交
1961
                            _("Unable to find cgroup for %s"),
1962 1963 1964
                            vm->def->name);
            goto endjob;
        }
1965 1966
        rc = virCgroupAllowDevicePath(cgroup, path,
                                      VIR_CGROUP_DEVICE_RW);
1967
        qemuAuditCgroupPath(vm, cgroup, "allow", path, rc);
1968
        if (rc < 0) {
1969 1970 1971 1972 1973 1974 1975
            virReportSystemError(-rc,
                                 _("Unable to allow device %s for %s"),
                                 path, vm->def->name);
            goto endjob;
        }
    }

1976
    if ((!bypassSecurityDriver) &&
1977 1978
        virSecurityManagerSetSavedStateLabel(driver->securityManager,
                                             vm, path) < 0)
1979 1980
        goto endjob;

1981 1982
    if (header.compressed == QEMUD_SAVE_FORMAT_RAW) {
        const char *args[] = { "cat", NULL };
M
Matthias Bolte 已提交
1983
        qemuDomainObjEnterMonitorWithDriver(driver, vm);
1984 1985 1986
        rc = qemuMonitorMigrateToFile(priv->mon,
                                      QEMU_MONITOR_MIGRATE_BACKGROUND,
                                      args, path, offset);
M
Matthias Bolte 已提交
1987
        qemuDomainObjExitMonitorWithDriver(driver, vm);
1988
    } else {
1989
        const char *prog = qemudSaveCompressionTypeToString(header.compressed);
1990 1991 1992 1993 1994
        const char *args[] = {
            prog,
            "-c",
            NULL
        };
M
Matthias Bolte 已提交
1995
        qemuDomainObjEnterMonitorWithDriver(driver, vm);
1996 1997 1998
        rc = qemuMonitorMigrateToFile(priv->mon,
                                      QEMU_MONITOR_MIGRATE_BACKGROUND,
                                      args, path, offset);
M
Matthias Bolte 已提交
1999
        qemuDomainObjExitMonitorWithDriver(driver, vm);
2000 2001
    }

2002 2003 2004
    if (rc < 0)
        goto endjob;

2005
    rc = qemuMigrationWaitForCompletion(driver, vm);
2006

2007
    if (rc < 0)
2008
        goto endjob;
2009

2010
    if ((!bypassSecurityDriver) &&
2011 2012
        virSecurityManagerRestoreSavedStateLabel(driver->securityManager,
                                                 vm, path) < 0)
2013
        VIR_WARN("failed to restore save state label on %s", path);
2014

2015
    if (cgroup != NULL) {
2016 2017
        rc = virCgroupDenyDevicePath(cgroup, path,
                                     VIR_CGROUP_DEVICE_RWM);
2018
        qemuAuditCgroupPath(vm, cgroup, "deny", path, rc);
2019
        if (rc < 0)
2020 2021
            VIR_WARN("Unable to deny device %s for %s %d",
                     path, vm->def->name, rc);
2022 2023
    }

2024 2025
    ret = 0;

2026
    /* Shut it down */
2027
    qemuProcessStop(driver, vm, 0);
2028
    qemuAuditDomainStop(vm, "saved");
2029 2030 2031
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STOPPED,
                                     VIR_DOMAIN_EVENT_STOPPED_SAVED);
2032
    if (!vm->persistent) {
2033 2034 2035
        if (qemuDomainObjEndJob(vm) > 0)
            virDomainRemoveInactive(&driver->domains,
                                    vm);
2036 2037
        vm = NULL;
    }
2038

2039
endjob:
2040
    if (vm) {
2041
        if (ret != 0) {
2042
            if (header.was_running && virDomainObjIsActive(vm)) {
2043
                rc = qemuProcessStartCPUs(driver, vm, dom->conn);
2044 2045 2046
                if (rc < 0)
                    VIR_WARN0("Unable to resume guest CPUs after save failure");
            }
2047

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

            if ((!bypassSecurityDriver) &&
2058 2059
                virSecurityManagerRestoreSavedStateLabel(driver->securityManager,
                                                         vm, path) < 0)
2060
                VIR_WARN("failed to restore save state label on %s", path);
2061 2062
        }

2063
        if (qemuDomainObjEndJob(vm) == 0)
2064
            vm = NULL;
2065
    }
2066

2067 2068
cleanup:
    VIR_FREE(xml);
2069
    if (ret != 0 && is_reg)
2070
        unlink(path);
2071 2072
    if (event)
        qemuDomainEventQueue(driver, event);
2073
    virCgroupFree(&cgroup);
2074
    return ret;
D
Daniel P. Berrange 已提交
2075 2076
}

2077 2078 2079 2080 2081 2082 2083 2084 2085 2086 2087 2088 2089 2090 2091 2092
/* 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;
}

2093 2094 2095 2096
static int qemudDomainSave(virDomainPtr dom, const char *path)
{
    struct qemud_driver *driver = dom->conn->privateData;
    int compressed;
2097 2098 2099 2100
    int ret = -1;
    virDomainObjPtr vm = NULL;

    qemuDriverLock(driver);
2101 2102 2103 2104 2105 2106 2107 2108 2109 2110 2111

    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;
        }
2112 2113 2114 2115 2116 2117
        if (!qemudCompressProgramAvailable(compressed)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("Compression program for image format "
                                    "in configuration file isn't available"));
            return -1;
        }
2118 2119
    }

2120 2121 2122 2123 2124 2125 2126 2127 2128
    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;
    }

2129 2130 2131 2132 2133 2134
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

2135 2136 2137 2138 2139 2140 2141 2142
    ret = qemudDomainSaveFlag(driver, dom, vm, path, compressed);

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

    return ret;
2143 2144 2145 2146 2147 2148 2149 2150 2151 2152 2153 2154 2155 2156 2157 2158 2159 2160 2161 2162 2163 2164 2165
}

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;

2166
    virCheckFlags(0, -1);
2167 2168 2169 2170 2171 2172 2173 2174

    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);
2175
        goto cleanup;
2176 2177
    }

2178 2179 2180 2181 2182 2183
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

2184 2185
    name = qemuDomainManagedSavePath(driver, vm);
    if (name == NULL)
2186
        goto cleanup;
2187 2188 2189 2190

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

    compressed = QEMUD_SAVE_FORMAT_RAW;
2191
    ret = qemudDomainSaveFlag(driver, dom, vm, name, compressed);
2192 2193 2194 2195 2196

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
2197 2198 2199
    VIR_FREE(name);

    return ret;
2200 2201 2202 2203 2204 2205 2206 2207 2208 2209
}

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

2210
    virCheckFlags(0, -1);
2211 2212 2213 2214 2215 2216 2217 2218 2219 2220 2221 2222 2223 2224 2225 2226 2227 2228 2229 2230 2231 2232 2233 2234 2235 2236 2237 2238 2239 2240 2241 2242 2243

    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;

2244
    virCheckFlags(0, -1);
2245 2246 2247 2248 2249 2250 2251 2252 2253 2254 2255 2256 2257 2258 2259 2260 2261 2262 2263 2264 2265 2266 2267 2268

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

H
Hu Tao 已提交
2270 2271 2272 2273 2274 2275 2276 2277 2278 2279 2280 2281 2282 2283 2284 2285 2286 2287 2288 2289 2290 2291 2292 2293 2294
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;
    }

2295 2296
    if (virSecurityManagerSetSavedStateLabel(driver->securityManager,
                                             vm, path) < 0)
H
Hu Tao 已提交
2297 2298 2299 2300 2301 2302 2303 2304 2305 2306 2307 2308 2309 2310 2311 2312 2313 2314 2315 2316 2317 2318 2319 2320 2321 2322
        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;

2323
    ret = qemuMigrationWaitForCompletion(driver, vm);
H
Hu Tao 已提交
2324 2325 2326 2327

    if (ret < 0)
        goto cleanup;

2328 2329
    if (virSecurityManagerRestoreSavedStateLabel(driver->securityManager,
                                                 vm, path) < 0)
H
Hu Tao 已提交
2330 2331 2332 2333 2334 2335 2336 2337
        goto cleanup;

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

2338 2339 2340 2341 2342
static enum qemud_save_formats
getCompressionType(struct qemud_driver *driver)
{
    int compress = QEMUD_SAVE_FORMAT_RAW;

2343 2344 2345 2346 2347 2348 2349
    /*
     * 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) {
2350 2351 2352 2353
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("Invalid dump image format specified in "
                              "configuration file, using raw"));
            return QEMUD_SAVE_FORMAT_RAW;
2354
        }
2355 2356 2357
        if (!qemudCompressProgramAvailable(compress)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("Compression program for dump image format "
2358 2359 2360
                                    "in configuration file isn't available, "
                                    "using raw"));
            return QEMUD_SAVE_FORMAT_RAW;
2361
        }
2362
    }
2363 2364 2365 2366 2367 2368 2369 2370 2371
    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 已提交
2372
    int ret = -1;
2373 2374 2375
    virDomainEventPtr event = NULL;
    qemuDomainObjPrivatePtr priv;

P
Paolo Bonzini 已提交
2376 2377 2378 2379 2380 2381
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
2382 2383
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
P
Paolo Bonzini 已提交
2384 2385
        goto cleanup;
    }
2386
    priv = vm->privateData;
P
Paolo Bonzini 已提交
2387

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

D
Daniel P. Berrange 已提交
2391
    if (!virDomainObjIsActive(vm)) {
2392 2393
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
2394
        goto endjob;
P
Paolo Bonzini 已提交
2395 2396
    }

O
Osier Yang 已提交
2397 2398
    priv->jobActive = QEMU_JOB_DUMP;

P
Paolo Bonzini 已提交
2399 2400
    /* Migrate will always stop the VM, so the resume condition is
       independent of whether the stop command is issued.  */
P
Paolo Bonzini 已提交
2401 2402 2403
    resume = (vm->state == VIR_DOMAIN_RUNNING);

    /* Pause domain for non-live dump */
P
Paolo Bonzini 已提交
2404
    if (!(flags & VIR_DUMP_LIVE) && vm->state == VIR_DOMAIN_RUNNING) {
2405
        if (qemuProcessStopCPUs(driver, vm) < 0)
2406
            goto endjob;
P
Paolo Bonzini 已提交
2407
        paused = 1;
2408 2409 2410 2411 2412 2413

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

H
Hu Tao 已提交
2416
    ret = doCoreDump(driver, vm, path, getCompressionType(driver));
2417 2418 2419 2420
    if (ret < 0)
        goto endjob;

    paused = 1;
2421 2422

endjob:
2423
    if ((ret == 0) && (flags & VIR_DUMP_CRASH)) {
2424
        qemuProcessStop(driver, vm, 0);
2425
        qemuAuditDomainStop(vm, "crashed");
2426 2427 2428 2429 2430
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_STOPPED,
                                         VIR_DOMAIN_EVENT_STOPPED_CRASHED);
    }

P
Paolo Bonzini 已提交
2431 2432 2433
    /* 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.  */
2434
    else if (resume && paused && virDomainObjIsActive(vm)) {
2435
        if (qemuProcessStartCPUs(driver, vm, dom->conn) < 0) {
2436
            if (virGetLastError() == NULL)
2437 2438
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("resuming after dump failed"));
P
Paolo Bonzini 已提交
2439 2440
        }
    }
2441

2442 2443
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
2444
    else if ((ret == 0) && (flags & VIR_DUMP_CRASH) && !vm->persistent) {
2445 2446 2447 2448
        virDomainRemoveInactive(&driver->domains,
                                vm);
        vm = NULL;
    }
2449 2450

cleanup:
P
Paolo Bonzini 已提交
2451 2452
    if (vm)
        virDomainObjUnlock(vm);
2453 2454
    if (event)
        qemuDomainEventQueue(driver, event);
2455
    qemuDriverUnlock(driver);
P
Paolo Bonzini 已提交
2456 2457 2458
    return ret;
}

H
Hu Tao 已提交
2459 2460 2461
static void processWatchdogEvent(void *data, void *opaque)
{
    int ret;
2462
    struct qemuDomainWatchdogEvent *wdEvent = data;
H
Hu Tao 已提交
2463 2464 2465 2466 2467 2468 2469
    struct qemud_driver *driver = opaque;

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

E
Eric Blake 已提交
2470
            if (virAsprintf(&dumpfile, "%s/%s-%u",
H
Hu Tao 已提交
2471 2472
                            driver->autoDumpPath,
                            wdEvent->vm->def->name,
E
Eric Blake 已提交
2473 2474 2475 2476
                            (unsigned int)time(NULL)) < 0) {
                virReportOOMError();
                break;
            }
H
Hu Tao 已提交
2477 2478 2479 2480 2481 2482 2483 2484 2485 2486 2487 2488 2489 2490 2491 2492 2493 2494 2495 2496 2497

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

2498
            ret = qemuProcessStartCPUs(driver, wdEvent->vm, NULL);
H
Hu Tao 已提交
2499 2500 2501 2502 2503 2504 2505 2506 2507 2508 2509 2510 2511 2512 2513 2514 2515

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

2517 2518 2519
static int qemudDomainHotplugVcpus(virDomainObjPtr vm, unsigned int nvcpus)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
2520
    int i, rc = 1;
2521
    int ret = -1;
2522
    int oldvcpus = vm->def->vcpus;
2523

2524 2525
    qemuDomainObjEnterMonitor(vm);

2526 2527 2528 2529 2530 2531 2532 2533 2534 2535 2536 2537 2538 2539 2540 2541 2542 2543 2544 2545 2546 2547 2548 2549 2550 2551 2552 2553 2554 2555
    /* 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:
2556
    qemuDomainObjExitMonitor(vm);
2557
    qemuAuditVcpu(vm, oldvcpus, nvcpus, "update", rc == 1);
2558 2559 2560 2561 2562 2563 2564 2565 2566
    return ret;

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


2567 2568 2569 2570
static int
qemudDomainSetVcpusFlags(virDomainPtr dom, unsigned int nvcpus,
                         unsigned int flags)
{
2571 2572
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2573
    virDomainDefPtr persistentDef;
2574 2575
    const char * type;
    int max;
2576
    int ret = -1;
2577

2578 2579 2580 2581 2582 2583 2584 2585 2586 2587 2588 2589 2590 2591 2592 2593
    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);
2594 2595 2596
        return -1;
    }

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

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

2609 2610 2611
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

2612
    if (!virDomainObjIsActive(vm) && (flags & VIR_DOMAIN_VCPU_LIVE)) {
2613 2614
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                         "%s", _("domain is not running"));
2615
        goto endjob;
2616 2617
    }

2618 2619 2620 2621 2622 2623
    if (!vm->persistent && (flags & VIR_DOMAIN_VCPU_CONFIG)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("cannot change persistent config of a transient domain"));
        goto endjob;
    }

2624 2625 2626 2627 2628 2629 2630 2631 2632 2633 2634 2635 2636
    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 已提交
2637
    if (!(flags & VIR_DOMAIN_VCPU_MAXIMUM) && vm->def->maxvcpus < max) {
2638 2639 2640
        max = vm->def->maxvcpus;
    }

2641 2642 2643 2644 2645 2646 2647
    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;
    }

2648 2649 2650
    if (!(persistentDef = virDomainObjGetPersistentDef(driver->caps, vm)))
        goto endjob;

2651 2652
    switch (flags) {
    case VIR_DOMAIN_VCPU_MAXIMUM | VIR_DOMAIN_VCPU_CONFIG:
2653 2654 2655
        persistentDef->maxvcpus = nvcpus;
        if (nvcpus < persistentDef->vcpus)
            persistentDef->vcpus = nvcpus;
2656 2657 2658 2659
        ret = 0;
        break;

    case VIR_DOMAIN_VCPU_CONFIG:
2660
        persistentDef->vcpus = nvcpus;
2661 2662 2663 2664 2665 2666 2667 2668 2669
        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);
2670 2671 2672
        if (ret == 0) {
            persistentDef->vcpus = nvcpus;
        }
2673 2674
        break;
    }
2675

2676 2677 2678 2679
    /* Save the persistent config to disk */
    if (flags & VIR_DOMAIN_VCPU_CONFIG)
        ret = virDomainSaveConfig(driver->configDir, persistentDef);

2680 2681 2682
endjob:
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
2683

2684
cleanup:
2685 2686
    if (vm)
        virDomainObjUnlock(vm);
2687
    return ret;
2688 2689
}

2690 2691 2692 2693 2694 2695
static int
qemudDomainSetVcpus(virDomainPtr dom, unsigned int nvcpus)
{
    return qemudDomainSetVcpusFlags(dom, nvcpus, VIR_DOMAIN_VCPU_LIVE);
}

2696 2697 2698 2699 2700 2701

static int
qemudDomainPinVcpu(virDomainPtr dom,
                   unsigned int vcpu,
                   unsigned char *cpumap,
                   int maplen) {
2702 2703
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2704
    int maxcpu, hostcpus;
2705
    virNodeInfo nodeinfo;
2706
    int ret = -1;
2707
    qemuDomainObjPrivatePtr priv;
2708

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

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

D
Daniel P. Berrange 已提交
2721
    if (!virDomainObjIsActive(vm)) {
2722 2723
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s",_("cannot pin vcpus on an inactive domain"));
2724
        goto cleanup;
2725 2726
    }

2727 2728 2729
    priv = vm->privateData;

    if (vcpu > (priv->nvcpupids-1)) {
2730 2731 2732
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("vcpu number out of range %d > %d"),
                        vcpu, priv->nvcpupids);
2733
        goto cleanup;
2734 2735
    }

2736
    if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
2737
        goto cleanup;
2738

2739
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
2740
    maxcpu = maplen * 8;
2741 2742
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;
2743

2744 2745
    if (priv->vcpupids != NULL) {
        if (virProcessInfoSetAffinity(priv->vcpupids[vcpu],
2746
                                      cpumap, maplen, maxcpu) < 0)
2747
            goto cleanup;
2748
    } else {
2749 2750
        qemuReportError(VIR_ERR_NO_SUPPORT,
                        "%s", _("cpu affinity is not supported"));
2751
        goto cleanup;
2752
    }
2753
    ret = 0;
2754

2755
cleanup:
2756 2757
    if (vm)
        virDomainObjUnlock(vm);
2758
    return ret;
2759 2760 2761 2762 2763 2764 2765 2766
}

static int
qemudDomainGetVcpus(virDomainPtr dom,
                    virVcpuInfoPtr info,
                    int maxinfo,
                    unsigned char *cpumaps,
                    int maplen) {
2767 2768
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2769
    virNodeInfo nodeinfo;
2770
    int i, v, maxcpu, hostcpus;
2771
    int ret = -1;
2772
    qemuDomainObjPrivatePtr priv;
2773

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

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

D
Daniel P. Berrange 已提交
2786
    if (!virDomainObjIsActive(vm)) {
2787 2788 2789
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s",
                        _("cannot list vcpu pinning for an inactive domain"));
2790
        goto cleanup;
2791 2792
    }

2793 2794
    priv = vm->privateData;

2795
    if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
2796
        goto cleanup;
2797

2798
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
2799
    maxcpu = maplen * 8;
2800 2801
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;
2802 2803

    /* Clamp to actual number of vcpus */
2804 2805
    if (maxinfo > priv->nvcpupids)
        maxinfo = priv->nvcpupids;
2806

2807 2808 2809 2810 2811 2812
    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;
2813

2814
                if (priv->vcpupids != NULL &&
2815 2816 2817
                    qemudGetProcessInfo(&(info[i].cpuTime),
                                        &(info[i].cpu),
                                        vm->pid,
2818
                                        priv->vcpupids[i]) < 0) {
2819
                    virReportSystemError(errno, "%s",
2820 2821 2822
                                         _("cannot get vCPU placement & pCPU time"));
                    goto cleanup;
                }
2823
            }
2824 2825
        }

2826 2827
        if (cpumaps != NULL) {
            memset(cpumaps, 0, maplen * maxinfo);
2828
            if (priv->vcpupids != NULL) {
2829 2830 2831
                for (v = 0 ; v < maxinfo ; v++) {
                    unsigned char *cpumap = VIR_GET_CPUMAP(cpumaps, maplen, v);

2832
                    if (virProcessInfoGetAffinity(priv->vcpupids[v],
2833
                                                  cpumap, maplen, maxcpu) < 0)
2834
                        goto cleanup;
2835
                }
2836
            } else {
2837 2838
                qemuReportError(VIR_ERR_NO_SUPPORT,
                                "%s", _("cpu affinity is not available"));
2839
                goto cleanup;
2840 2841 2842
            }
        }
    }
2843
    ret = maxinfo;
2844

2845
cleanup:
2846 2847
    if (vm)
        virDomainObjUnlock(vm);
2848
    return ret;
2849 2850 2851
}


2852 2853 2854
static int
qemudDomainGetVcpusFlags(virDomainPtr dom, unsigned int flags)
{
2855 2856
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
2857
    virDomainDefPtr def;
2858
    int ret = -1;
2859

2860 2861 2862 2863 2864 2865 2866 2867
    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);
2868 2869 2870
        return -1;
    }

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

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

2883 2884 2885 2886 2887 2888 2889 2890 2891
    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;
2892 2893
    }

2894
    ret = (flags & VIR_DOMAIN_VCPU_MAXIMUM) ? def->maxvcpus : def->vcpus;
2895

2896
cleanup:
2897 2898
    if (vm)
        virDomainObjUnlock(vm);
2899 2900 2901
    return ret;
}

2902 2903 2904 2905 2906 2907 2908
static int
qemudDomainGetMaxVcpus(virDomainPtr dom)
{
    return qemudDomainGetVcpusFlags(dom, (VIR_DOMAIN_VCPU_LIVE |
                                          VIR_DOMAIN_VCPU_MAXIMUM));
}

2909 2910 2911 2912 2913 2914 2915 2916 2917
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);

2918 2919
    memset(seclabel, 0, sizeof(*seclabel));

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

2928
    if (!virDomainVirtTypeToString(vm->def->virtType)) {
2929 2930 2931
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("unknown virt type in domain definition '%d'"),
                        vm->def->virtType);
2932 2933 2934 2935 2936 2937 2938 2939 2940 2941 2942 2943 2944 2945 2946 2947 2948
        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 已提交
2949
    if (virDomainObjIsActive(vm)) {
2950 2951
        if (virSecurityManagerGetProcessLabel(driver->securityManager,
                                              vm, seclabel) < 0) {
2952 2953 2954
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            "%s", _("Failed to get security label"));
            goto cleanup;
2955 2956 2957 2958 2959 2960 2961 2962
        }
    }

    ret = 0;

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
2963
    qemuDriverUnlock(driver);
2964 2965 2966
    return ret;
}

2967 2968
static int qemudNodeGetSecurityModel(virConnectPtr conn,
                                     virSecurityModelPtr secmodel)
2969 2970 2971
{
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
    char *p;
2972
    int ret = 0;
2973

2974
    qemuDriverLock(driver);
2975 2976 2977 2978 2979
    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)
2980
        goto cleanup;
2981

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

    p = driver->caps->host.secModel.doi;
    if (strlen(p) >= VIR_SECURITY_DOI_BUFLEN-1) {
2994 2995 2996
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("security DOI string exceeds max %d bytes"),
                        VIR_SECURITY_DOI_BUFLEN-1);
2997 2998
        ret = -1;
        goto cleanup;
2999 3000
    }
    strcpy(secmodel->doi, p);
3001 3002 3003 3004

cleanup:
    qemuDriverUnlock(driver);
    return ret;
3005 3006
}

3007 3008 3009 3010 3011 3012
/* 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). */

3013 3014 3015
static int
qemudOpenAsUID(const char *path, uid_t uid, gid_t gid, pid_t *child_pid)
{
3016 3017 3018 3019 3020 3021 3022 3023 3024 3025 3026 3027 3028 3029 3030 3031 3032 3033 3034 3035 3036 3037 3038 3039 3040 3041 3042
    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 */
3043
        VIR_FORCE_CLOSE(pipefd[1]);
3044 3045 3046 3047 3048 3049 3050 3051 3052 3053 3054

        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:
3055 3056
        VIR_FORCE_CLOSE(pipefd[0]);
        VIR_FORCE_CLOSE(pipefd[1]);
3057 3058 3059 3060 3061 3062 3063 3064 3065 3066 3067 3068 3069 3070 3071 3072 3073 3074 3075 3076 3077 3078 3079 3080
        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 */
3081
    VIR_FORCE_CLOSE(pipefd[0]);
3082 3083 3084 3085 3086 3087 3088 3089 3090

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

3091 3092 3093
    if (virSetUIDGID(uid, gid) < 0) {
       exit_code = errno;
       goto child_cleanup;
3094 3095
    }

3096 3097 3098 3099 3100 3101 3102 3103
    if ((fd = open(path, O_RDONLY)) < 0) {
        exit_code = errno;
        virReportSystemError(errno,
                             _("cannot open '%s' as uid %d"),
                             path, uid);
        goto child_cleanup;
    }

3104 3105 3106 3107 3108 3109
    if (VIR_ALLOC_N(buf, bufsize) < 0) {
        exit_code = ENOMEM;
        virReportOOMError();
        goto child_cleanup;
    }

3110 3111 3112 3113 3114 3115 3116 3117 3118 3119 3120 3121 3122 3123 3124 3125 3126 3127 3128 3129
    /* 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);
3130 3131
    VIR_FORCE_CLOSE(fd);
    VIR_FORCE_CLOSE(pipefd[1]);
3132 3133 3134
    _exit(exit_code);
}

J
Jiri Denemark 已提交
3135 3136 3137 3138
static int qemudDomainSaveImageClose(int fd, pid_t read_pid, int *status)
{
    int ret = 0;

3139 3140 3141 3142
    if (VIR_CLOSE(fd) < 0) {
        virReportSystemError(errno, "%s",
                             _("cannot close file"));
    }
J
Jiri Denemark 已提交
3143 3144 3145 3146 3147 3148 3149 3150 3151 3152 3153 3154 3155 3156 3157 3158

    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,
3159 3160 3161 3162
                         const char *path,
                         virDomainDefPtr *ret_def,
                         struct qemud_save_header *ret_header,
                         pid_t *ret_read_pid)
J
Jiri Denemark 已提交
3163 3164
{
    int fd;
3165
    pid_t read_pid = -1;
3166
    struct qemud_save_header header;
J
Jiri Denemark 已提交
3167 3168
    char *xml = NULL;
    virDomainDefPtr def = NULL;
3169 3170

    if ((fd = open(path, O_RDONLY)) < 0) {
3171 3172 3173
        if ((driver->user == 0) || (getuid() != 0)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("cannot read domain image"));
J
Jiri Denemark 已提交
3174
            goto error;
3175 3176 3177 3178 3179 3180
        }

        /* 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. */
3181 3182
        if ((fd = qemudOpenAsUID(path,
                                 driver->user, driver->group, &read_pid)) < 0) {
3183
            /* error already reported */
J
Jiri Denemark 已提交
3184
            goto error;
3185
        }
3186 3187 3188
    }

    if (saferead(fd, &header, sizeof(header)) != sizeof(header)) {
3189 3190
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to read qemu header"));
J
Jiri Denemark 已提交
3191
        goto error;
3192 3193 3194
    }

    if (memcmp(header.magic, QEMUD_SAVE_MAGIC, sizeof(header.magic)) != 0) {
3195 3196
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("image magic is incorrect"));
J
Jiri Denemark 已提交
3197
        goto error;
3198 3199 3200
    }

    if (header.version > QEMUD_SAVE_VERSION) {
3201 3202 3203
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("image version is not supported (%d > %d)"),
                        header.version, QEMUD_SAVE_VERSION);
J
Jiri Denemark 已提交
3204
        goto error;
3205 3206
    }

3207 3208 3209
    if (header.xml_len <= 0) {
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("invalid XML length: %d"), header.xml_len);
J
Jiri Denemark 已提交
3210
        goto error;
3211 3212
    }

3213 3214
    if (VIR_ALLOC_N(xml, header.xml_len) < 0) {
        virReportOOMError();
J
Jiri Denemark 已提交
3215
        goto error;
3216 3217 3218
    }

    if (saferead(fd, xml, header.xml_len) != header.xml_len) {
3219 3220
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to read XML"));
J
Jiri Denemark 已提交
3221
        goto error;
3222 3223 3224
    }

    /* Create a domain from this XML */
3225
    if (!(def = virDomainDefParseString(driver->caps, xml,
3226
                                        VIR_DOMAIN_XML_INACTIVE)))
J
Jiri Denemark 已提交
3227
        goto error;
3228

J
Jiri Denemark 已提交
3229
    VIR_FREE(xml);
3230

J
Jiri Denemark 已提交
3231 3232 3233
    *ret_def = def;
    *ret_header = header;
    *ret_read_pid = read_pid;
3234

J
Jiri Denemark 已提交
3235
    return fd;
3236

J
Jiri Denemark 已提交
3237 3238 3239 3240 3241 3242 3243 3244 3245 3246 3247 3248
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,
3249 3250
                            int *fd,
                            pid_t *read_pid,
J
Jiri Denemark 已提交
3251 3252 3253 3254 3255 3256 3257 3258 3259 3260 3261 3262
                            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) {
3263
        const char *intermediate_argv[3] = { NULL, "-dc", NULL };
J
Jiri Denemark 已提交
3264
        const char *prog = qemudSaveCompressionTypeToString(header->compressed);
3265
        if (prog == NULL) {
3266 3267
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            _("Invalid compressed save format %d"),
J
Jiri Denemark 已提交
3268 3269
                            header->compressed);
            goto out;
3270
        }
3271

J
Jiri Denemark 已提交
3272
        if (header->compressed != QEMUD_SAVE_FORMAT_RAW) {
3273
            intermediate_argv[0] = prog;
3274 3275
            intermediatefd = *fd;
            *fd = -1;
3276
            if (virExec(intermediate_argv, NULL, NULL,
3277
                        &intermediate_pid, intermediatefd, fd, NULL, 0) < 0) {
3278 3279 3280
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("Failed to start decompression binary %s"),
                                intermediate_argv[0]);
3281
                *fd = intermediatefd;
J
Jiri Denemark 已提交
3282
                goto out;
3283 3284 3285
            }
        }
    }
J
Jiri Denemark 已提交
3286

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

3291
    if (intermediate_pid != -1) {
3292 3293 3294 3295 3296
        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);
3297
            VIR_FORCE_CLOSE(*fd);
3298 3299 3300
            kill(intermediate_pid, SIGTERM);
        }

3301 3302
        /* Wait for intermediate process to exit */
        while (waitpid(intermediate_pid, &childstat, 0) == -1 &&
J
Jiri Denemark 已提交
3303 3304 3305
               errno == EINTR) {
            /* empty */
        }
3306
    }
3307
    VIR_FORCE_CLOSE(intermediatefd);
J
Jiri Denemark 已提交
3308

3309 3310 3311
    wait_ret = qemudDomainSaveImageClose(*fd, *read_pid, &status);
    *fd = -1;
    if (*read_pid != -1) {
3312 3313 3314 3315 3316 3317 3318 3319 3320 3321 3322 3323 3324 3325 3326 3327 3328 3329 3330 3331
        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;
            }
        }
    }
3332
    *read_pid = -1;
J
Jiri Denemark 已提交
3333

3334
    if (ret < 0) {
3335
        qemuAuditDomainStart(vm, "restored", false);
J
Jiri Denemark 已提交
3336
        goto out;
3337
    }
3338

3339 3340 3341
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_RESTORED);
3342
    qemuAuditDomainStart(vm, "restored", true);
J
Jiri Denemark 已提交
3343 3344 3345
    if (event)
        qemuDomainEventQueue(driver, event);

3346

3347
    /* If it was running before, resume it now. */
J
Jiri Denemark 已提交
3348
    if (header->was_running) {
3349
        if (qemuProcessStartCPUs(driver, vm, conn) < 0) {
3350
            if (virGetLastError() == NULL)
3351 3352
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("failed to resume domain"));
J
Jiri Denemark 已提交
3353
            goto out;
3354
        }
3355 3356
        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0) {
            VIR_WARN("Failed to save status on vm %s", vm->def->name);
J
Jiri Denemark 已提交
3357
            goto out;
3358
        }
3359
    }
J
Jiri Denemark 已提交
3360

3361
    ret = 0;
3362

J
Jiri Denemark 已提交
3363
out:
3364 3365
    if (virSecurityManagerRestoreSavedStateLabel(driver->securityManager,
                                                 vm, path) < 0)
3366 3367
        VIR_WARN("failed to restore save state label on %s", path);

J
Jiri Denemark 已提交
3368 3369 3370 3371 3372 3373 3374 3375 3376 3377 3378 3379 3380 3381 3382 3383 3384 3385 3386 3387 3388 3389 3390 3391 3392
    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))) {
3393
        /* virDomainAssignDef already set the error */
J
Jiri Denemark 已提交
3394 3395 3396 3397 3398 3399 3400
        goto cleanup;
    }
    def = NULL;

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

3401 3402
    ret = qemudDomainSaveImageStartVM(conn, driver, vm, &fd,
                                      &read_pid, &header, path);
J
Jiri Denemark 已提交
3403 3404

    if (qemuDomainObjEndJob(vm) == 0)
3405
        vm = NULL;
J
Jiri Denemark 已提交
3406 3407 3408 3409
    else if (ret < 0 && !vm->persistent) {
        virDomainRemoveInactive(&driver->domains, vm);
        vm = NULL;
    }
3410

3411 3412
cleanup:
    virDomainDefFree(def);
J
Jiri Denemark 已提交
3413
    qemudDomainSaveImageClose(fd, read_pid, NULL);
3414 3415 3416
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
3417
    return ret;
D
Daniel P. Berrange 已提交
3418 3419
}

J
Jiri Denemark 已提交
3420 3421 3422 3423 3424 3425 3426 3427 3428 3429 3430 3431 3432 3433 3434 3435 3436 3437 3438 3439 3440 3441 3442 3443 3444 3445 3446 3447 3448 3449 3450 3451
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;

3452 3453
    ret = qemudDomainSaveImageStartVM(conn, driver, vm, &fd,
                                      &read_pid, &header, path);
J
Jiri Denemark 已提交
3454 3455 3456 3457 3458 3459 3460

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

D
Daniel P. Berrange 已提交
3461

3462
static char *qemudDomainDumpXML(virDomainPtr dom,
3463
                                int flags) {
3464 3465 3466
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    char *ret = NULL;
3467 3468
    unsigned long balloon;
    int err;
3469

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

D
Daniel P. Berrange 已提交
3473
    if (!vm) {
3474 3475
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3476 3477
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3478
        goto cleanup;
D
Daniel P. Berrange 已提交
3479 3480
    }

3481 3482 3483 3484
    /* 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))) {
3485
        qemuDomainObjPrivatePtr priv = vm->privateData;
3486 3487 3488
        /* Don't delay if someone's using the monitor, just use
         * existing most recent data instead */
        if (!priv->jobActive) {
3489
            if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
3490 3491
                goto cleanup;

3492
            qemuDomainObjEnterMonitorWithDriver(driver, vm);
3493
            err = qemuMonitorGetBalloonInfo(priv->mon, &balloon);
3494
            qemuDomainObjExitMonitorWithDriver(driver, vm);
3495 3496 3497 3498
            if (qemuDomainObjEndJob(vm) == 0) {
                vm = NULL;
                goto cleanup;
            }
3499 3500 3501
            if (err < 0)
                goto cleanup;
            if (err > 0)
3502
                vm->def->mem.cur_balloon = balloon;
3503 3504
            /* err == 0 indicates no balloon support, so ignore it */
        }
3505
    }
3506

3507
    ret = qemuDomainFormatXML(driver, vm, flags);
3508 3509

cleanup:
3510 3511
    if (vm)
        virDomainObjUnlock(vm);
3512
    qemuDriverUnlock(driver);
3513
    return ret;
D
Daniel P. Berrange 已提交
3514 3515 3516
}


3517 3518 3519 3520
static char *qemuDomainXMLFromNative(virConnectPtr conn,
                                     const char *format,
                                     const char *config,
                                     unsigned int flags ATTRIBUTE_UNUSED) {
3521
    struct qemud_driver *driver = conn->privateData;
3522 3523 3524 3525
    virDomainDefPtr def = NULL;
    char *xml = NULL;

    if (STRNEQ(format, QEMU_CONFIG_FORMAT_ARGV)) {
3526 3527
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("unsupported config type %s"), format);
3528 3529 3530
        goto cleanup;
    }

3531
    qemuDriverLock(driver);
3532
    def = qemuParseCommandLineString(driver->caps, config);
3533
    qemuDriverUnlock(driver);
3534 3535 3536
    if (!def)
        goto cleanup;

3537
    xml = virDomainDefFormat(def, VIR_DOMAIN_XML_INACTIVE);
3538 3539 3540 3541 3542 3543

cleanup:
    virDomainDefFree(def);
    return xml;
}

3544 3545 3546 3547 3548 3549
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;
3550
    virDomainChrSourceDef monConfig;
3551
    virBitmapPtr qemuCaps = NULL;
E
Eric Blake 已提交
3552
    virCommandPtr cmd = NULL;
3553 3554 3555
    char *ret = NULL;
    int i;

3556 3557
    qemuDriverLock(driver);

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

3564
    def = virDomainDefParseString(driver->caps, xmlData, 0);
3565 3566 3567
    if (!def)
        goto cleanup;

3568 3569
    /* Since we're just exporting args, we can't do bridge/network/direct
     * setups, since libvirt will normally create TAP/macvtap devices
3570 3571 3572 3573 3574
     * 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];
3575
        int bootIndex = net->bootIndex;
3576 3577
        if (net->type == VIR_DOMAIN_NET_TYPE_NETWORK ||
            net->type == VIR_DOMAIN_NET_TYPE_DIRECT) {
3578 3579 3580 3581 3582 3583 3584 3585 3586 3587 3588 3589 3590 3591 3592 3593 3594 3595 3596 3597
            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;
        }
3598
        net->bootIndex = bootIndex;
3599 3600 3601 3602
    }
    for (i = 0 ; i < def->ngraphics ; i++) {
        if (def->graphics[i]->type == VIR_DOMAIN_GRAPHICS_TYPE_VNC &&
            def->graphics[i]->data.vnc.autoport)
3603
            def->graphics[i]->data.vnc.port = QEMU_VNC_PORT_MIN;
3604 3605
    }

3606
    if (qemuCapsExtractVersionInfo(def->emulator, def->os.arch,
3607
                                   NULL,
3608
                                   &qemuCaps) < 0)
3609 3610
        goto cleanup;

3611
    if (qemuProcessPrepareMonitorChr(driver, &monConfig, def->name) < 0)
3612
        goto cleanup;
3613

3614
    if (!(cmd = qemuBuildCommandLine(conn, driver, def,
3615
                                     &monConfig, false, qemuCaps,
3616
                                     NULL, -1, NULL, VIR_VM_OP_NO_OP)))
3617 3618
        goto cleanup;

E
Eric Blake 已提交
3619
    ret = virCommandToString(cmd);
3620 3621

cleanup:
3622
    qemuDriverUnlock(driver);
3623

3624
    qemuCapsFree(qemuCaps);
E
Eric Blake 已提交
3625
    virCommandFree(cmd);
3626 3627 3628 3629 3630
    virDomainDefFree(def);
    return ret;
}


3631
static int qemudListDefinedDomains(virConnectPtr conn,
3632
                            char **const names, int nnames) {
3633
    struct qemud_driver *driver = conn->privateData;
3634
    int n;
3635

3636
    qemuDriverLock(driver);
3637
    n = virDomainObjListGetInactiveNames(&driver->domains, names, nnames);
3638
    qemuDriverUnlock(driver);
3639
    return n;
D
Daniel P. Berrange 已提交
3640 3641
}

3642
static int qemudNumDefinedDomains(virConnectPtr conn) {
3643
    struct qemud_driver *driver = conn->privateData;
3644
    int n;
3645

3646
    qemuDriverLock(driver);
3647
    n = virDomainObjListNumOfDomains(&driver->domains, 0);
3648
    qemuDriverUnlock(driver);
3649

3650
    return n;
D
Daniel P. Berrange 已提交
3651 3652 3653
}


J
Jiri Denemark 已提交
3654 3655
static int qemudDomainObjStart(virConnectPtr conn,
                               struct qemud_driver *driver,
3656 3657
                               virDomainObjPtr vm,
                               bool start_paused)
J
Jiri Denemark 已提交
3658 3659 3660 3661 3662 3663 3664 3665 3666 3667 3668 3669 3670 3671 3672 3673 3674 3675 3676 3677
{
    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;
    }

3678 3679
    ret = qemuProcessStart(conn, driver, vm, NULL, start_paused, -1, NULL,
                           VIR_VM_OP_CREATE);
3680
    qemuAuditDomainStart(vm, "booted", ret >= 0);
3681
    if (ret >= 0) {
J
Jiri Denemark 已提交
3682 3683 3684 3685 3686 3687 3688 3689 3690 3691 3692 3693 3694
        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;
}

3695 3696 3697
static int
qemudDomainStartWithFlags(virDomainPtr dom, unsigned int flags)
{
3698 3699 3700
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
3701

3702
    virCheckFlags(VIR_DOMAIN_START_PAUSED, -1);
3703

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

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

3715 3716 3717 3718
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;

    if (virDomainObjIsActive(vm)) {
3719 3720
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is already running"));
3721 3722 3723
        goto endjob;
    }

3724 3725
    ret = qemudDomainObjStart(dom->conn, driver, vm,
                              (flags & VIR_DOMAIN_START_PAUSED) != 0);
3726

3727
endjob:
3728 3729
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
3730

3731
cleanup:
3732 3733
    if (vm)
        virDomainObjUnlock(vm);
3734
    qemuDriverUnlock(driver);
3735
    return ret;
D
Daniel P. Berrange 已提交
3736 3737
}

3738 3739 3740 3741 3742 3743
static int
qemudDomainStart(virDomainPtr dom)
{
    return qemudDomainStartWithFlags(dom, 0);
}

3744 3745 3746 3747 3748 3749 3750 3751 3752 3753 3754 3755 3756 3757 3758
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;

3759
        if (STRNEQ(def->os.machine, machine->name))
3760 3761 3762
            continue;

        if (!(*canonical = strdup(machine->canonical))) {
3763
            virReportOOMError();
3764 3765 3766 3767 3768 3769 3770 3771 3772
            return -1;
        }

        break;
    }

    return 0;
}

3773 3774 3775 3776 3777 3778
static int
qemudCanonicalizeMachineDirect(virDomainDefPtr def, char **canonical)
{
    virCapsGuestMachinePtr *machines = NULL;
    int i, nmachines = 0;

3779
    if (qemuCapsProbeMachineTypes(def->emulator, &machines, &nmachines) < 0)
3780 3781 3782 3783 3784 3785
        return -1;

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

3786
        if (STRNEQ(def->os.machine, machines[i]->name))
3787 3788 3789 3790 3791 3792 3793 3794 3795 3796 3797 3798
            continue;

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

    virCapabilitiesFreeMachines(machines, nmachines);

    return 0;
}

3799 3800
int
qemudCanonicalizeMachine(struct qemud_driver *driver, virDomainDefPtr def)
3801 3802 3803 3804 3805 3806
{
    char *canonical = NULL;
    int i;

    for (i = 0; i < driver->caps->nguests; i++) {
        virCapsGuestPtr guest = driver->caps->guests[i];
3807
        virCapsGuestDomainInfoPtr info;
3808 3809 3810
        int j;

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

3813 3814 3815 3816 3817 3818 3819 3820 3821
            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;
3822 3823
        }

3824 3825 3826 3827
        info = &guest->arch.defaultInfo;

        if (info->emulator && STREQ(info->emulator, def->emulator)) {
            if (qemudCanonicalizeMachineFromInfo(def, info, &canonical) < 0)
3828 3829 3830 3831
                return -1;
            goto out;
        }
    }
3832 3833 3834 3835

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

3836 3837 3838 3839 3840 3841 3842
out:
    if (canonical) {
        VIR_FREE(def->os.machine);
        def->os.machine = canonical;
    }
    return 0;
}
D
Daniel P. Berrange 已提交
3843

3844
static virDomainPtr qemudDomainDefine(virConnectPtr conn, const char *xml) {
3845
    struct qemud_driver *driver = conn->privateData;
3846
    virDomainDefPtr def;
3847
    virDomainObjPtr vm = NULL;
3848
    virDomainPtr dom = NULL;
3849
    virDomainEventPtr event = NULL;
3850
    int dupVM;
3851

3852
    qemuDriverLock(driver);
3853
    if (!(def = virDomainDefParseString(driver->caps, xml,
3854
                                        VIR_DOMAIN_XML_INACTIVE)))
3855
        goto cleanup;
3856

3857
    if (virSecurityManagerVerify(driver->securityManager, def) < 0)
3858 3859
        goto cleanup;

3860 3861
    if ((dupVM = virDomainObjIsDuplicate(&driver->domains, def, 0)) < 0)
        goto cleanup;
3862

3863
    if (qemudCanonicalizeMachine(driver, def) < 0)
3864 3865
        goto cleanup;

3866
    if (qemuDomainAssignPCIAddresses(def) < 0)
3867 3868
        goto cleanup;

3869
    if (!(vm = virDomainAssignDef(driver->caps,
3870
                                  &driver->domains,
3871
                                  def, false))) {
3872
        goto cleanup;
3873
    }
3874
    def = NULL;
3875
    vm->persistent = 1;
3876

3877
    if (virDomainSaveConfig(driver->configDir,
3878
                            vm->newDef ? vm->newDef : vm->def) < 0) {
3879 3880
        virDomainRemoveInactive(&driver->domains,
                                vm);
3881
        vm = NULL;
3882
        goto cleanup;
3883 3884
    }

3885 3886
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_DEFINED,
3887
                                     !dupVM ?
3888 3889
                                     VIR_DOMAIN_EVENT_DEFINED_ADDED :
                                     VIR_DOMAIN_EVENT_DEFINED_UPDATED);
3890

3891
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
3892
    if (dom) dom->id = vm->def->id;
3893 3894

cleanup:
3895
    virDomainDefFree(def);
3896 3897
    if (vm)
        virDomainObjUnlock(vm);
3898 3899
    if (event)
        qemuDomainEventQueue(driver, event);
3900
    qemuDriverUnlock(driver);
3901
    return dom;
D
Daniel P. Berrange 已提交
3902 3903
}

3904
static int qemudDomainUndefine(virDomainPtr dom) {
3905 3906
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
3907
    virDomainEventPtr event = NULL;
3908
    int ret = -1;
D
Daniel P. Berrange 已提交
3909

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

D
Daniel P. Berrange 已提交
3913
    if (!vm) {
3914 3915
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3916 3917
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3918
        goto cleanup;
D
Daniel P. Berrange 已提交
3919 3920
    }

D
Daniel P. Berrange 已提交
3921
    if (virDomainObjIsActive(vm)) {
3922 3923
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot delete active domain"));
3924
        goto cleanup;
D
Daniel P. Berrange 已提交
3925 3926
    }

3927
    if (!vm->persistent) {
3928
        qemuReportError(VIR_ERR_OPERATION_INVALID,
3929
                        "%s", _("cannot undefine transient domain"));
3930
        goto cleanup;
3931 3932
    }

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

3936 3937 3938
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_UNDEFINED,
                                     VIR_DOMAIN_EVENT_UNDEFINED_REMOVED);
3939

3940 3941
    virDomainRemoveInactive(&driver->domains,
                            vm);
3942
    vm = NULL;
3943
    ret = 0;
D
Daniel P. Berrange 已提交
3944

3945
cleanup:
3946 3947
    if (vm)
        virDomainObjUnlock(vm);
3948 3949
    if (event)
        qemuDomainEventQueue(driver, event);
3950
    qemuDriverUnlock(driver);
3951
    return ret;
D
Daniel P. Berrange 已提交
3952 3953
}

3954

3955 3956
static int qemudDomainAttachDevice(virDomainPtr dom,
                                   const char *xml)
3957
{
3958 3959 3960
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    virDomainDeviceDefPtr dev = NULL;
3961
    virBitmapPtr qemuCaps = NULL;
3962
    virCgroupPtr cgroup = NULL;
3963
    int ret = -1;
3964

3965 3966 3967 3968 3969 3970 3971
    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);
3972 3973 3974
        goto cleanup;
    }

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

3978 3979 3980 3981 3982
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot attach device on inactive domain"));
        goto endjob;
    }
3983

3984 3985 3986 3987
    dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
                                  VIR_DOMAIN_XML_INACTIVE);
    if (dev == NULL)
        goto endjob;
3988

3989
    if (qemuCapsExtractVersionInfo(vm->def->emulator, vm->def->os.arch,
3990
                                   NULL,
3991
                                   &qemuCaps) < 0)
3992
        goto endjob;
3993

3994 3995 3996 3997
    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 已提交
3998
                                _("Unable to find cgroup for %s"),
3999 4000 4001
                                vm->def->name);
                goto endjob;
            }
4002
            if (qemuSetupDiskCgroup(driver, vm, cgroup, dev->data.disk) < 0)
4003
                goto endjob;
4004 4005
        }

4006 4007 4008 4009 4010
        switch (dev->data.disk->device) {
        case VIR_DOMAIN_DISK_DEVICE_CDROM:
        case VIR_DOMAIN_DISK_DEVICE_FLOPPY:
            ret = qemuDomainChangeEjectableMedia(driver, vm,
                                                 dev->data.disk,
4011
                                                 qemuCaps,
4012 4013 4014 4015
                                                 false);
            if (ret == 0)
                dev->data.disk = NULL;
            break;
4016

4017 4018 4019
        case VIR_DOMAIN_DISK_DEVICE_DISK:
            if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_USB) {
                ret = qemuDomainAttachUsbMassstorageDevice(driver, vm,
4020
                                                           dev->data.disk, qemuCaps);
4021 4022 4023 4024
                if (ret == 0)
                    dev->data.disk = NULL;
            } else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_VIRTIO) {
                ret = qemuDomainAttachPciDiskDevice(driver, vm,
4025
                                                    dev->data.disk, qemuCaps);
4026 4027 4028 4029
                if (ret == 0)
                    dev->data.disk = NULL;
            } else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_SCSI) {
                ret = qemuDomainAttachSCSIDisk(driver, vm,
4030
                                               dev->data.disk, qemuCaps);
4031 4032 4033 4034 4035 4036 4037 4038 4039
                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;
4040

4041 4042 4043 4044 4045
        default:
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                            _("disk device type '%s' cannot be hotplugged"),
                            virDomainDiskDeviceTypeToString(dev->data.disk->device));
            /* Fallthrough */
4046
        }
4047
        if (ret != 0 && cgroup) {
4048
            if (qemuTeardownDiskCgroup(driver, vm, cgroup, dev->data.disk) < 0)
4049 4050
                VIR_WARN("Failed to teardown cgroup for disk path %s",
                         NULLSTR(dev->data.disk->src));
4051
        }
4052 4053 4054
    } else if (dev->type == VIR_DOMAIN_DEVICE_CONTROLLER) {
        if (dev->data.controller->type == VIR_DOMAIN_CONTROLLER_TYPE_SCSI) {
            ret = qemuDomainAttachPciControllerDevice(driver, vm,
4055
                                                      dev->data.controller, qemuCaps);
4056 4057 4058 4059 4060 4061 4062
            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 */
4063
        }
4064 4065
    } else if (dev->type == VIR_DOMAIN_DEVICE_NET) {
        ret = qemuDomainAttachNetDevice(dom->conn, driver, vm,
4066
                                        dev->data.net, qemuCaps);
4067 4068 4069 4070
        if (ret == 0)
            dev->data.net = NULL;
    } else if (dev->type == VIR_DOMAIN_DEVICE_HOSTDEV) {
        ret = qemuDomainAttachHostDevice(driver, vm,
4071
                                         dev->data.hostdev, qemuCaps);
4072 4073
        if (ret == 0)
            dev->data.hostdev = NULL;
4074
    } else {
4075 4076 4077 4078
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("device type '%s' cannot be attached"),
                        virDomainDeviceTypeToString(dev->type));
        goto endjob;
4079 4080
    }

4081 4082 4083 4084 4085 4086 4087 4088 4089 4090 4091
    if (!ret && virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
        ret = -1;

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

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

4092
    qemuCapsFree(qemuCaps);
4093 4094 4095 4096
    virDomainDeviceDefFree(dev);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
4097 4098 4099
    return ret;
}

4100 4101 4102 4103 4104 4105 4106 4107
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;
    }
4108

4109 4110
    return qemudDomainAttachDevice(dom, xml);
}
4111

4112

4113 4114 4115 4116 4117 4118 4119
static int qemuDomainUpdateDeviceFlags(virDomainPtr dom,
                                       const char *xml,
                                       unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    virDomainDeviceDefPtr dev = NULL;
4120
    virBitmapPtr qemuCaps = NULL;
4121 4122 4123
    virCgroupPtr cgroup = NULL;
    int ret = -1;
    bool force = (flags & VIR_DOMAIN_DEVICE_MODIFY_FORCE) != 0;
4124

4125 4126 4127 4128
    virCheckFlags(VIR_DOMAIN_DEVICE_MODIFY_CURRENT |
                  VIR_DOMAIN_DEVICE_MODIFY_LIVE |
                  VIR_DOMAIN_DEVICE_MODIFY_CONFIG |
                  VIR_DOMAIN_DEVICE_MODIFY_FORCE, -1);
4129

4130 4131 4132
    if (flags & VIR_DOMAIN_DEVICE_MODIFY_CONFIG) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot modify the persistent configuration of a domain"));
4133 4134 4135
        return -1;
    }

4136 4137 4138 4139 4140 4141 4142 4143
    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;
4144 4145
    }

4146 4147 4148 4149 4150 4151 4152
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;

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

4155 4156 4157 4158 4159
    dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
                                  VIR_DOMAIN_XML_INACTIVE);
    if (dev == NULL)
        goto endjob;

4160
    if (qemuCapsExtractVersionInfo(vm->def->emulator, vm->def->os.arch,
4161
                                   NULL,
4162
                                   &qemuCaps) < 0)
4163
        goto endjob;
4164

4165 4166 4167 4168 4169
    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 已提交
4170
                                _("Unable to find cgroup for %s"),
4171 4172 4173
                                vm->def->name);
                goto endjob;
            }
4174
            if (qemuSetupDiskCgroup(driver, vm, cgroup, dev->data.disk) < 0)
4175
                goto endjob;
4176 4177
        }

4178 4179 4180 4181 4182
        switch (dev->data.disk->device) {
        case VIR_DOMAIN_DISK_DEVICE_CDROM:
        case VIR_DOMAIN_DISK_DEVICE_FLOPPY:
            ret = qemuDomainChangeEjectableMedia(driver, vm,
                                                 dev->data.disk,
4183
                                                 qemuCaps,
4184 4185 4186 4187
                                                 force);
            if (ret == 0)
                dev->data.disk = NULL;
            break;
4188

4189

4190 4191 4192 4193 4194 4195
        default:
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                            _("disk bus '%s' cannot be updated."),
                            virDomainDiskBusTypeToString(dev->data.disk->bus));
            break;
        }
4196

4197
        if (ret != 0 && cgroup) {
4198
            if (qemuTeardownDiskCgroup(driver, vm, cgroup, dev->data.disk) < 0)
4199 4200 4201
                VIR_WARN("Failed to teardown cgroup for disk path %s",
                         NULLSTR(dev->data.disk->src));
        }
4202
        break;
4203 4204 4205

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

4208
    default:
4209
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
4210 4211
                        _("device type '%s' cannot be updated"),
                        virDomainDeviceTypeToString(dev->type));
4212
        break;
4213 4214
    }

4215 4216 4217 4218 4219 4220 4221 4222 4223 4224
    if (!ret && virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
        ret = -1;

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

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

4226
    qemuCapsFree(qemuCaps);
4227 4228 4229 4230
    virDomainDeviceDefFree(dev);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
4231 4232 4233
    return ret;
}

4234

4235 4236
static int qemudDomainDetachDevice(virDomainPtr dom,
                                   const char *xml) {
4237 4238
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
4239
    virBitmapPtr qemuCaps = NULL;
4240 4241
    virDomainDeviceDefPtr dev = NULL;
    int ret = -1;
4242

4243
    qemuDriverLock(driver);
4244
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
4245
    if (!vm) {
4246 4247
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4248 4249
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4250
        goto cleanup;
4251 4252
    }

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

D
Daniel P. Berrange 已提交
4256
    if (!virDomainObjIsActive(vm)) {
4257 4258
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot detach device on inactive domain"));
4259
        goto endjob;
4260 4261
    }

4262
    dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
4263
                                  VIR_DOMAIN_XML_INACTIVE);
4264
    if (dev == NULL)
4265
        goto endjob;
4266

4267
    if (qemuCapsExtractVersionInfo(vm->def->emulator, vm->def->os.arch,
4268
                                   NULL,
4269
                                   &qemuCaps) < 0)
4270
        goto endjob;
4271 4272

    if (dev->type == VIR_DOMAIN_DEVICE_DISK &&
4273 4274
        dev->data.disk->device == VIR_DOMAIN_DISK_DEVICE_DISK) {
        if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_VIRTIO) {
4275
            ret = qemuDomainDetachPciDiskDevice(driver, vm, dev, qemuCaps);
4276 4277
        }
        else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_SCSI) {
4278
            ret = qemuDomainDetachDiskDevice(driver, vm, dev, qemuCaps);
W
Wen Congyang 已提交
4279 4280
        } else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_USB) {
            ret = qemuDomainDetachDiskDevice(driver, vm, dev, qemuCaps);
4281 4282
        }
        else {
4283
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
4284 4285
                            _("This type of disk cannot be hot unplugged"));
        }
4286
    } else if (dev->type == VIR_DOMAIN_DEVICE_NET) {
4287
        ret = qemuDomainDetachNetDevice(driver, vm, dev, qemuCaps);
4288 4289
    } else if (dev->type == VIR_DOMAIN_DEVICE_CONTROLLER) {
        if (dev->data.controller->type == VIR_DOMAIN_CONTROLLER_TYPE_SCSI) {
4290
            ret = qemuDomainDetachPciControllerDevice(driver, vm, dev,
4291
                                                      qemuCaps);
4292
        } else {
4293
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
4294 4295
                            _("disk controller bus '%s' cannot be hotunplugged."),
                            virDomainControllerTypeToString(dev->data.controller->type));
4296 4297
            /* fallthrough */
        }
4298
    } else if (dev->type == VIR_DOMAIN_DEVICE_HOSTDEV) {
4299
        ret = qemuDomainDetachHostDevice(driver, vm, dev, qemuCaps);
4300
    } else {
4301
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
4302
                        "%s", _("This type of device cannot be hot unplugged"));
4303
    }
4304

4305
    if (!ret && virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
4306 4307
        ret = -1;

4308
endjob:
4309 4310
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
4311

4312
cleanup:
4313
    qemuCapsFree(qemuCaps);
4314
    virDomainDeviceDefFree(dev);
4315 4316
    if (vm)
        virDomainObjUnlock(vm);
4317
    qemuDriverUnlock(driver);
4318 4319 4320
    return ret;
}

4321 4322 4323 4324
static int qemudDomainDetachDeviceFlags(virDomainPtr dom,
                                        const char *xml,
                                        unsigned int flags) {
    if (flags & VIR_DOMAIN_DEVICE_MODIFY_CONFIG) {
4325 4326
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot modify the persistent configuration of a domain"));
4327 4328 4329 4330 4331 4332
        return -1;
    }

    return qemudDomainDetachDevice(dom, xml);
}

4333
static int qemudDomainGetAutostart(virDomainPtr dom,
4334
                                   int *autostart) {
4335 4336 4337
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
4338

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

4343
    if (!vm) {
4344 4345
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4346 4347
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4348
        goto cleanup;
4349 4350 4351
    }

    *autostart = vm->autostart;
4352
    ret = 0;
4353

4354
cleanup:
4355 4356
    if (vm)
        virDomainObjUnlock(vm);
4357
    return ret;
4358 4359
}

4360
static int qemudDomainSetAutostart(virDomainPtr dom,
4361
                                   int autostart) {
4362 4363
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
4364 4365
    char *configFile = NULL, *autostartLink = NULL;
    int ret = -1;
4366

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

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

4378
    if (!vm->persistent) {
4379
        qemuReportError(VIR_ERR_OPERATION_INVALID,
4380
                        "%s", _("cannot set autostart for transient domain"));
4381
        goto cleanup;
4382 4383
    }

4384 4385
    autostart = (autostart != 0);

4386
    if (vm->autostart != autostart) {
4387
        if ((configFile = virDomainConfigFile(driver->configDir, vm->def->name)) == NULL)
4388
            goto cleanup;
4389
        if ((autostartLink = virDomainConfigFile(driver->autostartDir, vm->def->name)) == NULL)
4390
            goto cleanup;
4391

4392 4393
        if (autostart) {
            int err;
4394

4395
            if ((err = virFileMakePath(driver->autostartDir))) {
4396
                virReportSystemError(err,
4397 4398
                                     _("cannot create autostart directory %s"),
                                     driver->autostartDir);
4399 4400
                goto cleanup;
            }
4401

4402
            if (symlink(configFile, autostartLink) < 0) {
4403
                virReportSystemError(errno,
4404 4405
                                     _("Failed to create symlink '%s to '%s'"),
                                     autostartLink, configFile);
4406 4407 4408 4409
                goto cleanup;
            }
        } else {
            if (unlink(autostartLink) < 0 && errno != ENOENT && errno != ENOTDIR) {
4410
                virReportSystemError(errno,
4411 4412
                                     _("Failed to delete symlink '%s'"),
                                     autostartLink);
4413 4414
                goto cleanup;
            }
4415 4416
        }

4417
        vm->autostart = autostart;
4418
    }
4419
    ret = 0;
4420

4421 4422 4423
cleanup:
    VIR_FREE(configFile);
    VIR_FREE(autostartLink);
4424 4425
    if (vm)
        virDomainObjUnlock(vm);
4426
    qemuDriverUnlock(driver);
4427
    return ret;
4428 4429
}

4430 4431 4432 4433 4434

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

4437
    qemuDriverLock(driver);
4438
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
4439 4440
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup CPU controller is not mounted"));
4441
        goto cleanup;
4442 4443 4444 4445 4446 4447 4448
    }

    if (nparams)
        *nparams = 1;

    ret = strdup("posix");
    if (!ret)
4449
        virReportOOMError();
4450 4451 4452

cleanup:
    qemuDriverUnlock(driver);
4453 4454 4455
    return ret;
}

4456 4457 4458 4459 4460 4461 4462 4463 4464 4465 4466 4467 4468 4469

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)) {
4470 4471
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup memory controller is not mounted"));
4472 4473 4474 4475 4476 4477 4478 4479 4480 4481 4482 4483 4484 4485 4486 4487 4488 4489 4490 4491 4492 4493 4494 4495 4496 4497 4498 4499 4500 4501 4502 4503 4504 4505 4506 4507 4508 4509 4510 4511 4512 4513 4514 4515 4516 4517 4518 4519 4520 4521 4522
        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;
            }
4523
        } else if (STREQ(param->field, VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT)) {
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 4555 4556
            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;
}

4557 4558 4559 4560 4561 4562 4563 4564 4565
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;
4566
    unsigned long long val;
4567 4568 4569 4570 4571 4572
    int ret = -1;
    int rc;

    qemuDriverLock(driver);

    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_MEMORY)) {
4573 4574
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup memory controller is not mounted"));
4575 4576 4577 4578 4579 4580 4581 4582 4583 4584 4585 4586 4587 4588 4589 4590 4591 4592 4593 4594 4595 4596 4597 4598 4599 4600 4601 4602 4603 4604 4605 4606 4607 4608 4609 4610 4611 4612 4613 4614 4615 4616
        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"));
4617
                goto cleanup;
4618 4619 4620 4621
            }
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_HARD_LIMIT) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field memory hard limit too long for destination"));
4622
                goto cleanup;
4623 4624 4625 4626 4627 4628 4629 4630 4631
            }
            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"));
4632
                goto cleanup;
4633 4634 4635 4636
            }
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SOFT_LIMIT) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field memory soft limit too long for destination"));
4637
                goto cleanup;
4638 4639 4640 4641 4642 4643 4644 4645 4646
            }
            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"));
4647
                goto cleanup;
4648
            }
4649
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT) == NULL) {
4650 4651
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field swap hard limit too long for destination"));
4652
                goto cleanup;
4653 4654 4655 4656 4657 4658 4659 4660 4661 4662
            }
            param->value.ul = val;
            break;

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

4663 4664
    ret = 0;

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

4674 4675 4676 4677 4678 4679 4680 4681 4682 4683
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;

4684
    qemuDriverLock(driver);
4685
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
4686 4687
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup CPU controller is not mounted"));
4688
        goto cleanup;
4689 4690 4691 4692 4693
    }

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

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

    if (virCgroupForDomain(driver->cgroup, vm->def->name, &group, 0) != 0) {
4700 4701
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("cannot find cgroup for domain %s"), vm->def->name);
4702 4703 4704 4705 4706 4707 4708 4709 4710
        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) {
4711 4712
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for cpu_shares tunable, expected a 'ullong'"));
4713 4714 4715 4716 4717
                goto cleanup;
            }

            rc = virCgroupSetCpuShares(group, params[i].value.ul);
            if (rc != 0) {
4718
                virReportSystemError(-rc, "%s",
4719 4720 4721 4722
                                     _("unable to set cpu shares tunable"));
                goto cleanup;
            }
        } else {
4723 4724
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("Invalid parameter `%s'"), param->field);
4725 4726 4727 4728 4729 4730 4731 4732 4733
            goto cleanup;
        }
    }
    ret = 0;

cleanup:
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
4734
    qemuDriverUnlock(driver);
4735 4736 4737 4738 4739 4740 4741 4742 4743 4744 4745 4746 4747 4748
    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;

4749
    qemuDriverLock(driver);
4750
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
4751 4752
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cgroup CPU controller is not mounted"));
4753
        goto cleanup;
4754 4755 4756
    }

    if ((*nparams) != 1) {
4757 4758
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("Invalid parameter count"));
4759
        goto cleanup;
4760 4761 4762 4763 4764
    }

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

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

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

    rc = virCgroupGetCpuShares(group, &val);
    if (rc != 0) {
4778
        virReportSystemError(-rc, "%s",
4779 4780 4781 4782 4783
                             _("unable to get cpu shares tunable"));
        goto cleanup;
    }
    params[0].value.ul = val;
    params[0].type = VIR_DOMAIN_SCHED_FIELD_ULLONG;
C
Chris Lalancette 已提交
4784
    if (virStrcpyStatic(params[0].field, "cpu_shares") == NULL) {
4785 4786
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("Field cpu_shares too long for destination"));
C
Chris Lalancette 已提交
4787 4788
        goto cleanup;
    }
4789 4790 4791 4792 4793 4794 4795

    ret = 0;

cleanup:
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
4796
    qemuDriverUnlock(driver);
4797 4798 4799 4800
    return ret;
}


4801 4802 4803 4804 4805 4806 4807 4808 4809
/* 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)
{
4810
    struct qemud_driver *driver = dom->conn->privateData;
4811
    int i, ret = -1;
4812
    virDomainObjPtr vm;
4813
    virDomainDiskDefPtr disk = NULL;
4814

4815
    qemuDriverLock(driver);
4816
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
4817
    qemuDriverUnlock(driver);
4818
    if (!vm) {
4819 4820
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4821 4822
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4823
        goto cleanup;
4824
    }
4825 4826 4827 4828

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

D
Daniel P. Berrange 已提交
4829
    if (!virDomainObjIsActive (vm)) {
4830 4831
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
4832
        goto endjob;
4833 4834
    }

4835 4836 4837 4838 4839 4840 4841 4842
    for (i = 0 ; i < vm->def->ndisks ; i++) {
        if (STREQ(path, vm->def->disks[i]->dst)) {
            disk = vm->def->disks[i];
            break;
        }
    }

    if (!disk) {
4843 4844
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path: %s"), path);
4845
        goto endjob;
4846 4847
    }

4848
    if (!disk->info.alias) {
4849 4850
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("missing disk device alias name for %s"), disk->dst);
4851
        goto endjob;
4852
    }
4853

4854
    qemuDomainObjPrivatePtr priv = vm->privateData;
4855 4856
    qemuDomainObjEnterMonitor(vm);
    ret = qemuMonitorGetBlockStatsInfo(priv->mon,
4857
                                       disk->info.alias,
4858 4859 4860 4861 4862 4863
                                       &stats->rd_req,
                                       &stats->rd_bytes,
                                       &stats->wr_req,
                                       &stats->wr_bytes,
                                       &stats->errs);
    qemuDomainObjExitMonitor(vm);
4864

4865
endjob:
4866 4867
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
4868

4869
cleanup:
4870 4871
    if (vm)
        virDomainObjUnlock(vm);
4872
    return ret;
4873 4874
}

4875
#ifdef __linux__
4876 4877 4878 4879 4880
static int
qemudDomainInterfaceStats (virDomainPtr dom,
                           const char *path,
                           struct _virDomainInterfaceStats *stats)
{
4881 4882
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
4883
    int i;
4884
    int ret = -1;
4885

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

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

D
Daniel P. Berrange 已提交
4898
    if (!virDomainObjIsActive(vm)) {
4899 4900
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
4901
        goto cleanup;
4902 4903 4904
    }

    /* Check the path is one of the domain's network interfaces. */
4905 4906
    for (i = 0 ; i < vm->def->nnets ; i++) {
        if (vm->def->nets[i]->ifname &&
4907 4908 4909 4910
            STREQ (vm->def->nets[i]->ifname, path)) {
            ret = 0;
            break;
        }
4911 4912
    }

4913
    if (ret == 0)
4914
        ret = linuxDomainInterfaceStats(path, stats);
4915
    else
4916 4917
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path, '%s' is not a known interface"), path);
4918

4919
cleanup:
4920 4921
    if (vm)
        virDomainObjUnlock(vm);
4922 4923
    return ret;
}
4924
#else
4925 4926 4927 4928
static int
qemudDomainInterfaceStats (virDomainPtr dom,
                           const char *path ATTRIBUTE_UNUSED,
                           struct _virDomainInterfaceStats *stats ATTRIBUTE_UNUSED)
4929 4930
    qemuReportError(VIR_ERR_NO_SUPPORT,
                    "%s", __FUNCTION__);
4931 4932
    return -1;
}
4933
#endif
4934

4935 4936 4937 4938 4939 4940 4941 4942 4943 4944 4945 4946 4947 4948 4949 4950
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);
4951 4952
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
4953 4954 4955
        goto cleanup;
    }

4956 4957 4958
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

4959 4960 4961
    if (virDomainObjIsActive(vm)) {
        qemuDomainObjPrivatePtr priv = vm->privateData;
        qemuDomainObjEnterMonitor(vm);
4962
        ret = qemuMonitorGetMemoryStats(priv->mon, stats, nr_stats);
4963 4964
        qemuDomainObjExitMonitor(vm);
    } else {
4965 4966
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
4967 4968
    }

4969 4970 4971
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

4972 4973 4974 4975 4976 4977
cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}

4978 4979 4980 4981 4982 4983 4984
static int
qemudDomainBlockPeek (virDomainPtr dom,
                      const char *path,
                      unsigned long long offset, size_t size,
                      void *buffer,
                      unsigned int flags ATTRIBUTE_UNUSED)
{
4985 4986 4987
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int fd = -1, ret = -1, i;
4988

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

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

    if (!path || path[0] == '\0') {
5002 5003
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("NULL or empty path"));
5004
        goto cleanup;
5005 5006 5007
    }

    /* Check the path belongs to this domain. */
5008 5009
    for (i = 0 ; i < vm->def->ndisks ; i++) {
        if (vm->def->disks[i]->src != NULL &&
5010 5011 5012 5013
            STREQ (vm->def->disks[i]->src, path)) {
            ret = 0;
            break;
        }
5014 5015
    }

5016 5017 5018 5019 5020
    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) {
5021 5022
            virReportSystemError(errno,
                                 _("%s: failed to open"), path);
5023 5024
            goto cleanup;
        }
5025

5026 5027 5028 5029 5030 5031
        /* 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) {
5032 5033
            virReportSystemError(errno,
                                 _("%s: failed to seek or read"), path);
5034 5035 5036 5037 5038
            goto cleanup;
        }

        ret = 0;
    } else {
5039 5040
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("invalid path"));
5041 5042
    }

5043
cleanup:
5044
    VIR_FORCE_CLOSE(fd);
5045 5046
    if (vm)
        virDomainObjUnlock(vm);
5047 5048 5049
    return ret;
}

R
Richard W.M. Jones 已提交
5050 5051 5052 5053 5054 5055
static int
qemudDomainMemoryPeek (virDomainPtr dom,
                       unsigned long long offset, size_t size,
                       void *buffer,
                       unsigned int flags)
{
5056 5057
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
5058
    char *tmp = NULL;
R
Richard W.M. Jones 已提交
5059 5060
    int fd = -1, ret = -1;

5061
    qemuDriverLock(driver);
5062
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
5063
    qemuDriverUnlock(driver);
R
Richard W.M. Jones 已提交
5064 5065

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

5073
    if (flags != VIR_MEMORY_VIRTUAL && flags != VIR_MEMORY_PHYSICAL) {
5074 5075
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("flags parameter must be VIR_MEMORY_VIRTUAL or VIR_MEMORY_PHYSICAL"));
5076
        goto cleanup;
R
Richard W.M. Jones 已提交
5077 5078
    }

5079 5080 5081
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

D
Daniel P. Berrange 已提交
5082
    if (!virDomainObjIsActive(vm)) {
5083 5084
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
5085
        goto endjob;
R
Richard W.M. Jones 已提交
5086 5087
    }

5088
    if (virAsprintf(&tmp, "%s/qemu.mem.XXXXXX", driver->cacheDir) < 0) {
5089
        virReportOOMError();
5090
        goto endjob;
5091 5092
    }

R
Richard W.M. Jones 已提交
5093 5094
    /* Create a temporary filename. */
    if ((fd = mkstemp (tmp)) == -1) {
5095 5096
        virReportSystemError(errno,
                             _("mkstemp(\"%s\") failed"), tmp);
5097
        goto endjob;
R
Richard W.M. Jones 已提交
5098 5099
    }

5100
    qemuDomainObjPrivatePtr priv = vm->privateData;
5101
    qemuDomainObjEnterMonitor(vm);
5102
    if (flags == VIR_MEMORY_VIRTUAL) {
5103 5104
        if (qemuMonitorSaveVirtualMemory(priv->mon, offset, size, tmp) < 0) {
            qemuDomainObjExitMonitor(vm);
5105
            goto endjob;
5106
        }
5107
    } else {
5108 5109
        if (qemuMonitorSavePhysicalMemory(priv->mon, offset, size, tmp) < 0) {
            qemuDomainObjExitMonitor(vm);
5110
            goto endjob;
5111
        }
R
Richard W.M. Jones 已提交
5112
    }
5113
    qemuDomainObjExitMonitor(vm);
R
Richard W.M. Jones 已提交
5114 5115 5116

    /* Read the memory file into buffer. */
    if (saferead (fd, buffer, size) == (ssize_t) -1) {
5117 5118 5119
        virReportSystemError(errno,
                             _("failed to read temporary file "
                               "created with template %s"), tmp);
5120
        goto endjob;
R
Richard W.M. Jones 已提交
5121 5122 5123
    }

    ret = 0;
5124

5125
endjob:
5126 5127
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
5128

5129
cleanup:
5130
    VIR_FREE(tmp);
5131
    VIR_FORCE_CLOSE(fd);
R
Richard W.M. Jones 已提交
5132
    unlink (tmp);
5133 5134
    if (vm)
        virDomainObjUnlock(vm);
R
Richard W.M. Jones 已提交
5135 5136 5137
    return ret;
}

5138

5139 5140 5141 5142 5143 5144 5145 5146 5147 5148
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;
5149
    virDomainDiskDefPtr disk = NULL;
5150 5151
    struct stat sb;
    int i;
5152
    int format;
5153 5154 5155 5156 5157 5158 5159 5160 5161 5162 5163 5164 5165 5166 5167 5168 5169 5170 5171 5172 5173 5174 5175 5176

    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)) {
5177
            disk = vm->def->disks[i];
5178 5179 5180 5181
            break;
        }
    }

5182
    if (!disk) {
5183 5184 5185 5186 5187 5188 5189 5190 5191 5192 5193 5194 5195 5196
        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 */
5197 5198 5199 5200 5201 5202 5203 5204
    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 {
5205 5206 5207 5208 5209 5210 5211
        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);
5212
            goto cleanup;
5213
        }
5214 5215 5216 5217 5218
    }

    if (virStorageFileGetMetadataFromFD(path, fd,
                                        format,
                                        &meta) < 0)
5219 5220 5221 5222 5223 5224 5225 5226 5227 5228
        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)) {
5229
#ifndef WIN32
5230 5231 5232 5233 5234 5235 5236 5237 5238 5239 5240 5241 5242 5243 5244 5245 5246 5247 5248 5249 5250 5251 5252 5253 5254 5255 5256 5257
        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;

5258
    /* Set default value .. */
5259 5260
    info->allocation = info->physical;

5261 5262 5263
    /* ..but if guest is running & not using raw
       disk format and on a block device, then query
       highest allocated extent from QEMU */
5264
    if (disk->type == VIR_DOMAIN_DISK_TYPE_BLOCK &&
5265
        format != VIR_STORAGE_FILE_RAW &&
5266 5267 5268 5269
        S_ISBLK(sb.st_mode)) {
        qemuDomainObjPrivatePtr priv = vm->privateData;
        if (qemuDomainObjBeginJob(vm) < 0)
            goto cleanup;
5270 5271 5272 5273 5274 5275 5276 5277 5278
        if (!virDomainObjIsActive(vm))
            ret = 0;
        else {
            qemuDomainObjEnterMonitor(vm);
            ret = qemuMonitorGetBlockExtent(priv->mon,
                                            disk->info.alias,
                                            &info->allocation);
            qemuDomainObjExitMonitor(vm);
        }
5279 5280 5281 5282 5283 5284

        if (qemuDomainObjEndJob(vm) == 0)
            vm = NULL;
    } else {
        ret = 0;
    }
5285 5286

cleanup:
5287
    VIR_FORCE_CLOSE(fd);
5288 5289 5290 5291 5292 5293
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}


5294
static int
5295 5296 5297 5298
qemuDomainEventRegister(virConnectPtr conn,
                        virConnectDomainEventCallback callback,
                        void *opaque,
                        virFreeCallback freecb)
5299
{
5300 5301 5302
    struct qemud_driver *driver = conn->privateData;
    int ret;

5303
    qemuDriverLock(driver);
5304 5305
    ret = virDomainEventCallbackListAdd(conn, driver->domainEventCallbacks,
                                        callback, opaque, freecb);
5306
    qemuDriverUnlock(driver);
5307

5308
    return ret;
5309 5310
}

5311

5312
static int
5313 5314
qemuDomainEventDeregister(virConnectPtr conn,
                          virConnectDomainEventCallback callback)
5315
{
5316 5317 5318
    struct qemud_driver *driver = conn->privateData;
    int ret;

5319
    qemuDriverLock(driver);
5320 5321 5322 5323 5324 5325
    if (driver->domainEventDispatching)
        ret = virDomainEventCallbackListMarkDelete(conn, driver->domainEventCallbacks,
                                                   callback);
    else
        ret = virDomainEventCallbackListRemove(conn, driver->domainEventCallbacks,
                                               callback);
5326
    qemuDriverUnlock(driver);
5327

5328
    return ret;
5329 5330
}

5331 5332 5333 5334 5335 5336 5337 5338 5339 5340 5341 5342 5343 5344 5345 5346 5347 5348 5349 5350 5351 5352 5353 5354 5355 5356 5357 5358 5359 5360 5361 5362 5363 5364 5365 5366 5367 5368 5369 5370 5371 5372 5373

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

C
Chris Lalancette 已提交
5376 5377 5378 5379 5380 5381 5382 5383 5384 5385 5386 5387 5388 5389 5390
/* 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;
5391

C
Chris Lalancette 已提交
5392
    if (!dom_xml) {
5393 5394
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("no domain XML passed"));
C
Chris Lalancette 已提交
5395 5396 5397
        goto cleanup;
    }
    if (!(flags & VIR_MIGRATE_TUNNELLED)) {
5398
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
C
Chris Lalancette 已提交
5399 5400 5401 5402
                         "%s", _("PrepareTunnel called but no TUNNELLED flag set"));
        goto cleanup;
    }
    if (st == NULL) {
5403 5404
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("tunnelled migration requested but NULL stream passed"));
C
Chris Lalancette 已提交
5405 5406 5407
        goto cleanup;
    }

5408 5409 5410 5411
    qemuDriverLock(driver);
    ret = qemuMigrationPrepareTunnel(driver, dconn, st,
                                     dname, dom_xml);
    qemuDriverUnlock(driver);
5412

C
Chris Lalancette 已提交
5413 5414 5415 5416
cleanup:
    return ret;
}

D
Daniel Veillard 已提交
5417 5418 5419 5420
/* Prepare is the first step, and it runs on the destination host.
 *
 * This starts an empty VM listening on a TCP port.
 */
5421
static int ATTRIBUTE_NONNULL (5)
D
Daniel Veillard 已提交
5422 5423 5424 5425 5426
qemudDomainMigratePrepare2 (virConnectPtr dconn,
                            char **cookie ATTRIBUTE_UNUSED,
                            int *cookielen ATTRIBUTE_UNUSED,
                            const char *uri_in,
                            char **uri_out,
C
Chris Lalancette 已提交
5427
                            unsigned long flags,
D
Daniel Veillard 已提交
5428 5429 5430 5431
                            const char *dname,
                            unsigned long resource ATTRIBUTE_UNUSED,
                            const char *dom_xml)
{
5432
    struct qemud_driver *driver = dconn->privateData;
5433
    int ret = -1;
5434

C
Chris Lalancette 已提交
5435 5436 5437 5438 5439 5440 5441 5442 5443
    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);

5444
    *uri_out = NULL;
D
Daniel Veillard 已提交
5445

5446
    qemuDriverLock(driver);
C
Chris Lalancette 已提交
5447 5448 5449 5450
    if (flags & VIR_MIGRATE_TUNNELLED) {
        /* this is a logical error; we never should have gotten here with
         * VIR_MIGRATE_TUNNELLED set
         */
5451 5452
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("Tunnelled migration requested but invalid RPC method called"));
C
Chris Lalancette 已提交
5453 5454 5455
        goto cleanup;
    }

D
Daniel Veillard 已提交
5456
    if (!dom_xml) {
5457 5458
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("no domain XML passed"));
5459
        goto cleanup;
D
Daniel Veillard 已提交
5460 5461
    }

5462 5463 5464
    ret = qemuMigrationPrepareDirect(driver, dconn,
                                     uri_in, uri_out,
                                     dname, dom_xml);
D
Daniel Veillard 已提交
5465

5466 5467 5468 5469
cleanup:
    qemuDriverUnlock(driver);
    return ret;
}
C
Chris Lalancette 已提交
5470

D
Daniel Veillard 已提交
5471

5472 5473 5474 5475 5476 5477 5478 5479 5480 5481 5482 5483 5484
/* 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;
5485

5486 5487 5488 5489 5490 5491 5492 5493
    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 已提交
5494

5495
    qemuDriverLock(driver);
5496
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
D
Daniel Veillard 已提交
5497
    if (!vm) {
5498 5499
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
5500 5501
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
5502
        goto cleanup;
D
Daniel Veillard 已提交
5503 5504
    }

5505 5506 5507
    ret = qemuMigrationPerform(driver, dom->conn, vm,
                               uri, flags,
                               dname, resource);
5508

5509
cleanup:
5510
    qemuDriverUnlock(driver);
5511
    return ret;
D
Daniel Veillard 已提交
5512 5513
}

5514

D
Daniel Veillard 已提交
5515 5516 5517 5518 5519 5520 5521
/* 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 已提交
5522
                           unsigned long flags,
D
Daniel Veillard 已提交
5523 5524
                           int retcode)
{
5525 5526 5527
    struct qemud_driver *driver = dconn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;
5528
    virErrorPtr orig_err;
D
Daniel Veillard 已提交
5529

C
Chris Lalancette 已提交
5530 5531 5532 5533 5534 5535 5536 5537 5538
    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);

5539 5540 5541
    /* Migration failed. Save the current error so nothing squashes it */
    orig_err = virSaveLastError();

5542
    qemuDriverLock(driver);
5543
    vm = virDomainFindByName(&driver->domains, dname);
D
Daniel Veillard 已提交
5544
    if (!vm) {
5545 5546
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching name '%s'"), dname);
5547
        goto cleanup;
D
Daniel Veillard 已提交
5548 5549
    }

5550
    dom = qemuMigrationFinish(driver, dconn, vm, flags, retcode);
5551

5552
cleanup:
5553 5554 5555 5556
    if (orig_err) {
        virSetError(orig_err);
        virFreeError(orig_err);
    }
5557
    qemuDriverUnlock(driver);
5558
    return dom;
D
Daniel Veillard 已提交
5559 5560
}

5561

5562 5563 5564 5565 5566 5567 5568 5569 5570 5571 5572 5573 5574 5575 5576 5577
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;

5578
    def = virNodeDeviceDefParseString(xml, EXISTING_DEVICE);
5579 5580 5581 5582 5583 5584 5585 5586 5587 5588 5589 5590 5591 5592 5593 5594 5595
    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) {
5596 5597
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("device %s is not a PCI device"), dev->name);
5598 5599 5600 5601 5602 5603 5604 5605 5606 5607 5608 5609 5610
        goto out;
    }

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

static int
qemudNodeDeviceDettach (virNodeDevicePtr dev)
{
5611
    struct qemud_driver *driver = dev->conn->privateData;
5612 5613 5614 5615 5616 5617 5618
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

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

5619
    pci = pciGetDevice(domain, bus, slot, function);
5620 5621 5622
    if (!pci)
        return -1;

5623 5624
    qemuDriverLock(driver);
    if (pciDettachDevice(pci, driver->activePciHostdevs) < 0)
5625 5626 5627 5628
        goto out;

    ret = 0;
out:
5629
    qemuDriverUnlock(driver);
5630
    pciFreeDevice(pci);
5631 5632 5633 5634 5635 5636
    return ret;
}

static int
qemudNodeDeviceReAttach (virNodeDevicePtr dev)
{
5637
    struct qemud_driver *driver = dev->conn->privateData;
5638 5639 5640 5641 5642 5643 5644
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

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

5645
    pci = pciGetDevice(domain, bus, slot, function);
5646 5647 5648
    if (!pci)
        return -1;

5649 5650
    qemuDriverLock(driver);
    if (pciReAttachDevice(pci, driver->activePciHostdevs) < 0)
5651 5652 5653 5654
        goto out;

    ret = 0;
out:
5655
    qemuDriverUnlock(driver);
5656
    pciFreeDevice(pci);
5657 5658 5659 5660 5661 5662
    return ret;
}

static int
qemudNodeDeviceReset (virNodeDevicePtr dev)
{
5663
    struct qemud_driver *driver = dev->conn->privateData;
5664 5665 5666 5667 5668 5669 5670
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

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

5671
    pci = pciGetDevice(domain, bus, slot, function);
5672 5673 5674
    if (!pci)
        return -1;

5675 5676
    qemuDriverLock(driver);

5677
    if (pciResetDevice(pci, driver->activePciHostdevs, NULL) < 0)
5678 5679 5680 5681
        goto out;

    ret = 0;
out:
5682
    qemuDriverUnlock(driver);
5683
    pciFreeDevice(pci);
5684 5685 5686
    return ret;
}

5687 5688 5689 5690 5691 5692 5693 5694 5695 5696 5697
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) {
5698 5699
        qemuReportError(VIR_ERR_NO_SUPPORT,
                        "%s", _("cannot get host CPU capabilities"));
5700 5701
    }
    else
5702
        ret = cpuCompareXML(driver->caps->host.cpu, xmlDesc);
5703 5704 5705 5706 5707 5708

    qemuDriverUnlock(driver);

    return ret;
}

5709

5710 5711 5712 5713 5714 5715 5716 5717 5718 5719 5720 5721 5722
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;
}

5723 5724 5725 5726 5727 5728 5729 5730 5731 5732 5733 5734 5735 5736 5737 5738 5739 5740 5741 5742 5743 5744 5745

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) {
5746 5747
            struct timeval now;

5748
            memcpy(info, &priv->jobInfo, sizeof(*info));
5749 5750 5751 5752 5753 5754 5755 5756 5757 5758 5759

            /* 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;
            }
5760
            info->timeElapsed = timeval_to_ms(now) - priv->jobStart;
5761 5762 5763 5764 5765 5766 5767 5768 5769 5770 5771 5772 5773 5774 5775 5776 5777 5778 5779
        } 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;
}


5780 5781 5782 5783 5784 5785 5786 5787 5788 5789 5790 5791 5792 5793 5794 5795 5796 5797 5798 5799 5800 5801
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);
5802
            priv->jobSignals |= QEMU_JOB_SIGNAL_CANCEL;
5803 5804 5805 5806 5807 5808 5809 5810 5811 5812 5813 5814 5815 5816 5817 5818 5819 5820 5821 5822
        } 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;
}


5823 5824 5825 5826 5827 5828 5829 5830 5831 5832
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;

5833
    virCheckFlags(0, -1);
5834 5835 5836 5837 5838 5839 5840 5841 5842 5843 5844 5845 5846 5847 5848 5849 5850 5851 5852 5853

    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;

5854
    if (priv->jobActive != QEMU_JOB_MIGRATION_OUT) {
5855 5856 5857 5858 5859 5860 5861 5862 5863 5864 5865 5866 5867 5868 5869 5870 5871
        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 已提交
5872 5873 5874 5875 5876 5877 5878 5879 5880 5881 5882 5883 5884 5885
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;
}

5886 5887 5888
static int qemuDomainSnapshotWriteMetadata(virDomainObjPtr vm,
                                           virDomainSnapshotObjPtr snapshot,
                                           char *snapshotDir)
C
Chris Lalancette 已提交
5889 5890 5891 5892 5893 5894 5895 5896 5897 5898
{
    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);
5899
    newxml = virDomainSnapshotDefFormat(uuidstr, snapshot->def, 1);
C
Chris Lalancette 已提交
5900 5901 5902 5903 5904 5905 5906 5907 5908 5909 5910 5911 5912 5913 5914 5915
    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;
    }

5916
    if (virAsprintf(&snapFile, "%s/%s.xml", snapDir, snapshot->def->name) < 0) {
C
Chris Lalancette 已提交
5917 5918 5919 5920 5921 5922 5923 5924 5925 5926 5927 5928 5929 5930 5931 5932 5933 5934 5935 5936 5937
        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);
5938
    VIR_FORCE_CLOSE(fd);
C
Chris Lalancette 已提交
5939 5940 5941
    return ret;
}

5942 5943
static int qemuDomainSnapshotSetCurrentActive(virDomainObjPtr vm,
                                              char *snapshotDir)
C
Chris Lalancette 已提交
5944 5945 5946 5947
{
    if (vm->current_snapshot) {
        vm->current_snapshot->def->active = 1;

5948 5949
        return qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                               snapshotDir);
C
Chris Lalancette 已提交
5950 5951 5952 5953 5954
    }

    return 0;
}

5955 5956
static int qemuDomainSnapshotSetCurrentInactive(virDomainObjPtr vm,
                                                char *snapshotDir)
C
Chris Lalancette 已提交
5957 5958 5959 5960
{
    if (vm->current_snapshot) {
        vm->current_snapshot->def->active = 0;

5961 5962
        return qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                               snapshotDir);
C
Chris Lalancette 已提交
5963 5964 5965 5966 5967 5968 5969 5970 5971 5972 5973 5974 5975 5976 5977 5978 5979 5980 5981
    }

    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,
5982 5983
                            _("Disk '%s' does not support snapshotting"),
                            vm->def->disks[i]->src);
C
Chris Lalancette 已提交
5984 5985 5986 5987 5988 5989 5990 5991 5992
            return 0;
        }
    }

    return 1;
}

static virDomainSnapshotPtr qemuDomainSnapshotCreateXML(virDomainPtr domain,
                                                        const char *xmlDesc,
5993
                                                        unsigned int flags)
C
Chris Lalancette 已提交
5994 5995 5996 5997 5998 5999 6000 6001 6002 6003
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    virDomainSnapshotObjPtr snap = NULL;
    virDomainSnapshotPtr snapshot = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];
    virDomainSnapshotDefPtr def;
    const char *qemuimgarg[] = { NULL, "snapshot", "-c", NULL, NULL, NULL };
    int i;

6004 6005
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
6006 6007 6008 6009 6010 6011 6012 6013 6014 6015 6016 6017 6018 6019 6020 6021 6022 6023 6024 6025 6026 6027 6028 6029 6030 6031 6032 6033 6034 6035 6036 6037 6038 6039 6040 6041 6042 6043 6044 6045 6046 6047 6048 6049 6050 6051 6052 6053 6054 6055 6056 6057 6058 6059 6060 6061 6062
    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;

    /* actually do the snapshot */
    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 */
            /* 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;
                }
            }
        }
    }
    else {
6063 6064 6065 6066 6067
        qemuDomainObjPrivatePtr priv;
        int ret;

        if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
            goto cleanup;
C
Chris Lalancette 已提交
6068 6069
        priv = vm->privateData;
        qemuDomainObjEnterMonitorWithDriver(driver, vm);
6070
        ret = qemuMonitorCreateSnapshot(priv->mon, def->name);
C
Chris Lalancette 已提交
6071
        qemuDomainObjExitMonitorWithDriver(driver, vm);
6072
        if (qemuDomainObjEndJob(vm) == 0) {
6073
            vm = NULL;
6074 6075
            goto cleanup;
        }
6076 6077
        if (ret < 0)
            goto cleanup;
C
Chris Lalancette 已提交
6078 6079 6080 6081 6082 6083 6084 6085 6086 6087 6088 6089 6090 6091 6092 6093 6094 6095 6096 6097
    }

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

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

6098 6099 6100
    if (qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                        driver->snapshotDir) < 0)
        /* qemuDomainSnapshotWriteMetadata set the error */
C
Chris Lalancette 已提交
6101 6102 6103 6104 6105 6106 6107 6108 6109 6110 6111 6112 6113 6114
        goto cleanup;

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

cleanup:
    VIR_FREE(qemuimgarg[0]);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return snapshot;
}

static int qemuDomainSnapshotListNames(virDomainPtr domain, char **names,
                                       int nameslen,
6115
                                       unsigned int flags)
C
Chris Lalancette 已提交
6116 6117 6118 6119 6120
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int n = -1;

6121 6122
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
6123 6124 6125 6126 6127 6128 6129 6130 6131 6132 6133 6134 6135 6136 6137 6138 6139 6140 6141 6142
    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,
6143
                                 unsigned int flags)
C
Chris Lalancette 已提交
6144 6145 6146 6147 6148
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int n = -1;

6149 6150
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
6151 6152 6153 6154 6155 6156 6157 6158 6159 6160 6161 6162 6163 6164 6165 6166 6167 6168 6169 6170 6171
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, domain->uuid);
    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(domain->uuid, uuidstr);
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
        goto cleanup;
    }

    n = virDomainSnapshotObjListNum(&vm->snapshots);

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

static virDomainSnapshotPtr qemuDomainSnapshotLookupByName(virDomainPtr domain,
                                                           const char *name,
6172
                                                           unsigned int flags)
C
Chris Lalancette 已提交
6173 6174 6175 6176 6177 6178
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    virDomainSnapshotObjPtr snap = NULL;
    virDomainSnapshotPtr snapshot = NULL;

6179 6180
    virCheckFlags(0, NULL);

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

6214 6215
    virCheckFlags(0, -1);

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

6242 6243
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
6244 6245 6246 6247 6248 6249 6250 6251 6252 6253 6254 6255 6256 6257 6258 6259 6260 6261 6262 6263 6264 6265 6266 6267 6268 6269
    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,
6270
                                       unsigned int flags)
C
Chris Lalancette 已提交
6271 6272 6273 6274 6275 6276 6277
{
    struct qemud_driver *driver = snapshot->domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    char *xml = NULL;
    virDomainSnapshotObjPtr snap = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];

6278 6279
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
6280 6281 6282 6283 6284 6285 6286 6287 6288 6289 6290 6291 6292 6293 6294 6295 6296 6297 6298 6299 6300 6301 6302 6303 6304 6305 6306
    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,
6307
                                      unsigned int flags)
C
Chris Lalancette 已提交
6308 6309 6310 6311 6312 6313 6314 6315 6316 6317
{
    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;

6318 6319
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
6320 6321 6322 6323 6324 6325 6326 6327 6328 6329 6330 6331 6332 6333 6334 6335 6336 6337 6338 6339 6340 6341 6342 6343 6344 6345 6346 6347 6348 6349 6350
    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)
6351
                goto endjob;
C
Chris Lalancette 已提交
6352 6353
        }
        else {
6354
            if (qemuDomainSnapshotSetCurrentActive(vm, driver->snapshotDir) < 0)
6355
                goto endjob;
C
Chris Lalancette 已提交
6356

6357 6358
            rc = qemuProcessStart(snapshot->domain->conn, driver, vm, NULL,
                                  false, -1, NULL, VIR_VM_OP_CREATE);
6359
            qemuAuditDomainStart(vm, "from-snapshot", rc >= 0);
6360
            if (qemuDomainSnapshotSetCurrentInactive(vm, driver->snapshotDir) < 0)
6361
                goto endjob;
C
Chris Lalancette 已提交
6362
            if (rc < 0)
6363
                goto endjob;
C
Chris Lalancette 已提交
6364 6365 6366 6367 6368 6369
        }

        if (snap->def->state == VIR_DOMAIN_PAUSED) {
            /* qemu unconditionally starts the domain running again after
             * loadvm, so let's pause it to keep consistency
             */
6370
            rc = qemuProcessStopCPUs(driver, vm);
H
Hu Tao 已提交
6371
            if (rc < 0)
6372
                goto endjob;
C
Chris Lalancette 已提交
6373 6374 6375 6376 6377 6378 6379 6380 6381 6382 6383 6384 6385 6386 6387 6388 6389 6390
        }

        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)) {
6391
            qemuProcessStop(driver, vm, 0);
6392
            qemuAuditDomainStop(vm, "from-snapshot");
C
Chris Lalancette 已提交
6393 6394 6395
            event = virDomainEventNewFromObj(vm,
                                             VIR_DOMAIN_EVENT_STOPPED,
                                             VIR_DOMAIN_EVENT_STOPPED_FROM_SNAPSHOT);
6396 6397 6398 6399
            if (!vm->persistent) {
                if (qemuDomainObjEndJob(vm) > 0)
                    virDomainRemoveInactive(&driver->domains, vm);
                vm = NULL;
6400
                goto cleanup;
6401
            }
C
Chris Lalancette 已提交
6402 6403
        }

6404
        if (qemuDomainSnapshotSetCurrentActive(vm, driver->snapshotDir) < 0)
6405
            goto endjob;
C
Chris Lalancette 已提交
6406 6407 6408 6409 6410 6411
    }

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

    ret = 0;

6412
endjob:
C
Chris Lalancette 已提交
6413 6414 6415
    if (vm && qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

6416
cleanup:
C
Chris Lalancette 已提交
6417 6418 6419 6420 6421 6422 6423 6424 6425 6426 6427 6428 6429 6430 6431 6432 6433 6434 6435 6436 6437 6438 6439 6440 6441 6442 6443 6444 6445 6446 6447 6448 6449 6450 6451 6452 6453 6454 6455 6456 6457 6458 6459 6460 6461 6462 6463 6464 6465 6466 6467 6468 6469 6470 6471 6472 6473 6474 6475 6476 6477 6478 6479 6480 6481 6482 6483 6484 6485 6486 6487 6488 6489 6490 6491 6492 6493 6494 6495 6496 6497 6498 6499 6500 6501 6502 6503 6504 6505 6506 6507 6508 6509 6510 6511 6512 6513 6514 6515 6516 6517 6518
    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,
6519
                                              const void *name ATTRIBUTE_UNUSED,
C
Chris Lalancette 已提交
6520 6521 6522 6523 6524 6525 6526 6527 6528 6529 6530 6531 6532 6533 6534 6535 6536 6537 6538 6539 6540
                                              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);
    }
}

6541 6542 6543 6544 6545 6546 6547 6548 6549
struct snap_reparent {
    struct qemud_driver *driver;
    virDomainSnapshotObjPtr snap;
    virDomainObjPtr vm;
    int err;
};

static void
qemuDomainSnapshotReparentChildren(void *payload,
6550
                                   const void *name ATTRIBUTE_UNUSED,
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
                                   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 已提交
6578 6579 6580 6581 6582 6583 6584 6585 6586
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;
6587
    struct snap_reparent rep;
C
Chris Lalancette 已提交
6588

6589 6590
    virCheckFlags(VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN, -1);

C
Chris Lalancette 已提交
6591 6592 6593 6594 6595 6596 6597 6598 6599 6600 6601 6602 6603 6604 6605 6606 6607
    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;
    }

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

C
Chris Lalancette 已提交
6611 6612 6613 6614 6615 6616 6617 6618
    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)
6619
            goto endjob;
6620 6621 6622 6623 6624 6625 6626 6627 6628
    } 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 已提交
6629 6630 6631 6632
    }

    ret = qemuDomainSnapshotDiscard(driver, vm, snap);

6633 6634 6635 6636
endjob:
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

C
Chris Lalancette 已提交
6637 6638 6639 6640 6641 6642
cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}
6643

6644 6645 6646 6647 6648 6649 6650
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;
6651
    bool hmp;
6652

6653
    virCheckFlags(VIR_DOMAIN_QEMU_MONITOR_COMMAND_HMP, -1);
6654 6655 6656 6657 6658 6659 6660 6661 6662 6663 6664 6665 6666 6667 6668 6669 6670 6671 6672 6673 6674 6675 6676 6677 6678

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

6679 6680
    hmp = !!(flags & VIR_DOMAIN_QEMU_MONITOR_COMMAND_HMP);

6681 6682 6683
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
6684
    ret = qemuMonitorArbitraryCommand(priv->mon, cmd, result, hmp);
6685 6686 6687 6688 6689 6690 6691 6692 6693 6694 6695 6696 6697
    qemuDomainObjExitMonitorWithDriver(driver, vm);
    if (qemuDomainObjEndJob(vm) == 0) {
        vm = NULL;
        goto cleanup;
    }

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

6698 6699 6700 6701 6702 6703 6704 6705 6706 6707 6708 6709 6710 6711 6712 6713 6714 6715 6716 6717 6718 6719 6720 6721 6722 6723 6724 6725 6726 6727 6728 6729 6730 6731 6732 6733 6734 6735 6736 6737 6738 6739 6740 6741 6742 6743 6744 6745 6746 6747 6748 6749 6750 6751 6752 6753 6754

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

6755
    if (chr->source.type != VIR_DOMAIN_CHR_TYPE_PTY) {
6756 6757 6758 6759 6760 6761
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("character device %s is not using a PTY"),
                        NULLSTR(devname));
        goto cleanup;
    }

6762
    if (virFDStreamOpenFile(st, chr->source.data.file.path, O_RDWR) < 0)
6763 6764 6765 6766 6767 6768 6769 6770 6771 6772 6773
        goto cleanup;

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


6774 6775 6776 6777 6778
static virDriver qemuDriver = {
    VIR_DRV_QEMU,
    "QEMU",
    qemudOpen, /* open */
    qemudClose, /* close */
D
Daniel Veillard 已提交
6779
    qemudSupportsFeature, /* supports_feature */
6780 6781
    qemudGetType, /* type */
    qemudGetVersion, /* version */
6782
    NULL, /* libvirtVersion (impl. in libvirt.c) */
6783
    virGetHostname, /* getHostname */
E
Eric Blake 已提交
6784
    qemuGetSysinfo, /* getSysinfo */
6785
    qemudGetMaxVCPUs, /* getMaxVcpus */
6786
    nodeGetInfo, /* nodeGetInfo */
6787 6788 6789
    qemudGetCapabilities, /* getCapabilities */
    qemudListDomains, /* listDomains */
    qemudNumDomains, /* numOfDomains */
6790
    qemudDomainCreate, /* domainCreateXML */
6791 6792 6793 6794 6795
    qemudDomainLookupByID, /* domainLookupByID */
    qemudDomainLookupByUUID, /* domainLookupByUUID */
    qemudDomainLookupByName, /* domainLookupByName */
    qemudDomainSuspend, /* domainSuspend */
    qemudDomainResume, /* domainResume */
6796
    qemudDomainShutdown, /* domainShutdown */
6797 6798 6799
    NULL, /* domainReboot */
    qemudDomainDestroy, /* domainDestroy */
    qemudDomainGetOSType, /* domainGetOSType */
6800
    qemudDomainGetMaxMemory, /* domainGetMaxMemory */
6801
    NULL, /* domainSetMaxMemory */
6802
    qemudDomainSetMemory, /* domainSetMemory */
6803 6804 6805
    qemudDomainGetInfo, /* domainGetInfo */
    qemudDomainSave, /* domainSave */
    qemudDomainRestore, /* domainRestore */
P
Paolo Bonzini 已提交
6806
    qemudDomainCoreDump, /* domainCoreDump */
6807
    qemudDomainSetVcpus, /* domainSetVcpus */
6808 6809
    qemudDomainSetVcpusFlags, /* domainSetVcpusFlags */
    qemudDomainGetVcpusFlags, /* domainGetVcpusFlags */
6810 6811
    qemudDomainPinVcpu, /* domainPinVcpu */
    qemudDomainGetVcpus, /* domainGetVcpus */
6812
    qemudDomainGetMaxVcpus, /* domainGetMaxVcpus */
6813 6814
    qemudDomainGetSecurityLabel, /* domainGetSecurityLabel */
    qemudNodeGetSecurityModel, /* nodeGetSecurityModel */
6815
    qemudDomainDumpXML, /* domainDumpXML */
6816
    qemuDomainXMLFromNative, /* domainXmlFromNative */
6817
    qemuDomainXMLToNative, /* domainXMLToNative */
6818 6819
    qemudListDefinedDomains, /* listDefinedDomains */
    qemudNumDefinedDomains, /* numOfDefinedDomains */
6820
    qemudDomainStart, /* domainCreate */
6821
    qemudDomainStartWithFlags, /* domainCreateWithFlags */
6822 6823
    qemudDomainDefine, /* domainDefineXML */
    qemudDomainUndefine, /* domainUndefine */
6824
    qemudDomainAttachDevice, /* domainAttachDevice */
6825
    qemudDomainAttachDeviceFlags, /* domainAttachDeviceFlags */
6826
    qemudDomainDetachDevice, /* domainDetachDevice */
6827
    qemudDomainDetachDeviceFlags, /* domainDetachDeviceFlags */
6828
    qemuDomainUpdateDeviceFlags, /* domainUpdateDeviceFlags */
6829 6830
    qemudDomainGetAutostart, /* domainGetAutostart */
    qemudDomainSetAutostart, /* domainSetAutostart */
6831 6832 6833
    qemuGetSchedulerType, /* domainGetSchedulerType */
    qemuGetSchedulerParameters, /* domainGetSchedulerParameters */
    qemuSetSchedulerParameters, /* domainSetSchedulerParameters */
D
Daniel Veillard 已提交
6834 6835
    NULL, /* domainMigratePrepare (v1) */
    qemudDomainMigratePerform, /* domainMigratePerform */
6836
    NULL, /* domainMigrateFinish */
6837
    qemudDomainBlockStats, /* domainBlockStats */
6838
    qemudDomainInterfaceStats, /* domainInterfaceStats */
6839
    qemudDomainMemoryStats, /* domainMemoryStats */
6840
    qemudDomainBlockPeek, /* domainBlockPeek */
R
Richard W.M. Jones 已提交
6841
    qemudDomainMemoryPeek, /* domainMemoryPeek */
6842
    qemuDomainGetBlockInfo, /* domainGetBlockInfo */
6843 6844
    nodeGetCellsFreeMemory, /* nodeGetCellsFreeMemory */
    nodeGetFreeMemory,  /* getFreeMemory */
6845 6846
    qemuDomainEventRegister, /* domainEventRegister */
    qemuDomainEventDeregister, /* domainEventDeregister */
D
Daniel Veillard 已提交
6847 6848
    qemudDomainMigratePrepare2, /* domainMigratePrepare2 */
    qemudDomainMigrateFinish2, /* domainMigrateFinish2 */
6849 6850 6851
    qemudNodeDeviceDettach, /* nodeDeviceDettach */
    qemudNodeDeviceReAttach, /* nodeDeviceReAttach */
    qemudNodeDeviceReset, /* nodeDeviceReset */
C
Chris Lalancette 已提交
6852
    qemudDomainMigratePrepareTunnel, /* domainMigratePrepareTunnel */
6853 6854 6855 6856
    qemuIsEncrypted, /* isEncrypted */
    qemuIsSecure, /* isSecure */
    qemuDomainIsActive, /* domainIsActive */
    qemuDomainIsPersistent, /* domainIsPersistent */
6857
    qemuDomainIsUpdated, /* domainIsUpdated */
6858
    qemuCPUCompare, /* cpuCompare */
6859
    qemuCPUBaseline, /* cpuBaseline */
6860
    qemuDomainGetJobInfo, /* domainGetJobInfo */
6861
    qemuDomainAbortJob, /* domainAbortJob */
6862
    qemuDomainMigrateSetMaxDowntime, /* domainMigrateSetMaxDowntime */
6863 6864
    qemuDomainEventRegisterAny, /* domainEventRegisterAny */
    qemuDomainEventDeregisterAny, /* domainEventDeregisterAny */
6865 6866 6867
    qemuDomainManagedSave, /* domainManagedSave */
    qemuDomainHasManagedSaveImage, /* domainHasManagedSaveImage */
    qemuDomainManagedSaveRemove, /* domainManagedSaveRemove */
C
Chris Lalancette 已提交
6868 6869 6870 6871 6872 6873 6874 6875 6876
    qemuDomainSnapshotCreateXML, /* domainSnapshotCreateXML */
    qemuDomainSnapshotDumpXML, /* domainSnapshotDumpXML */
    qemuDomainSnapshotNum, /* domainSnapshotNum */
    qemuDomainSnapshotListNames, /* domainSnapshotListNames */
    qemuDomainSnapshotLookupByName, /* domainSnapshotLookupByName */
    qemuDomainHasCurrentSnapshot, /* domainHasCurrentSnapshot */
    qemuDomainSnapshotCurrent, /* domainSnapshotCurrent */
    qemuDomainRevertToSnapshot, /* domainRevertToSnapshot */
    qemuDomainSnapshotDelete, /* domainSnapshotDelete */
6877
    qemuDomainMonitorCommand, /* qemuDomainMonitorCommand */
6878
    qemuDomainSetMemoryParameters, /* domainSetMemoryParameters */
6879
    qemuDomainGetMemoryParameters, /* domainGetMemoryParameters */
6880
    qemuDomainOpenConsole, /* domainOpenConsole */
6881 6882 6883
};


6884
static virStateDriver qemuStateDriver = {
6885
    .name = "QEMU",
6886 6887 6888 6889
    .initialize = qemudStartup,
    .cleanup = qemudShutdown,
    .reload = qemudReload,
    .active = qemudActive,
6890
};
6891

6892
static void
6893
qemuVMDriverLock(void) {
6894 6895 6896 6897 6898
    qemuDriverLock(qemu_driver);
};


static void
6899
qemuVMDriverUnlock(void) {
6900 6901 6902 6903
    qemuDriverUnlock(qemu_driver);
};


6904 6905 6906 6907 6908 6909 6910 6911 6912
static int
qemuVMFilterRebuild(virConnectPtr conn ATTRIBUTE_UNUSED,
                    virHashIterator iter, void *data)
{
    virHashForEach(qemu_driver->domains.objs, iter, data);

    return 0;
}

S
Stefan Berger 已提交
6913 6914
static virNWFilterCallbackDriver qemuCallbackDriver = {
    .name = "QEMU",
6915 6916 6917
    .vmFilterRebuild = qemuVMFilterRebuild,
    .vmDriverLock = qemuVMDriverLock,
    .vmDriverUnlock = qemuVMDriverUnlock,
S
Stefan Berger 已提交
6918 6919
};

6920
int qemuRegister(void) {
6921 6922
    virRegisterDriver(&qemuDriver);
    virRegisterStateDriver(&qemuStateDriver);
S
Stefan Berger 已提交
6923
    virNWFilterRegisterCallbackDriver(&qemuCallbackDriver);
6924 6925
    return 0;
}