qemu_domain.c 135.0 KB
Newer Older
1
/*
2
 * qemu_domain.c: QEMU domain private state
3
 *
4
 * Copyright (C) 2006-2016 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_parse_command.h"
29
#include "qemu_capabilities.h"
30
#include "qemu_migration.h"
31
#include "viralloc.h"
32
#include "virlog.h"
33
#include "virerror.h"
34
#include "c-ctype.h"
35
#include "cpu/cpu.h"
36
#include "viruuid.h"
E
Eric Blake 已提交
37
#include "virfile.h"
38
#include "domain_addr.h"
39
#include "domain_event.h"
40
#include "virtime.h"
41
#include "virstoragefile.h"
42
#include "virstring.h"
43
#include "virthreadjob.h"
44
#include "viratomic.h"
45
#include "virprocess.h"
46
#include "logging/log_manager.h"
47

48 49
#include "storage/storage_driver.h"

50
#include <sys/time.h>
51
#include <fcntl.h>
52

53 54 55 56
#include <libxml/xpathInternals.h>

#define VIR_FROM_THIS VIR_FROM_QEMU

57 58
VIR_LOG_INIT("qemu.qemu_domain");

59 60
#define QEMU_NAMESPACE_HREF "http://libvirt.org/schemas/domain/qemu/1.0"

61 62 63 64 65 66
VIR_ENUM_IMPL(qemuDomainJob, QEMU_JOB_LAST,
              "none",
              "query",
              "destroy",
              "suspend",
              "modify",
67
              "abort",
68
              "migration operation",
69 70 71 72 73 74 75 76 77 78
              "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",
79
              "snapshot",
80
              "start",
81 82
);

83

84 85 86
struct _qemuDomainLogContext {
    int refs;
    int writefd;
87
    int readfd; /* Only used if manager == NULL */
88
    off_t pos;
89
    ino_t inode; /* Only used if manager != NULL */
90
    char *path;
91
    virLogManagerPtr manager;
92 93
};

J
Jiri Denemark 已提交
94
const char *
95
qemuDomainAsyncJobPhaseToString(qemuDomainAsyncJob job,
J
Jiri Denemark 已提交
96 97 98 99 100
                                int phase ATTRIBUTE_UNUSED)
{
    switch (job) {
    case QEMU_ASYNC_JOB_MIGRATION_OUT:
    case QEMU_ASYNC_JOB_MIGRATION_IN:
101 102
        return qemuMigrationJobPhaseTypeToString(phase);

J
Jiri Denemark 已提交
103 104
    case QEMU_ASYNC_JOB_SAVE:
    case QEMU_ASYNC_JOB_DUMP:
105
    case QEMU_ASYNC_JOB_SNAPSHOT:
106
    case QEMU_ASYNC_JOB_START:
J
Jiri Denemark 已提交
107 108 109 110 111 112 113 114 115
    case QEMU_ASYNC_JOB_NONE:
    case QEMU_ASYNC_JOB_LAST:
        ; /* fall through */
    }

    return "none";
}

int
116
qemuDomainAsyncJobPhaseFromString(qemuDomainAsyncJob job,
J
Jiri Denemark 已提交
117 118 119 120 121 122 123 124
                                  const char *phase)
{
    if (!phase)
        return 0;

    switch (job) {
    case QEMU_ASYNC_JOB_MIGRATION_OUT:
    case QEMU_ASYNC_JOB_MIGRATION_IN:
125 126
        return qemuMigrationJobPhaseTypeFromString(phase);

J
Jiri Denemark 已提交
127 128
    case QEMU_ASYNC_JOB_SAVE:
    case QEMU_ASYNC_JOB_DUMP:
129
    case QEMU_ASYNC_JOB_SNAPSHOT:
130
    case QEMU_ASYNC_JOB_START:
J
Jiri Denemark 已提交
131 132 133 134 135 136 137 138 139 140 141
    case QEMU_ASYNC_JOB_NONE:
    case QEMU_ASYNC_JOB_LAST:
        ; /* fall through */
    }

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

142

143
void qemuDomainEventQueue(virQEMUDriverPtr driver,
144
                          virObjectEventPtr event)
145
{
146 147
    if (event)
        virObjectEventStateQueue(driver->domainEventState, event);
148 149 150
}


151 152 153 154 155 156 157 158
static int
qemuDomainObjInitJob(qemuDomainObjPrivatePtr priv)
{
    memset(&priv->job, 0, sizeof(priv->job));

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

159
    if (virCondInit(&priv->job.asyncCond) < 0) {
160
        virCondDestroy(&priv->job.cond);
161 162 163
        return -1;
    }

164 165 166 167 168 169 170 171 172
    return 0;
}

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

    job->active = QEMU_JOB_NONE;
173
    job->owner = 0;
174
    job->ownerAPI = NULL;
J
Jiri Denemark 已提交
175
    job->started = 0;
176 177 178 179 180 181 182 183
}

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

    job->asyncJob = QEMU_ASYNC_JOB_NONE;
184
    job->asyncOwner = 0;
185
    job->asyncOwnerAPI = NULL;
J
Jiri Denemark 已提交
186
    job->asyncStarted = 0;
J
Jiri Denemark 已提交
187
    job->phase = 0;
188
    job->mask = QEMU_JOB_DEFAULT_MASK;
189
    job->dump_memory_only = false;
190
    job->abortJob = false;
191
    job->spiceMigrated = false;
J
Jiri Denemark 已提交
192
    VIR_FREE(job->current);
193 194
}

195 196 197 198 199 200 201 202
void
qemuDomainObjRestoreJob(virDomainObjPtr obj,
                        struct qemuDomainJobObj *job)
{
    qemuDomainObjPrivatePtr priv = obj->privateData;

    memset(job, 0, sizeof(*job));
    job->active = priv->job.active;
203
    job->owner = priv->job.owner;
204
    job->asyncJob = priv->job.asyncJob;
205
    job->asyncOwner = priv->job.asyncOwner;
J
Jiri Denemark 已提交
206
    job->phase = priv->job.phase;
207 208 209 210 211

    qemuDomainObjResetJob(priv);
    qemuDomainObjResetAsyncJob(priv);
}

212 213 214
static void
qemuDomainObjFreeJob(qemuDomainObjPrivatePtr priv)
{
J
Jiri Denemark 已提交
215
    VIR_FREE(priv->job.current);
216
    VIR_FREE(priv->job.completed);
217 218
    virCondDestroy(&priv->job.cond);
    virCondDestroy(&priv->job.asyncCond);
219 220
}

221
static bool
222
qemuDomainTrackJob(qemuDomainJob job)
223 224 225 226
{
    return (QEMU_DOMAIN_TRACK_JOBS & JOB_MASK(job)) != 0;
}

227

J
Jiri Denemark 已提交
228 229 230 231 232 233 234 235 236 237 238
int
qemuDomainJobInfoUpdateTime(qemuDomainJobInfoPtr jobInfo)
{
    unsigned long long now;

    if (!jobInfo->started)
        return 0;

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

239 240 241 242 243 244
    if (now < jobInfo->started) {
        VIR_WARN("Async job starts in the future");
        jobInfo->started = 0;
        return 0;
    }

J
Jiri Denemark 已提交
245 246 247 248
    jobInfo->timeElapsed = now - jobInfo->started;
    return 0;
}

249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265
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;
    }

266 267
    jobInfo->stats.downtime = now - jobInfo->stopped;
    jobInfo->stats.downtime_set = true;
268 269 270
    return 0;
}

J
Jiri Denemark 已提交
271 272 273 274
int
qemuDomainJobInfoToInfo(qemuDomainJobInfoPtr jobInfo,
                        virDomainJobInfoPtr info)
{
275
    info->type = jobInfo->type;
J
Jiri Denemark 已提交
276 277 278
    info->timeElapsed = jobInfo->timeElapsed;
    info->timeRemaining = jobInfo->timeRemaining;

279 280 281
    info->memTotal = jobInfo->stats.ram_total;
    info->memRemaining = jobInfo->stats.ram_remaining;
    info->memProcessed = jobInfo->stats.ram_transferred;
J
Jiri Denemark 已提交
282

283 284 285
    info->fileTotal = jobInfo->stats.disk_total;
    info->fileRemaining = jobInfo->stats.disk_remaining;
    info->fileProcessed = jobInfo->stats.disk_transferred;
J
Jiri Denemark 已提交
286 287 288 289 290 291 292 293 294 295 296 297 298 299

    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)
{
300
    qemuMonitorMigrationStats *stats = &jobInfo->stats;
J
Jiri Denemark 已提交
301 302 303 304 305 306 307 308 309
    virTypedParameterPtr par = NULL;
    int maxpar = 0;
    int npar = 0;

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

310 311 312 313 314 315 316
    if (jobInfo->timeDeltaSet &&
        jobInfo->timeElapsed > jobInfo->timeDelta &&
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_TIME_ELAPSED_NET,
                                jobInfo->timeElapsed - jobInfo->timeDelta) < 0)
        goto error;

J
Jiri Denemark 已提交
317 318 319 320 321 322
    if (jobInfo->type == VIR_DOMAIN_JOB_BOUNDED &&
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_TIME_REMAINING,
                                jobInfo->timeRemaining) < 0)
        goto error;

323
    if (stats->downtime_set &&
J
Jiri Denemark 已提交
324 325
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_DOWNTIME,
326
                                stats->downtime) < 0)
J
Jiri Denemark 已提交
327 328
        goto error;

329
    if (stats->downtime_set &&
330
        jobInfo->timeDeltaSet &&
331
        stats->downtime > jobInfo->timeDelta &&
332 333
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_DOWNTIME_NET,
334
                                stats->downtime - jobInfo->timeDelta) < 0)
335 336
        goto error;

337
    if (stats->setup_time_set &&
338 339
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_SETUP_TIME,
340
                                stats->setup_time) < 0)
341 342
        goto error;

J
Jiri Denemark 已提交
343 344
    if (virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_DATA_TOTAL,
345 346
                                stats->ram_total +
                                stats->disk_total) < 0 ||
J
Jiri Denemark 已提交
347 348
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_DATA_PROCESSED,
349 350
                                stats->ram_transferred +
                                stats->disk_transferred) < 0 ||
J
Jiri Denemark 已提交
351 352
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_DATA_REMAINING,
353 354
                                stats->ram_remaining +
                                stats->disk_remaining) < 0)
J
Jiri Denemark 已提交
355 356 357 358
        goto error;

    if (virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_MEMORY_TOTAL,
359
                                stats->ram_total) < 0 ||
J
Jiri Denemark 已提交
360 361
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_MEMORY_PROCESSED,
362
                                stats->ram_transferred) < 0 ||
J
Jiri Denemark 已提交
363 364
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_MEMORY_REMAINING,
365
                                stats->ram_remaining) < 0)
J
Jiri Denemark 已提交
366 367
        goto error;

368
    if (stats->ram_bps &&
369 370
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_MEMORY_BPS,
371
                                stats->ram_bps) < 0)
372 373
        goto error;

374
    if (stats->ram_duplicate_set) {
J
Jiri Denemark 已提交
375 376
        if (virTypedParamsAddULLong(&par, &npar, &maxpar,
                                    VIR_DOMAIN_JOB_MEMORY_CONSTANT,
377
                                    stats->ram_duplicate) < 0 ||
J
Jiri Denemark 已提交
378 379
            virTypedParamsAddULLong(&par, &npar, &maxpar,
                                    VIR_DOMAIN_JOB_MEMORY_NORMAL,
380
                                    stats->ram_normal) < 0 ||
J
Jiri Denemark 已提交
381 382
            virTypedParamsAddULLong(&par, &npar, &maxpar,
                                    VIR_DOMAIN_JOB_MEMORY_NORMAL_BYTES,
383
                                    stats->ram_normal_bytes) < 0)
J
Jiri Denemark 已提交
384 385 386
            goto error;
    }

387 388 389 390 391 392 393 394
    if (virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_MEMORY_DIRTY_RATE,
                                stats->ram_dirty_rate) < 0 ||
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_MEMORY_ITERATION,
                                stats->ram_iteration) < 0)
        goto error;

J
Jiri Denemark 已提交
395 396
    if (virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_DISK_TOTAL,
397
                                stats->disk_total) < 0 ||
J
Jiri Denemark 已提交
398 399
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_DISK_PROCESSED,
400
                                stats->disk_transferred) < 0 ||
J
Jiri Denemark 已提交
401 402
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_DISK_REMAINING,
403
                                stats->disk_remaining) < 0)
J
Jiri Denemark 已提交
404 405
        goto error;

406
    if (stats->disk_bps &&
407 408
        virTypedParamsAddULLong(&par, &npar, &maxpar,
                                VIR_DOMAIN_JOB_DISK_BPS,
409
                                stats->disk_bps) < 0)
410 411
        goto error;

412
    if (stats->xbzrle_set) {
J
Jiri Denemark 已提交
413 414
        if (virTypedParamsAddULLong(&par, &npar, &maxpar,
                                    VIR_DOMAIN_JOB_COMPRESSION_CACHE,
415
                                    stats->xbzrle_cache_size) < 0 ||
J
Jiri Denemark 已提交
416 417
            virTypedParamsAddULLong(&par, &npar, &maxpar,
                                    VIR_DOMAIN_JOB_COMPRESSION_BYTES,
418
                                    stats->xbzrle_bytes) < 0 ||
J
Jiri Denemark 已提交
419 420
            virTypedParamsAddULLong(&par, &npar, &maxpar,
                                    VIR_DOMAIN_JOB_COMPRESSION_PAGES,
421
                                    stats->xbzrle_pages) < 0 ||
J
Jiri Denemark 已提交
422 423
            virTypedParamsAddULLong(&par, &npar, &maxpar,
                                    VIR_DOMAIN_JOB_COMPRESSION_CACHE_MISSES,
424
                                    stats->xbzrle_cache_miss) < 0 ||
J
Jiri Denemark 已提交
425 426
            virTypedParamsAddULLong(&par, &npar, &maxpar,
                                    VIR_DOMAIN_JOB_COMPRESSION_OVERFLOW,
427
                                    stats->xbzrle_overflow) < 0)
J
Jiri Denemark 已提交
428 429 430 431 432 433 434 435 436 437 438 439 440 441
            goto error;
    }

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

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


442 443 444 445 446 447 448 449
static virClassPtr qemuDomainDiskPrivateClass;

static int
qemuDomainDiskPrivateOnceInit(void)
{
    qemuDomainDiskPrivateClass = virClassNew(virClassForObject(),
                                             "qemuDomainDiskPrivate",
                                             sizeof(qemuDomainDiskPrivate),
450
                                             NULL);
451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473
    if (!qemuDomainDiskPrivateClass)
        return -1;
    else
        return 0;
}

VIR_ONCE_GLOBAL_INIT(qemuDomainDiskPrivate)

static virObjectPtr
qemuDomainDiskPrivateNew(void)
{
    qemuDomainDiskPrivatePtr priv;

    if (qemuDomainDiskPrivateInitialize() < 0)
        return NULL;

    if (!(priv = virObjectNew(qemuDomainDiskPrivateClass)))
        return NULL;

    return (virObjectPtr) priv;
}


474 475
static void *
qemuDomainObjPrivateAlloc(void)
476 477 478 479 480 481
{
    qemuDomainObjPrivatePtr priv;

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

482 483 484
    if (qemuDomainObjInitJob(priv) < 0) {
        virReportSystemError(errno, "%s",
                             _("Unable to init qemu driver mutexes"));
485
        goto error;
486
    }
487

488 489 490
    if (virCondInit(&priv->unplugFinished) < 0)
        goto error;

491
    if (!(priv->devs = virChrdevAlloc()))
492 493
        goto error;

494
    priv->migMaxBandwidth = QEMU_DOMAIN_MIG_BANDWIDTH_MAX;
495

496
    return priv;
497

498
 error:
499 500
    VIR_FREE(priv);
    return NULL;
501 502
}

503 504
static void
qemuDomainObjPrivateFree(void *data)
505 506 507
{
    qemuDomainObjPrivatePtr priv = data;

508
    virObjectUnref(priv->qemuCaps);
509

510
    virCgroupFree(&priv->cgroup);
511
    virDomainPCIAddressSetFree(priv->pciaddrs);
J
Ján Tomko 已提交
512
    virDomainCCWAddressSetFree(priv->ccwaddrs);
513
    virDomainVirtioSerialAddrSetFree(priv->vioserialaddrs);
514
    virDomainChrSourceDefFree(priv->monConfig);
515
    qemuDomainObjFreeJob(priv);
516
    VIR_FREE(priv->vcpupids);
517
    VIR_FREE(priv->lockState);
J
Jiri Denemark 已提交
518
    VIR_FREE(priv->origname);
519

520
    virCondDestroy(&priv->unplugFinished);
521
    virStringFreeList(priv->qemuDevices);
522
    virChrdevFree(priv->devs);
523

524 525
    /* This should never be non-NULL if we get here, but just in case... */
    if (priv->mon) {
526
        VIR_ERROR(_("Unexpected QEMU monitor still active during domain deletion"));
527 528
        qemuMonitorClose(priv->mon);
    }
D
Daniel P. Berrange 已提交
529 530 531 532
    if (priv->agent) {
        VIR_ERROR(_("Unexpected QEMU agent still active during domain deletion"));
        qemuAgentClose(priv->agent);
    }
533
    VIR_FREE(priv->cleanupCallbacks);
534
    virBitmapFree(priv->autoNodeset);
535
    virBitmapFree(priv->autoCpuset);
536 537 538 539
    VIR_FREE(priv);
}


540
static int
541 542
qemuDomainObjPrivateXMLFormat(virBufferPtr buf,
                              virDomainObjPtr vm)
