qemu_domain.c 88.3 KB
Newer Older
1
/*
2
 * qemu_domain.c: QEMU domain private state
3
 *
4
 * Copyright (C) 2006-2014 Red Hat, Inc.
5 6 7 8 9 10 11 12 13 14 15 16 17
 * 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
18
 * License along with this library.  If not, see
O
Osier Yang 已提交
19
 * <http://www.gnu.org/licenses/>.
20 21 22 23 24 25 26 27
 *
 * Author: Daniel P. Berrange <berrange@redhat.com>
 */

#include <config.h>

#include "qemu_domain.h"
#include "qemu_command.h"
28
#include "qemu_capabilities.h"
29
#include "qemu_migration.h"
30
#include "viralloc.h"
31
#include "virlog.h"
32
#include "virerror.h"
33
#include "c-ctype.h"
34
#include "cpu/cpu.h"
35
#include "viruuid.h"
E
Eric Blake 已提交
36
#include "virfile.h"
37
#include "domain_addr.h"
38
#include "domain_event.h"
39
#include "virtime.h"
40
#include "virstoragefile.h"
41
#include "virstring.h"
42

43 44
#include "storage/storage_driver.h"

45
#include <sys/time.h>
46
#include <fcntl.h>
47

48 49 50 51
#include <libxml/xpathInternals.h>

#define VIR_FROM_THIS VIR_FROM_QEMU

52 53
VIR_LOG_INIT("qemu.qemu_domain");

54 55
#define QEMU_NAMESPACE_HREF "http://libvirt.org/schemas/domain/qemu/1.0"

56 57 58 59 60 61
VIR_ENUM_IMPL(qemuDomainJob, QEMU_JOB_LAST,
              "none",
              "query",
              "destroy",
              "suspend",
              "modify",
62
              "abort",
63
              "migration operation",
64 65 66 67 68 69 70 71 72 73
              "none",   /* async job is never stored in job.active */
              "async nested",
);

VIR_ENUM_IMPL(qemuDomainAsyncJob, QEMU_ASYNC_JOB_LAST,
              "none",
              "migration out",
              "migration in",
              "save",
              "dump",
74
              "snapshot",
75 76
);

77

J
Jiri Denemark 已提交
78
const char *
79
qemuDomainAsyncJobPhaseToString(qemuDomainAsyncJob job,
J
Jiri Denemark 已提交
80 81 82 83 84
                                int phase ATTRIBUTE_UNUSED)
{
    switch (job) {
    case QEMU_ASYNC_JOB_MIGRATION_OUT:
    case QEMU_ASYNC_JOB_MIGRATION_IN:
85 86
        return qemuMigrationJobPhaseTypeToString(phase);

J
Jiri Denemark 已提交
87 88
    case QEMU_ASYNC_JOB_SAVE:
    case QEMU_ASYNC_JOB_DUMP:
89
    case QEMU_ASYNC_JOB_SNAPSHOT:
J
Jiri Denemark 已提交
90 91 92 93 94 95 96 97 98
    case QEMU_ASYNC_JOB_NONE:
    case QEMU_ASYNC_JOB_LAST:
        ; /* fall through */
    }

    return "none";
}

int
99
qemuDomainAsyncJobPhaseFromString(qemuDomainAsyncJob job,
J
Jiri Denemark 已提交
100 101 102 103 104 105 106 107
                                  const char *phase)
{
    if (!phase)
        return 0;

    switch (job) {
    case QEMU_ASYNC_JOB_MIGRATION_OUT:
    case QEMU_ASYNC_JOB_MIGRATION_IN:
108 109
        return qemuMigrationJobPhaseTypeFromString(phase);

J
Jiri Denemark 已提交
110 111
    case QEMU_ASYNC_JOB_SAVE:
    case QEMU_ASYNC_JOB_DUMP:
112
    case QEMU_ASYNC_JOB_SNAPSHOT:
J
Jiri Denemark 已提交
113 114 115 116 117 118 119 120 121 122 123
    case QEMU_ASYNC_JOB_NONE:
    case QEMU_ASYNC_JOB_LAST:
        ; /* fall through */
    }

    if (STREQ(phase, "none"))
        return 0;
    else
        return -1;
}

124

125
void qemuDomainEventQueue(virQEMUDriverPtr driver,
126
                          virObjectEventPtr event)
127
{
128
    virObjectEventStateQueue(driver->domainEventState, event);
129 130 131
}


132 133 134 135 136 137 138 139
static int
qemuDomainObjInitJob(qemuDomainObjPrivatePtr priv)
{
    memset(&priv->job, 0, sizeof(priv->job));

    if (virCondInit(&priv->job.cond) < 0)
        return -1;

140
    if (virCondInit(&priv->job.asyncCond) < 0) {
141
        virCondDestroy(&priv->job.cond);
142 143 144
        return -1;
    }

145 146 147 148 149 150 151 152 153
    return 0;
}

static void
qemuDomainObjResetJob(qemuDomainObjPrivatePtr priv)
{
    struct qemuDomainJobObj *job = &priv->job;

    job->active = QEMU_JOB_NONE;
154
    job->owner = 0;
155 156 157 158 159 160 161 162
}

static void
qemuDomainObjResetAsyncJob(qemuDomainObjPrivatePtr priv)
{
    struct qemuDomainJobObj *job = &priv->job;

    job->asyncJob = QEMU_ASYNC_JOB_NONE;
163
    job->asyncOwner = 0;
J
Jiri Denemark 已提交
164
    job->phase = 0;
165
    job->mask = QEMU_JOB_DEFAULT_MASK;
166
    job->dump_memory_only = false;
167
    job->asyncAbort = false;
J
Jiri Denemark 已提交
168
    VIR_FREE(job->current);
169 170
}

171 172 173 174 175 176 177 178
void
qemuDomainObjRestoreJob(virDomainObjPtr obj,
                        struct qemuDomainJobObj *job)
{
    qemuDomainObjPrivatePtr priv = obj->privateData;

    memset(job, 0, sizeof(*job));
    job->active = priv->job.active;
179
    job->owner = priv->job.owner;
180
    job->asyncJob = priv->job.asyncJob;
181
    job->asyncOwner = priv->job.asyncOwner;
J
Jiri Denemark 已提交
182
    job->phase = priv->job.phase;
183 184 185 186 187

    qemuDomainObjResetJob(priv);
    qemuDomainObjResetAsyncJob(priv);
}

188 189 190
static void
qemuDomainObjFreeJob(qemuDomainObjPrivatePtr priv)
{
J
Jiri Denemark 已提交
191
    VIR_FREE(priv->job.current);
192
    VIR_FREE(priv->job.completed);
193 194
    virCondDestroy(&priv->job.cond);
    virCondDestroy(&priv->job.asyncCond);
195 196
}

197
static bool
198
qemuDomainTrackJob(qemuDomainJob job)
199 200 201 202
{
    return (QEMU_DOMAIN_TRACK_JOBS & JOB_MASK(job)) != 0;
}

203

J
Jiri Denemark 已提交
204 205 206 207 208 209 210 211 212 213 214
int
qemuDomainJobInfoUpdateTime(qemuDomainJobInfoPtr jobInfo)
{
    unsigned long long now;

    if (!jobInfo->started)
        return 0;

    if (virTimeMillisNow(&now) < 0)
        return -1;

215 216 217 218 219 220
    if (now < jobInfo->started) {
        VIR_WARN("Async job starts in the future");
        jobInfo->started = 0;
        return 0;
    }

J
Jiri Denemark 已提交
221 222 223 224
    jobInfo->timeElapsed = now - jobInfo->started;
    return 0;
}

225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246
int
qemuDomainJobInfoUpdateDowntime(qemuDomainJobInfoPtr jobInfo)
{
    unsigned long long now;

    if (!jobInfo->stopped)
        return 0;

    if (virTimeMillisNow(&now) < 0)
        return -1;

    if (now < jobInfo->stopped) {
        VIR_WARN("Guest's CPUs stopped in the future");
        jobInfo->stopped = 0;
        return 0;
    }

    jobInfo->status.downtime = now - jobInfo->stopped;
    jobInfo->status.downtime_set = true;
    return 0;
}

J
Jiri Denemark 已提交
247 248 249 250
int
qemuDomainJobInfoToInfo(qemuDomainJobInfoPtr jobInfo,
                        virDomainJobInfoPtr info)
{
251
    info->type = jobInfo->type;
J
Jiri Denemark 已提交
252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297
    info->timeElapsed = jobInfo->timeElapsed;
    info->timeRemaining = jobInfo->timeRemaining;

    info->memTotal = jobInfo->status.ram_total;
    info->memRemaining = jobInfo->status.ram_remaining;
    info->memProcessed = jobInfo->status.ram_transferred;

    info->fileTotal = jobInfo->status.disk_total;
    info->fileRemaining = jobInfo->status.disk_remaining;
    info->fileProcessed = jobInfo->status.disk_transferred;

    info->dataTotal = info->memTotal + info->fileTotal;
    info->dataRemaining = info->memRemaining + info->fileRemaining;
    info->dataProcessed = info->memProcessed + info->fileProcessed;

    return 0;
}

int
qemuDomainJobInfoToParams(qemuDomainJobInfoPtr jobInfo,
                          int *type,
                          virTypedParameterPtr *params,
                          int *nparams)
{
    qemuMonitorMigrationStatus *status = &jobInfo->status;
    virTypedParameterPtr par = NULL;
    int maxpar = 0;
    int npar = 0;

    if (virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_TIME_ELAPSED,
                                jobInfo->timeElapsed) < 0)
        goto error;

    if (jobInfo->type == VIR_DOMAIN_JOB_BOUNDED &&
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_TIME_REMAINING,
                                jobInfo->timeRemaining) < 0)
        goto error;

    if (status->downtime_set &&
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_DOWNTIME,
                                status->downtime) < 0)
        goto error;

298 299 300 301 302 303
    if (status->setup_time_set &&
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_SETUP_TIME,
                                status->setup_time) < 0)
        goto error;

J
Jiri Denemark 已提交
304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328
    if (virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_DATA_TOTAL,
                                status->ram_total +
                                status->disk_total) < 0 ||
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_DATA_PROCESSED,
                                status->ram_transferred +
                                status->disk_transferred) < 0 ||
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_DATA_REMAINING,
                                status->ram_remaining +
                                status->disk_remaining) < 0)
        goto error;

    if (virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_MEMORY_TOTAL,
                                status->ram_total) < 0 ||
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_MEMORY_PROCESSED,
                                status->ram_transferred) < 0 ||
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_MEMORY_REMAINING,
                                status->ram_remaining) < 0)
        goto error;

329 330 331 332 333 334
    if (status->ram_bps &&
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_MEMORY_BPS,
                                status->ram_bps) < 0)
        goto error;

J
Jiri Denemark 已提交
335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358
    if (status->ram_duplicate_set) {
        if (virTypedParamsAddULLong(&par, &npar, &maxpar,
                                    VIR_DOMAIN_JOB_MEMORY_CONSTANT,
                                    status->ram_duplicate) < 0 ||
            virTypedParamsAddULLong(&par, &npar, &maxpar,
                                    VIR_DOMAIN_JOB_MEMORY_NORMAL,
                                    status->ram_normal) < 0 ||
            virTypedParamsAddULLong(&par, &npar, &maxpar,
                                    VIR_DOMAIN_JOB_MEMORY_NORMAL_BYTES,
                                    status->ram_normal_bytes) < 0)
            goto error;
    }

    if (virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_DISK_TOTAL,
                                status->disk_total) < 0 ||
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_DISK_PROCESSED,
                                status->disk_transferred) < 0 ||
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_DISK_REMAINING,
                                status->disk_remaining) < 0)
        goto error;

359 360 361 362 363 364
    if (status->disk_bps &&
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_DISK_BPS,
                                status->disk_bps) < 0)
        goto error;

J
Jiri Denemark 已提交
365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394
    if (status->xbzrle_set) {
        if (virTypedParamsAddULLong(&par, &npar, &maxpar,
                                    VIR_DOMAIN_JOB_COMPRESSION_CACHE,
                                    status->xbzrle_cache_size) < 0 ||
            virTypedParamsAddULLong(&par, &npar, &maxpar,
                                    VIR_DOMAIN_JOB_COMPRESSION_BYTES,
                                    status->xbzrle_bytes) < 0 ||
            virTypedParamsAddULLong(&par, &npar, &maxpar,
                                    VIR_DOMAIN_JOB_COMPRESSION_PAGES,
                                    status->xbzrle_pages) < 0 ||
            virTypedParamsAddULLong(&par, &npar, &maxpar,
                                    VIR_DOMAIN_JOB_COMPRESSION_CACHE_MISSES,
                                    status->xbzrle_cache_miss) < 0 ||
            virTypedParamsAddULLong(&par, &npar, &maxpar,
                                    VIR_DOMAIN_JOB_COMPRESSION_OVERFLOW,
                                    status->xbzrle_overflow) < 0)
            goto error;
    }

    *type = jobInfo->type;
    *params = par;
    *nparams = npar;
    return 0;

 error:
    virTypedParamsFree(par, npar);
    return -1;
}


395 396
static void *
qemuDomainObjPrivateAlloc(void)
397 398 399 400 401 402
{
    qemuDomainObjPrivatePtr priv;

    if (VIR_ALLOC(priv) < 0)
        return NULL;

403 404 405
    if (qemuDomainObjInitJob(priv) < 0) {
        virReportSystemError(errno, "%s",
                             _("Unable to init qemu driver mutexes"));
406
        goto error;
407
    }
408

409 410 411
    if (virCondInit(&priv->unplugFinished) < 0)
        goto error;

412
    if (!(priv->devs = virChrdevAlloc()))
413 414
        goto error;

415
    priv->migMaxBandwidth = QEMU_DOMAIN_MIG_BANDWIDTH_MAX;
416

417
    return priv;
418

419
 error:
420 421
    VIR_FREE(priv);
    return NULL;
422 423
}

