qemu_driver.c 321.1 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
#include <dirent.h>
#include <limits.h>
#include <string.h>
32
#include <stdbool.h>
D
Daniel P. Berrange 已提交
33 34 35 36 37
#include <stdio.h>
#include <stdarg.h>
#include <stdlib.h>
#include <unistd.h>
#include <errno.h>
38
#include <sys/utsname.h>
39 40 41 42
#include <sys/stat.h>
#include <fcntl.h>
#include <signal.h>
#include <paths.h>
43
#include <stdio.h>
44
#include <sys/wait.h>
45
#include <sys/ioctl.h>
46
#include <sys/un.h>
D
Daniel P. Berrange 已提交
47

48

49
#include "virterror_internal.h"
50
#include "logging.h"
51
#include "datatypes.h"
52 53
#include "qemu_driver.h"
#include "qemu_conf.h"
54
#include "qemu_capabilities.h"
55
#include "qemu_command.h"
56
#include "qemu_cgroup.h"
57
#include "qemu_hostdev.h"
58
#include "qemu_hotplug.h"
59
#include "qemu_monitor.h"
60
#include "qemu_bridge_filter.h"
61
#include "qemu_audit.h"
J
Jim Meyering 已提交
62
#include "c-ctype.h"
63
#include "event.h"
64
#include "buf.h"
65
#include "util.h"
66
#include "nodeinfo.h"
67
#include "stats_linux.h"
68
#include "capabilities.h"
69
#include "memory.h"
70
#include "uuid.h"
71
#include "domain_conf.h"
72 73
#include "node_device_conf.h"
#include "pci.h"
74
#include "hostusb.h"
75
#include "processinfo.h"
C
Chris Lalancette 已提交
76
#include "libvirt_internal.h"
77
#include "xml.h"
78
#include "cpu/cpu.h"
79
#include "macvtap.h"
80
#include "sysinfo.h"
81
#include "domain_nwfilter.h"
82
#include "hooks.h"
83
#include "storage_file.h"
84
#include "files.h"
85
#include "fdstream.h"
86
#include "configmake.h"
H
Hu Tao 已提交
87
#include "threadpool.h"
88

89 90
#define VIR_FROM_THIS VIR_FROM_QEMU

91 92 93
#define QEMU_VNC_PORT_MIN  5900
#define QEMU_VNC_PORT_MAX  65535

94 95
#define QEMU_NB_MEM_PARAM  3

96

97 98
#define timeval_to_ms(tv)       (((tv).tv_sec * 1000ull) + ((tv).tv_usec / 1000))

H
Hu Tao 已提交
99 100 101 102 103 104 105 106
struct watchdogEvent
{
    virDomainObjPtr vm;
    int action;
};

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

107 108
static int qemudShutdown(void);

109 110 111
static void qemuDomainEventFlush(int timer, void *opaque);
static void qemuDomainEventQueue(struct qemud_driver *driver,
                                 virDomainEventPtr event);
112

J
Jiri Denemark 已提交
113 114
static int qemudDomainObjStart(virConnectPtr conn,
                               struct qemud_driver *driver,
115 116
                               virDomainObjPtr vm,
                               bool start_paused);
J
Jiri Denemark 已提交
117

118 119
static int qemudStartVMDaemon(virConnectPtr conn,
                              struct qemud_driver *driver,
120
                              virDomainObjPtr vm,
121
                              const char *migrateFrom,
122
                              bool start_paused,
123
                              int stdin_fd,
124 125
                              const char *stdin_path,
                              enum virVMOperationType vmop);
126

127
static void qemudShutdownVMDaemon(struct qemud_driver *driver,
128 129
                                  virDomainObjPtr vm,
                                  int migrated);
130

131
static int qemudDomainGetMaxVcpus(virDomainPtr dom);
132

133
static int qemuDetectVcpuPIDs(struct qemud_driver *driver,
134
                              virDomainObjPtr vm);
135

136 137 138
static int qemudVMFiltersInstantiate(virConnectPtr conn,
                                     virDomainDefPtr def);

J
Jim Meyering 已提交
139
static struct qemud_driver *qemu_driver = NULL;
140

141

H
Hu Tao 已提交
142 143 144 145 146 147 148 149 150 151 152 153 154 155 156
static int doStartCPUs(struct qemud_driver *driver, virDomainObjPtr vm, virConnectPtr conn)
{
    int ret;
    qemuDomainObjPrivatePtr priv = vm->privateData;

    qemuDomainObjEnterMonitorWithDriver(driver, vm);
    ret = qemuMonitorStartCPUs(priv->mon, conn);
    if (ret == 0) {
        vm->state = VIR_DOMAIN_RUNNING;
    }
    qemuDomainObjExitMonitorWithDriver(driver, vm);

    return ret;
}

H
Hu Tao 已提交
157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172
static int doStopCPUs(struct qemud_driver *driver, virDomainObjPtr vm)
{
    int ret;
    int oldState = vm->state;
    qemuDomainObjPrivatePtr priv = vm->privateData;

    vm->state = VIR_DOMAIN_PAUSED;
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
    ret = qemuMonitorStopCPUs(priv->mon);
    qemuDomainObjExitMonitorWithDriver(driver, vm);
    if (ret < 0) {
        vm->state = oldState;
    }
    return ret;
}

173

174
static int
175
qemudLogFD(struct qemud_driver *driver, const char* name, bool append)
176
{
177
    char *logfile;
178
    mode_t logmode;
179
    int fd = -1;
180

181
    if (virAsprintf(&logfile, "%s/%s.log", driver->logDir, name) < 0) {
182
        virReportOOMError();
183 184 185 186
        return -1;
    }

    logmode = O_CREAT | O_WRONLY;
187
    /* Only logrotate files in /var/log, so only append if running privileged */
188
    if (driver->privileged || append)
189
        logmode |= O_APPEND;
190 191 192
    else
        logmode |= O_TRUNC;

193
    if ((fd = open(logfile, logmode, S_IRUSR | S_IWUSR)) < 0) {
194
        virReportSystemError(errno,
195 196
                             _("failed to create logfile %s"),
                             logfile);
197
        VIR_FREE(logfile);
198 199
        return -1;
    }
200
    VIR_FREE(logfile);
201
    if (virSetCloseExec(fd) < 0) {
202
        virReportSystemError(errno, "%s",
203
                             _("Unable to set VM logfile close-on-exec flag"));
204
        VIR_FORCE_CLOSE(fd);
205 206 207 208 209 210
        return -1;
    }
    return fd;
}


211
static int
212
qemudLogReadFD(const char* logDir, const char* name, off_t pos)
213
{
214
    char *logfile;
215
    mode_t logmode = O_RDONLY;
216
    int fd = -1;
217

218
    if (virAsprintf(&logfile, "%s/%s.log", logDir, name) < 0) {
219 220 221
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("failed to build logfile name %s/%s.log"),
                        logDir, name);
222 223 224 225
        return -1;
    }

    if ((fd = open(logfile, logmode)) < 0) {
226
        virReportSystemError(errno,
227 228
                             _("failed to create logfile %s"),
                             logfile);
229
        VIR_FREE(logfile);
230 231
        return -1;
    }
232
    if (virSetCloseExec(fd) < 0) {
233
        virReportSystemError(errno, "%s",
234
                             _("Unable to set VM logfile close-on-exec flag"));
235
        VIR_FORCE_CLOSE(fd);
236
        VIR_FREE(logfile);
237 238
        return -1;
    }
239
    if (pos < 0 || lseek(fd, pos, SEEK_SET) < 0) {
240
        virReportSystemError(pos < 0 ? 0 : errno,
241 242
                             _("Unable to seek to %lld in %s"),
                             (long long) pos, logfile);
243
        VIR_FORCE_CLOSE(fd);
244
    }
245
    VIR_FREE(logfile);
246 247 248 249
    return fd;
}


250 251 252 253 254 255 256 257 258
struct qemuAutostartData {
    struct qemud_driver *driver;
    virConnectPtr conn;
};
static void
qemuAutostartDomain(void *payload, const char *name ATTRIBUTE_UNUSED, void *opaque)
{
    virDomainObjPtr vm = payload;
    struct qemuAutostartData *data = opaque;
259
    virErrorPtr err;
260 261

    virDomainObjLock(vm);
262 263 264 265 266 267 268 269 270
    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) &&
271
            qemudDomainObjStart(data->conn, data->driver, vm, false) < 0) {
272
            err = virGetLastError();
273
            VIR_ERROR(_("Failed to autostart VM '%s': %s"),
274
                      vm->def->name,
275
                      err ? err->message : _("unknown error"));
276
        }
277 278 279

        if (qemuDomainObjEndJob(vm) == 0)
            vm = NULL;
280
    }
281 282 283

    if (vm)
        virDomainObjUnlock(vm);
284 285
}

286 287
static void
qemudAutostartConfigs(struct qemud_driver *driver) {
288 289 290 291 292
    /* 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
     */
293 294 295
    virConnectPtr conn = virConnectOpen(driver->privileged ?
                                        "qemu:///system" :
                                        "qemu:///session");
296
    /* Ignoring NULL conn which is mostly harmless here */
297
    struct qemuAutostartData data = { driver, conn };
298

299
    qemuDriverLock(driver);
300
    virHashForEach(driver->domains.objs, qemuAutostartDomain, &data);
301
    qemuDriverUnlock(driver);
302

303 304
    if (conn)
        virConnectClose(conn);
305 306
}

307 308 309 310 311 312 313 314 315

/**
 * qemudRemoveDomainStatus
 *
 * remove all state files of a domain from statedir
 *
 * Returns 0 on success
 */
static int
316
qemudRemoveDomainStatus(struct qemud_driver *driver,
317 318
                        virDomainObjPtr vm)
{
319
    char ebuf[1024];
320 321 322
    char *file = NULL;

    if (virAsprintf(&file, "%s/%s.xml", driver->stateDir, vm->def->name) < 0) {
323
        virReportOOMError();
D
Daniel Veillard 已提交
324
        return(-1);
325 326
    }

327
    if (unlink(file) < 0 && errno != ENOENT && errno != ENOTDIR)
328
        VIR_WARN("Failed to remove domain XML for %s: %s",
D
Daniel Veillard 已提交
329 330 331
                 vm->def->name, virStrerror(errno, ebuf, sizeof(ebuf)));
    VIR_FREE(file);

332
    if (virFileDeletePid(driver->stateDir, vm->def->name) != 0)
333
        VIR_WARN("Failed to remove PID file for %s: %s",
334
                 vm->def->name, virStrerror(errno, ebuf, sizeof(ebuf)));
335

D
Daniel Veillard 已提交
336

337
    return 0;
338 339
}

340 341 342 343 344 345 346 347 348 349 350 351 352

/*
 * This is a callback registered with a qemuMonitorPtr  instance,
 * and to be invoked when the monitor console hits an end of file
 * condition, or error, thus indicating VM shutdown should be
 * performed
 */
static void
qemuHandleMonitorEOF(qemuMonitorPtr mon ATTRIBUTE_UNUSED,
                     virDomainObjPtr vm,
                     int hasError) {
    struct qemud_driver *driver = qemu_driver;
    virDomainEventPtr event = NULL;
353
    qemuDomainObjPrivatePtr priv;
354

355
    VIR_DEBUG("Received EOF on %p '%s'", vm, vm->def->name);
356

357 358
    virDomainObjLock(vm);

359 360 361 362 363 364
    if (!virDomainObjIsActive(vm)) {
        VIR_DEBUG("Domain %p is not active, ignoring EOF", vm);
        virDomainObjUnlock(vm);
        return;
    }

365 366 367 368 369 370 371
    priv = vm->privateData;
    if (!hasError && priv->monJSON && !priv->gotShutdown) {
        VIR_DEBUG("Monitor connection to '%s' closed without SHUTDOWN event; "
                  "assuming the domain crashed", vm->def->name);
        hasError = 1;
    }

372 373 374 375 376 377
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STOPPED,
                                     hasError ?
                                     VIR_DOMAIN_EVENT_STOPPED_FAILED :
                                     VIR_DOMAIN_EVENT_STOPPED_SHUTDOWN);

378
    qemudShutdownVMDaemon(driver, vm, 0);
379 380
    qemuDomainStopAudit(vm, hasError ? "failed" : "shutdown");

381 382 383 384 385 386 387 388 389 390 391 392 393
    if (!vm->persistent)
        virDomainRemoveInactive(&driver->domains, vm);
    else
        virDomainObjUnlock(vm);

    if (event) {
        qemuDriverLock(driver);
        qemuDomainEventQueue(driver, event);
        qemuDriverUnlock(driver);
    }
}


394 395 396
static virDomainDiskDefPtr
findDomainDiskByPath(virDomainObjPtr vm,
                     const char *path)
397 398 399 400 401 402 403
{
    int i;

    for (i = 0; i < vm->def->ndisks; i++) {
        virDomainDiskDefPtr disk;

        disk = vm->def->disks[i];
404 405
        if (disk->src != NULL && STREQ(disk->src, path))
            return disk;
406
    }
407 408 409 410

    qemuReportError(VIR_ERR_INTERNAL_ERROR,
                    _("no disk found with path %s"),
                    path);
411 412 413
    return NULL;
}

414 415 416 417 418 419
static virDomainDiskDefPtr
findDomainDiskByAlias(virDomainObjPtr vm,
                      const char *alias)
{
    int i;

420 421 422
    if (STRPREFIX(alias, QEMU_DRIVE_HOST_PREFIX))
        alias += strlen(QEMU_DRIVE_HOST_PREFIX);

423 424 425 426 427 428 429 430 431 432 433 434 435 436
    for (i = 0; i < vm->def->ndisks; i++) {
        virDomainDiskDefPtr disk;

        disk = vm->def->disks[i];
        if (disk->info.alias != NULL && STREQ(disk->info.alias, alias))
            return disk;
    }

    qemuReportError(VIR_ERR_INTERNAL_ERROR,
                    _("no disk found with alias %s"),
                    alias);
    return NULL;
}

437
static int
438 439 440 441
getVolumeQcowPassphrase(virConnectPtr conn,
                        virDomainDiskDefPtr disk,
                        char **secretRet,
                        size_t *secretLen)
442 443 444 445 446
{
    virSecretPtr secret;
    char *passphrase;
    unsigned char *data;
    size_t size;
447
    int ret = -1;
448
    virStorageEncryptionPtr enc;
449

450 451 452 453 454 455 456
    if (!disk->encryption) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("disk %s does not have any encryption information"),
                        disk->src);
        return -1;
    }
    enc = disk->encryption;
457 458

    if (!conn) {
459
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
460
                        "%s", _("cannot find secrets without a connection"));
461
        goto cleanup;
462 463 464 465 466
    }

    if (conn->secretDriver == NULL ||
        conn->secretDriver->lookupByUUID == NULL ||
        conn->secretDriver->getValue == NULL) {
467 468
        qemuReportError(VIR_ERR_NO_SUPPORT, "%s",
                        _("secret storage not supported"));
469
        goto cleanup;
470 471 472 473 474 475
    }

    if (enc->format != VIR_STORAGE_ENCRYPTION_FORMAT_QCOW ||
        enc->nsecrets != 1 ||
        enc->secrets[0]->type !=
        VIR_STORAGE_ENCRYPTION_SECRET_TYPE_PASSPHRASE) {
476
        qemuReportError(VIR_ERR_XML_ERROR,
477
                        _("invalid <encryption> for volume %s"), disk->src);
478
        goto cleanup;
479 480 481 482 483
    }

    secret = conn->secretDriver->lookupByUUID(conn,
                                              enc->secrets[0]->uuid);
    if (secret == NULL)
484
        goto cleanup;
485 486 487 488
    data = conn->secretDriver->getValue(secret, &size,
                                        VIR_SECRET_GET_VALUE_INTERNAL_CALL);
    virUnrefSecret(secret);
    if (data == NULL)
489
        goto cleanup;
490 491 492 493

    if (memchr(data, '\0', size) != NULL) {
        memset(data, 0, size);
        VIR_FREE(data);
494
        qemuReportError(VIR_ERR_XML_ERROR,
495
                        _("format='qcow' passphrase for %s must not contain a "
496
                          "'\\0'"), disk->src);
497
        goto cleanup;
498 499 500 501 502
    }

    if (VIR_ALLOC_N(passphrase, size + 1) < 0) {
        memset(data, 0, size);
        VIR_FREE(data);
503
        virReportOOMError();
504
        goto cleanup;
505 506 507 508 509 510 511 512 513 514
    }
    memcpy(passphrase, data, size);
    passphrase[size] = '\0';

    memset(data, 0, size);
    VIR_FREE(data);

    *secretRet = passphrase;
    *secretLen = size;

515 516 517
    ret = 0;

cleanup:
518 519
    return ret;
}
520

521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541
static int
findVolumeQcowPassphrase(qemuMonitorPtr mon ATTRIBUTE_UNUSED,
                         virConnectPtr conn,
                         virDomainObjPtr vm,
                         const char *path,
                         char **secretRet,
                         size_t *secretLen)
{
    virDomainDiskDefPtr disk;
    int ret = -1;

    virDomainObjLock(vm);
    disk = findDomainDiskByPath(vm, path);

    if (!disk)
        goto cleanup;

    ret = getVolumeQcowPassphrase(conn, disk, secretRet, secretLen);

cleanup:
    virDomainObjUnlock(vm);
542
    return ret;
543 544
}

545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566

static int
qemuHandleDomainReset(qemuMonitorPtr mon ATTRIBUTE_UNUSED,
                      virDomainObjPtr vm)
{
    struct qemud_driver *driver = qemu_driver;
    virDomainEventPtr event;

    virDomainObjLock(vm);
    event = virDomainEventRebootNewFromObj(vm);
    virDomainObjUnlock(vm);

    if (event) {
        qemuDriverLock(driver);
        qemuDomainEventQueue(driver, event);
        qemuDriverUnlock(driver);
    }

    return 0;
}


567 568 569 570 571 572 573 574 575 576 577 578
static int
qemuHandleDomainShutdown(qemuMonitorPtr mon ATTRIBUTE_UNUSED,
                         virDomainObjPtr vm)
{
    virDomainObjLock(vm);
    ((qemuDomainObjPrivatePtr) vm->privateData)->gotShutdown = true;
    virDomainObjUnlock(vm);

    return 0;
}


579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610
static int
qemuHandleDomainStop(qemuMonitorPtr mon ATTRIBUTE_UNUSED,
                     virDomainObjPtr vm)
{
    struct qemud_driver *driver = qemu_driver;
    virDomainEventPtr event = NULL;

    virDomainObjLock(vm);
    if (vm->state == VIR_DOMAIN_RUNNING) {
        VIR_DEBUG("Transitioned guest %s to paused state due to unknown event", vm->def->name);

        vm->state = VIR_DOMAIN_PAUSED;
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_SUSPENDED,
                                         VIR_DOMAIN_EVENT_SUSPENDED_PAUSED);

        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
            VIR_WARN("Unable to save status on vm %s after IO error", vm->def->name);
    }
    virDomainObjUnlock(vm);

    if (event) {
        qemuDriverLock(driver);
        if (event)
            qemuDomainEventQueue(driver, event);
        qemuDriverUnlock(driver);
    }

    return 0;
}


611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639
static int
qemuHandleDomainRTCChange(qemuMonitorPtr mon ATTRIBUTE_UNUSED,
                          virDomainObjPtr vm,
                          long long offset)
{
    struct qemud_driver *driver = qemu_driver;
    virDomainEventPtr event;

    virDomainObjLock(vm);
    event = virDomainEventRTCChangeNewFromObj(vm, offset);

    if (vm->def->clock.offset == VIR_DOMAIN_CLOCK_OFFSET_VARIABLE)
        vm->def->clock.data.adjustment = offset;

    if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
        VIR_WARN0("unable to save domain status with RTC change");

    virDomainObjUnlock(vm);

    if (event) {
        qemuDriverLock(driver);
        qemuDomainEventQueue(driver, event);
        qemuDriverUnlock(driver);
    }

    return 0;
}


640 641 642 643 644 645
static int
qemuHandleDomainWatchdog(qemuMonitorPtr mon ATTRIBUTE_UNUSED,
                         virDomainObjPtr vm,
                         int action)
{
    struct qemud_driver *driver = qemu_driver;
646 647
    virDomainEventPtr watchdogEvent = NULL;
    virDomainEventPtr lifecycleEvent = NULL;
648 649

    virDomainObjLock(vm);
650 651 652 653 654 655 656 657 658 659 660 661 662 663
    watchdogEvent = virDomainEventWatchdogNewFromObj(vm, action);

    if (action == VIR_DOMAIN_EVENT_WATCHDOG_PAUSE &&
        vm->state == VIR_DOMAIN_RUNNING) {
        VIR_DEBUG("Transitioned guest %s to paused state due to watchdog", vm->def->name);

        vm->state = VIR_DOMAIN_PAUSED;
        lifecycleEvent = virDomainEventNewFromObj(vm,
                                                  VIR_DOMAIN_EVENT_SUSPENDED,
                                                  VIR_DOMAIN_EVENT_SUSPENDED_WATCHDOG);

        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
            VIR_WARN("Unable to save status on vm %s after IO error", vm->def->name);
    }
H
Hu Tao 已提交
664 665 666 667 668 669 670 671 672 673 674

    if (vm->def->watchdog->action == VIR_DOMAIN_WATCHDOG_ACTION_DUMP) {
        struct watchdogEvent *wdEvent;
        if (VIR_ALLOC(wdEvent) == 0) {
            wdEvent->action = VIR_DOMAIN_WATCHDOG_ACTION_DUMP;
            wdEvent->vm = vm;
            ignore_value(virThreadPoolSendJob(driver->workerPool, wdEvent));
        } else
            virReportOOMError();
    }

675 676
    virDomainObjUnlock(vm);

677
    if (watchdogEvent || lifecycleEvent) {
678
        qemuDriverLock(driver);
679 680 681 682
        if (watchdogEvent)
            qemuDomainEventQueue(driver, watchdogEvent);
        if (lifecycleEvent)
            qemuDomainEventQueue(driver, lifecycleEvent);
683 684 685 686 687 688 689
        qemuDriverUnlock(driver);
    }

    return 0;
}


690 691 692 693
static int
qemuHandleDomainIOError(qemuMonitorPtr mon ATTRIBUTE_UNUSED,
                        virDomainObjPtr vm,
                        const char *diskAlias,
694 695
                        int action,
                        const char *reason)
696 697
{
    struct qemud_driver *driver = qemu_driver;
698
    virDomainEventPtr ioErrorEvent = NULL;
699
    virDomainEventPtr ioErrorEvent2 = NULL;
700
    virDomainEventPtr lifecycleEvent = NULL;
701 702 703 704 705 706 707 708 709 710 711 712 713 714 715
    const char *srcPath;
    const char *devAlias;
    virDomainDiskDefPtr disk;

    virDomainObjLock(vm);
    disk = findDomainDiskByAlias(vm, diskAlias);

    if (disk) {
        srcPath = disk->src;
        devAlias = disk->info.alias;
    } else {
        srcPath = "";
        devAlias = "";
    }

716
    ioErrorEvent = virDomainEventIOErrorNewFromObj(vm, srcPath, devAlias, action);
717
    ioErrorEvent2 = virDomainEventIOErrorReasonNewFromObj(vm, srcPath, devAlias, action, reason);
718 719 720 721 722 723 724 725 726 727 728 729 730

    if (action == VIR_DOMAIN_EVENT_IO_ERROR_PAUSE &&
        vm->state == VIR_DOMAIN_RUNNING) {
        VIR_DEBUG("Transitioned guest %s to paused state due to IO error", vm->def->name);

        vm->state = VIR_DOMAIN_PAUSED;
        lifecycleEvent = virDomainEventNewFromObj(vm,
                                                  VIR_DOMAIN_EVENT_SUSPENDED,
                                                  VIR_DOMAIN_EVENT_SUSPENDED_IOERROR);

        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
            VIR_WARN("Unable to save status on vm %s after IO error", vm->def->name);
    }
731 732
    virDomainObjUnlock(vm);

733
    if (ioErrorEvent || ioErrorEvent2 || lifecycleEvent) {
734
        qemuDriverLock(driver);
735 736
        if (ioErrorEvent)
            qemuDomainEventQueue(driver, ioErrorEvent);
737 738
        if (ioErrorEvent2)
            qemuDomainEventQueue(driver, ioErrorEvent2);
739 740
        if (lifecycleEvent)
            qemuDomainEventQueue(driver, lifecycleEvent);
741 742 743 744 745 746 747
        qemuDriverUnlock(driver);
    }

    return 0;
}


748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839
static int
qemuHandleDomainGraphics(qemuMonitorPtr mon ATTRIBUTE_UNUSED,
                         virDomainObjPtr vm,
                         int phase,
                         int localFamily,
                         const char *localNode,
                         const char *localService,
                         int remoteFamily,
                         const char *remoteNode,
                         const char *remoteService,
                         const char *authScheme,
                         const char *x509dname,
                         const char *saslUsername)
{
    struct qemud_driver *driver = qemu_driver;
    virDomainEventPtr event;
    virDomainEventGraphicsAddressPtr localAddr = NULL;
    virDomainEventGraphicsAddressPtr remoteAddr = NULL;
    virDomainEventGraphicsSubjectPtr subject = NULL;
    int i;

    virDomainObjLock(vm);

    if (VIR_ALLOC(localAddr) < 0)
        goto no_memory;
    localAddr->family = localFamily;
    if (!(localAddr->service = strdup(localService)) ||
        !(localAddr->node = strdup(localNode)))
        goto no_memory;

    if (VIR_ALLOC(remoteAddr) < 0)
        goto no_memory;
    remoteAddr->family = remoteFamily;
    if (!(remoteAddr->service = strdup(remoteService)) ||
        !(remoteAddr->node = strdup(remoteNode)))
        goto no_memory;

    if (VIR_ALLOC(subject) < 0)
        goto no_memory;
    if (x509dname) {
        if (VIR_REALLOC_N(subject->identities, subject->nidentity+1) < 0)
            goto no_memory;
        if (!(subject->identities[subject->nidentity].type = strdup("x509dname")) ||
            !(subject->identities[subject->nidentity].name = strdup(x509dname)))
            goto no_memory;
        subject->nidentity++;
    }
    if (saslUsername) {
        if (VIR_REALLOC_N(subject->identities, subject->nidentity+1) < 0)
            goto no_memory;
        if (!(subject->identities[subject->nidentity].type = strdup("saslUsername")) ||
            !(subject->identities[subject->nidentity].name = strdup(saslUsername)))
            goto no_memory;
        subject->nidentity++;
    }

    event = virDomainEventGraphicsNewFromObj(vm, phase, localAddr, remoteAddr, authScheme, subject);
    virDomainObjUnlock(vm);

    if (event) {
        qemuDriverLock(driver);
        qemuDomainEventQueue(driver, event);
        qemuDriverUnlock(driver);
    }

    return 0;

no_memory:
    virReportOOMError();
    if (localAddr) {
        VIR_FREE(localAddr->service);
        VIR_FREE(localAddr->node);
        VIR_FREE(localAddr);
    }
    if (remoteAddr) {
        VIR_FREE(remoteAddr->service);
        VIR_FREE(remoteAddr->node);
        VIR_FREE(remoteAddr);
    }
    if (subject) {
        for (i = 0 ; i < subject->nidentity ; i++) {
            VIR_FREE(subject->identities[i].type);
            VIR_FREE(subject->identities[i].name);
        }
        VIR_FREE(subject->identities);
        VIR_FREE(subject);
    }

    return -1;
}


840 841 842 843 844 845 846 847 848
static void qemuHandleMonitorDestroy(qemuMonitorPtr mon,
                                     virDomainObjPtr vm)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
    if (priv->mon == mon)
        priv->mon = NULL;
    virDomainObjUnref(vm);
}

849
static qemuMonitorCallbacks monitorCallbacks = {
850
    .destroy = qemuHandleMonitorDestroy,
851 852
    .eofNotify = qemuHandleMonitorEOF,
    .diskSecretLookup = findVolumeQcowPassphrase,
853
    .domainShutdown = qemuHandleDomainShutdown,
854
    .domainStop = qemuHandleDomainStop,
855
    .domainReset = qemuHandleDomainReset,
856
    .domainRTCChange = qemuHandleDomainRTCChange,
857
    .domainWatchdog = qemuHandleDomainWatchdog,
858
    .domainIOError = qemuHandleDomainIOError,
859
    .domainGraphics = qemuHandleDomainGraphics,
860 861
};

862
static int
863
qemuConnectMonitor(struct qemud_driver *driver, virDomainObjPtr vm)
864
{
865
    qemuDomainObjPrivatePtr priv = vm->privateData;
866
    int ret = -1;
867

868
    if (virSecurityManagerSetSocketLabel(driver->securityManager, vm) < 0) {
869 870
        VIR_ERROR(_("Failed to set security context for monitor for %s"),
                  vm->def->name);
871 872 873
        goto error;
    }

874 875 876 877 878 879 880 881 882 883 884
    /* Hold an extra reference because we can't allow 'vm' to be
     * deleted while the monitor is active */
    virDomainObjRef(vm);

    priv->mon = qemuMonitorOpen(vm,
                                priv->monConfig,
                                priv->monJSON,
                                &monitorCallbacks);

    if (priv->mon == NULL)
        virDomainObjUnref(vm);
885

886
    if (virSecurityManagerClearSocketLabel(driver->securityManager, vm) < 0) {
887 888
        VIR_ERROR(_("Failed to clear security context for monitor for %s"),
                  vm->def->name);
889
        goto error;
890
    }
891

892 893 894 895 896 897
    if (priv->mon == NULL) {
        VIR_INFO("Failed to connect monitor for %s", vm->def->name);
        goto error;
    }


898 899 900 901
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
    ret = qemuMonitorSetCapabilities(priv->mon);
    qemuDomainObjExitMonitorWithDriver(driver, vm);

902
error:
903
    if (ret < 0)
904 905 906
        qemuMonitorClose(priv->mon);

    return ret;
907
}
908

909 910 911 912
struct virReconnectDomainData {
    virConnectPtr conn;
    struct qemud_driver *driver;
};
913 914 915
/*
 * Open an existing VM's monitor, re-detect VCPU threads
 * and re-reserve the security labels in use
916
 */
917 918
static void
qemuReconnectDomain(void *payload, const char *name ATTRIBUTE_UNUSED, void *opaque)
919
{
920
    virDomainObjPtr obj = payload;
921 922
    struct virReconnectDomainData *data = opaque;
    struct qemud_driver *driver = data->driver;
923
    qemuDomainObjPrivatePtr priv;
924
    unsigned long long qemuCmdFlags;
925
    virConnectPtr conn = data->conn;
926 927

    virDomainObjLock(obj);
928

929 930
    VIR_DEBUG("Reconnect monitor to %p '%s'", obj, obj->def->name);

931 932
    priv = obj->privateData;

933
    /* XXX check PID liveliness & EXE path */
934
    if (qemuConnectMonitor(driver, obj) < 0)
935
        goto error;
936

937 938 939 940
    if (qemuUpdateActivePciHostdevs(driver, obj->def) < 0) {
        goto error;
    }

941 942 943
    /* XXX we should be persisting the original flags in the XML
     * not re-detecting them, since the binary may have changed
     * since launch time */
944 945 946
    if (qemuCapsExtractVersionInfo(obj->def->emulator,
                                   NULL,
                                   &qemuCmdFlags) >= 0 &&
947
        (qemuCmdFlags & QEMUD_CMD_FLAG_DEVICE)) {
948 949
        priv->persistentAddrs = 1;

950 951 952 953
        if (!(priv->pciaddrs = qemuDomainPCIAddressSetCreate(obj->def)) ||
            qemuAssignDevicePCISlots(obj->def, priv->pciaddrs) < 0)
            goto error;
    }
954

955
    if (virSecurityManagerReserveLabel(driver->securityManager, obj) < 0)
956
        goto error;
957

958 959 960
    if (qemudVMFiltersInstantiate(conn, obj->def))
        goto error;

961 962
    if (obj->def->id >= driver->nextvmid)
        driver->nextvmid = obj->def->id + 1;
963

964 965
    virDomainObjUnlock(obj);
    return;
966

967
error:
968 969 970
    /* We can't get the monitor back, so must kill the VM
     * to remove danger of it ending up running twice if
     * user tries to start it again later */
971
    qemudShutdownVMDaemon(driver, obj, 0);
972 973 974 975
    if (!obj->persistent)
        virDomainRemoveInactive(&driver->domains, obj);
    else
        virDomainObjUnlock(obj);
976
}
977

978
/**
979
 * qemudReconnectDomains
980 981 982 983 984
 *
 * Try to re-open the resources for live VMs that we care
 * about.
 */
static void
985
qemuReconnectDomains(virConnectPtr conn, struct qemud_driver *driver)
986
{
987 988
    struct virReconnectDomainData data = {conn, driver};
    virHashForEach(driver->domains.objs, qemuReconnectDomain, &data);
989 990
}

991

992
static int
993
qemuSecurityInit(struct qemud_driver *driver)
994
{
995 996 997 998
    virSecurityManagerPtr mgr = virSecurityManagerNew(driver->securityDriverName,
                                                      driver->allowDiskFormatProbing);
    if (!mgr)
        goto error;
999

1000 1001 1002 1003 1004 1005 1006
    if (driver->privileged) {
        virSecurityManagerPtr dac = virSecurityManagerNewDAC(driver->user,
                                                             driver->group,
                                                             driver->allowDiskFormatProbing,
                                                             driver->dynamicOwnership);
        if (!dac)
            goto error;
1007

1008 1009 1010
        if (!(driver->securityManager = virSecurityManagerNewStack(mgr,
                                                                   dac)))
            goto error;
1011
    } else {
1012
        driver->securityManager = mgr;
1013 1014
    }

1015
    return 0;
1016 1017 1018 1019 1020

error:
    VIR_ERROR0(_("Failed to initialize security drivers"));
    virSecurityManagerFree(mgr);
    return -1;
1021
}
1022 1023


1024 1025
static virCapsPtr
qemuCreateCapabilities(virCapsPtr oldcaps,
1026
                       struct qemud_driver *driver)
1027 1028 1029 1030
{
    virCapsPtr caps;

    /* Basic host arch / guest machine capabilities */
1031
    if (!(caps = qemuCapsInit(oldcaps))) {
1032
        virReportOOMError();
1033 1034 1035
        return NULL;
    }

1036 1037 1038 1039 1040 1041 1042 1043
    if (driver->allowDiskFormatProbing) {
        caps->defaultDiskDriverName = NULL;
        caps->defaultDiskDriverType = NULL;
    } else {
        caps->defaultDiskDriverName = "qemu";
        caps->defaultDiskDriverType = "raw";
    }

1044 1045
    qemuDomainSetPrivateDataHooks(caps);
    qemuDomainSetNamespaceHooks(caps);
1046

1047 1048 1049 1050 1051
    if (virGetHostUUID(caps->host.host_uuid)) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                         "%s", _("cannot get the host uuid"));
        goto err_exit;
    }
1052 1053

    /* Security driver data */
1054
    const char *doi, *model;
1055

1056 1057 1058
    doi = virSecurityManagerGetDOI(driver->securityManager);
    model = virSecurityManagerGetModel(driver->securityManager);
    if (STRNEQ(model, "none")) {
1059 1060 1061 1062 1063 1064
        if (!(caps->host.secModel.model = strdup(model)))
            goto no_memory;
        if (!(caps->host.secModel.doi = strdup(doi)))
            goto no_memory;
    }

1065 1066 1067
    VIR_DEBUG("Initialized caps for security driver \"%s\" with "
              "DOI \"%s\"", model, doi);

1068 1069 1070
    return caps;

no_memory:
1071
    virReportOOMError();
1072
err_exit:
1073 1074 1075
    virCapabilitiesFree(caps);
    return NULL;
}
1076

C
Chris Lalancette 已提交
1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093
static void qemuDomainSnapshotLoad(void *payload,
                                   const char *name ATTRIBUTE_UNUSED,
                                   void *data)
{
    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];

    virDomainObjLock(vm);
    if (virAsprintf(&snapDir, "%s/%s", baseDir, vm->def->name) < 0) {
1094
        VIR_ERROR(_("Failed to allocate memory for snapshot directory for domain %s"),
C
Chris Lalancette 已提交
1095 1096 1097 1098 1099 1100 1101 1102 1103
                   vm->def->name);
        goto cleanup;
    }

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

    if (!(dir = opendir(snapDir))) {
        if (errno != ENOENT)
1104
            VIR_ERROR(_("Failed to open snapshot directory %s for domain %s: %s"),
C
Chris Lalancette 已提交
1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118
                      snapDir, vm->def->name,
                      virStrerror(errno, ebuf, sizeof(ebuf)));
        goto cleanup;
    }

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

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

        if (virAsprintf(&fullpath, "%s/%s", snapDir, entry->d_name) < 0) {
1119
            VIR_ERROR0(_("Failed to allocate memory for path"));
C
Chris Lalancette 已提交
1120 1121 1122 1123 1124 1125
            continue;
        }

        ret = virFileReadAll(fullpath, 1024*1024*1, &xmlStr);
        if (ret < 0) {
            /* Nothing we can do here, skip this one */
1126
            VIR_ERROR(_("Failed to read snapshot file %s: %s"), fullpath,
C
Chris Lalancette 已提交
1127
                      virStrerror(errno, ebuf, sizeof(ebuf)));
1128
            VIR_FREE(fullpath);
C
Chris Lalancette 已提交
1129 1130 1131 1132 1133 1134
            continue;
        }

        def = virDomainSnapshotDefParseString(xmlStr, 0);
        if (def == NULL) {
            /* Nothing we can do here, skip this one */
1135
            VIR_ERROR(_("Failed to parse snapshot XML from file '%s'"), fullpath);
1136
            VIR_FREE(fullpath);
C
Chris Lalancette 已提交
1137 1138 1139 1140
            VIR_FREE(xmlStr);
            continue;
        }

1141
        virDomainSnapshotAssignDef(&vm->snapshots, def);
C
Chris Lalancette 已提交
1142

1143
        VIR_FREE(fullpath);
C
Chris Lalancette 已提交
1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164
        VIR_FREE(xmlStr);
    }

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

    virResetLastError();

cleanup:
    if (dir)
        closedir(dir);
    VIR_FREE(snapDir);
    virDomainObjUnlock(vm);
}

1165 1166 1167 1168 1169 1170
/**
 * qemudStartup:
 *
 * Initialization function for the QEmu daemon
 */
static int
1171
qemudStartup(int privileged) {
1172
    char *base = NULL;
1173
    char *driverConf = NULL;
1174
    int rc;
1175
    virConnectPtr conn = NULL;
1176

1177
    if (VIR_ALLOC(qemu_driver) < 0)
1178 1179
        return -1;

1180
    if (virMutexInit(&qemu_driver->lock) < 0) {
1181
        VIR_ERROR0(_("cannot initialize mutex"));
1182 1183 1184
        VIR_FREE(qemu_driver);
        return -1;
    }
1185
    qemuDriverLock(qemu_driver);
1186
    qemu_driver->privileged = privileged;
1187

1188 1189 1190
    /* Don't have a dom0 so start from 1 */
    qemu_driver->nextvmid = 1;

1191 1192 1193
    if (virDomainObjListInit(&qemu_driver->domains) < 0)
        goto out_of_memory;

1194
    /* Init callback list */
1195
    if (VIR_ALLOC(qemu_driver->domainEventCallbacks) < 0)
1196
        goto out_of_memory;
1197 1198 1199 1200 1201 1202
    if (!(qemu_driver->domainEventQueue = virDomainEventQueueNew()))
        goto out_of_memory;

    if ((qemu_driver->domainEventTimer =
         virEventAddTimeout(-1, qemuDomainEventFlush, qemu_driver, NULL)) < 0)
        goto error;
1203

1204 1205 1206 1207 1208
    /* Allocate bitmap for vnc port reservation */
    if ((qemu_driver->reservedVNCPorts =
         virBitmapAlloc(QEMU_VNC_PORT_MAX - QEMU_VNC_PORT_MIN)) == NULL)
        goto out_of_memory;

1209 1210 1211 1212
    /* read the host sysinfo */
    if (privileged)
        qemu_driver->hostsysinfo = virSysinfoRead();

1213
    if (privileged) {
1214
        if (virAsprintf(&qemu_driver->logDir,
1215
                        "%s/log/libvirt/qemu", LOCALSTATEDIR) == -1)
1216
            goto out_of_memory;
1217

1218
        if ((base = strdup (SYSCONFDIR "/libvirt")) == NULL)
1219
            goto out_of_memory;
1220 1221

        if (virAsprintf(&qemu_driver->stateDir,
1222
                      "%s/run/libvirt/qemu", LOCALSTATEDIR) == -1)
1223
            goto out_of_memory;
1224 1225

        if (virAsprintf(&qemu_driver->libDir,
1226
                      "%s/lib/libvirt/qemu", LOCALSTATEDIR) == -1)
1227 1228 1229
            goto out_of_memory;

        if (virAsprintf(&qemu_driver->cacheDir,
1230
                      "%s/cache/libvirt/qemu", LOCALSTATEDIR) == -1)
1231
            goto out_of_memory;
1232
        if (virAsprintf(&qemu_driver->saveDir,
1233
                      "%s/lib/libvirt/qemu/save", LOCALSTATEDIR) == -1)
1234
            goto out_of_memory;
C
Chris Lalancette 已提交
1235
        if (virAsprintf(&qemu_driver->snapshotDir,
1236
                        "%s/lib/libvirt/qemu/snapshot", LOCALSTATEDIR) == -1)
C
Chris Lalancette 已提交
1237
            goto out_of_memory;
H
Hu Tao 已提交
1238 1239 1240
        if (virAsprintf(&qemu_driver->autoDumpPath,
                        "%s/lib/libvirt/qemu/dump", LOCALSTATEDIR) == -1)
            goto out_of_memory;
1241
    } else {
1242
        uid_t uid = geteuid();
1243
        char *userdir = virGetUserDirectory(uid);
1244
        if (!userdir)
1245
            goto error;
1246

1247
        if (virAsprintf(&qemu_driver->logDir,
1248 1249
                        "%s/.libvirt/qemu/log", userdir) == -1) {
            VIR_FREE(userdir);
1250
            goto out_of_memory;
1251
        }
1252

1253 1254
        if (virAsprintf(&base, "%s/.libvirt", userdir) == -1) {
            VIR_FREE(userdir);
1255
            goto out_of_memory;
1256 1257
        }
        VIR_FREE(userdir);
1258 1259 1260

        if (virAsprintf(&qemu_driver->stateDir, "%s/qemu/run", base) == -1)
            goto out_of_memory;
1261 1262 1263 1264
        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;
1265 1266
        if (virAsprintf(&qemu_driver->saveDir, "%s/qemu/save", base) == -1)
            goto out_of_memory;
C
Chris Lalancette 已提交
1267 1268
        if (virAsprintf(&qemu_driver->snapshotDir, "%s/qemu/snapshot", base) == -1)
            goto out_of_memory;
H
Hu Tao 已提交
1269 1270
        if (virAsprintf(&qemu_driver->autoDumpPath, "%s/qemu/dump", base) == -1)
            goto out_of_memory;
1271 1272
    }

L
Laine Stump 已提交
1273
    if (virFileMakePath(qemu_driver->stateDir) != 0) {
1274
        char ebuf[1024];
1275
        VIR_ERROR(_("Failed to create state dir '%s': %s"),
1276
                  qemu_driver->stateDir, virStrerror(errno, ebuf, sizeof ebuf));
1277
        goto error;
1278
    }
L
Laine Stump 已提交
1279
    if (virFileMakePath(qemu_driver->libDir) != 0) {
1280
        char ebuf[1024];
1281
        VIR_ERROR(_("Failed to create lib dir '%s': %s"),
1282 1283 1284
                  qemu_driver->libDir, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
    }
L
Laine Stump 已提交
1285
    if (virFileMakePath(qemu_driver->cacheDir) != 0) {
1286
        char ebuf[1024];
1287
        VIR_ERROR(_("Failed to create cache dir '%s': %s"),
1288 1289 1290
                  qemu_driver->cacheDir, virStrerror(errno, ebuf, sizeof ebuf));
        goto error;
    }
1291 1292 1293 1294 1295 1296
    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;
    }
C
Chris Lalancette 已提交
1297 1298 1299 1300 1301 1302
    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;
    }
H
Hu Tao 已提交
1303 1304 1305 1306 1307 1308
    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;
    }
1309 1310 1311 1312

    /* Configuration paths are either ~/.libvirt/qemu/... (session) or
     * /etc/libvirt/qemu/... (system).
     */
1313 1314 1315
    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)
1316 1317
        goto out_of_memory;

1318
    VIR_FREE(base);
1319

1320 1321 1322 1323 1324 1325 1326
    rc = virCgroupForDriver("qemu", &qemu_driver->cgroup, privileged, 1);
    if (rc < 0) {
        char buf[1024];
        VIR_WARN("Unable to create cgroup for driver: %s",
                 virStrerror(-rc, buf, sizeof(buf)));
    }

1327 1328 1329
    if (qemudLoadDriverConfig(qemu_driver, driverConf) < 0) {
        goto error;
    }
1330
    VIR_FREE(driverConf);
1331

1332
    if (qemuSecurityInit(qemu_driver) < 0)
1333
        goto error;
D
Daniel P. Berrange 已提交
1334

1335
    if ((qemu_driver->caps = qemuCreateCapabilities(NULL,
1336
                                                    qemu_driver)) == NULL)
1337
        goto error;
1338

1339
    if ((qemu_driver->activePciHostdevs = pciDeviceListNew()) == NULL)
1340 1341
        goto error;

1342 1343
    if (privileged) {
        if (chown(qemu_driver->libDir, qemu_driver->user, qemu_driver->group) < 0) {
1344
            virReportSystemError(errno,
1345 1346 1347 1348 1349
                                 _("unable to set ownership of '%s' to user %d:%d"),
                                 qemu_driver->libDir, qemu_driver->user, qemu_driver->group);
            goto error;
        }
        if (chown(qemu_driver->cacheDir, qemu_driver->user, qemu_driver->group) < 0) {
1350
            virReportSystemError(errno,
1351 1352 1353 1354
                                 _("unable to set ownership of '%s' to %d:%d"),
                                 qemu_driver->cacheDir, qemu_driver->user, qemu_driver->group);
            goto error;
        }
1355 1356 1357 1358 1359 1360
        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;
        }
C
Chris Lalancette 已提交
1361 1362 1363 1364 1365 1366
        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;
        }
1367 1368
    }

1369 1370 1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382
    /* 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
     */
    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;

        if ((rc = virFileMakePath(mempath)) != 0) {
1383
            virReportSystemError(rc,
1384 1385 1386 1387 1388 1389
                                 _("unable to create hugepage path %s"), mempath);
            VIR_FREE(mempath);
            goto error;
        }
        if (qemu_driver->privileged &&
            chown(mempath, qemu_driver->user, qemu_driver->group) < 0) {
1390
            virReportSystemError(errno,
1391 1392 1393 1394 1395 1396 1397 1398 1399
                                 _("unable to set ownership on %s to %d:%d"),
                                 mempath, qemu_driver->user, qemu_driver->group);
            VIR_FREE(mempath);
            goto error;
        }

        qemu_driver->hugepage_path = mempath;
    }

1400
    /* Get all the running persistent or transient configs first */
1401
    if (virDomainLoadAllConfigs(qemu_driver->caps,
1402 1403 1404 1405 1406 1407
                                &qemu_driver->domains,
                                qemu_driver->stateDir,
                                NULL,
                                1, NULL, NULL) < 0)
        goto error;

1408 1409 1410 1411 1412
    conn = virConnectOpen(qemu_driver->privileged ?
                          "qemu:///system" :
                          "qemu:///session");

    qemuReconnectDomains(conn, qemu_driver);
1413 1414

    /* Then inactive persistent configs */
1415
    if (virDomainLoadAllConfigs(qemu_driver->caps,
1416 1417
                                &qemu_driver->domains,
                                qemu_driver->configDir,
1418
                                qemu_driver->autostartDir,
1419
                                0, NULL, NULL) < 0)
1420
        goto error;
C
Chris Lalancette 已提交
1421 1422 1423 1424 1425


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

1426 1427
    qemuDriverUnlock(qemu_driver);

1428 1429
    qemudAutostartConfigs(qemu_driver);

H
Hu Tao 已提交
1430 1431 1432 1433
    qemu_driver->workerPool = virThreadPoolNew(0, 1, processWatchdogEvent, qemu_driver);
    if (!qemu_driver->workerPool)
        goto error;

1434 1435
    if (conn)
        virConnectClose(conn);
1436

1437 1438
    return 0;

1439
out_of_memory:
1440
    virReportOOMError();
1441 1442 1443
error:
    if (qemu_driver)
        qemuDriverUnlock(qemu_driver);
1444 1445
    if (conn)
        virConnectClose(conn);
1446
    VIR_FREE(base);
1447
    VIR_FREE(driverConf);
1448
    qemudShutdown();
1449 1450 1451
    return -1;
}

1452 1453 1454 1455
static void qemudNotifyLoadDomain(virDomainObjPtr vm, int newVM, void *opaque)
{
    struct qemud_driver *driver = opaque;

1456 1457 1458 1459 1460 1461 1462 1463
    if (newVM) {
        virDomainEventPtr event =
            virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_DEFINED,
                                     VIR_DOMAIN_EVENT_DEFINED_ADDED);
        if (event)
            qemuDomainEventQueue(driver, event);
    }
1464 1465
}

1466 1467 1468 1469 1470 1471 1472 1473
/**
 * qemudReload:
 *
 * Function to restart the QEmu daemon, it will recheck the configuration
 * files and update its state and the networking
 */
static int
qemudReload(void) {
1474 1475 1476
    if (!qemu_driver)
        return 0;

1477
    qemuDriverLock(qemu_driver);
1478
    virDomainLoadAllConfigs(qemu_driver->caps,
1479 1480
                            &qemu_driver->domains,
                            qemu_driver->configDir,
1481
                            qemu_driver->autostartDir,
1482
                            0, qemudNotifyLoadDomain, qemu_driver);
1483
    qemuDriverUnlock(qemu_driver);
1484

1485
    qemudAutostartConfigs(qemu_driver);
1486 1487

    return 0;
1488 1489
}

1490 1491 1492 1493 1494 1495 1496 1497 1498 1499
/**
 * 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) {
1500
    int active = 0;
1501

1502 1503 1504
    if (!qemu_driver)
        return 0;

1505
    /* XXX having to iterate here is not great because it requires many locks */
1506
    qemuDriverLock(qemu_driver);
1507
    active = virDomainObjListNumOfDomains(&qemu_driver->domains, 1);
1508 1509
    qemuDriverUnlock(qemu_driver);
    return active;
1510 1511
}

1512 1513 1514 1515 1516 1517 1518
/**
 * qemudShutdown:
 *
 * Shutdown the QEmu daemon, it will stop all active domains and networks
 */
static int
qemudShutdown(void) {
1519
    int i;
1520

1521
    if (!qemu_driver)
1522
        return -1;
1523

1524
    qemuDriverLock(qemu_driver);
1525
    pciDeviceListFree(qemu_driver->activePciHostdevs);
1526 1527
    virCapabilitiesFree(qemu_driver->caps);

1528
    virDomainObjListDeinit(&qemu_driver->domains);
1529
    virBitmapFree(qemu_driver->reservedVNCPorts);
1530

1531 1532
    virSysinfoDefFree(qemu_driver->hostsysinfo);

1533 1534
    VIR_FREE(qemu_driver->configDir);
    VIR_FREE(qemu_driver->autostartDir);
E
Eric Blake 已提交
1535
    VIR_FREE(qemu_driver->logDir);
1536
    VIR_FREE(qemu_driver->stateDir);
1537 1538
    VIR_FREE(qemu_driver->libDir);
    VIR_FREE(qemu_driver->cacheDir);
1539
    VIR_FREE(qemu_driver->saveDir);
C
Chris Lalancette 已提交
1540
    VIR_FREE(qemu_driver->snapshotDir);
H
Hu Tao 已提交
1541
    VIR_FREE(qemu_driver->autoDumpPath);
1542
    VIR_FREE(qemu_driver->vncTLSx509certdir);
J
Jim Meyering 已提交
1543
    VIR_FREE(qemu_driver->vncListen);
1544
    VIR_FREE(qemu_driver->vncPassword);
1545
    VIR_FREE(qemu_driver->vncSASLdir);
E
Eric Blake 已提交
1546 1547 1548
    VIR_FREE(qemu_driver->spiceTLSx509certdir);
    VIR_FREE(qemu_driver->spiceListen);
    VIR_FREE(qemu_driver->spicePassword);
1549 1550
    VIR_FREE(qemu_driver->hugetlbfs_mount);
    VIR_FREE(qemu_driver->hugepage_path);
E
Eric Blake 已提交
1551 1552 1553
    VIR_FREE(qemu_driver->saveImageFormat);
    VIR_FREE(qemu_driver->dumpImageFormat);

1554 1555
    virSecurityManagerFree(qemu_driver->securityManager);

E
Eric Blake 已提交
1556
    ebtablesContextFree(qemu_driver->ebtables);
D
Daniel P. Berrange 已提交
1557

1558 1559 1560 1561 1562 1563
    if (qemu_driver->cgroupDeviceACL) {
        for (i = 0 ; qemu_driver->cgroupDeviceACL[i] != NULL ; i++)
            VIR_FREE(qemu_driver->cgroupDeviceACL[i]);
        VIR_FREE(qemu_driver->cgroupDeviceACL);
    }

1564 1565
    /* Free domain callback list */
    virDomainEventCallbackListFree(qemu_driver->domainEventCallbacks);
1566 1567 1568 1569
    virDomainEventQueueFree(qemu_driver->domainEventQueue);

    if (qemu_driver->domainEventTimer != -1)
        virEventRemoveTimeout(qemu_driver->domainEventTimer);
1570

1571 1572 1573
    if (qemu_driver->brctl)
        brShutdown(qemu_driver->brctl);

1574 1575
    virCgroupFree(&qemu_driver->cgroup);

1576
    qemuDriverUnlock(qemu_driver);
1577
    virMutexDestroy(&qemu_driver->lock);
H
Hu Tao 已提交
1578
    virThreadPoolFree(qemu_driver->workerPool);
1579
    VIR_FREE(qemu_driver);
1580 1581

    return 0;
1582 1583
}

1584
typedef int qemuLogHandleOutput(virDomainObjPtr vm,
1585 1586
                                const char *output,
                                int fd);
1587 1588 1589 1590 1591

/*
 * Returns -1 for error, 0 on success
 */
static int
1592
qemudReadLogOutput(virDomainObjPtr vm,
1593 1594
                   int fd,
                   char *buf,
G
Guido Günther 已提交
1595
                   size_t buflen,
1596
                   qemuLogHandleOutput func,
1597 1598 1599
                   const char *what,
                   int timeout)
{
1600
    int retries = (timeout*10);
1601
    int got = 0;
1602 1603 1604
    buf[0] = '\0';

    while (retries) {
1605
        ssize_t func_ret, ret;
1606
        int isdead = 0;
G
Guido Günther 已提交
1607

1608
        func_ret = func(vm, buf, fd);
1609

1610 1611
        if (kill(vm->pid, 0) == -1 && errno == ESRCH)
            isdead = 1;
1612

1613 1614
        /* Any failures should be detected before we read the log, so we
         * always have something useful to report on failure. */
1615 1616
        ret = saferead(fd, buf+got, buflen-got-1);
        if (ret < 0) {
1617
            virReportSystemError(errno,
1618 1619 1620 1621 1622
                                 _("Failure while reading %s log output"),
                                 what);
            return -1;
        }

1623 1624 1625
        got += ret;
        buf[got] = '\0';
        if (got == buflen-1) {
1626
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
1627 1628
                            _("Out of space while reading %s log output: %s"),
                            what, buf);
1629 1630 1631 1632
            return -1;
        }

        if (isdead) {
1633
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
1634 1635
                            _("Process exited while reading %s log output: %s"),
                            what, buf);
1636 1637 1638
            return -1;
        }

1639 1640
        if (func_ret <= 0)
            return func_ret;
1641 1642 1643 1644

        usleep(100*1000);
        retries--;
    }
1645

1646
    qemuReportError(VIR_ERR_INTERNAL_ERROR,
1647 1648
                    _("Timed out while reading %s log output: %s"),
                    what, buf);
1649 1650 1651
    return -1;
}

1652

1653 1654 1655 1656 1657 1658 1659 1660
/*
 * Look at a chunk of data from the QEMU stdout logs and try to
 * find a TTY device, as indicated by a line like
 *
 * char device redirected to /dev/pts/3
 *
 * Returns -1 for error, 0 success, 1 continue reading
 */
1661
static int
1662
qemudExtractTTYPath(const char *haystack,
1663 1664
                    size_t *offset,
                    char **path)
1665
{
1666
    static const char needle[] = "char device redirected to";
1667
    char *tmp, *dev;
1668

1669
    VIR_FREE(*path);
1670
    /* First look for our magic string */
1671 1672 1673 1674 1675
    if (!(tmp = strstr(haystack + *offset, needle))) {
        return 1;
    }
    tmp += sizeof(needle);
    dev = tmp;
1676

1677 1678 1679 1680 1681
    /*
     * And look for first whitespace character and nul terminate
     * to mark end of the pty path
     */
    while (*tmp) {
1682
        if (c_isspace(*tmp)) {
1683 1684
            *path = strndup(dev, tmp-dev);
            if (*path == NULL) {
1685
                virReportOOMError();
1686 1687
                return -1;
            }
1688

1689
            /* ... now further update offset till we get EOL */
1690
            *offset = tmp - haystack;
1691 1692
            return 0;
        }
1693
        tmp++;
1694 1695 1696 1697 1698
    }

    /*
     * We found a path, but didn't find any whitespace,
     * so it must be still incomplete - we should at
1699 1700
     * least see a \n - indicate that we want to carry
     * on trying again
1701
     */
1702
    return 1;
1703 1704
}

1705
static int
1706
qemudFindCharDevicePTYsMonitor(virDomainObjPtr vm,
1707 1708 1709 1710 1711 1712 1713
                               virHashTablePtr paths)
{
    int i;

#define LOOKUP_PTYS(array, arraylen, idprefix)                            \
    for (i = 0 ; i < (arraylen) ; i++) {                                  \
        virDomainChrDefPtr chr = (array)[i];                              \
1714
        if (chr->source.type == VIR_DOMAIN_CHR_TYPE_PTY) {                \
1715 1716 1717 1718 1719 1720 1721
            char id[16];                                                  \
                                                                          \
            if (snprintf(id, sizeof(id), idprefix "%i", i) >= sizeof(id)) \
                return -1;                                                \
                                                                          \
            const char *path = (const char *) virHashLookup(paths, id);   \
            if (path == NULL) {                                           \
1722
                if (chr->source.data.file.path == NULL) {                 \
1723 1724
                    /* neither the log output nor 'info chardev' had a */ \
                    /* pty path for this chardev, report an error */      \
1725 1726 1727
                    qemuReportError(VIR_ERR_INTERNAL_ERROR,               \
                                    _("no assigned pty for device %s"), id); \
                    return -1;                                            \
1728 1729 1730 1731 1732
                } else {                                                  \
                    /* 'info chardev' had no pty path for this chardev, */\
                    /* but the log output had, so we're fine */           \
                    continue;                                             \
                }                                                         \
1733 1734
            }                                                             \
                                                                          \
1735 1736
            VIR_FREE(chr->source.data.file.path);                         \
            chr->source.data.file.path = strdup(path);                    \
1737
                                                                          \
1738
            if (chr->source.data.file.path == NULL) {                     \
1739
                virReportOOMError();                                      \
1740 1741
                return -1;                                                \
            }                                                             \
1742 1743 1744 1745 1746 1747
        }                                                                 \
    }

    LOOKUP_PTYS(vm->def->serials,   vm->def->nserials,   "serial");
    LOOKUP_PTYS(vm->def->parallels, vm->def->nparallels, "parallel");
    LOOKUP_PTYS(vm->def->channels,  vm->def->nchannels,  "channel");
C
Cole Robinson 已提交
1748 1749
    if (vm->def->console)
        LOOKUP_PTYS(&vm->def->console, 1,  "console");
1750
#undef LOOKUP_PTYS
1751 1752 1753 1754

    return 0;
}

1755
static int
1756
qemudFindCharDevicePTYs(virDomainObjPtr vm,
1757 1758
                        const char *output,
                        int fd ATTRIBUTE_UNUSED)
1759
{
1760
    size_t offset = 0;
1761
    int ret, i;
1762 1763

    /* The order in which QEMU prints out the PTY paths is
1764 1765
       the order in which it procsses its serial and parallel
       device args. This code must match that ordering.... */
1766

1767
    /* first comes the serial devices */
1768 1769
    for (i = 0 ; i < vm->def->nserials ; i++) {
        virDomainChrDefPtr chr = vm->def->serials[i];
1770
        if (chr->source.type == VIR_DOMAIN_CHR_TYPE_PTY) {
1771
            if ((ret = qemudExtractTTYPath(output, &offset,
1772
                                           &chr->source.data.file.path)) != 0)
1773
                return ret;
1774 1775 1776
        }
    }

1777
    /* then the parallel devices */
1778 1779
    for (i = 0 ; i < vm->def->nparallels ; i++) {
        virDomainChrDefPtr chr = vm->def->parallels[i];
1780
        if (chr->source.type == VIR_DOMAIN_CHR_TYPE_PTY) {
1781
            if ((ret = qemudExtractTTYPath(output, &offset,
1782
                                           &chr->source.data.file.path)) != 0)
1783
                return ret;
1784 1785 1786
        }
    }

1787 1788 1789
    /* then the channel devices */
    for (i = 0 ; i < vm->def->nchannels ; i++) {
        virDomainChrDefPtr chr = vm->def->channels[i];
1790
        if (chr->source.type == VIR_DOMAIN_CHR_TYPE_PTY) {
1791
            if ((ret = qemudExtractTTYPath(output, &offset,
1792
                                           &chr->source.data.file.path)) != 0)
1793 1794 1795 1796
                return ret;
        }
    }

1797
    return 0;
1798 1799
}

1800 1801 1802 1803 1804
static void qemudFreePtyPath(void *payload, const char *name ATTRIBUTE_UNUSED)
{
    VIR_FREE(payload);
}

1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818
static void
qemuReadLogFD(int logfd, char *buf, int maxlen, int off)
{
    int ret;
    char *tmpbuf = buf + off;

    ret = saferead(logfd, tmpbuf, maxlen - off - 1);
    if (ret < 0) {
        ret = 0;
    }

    tmpbuf[ret] = '\0';
}

1819
static int
1820
qemudWaitForMonitor(struct qemud_driver* driver,
1821
                    virDomainObjPtr vm, off_t pos)
1822
{
1823
    char buf[4096] = ""; /* Plenty of space to get startup greeting */
1824
    int logfd;
1825
    int ret = -1;
1826
    virHashTablePtr paths = NULL;
1827

1828
    if ((logfd = qemudLogReadFD(driver->logDir, vm->def->name, pos)) < 0)
1829
        return -1;
1830

1831 1832 1833 1834
    if (qemudReadLogOutput(vm, logfd, buf, sizeof(buf),
                           qemudFindCharDevicePTYs,
                           "console", 30) < 0)
        goto closelog;
1835

1836
    VIR_DEBUG("Connect monitor to %p '%s'", vm, vm->def->name);
1837 1838 1839
    if (qemuConnectMonitor(driver, vm) < 0) {
        goto cleanup;
    }
1840

1841 1842 1843 1844
    /* Try to get the pty path mappings again via the monitor. This is much more
     * reliable if it's available.
     * Note that the monitor itself can be on a pty, so we still need to try the
     * log output method. */
1845
    paths = virHashCreate(0);
1846
    if (paths == NULL) {
1847
        virReportOOMError();
1848 1849 1850
        goto cleanup;
    }

1851
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
1852 1853
    qemuDomainObjPrivatePtr priv = vm->privateData;
    ret = qemuMonitorGetPtyPaths(priv->mon, paths);
1854
    qemuDomainObjExitMonitorWithDriver(driver, vm);
1855 1856 1857

    VIR_DEBUG("qemuMonitorGetPtyPaths returned %i", ret);
    if (ret == 0) {
1858
        ret = qemudFindCharDevicePTYsMonitor(vm, paths);
1859 1860 1861 1862 1863 1864 1865
    }

cleanup:
    if (paths) {
        virHashFree(paths, qemudFreePtyPath);
    }

1866 1867 1868 1869 1870 1871 1872 1873 1874 1875 1876
    if (kill(vm->pid, 0) == -1 && errno == ESRCH) {
        /* VM is dead, any other error raised in the interim is probably
         * not as important as the qemu cmdline output */
        qemuReadLogFD(logfd, buf, sizeof(buf), strlen(buf));
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("process exited while connecting to monitor: %s"),
                        buf);
        ret = -1;
    }

closelog:
1877
    if (VIR_CLOSE(logfd) < 0) {
1878
        char ebuf[4096];
1879
        VIR_WARN("Unable to close logfile: %s",
1880 1881 1882
                 virStrerror(errno, ebuf, sizeof ebuf));
    }

1883
    return ret;
1884 1885
}

1886
static int
1887
qemuDetectVcpuPIDs(struct qemud_driver *driver,
1888 1889 1890
                   virDomainObjPtr vm) {
    pid_t *cpupids = NULL;
    int ncpupids;
1891
    qemuDomainObjPrivatePtr priv = vm->privateData;
1892

1893
    if (vm->def->virtType != VIR_DOMAIN_VIRT_KVM) {
1894 1895
        priv->nvcpupids = 1;
        if (VIR_ALLOC_N(priv->vcpupids, priv->nvcpupids) < 0) {
1896
            virReportOOMError();
1897 1898
            return -1;
        }
1899
        priv->vcpupids[0] = vm->pid;
1900 1901 1902
        return 0;
    }

1903
    /* What follows is now all KVM specific */
1904

1905
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
1906
    if ((ncpupids = qemuMonitorGetCPUInfo(priv->mon, &cpupids)) < 0) {
1907
        qemuDomainObjExitMonitorWithDriver(driver, vm);
1908
        return -1;
1909
    }
1910
    qemuDomainObjExitMonitorWithDriver(driver, vm);
1911

1912 1913 1914
    /* Treat failure to get VCPU<->PID mapping as non-fatal */
    if (ncpupids == 0)
        return 0;
1915

1916
    if (ncpupids != vm->def->vcpus) {
1917
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
E
Eric Blake 已提交
1918 1919 1920
                        _("got wrong number of vCPU pids from QEMU monitor. "
                          "got %d, wanted %d"),
                        ncpupids, vm->def->vcpus);
1921 1922 1923
        VIR_FREE(cpupids);
        return -1;
    }
1924

1925 1926
    priv->nvcpupids = ncpupids;
    priv->vcpupids = cpupids;
1927 1928 1929
    return 0;
}

1930 1931 1932
/*
 * To be run between fork/exec of QEMU only
 */
1933
static int
1934 1935
qemudInitCpuAffinity(virDomainObjPtr vm)
{
1936
    int i, hostcpus, maxcpu = QEMUD_CPUMASK_LEN;
1937
    virNodeInfo nodeinfo;
1938 1939
    unsigned char *cpumap;
    int cpumaplen;
1940 1941

    DEBUG0("Setting CPU affinity");
1942

1943
    if (nodeGetInfo(NULL, &nodeinfo) < 0)
1944 1945 1946 1947
        return -1;

    /* setaffinity fails if you set bits for CPUs which
     * aren't present, so we have to limit ourselves */
1948 1949 1950
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;
1951

1952 1953
    cpumaplen = VIR_CPU_MAPLEN(maxcpu);
    if (VIR_ALLOC_N(cpumap, cpumaplen) < 0) {
1954
        virReportOOMError();
1955 1956 1957
        return -1;
    }

D
Daniel P. Berrange 已提交
1958
    if (vm->def->cpumask) {
1959 1960 1961
        /* XXX why don't we keep 'cpumask' in the libvirt cpumap
         * format to start with ?!?! */
        for (i = 0 ; i < maxcpu && i < vm->def->cpumasklen ; i++)
D
Daniel P. Berrange 已提交
1962
            if (vm->def->cpumask[i])
1963
                VIR_USE_CPU(cpumap, i);
D
Daniel P. Berrange 已提交
1964
    } else {
1965 1966 1967 1968
        /* You may think this is redundant, but we can't assume libvirtd
         * itself is running on all pCPUs, so we need to explicitly set
         * the spawned QEMU instance to all pCPUs if no map is given in
         * its config file */
D
Daniel P. Berrange 已提交
1969
        for (i = 0 ; i < maxcpu ; i++)
1970
            VIR_USE_CPU(cpumap, i);
D
Daniel P. Berrange 已提交
1971
    }
1972

1973 1974 1975 1976 1977 1978 1979 1980
    /* We are pressuming we are running between fork/exec of QEMU
     * so use '0' to indicate our own process ID. No threads are
     * running at this point
     */
    if (virProcessInfoSetAffinity(0, /* Self */
                                  cpumap, cpumaplen, maxcpu) < 0) {
        VIR_FREE(cpumap);
        return -1;
1981
    }
1982
    VIR_FREE(cpumap);
1983 1984 1985 1986 1987

    return 0;
}


1988
static int
1989 1990 1991 1992
qemuInitPasswords(virConnectPtr conn,
                  struct qemud_driver *driver,
                  virDomainObjPtr vm,
                  unsigned long long qemuCmdFlags) {
1993
    int ret = 0;
1994
    qemuDomainObjPrivatePtr priv = vm->privateData;
1995

1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006 2007
    if (vm->def->ngraphics == 1) {
        if (vm->def->graphics[0]->type == VIR_DOMAIN_GRAPHICS_TYPE_VNC) {
            ret = qemuDomainChangeGraphicsPasswords(driver, vm,
                                                    VIR_DOMAIN_GRAPHICS_TYPE_VNC,
                                                    &vm->def->graphics[0]->data.vnc.auth,
                                                    driver->vncPassword);
        } else if (vm->def->graphics[0]->type == VIR_DOMAIN_GRAPHICS_TYPE_SPICE) {
            ret = qemuDomainChangeGraphicsPasswords(driver, vm,
                                                    VIR_DOMAIN_GRAPHICS_TYPE_SPICE,
                                                    &vm->def->graphics[0]->data.spice.auth,
                                                    driver->spicePassword);
        }
2008 2009
    }

2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023 2024 2025 2026 2027 2028 2029 2030 2031 2032
    if (ret < 0)
        goto cleanup;

    if (qemuCmdFlags & QEMUD_CMD_FLAG_DEVICE) {
        int i;

        for (i = 0 ; i < vm->def->ndisks ; i++) {
            char *secret;
            size_t secretLen;

            if (!vm->def->disks[i]->encryption ||
                !vm->def->disks[i]->src)
                continue;

            if (getVolumeQcowPassphrase(conn,
                                        vm->def->disks[i],
                                        &secret, &secretLen) < 0)
                goto cleanup;

            qemuDomainObjEnterMonitorWithDriver(driver, vm);
            ret = qemuMonitorSetDrivePassphrase(priv->mon,
                                                vm->def->disks[i]->info.alias,
                                                secret);
2033
            VIR_FREE(secret);
2034 2035 2036 2037 2038 2039 2040
            qemuDomainObjExitMonitorWithDriver(driver, vm);
            if (ret < 0)
                goto cleanup;
        }
    }

cleanup:
2041
    return ret;
2042 2043 2044
}


2045 2046 2047 2048 2049 2050 2051 2052 2053 2054 2055 2056
#define QEMU_PCI_VENDOR_INTEL     0x8086
#define QEMU_PCI_VENDOR_LSI_LOGIC 0x1000
#define QEMU_PCI_VENDOR_REDHAT    0x1af4
#define QEMU_PCI_VENDOR_CIRRUS    0x1013
#define QEMU_PCI_VENDOR_REALTEK   0x10ec
#define QEMU_PCI_VENDOR_AMD       0x1022
#define QEMU_PCI_VENDOR_ENSONIQ   0x1274
#define QEMU_PCI_VENDOR_VMWARE    0x15ad
#define QEMU_PCI_VENDOR_QEMU      0x1234

#define QEMU_PCI_PRODUCT_DISK_VIRTIO 0x1001

2057 2058
#define QEMU_PCI_PRODUCT_BALLOON_VIRTIO 0x1002

2059 2060 2061 2062 2063 2064 2065 2066 2067 2068 2069 2070 2071 2072 2073 2074 2075 2076 2077 2078 2079 2080 2081 2082 2083 2084 2085 2086 2087 2088 2089 2090 2091 2092 2093 2094 2095 2096 2097 2098 2099 2100 2101 2102 2103 2104 2105 2106 2107 2108 2109 2110 2111 2112 2113 2114 2115 2116 2117 2118 2119 2120 2121 2122 2123 2124 2125 2126 2127 2128 2129 2130 2131 2132 2133 2134 2135 2136 2137 2138 2139 2140 2141 2142 2143 2144 2145 2146 2147 2148 2149 2150 2151 2152 2153 2154 2155 2156 2157 2158 2159 2160 2161 2162 2163 2164 2165 2166 2167 2168 2169 2170 2171 2172 2173 2174 2175 2176 2177 2178 2179 2180 2181 2182 2183 2184 2185 2186 2187 2188 2189 2190 2191 2192 2193 2194 2195 2196 2197 2198 2199 2200 2201 2202 2203 2204 2205 2206 2207 2208 2209 2210 2211 2212 2213 2214 2215 2216 2217 2218 2219 2220 2221 2222 2223 2224 2225 2226 2227 2228 2229 2230 2231 2232 2233 2234 2235 2236 2237 2238 2239 2240 2241 2242 2243 2244 2245 2246 2247 2248 2249 2250 2251 2252 2253 2254 2255 2256 2257 2258 2259 2260 2261 2262 2263 2264 2265 2266
#define QEMU_PCI_PRODUCT_NIC_NE2K     0x8029
#define QEMU_PCI_PRODUCT_NIC_PCNET    0x2000
#define QEMU_PCI_PRODUCT_NIC_RTL8139  0x8139
#define QEMU_PCI_PRODUCT_NIC_E1000    0x100E
#define QEMU_PCI_PRODUCT_NIC_VIRTIO   0x1000

#define QEMU_PCI_PRODUCT_VGA_CIRRUS 0x00b8
#define QEMU_PCI_PRODUCT_VGA_VMWARE 0x0405
#define QEMU_PCI_PRODUCT_VGA_STDVGA 0x1111

#define QEMU_PCI_PRODUCT_AUDIO_AC97    0x2415
#define QEMU_PCI_PRODUCT_AUDIO_ES1370  0x5000

#define QEMU_PCI_PRODUCT_CONTROLLER_PIIX 0x7010
#define QEMU_PCI_PRODUCT_CONTROLLER_LSI  0x0012

#define QEMU_PCI_PRODUCT_WATCHDOG_I63000ESB 0x25ab

static int
qemuAssignNextPCIAddress(virDomainDeviceInfo *info,
                         int vendor,
                         int product,
                         qemuMonitorPCIAddress *addrs,
                         int naddrs)
{
    int found = 0;
    int i;

    VIR_DEBUG("Look for %x:%x out of %d", vendor, product, naddrs);

    for (i = 0 ; (i < naddrs) && !found; i++) {
        VIR_DEBUG("Maybe %x:%x", addrs[i].vendor, addrs[i].product);
        if (addrs[i].vendor == vendor &&
            addrs[i].product == product) {
            VIR_DEBUG("Match %d", i);
            found = 1;
            break;
        }
    }
    if (!found) {
        return -1;
    }

    /* Blank it out so this device isn't matched again */
    addrs[i].vendor = 0;
    addrs[i].product = 0;

    if (info->type == VIR_DOMAIN_DEVICE_ADDRESS_TYPE_NONE)
        info->type = VIR_DOMAIN_DEVICE_ADDRESS_TYPE_PCI;

    if (info->type == VIR_DOMAIN_DEVICE_ADDRESS_TYPE_PCI) {
        info->addr.pci.domain = addrs[i].addr.domain;
        info->addr.pci.bus = addrs[i].addr.bus;
        info->addr.pci.slot = addrs[i].addr.slot;
        info->addr.pci.function = addrs[i].addr.function;
    }

    return 0;
}

static int
qemuGetPCIDiskVendorProduct(virDomainDiskDefPtr def,
                            unsigned *vendor,
                            unsigned *product)
{
    switch (def->bus) {
    case VIR_DOMAIN_DISK_BUS_VIRTIO:
        *vendor = QEMU_PCI_VENDOR_REDHAT;
        *product = QEMU_PCI_PRODUCT_DISK_VIRTIO;
        break;

    default:
        return -1;
    }

    return 0;
}

static int
qemuGetPCINetVendorProduct(virDomainNetDefPtr def,
                            unsigned *vendor,
                            unsigned *product)
{
    if (!def->model)
        return -1;

    if (STREQ(def->model, "ne2k_pci")) {
        *vendor = QEMU_PCI_VENDOR_REALTEK;
        *product = QEMU_PCI_PRODUCT_NIC_NE2K;
    } else if (STREQ(def->model, "pcnet")) {
        *vendor = QEMU_PCI_VENDOR_AMD;
        *product = QEMU_PCI_PRODUCT_NIC_PCNET;
    } else if (STREQ(def->model, "rtl8139")) {
        *vendor = QEMU_PCI_VENDOR_REALTEK;
        *product = QEMU_PCI_PRODUCT_NIC_RTL8139;
    } else if (STREQ(def->model, "e1000")) {
        *vendor = QEMU_PCI_VENDOR_INTEL;
        *product = QEMU_PCI_PRODUCT_NIC_E1000;
    } else if (STREQ(def->model, "virtio")) {
        *vendor = QEMU_PCI_VENDOR_REDHAT;
        *product = QEMU_PCI_PRODUCT_NIC_VIRTIO;
    } else {
        VIR_INFO("Unexpected NIC model %s, cannot get PCI address",
                 def->model);
        return -1;
    }
    return 0;
}

static int
qemuGetPCIControllerVendorProduct(virDomainControllerDefPtr def,
                                  unsigned *vendor,
                                  unsigned *product)
{
    switch (def->type) {
    case VIR_DOMAIN_CONTROLLER_TYPE_SCSI:
        *vendor = QEMU_PCI_VENDOR_LSI_LOGIC;
        *product = QEMU_PCI_PRODUCT_CONTROLLER_LSI;
        break;

    case VIR_DOMAIN_CONTROLLER_TYPE_FDC:
        /* XXX we could put in the ISA bridge address, but
           that's not technically the FDC's address */
        return -1;

    case VIR_DOMAIN_CONTROLLER_TYPE_IDE:
        *vendor = QEMU_PCI_VENDOR_INTEL;
        *product = QEMU_PCI_PRODUCT_CONTROLLER_PIIX;
        break;

    default:
        VIR_INFO("Unexpected controller type %s, cannot get PCI address",
                 virDomainControllerTypeToString(def->type));
        return -1;
    }

    return 0;
}

static int
qemuGetPCIVideoVendorProduct(virDomainVideoDefPtr def,
                             unsigned *vendor,
                             unsigned *product)
{
    switch (def->type) {
    case VIR_DOMAIN_VIDEO_TYPE_CIRRUS:
        *vendor = QEMU_PCI_VENDOR_CIRRUS;
        *product = QEMU_PCI_PRODUCT_VGA_CIRRUS;
        break;

    case VIR_DOMAIN_VIDEO_TYPE_VGA:
        *vendor = QEMU_PCI_VENDOR_QEMU;
        *product = QEMU_PCI_PRODUCT_VGA_STDVGA;
        break;

    case VIR_DOMAIN_VIDEO_TYPE_VMVGA:
        *vendor = QEMU_PCI_VENDOR_VMWARE;
        *product = QEMU_PCI_PRODUCT_VGA_VMWARE;
        break;

    default:
        return -1;
    }
    return 0;
}

static int
qemuGetPCISoundVendorProduct(virDomainSoundDefPtr def,
                             unsigned *vendor,
                             unsigned *product)
{
    switch (def->model) {
    case VIR_DOMAIN_SOUND_MODEL_ES1370:
        *vendor = QEMU_PCI_VENDOR_ENSONIQ;
        *product = QEMU_PCI_PRODUCT_AUDIO_ES1370;
        break;

    case VIR_DOMAIN_SOUND_MODEL_AC97:
        *vendor = QEMU_PCI_VENDOR_INTEL;
        *product = QEMU_PCI_PRODUCT_AUDIO_AC97;
        break;

    default:
        return -1;
    }

    return 0;
}

static int
qemuGetPCIWatchdogVendorProduct(virDomainWatchdogDefPtr def,
                                unsigned *vendor,
                                unsigned *product)
{
    switch (def->model) {
    case VIR_DOMAIN_WATCHDOG_MODEL_I6300ESB:
        *vendor = QEMU_PCI_VENDOR_INTEL;
        *product = QEMU_PCI_PRODUCT_WATCHDOG_I63000ESB;
        break;

    default:
        return -1;
    }

    return 0;
}


2267 2268 2269 2270 2271 2272 2273 2274 2275 2276 2277 2278 2279 2280 2281 2282 2283 2284 2285
static int
qemuGetPCIMemballoonVendorProduct(virDomainMemballoonDefPtr def,
                                  unsigned *vendor,
                                  unsigned *product)
{
    switch (def->model) {
    case VIR_DOMAIN_MEMBALLOON_MODEL_VIRTIO:
        *vendor = QEMU_PCI_VENDOR_REDHAT;
        *product = QEMU_PCI_PRODUCT_BALLOON_VIRTIO;
        break;

    default:
        return -1;
    }

    return 0;
}


2286 2287 2288 2289 2290 2291 2292 2293 2294
/*
 * This entire method assumes that PCI devices in 'info pci'
 * match ordering of devices specified on the command line
 * wrt to devices of matching vendor+product
 *
 * XXXX this might not be a valid assumption if we assign
 * some static addrs on CLI. Have to check that...
 */
static int
2295
qemuDetectPCIAddresses(virDomainObjPtr vm,
2296 2297 2298 2299 2300 2301 2302 2303 2304 2305 2306 2307 2308 2309 2310 2311 2312
                       qemuMonitorPCIAddress *addrs,
                       int naddrs)
{
    unsigned int vendor = 0, product = 0;
    int i;

    /* XXX should all these vendor/product IDs be kept in the
     * actual device data structure instead ?
     */

    for (i = 0 ; i < vm->def->ndisks ; i++) {
        if (qemuGetPCIDiskVendorProduct(vm->def->disks[i], &vendor, &product) < 0)
            continue;

        if (qemuAssignNextPCIAddress(&(vm->def->disks[i]->info),
                                     vendor, product,
                                     addrs, naddrs) < 0) {
2313 2314 2315
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("cannot find PCI address for VirtIO disk %s"),
                            vm->def->disks[i]->dst);
2316 2317 2318 2319 2320 2321 2322 2323 2324 2325 2326
            return -1;
        }
    }

    for (i = 0 ; i < vm->def->nnets ; i++) {
        if (qemuGetPCINetVendorProduct(vm->def->nets[i], &vendor, &product) < 0)
            continue;

        if (qemuAssignNextPCIAddress(&(vm->def->nets[i]->info),
                                     vendor, product,
                                     addrs,  naddrs) < 0) {
2327 2328 2329
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("cannot find PCI address for %s NIC"),
                            vm->def->nets[i]->model);
2330 2331 2332 2333 2334 2335 2336 2337 2338 2339 2340
            return -1;
        }
    }

    for (i = 0 ; i < vm->def->ncontrollers ; i++) {
        if (qemuGetPCIControllerVendorProduct(vm->def->controllers[i], &vendor, &product) < 0)
            continue;

        if (qemuAssignNextPCIAddress(&(vm->def->controllers[i]->info),
                                     vendor, product,
                                     addrs,  naddrs) < 0) {
2341 2342 2343
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("cannot find PCI address for controller %s"),
                            virDomainControllerTypeToString(vm->def->controllers[i]->type));
2344 2345 2346 2347 2348 2349 2350 2351 2352 2353 2354
            return -1;
        }
    }

    for (i = 0 ; i < vm->def->nvideos ; i++) {
        if (qemuGetPCIVideoVendorProduct(vm->def->videos[i], &vendor, &product) < 0)
            continue;

        if (qemuAssignNextPCIAddress(&(vm->def->videos[i]->info),
                                     vendor, product,
                                     addrs,  naddrs) < 0) {
2355 2356 2357
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("cannot find PCI address for video adapter %s"),
                            virDomainVideoTypeToString(vm->def->videos[i]->type));
2358 2359 2360 2361 2362 2363 2364 2365 2366
            return -1;
        }
    }

    for (i = 0 ; i < vm->def->nsounds ; i++) {
        if (qemuGetPCISoundVendorProduct(vm->def->sounds[i], &vendor, &product) < 0)
            continue;

        if (qemuAssignNextPCIAddress(&(vm->def->sounds[i]->info),
2367
                                    vendor, product,
2368
                                     addrs,  naddrs) < 0) {
2369 2370 2371
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("cannot find PCI address for sound adapter %s"),
                            virDomainSoundModelTypeToString(vm->def->sounds[i]->model));
2372 2373 2374 2375 2376 2377 2378 2379 2380 2381
            return -1;
        }
    }


    if (vm->def->watchdog &&
        qemuGetPCIWatchdogVendorProduct(vm->def->watchdog, &vendor, &product) == 0) {
        if (qemuAssignNextPCIAddress(&(vm->def->watchdog->info),
                                     vendor, product,
                                     addrs,  naddrs) < 0) {
2382 2383 2384
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("cannot find PCI address for watchdog %s"),
                            virDomainWatchdogModelTypeToString(vm->def->watchdog->model));
2385 2386 2387 2388
            return -1;
        }
    }

2389 2390 2391 2392 2393 2394 2395 2396 2397 2398 2399 2400
    if (vm->def->memballoon &&
        qemuGetPCIMemballoonVendorProduct(vm->def->memballoon, &vendor, &product) == 0) {
        if (qemuAssignNextPCIAddress(&(vm->def->memballoon->info),
                                     vendor, product,
                                     addrs, naddrs) < 0) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("cannot find PCI address for balloon %s"),
                            virDomainMemballoonModelTypeToString(vm->def->memballoon->model));
            return -1;
        }
    }

2401 2402 2403 2404 2405 2406 2407 2408 2409 2410 2411 2412 2413 2414 2415 2416 2417 2418 2419 2420 2421 2422 2423 2424 2425 2426
    /* XXX console (virtio) */


    /* ... and now things we don't have in our xml */

    /* XXX USB controller ? */

    /* XXX what about other PCI devices (ie bridges) */

    return 0;
}

static int
qemuInitPCIAddresses(struct qemud_driver *driver,
                     virDomainObjPtr vm)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
    int naddrs;
    int ret;
    qemuMonitorPCIAddress *addrs = NULL;

    qemuDomainObjEnterMonitorWithDriver(driver, vm);
    naddrs = qemuMonitorGetAllPCIAddresses(priv->mon,
                                           &addrs);
    qemuDomainObjExitMonitorWithDriver(driver, vm);

2427
    ret = qemuDetectPCIAddresses(vm, addrs, naddrs);
2428 2429 2430 2431 2432 2433

    VIR_FREE(addrs);

    return ret;
}

2434 2435 2436

static int qemudNextFreePort(struct qemud_driver *driver,
                             int startPort) {
2437 2438
    int i;

2439
    for (i = startPort ; i < QEMU_VNC_PORT_MAX; i++) {
2440 2441 2442
        int fd;
        int reuse = 1;
        struct sockaddr_in addr;
2443 2444 2445 2446 2447 2448 2449 2450 2451
        bool used = false;

        if (virBitmapGetBit(driver->reservedVNCPorts,
                            i - QEMU_VNC_PORT_MIN, &used) < 0)
            VIR_DEBUG("virBitmapGetBit failed on bit %d", i - QEMU_VNC_PORT_MIN);

        if (used)
            continue;

2452 2453 2454 2455 2456 2457 2458 2459
        addr.sin_family = AF_INET;
        addr.sin_port = htons(i);
        addr.sin_addr.s_addr = htonl(INADDR_ANY);
        fd = socket(PF_INET, SOCK_STREAM, 0);
        if (fd < 0)
            return -1;

        if (setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, (void*)&reuse, sizeof(reuse)) < 0) {
2460
            VIR_FORCE_CLOSE(fd);
2461 2462 2463 2464 2465
            break;
        }

        if (bind(fd, (struct sockaddr*)&addr, sizeof(addr)) == 0) {
            /* Not in use, lets grab it */
2466
            VIR_FORCE_CLOSE(fd);
2467 2468 2469 2470 2471 2472
            /* Add port to bitmap of reserved ports */
            if (virBitmapSetBit(driver->reservedVNCPorts,
                                i - QEMU_VNC_PORT_MIN) < 0) {
                VIR_DEBUG("virBitmapSetBit failed on bit %d",
                          i - QEMU_VNC_PORT_MIN);
            }
2473 2474
            return i;
        }
2475
        VIR_FORCE_CLOSE(fd);
2476 2477 2478 2479 2480 2481 2482 2483 2484 2485 2486

        if (errno == EADDRINUSE) {
            /* In use, try next */
            continue;
        }
        /* Some other bad failure, get out.. */
        break;
    }
    return -1;
}

2487

2488 2489 2490 2491 2492 2493 2494 2495 2496 2497 2498 2499 2500
static void
qemuReturnPort(struct qemud_driver *driver,
                int port)
{
    if (port < QEMU_VNC_PORT_MIN)
        return;

    if (virBitmapClearBit(driver->reservedVNCPorts,
                          port - QEMU_VNC_PORT_MIN) < 0)
        VIR_DEBUG("Could not mark port %d as unused", port);
}


2501 2502 2503 2504 2505 2506 2507
static int
qemuAssignPCIAddresses(virDomainDefPtr def)
{
    int ret = -1;
    unsigned long long qemuCmdFlags = 0;
    qemuDomainPCIAddressSetPtr addrs = NULL;

2508 2509 2510
    if (qemuCapsExtractVersionInfo(def->emulator,
                                   NULL,
                                   &qemuCmdFlags) < 0)
2511 2512 2513 2514 2515 2516 2517 2518 2519 2520 2521 2522 2523 2524 2525 2526 2527 2528 2529
        goto cleanup;

    if (qemuCmdFlags & QEMUD_CMD_FLAG_DEVICE) {
        if (!(addrs = qemuDomainPCIAddressSetCreate(def)))
            goto cleanup;

        if (qemuAssignDevicePCISlots(def, addrs) < 0)
            goto cleanup;
    }

    ret = 0;

cleanup:
    qemuDomainPCIAddressSetFree(addrs);

    return ret;
}


2530 2531 2532 2533 2534 2535
static int
qemuPrepareChardevDevice(virDomainDefPtr def ATTRIBUTE_UNUSED,
                         virDomainChrDefPtr dev,
                         void *opaque ATTRIBUTE_UNUSED)
{
    int fd;
2536
    if (dev->source.type != VIR_DOMAIN_CHR_TYPE_FILE)
2537 2538
        return 0;

2539 2540
    if ((fd = open(dev->source.data.file.path,
                   O_CREAT | O_APPEND, S_IRUSR|S_IWUSR)) < 0) {
2541 2542
        virReportSystemError(errno,
                             _("Unable to pre-create chardev file '%s'"),
2543
                             dev->source.data.file.path);
2544 2545 2546
        return -1;
    }

2547
    VIR_FORCE_CLOSE(fd);
2548 2549 2550 2551 2552

    return 0;
}


2553 2554 2555 2556
struct qemudHookData {
    virConnectPtr conn;
    virDomainObjPtr vm;
    struct qemud_driver *driver;
2557 2558 2559
};

static int qemudSecurityHook(void *data) {
2560 2561
    struct qemudHookData *h = data;

2562 2563 2564
    /* This must take place before exec(), so that all QEMU
     * memory allocation is on the correct NUMA node
     */
2565
    if (qemuAddToCgroup(h->driver, h->vm->def) < 0)
2566 2567
        return -1;

2568 2569 2570
    /* This must be done after cgroup placement to avoid resetting CPU
     * affinity */
    if (qemudInitCpuAffinity(h->vm) < 0)
2571
        return -1;
2572

2573
    if (virSecurityManagerSetProcessLabel(h->driver->securityManager, h->vm) < 0)
2574 2575 2576
        return -1;

    return 0;
2577 2578
}

2579
static int
2580
qemuPrepareMonitorChr(struct qemud_driver *driver,
2581
                      virDomainChrSourceDefPtr monConfig,
2582 2583
                      const char *vm)
{
2584 2585
    monConfig->type = VIR_DOMAIN_CHR_TYPE_UNIX;
    monConfig->data.nix.listen = true;
2586

2587
    if (virAsprintf(&monConfig->data.nix.path, "%s/%s.monitor",
2588
                    driver->libDir, vm) < 0) {
2589
        virReportOOMError();
2590 2591 2592 2593 2594 2595
        return -1;
    }

    return 0;
}

2596 2597 2598 2599
static int qemuDomainSnapshotSetCurrentActive(virDomainObjPtr vm,
                                              char *snapshotDir);
static int qemuDomainSnapshotSetCurrentInactive(virDomainObjPtr vm,
                                                char *snapshotDir);
C
Chris Lalancette 已提交
2600

2601

2602 2603
#define START_POSTFIX ": starting up\n"
#define SHUTDOWN_POSTFIX ": shutting down\n"
2604

2605 2606
static int qemudStartVMDaemon(virConnectPtr conn,
                              struct qemud_driver *driver,
2607
                              virDomainObjPtr vm,
2608
                              const char *migrateFrom,
2609
                              bool start_paused,
2610
                              int stdin_fd,
2611 2612
                              const char *stdin_path,
                              enum virVMOperationType vmop) {
E
Eric Blake 已提交
2613
    int ret;
2614
    unsigned long long qemuCmdFlags;
2615
    off_t pos = -1;
2616
    char ebuf[1024];
2617
    char *pidfile = NULL;
2618
    int logfile = -1;
2619
    char *timestamp;
2620
    qemuDomainObjPrivatePtr priv = vm->privateData;
E
Eric Blake 已提交
2621
    virCommandPtr cmd = NULL;
2622

2623
    struct qemudHookData hookData;
2624 2625 2626 2627
    hookData.conn = conn;
    hookData.vm = vm;
    hookData.driver = driver;

2628 2629
    DEBUG0("Beginning VM startup process");

D
Daniel P. Berrange 已提交
2630
    if (virDomainObjIsActive(vm)) {
2631 2632
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("VM is already active"));
2633 2634 2635
        return -1;
    }

2636 2637 2638 2639 2640 2641 2642 2643
    /* Do this upfront, so any part of the startup process can add
     * runtime state to vm->def that won't be persisted. This let's us
     * report implicit runtime defaults in the XML, like vnc listen/socket
     */
    DEBUG0("Setting current domain def as transient");
    if (virDomainObjSetDefTransient(driver->caps, vm, true) < 0)
        goto cleanup;

2644 2645 2646 2647 2648
    /* Must be run before security labelling */
    DEBUG0("Preparing host devices");
    if (qemuPrepareHostDevices(driver, vm->def) < 0)
        goto cleanup;

2649 2650 2651 2652 2653 2654 2655
    DEBUG0("Preparing chr devices");
    if (virDomainChrDefForeach(vm->def,
                               true,
                               qemuPrepareChardevDevice,
                               NULL) < 0)
        goto cleanup;

2656 2657
    /* If you are using a SecurityDriver with dynamic labelling,
       then generate a security label for isolation */
2658
    DEBUG0("Generating domain security label (if required)");
2659 2660 2661
    if (virSecurityManagerGenLabel(driver->securityManager, vm) < 0) {
        qemuDomainSecurityLabelAudit(vm, false);
        goto cleanup;
2662
    }
2663
    qemuDomainSecurityLabelAudit(vm, true);
2664

2665
    DEBUG0("Generating setting domain security labels (if required)");
2666 2667
    if (virSecurityManagerSetAllLabel(driver->securityManager,
                                      vm, stdin_path) < 0)
2668
        goto cleanup;
2669

2670 2671 2672 2673 2674 2675 2676 2677 2678 2679 2680 2681 2682 2683 2684 2685 2686 2687
    if (stdin_fd != -1) {
        /* if there's an fd to migrate from, and it's a pipe, put the
         * proper security label on it
         */
        struct stat stdin_sb;

        DEBUG0("setting security label on pipe used for migration");

        if (fstat(stdin_fd, &stdin_sb) < 0) {
            virReportSystemError(errno,
                                 _("cannot stat fd %d"), stdin_fd);
            goto cleanup;
        }
        if (S_ISFIFO(stdin_sb.st_mode) &&
            virSecurityManagerSetFDLabel(driver->securityManager, vm, stdin_fd) < 0)
            goto cleanup;
    }

2688 2689 2690
    /* Ensure no historical cgroup for this VM is lying around bogus
     * settings */
    DEBUG0("Ensuring no historical cgroup is lying around");
2691
    qemuRemoveCgroup(driver, vm, 1);
2692

2693 2694
    if (vm->def->ngraphics == 1) {
        if (vm->def->graphics[0]->type == VIR_DOMAIN_GRAPHICS_TYPE_VNC &&
2695
            !vm->def->graphics[0]->data.vnc.socket &&
2696
            vm->def->graphics[0]->data.vnc.autoport) {
2697
            int port = qemudNextFreePort(driver, QEMU_VNC_PORT_MIN);
2698 2699 2700 2701 2702 2703 2704 2705
            if (port < 0) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Unable to find an unused VNC port"));
                goto cleanup;
            }
            vm->def->graphics[0]->data.vnc.port = port;
        } else if (vm->def->graphics[0]->type == VIR_DOMAIN_GRAPHICS_TYPE_SPICE &&
                   vm->def->graphics[0]->data.spice.autoport) {
2706
            int port = qemudNextFreePort(driver, QEMU_VNC_PORT_MIN);
2707 2708
            int tlsPort = -1;
            if (port < 0) {
2709
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
2710
                                "%s", _("Unable to find an unused SPICE port"));
2711 2712 2713
                goto cleanup;
            }

2714 2715 2716 2717 2718
            if (driver->spiceTLS) {
                tlsPort = qemudNextFreePort(driver, port + 1);
                if (tlsPort < 0) {
                    qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                    "%s", _("Unable to find an unused SPICE TLS port"));
2719
                    qemuReturnPort(driver, port);
2720 2721 2722 2723
                    goto cleanup;
                }
            }

2724 2725
            vm->def->graphics[0]->data.spice.port = port;
            vm->def->graphics[0]->data.spice.tlsPort = tlsPort;
2726
        }
2727
    }
2728

L
Laine Stump 已提交
2729
    if (virFileMakePath(driver->logDir) != 0) {
2730
        virReportSystemError(errno,
2731 2732
                             _("cannot create log directory %s"),
                             driver->logDir);
2733
        goto cleanup;
2734 2735
    }

2736
    DEBUG0("Creating domain log file");
2737
    if ((logfile = qemudLogFD(driver, vm->def->name, false)) < 0)
2738
        goto cleanup;
2739

E
Eric Blake 已提交
2740
    DEBUG0("Determining emulator version");
2741 2742 2743
    if (qemuCapsExtractVersionInfo(vm->def->emulator,
                                   NULL,
                                   &qemuCmdFlags) < 0)
2744
        goto cleanup;
2745

2746
    DEBUG0("Setting up domain cgroup (if required)");
2747
    if (qemuSetupCgroup(driver, vm) < 0)
2748 2749
        goto cleanup;

2750
    if (VIR_ALLOC(priv->monConfig) < 0) {
2751
        virReportOOMError();
2752 2753 2754
        goto cleanup;
    }

2755
    DEBUG0("Preparing monitor state");
2756
    if (qemuPrepareMonitorChr(driver, priv->monConfig, vm->def->name) < 0)
2757
        goto cleanup;
2758

D
Daniel P. Berrange 已提交
2759 2760 2761
#if HAVE_YAJL
    if (qemuCmdFlags & QEMUD_CMD_FLAG_MONITOR_JSON)
        priv->monJSON = 1;
2762
    else
D
Daniel P. Berrange 已提交
2763
#endif
2764
        priv->monJSON = 0;
D
Daniel P. Berrange 已提交
2765

2766
    priv->monitor_warned = 0;
2767
    priv->gotShutdown = false;
2768

D
Daniel P. Berrange 已提交
2769
    if ((ret = virFileDeletePid(driver->stateDir, vm->def->name)) != 0) {
2770
        virReportSystemError(ret,
D
Daniel P. Berrange 已提交
2771 2772 2773 2774 2775
                             _("Cannot remove stale PID file for %s"),
                             vm->def->name);
        goto cleanup;
    }

2776
    if (!(pidfile = virFilePid(driver->stateDir, vm->def->name))) {
2777
        virReportSystemError(errno,
2778 2779 2780
                             "%s", _("Failed to build pidfile path."));
        goto cleanup;
    }
D
Daniel P. Berrange 已提交
2781

2782
    /*
M
Matthew Booth 已提交
2783
     * Normally PCI addresses are assigned in the virDomainCreate
2784 2785 2786 2787 2788
     * or virDomainDefine methods. We might still need to assign
     * some here to cope with the question of upgrades. Regardless
     * we also need to populate the PCi address set cache for later
     * use in hotplug
     */
2789
    if (qemuCmdFlags & QEMUD_CMD_FLAG_DEVICE) {
2790
        DEBUG0("Assigning domain PCI addresses");
2791
        /* Populate cache with current addresses */
2792 2793 2794 2795 2796 2797 2798
        if (priv->pciaddrs) {
            qemuDomainPCIAddressSetFree(priv->pciaddrs);
            priv->pciaddrs = NULL;
        }
        if (!(priv->pciaddrs = qemuDomainPCIAddressSetCreate(vm->def)))
            goto cleanup;

2799 2800

        /* Assign any remaining addresses */
2801 2802
        if (qemuAssignDevicePCISlots(vm->def, priv->pciaddrs) < 0)
            goto cleanup;
2803 2804 2805 2806

        priv->persistentAddrs = 1;
    } else {
        priv->persistentAddrs = 0;
2807 2808
    }

2809
    DEBUG0("Building emulator command line");
2810
    vm->def->id = driver->nextvmid++;
2811 2812
    if (!(cmd = qemuBuildCommandLine(conn, driver, vm->def, priv->monConfig,
                                     priv->monJSON != 0, qemuCmdFlags,
2813
                                     migrateFrom, stdin_fd,
2814
                                     vm->current_snapshot, vmop)))
C
Chris Lalancette 已提交
2815 2816
        goto cleanup;

2817
    if (qemuDomainSnapshotSetCurrentInactive(vm, driver->snapshotDir) < 0)
2818
        goto cleanup;
2819

2820 2821 2822 2823 2824 2825 2826 2827 2828 2829 2830 2831 2832 2833 2834 2835
    /* now that we know it is about to start call the hook if present */
    if (virHookPresent(VIR_HOOK_DRIVER_QEMU)) {
        char *xml = virDomainDefFormat(vm->def, 0);
        int hookret;

        hookret = virHookCall(VIR_HOOK_DRIVER_QEMU, vm->def->name,
                    VIR_HOOK_QEMU_OP_START, VIR_HOOK_SUBOP_BEGIN, NULL, xml);
        VIR_FREE(xml);

        /*
         * If the script raised an error abort the launch
         */
        if (hookret < 0)
            goto cleanup;
    }

2836 2837 2838 2839 2840 2841 2842 2843 2844 2845 2846 2847 2848
    if ((timestamp = virTimestamp()) == NULL) {
        virReportOOMError();
        goto cleanup;
    } else {
        if (safewrite(logfile, timestamp, strlen(timestamp)) < 0 ||
            safewrite(logfile, START_POSTFIX, strlen(START_POSTFIX)) < 0) {
            VIR_WARN("Unable to write timestamp to logfile: %s",
                     virStrerror(errno, ebuf, sizeof ebuf));
        }

        VIR_FREE(timestamp);
    }

E
Eric Blake 已提交
2849
    virCommandWriteArgLog(cmd, logfile);
2850

2851
    if ((pos = lseek(logfile, 0, SEEK_END)) < 0)
2852
        VIR_WARN("Unable to seek to end of logfile: %s",
2853
                 virStrerror(errno, ebuf, sizeof ebuf));
2854

2855 2856
    VIR_DEBUG("Clear emulator capabilities: %d",
              driver->clearEmulatorCapabilities);
E
Eric Blake 已提交
2857 2858 2859 2860 2861
    if (driver->clearEmulatorCapabilities)
        virCommandClearCaps(cmd);

    VIR_WARN("Executing %s", vm->def->emulator);
    virCommandSetPreExecHook(cmd, qemudSecurityHook, &hookData);
2862

E
Eric Blake 已提交
2863 2864 2865 2866 2867 2868 2869 2870
    virCommandSetOutputFD(cmd, &logfile);
    virCommandSetErrorFD(cmd, &logfile);
    virCommandNonblockingFDs(cmd);
    virCommandSetPidFile(cmd, pidfile);
    virCommandDaemonize(cmd);

    ret = virCommandRun(cmd, NULL);
    VIR_WARN("Executing done %s", vm->def->emulator);
2871
    VIR_FREE(pidfile);
G
Guido Günther 已提交
2872 2873 2874

    /* wait for qemu process to to show up */
    if (ret == 0) {
2875
        if (virFileReadPid(driver->stateDir, vm->def->name, &vm->pid)) {
2876 2877
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("Domain %s didn't show up\n"), vm->def->name);
2878
            ret = -1;
G
Guido Günther 已提交
2879
        }
E
Eric Blake 已提交
2880
#if 0
2881
    } else if (ret == -2) {
E
Eric Blake 已提交
2882 2883 2884 2885 2886
        /*
         * XXX this is bogus. It isn't safe to set vm->pid = child
         * because the child no longer exists.
         */

2887 2888 2889 2890 2891 2892 2893 2894 2895
        /* The virExec process that launches the daemon failed. Pending on
         * when it failed (we can't determine for sure), there may be
         * extra info in the domain log (if the hook failed for example).
         *
         * Pretend like things succeeded, and let 'WaitForMonitor' report
         * the log contents for us.
         */
        vm->pid = child;
        ret = 0;
E
Eric Blake 已提交
2896
#endif
2897
    }
2898

2899 2900 2901
    if (migrateFrom)
        start_paused = true;
    vm->state = start_paused ? VIR_DOMAIN_PAUSED : VIR_DOMAIN_RUNNING;
2902

2903
    if (ret == -1) /* The VM failed to start; tear filters before taps */
2904
        virDomainConfVMNWFilterTeardown(vm);
2905

2906
    if (ret == -1) /* The VM failed to start */
2907 2908
        goto cleanup;

2909
    DEBUG0("Waiting for monitor to show up");
2910
    if (qemudWaitForMonitor(driver, vm, pos) < 0)
2911
        goto cleanup;
2912

2913
    DEBUG0("Detecting VCPU PIDs");
2914
    if (qemuDetectVcpuPIDs(driver, vm) < 0)
2915
        goto cleanup;
2916

2917
    DEBUG0("Setting any required VM passwords");
2918
    if (qemuInitPasswords(conn, driver, vm, qemuCmdFlags) < 0)
2919
        goto cleanup;
2920

D
Daniel P. Berrange 已提交
2921 2922 2923
    /* If we have -device, then addresses are assigned explicitly.
     * If not, then we have to detect dynamic ones here */
    if (!(qemuCmdFlags & QEMUD_CMD_FLAG_DEVICE)) {
2924
        DEBUG0("Determining domain device PCI addresses");
D
Daniel P. Berrange 已提交
2925
        if (qemuInitPCIAddresses(driver, vm) < 0)
2926
            goto cleanup;
D
Daniel P. Berrange 已提交
2927
    }
2928

2929
    DEBUG0("Setting initial memory amount");
2930
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
2931
    if (qemuMonitorSetBalloon(priv->mon, vm->def->mem.cur_balloon) < 0) {
2932
        qemuDomainObjExitMonitorWithDriver(driver, vm);
2933
        goto cleanup;
2934
    }
H
Hu Tao 已提交
2935
    qemuDomainObjExitMonitorWithDriver(driver, vm);
2936

2937
    if (!start_paused) {
2938
        DEBUG0("Starting domain CPUs");
2939
        /* Allow the CPUS to start executing */
H
Hu Tao 已提交
2940
        if (doStartCPUs(driver, vm, conn) < 0) {
2941
            if (virGetLastError() == NULL)
2942 2943
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("resume operation failed"));
2944
            goto cleanup;
2945 2946
        }
    }
2947

2948

2949
    DEBUG0("Writing domain status to disk");
2950
    if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
2951 2952
        goto cleanup;

E
Eric Blake 已提交
2953
    virCommandFree(cmd);
2954
    VIR_FORCE_CLOSE(logfile);
2955

2956
    return 0;
2957 2958

cleanup:
2959 2960 2961
    /* We jump here if we failed to start the VM for any reason, or
     * if we failed to initialize the now running VM. kill it off and
     * pretend we never started it */
E
Eric Blake 已提交
2962
    virCommandFree(cmd);
2963
    VIR_FORCE_CLOSE(logfile);
E
Eric Blake 已提交
2964
    qemudShutdownVMDaemon(driver, vm, 0);
2965 2966

    return -1;
2967 2968
}

2969
static void qemudShutdownVMDaemon(struct qemud_driver *driver,
2970 2971
                                  virDomainObjPtr vm,
                                  int migrated) {
D
Daniel P. Berrange 已提交
2972
    int ret;
2973
    int retries = 0;
2974
    qemuDomainObjPrivatePtr priv = vm->privateData;
2975
    virErrorPtr orig_err;
2976 2977
    virDomainDefPtr def;
    int i;
2978 2979 2980
    int logfile = -1;
    char *timestamp;
    char ebuf[1024];
D
Daniel P. Berrange 已提交
2981

2982 2983
    VIR_DEBUG("Shutting down VM '%s' pid=%d migrated=%d",
              vm->def->name, vm->pid, migrated);
2984

2985
    if ((logfile = qemudLogFD(driver, vm->def->name, true)) < 0) {
2986 2987 2988 2989 2990 2991 2992 2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004 3005 3006 3007 3008
        /* To not break the normal domain shutdown process, skip the
         * timestamp log writing if failed on opening log file. */
        VIR_WARN("Unable to open logfile: %s",
                  virStrerror(errno, ebuf, sizeof ebuf));
    } else {
        if ((timestamp = virTimestamp()) == NULL) {
            virReportOOMError();
        } else {
            if (safewrite(logfile, timestamp, strlen(timestamp)) < 0 ||
                safewrite(logfile, SHUTDOWN_POSTFIX,
                          strlen(SHUTDOWN_POSTFIX)) < 0) {
                VIR_WARN("Unable to write timestamp to logfile: %s",
                         virStrerror(errno, ebuf, sizeof ebuf));
            }

            VIR_FREE(timestamp);
        }

        if (VIR_CLOSE(logfile) < 0)
             VIR_WARN("Unable to close logfile: %s",
                      virStrerror(errno, ebuf, sizeof ebuf));
    }

3009 3010 3011 3012
    /* This method is routinely used in clean up paths. Disable error
     * reporting so we don't squash a legit error. */
    orig_err = virSaveLastError();

3013
    virDomainConfVMNWFilterTeardown(vm);
S
Stefan Berger 已提交
3014

3015
    if (driver->macFilter) {
3016
        def = vm->def;
3017 3018 3019 3020
        for (i = 0 ; i < def->nnets ; i++) {
            virDomainNetDefPtr net = def->nets[i];
            if (net->ifname == NULL)
                continue;
3021
            if ((errno = networkDisallowMacOnPort(driver, net->ifname,
3022
                                                  net->mac))) {
3023
                virReportSystemError(errno,
3024 3025 3026 3027 3028 3029
             _("failed to remove ebtables rule to allow MAC address on  '%s'"),
                                     net->ifname);
            }
        }
    }

3030
    /* This will safely handle a non-running guest with pid=0 or pid=-1*/
G
Guido Günther 已提交
3031 3032
    if (virKillProcess(vm->pid, 0) == 0 &&
        virKillProcess(vm->pid, SIGTERM) < 0)
3033
        virReportSystemError(errno,
3034 3035
                             _("Failed to send SIGTERM to %s (%d)"),
                             vm->def->name, vm->pid);
3036

3037 3038
    if (priv->mon)
        qemuMonitorClose(priv->mon);
3039

3040
    if (priv->monConfig) {
3041 3042 3043
        if (priv->monConfig->type == VIR_DOMAIN_CHR_TYPE_UNIX)
            unlink(priv->monConfig->data.nix.path);
        virDomainChrSourceDefFree(priv->monConfig);
3044
        priv->monConfig = NULL;
3045 3046
    }

G
Guido Günther 已提交
3047 3048
    /* shut it off for sure */
    virKillProcess(vm->pid, SIGKILL);
3049

3050 3051 3052 3053 3054 3055 3056 3057 3058 3059
    /* now that we know it's stopped call the hook if present */
    if (virHookPresent(VIR_HOOK_DRIVER_QEMU)) {
        char *xml = virDomainDefFormat(vm->def, 0);

        /* we can't stop the operation even if the script raised an error */
        virHookCall(VIR_HOOK_DRIVER_QEMU, vm->def->name,
                    VIR_HOOK_QEMU_OP_STOPPED, VIR_HOOK_SUBOP_END, NULL, xml);
        VIR_FREE(xml);
    }

3060
    /* Reset Security Labels */
3061 3062 3063
    virSecurityManagerRestoreAllLabel(driver->securityManager,
                                      vm, migrated);
    virSecurityManagerReleaseLabel(driver->securityManager, vm);
3064

3065 3066 3067 3068 3069 3070 3071
    /* Clear out dynamically assigned labels */
    if (vm->def->seclabel.type == VIR_DOMAIN_SECLABEL_DYNAMIC) {
        VIR_FREE(vm->def->seclabel.model);
        VIR_FREE(vm->def->seclabel.label);
        VIR_FREE(vm->def->seclabel.imagelabel);
    }

D
Daniel P. Berrange 已提交
3072
    virDomainDefClearDeviceAliases(vm->def);
3073 3074 3075 3076 3077
    if (!priv->persistentAddrs) {
        virDomainDefClearPCIAddresses(vm->def);
        qemuDomainPCIAddressSetFree(priv->pciaddrs);
        priv->pciaddrs = NULL;
    }
3078

3079
    qemuDomainReAttachHostDevices(driver, vm->def);
3080

S
Stefan Berger 已提交
3081 3082 3083 3084
#if WITH_MACVTAP
    def = vm->def;
    for (i = 0; i < def->nnets; i++) {
        virDomainNetDefPtr net = def->nets[i];
3085
        if (net->type == VIR_DOMAIN_NET_TYPE_DIRECT) {
3086
            delMacvtap(net->ifname, net->mac, net->data.direct.linkdev,
3087
                       &net->data.direct.virtPortProfile);
3088 3089
            VIR_FREE(net->ifname);
        }
S
Stefan Berger 已提交
3090 3091 3092
    }
#endif

3093
retry:
3094
    if ((ret = qemuRemoveCgroup(driver, vm, 0)) < 0) {
3095 3096 3097 3098 3099 3100 3101 3102
        if (ret == -EBUSY && (retries++ < 5)) {
            usleep(200*1000);
            goto retry;
        }
        VIR_WARN("Failed to remove cgroup for %s",
                 vm->def->name);
    }

3103
    qemudRemoveDomainStatus(driver, vm);
D
Daniel P. Berrange 已提交
3104

3105 3106 3107 3108 3109
    /* Remove VNC port from port reservation bitmap, but only if it was
       reserved by the driver (autoport=yes)
    */
    if ((vm->def->ngraphics == 1) &&
        vm->def->graphics[0]->type == VIR_DOMAIN_GRAPHICS_TYPE_VNC &&
3110 3111 3112 3113 3114 3115 3116 3117
        vm->def->graphics[0]->data.vnc.autoport) {
        qemuReturnPort(driver, vm->def->graphics[0]->data.vnc.port);
    }
    if ((vm->def->ngraphics == 1) &&
        vm->def->graphics[0]->type == VIR_DOMAIN_GRAPHICS_TYPE_SPICE &&
        vm->def->graphics[0]->data.spice.autoport) {
        qemuReturnPort(driver, vm->def->graphics[0]->data.spice.port);
        qemuReturnPort(driver, vm->def->graphics[0]->data.spice.tlsPort);
3118 3119
    }

3120
    vm->pid = -1;
3121
    vm->def->id = -1;
3122
    vm->state = VIR_DOMAIN_SHUTOFF;
3123 3124
    VIR_FREE(priv->vcpupids);
    priv->nvcpupids = 0;
3125 3126

    if (vm->newDef) {
3127
        virDomainDefFree(vm->def);
3128
        vm->def = vm->newDef;
3129
        vm->def->id = -1;
3130 3131
        vm->newDef = NULL;
    }
3132 3133 3134 3135 3136

    if (orig_err) {
        virSetError(orig_err);
        virFreeError(orig_err);
    }
3137 3138
}

3139
static virDrvOpenStatus qemudOpen(virConnectPtr conn,
3140
                                  virConnectAuthPtr auth ATTRIBUTE_UNUSED,
3141
                                  int flags ATTRIBUTE_UNUSED) {
3142
    if (conn->uri == NULL) {
3143 3144 3145
        if (qemu_driver == NULL)
            return VIR_DRV_OPEN_DECLINED;

3146
        conn->uri = xmlParseURI(qemu_driver->privileged ?
3147 3148
                                "qemu:///system" :
                                "qemu:///session");
3149
        if (!conn->uri) {
3150
            virReportOOMError();
3151 3152
            return VIR_DRV_OPEN_ERROR;
        }
3153 3154 3155 3156 3157 3158 3159 3160 3161 3162
    } 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;

3163
        if (qemu_driver == NULL) {
3164 3165
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("qemu state driver is not active"));
3166 3167 3168
            return VIR_DRV_OPEN_ERROR;
        }

3169
        if (conn->uri->path == NULL) {
3170 3171 3172 3173 3174
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("no QEMU URI path given, try %s"),
                            qemu_driver->privileged
                            ? "qemu:///system"
                            : "qemu:///session");
3175 3176 3177
                return VIR_DRV_OPEN_ERROR;
        }

3178
        if (qemu_driver->privileged) {
3179 3180
            if (STRNEQ (conn->uri->path, "/system") &&
                STRNEQ (conn->uri->path, "/session")) {
3181 3182 3183
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("unexpected QEMU URI path '%s', try qemu:///system"),
                                conn->uri->path);
3184 3185 3186 3187
                return VIR_DRV_OPEN_ERROR;
            }
        } else {
            if (STRNEQ (conn->uri->path, "/session")) {
3188 3189 3190
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("unexpected QEMU URI path '%s', try qemu:///session"),
                                conn->uri->path);
3191 3192 3193
                return VIR_DRV_OPEN_ERROR;
            }
        }
3194 3195 3196 3197 3198 3199 3200
    }
    conn->privateData = qemu_driver;

    return VIR_DRV_OPEN_SUCCESS;
}

static int qemudClose(virConnectPtr conn) {
3201
    struct qemud_driver *driver = conn->privateData;
3202 3203

    /* Get rid of callbacks registered for this conn */
3204
    qemuDriverLock(driver);
3205
    virDomainEventCallbackListRemoveConn(conn, driver->domainEventCallbacks);
3206
    qemuDriverUnlock(driver);
3207 3208 3209 3210 3211 3212

    conn->privateData = NULL;

    return 0;
}

D
Daniel Veillard 已提交
3213 3214 3215 3216 3217
/* Which features are supported by this driver? */
static int
qemudSupportsFeature (virConnectPtr conn ATTRIBUTE_UNUSED, int feature)
{
    switch (feature) {
3218 3219 3220 3221 3222
    case VIR_DRV_FEATURE_MIGRATION_V2:
    case VIR_DRV_FEATURE_MIGRATION_P2P:
        return 1;
    default:
        return 0;
D
Daniel Veillard 已提交
3223 3224 3225
    }
}

3226
static const char *qemudGetType(virConnectPtr conn ATTRIBUTE_UNUSED) {
3227
    return "QEMU";
3228 3229
}

3230

3231 3232 3233 3234 3235 3236 3237 3238 3239 3240 3241 3242 3243
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;
}


3244 3245 3246 3247
static int kvmGetMaxVCPUs(void) {
    int maxvcpus = 1;

    int r, fd;
3248

3249 3250
    fd = open(KVM_DEVICE, O_RDONLY);
    if (fd < 0) {
3251
        virReportSystemError(errno, _("Unable to open %s"), KVM_DEVICE);
3252
        return -1;
3253 3254 3255 3256 3257 3258
    }

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

3259
    VIR_FORCE_CLOSE(fd);
3260 3261 3262 3263
    return maxvcpus;
}


3264
static int qemudGetMaxVCPUs(virConnectPtr conn ATTRIBUTE_UNUSED, const char *type) {
3265 3266 3267
    if (!type)
        return 16;

3268
    if (STRCASEEQ(type, "qemu"))
3269 3270
        return 16;

3271
    if (STRCASEEQ(type, "kvm"))
3272
        return kvmGetMaxVCPUs();
3273

3274
    if (STRCASEEQ(type, "kqemu"))
3275
        return 1;
3276

3277 3278
    qemuReportError(VIR_ERR_INVALID_ARG,
                    _("unknown type '%s'"), type);
3279 3280 3281
    return -1;
}

3282

3283
static char *qemudGetCapabilities(virConnectPtr conn) {
3284
    struct qemud_driver *driver = conn->privateData;
3285
    virCapsPtr caps = NULL;
3286
    char *xml = NULL;
3287

3288
    qemuDriverLock(driver);
3289

3290
    if ((caps = qemuCreateCapabilities(qemu_driver->caps,
3291
                                       qemu_driver)) == NULL) {
3292 3293 3294
        virCapabilitiesFree(caps);
        goto cleanup;
    }
3295

3296
    virCapabilitiesFree(qemu_driver->caps);
3297 3298 3299
    qemu_driver->caps = caps;

    if ((xml = virCapabilitiesFormatXML(driver->caps)) == NULL)
3300
        virReportOOMError();
3301 3302

cleanup:
3303
    qemuDriverUnlock(driver);
3304

3305
    return xml;
3306 3307 3308
}


3309 3310 3311 3312 3313
static int
qemudGetProcessInfo(unsigned long long *cpuTime, int *lastCpu, int pid,
                    int tid)
{
    char *proc;
D
Daniel P. Berrange 已提交
3314
    FILE *pidinfo;
3315
    unsigned long long usertime, systime;
3316 3317
    int cpu;
    int ret;
D
Daniel P. Berrange 已提交
3318

3319
    if (tid)
3320
        ret = virAsprintf(&proc, "/proc/%d/task/%d/stat", pid, tid);
3321
    else
3322 3323
        ret = virAsprintf(&proc, "/proc/%d/stat", pid);
    if (ret < 0)
D
Daniel P. Berrange 已提交
3324 3325 3326 3327
        return -1;

    if (!(pidinfo = fopen(proc, "r"))) {
        /* VM probably shut down, so fake 0 */
3328 3329 3330 3331
        if (cpuTime)
            *cpuTime = 0;
        if (lastCpu)
            *lastCpu = 0;
3332
        VIR_FREE(proc);
D
Daniel P. Berrange 已提交
3333 3334
        return 0;
    }
3335
    VIR_FREE(proc);
D
Daniel P. Berrange 已提交
3336

3337 3338 3339 3340 3341 3342 3343 3344 3345 3346
    /* 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) {
3347
        VIR_FORCE_FCLOSE(pidinfo);
3348 3349
        VIR_WARN0("cannot parse process status data");
        errno = -EINVAL;
D
Daniel P. Berrange 已提交
3350 3351 3352 3353 3354 3355 3356 3357
        return -1;
    }

    /* We got jiffies
     * We want nanoseconds
     * _SC_CLK_TCK is jiffies per second
     * So calulate thus....
     */
3358 3359 3360 3361 3362
    if (cpuTime)
        *cpuTime = 1000ull * 1000ull * 1000ull * (usertime + systime) / (unsigned long long)sysconf(_SC_CLK_TCK);
    if (lastCpu)
        *lastCpu = cpu;

D
Daniel P. Berrange 已提交
3363

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

3367
    VIR_FORCE_FCLOSE(pidinfo);
D
Daniel P. Berrange 已提交
3368 3369 3370 3371 3372

    return 0;
}


3373
static virDomainPtr qemudDomainLookupByID(virConnectPtr conn,
3374
                                          int id) {
3375 3376 3377 3378
    struct qemud_driver *driver = conn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;

3379
    qemuDriverLock(driver);
3380
    vm  = virDomainFindByID(&driver->domains, id);
3381
    qemuDriverUnlock(driver);
3382 3383

    if (!vm) {
3384 3385
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching id %d"), id);
3386
        goto cleanup;
3387 3388
    }

3389
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
3390
    if (dom) dom->id = vm->def->id;
3391 3392

cleanup:
3393 3394
    if (vm)
        virDomainObjUnlock(vm);
3395 3396
    return dom;
}
3397

3398
static virDomainPtr qemudDomainLookupByUUID(virConnectPtr conn,
3399
                                            const unsigned char *uuid) {
3400 3401 3402
    struct qemud_driver *driver = conn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;
3403

3404
    qemuDriverLock(driver);
3405
    vm = virDomainFindByUUID(&driver->domains, uuid);
3406 3407
    qemuDriverUnlock(driver);

3408
    if (!vm) {
3409 3410
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(uuid, uuidstr);
3411 3412
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3413
        goto cleanup;
3414 3415
    }

3416
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
3417
    if (dom) dom->id = vm->def->id;
3418 3419

cleanup:
3420 3421
    if (vm)
        virDomainObjUnlock(vm);
3422 3423
    return dom;
}
3424

3425
static virDomainPtr qemudDomainLookupByName(virConnectPtr conn,
3426
                                            const char *name) {
3427 3428 3429
    struct qemud_driver *driver = conn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;
3430

3431
    qemuDriverLock(driver);
3432
    vm = virDomainFindByName(&driver->domains, name);
3433 3434
    qemuDriverUnlock(driver);

3435
    if (!vm) {
3436 3437
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching name '%s'"), name);
3438
        goto cleanup;
3439 3440
    }

3441
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
3442
    if (dom) dom->id = vm->def->id;
3443 3444

cleanup:
3445 3446
    if (vm)
        virDomainObjUnlock(vm);
3447 3448 3449
    return dom;
}

3450 3451 3452 3453 3454 3455 3456 3457 3458 3459 3460

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) {
3461
        qemuReportError(VIR_ERR_NO_DOMAIN, NULL);
3462 3463 3464 3465 3466 3467 3468 3469 3470 3471 3472 3473 3474 3475 3476 3477 3478 3479 3480 3481
        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) {
3482
        qemuReportError(VIR_ERR_NO_DOMAIN, NULL);
3483 3484 3485 3486 3487 3488 3489 3490 3491 3492
        goto cleanup;
    }
    ret = obj->persistent;

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

3493 3494 3495 3496 3497 3498 3499 3500 3501 3502 3503 3504 3505 3506 3507 3508 3509 3510 3511 3512
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) {
        qemuReportError(VIR_ERR_NO_DOMAIN, NULL);
        goto cleanup;
    }
    ret = obj->updated;

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

3514
static int qemudGetVersion(virConnectPtr conn, unsigned long *version) {
3515 3516 3517
    struct qemud_driver *driver = conn->privateData;
    int ret = -1;

3518
    qemuDriverLock(driver);
3519
    if (qemuCapsExtractVersion(driver->caps, &driver->qemuVersion) < 0)
3520
        goto cleanup;
3521

3522
    *version = driver->qemuVersion;
3523 3524 3525
    ret = 0;

cleanup:
3526
    qemuDriverUnlock(driver);
3527
    return ret;
D
Daniel P. Berrange 已提交
3528 3529
}

3530
static int qemudListDomains(virConnectPtr conn, int *ids, int nids) {
3531
    struct qemud_driver *driver = conn->privateData;
3532
    int n;
3533

3534
    qemuDriverLock(driver);
3535
    n = virDomainObjListGetActiveIDs(&driver->domains, ids, nids);
3536
    qemuDriverUnlock(driver);
3537

3538
    return n;
D
Daniel P. Berrange 已提交
3539
}
3540

3541
static int qemudNumDomains(virConnectPtr conn) {
3542
    struct qemud_driver *driver = conn->privateData;
3543
    int n;
3544

3545
    qemuDriverLock(driver);
3546
    n = virDomainObjListNumOfDomains(&driver->domains, 1);
3547
    qemuDriverUnlock(driver);
3548

3549
    return n;
D
Daniel P. Berrange 已提交
3550
}
3551

3552
static virDomainPtr qemudDomainCreate(virConnectPtr conn, const char *xml,
3553
                                      unsigned int flags) {
3554
    struct qemud_driver *driver = conn->privateData;
3555
    virDomainDefPtr def;
3556
    virDomainObjPtr vm = NULL;
3557
    virDomainPtr dom = NULL;
3558
    virDomainEventPtr event = NULL;
D
Daniel P. Berrange 已提交
3559

3560
    virCheckFlags(VIR_DOMAIN_START_PAUSED, NULL);
3561

3562
    qemuDriverLock(driver);
3563
    if (!(def = virDomainDefParseString(driver->caps, xml,
3564
                                        VIR_DOMAIN_XML_INACTIVE)))
3565
        goto cleanup;
3566

3567
    if (virSecurityManagerVerify(driver->securityManager, def) < 0)
3568 3569
        goto cleanup;

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

3573 3574 3575 3576 3577 3578
    if (qemudCanonicalizeMachine(driver, def) < 0)
        goto cleanup;

    if (qemuAssignPCIAddresses(def) < 0)
        goto cleanup;

3579
    if (!(vm = virDomainAssignDef(driver->caps,
3580
                                  &driver->domains,
3581
                                  def, false)))
3582 3583 3584
        goto cleanup;

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

3586 3587 3588
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup; /* XXXX free the 'vm' we created ? */

3589 3590
    if (qemudStartVMDaemon(conn, driver, vm, NULL,
                           (flags & VIR_DOMAIN_START_PAUSED) != 0,
3591
                           -1, NULL, VIR_VM_OP_CREATE) < 0) {
3592
        qemuDomainStartAudit(vm, "booted", false);
3593 3594 3595
        if (qemuDomainObjEndJob(vm) > 0)
            virDomainRemoveInactive(&driver->domains,
                                    vm);
3596
        vm = NULL;
3597
        goto cleanup;
D
Daniel P. Berrange 已提交
3598
    }
3599 3600 3601 3602

    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_BOOTED);
3603
    qemuDomainStartAudit(vm, "booted", true);
D
Daniel P. Berrange 已提交
3604

3605
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
3606
    if (dom) dom->id = vm->def->id;
3607

3608 3609 3610
    if (vm &&
        qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
3611

3612 3613
cleanup:
    virDomainDefFree(def);
3614 3615
    if (vm)
        virDomainObjUnlock(vm);
3616 3617
    if (event)
        qemuDomainEventQueue(driver, event);
3618
    qemuDriverUnlock(driver);
3619
    return dom;
D
Daniel P. Berrange 已提交
3620 3621 3622
}


3623
static int qemudDomainSuspend(virDomainPtr dom) {
3624 3625 3626
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
3627
    virDomainEventPtr event = NULL;
3628
    qemuDomainObjPrivatePtr priv;
3629

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

D
Daniel P. Berrange 已提交
3633
    if (!vm) {
3634 3635
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3636 3637
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3638
        goto cleanup;
D
Daniel P. Berrange 已提交
3639
    }
D
Daniel P. Berrange 已提交
3640
    if (!virDomainObjIsActive(vm)) {
3641 3642
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
3643
        goto cleanup;
D
Daniel P. Berrange 已提交
3644
    }
3645 3646 3647

    priv = vm->privateData;

3648
    if (priv->jobActive == QEMU_JOB_MIGRATION_OUT) {
3649 3650 3651 3652 3653 3654 3655 3656 3657 3658 3659 3660 3661 3662
        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"));
3663
            goto endjob;
3664
        }
3665
        if (vm->state != VIR_DOMAIN_PAUSED) {
H
Hu Tao 已提交
3666
            if (doStopCPUs(driver, vm) < 0) {
3667
                goto endjob;
3668
            }
3669 3670 3671 3672 3673 3674 3675
            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 已提交
3676
    }
3677

3678
endjob:
3679 3680
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
3681

3682
cleanup:
3683 3684
    if (vm)
        virDomainObjUnlock(vm);
3685

3686
    if (event)
3687
        qemuDomainEventQueue(driver, event);
3688
    qemuDriverUnlock(driver);
3689
    return ret;
D
Daniel P. Berrange 已提交
3690 3691 3692
}


3693
static int qemudDomainResume(virDomainPtr dom) {
3694 3695 3696
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
3697
    virDomainEventPtr event = NULL;
3698

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

D
Daniel P. Berrange 已提交
3702
    if (!vm) {
3703 3704
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3705 3706
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3707
        goto cleanup;
D
Daniel P. Berrange 已提交
3708
    }
3709 3710 3711 3712

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

D
Daniel P. Berrange 已提交
3713
    if (!virDomainObjIsActive(vm)) {
3714 3715
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
3716
        goto endjob;
D
Daniel P. Berrange 已提交
3717
    }
3718
    if (vm->state == VIR_DOMAIN_PAUSED) {
H
Hu Tao 已提交
3719
        if (doStartCPUs(driver, vm, dom->conn) < 0) {
3720
            if (virGetLastError() == NULL)
3721 3722
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("resume operation failed"));
3723
            goto endjob;
3724
        }
3725 3726 3727
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_RESUMED,
                                         VIR_DOMAIN_EVENT_RESUMED_UNPAUSED);
D
Daniel P. Berrange 已提交
3728
    }
3729
    if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
3730
        goto endjob;
3731 3732
    ret = 0;

3733
endjob:
3734 3735
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
3736

3737
cleanup:
3738 3739
    if (vm)
        virDomainObjUnlock(vm);
3740
    if (event)
3741
        qemuDomainEventQueue(driver, event);
3742
    qemuDriverUnlock(driver);
3743
    return ret;
D
Daniel P. Berrange 已提交
3744 3745 3746
}


3747
static int qemudDomainShutdown(virDomainPtr dom) {
3748 3749 3750
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
3751

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

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

3764 3765 3766
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

D
Daniel P. Berrange 已提交
3767
    if (!virDomainObjIsActive(vm)) {
3768 3769
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
3770
        goto endjob;
3771 3772
    }

3773
    qemuDomainObjPrivatePtr priv = vm->privateData;
3774 3775 3776
    qemuDomainObjEnterMonitor(vm);
    ret = qemuMonitorSystemPowerdown(priv->mon);
    qemuDomainObjExitMonitor(vm);
3777

3778
endjob:
3779 3780
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
3781

3782
cleanup:
3783 3784
    if (vm)
        virDomainObjUnlock(vm);
3785
    return ret;
3786 3787 3788
}


3789
static int qemudDomainDestroy(virDomainPtr dom) {
3790 3791 3792
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
3793
    virDomainEventPtr event = NULL;
3794

3795
    qemuDriverLock(driver);
3796
    vm  = virDomainFindByUUID(&driver->domains, dom->uuid);
D
Daniel P. Berrange 已提交
3797
    if (!vm) {
3798 3799
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3800 3801
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3802
        goto cleanup;
D
Daniel P. Berrange 已提交
3803
    }
3804 3805 3806 3807

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

D
Daniel P. Berrange 已提交
3808
    if (!virDomainObjIsActive(vm)) {
3809 3810
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
3811
        goto endjob;
3812
    }
3813

3814
    qemudShutdownVMDaemon(driver, vm, 0);
3815 3816 3817
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STOPPED,
                                     VIR_DOMAIN_EVENT_STOPPED_DESTROYED);
3818 3819
    qemuDomainStopAudit(vm, "destroyed");

3820
    if (!vm->persistent) {
3821 3822 3823
        if (qemuDomainObjEndJob(vm) > 0)
            virDomainRemoveInactive(&driver->domains,
                                    vm);
3824 3825
        vm = NULL;
    }
3826 3827
    ret = 0;

3828
endjob:
3829 3830 3831
    if (vm &&
        qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
3832

3833
cleanup:
3834 3835
    if (vm)
        virDomainObjUnlock(vm);
3836 3837
    if (event)
        qemuDomainEventQueue(driver, event);
3838
    qemuDriverUnlock(driver);
3839
    return ret;
D
Daniel P. Berrange 已提交
3840 3841 3842
}


3843
static char *qemudDomainGetOSType(virDomainPtr dom) {
3844 3845 3846
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    char *type = NULL;
3847

3848
    qemuDriverLock(driver);
3849
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
3850
    qemuDriverUnlock(driver);
3851
    if (!vm) {
3852 3853
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3854 3855
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3856
        goto cleanup;
3857 3858
    }

3859
    if (!(type = strdup(vm->def->os.type)))
3860
        virReportOOMError();
3861 3862

cleanup:
3863 3864
    if (vm)
        virDomainObjUnlock(vm);
3865 3866 3867
    return type;
}

3868 3869
/* Returns max memory in kb, 0 if error */
static unsigned long qemudDomainGetMaxMemory(virDomainPtr dom) {
3870 3871 3872
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    unsigned long ret = 0;
3873

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

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

3886
    ret = vm->def->mem.max_balloon;
3887 3888

cleanup:
3889 3890
    if (vm)
        virDomainObjUnlock(vm);
3891
    return ret;
3892 3893 3894
}

static int qemudDomainSetMemory(virDomainPtr dom, unsigned long newmem) {
3895
    struct qemud_driver *driver = dom->conn->privateData;
3896
    qemuDomainObjPrivatePtr priv;
3897
    virDomainObjPtr vm;
3898
    int ret = -1, r;
3899

3900
    qemuDriverLock(driver);
3901
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
3902
    qemuDriverUnlock(driver);
3903
    if (!vm) {
3904 3905
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3906 3907
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3908
        goto cleanup;
3909 3910
    }

3911
    if (newmem > vm->def->mem.max_balloon) {
3912 3913
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("cannot set memory higher than max memory"));
3914
        goto cleanup;
3915 3916
    }

3917 3918 3919
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

3920 3921 3922 3923 3924 3925
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto endjob;
    }

3926 3927 3928 3929 3930 3931
    priv = vm->privateData;
    qemuDomainObjEnterMonitor(vm);
    r = qemuMonitorSetBalloon(priv->mon, newmem);
    qemuDomainObjExitMonitor(vm);
    if (r < 0)
        goto endjob;
3932

3933 3934 3935 3936 3937
    /* Lack of balloon support is a fatal error */
    if (r == 0) {
        qemuReportError(VIR_ERR_NO_SUPPORT,
                        "%s", _("cannot set memory of an active domain"));
        goto endjob;
3938
    }
3939

3940
    ret = 0;
3941
endjob:
3942 3943
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
3944

3945
cleanup:
3946 3947
    if (vm)
        virDomainObjUnlock(vm);
3948
    return ret;
3949 3950
}

3951
static int qemudDomainGetInfo(virDomainPtr dom,
3952
                              virDomainInfoPtr info) {
3953 3954 3955
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
3956 3957
    int err;
    unsigned long balloon;
3958

3959
    qemuDriverLock(driver);
3960
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
3961
    qemuDriverUnlock(driver);
D
Daniel P. Berrange 已提交
3962
    if (!vm) {
3963 3964
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
3965 3966
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
3967
        goto cleanup;
D
Daniel P. Berrange 已提交
3968 3969
    }

3970
    info->state = vm->state;
D
Daniel P. Berrange 已提交
3971

D
Daniel P. Berrange 已提交
3972
    if (!virDomainObjIsActive(vm)) {
3973
        info->cpuTime = 0;
D
Daniel P. Berrange 已提交
3974
    } else {
3975
        if (qemudGetProcessInfo(&(info->cpuTime), NULL, vm->pid, 0) < 0) {
3976
            qemuReportError(VIR_ERR_OPERATION_FAILED, ("cannot read cputime for domain"));
3977
            goto cleanup;
D
Daniel P. Berrange 已提交
3978 3979 3980
        }
    }

3981
    info->maxMem = vm->def->mem.max_balloon;
3982

D
Daniel P. Berrange 已提交
3983
    if (virDomainObjIsActive(vm)) {
3984
        qemuDomainObjPrivatePtr priv = vm->privateData;
3985 3986 3987

        if ((vm->def->memballoon != NULL) &&
            (vm->def->memballoon->model == VIR_DOMAIN_MEMBALLOON_MODEL_NONE)) {
3988
            info->memory = vm->def->mem.max_balloon;
3989
        } else if (!priv->jobActive) {
3990 3991
            if (qemuDomainObjBeginJob(vm) < 0)
                goto cleanup;
3992 3993 3994 3995 3996 3997 3998 3999 4000
            if (!virDomainObjIsActive(vm))
                err = 0;
            else {
                qemuDomainObjEnterMonitor(vm);
                err = qemuMonitorGetBalloonInfo(priv->mon, &balloon);
                qemuDomainObjExitMonitor(vm);
            }
            if (qemuDomainObjEndJob(vm) == 0) {
                vm = NULL;
4001 4002 4003
                goto cleanup;
            }

4004 4005
            if (err < 0)
                goto cleanup;
4006 4007
            if (err == 0)
                /* Balloon not supported, so maxmem is always the allocation */
4008
                info->memory = vm->def->mem.max_balloon;
4009 4010 4011
            else
                info->memory = balloon;
        } else {
4012
            info->memory = vm->def->mem.cur_balloon;
4013
        }
4014
    } else {
4015
        info->memory = vm->def->mem.cur_balloon;
4016 4017
    }

4018
    info->nrVirtCpu = vm->def->vcpus;
4019 4020 4021
    ret = 0;

cleanup:
4022 4023
    if (vm)
        virDomainObjUnlock(vm);
4024
    return ret;
D
Daniel P. Berrange 已提交
4025 4026 4027
}


4028 4029 4030 4031 4032 4033 4034 4035 4036
/** qemuDomainMigrateOffline:
 * Pause domain for non-live migration.
 */
static int
qemuDomainMigrateOffline(struct qemud_driver *driver,
                         virDomainObjPtr vm)
{
    int ret;

H
Hu Tao 已提交
4037
    ret = doStopCPUs(driver, vm);
4038 4039 4040 4041 4042 4043 4044 4045
    if (ret == 0) {
        virDomainEventPtr event;

        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_SUSPENDED,
                                         VIR_DOMAIN_EVENT_SUSPENDED_MIGRATED);
        if (event)
            qemuDomainEventQueue(driver, event);
H
Hu Tao 已提交
4046
    }
4047 4048 4049 4050 4051

    return ret;
}


4052 4053 4054 4055 4056 4057 4058 4059 4060 4061 4062 4063 4064 4065
static int
qemuDomainWaitForMigrationComplete(struct qemud_driver *driver, virDomainObjPtr vm)
{
    int ret = -1;
    int status;
    unsigned long long memProcessed;
    unsigned long long memRemaining;
    unsigned long long memTotal;
    qemuDomainObjPrivatePtr priv = vm->privateData;

    priv->jobInfo.type = VIR_DOMAIN_JOB_UNBOUNDED;

    while (priv->jobInfo.type == VIR_DOMAIN_JOB_UNBOUNDED) {
        /* Poll every 50ms for progress & to allow cancellation */
4066
        struct timespec ts = { .tv_sec = 0, .tv_nsec = 50 * 1000 * 1000ull };
4067 4068
        struct timeval now;
        int rc;
O
Osier Yang 已提交
4069 4070 4071 4072 4073 4074 4075 4076 4077 4078 4079 4080 4081 4082 4083 4084
        const char *job;

        switch (priv->jobActive) {
            case QEMU_JOB_MIGRATION_OUT:
                job = _("migration job");
                break;
            case QEMU_JOB_SAVE:
                job = _("domain save job");
                break;
            case QEMU_JOB_DUMP:
                job = _("domain core dump job");
                break;
            default:
                job = _("job");
        }

4085

4086
        if (!virDomainObjIsActive(vm)) {
O
Osier Yang 已提交
4087 4088
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s: %s",
                            job, _("guest unexpectedly quit"));
4089 4090 4091
            goto cleanup;
        }

4092 4093
        if (priv->jobSignals & QEMU_JOB_SIGNAL_CANCEL) {
            priv->jobSignals ^= QEMU_JOB_SIGNAL_CANCEL;
O
Osier Yang 已提交
4094
            VIR_DEBUG0("Cancelling job at client request");
4095 4096 4097 4098
            qemuDomainObjEnterMonitorWithDriver(driver, vm);
            rc = qemuMonitorMigrateCancel(priv->mon);
            qemuDomainObjExitMonitorWithDriver(driver, vm);
            if (rc < 0) {
O
Osier Yang 已提交
4099
                VIR_WARN0("Unable to cancel job");
4100
            }
4101 4102 4103 4104 4105
        } else if (priv->jobSignals & QEMU_JOB_SIGNAL_SUSPEND) {
            priv->jobSignals ^= QEMU_JOB_SIGNAL_SUSPEND;
            VIR_DEBUG0("Pausing domain for non-live migration");
            if (qemuDomainMigrateOffline(driver, vm) < 0)
                VIR_WARN0("Unable to pause domain");
4106 4107 4108 4109 4110 4111 4112 4113 4114 4115 4116
        } else if (priv->jobSignals & QEMU_JOB_SIGNAL_MIGRATE_DOWNTIME) {
            unsigned long long ms = priv->jobSignalsData.migrateDowntime;

            priv->jobSignals ^= QEMU_JOB_SIGNAL_MIGRATE_DOWNTIME;
            priv->jobSignalsData.migrateDowntime = 0;
            VIR_DEBUG("Setting migration downtime to %llums", ms);
            qemuDomainObjEnterMonitorWithDriver(driver, vm);
            rc = qemuMonitorSetMigrationDowntime(priv->mon, ms);
            qemuDomainObjExitMonitorWithDriver(driver, vm);
            if (rc < 0)
                VIR_WARN0("Unable to set migration downtime");
4117 4118
        }

4119 4120 4121 4122
        /* Repeat check because the job signals might have caused
         * guest to die
         */
        if (!virDomainObjIsActive(vm)) {
O
Osier Yang 已提交
4123 4124
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s: %s",
                            job, _("guest unexpectedly quit"));
4125 4126 4127
            goto cleanup;
        }

4128 4129 4130 4131 4132 4133 4134 4135 4136 4137 4138 4139 4140 4141 4142 4143 4144 4145 4146
        qemuDomainObjEnterMonitorWithDriver(driver, vm);
        rc = qemuMonitorGetMigrationStatus(priv->mon,
                                           &status,
                                           &memProcessed,
                                           &memRemaining,
                                           &memTotal);
        qemuDomainObjExitMonitorWithDriver(driver, vm);

        if (rc < 0) {
            priv->jobInfo.type = VIR_DOMAIN_JOB_FAILED;
            goto cleanup;
        }

        if (gettimeofday(&now, NULL) < 0) {
            priv->jobInfo.type = VIR_DOMAIN_JOB_FAILED;
            virReportSystemError(errno, "%s",
                                 _("cannot get time of day"));
            goto cleanup;
        }
4147
        priv->jobInfo.timeElapsed = timeval_to_ms(now) - priv->jobStart;
4148 4149 4150 4151 4152

        switch (status) {
        case QEMU_MONITOR_MIGRATION_STATUS_INACTIVE:
            priv->jobInfo.type = VIR_DOMAIN_JOB_NONE;
            qemuReportError(VIR_ERR_OPERATION_FAILED,
O
Osier Yang 已提交
4153
                            "%s: %s", job, _("is not active"));
4154 4155 4156 4157 4158 4159 4160 4161 4162 4163 4164 4165 4166 4167 4168 4169 4170 4171 4172 4173
            break;

        case QEMU_MONITOR_MIGRATION_STATUS_ACTIVE:
            priv->jobInfo.dataTotal = memTotal;
            priv->jobInfo.dataRemaining = memRemaining;
            priv->jobInfo.dataProcessed = memProcessed;

            priv->jobInfo.memTotal = memTotal;
            priv->jobInfo.memRemaining = memRemaining;
            priv->jobInfo.memProcessed = memProcessed;
            break;

        case QEMU_MONITOR_MIGRATION_STATUS_COMPLETED:
            priv->jobInfo.type = VIR_DOMAIN_JOB_COMPLETED;
            ret = 0;
            break;

        case QEMU_MONITOR_MIGRATION_STATUS_ERROR:
            priv->jobInfo.type = VIR_DOMAIN_JOB_FAILED;
            qemuReportError(VIR_ERR_OPERATION_FAILED,
O
Osier Yang 已提交
4174
                            "%s: %s", job, _("unexpectedly failed"));
4175 4176 4177 4178 4179
            break;

        case QEMU_MONITOR_MIGRATION_STATUS_CANCELLED:
            priv->jobInfo.type = VIR_DOMAIN_JOB_CANCELLED;
            qemuReportError(VIR_ERR_OPERATION_FAILED,
O
Osier Yang 已提交
4180
                            "%s: %s", job, _("canceled by client"));
4181 4182 4183 4184 4185 4186 4187 4188 4189 4190 4191 4192 4193 4194 4195 4196 4197
            break;
        }

        virDomainObjUnlock(vm);
        qemuDriverUnlock(driver);

        nanosleep(&ts, NULL);

        qemuDriverLock(driver);
        virDomainObjLock(vm);
    }

cleanup:
    return ret;
}


4198
#define QEMUD_SAVE_MAGIC "LibvirtQemudSave"
4199 4200 4201
#define QEMUD_SAVE_VERSION 2

enum qemud_save_formats {
4202 4203 4204
    QEMUD_SAVE_FORMAT_RAW = 0,
    QEMUD_SAVE_FORMAT_GZIP = 1,
    QEMUD_SAVE_FORMAT_BZIP2 = 2,
4205 4206
    /*
     * Deprecated by xz and never used as part of a release
4207
     * QEMUD_SAVE_FORMAT_LZMA
4208 4209
     */
    QEMUD_SAVE_FORMAT_XZ = 3,
4210
    QEMUD_SAVE_FORMAT_LZOP = 4,
4211 4212 4213
    /* Note: add new members only at the end.
       These values are used in the on-disk format.
       Do not change or re-use numbers. */
4214 4215

    QEMUD_SAVE_FORMAT_LAST
4216
};
4217

4218 4219 4220 4221 4222
VIR_ENUM_DECL(qemudSaveCompression)
VIR_ENUM_IMPL(qemudSaveCompression, QEMUD_SAVE_FORMAT_LAST,
              "raw",
              "gzip",
              "bzip2",
4223 4224
              "xz",
              "lzop")
4225

4226 4227 4228 4229 4230
struct qemud_save_header {
    char magic[sizeof(QEMUD_SAVE_MAGIC)-1];
    int version;
    int xml_len;
    int was_running;
4231 4232
    int compressed;
    int unused[15];
4233 4234
};

4235 4236 4237 4238 4239 4240 4241
struct fileOpHookData {
    virDomainPtr dom;
    const char *path;
    char *xml;
    struct qemud_save_header *header;
};

4242
/* return -errno on failure, or 0 on success */
4243 4244 4245 4246 4247
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)) {
4248
        ret = -errno;
4249
        qemuReportError(VIR_ERR_OPERATION_FAILED,
4250 4251
                        _("failed to write header to domain save file '%s'"),
                        hdata->path);
4252 4253 4254 4255
        goto endjob;
    }

    if (safewrite(fd, hdata->xml, hdata->header->xml_len) != hdata->header->xml_len) {
4256
        ret = -errno;
4257 4258 4259 4260 4261 4262 4263 4264
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                         _("failed to write xml to '%s'"), hdata->path);
        goto endjob;
    }
endjob:
    return ret;
}

4265 4266 4267
/* this internal function expects the driver lock to already be held on entry */
static int qemudDomainSaveFlag(struct qemud_driver *driver, virDomainPtr dom,
                               virDomainObjPtr vm, const char *path,
4268
                               int compressed)
4269
{
4270
    char *xml = NULL;
4271
    struct qemud_save_header header;
4272 4273
    struct fileOpHookData hdata;
    int bypassSecurityDriver = 0;
4274
    int ret = -1;
4275
    int rc;
4276
    virDomainEventPtr event = NULL;
4277
    qemuDomainObjPrivatePtr priv;
4278 4279
    struct stat sb;
    int is_reg = 0;
4280
    unsigned long long offset;
4281
    virCgroupPtr cgroup = NULL;
4282 4283 4284 4285 4286

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

4287
    header.compressed = compressed;
4288

4289
    priv = vm->privateData;
4290

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

D
Daniel P. Berrange 已提交
4294
    if (!virDomainObjIsActive(vm)) {
4295 4296
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
4297
        goto endjob;
D
Daniel P. Berrange 已提交
4298
    }
4299

O
Osier Yang 已提交
4300 4301
    priv->jobActive = QEMU_JOB_SAVE;

4302 4303 4304
    memset(&priv->jobInfo, 0, sizeof(priv->jobInfo));
    priv->jobInfo.type = VIR_DOMAIN_JOB_UNBOUNDED;

4305 4306 4307
    /* Pause */
    if (vm->state == VIR_DOMAIN_RUNNING) {
        header.was_running = 1;
H
Hu Tao 已提交
4308
        if (doStopCPUs(driver, vm) < 0)
4309
            goto endjob;
4310 4311 4312 4313 4314 4315

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

    /* Get XML for the domain */
4319
    xml = virDomainDefFormat(vm->def, VIR_DOMAIN_XML_SECURE);
4320
    if (!xml) {
4321 4322
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to get domain xml"));
4323
        goto endjob;
4324 4325 4326
    }
    header.xml_len = strlen(xml) + 1;

4327 4328 4329 4330 4331 4332 4333 4334 4335 4336 4337 4338 4339
    /* 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);
    }

4340 4341 4342 4343 4344
    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
4345 4346
     * it by padding the XML string with NULLs.
     */
4347 4348 4349 4350 4351 4352 4353 4354 4355 4356 4357 4358 4359
    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;
    }
4360

4361 4362 4363 4364 4365 4366
    /* Setup hook data needed by virFileOperation hook function */
    hdata.dom = dom;
    hdata.path = path;
    hdata.xml = xml;
    hdata.header = &header;

4367 4368
    /* Write header to file, followed by XML */

4369
    /* First try creating the file as root */
4370 4371 4372 4373
    if (!is_reg) {
        int fd = open(path, O_WRONLY | O_TRUNC);
        if (fd < 0) {
            virReportSystemError(errno, _("unable to open %s"), path);
4374 4375
            goto endjob;
        }
4376
        if (qemudDomainSaveFileOpHook(fd, &hdata) < 0) {
4377
            VIR_FORCE_CLOSE(fd);
4378 4379
            goto endjob;
        }
4380
        if (VIR_CLOSE(fd) < 0) {
4381
            virReportSystemError(errno, _("unable to close %s"), path);
4382 4383
            goto endjob;
        }
4384 4385 4386 4387 4388
    } else {
        if ((rc = virFileOperation(path, O_CREAT|O_TRUNC|O_WRONLY,
                                  S_IRUSR|S_IWUSR,
                                  getuid(), getgid(),
                                  qemudDomainSaveFileOpHook, &hdata,
4389
                                  0)) < 0) {
4390
            /* If we failed as root, and the error was permission-denied
4391 4392
               (EACCES or EPERM), assume it's on a network-connected share
               where root access is restricted (eg, root-squashed NFS). If the
4393 4394 4395 4396
               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 */

4397
            if (((rc != -EACCES) && (rc != -EPERM)) ||
4398
                driver->user == getuid()) {
4399
                virReportSystemError(-rc, _("Failed to create domain save file '%s'"),
4400 4401 4402
                                     path);
                goto endjob;
            }
4403

4404
            /* On Linux we can also verify the FS-type of the directory. */
4405 4406 4407 4408 4409 4410 4411 4412 4413 4414 4415 4416 4417 4418 4419 4420 4421 4422
            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 */
4423
                   virReportSystemError(-rc,
4424 4425 4426 4427
                                        _("Failed to create domain save file '%s'"),
                                        path);
                   goto endjob;
                   break;
4428 4429 4430

            }

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

4433 4434 4435 4436
            if ((rc = virFileOperation(path, O_CREAT|O_TRUNC|O_WRONLY,
                                       S_IRUSR|S_IWUSR|S_IRGRP|S_IWGRP,
                                       driver->user, driver->group,
                                       qemudDomainSaveFileOpHook, &hdata,
4437 4438
                                       VIR_FILE_OP_AS_UID)) < 0) {
                virReportSystemError(-rc, _("Error from child process creating '%s'"),
4439
                                 path);
4440 4441
                goto endjob;
            }
4442

4443 4444 4445
            /* 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 */
4446

4447 4448
            bypassSecurityDriver = 1;
        }
4449
    }
4450

4451

4452 4453 4454 4455 4456 4457 4458 4459 4460 4461 4462 4463 4464 4465 4466 4467 4468
    if (!is_reg &&
        qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_DEVICES)) {
        if (virCgroupForDomain(driver->cgroup, vm->def->name, &cgroup, 0) != 0) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            _("Unable to find cgroup for %s\n"),
                            vm->def->name);
            goto endjob;
        }
        rc = virCgroupAllowDevicePath(cgroup, path);
        if (rc != 0) {
            virReportSystemError(-rc,
                                 _("Unable to allow device %s for %s"),
                                 path, vm->def->name);
            goto endjob;
        }
    }

4469
    if ((!bypassSecurityDriver) &&
4470 4471
        virSecurityManagerSetSavedStateLabel(driver->securityManager,
                                             vm, path) < 0)
4472 4473
        goto endjob;

4474 4475
    if (header.compressed == QEMUD_SAVE_FORMAT_RAW) {
        const char *args[] = { "cat", NULL };
M
Matthias Bolte 已提交
4476
        qemuDomainObjEnterMonitorWithDriver(driver, vm);
4477 4478 4479
        rc = qemuMonitorMigrateToFile(priv->mon,
                                      QEMU_MONITOR_MIGRATE_BACKGROUND,
                                      args, path, offset);
M
Matthias Bolte 已提交
4480
        qemuDomainObjExitMonitorWithDriver(driver, vm);
4481
    } else {
4482
        const char *prog = qemudSaveCompressionTypeToString(header.compressed);
4483 4484 4485 4486 4487
        const char *args[] = {
            prog,
            "-c",
            NULL
        };
M
Matthias Bolte 已提交
4488
        qemuDomainObjEnterMonitorWithDriver(driver, vm);
4489 4490 4491
        rc = qemuMonitorMigrateToFile(priv->mon,
                                      QEMU_MONITOR_MIGRATE_BACKGROUND,
                                      args, path, offset);
M
Matthias Bolte 已提交
4492
        qemuDomainObjExitMonitorWithDriver(driver, vm);
4493 4494
    }

4495 4496 4497 4498 4499
    if (rc < 0)
        goto endjob;

    rc = qemuDomainWaitForMigrationComplete(driver, vm);

4500
    if (rc < 0)
4501
        goto endjob;
4502

4503
    if ((!bypassSecurityDriver) &&
4504 4505
        virSecurityManagerRestoreSavedStateLabel(driver->securityManager,
                                                 vm, path) < 0)
4506
        VIR_WARN("failed to restore save state label on %s", path);
4507

4508 4509
    if (cgroup != NULL) {
        rc = virCgroupDenyDevicePath(cgroup, path);
4510 4511 4512
        if (rc != 0)
            VIR_WARN("Unable to deny device %s for %s %d",
                     path, vm->def->name, rc);
4513 4514
    }

4515 4516
    ret = 0;

4517
    /* Shut it down */
4518
    qemudShutdownVMDaemon(driver, vm, 0);
4519
    qemuDomainStopAudit(vm, "saved");
4520 4521 4522
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STOPPED,
                                     VIR_DOMAIN_EVENT_STOPPED_SAVED);
4523
    if (!vm->persistent) {
4524 4525 4526
        if (qemuDomainObjEndJob(vm) > 0)
            virDomainRemoveInactive(&driver->domains,
                                    vm);
4527 4528
        vm = NULL;
    }
4529

4530
endjob:
4531
    if (vm) {
4532
        if (ret != 0) {
4533
            if (header.was_running && virDomainObjIsActive(vm)) {
H
Hu Tao 已提交
4534
                rc = doStartCPUs(driver, vm, dom->conn);
4535 4536 4537
                if (rc < 0)
                    VIR_WARN0("Unable to resume guest CPUs after save failure");
            }
4538

4539 4540 4541 4542 4543
            if (cgroup != NULL) {
                rc = virCgroupDenyDevicePath(cgroup, path);
                if (rc != 0)
                    VIR_WARN("Unable to deny device %s for %s: %d",
                             path, vm->def->name, rc);
4544
            }
4545 4546

            if ((!bypassSecurityDriver) &&
4547 4548
                virSecurityManagerRestoreSavedStateLabel(driver->securityManager,
                                                         vm, path) < 0)
4549
                VIR_WARN("failed to restore save state label on %s", path);
4550 4551
        }

4552
        if (qemuDomainObjEndJob(vm) == 0)
4553
            vm = NULL;
4554
    }
4555

4556 4557
cleanup:
    VIR_FREE(xml);
4558
    if (ret != 0 && is_reg)
4559
        unlink(path);
4560 4561
    if (event)
        qemuDomainEventQueue(driver, event);
4562
    virCgroupFree(&cgroup);
4563
    return ret;
D
Daniel P. Berrange 已提交
4564 4565
}

4566 4567 4568 4569 4570 4571 4572 4573 4574 4575 4576 4577 4578 4579 4580 4581
/* 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;
}

4582 4583 4584 4585
static int qemudDomainSave(virDomainPtr dom, const char *path)
{
    struct qemud_driver *driver = dom->conn->privateData;
    int compressed;
4586 4587 4588 4589
    int ret = -1;
    virDomainObjPtr vm = NULL;

    qemuDriverLock(driver);
4590 4591 4592 4593 4594 4595 4596 4597 4598 4599 4600

    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;
        }
4601 4602 4603 4604 4605 4606
        if (!qemudCompressProgramAvailable(compressed)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("Compression program for image format "
                                    "in configuration file isn't available"));
            return -1;
        }
4607 4608
    }

4609 4610 4611 4612 4613 4614 4615 4616 4617 4618 4619 4620 4621 4622 4623 4624 4625
    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;
    }

    ret = qemudDomainSaveFlag(driver, dom, vm, path, compressed);

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

    return ret;
4626 4627 4628 4629 4630 4631 4632 4633 4634 4635 4636 4637 4638 4639 4640 4641 4642 4643 4644 4645 4646 4647 4648
}

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;

4649
    virCheckFlags(0, -1);
4650 4651 4652 4653 4654 4655 4656 4657

    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);
4658
        goto cleanup;
4659 4660
    }

4661 4662 4663 4664 4665 4666
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
        goto cleanup;
    }

4667 4668
    name = qemuDomainManagedSavePath(driver, vm);
    if (name == NULL)
4669
        goto cleanup;
4670 4671 4672 4673

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

    compressed = QEMUD_SAVE_FORMAT_RAW;
4674
    ret = qemudDomainSaveFlag(driver, dom, vm, name, compressed);
4675 4676 4677 4678 4679

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
4680 4681 4682
    VIR_FREE(name);

    return ret;
4683 4684 4685 4686 4687 4688 4689 4690 4691 4692
}

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

4693
    virCheckFlags(0, -1);
4694 4695 4696 4697 4698 4699 4700 4701 4702 4703 4704 4705 4706 4707 4708 4709 4710 4711 4712 4713 4714 4715 4716 4717 4718 4719 4720 4721 4722 4723 4724 4725 4726

    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;

4727
    virCheckFlags(0, -1);
4728 4729 4730 4731 4732 4733 4734 4735 4736 4737 4738 4739 4740 4741 4742 4743 4744 4745 4746 4747 4748 4749 4750 4751

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

H
Hu Tao 已提交
4753 4754 4755 4756 4757 4758 4759 4760 4761 4762 4763 4764 4765 4766 4767 4768 4769 4770 4771 4772 4773 4774 4775 4776 4777
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;
    }

4778 4779
    if (virSecurityManagerSetSavedStateLabel(driver->securityManager,
                                             vm, path) < 0)
H
Hu Tao 已提交
4780 4781 4782 4783 4784 4785 4786 4787 4788 4789 4790 4791 4792 4793 4794 4795 4796 4797 4798 4799 4800 4801 4802 4803 4804 4805 4806 4807 4808 4809 4810
        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;

    ret = qemuDomainWaitForMigrationComplete(driver, vm);

    if (ret < 0)
        goto cleanup;

4811 4812
    if (virSecurityManagerRestoreSavedStateLabel(driver->securityManager,
                                                 vm, path) < 0)
H
Hu Tao 已提交
4813 4814 4815 4816 4817 4818 4819 4820
        goto cleanup;

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

4821 4822 4823 4824 4825
static enum qemud_save_formats
getCompressionType(struct qemud_driver *driver)
{
    int compress = QEMUD_SAVE_FORMAT_RAW;

4826 4827 4828 4829 4830 4831 4832
    /*
     * 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) {
4833 4834 4835 4836
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("Invalid dump image format specified in "
                              "configuration file, using raw"));
            return QEMUD_SAVE_FORMAT_RAW;
4837
        }
4838 4839 4840
        if (!qemudCompressProgramAvailable(compress)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("Compression program for dump image format "
4841 4842 4843
                                    "in configuration file isn't available, "
                                    "using raw"));
            return QEMUD_SAVE_FORMAT_RAW;
4844
        }
4845
    }
4846 4847 4848 4849 4850 4851 4852 4853 4854
    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 已提交
4855
    int ret = -1;
4856 4857 4858
    virDomainEventPtr event = NULL;
    qemuDomainObjPrivatePtr priv;

P
Paolo Bonzini 已提交
4859 4860 4861 4862 4863 4864
    qemuDriverLock(driver);
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);

    if (!vm) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
4865 4866
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
P
Paolo Bonzini 已提交
4867 4868
        goto cleanup;
    }
4869
    priv = vm->privateData;
P
Paolo Bonzini 已提交
4870

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

D
Daniel P. Berrange 已提交
4874
    if (!virDomainObjIsActive(vm)) {
4875 4876
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
4877
        goto endjob;
P
Paolo Bonzini 已提交
4878 4879
    }

O
Osier Yang 已提交
4880 4881
    priv->jobActive = QEMU_JOB_DUMP;

P
Paolo Bonzini 已提交
4882 4883
    /* Migrate will always stop the VM, so the resume condition is
       independent of whether the stop command is issued.  */
P
Paolo Bonzini 已提交
4884 4885 4886
    resume = (vm->state == VIR_DOMAIN_RUNNING);

    /* Pause domain for non-live dump */
P
Paolo Bonzini 已提交
4887
    if (!(flags & VIR_DUMP_LIVE) && vm->state == VIR_DOMAIN_RUNNING) {
H
Hu Tao 已提交
4888
        if (doStopCPUs(driver, vm) < 0)
4889
            goto endjob;
P
Paolo Bonzini 已提交
4890
        paused = 1;
4891 4892 4893 4894 4895 4896

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

H
Hu Tao 已提交
4899
    ret = doCoreDump(driver, vm, path, getCompressionType(driver));
4900 4901 4902 4903
    if (ret < 0)
        goto endjob;

    paused = 1;
4904 4905

endjob:
4906
    if ((ret == 0) && (flags & VIR_DUMP_CRASH)) {
4907
        qemudShutdownVMDaemon(driver, vm, 0);
4908
        qemuDomainStopAudit(vm, "crashed");
4909 4910 4911 4912 4913
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_STOPPED,
                                         VIR_DOMAIN_EVENT_STOPPED_CRASHED);
    }

P
Paolo Bonzini 已提交
4914 4915 4916
    /* 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.  */
4917
    else if (resume && paused && virDomainObjIsActive(vm)) {
H
Hu Tao 已提交
4918
        if (doStartCPUs(driver, vm, dom->conn) < 0) {
4919
            if (virGetLastError() == NULL)
4920 4921
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("resuming after dump failed"));
P
Paolo Bonzini 已提交
4922 4923
        }
    }
4924

4925 4926
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
4927
    else if ((ret == 0) && (flags & VIR_DUMP_CRASH) && !vm->persistent) {
4928 4929 4930 4931
        virDomainRemoveInactive(&driver->domains,
                                vm);
        vm = NULL;
    }
4932 4933

cleanup:
P
Paolo Bonzini 已提交
4934 4935
    if (vm)
        virDomainObjUnlock(vm);
4936 4937
    if (event)
        qemuDomainEventQueue(driver, event);
4938
    qemuDriverUnlock(driver);
P
Paolo Bonzini 已提交
4939 4940 4941
    return ret;
}

H
Hu Tao 已提交
4942 4943 4944 4945 4946 4947 4948 4949 4950 4951 4952 4953 4954 4955 4956 4957 4958 4959 4960 4961 4962 4963 4964 4965 4966 4967 4968 4969 4970 4971 4972 4973 4974 4975 4976 4977 4978
static void processWatchdogEvent(void *data, void *opaque)
{
    int ret;
    struct watchdogEvent *wdEvent = data;
    struct qemud_driver *driver = opaque;

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

            i = virAsprintf(&dumpfile, "%s/%s-%u",
                            driver->autoDumpPath,
                            wdEvent->vm->def->name,
                            (unsigned int)time(NULL));

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

H
Hu Tao 已提交
4979
            ret = doStartCPUs(driver, wdEvent->vm, NULL);
H
Hu Tao 已提交
4980 4981 4982 4983 4984 4985 4986 4987 4988 4989 4990 4991 4992 4993 4994 4995 4996

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

4998 4999 5000 5001 5002 5003
static int qemudDomainHotplugVcpus(virDomainObjPtr vm, unsigned int nvcpus)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
    int i, rc;
    int ret = -1;

5004 5005
    qemuDomainObjEnterMonitor(vm);

5006 5007 5008 5009 5010 5011 5012 5013 5014 5015 5016 5017 5018 5019 5020 5021 5022 5023 5024 5025 5026 5027 5028 5029 5030 5031 5032 5033 5034 5035
    /* 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:
5036
    qemuDomainObjExitMonitor(vm);
5037 5038 5039 5040 5041 5042 5043 5044 5045
    return ret;

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


5046 5047 5048 5049
static int
qemudDomainSetVcpusFlags(virDomainPtr dom, unsigned int nvcpus,
                         unsigned int flags)
{
5050 5051
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
5052
    virDomainDefPtr persistentDef;
5053 5054
    const char * type;
    int max;
5055
    int ret = -1;
5056

5057 5058 5059 5060 5061 5062 5063 5064 5065 5066 5067 5068 5069 5070 5071 5072
    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);
5073 5074 5075
        return -1;
    }

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

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

5088 5089 5090
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

5091
    if (!virDomainObjIsActive(vm) && (flags & VIR_DOMAIN_VCPU_LIVE)) {
5092 5093
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                         "%s", _("domain is not running"));
5094
        goto endjob;
5095 5096
    }

5097 5098 5099 5100 5101 5102
    if (!vm->persistent && (flags & VIR_DOMAIN_VCPU_CONFIG)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID, "%s",
                        _("cannot change persistent config of a transient domain"));
        goto endjob;
    }

5103 5104 5105 5106 5107 5108 5109 5110 5111 5112 5113 5114 5115
    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 已提交
5116
    if (!(flags & VIR_DOMAIN_VCPU_MAXIMUM) && vm->def->maxvcpus < max) {
5117 5118 5119
        max = vm->def->maxvcpus;
    }

5120 5121 5122 5123 5124 5125 5126
    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;
    }

5127 5128 5129
    if (!(persistentDef = virDomainObjGetPersistentDef(driver->caps, vm)))
        goto endjob;

5130 5131
    switch (flags) {
    case VIR_DOMAIN_VCPU_MAXIMUM | VIR_DOMAIN_VCPU_CONFIG:
5132 5133 5134
        persistentDef->maxvcpus = nvcpus;
        if (nvcpus < persistentDef->vcpus)
            persistentDef->vcpus = nvcpus;
5135 5136 5137 5138
        ret = 0;
        break;

    case VIR_DOMAIN_VCPU_CONFIG:
5139
        persistentDef->vcpus = nvcpus;
5140 5141 5142 5143 5144 5145 5146 5147 5148
        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);
5149 5150 5151
        if (ret == 0) {
            persistentDef->vcpus = nvcpus;
        }
5152 5153
        break;
    }
5154

5155 5156 5157 5158
    /* Save the persistent config to disk */
    if (flags & VIR_DOMAIN_VCPU_CONFIG)
        ret = virDomainSaveConfig(driver->configDir, persistentDef);

5159 5160 5161
endjob:
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
5162

5163
cleanup:
5164 5165
    if (vm)
        virDomainObjUnlock(vm);
5166
    return ret;
5167 5168
}

5169 5170 5171 5172 5173 5174
static int
qemudDomainSetVcpus(virDomainPtr dom, unsigned int nvcpus)
{
    return qemudDomainSetVcpusFlags(dom, nvcpus, VIR_DOMAIN_VCPU_LIVE);
}

5175 5176 5177 5178 5179 5180

static int
qemudDomainPinVcpu(virDomainPtr dom,
                   unsigned int vcpu,
                   unsigned char *cpumap,
                   int maplen) {
5181 5182
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
5183
    int maxcpu, hostcpus;
5184
    virNodeInfo nodeinfo;
5185
    int ret = -1;
5186
    qemuDomainObjPrivatePtr priv;
5187

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

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

D
Daniel P. Berrange 已提交
5200
    if (!virDomainObjIsActive(vm)) {
5201 5202
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s",_("cannot pin vcpus on an inactive domain"));
5203
        goto cleanup;
5204 5205
    }

5206 5207 5208
    priv = vm->privateData;

    if (vcpu > (priv->nvcpupids-1)) {
5209 5210 5211
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("vcpu number out of range %d > %d"),
                        vcpu, priv->nvcpupids);
5212
        goto cleanup;
5213 5214
    }

5215
    if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
5216
        goto cleanup;
5217

5218
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
5219
    maxcpu = maplen * 8;
5220 5221
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;
5222

5223 5224
    if (priv->vcpupids != NULL) {
        if (virProcessInfoSetAffinity(priv->vcpupids[vcpu],
5225
                                      cpumap, maplen, maxcpu) < 0)
5226
            goto cleanup;
5227
    } else {
5228 5229
        qemuReportError(VIR_ERR_NO_SUPPORT,
                        "%s", _("cpu affinity is not supported"));
5230
        goto cleanup;
5231
    }
5232
    ret = 0;
5233

5234
cleanup:
5235 5236
    if (vm)
        virDomainObjUnlock(vm);
5237
    return ret;
5238 5239 5240 5241 5242 5243 5244 5245
}

static int
qemudDomainGetVcpus(virDomainPtr dom,
                    virVcpuInfoPtr info,
                    int maxinfo,
                    unsigned char *cpumaps,
                    int maplen) {
5246 5247
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
5248
    virNodeInfo nodeinfo;
5249
    int i, v, maxcpu, hostcpus;
5250
    int ret = -1;
5251
    qemuDomainObjPrivatePtr priv;
5252

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

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

D
Daniel P. Berrange 已提交
5265
    if (!virDomainObjIsActive(vm)) {
5266 5267 5268
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s",
                        _("cannot list vcpu pinning for an inactive domain"));
5269
        goto cleanup;
5270 5271
    }

5272 5273
    priv = vm->privateData;

5274
    if (nodeGetInfo(dom->conn, &nodeinfo) < 0)
5275
        goto cleanup;
5276

5277
    hostcpus = VIR_NODEINFO_MAXCPUS(nodeinfo);
5278
    maxcpu = maplen * 8;
5279 5280
    if (maxcpu > hostcpus)
        maxcpu = hostcpus;
5281 5282

    /* Clamp to actual number of vcpus */
5283 5284
    if (maxinfo > priv->nvcpupids)
        maxinfo = priv->nvcpupids;
5285

5286 5287 5288 5289 5290 5291
    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;
5292

5293
                if (priv->vcpupids != NULL &&
5294 5295 5296
                    qemudGetProcessInfo(&(info[i].cpuTime),
                                        &(info[i].cpu),
                                        vm->pid,
5297
                                        priv->vcpupids[i]) < 0) {
5298
                    virReportSystemError(errno, "%s",
5299 5300 5301
                                         _("cannot get vCPU placement & pCPU time"));
                    goto cleanup;
                }
5302
            }
5303 5304
        }

5305 5306
        if (cpumaps != NULL) {
            memset(cpumaps, 0, maplen * maxinfo);
5307
            if (priv->vcpupids != NULL) {
5308 5309 5310
                for (v = 0 ; v < maxinfo ; v++) {
                    unsigned char *cpumap = VIR_GET_CPUMAP(cpumaps, maplen, v);

5311
                    if (virProcessInfoGetAffinity(priv->vcpupids[v],
5312
                                                  cpumap, maplen, maxcpu) < 0)
5313
                        goto cleanup;
5314
                }
5315
            } else {
5316 5317
                qemuReportError(VIR_ERR_NO_SUPPORT,
                                "%s", _("cpu affinity is not available"));
5318
                goto cleanup;
5319 5320 5321
            }
        }
    }
5322
    ret = maxinfo;
5323

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


5331 5332 5333
static int
qemudDomainGetVcpusFlags(virDomainPtr dom, unsigned int flags)
{
5334 5335
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
5336
    virDomainDefPtr def;
5337
    int ret = -1;
5338

5339 5340 5341 5342 5343 5344 5345 5346
    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);
5347 5348 5349
        return -1;
    }

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

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

5362 5363 5364 5365 5366 5367 5368 5369 5370
    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;
5371 5372
    }

5373
    ret = (flags & VIR_DOMAIN_VCPU_MAXIMUM) ? def->maxvcpus : def->vcpus;
5374

5375
cleanup:
5376 5377
    if (vm)
        virDomainObjUnlock(vm);
5378 5379 5380
    return ret;
}

5381 5382 5383 5384 5385 5386 5387
static int
qemudDomainGetMaxVcpus(virDomainPtr dom)
{
    return qemudDomainGetVcpusFlags(dom, (VIR_DOMAIN_VCPU_LIVE |
                                          VIR_DOMAIN_VCPU_MAXIMUM));
}

5388 5389 5390 5391 5392 5393 5394 5395 5396
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);

5397 5398
    memset(seclabel, 0, sizeof(*seclabel));

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

5407
    if (!virDomainVirtTypeToString(vm->def->virtType)) {
5408 5409 5410
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("unknown virt type in domain definition '%d'"),
                        vm->def->virtType);
5411 5412 5413 5414 5415 5416 5417 5418 5419 5420 5421 5422 5423 5424 5425 5426 5427
        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 已提交
5428
    if (virDomainObjIsActive(vm)) {
5429 5430
        if (virSecurityManagerGetProcessLabel(driver->securityManager,
                                              vm, seclabel) < 0) {
5431 5432 5433
            qemuReportError(VIR_ERR_INTERNAL_ERROR,
                            "%s", _("Failed to get security label"));
            goto cleanup;
5434 5435 5436 5437 5438 5439 5440 5441
        }
    }

    ret = 0;

cleanup:
    if (vm)
        virDomainObjUnlock(vm);
5442
    qemuDriverUnlock(driver);
5443 5444 5445
    return ret;
}

5446 5447
static int qemudNodeGetSecurityModel(virConnectPtr conn,
                                     virSecurityModelPtr secmodel)
5448 5449 5450
{
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
    char *p;
5451
    int ret = 0;
5452

5453
    qemuDriverLock(driver);
5454 5455 5456 5457 5458
    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)
5459
        goto cleanup;
5460

5461 5462
    p = driver->caps->host.secModel.model;
    if (strlen(p) >= VIR_SECURITY_MODEL_BUFLEN-1) {
5463 5464 5465
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("security model string exceeds max %d bytes"),
                        VIR_SECURITY_MODEL_BUFLEN-1);
5466 5467
        ret = -1;
        goto cleanup;
5468 5469 5470 5471 5472
    }
    strcpy(secmodel->model, p);

    p = driver->caps->host.secModel.doi;
    if (strlen(p) >= VIR_SECURITY_DOI_BUFLEN-1) {
5473 5474 5475
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("security DOI string exceeds max %d bytes"),
                        VIR_SECURITY_DOI_BUFLEN-1);
5476 5477
        ret = -1;
        goto cleanup;
5478 5479
    }
    strcpy(secmodel->doi, p);
5480 5481 5482 5483

cleanup:
    qemuDriverUnlock(driver);
    return ret;
5484 5485
}

5486 5487 5488 5489 5490 5491
/* 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). */

5492 5493 5494
static int
qemudOpenAsUID(const char *path, uid_t uid, gid_t gid, pid_t *child_pid)
{
5495 5496 5497 5498 5499 5500 5501 5502 5503 5504 5505 5506 5507 5508 5509 5510 5511 5512 5513 5514 5515 5516 5517 5518 5519 5520 5521
    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 */
5522
        VIR_FORCE_CLOSE(pipefd[1]);
5523 5524 5525 5526 5527 5528 5529 5530 5531 5532 5533

        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:
5534 5535
        VIR_FORCE_CLOSE(pipefd[0]);
        VIR_FORCE_CLOSE(pipefd[1]);
5536 5537 5538 5539 5540 5541 5542 5543 5544 5545 5546 5547 5548 5549 5550 5551 5552 5553 5554 5555 5556 5557 5558 5559
        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 */
5560
    VIR_FORCE_CLOSE(pipefd[0]);
5561 5562 5563 5564 5565 5566 5567 5568 5569

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

5570 5571 5572
    if (virSetUIDGID(uid, gid) < 0) {
       exit_code = errno;
       goto child_cleanup;
5573 5574
    }

5575 5576 5577 5578 5579 5580 5581 5582
    if ((fd = open(path, O_RDONLY)) < 0) {
        exit_code = errno;
        virReportSystemError(errno,
                             _("cannot open '%s' as uid %d"),
                             path, uid);
        goto child_cleanup;
    }

5583 5584 5585 5586 5587 5588
    if (VIR_ALLOC_N(buf, bufsize) < 0) {
        exit_code = ENOMEM;
        virReportOOMError();
        goto child_cleanup;
    }

5589 5590 5591 5592 5593 5594 5595 5596 5597 5598 5599 5600 5601 5602 5603 5604 5605 5606 5607 5608
    /* 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);
5609 5610
    VIR_FORCE_CLOSE(fd);
    VIR_FORCE_CLOSE(pipefd[1]);
5611 5612 5613
    _exit(exit_code);
}

J
Jiri Denemark 已提交
5614 5615 5616 5617
static int qemudDomainSaveImageClose(int fd, pid_t read_pid, int *status)
{
    int ret = 0;

5618 5619 5620 5621
    if (VIR_CLOSE(fd) < 0) {
        virReportSystemError(errno, "%s",
                             _("cannot close file"));
    }
J
Jiri Denemark 已提交
5622 5623 5624 5625 5626 5627 5628 5629 5630 5631 5632 5633 5634 5635 5636 5637

    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,
5638 5639 5640 5641
                         const char *path,
                         virDomainDefPtr *ret_def,
                         struct qemud_save_header *ret_header,
                         pid_t *ret_read_pid)
J
Jiri Denemark 已提交
5642 5643
{
    int fd;
5644
    pid_t read_pid = -1;
5645
    struct qemud_save_header header;
J
Jiri Denemark 已提交
5646 5647
    char *xml = NULL;
    virDomainDefPtr def = NULL;
5648 5649

    if ((fd = open(path, O_RDONLY)) < 0) {
5650 5651 5652
        if ((driver->user == 0) || (getuid() != 0)) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("cannot read domain image"));
J
Jiri Denemark 已提交
5653
            goto error;
5654 5655 5656 5657 5658 5659
        }

        /* 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. */
5660 5661
        if ((fd = qemudOpenAsUID(path,
                                 driver->user, driver->group, &read_pid)) < 0) {
5662
            /* error already reported */
J
Jiri Denemark 已提交
5663
            goto error;
5664
        }
5665 5666 5667
    }

    if (saferead(fd, &header, sizeof(header)) != sizeof(header)) {
5668 5669
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to read qemu header"));
J
Jiri Denemark 已提交
5670
        goto error;
5671 5672 5673
    }

    if (memcmp(header.magic, QEMUD_SAVE_MAGIC, sizeof(header.magic)) != 0) {
5674 5675
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("image magic is incorrect"));
J
Jiri Denemark 已提交
5676
        goto error;
5677 5678 5679
    }

    if (header.version > QEMUD_SAVE_VERSION) {
5680 5681 5682
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("image version is not supported (%d > %d)"),
                        header.version, QEMUD_SAVE_VERSION);
J
Jiri Denemark 已提交
5683
        goto error;
5684 5685
    }

5686 5687 5688
    if (header.xml_len <= 0) {
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("invalid XML length: %d"), header.xml_len);
J
Jiri Denemark 已提交
5689
        goto error;
5690 5691
    }

5692 5693
    if (VIR_ALLOC_N(xml, header.xml_len) < 0) {
        virReportOOMError();
J
Jiri Denemark 已提交
5694
        goto error;
5695 5696 5697
    }

    if (saferead(fd, xml, header.xml_len) != header.xml_len) {
5698 5699
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to read XML"));
J
Jiri Denemark 已提交
5700
        goto error;
5701 5702 5703
    }

    /* Create a domain from this XML */
5704
    if (!(def = virDomainDefParseString(driver->caps, xml,
5705
                                        VIR_DOMAIN_XML_INACTIVE))) {
5706 5707
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to parse XML"));
J
Jiri Denemark 已提交
5708
        goto error;
5709 5710
    }

J
Jiri Denemark 已提交
5711
    VIR_FREE(xml);
5712

J
Jiri Denemark 已提交
5713 5714 5715
    *ret_def = def;
    *ret_header = header;
    *ret_read_pid = read_pid;
5716

J
Jiri Denemark 已提交
5717
    return fd;
5718

J
Jiri Denemark 已提交
5719 5720 5721 5722 5723 5724 5725 5726 5727 5728 5729 5730 5731 5732 5733 5734 5735 5736 5737 5738 5739 5740 5741 5742 5743 5744
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,
                            int fd,
                            pid_t read_pid,
                            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) {
5745
        const char *intermediate_argv[3] = { NULL, "-dc", NULL };
J
Jiri Denemark 已提交
5746
        const char *prog = qemudSaveCompressionTypeToString(header->compressed);
5747
        if (prog == NULL) {
5748 5749
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            _("Invalid compressed save format %d"),
J
Jiri Denemark 已提交
5750 5751
                            header->compressed);
            goto out;
5752
        }
5753

J
Jiri Denemark 已提交
5754
        if (header->compressed != QEMUD_SAVE_FORMAT_RAW) {
5755
            intermediate_argv[0] = prog;
5756 5757
            intermediatefd = fd;
            fd = -1;
5758
            if (virExec(intermediate_argv, NULL, NULL,
5759
                        &intermediate_pid, intermediatefd, &fd, NULL, 0) < 0) {
5760 5761 5762
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                _("Failed to start decompression binary %s"),
                                intermediate_argv[0]);
J
Jiri Denemark 已提交
5763
                goto out;
5764 5765 5766
            }
        }
    }
J
Jiri Denemark 已提交
5767

5768
    /* Set the migration source and start it up. */
5769 5770
    ret = qemudStartVMDaemon(conn, driver, vm, "stdio", true, fd, path,
                             VIR_VM_OP_RESTORE);
J
Jiri Denemark 已提交
5771

5772
    if (intermediate_pid != -1) {
5773 5774 5775 5776 5777 5778 5779 5780 5781
        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);
            VIR_FORCE_CLOSE(fd);
            kill(intermediate_pid, SIGTERM);
        }

5782 5783
        /* Wait for intermediate process to exit */
        while (waitpid(intermediate_pid, &childstat, 0) == -1 &&
J
Jiri Denemark 已提交
5784 5785 5786
               errno == EINTR) {
            /* empty */
        }
5787
    }
5788
    VIR_FORCE_CLOSE(intermediatefd);
J
Jiri Denemark 已提交
5789 5790

    wait_ret = qemudDomainSaveImageClose(fd, read_pid, &status);
5791
    fd = -1;
5792 5793 5794 5795 5796 5797 5798 5799 5800 5801 5802 5803 5804 5805 5806 5807 5808 5809 5810 5811 5812
    if (read_pid != -1) {
        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;
            }
        }
    }
J
Jiri Denemark 已提交
5813

5814 5815
    if (ret < 0) {
        qemuDomainStartAudit(vm, "restored", false);
J
Jiri Denemark 已提交
5816
        goto out;
5817
    }
5818

5819 5820 5821
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_RESTORED);
5822
    qemuDomainStartAudit(vm, "restored", true);
J
Jiri Denemark 已提交
5823 5824 5825
    if (event)
        qemuDomainEventQueue(driver, event);

5826

5827
    /* If it was running before, resume it now. */
J
Jiri Denemark 已提交
5828
    if (header->was_running) {
H
Hu Tao 已提交
5829
        if (doStartCPUs(driver, vm, conn) < 0) {
5830
            if (virGetLastError() == NULL)
5831 5832
                qemuReportError(VIR_ERR_OPERATION_FAILED,
                                "%s", _("failed to resume domain"));
J
Jiri Denemark 已提交
5833
            goto out;
5834
        }
5835 5836
        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0) {
            VIR_WARN("Failed to save status on vm %s", vm->def->name);
J
Jiri Denemark 已提交
5837
            goto out;
5838
        }
5839
    }
J
Jiri Denemark 已提交
5840

5841
    ret = 0;
5842

J
Jiri Denemark 已提交
5843
out:
5844 5845
    if (virSecurityManagerRestoreSavedStateLabel(driver->securityManager,
                                                 vm, path) < 0)
5846 5847
        VIR_WARN("failed to restore save state label on %s", path);

J
Jiri Denemark 已提交
5848 5849 5850 5851 5852 5853 5854 5855 5856 5857 5858 5859 5860 5861 5862 5863 5864 5865 5866 5867 5868 5869 5870 5871 5872
    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))) {
5873
        /* virDomainAssignDef already set the error */
J
Jiri Denemark 已提交
5874 5875 5876 5877 5878 5879 5880 5881 5882 5883 5884
        goto cleanup;
    }
    def = NULL;

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

    ret = qemudDomainSaveImageStartVM(conn, driver, vm, fd,
                                      read_pid, &header, path);

    if (qemuDomainObjEndJob(vm) == 0)
5885
        vm = NULL;
J
Jiri Denemark 已提交
5886 5887 5888 5889
    else if (ret < 0 && !vm->persistent) {
        virDomainRemoveInactive(&driver->domains, vm);
        vm = NULL;
    }
5890

5891 5892
cleanup:
    virDomainDefFree(def);
J
Jiri Denemark 已提交
5893
    qemudDomainSaveImageClose(fd, read_pid, NULL);
5894 5895 5896
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
5897
    return ret;
D
Daniel P. Berrange 已提交
5898 5899
}

J
Jiri Denemark 已提交
5900 5901 5902 5903 5904 5905 5906 5907 5908 5909 5910 5911 5912 5913 5914 5915 5916 5917 5918 5919 5920 5921 5922 5923 5924 5925 5926 5927 5928 5929 5930 5931 5932 5933 5934 5935 5936 5937 5938 5939 5940
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;

    ret = qemudDomainSaveImageStartVM(conn, driver, vm, fd,
                                      read_pid, &header, path);

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

D
Daniel P. Berrange 已提交
5941

5942 5943 5944 5945 5946 5947 5948 5949 5950 5951 5952 5953 5954 5955 5956 5957 5958 5959 5960 5961 5962 5963 5964 5965 5966 5967 5968 5969 5970 5971 5972 5973 5974 5975 5976 5977 5978 5979
static char *qemudVMDumpXML(struct qemud_driver *driver,
                            virDomainObjPtr vm,
                            int flags)
{
    char *ret = NULL;
    virCPUDefPtr cpu = NULL;
    virDomainDefPtr def;
    virCPUDefPtr def_cpu;

    if ((flags & VIR_DOMAIN_XML_INACTIVE) && vm->newDef)
        def = vm->newDef;
    else
        def = vm->def;
    def_cpu = def->cpu;

    /* Update guest CPU requirements according to host CPU */
    if ((flags & VIR_DOMAIN_XML_UPDATE_CPU) && def_cpu && def_cpu->model) {
        if (!driver->caps || !driver->caps->host.cpu) {
            qemuReportError(VIR_ERR_OPERATION_FAILED,
                            "%s", _("cannot get host CPU capabilities"));
            goto cleanup;
        }

        if (!(cpu = virCPUDefCopy(def_cpu))
            || cpuUpdate(cpu, driver->caps->host.cpu))
            goto cleanup;
        def->cpu = cpu;
    }

    ret = virDomainDefFormat(def, flags);

cleanup:
    def->cpu = def_cpu;
    virCPUDefFree(cpu);
    return ret;
}


5980
static char *qemudDomainDumpXML(virDomainPtr dom,
5981
                                int flags) {
5982 5983 5984
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    char *ret = NULL;
5985 5986
    unsigned long balloon;
    int err;
5987

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

D
Daniel P. Berrange 已提交
5991
    if (!vm) {
5992 5993
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
5994 5995
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
5996
        goto cleanup;
D
Daniel P. Berrange 已提交
5997 5998
    }

5999 6000 6001 6002
    /* 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))) {
6003
        qemuDomainObjPrivatePtr priv = vm->privateData;
6004 6005 6006
        /* Don't delay if someone's using the monitor, just use
         * existing most recent data instead */
        if (!priv->jobActive) {
6007
            if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
6008 6009
                goto cleanup;

6010
            qemuDomainObjEnterMonitorWithDriver(driver, vm);
6011
            err = qemuMonitorGetBalloonInfo(priv->mon, &balloon);
6012
            qemuDomainObjExitMonitorWithDriver(driver, vm);
6013 6014 6015 6016
            if (qemuDomainObjEndJob(vm) == 0) {
                vm = NULL;
                goto cleanup;
            }
6017 6018 6019
            if (err < 0)
                goto cleanup;
            if (err > 0)
6020
                vm->def->mem.cur_balloon = balloon;
6021 6022
            /* err == 0 indicates no balloon support, so ignore it */
        }
6023
    }
6024

6025
    ret = qemudVMDumpXML(driver, vm, flags);
6026 6027

cleanup:
6028 6029
    if (vm)
        virDomainObjUnlock(vm);
6030
    qemuDriverUnlock(driver);
6031
    return ret;
D
Daniel P. Berrange 已提交
6032 6033 6034
}


6035 6036 6037 6038
static char *qemuDomainXMLFromNative(virConnectPtr conn,
                                     const char *format,
                                     const char *config,
                                     unsigned int flags ATTRIBUTE_UNUSED) {
6039
    struct qemud_driver *driver = conn->privateData;
6040 6041 6042 6043
    virDomainDefPtr def = NULL;
    char *xml = NULL;

    if (STRNEQ(format, QEMU_CONFIG_FORMAT_ARGV)) {
6044 6045
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("unsupported config type %s"), format);
6046 6047 6048
        goto cleanup;
    }

6049
    qemuDriverLock(driver);
6050
    def = qemuParseCommandLineString(driver->caps, config);
6051
    qemuDriverUnlock(driver);
6052 6053 6054
    if (!def)
        goto cleanup;

6055
    xml = virDomainDefFormat(def, VIR_DOMAIN_XML_INACTIVE);
6056 6057 6058 6059 6060 6061

cleanup:
    virDomainDefFree(def);
    return xml;
}

6062 6063 6064 6065 6066 6067
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;
6068
    virDomainChrSourceDef monConfig;
6069
    unsigned long long qemuCmdFlags;
E
Eric Blake 已提交
6070
    virCommandPtr cmd = NULL;
6071 6072 6073
    char *ret = NULL;
    int i;

6074 6075
    qemuDriverLock(driver);

6076
    if (STRNEQ(format, QEMU_CONFIG_FORMAT_ARGV)) {
6077 6078
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("unsupported config type %s"), format);
6079 6080 6081
        goto cleanup;
    }

6082
    def = virDomainDefParseString(driver->caps, xmlData, 0);
6083 6084 6085
    if (!def)
        goto cleanup;

6086 6087
    /* Since we're just exporting args, we can't do bridge/network/direct
     * setups, since libvirt will normally create TAP/macvtap devices
6088 6089 6090 6091 6092
     * 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];
6093
        int bootIndex = net->bootIndex;
6094 6095
        if (net->type == VIR_DOMAIN_NET_TYPE_NETWORK ||
            net->type == VIR_DOMAIN_NET_TYPE_DIRECT) {
6096 6097 6098 6099 6100 6101 6102 6103 6104 6105 6106 6107 6108 6109 6110 6111 6112 6113 6114 6115
            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;
        }
6116
        net->bootIndex = bootIndex;
6117 6118 6119 6120
    }
    for (i = 0 ; i < def->ngraphics ; i++) {
        if (def->graphics[i]->type == VIR_DOMAIN_GRAPHICS_TYPE_VNC &&
            def->graphics[i]->data.vnc.autoport)
6121
            def->graphics[i]->data.vnc.port = QEMU_VNC_PORT_MIN;
6122 6123
    }

6124 6125 6126
    if (qemuCapsExtractVersionInfo(def->emulator,
                                   NULL,
                                   &qemuCmdFlags) < 0)
6127 6128
        goto cleanup;

6129
    if (qemuPrepareMonitorChr(driver, &monConfig, def->name) < 0)
6130
        goto cleanup;
6131

6132 6133
    if (!(cmd = qemuBuildCommandLine(conn, driver, def,
                                     &monConfig, false, qemuCmdFlags,
6134
                                     NULL, -1, NULL, VIR_VM_OP_NO_OP)))
6135 6136
        goto cleanup;

E
Eric Blake 已提交
6137
    ret = virCommandToString(cmd);
6138 6139

cleanup:
6140
    qemuDriverUnlock(driver);
6141

E
Eric Blake 已提交
6142
    virCommandFree(cmd);
6143 6144 6145 6146 6147
    virDomainDefFree(def);
    return ret;
}


6148
static int qemudListDefinedDomains(virConnectPtr conn,
6149
                            char **const names, int nnames) {
6150
    struct qemud_driver *driver = conn->privateData;
6151
    int n;
6152

6153
    qemuDriverLock(driver);
6154
    n = virDomainObjListGetInactiveNames(&driver->domains, names, nnames);
6155
    qemuDriverUnlock(driver);
6156
    return n;
D
Daniel P. Berrange 已提交
6157 6158
}

6159
static int qemudNumDefinedDomains(virConnectPtr conn) {
6160
    struct qemud_driver *driver = conn->privateData;
6161
    int n;
6162

6163
    qemuDriverLock(driver);
6164
    n = virDomainObjListNumOfDomains(&driver->domains, 0);
6165
    qemuDriverUnlock(driver);
6166

6167
    return n;
D
Daniel P. Berrange 已提交
6168 6169 6170
}


J
Jiri Denemark 已提交
6171 6172
static int qemudDomainObjStart(virConnectPtr conn,
                               struct qemud_driver *driver,
6173 6174
                               virDomainObjPtr vm,
                               bool start_paused)
J
Jiri Denemark 已提交
6175 6176 6177 6178 6179 6180 6181 6182 6183 6184 6185 6186 6187 6188 6189 6190 6191 6192 6193 6194
{
    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;
    }

6195 6196
    ret = qemudStartVMDaemon(conn, driver, vm, NULL, start_paused, -1, NULL,
                             VIR_VM_OP_CREATE);
6197 6198
    qemuDomainStartAudit(vm, "booted", ret >= 0);
    if (ret >= 0) {
J
Jiri Denemark 已提交
6199 6200 6201 6202 6203 6204 6205 6206 6207 6208 6209 6210 6211
        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;
}

6212 6213 6214
static int
qemudDomainStartWithFlags(virDomainPtr dom, unsigned int flags)
{
6215 6216 6217
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
6218

6219
    virCheckFlags(VIR_DOMAIN_START_PAUSED, -1);
6220

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

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

6232 6233 6234 6235
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;

    if (virDomainObjIsActive(vm)) {
6236 6237
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is already running"));
6238 6239 6240
        goto endjob;
    }

6241 6242
    ret = qemudDomainObjStart(dom->conn, driver, vm,
                              (flags & VIR_DOMAIN_START_PAUSED) != 0);
6243

6244
endjob:
6245 6246
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
6247

6248
cleanup:
6249 6250
    if (vm)
        virDomainObjUnlock(vm);
6251
    qemuDriverUnlock(driver);
6252
    return ret;
D
Daniel P. Berrange 已提交
6253 6254
}

6255 6256 6257 6258 6259 6260
static int
qemudDomainStart(virDomainPtr dom)
{
    return qemudDomainStartWithFlags(dom, 0);
}

6261 6262 6263 6264 6265 6266 6267 6268 6269 6270 6271 6272 6273 6274 6275
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;

6276
        if (STRNEQ(def->os.machine, machine->name))
6277 6278 6279
            continue;

        if (!(*canonical = strdup(machine->canonical))) {
6280
            virReportOOMError();
6281 6282 6283 6284 6285 6286 6287 6288 6289
            return -1;
        }

        break;
    }

    return 0;
}

6290 6291 6292 6293 6294 6295
static int
qemudCanonicalizeMachineDirect(virDomainDefPtr def, char **canonical)
{
    virCapsGuestMachinePtr *machines = NULL;
    int i, nmachines = 0;

6296
    if (qemuCapsProbeMachineTypes(def->emulator, &machines, &nmachines) < 0)
6297 6298 6299 6300 6301 6302
        return -1;

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

6303
        if (STRNEQ(def->os.machine, machines[i]->name))
6304 6305 6306 6307 6308 6309 6310 6311 6312 6313 6314 6315
            continue;

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

    virCapabilitiesFreeMachines(machines, nmachines);

    return 0;
}

6316 6317
int
qemudCanonicalizeMachine(struct qemud_driver *driver, virDomainDefPtr def)
6318 6319 6320 6321 6322 6323
{
    char *canonical = NULL;
    int i;

    for (i = 0; i < driver->caps->nguests; i++) {
        virCapsGuestPtr guest = driver->caps->guests[i];
6324
        virCapsGuestDomainInfoPtr info;
6325 6326 6327
        int j;

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

6330 6331 6332 6333 6334 6335 6336 6337 6338
            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;
6339 6340
        }

6341 6342 6343 6344
        info = &guest->arch.defaultInfo;

        if (info->emulator && STREQ(info->emulator, def->emulator)) {
            if (qemudCanonicalizeMachineFromInfo(def, info, &canonical) < 0)
6345 6346 6347 6348
                return -1;
            goto out;
        }
    }
6349 6350 6351 6352

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

6353 6354 6355 6356 6357 6358 6359
out:
    if (canonical) {
        VIR_FREE(def->os.machine);
        def->os.machine = canonical;
    }
    return 0;
}
D
Daniel P. Berrange 已提交
6360

6361
static virDomainPtr qemudDomainDefine(virConnectPtr conn, const char *xml) {
6362
    struct qemud_driver *driver = conn->privateData;
6363
    virDomainDefPtr def;
6364
    virDomainObjPtr vm = NULL;
6365
    virDomainPtr dom = NULL;
6366
    virDomainEventPtr event = NULL;
6367
    int dupVM;
6368

6369
    qemuDriverLock(driver);
6370
    if (!(def = virDomainDefParseString(driver->caps, xml,
6371
                                        VIR_DOMAIN_XML_INACTIVE)))
6372
        goto cleanup;
6373

6374
    if (virSecurityManagerVerify(driver->securityManager, def) < 0)
6375 6376
        goto cleanup;

6377 6378
    if ((dupVM = virDomainObjIsDuplicate(&driver->domains, def, 0)) < 0)
        goto cleanup;
6379

6380
    if (qemudCanonicalizeMachine(driver, def) < 0)
6381 6382
        goto cleanup;

6383 6384 6385
    if (qemuAssignPCIAddresses(def) < 0)
        goto cleanup;

6386
    if (!(vm = virDomainAssignDef(driver->caps,
6387
                                  &driver->domains,
6388
                                  def, false))) {
6389
        goto cleanup;
6390
    }
6391
    def = NULL;
6392
    vm->persistent = 1;
6393

6394
    if (virDomainSaveConfig(driver->configDir,
6395
                            vm->newDef ? vm->newDef : vm->def) < 0) {
6396 6397
        virDomainRemoveInactive(&driver->domains,
                                vm);
6398
        vm = NULL;
6399
        goto cleanup;
6400 6401
    }

6402 6403
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_DEFINED,
6404
                                     !dupVM ?
6405 6406
                                     VIR_DOMAIN_EVENT_DEFINED_ADDED :
                                     VIR_DOMAIN_EVENT_DEFINED_UPDATED);
6407

6408
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
6409
    if (dom) dom->id = vm->def->id;
6410 6411

cleanup:
6412
    virDomainDefFree(def);
6413 6414
    if (vm)
        virDomainObjUnlock(vm);
6415 6416
    if (event)
        qemuDomainEventQueue(driver, event);
6417
    qemuDriverUnlock(driver);
6418
    return dom;
D
Daniel P. Berrange 已提交
6419 6420
}

6421
static int qemudDomainUndefine(virDomainPtr dom) {
6422 6423
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
6424
    virDomainEventPtr event = NULL;
6425
    int ret = -1;
D
Daniel P. Berrange 已提交
6426

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

D
Daniel P. Berrange 已提交
6430
    if (!vm) {
6431 6432
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
6433 6434
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
6435
        goto cleanup;
D
Daniel P. Berrange 已提交
6436 6437
    }

D
Daniel P. Berrange 已提交
6438
    if (virDomainObjIsActive(vm)) {
6439 6440
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot delete active domain"));
6441
        goto cleanup;
D
Daniel P. Berrange 已提交
6442 6443
    }

6444
    if (!vm->persistent) {
6445
        qemuReportError(VIR_ERR_OPERATION_INVALID,
6446
                        "%s", _("cannot undefine transient domain"));
6447
        goto cleanup;
6448 6449
    }

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

6453 6454 6455
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_UNDEFINED,
                                     VIR_DOMAIN_EVENT_UNDEFINED_REMOVED);
6456

6457 6458
    virDomainRemoveInactive(&driver->domains,
                            vm);
6459
    vm = NULL;
6460
    ret = 0;
D
Daniel P. Berrange 已提交
6461

6462
cleanup:
6463 6464
    if (vm)
        virDomainObjUnlock(vm);
6465 6466
    if (event)
        qemuDomainEventQueue(driver, event);
6467
    qemuDriverUnlock(driver);
6468
    return ret;
D
Daniel P. Berrange 已提交
6469 6470
}

6471

6472 6473
static int qemudDomainAttachDevice(virDomainPtr dom,
                                   const char *xml)
6474
{
6475 6476 6477 6478
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    virDomainDeviceDefPtr dev = NULL;
    unsigned long long qemuCmdFlags;
6479
    virCgroupPtr cgroup = NULL;
6480
    int ret = -1;
6481

6482 6483 6484 6485 6486 6487 6488
    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);
6489 6490 6491
        goto cleanup;
    }

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

6495 6496 6497 6498 6499
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot attach device on inactive domain"));
        goto endjob;
    }
6500

6501 6502 6503 6504
    dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
                                  VIR_DOMAIN_XML_INACTIVE);
    if (dev == NULL)
        goto endjob;
6505

6506 6507 6508 6509
    if (qemuCapsExtractVersionInfo(vm->def->emulator,
                                   NULL,
                                   &qemuCmdFlags) < 0)
        goto endjob;
6510

6511 6512 6513 6514 6515 6516 6517 6518 6519 6520
    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,
                                _("Unable to find cgroup for %s\n"),
                                vm->def->name);
                goto endjob;
            }
            if (qemuSetupDiskCgroup(driver, cgroup, dev->data.disk) < 0)
                goto endjob;
6521 6522
        }

6523 6524 6525 6526 6527 6528 6529 6530 6531 6532
        switch (dev->data.disk->device) {
        case VIR_DOMAIN_DISK_DEVICE_CDROM:
        case VIR_DOMAIN_DISK_DEVICE_FLOPPY:
            ret = qemuDomainChangeEjectableMedia(driver, vm,
                                                 dev->data.disk,
                                                 qemuCmdFlags,
                                                 false);
            if (ret == 0)
                dev->data.disk = NULL;
            break;
6533

6534 6535 6536 6537 6538 6539 6540 6541 6542 6543 6544 6545 6546 6547 6548 6549 6550 6551 6552 6553 6554 6555 6556
        case VIR_DOMAIN_DISK_DEVICE_DISK:
            if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_USB) {
                ret = qemuDomainAttachUsbMassstorageDevice(driver, vm,
                                                           dev->data.disk, qemuCmdFlags);
                if (ret == 0)
                    dev->data.disk = NULL;
            } else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_VIRTIO) {
                ret = qemuDomainAttachPciDiskDevice(driver, vm,
                                                    dev->data.disk, qemuCmdFlags);
                if (ret == 0)
                    dev->data.disk = NULL;
            } else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_SCSI) {
                ret = qemuDomainAttachSCSIDisk(driver, vm,
                                               dev->data.disk, qemuCmdFlags);
                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;
6557

6558 6559 6560 6561 6562
        default:
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                            _("disk device type '%s' cannot be hotplugged"),
                            virDomainDiskDeviceTypeToString(dev->data.disk->device));
            /* Fallthrough */
6563
        }
6564 6565 6566 6567
        if (ret != 0 && cgroup) {
            if (qemuTeardownDiskCgroup(driver, cgroup, dev->data.disk) < 0)
                VIR_WARN("Failed to teardown cgroup for disk path %s",
                         NULLSTR(dev->data.disk->src));
6568
        }
6569 6570 6571 6572 6573 6574 6575 6576 6577 6578 6579
    } else if (dev->type == VIR_DOMAIN_DEVICE_CONTROLLER) {
        if (dev->data.controller->type == VIR_DOMAIN_CONTROLLER_TYPE_SCSI) {
            ret = qemuDomainAttachPciControllerDevice(driver, vm,
                                                      dev->data.controller, qemuCmdFlags);
            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 */
6580
        }
6581 6582 6583 6584 6585 6586 6587 6588 6589 6590
    } else if (dev->type == VIR_DOMAIN_DEVICE_NET) {
        ret = qemuDomainAttachNetDevice(dom->conn, driver, vm,
                                        dev->data.net, qemuCmdFlags);
        if (ret == 0)
            dev->data.net = NULL;
    } else if (dev->type == VIR_DOMAIN_DEVICE_HOSTDEV) {
        ret = qemuDomainAttachHostDevice(driver, vm,
                                         dev->data.hostdev, qemuCmdFlags);
        if (ret == 0)
            dev->data.hostdev = NULL;
6591
    } else {
6592 6593 6594 6595
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                        _("device type '%s' cannot be attached"),
                        virDomainDeviceTypeToString(dev->type));
        goto endjob;
6596 6597
    }

6598 6599 6600 6601 6602 6603 6604 6605 6606 6607 6608 6609 6610 6611 6612
    if (!ret && virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
        ret = -1;

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

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

    virDomainDeviceDefFree(dev);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
6613 6614 6615
    return ret;
}

6616 6617 6618 6619 6620 6621 6622 6623
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;
    }
6624

6625 6626
    return qemudDomainAttachDevice(dom, xml);
}
6627

6628

6629 6630 6631 6632 6633 6634 6635 6636 6637 6638 6639
static int qemuDomainUpdateDeviceFlags(virDomainPtr dom,
                                       const char *xml,
                                       unsigned int flags)
{
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    virDomainDeviceDefPtr dev = NULL;
    unsigned long long qemuCmdFlags;
    virCgroupPtr cgroup = NULL;
    int ret = -1;
    bool force = (flags & VIR_DOMAIN_DEVICE_MODIFY_FORCE) != 0;
6640

6641 6642 6643 6644
    virCheckFlags(VIR_DOMAIN_DEVICE_MODIFY_CURRENT |
                  VIR_DOMAIN_DEVICE_MODIFY_LIVE |
                  VIR_DOMAIN_DEVICE_MODIFY_CONFIG |
                  VIR_DOMAIN_DEVICE_MODIFY_FORCE, -1);
6645

6646 6647 6648
    if (flags & VIR_DOMAIN_DEVICE_MODIFY_CONFIG) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot modify the persistent configuration of a domain"));
6649 6650 6651
        return -1;
    }

6652 6653 6654 6655 6656 6657 6658 6659
    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;
6660 6661
    }

6662 6663 6664 6665 6666 6667 6668
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;

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

6671 6672 6673 6674 6675 6676 6677 6678 6679
    dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
                                  VIR_DOMAIN_XML_INACTIVE);
    if (dev == NULL)
        goto endjob;

    if (qemuCapsExtractVersionInfo(vm->def->emulator,
                                   NULL,
                                   &qemuCmdFlags) < 0)
        goto endjob;
6680

6681 6682 6683 6684 6685 6686 6687 6688 6689 6690 6691
    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,
                                _("Unable to find cgroup for %s\n"),
                                vm->def->name);
                goto endjob;
            }
            if (qemuSetupDiskCgroup(driver, cgroup, dev->data.disk) < 0)
                goto endjob;
6692 6693
        }

6694 6695 6696 6697 6698 6699 6700 6701 6702 6703
        switch (dev->data.disk->device) {
        case VIR_DOMAIN_DISK_DEVICE_CDROM:
        case VIR_DOMAIN_DISK_DEVICE_FLOPPY:
            ret = qemuDomainChangeEjectableMedia(driver, vm,
                                                 dev->data.disk,
                                                 qemuCmdFlags,
                                                 force);
            if (ret == 0)
                dev->data.disk = NULL;
            break;
6704

6705

6706 6707 6708 6709 6710 6711
        default:
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                            _("disk bus '%s' cannot be updated."),
                            virDomainDiskBusTypeToString(dev->data.disk->bus));
            break;
        }
6712

6713 6714 6715 6716 6717
        if (ret != 0 && cgroup) {
            if (qemuTeardownDiskCgroup(driver, cgroup, dev->data.disk) < 0)
                VIR_WARN("Failed to teardown cgroup for disk path %s",
                         NULLSTR(dev->data.disk->src));
        }
6718
        break;
6719 6720 6721

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

6724
    default:
6725
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
6726 6727 6728
                        _("disk device type '%s' cannot be updated"),
                        virDomainDiskDeviceTypeToString(dev->data.disk->device));
        break;
6729 6730
    }

6731 6732 6733 6734 6735 6736 6737 6738 6739 6740
    if (!ret && virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
        ret = -1;

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

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

6742 6743 6744 6745
    virDomainDeviceDefFree(dev);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
6746 6747 6748
    return ret;
}

6749

6750 6751
static int qemudDomainDetachDevice(virDomainPtr dom,
                                   const char *xml) {
6752 6753
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
6754
    unsigned long long qemuCmdFlags;
6755 6756
    virDomainDeviceDefPtr dev = NULL;
    int ret = -1;
6757

6758
    qemuDriverLock(driver);
6759
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
6760
    if (!vm) {
6761 6762
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
6763 6764
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
6765
        goto cleanup;
6766 6767
    }

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

D
Daniel P. Berrange 已提交
6771
    if (!virDomainObjIsActive(vm)) {
6772 6773
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot detach device on inactive domain"));
6774
        goto endjob;
6775 6776
    }

6777
    dev = virDomainDeviceDefParse(driver->caps, vm->def, xml,
6778
                                  VIR_DOMAIN_XML_INACTIVE);
6779
    if (dev == NULL)
6780
        goto endjob;
6781

6782 6783 6784
    if (qemuCapsExtractVersionInfo(vm->def->emulator,
                                   NULL,
                                   &qemuCmdFlags) < 0)
6785
        goto endjob;
6786 6787

    if (dev->type == VIR_DOMAIN_DEVICE_DISK &&
6788 6789
        dev->data.disk->device == VIR_DOMAIN_DISK_DEVICE_DISK) {
        if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_VIRTIO) {
6790
            ret = qemuDomainDetachPciDiskDevice(driver, vm, dev, qemuCmdFlags);
6791 6792
        }
        else if (dev->data.disk->bus == VIR_DOMAIN_DISK_BUS_SCSI) {
6793 6794
            ret = qemuDomainDetachSCSIDiskDevice(driver, vm, dev,
                                                 qemuCmdFlags);
6795 6796
        }
        else {
6797
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
6798 6799
                            _("This type of disk cannot be hot unplugged"));
        }
6800
    } else if (dev->type == VIR_DOMAIN_DEVICE_NET) {
6801
        ret = qemuDomainDetachNetDevice(driver, vm, dev, qemuCmdFlags);
6802 6803
    } else if (dev->type == VIR_DOMAIN_DEVICE_CONTROLLER) {
        if (dev->data.controller->type == VIR_DOMAIN_CONTROLLER_TYPE_SCSI) {
6804 6805
            ret = qemuDomainDetachPciControllerDevice(driver, vm, dev,
                                                      qemuCmdFlags);
6806
        } else {
6807
            qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
6808 6809
                            _("disk controller bus '%s' cannot be hotunplugged."),
                            virDomainControllerTypeToString(dev->data.controller->type));
6810 6811
            /* fallthrough */
        }
6812
    } else if (dev->type == VIR_DOMAIN_DEVICE_HOSTDEV) {
6813
        ret = qemuDomainDetachHostDevice(driver, vm, dev, qemuCmdFlags);
6814
    } else {
6815
        qemuReportError(VIR_ERR_CONFIG_UNSUPPORTED,
6816
                        "%s", _("This type of device cannot be hot unplugged"));
6817
    }
6818

6819
    if (!ret && virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0)
6820 6821
        ret = -1;

6822
endjob:
6823 6824
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
6825

6826 6827
cleanup:
    virDomainDeviceDefFree(dev);
6828 6829
    if (vm)
        virDomainObjUnlock(vm);
6830
    qemuDriverUnlock(driver);
6831 6832 6833
    return ret;
}

6834 6835 6836 6837
static int qemudDomainDetachDeviceFlags(virDomainPtr dom,
                                        const char *xml,
                                        unsigned int flags) {
    if (flags & VIR_DOMAIN_DEVICE_MODIFY_CONFIG) {
6838 6839
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("cannot modify the persistent configuration of a domain"));
6840 6841 6842 6843 6844 6845
        return -1;
    }

    return qemudDomainDetachDevice(dom, xml);
}

6846
static int qemudDomainGetAutostart(virDomainPtr dom,
6847
                                   int *autostart) {
6848 6849 6850
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;
6851

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

6856
    if (!vm) {
6857 6858
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
6859 6860
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
6861
        goto cleanup;
6862 6863 6864
    }

    *autostart = vm->autostart;
6865
    ret = 0;
6866

6867
cleanup:
6868 6869
    if (vm)
        virDomainObjUnlock(vm);
6870
    return ret;
6871 6872
}

6873
static int qemudDomainSetAutostart(virDomainPtr dom,
6874
                                   int autostart) {
6875 6876
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
6877 6878
    char *configFile = NULL, *autostartLink = NULL;
    int ret = -1;
6879

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

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

6891
    if (!vm->persistent) {
6892
        qemuReportError(VIR_ERR_OPERATION_INVALID,
6893
                        "%s", _("cannot set autostart for transient domain"));
6894
        goto cleanup;
6895 6896
    }

6897 6898
    autostart = (autostart != 0);

6899
    if (vm->autostart != autostart) {
6900
        if ((configFile = virDomainConfigFile(driver->configDir, vm->def->name)) == NULL)
6901
            goto cleanup;
6902
        if ((autostartLink = virDomainConfigFile(driver->autostartDir, vm->def->name)) == NULL)
6903
            goto cleanup;
6904

6905 6906
        if (autostart) {
            int err;
6907

6908
            if ((err = virFileMakePath(driver->autostartDir))) {
6909
                virReportSystemError(err,
6910 6911
                                     _("cannot create autostart directory %s"),
                                     driver->autostartDir);
6912 6913
                goto cleanup;
            }
6914

6915
            if (symlink(configFile, autostartLink) < 0) {
6916
                virReportSystemError(errno,
6917 6918
                                     _("Failed to create symlink '%s to '%s'"),
                                     autostartLink, configFile);
6919 6920 6921 6922
                goto cleanup;
            }
        } else {
            if (unlink(autostartLink) < 0 && errno != ENOENT && errno != ENOTDIR) {
6923
                virReportSystemError(errno,
6924 6925
                                     _("Failed to delete symlink '%s'"),
                                     autostartLink);
6926 6927
                goto cleanup;
            }
6928 6929
        }

6930
        vm->autostart = autostart;
6931
    }
6932
    ret = 0;
6933

6934 6935 6936
cleanup:
    VIR_FREE(configFile);
    VIR_FREE(autostartLink);
6937 6938
    if (vm)
        virDomainObjUnlock(vm);
6939
    qemuDriverUnlock(driver);
6940
    return ret;
6941 6942
}

6943 6944 6945 6946 6947

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

6950
    qemuDriverLock(driver);
6951
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
6952 6953
        qemuReportError(VIR_ERR_NO_SUPPORT,
                        __FUNCTION__);
6954
        goto cleanup;
6955 6956 6957 6958 6959 6960 6961
    }

    if (nparams)
        *nparams = 1;

    ret = strdup("posix");
    if (!ret)
6962
        virReportOOMError();
6963 6964 6965

cleanup:
    qemuDriverUnlock(driver);
6966 6967 6968
    return ret;
}

6969 6970 6971 6972 6973 6974 6975 6976 6977 6978 6979 6980 6981 6982 6983 6984 6985 6986 6987 6988 6989 6990 6991 6992 6993 6994 6995 6996 6997 6998 6999 7000 7001 7002 7003 7004 7005 7006 7007 7008 7009 7010 7011 7012 7013 7014 7015 7016 7017 7018 7019 7020 7021 7022 7023 7024 7025 7026 7027 7028 7029 7030 7031 7032 7033 7034 7035

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)) {
        qemuReportError(VIR_ERR_NO_SUPPORT,
                        __FUNCTION__);
        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;
            }
7036
        } else if (STREQ(param->field, VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT)) {
7037 7038 7039 7040 7041 7042 7043 7044 7045 7046 7047 7048 7049 7050 7051 7052 7053 7054 7055 7056 7057 7058 7059 7060 7061 7062 7063 7064 7065 7066 7067 7068 7069
            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;
}

7070 7071 7072 7073 7074 7075 7076 7077 7078
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;
7079
    unsigned long long val;
7080 7081 7082 7083 7084 7085 7086 7087 7088 7089 7090 7091 7092 7093 7094 7095 7096 7097 7098 7099 7100 7101 7102 7103 7104 7105 7106 7107 7108 7109 7110 7111 7112 7113 7114 7115 7116 7117 7118 7119 7120 7121 7122 7123 7124 7125 7126 7127 7128 7129
    int ret = -1;
    int rc;

    qemuDriverLock(driver);

    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_MEMORY)) {
        qemuReportError(VIR_ERR_NO_SUPPORT,
                        __FUNCTION__);
        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"));
7130
                goto cleanup;
7131 7132 7133 7134
            }
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_HARD_LIMIT) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field memory hard limit too long for destination"));
7135
                goto cleanup;
7136 7137 7138 7139 7140 7141 7142 7143 7144
            }
            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"));
7145
                goto cleanup;
7146 7147 7148 7149
            }
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SOFT_LIMIT) == NULL) {
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field memory soft limit too long for destination"));
7150
                goto cleanup;
7151 7152 7153 7154 7155 7156 7157 7158 7159
            }
            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"));
7160
                goto cleanup;
7161
            }
7162
            if (virStrcpyStatic(param->field, VIR_DOMAIN_MEMORY_SWAP_HARD_LIMIT) == NULL) {
7163 7164
                qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                "%s", _("Field swap hard limit too long for destination"));
7165
                goto cleanup;
7166 7167 7168 7169 7170 7171 7172 7173 7174 7175
            }
            param->value.ul = val;
            break;

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

7176 7177
    ret = 0;

7178 7179 7180 7181 7182 7183 7184 7185 7186
cleanup:
    if (group)
        virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}

7187 7188 7189 7190 7191 7192 7193 7194 7195 7196
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;

7197
    qemuDriverLock(driver);
7198
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
7199 7200
        qemuReportError(VIR_ERR_NO_SUPPORT,
                        __FUNCTION__);
7201
        goto cleanup;
7202 7203 7204 7205 7206
    }

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

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

    if (virCgroupForDomain(driver->cgroup, vm->def->name, &group, 0) != 0) {
7213 7214
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("cannot find cgroup for domain %s"), vm->def->name);
7215 7216 7217 7218 7219 7220 7221 7222 7223
        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) {
7224 7225
                qemuReportError(VIR_ERR_INVALID_ARG, "%s",
                                _("invalid type for cpu_shares tunable, expected a 'ullong'"));
7226 7227 7228 7229 7230
                goto cleanup;
            }

            rc = virCgroupSetCpuShares(group, params[i].value.ul);
            if (rc != 0) {
7231
                virReportSystemError(-rc, "%s",
7232 7233 7234 7235
                                     _("unable to set cpu shares tunable"));
                goto cleanup;
            }
        } else {
7236 7237
            qemuReportError(VIR_ERR_INVALID_ARG,
                            _("Invalid parameter `%s'"), param->field);
7238 7239 7240 7241 7242 7243 7244 7245 7246
            goto cleanup;
        }
    }
    ret = 0;

cleanup:
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
7247
    qemuDriverUnlock(driver);
7248 7249 7250 7251 7252 7253 7254 7255 7256 7257 7258 7259 7260 7261
    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;

7262
    qemuDriverLock(driver);
7263
    if (!qemuCgroupControllerActive(driver, VIR_CGROUP_CONTROLLER_CPU)) {
7264 7265
        qemuReportError(VIR_ERR_NO_SUPPORT,
                        __FUNCTION__);
7266
        goto cleanup;
7267 7268 7269
    }

    if ((*nparams) != 1) {
7270 7271
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("Invalid parameter count"));
7272
        goto cleanup;
7273 7274 7275 7276 7277
    }

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

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

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

    rc = virCgroupGetCpuShares(group, &val);
    if (rc != 0) {
7291
        virReportSystemError(-rc, "%s",
7292 7293 7294 7295 7296
                             _("unable to get cpu shares tunable"));
        goto cleanup;
    }
    params[0].value.ul = val;
    params[0].type = VIR_DOMAIN_SCHED_FIELD_ULLONG;
C
Chris Lalancette 已提交
7297
    if (virStrcpyStatic(params[0].field, "cpu_shares") == NULL) {
7298 7299
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("Field cpu_shares too long for destination"));
C
Chris Lalancette 已提交
7300 7301
        goto cleanup;
    }
7302 7303 7304 7305 7306 7307 7308

    ret = 0;

cleanup:
    virCgroupFree(&group);
    if (vm)
        virDomainObjUnlock(vm);
7309
    qemuDriverUnlock(driver);
7310 7311 7312 7313
    return ret;
}


7314 7315 7316 7317 7318 7319 7320 7321 7322
/* 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)
{
7323
    struct qemud_driver *driver = dom->conn->privateData;
7324
    int i, ret = -1;
7325
    virDomainObjPtr vm;
7326
    virDomainDiskDefPtr disk = NULL;
7327

7328
    qemuDriverLock(driver);
7329
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
7330
    qemuDriverUnlock(driver);
7331
    if (!vm) {
7332 7333
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
7334 7335
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
7336
        goto cleanup;
7337
    }
7338 7339 7340 7341

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

D
Daniel P. Berrange 已提交
7342
    if (!virDomainObjIsActive (vm)) {
7343 7344
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
7345
        goto endjob;
7346 7347
    }

7348 7349 7350 7351 7352 7353 7354 7355
    for (i = 0 ; i < vm->def->ndisks ; i++) {
        if (STREQ(path, vm->def->disks[i]->dst)) {
            disk = vm->def->disks[i];
            break;
        }
    }

    if (!disk) {
7356 7357
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path: %s"), path);
7358
        goto endjob;
7359 7360
    }

7361
    if (!disk->info.alias) {
7362 7363
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("missing disk device alias name for %s"), disk->dst);
7364
        goto endjob;
7365
    }
7366

7367
    qemuDomainObjPrivatePtr priv = vm->privateData;
7368 7369
    qemuDomainObjEnterMonitor(vm);
    ret = qemuMonitorGetBlockStatsInfo(priv->mon,
7370
                                       disk->info.alias,
7371 7372 7373 7374 7375 7376
                                       &stats->rd_req,
                                       &stats->rd_bytes,
                                       &stats->wr_req,
                                       &stats->wr_bytes,
                                       &stats->errs);
    qemuDomainObjExitMonitor(vm);
7377

7378
endjob:
7379 7380
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
7381

7382
cleanup:
7383 7384
    if (vm)
        virDomainObjUnlock(vm);
7385
    return ret;
7386 7387
}

7388
#ifdef __linux__
7389 7390 7391 7392 7393
static int
qemudDomainInterfaceStats (virDomainPtr dom,
                           const char *path,
                           struct _virDomainInterfaceStats *stats)
{
7394 7395
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
7396
    int i;
7397
    int ret = -1;
7398

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

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

D
Daniel P. Berrange 已提交
7411
    if (!virDomainObjIsActive(vm)) {
7412 7413
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
7414
        goto cleanup;
7415 7416 7417
    }

    /* Check the path is one of the domain's network interfaces. */
7418 7419
    for (i = 0 ; i < vm->def->nnets ; i++) {
        if (vm->def->nets[i]->ifname &&
7420 7421 7422 7423
            STREQ (vm->def->nets[i]->ifname, path)) {
            ret = 0;
            break;
        }
7424 7425
    }

7426
    if (ret == 0)
7427
        ret = linuxDomainInterfaceStats(path, stats);
7428
    else
7429 7430
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("invalid path, '%s' is not a known interface"), path);
7431

7432
cleanup:
7433 7434
    if (vm)
        virDomainObjUnlock(vm);
7435 7436
    return ret;
}
7437
#else
7438 7439 7440 7441
static int
qemudDomainInterfaceStats (virDomainPtr dom,
                           const char *path ATTRIBUTE_UNUSED,
                           struct _virDomainInterfaceStats *stats ATTRIBUTE_UNUSED)
7442 7443
    qemuReportError(VIR_ERR_NO_SUPPORT,
                    "%s", __FUNCTION__);
7444 7445
    return -1;
}
7446
#endif
7447

7448 7449 7450 7451 7452 7453 7454 7455 7456 7457 7458 7459 7460 7461 7462 7463
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);
7464 7465
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
7466 7467 7468
        goto cleanup;
    }

7469 7470 7471
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

7472 7473 7474
    if (virDomainObjIsActive(vm)) {
        qemuDomainObjPrivatePtr priv = vm->privateData;
        qemuDomainObjEnterMonitor(vm);
7475
        ret = qemuMonitorGetMemoryStats(priv->mon, stats, nr_stats);
7476 7477
        qemuDomainObjExitMonitor(vm);
    } else {
7478 7479
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
7480 7481
    }

7482 7483 7484
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

7485 7486 7487 7488 7489 7490
cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}

7491 7492 7493 7494 7495 7496 7497
static int
qemudDomainBlockPeek (virDomainPtr dom,
                      const char *path,
                      unsigned long long offset, size_t size,
                      void *buffer,
                      unsigned int flags ATTRIBUTE_UNUSED)
{
7498 7499 7500
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
    int fd = -1, ret = -1, i;
7501

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

7506
    if (!vm) {
7507 7508
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
7509 7510
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
7511
        goto cleanup;
7512 7513 7514
    }

    if (!path || path[0] == '\0') {
7515 7516
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("NULL or empty path"));
7517
        goto cleanup;
7518 7519 7520
    }

    /* Check the path belongs to this domain. */
7521 7522
    for (i = 0 ; i < vm->def->ndisks ; i++) {
        if (vm->def->disks[i]->src != NULL &&
7523 7524 7525 7526
            STREQ (vm->def->disks[i]->src, path)) {
            ret = 0;
            break;
        }
7527 7528
    }

7529 7530 7531 7532 7533
    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) {
7534 7535
            virReportSystemError(errno,
                                 _("%s: failed to open"), path);
7536 7537
            goto cleanup;
        }
7538

7539 7540 7541 7542 7543 7544
        /* 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) {
7545 7546
            virReportSystemError(errno,
                                 _("%s: failed to seek or read"), path);
7547 7548 7549 7550 7551
            goto cleanup;
        }

        ret = 0;
    } else {
7552 7553
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("invalid path"));
7554 7555
    }

7556
cleanup:
7557
    VIR_FORCE_CLOSE(fd);
7558 7559
    if (vm)
        virDomainObjUnlock(vm);
7560 7561 7562
    return ret;
}

R
Richard W.M. Jones 已提交
7563 7564 7565 7566 7567 7568
static int
qemudDomainMemoryPeek (virDomainPtr dom,
                       unsigned long long offset, size_t size,
                       void *buffer,
                       unsigned int flags)
{
7569 7570
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
7571
    char *tmp = NULL;
R
Richard W.M. Jones 已提交
7572 7573
    int fd = -1, ret = -1;

7574
    qemuDriverLock(driver);
7575
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
7576
    qemuDriverUnlock(driver);
R
Richard W.M. Jones 已提交
7577 7578

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

7586
    if (flags != VIR_MEMORY_VIRTUAL && flags != VIR_MEMORY_PHYSICAL) {
7587 7588
        qemuReportError(VIR_ERR_INVALID_ARG,
                        "%s", _("flags parameter must be VIR_MEMORY_VIRTUAL or VIR_MEMORY_PHYSICAL"));
7589
        goto cleanup;
R
Richard W.M. Jones 已提交
7590 7591
    }

7592 7593 7594
    if (qemuDomainObjBeginJob(vm) < 0)
        goto cleanup;

D
Daniel P. Berrange 已提交
7595
    if (!virDomainObjIsActive(vm)) {
7596 7597
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
7598
        goto endjob;
R
Richard W.M. Jones 已提交
7599 7600
    }

7601
    if (virAsprintf(&tmp, "%s/qemu.mem.XXXXXX", driver->cacheDir) < 0) {
7602
        virReportOOMError();
7603
        goto endjob;
7604 7605
    }

R
Richard W.M. Jones 已提交
7606 7607
    /* Create a temporary filename. */
    if ((fd = mkstemp (tmp)) == -1) {
7608 7609
        virReportSystemError(errno,
                             _("mkstemp(\"%s\") failed"), tmp);
7610
        goto endjob;
R
Richard W.M. Jones 已提交
7611 7612
    }

7613
    qemuDomainObjPrivatePtr priv = vm->privateData;
7614
    qemuDomainObjEnterMonitor(vm);
7615
    if (flags == VIR_MEMORY_VIRTUAL) {
7616 7617
        if (qemuMonitorSaveVirtualMemory(priv->mon, offset, size, tmp) < 0) {
            qemuDomainObjExitMonitor(vm);
7618
            goto endjob;
7619
        }
7620
    } else {
7621 7622
        if (qemuMonitorSavePhysicalMemory(priv->mon, offset, size, tmp) < 0) {
            qemuDomainObjExitMonitor(vm);
7623
            goto endjob;
7624
        }
R
Richard W.M. Jones 已提交
7625
    }
7626
    qemuDomainObjExitMonitor(vm);
R
Richard W.M. Jones 已提交
7627 7628 7629

    /* Read the memory file into buffer. */
    if (saferead (fd, buffer, size) == (ssize_t) -1) {
7630 7631 7632
        virReportSystemError(errno,
                             _("failed to read temporary file "
                               "created with template %s"), tmp);
7633
        goto endjob;
R
Richard W.M. Jones 已提交
7634 7635 7636
    }

    ret = 0;
7637

7638
endjob:
7639 7640
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
7641

7642
cleanup:
7643
    VIR_FREE(tmp);
7644
    VIR_FORCE_CLOSE(fd);
R
Richard W.M. Jones 已提交
7645
    unlink (tmp);
7646 7647
    if (vm)
        virDomainObjUnlock(vm);
R
Richard W.M. Jones 已提交
7648 7649 7650
    return ret;
}

7651

7652 7653 7654 7655 7656 7657 7658 7659 7660 7661
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;
7662
    virDomainDiskDefPtr disk = NULL;
7663 7664
    struct stat sb;
    int i;
7665
    int format;
7666 7667 7668 7669 7670 7671 7672 7673 7674 7675 7676 7677 7678 7679 7680 7681 7682 7683 7684 7685 7686 7687 7688 7689

    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)) {
7690
            disk = vm->def->disks[i];
7691 7692 7693 7694
            break;
        }
    }

7695
    if (!disk) {
7696 7697 7698 7699 7700 7701 7702 7703 7704 7705 7706 7707 7708 7709
        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 */
7710 7711 7712 7713 7714 7715 7716 7717
    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 {
7718 7719 7720 7721 7722 7723 7724
        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);
7725
            goto cleanup;
7726
        }
7727 7728 7729 7730 7731
    }

    if (virStorageFileGetMetadataFromFD(path, fd,
                                        format,
                                        &meta) < 0)
7732 7733 7734 7735 7736 7737 7738 7739 7740 7741
        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)) {
7742
#ifndef WIN32
7743 7744 7745 7746 7747 7748 7749 7750 7751 7752 7753 7754 7755 7756 7757 7758 7759 7760 7761 7762 7763 7764 7765 7766 7767 7768 7769 7770
        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;

7771
    /* Set default value .. */
7772 7773
    info->allocation = info->physical;

7774 7775 7776
    /* ..but if guest is running & not using raw
       disk format and on a block device, then query
       highest allocated extent from QEMU */
7777
    if (disk->type == VIR_DOMAIN_DISK_TYPE_BLOCK &&
7778
        format != VIR_STORAGE_FILE_RAW &&
7779 7780 7781 7782
        S_ISBLK(sb.st_mode)) {
        qemuDomainObjPrivatePtr priv = vm->privateData;
        if (qemuDomainObjBeginJob(vm) < 0)
            goto cleanup;
7783 7784 7785 7786 7787 7788 7789 7790 7791
        if (!virDomainObjIsActive(vm))
            ret = 0;
        else {
            qemuDomainObjEnterMonitor(vm);
            ret = qemuMonitorGetBlockExtent(priv->mon,
                                            disk->info.alias,
                                            &info->allocation);
            qemuDomainObjExitMonitor(vm);
        }
7792 7793 7794 7795 7796 7797

        if (qemuDomainObjEndJob(vm) == 0)
            vm = NULL;
    } else {
        ret = 0;
    }
7798 7799

cleanup:
7800
    VIR_FORCE_CLOSE(fd);
7801 7802 7803 7804 7805 7806
    if (vm)
        virDomainObjUnlock(vm);
    return ret;
}


7807
static int
7808 7809 7810 7811
qemuDomainEventRegister(virConnectPtr conn,
                        virConnectDomainEventCallback callback,
                        void *opaque,
                        virFreeCallback freecb)
7812
{
7813 7814 7815
    struct qemud_driver *driver = conn->privateData;
    int ret;

7816
    qemuDriverLock(driver);
7817 7818
    ret = virDomainEventCallbackListAdd(conn, driver->domainEventCallbacks,
                                        callback, opaque, freecb);
7819
    qemuDriverUnlock(driver);
7820

7821
    return ret;
7822 7823
}

7824

7825
static int
7826 7827
qemuDomainEventDeregister(virConnectPtr conn,
                          virConnectDomainEventCallback callback)
7828
{
7829 7830 7831
    struct qemud_driver *driver = conn->privateData;
    int ret;

7832
    qemuDriverLock(driver);
7833 7834 7835 7836 7837 7838
    if (driver->domainEventDispatching)
        ret = virDomainEventCallbackListMarkDelete(conn, driver->domainEventCallbacks,
                                                   callback);
    else
        ret = virDomainEventCallbackListRemove(conn, driver->domainEventCallbacks,
                                               callback);
7839
    qemuDriverUnlock(driver);
7840

7841
    return ret;
7842 7843
}

7844 7845 7846 7847 7848 7849 7850 7851 7852 7853 7854 7855 7856 7857 7858 7859 7860 7861 7862 7863 7864 7865 7866 7867 7868 7869 7870 7871 7872 7873 7874 7875 7876 7877 7878 7879 7880 7881 7882 7883 7884 7885 7886

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


7887 7888
static void qemuDomainEventDispatchFunc(virConnectPtr conn,
                                        virDomainEventPtr event,
7889
                                        virConnectDomainEventGenericCallback cb,
7890 7891
                                        void *cbopaque,
                                        void *opaque)
7892
{
7893
    struct qemud_driver *driver = opaque;
7894

7895 7896 7897 7898 7899 7900 7901 7902 7903 7904 7905 7906 7907 7908 7909 7910 7911 7912 7913 7914 7915 7916 7917 7918 7919 7920 7921 7922 7923 7924 7925 7926 7927 7928 7929 7930 7931 7932 7933 7934 7935 7936 7937 7938
    /* Drop the lock whle dispatching, for sake of re-entrancy */
    qemuDriverUnlock(driver);
    virDomainEventDispatchDefaultFunc(conn, event, cb, cbopaque, NULL);
    qemuDriverLock(driver);
}

static void qemuDomainEventFlush(int timer ATTRIBUTE_UNUSED, void *opaque)
{
    struct qemud_driver *driver = opaque;
    virDomainEventQueue tempQueue;

    qemuDriverLock(driver);

    driver->domainEventDispatching = 1;

    /* Copy the queue, so we're reentrant safe */
    tempQueue.count = driver->domainEventQueue->count;
    tempQueue.events = driver->domainEventQueue->events;
    driver->domainEventQueue->count = 0;
    driver->domainEventQueue->events = NULL;

    virEventUpdateTimeout(driver->domainEventTimer, -1);
    virDomainEventQueueDispatch(&tempQueue,
                                driver->domainEventCallbacks,
                                qemuDomainEventDispatchFunc,
                                driver);

    /* Purge any deleted callbacks */
    virDomainEventCallbackListPurgeMarked(driver->domainEventCallbacks);

    driver->domainEventDispatching = 0;
    qemuDriverUnlock(driver);
}


/* driver must be locked before calling */
static void qemuDomainEventQueue(struct qemud_driver *driver,
                                 virDomainEventPtr event)
{
    if (virDomainEventQueuePush(driver->domainEventQueue,
                                event) < 0)
        virDomainEventFree(event);
    if (qemu_driver->domainEventQueue->count == 1)
        virEventUpdateTimeout(driver->domainEventTimer, 0);
7939 7940
}

D
Daniel Veillard 已提交
7941 7942
/* Migration support. */

7943 7944 7945 7946 7947
static bool ATTRIBUTE_NONNULL(1)
qemuDomainIsMigratable(virDomainDefPtr def)
{
    if (def->nhostdevs > 0) {
        qemuReportError(VIR_ERR_OPERATION_INVALID,
7948
            "%s", _("Domain with assigned host devices cannot be migrated"));
7949 7950 7951 7952 7953 7954
        return false;
    }

    return true;
}

C
Chris Lalancette 已提交
7955 7956 7957 7958 7959 7960 7961 7962 7963 7964 7965 7966 7967 7968 7969 7970 7971 7972 7973 7974 7975
/* 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;
    virDomainDefPtr def = NULL;
    virDomainObjPtr vm = NULL;
    char *migrateFrom;
    virDomainEventPtr event = NULL;
    int ret = -1;
    int internalret;
    char *unixfile = NULL;
7976
    unsigned long long qemuCmdFlags;
7977 7978 7979 7980 7981 7982 7983 7984
    qemuDomainObjPrivatePtr priv = NULL;
    struct timeval now;

    if (gettimeofday(&now, NULL) < 0) {
        virReportSystemError(errno, "%s",
                             _("cannot get time of day"));
        return -1;
    }
C
Chris Lalancette 已提交
7985 7986 7987

    qemuDriverLock(driver);
    if (!dom_xml) {
7988 7989
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("no domain XML passed"));
C
Chris Lalancette 已提交
7990 7991 7992
        goto cleanup;
    }
    if (!(flags & VIR_MIGRATE_TUNNELLED)) {
7993
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
C
Chris Lalancette 已提交
7994 7995 7996 7997
                         "%s", _("PrepareTunnel called but no TUNNELLED flag set"));
        goto cleanup;
    }
    if (st == NULL) {
7998 7999
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("tunnelled migration requested but NULL stream passed"));
C
Chris Lalancette 已提交
8000 8001 8002 8003
        goto cleanup;
    }

    /* Parse the domain XML. */
8004
    if (!(def = virDomainDefParseString(driver->caps, dom_xml,
C
Chris Lalancette 已提交
8005
                                        VIR_DOMAIN_XML_INACTIVE))) {
8006 8007
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to parse XML"));
C
Chris Lalancette 已提交
8008 8009 8010
        goto cleanup;
    }

8011 8012 8013
    if (!qemuDomainIsMigratable(def))
        goto cleanup;

C
Chris Lalancette 已提交
8014
    /* Target domain name, maybe renamed. */
8015 8016 8017 8018 8019 8020
    if (dname) {
        VIR_FREE(def->name);
        def->name = strdup(dname);
        if (def->name == NULL)
            goto cleanup;
    }
C
Chris Lalancette 已提交
8021

8022 8023
    if (virDomainObjIsDuplicate(&driver->domains, def, 1) < 0)
        goto cleanup;
C
Chris Lalancette 已提交
8024

8025
    if (!(vm = virDomainAssignDef(driver->caps,
C
Chris Lalancette 已提交
8026
                                  &driver->domains,
8027
                                  def, true))) {
8028
        /* virDomainAssignDef already set the error */
C
Chris Lalancette 已提交
8029 8030 8031
        goto cleanup;
    }
    def = NULL;
8032
    priv = vm->privateData;
C
Chris Lalancette 已提交
8033

8034 8035
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;
8036
    priv->jobActive = QEMU_JOB_MIGRATION_OUT;
8037

C
Chris Lalancette 已提交
8038 8039 8040 8041
    /* Domain starts inactive, even if the domain XML had an id field. */
    vm->def->id = -1;

    if (virAsprintf(&unixfile, "%s/qemu.tunnelmigrate.dest.%s",
8042
                    driver->libDir, vm->def->name) < 0) {
8043
        virReportOOMError();
8044
        goto endjob;
C
Chris Lalancette 已提交
8045 8046 8047 8048
    }
    unlink(unixfile);

    /* check that this qemu version supports the interactive exec */
8049
    if (qemuCapsExtractVersionInfo(vm->def->emulator, NULL, &qemuCmdFlags) < 0) {
8050 8051 8052
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("Cannot determine QEMU argv syntax %s"),
                        vm->def->emulator);
8053
        goto endjob;
C
Chris Lalancette 已提交
8054 8055 8056 8057 8058 8059
    }
    if (qemuCmdFlags & QEMUD_CMD_FLAG_MIGRATE_QEMU_UNIX)
        internalret = virAsprintf(&migrateFrom, "unix:%s", unixfile);
    else if (qemuCmdFlags & QEMUD_CMD_FLAG_MIGRATE_QEMU_EXEC)
        internalret = virAsprintf(&migrateFrom, "exec:nc -U -l %s", unixfile);
    else {
8060 8061
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("Destination qemu is too old to support tunnelled migration"));
8062
        goto endjob;
C
Chris Lalancette 已提交
8063 8064
    }
    if (internalret < 0) {
8065
        virReportOOMError();
8066
        goto endjob;
C
Chris Lalancette 已提交
8067 8068 8069 8070
    }
    /* Start the QEMU daemon, with the same command-line arguments plus
     * -incoming unix:/path/to/file or exec:nc -U /path/to/file
     */
8071
    internalret = qemudStartVMDaemon(dconn, driver, vm, migrateFrom, true,
8072
                                     -1, NULL, VIR_VM_OP_MIGRATE_IN_START);
C
Chris Lalancette 已提交
8073 8074
    VIR_FREE(migrateFrom);
    if (internalret < 0) {
8075
        qemuDomainStartAudit(vm, "migrated", false);
C
Chris Lalancette 已提交
8076 8077 8078 8079 8080 8081 8082
        /* Note that we don't set an error here because qemudStartVMDaemon
         * should have already done that.
         */
        if (!vm->persistent) {
            virDomainRemoveInactive(&driver->domains, vm);
            vm = NULL;
        }
8083
        goto endjob;
C
Chris Lalancette 已提交
8084 8085
    }

8086 8087 8088
    if (virFDStreamConnectUNIX(st,
                               unixfile,
                               false) < 0) {
8089
        qemuDomainStartAudit(vm, "migrated", false);
8090
        qemudShutdownVMDaemon(driver, vm, 0);
8091
        if (!vm->persistent) {
8092 8093
            if (qemuDomainObjEndJob(vm) > 0)
                virDomainRemoveInactive(&driver->domains, vm);
8094 8095
            vm = NULL;
        }
8096
        virReportSystemError(errno,
C
Chris Lalancette 已提交
8097 8098
                             _("cannot open unix socket '%s' for tunnelled migration"),
                             unixfile);
8099
        goto endjob;
C
Chris Lalancette 已提交
8100 8101
    }

8102
    qemuDomainStartAudit(vm, "migrated", true);
8103

C
Chris Lalancette 已提交
8104 8105 8106 8107 8108
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_MIGRATED);
    ret = 0;

8109
endjob:
8110 8111 8112
    if (vm &&
        qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
8113

8114 8115 8116 8117 8118 8119 8120 8121 8122
    /* We set a fake job active which is held across
     * API calls until the finish() call. This prevents
     * any other APIs being invoked while incoming
     * migration is taking place
     */
    if (vm &&
        virDomainObjIsActive(vm)) {
        priv->jobActive = QEMU_JOB_MIGRATION_IN;
        priv->jobInfo.type = VIR_DOMAIN_JOB_UNBOUNDED;
8123
        priv->jobStart = timeval_to_ms(now);
8124 8125
    }

C
Chris Lalancette 已提交
8126 8127
cleanup:
    virDomainDefFree(def);
8128 8129
    if (unixfile)
        unlink(unixfile);
C
Chris Lalancette 已提交
8130 8131 8132 8133 8134 8135 8136 8137 8138
    VIR_FREE(unixfile);
    if (vm)
        virDomainObjUnlock(vm);
    if (event)
        qemuDomainEventQueue(driver, event);
    qemuDriverUnlock(driver);
    return ret;
}

D
Daniel Veillard 已提交
8139 8140 8141 8142
/* Prepare is the first step, and it runs on the destination host.
 *
 * This starts an empty VM listening on a TCP port.
 */
8143
static int ATTRIBUTE_NONNULL (5)
D
Daniel Veillard 已提交
8144 8145 8146 8147 8148
qemudDomainMigratePrepare2 (virConnectPtr dconn,
                            char **cookie ATTRIBUTE_UNUSED,
                            int *cookielen ATTRIBUTE_UNUSED,
                            const char *uri_in,
                            char **uri_out,
C
Chris Lalancette 已提交
8149
                            unsigned long flags,
D
Daniel Veillard 已提交
8150 8151 8152 8153 8154
                            const char *dname,
                            unsigned long resource ATTRIBUTE_UNUSED,
                            const char *dom_xml)
{
    static int port = 0;
8155 8156
    struct qemud_driver *driver = dconn->privateData;
    virDomainDefPtr def = NULL;
D
Daniel Veillard 已提交
8157 8158
    virDomainObjPtr vm = NULL;
    int this_port;
C
Chris Lalancette 已提交
8159
    char *hostname = NULL;
D
Daniel Veillard 已提交
8160 8161
    char migrateFrom [64];
    const char *p;
8162
    virDomainEventPtr event = NULL;
8163
    int ret = -1;
8164
    int internalret;
8165 8166 8167 8168 8169 8170 8171 8172
    qemuDomainObjPrivatePtr priv = NULL;
    struct timeval now;

    if (gettimeofday(&now, NULL) < 0) {
        virReportSystemError(errno, "%s",
                             _("cannot get time of day"));
        return -1;
    }
8173

C
Chris Lalancette 已提交
8174 8175 8176 8177 8178 8179 8180 8181 8182
    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);

8183
    *uri_out = NULL;
D
Daniel Veillard 已提交
8184

8185
    qemuDriverLock(driver);
C
Chris Lalancette 已提交
8186 8187 8188 8189
    if (flags & VIR_MIGRATE_TUNNELLED) {
        /* this is a logical error; we never should have gotten here with
         * VIR_MIGRATE_TUNNELLED set
         */
8190 8191
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("Tunnelled migration requested but invalid RPC method called"));
C
Chris Lalancette 已提交
8192 8193 8194
        goto cleanup;
    }

D
Daniel Veillard 已提交
8195
    if (!dom_xml) {
8196 8197
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        "%s", _("no domain XML passed"));
8198
        goto cleanup;
D
Daniel Veillard 已提交
8199 8200 8201 8202 8203 8204 8205 8206 8207 8208 8209 8210 8211 8212 8213 8214 8215
    }

    /* The URI passed in may be NULL or a string "tcp://somehostname:port".
     *
     * If the URI passed in is NULL then we allocate a port number
     * from our pool of port numbers and return a URI of
     * "tcp://ourhostname:port".
     *
     * If the URI passed in is not NULL then we try to parse out the
     * port number and use that (note that the hostname is assumed
     * to be a correct hostname which refers to the target machine).
     */
    if (uri_in == NULL) {
        this_port = QEMUD_MIGRATION_FIRST_PORT + port++;
        if (port == QEMUD_MIGRATION_NUM_PORTS) port = 0;

        /* Get hostname */
C
Chris Lalancette 已提交
8216
        if ((hostname = virGetHostname(NULL)) == NULL)
8217
            goto cleanup;
D
Daniel Veillard 已提交
8218

C
Chris Lalancette 已提交
8219 8220 8221 8222 8223 8224
        if (STRPREFIX(hostname, "localhost")) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("hostname on destination resolved to localhost, but migration requires an FQDN"));
            goto cleanup;
        }

8225 8226 8227 8228 8229
        /* XXX this really should have been a properly well-formed
         * URI, but we can't add in tcp:// now without breaking
         * compatability with old targets. We at least make the
         * new targets accept both syntaxes though.
         */
D
Daniel Veillard 已提交
8230
        /* Caller frees */
8231 8232
        internalret = virAsprintf(uri_out, "tcp:%s:%d", hostname, this_port);
        if (internalret < 0) {
8233
            virReportOOMError();
8234
            goto cleanup;
D
Daniel Veillard 已提交
8235 8236 8237 8238 8239 8240
        }
    } else {
        /* Check the URI starts with "tcp:".  We will escape the
         * URI when passing it to the qemu monitor, so bad
         * characters in hostname part don't matter.
         */
8241
        if (!STRPREFIX (uri_in, "tcp:")) {
8242 8243
            qemuReportError (VIR_ERR_INVALID_ARG,
                             "%s", _("only tcp URIs are supported for KVM/QEMU migrations"));
8244
            goto cleanup;
D
Daniel Veillard 已提交
8245 8246 8247 8248
        }

        /* Get the port number. */
        p = strrchr (uri_in, ':');
8249 8250 8251 8252 8253 8254 8255 8256
        if (p == strchr(uri_in, ':')) {
            /* Generate a port */
            this_port = QEMUD_MIGRATION_FIRST_PORT + port++;
            if (port == QEMUD_MIGRATION_NUM_PORTS)
                port = 0;

            /* Caller frees */
            if (virAsprintf(uri_out, "%s:%d", uri_in, this_port) < 0) {
8257
                virReportOOMError();
8258 8259 8260 8261 8262 8263 8264
                goto cleanup;
            }

        } else {
            p++; /* definitely has a ':' in it, see above */
            this_port = virParseNumber (&p);
            if (this_port == -1 || p-uri_in != strlen (uri_in)) {
8265 8266
                qemuReportError(VIR_ERR_INVALID_ARG,
                                "%s", _("URI ended with incorrect ':port'"));
8267 8268
                goto cleanup;
            }
D
Daniel Veillard 已提交
8269 8270 8271
        }
    }

8272
    if (*uri_out)
8273 8274
        VIR_DEBUG("Generated uri_out=%s", *uri_out);

D
Daniel Veillard 已提交
8275
    /* Parse the domain XML. */
8276
    if (!(def = virDomainDefParseString(driver->caps, dom_xml,
8277
                                        VIR_DOMAIN_XML_INACTIVE))) {
8278 8279
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to parse XML"));
8280
        goto cleanup;
D
Daniel Veillard 已提交
8281 8282
    }

8283 8284 8285
    if (!qemuDomainIsMigratable(def))
        goto cleanup;

D
Daniel Veillard 已提交
8286
    /* Target domain name, maybe renamed. */
8287 8288 8289 8290 8291 8292
    if (dname) {
        VIR_FREE(def->name);
        def->name = strdup(dname);
        if (def->name == NULL)
            goto cleanup;
    }
D
Daniel Veillard 已提交
8293

8294 8295
    if (virDomainObjIsDuplicate(&driver->domains, def, 1) < 0)
        goto cleanup;
D
Daniel Veillard 已提交
8296

8297
    if (!(vm = virDomainAssignDef(driver->caps,
D
Daniel Veillard 已提交
8298
                                  &driver->domains,
8299
                                  def, true))) {
8300
        /* virDomainAssignDef already set the error */
8301
        goto cleanup;
D
Daniel Veillard 已提交
8302
    }
8303
    def = NULL;
8304
    priv = vm->privateData;
D
Daniel Veillard 已提交
8305

8306 8307
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;
8308
    priv->jobActive = QEMU_JOB_MIGRATION_OUT;
8309

D
Daniel Veillard 已提交
8310 8311 8312 8313 8314 8315 8316
    /* Domain starts inactive, even if the domain XML had an id field. */
    vm->def->id = -1;

    /* Start the QEMU daemon, with the same command-line arguments plus
     * -incoming tcp:0.0.0.0:port
     */
    snprintf (migrateFrom, sizeof (migrateFrom), "tcp:0.0.0.0:%d", this_port);
8317
    if (qemudStartVMDaemon (dconn, driver, vm, migrateFrom, true,
8318
                            -1, NULL, VIR_VM_OP_MIGRATE_IN_START) < 0) {
8319
        qemuDomainStartAudit(vm, "migrated", false);
8320 8321 8322
        /* Note that we don't set an error here because qemudStartVMDaemon
         * should have already done that.
         */
8323
        if (!vm->persistent) {
8324 8325
            if (qemuDomainObjEndJob(vm) > 0)
                virDomainRemoveInactive(&driver->domains, vm);
8326 8327
            vm = NULL;
        }
8328
        goto endjob;
D
Daniel Veillard 已提交
8329
    }
8330

8331
    qemuDomainStartAudit(vm, "migrated", true);
8332 8333 8334
    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STARTED,
                                     VIR_DOMAIN_EVENT_STARTED_MIGRATED);
8335
    ret = 0;
D
Daniel Veillard 已提交
8336

8337
endjob:
8338 8339 8340
    if (vm &&
        qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
8341

8342 8343 8344 8345 8346 8347 8348 8349 8350
    /* We set a fake job active which is held across
     * API calls until the finish() call. This prevents
     * any other APIs being invoked while incoming
     * migration is taking place
     */
    if (vm &&
        virDomainObjIsActive(vm)) {
        priv->jobActive = QEMU_JOB_MIGRATION_IN;
        priv->jobInfo.type = VIR_DOMAIN_JOB_UNBOUNDED;
8351
        priv->jobStart = timeval_to_ms(now);
8352 8353
    }

8354
cleanup:
C
Chris Lalancette 已提交
8355
    VIR_FREE(hostname);
8356
    virDomainDefFree(def);
C
Chris Lalancette 已提交
8357
    if (ret != 0)
8358
        VIR_FREE(*uri_out);
8359 8360
    if (vm)
        virDomainObjUnlock(vm);
8361 8362
    if (event)
        qemuDomainEventQueue(driver, event);
8363
    qemuDriverUnlock(driver);
8364
    return ret;
C
Chris Lalancette 已提交
8365 8366 8367

}

8368 8369 8370 8371

/* Perform migration using QEMU's native TCP migrate support,
 * not encrypted obviously
 */
8372
static int doNativeMigrate(struct qemud_driver *driver,
8373 8374
                           virDomainObjPtr vm,
                           const char *uri,
8375
                           unsigned int flags,
8376 8377 8378 8379
                           const char *dname ATTRIBUTE_UNUSED,
                           unsigned long resource)
{
    int ret = -1;
8380
    xmlURIPtr uribits = NULL;
8381
    qemuDomainObjPrivatePtr priv = vm->privateData;
8382
    unsigned int background_flags = QEMU_MONITOR_MIGRATE_BACKGROUND;
8383

8384 8385 8386 8387 8388
    /* Issue the migrate command. */
    if (STRPREFIX(uri, "tcp:") && !STRPREFIX(uri, "tcp://")) {
        /* HACK: source host generates bogus URIs, so fix them up */
        char *tmpuri;
        if (virAsprintf(&tmpuri, "tcp://%s", uri + strlen("tcp:")) < 0) {
8389
            virReportOOMError();
8390 8391 8392 8393 8394 8395 8396 8397
            goto cleanup;
        }
        uribits = xmlParseURI(tmpuri);
        VIR_FREE(tmpuri);
    } else {
        uribits = xmlParseURI(uri);
    }
    if (!uribits) {
8398 8399
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("cannot parse URI %s"), uri);
8400 8401 8402
        goto cleanup;
    }

8403
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
8404
    if (resource > 0 &&
8405
        qemuMonitorSetMigrationSpeed(priv->mon, resource) < 0) {
8406
        qemuDomainObjExitMonitorWithDriver(driver, vm);
8407
        goto cleanup;
8408
    }
8409

8410 8411 8412 8413 8414 8415 8416 8417
    if (flags & VIR_MIGRATE_NON_SHARED_DISK)
        background_flags |= QEMU_MONITOR_MIGRATE_NON_SHARED_DISK;

    if (flags & VIR_MIGRATE_NON_SHARED_INC)
        background_flags |= QEMU_MONITOR_MIGRATE_NON_SHARED_INC;

    if (qemuMonitorMigrateToHost(priv->mon, background_flags, uribits->server,
                                 uribits->port) < 0) {
8418
        qemuDomainObjExitMonitorWithDriver(driver, vm);
8419 8420
        goto cleanup;
    }
8421
    qemuDomainObjExitMonitorWithDriver(driver, vm);
8422

8423
    if (qemuDomainWaitForMigrationComplete(driver, vm) < 0)
8424 8425 8426 8427 8428 8429 8430 8431 8432 8433
        goto cleanup;

    ret = 0;

cleanup:
    xmlFreeURI(uribits);
    return ret;
}


8434 8435
#define TUNNEL_SEND_BUF_SIZE 65536

8436
static int doTunnelSendAll(virStreamPtr st,
8437 8438
                           int sock)
{
8439 8440 8441 8442 8443 8444 8445 8446
    char *buffer;
    int nbytes = TUNNEL_SEND_BUF_SIZE;

    if (VIR_ALLOC_N(buffer, TUNNEL_SEND_BUF_SIZE) < 0) {
        virReportOOMError();
        virStreamAbort(st);
        return -1;
    }
8447 8448 8449 8450 8451

    /* XXX should honour the 'resource' parameter here */
    for (;;) {
        nbytes = saferead(sock, buffer, nbytes);
        if (nbytes < 0) {
8452
            virReportSystemError(errno, "%s",
8453
                                 _("tunnelled migration failed to read from qemu"));
8454 8455
            virStreamAbort(st);
            VIR_FREE(buffer);
8456 8457 8458 8459 8460 8461 8462
            return -1;
        }
        else if (nbytes == 0)
            /* EOF; get out of here */
            break;

        if (virStreamSend(st, buffer, nbytes) < 0) {
8463 8464
            qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                            _("Failed to write migration data to remote libvirtd"));
8465
            VIR_FREE(buffer);
8466 8467 8468 8469
            return -1;
        }
    }

8470 8471
    VIR_FREE(buffer);

8472 8473 8474 8475 8476 8477 8478
    if (virStreamFinish(st) < 0)
        /* virStreamFinish set the error for us */
        return -1;

    return 0;
}

C
Chris Lalancette 已提交
8479
static int doTunnelMigrate(virDomainPtr dom,
8480
                           struct qemud_driver *driver,
8481
                           virConnectPtr dconn,
C
Chris Lalancette 已提交
8482
                           virDomainObjPtr vm,
8483
                           const char *dom_xml,
C
Chris Lalancette 已提交
8484 8485 8486 8487 8488
                           const char *uri,
                           unsigned long flags,
                           const char *dname,
                           unsigned long resource)
{
8489
    qemuDomainObjPrivatePtr priv = vm->privateData;
8490 8491
    int client_sock = -1;
    int qemu_sock = -1;
C
Chris Lalancette 已提交
8492 8493
    struct sockaddr_un sa_qemu, sa_client;
    socklen_t addrlen;
8494
    virDomainPtr ddomain = NULL;
C
Chris Lalancette 已提交
8495
    int retval = -1;
8496
    virStreamPtr st = NULL;
C
Chris Lalancette 已提交
8497 8498
    char *unixfile = NULL;
    int internalret;
8499
    unsigned long long qemuCmdFlags;
C
Chris Lalancette 已提交
8500 8501
    int status;
    unsigned long long transferred, remaining, total;
8502
    unsigned int background_flags = QEMU_MONITOR_MIGRATE_BACKGROUND;
C
Chris Lalancette 已提交
8503

8504 8505 8506 8507 8508 8509 8510 8511
    /*
     * The order of operations is important here to avoid touching
     * the source VM until we are very sure we can successfully
     * start the migration operation.
     *
     *   1. setup local support infrastructure (eg sockets)
     *   2. setup destination fully
     *   3. start migration on source
C
Chris Lalancette 已提交
8512 8513
     */

8514

8515
    /* Stage 1. setup local support infrastructure */
C
Chris Lalancette 已提交
8516 8517

    if (virAsprintf(&unixfile, "%s/qemu.tunnelmigrate.src.%s",
8518
                    driver->libDir, vm->def->name) < 0) {
8519
        virReportOOMError();
8520
        goto cleanup;
C
Chris Lalancette 已提交
8521 8522 8523 8524
    }

    qemu_sock = socket(AF_UNIX, SOCK_STREAM, 0);
    if (qemu_sock < 0) {
8525
        virReportSystemError(errno, "%s",
C
Chris Lalancette 已提交
8526
                             _("cannot open tunnelled migration socket"));
8527
        goto cleanup;
C
Chris Lalancette 已提交
8528 8529 8530 8531 8532
    }
    memset(&sa_qemu, 0, sizeof(sa_qemu));
    sa_qemu.sun_family = AF_UNIX;
    if (virStrcpy(sa_qemu.sun_path, unixfile,
                  sizeof(sa_qemu.sun_path)) == NULL) {
8533 8534 8535
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("Unix socket '%s' too big for destination"),
                        unixfile);
8536
        goto cleanup;
C
Chris Lalancette 已提交
8537 8538 8539
    }
    unlink(unixfile);
    if (bind(qemu_sock, (struct sockaddr *)&sa_qemu, sizeof(sa_qemu)) < 0) {
8540
        virReportSystemError(errno,
C
Chris Lalancette 已提交
8541 8542
                             _("Cannot bind to unix socket '%s' for tunnelled migration"),
                             unixfile);
8543
        goto cleanup;
C
Chris Lalancette 已提交
8544 8545
    }
    if (listen(qemu_sock, 1) < 0) {
8546
        virReportSystemError(errno,
C
Chris Lalancette 已提交
8547 8548
                             _("Cannot listen on unix socket '%s' for tunnelled migration"),
                             unixfile);
8549
        goto cleanup;
C
Chris Lalancette 已提交
8550 8551
    }

8552 8553 8554 8555 8556 8557 8558
    if (chown(unixfile, qemu_driver->user, qemu_driver->group) < 0) {
        virReportSystemError(errno,
                             _("Cannot change unix socket '%s' owner"),
                             unixfile);
        goto cleanup;
    }

C
Chris Lalancette 已提交
8559
    /* check that this qemu version supports the unix migration */
8560
    if (qemuCapsExtractVersionInfo(vm->def->emulator, NULL, &qemuCmdFlags) < 0) {
8561 8562 8563
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("Cannot extract Qemu version from '%s'"),
                        vm->def->emulator);
8564 8565 8566 8567 8568
        goto cleanup;
    }

    if (!(qemuCmdFlags & QEMUD_CMD_FLAG_MIGRATE_QEMU_UNIX) &&
        !(qemuCmdFlags & QEMUD_CMD_FLAG_MIGRATE_QEMU_EXEC)) {
8569 8570
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("Source qemu is too old to support tunnelled migration"));
8571
        goto cleanup;
C
Chris Lalancette 已提交
8572
    }
8573 8574 8575 8576 8577 8578 8579 8580 8581 8582 8583 8584


    /* Stage 2. setup destination fully
     *
     * Once stage 2 has completed successfully, we *must* call finish
     * to cleanup the target whether we succeed or fail
     */
    st = virStreamNew(dconn, 0);
    if (st == NULL)
        /* virStreamNew only fails on OOM, and it reports the error itself */
        goto cleanup;

8585
    qemuDomainObjEnterRemoteWithDriver(driver, vm);
8586 8587 8588
    internalret = dconn->driver->domainMigratePrepareTunnel(dconn, st,
                                                            flags, dname,
                                                            resource, dom_xml);
8589
    qemuDomainObjExitRemoteWithDriver(driver, vm);
8590 8591 8592 8593 8594

    if (internalret < 0)
        /* domainMigratePrepareTunnel sets the error for us */
        goto cleanup;

8595 8596 8597 8598 8599 8600 8601 8602 8603
    /* the domain may have shutdown or crashed while we had the locks dropped
     * in qemuDomainObjEnterRemoteWithDriver, so check again
     */
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                        _("guest unexpectedly quit"));
        goto cleanup;
    }

8604
    /*   3. start migration on source */
8605
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
8606 8607 8608 8609 8610 8611 8612 8613
    if (flags & VIR_MIGRATE_NON_SHARED_DISK)
        background_flags |= QEMU_MONITOR_MIGRATE_NON_SHARED_DISK;
    if (flags & VIR_MIGRATE_NON_SHARED_INC)
        background_flags |= QEMU_MONITOR_MIGRATE_NON_SHARED_INC;
    if (qemuCmdFlags & QEMUD_CMD_FLAG_MIGRATE_QEMU_UNIX){
        internalret = qemuMonitorMigrateToUnix(priv->mon, background_flags,
                                               unixfile);
    }
C
Chris Lalancette 已提交
8614 8615
    else if (qemuCmdFlags & QEMUD_CMD_FLAG_MIGRATE_QEMU_EXEC) {
        const char *args[] = { "nc", "-U", unixfile, NULL };
8616
        internalret = qemuMonitorMigrateToCommand(priv->mon, QEMU_MONITOR_MIGRATE_BACKGROUND, args);
8617 8618
    } else {
        internalret = -1;
C
Chris Lalancette 已提交
8619
    }
8620
    qemuDomainObjExitMonitorWithDriver(driver, vm);
C
Chris Lalancette 已提交
8621
    if (internalret < 0) {
8622 8623
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("tunnelled migration monitor command failed"));
8624
        goto finish;
C
Chris Lalancette 已提交
8625 8626
    }

8627 8628 8629 8630 8631 8632
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                        _("guest unexpectedly quit"));
        goto cleanup;
    }

8633 8634 8635
    /* From this point onwards we *must* call cancel to abort the
     * migration on source if anything goes wrong */

C
Chris Lalancette 已提交
8636 8637 8638
    /* it is also possible that the migrate didn't fail initially, but
     * rather failed later on.  Check the output of "info migrate"
     */
8639
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
8640 8641
    if (qemuMonitorGetMigrationStatus(priv->mon,
                                      &status,
C
Chris Lalancette 已提交
8642 8643 8644
                                      &transferred,
                                      &remaining,
                                      &total) < 0) {
8645
        qemuDomainObjExitMonitorWithDriver(driver, vm);
8646
        goto cancel;
C
Chris Lalancette 已提交
8647
    }
8648
    qemuDomainObjExitMonitorWithDriver(driver, vm);
C
Chris Lalancette 已提交
8649 8650

    if (status == QEMU_MONITOR_MIGRATION_STATUS_ERROR) {
8651 8652
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s",_("migrate failed"));
8653
        goto cancel;
C
Chris Lalancette 已提交
8654 8655 8656 8657 8658 8659
    }

    addrlen = sizeof(sa_client);
    while ((client_sock = accept(qemu_sock, (struct sockaddr *)&sa_client, &addrlen)) < 0) {
        if (errno == EAGAIN || errno == EINTR)
            continue;
8660
        virReportSystemError(errno, "%s",
C
Chris Lalancette 已提交
8661
                             _("tunnelled migration failed to accept from qemu"));
8662
        goto cancel;
C
Chris Lalancette 已提交
8663 8664
    }

8665
    retval = doTunnelSendAll(st, client_sock);
8666

8667
cancel:
8668
    if (retval != 0 && virDomainObjIsActive(vm)) {
8669
        qemuDomainObjEnterMonitorWithDriver(driver, vm);
8670
        qemuMonitorMigrateCancel(priv->mon);
8671
        qemuDomainObjExitMonitorWithDriver(driver, vm);
8672
    }
C
Chris Lalancette 已提交
8673

8674
finish:
C
Chris Lalancette 已提交
8675
    dname = dname ? dname : dom->name;
8676
    qemuDomainObjEnterRemoteWithDriver(driver, vm);
C
Chris Lalancette 已提交
8677 8678
    ddomain = dconn->driver->domainMigrateFinish2
        (dconn, dname, NULL, 0, uri, flags, retval);
8679
    qemuDomainObjExitRemoteWithDriver(driver, vm);
8680 8681

cleanup:
8682 8683
    VIR_FORCE_CLOSE(client_sock);
    VIR_FORCE_CLOSE(qemu_sock);
8684

C
Chris Lalancette 已提交
8685 8686 8687
    if (ddomain)
        virUnrefDomain(ddomain);

8688 8689 8690 8691
    if (unixfile) {
        unlink(unixfile);
        VIR_FREE(unixfile);
    }
C
Chris Lalancette 已提交
8692

8693 8694 8695
    if (st)
        /* don't call virStreamFree(), because that resets any pending errors */
        virUnrefStream(st);
8696 8697 8698 8699
    return retval;
}


8700 8701 8702 8703
/* This is essentially a simplified re-impl of
 * virDomainMigrateVersion2 from libvirt.c, but running in source
 * libvirtd context, instead of client app context */
static int doNonTunnelMigrate(virDomainPtr dom,
8704
                              struct qemud_driver *driver,
8705 8706 8707 8708 8709 8710 8711 8712 8713 8714 8715
                              virConnectPtr dconn,
                              virDomainObjPtr vm,
                              const char *dom_xml,
                              const char *uri ATTRIBUTE_UNUSED,
                              unsigned long flags,
                              const char *dname,
                              unsigned long resource)
{
    virDomainPtr ddomain = NULL;
    int retval = -1;
    char *uri_out = NULL;
8716
    int rc;
8717

8718
    qemuDomainObjEnterRemoteWithDriver(driver, vm);
8719 8720
    /* NB we don't pass 'uri' into this, since that's the libvirtd
     * URI in this context - so we let dest pick it */
8721 8722 8723 8724 8725 8726 8727 8728 8729
    rc = dconn->driver->domainMigratePrepare2(dconn,
                                              NULL, /* cookie */
                                              0, /* cookielen */
                                              NULL, /* uri */
                                              &uri_out,
                                              flags, dname,
                                              resource, dom_xml);
    qemuDomainObjExitRemoteWithDriver(driver, vm);
    if (rc < 0)
8730 8731 8732
        /* domainMigratePrepare2 sets the error for us */
        goto cleanup;

8733 8734 8735 8736 8737 8738 8739 8740 8741
    /* the domain may have shutdown or crashed while we had the locks dropped
     * in qemuDomainObjEnterRemoteWithDriver, so check again
     */
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                        _("guest unexpectedly quit"));
        goto cleanup;
    }

8742
    if (uri_out == NULL) {
8743 8744
        qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                        _("domainMigratePrepare2 did not set uri"));
8745
        goto cleanup;
8746 8747
    }

8748
    if (doNativeMigrate(driver, vm, uri_out, flags, dname, resource) < 0)
8749 8750 8751 8752 8753 8754
        goto finish;

    retval = 0;

finish:
    dname = dname ? dname : dom->name;
8755
    qemuDomainObjEnterRemoteWithDriver(driver, vm);
8756 8757
    ddomain = dconn->driver->domainMigrateFinish2
        (dconn, dname, NULL, 0, uri_out, flags, retval);
8758
    qemuDomainObjExitRemoteWithDriver(driver, vm);
8759 8760 8761 8762 8763 8764 8765 8766 8767

    if (ddomain)
        virUnrefDomain(ddomain);

cleanup:
    return retval;
}


8768
static int doPeer2PeerMigrate(virDomainPtr dom,
8769
                              struct qemud_driver *driver,
8770 8771 8772 8773 8774 8775 8776 8777 8778
                              virDomainObjPtr vm,
                              const char *uri,
                              unsigned long flags,
                              const char *dname,
                              unsigned long resource)
{
    int ret = -1;
    virConnectPtr dconn = NULL;
    char *dom_xml;
8779
    bool p2p;
8780 8781 8782 8783 8784

    /* the order of operations is important here; we make sure the
     * destination side is completely setup before we touch the source
     */

8785
    qemuDomainObjEnterRemoteWithDriver(driver, vm);
8786
    dconn = virConnectOpen(uri);
8787
    qemuDomainObjExitRemoteWithDriver(driver, vm);
8788
    if (dconn == NULL) {
8789 8790
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        _("Failed to connect to remote libvirt URI %s"), uri);
8791 8792
        return -1;
    }
8793 8794 8795 8796 8797 8798

    qemuDomainObjEnterRemoteWithDriver(driver, vm);
    p2p = VIR_DRV_SUPPORTS_FEATURE(dconn->driver, dconn,
                                   VIR_DRV_FEATURE_MIGRATION_P2P);
    qemuDomainObjExitRemoteWithDriver(driver, vm);
    if (!p2p) {
8799 8800
        qemuReportError(VIR_ERR_OPERATION_FAILED, "%s",
                        _("Destination libvirt does not support peer-to-peer migration protocol"));
8801 8802 8803
        goto cleanup;
    }

8804 8805 8806 8807 8808 8809 8810
    /* domain may have been stopped while we were talking to remote daemon */
    if (!virDomainObjIsActive(vm)) {
        qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                        _("guest unexpectedly quit"));
        goto cleanup;
    }

8811 8812 8813
    dom_xml = qemudVMDumpXML(driver, vm,
                             VIR_DOMAIN_XML_SECURE |
                             VIR_DOMAIN_XML_UPDATE_CPU);
8814
    if (!dom_xml) {
8815 8816
        qemuReportError(VIR_ERR_OPERATION_FAILED,
                        "%s", _("failed to get domain xml"));
8817 8818 8819
        goto cleanup;
    }

8820
    if (flags & VIR_MIGRATE_TUNNELLED)
8821
        ret = doTunnelMigrate(dom, driver, dconn, vm, dom_xml, uri, flags, dname, resource);
8822
    else
8823
        ret = doNonTunnelMigrate(dom, driver, dconn, vm, dom_xml, uri, flags, dname, resource);
8824 8825 8826

cleanup:
    VIR_FREE(dom_xml);
C
Chris Lalancette 已提交
8827
    /* don't call virConnectClose(), because that resets any pending errors */
8828
    qemuDomainObjEnterRemoteWithDriver(driver, vm);
C
Chris Lalancette 已提交
8829
    virUnrefConnect(dconn);
8830
    qemuDomainObjExitRemoteWithDriver(driver, vm);
C
Chris Lalancette 已提交
8831

8832
    return ret;
D
Daniel Veillard 已提交
8833 8834
}

8835

D
Daniel Veillard 已提交
8836 8837 8838 8839 8840 8841
/* 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,
8842
                           unsigned long flags,
8843
                           const char *dname,
D
Daniel Veillard 已提交
8844 8845
                           unsigned long resource)
{
8846 8847
    struct qemud_driver *driver = dom->conn->privateData;
    virDomainObjPtr vm;
8848
    virDomainEventPtr event = NULL;
8849
    int ret = -1;
8850
    int resume = 0;
8851
    qemuDomainObjPrivatePtr priv;
D
Daniel Veillard 已提交
8852

C
Chris Lalancette 已提交
8853 8854 8855 8856 8857 8858 8859 8860 8861
    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);

8862
    qemuDriverLock(driver);
8863
    vm = virDomainFindByUUID(&driver->domains, dom->uuid);
D
Daniel Veillard 已提交
8864
    if (!vm) {
8865 8866
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(dom->uuid, uuidstr);
8867 8868
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching uuid '%s'"), uuidstr);
8869
        goto cleanup;
D
Daniel Veillard 已提交
8870
    }
8871
    priv = vm->privateData;
D
Daniel Veillard 已提交
8872

8873 8874
    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;
8875
    priv->jobActive = QEMU_JOB_MIGRATION_OUT;
8876

D
Daniel P. Berrange 已提交
8877
    if (!virDomainObjIsActive(vm)) {
8878 8879
        qemuReportError(VIR_ERR_OPERATION_INVALID,
                        "%s", _("domain is not running"));
8880
        goto endjob;
D
Daniel Veillard 已提交
8881 8882
    }

8883 8884 8885
    memset(&priv->jobInfo, 0, sizeof(priv->jobInfo));
    priv->jobInfo.type = VIR_DOMAIN_JOB_UNBOUNDED;

8886
    resume = vm->state == VIR_DOMAIN_RUNNING;
8887
    if (!(flags & VIR_MIGRATE_LIVE) && vm->state == VIR_DOMAIN_RUNNING) {
8888
        if (qemuDomainMigrateOffline(driver, vm) < 0)
8889
            goto endjob;
8890 8891
    }

8892
    if ((flags & (VIR_MIGRATE_TUNNELLED | VIR_MIGRATE_PEER2PEER))) {
8893
        if (doPeer2PeerMigrate(dom, driver, vm, uri, flags, dname, resource) < 0)
8894
            /* doPeer2PeerMigrate already set the error, so just get out */
8895
            goto endjob;
8896
    } else {
8897
        if (doNativeMigrate(driver, vm, uri, flags, dname, resource) < 0)
8898
            goto endjob;
8899 8900
    }

D
Daniel Veillard 已提交
8901
    /* Clean up the source domain. */
8902
    qemudShutdownVMDaemon(driver, vm, 1);
8903
    qemuDomainStopAudit(vm, "migrated");
8904
    resume = 0;
8905 8906 8907 8908

    event = virDomainEventNewFromObj(vm,
                                     VIR_DOMAIN_EVENT_STOPPED,
                                     VIR_DOMAIN_EVENT_STOPPED_MIGRATED);
C
Chris Lalancette 已提交
8909
    if (!vm->persistent || (flags & VIR_MIGRATE_UNDEFINE_SOURCE)) {
8910
        virDomainDeleteConfig(driver->configDir, driver->autostartDir, vm);
8911 8912
        if (qemuDomainObjEndJob(vm) > 0)
            virDomainRemoveInactive(&driver->domains, vm);
8913 8914
        vm = NULL;
    }
8915
    ret = 0;
D
Daniel Veillard 已提交
8916

8917
endjob:
8918
    if (resume && vm->state == VIR_DOMAIN_PAUSED) {
8919
        /* we got here through some sort of failure; start the domain again */
H
Hu Tao 已提交
8920
        if (doStartCPUs(driver, vm, dom->conn) < 0) {
8921 8922 8923 8924
            /* Hm, we already know we are in error here.  We don't want to
             * overwrite the previous error, though, so we just throw something
             * to the logs and hope for the best
             */
8925
            VIR_ERROR(_("Failed to resume guest %s after failure"),
8926
                      vm->def->name);
8927 8928 8929 8930 8931 8932
        }

        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_RESUMED,
                                         VIR_DOMAIN_EVENT_RESUMED_MIGRATED);
    }
8933 8934 8935
    if (vm &&
        qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
8936

8937
cleanup:
8938 8939
    if (vm)
        virDomainObjUnlock(vm);
8940 8941
    if (event)
        qemuDomainEventQueue(driver, event);
8942
    qemuDriverUnlock(driver);
8943
    return ret;
D
Daniel Veillard 已提交
8944 8945
}

8946
#if WITH_MACVTAP
8947 8948 8949 8950 8951 8952 8953 8954 8955 8956 8957 8958 8959 8960 8961 8962 8963 8964 8965 8966 8967 8968 8969 8970 8971 8972 8973 8974 8975 8976 8977 8978 8979 8980
static void
qemudVPAssociatePortProfiles(virDomainDefPtr def) {
    int i;
    int last_good_net = -1;
    virDomainNetDefPtr net;

    for (i = 0; i < def->nnets; i++) {
        net = def->nets[i];
        if (net->type == VIR_DOMAIN_NET_TYPE_DIRECT) {
            if (vpAssociatePortProfileId(net->ifname,
                                         net->mac,
                                         net->data.direct.linkdev,
                                         &net->data.direct.virtPortProfile,
                                         def->uuid,
                                         VIR_VM_OP_MIGRATE_IN_FINISH) != 0)
                goto err_exit;
        }
        last_good_net = i;
    }

    return;

err_exit:
    for (i = 0; i < last_good_net; i++) {
        net = def->nets[i];
        if (net->type == VIR_DOMAIN_NET_TYPE_DIRECT) {
            vpDisassociatePortProfileId(net->ifname,
                                        net->mac,
                                        net->data.direct.linkdev,
                                        &net->data.direct.virtPortProfile,
                                        VIR_VM_OP_MIGRATE_IN_FINISH);
        }
    }
}
8981 8982 8983 8984
#else /* !WITH_MACVTAP */
static void
qemudVPAssociatePortProfiles(virDomainDefPtr def ATTRIBUTE_UNUSED) { }
#endif /* WITH_MACVTAP */
8985

D
Daniel Veillard 已提交
8986 8987 8988 8989 8990 8991 8992
/* 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 已提交
8993
                           unsigned long flags,
D
Daniel Veillard 已提交
8994 8995
                           int retcode)
{
8996 8997 8998
    struct qemud_driver *driver = dconn->privateData;
    virDomainObjPtr vm;
    virDomainPtr dom = NULL;
8999
    virDomainEventPtr event = NULL;
9000
    virErrorPtr orig_err;
C
Chris Lalancette 已提交
9001
    int newVM = 1;
9002
    qemuDomainObjPrivatePtr priv = NULL;
D
Daniel Veillard 已提交
9003

C
Chris Lalancette 已提交
9004 9005 9006 9007 9008 9009 9010 9011 9012
    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);

9013 9014 9015
    /* Migration failed. Save the current error so nothing squashes it */
    orig_err = virSaveLastError();

9016
    qemuDriverLock(driver);
9017
    vm = virDomainFindByName(&driver->domains, dname);
D
Daniel Veillard 已提交
9018
    if (!vm) {
9019 9020
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("no domain with matching name '%s'"), dname);
9021
        goto cleanup;
D
Daniel Veillard 已提交
9022 9023
    }

9024 9025 9026 9027 9028 9029 9030 9031 9032
    priv = vm->privateData;
    if (priv->jobActive != QEMU_JOB_MIGRATION_IN) {
        qemuReportError(VIR_ERR_NO_DOMAIN,
                        _("domain '%s' is not processing incoming migration"), dname);
        goto cleanup;
    }
    priv->jobActive = QEMU_JOB_NONE;
    memset(&priv->jobInfo, 0, sizeof(priv->jobInfo));

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

D
Daniel Veillard 已提交
9036 9037 9038 9039
    /* Did the migration go as planned?  If yes, return the domain
     * object, but if no, clean up the empty qemu process.
     */
    if (retcode == 0) {
9040 9041 9042 9043 9044 9045
        if (!virDomainObjIsActive(vm)) {
            qemuReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                            _("guest unexpectedly quit"));
            goto cleanup;
        }

9046 9047
        qemudVPAssociatePortProfiles(vm->def);

C
Chris Lalancette 已提交
9048 9049 9050 9051 9052
        if (flags & VIR_MIGRATE_PERSIST_DEST) {
            if (vm->persistent)
                newVM = 0;
            vm->persistent = 1;

9053
            if (virDomainSaveConfig(driver->configDir, vm->def) < 0) {
C
Chris Lalancette 已提交
9054 9055 9056 9057 9058 9059 9060 9061 9062 9063
                /* Hmpf.  Migration was successful, but making it persistent
                 * was not.  If we report successful, then when this domain
                 * shuts down, management tools are in for a surprise.  On the
                 * other hand, if we report failure, then the management tools
                 * might try to restart the domain on the source side, even
                 * though the domain is actually running on the destination.
                 * Return a NULL dom pointer, and hope that this is a rare
                 * situation and management tools are smart.
                 */
                vm = NULL;
9064
                goto endjob;
C
Chris Lalancette 已提交
9065 9066 9067 9068 9069 9070 9071 9072 9073
            }

            event = virDomainEventNewFromObj(vm,
                                             VIR_DOMAIN_EVENT_DEFINED,
                                             newVM ?
                                             VIR_DOMAIN_EVENT_DEFINED_ADDED :
                                             VIR_DOMAIN_EVENT_DEFINED_UPDATED);
            if (event)
                qemuDomainEventQueue(driver, event);
9074
            event = NULL;
C
Chris Lalancette 已提交
9075 9076

        }
D
Daniel Veillard 已提交
9077
        dom = virGetDomain (dconn, vm->def->name, vm->def->uuid);
9078

9079 9080 9081 9082 9083
        if (!(flags & VIR_MIGRATE_PAUSED)) {
            /* run 'cont' on the destination, which allows migration on qemu
             * >= 0.10.6 to work properly.  This isn't strictly necessary on
             * older qemu's, but it also doesn't hurt anything there
             */
H
Hu Tao 已提交
9084
            if (doStartCPUs(driver, vm, dconn) < 0) {
9085
                if (virGetLastError() == NULL)
9086 9087
                    qemuReportError(VIR_ERR_INTERNAL_ERROR,
                                    "%s", _("resume operation failed"));
9088 9089
                goto endjob;
            }
9090 9091
        }

9092 9093 9094
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_RESUMED,
                                         VIR_DOMAIN_EVENT_RESUMED_MIGRATED);
9095 9096 9097 9098 9099 9100
        if (vm->state == VIR_DOMAIN_PAUSED) {
            qemuDomainEventQueue(driver, event);
            event = virDomainEventNewFromObj(vm,
                                             VIR_DOMAIN_EVENT_SUSPENDED,
                                             VIR_DOMAIN_EVENT_SUSPENDED_PAUSED);
        }
9101 9102 9103 9104
        if (virDomainSaveStatus(driver->caps, driver->stateDir, vm) < 0) {
            VIR_WARN("Failed to save status on vm %s", vm->def->name);
            goto endjob;
        }
D
Daniel Veillard 已提交
9105
    } else {
9106
        qemudShutdownVMDaemon(driver, vm, 1);
9107
        qemuDomainStopAudit(vm, "failed");
9108 9109 9110
        event = virDomainEventNewFromObj(vm,
                                         VIR_DOMAIN_EVENT_STOPPED,
                                         VIR_DOMAIN_EVENT_STOPPED_FAILED);
9111
        if (!vm->persistent) {
9112 9113
            if (qemuDomainObjEndJob(vm) > 0)
                virDomainRemoveInactive(&driver->domains, vm);
9114 9115
            vm = NULL;
        }
D
Daniel Veillard 已提交
9116
    }
9117

9118
endjob:
9119 9120 9121
    if (vm &&
        qemuDomainObjEndJob(vm) == 0)
        vm = NULL;
9122

9123
cleanup:
9124 9125 9126 9127
    if (orig_err) {
        virSetError(orig_err);
        virFreeError(orig_err);
    }
9128 9129
    if (vm)
        virDomainObjUnlock(vm);
9130 9131
    if (event)
        qemuDomainEventQueue(driver, event);
9132
    qemuDriverUnlock(driver);
9133
    return dom;
D
Daniel Veillard 已提交
9134 9135
}

9136 9137 9138 9139 9140 9141 9142 9143 9144 9145 9146 9147 9148 9149 9150 9151
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;

9152
    def = virNodeDeviceDefParseString(xml, EXISTING_DEVICE);
9153 9154 9155 9156 9157 9158 9159 9160 9161 9162 9163 9164 9165 9166 9167 9168 9169
    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) {
9170 9171
        qemuReportError(VIR_ERR_INVALID_ARG,
                        _("device %s is not a PCI device"), dev->name);
9172 9173 9174 9175 9176 9177 9178 9179 9180 9181 9182 9183 9184
        goto out;
    }

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

static int
qemudNodeDeviceDettach (virNodeDevicePtr dev)
{
9185
    struct qemud_driver *driver = dev->conn->privateData;
9186 9187 9188 9189 9190 9191 9192
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

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

9193
    pci = pciGetDevice(domain, bus, slot, function);
9194 9195 9196
    if (!pci)
        return -1;

9197 9198
    qemuDriverLock(driver);
    if (pciDettachDevice(pci, driver->activePciHostdevs) < 0)
9199 9200 9201 9202
        goto out;

    ret = 0;
out:
9203
    qemuDriverUnlock(driver);
9204
    pciFreeDevice(pci);
9205 9206 9207 9208 9209 9210
    return ret;
}

static int
qemudNodeDeviceReAttach (virNodeDevicePtr dev)
{
9211
    struct qemud_driver *driver = dev->conn->privateData;
9212 9213 9214 9215 9216 9217 9218
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

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

9219
    pci = pciGetDevice(domain, bus, slot, function);
9220 9221 9222
    if (!pci)
        return -1;

9223 9224
    qemuDriverLock(driver);
    if (pciReAttachDevice(pci, driver->activePciHostdevs) < 0)
9225 9226 9227 9228
        goto out;

    ret = 0;
out:
9229
    qemuDriverUnlock(driver);
9230
    pciFreeDevice(pci);
9231 9232 9233 9234 9235 9236
    return ret;
}

static int
qemudNodeDeviceReset (virNodeDevicePtr dev)
{
9237
    struct qemud_driver *driver = dev->conn->privateData;
9238 9239 9240 9241 9242 9243 9244
    pciDevice *pci;
    unsigned domain, bus, slot, function;
    int ret = -1;

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

9245
    pci = pciGetDevice(domain, bus, slot, function);
9246 9247 9248
    if (!pci)
        return -1;

9249 9250
    qemuDriverLock(driver);

9251
    if (pciResetDevice(pci, driver->activePciHostdevs, NULL) < 0)
9252 9253 9254 9255
        goto out;

    ret = 0;
out:
9256
    qemuDriverUnlock(driver);
9257
    pciFreeDevice(pci);
9258 9259 9260
    return ret;
}

9261 9262 9263 9264 9265 9266 9267 9268 9269 9270 9271
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) {
9272 9273
        qemuReportError(VIR_ERR_NO_SUPPORT,
                        "%s", _("cannot get host CPU capabilities"));
9274 9275
    }
    else
9276
        ret = cpuCompareXML(driver->caps->host.cpu, xmlDesc);
9277 9278 9279 9280 9281 9282

    qemuDriverUnlock(driver);

    return ret;
}

9283

9284 9285 9286 9287 9288 9289 9290 9291 9292 9293 9294 9295 9296
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;
}

9297 9298 9299 9300 9301 9302 9303 9304 9305 9306 9307 9308 9309 9310 9311 9312 9313 9314 9315 9316 9317 9318 9319

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) {
9320 9321
            struct timeval now;

9322
            memcpy(info, &priv->jobInfo, sizeof(*info));
9323 9324 9325 9326 9327 9328 9329 9330 9331 9332 9333

            /* 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;
            }
9334
            info->timeElapsed = timeval_to_ms(now) - priv->jobStart;
9335 9336 9337 9338 9339 9340 9341 9342 9343 9344 9345 9346 9347 9348 9349 9350 9351 9352 9353
        } 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;
}


9354 9355 9356 9357 9358 9359 9360 9361 9362 9363 9364 9365 9366 9367 9368 9369 9370 9371 9372 9373 9374 9375
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);
9376
            priv->jobSignals |= QEMU_JOB_SIGNAL_CANCEL;
9377 9378 9379 9380 9381 9382 9383 9384 9385 9386 9387 9388 9389 9390 9391 9392 9393 9394 9395 9396
        } 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;
}


9397 9398 9399 9400 9401 9402 9403 9404 9405 9406
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;

9407
    virCheckFlags(0, -1);
9408 9409 9410 9411 9412 9413 9414 9415 9416 9417 9418 9419 9420 9421 9422 9423 9424 9425 9426 9427

    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;

9428
    if (priv->jobActive != QEMU_JOB_MIGRATION_OUT) {
9429 9430 9431 9432 9433 9434 9435 9436 9437 9438 9439 9440 9441 9442 9443 9444 9445
        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 已提交
9446 9447 9448 9449 9450 9451 9452 9453 9454 9455 9456 9457 9458 9459
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;
}

9460 9461 9462
static int qemuDomainSnapshotWriteMetadata(virDomainObjPtr vm,
                                           virDomainSnapshotObjPtr snapshot,
                                           char *snapshotDir)
C
Chris Lalancette 已提交
9463 9464 9465 9466 9467 9468 9469 9470 9471 9472
{
    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);
9473
    newxml = virDomainSnapshotDefFormat(uuidstr, snapshot->def, 1);
C
Chris Lalancette 已提交
9474 9475 9476 9477 9478 9479 9480 9481 9482 9483 9484 9485 9486 9487 9488 9489
    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;
    }

9490
    if (virAsprintf(&snapFile, "%s/%s.xml", snapDir, snapshot->def->name) < 0) {
C
Chris Lalancette 已提交
9491 9492 9493 9494 9495 9496 9497 9498 9499 9500 9501 9502 9503 9504 9505 9506 9507 9508 9509 9510 9511
        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);
9512
    VIR_FORCE_CLOSE(fd);
C
Chris Lalancette 已提交
9513 9514 9515
    return ret;
}

9516 9517
static int qemuDomainSnapshotSetCurrentActive(virDomainObjPtr vm,
                                              char *snapshotDir)
C
Chris Lalancette 已提交
9518 9519 9520 9521
{
    if (vm->current_snapshot) {
        vm->current_snapshot->def->active = 1;

9522 9523
        return qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                               snapshotDir);
C
Chris Lalancette 已提交
9524 9525 9526 9527 9528
    }

    return 0;
}

9529 9530
static int qemuDomainSnapshotSetCurrentInactive(virDomainObjPtr vm,
                                                char *snapshotDir)
C
Chris Lalancette 已提交
9531 9532 9533 9534
{
    if (vm->current_snapshot) {
        vm->current_snapshot->def->active = 0;

9535 9536
        return qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                               snapshotDir);
C
Chris Lalancette 已提交
9537 9538 9539 9540 9541 9542 9543 9544 9545 9546 9547 9548 9549 9550 9551 9552 9553 9554 9555
    }

    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,
9556 9557
                            _("Disk '%s' does not support snapshotting"),
                            vm->def->disks[i]->src);
C
Chris Lalancette 已提交
9558 9559 9560 9561 9562 9563 9564 9565 9566
            return 0;
        }
    }

    return 1;
}

static virDomainSnapshotPtr qemuDomainSnapshotCreateXML(virDomainPtr domain,
                                                        const char *xmlDesc,
9567
                                                        unsigned int flags)
C
Chris Lalancette 已提交
9568 9569 9570 9571 9572 9573 9574 9575 9576 9577
{
    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;

9578 9579
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
9580 9581 9582 9583 9584 9585 9586 9587 9588 9589 9590 9591 9592 9593 9594 9595 9596 9597 9598 9599 9600 9601 9602 9603 9604 9605 9606 9607 9608 9609 9610 9611 9612 9613 9614 9615 9616 9617 9618 9619 9620 9621 9622 9623 9624 9625 9626 9627 9628 9629 9630 9631 9632 9633 9634 9635 9636 9637 9638 9639 9640
    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) {
                    virReportSystemError(errno,
                                         _("Failed to run '%s' to create snapshot '%s' from disk '%s'"),
                                         qemuimgarg[0], snap->def->name,
                                         vm->def->disks[i]->src);
                    goto cleanup;
                }
            }
        }
    }
    else {
9641 9642 9643 9644 9645
        qemuDomainObjPrivatePtr priv;
        int ret;

        if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
            goto cleanup;
C
Chris Lalancette 已提交
9646 9647
        priv = vm->privateData;
        qemuDomainObjEnterMonitorWithDriver(driver, vm);
9648
        ret = qemuMonitorCreateSnapshot(priv->mon, def->name);
C
Chris Lalancette 已提交
9649
        qemuDomainObjExitMonitorWithDriver(driver, vm);
9650
        if (qemuDomainObjEndJob(vm) == 0) {
9651
            vm = NULL;
9652 9653
            goto cleanup;
        }
9654 9655
        if (ret < 0)
            goto cleanup;
C
Chris Lalancette 已提交
9656 9657 9658 9659 9660 9661 9662 9663 9664 9665 9666 9667 9668 9669 9670 9671 9672 9673 9674 9675
    }

    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;

9676 9677 9678
    if (qemuDomainSnapshotWriteMetadata(vm, vm->current_snapshot,
                                        driver->snapshotDir) < 0)
        /* qemuDomainSnapshotWriteMetadata set the error */
C
Chris Lalancette 已提交
9679 9680 9681 9682 9683 9684 9685 9686 9687 9688 9689 9690 9691 9692
        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,
9693
                                       unsigned int flags)
C
Chris Lalancette 已提交
9694 9695 9696 9697 9698
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int n = -1;

9699 9700
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
9701 9702 9703 9704 9705 9706 9707 9708 9709 9710 9711 9712 9713 9714 9715 9716 9717 9718 9719 9720
    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,
9721
                                 unsigned int flags)
C
Chris Lalancette 已提交
9722 9723 9724 9725 9726
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    int n = -1;

9727 9728
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
9729 9730 9731 9732 9733 9734 9735 9736 9737 9738 9739 9740 9741 9742 9743 9744 9745 9746 9747 9748 9749
    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,
9750
                                                           unsigned int flags)
C
Chris Lalancette 已提交
9751 9752 9753 9754 9755 9756
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    virDomainSnapshotObjPtr snap = NULL;
    virDomainSnapshotPtr snapshot = NULL;

9757 9758
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
9759 9760 9761 9762 9763 9764 9765 9766 9767 9768 9769 9770 9771 9772 9773 9774 9775 9776 9777 9778 9779 9780 9781 9782 9783 9784 9785
    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,
9786
                                        unsigned int flags)
C
Chris Lalancette 已提交
9787 9788 9789 9790 9791
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    int ret = -1;

9792 9793
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
9794 9795 9796 9797 9798 9799 9800 9801 9802 9803 9804 9805 9806 9807 9808 9809 9810 9811 9812 9813
    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,
9814
                                                      unsigned int flags)
C
Chris Lalancette 已提交
9815 9816 9817 9818 9819
{
    struct qemud_driver *driver = domain->conn->privateData;
    virDomainObjPtr vm;
    virDomainSnapshotPtr snapshot = NULL;

9820 9821
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
9822 9823 9824 9825 9826 9827 9828 9829 9830 9831 9832 9833 9834 9835 9836 9837 9838 9839 9840 9841 9842 9843 9844 9845 9846 9847
    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,
9848
                                       unsigned int flags)
C
Chris Lalancette 已提交
9849 9850 9851 9852 9853 9854 9855
{
    struct qemud_driver *driver = snapshot->domain->conn->privateData;
    virDomainObjPtr vm = NULL;
    char *xml = NULL;
    virDomainSnapshotObjPtr snap = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];

9856 9857
    virCheckFlags(0, NULL);

C
Chris Lalancette 已提交
9858 9859 9860 9861 9862 9863 9864 9865 9866 9867 9868 9869 9870 9871 9872 9873 9874 9875 9876 9877 9878 9879 9880 9881 9882 9883 9884
    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,
9885
                                      unsigned int flags)
C
Chris Lalancette 已提交
9886 9887 9888 9889 9890 9891 9892 9893 9894 9895
{
    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;

9896 9897
    virCheckFlags(0, -1);

C
Chris Lalancette 已提交
9898 9899 9900 9901 9902 9903 9904 9905 9906 9907 9908 9909 9910 9911 9912 9913 9914 9915 9916 9917 9918 9919 9920 9921 9922 9923 9924 9925 9926 9927 9928
    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)
9929
                goto endjob;
C
Chris Lalancette 已提交
9930 9931
        }
        else {
9932
            if (qemuDomainSnapshotSetCurrentActive(vm, driver->snapshotDir) < 0)
9933
                goto endjob;
C
Chris Lalancette 已提交
9934 9935

            rc = qemudStartVMDaemon(snapshot->domain->conn, driver, vm, NULL,
9936
                                    false, -1, NULL, VIR_VM_OP_CREATE);
9937
            qemuDomainStartAudit(vm, "from-snapshot", rc >= 0);
9938
            if (qemuDomainSnapshotSetCurrentInactive(vm, driver->snapshotDir) < 0)
9939
                goto endjob;
C
Chris Lalancette 已提交
9940
            if (rc < 0)
9941
                goto endjob;
C
Chris Lalancette 已提交
9942 9943 9944 9945 9946 9947
        }

        if (snap->def->state == VIR_DOMAIN_PAUSED) {
            /* qemu unconditionally starts the domain running again after
             * loadvm, so let's pause it to keep consistency
             */
H
Hu Tao 已提交
9948 9949
            rc = doStopCPUs(driver, vm);
            if (rc < 0)
9950
                goto endjob;
C
Chris Lalancette 已提交
9951 9952 9953 9954 9955 9956 9957 9958 9959 9960 9961 9962 9963 9964 9965 9966 9967 9968
        }

        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)) {
9969
            qemudShutdownVMDaemon(driver, vm, 0);
9970
            qemuDomainStopAudit(vm, "from-snapshot");
C
Chris Lalancette 已提交
9971 9972 9973
            event = virDomainEventNewFromObj(vm,
                                             VIR_DOMAIN_EVENT_STOPPED,
                                             VIR_DOMAIN_EVENT_STOPPED_FROM_SNAPSHOT);
9974 9975 9976 9977
            if (!vm->persistent) {
                if (qemuDomainObjEndJob(vm) > 0)
                    virDomainRemoveInactive(&driver->domains, vm);
                vm = NULL;
9978
                goto cleanup;
9979
            }
C
Chris Lalancette 已提交
9980 9981
        }

9982
        if (qemuDomainSnapshotSetCurrentActive(vm, driver->snapshotDir) < 0)
9983
            goto endjob;
C
Chris Lalancette 已提交
9984 9985 9986 9987 9988 9989
    }

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

    ret = 0;

9990
endjob:
C
Chris Lalancette 已提交
9991 9992 9993
    if (vm && qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

9994
cleanup:
C
Chris Lalancette 已提交
9995 9996 9997 9998 9999 10000 10001 10002 10003 10004 10005 10006 10007 10008 10009 10010 10011 10012 10013 10014 10015 10016 10017 10018 10019 10020 10021 10022 10023 10024 10025 10026 10027 10028 10029 10030 10031 10032 10033 10034 10035 10036 10037 10038 10039 10040 10041 10042 10043 10044 10045 10046 10047 10048 10049 10050 10051 10052 10053 10054 10055 10056 10057 10058 10059 10060 10061 10062 10063 10064 10065 10066 10067 10068 10069 10070 10071 10072 10073 10074 10075 10076 10077 10078 10079 10080 10081 10082 10083 10084 10085 10086 10087 10088 10089 10090 10091 10092 10093 10094 10095 10096 10097 10098 10099 10100 10101 10102 10103 10104 10105 10106 10107 10108 10109 10110 10111 10112 10113 10114 10115 10116 10117 10118
    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,
                                              const char *name ATTRIBUTE_UNUSED,
                                              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);
    }
}

10119 10120 10121 10122 10123 10124 10125 10126 10127 10128 10129 10130 10131 10132 10133 10134 10135 10136 10137 10138 10139 10140 10141 10142 10143 10144 10145 10146 10147 10148 10149 10150 10151 10152 10153 10154 10155
struct snap_reparent {
    struct qemud_driver *driver;
    virDomainSnapshotObjPtr snap;
    virDomainObjPtr vm;
    int err;
};

static void
qemuDomainSnapshotReparentChildren(void *payload,
                                   const char *name ATTRIBUTE_UNUSED,
                                   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 已提交
10156 10157 10158 10159 10160 10161 10162 10163 10164
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;
10165
    struct snap_reparent rep;
C
Chris Lalancette 已提交
10166

10167 10168
    virCheckFlags(VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN, -1);

C
Chris Lalancette 已提交
10169 10170 10171 10172 10173 10174 10175 10176 10177 10178 10179 10180 10181 10182 10183 10184 10185
    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;
    }

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

C
Chris Lalancette 已提交
10189 10190 10191 10192 10193 10194 10195 10196
    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)
10197
            goto endjob;
10198 10199 10200 10201 10202 10203 10204 10205 10206
    } 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 已提交
10207 10208 10209 10210
    }

    ret = qemuDomainSnapshotDiscard(driver, vm, snap);

10211 10212 10213 10214
endjob:
    if (qemuDomainObjEndJob(vm) == 0)
        vm = NULL;

C
Chris Lalancette 已提交
10215 10216 10217 10218 10219 10220
cleanup:
    if (vm)
        virDomainObjUnlock(vm);
    qemuDriverUnlock(driver);
    return ret;
}
10221

10222 10223 10224 10225 10226 10227 10228 10229 10230 10231 10232 10233 10234 10235 10236 10237 10238 10239 10240 10241 10242 10243 10244 10245 10246 10247 10248 10249 10250 10251 10252 10253 10254 10255 10256 10257 10258 10259 10260 10261 10262 10263 10264 10265 10266 10267 10268 10269 10270 10271 10272
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;

    virCheckFlags(0, -1);

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

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

    priv = vm->privateData;

    if (!priv->monitor_warned) {
        VIR_INFO("Qemu monitor command '%s' executed; libvirt results may be unpredictable!",
                 cmd);
        priv->monitor_warned = 1;
    }

    if (qemuDomainObjBeginJobWithDriver(driver, vm) < 0)
        goto cleanup;
    qemuDomainObjEnterMonitorWithDriver(driver, vm);
    ret = qemuMonitorArbitraryCommand(priv->mon, cmd, result);
    qemuDomainObjExitMonitorWithDriver(driver, vm);
    if (qemuDomainObjEndJob(vm) == 0) {
        vm = NULL;
        goto cleanup;
    }

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

10273 10274 10275 10276 10277 10278 10279 10280 10281 10282 10283 10284 10285 10286 10287 10288 10289 10290 10291 10292 10293 10294 10295 10296 10297 10298 10299 10300 10301 10302 10303 10304 10305 10306 10307 10308 10309 10310 10311 10312 10313 10314 10315 10316 10317 10318 10319 10320 10321 10322 10323 10324 10325 10326 10327 10328 10329

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

10330
    if (chr->source.type != VIR_DOMAIN_CHR_TYPE_PTY) {
10331 10332 10333 10334 10335 10336
        qemuReportError(VIR_ERR_INTERNAL_ERROR,
                        _("character device %s is not using a PTY"),
                        NULLSTR(devname));
        goto cleanup;
    }

10337
    if (virFDStreamOpenFile(st, chr->source.data.file.path, O_RDWR) < 0)
10338 10339 10340 10341 10342 10343 10344 10345 10346 10347 10348
        goto cleanup;

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


10349 10350 10351 10352 10353
static virDriver qemuDriver = {
    VIR_DRV_QEMU,
    "QEMU",
    qemudOpen, /* open */
    qemudClose, /* close */
D
Daniel Veillard 已提交
10354
    qemudSupportsFeature, /* supports_feature */
10355 10356
    qemudGetType, /* type */
    qemudGetVersion, /* version */
10357
    NULL, /* libvirtVersion (impl. in libvirt.c) */
10358
    virGetHostname, /* getHostname */
10359
    qemudGetMaxVCPUs, /* getMaxVcpus */
10360
    nodeGetInfo, /* nodeGetInfo */
10361 10362 10363
    qemudGetCapabilities, /* getCapabilities */
    qemudListDomains, /* listDomains */
    qemudNumDomains, /* numOfDomains */
10364
    qemudDomainCreate, /* domainCreateXML */
10365 10366 10367 10368 10369
    qemudDomainLookupByID, /* domainLookupByID */
    qemudDomainLookupByUUID, /* domainLookupByUUID */
    qemudDomainLookupByName, /* domainLookupByName */
    qemudDomainSuspend, /* domainSuspend */
    qemudDomainResume, /* domainResume */
10370
    qemudDomainShutdown, /* domainShutdown */
10371 10372 10373
    NULL, /* domainReboot */
    qemudDomainDestroy, /* domainDestroy */
    qemudDomainGetOSType, /* domainGetOSType */
10374
    qemudDomainGetMaxMemory, /* domainGetMaxMemory */
10375
    NULL, /* domainSetMaxMemory */
10376
    qemudDomainSetMemory, /* domainSetMemory */
10377 10378 10379
    qemudDomainGetInfo, /* domainGetInfo */
    qemudDomainSave, /* domainSave */
    qemudDomainRestore, /* domainRestore */
P
Paolo Bonzini 已提交
10380
    qemudDomainCoreDump, /* domainCoreDump */
10381
    qemudDomainSetVcpus, /* domainSetVcpus */
10382 10383
    qemudDomainSetVcpusFlags, /* domainSetVcpusFlags */
    qemudDomainGetVcpusFlags, /* domainGetVcpusFlags */
10384 10385
    qemudDomainPinVcpu, /* domainPinVcpu */
    qemudDomainGetVcpus, /* domainGetVcpus */
10386
    qemudDomainGetMaxVcpus, /* domainGetMaxVcpus */
10387 10388
    qemudDomainGetSecurityLabel, /* domainGetSecurityLabel */
    qemudNodeGetSecurityModel, /* nodeGetSecurityModel */
10389
    qemudDomainDumpXML, /* domainDumpXML */
10390
    qemuDomainXMLFromNative, /* domainXmlFromNative */
10391
    qemuDomainXMLToNative, /* domainXMLToNative */
10392 10393
    qemudListDefinedDomains, /* listDefinedDomains */
    qemudNumDefinedDomains, /* numOfDefinedDomains */
10394
    qemudDomainStart, /* domainCreate */
10395
    qemudDomainStartWithFlags, /* domainCreateWithFlags */
10396 10397
    qemudDomainDefine, /* domainDefineXML */
    qemudDomainUndefine, /* domainUndefine */
10398
    qemudDomainAttachDevice, /* domainAttachDevice */
10399
    qemudDomainAttachDeviceFlags, /* domainAttachDeviceFlags */
10400
    qemudDomainDetachDevice, /* domainDetachDevice */
10401
    qemudDomainDetachDeviceFlags, /* domainDetachDeviceFlags */
10402
    qemuDomainUpdateDeviceFlags, /* domainUpdateDeviceFlags */
10403 10404
    qemudDomainGetAutostart, /* domainGetAutostart */
    qemudDomainSetAutostart, /* domainSetAutostart */
10405 10406 10407
    qemuGetSchedulerType, /* domainGetSchedulerType */
    qemuGetSchedulerParameters, /* domainGetSchedulerParameters */
    qemuSetSchedulerParameters, /* domainSetSchedulerParameters */
D
Daniel Veillard 已提交
10408 10409
    NULL, /* domainMigratePrepare (v1) */
    qemudDomainMigratePerform, /* domainMigratePerform */
10410
    NULL, /* domainMigrateFinish */
10411
    qemudDomainBlockStats, /* domainBlockStats */
10412
    qemudDomainInterfaceStats, /* domainInterfaceStats */
10413
    qemudDomainMemoryStats, /* domainMemoryStats */
10414
    qemudDomainBlockPeek, /* domainBlockPeek */
R
Richard W.M. Jones 已提交
10415
    qemudDomainMemoryPeek, /* domainMemoryPeek */
10416
    qemuDomainGetBlockInfo, /* domainGetBlockInfo */
10417 10418
    nodeGetCellsFreeMemory, /* nodeGetCellsFreeMemory */
    nodeGetFreeMemory,  /* getFreeMemory */
10419 10420
    qemuDomainEventRegister, /* domainEventRegister */
    qemuDomainEventDeregister, /* domainEventDeregister */
D
Daniel Veillard 已提交
10421 10422
    qemudDomainMigratePrepare2, /* domainMigratePrepare2 */
    qemudDomainMigrateFinish2, /* domainMigrateFinish2 */
10423 10424 10425
    qemudNodeDeviceDettach, /* nodeDeviceDettach */
    qemudNodeDeviceReAttach, /* nodeDeviceReAttach */
    qemudNodeDeviceReset, /* nodeDeviceReset */
C
Chris Lalancette 已提交
10426
    qemudDomainMigratePrepareTunnel, /* domainMigratePrepareTunnel */
10427 10428 10429 10430
    qemuIsEncrypted, /* isEncrypted */
    qemuIsSecure, /* isSecure */
    qemuDomainIsActive, /* domainIsActive */
    qemuDomainIsPersistent, /* domainIsPersistent */
10431
    qemuDomainIsUpdated, /* domainIsUpdated */
10432
    qemuCPUCompare, /* cpuCompare */
10433
    qemuCPUBaseline, /* cpuBaseline */
10434
    qemuDomainGetJobInfo, /* domainGetJobInfo */
10435
    qemuDomainAbortJob, /* domainAbortJob */
10436
    qemuDomainMigrateSetMaxDowntime, /* domainMigrateSetMaxDowntime */
10437 10438
    qemuDomainEventRegisterAny, /* domainEventRegisterAny */
    qemuDomainEventDeregisterAny, /* domainEventDeregisterAny */
10439 10440 10441
    qemuDomainManagedSave, /* domainManagedSave */
    qemuDomainHasManagedSaveImage, /* domainHasManagedSaveImage */
    qemuDomainManagedSaveRemove, /* domainManagedSaveRemove */
C
Chris Lalancette 已提交
10442 10443 10444 10445 10446 10447 10448 10449 10450
    qemuDomainSnapshotCreateXML, /* domainSnapshotCreateXML */
    qemuDomainSnapshotDumpXML, /* domainSnapshotDumpXML */
    qemuDomainSnapshotNum, /* domainSnapshotNum */
    qemuDomainSnapshotListNames, /* domainSnapshotListNames */
    qemuDomainSnapshotLookupByName, /* domainSnapshotLookupByName */
    qemuDomainHasCurrentSnapshot, /* domainHasCurrentSnapshot */
    qemuDomainSnapshotCurrent, /* domainSnapshotCurrent */
    qemuDomainRevertToSnapshot, /* domainRevertToSnapshot */
    qemuDomainSnapshotDelete, /* domainSnapshotDelete */
10451
    qemuDomainMonitorCommand, /* qemuDomainMonitorCommand */
10452
    qemuDomainSetMemoryParameters, /* domainSetMemoryParameters */
10453
    qemuDomainGetMemoryParameters, /* domainGetMemoryParameters */
10454
    qemuDomainOpenConsole, /* domainOpenConsole */
10455 10456 10457
};


10458
static virStateDriver qemuStateDriver = {
10459
    .name = "QEMU",
10460 10461 10462 10463
    .initialize = qemudStartup,
    .cleanup = qemudShutdown,
    .reload = qemudReload,
    .active = qemudActive,
10464
};
10465

S
Stefan Berger 已提交
10466
static int
10467
qemudVMFilterRebuild(virConnectPtr conn ATTRIBUTE_UNUSED,
S
Stefan Berger 已提交
10468 10469 10470
                     virHashIterator iter, void *data)
{
    virHashForEach(qemu_driver->domains.objs, iter, data);
10471

S
Stefan Berger 已提交
10472 10473 10474
    return 0;
}

10475 10476 10477 10478 10479 10480 10481 10482 10483 10484 10485 10486 10487 10488 10489 10490 10491 10492 10493 10494 10495 10496
static int
qemudVMFiltersInstantiate(virConnectPtr conn,
                          virDomainDefPtr def)
{
    int err = 0;
    int i;

    if (!conn)
        return 1;

    for (i = 0 ; i < def->nnets ; i++) {
        virDomainNetDefPtr net = def->nets[i];
        if ((net->filter) && (net->ifname)) {
           if (virDomainConfNWFilterInstantiate(conn, net)) {
                err = 1;
                break;
            }
        }
    }

    return err;
}
S
Stefan Berger 已提交
10497

10498 10499 10500 10501 10502 10503 10504 10505 10506 10507 10508 10509 10510

static void
qemudVMDriverLock(void) {
    qemuDriverLock(qemu_driver);
};


static void
qemudVMDriverUnlock(void) {
    qemuDriverUnlock(qemu_driver);
};


S
Stefan Berger 已提交
10511 10512 10513
static virNWFilterCallbackDriver qemuCallbackDriver = {
    .name = "QEMU",
    .vmFilterRebuild = qemudVMFilterRebuild,
10514 10515
    .vmDriverLock = qemudVMDriverLock,
    .vmDriverUnlock = qemudVMDriverUnlock,
S
Stefan Berger 已提交
10516 10517
};

10518
int qemuRegister(void) {
10519 10520
    virRegisterDriver(&qemuDriver);
    virRegisterStateDriver(&qemuStateDriver);
S
Stefan Berger 已提交
10521
    virNWFilterRegisterCallbackDriver(&qemuCallbackDriver);
10522 10523
    return 0;
}