543
{
544
    qemuDomainObjPrivatePtr priv = vm->privateData;
545
    const char *monitorpath;
546
    qemuDomainJob job;
547 548 549

    /* priv->monitor_chr is set only for qemu */
    if (priv->monConfig) {
550
        switch (priv->monConfig->type) {
551
        case VIR_DOMAIN_CHR_TYPE_UNIX:
552
            monitorpath = priv->monConfig->data.nix.path;
553 554 555
            break;
        default:
        case VIR_DOMAIN_CHR_TYPE_PTY:
556
            monitorpath = priv->monConfig->data.file.path;
557 558 559
            break;
        }

560
        virBufferEscapeString(buf, "<monitor path='%s'", monitorpath);
561 562
        if (priv->monJSON)
            virBufferAddLit(buf, " json='1'");
563
        virBufferAsprintf(buf, " type='%s'/>\n",
564
                          virDomainChrTypeToString(priv->monConfig->type));
565 566 567 568
    }


    if (priv->nvcpupids) {
569
        size_t i;
570 571
        virBufferAddLit(buf, "<vcpus>\n");
        virBufferAdjustIndent(buf, 2);
572
        for (i = 0; i < priv->nvcpupids; i++)
573 574 575
            virBufferAsprintf(buf, "<vcpu pid='%d'/>\n", priv->vcpupids[i]);
        virBufferAdjustIndent(buf, -2);
        virBufferAddLit(buf, "</vcpus>\n");
576 577
    }

578
    if (priv->qemuCaps) {
579
        size_t i;
580 581
        virBufferAddLit(buf, "<qemuCaps>\n");
        virBufferAdjustIndent(buf, 2);
582
        for (i = 0; i < QEMU_CAPS_LAST; i++) {
583
            if (virQEMUCapsGet(priv->qemuCaps, i)) {
584
                virBufferAsprintf(buf, "<flag name='%s'/>\n",
585
                                  virQEMUCapsTypeToString(i));
586 587
            }
        }
588 589
        virBufferAdjustIndent(buf, -2);
        virBufferAddLit(buf, "</qemuCaps>\n");
590 591
    }

592
    if (priv->lockState)
593
        virBufferAsprintf(buf, "<lockstate>%s</lockstate>\n", priv->lockState);
594

595 596 597 598
    job = priv->job.active;
    if (!qemuDomainTrackJob(job))
        priv->job.active = QEMU_JOB_NONE;

599
    if (priv->job.active || priv->job.asyncJob) {
600
        virBufferAsprintf(buf, "<job type='%s' async='%s'",
601 602
                          qemuDomainJobTypeToString(priv->job.active),
                          qemuDomainAsyncJobTypeToString(priv->job.asyncJob));
J
Jiri Denemark 已提交
603 604 605 606 607
        if (priv->job.phase) {
            virBufferAsprintf(buf, " phase='%s'",
                              qemuDomainAsyncJobPhaseToString(
                                    priv->job.asyncJob, priv->job.phase));
        }
608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628
        if (priv->job.asyncJob != QEMU_ASYNC_JOB_MIGRATION_OUT) {
            virBufferAddLit(buf, "/>\n");
        } else {
            size_t i;
            virDomainDiskDefPtr disk;
            qemuDomainDiskPrivatePtr diskPriv;

            virBufferAddLit(buf, ">\n");
            virBufferAdjustIndent(buf, 2);

            for (i = 0; i < vm->def->ndisks; i++) {
                disk = vm->def->disks[i];
                diskPriv = QEMU_DOMAIN_DISK_PRIVATE(disk);
                virBufferAsprintf(buf, "<disk dev='%s' migrating='%s'/>\n",
                                  disk->dst,
                                  diskPriv->migrating ? "yes" : "no");
            }

            virBufferAdjustIndent(buf, -2);
            virBufferAddLit(buf, "</job>\n");
        }
629
    }
630
    priv->job.active = job;
631

632
    if (priv->fakeReboot)
633
        virBufferAddLit(buf, "<fakereboot/>\n");
634

635 636
    if (priv->qemuDevices && *priv->qemuDevices) {
        char **tmp = priv->qemuDevices;
637 638
        virBufferAddLit(buf, "<devices>\n");
        virBufferAdjustIndent(buf, 2);
639
        while (*tmp) {
640
            virBufferAsprintf(buf, "<device alias='%s'/>\n", *tmp);
641 642
            tmp++;
        }
643 644
        virBufferAdjustIndent(buf, -2);
        virBufferAddLit(buf, "</devices>\n");
645 646
    }

647 648 649 650 651 652 653 654 655 656
    if (priv->autoNodeset) {
        char *nodeset = virBitmapFormat(priv->autoNodeset);

        if (!nodeset)
            return -1;

        virBufferAsprintf(buf, "<numad nodeset='%s'/>\n", nodeset);
        VIR_FREE(nodeset);
    }

657 658 659
    return 0;
}

660
static int
661
qemuDomainObjPrivateXMLParse(xmlXPathContextPtr ctxt,
662
                             virDomainObjPtr vm,
663
                             virDomainDefParserConfigPtr config)
664
{
665
    qemuDomainObjPrivatePtr priv = vm->privateData;
666
    virQEMUDriverPtr driver = config->priv;
667
    char *monitorpath;
668
    char *tmp = NULL;
669 670
    int n;
    size_t i;
671
    xmlNodePtr *nodes = NULL;
672
    virQEMUCapsPtr qemuCaps = NULL;
673
    virCapsPtr caps = NULL;
674

675
    if (VIR_ALLOC(priv->monConfig) < 0)
676 677 678 679
        goto error;

    if (!(monitorpath =
          virXPathString("string(./monitor[1]/@path)", ctxt))) {
680 681
        virReportError(VIR_ERR_INTERNAL_ERROR,
                       "%s", _("no monitor path"));
682 683 684 685 686
        goto error;
    }

    tmp = virXPathString("string(./monitor[1]/@type)", ctxt);
    if (tmp)
687
        priv->monConfig->type = virDomainChrTypeFromString(tmp);
688
    else
689
        priv->monConfig->type = VIR_DOMAIN_CHR_TYPE_PTY;
690 691
    VIR_FREE(tmp);

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

695
    switch (priv->monConfig->type) {
696
    case VIR_DOMAIN_CHR_TYPE_PTY:
697
        priv->monConfig->data.file.path = monitorpath;
698 699
        break;
    case VIR_DOMAIN_CHR_TYPE_UNIX:
700
        priv->monConfig->data.nix.path = monitorpath;
701 702 703
        break;
    default:
        VIR_FREE(monitorpath);
704 705 706
        virReportError(VIR_ERR_INTERNAL_ERROR,
                       _("unsupported monitor type '%s'"),
                       virDomainChrTypeToString(priv->monConfig->type));
707 708 709 710 711 712 713 714
        goto error;
    }

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

718
        for (i = 0; i < n; i++) {
719 720 721 722 723 724 725 726 727 728 729 730
            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);
    }
731

732
    if ((n = virXPathNodeSet("./qemuCaps/flag", ctxt, &nodes)) < 0) {
733 734
        virReportError(VIR_ERR_INTERNAL_ERROR,
                       "%s", _("failed to parse qemu capabilities flags"));
735 736 737
        goto error;
    }
    if (n > 0) {
738
        if (!(qemuCaps = virQEMUCapsNew()))
739 740
            goto error;

741
        for (i = 0; i < n; i++) {
742 743
            char *str = virXMLPropString(nodes[i], "name");
            if (str) {
744
                int flag = virQEMUCapsTypeFromString(str);
745
                if (flag < 0) {
746 747
                    virReportError(VIR_ERR_INTERNAL_ERROR,
                                   _("Unknown qemu capabilities flag %s"), str);
748
                    VIR_FREE(str);
749 750
                    goto error;
                }
751
                VIR_FREE(str);
752
                virQEMUCapsSet(qemuCaps, flag);
753 754 755
            }
        }

756
        priv->qemuCaps = qemuCaps;
757
        qemuCaps = NULL;
758 759 760
    }
    VIR_FREE(nodes);

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

763 764 765 766
    if ((tmp = virXPathString("string(./job[1]/@type)", ctxt))) {
        int type;

        if ((type = qemuDomainJobTypeFromString(tmp)) < 0) {
767 768
            virReportError(VIR_ERR_INTERNAL_ERROR,
                           _("Unknown job type %s"), tmp);
769 770 771 772 773 774 775 776 777 778 779
            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) {
780 781
            virReportError(VIR_ERR_INTERNAL_ERROR,
                           _("Unknown async job type %s"), tmp);
782 783 784 785 786
            VIR_FREE(tmp);
            goto error;
        }
        VIR_FREE(tmp);
        priv->job.asyncJob = async;
J
Jiri Denemark 已提交
787 788 789 790

        if ((tmp = virXPathString("string(./job[1]/@phase)", ctxt))) {
            priv->job.phase = qemuDomainAsyncJobPhaseFromString(async, tmp);
            if (priv->job.phase < 0) {
791 792
                virReportError(VIR_ERR_INTERNAL_ERROR,
                               _("Unknown job phase %s"), tmp);
J
Jiri Denemark 已提交
793 794 795 796 797
                VIR_FREE(tmp);
                goto error;
            }
            VIR_FREE(tmp);
        }
798 799
    }

800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822
    if ((n = virXPathNodeSet("./job[1]/disk[@migrating='yes']",
                             ctxt, &nodes)) < 0) {
        virReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                       _("failed to parse list of disks marked for migration"));
        goto error;
    }
    if (n > 0) {
        if (priv->job.asyncJob != QEMU_ASYNC_JOB_MIGRATION_OUT) {
            VIR_WARN("Found disks marked for migration but we were not "
                     "migrating");
            n = 0;
        }
        for (i = 0; i < n; i++) {
            char *dst = virXMLPropString(nodes[i], "dev");
            virDomainDiskDefPtr disk;

            if (dst && (disk = virDomainDiskByName(vm->def, dst, false)))
                QEMU_DOMAIN_DISK_PRIVATE(disk)->migrating = true;
            VIR_FREE(dst);
        }
    }
    VIR_FREE(nodes);

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

825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845
    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);

846 847 848 849 850 851 852 853 854 855 856 857 858 859 860
    if (!(caps = virQEMUDriverGetCapabilities(driver, false)))
        goto error;

    if ((tmp = virXPathString("string(./numad/@nodeset)", ctxt))) {
        if (virBitmapParse(tmp, 0, &priv->autoNodeset,
                           caps->host.nnumaCell_max) < 0)
            goto error;

        if (!(priv->autoCpuset = virCapabilitiesGetCpusForNodemask(caps,
                                                                   priv->autoNodeset)))
            goto error;
    }
    virObjectUnref(caps);
    VIR_FREE(tmp);

861 862
    return 0;

863
 error:
864
    virDomainChrSourceDefFree(priv->monConfig);
865 866
    priv->monConfig = NULL;
    VIR_FREE(nodes);
867
    VIR_FREE(tmp);
868 869
    virStringFreeList(priv->qemuDevices);
    priv->qemuDevices = NULL;
870
    virObjectUnref(qemuCaps);
871
    virObjectUnref(caps);
872 873 874 875
    return -1;
}


876 877 878
virDomainXMLPrivateDataCallbacks virQEMUDriverPrivateDataCallbacks = {
    .alloc = qemuDomainObjPrivateAlloc,
    .free = qemuDomainObjPrivateFree,
879
    .diskNew = qemuDomainDiskPrivateNew,
880 881 882 883 884
    .parse = qemuDomainObjPrivateXMLParse,
    .format = qemuDomainObjPrivateXMLFormat,
};


885 886 887 888 889
static void
qemuDomainDefNamespaceFree(void *nsdata)
{
    qemuDomainCmdlineDefPtr cmd = nsdata;

890
    qemuDomainCmdlineDefFree(cmd);
891 892 893
}

static int
P
Philipp Hahn 已提交
894 895
qemuDomainDefNamespaceParse(xmlDocPtr xml ATTRIBUTE_UNUSED,
                            xmlNodePtr root ATTRIBUTE_UNUSED,
896 897 898 899
                            xmlXPathContextPtr ctxt,
                            void **data)
{
    qemuDomainCmdlineDefPtr cmd = NULL;
P
Philipp Hahn 已提交
900
    bool uses_qemu_ns = false;
901
    xmlNodePtr *nodes = NULL;
902 903
    int n;
    size_t i;
904

P
Philipp Hahn 已提交
905
    if (xmlXPathRegisterNs(ctxt, BAD_CAST "qemu", BAD_CAST QEMU_NAMESPACE_HREF) < 0) {
906 907 908
        virReportError(VIR_ERR_INTERNAL_ERROR,
                       _("Failed to register xml namespace '%s'"),
                       QEMU_NAMESPACE_HREF);
909 910 911
        return -1;
    }

912
    if (VIR_ALLOC(cmd) < 0)
913 914 915 916 917 918
        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 已提交
919
    uses_qemu_ns |= n > 0;
920 921

    if (n && VIR_ALLOC_N(cmd->args, n) < 0)
922
        goto error;
923 924 925 926

    for (i = 0; i < n; i++) {
        cmd->args[cmd->num_args] = virXMLPropString(nodes[i], "value");
        if (cmd->args[cmd->num_args] == NULL) {
927 928
            virReportError(VIR_ERR_INTERNAL_ERROR,
                           "%s", _("No qemu command-line argument specified"));
929 930 931 932 933 934 935 936 937 938 939
            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 已提交
940
    uses_qemu_ns |= n > 0;
941 942

    if (n && VIR_ALLOC_N(cmd->env_name, n) < 0)
943
        goto error;
944 945

    if (n && VIR_ALLOC_N(cmd->env_value, n) < 0)
946
        goto error;
947 948 949 950 951 952

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

        tmp = virXMLPropString(nodes[i], "name");
        if (tmp == NULL) {
953 954
            virReportError(VIR_ERR_INTERNAL_ERROR,
                           "%s", _("No qemu environment name specified"));
955 956 957
            goto error;
        }
        if (tmp[0] == '\0') {
958 959
            virReportError(VIR_ERR_INTERNAL_ERROR,
                           "%s", _("Empty qemu environment name specified"));
960 961 962
            goto error;
        }
        if (!c_isalpha(tmp[0]) && tmp[0] != '_') {
963 964
            virReportError(VIR_ERR_INTERNAL_ERROR,
                           "%s", _("Invalid environment name, it must begin with a letter or underscore"));
965 966 967
            goto error;
        }
        if (strspn(tmp, "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789_") != strlen(tmp)) {
968 969
            virReportError(VIR_ERR_INTERNAL_ERROR,
                           "%s", _("Invalid environment name, it must contain only alphanumerics and underscore"));
970 971 972 973 974 975 976 977 978 979 980 981
            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 已提交
982 983 984 985
    if (uses_qemu_ns)
        *data = cmd;
    else
        VIR_FREE(cmd);
986 987 988

    return 0;

989
 error:
990 991 992 993 994 995 996 997 998 999
    VIR_FREE(nodes);
    qemuDomainDefNamespaceFree(cmd);
    return -1;
}

static int
qemuDomainDefNamespaceFormatXML(virBufferPtr buf,
                                void *nsdata)
{
    qemuDomainCmdlineDefPtr cmd = nsdata;
1000
    size_t i;
1001 1002 1003 1004

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

1005 1006 1007
    virBufferAddLit(buf, "<qemu:commandline>\n");
    virBufferAdjustIndent(buf, 2);

1008
    for (i = 0; i < cmd->num_args; i++)
1009
        virBufferEscapeString(buf, "<qemu:arg value='%s'/>\n",
1010 1011
                              cmd->args[i]);
    for (i = 0; i < cmd->num_env; i++) {
1012
        virBufferAsprintf(buf, "<qemu:env name='%s'", cmd->env_name[i]);
1013 1014 1015 1016 1017
        if (cmd->env_value[i])
            virBufferEscapeString(buf, " value='%s'", cmd->env_value[i]);
        virBufferAddLit(buf, "/>\n");
    }

1018 1019
    virBufferAdjustIndent(buf, -2);
    virBufferAddLit(buf, "</qemu:commandline>\n");
1020 1021 1022 1023 1024 1025 1026 1027 1028 1029
    return 0;
}

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


1030 1031 1032 1033 1034 1035
virDomainXMLNamespace virQEMUDriverDomainXMLNamespace = {
    .parse = qemuDomainDefNamespaceParse,
    .free = qemuDomainDefNamespaceFree,
    .format = qemuDomainDefNamespaceFormatXML,
    .href = qemuDomainDefNamespaceHref,
};
1036

1037

P
Pavel Hrdina 已提交
1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056
static int
qemuDomainDefAddImplicitInputDevice(virDomainDef *def)
{
    if (ARCH_IS_X86(def->os.arch)) {
        if (virDomainDefMaybeAddInput(def,
                                      VIR_DOMAIN_INPUT_TYPE_MOUSE,
                                      VIR_DOMAIN_INPUT_BUS_PS2) < 0)
            return -1;

        if (virDomainDefMaybeAddInput(def,
                                      VIR_DOMAIN_INPUT_TYPE_KBD,
                                      VIR_DOMAIN_INPUT_BUS_PS2) < 0)
            return -1;
    }

    return 0;
}


1057
static int
1058 1059
qemuDomainDefAddDefaultDevices(virDomainDefPtr def,
                               virQEMUCapsPtr qemuCaps)
1060
{
1061
    bool addDefaultUSB = true;
1062
    int usbModel = -1; /* "default for machinetype" */
1063
    bool addImplicitSATA = false;
1064
    bool addPCIRoot = false;
L
Laine Stump 已提交
1065
    bool addPCIeRoot = false;
1066
    bool addDefaultMemballoon = true;
1067 1068
    bool addDefaultUSBKBD = false;
    bool addDefaultUSBMouse = false;
1069
    bool addPanicDevice = false;
1070
    int ret = -1;
1071

P
Pavel Hrdina 已提交
1072 1073 1074 1075
    /* add implicit input devices */
    if (qemuDomainDefAddImplicitInputDevice(def) < 0)
        goto cleanup;

1076 1077 1078 1079 1080 1081
    /* 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 已提交
1082
        if (STREQ(def->os.machine, "isapc")) {
1083
            addDefaultUSB = false;
1084
            break;
1085
        }
L
Laine Stump 已提交
1086 1087
        if (STRPREFIX(def->os.machine, "pc-q35") ||
            STREQ(def->os.machine, "q35")) {
1088 1089
            addPCIeRoot = true;
            addImplicitSATA = true;
1090 1091 1092 1093 1094 1095 1096 1097

            /* add a USB2 controller set, but only if the
             * ich9-usb-ehci1 device is supported
             */
            if (virQEMUCapsGet(qemuCaps, QEMU_CAPS_ICH9_USB_EHCI1))
                usbModel = VIR_DOMAIN_CONTROLLER_MODEL_USB_ICH9_EHCI1;
            else
                addDefaultUSB = false;
1098
            break;
L
Laine Stump 已提交
1099
        }
1100 1101
        if (!STRPREFIX(def->os.machine, "pc-0.") &&
            !STRPREFIX(def->os.machine, "pc-1.") &&
1102
            !STRPREFIX(def->os.machine, "pc-i440") &&
1103
            STRNEQ(def->os.machine, "pc") &&
1104 1105 1106 1107 1108
            !STRPREFIX(def->os.machine, "rhel"))
            break;
        addPCIRoot = true;
        break;

1109
    case VIR_ARCH_ARMV7L:
1110
    case VIR_ARCH_AARCH64:
1111 1112 1113 1114 1115 1116 1117
        addDefaultUSB = false;
        addDefaultMemballoon = false;
        if (STREQ(def->os.machine, "virt") ||
            STRPREFIX(def->os.machine, "virt-")) {
            addPCIeRoot = virQEMUCapsGet(qemuCaps, QEMU_CAPS_OBJECT_GPEX);
        }
        break;
1118

1119
    case VIR_ARCH_PPC64:
1120
    case VIR_ARCH_PPC64LE:
1121 1122 1123
        addPCIRoot = true;
        addDefaultUSBKBD = true;
        addDefaultUSBMouse = true;
1124 1125 1126 1127 1128
        /* For pSeries guests, the firmware provides the same
         * functionality as the pvpanic device, so automatically
         * add the definition if not already present */
        if (STRPREFIX(def->os.machine, "pseries"))
            addPanicDevice = true;
1129 1130
        break;

1131 1132 1133 1134 1135 1136 1137
    case VIR_ARCH_ALPHA:
    case VIR_ARCH_PPC:
    case VIR_ARCH_PPCEMB:
    case VIR_ARCH_SH4:
    case VIR_ARCH_SH4EB:
        addPCIRoot = true;
        break;
1138 1139 1140 1141 1142 1143
    case VIR_ARCH_S390:
        addDefaultUSB = false;
        break;
    case VIR_ARCH_S390X:
        addDefaultUSB = false;
        break;
1144 1145 1146 1147 1148 1149

    case VIR_ARCH_SPARC:
    case VIR_ARCH_SPARC64:
        addPCIRoot = true;
        break;

1150 1151 1152 1153
    default:
        break;
    }

1154
    if (addDefaultUSB &&
1155 1156
        virDomainControllerFind(def, VIR_DOMAIN_CONTROLLER_TYPE_USB, 0) < 0 &&
        virDomainDefAddUSBController(def, 0, usbModel) < 0)
1157
        goto cleanup;
1158

1159 1160 1161
    if (addImplicitSATA &&
        virDomainDefMaybeAddController(
            def, VIR_DOMAIN_CONTROLLER_TYPE_SATA, 0, -1) < 0)
1162
        goto cleanup;
1163

1164 1165 1166
    /* NB: any machine that sets addPCIRoot to true must also return
     * true from the function qemuDomainSupportsPCI().
     */
1167 1168 1169 1170
    if (addPCIRoot &&
        virDomainDefMaybeAddController(
            def, VIR_DOMAIN_CONTROLLER_TYPE_PCI, 0,
            VIR_DOMAIN_CONTROLLER_MODEL_PCI_ROOT) < 0)
1171
        goto cleanup;
1172

1173 1174 1175
    /* 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
1176 1177 1178
     *
     * NB: any machine that sets addPCIeRoot to true must also return
     * true from the function qemuDomainSupportsPCI().
1179 1180 1181 1182 1183 1184 1185 1186 1187 1188 1189
     */
    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) {
1190
            goto cleanup;
1191 1192
        }
    }