424 425
static void
qemuDomainObjPrivateFree(void *data)
426 427 428
{
    qemuDomainObjPrivatePtr priv = data;

429
    virObjectUnref(priv->qemuCaps);
430

431
    virCgroupFree(&priv->cgroup);
432
    virDomainPCIAddressSetFree(priv->pciaddrs);
J
Ján Tomko 已提交
433
    virDomainCCWAddressSetFree(priv->ccwaddrs);
434
    virDomainChrSourceDefFree(priv->monConfig);
435
    qemuDomainObjFreeJob(priv);
436
    VIR_FREE(priv->vcpupids);
437
    VIR_FREE(priv->iothreadpids);
438
    VIR_FREE(priv->lockState);
J
Jiri Denemark 已提交
439
    VIR_FREE(priv->origname);
440

441
    virCondDestroy(&priv->unplugFinished);
442
    virChrdevFree(priv->devs);
443

444 445
    /* This should never be non-NULL if we get here, but just in case... */
    if (priv->mon) {
446
        VIR_ERROR(_("Unexpected QEMU monitor still active during domain deletion"));
447 448
        qemuMonitorClose(priv->mon);
    }
D
Daniel P. Berrange 已提交
449 450 451 452
    if (priv->agent) {
        VIR_ERROR(_("Unexpected QEMU agent still active during domain deletion"));
        qemuAgentClose(priv->agent);
    }
453
    VIR_FREE(priv->cleanupCallbacks);
454
    virBitmapFree(priv->autoNodeset);
455 456 457 458
    VIR_FREE(priv);
}


459 460
static int
qemuDomainObjPrivateXMLFormat(virBufferPtr buf, void *data)
461 462 463
{
    qemuDomainObjPrivatePtr priv = data;
    const char *monitorpath;
464
    qemuDomainJob job;
465 466 467

    /* priv->monitor_chr is set only for qemu */
    if (priv->monConfig) {
468
        switch (priv->monConfig->type) {
469
        case VIR_DOMAIN_CHR_TYPE_UNIX:
470
            monitorpath = priv->monConfig->data.nix.path;
471 472 473
            break;
        default:
        case VIR_DOMAIN_CHR_TYPE_PTY:
474
            monitorpath = priv->monConfig->data.file.path;
475 476 477
            break;
        }

478
        virBufferEscapeString(buf, "<monitor path='%s'", monitorpath);
479 480
        if (priv->monJSON)
            virBufferAddLit(buf, " json='1'");
481
        virBufferAsprintf(buf, " type='%s'/>\n",
482
                          virDomainChrTypeToString(priv->monConfig->type));
483 484 485 486
    }


    if (priv->nvcpupids) {
487
        size_t i;
488 489
        virBufferAddLit(buf, "<vcpus>\n");
        virBufferAdjustIndent(buf, 2);
490
        for (i = 0; i < priv->nvcpupids; i++)
491 492 493
            virBufferAsprintf(buf, "<vcpu pid='%d'/>\n", priv->vcpupids[i]);
        virBufferAdjustIndent(buf, -2);
        virBufferAddLit(buf, "</vcpus>\n");
494 495
    }

496 497 498 499 500 501 502 503 504 505 506 507
    if (priv->niothreadpids) {
        size_t i;
        virBufferAddLit(buf, "<iothreads>\n");
        virBufferAdjustIndent(buf, 2);
        for (i = 0; i < priv->niothreadpids; i++) {
            virBufferAsprintf(buf, "<iothread pid='%d'/>\n",
                              priv->iothreadpids[i]);
        }
        virBufferAdjustIndent(buf, -2);
        virBufferAddLit(buf, "</iothreads>\n");
    }

508
    if (priv->qemuCaps) {
509
        size_t i;
510 511
        virBufferAddLit(buf, "<qemuCaps>\n");
        virBufferAdjustIndent(buf, 2);
512
        for (i = 0; i < QEMU_CAPS_LAST; i++) {
513
            if (virQEMUCapsGet(priv->qemuCaps, i)) {
514
                virBufferAsprintf(buf, "<flag name='%s'/>\n",
515
                                  virQEMUCapsTypeToString(i));
516 517
            }
        }
518 519
        virBufferAdjustIndent(buf, -2);
        virBufferAddLit(buf, "</qemuCaps>\n");
520 521
    }

522
    if (priv->lockState)
523
        virBufferAsprintf(buf, "<lockstate>%s</lockstate>\n", priv->lockState);
524

525 526 527 528
    job = priv->job.active;
    if (!qemuDomainTrackJob(job))
        priv->job.active = QEMU_JOB_NONE;

529
    if (priv->job.active || priv->job.asyncJob) {
530
        virBufferAsprintf(buf, "<job type='%s' async='%s'",
531 532
                          qemuDomainJobTypeToString(priv->job.active),
                          qemuDomainAsyncJobTypeToString(priv->job.asyncJob));
J
Jiri Denemark 已提交
533 534 535 536 537 538
        if (priv->job.phase) {
            virBufferAsprintf(buf, " phase='%s'",
                              qemuDomainAsyncJobPhaseToString(
                                    priv->job.asyncJob, priv->job.phase));
        }
        virBufferAddLit(buf, "/>\n");
539
    }
540
    priv->job.active = job;
541

542
    if (priv->fakeReboot)
543
        virBufferAddLit(buf, "<fakereboot/>\n");
544

545 546
    if (priv->qemuDevices && *priv->qemuDevices) {
        char **tmp = priv->qemuDevices;
547 548
        virBufferAddLit(buf, "<devices>\n");
        virBufferAdjustIndent(buf, 2);
549
        while (*tmp) {
550
            virBufferAsprintf(buf, "<device alias='%s'/>\n", *tmp);
551 552
            tmp++;
        }
553 554
        virBufferAdjustIndent(buf, -2);
        virBufferAddLit(buf, "</devices>\n");
555 556
    }

557 558 559
    return 0;
}

560 561
static int
qemuDomainObjPrivateXMLParse(xmlXPathContextPtr ctxt, void *data)
562 563 564 565
{
    qemuDomainObjPrivatePtr priv = data;
    char *monitorpath;
    char *tmp;
566 567
    int n;
    size_t i;
568
    xmlNodePtr *nodes = NULL;
569
    virQEMUCapsPtr qemuCaps = NULL;
570

571
    if (VIR_ALLOC(priv->monConfig) < 0)
572 573 574 575
        goto error;

    if (!(monitorpath =
          virXPathString("string(./monitor[1]/@path)", ctxt))) {
576 577
        virReportError(VIR_ERR_INTERNAL_ERROR,
                       "%s", _("no monitor path"));
578 579 580 581 582
        goto error;
    }

    tmp = virXPathString("string(./monitor[1]/@type)", ctxt);
    if (tmp)
583
        priv->monConfig->type = virDomainChrTypeFromString(tmp);
584
    else
585
        priv->monConfig->type = VIR_DOMAIN_CHR_TYPE_PTY;
586 587
    VIR_FREE(tmp);

E
Eric Blake 已提交
588 589
    priv->monJSON = virXPathBoolean("count(./monitor[@json = '1']) > 0",
                                    ctxt) > 0;
590

591
    switch (priv->monConfig->type) {
592
    case VIR_DOMAIN_CHR_TYPE_PTY:
593
        priv->monConfig->data.file.path = monitorpath;
594 595
        break;
    case VIR_DOMAIN_CHR_TYPE_UNIX:
596
        priv->monConfig->data.nix.path = monitorpath;
597 598 599
        break;
    default:
        VIR_FREE(monitorpath);
600 601 602
        virReportError(VIR_ERR_INTERNAL_ERROR,
                       _("unsupported monitor type '%s'"),
                       virDomainChrTypeToString(priv->monConfig->type));
603 604 605 606 607 608 609 610
        goto error;
    }

    n = virXPathNodeSet("./vcpus/vcpu", ctxt, &nodes);
    if (n < 0)
        goto error;
    if (n) {
        priv->nvcpupids = n;
611
        if (VIR_REALLOC_N(priv->vcpupids, priv->nvcpupids) < 0)
612 613
            goto error;

614
        for (i = 0; i < n; i++) {
615 616 617 618 619 620 621 622 623 624 625 626
            char *pidstr = virXMLPropString(nodes[i], "pid");
            if (!pidstr)
                goto error;

            if (virStrToLong_i(pidstr, NULL, 10, &(priv->vcpupids[i])) < 0) {
                VIR_FREE(pidstr);
                goto error;
            }
            VIR_FREE(pidstr);
        }
        VIR_FREE(nodes);
    }
627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649

    n = virXPathNodeSet("./iothreads/iothread", ctxt, &nodes);
    if (n < 0)
        goto error;
    if (n) {
        priv->niothreadpids = n;
        if (VIR_REALLOC_N(priv->iothreadpids, priv->niothreadpids) < 0)
            goto error;

        for (i = 0; i < n; i++) {
            char *pidstr = virXMLPropString(nodes[i], "pid");
            if (!pidstr)
                goto error;

            if (virStrToLong_i(pidstr, NULL, 10,
                               &(priv->iothreadpids[i])) < 0) {
                VIR_FREE(pidstr);
                goto error;
            }
            VIR_FREE(pidstr);
        }
        VIR_FREE(nodes);
    }
650

651
    if ((n = virXPathNodeSet("./qemuCaps/flag", ctxt, &nodes)) < 0) {
652 653
        virReportError(VIR_ERR_INTERNAL_ERROR,
                       "%s", _("failed to parse qemu capabilities flags"));
654 655 656
        goto error;
    }
    if (n > 0) {
657
        if (!(qemuCaps = virQEMUCapsNew()))
658 659
            goto error;

660
        for (i = 0; i < n; i++) {
661 662
            char *str = virXMLPropString(nodes[i], "name");
            if (str) {
663
                int flag = virQEMUCapsTypeFromString(str);
664
                if (flag < 0) {
665 666
                    virReportError(VIR_ERR_INTERNAL_ERROR,
                                   _("Unknown qemu capabilities flag %s"), str);
667
                    VIR_FREE(str);
668 669
                    goto error;
                }
670
                VIR_FREE(str);
671
                virQEMUCapsSet(qemuCaps, flag);
672 673 674
            }
        }

675
        priv->qemuCaps = qemuCaps;
676 677 678
    }
    VIR_FREE(nodes);

679
    priv->lockState = virXPathString("string(./lockstate)", ctxt);
680

681 682 683 684
    if ((tmp = virXPathString("string(./job[1]/@type)", ctxt))) {
        int type;

        if ((type = qemuDomainJobTypeFromString(tmp)) < 0) {
685 686
            virReportError(VIR_ERR_INTERNAL_ERROR,
                           _("Unknown job type %s"), tmp);
687 688 689 690 691 692 693 694 695 696 697
            VIR_FREE(tmp);
            goto error;
        }
        VIR_FREE(tmp);
        priv->job.active = type;
    }

    if ((tmp = virXPathString("string(./job[1]/@async)", ctxt))) {
        int async;

        if ((async = qemuDomainAsyncJobTypeFromString(tmp)) < 0) {
698 699
            virReportError(VIR_ERR_INTERNAL_ERROR,
                           _("Unknown async job type %s"), tmp);
700 701 702 703 704
            VIR_FREE(tmp);
            goto error;
        }
        VIR_FREE(tmp);
        priv->job.asyncJob = async;
J
Jiri Denemark 已提交
705 706 707 708

        if ((tmp = virXPathString("string(./job[1]/@phase)", ctxt))) {
            priv->job.phase = qemuDomainAsyncJobPhaseFromString(async, tmp);
            if (priv->job.phase < 0) {
709 710
                virReportError(VIR_ERR_INTERNAL_ERROR,
                               _("Unknown job phase %s"), tmp);
J
Jiri Denemark 已提交
711 712 713 714 715
                VIR_FREE(tmp);
                goto error;
            }
            VIR_FREE(tmp);
        }
716 717
    }

718 719
    priv->fakeReboot = virXPathBoolean("boolean(./fakereboot)", ctxt) == 1;

720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740
    if ((n = virXPathNodeSet("./devices/device", ctxt, &nodes)) < 0) {
        virReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                       _("failed to parse qemu device list"));
        goto error;
    }
    if (n > 0) {
        /* NULL-terminated list */
        if (VIR_ALLOC_N(priv->qemuDevices, n + 1) < 0)
            goto error;

        for (i = 0; i < n; i++) {
            priv->qemuDevices[i] = virXMLPropString(nodes[i], "alias");
            if (!priv->qemuDevices[i]) {
                virReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                               _("failed to parse qemu device list"));
                goto error;
            }
        }
    }
    VIR_FREE(nodes);

741 742
    return 0;

743
 error:
744
    virDomainChrSourceDefFree(priv->monConfig);
745 746
    priv->monConfig = NULL;
    VIR_FREE(nodes);
747 748
    virStringFreeList(priv->qemuDevices);
    priv->qemuDevices = NULL;
749
    virObjectUnref(qemuCaps);
750 751 752 753
    return -1;
}


754 755 756 757 758 759 760 761
virDomainXMLPrivateDataCallbacks virQEMUDriverPrivateDataCallbacks = {
    .alloc = qemuDomainObjPrivateAlloc,
    .free = qemuDomainObjPrivateFree,
    .parse = qemuDomainObjPrivateXMLParse,
    .format = qemuDomainObjPrivateXMLFormat,
};


762 763 764 765 766
static void
qemuDomainDefNamespaceFree(void *nsdata)
{
    qemuDomainCmdlineDefPtr cmd = nsdata;

767
    qemuDomainCmdlineDefFree(cmd);
768 769 770
}

static int
P
Philipp Hahn 已提交
771 772
qemuDomainDefNamespaceParse(xmlDocPtr xml ATTRIBUTE_UNUSED,
                            xmlNodePtr root ATTRIBUTE_UNUSED,
773 774 775 776
                            xmlXPathContextPtr ctxt,
                            void **data)
{
    qemuDomainCmdlineDefPtr cmd = NULL;
P
Philipp Hahn 已提交
777
    bool uses_qemu_ns = false;
778
    xmlNodePtr *nodes = NULL;
779 780
    int n;
    size_t i;
781

P
Philipp Hahn 已提交
782
    if (xmlXPathRegisterNs(ctxt, BAD_CAST "qemu", BAD_CAST QEMU_NAMESPACE_HREF) < 0) {
783 784 785
        virReportError(VIR_ERR_INTERNAL_ERROR,
                       _("Failed to register xml namespace '%s'"),
                       QEMU_NAMESPACE_HREF);
786 787 788
        return -1;
    }

789
    if (VIR_ALLOC(cmd) < 0)
790 791 792 793 794 795
        return -1;

    /* first handle the extra command-line arguments */
    n = virXPathNodeSet("./qemu:commandline/qemu:arg", ctxt, &nodes);
    if (n < 0)
        goto error;
P
Philipp Hahn 已提交
796
    uses_qemu_ns |= n > 0;
797 798

    if (n && VIR_ALLOC_N(cmd->args, n) < 0)
799
        goto error;
800 801 802 803

    for (i = 0; i < n; i++) {
        cmd->args[cmd->num_args] = virXMLPropString(nodes[i], "value");
        if (cmd->args[cmd->num_args] == NULL) {
804 805
            virReportError(VIR_ERR_INTERNAL_ERROR,
                           "%s", _("No qemu command-line argument specified"));
806 807 808 809 810 811 812 813 814 815 816
            goto error;
        }
        cmd->num_args++;
    }

    VIR_FREE(nodes);

    /* now handle the extra environment variables */
    n = virXPathNodeSet("./qemu:commandline/qemu:env", ctxt, &nodes);
    if (n < 0)
        goto error;
P
Philipp Hahn 已提交
817
    uses_qemu_ns |= n > 0;
818 819

    if (n && VIR_ALLOC_N(cmd->env_name, n) < 0)
820
        goto error;
821 822

    if (n && VIR_ALLOC_N(cmd->env_value, n) < 0)
823
        goto error;
824 825 826 827 828 829

    for (i = 0; i < n; i++) {
        char *tmp;

        tmp = virXMLPropString(nodes[i], "name");
        if (tmp == NULL) {
830 831
            virReportError(VIR_ERR_INTERNAL_ERROR,
                           "%s", _("No qemu environment name specified"));
832 833 834
            goto error;
        }
        if (tmp[0] == '\0') {
835 836
            virReportError(VIR_ERR_INTERNAL_ERROR,
                           "%s", _("Empty qemu environment name specified"));
837 838 839
            goto error;
        }
        if (!c_isalpha(tmp[0]) && tmp[0] != '_') {
840 841
            virReportError(VIR_ERR_INTERNAL_ERROR,
                           "%s", _("Invalid environment name, it must begin with a letter or underscore"));
842 843 844
            goto error;
        }
        if (strspn(tmp, "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789_") != strlen(tmp)) {
845 846
            virReportError(VIR_ERR_INTERNAL_ERROR,
                           "%s", _("Invalid environment name, it must contain only alphanumerics and underscore"));
847 848 849 850 851 852 853 854 855 856 857 858
            goto error;
        }

        cmd->env_name[cmd->num_env] = tmp;

        cmd->env_value[cmd->num_env] = virXMLPropString(nodes[i], "value");
        /* a NULL value for command is allowed, since it might be empty */
        cmd->num_env++;
    }

    VIR_FREE(nodes);

P
Philipp Hahn 已提交
859 860 861 862
    if (uses_qemu_ns)
        *data = cmd;
    else
        VIR_FREE(cmd);
863 864 865

    return 0;

866
 error:
867 868 869 870 871 872 873 874 875 876
    VIR_FREE(nodes);
    qemuDomainDefNamespaceFree(cmd);
    return -1;
}

static int
qemuDomainDefNamespaceFormatXML(virBufferPtr buf,
                                void *nsdata)
{
    qemuDomainCmdlineDefPtr cmd = nsdata;
877
    size_t i;
878 879 880 881

    if (!cmd->num_args && !cmd->num_env)
        return 0;

882 883 884
    virBufferAddLit(buf, "<qemu:commandline>\n");
    virBufferAdjustIndent(buf, 2);

885
    for (i = 0; i < cmd->num_args; i++)
886
        virBufferEscapeString(buf, "<qemu:arg value='%s'/>\n",
887 888
                              cmd->args[i]);
    for (i = 0; i < cmd->num_env; i++) {
889
        virBufferAsprintf(buf, "<qemu:env name='%s'", cmd->env_name[i]);
890 891 892 893 894
        if (cmd->env_value[i])
            virBufferEscapeString(buf, " value='%s'", cmd->env_value[i]);
        virBufferAddLit(buf, "/>\n");
    }

895 896
    virBufferAdjustIndent(buf, -2);
    virBufferAddLit(buf, "</qemu:commandline>\n");
897 898 899 900 901 902 903 904 905 906
    return 0;
}

static const char *
qemuDomainDefNamespaceHref(void)
{
    return "xmlns:qemu='" QEMU_NAMESPACE_HREF "'";
}


907 908 909 910 911 912
virDomainXMLNamespace virQEMUDriverDomainXMLNamespace = {
    .parse = qemuDomainDefNamespaceParse,
    .free = qemuDomainDefNamespaceFree,
    .format = qemuDomainDefNamespaceFormatXML,
    .href = qemuDomainDefNamespaceHref,
};
913

914

915 916 917 918 919
static int
qemuDomainDefPostParse(virDomainDefPtr def,
                       virCapsPtr caps,
                       void *opaque ATTRIBUTE_UNUSED)
{
920
    bool addDefaultUSB = true;
921
    bool addImplicitSATA = false;
922
    bool addPCIRoot = false;
L
Laine Stump 已提交
923
    bool addPCIeRoot = false;
924
    bool addDefaultMemballoon = true;
925 926
    bool addDefaultUSBKBD = false;
    bool addDefaultUSBMouse = false;
927

J
Ján Tomko 已提交
928 929 930 931 932 933
    if (def->os.bootloader || def->os.bootloaderArgs) {
        virReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                       _("bootloader is not supported by QEMU"));
        return -1;
    }

934 935 936 937 938
    /* check for emulator and create a default one if needed */
    if (!def->emulator &&
        !(def->emulator = virDomainDefGetDefaultEmulator(def, caps)))
        return -1;

939 940 941 942 943 944
    /* Add implicit PCI root controller if the machine has one */
    switch (def->os.arch) {
    case VIR_ARCH_I686:
    case VIR_ARCH_X86_64:
        if (!def->os.machine)
            break;
L
Laine Stump 已提交
945
        if (STREQ(def->os.machine, "isapc")) {
946
            addDefaultUSB = false;
947
            break;
948
        }
L
Laine Stump 已提交
949 950 951 952
        if (STRPREFIX(def->os.machine, "pc-q35") ||
            STREQ(def->os.machine, "q35")) {
           addPCIeRoot = true;
           addDefaultUSB = false;
953
           addImplicitSATA = true;
L
Laine Stump 已提交
954 955
           break;
        }
956 957
        if (!STRPREFIX(def->os.machine, "pc-0.") &&
            !STRPREFIX(def->os.machine, "pc-1.") &&
958
            !STRPREFIX(def->os.machine, "pc-i440") &&
959 960 961 962 963 964
            !STREQ(def->os.machine, "pc") &&
            !STRPREFIX(def->os.machine, "rhel"))
            break;
        addPCIRoot = true;
        break;

965 966
    case VIR_ARCH_ARMV7L:
       addDefaultUSB = false;
967
       addDefaultMemballoon = false;
968
       break;
969 970 971 972
    case VIR_ARCH_AARCH64:
       addDefaultUSB = false;
       addDefaultMemballoon = false;
       break;
973

974
    case VIR_ARCH_PPC64:
975
    case VIR_ARCH_PPC64LE:
976 977 978 979 980
        addPCIRoot = true;
        addDefaultUSBKBD = true;
        addDefaultUSBMouse = true;
        break;

981 982 983 984 985 986 987
    case VIR_ARCH_ALPHA:
    case VIR_ARCH_PPC:
    case VIR_ARCH_PPCEMB:
    case VIR_ARCH_SH4:
    case VIR_ARCH_SH4EB:
        addPCIRoot = true;
        break;
988 989 990 991 992 993
    case VIR_ARCH_S390:
        addDefaultUSB = false;
        break;
    case VIR_ARCH_S390X:
        addDefaultUSB = false;
        break;
994 995 996 997
    default:
        break;
    }

998 999 1000 1001 1002
    if (addDefaultUSB &&
        virDomainDefMaybeAddController(
            def, VIR_DOMAIN_CONTROLLER_TYPE_USB, 0, -1) < 0)
        return -1;

1003 1004 1005 1006 1007
    if (addImplicitSATA &&
        virDomainDefMaybeAddController(
            def, VIR_DOMAIN_CONTROLLER_TYPE_SATA, 0, -1) < 0)
        return -1;

1008 1009 1010 1011 1012 1013
    if (addPCIRoot &&
        virDomainDefMaybeAddController(
            def, VIR_DOMAIN_CONTROLLER_TYPE_PCI, 0,
            VIR_DOMAIN_CONTROLLER_MODEL_PCI_ROOT) < 0)
        return -1;

1014 1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026 1027
    /* When a machine has a pcie-root, make sure that there is always
     * a dmi-to-pci-bridge controller added as bus 1, and a pci-bridge
     * as bus 2, so that standard PCI devices can be connected
     */
    if (addPCIeRoot) {
        if (virDomainDefMaybeAddController(
                def, VIR_DOMAIN_CONTROLLER_TYPE_PCI, 0,
                VIR_DOMAIN_CONTROLLER_MODEL_PCIE_ROOT) < 0 ||
            virDomainDefMaybeAddController(
                def, VIR_DOMAIN_CONTROLLER_TYPE_PCI, 1,
                VIR_DOMAIN_CONTROLLER_MODEL_DMI_TO_PCI_BRIDGE) < 0 ||
            virDomainDefMaybeAddController(
                def, VIR_DOMAIN_CONTROLLER_TYPE_PCI, 2,
                VIR_DOMAIN_CONTROLLER_MODEL_PCI_BRIDGE) < 0) {
L
Laine Stump 已提交
1028
        return -1;
1029 1030
        }
    }
1031

1032
    if (addDefaultMemballoon && !def->memballoon) {
1033 1034 1035 1036 1037 1038 1039 1040
        virDomainMemballoonDefPtr memballoon;
        if (VIR_ALLOC(memballoon) < 0)
            return -1;

        memballoon->model = VIR_DOMAIN_MEMBALLOON_MODEL_VIRTIO;
        def->memballoon = memballoon;
    }

1041 1042 1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054
    if (addDefaultUSBKBD &&
        def->ngraphics > 0 &&
        virDomainDefMaybeAddInput(def,
                                  VIR_DOMAIN_INPUT_TYPE_KBD,
                                  VIR_DOMAIN_INPUT_BUS_USB) < 0)
        return -1;

    if (addDefaultUSBMouse &&
        def->ngraphics > 0 &&
        virDomainDefMaybeAddInput(def,
                                  VIR_DOMAIN_INPUT_TYPE_MOUSE,
                                  VIR_DOMAIN_INPUT_BUS_USB) < 0)
        return -1;

1055 1056 1057
    return 0;
}

1058
static const char *
1059 1060
qemuDomainDefaultNetModel(const virDomainDef *def)
{
1061
    if (ARCH_IS_S390(def->os.arch))
1062 1063
        return "virtio";

1064 1065
    if (def->os.arch == VIR_ARCH_ARMV7L ||
        def->os.arch == VIR_ARCH_AARCH64) {
1066 1067 1068
        if (STREQ(def->os.machine, "versatilepb"))
            return "smc91c111";

1069 1070 1071
        if (STREQ(def->os.machine, "virt"))
            return "virtio";

1072 1073 1074 1075 1076 1077 1078
        /* Incomplete. vexpress (and a few others) use this, but not all
         * arm boards */
        return "lan9118";
    }

    return "rtl8139";
}
1079

1080 1081
static int
qemuDomainDeviceDefPostParse(virDomainDeviceDefPtr dev,
1082
                             const virDomainDef *def,
1083
                             virCapsPtr caps ATTRIBUTE_UNUSED,
1084
                             void *opaque)
1085
{
1086 1087 1088 1089
    int ret = -1;
    virQEMUDriverPtr driver = opaque;
    virQEMUDriverConfigPtr cfg = NULL;

1090
    if (dev->type == VIR_DOMAIN_DEVICE_NET &&
1091 1092
        dev->data.net->type != VIR_DOMAIN_NET_TYPE_HOSTDEV &&
        !dev->data.net->model) {
1093
        if (VIR_STRDUP(dev->data.net->model,
1094
                       qemuDomainDefaultNetModel(def)) < 0)
1095
            goto cleanup;
1096
    }
1097

1098 1099 1100 1101 1102 1103 1104 1105 1106
    /* set default disk types and drivers */
    if (dev->type == VIR_DOMAIN_DEVICE_DISK) {
        virDomainDiskDefPtr disk = dev->data.disk;

        /* both of these require data from the driver config */
        if (driver && (cfg = virQEMUDriverGetConfig(driver))) {
            /* assign default storage format and driver according to config */
            if (cfg->allowDiskFormatProbing) {
                /* default disk format for drives */
1107
                if (virDomainDiskGetFormat(disk) == VIR_STORAGE_FILE_NONE &&
E
Eric Blake 已提交
1108 1109
                    (virDomainDiskGetType(disk) == VIR_STORAGE_TYPE_FILE ||
                     virDomainDiskGetType(disk) == VIR_STORAGE_TYPE_BLOCK))
1110
                    virDomainDiskSetFormat(disk, VIR_STORAGE_FILE_AUTO);
1111 1112 1113

                 /* default disk format for mirrored drive */
                if (disk->mirror &&
1114 1115
                    disk->mirror->format == VIR_STORAGE_FILE_NONE)
                    disk->mirror->format = VIR_STORAGE_FILE_AUTO;
1116 1117
            } else {
                /* default driver if probing is forbidden */
1118 1119
                if (!virDomainDiskGetDriver(disk) &&
                    virDomainDiskSetDriver(disk, "qemu") < 0)
1120
                        goto cleanup;
1121 1122

                /* default disk format for drives */
1123
                if (virDomainDiskGetFormat(disk) == VIR_STORAGE_FILE_NONE &&
E
Eric Blake 已提交
1124 1125
                    (virDomainDiskGetType(disk) == VIR_STORAGE_TYPE_FILE ||
                     virDomainDiskGetType(disk) == VIR_STORAGE_TYPE_BLOCK))
1126
                    virDomainDiskSetFormat(disk, VIR_STORAGE_FILE_RAW);
1127 1128 1129

                 /* default disk format for mirrored drive */
                if (disk->mirror &&
1130 1131
                    disk->mirror->format == VIR_STORAGE_FILE_NONE)
                    disk->mirror->format = VIR_STORAGE_FILE_RAW;
1132
            }
1133 1134 1135
        }
    }

1136 1137 1138 1139
    /* set the default console type for S390 arches */
    if (dev->type == VIR_DOMAIN_DEVICE_CHR &&
        dev->data.chr->deviceType == VIR_DOMAIN_CHR_DEVICE_TYPE_CONSOLE &&
        dev->data.chr->targetType == VIR_DOMAIN_CHR_CONSOLE_TARGET_TYPE_NONE &&
1140
        ARCH_IS_S390(def->os.arch))
1141 1142
        dev->data.chr->targetType = VIR_DOMAIN_CHR_CONSOLE_TARGET_TYPE_VIRTIO;

1143 1144 1145 1146 1147
    /* set the default USB model to none for s390 unless an address is found */
    if (dev->type == VIR_DOMAIN_DEVICE_CONTROLLER &&
        dev->data.controller->type == VIR_DOMAIN_CONTROLLER_TYPE_USB &&
        dev->data.controller->model == -1 &&
        dev->data.controller->info.type == VIR_DOMAIN_DEVICE_ADDRESS_TYPE_NONE &&
1148
        ARCH_IS_S390(def->os.arch))
1149 1150
        dev->data.controller->model = VIR_DOMAIN_CONTROLLER_MODEL_USB_NONE;

1151 1152 1153 1154 1155 1156 1157
    /* set the default SCSI controller model for S390 arches */
    if (dev->type == VIR_DOMAIN_DEVICE_CONTROLLER &&
        dev->data.controller->type == VIR_DOMAIN_CONTROLLER_TYPE_SCSI &&
        dev->data.controller->model == -1 &&
        ARCH_IS_S390(def->os.arch))
        dev->data.controller->model = VIR_DOMAIN_CONTROLLER_MODEL_SCSI_VIRTIO_SCSI;

1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168
    /* auto generate unix socket path */
    if (dev->type == VIR_DOMAIN_DEVICE_CHR &&
        dev->data.chr->deviceType == VIR_DOMAIN_CHR_DEVICE_TYPE_CHANNEL &&
        dev->data.chr->targetType == VIR_DOMAIN_CHR_CHANNEL_TARGET_TYPE_VIRTIO &&
        dev->data.chr->source.type == VIR_DOMAIN_CHR_TYPE_UNIX &&
        !dev->data.chr->source.data.nix.path &&
        (driver && (cfg = virQEMUDriverGetConfig(driver)))) {

        if (virAsprintf(&dev->data.chr->source.data.nix.path,
                        "%s/channel/target/%s.%s",
                        cfg->libDir, def->name,
1169
                        dev->data.chr->target.name) < 0)
1170
            goto cleanup;
1171 1172 1173
        dev->data.chr->source.data.nix.listen = true;
    }

1174 1175 1176 1177 1178 1179 1180 1181 1182 1183
    /* forbid capabilities mode hostdev in this kind of hypervisor */
    if (dev->type == VIR_DOMAIN_DEVICE_HOSTDEV &&
        dev->data.hostdev->mode == VIR_DOMAIN_HOSTDEV_MODE_CAPABILITIES) {
        virReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                       _("hostdev mode 'capabilities' is not "
                         "supported in %s"),
                       virDomainVirtTypeToString(def->virtType));
        goto cleanup;
    }