1193

1194
    if (addDefaultMemballoon && !def->memballoon) {
1195 1196
        virDomainMemballoonDefPtr memballoon;
        if (VIR_ALLOC(memballoon) < 0)
1197
            goto cleanup;
1198 1199 1200 1201 1202

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

1203 1204 1205 1206 1207
    if (addDefaultUSBKBD &&
        def->ngraphics > 0 &&
        virDomainDefMaybeAddInput(def,
                                  VIR_DOMAIN_INPUT_TYPE_KBD,
                                  VIR_DOMAIN_INPUT_BUS_USB) < 0)
1208
        goto cleanup;
1209 1210 1211 1212 1213 1214

    if (addDefaultUSBMouse &&
        def->ngraphics > 0 &&
        virDomainDefMaybeAddInput(def,
                                  VIR_DOMAIN_INPUT_TYPE_MOUSE,
                                  VIR_DOMAIN_INPUT_BUS_USB) < 0)
1215
        goto cleanup;
1216

D
Dmitry Andreev 已提交
1217 1218 1219 1220 1221 1222 1223
    if (addPanicDevice) {
        size_t j;
        for (j = 0; j < def->npanics; j++) {
            if (def->panics[j]->model == VIR_DOMAIN_PANIC_MODEL_DEFAULT ||
                def->panics[j]->model == VIR_DOMAIN_PANIC_MODEL_PSERIES)
                break;
        }
1224

D
Dmitry Andreev 已提交
1225 1226 1227 1228 1229 1230 1231 1232 1233
        if (j == def->npanics) {
            virDomainPanicDefPtr panic;
            if (VIR_ALLOC(panic) < 0 ||
                VIR_APPEND_ELEMENT_COPY(def->panics,
                                        def->npanics, panic) < 0) {
                VIR_FREE(panic);
                goto cleanup;
            }
        }
1234 1235
    }

1236 1237 1238 1239 1240 1241
    ret = 0;
 cleanup:
    return ret;
}


A
Andrea Bolognani 已提交
1242 1243 1244 1245 1246 1247 1248 1249 1250 1251 1252 1253 1254 1255 1256 1257 1258
/**
 * qemuDomainDefEnableDefaultFeatures:
 * @def: domain definition
 *
 * Make sure that features that should be enabled by default are actually
 * enabled and configure default values related to those features.
 */
static void
qemuDomainDefEnableDefaultFeatures(virDomainDefPtr def)
{
    /* Default to GIC v2 if no version was specified */
    if (def->features[VIR_DOMAIN_FEATURE_GIC] == VIR_TRISTATE_SWITCH_ON &&
        def->gic_version == VIR_GIC_VERSION_NONE)
        def->gic_version = VIR_GIC_VERSION_2;
}


1259 1260 1261 1262 1263 1264 1265 1266 1267 1268 1269 1270 1271 1272 1273 1274 1275 1276 1277 1278
static int
qemuCanonicalizeMachine(virDomainDefPtr def, virQEMUCapsPtr qemuCaps)
{
    const char *canon;

    if (!(canon = virQEMUCapsGetCanonicalMachine(qemuCaps, def->os.machine)))
        return 0;

    if (STRNEQ(canon, def->os.machine)) {
        char *tmp;
        if (VIR_STRDUP(tmp, canon) < 0)
            return -1;
        VIR_FREE(def->os.machine);
        def->os.machine = tmp;
    }

    return 0;
}


1279 1280 1281
static int
qemuDomainDefPostParse(virDomainDefPtr def,
                       virCapsPtr caps,
1282
                       unsigned int parseFlags ATTRIBUTE_UNUSED,
1283 1284 1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295 1296 1297 1298 1299
                       void *opaque)
{
    virQEMUDriverPtr driver = opaque;
    virQEMUCapsPtr qemuCaps = NULL;
    int ret = -1;

    if (def->os.bootloader || def->os.bootloaderArgs) {
        virReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                       _("bootloader is not supported by QEMU"));
        return ret;
    }

    /* check for emulator and create a default one if needed */
    if (!def->emulator &&
        !(def->emulator = virDomainDefGetDefaultEmulator(def, caps)))
        return ret;

1300 1301 1302
    if (!(qemuCaps = virQEMUCapsCacheLookup(driver->qemuCapsCache,
                                            def->emulator)))
        goto cleanup;
1303 1304 1305 1306

    if (qemuDomainDefAddDefaultDevices(def, qemuCaps) < 0)
        goto cleanup;

1307 1308 1309
    if (qemuCanonicalizeMachine(def, qemuCaps) < 0)
        goto cleanup;

A
Andrea Bolognani 已提交
1310 1311
    qemuDomainDefEnableDefaultFeatures(def);

1312 1313 1314
    if (virSecurityManagerVerify(driver->securityManager, def) < 0)
        goto cleanup;

1315 1316 1317 1318
    ret = 0;
 cleanup:
    virObjectUnref(qemuCaps);
    return ret;
1319 1320
}

1321
static const char *
1322 1323
qemuDomainDefaultNetModel(const virDomainDef *def,
                          virQEMUCapsPtr qemuCaps)
1324
{
1325
    if (ARCH_IS_S390(def->os.arch))
1326 1327
        return "virtio";

1328 1329
    if (def->os.arch == VIR_ARCH_ARMV7L ||
        def->os.arch == VIR_ARCH_AARCH64) {
1330 1331 1332
        if (STREQ(def->os.machine, "versatilepb"))
            return "smc91c111";

1333 1334 1335
        if (STREQ(def->os.machine, "virt"))
            return "virtio";

1336 1337 1338 1339 1340
        /* Incomplete. vexpress (and a few others) use this, but not all
         * arm boards */
        return "lan9118";
    }

1341 1342 1343 1344 1345 1346 1347 1348 1349 1350 1351 1352
    /* Try several network devices in turn; each of these devices is
     * less likely be supported out-of-the-box by the guest operating
     * system than the previous one */
    if (virQEMUCapsGet(qemuCaps, QEMU_CAPS_DEVICE_RTL8139))
        return "rtl8139";
    else if (virQEMUCapsGet(qemuCaps, QEMU_CAPS_DEVICE_E1000))
        return "e1000";
    else if (virQEMUCapsGet(qemuCaps, QEMU_CAPS_DEVICE_VIRTIO_NET))
        return "virtio";

    /* We've had no luck detecting support for any network device,
     * but we have to return something: might as well be rtl8139 */
1353 1354
    return "rtl8139";
}
1355

1356 1357
static int
qemuDomainDeviceDefPostParse(virDomainDeviceDefPtr dev,
1358
                             const virDomainDef *def,
1359
                             virCapsPtr caps ATTRIBUTE_UNUSED,
1360
                             unsigned int parseFlags,
1361
                             void *opaque)
1362
{
1363
    virQEMUDriverPtr driver = opaque;
1364
    virQEMUCapsPtr qemuCaps = NULL;
1365
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
1366
    int ret = -1;
1367

P
Pavel Fedin 已提交
1368
    qemuCaps = virQEMUCapsCacheLookup(driver->qemuCapsCache, def->emulator);
1369

1370
    if (dev->type == VIR_DOMAIN_DEVICE_NET &&
1371 1372
        dev->data.net->type != VIR_DOMAIN_NET_TYPE_HOSTDEV &&
        !dev->data.net->model) {
1373
        if (VIR_STRDUP(dev->data.net->model,
1374
                       qemuDomainDefaultNetModel(def, qemuCaps)) < 0)
1375
            goto cleanup;
1376
    }
1377

1378 1379 1380 1381
    /* set default disk types and drivers */
    if (dev->type == VIR_DOMAIN_DEVICE_DISK) {
        virDomainDiskDefPtr disk = dev->data.disk;

1382 1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406 1407 1408 1409
        /* assign default storage format and driver according to config */
        if (cfg->allowDiskFormatProbing) {
            /* default disk format for drives */
            if (virDomainDiskGetFormat(disk) == VIR_STORAGE_FILE_NONE &&
                (virDomainDiskGetType(disk) == VIR_STORAGE_TYPE_FILE ||
                 virDomainDiskGetType(disk) == VIR_STORAGE_TYPE_BLOCK))
                virDomainDiskSetFormat(disk, VIR_STORAGE_FILE_AUTO);

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

            /* default disk format for drives */
            if (virDomainDiskGetFormat(disk) == VIR_STORAGE_FILE_NONE &&
                (virDomainDiskGetType(disk) == VIR_STORAGE_TYPE_FILE ||
                 virDomainDiskGetType(disk) == VIR_STORAGE_TYPE_BLOCK))
                virDomainDiskSetFormat(disk, VIR_STORAGE_FILE_RAW);

            /* default disk format for mirrored drive */
            if (disk->mirror &&
                disk->mirror->format == VIR_STORAGE_FILE_NONE)
                disk->mirror->format = VIR_STORAGE_FILE_RAW;
1410 1411 1412
        }
    }

1413 1414 1415 1416
    /* 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 &&
1417
        ARCH_IS_S390(def->os.arch))
1418 1419
        dev->data.chr->targetType = VIR_DOMAIN_CHR_CONSOLE_TARGET_TYPE_VIRTIO;

1420 1421 1422 1423 1424
    /* 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 &&
1425
        ARCH_IS_S390(def->os.arch))
1426 1427
        dev->data.controller->model = VIR_DOMAIN_CONTROLLER_MODEL_USB_NONE;

1428 1429 1430 1431 1432 1433 1434
    /* 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;

1435 1436 1437
    /* clear auto generated unix socket path for inactive definitions */
    if ((parseFlags & VIR_DOMAIN_DEF_PARSE_INACTIVE) &&
        dev->type == VIR_DOMAIN_DEVICE_CHR &&
1438 1439 1440
        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 &&
1441 1442 1443 1444 1445 1446
        dev->data.chr->source.data.nix.path &&
        STRPREFIX(dev->data.chr->source.data.nix.path, cfg->channelTargetDir)) {
        /*
         * If the address is generated by us (starts with our
         * channel dir), we should not keep it in the persistent
         * XML.  If libvirt is the one who generated it, users
1447
         * shouldn't care about that.  If they do, they are
1448 1449 1450
         * supposed to set it themselves.
         */
        VIR_FREE(dev->data.chr->source.data.nix.path);
1451 1452
    }

1453 1454 1455 1456 1457 1458 1459 1460 1461 1462
    /* 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;
    }

1463 1464 1465 1466 1467 1468 1469 1470 1471 1472 1473 1474 1475 1476 1477
    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 {
1478
            dev->data.video->vgamem = QEMU_QXL_VGAMEM_DEFAULT;
1479 1480 1481
        }
    }

1482 1483 1484 1485 1486 1487 1488 1489 1490
    if (dev->type == VIR_DOMAIN_DEVICE_PANIC &&
        dev->data.panic->model == VIR_DOMAIN_PANIC_MODEL_DEFAULT) {
        if (ARCH_IS_PPC64(def->os.arch) &&
            STRPREFIX(def->os.machine, "pseries"))
            dev->data.panic->model = VIR_DOMAIN_PANIC_MODEL_PSERIES;
        else
            dev->data.panic->model = VIR_DOMAIN_PANIC_MODEL_ISA;
    }

1491 1492
    ret = 0;

1493
 cleanup:
1494
    virObjectUnref(qemuCaps);
1495 1496
    virObjectUnref(cfg);
    return ret;
1497 1498 1499 1500 1501
}


virDomainDefParserConfig virQEMUDriverDomainDefParserConfig = {
    .devicesPostParseCallback = qemuDomainDeviceDefPostParse,
1502
    .domainPostParseCallback = qemuDomainDefPostParse,
1503 1504 1505
};


1506
static void
1507
qemuDomainObjSaveJob(virQEMUDriverPtr driver, virDomainObjPtr obj)
1508
{
1509 1510 1511
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);

    if (virDomainObjIsActive(obj)) {
1512
        if (virDomainSaveStatus(driver->xmlopt, cfg->stateDir, obj, driver->caps) < 0)
1513
            VIR_WARN("Failed to save status on vm %s", obj->def->name);
1514
    }
1515

1516
    virObjectUnref(cfg);
1517 1518
}

J
Jiri Denemark 已提交
1519
void
1520
qemuDomainObjSetJobPhase(virQEMUDriverPtr driver,
J
Jiri Denemark 已提交
1521 1522 1523 1524
                         virDomainObjPtr obj,
                         int phase)
{
    qemuDomainObjPrivatePtr priv = obj->privateData;
1525
    unsigned long long me = virThreadSelfID();
J
Jiri Denemark 已提交
1526 1527 1528 1529

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

1530 1531 1532 1533 1534
    VIR_DEBUG("Setting '%s' phase to '%s'",
              qemuDomainAsyncJobTypeToString(priv->job.asyncJob),
              qemuDomainAsyncJobPhaseToString(priv->job.asyncJob, phase));

    if (priv->job.asyncOwner && me != priv->job.asyncOwner) {
1535
        VIR_WARN("'%s' async job is owned by thread %llu",
1536 1537 1538 1539
                 qemuDomainAsyncJobTypeToString(priv->job.asyncJob),
                 priv->job.asyncOwner);
    }

J
Jiri Denemark 已提交
1540
    priv->job.phase = phase;
1541
    priv->job.asyncOwner = me;
J
Jiri Denemark 已提交
1542 1543 1544
    qemuDomainObjSaveJob(driver, obj);
}

1545
void
1546 1547
qemuDomainObjSetAsyncJobMask(virDomainObjPtr obj,
                             unsigned long long allowedJobs)
1548 1549 1550
{
    qemuDomainObjPrivatePtr priv = obj->privateData;

1551 1552 1553 1554 1555 1556 1557
    if (!priv->job.asyncJob)
        return;

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

void
1558
qemuDomainObjDiscardAsyncJob(virQEMUDriverPtr driver, virDomainObjPtr obj)
1559 1560 1561 1562 1563 1564
{
    qemuDomainObjPrivatePtr priv = obj->privateData;

    if (priv->job.active == QEMU_JOB_ASYNC_NESTED)
        qemuDomainObjResetJob(priv);
    qemuDomainObjResetAsyncJob(priv);
1565
    qemuDomainObjSaveJob(driver, obj);
1566 1567
}

1568 1569 1570 1571 1572 1573 1574 1575 1576
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()) {
1577
        VIR_WARN("'%s' async job is owned by thread %llu",
1578 1579 1580 1581 1582 1583
                 qemuDomainAsyncJobTypeToString(priv->job.asyncJob),
                 priv->job.asyncOwner);
    }
    priv->job.asyncOwner = 0;
}

1584
static bool
1585
qemuDomainNestedJobAllowed(qemuDomainObjPrivatePtr priv, qemuDomainJob job)
1586 1587
{
    return !priv->job.asyncJob || (priv->job.mask & JOB_MASK(job)) != 0;
1588 1589
}

1590
bool
1591
qemuDomainJobAllowed(qemuDomainObjPrivatePtr priv, qemuDomainJob job)
1592 1593 1594 1595
{
    return !priv->job.active && qemuDomainNestedJobAllowed(priv, job);
}

1596 1597 1598
/* Give up waiting for mutex after 30 seconds */
#define QEMU_JOB_WAIT_TIME (1000ull * 30)

1599
/*
1600
 * obj must be locked before calling
1601
 */
1602
static int ATTRIBUTE_NONNULL(1)
1603
qemuDomainObjBeginJobInternal(virQEMUDriverPtr driver,
1604
                              virDomainObjPtr obj,
1605 1606
                              qemuDomainJob job,
                              qemuDomainAsyncJob asyncJob)
1607 1608
{
    qemuDomainObjPrivatePtr priv = obj->privateData;
J
Jiri Denemark 已提交
1609
    unsigned long long now;
1610
    unsigned long long then;
1611
    bool nested = job == QEMU_JOB_ASYNC_NESTED;
J
Jiri Denemark 已提交
1612
    bool async = job == QEMU_JOB_ASYNC;
1613
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
1614
    const char *blocker = NULL;
J
Jiri Denemark 已提交
1615
    int ret = -1;
J
Jiri Denemark 已提交
1616 1617
    unsigned long long duration = 0;
    unsigned long long asyncDuration = 0;
J
Jiri Denemark 已提交
1618
    const char *jobStr;
1619

J
Jiri Denemark 已提交
1620 1621 1622 1623 1624 1625 1626 1627 1628
    if (async)
        jobStr = qemuDomainAsyncJobTypeToString(asyncJob);
    else
        jobStr = qemuDomainJobTypeToString(job);

    VIR_DEBUG("Starting %s: %s (vm=%p name=%s, current job=%s async=%s)",
              async ? "async job" : "job", jobStr, obj, obj->def->name,
              qemuDomainJobTypeToString(priv->job.active),
              qemuDomainAsyncJobTypeToString(priv->job.asyncJob));
1629

1630 1631
    if (virTimeMillisNow(&now) < 0) {
        virObjectUnref(cfg);
1632
        return -1;
1633 1634
    }

1635
    priv->jobs_queued++;
J
Jiri Denemark 已提交
1636
    then = now + QEMU_JOB_WAIT_TIME;
1637

1638
 retry:
1639 1640
    if (cfg->maxQueuedJobs &&
        priv->jobs_queued > cfg->maxQueuedJobs) {
1641 1642 1643
        goto error;
    }

1644
    while (!nested && !qemuDomainNestedJobAllowed(priv, job)) {
1645
        VIR_DEBUG("Waiting for async job (vm=%p name=%s)", obj, obj->def->name);
1646
        if (virCondWaitUntil(&priv->job.asyncCond, &obj->parent.lock, then) < 0)
1647 1648 1649
            goto error;
    }

1650
    while (priv->job.active) {
1651
        VIR_DEBUG("Waiting for job (vm=%p name=%s)", obj, obj->def->name);
1652
        if (virCondWaitUntil(&priv->job.cond, &obj->parent.lock, then) < 0)
1653
            goto error;
1654
    }
1655 1656 1657

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

1661
    qemuDomainObjResetJob(priv);
1662

J
Jiri Denemark 已提交
1663 1664
    ignore_value(virTimeMillisNow(&now));

1665
    if (job != QEMU_JOB_ASYNC) {
1666
        VIR_DEBUG("Started job: %s (async=%s vm=%p name=%s)",
1667
                   qemuDomainJobTypeToString(job),
1668 1669
                  qemuDomainAsyncJobTypeToString(priv->job.asyncJob),
                  obj, obj->def->name);
1670
        priv->job.active = job;
1671
        priv->job.owner = virThreadSelfID();
1672
        priv->job.ownerAPI = virThreadJobGet();
J
Jiri Denemark 已提交
1673
        priv->job.started = now;
1674
    } else {
1675 1676 1677
        VIR_DEBUG("Started async job: %s (vm=%p name=%s)",
                  qemuDomainAsyncJobTypeToString(asyncJob),
                  obj, obj->def->name);
1678
        qemuDomainObjResetAsyncJob(priv);
J
Jiri Denemark 已提交
1679 1680
        if (VIR_ALLOC(priv->job.current) < 0)
            goto cleanup;
1681
        priv->job.asyncJob = asyncJob;
1682
        priv->job.asyncOwner = virThreadSelfID();
1683
        priv->job.asyncOwnerAPI = virThreadJobGet();
J
Jiri Denemark 已提交
1684
        priv->job.asyncStarted = now;
J
Jiri Denemark 已提交
1685
        priv->job.current->started = now;
1686
    }
1687

1688 1689
    if (qemuDomainTrackJob(job))
        qemuDomainObjSaveJob(driver, obj);
1690

1691
    virObjectUnref(cfg);
1692
    return 0;
1693

1694
 error:
J
Jiri Denemark 已提交
1695 1696 1697 1698 1699 1700
    ignore_value(virTimeMillisNow(&now));
    if (priv->job.active && priv->job.started)
        duration = now - priv->job.started;
    if (priv->job.asyncJob && priv->job.asyncStarted)
        asyncDuration = now - priv->job.asyncStarted;

1701
    VIR_WARN("Cannot start job (%s, %s) for domain %s; "
J
Jiri Denemark 已提交
1702 1703
             "current job is (%s, %s) owned by (%llu %s, %llu %s) "
             "for (%llus, %llus)",
1704 1705 1706 1707 1708
             qemuDomainJobTypeToString(job),
             qemuDomainAsyncJobTypeToString(asyncJob),
             obj->def->name,
             qemuDomainJobTypeToString(priv->job.active),
             qemuDomainAsyncJobTypeToString(priv->job.asyncJob),
1709
             priv->job.owner, NULLSTR(priv->job.ownerAPI),
J
Jiri Denemark 已提交
1710 1711
             priv->job.asyncOwner, NULLSTR(priv->job.asyncOwnerAPI),
             duration / 1000, asyncDuration / 1000);
1712 1713 1714 1715 1716

    if (nested || qemuDomainNestedJobAllowed(priv, job))
        blocker = priv->job.ownerAPI;
    else
        blocker = priv->job.asyncOwnerAPI;
1717

1718 1719
    ret = -1;
    if (errno == ETIMEDOUT) {
1720 1721 1722 1723 1724 1725 1726 1727
        if (blocker) {
            virReportError(VIR_ERR_OPERATION_TIMEOUT,
                           _("cannot acquire state change lock (held by %s)"),
                           blocker);
        } else {
            virReportError(VIR_ERR_OPERATION_TIMEOUT, "%s",
                           _("cannot acquire state change lock"));
        }
1728 1729 1730
        ret = -2;
    } else if (cfg->maxQueuedJobs &&
               priv->jobs_queued > cfg->maxQueuedJobs) {
1731 1732 1733 1734 1735 1736 1737 1738 1739 1740
        if (blocker) {
            virReportError(VIR_ERR_OPERATION_FAILED,
                           _("cannot acquire state change lock (held by %s) "
                             "due to max_queued limit"),
                           blocker);
        } else {
            virReportError(VIR_ERR_OPERATION_FAILED, "%s",
                           _("cannot acquire state change lock "
                             "due to max_queued limit"));
        }
1741 1742
        ret = -2;
    } else {
1743
        virReportSystemError(errno, "%s", _("cannot acquire job mutex"));
1744
    }
J
Jiri Denemark 已提交
1745 1746

 cleanup:
1747
    priv->jobs_queued--;
1748
    virObjectUnref(cfg);
1749
    return ret;
1750 1751 1752
}

/*
1753
 * obj must be locked before calling
1754 1755 1756 1757
 *
 * This must be called by anything that will change the VM state
 * in any way, or anything that will use the QEMU monitor.
 *
1758
 * Successful calls must be followed by EndJob eventually
1759
 */
1760
int qemuDomainObjBeginJob(virQEMUDriverPtr driver,
1761
                          virDomainObjPtr obj,
1762
                          qemuDomainJob job)
1763
{
1764 1765 1766 1767 1768
    if (qemuDomainObjBeginJobInternal(driver, obj, job,
                                      QEMU_ASYNC_JOB_NONE) < 0)
        return -1;
    else
        return 0;
1769 1770
}

1771
int qemuDomainObjBeginAsyncJob(virQEMUDriverPtr driver,
1772
                               virDomainObjPtr obj,
1773
                               qemuDomainAsyncJob asyncJob)
1774
{
1775 1776 1777 1778 1779
    if (qemuDomainObjBeginJobInternal(driver, obj, QEMU_JOB_ASYNC,
                                      asyncJob) < 0)
        return -1;
    else
        return 0;
1780 1781
}

1782
static int ATTRIBUTE_RETURN_CHECK
1783 1784
qemuDomainObjBeginNestedJob(virQEMUDriverPtr driver,
                            virDomainObjPtr obj,
1785
                            qemuDomainAsyncJob asyncJob)
1786 1787 1788 1789 1790 1791 1792 1793 1794 1795
{
    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()) {
1796
        VIR_WARN("This thread doesn't seem to be the async job owner: %llu",
1797 1798 1799 1800 1801 1802 1803 1804
                 priv->job.asyncOwner);
    }

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

1805

1806
/*
1807
 * obj must be locked and have a reference before calling
1808 1809 1810 1811
 *
 * To be called after completing the work associated with the
 * earlier qemuDomainBeginJob() call
 */
1812 1813
void
qemuDomainObjEndJob(virQEMUDriverPtr driver, virDomainObjPtr obj)
1814 1815
{
    qemuDomainObjPrivatePtr priv = obj->privateData;
1816
    qemuDomainJob job = priv->job.active;
1817

1818 1819
    priv->jobs_queued--;

1820
    VIR_DEBUG("Stopping job: %s (async=%s vm=%p name=%s)",
1821
              qemuDomainJobTypeToString(job),
1822 1823
              qemuDomainAsyncJobTypeToString(priv->job.asyncJob),
              obj, obj->def->name);
1824

1825
    qemuDomainObjResetJob(priv);
1826 1827
    if (qemuDomainTrackJob(job))
        qemuDomainObjSaveJob(driver, obj);
1828
    virCondSignal(&priv->job.cond);
1829 1830
}

1831
void
1832
qemuDomainObjEndAsyncJob(virQEMUDriverPtr driver, virDomainObjPtr obj)
1833 1834
{
    qemuDomainObjPrivatePtr priv = obj->privateData;
1835

1836 1837
    priv->jobs_queued--;

1838 1839 1840
    VIR_DEBUG("Stopping async job: %s (vm=%p name=%s)",
              qemuDomainAsyncJobTypeToString(priv->job.asyncJob),
              obj, obj->def->name);
1841

1842
    qemuDomainObjResetAsyncJob(priv);
1843
    qemuDomainObjSaveJob(driver, obj);
1844 1845 1846
    virCondBroadcast(&priv->job.asyncCond);
}

1847 1848 1849 1850 1851
void
qemuDomainObjAbortAsyncJob(virDomainObjPtr obj)
{
    qemuDomainObjPrivatePtr priv = obj->privateData;

1852 1853 1854
    VIR_DEBUG("Requesting abort of async job: %s (vm=%p name=%s)",
              qemuDomainAsyncJobTypeToString(priv->job.asyncJob),
              obj, obj->def->name);
1855

1856 1857
    priv->job.abortJob = true;
    virDomainObjBroadcast(obj);
1858 1859
}

1860 1861 1862 1863 1864 1865 1866 1867 1868
/*
 * 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
 */
1869
static int
1870
qemuDomainObjEnterMonitorInternal(virQEMUDriverPtr driver,
1871
                                  virDomainObjPtr obj,
1872
                                  qemuDomainAsyncJob asyncJob)
1873 1874 1875
{
    qemuDomainObjPrivatePtr priv = obj->privateData;

1876
    if (asyncJob != QEMU_ASYNC_JOB_NONE) {
1877 1878 1879
        int ret;
        if ((ret = qemuDomainObjBeginNestedJob(driver, obj, asyncJob)) < 0)
            return ret;
1880
        if (!virDomainObjIsActive(obj)) {
1881 1882
            virReportError(VIR_ERR_OPERATION_FAILED, "%s",
                           _("domain is no longer running"));
1883
            qemuDomainObjEndJob(driver, obj);
1884 1885
            return -1;
        }
1886 1887 1888
    } 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");
1889 1890
    }

1891 1892
    VIR_DEBUG("Entering monitor (mon=%p vm=%p name=%s)",
              priv->mon, obj, obj->def->name);
1893
    virObjectLock(priv->mon);
1894
    virObjectRef(priv->mon);
1895
    ignore_value(virTimeMillisNow(&priv->monStart));
1896
    virObjectUnlock(obj);
1897 1898

    return 0;
1899 1900
}