1184 1185 1186 1187 1188 1189 1190 1191 1192 1193 1194 1195 1196 1197 1198
    if (dev->type == VIR_DOMAIN_DEVICE_VIDEO &&
        dev->data.video->type == VIR_DOMAIN_VIDEO_TYPE_QXL) {
        if (dev->data.video->vgamem) {
            if (dev->data.video->vgamem < 1024) {
                virReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                               _("value for 'vgamem' must be at least 1 MiB "
                                 "(1024 KiB)"));
                goto cleanup;
            }
            if (dev->data.video->vgamem != VIR_ROUND_UP_POWER_OF_TWO(dev->data.video->vgamem)) {
                virReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                               _("value for 'vgamem' must be power of two"));
                goto cleanup;
            }
        } else {
1199
            dev->data.video->vgamem = QEMU_QXL_VGAMEM_DEFAULT;
1200 1201 1202
        }
    }

1203 1204 1205
    if (virDomainDeviceDefCheckUnsupportedMemoryDevice(dev) < 0)
        goto cleanup;

1206 1207
    ret = 0;

1208
 cleanup:
1209 1210
    virObjectUnref(cfg);
    return ret;
1211 1212 1213 1214 1215
}


virDomainDefParserConfig virQEMUDriverDomainDefParserConfig = {
    .devicesPostParseCallback = qemuDomainDeviceDefPostParse,
1216
    .domainPostParseCallback = qemuDomainDefPostParse,
1217 1218 1219
};


1220
static void
1221
qemuDomainObjSaveJob(virQEMUDriverPtr driver, virDomainObjPtr obj)
1222
{
1223 1224 1225
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);

    if (virDomainObjIsActive(obj)) {
1226
        if (virDomainSaveStatus(driver->xmlopt, cfg->stateDir, obj) < 0)
1227
            VIR_WARN("Failed to save status on vm %s", obj->def->name);
1228
    }
1229

1230
    virObjectUnref(cfg);
1231 1232
}

J
Jiri Denemark 已提交
1233
void
1234
qemuDomainObjSetJobPhase(virQEMUDriverPtr driver,
J
Jiri Denemark 已提交
1235 1236 1237 1238
                         virDomainObjPtr obj,
                         int phase)
{
    qemuDomainObjPrivatePtr priv = obj->privateData;
1239
    unsigned long long me = virThreadSelfID();
J
Jiri Denemark 已提交
1240 1241 1242 1243

    if (!priv->job.asyncJob)
        return;

1244 1245 1246 1247 1248
    VIR_DEBUG("Setting '%s' phase to '%s'",
              qemuDomainAsyncJobTypeToString(priv->job.asyncJob),
              qemuDomainAsyncJobPhaseToString(priv->job.asyncJob, phase));

    if (priv->job.asyncOwner && me != priv->job.asyncOwner) {
1249
        VIR_WARN("'%s' async job is owned by thread %llu",
1250 1251 1252 1253
                 qemuDomainAsyncJobTypeToString(priv->job.asyncJob),
                 priv->job.asyncOwner);
    }

J
Jiri Denemark 已提交
1254
    priv->job.phase = phase;
1255
    priv->job.asyncOwner = me;
J
Jiri Denemark 已提交
1256 1257 1258
    qemuDomainObjSaveJob(driver, obj);
}

1259
void
1260 1261
qemuDomainObjSetAsyncJobMask(virDomainObjPtr obj,
                             unsigned long long allowedJobs)
1262 1263 1264
{
    qemuDomainObjPrivatePtr priv = obj->privateData;

1265 1266 1267 1268 1269 1270 1271
    if (!priv->job.asyncJob)
        return;

    priv->job.mask = allowedJobs | JOB_MASK(QEMU_JOB_DESTROY);
}

void
1272
qemuDomainObjDiscardAsyncJob(virQEMUDriverPtr driver, virDomainObjPtr obj)
1273 1274 1275 1276 1277 1278
{
    qemuDomainObjPrivatePtr priv = obj->privateData;

    if (priv->job.active == QEMU_JOB_ASYNC_NESTED)
        qemuDomainObjResetJob(priv);
    qemuDomainObjResetAsyncJob(priv);
1279
    qemuDomainObjSaveJob(driver, obj);
1280 1281
}

1282 1283 1284 1285 1286 1287 1288 1289 1290
void
qemuDomainObjReleaseAsyncJob(virDomainObjPtr obj)
{
    qemuDomainObjPrivatePtr priv = obj->privateData;

    VIR_DEBUG("Releasing ownership of '%s' async job",
              qemuDomainAsyncJobTypeToString(priv->job.asyncJob));

    if (priv->job.asyncOwner != virThreadSelfID()) {
1291
        VIR_WARN("'%s' async job is owned by thread %llu",
1292 1293 1294 1295 1296 1297
                 qemuDomainAsyncJobTypeToString(priv->job.asyncJob),
                 priv->job.asyncOwner);
    }
    priv->job.asyncOwner = 0;
}

1298
static bool
1299
qemuDomainNestedJobAllowed(qemuDomainObjPrivatePtr priv, qemuDomainJob job)
1300 1301
{
    return !priv->job.asyncJob || (priv->job.mask & JOB_MASK(job)) != 0;
1302 1303
}

1304
bool
1305
qemuDomainJobAllowed(qemuDomainObjPrivatePtr priv, qemuDomainJob job)
1306 1307 1308 1309
{
    return !priv->job.active && qemuDomainNestedJobAllowed(priv, job);
}

1310 1311 1312
/* Give up waiting for mutex after 30 seconds */
#define QEMU_JOB_WAIT_TIME (1000ull * 30)

1313
/*
1314
 * obj must be locked before calling
1315
 */
1316
static int ATTRIBUTE_NONNULL(1)
1317
qemuDomainObjBeginJobInternal(virQEMUDriverPtr driver,
1318
                              virDomainObjPtr obj,
1319 1320
                              qemuDomainJob job,
                              qemuDomainAsyncJob asyncJob)
1321 1322
{
    qemuDomainObjPrivatePtr priv = obj->privateData;
J
Jiri Denemark 已提交
1323
    unsigned long long now;
1324
    unsigned long long then;
1325
    bool nested = job == QEMU_JOB_ASYNC_NESTED;
1326
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
J
Jiri Denemark 已提交
1327
    int ret = -1;
1328

1329 1330 1331 1332 1333 1334
    VIR_DEBUG("Starting %s: %s (async=%s vm=%p name=%s)",
              job == QEMU_JOB_ASYNC ? "async job" : "job",
              qemuDomainJobTypeToString(job),
              qemuDomainAsyncJobTypeToString(priv->job.asyncJob),
              obj, obj->def->name);

1335 1336
    if (virTimeMillisNow(&now) < 0) {
        virObjectUnref(cfg);
1337
        return -1;
1338 1339
    }

1340
    priv->jobs_queued++;
J
Jiri Denemark 已提交
1341
    then = now + QEMU_JOB_WAIT_TIME;
1342

1343
 retry:
1344 1345
    if (cfg->maxQueuedJobs &&
        priv->jobs_queued > cfg->maxQueuedJobs) {
1346 1347 1348
        goto error;
    }

1349
    while (!nested && !qemuDomainNestedJobAllowed(priv, job)) {
1350
        VIR_DEBUG("Waiting for async job (vm=%p name=%s)", obj, obj->def->name);
1351
        if (virCondWaitUntil(&priv->job.asyncCond, &obj->parent.lock, then) < 0)
1352 1353 1354
            goto error;
    }

1355
    while (priv->job.active) {
1356
        VIR_DEBUG("Waiting for job (vm=%p name=%s)", obj, obj->def->name);
1357
        if (virCondWaitUntil(&priv->job.cond, &obj->parent.lock, then) < 0)
1358
            goto error;
1359
    }
1360 1361 1362

    /* No job is active but a new async job could have been started while obj
     * was unlocked, so we need to recheck it. */
1363
    if (!nested && !qemuDomainNestedJobAllowed(priv, job))
1364 1365
        goto retry;

1366
    qemuDomainObjResetJob(priv);
1367 1368

    if (job != QEMU_JOB_ASYNC) {
1369
        VIR_DEBUG("Started job: %s (async=%s vm=%p name=%s)",
1370
                   qemuDomainJobTypeToString(job),
1371 1372
                  qemuDomainAsyncJobTypeToString(priv->job.asyncJob),
                  obj, obj->def->name);
1373
        priv->job.active = job;
1374
        priv->job.owner = virThreadSelfID();
1375
    } else {
1376 1377 1378
        VIR_DEBUG("Started async job: %s (vm=%p name=%s)",
                  qemuDomainAsyncJobTypeToString(asyncJob),
                  obj, obj->def->name);
1379
        qemuDomainObjResetAsyncJob(priv);
J
Jiri Denemark 已提交
1380 1381
        if (VIR_ALLOC(priv->job.current) < 0)
            goto cleanup;
1382
        priv->job.asyncJob = asyncJob;
1383
        priv->job.asyncOwner = virThreadSelfID();
J
Jiri Denemark 已提交
1384
        priv->job.current->started = now;
1385
    }
1386

1387 1388
    if (qemuDomainTrackJob(job))
        qemuDomainObjSaveJob(driver, obj);
1389

1390
    virObjectUnref(cfg);
1391
    return 0;
1392

1393
 error:
1394
    VIR_WARN("Cannot start job (%s, %s) for domain %s;"
1395
             " current job is (%s, %s) owned by (%llu, %llu)",
1396 1397 1398 1399 1400 1401 1402
             qemuDomainJobTypeToString(job),
             qemuDomainAsyncJobTypeToString(asyncJob),
             obj->def->name,
             qemuDomainJobTypeToString(priv->job.active),
             qemuDomainAsyncJobTypeToString(priv->job.asyncJob),
             priv->job.owner, priv->job.asyncOwner);

1403 1404
    ret = -1;
    if (errno == ETIMEDOUT) {
1405 1406
        virReportError(VIR_ERR_OPERATION_TIMEOUT,
                       "%s", _("cannot acquire state change lock"));
1407 1408 1409
        ret = -2;
    } else if (cfg->maxQueuedJobs &&
               priv->jobs_queued > cfg->maxQueuedJobs) {
1410 1411 1412
        virReportError(VIR_ERR_OPERATION_FAILED,
                       "%s", _("cannot acquire state change lock "
                               "due to max_queued limit"));
1413 1414
        ret = -2;
    } else {
1415 1416
        virReportSystemError(errno,
                             "%s", _("cannot acquire job mutex"));
1417
    }
J
Jiri Denemark 已提交
1418 1419

 cleanup:
1420
    priv->jobs_queued--;
1421
    virObjectUnref(cfg);
1422
    return ret;
1423 1424 1425
}

/*
1426
 * obj must be locked before calling
1427 1428 1429 1430
 *
 * This must be called by anything that will change the VM state
 * in any way, or anything that will use the QEMU monitor.
 *
1431
 * Successful calls must be followed by EndJob eventually
1432
 */
1433
int qemuDomainObjBeginJob(virQEMUDriverPtr driver,
1434
                          virDomainObjPtr obj,
1435
                          qemuDomainJob job)
1436
{
1437 1438 1439 1440 1441
    if (qemuDomainObjBeginJobInternal(driver, obj, job,
                                      QEMU_ASYNC_JOB_NONE) < 0)
        return -1;
    else
        return 0;
1442 1443
}

1444
int qemuDomainObjBeginAsyncJob(virQEMUDriverPtr driver,
1445
                               virDomainObjPtr obj,
1446
                               qemuDomainAsyncJob asyncJob)
1447
{
1448 1449 1450 1451 1452
    if (qemuDomainObjBeginJobInternal(driver, obj, QEMU_JOB_ASYNC,
                                      asyncJob) < 0)
        return -1;
    else
        return 0;
1453 1454
}

1455
static int ATTRIBUTE_RETURN_CHECK
1456 1457
qemuDomainObjBeginNestedJob(virQEMUDriverPtr driver,
                            virDomainObjPtr obj,
1458
                            qemuDomainAsyncJob asyncJob)
1459 1460 1461 1462 1463 1464 1465 1466 1467 1468
{
    qemuDomainObjPrivatePtr priv = obj->privateData;

    if (asyncJob != priv->job.asyncJob) {
        virReportError(VIR_ERR_INTERNAL_ERROR,
                       _("unexpected async job %d"), asyncJob);
        return -1;
    }

    if (priv->job.asyncOwner != virThreadSelfID()) {
1469
        VIR_WARN("This thread doesn't seem to be the async job owner: %llu",
1470 1471 1472 1473 1474 1475 1476 1477
                 priv->job.asyncOwner);
    }

    return qemuDomainObjBeginJobInternal(driver, obj,
                                         QEMU_JOB_ASYNC_NESTED,
                                         QEMU_ASYNC_JOB_NONE);
}

1478

1479
/*
1480
 * obj must be locked and have a reference before calling
1481 1482 1483 1484
 *
 * To be called after completing the work associated with the
 * earlier qemuDomainBeginJob() call
 */
1485 1486
void
qemuDomainObjEndJob(virQEMUDriverPtr driver, virDomainObjPtr obj)
1487 1488
{
    qemuDomainObjPrivatePtr priv = obj->privateData;
1489
    qemuDomainJob job = priv->job.active;
1490

1491 1492
    priv->jobs_queued--;

1493
    VIR_DEBUG("Stopping job: %s (async=%s vm=%p name=%s)",
1494
              qemuDomainJobTypeToString(job),
1495 1496
              qemuDomainAsyncJobTypeToString(priv->job.asyncJob),
              obj, obj->def->name);
1497

1498
    qemuDomainObjResetJob(priv);
1499 1500
    if (qemuDomainTrackJob(job))
        qemuDomainObjSaveJob(driver, obj);
1501
    virCondSignal(&priv->job.cond);
1502 1503
}

1504
void
1505
qemuDomainObjEndAsyncJob(virQEMUDriverPtr driver, virDomainObjPtr obj)
1506 1507
{
    qemuDomainObjPrivatePtr priv = obj->privateData;
1508

1509 1510
    priv->jobs_queued--;

1511 1512 1513
    VIR_DEBUG("Stopping async job: %s (vm=%p name=%s)",
              qemuDomainAsyncJobTypeToString(priv->job.asyncJob),
              obj, obj->def->name);
1514

1515
    qemuDomainObjResetAsyncJob(priv);
1516
    qemuDomainObjSaveJob(driver, obj);
1517 1518 1519
    virCondBroadcast(&priv->job.asyncCond);
}

1520 1521 1522 1523 1524
void
qemuDomainObjAbortAsyncJob(virDomainObjPtr obj)
{
    qemuDomainObjPrivatePtr priv = obj->privateData;

1525 1526 1527
    VIR_DEBUG("Requesting abort of async job: %s (vm=%p name=%s)",
              qemuDomainAsyncJobTypeToString(priv->job.asyncJob),
              obj, obj->def->name);
1528 1529 1530 1531

    priv->job.asyncAbort = true;
}

1532 1533 1534 1535 1536 1537 1538 1539 1540
/*
 * obj must be locked before calling
 *
 * To be called immediately before any QEMU monitor API call
 * Must have already either called qemuDomainObjBeginJob() and checked
 * that the VM is still active; may not be used for nested async jobs.
 *
 * To be followed with qemuDomainObjExitMonitor() once complete
 */
1541
static int
1542
qemuDomainObjEnterMonitorInternal(virQEMUDriverPtr driver,
1543
                                  virDomainObjPtr obj,
1544
                                  qemuDomainAsyncJob asyncJob)
1545 1546 1547
{
    qemuDomainObjPrivatePtr priv = obj->privateData;

1548
    if (asyncJob != QEMU_ASYNC_JOB_NONE) {
1549 1550 1551
        int ret;
        if ((ret = qemuDomainObjBeginNestedJob(driver, obj, asyncJob)) < 0)
            return ret;
1552
        if (!virDomainObjIsActive(obj)) {
1553 1554
            virReportError(VIR_ERR_OPERATION_FAILED, "%s",
                           _("domain is no longer running"));
1555
            qemuDomainObjEndJob(driver, obj);
1556 1557
            return -1;
        }
1558 1559 1560
    } else if (priv->job.asyncOwner == virThreadSelfID()) {
        VIR_WARN("This thread seems to be the async job owner; entering"
                 " monitor without asking for a nested job is dangerous");
1561 1562
    }

1563 1564
    VIR_DEBUG("Entering monitor (mon=%p vm=%p name=%s)",
              priv->mon, obj, obj->def->name);
1565
    virObjectLock(priv->mon);
1566
    virObjectRef(priv->mon);
1567
    ignore_value(virTimeMillisNow(&priv->monStart));
1568
    virObjectUnlock(obj);
1569 1570

    return 0;
1571 1572
}

1573
static void ATTRIBUTE_NONNULL(1)
1574
qemuDomainObjExitMonitorInternal(virQEMUDriverPtr driver,
1575
                                 virDomainObjPtr obj)
1576 1577
{
    qemuDomainObjPrivatePtr priv = obj->privateData;
1578
    bool hasRefs;
1579

1580
    hasRefs = virObjectUnref(priv->mon);
1581

1582
    if (hasRefs)
1583
        virObjectUnlock(priv->mon);
1584

1585
    virObjectLock(obj);
1586 1587
    VIR_DEBUG("Exited monitor (mon=%p vm=%p name=%s)",
              priv->mon, obj, obj->def->name);
1588

1589
    priv->monStart = 0;
1590
    if (!hasRefs)
1591
        priv->mon = NULL;
1592

1593 1594 1595 1596 1597
    if (priv->job.active == QEMU_JOB_ASYNC_NESTED) {
        qemuDomainObjResetJob(priv);
        qemuDomainObjSaveJob(driver, obj);
        virCondSignal(&priv->job.cond);
    }
1598 1599
}

1600
void qemuDomainObjEnterMonitor(virQEMUDriverPtr driver,
1601
                               virDomainObjPtr obj)
1602
{
1603
    ignore_value(qemuDomainObjEnterMonitorInternal(driver, obj,
1604
                                                   QEMU_ASYNC_JOB_NONE));
1605 1606
}

1607
/* obj must NOT be locked before calling
1608 1609
 *
 * Should be paired with an earlier qemuDomainObjEnterMonitor() call
1610 1611 1612 1613 1614 1615
 *
 * Returns -1 if the domain is no longer alive after exiting the monitor.
 * In that case, the caller should be careful when using obj's data,
 * e.g. the live definition in vm->def has been freed by qemuProcessStop
 * and replaced by the persistent definition, so pointers stolen
 * from the live definition could no longer be valid.
1616
 */
1617 1618
int qemuDomainObjExitMonitor(virQEMUDriverPtr driver,
                             virDomainObjPtr obj)
1619
{
1620
    qemuDomainObjExitMonitorInternal(driver, obj);
1621
    if (!virDomainObjIsActive(obj)) {
1622 1623 1624
        if (!virGetLastError())
            virReportError(VIR_ERR_OPERATION_FAILED, "%s",
                           _("domain is no longer running"));
1625 1626 1627
        return -1;
    }
    return 0;
1628
}
1629 1630

/*
1631
 * obj must be locked before calling
1632 1633
 *
 * To be called immediately before any QEMU monitor API call.
1634
 * Must have already either called qemuDomainObjBeginJob()
1635 1636 1637 1638 1639
 * and checked that the VM is still active, with asyncJob of
 * QEMU_ASYNC_JOB_NONE; or already called qemuDomainObjBeginAsyncJob,
 * with the same asyncJob.
 *
 * Returns 0 if job was started, in which case this must be followed with
1640 1641 1642
 * qemuDomainObjExitMonitor(); -2 if waiting for the nested job times out;
 * or -1 if the job could not be started (probably because the vm exited
 * in the meantime).
1643 1644
 */
int
1645
qemuDomainObjEnterMonitorAsync(virQEMUDriverPtr driver,
1646
                               virDomainObjPtr obj,
1647
                               qemuDomainAsyncJob asyncJob)
1648
{
1649
    return qemuDomainObjEnterMonitorInternal(driver, obj, asyncJob);
1650 1651
}

D
Daniel P. Berrange 已提交
1652 1653


1654 1655 1656 1657 1658 1659 1660 1661 1662 1663 1664
/*
 * obj must be locked before calling
 *
 * To be called immediately before any QEMU agent API call.
 * Must have already called qemuDomainObjBeginJob() and checked
 * that the VM is still active.
 *
 * To be followed with qemuDomainObjExitAgent() once complete
 */
void
qemuDomainObjEnterAgent(virDomainObjPtr obj)
D
Daniel P. Berrange 已提交
1665 1666 1667
{
    qemuDomainObjPrivatePtr priv = obj->privateData;

1668 1669
    VIR_DEBUG("Entering agent (agent=%p vm=%p name=%s)",
              priv->agent, obj, obj->def->name);
1670
    virObjectLock(priv->agent);
1671
    virObjectRef(priv->agent);
D
Daniel P. Berrange 已提交
1672
    ignore_value(virTimeMillisNow(&priv->agentStart));
1673
    virObjectUnlock(obj);
D
Daniel P. Berrange 已提交
1674 1675
}

1676 1677 1678 1679 1680 1681 1682

/* obj must NOT be locked before calling
 *
 * Should be paired with an earlier qemuDomainObjEnterAgent() call
 */
void
qemuDomainObjExitAgent(virDomainObjPtr obj)
D
Daniel P. Berrange 已提交
1683 1684
{
    qemuDomainObjPrivatePtr priv = obj->privateData;
1685
    bool hasRefs;
D
Daniel P. Berrange 已提交
1686

1687
    hasRefs = virObjectUnref(priv->agent);
D
Daniel P. Berrange 已提交
1688

1689
    if (hasRefs)
1690
        virObjectUnlock(priv->agent);
D
Daniel P. Berrange 已提交
1691

1692
    virObjectLock(obj);
1693 1694
    VIR_DEBUG("Exited agent (agent=%p vm=%p name=%s)",
              priv->agent, obj, obj->def->name);
D
Daniel P. Berrange 已提交
1695 1696

    priv->agentStart = 0;
1697
    if (!hasRefs)
D
Daniel P. Berrange 已提交
1698 1699 1700
        priv->agent = NULL;
}

1701
void qemuDomainObjEnterRemote(virDomainObjPtr obj)
1702
{
1703 1704
    VIR_DEBUG("Entering remote (vm=%p name=%s)",
              obj, obj->def->name);
1705
    virObjectUnlock(obj);
1706 1707
}

1708
void qemuDomainObjExitRemote(virDomainObjPtr obj)
1709
{
1710
    virObjectLock(obj);
1711 1712
    VIR_DEBUG("Exited remote (vm=%p name=%s)",
              obj, obj->def->name);
1713
}
1714 1715


1716 1717 1718 1719 1720 1721 1722 1723
virDomainDefPtr
qemuDomainDefCopy(virQEMUDriverPtr driver,
                  virDomainDefPtr src,
                  unsigned int flags)
{
    virBuffer buf = VIR_BUFFER_INITIALIZER;
    virDomainDefPtr ret = NULL;
    virCapsPtr caps = NULL;
1724
    char *xml = NULL;
1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735

    if (qemuDomainDefFormatBuf(driver, src, flags, &buf) < 0)
        goto cleanup;

    xml = virBufferContentAndReset(&buf);

    if (!(caps = virQEMUDriverGetCapabilities(driver, false)))
        goto cleanup;

    if (!(ret = virDomainDefParseString(xml, caps, driver->xmlopt,
                                        QEMU_EXPECTED_VIRT_TYPES,
1736
                                        VIR_DOMAIN_DEF_PARSE_INACTIVE)))
1737 1738
        goto cleanup;

1739
 cleanup:
1740 1741 1742 1743 1744
    VIR_FREE(xml);
    virObjectUnref(caps);
    return ret;
}

1745
int
1746
qemuDomainDefFormatBuf(virQEMUDriverPtr driver,
1747 1748 1749
                       virDomainDefPtr def,
                       unsigned int flags,
                       virBuffer *buf)
1750
{
1751
    int ret = -1;
1752
    virCPUDefPtr cpu = NULL;
1753
    virCPUDefPtr def_cpu = def->cpu;
1754 1755
    virDomainControllerDefPtr *controllers = NULL;
    int ncontrollers = 0;
1756 1757 1758 1759
    virCapsPtr caps = NULL;

    if (!(caps = virQEMUDriverGetCapabilities(driver, false)))
        goto cleanup;
1760 1761

    /* Update guest CPU requirements according to host CPU */
1762 1763 1764
    if ((flags & VIR_DOMAIN_XML_UPDATE_CPU) &&
        def_cpu &&
        (def_cpu->mode != VIR_CPU_MODE_CUSTOM || def_cpu->model)) {
1765 1766
        if (!caps->host.cpu ||
            !caps->host.cpu->model) {
1767 1768
            virReportError(VIR_ERR_OPERATION_FAILED,
                           "%s", _("cannot get host CPU capabilities"));
1769 1770 1771
            goto cleanup;
        }

1772
        if (!(cpu = virCPUDefCopy(def_cpu)) ||
1773
            cpuUpdate(cpu, caps->host.cpu) < 0)
1774 1775 1776 1777
            goto cleanup;
        def->cpu = cpu;
    }

1778
    if ((flags & VIR_DOMAIN_XML_MIGRATABLE)) {
1779
        size_t i;
1780
        int toremove = 0;
1781
        virDomainControllerDefPtr usb = NULL, pci = NULL;
1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798 1799

        /* If only the default USB controller is present, we can remove it
         * and make the XML compatible with older versions of libvirt which
         * didn't support USB controllers in the XML but always added the
         * default one to qemu anyway.
         */
        for (i = 0; i < def->ncontrollers; i++) {
            if (def->controllers[i]->type == VIR_DOMAIN_CONTROLLER_TYPE_USB) {
                if (usb) {
                    usb = NULL;
                    break;
                }
                usb = def->controllers[i];
            }
        }
        if (usb && usb->idx == 0 && usb->model == -1) {
            VIR_DEBUG("Removing default USB controller from domain '%s'"
                      " for migration compatibility", def->name);
1800
            toremove++;
1801 1802 1803 1804 1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818
        } else {
            usb = NULL;
        }

        /* Remove the default PCI controller if there is only one present
         * and its model is pci-root */
        for (i = 0; i < def->ncontrollers; i++) {
            if (def->controllers[i]->type == VIR_DOMAIN_CONTROLLER_TYPE_PCI) {
                if (pci) {
                    pci = NULL;
                    break;
                }
                pci = def->controllers[i];
            }
        }

        if (pci && pci->idx == 0 &&
            pci->model == VIR_DOMAIN_CONTROLLER_MODEL_PCI_ROOT) {
L
Laine Stump 已提交
1819
            VIR_DEBUG("Removing default pci-root from domain '%s'"
1820
                      " for migration compatibility", def->name);
1821
            toremove++;
1822 1823 1824 1825
        } else {
            pci = NULL;
        }

1826
        if (toremove) {
1827 1828
            controllers = def->controllers;
            ncontrollers = def->ncontrollers;
1829
            if (VIR_ALLOC_N(def->controllers, ncontrollers - toremove) < 0) {
1830 1831 1832 1833 1834 1835
                controllers = NULL;
                goto cleanup;
            }

            def->ncontrollers = 0;
            for (i = 0; i < ncontrollers; i++) {
1836
                if (controllers[i] != usb && controllers[i] != pci)
1837 1838 1839
                    def->controllers[def->ncontrollers++] = controllers[i];
            }
        }
1840 1841


1842 1843
    }

1844 1845 1846
    ret = virDomainDefFormatInternal(def,
                                     virDomainDefFormatConvertXMLFlags(flags),
                                     buf);
1847

1848
 cleanup:
1849 1850
    def->cpu = def_cpu;
    virCPUDefFree(cpu);
1851 1852 1853 1854 1855
    if (controllers) {
        VIR_FREE(def->controllers);
        def->controllers = controllers;
        def->ncontrollers = ncontrollers;
    }
1856
    virObjectUnref(caps);
1857 1858
    return ret;
}
1859