1901
static void ATTRIBUTE_NONNULL(1)
1902
qemuDomainObjExitMonitorInternal(virQEMUDriverPtr driver,
1903
                                 virDomainObjPtr obj)
1904 1905
{
    qemuDomainObjPrivatePtr priv = obj->privateData;
1906
    bool hasRefs;
1907

1908
    hasRefs = virObjectUnref(priv->mon);
1909

1910
    if (hasRefs)
1911
        virObjectUnlock(priv->mon);
1912

1913
    virObjectLock(obj);
1914 1915
    VIR_DEBUG("Exited monitor (mon=%p vm=%p name=%s)",
              priv->mon, obj, obj->def->name);
1916

1917
    priv->monStart = 0;
1918
    if (!hasRefs)
1919
        priv->mon = NULL;
1920

1921 1922 1923 1924 1925
    if (priv->job.active == QEMU_JOB_ASYNC_NESTED) {
        qemuDomainObjResetJob(priv);
        qemuDomainObjSaveJob(driver, obj);
        virCondSignal(&priv->job.cond);
    }
1926 1927
}

1928
void qemuDomainObjEnterMonitor(virQEMUDriverPtr driver,
1929
                               virDomainObjPtr obj)
1930
{
1931
    ignore_value(qemuDomainObjEnterMonitorInternal(driver, obj,
1932
                                                   QEMU_ASYNC_JOB_NONE));
1933 1934
}

1935
/* obj must NOT be locked before calling
1936 1937
 *
 * Should be paired with an earlier qemuDomainObjEnterMonitor() call
1938 1939 1940 1941 1942 1943
 *
 * 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.
1944
 */
1945 1946
int qemuDomainObjExitMonitor(virQEMUDriverPtr driver,
                             virDomainObjPtr obj)
1947
{
1948
    qemuDomainObjExitMonitorInternal(driver, obj);
1949
    if (!virDomainObjIsActive(obj)) {
1950 1951 1952
        if (!virGetLastError())
            virReportError(VIR_ERR_OPERATION_FAILED, "%s",
                           _("domain is no longer running"));
1953 1954 1955
        return -1;
    }
    return 0;
1956
}
1957 1958

/*
1959
 * obj must be locked before calling
1960 1961
 *
 * To be called immediately before any QEMU monitor API call.
1962
 * Must have already either called qemuDomainObjBeginJob()
1963 1964 1965 1966 1967
 * 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
1968 1969 1970
 * 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).
1971 1972
 */
int
1973
qemuDomainObjEnterMonitorAsync(virQEMUDriverPtr driver,
1974
                               virDomainObjPtr obj,
1975
                               qemuDomainAsyncJob asyncJob)
1976
{
1977
    return qemuDomainObjEnterMonitorInternal(driver, obj, asyncJob);
1978 1979
}

D
Daniel P. Berrange 已提交
1980

1981 1982 1983 1984 1985 1986 1987 1988 1989 1990 1991 1992
/**
 * qemuDomainGetAgent:
 * @vm: domain object
 *
 * Returns the agent pointer of @vm;
 */
qemuAgentPtr
qemuDomainGetAgent(virDomainObjPtr vm)
{
    return (((qemuDomainObjPrivatePtr)(vm->privateData))->agent);
}

D
Daniel P. Berrange 已提交
1993

1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004
/*
 * 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 已提交
2005 2006 2007
{
    qemuDomainObjPrivatePtr priv = obj->privateData;

2008 2009
    VIR_DEBUG("Entering agent (agent=%p vm=%p name=%s)",
              priv->agent, obj, obj->def->name);
2010
    virObjectLock(priv->agent);
2011
    virObjectRef(priv->agent);
D
Daniel P. Berrange 已提交
2012
    ignore_value(virTimeMillisNow(&priv->agentStart));
2013
    virObjectUnlock(obj);
D
Daniel P. Berrange 已提交
2014 2015
}

2016 2017 2018 2019 2020 2021 2022

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

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

2029
    if (hasRefs)
2030
        virObjectUnlock(priv->agent);
D
Daniel P. Berrange 已提交
2031

2032
    virObjectLock(obj);
2033 2034
    VIR_DEBUG("Exited agent (agent=%p vm=%p name=%s)",
              priv->agent, obj, obj->def->name);
D
Daniel P. Berrange 已提交
2035 2036

    priv->agentStart = 0;
2037
    if (!hasRefs)
D
Daniel P. Berrange 已提交
2038 2039 2040
        priv->agent = NULL;
}

2041
void qemuDomainObjEnterRemote(virDomainObjPtr obj)
2042
{
2043 2044
    VIR_DEBUG("Entering remote (vm=%p name=%s)",
              obj, obj->def->name);
2045
    virObjectUnlock(obj);
2046 2047
}

2048
void qemuDomainObjExitRemote(virDomainObjPtr obj)
2049
{
2050
    virObjectLock(obj);
2051 2052
    VIR_DEBUG("Exited remote (vm=%p name=%s)",
              obj, obj->def->name);
2053
}
2054 2055


2056 2057 2058 2059 2060 2061 2062 2063
virDomainDefPtr
qemuDomainDefCopy(virQEMUDriverPtr driver,
                  virDomainDefPtr src,
                  unsigned int flags)
{
    virBuffer buf = VIR_BUFFER_INITIALIZER;
    virDomainDefPtr ret = NULL;
    virCapsPtr caps = NULL;
2064
    char *xml = NULL;
2065 2066 2067 2068 2069 2070 2071 2072 2073 2074

    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,
2075
                                        VIR_DOMAIN_DEF_PARSE_INACTIVE)))
2076 2077
        goto cleanup;

2078
 cleanup:
2079 2080 2081 2082 2083
    VIR_FREE(xml);
    virObjectUnref(caps);
    return ret;
}

2084
int
2085
qemuDomainDefFormatBuf(virQEMUDriverPtr driver,
2086 2087 2088
                       virDomainDefPtr def,
                       unsigned int flags,
                       virBuffer *buf)
2089
{
2090
    int ret = -1;
2091
    virCPUDefPtr cpu = NULL;
2092
    virCPUDefPtr def_cpu = def->cpu;
2093 2094
    virDomainControllerDefPtr *controllers = NULL;
    int ncontrollers = 0;
2095 2096 2097 2098
    virCapsPtr caps = NULL;

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

    /* Update guest CPU requirements according to host CPU */
2101 2102 2103
    if ((flags & VIR_DOMAIN_XML_UPDATE_CPU) &&
        def_cpu &&
        (def_cpu->mode != VIR_CPU_MODE_CUSTOM || def_cpu->model)) {
2104 2105
        if (!caps->host.cpu ||
            !caps->host.cpu->model) {
2106 2107
            virReportError(VIR_ERR_OPERATION_FAILED,
                           "%s", _("cannot get host CPU capabilities"));
2108 2109 2110
            goto cleanup;
        }

2111
        if (!(cpu = virCPUDefCopy(def_cpu)) ||
2112
            cpuUpdate(cpu, caps->host.cpu) < 0)
2113 2114 2115 2116
            goto cleanup;
        def->cpu = cpu;
    }

2117
    if ((flags & VIR_DOMAIN_XML_MIGRATABLE)) {
2118
        size_t i;
2119
        int toremove = 0;
2120
        virDomainControllerDefPtr usb = NULL, pci = NULL;
2121 2122 2123 2124 2125 2126 2127 2128 2129 2130 2131 2132 2133 2134 2135 2136 2137 2138

        /* 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);
2139
            toremove++;
2140 2141 2142 2143 2144 2145 2146 2147 2148 2149 2150 2151 2152 2153 2154 2155 2156 2157
        } 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 已提交
2158
            VIR_DEBUG("Removing default pci-root from domain '%s'"
2159
                      " for migration compatibility", def->name);
2160
            toremove++;
2161 2162 2163 2164
        } else {
            pci = NULL;
        }

2165
        if (toremove) {
2166 2167
            controllers = def->controllers;
            ncontrollers = def->ncontrollers;
2168
            if (VIR_ALLOC_N(def->controllers, ncontrollers - toremove) < 0) {
2169 2170 2171 2172 2173 2174
                controllers = NULL;
                goto cleanup;
            }

            def->ncontrollers = 0;
            for (i = 0; i < ncontrollers; i++) {
2175
                if (controllers[i] != usb && controllers[i] != pci)
2176 2177 2178
                    def->controllers[def->ncontrollers++] = controllers[i];
            }
        }
2179 2180


2181 2182
    }

2183
    ret = virDomainDefFormatInternal(def, driver->caps,
2184 2185
                                     virDomainDefFormatConvertXMLFlags(flags),
                                     buf);
2186

2187
 cleanup:
2188 2189
    def->cpu = def_cpu;
    virCPUDefFree(cpu);
2190 2191 2192 2193 2194
    if (controllers) {
        VIR_FREE(def->controllers);
        def->controllers = controllers;
        def->ncontrollers = ncontrollers;
    }
2195
    virObjectUnref(caps);
2196 2197
    return ret;
}
2198

2199
char *qemuDomainDefFormatXML(virQEMUDriverPtr driver,
2200
                             virDomainDefPtr def,
2201
                             unsigned int flags)
2202 2203 2204
{
    virBuffer buf = VIR_BUFFER_INITIALIZER;

2205
    if (qemuDomainDefFormatBuf(driver, def, flags, &buf) < 0) {
2206 2207 2208 2209 2210 2211 2212 2213 2214 2215 2216 2217 2218
        virBufferFreeAndReset(&buf);
        return NULL;
    }

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

    return virBufferContentAndReset(&buf);
}

2219
char *qemuDomainFormatXML(virQEMUDriverPtr driver,
2220
                          virDomainObjPtr vm,
2221
                          unsigned int flags)
2222 2223 2224 2225 2226 2227 2228 2229
{
    virDomainDefPtr def;

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

2230
    return qemuDomainDefFormatXML(driver, def, flags);
2231 2232
}

2233
char *
2234
qemuDomainDefFormatLive(virQEMUDriverPtr driver,
2235
                        virDomainDefPtr def,
2236 2237
                        bool inactive,
                        bool compatible)
2238 2239 2240 2241 2242
{
    unsigned int flags = QEMU_DOMAIN_FORMAT_LIVE_FLAGS;

    if (inactive)
        flags |= VIR_DOMAIN_XML_INACTIVE;
2243 2244
    if (compatible)
        flags |= VIR_DOMAIN_XML_MIGRATABLE;
2245

2246
    return qemuDomainDefFormatXML(driver, def, flags);
2247 2248
}

2249

2250
void qemuDomainObjTaint(virQEMUDriverPtr driver,
2251
                        virDomainObjPtr obj,
2252
                        virDomainTaintFlags taint,
2253
                        qemuDomainLogContextPtr logCtxt)
2254
{
2255
    virErrorPtr orig_err = NULL;
2256
    bool closeLog = false;
2257

2258 2259 2260 2261 2262 2263 2264 2265 2266
    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));
2267 2268 2269 2270 2271

        /* We don't care about errors logging taint info, so
         * preserve original error, and clear any error that
         * is raised */
        orig_err = virSaveLastError();
2272 2273 2274 2275 2276 2277 2278 2279 2280 2281 2282 2283 2284 2285 2286 2287 2288 2289
        if (logCtxt == NULL) {
            logCtxt = qemuDomainLogContextNew(driver, obj,
                                              QEMU_DOMAIN_LOG_CONTEXT_MODE_ATTACH);
            if (!logCtxt) {
                if (orig_err) {
                    virSetError(orig_err);
                    virFreeError(orig_err);
                }
                VIR_WARN("Unable to open domainlog");
                return;
            }
            closeLog = true;
        }

        if (qemuDomainLogContextWrite(logCtxt,
                                      "Domain id=%d is tainted: %s\n",
                                      obj->def->id,
                                      virDomainTaintTypeToString(taint)) < 0)
2290
            virResetLastError();
2291 2292
        if (closeLog)
            qemuDomainLogContextFree(logCtxt);
2293 2294 2295 2296
        if (orig_err) {
            virSetError(orig_err);
            virFreeError(orig_err);
        }
2297 2298 2299 2300
    }
}


2301
void qemuDomainObjCheckTaint(virQEMUDriverPtr driver,
2302
                             virDomainObjPtr obj,
2303
                             qemuDomainLogContextPtr logCtxt)
2304
{
2305
    size_t i;
2306
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
2307
    qemuDomainObjPrivatePtr priv = obj->privateData;
2308

2309
    if (virQEMUDriverIsPrivileged(driver) &&
2310 2311 2312
        (!cfg->clearEmulatorCapabilities ||
         cfg->user == 0 ||
         cfg->group == 0))
2313
        qemuDomainObjTaint(driver, obj, VIR_DOMAIN_TAINT_HIGH_PRIVILEGES, logCtxt);
2314

2315
    if (priv->hookRun)
2316
        qemuDomainObjTaint(driver, obj, VIR_DOMAIN_TAINT_HOOK, logCtxt);
2317

2318 2319 2320
    if (obj->def->namespaceData) {
        qemuDomainCmdlineDefPtr qemucmd = obj->def->namespaceData;
        if (qemucmd->num_args || qemucmd->num_env)
2321
            qemuDomainObjTaint(driver, obj, VIR_DOMAIN_TAINT_CUSTOM_ARGV, logCtxt);
2322 2323
    }

2324
    if (obj->def->cpu && obj->def->cpu->mode == VIR_CPU_MODE_HOST_PASSTHROUGH)
2325
        qemuDomainObjTaint(driver, obj, VIR_DOMAIN_TAINT_HOST_CPU, logCtxt);
2326

2327
    for (i = 0; i < obj->def->ndisks; i++)
2328
        qemuDomainObjCheckDiskTaint(driver, obj, obj->def->disks[i], logCtxt);
2329

2330 2331
    for (i = 0; i < obj->def->nhostdevs; i++)
        qemuDomainObjCheckHostdevTaint(driver, obj, obj->def->hostdevs[i],
2332
                                       logCtxt);
2333

2334
    for (i = 0; i < obj->def->nnets; i++)
2335
        qemuDomainObjCheckNetTaint(driver, obj, obj->def->nets[i], logCtxt);
2336

2337
    if (obj->def->os.dtb)
2338
        qemuDomainObjTaint(driver, obj, VIR_DOMAIN_TAINT_CUSTOM_DTB, logCtxt);
2339

2340
    virObjectUnref(cfg);
2341 2342 2343
}


2344
void qemuDomainObjCheckDiskTaint(virQEMUDriverPtr driver,
2345
                                 virDomainObjPtr obj,
2346
                                 virDomainDiskDefPtr disk,
2347
                                 qemuDomainLogContextPtr logCtxt)
2348
{
2349
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
2350
    int format = virDomainDiskGetFormat(disk);
2351

2352
    if ((!format || format == VIR_STORAGE_FILE_AUTO) &&
2353
        cfg->allowDiskFormatProbing)
2354
        qemuDomainObjTaint(driver, obj, VIR_DOMAIN_TAINT_DISK_PROBING, logCtxt);
2355

2356 2357
    if (disk->rawio == VIR_TRISTATE_BOOL_YES)
        qemuDomainObjTaint(driver, obj, VIR_DOMAIN_TAINT_HIGH_PRIVILEGES,
2358
                           logCtxt);
2359

2360 2361 2362 2363
    if (disk->device == VIR_DOMAIN_DISK_DEVICE_CDROM &&
        virStorageSourceGetActualType(disk->src) == VIR_STORAGE_TYPE_BLOCK &&
        disk->src->path)
        qemuDomainObjTaint(driver, obj, VIR_DOMAIN_TAINT_CDROM_PASSTHROUGH,
2364
                           logCtxt);
2365

2366
    virObjectUnref(cfg);
2367 2368 2369
}


2370 2371 2372
void qemuDomainObjCheckHostdevTaint(virQEMUDriverPtr driver,
                                    virDomainObjPtr obj,
                                    virDomainHostdevDefPtr hostdev,
2373
                                    qemuDomainLogContextPtr logCtxt)
2374 2375 2376 2377 2378 2379
{
    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,
2380
                               logCtxt);
2381 2382 2383
}


2384
void qemuDomainObjCheckNetTaint(virQEMUDriverPtr driver,
2385
                                virDomainObjPtr obj,
2386
                                virDomainNetDefPtr net,
2387
                                qemuDomainLogContextPtr logCtxt)
2388
{
2389 2390 2391 2392 2393 2394
    /* 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)
2395
        qemuDomainObjTaint(driver, obj, VIR_DOMAIN_TAINT_SHELL_SCRIPTS, logCtxt);
2396
}
2397 2398


2399 2400 2401 2402 2403 2404 2405 2406 2407 2408
qemuDomainLogContextPtr qemuDomainLogContextNew(virQEMUDriverPtr driver,
                                                virDomainObjPtr vm,
                                                qemuDomainLogContextMode mode)
{
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
    qemuDomainLogContextPtr ctxt = NULL;

    if (VIR_ALLOC(ctxt) < 0)
        goto error;

2409
    VIR_DEBUG("Context new %p stdioLogD=%d", ctxt, cfg->stdioLogD);
2410 2411 2412 2413
    ctxt->writefd = -1;
    ctxt->readfd = -1;
    virAtomicIntSet(&ctxt->refs, 1);

2414 2415 2416
    if (virAsprintf(&ctxt->path, "%s/%s.log", cfg->logDir, vm->def->name) < 0)
        goto error;

2417 2418 2419 2420
    if (cfg->stdioLogD) {
        ctxt->manager = virLogManagerNew(virQEMUDriverIsPrivileged(driver));
        if (!ctxt->manager)
            goto error;
2421

2422 2423 2424 2425
        ctxt->writefd = virLogManagerDomainOpenLogFile(ctxt->manager,
                                                       "qemu",
                                                       vm->def->uuid,
                                                       vm->def->name,
2426
                                                       ctxt->path,
2427 2428 2429 2430 2431 2432
                                                       0,
                                                       &ctxt->inode,
                                                       &ctxt->pos);
        if (ctxt->writefd < 0)
            goto error;
    } else {
2433
        if ((ctxt->writefd = open(ctxt->path, O_WRONLY | O_CREAT | O_APPEND, S_IRUSR | S_IWUSR)) < 0) {
2434
            virReportSystemError(errno, _("failed to create logfile %s"),
2435
                                 ctxt->path);
2436 2437
            goto error;
        }
2438
        if (virSetCloseExec(ctxt->writefd) < 0) {
2439
            virReportSystemError(errno, _("failed to set close-on-exec flag on %s"),
2440
                                 ctxt->path);
2441 2442 2443
            goto error;
        }

2444 2445 2446 2447 2448 2449 2450
        /* For unprivileged startup we must truncate the file since
         * we can't rely on logrotate. We don't use O_TRUNC since
         * it is better for SELinux policy if we truncate afterwards */
        if (mode == QEMU_DOMAIN_LOG_CONTEXT_MODE_START &&
            !virQEMUDriverIsPrivileged(driver) &&
            ftruncate(ctxt->writefd, 0) < 0) {
            virReportSystemError(errno, _("failed to truncate %s"),
2451
                                 ctxt->path);
2452 2453 2454 2455
            goto error;
        }

        if (mode == QEMU_DOMAIN_LOG_CONTEXT_MODE_START) {
2456
            if ((ctxt->readfd = open(ctxt->path, O_RDONLY, S_IRUSR | S_IWUSR)) < 0) {
2457
                virReportSystemError(errno, _("failed to open logfile %s"),
2458
                                     ctxt->path);
2459 2460 2461 2462
                goto error;
            }
            if (virSetCloseExec(ctxt->readfd) < 0) {
                virReportSystemError(errno, _("failed to set close-on-exec flag on %s"),
2463
                                     ctxt->path);
2464 2465 2466 2467
                goto error;
            }
        }

2468 2469
        if ((ctxt->pos = lseek(ctxt->writefd, 0, SEEK_END)) < 0) {
            virReportSystemError(errno, _("failed to seek in log file %s"),
2470
                                 ctxt->path);
2471 2472 2473 2474
            goto error;
        }
    }

2475
 cleanup:
2476 2477 2478 2479 2480
    virObjectUnref(cfg);
    return ctxt;

 error:
    qemuDomainLogContextFree(ctxt);
2481 2482
    ctxt = NULL;
    goto cleanup;
2483 2484 2485 2486 2487 2488 2489 2490 2491 2492 2493 2494 2495 2496
}


int qemuDomainLogContextWrite(qemuDomainLogContextPtr ctxt,
                              const char *fmt, ...)
{
    va_list argptr;
    char *message = NULL;
    int ret = -1;

    va_start(argptr, fmt);

    if (virVasprintf(&message, fmt, argptr) < 0)
        goto cleanup;
2497 2498
    if (!ctxt->manager &&
        lseek(ctxt->writefd, 0, SEEK_END) < 0) {
2499
        virReportSystemError(errno, "%s",
2500
                             _("Unable to seek to end of domain logfile"));
2501 2502 2503 2504 2505 2506 2507 2508 2509 2510 2511 2512 2513 2514 2515 2516 2517 2518 2519 2520
        goto cleanup;
    }
    if (safewrite(ctxt->writefd, message, strlen(message)) < 0) {
        virReportSystemError(errno, "%s",
                             _("Unable to write to domain logfile"));
        goto cleanup;
    }

    ret = 0;

 cleanup:
    va_end(argptr);
    VIR_FREE(message);
    return ret;
}


ssize_t qemuDomainLogContextRead(qemuDomainLogContextPtr ctxt,
                                 char **msg)
{
2521 2522 2523 2524
    VIR_DEBUG("Context read %p manager=%p inode=%llu pos=%llu",
              ctxt, ctxt->manager,
              (unsigned long long)ctxt->inode,
              (unsigned long long)ctxt->pos);
2525
    char *buf;
2526 2527 2528
    size_t buflen;
    if (ctxt->manager) {
        buf = virLogManagerDomainReadLogFile(ctxt->manager,
2529
                                             ctxt->path,
2530 2531 2532 2533 2534 2535 2536 2537 2538
                                             ctxt->inode,
                                             ctxt->pos,
                                             1024 * 128,
                                             0);
        if (!buf)
            return -1;
        buflen = strlen(buf);
    } else {
        ssize_t got;
2539

2540
        buflen = 1024 * 128;
2541

2542 2543
        /* Best effort jump to start of messages */
        ignore_value(lseek(ctxt->readfd, ctxt->pos, SEEK_SET));
2544

2545 2546
        if (VIR_ALLOC_N(buf, buflen) < 0)
            return -1;
2547

2548 2549 2550 2551 2552 2553 2554 2555 2556 2557 2558 2559 2560
        got = saferead(ctxt->readfd, buf, buflen - 1);
        if (got < 0) {
            VIR_FREE(buf);
            virReportSystemError(errno, "%s",
                                 _("Unable to read from log file"));
            return -1;
        }

        buf[got] = '\0';

        ignore_value(VIR_REALLOC_N_QUIET(buf, got + 1));
        buflen = got;
    }
2561 2562 2563

    *msg = buf;

2564
    return buflen;
2565 2566 2567 2568 2569 2570 2571 2572 2573 2574 2575
}


int qemuDomainLogContextGetWriteFD(qemuDomainLogContextPtr ctxt)
{
    return ctxt->writefd;
}


void qemuDomainLogContextMarkPosition(qemuDomainLogContextPtr ctxt)
{
2576 2577
    if (ctxt->manager)
        virLogManagerDomainGetLogFilePosition(ctxt->manager,
2578
                                              ctxt->path,
2579 2580 2581 2582 2583
                                              0,
                                              &ctxt->inode,
                                              &ctxt->pos);
    else
        ctxt->pos = lseek(ctxt->writefd, 0, SEEK_END);
2584 2585 2586 2587 2588
}


void qemuDomainLogContextRef(qemuDomainLogContextPtr ctxt)
{
2589
    VIR_DEBUG("Context ref %p", ctxt);
2590 2591 2592 2593 2594 2595 2596 2597 2598 2599 2600 2601
    virAtomicIntInc(&ctxt->refs);
}


void qemuDomainLogContextFree(qemuDomainLogContextPtr ctxt)
{
    bool lastRef;

    if (!ctxt)
        return;

    lastRef = virAtomicIntDecAndTest(&ctxt->refs);
2602
    VIR_DEBUG("Context free %p lastref=%d", ctxt, lastRef);
2603 2604 2605
    if (!lastRef)
        return;

2606
    virLogManagerFree(ctxt->manager);
2607
    VIR_FREE(ctxt->path);
2608 2609 2610 2611 2612 2613
    VIR_FORCE_CLOSE(ctxt->writefd);
    VIR_FORCE_CLOSE(ctxt->readfd);
    VIR_FREE(ctxt);
}


2614 2615
/* Locate an appropriate 'qemu-img' binary.  */
const char *
2616
qemuFindQemuImgBinary(virQEMUDriverPtr driver)
2617
{
2618 2619 2620
    if (!driver->qemuImgBinary)
        virReportError(VIR_ERR_INTERNAL_ERROR,
                       "%s", _("unable to find kvm-img or qemu-img"));
2621 2622 2623 2624 2625 2626 2627

    return driver->qemuImgBinary;
}

int
qemuDomainSnapshotWriteMetadata(virDomainObjPtr vm,
                                virDomainSnapshotObjPtr snapshot,
2628
                                virCapsPtr caps,
2629 2630 2631 2632 2633 2634 2635 2636 2637
                                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);
2638
    newxml = virDomainSnapshotDefFormat(
2639
        uuidstr, snapshot->def, caps,
2640 2641
        virDomainDefFormatConvertXMLFlags(QEMU_DOMAIN_FORMAT_LIVE_FLAGS),
        1);
2642
    if (newxml == NULL)
2643 2644
        return -1;

2645
    if (virAsprintf(&snapDir, "%s/%s", snapshotDir, vm->def->name) < 0)
2646 2647 2648 2649 2650 2651 2652
        goto cleanup;
    if (virFileMakePath(snapDir) < 0) {
        virReportSystemError(errno, _("cannot create snapshot directory '%s'"),
                             snapDir);
        goto cleanup;
    }

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

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

2658
 cleanup:
2659 2660 2661 2662 2663 2664 2665 2666
    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.  */
2667
static int
2668
qemuDomainSnapshotForEachQcow2Raw(virQEMUDriverPtr driver,
2669 2670 2671 2672 2673
                                  virDomainDefPtr def,
                                  const char *name,
                                  const char *op,
                                  bool try_all,
                                  int ndisks)
2674 2675
{
    const char *qemuimgarg[] = { NULL, "snapshot", NULL, NULL, NULL, NULL };
2676
    size_t i;
2677 2678 2679 2680 2681 2682 2683 2684 2685
    bool skipped = false;

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

    qemuimgarg[2] = op;
2686
    qemuimgarg[3] = name;
2687

2688
    for (i = 0; i < ndisks; i++) {
2689
        /* FIXME: we also need to handle LVM here */
2690
        if (def->disks[i]->device == VIR_DOMAIN_DISK_DEVICE_DISK) {
2691 2692 2693
            int format = virDomainDiskGetFormat(def->disks[i]);

            if (format > 0 && format != VIR_STORAGE_FILE_QCOW2) {
2694 2695 2696 2697 2698
                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",
2699
                             def->disks[i]->dst);
2700 2701
                    skipped = true;
                    continue;
2702 2703 2704 2705 2706
                } else if (STREQ(op, "-c") && i) {
                    /* We must roll back partial creation by deleting
                     * all earlier snapshots.  */
                    qemuDomainSnapshotForEachQcow2Raw(driver, def, name,
                                                      "-d", false, i);
2707
                }
2708 2709 2710 2711
                virReportError(VIR_ERR_OPERATION_INVALID,
                               _("Disk device '%s' does not support"
                                 " snapshotting"),
                               def->disks[i]->dst);
2712 2713 2714
                return -1;
            }

2715
            qemuimgarg[4] = virDomainDiskGetSource(def->disks[i]);
2716 2717 2718 2719

            if (virRun(qemuimgarg, NULL) < 0) {
                if (try_all) {
                    VIR_WARN("skipping snapshot action on %s",
2720
                             def->disks[i]->dst);
2721 2722
                    skipped = true;
                    continue;
2723 2724 2725 2726 2727
                } else if (STREQ(op, "-c") && i) {
                    /* We must roll back partial creation by deleting
                     * all earlier snapshots.  */
                    qemuDomainSnapshotForEachQcow2Raw(driver, def, name,
                                                      "-d", false, i);
2728 2729 2730 2731 2732 2733 2734 2735 2736
                }
                return -1;
            }
        }
    }

    return skipped ? 1 : 0;
}