1860
char *qemuDomainDefFormatXML(virQEMUDriverPtr driver,
1861
                             virDomainDefPtr def,
1862
                             unsigned int flags)
1863 1864 1865
{
    virBuffer buf = VIR_BUFFER_INITIALIZER;

1866
    if (qemuDomainDefFormatBuf(driver, def, flags, &buf) < 0) {
1867 1868 1869 1870 1871 1872 1873 1874 1875 1876 1877 1878 1879
        virBufferFreeAndReset(&buf);
        return NULL;
    }

    if (virBufferError(&buf)) {
        virReportOOMError();
        virBufferFreeAndReset(&buf);
        return NULL;
    }

    return virBufferContentAndReset(&buf);
}

1880
char *qemuDomainFormatXML(virQEMUDriverPtr driver,
1881
                          virDomainObjPtr vm,
1882
                          unsigned int flags)
1883 1884 1885 1886 1887 1888 1889 1890
{
    virDomainDefPtr def;

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

1891
    return qemuDomainDefFormatXML(driver, def, flags);
1892 1893
}

1894
char *
1895
qemuDomainDefFormatLive(virQEMUDriverPtr driver,
1896
                        virDomainDefPtr def,
1897 1898
                        bool inactive,
                        bool compatible)
1899 1900 1901 1902 1903
{
    unsigned int flags = QEMU_DOMAIN_FORMAT_LIVE_FLAGS;

    if (inactive)
        flags |= VIR_DOMAIN_XML_INACTIVE;
1904 1905
    if (compatible)
        flags |= VIR_DOMAIN_XML_MIGRATABLE;
1906

1907
    return qemuDomainDefFormatXML(driver, def, flags);
1908 1909
}

1910

1911
void qemuDomainObjTaint(virQEMUDriverPtr driver,
1912
                        virDomainObjPtr obj,
1913
                        virDomainTaintFlags taint,
1914
                        int logFD)
1915
{
1916 1917
    virErrorPtr orig_err = NULL;

1918 1919 1920 1921 1922 1923 1924 1925 1926
    if (virDomainObjTaint(obj, taint)) {
        char uuidstr[VIR_UUID_STRING_BUFLEN];
        virUUIDFormat(obj->def->uuid, uuidstr);

        VIR_WARN("Domain id=%d name='%s' uuid=%s is tainted: %s",
                 obj->def->id,
                 obj->def->name,
                 uuidstr,
                 virDomainTaintTypeToString(taint));
1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940

        /* We don't care about errors logging taint info, so
         * preserve original error, and clear any error that
         * is raised */
        orig_err = virSaveLastError();
        if (qemuDomainAppendLog(driver, obj, logFD,
                                "Domain id=%d is tainted: %s\n",
                                obj->def->id,
                                virDomainTaintTypeToString(taint)) < 0)
            virResetLastError();
        if (orig_err) {
            virSetError(orig_err);
            virFreeError(orig_err);
        }
1941 1942 1943 1944
    }
}


1945
void qemuDomainObjCheckTaint(virQEMUDriverPtr driver,
1946 1947
                             virDomainObjPtr obj,
                             int logFD)
1948
{
1949
    size_t i;
1950
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
1951
    qemuDomainObjPrivatePtr priv = obj->privateData;
1952

1953 1954 1955 1956
    if (cfg->privileged &&
        (!cfg->clearEmulatorCapabilities ||
         cfg->user == 0 ||
         cfg->group == 0))
1957
        qemuDomainObjTaint(driver, obj, VIR_DOMAIN_TAINT_HIGH_PRIVILEGES, logFD);
1958

1959 1960 1961
    if (priv->hookRun)
        qemuDomainObjTaint(driver, obj, VIR_DOMAIN_TAINT_HOOK, logFD);

1962 1963 1964
    if (obj->def->namespaceData) {
        qemuDomainCmdlineDefPtr qemucmd = obj->def->namespaceData;
        if (qemucmd->num_args || qemucmd->num_env)
1965
            qemuDomainObjTaint(driver, obj, VIR_DOMAIN_TAINT_CUSTOM_ARGV, logFD);
1966 1967
    }

1968 1969 1970
    if (obj->def->cpu && obj->def->cpu->mode == VIR_CPU_MODE_HOST_PASSTHROUGH)
        qemuDomainObjTaint(driver, obj, VIR_DOMAIN_TAINT_HOST_CPU, logFD);

1971
    for (i = 0; i < obj->def->ndisks; i++)
1972
        qemuDomainObjCheckDiskTaint(driver, obj, obj->def->disks[i], logFD);
1973

1974 1975 1976 1977
    for (i = 0; i < obj->def->nhostdevs; i++)
        qemuDomainObjCheckHostdevTaint(driver, obj, obj->def->hostdevs[i],
                                       logFD);

1978
    for (i = 0; i < obj->def->nnets; i++)
1979
        qemuDomainObjCheckNetTaint(driver, obj, obj->def->nets[i], logFD);
1980 1981

    virObjectUnref(cfg);
1982 1983 1984
}


1985
void qemuDomainObjCheckDiskTaint(virQEMUDriverPtr driver,
1986
                                 virDomainObjPtr obj,
1987 1988
                                 virDomainDiskDefPtr disk,
                                 int logFD)
1989
{
1990
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
1991
    int format = virDomainDiskGetFormat(disk);
1992

1993
    if ((!format || format == VIR_STORAGE_FILE_AUTO) &&
1994
        cfg->allowDiskFormatProbing)
1995
        qemuDomainObjTaint(driver, obj, VIR_DOMAIN_TAINT_DISK_PROBING, logFD);
1996

1997 1998 1999
    if (disk->rawio == VIR_TRISTATE_BOOL_YES)
        qemuDomainObjTaint(driver, obj, VIR_DOMAIN_TAINT_HIGH_PRIVILEGES,
                           logFD);
2000 2001

    virObjectUnref(cfg);
2002 2003 2004
}


2005 2006 2007 2008 2009 2010 2011 2012 2013 2014 2015 2016 2017 2018
void qemuDomainObjCheckHostdevTaint(virQEMUDriverPtr driver,
                                    virDomainObjPtr obj,
                                    virDomainHostdevDefPtr hostdev,
                                    int logFD)
{
    virDomainHostdevSubsysSCSIPtr scsisrc = &hostdev->source.subsys.u.scsi;

    if (hostdev->source.subsys.type == VIR_DOMAIN_HOSTDEV_SUBSYS_TYPE_SCSI &&
        scsisrc->rawio == VIR_TRISTATE_BOOL_YES)
            qemuDomainObjTaint(driver, obj, VIR_DOMAIN_TAINT_HIGH_PRIVILEGES,
                               logFD);
}


2019
void qemuDomainObjCheckNetTaint(virQEMUDriverPtr driver,
2020
                                virDomainObjPtr obj,
2021 2022
                                virDomainNetDefPtr net,
                                int logFD)
2023
{
2024 2025 2026 2027 2028 2029
    /* script is only useful for NET_TYPE_ETHERNET (qemu) and
     * NET_TYPE_BRIDGE (xen), but could be (incorrectly) specified for
     * any interface type. In any case, it's adding user sauce into
     * the soup, so it should taint the domain.
     */
    if (net->script != NULL)
2030
        qemuDomainObjTaint(driver, obj, VIR_DOMAIN_TAINT_SHELL_SCRIPTS, logFD);
2031
}
2032 2033 2034


static int
2035
qemuDomainOpenLogHelper(virQEMUDriverConfigPtr cfg,
2036
                        virDomainObjPtr vm,
E
Eric Blake 已提交
2037
                        int oflags,
2038 2039 2040 2041
                        mode_t mode)
{
    char *logfile;
    int fd = -1;
2042
    bool trunc = false;
2043

2044
    if (virAsprintf(&logfile, "%s/%s.log", cfg->logDir, vm->def->name) < 0)
2045 2046
        return -1;

2047 2048 2049 2050 2051 2052 2053 2054 2055
    /* To make SELinux happy we always need to open in append mode.
     * So we fake O_TRUNC by calling ftruncate after open instead
     */
    if (oflags & O_TRUNC) {
        oflags &= ~O_TRUNC;
        oflags |= O_APPEND;
        trunc = true;
    }

E
Eric Blake 已提交
2056
    if ((fd = open(logfile, oflags, mode)) < 0) {
2057 2058 2059 2060 2061 2062 2063
        virReportSystemError(errno, _("failed to create logfile %s"),
                             logfile);
        goto cleanup;
    }
    if (virSetCloseExec(fd) < 0) {
        virReportSystemError(errno, _("failed to set close-on-exec flag on %s"),
                             logfile);
2064 2065 2066 2067 2068 2069 2070
        VIR_FORCE_CLOSE(fd);
        goto cleanup;
    }
    if (trunc &&
        ftruncate(fd, 0) < 0) {
        virReportSystemError(errno, _("failed to truncate %s"),
                             logfile);
2071 2072 2073 2074
        VIR_FORCE_CLOSE(fd);
        goto cleanup;
    }

2075
 cleanup:
2076 2077 2078 2079 2080 2081
    VIR_FREE(logfile);
    return fd;
}


int
2082
qemuDomainCreateLog(virQEMUDriverPtr driver, virDomainObjPtr vm,
E
Eric Blake 已提交
2083
                    bool append)
2084
{
2085
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
E
Eric Blake 已提交
2086
    int oflags;
2087
    int ret;
2088

E
Eric Blake 已提交
2089
    oflags = O_CREAT | O_WRONLY;
2090
    /* Only logrotate files in /var/log, so only append if running privileged */
2091
    if (cfg->privileged || append)
E
Eric Blake 已提交
2092
        oflags |= O_APPEND;
2093
    else
E
Eric Blake 已提交
2094
        oflags |= O_TRUNC;
2095

2096 2097 2098
    ret = qemuDomainOpenLogHelper(cfg, vm, oflags, S_IRUSR | S_IWUSR);
    virObjectUnref(cfg);
    return ret;
2099 2100 2101 2102
}


int
2103
qemuDomainOpenLog(virQEMUDriverPtr driver, virDomainObjPtr vm, off_t pos)
2104
{
2105
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
2106 2107 2108 2109
    int fd;
    off_t off;
    int whence;

2110 2111 2112
    fd = qemuDomainOpenLogHelper(cfg, vm, O_RDONLY, 0);
    virObjectUnref(cfg);
    if (fd < 0)
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
        return -1;

    if (pos < 0) {
        off = 0;
        whence = SEEK_END;
    } else {
        off = pos;
        whence = SEEK_SET;
    }

    if (lseek(fd, off, whence) < 0) {
        if (whence == SEEK_END)
            virReportSystemError(errno,
                                 _("unable to seek to end of log for %s"),
                                 vm->def->name);
        else
            virReportSystemError(errno,
                                 _("unable to seek to %lld from start for %s"),
                                 (long long)off, vm->def->name);
        VIR_FORCE_CLOSE(fd);
    }

    return fd;
}


2139
int qemuDomainAppendLog(virQEMUDriverPtr driver,
2140 2141 2142 2143 2144 2145 2146 2147 2148 2149 2150 2151 2152 2153 2154
                        virDomainObjPtr obj,
                        int logFD,
                        const char *fmt, ...)
{
    int fd = logFD;
    va_list argptr;
    char *message = NULL;
    int ret = -1;

    va_start(argptr, fmt);

    if ((fd == -1) &&
        (fd = qemuDomainCreateLog(driver, obj, true)) < 0)
        goto cleanup;

2155
    if (virVasprintf(&message, fmt, argptr) < 0)
2156 2157 2158 2159 2160 2161 2162 2163 2164
        goto cleanup;
    if (safewrite(fd, message, strlen(message)) < 0) {
        virReportSystemError(errno, _("Unable to write to domain logfile %s"),
                             obj->def->name);
        goto cleanup;
    }

    ret = 0;

2165
 cleanup:
2166 2167 2168 2169 2170
    va_end(argptr);

    if (fd != logFD)
        VIR_FORCE_CLOSE(fd);

O
Osier Yang 已提交
2171
    VIR_FREE(message);
2172 2173
    return ret;
}
2174 2175 2176

/* Locate an appropriate 'qemu-img' binary.  */
const char *
2177
qemuFindQemuImgBinary(virQEMUDriverPtr driver)
2178
{
2179 2180 2181
    if (!driver->qemuImgBinary)
        virReportError(VIR_ERR_INTERNAL_ERROR,
                       "%s", _("unable to find kvm-img or qemu-img"));
2182 2183 2184 2185 2186 2187 2188 2189 2190 2191 2192 2193 2194 2195 2196 2197

    return driver->qemuImgBinary;
}