2737 2738 2739
/* 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
2740
qemuDomainSnapshotForEachQcow2(virQEMUDriverPtr driver,
2741 2742 2743 2744 2745 2746 2747 2748 2749 2750 2751 2752 2753 2754 2755 2756
                               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);
}

2757 2758
/* Discard one snapshot (or its metadata), without reparenting any children.  */
int
2759
qemuDomainSnapshotDiscard(virQEMUDriverPtr driver,
2760 2761 2762 2763 2764 2765 2766 2767 2768
                          virDomainObjPtr vm,
                          virDomainSnapshotObjPtr snap,
                          bool update_current,
                          bool metadata_only)
{
    char *snapFile = NULL;
    int ret = -1;
    qemuDomainObjPrivatePtr priv;
    virDomainSnapshotObjPtr parentsnap = NULL;
2769
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
2770 2771 2772 2773 2774 2775 2776 2777 2778

    if (!metadata_only) {
        if (!virDomainObjIsActive(vm)) {
            /* Ignore any skipped disks */
            if (qemuDomainSnapshotForEachQcow2(driver, vm, snap, "-d",
                                               true) < 0)
                goto cleanup;
        } else {
            priv = vm->privateData;
2779
            qemuDomainObjEnterMonitor(driver, vm);
2780 2781
            /* we continue on even in the face of error */
            qemuMonitorDeleteSnapshot(priv->mon, snap->def->name);
2782
            ignore_value(qemuDomainObjExitMonitor(driver, vm));
2783 2784 2785
        }
    }

2786
    if (virAsprintf(&snapFile, "%s/%s/%s.xml", cfg->snapshotDir,
2787
                    vm->def->name, snap->def->name) < 0)
2788 2789 2790 2791
        goto cleanup;

    if (snap == vm->current_snapshot) {
        if (update_current && snap->def->parent) {
2792
            parentsnap = virDomainSnapshotFindByName(vm->snapshots,
2793 2794 2795 2796 2797 2798
                                                     snap->def->parent);
            if (!parentsnap) {
                VIR_WARN("missing parent snapshot matching name '%s'",
                         snap->def->parent);
            } else {
                parentsnap->def->current = true;
2799
                if (qemuDomainSnapshotWriteMetadata(vm, parentsnap, driver->caps,
2800
                                                    cfg->snapshotDir) < 0) {
2801 2802 2803 2804 2805 2806 2807 2808 2809 2810 2811 2812
                    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);
2813
    virDomainSnapshotObjListRemove(vm->snapshots, snap);
2814 2815 2816

    ret = 0;

2817
 cleanup:
2818
    VIR_FREE(snapFile);
2819
    virObjectUnref(cfg);
2820 2821 2822 2823 2824 2825 2826 2827 2828
    return ret;
}

/* Hash iterator callback to discard multiple snapshots.  */
void qemuDomainSnapshotDiscardAll(void *payload,
                                  const void *name ATTRIBUTE_UNUSED,
                                  void *data)
{
    virDomainSnapshotObjPtr snap = payload;
2829
    virQEMUSnapRemovePtr curr = data;
2830 2831 2832 2833 2834 2835 2836 2837 2838 2839 2840
    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
2841
qemuDomainSnapshotDiscardAllMetadata(virQEMUDriverPtr driver,
2842 2843
                                     virDomainObjPtr vm)
{
2844
    virQEMUSnapRemove rem;
2845 2846 2847 2848 2849

    rem.driver = driver;
    rem.vm = vm;
    rem.metadata_only = true;
    rem.err = 0;
2850 2851
    virDomainSnapshotForEach(vm->snapshots, qemuDomainSnapshotDiscardAll,
                             &rem);
2852 2853 2854 2855 2856

    return rem.err;
}

/*
2857
 * The caller must hold a lock the vm.
2858 2859
 */
void
2860
qemuDomainRemoveInactive(virQEMUDriverPtr driver,
2861 2862
                         virDomainObjPtr vm)
{
2863
    bool haveJob = true;
2864
    char *snapDir;
2865 2866 2867 2868 2869 2870 2871 2872
    virQEMUDriverConfigPtr cfg;

    if (vm->persistent) {
        /* Short-circuit, we don't want to remove a persistent domain */
        return;
    }

    cfg = virQEMUDriverGetConfig(driver);
2873

2874 2875 2876
    if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_MODIFY) < 0)
        haveJob = false;

2877 2878 2879 2880 2881
    /* 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);
    }
2882
    else if (virAsprintf(&snapDir, "%s/%s", cfg->snapshotDir,
2883 2884
                         vm->def->name) < 0) {
        VIR_WARN("unable to remove snapshot directory %s/%s",
2885
                 cfg->snapshotDir, vm->def->name);
2886 2887 2888 2889 2890
    } else {
        if (rmdir(snapDir) < 0 && errno != ENOENT)
            VIR_WARN("unable to remove snapshot directory %s", snapDir);
        VIR_FREE(snapDir);
    }
2891 2892 2893

    virObjectRef(vm);

2894
    virDomainObjListRemove(driver->domains, vm);
2895 2896 2897 2898 2899 2900 2901 2902 2903 2904 2905 2906 2907
    /*
     * virDomainObjListRemove() leaves the domain unlocked so it can
     * be unref'd for other drivers that depend on that, but we still
     * need to reset a job and we have a reference from the API that
     * called this function.  So we need to lock it back.  This is
     * just a workaround for the qemu driver.
     *
     * XXX: Ideally, the global handling of domain objects and object
     *      lists would be refactored so we don't need hacks like
     *      this, but since that requires refactor of all drivers,
     *      it's a work for another day.
     */
    virObjectLock(vm);
2908
    virObjectUnref(cfg);
2909 2910

    if (haveJob)
2911
        qemuDomainObjEndJob(driver, vm);
2912 2913

    virObjectUnref(vm);
2914
}
2915 2916

void
2917
qemuDomainSetFakeReboot(virQEMUDriverPtr driver,
2918 2919 2920 2921
                        virDomainObjPtr vm,
                        bool value)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
2922
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
2923 2924

    if (priv->fakeReboot == value)
2925
        goto cleanup;
2926 2927 2928

    priv->fakeReboot = value;

2929
    if (virDomainSaveStatus(driver->xmlopt, cfg->stateDir, vm, driver->caps) < 0)
2930
        VIR_WARN("Failed to save status on vm %s", vm->def->name);
2931

2932
 cleanup:
2933
    virObjectUnref(cfg);
2934
}
M
Michal Privoznik 已提交
2935

2936 2937 2938
static int
qemuDomainCheckRemoveOptionalDisk(virQEMUDriverPtr driver,
                                  virDomainObjPtr vm,
2939
                                  size_t diskIndex)
2940 2941
{
    char uuid[VIR_UUID_STRING_BUFLEN];
2942
    virObjectEventPtr event = NULL;
2943
    virDomainDiskDefPtr disk = vm->def->disks[diskIndex];
2944
    const char *src = virDomainDiskGetSource(disk);
2945 2946 2947 2948 2949

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

    VIR_DEBUG("Dropping disk '%s' on domain '%s' (UUID '%s') "
              "due to inaccessible source '%s'",
2950
              disk->dst, vm->def->name, uuid, src);
2951 2952 2953 2954

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

2955
        event = virDomainEventDiskChangeNewFromObj(vm, src, NULL,
2956 2957
                                                   disk->info.alias,
                                                   VIR_DOMAIN_EVENT_DISK_CHANGE_MISSING_ON_START);
2958
        ignore_value(virDomainDiskSetSource(disk, NULL));
2959
    } else {
2960
        event = virDomainEventDiskChangeNewFromObj(vm, src, NULL,
2961 2962
                                                   disk->info.alias,
                                                   VIR_DOMAIN_EVENT_DISK_DROP_MISSING_ON_START);
2963 2964
        virDomainDiskRemove(vm->def, diskIndex);
        virDomainDiskDefFree(disk);
2965 2966
    }

2967
    qemuDomainEventQueue(driver, event);
2968 2969 2970 2971

    return 0;
}

2972 2973 2974
static int
qemuDomainCheckDiskStartupPolicy(virQEMUDriverPtr driver,
                                 virDomainObjPtr vm,
2975
                                 size_t diskIndex,
2976 2977
                                 bool cold_boot)
{
2978
    int startupPolicy = vm->def->disks[diskIndex]->startupPolicy;
2979
    int device = vm->def->disks[diskIndex]->device;
2980

2981
    switch ((virDomainStartupPolicy) startupPolicy) {
2982
        case VIR_DOMAIN_STARTUP_POLICY_OPTIONAL:
2983 2984 2985 2986 2987 2988 2989
            /* 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;
2990 2991 2992 2993 2994 2995
            break;

        case VIR_DOMAIN_STARTUP_POLICY_MANDATORY:
            goto error;

        case VIR_DOMAIN_STARTUP_POLICY_REQUISITE:
2996
            if (cold_boot)
2997 2998 2999 3000 3001 3002 3003 3004 3005
                goto error;
            break;

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

3006
    if (qemuDomainCheckRemoveOptionalDisk(driver, vm, diskIndex) < 0)
3007
        goto error;
3008 3009 3010

    return 0;

3011
 error:
3012 3013 3014
    return -1;
}

3015

M
Michal Privoznik 已提交
3016
int
3017
qemuDomainCheckDiskPresence(virQEMUDriverPtr driver,
M
Michal Privoznik 已提交
3018
                            virDomainObjPtr vm,
3019
                            bool cold_boot)
M
Michal Privoznik 已提交
3020 3021
{
    int ret = -1;
3022
    size_t i;
M
Michal Privoznik 已提交
3023

3024
    VIR_DEBUG("Checking for disk presence");
3025
    for (i = vm->def->ndisks; i > 0; i--) {
3026 3027
        size_t idx = i - 1;
        virDomainDiskDefPtr disk = vm->def->disks[idx];
3028
        virStorageFileFormat format = virDomainDiskGetFormat(disk);
M
Michal Privoznik 已提交
3029

3030
        if (virStorageSourceIsEmpty(disk->src))
3031 3032 3033 3034 3035
            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 */
3036
        if (virStorageSourceIsLocalStorage(disk->src) &&
3037
            format >= VIR_STORAGE_FILE_NONE &&
3038
            format < VIR_STORAGE_FILE_BACKING &&
3039
            virFileExists(virDomainDiskGetSource(disk)))
M
Michal Privoznik 已提交
3040 3041
            continue;

3042
        if (qemuDomainDetermineDiskChain(driver, vm, disk, true, true) >= 0)
M
Michal Privoznik 已提交
3043
            continue;
3044

3045
        if (disk->startupPolicy &&
3046
            qemuDomainCheckDiskStartupPolicy(driver, vm, idx,
3047 3048 3049
                                             cold_boot) >= 0) {
            virResetLastError();
            continue;
M
Michal Privoznik 已提交
3050 3051
        }

3052
        goto error;
M
Michal Privoznik 已提交
3053 3054 3055 3056
    }

    ret = 0;

3057
 error:
M
Michal Privoznik 已提交
3058 3059
    return ret;
}
3060 3061 3062 3063 3064 3065 3066 3067 3068 3069

/*
 * The vm must be locked when any of the following cleanup functions is
 * called.
 */
int
qemuDomainCleanupAdd(virDomainObjPtr vm,
                     qemuDomainCleanupCallback cb)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
3070
    size_t i;
3071 3072 3073 3074 3075 3076 3077 3078 3079 3080

    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,
3081
                     priv->ncleanupCallbacks, 1) < 0)
3082 3083 3084 3085 3086 3087 3088 3089 3090 3091 3092
        return -1;

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

void
qemuDomainCleanupRemove(virDomainObjPtr vm,
                        qemuDomainCleanupCallback cb)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
3093
    size_t i;
3094 3095 3096 3097

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

    for (i = 0; i < priv->ncleanupCallbacks; i++) {
3098 3099 3100
        if (priv->cleanupCallbacks[i] == cb)
            VIR_DELETE_ELEMENT_INPLACE(priv->cleanupCallbacks,
                                       i, priv->ncleanupCallbacks);
3101 3102 3103 3104 3105 3106 3107 3108
    }

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

void
3109
qemuDomainCleanupRun(virQEMUDriverPtr driver,
3110 3111 3112
                     virDomainObjPtr vm)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
3113
    size_t i;
3114 3115 3116 3117

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

    /* run cleanup callbacks in reverse order */
3118 3119
    for (i = 0; i < priv->ncleanupCallbacks; i++) {
        if (priv->cleanupCallbacks[priv->ncleanupCallbacks - (i + 1)])
3120 3121 3122 3123 3124 3125 3126
            priv->cleanupCallbacks[i](driver, vm);
    }

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

3128 3129 3130
static void
qemuDomainGetImageIds(virQEMUDriverConfigPtr cfg,
                      virDomainObjPtr vm,
3131
                      virStorageSourcePtr src,
3132 3133 3134 3135 3136 3137 3138 3139 3140 3141 3142 3143 3144 3145 3146 3147 3148 3149
                      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;
    }

3150 3151
    if (vm && (vmlabel = virDomainDefGetSecurityLabelDef(vm->def, "dac")) &&
        vmlabel->label)
3152 3153
        virParseOwnershipIds(vmlabel->label, uid, gid);

3154
    if ((disklabel = virStorageSourceGetSecurityLabelDef(src, "dac")) &&
3155
        disklabel->label)
3156 3157 3158 3159
        virParseOwnershipIds(disklabel->label, uid, gid);
}


3160 3161 3162 3163 3164 3165 3166 3167 3168 3169 3170 3171 3172 3173 3174 3175 3176 3177 3178 3179 3180 3181 3182
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;
}


3183 3184 3185 3186 3187 3188 3189 3190 3191 3192 3193 3194 3195 3196 3197 3198
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;
}


3199
int
3200
qemuDomainDetermineDiskChain(virQEMUDriverPtr driver,
3201
                             virDomainObjPtr vm,
3202
                             virDomainDiskDefPtr disk,
3203 3204
                             bool force_probe,
                             bool report_broken)
3205
{
3206 3207
    virQEMUDriverConfigPtr cfg = virQEMUDriverGetConfig(driver);
    int ret = 0;
3208 3209
    uid_t uid;
    gid_t gid;
3210

3211
    if (virStorageSourceIsEmpty(disk->src))
3212
        goto cleanup;
3213

3214
    if (disk->src->backingStore) {
3215
        if (force_probe)
3216
            virStorageSourceBackingStoreClear(disk->src);
3217
        else
3218
            goto cleanup;
3219
    }
3220

3221
    qemuDomainGetImageIds(cfg, vm, disk->src, &uid, &gid);
3222

3223
    if (virStorageFileGetMetadata(disk->src,
3224
                                  uid, gid,
3225
                                  cfg->allowDiskFormatProbing,
3226
                                  report_broken) < 0)
3227 3228
        ret = -1;

3229
 cleanup:
3230 3231
    virObjectUnref(cfg);
    return ret;
3232
}
3233

3234

3235 3236 3237 3238 3239 3240 3241 3242 3243 3244 3245 3246 3247 3248 3249 3250 3251 3252 3253 3254 3255 3256 3257 3258 3259 3260 3261 3262 3263 3264 3265 3266 3267
bool
qemuDomainDiskSourceDiffers(virConnectPtr conn,
                            virDomainDiskDefPtr disk,
                            virDomainDiskDefPtr origDisk)
{
    char *diskSrc = NULL, *origDiskSrc = NULL;
    bool diskEmpty, origDiskEmpty;
    bool ret = true;

    diskEmpty = virStorageSourceIsEmpty(disk->src);
    origDiskEmpty = virStorageSourceIsEmpty(origDisk->src);

    if (diskEmpty && origDiskEmpty)
        return false;

    if (diskEmpty ^ origDiskEmpty)
        return true;

    if (qemuGetDriveSourceString(disk->src, conn, &diskSrc) < 0 ||
        qemuGetDriveSourceString(origDisk->src, conn, &origDiskSrc) < 0)
        goto cleanup;

    /* So far in qemu disk sources are considered different
     * if either path to disk or its format changes. */
    ret = virDomainDiskGetFormat(disk) != virDomainDiskGetFormat(origDisk) ||
          STRNEQ_NULLABLE(diskSrc, origDiskSrc);
 cleanup:
    VIR_FREE(diskSrc);
    VIR_FREE(origDiskSrc);
    return ret;
}


3268 3269 3270 3271 3272 3273 3274 3275 3276 3277 3278 3279 3280 3281 3282 3283 3284 3285 3286 3287 3288 3289 3290
/*
 * Makes sure the @disk differs from @orig_disk only by the source
 * path and nothing else.  Fields that are being checked and the
 * information whether they are nullable (may not be specified) or is
 * taken from the virDomainDiskDefFormat() code.
 */
bool
qemuDomainDiskChangeSupported(virDomainDiskDefPtr disk,
                              virDomainDiskDefPtr orig_disk)
{
#define CHECK_EQ(field, field_name, nullable)                           \
    do {                                                                \
        if (nullable && !disk->field)                                   \
            break;                                                      \
        if (disk->field != orig_disk->field) {                          \
            virReportError(VIR_ERR_OPERATION_UNSUPPORTED,               \
                           _("cannot modify field '%s' of the disk"),   \
                           field_name);                                 \
            return false;                                               \
        }                                                               \
    } while (0)

    CHECK_EQ(device, "device", false);
3291 3292 3293 3294 3295 3296 3297 3298 3299
    CHECK_EQ(bus, "bus", false);
    if (STRNEQ(disk->dst, orig_disk->dst)) {
        virReportError(VIR_ERR_OPERATION_UNSUPPORTED,
                       _("cannot modify field '%s' of the disk"),
                       "bus");
        return false;
    }
    CHECK_EQ(tray_status, "tray", true);
    CHECK_EQ(removable, "removable", true);
3300 3301 3302 3303 3304 3305 3306 3307 3308 3309 3310 3311 3312 3313 3314 3315 3316 3317 3318 3319 3320 3321 3322 3323 3324 3325 3326 3327 3328 3329 3330 3331 3332 3333 3334 3335 3336 3337 3338 3339 3340 3341 3342 3343 3344 3345 3346 3347 3348 3349 3350 3351 3352 3353 3354 3355 3356 3357 3358 3359 3360 3361 3362 3363 3364 3365 3366 3367 3368 3369 3370 3371 3372 3373 3374 3375 3376 3377 3378 3379 3380 3381 3382

    if (disk->geometry.cylinders &&
        disk->geometry.heads &&
        disk->geometry.sectors) {
        CHECK_EQ(geometry.cylinders, "geometry cylinders", false);
        CHECK_EQ(geometry.heads, "geometry heads", false);
        CHECK_EQ(geometry.sectors, "geometry sectors", false);
        CHECK_EQ(geometry.trans, "BIOS-translation-modus", true);
    }

    CHECK_EQ(blockio.logical_block_size,
             "blockio logical_block_size", false);
    CHECK_EQ(blockio.physical_block_size,
             "blockio physical_block_size", false);

    CHECK_EQ(blkdeviotune.total_bytes_sec,
             "blkdeviotune total_bytes_sec",
             true);
    CHECK_EQ(blkdeviotune.read_bytes_sec,
             "blkdeviotune read_bytes_sec",
             true);
    CHECK_EQ(blkdeviotune.write_bytes_sec,
             "blkdeviotune write_bytes_sec",
             true);
    CHECK_EQ(blkdeviotune.total_iops_sec,
             "blkdeviotune total_iops_sec",
             true);
    CHECK_EQ(blkdeviotune.read_iops_sec,
             "blkdeviotune read_iops_sec",
             true);
    CHECK_EQ(blkdeviotune.write_iops_sec,
             "blkdeviotune write_iops_sec",
             true);
    CHECK_EQ(blkdeviotune.total_bytes_sec_max,
             "blkdeviotune total_bytes_sec_max",
             true);
    CHECK_EQ(blkdeviotune.read_bytes_sec_max,
             "blkdeviotune read_bytes_sec_max",
             true);
    CHECK_EQ(blkdeviotune.write_bytes_sec_max,
             "blkdeviotune write_bytes_sec_max",
             true);
    CHECK_EQ(blkdeviotune.total_iops_sec_max,
             "blkdeviotune total_iops_sec_max",
             true);
    CHECK_EQ(blkdeviotune.read_iops_sec_max,
             "blkdeviotune read_iops_sec_max",
             true);
    CHECK_EQ(blkdeviotune.write_iops_sec_max,
             "blkdeviotune write_iops_sec_max",
             true);
    CHECK_EQ(blkdeviotune.size_iops_sec,
             "blkdeviotune size_iops_sec",
             true);

    if (disk->serial && STRNEQ_NULLABLE(disk->serial, orig_disk->serial)) {
        virReportError(VIR_ERR_OPERATION_UNSUPPORTED,
                       _("cannot modify field '%s' of the disk"),
                       "serial");
        return false;
    }

    if (disk->wwn && STRNEQ_NULLABLE(disk->wwn, orig_disk->wwn)) {
        virReportError(VIR_ERR_OPERATION_UNSUPPORTED,
                       _("cannot modify field '%s' of the disk"),
                       "wwn");
        return false;
    }

    if (disk->vendor && STRNEQ_NULLABLE(disk->vendor, orig_disk->vendor)) {
        virReportError(VIR_ERR_OPERATION_UNSUPPORTED,
                       _("cannot modify field '%s' of the disk"),
                       "vendor");
        return false;
    }

    if (disk->product && STRNEQ_NULLABLE(disk->product, orig_disk->product)) {
        virReportError(VIR_ERR_OPERATION_UNSUPPORTED,
                       _("cannot modify field '%s' of the disk"),
                       "product");
        return false;
    }

3383 3384 3385 3386 3387 3388 3389 3390
    CHECK_EQ(cachemode, "cache", true);
    CHECK_EQ(error_policy, "error_policy", true);
    CHECK_EQ(rerror_policy, "rerror_policy", true);
    CHECK_EQ(iomode, "io", true);
    CHECK_EQ(ioeventfd, "ioeventfd", true);
    CHECK_EQ(event_idx, "event_idx", true);
    CHECK_EQ(copy_on_read, "copy_on_read", true);
    CHECK_EQ(snapshot, "snapshot", true);
3391
    /* startupPolicy is allowed to be updated. Therefore not checked here. */
3392
    CHECK_EQ(transient, "transient", true);
3393
    CHECK_EQ(info.bootIndex, "boot order", true);
3394 3395 3396 3397 3398 3399 3400 3401 3402 3403 3404 3405
    CHECK_EQ(rawio, "rawio", true);
    CHECK_EQ(sgio, "sgio", true);
    CHECK_EQ(discard, "discard", true);
    CHECK_EQ(iothread, "iothread", true);

    if (disk->domain_name &&
        STRNEQ_NULLABLE(disk->domain_name, orig_disk->domain_name)) {
        virReportError(VIR_ERR_OPERATION_UNSUPPORTED,
                       _("cannot modify field '%s' of the disk"),
                       "backenddomain");
        return false;
    }
3406 3407 3408 3409 3410 3411

#undef CHECK_EQ

    return true;
}

3412 3413 3414
bool
qemuDomainDiskBlockJobIsActive(virDomainDiskDefPtr disk)
{
3415 3416
    qemuDomainDiskPrivatePtr diskPriv = QEMU_DOMAIN_DISK_PRIVATE(disk);

3417 3418 3419 3420 3421 3422 3423 3424
    if (disk->mirror) {
        virReportError(VIR_ERR_BLOCK_COPY_ACTIVE,
                       _("disk '%s' already in active block job"),
                       disk->dst);

        return true;
    }

3425
    if (diskPriv->blockjob) {
3426 3427 3428 3429 3430 3431 3432 3433 3434 3435
        virReportError(VIR_ERR_OPERATION_UNSUPPORTED,
                       _("disk '%s' already in active block job"),
                       disk->dst);
        return true;
    }

    return false;
}


3436 3437 3438 3439 3440 3441 3442 3443 3444 3445 3446 3447 3448 3449 3450
/**
 * qemuDomainHasBlockjob:
 * @vm: domain object
 * @copy_only: Reject only block copy job
 *
 * Return true if @vm has at least one disk involved in a current block
 * copy/commit/pull job. If @copy_only is true this returns true only if the
 * disk is involved in a block copy.
 * */
bool
qemuDomainHasBlockjob(virDomainObjPtr vm,
                      bool copy_only)
{
    size_t i;
    for (i = 0; i < vm->def->ndisks; i++) {
3451 3452 3453 3454
        virDomainDiskDefPtr disk = vm->def->disks[i];
        qemuDomainDiskPrivatePtr diskPriv = QEMU_DOMAIN_DISK_PRIVATE(disk);

        if (!copy_only && diskPriv->blockjob)
3455 3456
            return true;

3457
        if (disk->mirror && disk->mirrorJob == VIR_DOMAIN_BLOCK_JOB_TYPE_COPY)
3458 3459 3460 3461 3462 3463 3464
            return true;
    }

    return false;
}


3465 3466
int
qemuDomainUpdateDeviceList(virQEMUDriverPtr driver,
3467 3468
                           virDomainObjPtr vm,
                           int asyncJob)
3469 3470 3471
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
    char **aliases;
3472
    int rc;
3473 3474 3475 3476

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

3477 3478
    if (qemuDomainObjEnterMonitorAsync(driver, vm, asyncJob) < 0)
        return -1;
3479 3480 3481 3482
    rc = qemuMonitorGetDeviceAliases(priv->mon, &aliases);
    if (qemuDomainObjExitMonitor(driver, vm) < 0)
        return -1;
    if (rc < 0)
3483 3484 3485 3486 3487 3488
        return -1;

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

3490 3491 3492 3493 3494 3495 3496 3497 3498 3499 3500 3501 3502 3503 3504 3505 3506 3507 3508 3509 3510 3511 3512 3513 3514 3515 3516 3517 3518 3519 3520 3521 3522 3523 3524 3525 3526 3527 3528 3529 3530 3531 3532 3533 3534 3535 3536 3537 3538

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


3539 3540 3541 3542 3543 3544 3545 3546 3547 3548 3549 3550 3551 3552 3553 3554
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);

3555
 cleanup:
3556 3557 3558 3559
    virDomainDefFree(migratableDefSrc);
    virDomainDefFree(migratableDefDst);
    return ret;
}
3560 3561

bool
3562
qemuDomainAgentAvailable(virDomainObjPtr vm,
3563 3564
                         bool reportError)
{
3565 3566
    qemuDomainObjPrivatePtr priv = vm->privateData;

3567 3568 3569 3570 3571 3572 3573
    if (virDomainObjGetState(vm, NULL) != VIR_DOMAIN_RUNNING) {
        if (reportError) {
            virReportError(VIR_ERR_OPERATION_INVALID, "%s",
                           _("domain is not running"));
        }
        return false;
    }
3574 3575 3576 3577 3578 3579 3580 3581 3582
    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) {
3583 3584 3585 3586 3587 3588 3589 3590 3591 3592 3593 3594
        if (qemuFindAgentConfig(vm->def)) {
            if (reportError) {
                virReportError(VIR_ERR_AGENT_UNRESPONSIVE, "%s",
                               _("QEMU guest agent is not connected"));
            }
            return false;
        } else {
            if (reportError) {
                virReportError(VIR_ERR_ARGUMENT_UNSUPPORTED, "%s",
                               _("QEMU guest agent is not configured"));
            }
            return false;
3595 3596 3597 3598
        }
    }
    return true;
}
3599

3600

3601
static unsigned long long
3602
qemuDomainGetMemorySizeAlignment(virDomainDefPtr def)
3603
{
3604 3605 3606 3607 3608
    /* PPC requires the memory sizes to be rounded to 256MiB increments, so
     * round them to the size always. */
    if (ARCH_IS_PPC64(def->os.arch))
        return 256 * 1024;

3609 3610 3611 3612 3613 3614 3615
    /* Align memory size. QEMU requires rounding to next 4KiB block.
     * We'll take the "traditional" path and round it to 1MiB*/

    return 1024;
}


3616 3617 3618 3619 3620 3621 3622 3623 3624 3625 3626 3627 3628 3629 3630
static unsigned long long
qemuDomainGetMemoryModuleSizeAlignment(const virDomainDef *def,
                                       const virDomainMemoryDef *mem ATTRIBUTE_UNUSED)
{
    /* PPC requires the memory sizes to be rounded to 256MiB increments, so
     * round them to the size always. */
    if (ARCH_IS_PPC64(def->os.arch))
        return 256 * 1024;

    /* dimm memory modules require 2MiB alignment rather than the 1MiB we are
     * using elsewhere. */
    return 2048;
}


3631 3632 3633
int
qemuDomainAlignMemorySizes(virDomainDefPtr def)
{
3634 3635
    unsigned long long maxmemkb = virMemoryMaxValue(false) >> 10;
    unsigned long long maxmemcapped = virMemoryMaxValue(true) >> 10;
3636
    unsigned long long initialmem = 0;
3637
    unsigned long long mem;
3638
    unsigned long long align = qemuDomainGetMemorySizeAlignment(def);
3639 3640 3641 3642 3643
    size_t ncells = virDomainNumaGetNodeCount(def->numa);
    size_t i;

    /* align NUMA cell sizes if relevant */
    for (i = 0; i < ncells; i++) {
3644 3645
        mem = VIR_ROUND_UP(virDomainNumaGetNodeMemorySize(def->numa, i), align);
        initialmem += mem;
3646 3647 3648 3649 3650 3651 3652

        if (mem > maxmemkb) {
            virReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                           _("memory size of NUMA node '%zu' overflowed after "
                             "alignment"), i);
            return -1;
        }
3653
        virDomainNumaSetNodeMemorySize(def->numa, i, mem);
3654 3655
    }

3656 3657 3658 3659 3660
    /* align initial memory size, if NUMA is present calculate it as total of
     * individual aligned NUMA node sizes */
    if (initialmem == 0)
        initialmem = VIR_ROUND_UP(virDomainDefGetMemoryInitial(def), align);

3661 3662 3663 3664 3665 3666
    if (initialmem > maxmemcapped) {
        virReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                       _("initial memory size overflowed after alignment"));
        return -1;
    }

3667
    virDomainDefSetMemoryInitial(def, initialmem);
3668

3669
    def->mem.max_memory = VIR_ROUND_UP(def->mem.max_memory, align);
3670 3671 3672 3673 3674
    if (def->mem.max_memory > maxmemkb) {
        virReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                       _("maximum memory size overflowed after alignment"));
        return -1;
    }
3675

3676
    /* Align memory module sizes */
3677 3678
    for (i = 0; i < def->nmems; i++) {
        align = qemuDomainGetMemoryModuleSizeAlignment(def, def->mems[i]);
3679
        def->mems[i]->size = VIR_ROUND_UP(def->mems[i]->size, align);
3680 3681 3682 3683 3684 3685 3686

        if (def->mems[i]->size > maxmemkb) {
            virReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                           _("size of memory module '%zu' overflowed after "
                             "alignment"), i);
            return -1;
        }
3687
    }
3688

3689 3690
    return 0;
}
3691 3692 3693 3694 3695 3696 3697 3698 3699 3700 3701


/**
 * qemuDomainMemoryDeviceAlignSize:
 * @mem: memory device definition object
 *
 * Aligns the size of the memory module as qemu enforces it. The size is updated
 * inplace. Default rounding is now to 1 MiB (qemu requires rouding to page,
 * size so this should be safe).
 */
void
3702 3703
qemuDomainMemoryDeviceAlignSize(virDomainDefPtr def,
                                virDomainMemoryDefPtr mem)
3704
{
3705
    mem->size = VIR_ROUND_UP(mem->size, qemuDomainGetMemorySizeAlignment(def));
3706
}
3707 3708 3709 3710 3711 3712 3713 3714 3715 3716 3717 3718 3719


/**
 * qemuDomainGetMonitor:
 * @vm: domain object
 *
 * Returns the monitor pointer corresponding to the domain object @vm.
 */
qemuMonitorPtr
qemuDomainGetMonitor(virDomainObjPtr vm)
{
    return ((qemuDomainObjPrivatePtr) vm->privateData)->mon;
}
3720 3721 3722 3723 3724 3725 3726 3727 3728 3729 3730 3731 3732 3733 3734 3735


/**
 * qemuDomainSupportsBlockJobs:
 * @vm: domain object
 * @modern: pointer to bool that returns whether modern block jobs are supported
 *
 * Returns -1 in case when qemu does not support block jobs at all. Otherwise
 * returns 0 and optionally fills @modern to denote that modern (async) block
 * jobs are supported.
 */
int
qemuDomainSupportsBlockJobs(virDomainObjPtr vm,
                            bool *modern)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
3736 3737
    bool asynchronous = virQEMUCapsGet(priv->qemuCaps, QEMU_CAPS_BLOCKJOB_ASYNC);
    bool synchronous = virQEMUCapsGet(priv->qemuCaps, QEMU_CAPS_BLOCKJOB_SYNC);
3738

3739
    if (!synchronous && !asynchronous) {
3740 3741 3742 3743 3744 3745
        virReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                       _("block jobs not supported with this QEMU binary"));
        return -1;
    }

    if (modern)
3746
        *modern = asynchronous;
3747 3748 3749

    return 0;
}
3750 3751 3752 3753 3754 3755 3756 3757 3758


/**
 * qemuFindAgentConfig:
 * @def: domain definition
 *
 * Returns the pointer to the channel definition that is used to access the
 * guest agent if the agent is configured or NULL otherwise.
 */
3759
virDomainChrDefPtr
3760 3761 3762 3763 3764 3765 3766 3767 3768 3769
qemuFindAgentConfig(virDomainDefPtr def)
{
    size_t i;

    for (i = 0; i < def->nchannels; i++) {
        virDomainChrDefPtr channel = def->channels[i];

        if (channel->targetType != VIR_DOMAIN_CHR_CHANNEL_TARGET_TYPE_VIRTIO)
            continue;

3770 3771
        if (STREQ_NULLABLE(channel->target.name, "org.qemu.guest_agent.0"))
            return channel;
3772 3773
    }

3774
    return NULL;
3775
}
3776 3777 3778 3779 3780 3781 3782 3783 3784 3785 3786 3787 3788 3789 3790 3791 3792 3793 3794


bool
qemuDomainMachineIsQ35(const virDomainDef *def)
{
    return (STRPREFIX(def->os.machine, "pc-q35") ||
            STREQ(def->os.machine, "q35"));
}


bool
qemuDomainMachineIsI440FX(const virDomainDef *def)
{
    return (STREQ(def->os.machine, "pc") ||
            STRPREFIX(def->os.machine, "pc-0.") ||
            STRPREFIX(def->os.machine, "pc-1.") ||
            STRPREFIX(def->os.machine, "pc-i440") ||
            STRPREFIX(def->os.machine, "rhel"));
}
3795 3796


3797 3798 3799 3800 3801 3802 3803 3804 3805 3806 3807 3808 3809 3810 3811 3812 3813 3814
bool
qemuDomainMachineNeedsFDC(const virDomainDef *def)
{
    char *p = STRSKIP(def->os.machine, "pc-q35-");

    if (p) {
        if (STRPREFIX(p, "1.") ||
            STRPREFIX(p, "2.0") ||
            STRPREFIX(p, "2.1") ||
            STRPREFIX(p, "2.2") ||
            STRPREFIX(p, "2.3"))
            return false;
        return true;
    }
    return false;
}


3815 3816 3817 3818 3819 3820
bool
qemuDomainMachineIsS390CCW(const virDomainDef *def)
{
    return STRPREFIX(def->os.machine, "s390-ccw");
}

3821

3822 3823 3824 3825 3826 3827 3828 3829 3830 3831 3832 3833 3834 3835 3836 3837 3838 3839 3840 3841 3842 3843 3844 3845 3846 3847 3848 3849 3850 3851 3852 3853 3854 3855 3856 3857 3858 3859 3860 3861 3862 3863 3864 3865 3866 3867 3868
static bool
qemuCheckMemoryDimmConflict(const virDomainDef *def,
                            const virDomainMemoryDef *mem)
{
    size_t i;

    for (i = 0; i < def->nmems; i++) {
         virDomainMemoryDefPtr tmp = def->mems[i];

         if (tmp == mem ||
             tmp->info.type != VIR_DOMAIN_DEVICE_ADDRESS_TYPE_DIMM)
             continue;

         if (mem->info.addr.dimm.slot == tmp->info.addr.dimm.slot) {
             virReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                            _("memory device slot '%u' is already being "
                              "used by another memory device"),
                            mem->info.addr.dimm.slot);
             return true;
         }

         if (mem->info.addr.dimm.base != 0 &&
             mem->info.addr.dimm.base == tmp->info.addr.dimm.base) {
             virReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                            _("memory device base '0x%llx' is already being "
                              "used by another memory device"),
                            mem->info.addr.dimm.base);
             return true;
         }
    }

    return false;
}
static int
qemuDomainDefValidateMemoryHotplugDevice(const virDomainMemoryDef *mem,
                                         const virDomainDef *def)
{
    switch ((virDomainMemoryModel) mem->model) {
    case VIR_DOMAIN_MEMORY_MODEL_DIMM:
        if (mem->info.type != VIR_DOMAIN_DEVICE_ADDRESS_TYPE_DIMM &&
            mem->info.type != VIR_DOMAIN_DEVICE_ADDRESS_TYPE_NONE) {
            virReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                           _("only 'dimm' addresses are supported for the "
                             "pc-dimm device"));
            return -1;
        }

3869 3870 3871 3872 3873 3874 3875
        if (virDomainNumaGetNodeCount(def->numa) != 0) {
            if (mem->targetNode == -1) {
                virReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                               _("target NUMA node needs to be specifed for "
                                 "memory device"));
                return -1;
            }
3876 3877
        }

3878 3879 3880 3881 3882 3883 3884 3885 3886 3887 3888 3889 3890 3891 3892 3893 3894 3895 3896 3897 3898 3899 3900 3901 3902 3903
        if (mem->info.type == VIR_DOMAIN_DEVICE_ADDRESS_TYPE_DIMM) {
            if (mem->info.addr.dimm.slot >= def->mem.memory_slots) {
                virReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                               _("memory device slot '%u' exceeds slots "
                                 "count '%u'"),
                               mem->info.addr.dimm.slot, def->mem.memory_slots);
                return -1;
            }


            if (qemuCheckMemoryDimmConflict(def, mem))
                return -1;
        }
        break;

    case VIR_DOMAIN_MEMORY_MODEL_NONE:
    case VIR_DOMAIN_MEMORY_MODEL_LAST:
        virReportError(VIR_ERR_INTERNAL_ERROR, "%s",
                       _("invalid memory device type"));
        return -1;
    }

    return 0;
}