int
qemuDomainSnapshotWriteMetadata(virDomainObjPtr vm,
                                virDomainSnapshotObjPtr snapshot,
                                char *snapshotDir)
{
    char *newxml = NULL;
    int ret = -1;
    char *snapDir = NULL;
    char *snapFile = NULL;
    char uuidstr[VIR_UUID_STRING_BUFLEN];

    virUUIDFormat(vm->def->uuid, uuidstr);
2198 2199 2200 2201
    newxml = virDomainSnapshotDefFormat(
        uuidstr, snapshot->def,
        virDomainDefFormatConvertXMLFlags(QEMU_DOMAIN_FORMAT_LIVE_FLAGS),
        1);
2202
    if (newxml == NULL)
2203 2204
        return -1;

2205
    if (virAsprintf(&snapDir, "%s/%s", snapshotDir, vm->def->name) < 0)
2206 2207 2208 2209 2210 2211 2212
        goto cleanup;
    if (virFileMakePath(snapDir) < 0) {
        virReportSystemError(errno, _("cannot create snapshot directory '%s'"),
                             snapDir);
        goto cleanup;
    }

2213
    if (virAsprintf(&snapFile, "%s/%s.xml", snapDir, snapshot->def->name) < 0)
2214 2215
        goto cleanup;

J
Ján Tomko 已提交
2216
    ret = virXMLSaveFile(snapFile, NULL, "snapshot-edit", newxml);
2217

2218
 cleanup:
2219 2220 2221 2222 2223 2224 2225 2226
    VIR_FREE(snapFile);
    VIR_FREE(snapDir);
    VIR_FREE(newxml);
    return ret;
}

/* The domain is expected to be locked and inactive. Return -1 on normal
 * failure, 1 if we skipped a disk due to try_all.  */
2227
static int
2228
qemuDomainSnapshotForEachQcow2Raw(virQEMUDriverPtr driver,
2229 2230 2231 2232 2233
                                  virDomainDefPtr def,
                                  const char *name,
                                  const char *op,
                                  bool try_all,
                                  int ndisks)
2234 2235
{
    const char *qemuimgarg[] = { NULL, "snapshot", NULL, NULL, NULL, NULL };
2236
    size_t i;
2237 2238 2239 2240 2241 2242 2243 2244 2245
    bool skipped = false;

    qemuimgarg[0] = qemuFindQemuImgBinary(driver);
    if (qemuimgarg[0] == NULL) {
        /* qemuFindQemuImgBinary set the error */
        return -1;
    }

    qemuimgarg[2] = op;
2246
    qemuimgarg[3] = name;
2247

2248
    for (i = 0; i < ndisks; i++) {
2249
        /* FIXME: we also need to handle LVM here */
2250
        if (def->disks[i]->device == VIR_DOMAIN_DISK_DEVICE_DISK) {
2251 2252 2253
            int format = virDomainDiskGetFormat(def->disks[i]);

            if (format > 0 && format != VIR_STORAGE_FILE_QCOW2) {
2254 2255 2256 2257 2258
                if (try_all) {
                    /* Continue on even in the face of error, since other
                     * disks in this VM may have the same snapshot name.
                     */
                    VIR_WARN("skipping snapshot action on %s",
2259
                             def->disks[i]->dst);
2260 2261
                    skipped = true;
                    continue;
2262 2263 2264 2265 2266
                } else if (STREQ(op, "-c") && i) {
                    /* We must roll back partial creation by deleting
                     * all earlier snapshots.  */
                    qemuDomainSnapshotForEachQcow2Raw(driver, def, name,
                                                      "-d", false, i);
2267
                }
2268 2269 2270 2271
                virReportError(VIR_ERR_OPERATION_INVALID,
                               _("Disk device '%s' does not support"
                                 " snapshotting"),
                               def->disks[i]->dst);
2272 2273 2274
                return -1;
            }

2275
            qemuimgarg[4] = virDomainDiskGetSource(def->disks[i]);
2276 2277 2278 2279

            if (virRun(qemuimgarg, NULL) < 0) {
                if (try_all) {
                    VIR_WARN("skipping snapshot action on %s",
2280
                             def->disks[i]->dst);
2281 2282
                    skipped = true;
                    continue;
2283 2284 2285 2286 2287
                } else if (STREQ(op, "-c") && i) {
                    /* We must roll back partial creation by deleting
                     * all earlier snapshots.  */
                    qemuDomainSnapshotForEachQcow2Raw(driver, def, name,
                                                      "-d", false, i);
2288 2289 2290 2291 2292 2293 2294 2295 2296
                }
                return -1;
            }
        }
    }

    return skipped ? 1 : 0;
}

2297 2298 2299
/* The domain is expected to be locked and inactive. Return -1 on normal
 * failure, 1 if we skipped a disk due to try_all.  */
int
2300
qemuDomainSnapshotForEachQcow2(virQEMUDriverPtr driver,
2301 2302 2303 2304 2305 2306 2307 2308 2309 2310 2311 2312 2313 2314 2315 2316
                               virDomainObjPtr vm,
                               virDomainSnapshotObjPtr snap,
                               const char *op,
                               bool try_all)
{
    /* Prefer action on the disks in use at the time the snapshot was
     * created; but fall back to current definition if dealing with a
     * snapshot created prior to libvirt 0.9.5.  */
    virDomainDefPtr def = snap->def->dom;

    if (!def)
        def = vm->def;
    return qemuDomainSnapshotForEachQcow2Raw(driver, def, snap->def->name,
                                             op, try_all, def->ndisks);
}

2317 2318
/* Discard one snapshot (or its metadata), without reparenting any children.  */
int
2319
qemuDomainSnapshotDiscard(virQEMUDriverPtr driver,
2320 2321 2322 2323 2324 2325 2326 2327 2328
                          virDomainObjPtr vm,
                          virDomainSnapshotObjPtr snap,
                          bool update_current,
                          bool metadata_only)
{
    char *snapFile = NULL;
    int ret = -1;
    qemuDomainObjPrivatePtr priv;
    virDomainSnapshotObjPtr parentsnap = NULL;
2329
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
2330 2331 2332 2333 2334 2335 2336 2337 2338

    if (!metadata_only) {
        if (!virDomainObjIsActive(vm)) {
            /* Ignore any skipped disks */
            if (qemuDomainSnapshotForEachQcow2(driver, vm, snap, "-d",
                                               true) < 0)
                goto cleanup;
        } else {
            priv = vm->privateData;
2339
            qemuDomainObjEnterMonitor(driver, vm);
2340 2341
            /* we continue on even in the face of error */
            qemuMonitorDeleteSnapshot(priv->mon, snap->def->name);
2342
            ignore_value(qemuDomainObjExitMonitor(driver, vm));
2343 2344 2345
        }
    }

2346
    if (virAsprintf(&snapFile, "%s/%s/%s.xml", cfg->snapshotDir,
2347
                    vm->def->name, snap->def->name) < 0)
2348 2349 2350 2351
        goto cleanup;

    if (snap == vm->current_snapshot) {
        if (update_current && snap->def->parent) {
2352
            parentsnap = virDomainSnapshotFindByName(vm->snapshots,
2353 2354 2355 2356 2357 2358 2359
                                                     snap->def->parent);
            if (!parentsnap) {
                VIR_WARN("missing parent snapshot matching name '%s'",
                         snap->def->parent);
            } else {
                parentsnap->def->current = true;
                if (qemuDomainSnapshotWriteMetadata(vm, parentsnap,
2360
                                                    cfg->snapshotDir) < 0) {
2361 2362 2363 2364 2365 2366 2367 2368 2369 2370 2371 2372
                    VIR_WARN("failed to set parent snapshot '%s' as current",
                             snap->def->parent);
                    parentsnap->def->current = false;
                    parentsnap = NULL;
                }
            }
        }
        vm->current_snapshot = parentsnap;
    }

    if (unlink(snapFile) < 0)
        VIR_WARN("Failed to unlink %s", snapFile);
2373
    virDomainSnapshotObjListRemove(vm->snapshots, snap);
2374 2375 2376

    ret = 0;

2377
 cleanup:
2378
    VIR_FREE(snapFile);
2379
    virObjectUnref(cfg);
2380 2381 2382 2383 2384 2385 2386 2387 2388
    return ret;
}

/* Hash iterator callback to discard multiple snapshots.  */
void qemuDomainSnapshotDiscardAll(void *payload,
                                  const void *name ATTRIBUTE_UNUSED,
                                  void *data)
{
    virDomainSnapshotObjPtr snap = payload;
2389
    virQEMUSnapRemovePtr curr = data;
2390 2391 2392 2393 2394 2395 2396 2397 2398 2399 2400
    int err;

    if (snap->def->current)
        curr->current = true;
    err = qemuDomainSnapshotDiscard(curr->driver, curr->vm, snap, false,
                                    curr->metadata_only);
    if (err && !curr->err)
        curr->err = err;
}

int
2401
qemuDomainSnapshotDiscardAllMetadata(virQEMUDriverPtr driver,
2402 2403
                                     virDomainObjPtr vm)
{
2404
    virQEMUSnapRemove rem;
2405 2406 2407 2408 2409

    rem.driver = driver;
    rem.vm = vm;
    rem.metadata_only = true;
    rem.err = 0;
2410 2411
    virDomainSnapshotForEach(vm->snapshots, qemuDomainSnapshotDiscardAll,
                             &rem);
2412 2413 2414 2415 2416

    return rem.err;
}

/*
2417
 * The caller must hold a lock the vm.
2418 2419
 */
void
2420
qemuDomainRemoveInactive(virQEMUDriverPtr driver,
2421 2422
                         virDomainObjPtr vm)
{
2423
    bool haveJob = true;
2424
    char *snapDir;
2425
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
2426

2427 2428 2429
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_MODIFY) < 0)
        haveJob = false;

2430 2431 2432 2433 2434
    /* Remove any snapshot metadata prior to removing the domain */
    if (qemuDomainSnapshotDiscardAllMetadata(driver, vm) < 0) {
        VIR_WARN("unable to remove all snapshots for domain %s",
                 vm->def->name);
    }
2435
    else if (virAsprintf(&snapDir, "%s/%s", cfg->snapshotDir,
2436 2437
                         vm->def->name) < 0) {
        VIR_WARN("unable to remove snapshot directory %s/%s",
2438
                 cfg->snapshotDir, vm->def->name);
2439 2440 2441 2442 2443
    } else {
        if (rmdir(snapDir) < 0 && errno != ENOENT)
            VIR_WARN("unable to remove snapshot directory %s", snapDir);
        VIR_FREE(snapDir);
    }
2444
    virDomainObjListRemove(driver->domains, vm);
2445
    virObjectUnref(cfg);
2446 2447

    if (haveJob)
2448
        qemuDomainObjEndJob(driver, vm);
2449
}
2450 2451

void
2452
qemuDomainSetFakeReboot(virQEMUDriverPtr driver,
2453 2454 2455 2456
                        virDomainObjPtr vm,
                        bool value)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
2457
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
2458 2459

    if (priv->fakeReboot == value)
2460
        goto cleanup;
2461 2462 2463

    priv->fakeReboot = value;

2464
    if (virDomainSaveStatus(driver->xmlopt, cfg->stateDir, vm) < 0)
2465
        VIR_WARN("Failed to save status on vm %s", vm->def->name);
2466

2467
 cleanup:
2468
    virObjectUnref(cfg);
2469
}
M
Michal Privoznik 已提交
2470

2471 2472 2473
static int
qemuDomainCheckRemoveOptionalDisk(virQEMUDriverPtr driver,
                                  virDomainObjPtr vm,
2474
                                  size_t diskIndex)
2475 2476
{
    char uuid[VIR_UUID_STRING_BUFLEN];
2477
    virObjectEventPtr event = NULL;
2478
    virDomainDiskDefPtr disk = vm->def->disks[diskIndex];
2479
    const char *src = virDomainDiskGetSource(disk);
2480 2481 2482 2483 2484

    virUUIDFormat(vm->def->uuid, uuid);

    VIR_DEBUG("Dropping disk '%s' on domain '%s' (UUID '%s') "
              "due to inaccessible source '%s'",
2485
              disk->dst, vm->def->name, uuid, src);
2486 2487 2488 2489

    if (disk->device == VIR_DOMAIN_DISK_DEVICE_CDROM ||
        disk->device == VIR_DOMAIN_DISK_DEVICE_FLOPPY) {

2490
        event = virDomainEventDiskChangeNewFromObj(vm, src, NULL,
2491 2492
                                                   disk->info.alias,
                                                   VIR_DOMAIN_EVENT_DISK_CHANGE_MISSING_ON_START);
2493
        ignore_value(virDomainDiskSetSource(disk, NULL));
2494
    } else {
2495
        event = virDomainEventDiskChangeNewFromObj(vm, src, NULL,
2496 2497
                                                   disk->info.alias,
                                                   VIR_DOMAIN_EVENT_DISK_DROP_MISSING_ON_START);
2498 2499
        virDomainDiskRemove(vm->def, diskIndex);
        virDomainDiskDefFree(disk);
2500 2501 2502 2503 2504 2505 2506 2507
    }

    if (event)
        qemuDomainEventQueue(driver, event);

    return 0;
}

2508 2509 2510
static int
qemuDomainCheckDiskStartupPolicy(virQEMUDriverPtr driver,
                                 virDomainObjPtr vm,
2511
                                 size_t diskIndex,
2512 2513
                                 bool cold_boot)
{
2514
    int startupPolicy = vm->def->disks[diskIndex]->startupPolicy;
2515
    int device = vm->def->disks[diskIndex]->device;
2516

2517
    switch ((virDomainStartupPolicy) startupPolicy) {
2518
        case VIR_DOMAIN_STARTUP_POLICY_OPTIONAL:
2519 2520 2521 2522 2523 2524 2525
            /* Once started with an optional disk, qemu saves its section
             * in the migration stream, so later, when restoring from it
             * we must make sure the sections match. */
            if (!cold_boot &&
                device != VIR_DOMAIN_DISK_DEVICE_FLOPPY &&
                device != VIR_DOMAIN_DISK_DEVICE_CDROM)
                goto error;
2526 2527 2528 2529 2530 2531
            break;

        case VIR_DOMAIN_STARTUP_POLICY_MANDATORY:
            goto error;

        case VIR_DOMAIN_STARTUP_POLICY_REQUISITE:
2532
            if (cold_boot)
2533 2534 2535 2536 2537 2538 2539 2540 2541
                goto error;
            break;

        case VIR_DOMAIN_STARTUP_POLICY_DEFAULT:
        case VIR_DOMAIN_STARTUP_POLICY_LAST:
            /* this should never happen */
            break;
    }

2542
    if (qemuDomainCheckRemoveOptionalDisk(driver, vm, diskIndex) < 0)
2543
        goto error;
2544 2545 2546

    return 0;

2547
 error:
2548 2549 2550
    return -1;
}

2551

M
Michal Privoznik 已提交
2552
int
2553
qemuDomainCheckDiskPresence(virQEMUDriverPtr driver,
M
Michal Privoznik 已提交
2554
                            virDomainObjPtr vm,
2555
                            bool cold_boot)
M
Michal Privoznik 已提交
2556 2557
{
    int ret = -1;
2558
    size_t i;
M
Michal Privoznik 已提交
2559

2560
    VIR_DEBUG("Checking for disk presence");
2561
    for (i = vm->def->ndisks; i > 0; i--) {
2562 2563
        size_t idx = i - 1;
        virDomainDiskDefPtr disk = vm->def->disks[idx];
2564
        virStorageFileFormat format = virDomainDiskGetFormat(disk);
M
Michal Privoznik 已提交
2565

2566
        if (virStorageSourceIsEmpty(disk->src))
2567 2568 2569 2570 2571
            continue;

        /* There is no need to check the backing chain for disks
         * without backing support, the fact that the file exists is
         * more than enough */
2572
        if (virStorageSourceIsLocalStorage(disk->src) &&
2573
            format >= VIR_STORAGE_FILE_NONE &&
2574
            format < VIR_STORAGE_FILE_BACKING &&
2575
            virFileExists(virDomainDiskGetSource(disk)))
M
Michal Privoznik 已提交
2576 2577
            continue;

2578
        if (qemuDomainDetermineDiskChain(driver, vm, disk, true, true) >= 0)
M
Michal Privoznik 已提交
2579
            continue;
2580

2581
        if (disk->startupPolicy &&
2582
            qemuDomainCheckDiskStartupPolicy(driver, vm, idx,
2583 2584 2585
                                             cold_boot) >= 0) {
            virResetLastError();
            continue;
M
Michal Privoznik 已提交
2586 2587
        }

2588
        goto error;
M
Michal Privoznik 已提交
2589 2590 2591 2592
    }

    ret = 0;

2593
 error:
M
Michal Privoznik 已提交
2594 2595
    return ret;
}
2596 2597 2598 2599 2600 2601 2602 2603 2604 2605

/*
 * The vm must be locked when any of the following cleanup functions is
 * called.
 */
int
qemuDomainCleanupAdd(virDomainObjPtr vm,
                     qemuDomainCleanupCallback cb)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
2606
    size_t i;
2607 2608 2609 2610 2611 2612 2613 2614 2615 2616

    VIR_DEBUG("vm=%s, cb=%p", vm->def->name, cb);

    for (i = 0; i < priv->ncleanupCallbacks; i++) {
        if (priv->cleanupCallbacks[i] == cb)
            return 0;
    }

    if (VIR_RESIZE_N(priv->cleanupCallbacks,
                     priv->ncleanupCallbacks_max,
2617
                     priv->ncleanupCallbacks, 1) < 0)
2618 2619 2620 2621 2622 2623 2624 2625 2626 2627 2628
        return -1;

    priv->cleanupCallbacks[priv->ncleanupCallbacks++] = cb;
    return 0;
}

void
qemuDomainCleanupRemove(virDomainObjPtr vm,
                        qemuDomainCleanupCallback cb)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
2629
    size_t i;
2630 2631 2632 2633

    VIR_DEBUG("vm=%s, cb=%p", vm->def->name, cb);

    for (i = 0; i < priv->ncleanupCallbacks; i++) {
2634 2635 2636
        if (priv->cleanupCallbacks[i] == cb)
            VIR_DELETE_ELEMENT_INPLACE(priv->cleanupCallbacks,
                                       i, priv->ncleanupCallbacks);
2637 2638 2639 2640 2641 2642 2643 2644
    }

    VIR_SHRINK_N(priv->cleanupCallbacks,
                 priv->ncleanupCallbacks_max,
                 priv->ncleanupCallbacks_max - priv->ncleanupCallbacks);
}

void
2645
qemuDomainCleanupRun(virQEMUDriverPtr driver,
2646 2647 2648
                     virDomainObjPtr vm)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
2649
    size_t i;
2650 2651 2652 2653

    VIR_DEBUG("driver=%p, vm=%s", driver, vm->def->name);

    /* run cleanup callbacks in reverse order */
2654 2655
    for (i = 0; i < priv->ncleanupCallbacks; i++) {
        if (priv->cleanupCallbacks[priv->ncleanupCallbacks - (i + 1)])
2656 2657 2658 2659 2660 2661 2662
            priv->cleanupCallbacks[i](driver, vm);
    }

    VIR_FREE(priv->cleanupCallbacks);
    priv->ncleanupCallbacks = 0;
    priv->ncleanupCallbacks_max = 0;
}
2663

2664 2665 2666
static void
qemuDomainGetImageIds(virQEMUDriverConfigPtr cfg,
                      virDomainObjPtr vm,
2667
                      virStorageSourcePtr src,
2668 2669 2670 2671 2672 2673 2674 2675 2676 2677 2678 2679 2680 2681 2682 2683 2684 2685
                      uid_t *uid, gid_t *gid)
{
    virSecurityLabelDefPtr vmlabel;
    virSecurityDeviceLabelDefPtr disklabel;

    if (uid)
        *uid = -1;
    if (gid)
        *gid = -1;

    if (cfg) {
        if (uid)
            *uid = cfg->user;

        if (gid)
            *gid = cfg->group;
    }

2686 2687
    if (vm && (vmlabel = virDomainDefGetSecurityLabelDef(vm->def, "dac")) &&
        vmlabel->label)
2688 2689
        virParseOwnershipIds(vmlabel->label, uid, gid);

2690
    if ((disklabel = virStorageSourceGetSecurityLabelDef(src, "dac")) &&
2691
        disklabel->label)
2692 2693 2694 2695
        virParseOwnershipIds(disklabel->label, uid, gid);
}


2696 2697 2698 2699 2700 2701 2702 2703 2704 2705 2706 2707 2708 2709 2710 2711 2712 2713 2714 2715 2716 2717 2718
int
qemuDomainStorageFileInit(virQEMUDriverPtr driver,
                          virDomainObjPtr vm,
                          virStorageSourcePtr src)
{
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
    uid_t uid;
    gid_t gid;
    int ret = -1;

    qemuDomainGetImageIds(cfg, vm, src, &uid, &gid);

    if (virStorageFileInitAs(src, uid, gid) < 0)
        goto cleanup;

    ret = 0;

 cleanup:
    virObjectUnref(cfg);
    return ret;
}


2719 2720 2721 2722 2723 2724 2725 2726 2727 2728 2729 2730 2731 2732 2733 2734
char *
qemuDomainStorageAlias(const char *device, int depth)
{
    char *alias;

    if (STRPREFIX(device, QEMU_DRIVE_HOST_PREFIX))
        device += strlen(QEMU_DRIVE_HOST_PREFIX);

    if (!depth)
        ignore_value(VIR_STRDUP(alias, device));
    else
        ignore_value(virAsprintf(&alias, "%s.%d", device, depth));
    return alias;
}


2735
int
2736
qemuDomainDetermineDiskChain(virQEMUDriverPtr driver,
2737
                             virDomainObjPtr vm,
2738
                             virDomainDiskDefPtr disk,
2739 2740
                             bool force_probe,
                             bool report_broken)
2741
{
2742 2743
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
    int ret = 0;
2744 2745
    uid_t uid;
    gid_t gid;
2746

2747
    if (virStorageSourceIsEmpty(disk->src))
2748
        goto cleanup;
2749

2750
    if (disk->src->backingStore) {
2751
        if (force_probe)
2752
            virStorageSourceBackingStoreClear(disk->src);
2753
        else
2754
            goto cleanup;
2755
    }
2756

2757
    qemuDomainGetImageIds(cfg, vm, disk->src, &uid, &gid);
2758

2759
    if (virStorageFileGetMetadata(disk->src,
2760
                                  uid, gid,
2761
                                  cfg->allowDiskFormatProbing,
2762
                                  report_broken) < 0)
2763 2764
        ret = -1;

2765
 cleanup:
2766 2767
    virObjectUnref(cfg);
    return ret;
2768
}
2769

2770 2771 2772 2773 2774 2775 2776 2777 2778 2779 2780 2781 2782 2783 2784 2785 2786 2787 2788 2789 2790 2791 2792

bool
qemuDomainDiskBlockJobIsActive(virDomainDiskDefPtr disk)
{
    if (disk->mirror) {
        virReportError(VIR_ERR_BLOCK_COPY_ACTIVE,
                       _("disk '%s' already in active block job"),
                       disk->dst);

        return true;
    }

    if (disk->blockjob) {
        virReportError(VIR_ERR_OPERATION_UNSUPPORTED,
                       _("disk '%s' already in active block job"),
                       disk->dst);
        return true;
    }

    return false;
}


2793 2794
int
qemuDomainUpdateDeviceList(virQEMUDriverPtr driver,
2795 2796
                           virDomainObjPtr vm,
                           int asyncJob)
2797 2798 2799
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
    char **aliases;
2800
    int rc;
2801 2802 2803 2804

    if (!virQEMUCapsGet(priv->qemuCaps, QEMU_CAPS_DEVICE_DEL_EVENT))
        return 0;

2805 2806
    if (qemuDomainObjEnterMonitorAsync(driver, vm, asyncJob) < 0)
        return -1;
2807 2808 2809 2810
    rc = qemuMonitorGetDeviceAliases(priv->mon, &aliases);
    if (qemuDomainObjExitMonitor(driver, vm) < 0)
        return -1;
    if (rc < 0)
2811 2812 2813 2814 2815 2816
        return -1;

    virStringFreeList(priv->qemuDevices);
    priv->qemuDevices = aliases;
    return 0;
}
2817

2818 2819 2820 2821 2822 2823 2824 2825 2826 2827 2828 2829 2830 2831 2832 2833 2834 2835 2836 2837 2838 2839 2840 2841 2842 2843 2844 2845 2846 2847 2848 2849 2850 2851 2852 2853 2854 2855 2856 2857 2858 2859 2860 2861 2862 2863 2864 2865 2866

int
qemuDomainUpdateMemoryDeviceInfo(virQEMUDriverPtr driver,
                                 virDomainObjPtr vm,
                                 int asyncJob)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
    virHashTablePtr meminfo = NULL;
    int rc;
    size_t i;

    if (vm->def->nmems == 0)
        return 0;

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

    rc = qemuMonitorGetMemoryDeviceInfo(priv->mon, &meminfo);

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

    /* if qemu doesn't support the info request, just carry on */
    if (rc == -2)
        return 0;

    if (rc < 0)
        return -1;

    for (i = 0; i < vm->def->nmems; i++) {
        virDomainMemoryDefPtr mem = vm->def->mems[i];
        qemuMonitorMemoryDeviceInfoPtr dimm;

        if (!mem->info.alias)
            continue;

        if (!(dimm = virHashLookup(meminfo, mem->info.alias)))
            continue;

        mem->info.type = VIR_DOMAIN_DEVICE_ADDRESS_TYPE_DIMM;
        mem->info.addr.dimm.slot = dimm->slot;
        mem->info.addr.dimm.base = dimm->address;
    }

    virHashFree(meminfo);
    return 0;
}


2867 2868 2869 2870 2871 2872 2873 2874 2875 2876 2877 2878 2879 2880 2881 2882
bool
qemuDomainDefCheckABIStability(virQEMUDriverPtr driver,
                               virDomainDefPtr src,
                               virDomainDefPtr dst)
{
    virDomainDefPtr migratableDefSrc = NULL;
    virDomainDefPtr migratableDefDst = NULL;
    const int flags = VIR_DOMAIN_XML_SECURE | VIR_DOMAIN_XML_UPDATE_CPU | VIR_DOMAIN_XML_MIGRATABLE;
    bool ret = false;

    if (!(migratableDefSrc = qemuDomainDefCopy(driver, src, flags)) ||
        !(migratableDefDst = qemuDomainDefCopy(driver, dst, flags)))
        goto cleanup;

    ret = virDomainDefCheckABIStability(migratableDefSrc, migratableDefDst);

2883
 cleanup:
2884 2885 2886 2887
    virDomainDefFree(migratableDefSrc);
    virDomainDefFree(migratableDefDst);
    return ret;
}
2888 2889

bool
2890
qemuDomainAgentAvailable(virDomainObjPtr vm,
2891 2892
                         bool reportError)
{
2893 2894
    qemuDomainObjPrivatePtr priv = vm->privateData;

2895 2896 2897 2898 2899 2900 2901 2902 2903 2904 2905 2906 2907 2908 2909
    if (priv->agentError) {
        if (reportError) {
            virReportError(VIR_ERR_AGENT_UNRESPONSIVE, "%s",
                           _("QEMU guest agent is not "
                             "available due to an error"));
        }
        return false;
    }
    if (!priv->agent) {
        if (reportError) {
            virReportError(VIR_ERR_ARGUMENT_UNSUPPORTED, "%s",
                           _("QEMU guest agent is not configured"));
        }
        return false;
    }
2910 2911 2912 2913 2914 2915 2916
    if (virDomainObjGetState(vm, NULL) != VIR_DOMAIN_RUNNING) {
        if (reportError) {
            virReportError(VIR_ERR_OPERATION_INVALID, "%s",
                           _("domain is not running"));
        }
        return false;
    }
2917 2918
    return true;
}
2919 2920 2921 2922 2923 2924 2925 2926 2927 2928 2929 2930 2931 2932 2933 2934 2935 2936 2937

/*
 * Finish working with a domain object in an API.  This function
 * clears whatever was left of a domain that was gathered using
 * qemuDomObjFromDomain().  Currently that means only unlocking and
 * decrementing the reference counter of that domain.  And in order to
 * make sure the caller does not access the domain, the pointer is
 * cleared.
 */
void
qemuDomObjEndAPI(virDomainObjPtr *vm)
{
    if (!*vm)
        return;

    virObjectUnlock(*vm);
    virObjectUnref(*vm);
    *vm = NULL;
}
2938 2939 2940 2941 2942 2943 2944 2945 2946 2947 2948 2949 2950 2951 2952 2953 2954 2955 2956


int
qemuDomainAlignMemorySizes(virDomainDefPtr def)
{
    unsigned long long mem;
    size_t ncells = virDomainNumaGetNodeCount(def->numa);
    size_t i;

    /* align NUMA cell sizes if relevant */
    for (i = 0; i < ncells; i++) {
        mem = virDomainNumaGetNodeMemorySize(def->numa, i);
        virDomainNumaSetNodeMemorySize(def->numa, i, VIR_ROUND_UP(mem, 1024));
    }

    /* align initial memory size */
    mem = virDomainDefGetMemoryInitial(def);
    virDomainDefSetMemoryInitial(def, VIR_ROUND_UP(mem, 1024));

2957 2958 2959 2960
    /* Align maximum memory size. QEMU requires rounding to next 4KiB block.
     * We'll take the "traditional" path and round it to 1MiB*/
    def->mem.max_memory = VIR_ROUND_UP(def->mem.max_memory, 1024);

2961 2962
    return 0;
}