3904 3905 3906 3907 3908 3909 3910 3911 3912 3913 3914 3915 3916 3917 3918 3919 3920 3921 3922 3923 3924 3925 3926 3927 3928 3929 3930 3931
/**
 * qemuDomainDefValidateMemoryHotplug:
 * @def: domain definition
 * @qemuCaps: qemu capabilities object
 * @mem: definition of memory device that is to be added to @def with hotplug,
 *       NULL in case of regular VM startup
 *
 * Validates that the domain definition and memory modules have valid
 * configuration and are possibly able to accept @mem via hotplug if it's
 * non-NULL.
 *
 * Returns 0 on success; -1 and a libvirt error on error.
 */
int
qemuDomainDefValidateMemoryHotplug(const virDomainDef *def,
                                   virQEMUCapsPtr qemuCaps,
                                   const virDomainMemoryDef *mem)
{
    unsigned int nmems = def->nmems;
    unsigned long long hotplugSpace;
    unsigned long long hotplugMemory = 0;
    size_t i;

    hotplugSpace = def->mem.max_memory - virDomainDefGetMemoryInitial(def);

    if (mem) {
        nmems++;
        hotplugMemory = mem->size;
3932 3933 3934

        if (qemuDomainDefValidateMemoryHotplugDevice(mem, def) < 0)
            return -1;
3935 3936 3937 3938 3939 3940 3941 3942 3943 3944 3945 3946 3947 3948 3949 3950 3951 3952 3953
    }

    if (!virDomainDefHasMemoryHotplug(def)) {
        if (nmems) {
            virReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                           _("cannot use/hotplug a memory device when domain "
                             "'maxMemory' is not defined"));
            return -1;
        }

        return 0;
    }

    if (!virQEMUCapsGet(qemuCaps, QEMU_CAPS_DEVICE_PC_DIMM)) {
        virReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                       _("memory hotplug isn't supported by this QEMU binary"));
        return -1;
    }

3954 3955 3956 3957 3958 3959 3960 3961 3962 3963 3964
    if (!ARCH_IS_PPC64(def->os.arch)) {
        /* due to guest support, qemu would silently enable NUMA with one node
         * once the memory hotplug backend is enabled. To avoid possible
         * confusion we will enforce user originated numa configuration along
         * with memory hotplug. */
        if (virDomainNumaGetNodeCount(def->numa) == 0) {
            virReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                           _("At least one numa node has to be configured when "
                             "enabling memory hotplug"));
            return -1;
        }
3965 3966 3967 3968 3969 3970 3971 3972 3973
    }

    if (nmems > def->mem.memory_slots) {
        virReportError(VIR_ERR_CONFIG_UNSUPPORTED,
                       _("memory device count '%u' exceeds slots count '%u'"),
                       nmems, def->mem.memory_slots);
        return -1;
    }

3974
    for (i = 0; i < def->nmems; i++) {
3975 3976
        hotplugMemory += def->mems[i]->size;

3977 3978 3979 3980 3981 3982
        /* already existing devices don't need to be checked on hotplug */
        if (!mem &&
            qemuDomainDefValidateMemoryHotplugDevice(def->mems[i], def) < 0)
            return -1;
    }

3983 3984 3985 3986 3987 3988 3989 3990 3991 3992
    if (hotplugMemory > hotplugSpace) {
        virReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                       _("memory device total size exceeds hotplug space"));
        return -1;
    }

    return 0;
}


3993 3994 3995 3996 3997 3998 3999 4000 4001 4002
bool
qemuDomainMachineHasBuiltinIDE(const virDomainDef *def)
{
    return qemuDomainMachineIsI440FX(def) ||
        STREQ(def->os.machine, "malta") ||
        STREQ(def->os.machine, "sun4u") ||
        STREQ(def->os.machine, "g3beige");
}


4003 4004 4005 4006 4007 4008 4009 4010 4011 4012 4013 4014 4015 4016 4017 4018 4019 4020 4021 4022 4023 4024 4025 4026 4027 4028 4029 4030 4031 4032 4033 4034 4035 4036 4037 4038 4039 4040 4041 4042 4043 4044 4045 4046 4047 4048 4049 4050 4051 4052 4053 4054 4055 4056 4057 4058 4059 4060 4061
/**
 * qemuDomainUpdateCurrentMemorySize:
 *
 * Updates the current balloon size from the monitor if necessary. In case when
 * the balloon is not present for the domain, the function recalculates the
 * maximum size to reflect possible changes.
 *
 * Returns 0 on success and updates vm->def->mem.cur_balloon if necessary, -1 on
 * error and reports libvirt error.
 */
int
qemuDomainUpdateCurrentMemorySize(virQEMUDriverPtr driver,
                                  virDomainObjPtr vm)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;
    unsigned long long balloon;
    int ret = -1;

    /* inactive domain doesn't need size update */
    if (!virDomainObjIsActive(vm))
        return 0;

    /* if no balloning is available, the current size equals to the current
     * full memory size */
    if (!vm->def->memballoon ||
        vm->def->memballoon->model == VIR_DOMAIN_MEMBALLOON_MODEL_NONE) {
        vm->def->mem.cur_balloon = virDomainDefGetMemoryActual(vm->def);
        return 0;
    }

    /* current size is always automagically updated via the event */
    if (virQEMUCapsGet(priv->qemuCaps, QEMU_CAPS_BALLOON_EVENT))
        return 0;

    /* here we need to ask the monitor */

    /* Don't delay if someone's using the monitor, just use existing most
     * recent data instead */
    if (qemuDomainJobAllowed(priv, QEMU_JOB_QUERY)) {
        if (qemuDomainObjBeginJob(driver, vm, QEMU_JOB_QUERY) < 0)
            return -1;

        if (!virDomainObjIsActive(vm)) {
            virReportError(VIR_ERR_OPERATION_INVALID, "%s",
                           _("domain is not running"));
            goto endjob;
        }

        qemuDomainObjEnterMonitor(driver, vm);
        ret = qemuMonitorGetBalloonInfo(priv->mon, &balloon);
        if (qemuDomainObjExitMonitor(driver, vm) < 0)
            ret = -1;

 endjob:
        qemuDomainObjEndJob(driver, vm);

        if (ret < 0)
            return -1;

4062 4063
        vm->def->mem.cur_balloon = balloon;
    }
4064 4065 4066

    return 0;
}
4067 4068 4069


/**
4070
 * qemuDomainGetMemLockLimitBytes:
4071 4072 4073 4074
 *
 * @def: domain definition
 *
 * Returns the size of the memory in bytes that needs to be set as
4075
 * RLIMIT_MEMLOCK for the QEMU process.
4076 4077 4078 4079
 * If a mem.hard_limit is set, then that value is preferred; otherwise, the
 * value returned may depend upon the architecture or devices present.
 */
unsigned long long
4080
qemuDomainGetMemLockLimitBytes(virDomainDefPtr def)
4081 4082 4083
{
    unsigned long long memKB;

4084 4085 4086 4087 4088 4089
    /* prefer the hard limit */
    if (virMemoryLimitIsSet(def->mem.hard_limit)) {
        memKB = def->mem.hard_limit;
        goto done;
    }

4090 4091 4092 4093 4094 4095 4096 4097 4098 4099 4100 4101 4102 4103 4104 4105 4106 4107 4108 4109 4110 4111 4112 4113 4114 4115 4116 4117 4118 4119 4120 4121 4122 4123 4124 4125 4126 4127 4128 4129 4130 4131 4132 4133 4134 4135 4136 4137 4138 4139 4140 4141 4142 4143 4144 4145 4146 4147 4148 4149 4150 4151 4152 4153 4154 4155 4156 4157 4158 4159 4160 4161 4162 4163 4164 4165 4166 4167
    if (ARCH_IS_PPC64(def->os.arch)) {
        unsigned long long maxMemory;
        unsigned long long memory;
        unsigned long long baseLimit;
        unsigned long long passthroughLimit;
        size_t nPCIHostBridges;
        size_t i;
        bool usesVFIO = false;

        /* TODO: Detect at runtime once we start using more than just
         *       the default PCI Host Bridge */
        nPCIHostBridges = 1;

        for (i = 0; i < def->nhostdevs; i++) {
            virDomainHostdevDefPtr dev = def->hostdevs[i];

            if (dev->mode == VIR_DOMAIN_HOSTDEV_MODE_SUBSYS &&
                dev->source.subsys.type == VIR_DOMAIN_HOSTDEV_SUBSYS_TYPE_PCI &&
                dev->source.subsys.u.pci.backend == VIR_DOMAIN_HOSTDEV_PCI_BACKEND_VFIO) {
                usesVFIO = true;
                break;
            }
        }

        memory = virDomainDefGetMemoryActual(def);

        if (def->mem.max_memory)
            maxMemory = def->mem.max_memory;
        else
            maxMemory = memory;

        /* baseLimit := maxMemory / 128                                  (a)
         *              + 4 MiB * #PHBs + 8 MiB                          (b)
         *
         * (a) is the hash table
         *
         * (b) is accounting for the 32-bit DMA window - it could be either the
         * KVM accelerated TCE tables for emulated devices, or the VFIO
         * userspace view. The 4 MiB per-PHB (including the default one) covers
         * a 2GiB DMA window: default is 1GiB, but it's possible it'll be
         * increased to help performance. The 8 MiB extra should be plenty for
         * the TCE table index for any reasonable number of PHBs and several
         * spapr-vlan or spapr-vscsi devices (512kB + a tiny bit each) */
        baseLimit = maxMemory / 128 +
                    4096 * nPCIHostBridges +
                    8192;

        /* passthroughLimit := max( 2 GiB * #PHBs,                       (c)
         *                          memory                               (d)
         *                          + memory * 1/512 * #PHBs + 8 MiB )   (e)
         *
         * (c) is the pre-DDW VFIO DMA window accounting. We're allowing 2 GiB
         * rather than 1 GiB
         *
         * (d) is the with-DDW (and memory pre-registration and related
         * features) DMA window accounting - assuming that we only account RAM
         * once, even if mapped to multiple PHBs
         *
         * (e) is the with-DDW userspace view and overhead for the 64-bit DMA
         * window. This is based a bit on expected guest behaviour, but there
         * really isn't a way to completely avoid that. We assume the guest
         * requests a 64-bit DMA window (per PHB) just big enough to map all
         * its RAM. 4 kiB page size gives the 1/512; it will be less with 64
         * kiB pages, less still if the guest is mapped with hugepages (unlike
         * the default 32-bit DMA window, DDW windows can use large IOMMU
         * pages). 8 MiB is for second and further level overheads, like (b) */
        passthroughLimit = MAX(2 * 1024 * 1024 * nPCIHostBridges,
                               memory +
                               memory / 512 * nPCIHostBridges + 8192);

        if (usesVFIO)
            memKB = baseLimit + passthroughLimit;
        else
            memKB = baseLimit;

        goto done;
    }

4168 4169 4170 4171 4172 4173 4174 4175 4176 4177 4178 4179 4180 4181 4182 4183 4184 4185
    /* For device passthrough using VFIO the guest memory and MMIO memory
     * regions need to be locked persistent in order to allow DMA.
     *
     * Currently the below limit is based on assumptions about the x86 platform.
     *
     * The chosen value of 1GiB below originates from x86 systems where it was
     * used as space reserved for the MMIO region for the whole system.
     *
     * On x86_64 systems the MMIO regions of the IOMMU mapped devices don't
     * count towards the locked memory limit since the memory is owned by the
     * device. Emulated devices though do count, but the regions are usually
     * small. Although it's not guaranteed that the limit will be enough for all
     * configurations it didn't pose a problem for now.
     *
     * http://www.redhat.com/archives/libvir-list/2015-November/msg00329.html
     *
     * Note that this may not be valid for all platforms.
     */
4186
    memKB = virDomainDefGetMemoryActual(def) + 1024 * 1024;
4187

4188
 done:
4189 4190
    return memKB << 10;
}
4191 4192 4193 4194 4195


/**
 * @def: domain definition
 *
4196 4197 4198
 * Returns true if the locked memory limit needs to be set or updated because
 * of domain configuration, VFIO passthrough devices or architecture-specific
 * requirements.
4199 4200
 * */
bool
4201
qemuDomainRequiresMemLock(virDomainDefPtr def)
4202 4203 4204 4205 4206 4207
{
    size_t i;

    if (def->mem.locked)
        return true;

4208 4209 4210 4211
    /* ppc64 domains need to lock some memory even when VFIO is not used */
    if (ARCH_IS_PPC64(def->os.arch))
        return true;

4212 4213 4214 4215 4216 4217 4218 4219 4220 4221 4222
    for (i = 0; i < def->nhostdevs; i++) {
        virDomainHostdevDefPtr dev = def->hostdevs[i];

        if (dev->mode == VIR_DOMAIN_HOSTDEV_MODE_SUBSYS &&
            dev->source.subsys.type == VIR_DOMAIN_HOSTDEV_SUBSYS_TYPE_PCI &&
            dev->source.subsys.u.pci.backend == VIR_DOMAIN_HOSTDEV_PCI_BACKEND_VFIO)
            return true;
    }

    return false;
}
4223

4224 4225 4226 4227 4228 4229 4230
/**
 * qemuDomainAdjustMaxMemLock:
 * @vm: domain
 *
 * Adjust the memory locking limit for the QEMU process associated to @vm, in
 * order to comply with VFIO or architecture requirements.
 *
4231 4232 4233 4234
 * The limit will not be changed unless doing so is needed; the first time
 * the limit is changed, the original (default) limit is stored in @vm and
 * that value will be restored if qemuDomainAdjustMaxMemLock() is called once
 * memory locking is no longer required.
4235 4236 4237 4238 4239 4240 4241 4242 4243
 *
 * Returns: 0 on success, <0 on failure
 */
int
qemuDomainAdjustMaxMemLock(virDomainObjPtr vm)
{
    unsigned long long bytes = 0;
    int ret = -1;

4244
    if (qemuDomainRequiresMemLock(vm->def)) {
4245 4246 4247 4248 4249 4250 4251 4252
        /* If this is the first time adjusting the limit, save the current
         * value so that we can restore it once memory locking is no longer
         * required. Failing to obtain the current limit is not a critical
         * failure, it just means we'll be unable to lower it later */
        if (!vm->original_memlock) {
            if (virProcessGetMaxMemLock(vm->pid, &(vm->original_memlock)) < 0)
                vm->original_memlock = 0;
        }
4253
        bytes = qemuDomainGetMemLockLimitBytes(vm->def);
4254 4255 4256 4257 4258 4259
    } else {
        /* Once memory locking is no longer required, we can restore the
         * original, usually very low, limit */
        bytes = vm->original_memlock;
        vm->original_memlock = 0;
    }
4260 4261 4262 4263 4264 4265 4266 4267 4268 4269

    /* Trying to set the memory locking limit to zero is a no-op */
    if (virProcessSetMaxMemLock(vm->pid, bytes) < 0)
        goto out;

    ret = 0;

 out:
     return ret;
}
4270 4271 4272 4273 4274 4275 4276 4277 4278 4279 4280 4281 4282 4283

/**
 * qemuDomainHasVcpuPids:
 * @vm: Domain object
 *
 * Returns true if we were able to successfully detect vCPU pids for the VM.
 */
bool
qemuDomainHasVcpuPids(virDomainObjPtr vm)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;

    return priv->nvcpupids > 0;
}
4284 4285 4286 4287 4288 4289 4290 4291 4292 4293 4294 4295 4296 4297 4298 4299 4300 4301 4302 4303


/**
 * qemuDomainGetVcpuPid:
 * @vm: domain object
 * @vcpu: cpu id
 *
 * Returns the vCPU pid. If @vcpu is offline or out of range 0 is returned.
 */
pid_t
qemuDomainGetVcpuPid(virDomainObjPtr vm,
                     unsigned int vcpu)
{
    qemuDomainObjPrivatePtr priv = vm->privateData;

    if (vcpu >= priv->nvcpupids)
        return 0;

    return priv->vcpupids[vcpu];
}
4304 4305 4306 4307 4308 4309 4310 4311 4312 4313


/**
 * qemuDomainDetectVcpuPids:
 * @driver: qemu driver data
 * @vm: domain object
 * @asyncJob: current asynchronous job type
 *
 * Updates vCPU thread ids in the private data of @vm.
 *
4314
 * Returns number of detected vCPU threads on success, -1 on error and reports
4315
 * an appropriate error, -2 if the domain doesn't exist any more.
4316 4317 4318 4319 4320 4321 4322
 */
int
qemuDomainDetectVcpuPids(virQEMUDriverPtr driver,
                         virDomainObjPtr vm,
                         int asyncJob)
{
    pid_t *cpupids = NULL;
4323
    int ncpupids = 0;
4324 4325 4326 4327 4328 4329 4330 4331 4332 4333 4334 4335 4336 4337 4338 4339 4340 4341 4342 4343 4344 4345 4346 4347 4348 4349 4350 4351 4352 4353
    qemuDomainObjPrivatePtr priv = vm->privateData;

    /*
     * Current QEMU *can* report info about host threads mapped
     * to vCPUs, but it is not in a manner we can correctly
     * deal with. The TCG CPU emulation does have a separate vCPU
     * thread, but it runs every vCPU in that same thread. So it
     * is impossible to setup different affinity per thread.
     *
     * What's more the 'query-cpus' command returns bizarre
     * data for the threads. It gives the TCG thread for the
     * vCPU 0, but for vCPUs 1-> N, it actually replies with
     * the main process thread ID.
     *
     * The result is that when we try to set affinity for
     * vCPU 1, it will actually change the affinity of the
     * emulator thread :-( When you try to set affinity for
     * vCPUs 2, 3.... it will fail if the affinity was
     * different from vCPU 1.
     *
     * We *could* allow vcpu pinning with TCG, if we made the
     * restriction that all vCPUs had the same mask. This would
     * at least let us separate emulator from vCPUs threads, as
     * we do for KVM. It would need some changes to our cgroups
     * CPU layout though, and error reporting for the config
     * restrictions.
     *
     * Just disable CPU pinning with TCG until someone wants
     * to try to do this hard work.
     */
4354 4355
    if (vm->def->virtType == VIR_DOMAIN_VIRT_QEMU)
        goto done;
4356 4357 4358 4359

    if (qemuDomainObjEnterMonitorAsync(driver, vm, asyncJob) < 0)
        return -1;
    ncpupids = qemuMonitorGetCPUInfo(priv->mon, &cpupids);
4360 4361
    if (qemuDomainObjExitMonitor(driver, vm) < 0) {
        VIR_FREE(cpupids);
4362
        return -2;
4363 4364
    }
    /* failure to get the VCPU <-> PID mapping or to execute the query
4365 4366 4367 4368
     * command will not be treated fatal as some versions of qemu don't
     * support this command */
    if (ncpupids <= 0) {
        virResetLastError();
4369 4370
        ncpupids = 0;
        goto done;
4371 4372 4373 4374 4375 4376 4377 4378 4379 4380 4381
    }

    if (ncpupids != virDomainDefGetVcpus(vm->def)) {
        virReportError(VIR_ERR_INTERNAL_ERROR,
                       _("got wrong number of vCPU pids from QEMU monitor. "
                         "got %d, wanted %d"),
                       ncpupids, virDomainDefGetVcpus(vm->def));
        VIR_FREE(cpupids);
        return -1;
    }

4382 4383
 done:
    VIR_FREE(priv->vcpupids);
4384 4385
    priv->nvcpupids = ncpupids;
    priv->vcpupids = cpupids;
4386
    return ncpupids;
4387
}