blockdev.c 119.5 KB
Newer Older
1 2 3 4 5 6 7
/*
 * QEMU host block devices
 *
 * Copyright (c) 2003-2008 Fabrice Bellard
 *
 * This work is licensed under the terms of the GNU GPL, version 2 or
 * later.  See the COPYING file in the top-level directory.
8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30
 *
 * This file incorporates work covered by the following copyright and
 * permission notice:
 *
 * Copyright (c) 2003-2008 Fabrice Bellard
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to deal
 * in the Software without restriction, including without limitation the rights
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 * copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 * THE SOFTWARE.
31 32
 */

P
Peter Maydell 已提交
33
#include "qemu/osdep.h"
M
Markus Armbruster 已提交
34
#include "sysemu/block-backend.h"
35
#include "sysemu/blockdev.h"
P
Paolo Bonzini 已提交
36
#include "hw/block/block.h"
37
#include "block/blockjob.h"
38
#include "block/throttle-groups.h"
39
#include "monitor/monitor.h"
40
#include "qemu/error-report.h"
41 42
#include "qemu/option.h"
#include "qemu/config-file.h"
43
#include "qapi/qmp/types.h"
K
Kevin Wolf 已提交
44
#include "qapi-visit.h"
45
#include "qapi/qmp/qerror.h"
46
#include "qapi/qobject-output-visitor.h"
47
#include "qapi/util.h"
48
#include "sysemu/sysemu.h"
49
#include "block/block_int.h"
L
Luiz Capitulino 已提交
50
#include "qmp-commands.h"
S
Stefan Hajnoczi 已提交
51
#include "trace.h"
52
#include "sysemu/arch_init.h"
53 54
#include "qemu/cutils.h"
#include "qemu/help_option.h"
55

56 57 58
static QTAILQ_HEAD(, BlockDriverState) monitor_bdrv_states =
    QTAILQ_HEAD_INITIALIZER(monitor_bdrv_states);

59 60
static int do_open_tray(const char *blk_name, const char *qdev_id,
                        bool force, Error **errp);
61

62 63 64 65 66 67 68 69 70 71 72 73
static const char *const if_name[IF_COUNT] = {
    [IF_NONE] = "none",
    [IF_IDE] = "ide",
    [IF_SCSI] = "scsi",
    [IF_FLOPPY] = "floppy",
    [IF_PFLASH] = "pflash",
    [IF_MTD] = "mtd",
    [IF_SD] = "sd",
    [IF_VIRTIO] = "virtio",
    [IF_XEN] = "xen",
};

74
static int if_max_devs[IF_COUNT] = {
75 76 77 78
    /*
     * Do not change these numbers!  They govern how drive option
     * index maps to unit and bus.  That mapping is ABI.
     *
W
Wei Jiangang 已提交
79
     * All controllers used to implement if=T drives need to support
80 81 82 83 84 85 86 87 88 89 90
     * if_max_devs[T] units, for any T with if_max_devs[T] != 0.
     * Otherwise, some index values map to "impossible" bus, unit
     * values.
     *
     * For instance, if you change [IF_SCSI] to 255, -drive
     * if=scsi,index=12 no longer means bus=1,unit=5, but
     * bus=0,unit=12.  With an lsi53c895a controller (7 units max),
     * the drive can't be set up.  Regression.
     */
    [IF_IDE] = 2,
    [IF_SCSI] = 7,
91 92
};

93 94 95 96 97 98
/**
 * Boards may call this to offer board-by-board overrides
 * of the default, global values.
 */
void override_max_devs(BlockInterfaceType type, int max_devs)
{
99
    BlockBackend *blk;
100 101 102 103 104 105
    DriveInfo *dinfo;

    if (max_devs <= 0) {
        return;
    }

106 107
    for (blk = blk_next(NULL); blk; blk = blk_next(blk)) {
        dinfo = blk_legacy_dinfo(blk);
108 109 110 111 112 113 114 115 116 117 118
        if (dinfo->type == type) {
            fprintf(stderr, "Cannot override units-per-bus property of"
                    " the %s interface, because a drive of that type has"
                    " already been added.\n", if_name[type]);
            g_assert_not_reached();
        }
    }

    if_max_devs[type] = max_devs;
}

119 120 121 122 123 124 125
/*
 * We automatically delete the drive when a device using it gets
 * unplugged.  Questionable feature, but we can't just drop it.
 * Device models call blockdev_mark_auto_del() to schedule the
 * automatic deletion, and generic qdev code calls blockdev_auto_del()
 * when deletion is actually safe.
 */
126
void blockdev_mark_auto_del(BlockBackend *blk)
127
{
128
    DriveInfo *dinfo = blk_legacy_dinfo(blk);
129
    BlockDriverState *bs = blk_bs(blk);
130
    AioContext *aio_context;
131

132
    if (!dinfo) {
133 134 135
        return;
    }

M
Max Reitz 已提交
136 137 138
    if (bs) {
        aio_context = bdrv_get_aio_context(bs);
        aio_context_acquire(aio_context);
139

M
Max Reitz 已提交
140 141 142
        if (bs->job) {
            block_job_cancel(bs->job);
        }
143

M
Max Reitz 已提交
144 145
        aio_context_release(aio_context);
    }
146

147
    dinfo->auto_del = 1;
148 149
}

150
void blockdev_auto_del(BlockBackend *blk)
151
{
152
    DriveInfo *dinfo = blk_legacy_dinfo(blk);
153

154
    if (dinfo && dinfo->auto_del) {
155
        monitor_remove_blk(blk);
156
        blk_unref(blk);
157 158 159
    }
}

160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176
/**
 * Returns the current mapping of how many units per bus
 * a particular interface can support.
 *
 *  A positive integer indicates n units per bus.
 *  0 implies the mapping has not been established.
 * -1 indicates an invalid BlockInterfaceType was given.
 */
int drive_get_max_devs(BlockInterfaceType type)
{
    if (type >= IF_IDE && type < IF_COUNT) {
        return if_max_devs[type];
    }

    return -1;
}

177 178 179 180 181 182 183 184 185 186 187 188
static int drive_index_to_bus_id(BlockInterfaceType type, int index)
{
    int max_devs = if_max_devs[type];
    return max_devs ? index / max_devs : 0;
}

static int drive_index_to_unit_id(BlockInterfaceType type, int index)
{
    int max_devs = if_max_devs[type];
    return max_devs ? index % max_devs : index;
}

189 190
QemuOpts *drive_def(const char *optstr)
{
191
    return qemu_opts_parse_noisily(qemu_find_opts("drive"), optstr, false);
192 193 194
}

QemuOpts *drive_add(BlockInterfaceType type, int index, const char *file,
195
                    const char *optstr)
196 197 198
{
    QemuOpts *opts;

199
    opts = drive_def(optstr);
200 201 202
    if (!opts) {
        return NULL;
    }
203
    if (type != IF_DEFAULT) {
204
        qemu_opt_set(opts, "if", if_name[type], &error_abort);
205 206
    }
    if (index >= 0) {
207
        qemu_opt_set_number(opts, "index", index, &error_abort);
208
    }
209
    if (file)
210
        qemu_opt_set(opts, "file", file, &error_abort);
211 212 213 214 215
    return opts;
}

DriveInfo *drive_get(BlockInterfaceType type, int bus, int unit)
{
216
    BlockBackend *blk;
217 218
    DriveInfo *dinfo;

219 220 221 222
    for (blk = blk_next(NULL); blk; blk = blk_next(blk)) {
        dinfo = blk_legacy_dinfo(blk);
        if (dinfo && dinfo->type == type
            && dinfo->bus == bus && dinfo->unit == unit) {
223
            return dinfo;
224
        }
225 226 227 228 229
    }

    return NULL;
}

J
John Snow 已提交
230 231
bool drive_check_orphaned(void)
{
232
    BlockBackend *blk;
J
John Snow 已提交
233 234 235
    DriveInfo *dinfo;
    bool rs = false;

236 237
    for (blk = blk_next(NULL); blk; blk = blk_next(blk)) {
        dinfo = blk_legacy_dinfo(blk);
J
John Snow 已提交
238 239
        /* If dinfo->bdrv->dev is NULL, it has no device attached. */
        /* Unless this is a default drive, this may be an oversight. */
240
        if (!blk_get_attached_dev(blk) && !dinfo->is_default &&
J
John Snow 已提交
241 242 243
            dinfo->type != IF_NONE) {
            fprintf(stderr, "Warning: Orphaned drive without device: "
                    "id=%s,file=%s,if=%s,bus=%d,unit=%d\n",
M
Max Reitz 已提交
244 245
                    blk_name(blk), blk_bs(blk) ? blk_bs(blk)->filename : "",
                    if_name[dinfo->type], dinfo->bus, dinfo->unit);
J
John Snow 已提交
246 247 248 249 250 251 252
            rs = true;
        }
    }

    return rs;
}

253 254 255 256 257 258 259
DriveInfo *drive_get_by_index(BlockInterfaceType type, int index)
{
    return drive_get(type,
                     drive_index_to_bus_id(type, index),
                     drive_index_to_unit_id(type, index));
}

260 261 262
int drive_get_max_bus(BlockInterfaceType type)
{
    int max_bus;
263
    BlockBackend *blk;
264 265 266
    DriveInfo *dinfo;

    max_bus = -1;
267 268 269
    for (blk = blk_next(NULL); blk; blk = blk_next(blk)) {
        dinfo = blk_legacy_dinfo(blk);
        if (dinfo && dinfo->type == type && dinfo->bus > max_bus) {
270
            max_bus = dinfo->bus;
271
        }
272 273 274 275
    }
    return max_bus;
}

276 277 278 279 280 281 282 283 284 285
/* Get a block device.  This should only be used for single-drive devices
   (e.g. SD/Floppy/MTD).  Multi-disk devices (scsi/ide) should use the
   appropriate bus.  */
DriveInfo *drive_get_next(BlockInterfaceType type)
{
    static int next_block_unit[IF_COUNT];

    return drive_get(type, 0, next_block_unit[type]++);
}

286 287
static void bdrv_format_print(void *opaque, const char *name)
{
288
    error_printf(" %s", name);
289 290
}

291 292
typedef struct {
    QEMUBH *bh;
F
Fam Zheng 已提交
293 294
    BlockDriverState *bs;
} BDRVPutRefBH;
295

296
static int parse_block_error_action(const char *buf, bool is_read, Error **errp)
297 298
{
    if (!strcmp(buf, "ignore")) {
299
        return BLOCKDEV_ON_ERROR_IGNORE;
300
    } else if (!is_read && !strcmp(buf, "enospc")) {
301
        return BLOCKDEV_ON_ERROR_ENOSPC;
302
    } else if (!strcmp(buf, "stop")) {
303
        return BLOCKDEV_ON_ERROR_STOP;
304
    } else if (!strcmp(buf, "report")) {
305
        return BLOCKDEV_ON_ERROR_REPORT;
306
    } else {
307 308
        error_setg(errp, "'%s' invalid %s error action",
                   buf, is_read ? "read" : "write");
309 310 311 312
        return -1;
    }
}

313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351
static bool parse_stats_intervals(BlockAcctStats *stats, QList *intervals,
                                  Error **errp)
{
    const QListEntry *entry;
    for (entry = qlist_first(intervals); entry; entry = qlist_next(entry)) {
        switch (qobject_type(entry->value)) {

        case QTYPE_QSTRING: {
            unsigned long long length;
            const char *str = qstring_get_str(qobject_to_qstring(entry->value));
            if (parse_uint_full(str, &length, 10) == 0 &&
                length > 0 && length <= UINT_MAX) {
                block_acct_add_interval(stats, (unsigned) length);
            } else {
                error_setg(errp, "Invalid interval length: %s", str);
                return false;
            }
            break;
        }

        case QTYPE_QINT: {
            int64_t length = qint_get_int(qobject_to_qint(entry->value));
            if (length > 0 && length <= UINT_MAX) {
                block_acct_add_interval(stats, (unsigned) length);
            } else {
                error_setg(errp, "Invalid interval length: %" PRId64, length);
                return false;
            }
            break;
        }

        default:
            error_setg(errp, "The specification of stats-intervals is invalid");
            return false;
        }
    }
    return true;
}

352 353
typedef enum { MEDIA_DISK, MEDIA_CDROM } DriveMediaType;

354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384
/* All parameters but @opts are optional and may be set to NULL. */
static void extract_common_blockdev_options(QemuOpts *opts, int *bdrv_flags,
    const char **throttling_group, ThrottleConfig *throttle_cfg,
    BlockdevDetectZeroesOptions *detect_zeroes, Error **errp)
{
    Error *local_error = NULL;
    const char *aio;

    if (bdrv_flags) {
        if (qemu_opt_get_bool(opts, "copy-on-read", false)) {
            *bdrv_flags |= BDRV_O_COPY_ON_READ;
        }

        if ((aio = qemu_opt_get(opts, "aio")) != NULL) {
            if (!strcmp(aio, "native")) {
                *bdrv_flags |= BDRV_O_NATIVE_AIO;
            } else if (!strcmp(aio, "threads")) {
                /* this is the default */
            } else {
               error_setg(errp, "invalid aio option");
               return;
            }
        }
    }

    /* disk I/O throttling */
    if (throttling_group) {
        *throttling_group = qemu_opt_get(opts, "throttling.group");
    }

    if (throttle_cfg) {
385
        throttle_config_init(throttle_cfg);
386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411
        throttle_cfg->buckets[THROTTLE_BPS_TOTAL].avg =
            qemu_opt_get_number(opts, "throttling.bps-total", 0);
        throttle_cfg->buckets[THROTTLE_BPS_READ].avg  =
            qemu_opt_get_number(opts, "throttling.bps-read", 0);
        throttle_cfg->buckets[THROTTLE_BPS_WRITE].avg =
            qemu_opt_get_number(opts, "throttling.bps-write", 0);
        throttle_cfg->buckets[THROTTLE_OPS_TOTAL].avg =
            qemu_opt_get_number(opts, "throttling.iops-total", 0);
        throttle_cfg->buckets[THROTTLE_OPS_READ].avg =
            qemu_opt_get_number(opts, "throttling.iops-read", 0);
        throttle_cfg->buckets[THROTTLE_OPS_WRITE].avg =
            qemu_opt_get_number(opts, "throttling.iops-write", 0);

        throttle_cfg->buckets[THROTTLE_BPS_TOTAL].max =
            qemu_opt_get_number(opts, "throttling.bps-total-max", 0);
        throttle_cfg->buckets[THROTTLE_BPS_READ].max  =
            qemu_opt_get_number(opts, "throttling.bps-read-max", 0);
        throttle_cfg->buckets[THROTTLE_BPS_WRITE].max =
            qemu_opt_get_number(opts, "throttling.bps-write-max", 0);
        throttle_cfg->buckets[THROTTLE_OPS_TOTAL].max =
            qemu_opt_get_number(opts, "throttling.iops-total-max", 0);
        throttle_cfg->buckets[THROTTLE_OPS_READ].max =
            qemu_opt_get_number(opts, "throttling.iops-read-max", 0);
        throttle_cfg->buckets[THROTTLE_OPS_WRITE].max =
            qemu_opt_get_number(opts, "throttling.iops-write-max", 0);

412 413 414 415 416 417 418 419 420 421 422 423 424
        throttle_cfg->buckets[THROTTLE_BPS_TOTAL].burst_length =
            qemu_opt_get_number(opts, "throttling.bps-total-max-length", 1);
        throttle_cfg->buckets[THROTTLE_BPS_READ].burst_length  =
            qemu_opt_get_number(opts, "throttling.bps-read-max-length", 1);
        throttle_cfg->buckets[THROTTLE_BPS_WRITE].burst_length =
            qemu_opt_get_number(opts, "throttling.bps-write-max-length", 1);
        throttle_cfg->buckets[THROTTLE_OPS_TOTAL].burst_length =
            qemu_opt_get_number(opts, "throttling.iops-total-max-length", 1);
        throttle_cfg->buckets[THROTTLE_OPS_READ].burst_length =
            qemu_opt_get_number(opts, "throttling.iops-read-max-length", 1);
        throttle_cfg->buckets[THROTTLE_OPS_WRITE].burst_length =
            qemu_opt_get_number(opts, "throttling.iops-write-max-length", 1);

425 426 427
        throttle_cfg->op_size =
            qemu_opt_get_number(opts, "throttling.iops-size", 0);

428
        if (!throttle_is_valid(throttle_cfg, errp)) {
429 430 431 432 433 434 435 436
            return;
        }
    }

    if (detect_zeroes) {
        *detect_zeroes =
            qapi_enum_parse(BlockdevDetectZeroesOptions_lookup,
                            qemu_opt_get(opts, "detect-zeroes"),
437
                            BLOCKDEV_DETECT_ZEROES_OPTIONS__MAX,
438 439 440 441 442 443 444 445 446
                            BLOCKDEV_DETECT_ZEROES_OPTIONS_OFF,
                            &local_error);
        if (local_error) {
            error_propagate(errp, local_error);
            return;
        }
    }
}

447
/* Takes the ownership of bs_opts */
448 449
static BlockBackend *blockdev_init(const char *file, QDict *bs_opts,
                                   Error **errp)
450 451 452 453
{
    const char *buf;
    int bdrv_flags = 0;
    int on_read_error, on_write_error;
454
    bool account_invalid, account_failed;
455
    bool writethrough, read_only;
M
Markus Armbruster 已提交
456
    BlockBackend *blk;
457
    BlockDriverState *bs;
458
    ThrottleConfig cfg;
459
    int snapshot = 0;
460
    Error *error = NULL;
461
    QemuOpts *opts;
462 463
    QDict *interval_dict = NULL;
    QList *interval_list = NULL;
464
    const char *id;
465 466 467
    BlockdevDetectZeroesOptions detect_zeroes =
        BLOCKDEV_DETECT_ZEROES_OPTIONS_OFF;
    const char *throttling_group = NULL;
468

469 470 471
    /* Check common options by copying from bs_opts to opts, all other options
     * stay in bs_opts for processing by bdrv_open(). */
    id = qdict_get_try_str(bs_opts, "id");
472
    opts = qemu_opts_create(&qemu_common_drive_opts, id, 1, &error);
473
    if (error) {
474
        error_propagate(errp, error);
475
        goto err_no_opts;
476 477 478
    }

    qemu_opts_absorb_qdict(opts, bs_opts, &error);
479
    if (error) {
480
        error_propagate(errp, error);
481
        goto early_err;
482 483 484 485 486 487
    }

    if (id) {
        qdict_del(bs_opts, "id");
    }

488 489 490
    /* extract parameters */
    snapshot = qemu_opt_get_bool(opts, "snapshot", 0);

491 492 493
    account_invalid = qemu_opt_get_bool(opts, "stats-account-invalid", true);
    account_failed = qemu_opt_get_bool(opts, "stats-account-failed", true);

494 495
    writethrough = !qemu_opt_get_bool(opts, BDRV_OPT_CACHE_WB, true);

496 497
    id = qemu_opts_id(opts);

498 499 500 501 502 503 504 505
    qdict_extract_subqdict(bs_opts, &interval_dict, "stats-intervals.");
    qdict_array_split(interval_dict, &interval_list);

    if (qdict_size(interval_dict) != 0) {
        error_setg(errp, "Invalid option stats-intervals.%s",
                   qdict_first(interval_dict)->key);
        goto early_err;
    }
506

507 508 509 510 511
    extract_common_blockdev_options(opts, &bdrv_flags, &throttling_group, &cfg,
                                    &detect_zeroes, &error);
    if (error) {
        error_propagate(errp, error);
        goto early_err;
512 513 514
    }

    if ((buf = qemu_opt_get(opts, "format")) != NULL) {
515 516 517 518
        if (is_help_option(buf)) {
            error_printf("Supported formats:");
            bdrv_iterate_format(bdrv_format_print, NULL);
            error_printf("\n");
519
            goto early_err;
520
        }
521

522 523
        if (qdict_haskey(bs_opts, "driver")) {
            error_setg(errp, "Cannot specify both 'driver' and 'format'");
524
            goto early_err;
525
        }
526
        qdict_put(bs_opts, "driver", qstring_from_str(buf));
527 528
    }

529
    on_write_error = BLOCKDEV_ON_ERROR_ENOSPC;
530
    if ((buf = qemu_opt_get(opts, "werror")) != NULL) {
531
        on_write_error = parse_block_error_action(buf, 0, &error);
532
        if (error) {
533
            error_propagate(errp, error);
534
            goto early_err;
535 536 537
        }
    }

538
    on_read_error = BLOCKDEV_ON_ERROR_REPORT;
539
    if ((buf = qemu_opt_get(opts, "rerror")) != NULL) {
540
        on_read_error = parse_block_error_action(buf, 1, &error);
541
        if (error) {
542
            error_propagate(errp, error);
543
            goto early_err;
544 545 546
        }
    }

547
    if (snapshot) {
548
        bdrv_flags |= BDRV_O_SNAPSHOT;
549 550
    }

551 552
    read_only = qemu_opt_get_bool(opts, BDRV_OPT_READ_ONLY, false);

553
    /* init */
554
    if ((!file || !*file) && !qdict_size(bs_opts)) {
555 556
        BlockBackendRootState *blk_rs;

557
        blk = blk_new();
558 559
        blk_rs = blk_get_root_state(blk);
        blk_rs->open_flags    = bdrv_flags;
560
        blk_rs->read_only     = read_only;
561 562
        blk_rs->detect_zeroes = detect_zeroes;

563 564 565
        QDECREF(bs_opts);
    } else {
        if (file && !*file) {
566 567
            file = NULL;
        }
568

569 570 571 572 573
        /* bdrv_open() defaults to the values in bdrv_flags (for compatibility
         * with other callers) rather than what we want as the real defaults.
         * Apply the defaults here instead. */
        qdict_set_default_str(bs_opts, BDRV_OPT_CACHE_DIRECT, "off");
        qdict_set_default_str(bs_opts, BDRV_OPT_CACHE_NO_FLUSH, "off");
574 575
        qdict_set_default_str(bs_opts, BDRV_OPT_READ_ONLY,
                              read_only ? "on" : "off");
576
        assert((bdrv_flags & BDRV_O_CACHE_MASK) == 0);
577

578 579 580 581
        if (runstate_check(RUN_STATE_INMIGRATE)) {
            bdrv_flags |= BDRV_O_INACTIVE;
        }

582
        blk = blk_new_open(file, NULL, bs_opts, bdrv_flags, errp);
583 584 585 586
        if (!blk) {
            goto err_no_bs_opts;
        }
        bs = blk_bs(blk);
587

588
        bs->detect_zeroes = detect_zeroes;
589

590 591
        if (bdrv_key_required(bs)) {
            autostart = 0;
592
        }
593 594

        block_acct_init(blk_get_stats(blk), account_invalid, account_failed);
595

596 597 598 599
        if (!parse_stats_intervals(blk_get_stats(blk), interval_list, errp)) {
            blk_unref(blk);
            blk = NULL;
            goto err_no_bs_opts;
600
        }
601 602
    }

603 604 605
    /* disk I/O throttling */
    if (throttle_enabled(&cfg)) {
        if (!throttling_group) {
606
            throttling_group = id;
607 608 609 610 611
        }
        blk_io_limits_enable(blk, throttling_group);
        blk_set_io_limits(blk, &cfg);
    }

612
    blk_set_enable_write_cache(blk, !writethrough);
613
    blk_set_on_error(blk, on_read_error, on_write_error);
614

615
    if (!monitor_add_blk(blk, id, errp)) {
616 617 618 619 620
        blk_unref(blk);
        blk = NULL;
        goto err_no_bs_opts;
    }

621
err_no_bs_opts:
622
    qemu_opts_del(opts);
623 624
    QDECREF(interval_dict);
    QDECREF(interval_list);
625
    return blk;
626

627 628
early_err:
    qemu_opts_del(opts);
629 630
    QDECREF(interval_dict);
    QDECREF(interval_list);
631 632
err_no_opts:
    QDECREF(bs_opts);
633
    return NULL;
634 635
}

636 637 638 639 640
/* Takes the ownership of bs_opts */
static BlockDriverState *bds_tree_init(QDict *bs_opts, Error **errp)
{
    int bdrv_flags = 0;

641 642 643 644 645
    /* bdrv_open() defaults to the values in bdrv_flags (for compatibility
     * with other callers) rather than what we want as the real defaults.
     * Apply the defaults here instead. */
    qdict_set_default_str(bs_opts, BDRV_OPT_CACHE_DIRECT, "off");
    qdict_set_default_str(bs_opts, BDRV_OPT_CACHE_NO_FLUSH, "off");
646
    qdict_set_default_str(bs_opts, BDRV_OPT_READ_ONLY, "off");
647

648 649 650 651
    if (runstate_check(RUN_STATE_INMIGRATE)) {
        bdrv_flags |= BDRV_O_INACTIVE;
    }

K
Kevin Wolf 已提交
652
    return bdrv_open(NULL, NULL, bs_opts, bdrv_flags, errp);
653 654
}

655 656 657 658 659 660 661 662 663 664 665 666 667
void blockdev_close_all_bdrv_states(void)
{
    BlockDriverState *bs, *next_bs;

    QTAILQ_FOREACH_SAFE(bs, &monitor_bdrv_states, monitor_list, next_bs) {
        AioContext *ctx = bdrv_get_aio_context(bs);

        aio_context_acquire(ctx);
        bdrv_unref(bs);
        aio_context_release(ctx);
    }
}

M
Max Reitz 已提交
668 669 670 671 672 673 674
/* Iterates over the list of monitor-owned BlockDriverStates */
BlockDriverState *bdrv_next_monitor_owned(BlockDriverState *bs)
{
    return bs ? QTAILQ_NEXT(bs, monitor_list)
              : QTAILQ_FIRST(&monitor_bdrv_states);
}

675 676
static void qemu_opt_rename(QemuOpts *opts, const char *from, const char *to,
                            Error **errp)
677 678 679 680 681
{
    const char *value;

    value = qemu_opt_get(opts, from);
    if (value) {
682 683 684 685 686
        if (qemu_opt_find(opts, to)) {
            error_setg(errp, "'%s' and its alias '%s' can't be used at the "
                       "same time", to, from);
            return;
        }
687 688 689 690
    }

    /* rename all items in opts */
    while ((value = qemu_opt_get(opts, from))) {
691
        qemu_opt_set(opts, to, value, &error_abort);
692 693 694 695
        qemu_opt_unset(opts, from);
    }
}

696 697 698 699 700
QemuOptsList qemu_legacy_drive_opts = {
    .name = "drive",
    .head = QTAILQ_HEAD_INITIALIZER(qemu_legacy_drive_opts.head),
    .desc = {
        {
701 702 703 704 705 706 707 708 709 710 711 712
            .name = "bus",
            .type = QEMU_OPT_NUMBER,
            .help = "bus number",
        },{
            .name = "unit",
            .type = QEMU_OPT_NUMBER,
            .help = "unit number (i.e. lun for scsi)",
        },{
            .name = "index",
            .type = QEMU_OPT_NUMBER,
            .help = "index number",
        },{
713 714 715
            .name = "media",
            .type = QEMU_OPT_STRING,
            .help = "media type (disk, cdrom)",
716 717 718 719
        },{
            .name = "if",
            .type = QEMU_OPT_STRING,
            .help = "interface (ide, scsi, sd, mtd, floppy, pflash, virtio)",
720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735
        },{
            .name = "cyls",
            .type = QEMU_OPT_NUMBER,
            .help = "number of cylinders (ide disk geometry)",
        },{
            .name = "heads",
            .type = QEMU_OPT_NUMBER,
            .help = "number of heads (ide disk geometry)",
        },{
            .name = "secs",
            .type = QEMU_OPT_NUMBER,
            .help = "number of sectors (ide disk geometry)",
        },{
            .name = "trans",
            .type = QEMU_OPT_STRING,
            .help = "chs translation (auto, lba, none)",
736 737 738 739
        },{
            .name = "boot",
            .type = QEMU_OPT_BOOL,
            .help = "(deprecated, ignored)",
740 741 742 743
        },{
            .name = "addr",
            .type = QEMU_OPT_STRING,
            .help = "pci address (virtio only)",
744 745 746 747
        },{
            .name = "serial",
            .type = QEMU_OPT_STRING,
            .help = "disk serial number",
M
Max Reitz 已提交
748 749 750 751
        },{
            .name = "file",
            .type = QEMU_OPT_STRING,
            .help = "file name",
752
        },
753 754 755

        /* Options that are passed on, but have special semantics with -drive */
        {
756
            .name = BDRV_OPT_READ_ONLY,
757 758
            .type = QEMU_OPT_BOOL,
            .help = "open drive file as read-only",
759 760 761 762 763 764 765 766
        },{
            .name = "rerror",
            .type = QEMU_OPT_STRING,
            .help = "read error action",
        },{
            .name = "werror",
            .type = QEMU_OPT_STRING,
            .help = "write error action",
767 768 769 770 771 772
        },{
            .name = "copy-on-read",
            .type = QEMU_OPT_BOOL,
            .help = "copy read data from backing file into image file",
        },

773 774 775 776
        { /* end of list */ }
    },
};

777
DriveInfo *drive_new(QemuOpts *all_opts, BlockInterfaceType block_default_type)
778
{
K
Kevin Wolf 已提交
779
    const char *value;
780
    BlockBackend *blk;
781
    DriveInfo *dinfo = NULL;
782
    QDict *bs_opts;
783 784
    QemuOpts *legacy_opts;
    DriveMediaType media = MEDIA_DISK;
785
    BlockInterfaceType type;
786
    int cyls, heads, secs, translation;
787
    int max_devs, bus_id, unit_id, index;
788
    const char *devaddr;
789
    const char *werror, *rerror;
F
Fam Zheng 已提交
790 791
    bool read_only = false;
    bool copy_on_read;
792
    const char *serial;
M
Max Reitz 已提交
793
    const char *filename;
794
    Error *local_err = NULL;
795
    int i;
K
Kevin Wolf 已提交
796

797
    /* Change legacy command line options into QMP ones */
798 799 800 801 802 803 804
    static const struct {
        const char *from;
        const char *to;
    } opt_renames[] = {
        { "iops",           "throttling.iops-total" },
        { "iops_rd",        "throttling.iops-read" },
        { "iops_wr",        "throttling.iops-write" },
805

806 807 808
        { "bps",            "throttling.bps-total" },
        { "bps_rd",         "throttling.bps-read" },
        { "bps_wr",         "throttling.bps-write" },
809

810 811 812
        { "iops_max",       "throttling.iops-total-max" },
        { "iops_rd_max",    "throttling.iops-read-max" },
        { "iops_wr_max",    "throttling.iops-write-max" },
813

814 815 816
        { "bps_max",        "throttling.bps-total-max" },
        { "bps_rd_max",     "throttling.bps-read-max" },
        { "bps_wr_max",     "throttling.bps-write-max" },
817

818
        { "iops_size",      "throttling.iops-size" },
819

820 821
        { "group",          "throttling.group" },

822
        { "readonly",       BDRV_OPT_READ_ONLY },
823 824 825
    };

    for (i = 0; i < ARRAY_SIZE(opt_renames); i++) {
826 827 828
        qemu_opt_rename(all_opts, opt_renames[i].from, opt_renames[i].to,
                        &local_err);
        if (local_err) {
829
            error_report_err(local_err);
830 831
            return NULL;
        }
832
    }
833

K
Kevin Wolf 已提交
834 835 836
    value = qemu_opt_get(all_opts, "cache");
    if (value) {
        int flags = 0;
837
        bool writethrough;
K
Kevin Wolf 已提交
838

839
        if (bdrv_parse_cache_mode(value, &flags, &writethrough) != 0) {
K
Kevin Wolf 已提交
840 841 842 843 844
            error_report("invalid cache option");
            return NULL;
        }

        /* Specific options take precedence */
845 846
        if (!qemu_opt_get(all_opts, BDRV_OPT_CACHE_WB)) {
            qemu_opt_set_bool(all_opts, BDRV_OPT_CACHE_WB,
847
                              !writethrough, &error_abort);
K
Kevin Wolf 已提交
848
        }
849 850
        if (!qemu_opt_get(all_opts, BDRV_OPT_CACHE_DIRECT)) {
            qemu_opt_set_bool(all_opts, BDRV_OPT_CACHE_DIRECT,
851
                              !!(flags & BDRV_O_NOCACHE), &error_abort);
K
Kevin Wolf 已提交
852
        }
853 854
        if (!qemu_opt_get(all_opts, BDRV_OPT_CACHE_NO_FLUSH)) {
            qemu_opt_set_bool(all_opts, BDRV_OPT_CACHE_NO_FLUSH,
855
                              !!(flags & BDRV_O_NO_FLUSH), &error_abort);
K
Kevin Wolf 已提交
856 857 858 859
        }
        qemu_opt_unset(all_opts, "cache");
    }

860 861 862 863
    /* Get a QDict for processing the options */
    bs_opts = qdict_new();
    qemu_opts_to_qdict(all_opts, bs_opts);

864 865
    legacy_opts = qemu_opts_create(&qemu_legacy_drive_opts, NULL, 0,
                                   &error_abort);
866
    qemu_opts_absorb_qdict(legacy_opts, bs_opts, &local_err);
867
    if (local_err) {
868
        error_report_err(local_err);
869 870 871
        goto fail;
    }

872 873 874 875 876 877 878
    /* Deprecated option boot=[on|off] */
    if (qemu_opt_get(legacy_opts, "boot") != NULL) {
        fprintf(stderr, "qemu-kvm: boot=on|off is deprecated and will be "
                "ignored. Future versions will reject this parameter. Please "
                "update your scripts.\n");
    }

879 880 881 882 883 884 885
    /* Media type */
    value = qemu_opt_get(legacy_opts, "media");
    if (value) {
        if (!strcmp(value, "disk")) {
            media = MEDIA_DISK;
        } else if (!strcmp(value, "cdrom")) {
            media = MEDIA_CDROM;
F
Fam Zheng 已提交
886
            read_only = true;
887 888 889 890 891 892
        } else {
            error_report("'%s' invalid media", value);
            goto fail;
        }
    }

893
    /* copy-on-read is disabled with a warning for read-only devices */
894
    read_only |= qemu_opt_get_bool(legacy_opts, BDRV_OPT_READ_ONLY, false);
895 896 897 898 899 900 901
    copy_on_read = qemu_opt_get_bool(legacy_opts, "copy-on-read", false);

    if (read_only && copy_on_read) {
        error_report("warning: disabling copy-on-read on read-only drive");
        copy_on_read = false;
    }

902
    qdict_put(bs_opts, BDRV_OPT_READ_ONLY,
903 904 905 906
              qstring_from_str(read_only ? "on" : "off"));
    qdict_put(bs_opts, "copy-on-read",
              qstring_from_str(copy_on_read ? "on" :"off"));

907 908 909 910 911 912 913 914 915 916 917 918 919 920 921
    /* Controller type */
    value = qemu_opt_get(legacy_opts, "if");
    if (value) {
        for (type = 0;
             type < IF_COUNT && strcmp(value, if_name[type]);
             type++) {
        }
        if (type == IF_COUNT) {
            error_report("unsupported bus type '%s'", value);
            goto fail;
        }
    } else {
        type = block_default_type;
    }

922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938 939 940 941 942 943 944 945 946 947 948 949 950 951 952 953
    /* Geometry */
    cyls  = qemu_opt_get_number(legacy_opts, "cyls", 0);
    heads = qemu_opt_get_number(legacy_opts, "heads", 0);
    secs  = qemu_opt_get_number(legacy_opts, "secs", 0);

    if (cyls || heads || secs) {
        if (cyls < 1) {
            error_report("invalid physical cyls number");
            goto fail;
        }
        if (heads < 1) {
            error_report("invalid physical heads number");
            goto fail;
        }
        if (secs < 1) {
            error_report("invalid physical secs number");
            goto fail;
        }
    }

    translation = BIOS_ATA_TRANSLATION_AUTO;
    value = qemu_opt_get(legacy_opts, "trans");
    if (value != NULL) {
        if (!cyls) {
            error_report("'%s' trans must be used with cyls, heads and secs",
                         value);
            goto fail;
        }
        if (!strcmp(value, "none")) {
            translation = BIOS_ATA_TRANSLATION_NONE;
        } else if (!strcmp(value, "lba")) {
            translation = BIOS_ATA_TRANSLATION_LBA;
954 955 956 957
        } else if (!strcmp(value, "large")) {
            translation = BIOS_ATA_TRANSLATION_LARGE;
        } else if (!strcmp(value, "rechs")) {
            translation = BIOS_ATA_TRANSLATION_RECHS;
958 959 960 961 962 963 964 965 966 967 968 969 970 971 972
        } else if (!strcmp(value, "auto")) {
            translation = BIOS_ATA_TRANSLATION_AUTO;
        } else {
            error_report("'%s' invalid translation type", value);
            goto fail;
        }
    }

    if (media == MEDIA_CDROM) {
        if (cyls || secs || heads) {
            error_report("CHS can't be set with media=cdrom");
            goto fail;
        }
    }

973 974 975 976 977 978 979 980 981 982 983 984 985 986 987 988 989 990 991 992 993 994 995 996 997 998 999 1000 1001 1002 1003 1004 1005 1006 1007 1008 1009 1010 1011
    /* Device address specified by bus/unit or index.
     * If none was specified, try to find the first free one. */
    bus_id  = qemu_opt_get_number(legacy_opts, "bus", 0);
    unit_id = qemu_opt_get_number(legacy_opts, "unit", -1);
    index   = qemu_opt_get_number(legacy_opts, "index", -1);

    max_devs = if_max_devs[type];

    if (index != -1) {
        if (bus_id != 0 || unit_id != -1) {
            error_report("index cannot be used with bus and unit");
            goto fail;
        }
        bus_id = drive_index_to_bus_id(type, index);
        unit_id = drive_index_to_unit_id(type, index);
    }

    if (unit_id == -1) {
       unit_id = 0;
       while (drive_get(type, bus_id, unit_id) != NULL) {
           unit_id++;
           if (max_devs && unit_id >= max_devs) {
               unit_id -= max_devs;
               bus_id++;
           }
       }
    }

    if (max_devs && unit_id >= max_devs) {
        error_report("unit %d too big (max is %d)", unit_id, max_devs - 1);
        goto fail;
    }

    if (drive_get(type, bus_id, unit_id) != NULL) {
        error_report("drive with bus=%d, unit=%d (index=%d) exists",
                     bus_id, unit_id, index);
        goto fail;
    }

1012 1013 1014
    /* Serial number */
    serial = qemu_opt_get(legacy_opts, "serial");

1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026 1027 1028 1029 1030 1031 1032
    /* no id supplied -> create one */
    if (qemu_opts_id(all_opts) == NULL) {
        char *new_id;
        const char *mediastr = "";
        if (type == IF_IDE || type == IF_SCSI) {
            mediastr = (media == MEDIA_CDROM) ? "-cd" : "-hd";
        }
        if (max_devs) {
            new_id = g_strdup_printf("%s%i%s%i", if_name[type], bus_id,
                                     mediastr, unit_id);
        } else {
            new_id = g_strdup_printf("%s%s%i", if_name[type],
                                     mediastr, unit_id);
        }
        qdict_put(bs_opts, "id", qstring_from_str(new_id));
        g_free(new_id);
    }

1033 1034 1035 1036 1037 1038 1039 1040 1041
    /* Add virtio block device */
    devaddr = qemu_opt_get(legacy_opts, "addr");
    if (devaddr && type != IF_VIRTIO) {
        error_report("addr is not supported by this bus type");
        goto fail;
    }

    if (type == IF_VIRTIO) {
        QemuOpts *devopts;
1042 1043
        devopts = qemu_opts_create(qemu_find_opts("device"), NULL, 0,
                                   &error_abort);
1044
        if (arch_type == QEMU_ARCH_S390X) {
1045
            qemu_opt_set(devopts, "driver", "virtio-blk-ccw", &error_abort);
1046
        } else {
1047
            qemu_opt_set(devopts, "driver", "virtio-blk-pci", &error_abort);
1048
        }
1049 1050
        qemu_opt_set(devopts, "drive", qdict_get_str(bs_opts, "id"),
                     &error_abort);
1051
        if (devaddr) {
1052
            qemu_opt_set(devopts, "addr", devaddr, &error_abort);
1053 1054 1055
        }
    }

M
Max Reitz 已提交
1056 1057
    filename = qemu_opt_get(legacy_opts, "file");

1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073 1074 1075 1076 1077 1078
    /* Check werror/rerror compatibility with if=... */
    werror = qemu_opt_get(legacy_opts, "werror");
    if (werror != NULL) {
        if (type != IF_IDE && type != IF_SCSI && type != IF_VIRTIO &&
            type != IF_NONE) {
            error_report("werror is not supported by this bus type");
            goto fail;
        }
        qdict_put(bs_opts, "werror", qstring_from_str(werror));
    }

    rerror = qemu_opt_get(legacy_opts, "rerror");
    if (rerror != NULL) {
        if (type != IF_IDE && type != IF_VIRTIO && type != IF_SCSI &&
            type != IF_NONE) {
            error_report("rerror is not supported by this bus type");
            goto fail;
        }
        qdict_put(bs_opts, "rerror", qstring_from_str(rerror));
    }

1079
    /* Actual block device init: Functionality shared with blockdev-add */
1080
    blk = blockdev_init(filename, bs_opts, &local_err);
1081
    bs_opts = NULL;
1082
    if (!blk) {
1083
        if (local_err) {
1084
            error_report_err(local_err);
1085
        }
1086
        goto fail;
1087
    } else {
1088
        assert(!local_err);
1089 1090
    }

1091 1092
    /* Create legacy DriveInfo */
    dinfo = g_malloc0(sizeof(*dinfo));
1093
    dinfo->opts = all_opts;
1094

1095 1096 1097 1098 1099
    dinfo->cyls = cyls;
    dinfo->heads = heads;
    dinfo->secs = secs;
    dinfo->trans = translation;

1100
    dinfo->type = type;
1101 1102
    dinfo->bus = bus_id;
    dinfo->unit = unit_id;
1103
    dinfo->devaddr = devaddr;
1104 1105
    dinfo->serial = g_strdup(serial);

1106 1107
    blk_set_legacy_dinfo(blk, dinfo);

1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118
    switch(type) {
    case IF_IDE:
    case IF_SCSI:
    case IF_XEN:
    case IF_NONE:
        dinfo->media_cd = media == MEDIA_CDROM;
        break;
    default:
        break;
    }

1119
fail:
1120
    qemu_opts_del(legacy_opts);
1121
    QDECREF(bs_opts);
1122
    return dinfo;
1123 1124
}

1125 1126 1127 1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 1144 1145 1146
static BlockDriverState *qmp_get_root_bs(const char *name, Error **errp)
{
    BlockDriverState *bs;

    bs = bdrv_lookup_bs(name, name, errp);
    if (bs == NULL) {
        return NULL;
    }

    if (!bdrv_is_root_node(bs)) {
        error_setg(errp, "Need a root block node");
        return NULL;
    }

    if (!bdrv_is_inserted(bs)) {
        error_setg(errp, "Device has no medium");
        return NULL;
    }

    return bs;
}

1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168 1169
static BlockBackend *qmp_get_blk(const char *blk_name, const char *qdev_id,
                                 Error **errp)
{
    BlockBackend *blk;

    if (!blk_name == !qdev_id) {
        error_setg(errp, "Need exactly one of 'device' and 'id'");
        return NULL;
    }

    if (qdev_id) {
        blk = blk_by_qdev_id(qdev_id, errp);
    } else {
        blk = blk_by_name(blk_name);
        if (blk == NULL) {
            error_set(errp, ERROR_CLASS_DEVICE_NOT_FOUND,
                      "Device '%s' not found", blk_name);
        }
    }

    return blk;
}

1170
void hmp_commit(Monitor *mon, const QDict *qdict)
1171 1172
{
    const char *device = qdict_get_str(qdict, "device");
1173
    BlockBackend *blk;
1174
    int ret;
1175

1176
    if (!strcmp(device, "all")) {
1177
        ret = blk_commit_all();
1178
    } else {
1179 1180 1181
        BlockDriverState *bs;
        AioContext *aio_context;

1182 1183
        blk = blk_by_name(device);
        if (!blk) {
1184
            monitor_printf(mon, "Device '%s' not found\n", device);
1185
            return;
1186
        }
M
Max Reitz 已提交
1187 1188 1189 1190
        if (!blk_is_available(blk)) {
            monitor_printf(mon, "Device '%s' has no medium\n", device);
            return;
        }
1191 1192 1193 1194 1195 1196 1197 1198

        bs = blk_bs(blk);
        aio_context = bdrv_get_aio_context(bs);
        aio_context_acquire(aio_context);

        ret = bdrv_commit(bs);

        aio_context_release(aio_context);
1199 1200 1201 1202
    }
    if (ret < 0) {
        monitor_printf(mon, "'commit' error for '%s': %s\n", device,
                       strerror(-ret));
1203 1204 1205
    }
}

1206
static void blockdev_do_action(TransactionAction *action, Error **errp)
1207
{
1208
    TransactionActionList list;
1209

1210
    list.value = action;
1211
    list.next = NULL;
J
John Snow 已提交
1212
    qmp_transaction(&list, false, NULL, errp);
1213 1214
}

1215 1216 1217 1218 1219
void qmp_blockdev_snapshot_sync(bool has_device, const char *device,
                                bool has_node_name, const char *node_name,
                                const char *snapshot_file,
                                bool has_snapshot_node_name,
                                const char *snapshot_node_name,
1220
                                bool has_format, const char *format,
1221
                                bool has_mode, NewImageMode mode, Error **errp)
1222
{
1223
    BlockdevSnapshotSync snapshot = {
1224
        .has_device = has_device,
1225
        .device = (char *) device,
1226 1227
        .has_node_name = has_node_name,
        .node_name = (char *) node_name,
1228
        .snapshot_file = (char *) snapshot_file,
1229 1230
        .has_snapshot_node_name = has_snapshot_node_name,
        .snapshot_node_name = (char *) snapshot_node_name,
1231 1232 1233 1234 1235
        .has_format = has_format,
        .format = (char *) format,
        .has_mode = has_mode,
        .mode = mode,
    };
1236 1237
    TransactionAction action = {
        .type = TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT_SYNC,
1238
        .u.blockdev_snapshot_sync.data = &snapshot,
1239 1240
    };
    blockdev_do_action(&action, errp);
1241 1242
}

1243 1244 1245 1246 1247 1248 1249
void qmp_blockdev_snapshot(const char *node, const char *overlay,
                           Error **errp)
{
    BlockdevSnapshot snapshot_data = {
        .node = (char *) node,
        .overlay = (char *) overlay
    };
1250 1251
    TransactionAction action = {
        .type = TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT,
1252
        .u.blockdev_snapshot.data = &snapshot_data,
1253 1254
    };
    blockdev_do_action(&action, errp);
1255 1256
}

1257 1258 1259 1260 1261 1262 1263 1264
void qmp_blockdev_snapshot_internal_sync(const char *device,
                                         const char *name,
                                         Error **errp)
{
    BlockdevSnapshotInternal snapshot = {
        .device = (char *) device,
        .name = (char *) name
    };
1265 1266
    TransactionAction action = {
        .type = TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT_INTERNAL_SYNC,
1267
        .u.blockdev_snapshot_internal_sync.data = &snapshot,
1268 1269
    };
    blockdev_do_action(&action, errp);
1270 1271
}

1272 1273 1274 1275 1276 1277 1278
SnapshotInfo *qmp_blockdev_snapshot_delete_internal_sync(const char *device,
                                                         bool has_id,
                                                         const char *id,
                                                         bool has_name,
                                                         const char *name,
                                                         Error **errp)
{
1279
    BlockDriverState *bs;
1280
    AioContext *aio_context;
1281 1282 1283 1284 1285
    QEMUSnapshotInfo sn;
    Error *local_err = NULL;
    SnapshotInfo *info = NULL;
    int ret;

1286 1287
    bs = qmp_get_root_bs(device, errp);
    if (!bs) {
1288 1289
        return NULL;
    }
1290
    aio_context = bdrv_get_aio_context(bs);
M
Max Reitz 已提交
1291
    aio_context_acquire(aio_context);
1292 1293 1294 1295 1296 1297 1298 1299 1300 1301 1302

    if (!has_id) {
        id = NULL;
    }

    if (!has_name) {
        name = NULL;
    }

    if (!id && !name) {
        error_setg(errp, "Name or id must be provided");
M
Max Reitz 已提交
1303
        goto out_aio_context;
1304 1305
    }

1306 1307 1308 1309
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_INTERNAL_SNAPSHOT_DELETE, errp)) {
        goto out_aio_context;
    }

1310
    ret = bdrv_snapshot_find_by_id_and_name(bs, id, name, &sn, &local_err);
1311
    if (local_err) {
1312
        error_propagate(errp, local_err);
1313
        goto out_aio_context;
1314 1315 1316 1317 1318 1319
    }
    if (!ret) {
        error_setg(errp,
                   "Snapshot with id '%s' and name '%s' does not exist on "
                   "device '%s'",
                   STR_OR_NULL(id), STR_OR_NULL(name), device);
1320
        goto out_aio_context;
1321 1322 1323
    }

    bdrv_snapshot_delete(bs, id, name, &local_err);
1324
    if (local_err) {
1325
        error_propagate(errp, local_err);
1326
        goto out_aio_context;
1327 1328
    }

1329 1330
    aio_context_release(aio_context);

1331
    info = g_new0(SnapshotInfo, 1);
1332 1333 1334 1335 1336 1337 1338 1339 1340
    info->id = g_strdup(sn.id_str);
    info->name = g_strdup(sn.name);
    info->date_nsec = sn.date_nsec;
    info->date_sec = sn.date_sec;
    info->vm_state_size = sn.vm_state_size;
    info->vm_clock_nsec = sn.vm_clock_nsec % 1000000000;
    info->vm_clock_sec = sn.vm_clock_nsec / 1000000000;

    return info;
1341 1342 1343 1344

out_aio_context:
    aio_context_release(aio_context);
    return NULL;
1345
}
1346

1347 1348 1349 1350 1351 1352 1353 1354 1355 1356 1357 1358 1359 1360 1361 1362 1363 1364 1365 1366 1367 1368 1369 1370 1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 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
/**
 * block_dirty_bitmap_lookup:
 * Return a dirty bitmap (if present), after validating
 * the node reference and bitmap names.
 *
 * @node: The name of the BDS node to search for bitmaps
 * @name: The name of the bitmap to search for
 * @pbs: Output pointer for BDS lookup, if desired. Can be NULL.
 * @paio: Output pointer for aio_context acquisition, if desired. Can be NULL.
 * @errp: Output pointer for error information. Can be NULL.
 *
 * @return: A bitmap object on success, or NULL on failure.
 */
static BdrvDirtyBitmap *block_dirty_bitmap_lookup(const char *node,
                                                  const char *name,
                                                  BlockDriverState **pbs,
                                                  AioContext **paio,
                                                  Error **errp)
{
    BlockDriverState *bs;
    BdrvDirtyBitmap *bitmap;
    AioContext *aio_context;

    if (!node) {
        error_setg(errp, "Node cannot be NULL");
        return NULL;
    }
    if (!name) {
        error_setg(errp, "Bitmap name cannot be NULL");
        return NULL;
    }
    bs = bdrv_lookup_bs(node, node, NULL);
    if (!bs) {
        error_setg(errp, "Node '%s' not found", node);
        return NULL;
    }

    aio_context = bdrv_get_aio_context(bs);
    aio_context_acquire(aio_context);

    bitmap = bdrv_find_dirty_bitmap(bs, name);
    if (!bitmap) {
        error_setg(errp, "Dirty bitmap '%s' not found", name);
        goto fail;
    }

    if (pbs) {
        *pbs = bs;
    }
    if (paio) {
        *paio = aio_context;
    } else {
        aio_context_release(aio_context);
    }

    return bitmap;

 fail:
    aio_context_release(aio_context);
    return NULL;
}

1409
/* New and old BlockDriverState structs for atomic group operations */
1410

1411
typedef struct BlkActionState BlkActionState;
1412

1413 1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425 1426 1427
/**
 * BlkActionOps:
 * Table of operations that define an Action.
 *
 * @instance_size: Size of state struct, in bytes.
 * @prepare: Prepare the work, must NOT be NULL.
 * @commit: Commit the changes, can be NULL.
 * @abort: Abort the changes on fail, can be NULL.
 * @clean: Clean up resources after all transaction actions have called
 *         commit() or abort(). Can be NULL.
 *
 * Only prepare() may fail. In a single transaction, only one of commit() or
 * abort() will be called. clean() will always be called if it is present.
 */
typedef struct BlkActionOps {
1428
    size_t instance_size;
1429 1430 1431 1432 1433
    void (*prepare)(BlkActionState *common, Error **errp);
    void (*commit)(BlkActionState *common);
    void (*abort)(BlkActionState *common);
    void (*clean)(BlkActionState *common);
} BlkActionOps;
1434

1435 1436 1437 1438 1439 1440
/**
 * BlkActionState:
 * Describes one Action's state within a Transaction.
 *
 * @action: QAPI-defined enum identifying which Action to perform.
 * @ops: Table of ActionOps this Action can perform.
J
John Snow 已提交
1441
 * @block_job_txn: Transaction which this action belongs to.
1442 1443 1444 1445 1446
 * @entry: List membership for all Actions in this Transaction.
 *
 * This structure must be arranged as first member in a subclassed type,
 * assuming that the compiler will also arrange it to the same offsets as the
 * base class.
1447
 */
1448
struct BlkActionState {
1449
    TransactionAction *action;
1450
    const BlkActionOps *ops;
J
John Snow 已提交
1451 1452
    BlockJobTxn *block_job_txn;
    TransactionProperties *txn_props;
1453
    QSIMPLEQ_ENTRY(BlkActionState) entry;
1454 1455
};

1456 1457
/* internal snapshot private data */
typedef struct InternalSnapshotState {
1458
    BlkActionState common;
1459
    BlockDriverState *bs;
1460
    AioContext *aio_context;
1461
    QEMUSnapshotInfo sn;
1462
    bool created;
1463 1464
} InternalSnapshotState;

J
John Snow 已提交
1465 1466 1467 1468 1469 1470 1471 1472 1473 1474 1475 1476 1477 1478

static int action_check_completion_mode(BlkActionState *s, Error **errp)
{
    if (s->txn_props->completion_mode != ACTION_COMPLETION_MODE_INDIVIDUAL) {
        error_setg(errp,
                   "Action '%s' does not support Transaction property "
                   "completion-mode = %s",
                   TransactionActionKind_lookup[s->action->type],
                   ActionCompletionMode_lookup[s->txn_props->completion_mode]);
        return -1;
    }
    return 0;
}

1479
static void internal_snapshot_prepare(BlkActionState *common,
1480 1481
                                      Error **errp)
{
1482
    Error *local_err = NULL;
1483 1484 1485 1486 1487 1488 1489 1490 1491 1492
    const char *device;
    const char *name;
    BlockDriverState *bs;
    QEMUSnapshotInfo old_sn, *sn;
    bool ret;
    qemu_timeval tv;
    BlockdevSnapshotInternal *internal;
    InternalSnapshotState *state;
    int ret1;

1493
    g_assert(common->action->type ==
1494
             TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT_INTERNAL_SYNC);
1495
    internal = common->action->u.blockdev_snapshot_internal_sync.data;
1496 1497 1498 1499 1500 1501 1502
    state = DO_UPCAST(InternalSnapshotState, common, common);

    /* 1. parse input */
    device = internal->device;
    name = internal->name;

    /* 2. check for validation */
J
John Snow 已提交
1503 1504 1505 1506
    if (action_check_completion_mode(common, errp) < 0) {
        return;
    }

1507 1508
    bs = qmp_get_root_bs(device, errp);
    if (!bs) {
1509 1510 1511
        return;
    }

1512
    /* AioContext is released in .clean() */
1513
    state->aio_context = bdrv_get_aio_context(bs);
1514 1515
    aio_context_acquire(state->aio_context);

1516 1517 1518
    state->bs = bs;
    bdrv_drained_begin(bs);

1519 1520 1521 1522
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_INTERNAL_SNAPSHOT, errp)) {
        return;
    }

1523
    if (bdrv_is_read_only(bs)) {
1524
        error_setg(errp, "Device '%s' is read only", device);
1525 1526 1527 1528
        return;
    }

    if (!bdrv_can_snapshot(bs)) {
1529 1530 1531
        error_setg(errp, "Block format '%s' used by device '%s' "
                   "does not support internal snapshots",
                   bs->drv->format_name, device);
1532 1533 1534 1535 1536 1537 1538 1539 1540
        return;
    }

    if (!strlen(name)) {
        error_setg(errp, "Name is empty");
        return;
    }

    /* check whether a snapshot with name exist */
1541 1542 1543 1544
    ret = bdrv_snapshot_find_by_id_and_name(bs, NULL, name, &old_sn,
                                            &local_err);
    if (local_err) {
        error_propagate(errp, local_err);
1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569
        return;
    } else if (ret) {
        error_setg(errp,
                   "Snapshot with name '%s' already exists on device '%s'",
                   name, device);
        return;
    }

    /* 3. take the snapshot */
    sn = &state->sn;
    pstrcpy(sn->name, sizeof(sn->name), name);
    qemu_gettimeofday(&tv);
    sn->date_sec = tv.tv_sec;
    sn->date_nsec = tv.tv_usec * 1000;
    sn->vm_clock_nsec = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL);

    ret1 = bdrv_snapshot_create(bs, sn);
    if (ret1 < 0) {
        error_setg_errno(errp, -ret1,
                         "Failed to create snapshot '%s' on device '%s'",
                         name, device);
        return;
    }

    /* 4. succeed, mark a snapshot is created */
1570
    state->created = true;
1571 1572
}

1573
static void internal_snapshot_abort(BlkActionState *common)
1574 1575 1576 1577 1578 1579 1580
{
    InternalSnapshotState *state =
                             DO_UPCAST(InternalSnapshotState, common, common);
    BlockDriverState *bs = state->bs;
    QEMUSnapshotInfo *sn = &state->sn;
    Error *local_error = NULL;

1581
    if (!state->created) {
1582 1583 1584 1585
        return;
    }

    if (bdrv_snapshot_delete(bs, sn->id_str, sn->name, &local_error) < 0) {
1586 1587 1588 1589 1590
        error_reportf_err(local_error,
                          "Failed to delete snapshot with id '%s' and "
                          "name '%s' on device '%s' in abort: ",
                          sn->id_str, sn->name,
                          bdrv_get_device_name(bs));
1591 1592 1593
    }
}

1594
static void internal_snapshot_clean(BlkActionState *common)
1595 1596 1597 1598 1599
{
    InternalSnapshotState *state = DO_UPCAST(InternalSnapshotState,
                                             common, common);

    if (state->aio_context) {
1600 1601 1602
        if (state->bs) {
            bdrv_drained_end(state->bs);
        }
1603 1604 1605 1606
        aio_context_release(state->aio_context);
    }
}

1607
/* external snapshot private data */
1608
typedef struct ExternalSnapshotState {
1609
    BlkActionState common;
1610 1611
    BlockDriverState *old_bs;
    BlockDriverState *new_bs;
1612
    AioContext *aio_context;
1613
} ExternalSnapshotState;
1614

1615
static void external_snapshot_prepare(BlkActionState *common,
1616 1617
                                      Error **errp)
{
M
Max Reitz 已提交
1618
    int flags = 0;
1619
    QDict *options = NULL;
1620
    Error *local_err = NULL;
1621
    /* Device and node name of the image to generate the snapshot from */
1622
    const char *device;
1623
    const char *node_name;
1624 1625 1626
    /* Reference to the new image (for 'blockdev-snapshot') */
    const char *snapshot_ref;
    /* File name of the new image (for 'blockdev-snapshot-sync') */
1627
    const char *new_image_file;
1628 1629
    ExternalSnapshotState *state =
                             DO_UPCAST(ExternalSnapshotState, common, common);
1630
    TransactionAction *action = common->action;
1631

1632 1633 1634 1635 1636
    /* 'blockdev-snapshot' and 'blockdev-snapshot-sync' have similar
     * purpose but a different set of parameters */
    switch (action->type) {
    case TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT:
        {
1637
            BlockdevSnapshot *s = action->u.blockdev_snapshot.data;
1638 1639 1640 1641 1642 1643 1644 1645
            device = s->node;
            node_name = s->node;
            new_image_file = NULL;
            snapshot_ref = s->overlay;
        }
        break;
    case TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT_SYNC:
        {
1646
            BlockdevSnapshotSync *s = action->u.blockdev_snapshot_sync.data;
1647 1648 1649 1650 1651 1652 1653 1654
            device = s->has_device ? s->device : NULL;
            node_name = s->has_node_name ? s->node_name : NULL;
            new_image_file = s->snapshot_file;
            snapshot_ref = NULL;
        }
        break;
    default:
        g_assert_not_reached();
1655 1656 1657
    }

    /* start processing */
J
John Snow 已提交
1658 1659 1660 1661
    if (action_check_completion_mode(common, errp) < 0) {
        return;
    }

1662 1663
    state->old_bs = bdrv_lookup_bs(device, node_name, errp);
    if (!state->old_bs) {
1664 1665 1666
        return;
    }

1667 1668 1669
    /* Acquire AioContext now so any threads operating on old_bs stop */
    state->aio_context = bdrv_get_aio_context(state->old_bs);
    aio_context_acquire(state->aio_context);
1670
    bdrv_drained_begin(state->old_bs);
1671

1672
    if (!bdrv_is_inserted(state->old_bs)) {
1673
        error_setg(errp, QERR_DEVICE_HAS_NO_MEDIUM, device);
1674 1675 1676
        return;
    }

1677 1678
    if (bdrv_op_is_blocked(state->old_bs,
                           BLOCK_OP_TYPE_EXTERNAL_SNAPSHOT, errp)) {
1679 1680 1681
        return;
    }

1682 1683
    if (!bdrv_is_read_only(state->old_bs)) {
        if (bdrv_flush(state->old_bs)) {
1684
            error_setg(errp, QERR_IO_ERROR);
1685 1686 1687 1688
            return;
        }
    }

1689
    if (!bdrv_is_first_non_filter(state->old_bs)) {
1690
        error_setg(errp, QERR_FEATURE_DISABLED, "snapshot");
1691 1692 1693
        return;
    }

1694
    if (action->type == TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT_SYNC) {
1695
        BlockdevSnapshotSync *s = action->u.blockdev_snapshot_sync.data;
1696 1697 1698 1699
        const char *format = s->has_format ? s->format : "qcow2";
        enum NewImageMode mode;
        const char *snapshot_node_name =
            s->has_snapshot_node_name ? s->snapshot_node_name : NULL;
1700

1701 1702
        if (node_name && !snapshot_node_name) {
            error_setg(errp, "New snapshot node name missing");
1703 1704 1705
            return;
        }

1706 1707 1708 1709 1710 1711 1712
        if (snapshot_node_name &&
            bdrv_lookup_bs(snapshot_node_name, snapshot_node_name, NULL)) {
            error_setg(errp, "New snapshot node name already in use");
            return;
        }

        flags = state->old_bs->open_flags;
1713
        flags &= ~(BDRV_O_SNAPSHOT | BDRV_O_NO_BACKING | BDRV_O_COPY_ON_READ);
1714 1715 1716 1717

        /* create new image w/backing file */
        mode = s->has_mode ? s->mode : NEW_IMAGE_MODE_ABSOLUTE_PATHS;
        if (mode != NEW_IMAGE_MODE_EXISTING) {
1718 1719 1720 1721 1722
            int64_t size = bdrv_getlength(state->old_bs);
            if (size < 0) {
                error_setg_errno(errp, -size, "bdrv_getlength failed");
                return;
            }
1723 1724 1725
            bdrv_img_create(new_image_file, format,
                            state->old_bs->filename,
                            state->old_bs->drv->format_name,
1726
                            NULL, size, flags, &local_err, false);
1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740
            if (local_err) {
                error_propagate(errp, local_err);
                return;
            }
        }

        options = qdict_new();
        if (s->has_snapshot_node_name) {
            qdict_put(options, "node-name",
                      qstring_from_str(snapshot_node_name));
        }
        qdict_put(options, "driver", qstring_from_str(format));

        flags |= BDRV_O_NO_BACKING;
1741 1742
    }

M
Max Reitz 已提交
1743 1744
    state->new_bs = bdrv_open(new_image_file, snapshot_ref, options, flags,
                              errp);
1745
    /* We will manually add the backing_hd field to the bs later */
M
Max Reitz 已提交
1746
    if (!state->new_bs) {
1747 1748 1749
        return;
    }

K
Kevin Wolf 已提交
1750
    if (bdrv_has_blk(state->new_bs)) {
1751
        error_setg(errp, "The snapshot is already in use");
1752 1753 1754 1755 1756 1757 1758 1759 1760 1761
        return;
    }

    if (bdrv_op_is_blocked(state->new_bs, BLOCK_OP_TYPE_EXTERNAL_SNAPSHOT,
                           errp)) {
        return;
    }

    if (state->new_bs->backing != NULL) {
        error_setg(errp, "The snapshot already has a backing image");
1762 1763 1764 1765 1766
        return;
    }

    if (!state->new_bs->drv->supports_backing) {
        error_setg(errp, "The snapshot does not support backing images");
1767 1768 1769
    }
}

1770
static void external_snapshot_commit(BlkActionState *common)
1771
{
1772 1773
    ExternalSnapshotState *state =
                             DO_UPCAST(ExternalSnapshotState, common, common);
1774

1775 1776
    bdrv_set_aio_context(state->new_bs, state->aio_context);

1777 1778
    /* This removes our old bs and adds the new bs */
    bdrv_append(state->new_bs, state->old_bs);
1779 1780 1781
    /* We don't need (or want) to use the transactional
     * bdrv_reopen_multiple() across all the entries at once, because we
     * don't want to abort all of them if one of them fails the reopen */
1782 1783 1784 1785
    if (!state->old_bs->copy_on_read) {
        bdrv_reopen(state->old_bs, state->old_bs->open_flags & ~BDRV_O_RDWR,
                    NULL);
    }
1786 1787
}

1788
static void external_snapshot_abort(BlkActionState *common)
1789
{
1790 1791 1792
    ExternalSnapshotState *state =
                             DO_UPCAST(ExternalSnapshotState, common, common);
    if (state->new_bs) {
F
Fam Zheng 已提交
1793
        bdrv_unref(state->new_bs);
1794
    }
1795 1796
}

1797
static void external_snapshot_clean(BlkActionState *common)
1798 1799 1800
{
    ExternalSnapshotState *state =
                             DO_UPCAST(ExternalSnapshotState, common, common);
1801
    if (state->aio_context) {
1802
        bdrv_drained_end(state->old_bs);
1803 1804
        aio_context_release(state->aio_context);
    }
1805 1806
}

1807
typedef struct DriveBackupState {
1808
    BlkActionState common;
1809
    BlockDriverState *bs;
1810
    AioContext *aio_context;
1811 1812 1813
    BlockJob *job;
} DriveBackupState;

P
Pavel Butsykin 已提交
1814 1815
static void do_drive_backup(DriveBackup *backup, BlockJobTxn *txn,
                            Error **errp);
1816

1817
static void drive_backup_prepare(BlkActionState *common, Error **errp)
1818 1819
{
    DriveBackupState *state = DO_UPCAST(DriveBackupState, common, common);
1820
    BlockDriverState *bs;
1821 1822 1823
    DriveBackup *backup;
    Error *local_err = NULL;

1824
    assert(common->action->type == TRANSACTION_ACTION_KIND_DRIVE_BACKUP);
1825
    backup = common->action->u.drive_backup.data;
1826

1827 1828
    bs = qmp_get_root_bs(backup->device, errp);
    if (!bs) {
1829 1830 1831
        return;
    }

1832
    /* AioContext is released in .clean() */
1833
    state->aio_context = bdrv_get_aio_context(bs);
1834
    aio_context_acquire(state->aio_context);
1835 1836
    bdrv_drained_begin(bs);
    state->bs = bs;
1837

P
Pavel Butsykin 已提交
1838
    do_drive_backup(backup, common->block_job_txn, &local_err);
1839
    if (local_err) {
1840 1841 1842 1843 1844 1845 1846
        error_propagate(errp, local_err);
        return;
    }

    state->job = state->bs->job;
}

1847
static void drive_backup_abort(BlkActionState *common)
1848 1849 1850 1851 1852 1853 1854 1855 1856 1857
{
    DriveBackupState *state = DO_UPCAST(DriveBackupState, common, common);
    BlockDriverState *bs = state->bs;

    /* Only cancel if it's the job we started */
    if (bs && bs->job && bs->job == state->job) {
        block_job_cancel_sync(bs->job);
    }
}

1858
static void drive_backup_clean(BlkActionState *common)
1859 1860 1861 1862
{
    DriveBackupState *state = DO_UPCAST(DriveBackupState, common, common);

    if (state->aio_context) {
1863
        bdrv_drained_end(state->bs);
1864 1865 1866 1867
        aio_context_release(state->aio_context);
    }
}

1868
typedef struct BlockdevBackupState {
1869
    BlkActionState common;
1870 1871 1872 1873 1874
    BlockDriverState *bs;
    BlockJob *job;
    AioContext *aio_context;
} BlockdevBackupState;

P
Pavel Butsykin 已提交
1875 1876
static void do_blockdev_backup(BlockdevBackup *backup, BlockJobTxn *txn,
                               Error **errp);
1877

1878
static void blockdev_backup_prepare(BlkActionState *common, Error **errp)
1879 1880 1881
{
    BlockdevBackupState *state = DO_UPCAST(BlockdevBackupState, common, common);
    BlockdevBackup *backup;
1882
    BlockDriverState *bs, *target;
1883 1884
    Error *local_err = NULL;

1885
    assert(common->action->type == TRANSACTION_ACTION_KIND_BLOCKDEV_BACKUP);
1886
    backup = common->action->u.blockdev_backup.data;
1887

1888 1889
    bs = qmp_get_root_bs(backup->device, errp);
    if (!bs) {
1890 1891 1892
        return;
    }

1893
    target = bdrv_lookup_bs(backup->target, backup->target, errp);
M
Max Reitz 已提交
1894
    if (!target) {
1895 1896 1897 1898
        return;
    }

    /* AioContext is released in .clean() */
1899
    state->aio_context = bdrv_get_aio_context(bs);
1900
    if (state->aio_context != bdrv_get_aio_context(target)) {
1901 1902 1903 1904 1905
        state->aio_context = NULL;
        error_setg(errp, "Backup between two IO threads is not implemented");
        return;
    }
    aio_context_acquire(state->aio_context);
1906
    state->bs = bs;
1907
    bdrv_drained_begin(state->bs);
1908

P
Pavel Butsykin 已提交
1909
    do_blockdev_backup(backup, common->block_job_txn, &local_err);
1910 1911 1912 1913 1914 1915 1916 1917
    if (local_err) {
        error_propagate(errp, local_err);
        return;
    }

    state->job = state->bs->job;
}

1918
static void blockdev_backup_abort(BlkActionState *common)
1919 1920 1921 1922 1923 1924 1925 1926 1927 1928
{
    BlockdevBackupState *state = DO_UPCAST(BlockdevBackupState, common, common);
    BlockDriverState *bs = state->bs;

    /* Only cancel if it's the job we started */
    if (bs && bs->job && bs->job == state->job) {
        block_job_cancel_sync(bs->job);
    }
}

1929
static void blockdev_backup_clean(BlkActionState *common)
1930 1931 1932 1933
{
    BlockdevBackupState *state = DO_UPCAST(BlockdevBackupState, common, common);

    if (state->aio_context) {
1934
        bdrv_drained_end(state->bs);
1935 1936 1937 1938
        aio_context_release(state->aio_context);
    }
}

F
Fam Zheng 已提交
1939
typedef struct BlockDirtyBitmapState {
1940
    BlkActionState common;
F
Fam Zheng 已提交
1941 1942 1943 1944 1945 1946 1947
    BdrvDirtyBitmap *bitmap;
    BlockDriverState *bs;
    AioContext *aio_context;
    HBitmap *backup;
    bool prepared;
} BlockDirtyBitmapState;

1948
static void block_dirty_bitmap_add_prepare(BlkActionState *common,
F
Fam Zheng 已提交
1949 1950 1951 1952 1953 1954 1955
                                           Error **errp)
{
    Error *local_err = NULL;
    BlockDirtyBitmapAdd *action;
    BlockDirtyBitmapState *state = DO_UPCAST(BlockDirtyBitmapState,
                                             common, common);

J
John Snow 已提交
1956 1957 1958 1959
    if (action_check_completion_mode(common, errp) < 0) {
        return;
    }

1960
    action = common->action->u.block_dirty_bitmap_add.data;
F
Fam Zheng 已提交
1961 1962 1963 1964 1965 1966 1967 1968 1969 1970 1971 1972
    /* AIO context taken and released within qmp_block_dirty_bitmap_add */
    qmp_block_dirty_bitmap_add(action->node, action->name,
                               action->has_granularity, action->granularity,
                               &local_err);

    if (!local_err) {
        state->prepared = true;
    } else {
        error_propagate(errp, local_err);
    }
}

1973
static void block_dirty_bitmap_add_abort(BlkActionState *common)
F
Fam Zheng 已提交
1974 1975 1976 1977 1978
{
    BlockDirtyBitmapAdd *action;
    BlockDirtyBitmapState *state = DO_UPCAST(BlockDirtyBitmapState,
                                             common, common);

1979
    action = common->action->u.block_dirty_bitmap_add.data;
F
Fam Zheng 已提交
1980 1981 1982 1983 1984 1985 1986 1987
    /* Should not be able to fail: IF the bitmap was added via .prepare(),
     * then the node reference and bitmap name must have been valid.
     */
    if (state->prepared) {
        qmp_block_dirty_bitmap_remove(action->node, action->name, &error_abort);
    }
}

1988
static void block_dirty_bitmap_clear_prepare(BlkActionState *common,
F
Fam Zheng 已提交
1989 1990 1991 1992 1993 1994
                                             Error **errp)
{
    BlockDirtyBitmapState *state = DO_UPCAST(BlockDirtyBitmapState,
                                             common, common);
    BlockDirtyBitmap *action;

J
John Snow 已提交
1995 1996 1997 1998
    if (action_check_completion_mode(common, errp) < 0) {
        return;
    }

1999
    action = common->action->u.block_dirty_bitmap_clear.data;
F
Fam Zheng 已提交
2000 2001 2002 2003 2004 2005 2006 2007 2008 2009 2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020
    state->bitmap = block_dirty_bitmap_lookup(action->node,
                                              action->name,
                                              &state->bs,
                                              &state->aio_context,
                                              errp);
    if (!state->bitmap) {
        return;
    }

    if (bdrv_dirty_bitmap_frozen(state->bitmap)) {
        error_setg(errp, "Cannot modify a frozen bitmap");
        return;
    } else if (!bdrv_dirty_bitmap_enabled(state->bitmap)) {
        error_setg(errp, "Cannot clear a disabled bitmap");
        return;
    }

    bdrv_clear_dirty_bitmap(state->bitmap, &state->backup);
    /* AioContext is released in .clean() */
}

2021
static void block_dirty_bitmap_clear_abort(BlkActionState *common)
F
Fam Zheng 已提交
2022 2023 2024 2025 2026 2027 2028
{
    BlockDirtyBitmapState *state = DO_UPCAST(BlockDirtyBitmapState,
                                             common, common);

    bdrv_undo_clear_dirty_bitmap(state->bitmap, state->backup);
}

2029
static void block_dirty_bitmap_clear_commit(BlkActionState *common)
F
Fam Zheng 已提交
2030 2031 2032 2033 2034 2035 2036
{
    BlockDirtyBitmapState *state = DO_UPCAST(BlockDirtyBitmapState,
                                             common, common);

    hbitmap_free(state->backup);
}

2037
static void block_dirty_bitmap_clear_clean(BlkActionState *common)
F
Fam Zheng 已提交
2038 2039 2040 2041 2042 2043 2044 2045 2046
{
    BlockDirtyBitmapState *state = DO_UPCAST(BlockDirtyBitmapState,
                                             common, common);

    if (state->aio_context) {
        aio_context_release(state->aio_context);
    }
}

2047
static void abort_prepare(BlkActionState *common, Error **errp)
2048 2049 2050 2051
{
    error_setg(errp, "Transaction aborted using Abort action");
}

2052
static void abort_commit(BlkActionState *common)
2053
{
2054
    g_assert_not_reached(); /* this action never succeeds */
2055 2056
}

2057
static const BlkActionOps actions[] = {
2058 2059 2060 2061 2062
    [TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT] = {
        .instance_size = sizeof(ExternalSnapshotState),
        .prepare  = external_snapshot_prepare,
        .commit   = external_snapshot_commit,
        .abort = external_snapshot_abort,
2063
        .clean = external_snapshot_clean,
2064
    },
2065
    [TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT_SYNC] = {
2066
        .instance_size = sizeof(ExternalSnapshotState),
2067 2068 2069
        .prepare  = external_snapshot_prepare,
        .commit   = external_snapshot_commit,
        .abort = external_snapshot_abort,
2070
        .clean = external_snapshot_clean,
2071
    },
2072 2073 2074 2075
    [TRANSACTION_ACTION_KIND_DRIVE_BACKUP] = {
        .instance_size = sizeof(DriveBackupState),
        .prepare = drive_backup_prepare,
        .abort = drive_backup_abort,
2076
        .clean = drive_backup_clean,
2077
    },
2078 2079 2080 2081 2082 2083
    [TRANSACTION_ACTION_KIND_BLOCKDEV_BACKUP] = {
        .instance_size = sizeof(BlockdevBackupState),
        .prepare = blockdev_backup_prepare,
        .abort = blockdev_backup_abort,
        .clean = blockdev_backup_clean,
    },
2084
    [TRANSACTION_ACTION_KIND_ABORT] = {
2085
        .instance_size = sizeof(BlkActionState),
2086 2087 2088
        .prepare = abort_prepare,
        .commit = abort_commit,
    },
2089 2090 2091 2092
    [TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT_INTERNAL_SYNC] = {
        .instance_size = sizeof(InternalSnapshotState),
        .prepare  = internal_snapshot_prepare,
        .abort = internal_snapshot_abort,
2093
        .clean = internal_snapshot_clean,
2094
    },
F
Fam Zheng 已提交
2095 2096 2097 2098 2099 2100 2101 2102 2103 2104 2105 2106
    [TRANSACTION_ACTION_KIND_BLOCK_DIRTY_BITMAP_ADD] = {
        .instance_size = sizeof(BlockDirtyBitmapState),
        .prepare = block_dirty_bitmap_add_prepare,
        .abort = block_dirty_bitmap_add_abort,
    },
    [TRANSACTION_ACTION_KIND_BLOCK_DIRTY_BITMAP_CLEAR] = {
        .instance_size = sizeof(BlockDirtyBitmapState),
        .prepare = block_dirty_bitmap_clear_prepare,
        .commit = block_dirty_bitmap_clear_commit,
        .abort = block_dirty_bitmap_clear_abort,
        .clean = block_dirty_bitmap_clear_clean,
    }
2107 2108
};

J
John Snow 已提交
2109 2110 2111 2112 2113 2114 2115 2116 2117 2118 2119 2120 2121 2122 2123 2124 2125 2126 2127
/**
 * Allocate a TransactionProperties structure if necessary, and fill
 * that structure with desired defaults if they are unset.
 */
static TransactionProperties *get_transaction_properties(
    TransactionProperties *props)
{
    if (!props) {
        props = g_new0(TransactionProperties, 1);
    }

    if (!props->has_completion_mode) {
        props->has_completion_mode = true;
        props->completion_mode = ACTION_COMPLETION_MODE_INDIVIDUAL;
    }

    return props;
}

2128
/*
2129 2130
 * 'Atomic' group operations.  The operations are performed as a set, and if
 * any fail then we roll back all operations in the group.
2131
 */
J
John Snow 已提交
2132 2133 2134 2135
void qmp_transaction(TransactionActionList *dev_list,
                     bool has_props,
                     struct TransactionProperties *props,
                     Error **errp)
2136
{
2137
    TransactionActionList *dev_entry = dev_list;
J
John Snow 已提交
2138
    BlockJobTxn *block_job_txn = NULL;
2139
    BlkActionState *state, *next;
2140
    Error *local_err = NULL;
2141

2142
    QSIMPLEQ_HEAD(snap_bdrv_states, BlkActionState) snap_bdrv_states;
2143 2144
    QSIMPLEQ_INIT(&snap_bdrv_states);

J
John Snow 已提交
2145 2146 2147 2148 2149 2150 2151 2152
    /* Does this transaction get canceled as a group on failure?
     * If not, we don't really need to make a BlockJobTxn.
     */
    props = get_transaction_properties(props);
    if (props->completion_mode != ACTION_COMPLETION_MODE_INDIVIDUAL) {
        block_job_txn = block_job_txn_new();
    }

2153
    /* drain all i/o before any operations */
2154 2155
    bdrv_drain_all();

2156
    /* We don't do anything in this loop that commits us to the operations */
2157
    while (NULL != dev_entry) {
2158
        TransactionAction *dev_info = NULL;
2159
        const BlkActionOps *ops;
2160

2161 2162 2163
        dev_info = dev_entry->value;
        dev_entry = dev_entry->next;

2164
        assert(dev_info->type < ARRAY_SIZE(actions));
2165

2166
        ops = &actions[dev_info->type];
2167 2168
        assert(ops->instance_size > 0);

2169 2170 2171
        state = g_malloc0(ops->instance_size);
        state->ops = ops;
        state->action = dev_info;
J
John Snow 已提交
2172 2173
        state->block_job_txn = block_job_txn;
        state->txn_props = props;
2174
        QSIMPLEQ_INSERT_TAIL(&snap_bdrv_states, state, entry);
2175

2176
        state->ops->prepare(state, &local_err);
2177
        if (local_err) {
2178 2179
            error_propagate(errp, local_err);
            goto delete_and_fail;
2180 2181 2182
        }
    }

2183
    QSIMPLEQ_FOREACH(state, &snap_bdrv_states, entry) {
2184 2185 2186
        if (state->ops->commit) {
            state->ops->commit(state);
        }
2187 2188 2189 2190 2191 2192
    }

    /* success */
    goto exit;

delete_and_fail:
2193
    /* failure, and it is all-or-none; roll back all operations */
2194 2195 2196
    QSIMPLEQ_FOREACH(state, &snap_bdrv_states, entry) {
        if (state->ops->abort) {
            state->ops->abort(state);
2197
        }
2198 2199
    }
exit:
2200 2201 2202
    QSIMPLEQ_FOREACH_SAFE(state, &snap_bdrv_states, entry, next) {
        if (state->ops->clean) {
            state->ops->clean(state);
2203
        }
2204
        g_free(state);
2205
    }
J
John Snow 已提交
2206 2207 2208 2209
    if (!has_props) {
        qapi_free_TransactionProperties(props);
    }
    block_job_txn_unref(block_job_txn);
2210 2211
}

2212 2213 2214
void qmp_eject(bool has_device, const char *device,
               bool has_id, const char *id,
               bool has_force, bool force, Error **errp)
2215
{
2216
    Error *local_err = NULL;
2217 2218 2219 2220 2221
    int rc;

    if (!has_force) {
        force = false;
    }
2222

2223 2224 2225
    rc = do_open_tray(has_device ? device : NULL,
                      has_id ? id : NULL,
                      force, &local_err);
2226
    if (rc && rc != -ENOSYS) {
2227
        error_propagate(errp, local_err);
L
Luiz Capitulino 已提交
2228
        return;
2229
    }
2230
    error_free(local_err);
2231

2232
    qmp_x_blockdev_remove_medium(has_device, device, has_id, id, errp);
2233 2234
}

2235 2236 2237
void qmp_block_passwd(bool has_device, const char *device,
                      bool has_node_name, const char *node_name,
                      const char *password, Error **errp)
2238
{
2239
    Error *local_err = NULL;
2240
    BlockDriverState *bs;
2241
    AioContext *aio_context;
2242

2243 2244 2245
    bs = bdrv_lookup_bs(has_device ? device : NULL,
                        has_node_name ? node_name : NULL,
                        &local_err);
2246
    if (local_err) {
2247
        error_propagate(errp, local_err);
L
Luiz Capitulino 已提交
2248
        return;
2249 2250
    }

2251 2252 2253
    aio_context = bdrv_get_aio_context(bs);
    aio_context_acquire(aio_context);

2254
    bdrv_add_key(bs, password, errp);
2255 2256

    aio_context_release(aio_context);
2257 2258
}

2259 2260 2261 2262 2263 2264 2265 2266 2267 2268
/*
 * Attempt to open the tray of @device.
 * If @force, ignore its tray lock.
 * Else, if the tray is locked, don't open it, but ask the guest to open it.
 * On error, store an error through @errp and return -errno.
 * If @device does not exist, return -ENODEV.
 * If it has no removable media, return -ENOTSUP.
 * If it has no tray, return -ENOSYS.
 * If the guest was asked to open the tray, return -EINPROGRESS.
 * Else, return 0.
2269
 */
2270 2271
static int do_open_tray(const char *blk_name, const char *qdev_id,
                        bool force, Error **errp)
M
Max Reitz 已提交
2272 2273
{
    BlockBackend *blk;
2274
    const char *device = qdev_id ?: blk_name;
M
Max Reitz 已提交
2275 2276
    bool locked;

2277
    blk = qmp_get_blk(blk_name, qdev_id, errp);
M
Max Reitz 已提交
2278
    if (!blk) {
2279
        return -ENODEV;
M
Max Reitz 已提交
2280 2281 2282 2283
    }

    if (!blk_dev_has_removable_media(blk)) {
        error_setg(errp, "Device '%s' is not removable", device);
2284
        return -ENOTSUP;
M
Max Reitz 已提交
2285 2286
    }

2287
    if (!blk_dev_has_tray(blk)) {
2288 2289
        error_setg(errp, "Device '%s' does not have a tray", device);
        return -ENOSYS;
2290 2291
    }

M
Max Reitz 已提交
2292
    if (blk_dev_is_tray_open(blk)) {
2293
        return 0;
M
Max Reitz 已提交
2294 2295 2296 2297 2298 2299 2300 2301 2302 2303
    }

    locked = blk_dev_is_medium_locked(blk);
    if (locked) {
        blk_dev_eject_request(blk, force);
    }

    if (!locked || force) {
        blk_dev_change_media_cb(blk, false);
    }
2304 2305

    if (locked && !force) {
2306 2307 2308
        error_setg(errp, "Device '%s' is locked and force was not specified, "
                   "wait for tray to open and try again", device);
        return -EINPROGRESS;
2309 2310 2311 2312 2313
    }

    return 0;
}

2314 2315 2316
void qmp_blockdev_open_tray(bool has_device, const char *device,
                            bool has_id, const char *id,
                            bool has_force, bool force,
2317 2318
                            Error **errp)
{
2319 2320 2321
    Error *local_err = NULL;
    int rc;

2322 2323 2324
    if (!has_force) {
        force = false;
    }
2325 2326 2327
    rc = do_open_tray(has_device ? device : NULL,
                      has_id ? id : NULL,
                      force, &local_err);
2328 2329 2330 2331 2332
    if (rc && rc != -ENOSYS && rc != -EINPROGRESS) {
        error_propagate(errp, local_err);
        return;
    }
    error_free(local_err);
M
Max Reitz 已提交
2333 2334
}

2335 2336 2337
void qmp_blockdev_close_tray(bool has_device, const char *device,
                             bool has_id, const char *id,
                             Error **errp)
M
Max Reitz 已提交
2338 2339 2340
{
    BlockBackend *blk;

2341 2342 2343 2344
    device = has_device ? device : NULL;
    id = has_id ? id : NULL;

    blk = qmp_get_blk(device, id, errp);
M
Max Reitz 已提交
2345 2346 2347 2348 2349
    if (!blk) {
        return;
    }

    if (!blk_dev_has_removable_media(blk)) {
2350
        error_setg(errp, "Device '%s' is not removable", device ?: id);
M
Max Reitz 已提交
2351 2352 2353
        return;
    }

2354 2355 2356 2357 2358
    if (!blk_dev_has_tray(blk)) {
        /* Ignore this command on tray-less devices */
        return;
    }

M
Max Reitz 已提交
2359 2360 2361 2362 2363 2364 2365
    if (!blk_dev_is_tray_open(blk)) {
        return;
    }

    blk_dev_change_media_cb(blk, true);
}

2366 2367
void qmp_x_blockdev_remove_medium(bool has_device, const char *device,
                                  bool has_id, const char *id, Error **errp)
M
Max Reitz 已提交
2368 2369 2370 2371
{
    BlockBackend *blk;
    BlockDriverState *bs;
    AioContext *aio_context;
2372
    bool has_attached_device;
M
Max Reitz 已提交
2373

2374 2375 2376 2377
    device = has_device ? device : NULL;
    id = has_id ? id : NULL;

    blk = qmp_get_blk(device, id, errp);
M
Max Reitz 已提交
2378 2379 2380 2381 2382
    if (!blk) {
        return;
    }

    /* For BBs without a device, we can exchange the BDS tree at will */
2383
    has_attached_device = blk_get_attached_dev(blk);
M
Max Reitz 已提交
2384

2385 2386
    if (has_attached_device && !blk_dev_has_removable_media(blk)) {
        error_setg(errp, "Device '%s' is not removable", device ?: id);
M
Max Reitz 已提交
2387 2388 2389
        return;
    }

2390 2391 2392 2393
    if (has_attached_device && blk_dev_has_tray(blk) &&
        !blk_dev_is_tray_open(blk))
    {
        error_setg(errp, "Tray of device '%s' is not open", device ?: id);
M
Max Reitz 已提交
2394 2395 2396 2397 2398 2399 2400 2401 2402 2403 2404 2405 2406 2407 2408 2409 2410
        return;
    }

    bs = blk_bs(blk);
    if (!bs) {
        return;
    }

    aio_context = bdrv_get_aio_context(bs);
    aio_context_acquire(aio_context);

    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_EJECT, errp)) {
        goto out;
    }

    blk_remove_bs(blk);

2411 2412 2413 2414 2415 2416 2417 2418
    if (!blk_dev_has_tray(blk)) {
        /* For tray-less devices, blockdev-open-tray is a no-op (or may not be
         * called at all); therefore, the medium needs to be ejected here.
         * Do it after blk_remove_bs() so blk_is_inserted(blk) returns the @load
         * value passed here (i.e. false). */
        blk_dev_change_media_cb(blk, false);
    }

M
Max Reitz 已提交
2419 2420 2421 2422
out:
    aio_context_release(aio_context);
}

2423
static void qmp_blockdev_insert_anon_medium(BlockBackend *blk,
M
Max Reitz 已提交
2424 2425 2426 2427 2428 2429 2430 2431
                                            BlockDriverState *bs, Error **errp)
{
    bool has_device;

    /* For BBs without a device, we can exchange the BDS tree at will */
    has_device = blk_get_attached_dev(blk);

    if (has_device && !blk_dev_has_removable_media(blk)) {
2432
        error_setg(errp, "Device is not removable");
M
Max Reitz 已提交
2433 2434 2435
        return;
    }

2436
    if (has_device && blk_dev_has_tray(blk) && !blk_dev_is_tray_open(blk)) {
2437
        error_setg(errp, "Tray of the device is not open");
M
Max Reitz 已提交
2438 2439 2440 2441
        return;
    }

    if (blk_bs(blk)) {
2442
        error_setg(errp, "There already is a medium in the device");
M
Max Reitz 已提交
2443 2444 2445 2446 2447
        return;
    }

    blk_insert_bs(blk, bs);

2448 2449 2450 2451 2452 2453 2454 2455
    if (!blk_dev_has_tray(blk)) {
        /* For tray-less devices, blockdev-close-tray is a no-op (or may not be
         * called at all); therefore, the medium needs to be pushed into the
         * slot here.
         * Do it after blk_insert_bs() so blk_is_inserted(blk) returns the @load
         * value passed here (i.e. true). */
        blk_dev_change_media_cb(blk, true);
    }
M
Max Reitz 已提交
2456 2457
}

2458 2459 2460
void qmp_x_blockdev_insert_medium(bool has_device, const char *device,
                                  bool has_id, const char *id,
                                  const char *node_name, Error **errp)
M
Max Reitz 已提交
2461
{
2462
    BlockBackend *blk;
M
Max Reitz 已提交
2463 2464
    BlockDriverState *bs;

2465 2466 2467 2468 2469 2470 2471
    blk = qmp_get_blk(has_device ? device : NULL,
                      has_id ? id : NULL,
                      errp);
    if (!blk) {
        return;
    }

M
Max Reitz 已提交
2472 2473 2474 2475 2476 2477
    bs = bdrv_find_node(node_name);
    if (!bs) {
        error_setg(errp, "Node '%s' not found", node_name);
        return;
    }

K
Kevin Wolf 已提交
2478
    if (bdrv_has_blk(bs)) {
2479
        error_setg(errp, "Node '%s' is already in use", node_name);
M
Max Reitz 已提交
2480 2481 2482
        return;
    }

2483
    qmp_blockdev_insert_anon_medium(blk, bs, errp);
M
Max Reitz 已提交
2484 2485
}

2486 2487 2488
void qmp_blockdev_change_medium(bool has_device, const char *device,
                                bool has_id, const char *id,
                                const char *filename,
M
Max Reitz 已提交
2489
                                bool has_format, const char *format,
2490 2491
                                bool has_read_only,
                                BlockdevChangeReadOnlyMode read_only,
M
Max Reitz 已提交
2492
                                Error **errp)
2493 2494 2495
{
    BlockBackend *blk;
    BlockDriverState *medium_bs = NULL;
M
Max Reitz 已提交
2496
    int bdrv_flags;
2497
    bool detect_zeroes;
2498
    int rc;
2499 2500 2501
    QDict *options = NULL;
    Error *err = NULL;

2502 2503 2504
    blk = qmp_get_blk(has_device ? device : NULL,
                      has_id ? id : NULL,
                      errp);
2505 2506 2507 2508 2509 2510 2511 2512 2513
    if (!blk) {
        goto fail;
    }

    if (blk_bs(blk)) {
        blk_update_root_state(blk);
    }

    bdrv_flags = blk_get_open_flags_from_root_state(blk);
2514 2515
    bdrv_flags &= ~(BDRV_O_TEMPORARY | BDRV_O_SNAPSHOT | BDRV_O_NO_BACKING |
        BDRV_O_PROTOCOL);
2516

2517 2518 2519 2520 2521 2522 2523 2524 2525 2526 2527 2528 2529 2530 2531 2532 2533 2534 2535 2536
    if (!has_read_only) {
        read_only = BLOCKDEV_CHANGE_READ_ONLY_MODE_RETAIN;
    }

    switch (read_only) {
    case BLOCKDEV_CHANGE_READ_ONLY_MODE_RETAIN:
        break;

    case BLOCKDEV_CHANGE_READ_ONLY_MODE_READ_ONLY:
        bdrv_flags &= ~BDRV_O_RDWR;
        break;

    case BLOCKDEV_CHANGE_READ_ONLY_MODE_READ_WRITE:
        bdrv_flags |= BDRV_O_RDWR;
        break;

    default:
        abort();
    }

2537 2538 2539 2540 2541
    options = qdict_new();
    detect_zeroes = blk_get_detect_zeroes_from_root_state(blk);
    qdict_put(options, "detect-zeroes",
              qstring_from_str(detect_zeroes ? "on" : "off"));

M
Max Reitz 已提交
2542
    if (has_format) {
2543 2544 2545
        qdict_put(options, "driver", qstring_from_str(format));
    }

M
Max Reitz 已提交
2546 2547
    medium_bs = bdrv_open(filename, NULL, options, bdrv_flags, errp);
    if (!medium_bs) {
2548 2549 2550 2551 2552 2553 2554 2555 2556
        goto fail;
    }

    bdrv_add_key(medium_bs, NULL, &err);
    if (err) {
        error_propagate(errp, err);
        goto fail;
    }

2557 2558 2559
    rc = do_open_tray(has_device ? device : NULL,
                      has_id ? id : NULL,
                      false, &err);
2560
    if (rc && rc != -ENOSYS) {
2561 2562 2563
        error_propagate(errp, err);
        goto fail;
    }
2564 2565
    error_free(err);
    err = NULL;
2566

2567
    qmp_x_blockdev_remove_medium(has_device, device, has_id, id, &err);
2568 2569 2570 2571 2572
    if (err) {
        error_propagate(errp, err);
        goto fail;
    }

2573
    qmp_blockdev_insert_anon_medium(blk, medium_bs, &err);
2574 2575 2576 2577 2578
    if (err) {
        error_propagate(errp, err);
        goto fail;
    }

2579
    qmp_blockdev_close_tray(has_device, device, has_id, id, errp);
2580 2581 2582 2583 2584 2585 2586 2587

fail:
    /* If the medium has been inserted, the device has its own reference, so
     * ours must be relinquished; and if it has not been inserted successfully,
     * the reference must be relinquished anyway */
    bdrv_unref(medium_bs);
}

Z
Zhi Yong Wu 已提交
2588
/* throttling disk I/O limits */
2589
void qmp_block_set_io_throttle(BlockIOThrottle *arg, Error **errp)
Z
Zhi Yong Wu 已提交
2590
{
2591
    ThrottleConfig cfg;
Z
Zhi Yong Wu 已提交
2592
    BlockDriverState *bs;
2593
    BlockBackend *blk;
2594
    AioContext *aio_context;
Z
Zhi Yong Wu 已提交
2595

2596 2597 2598
    blk = qmp_get_blk(arg->has_device ? arg->device : NULL,
                      arg->has_id ? arg->id : NULL,
                      errp);
2599
    if (!blk) {
2600
        return;
Z
Zhi Yong Wu 已提交
2601
    }
M
Max Reitz 已提交
2602 2603 2604 2605

    aio_context = blk_get_aio_context(blk);
    aio_context_acquire(aio_context);

2606
    bs = blk_bs(blk);
M
Max Reitz 已提交
2607
    if (!bs) {
2608
        error_setg(errp, "Device has no medium");
M
Max Reitz 已提交
2609 2610
        goto out;
    }
Z
Zhi Yong Wu 已提交
2611

2612
    throttle_config_init(&cfg);
2613 2614 2615
    cfg.buckets[THROTTLE_BPS_TOTAL].avg = arg->bps;
    cfg.buckets[THROTTLE_BPS_READ].avg  = arg->bps_rd;
    cfg.buckets[THROTTLE_BPS_WRITE].avg = arg->bps_wr;
2616

2617 2618 2619
    cfg.buckets[THROTTLE_OPS_TOTAL].avg = arg->iops;
    cfg.buckets[THROTTLE_OPS_READ].avg  = arg->iops_rd;
    cfg.buckets[THROTTLE_OPS_WRITE].avg = arg->iops_wr;
2620

2621 2622
    if (arg->has_bps_max) {
        cfg.buckets[THROTTLE_BPS_TOTAL].max = arg->bps_max;
2623
    }
2624 2625
    if (arg->has_bps_rd_max) {
        cfg.buckets[THROTTLE_BPS_READ].max = arg->bps_rd_max;
2626
    }
2627 2628
    if (arg->has_bps_wr_max) {
        cfg.buckets[THROTTLE_BPS_WRITE].max = arg->bps_wr_max;
2629
    }
2630 2631
    if (arg->has_iops_max) {
        cfg.buckets[THROTTLE_OPS_TOTAL].max = arg->iops_max;
2632
    }
2633 2634
    if (arg->has_iops_rd_max) {
        cfg.buckets[THROTTLE_OPS_READ].max = arg->iops_rd_max;
2635
    }
2636 2637
    if (arg->has_iops_wr_max) {
        cfg.buckets[THROTTLE_OPS_WRITE].max = arg->iops_wr_max;
2638
    }
Z
Zhi Yong Wu 已提交
2639

2640 2641
    if (arg->has_bps_max_length) {
        cfg.buckets[THROTTLE_BPS_TOTAL].burst_length = arg->bps_max_length;
2642
    }
2643 2644
    if (arg->has_bps_rd_max_length) {
        cfg.buckets[THROTTLE_BPS_READ].burst_length = arg->bps_rd_max_length;
2645
    }
2646 2647
    if (arg->has_bps_wr_max_length) {
        cfg.buckets[THROTTLE_BPS_WRITE].burst_length = arg->bps_wr_max_length;
2648
    }
2649 2650
    if (arg->has_iops_max_length) {
        cfg.buckets[THROTTLE_OPS_TOTAL].burst_length = arg->iops_max_length;
2651
    }
2652 2653
    if (arg->has_iops_rd_max_length) {
        cfg.buckets[THROTTLE_OPS_READ].burst_length = arg->iops_rd_max_length;
2654
    }
2655 2656
    if (arg->has_iops_wr_max_length) {
        cfg.buckets[THROTTLE_OPS_WRITE].burst_length = arg->iops_wr_max_length;
2657 2658
    }

2659 2660
    if (arg->has_iops_size) {
        cfg.op_size = arg->iops_size;
2661
    }
2662

2663
    if (!throttle_is_valid(&cfg, errp)) {
M
Max Reitz 已提交
2664
        goto out;
Z
Zhi Yong Wu 已提交
2665 2666
    }

2667 2668 2669
    if (throttle_enabled(&cfg)) {
        /* Enable I/O limits if they're not enabled yet, otherwise
         * just update the throttling group. */
2670
        if (!blk_get_public(blk)->throttle_state) {
2671
            blk_io_limits_enable(blk,
2672 2673 2674
                                 arg->has_group ? arg->group :
                                 arg->has_device ? arg->device :
                                 arg->id);
2675 2676
        } else if (arg->has_group) {
            blk_io_limits_update_group(blk, arg->group);
2677 2678
        }
        /* Set the new throttling configuration */
2679 2680
        blk_set_io_limits(blk, &cfg);
    } else if (blk_get_public(blk)->throttle_state) {
2681
        /* If all throttling settings are set to 0, disable I/O limits */
2682
        blk_io_limits_disable(blk);
Z
Zhi Yong Wu 已提交
2683
    }
2684

M
Max Reitz 已提交
2685
out:
2686
    aio_context_release(aio_context);
Z
Zhi Yong Wu 已提交
2687 2688
}

2689 2690 2691 2692 2693 2694 2695 2696 2697 2698 2699 2700 2701 2702 2703 2704 2705 2706 2707 2708 2709 2710 2711 2712 2713 2714 2715 2716 2717 2718 2719 2720 2721 2722 2723 2724 2725 2726 2727 2728 2729 2730 2731 2732 2733 2734 2735 2736 2737
void qmp_block_dirty_bitmap_add(const char *node, const char *name,
                                bool has_granularity, uint32_t granularity,
                                Error **errp)
{
    AioContext *aio_context;
    BlockDriverState *bs;

    if (!name || name[0] == '\0') {
        error_setg(errp, "Bitmap name cannot be empty");
        return;
    }

    bs = bdrv_lookup_bs(node, node, errp);
    if (!bs) {
        return;
    }

    aio_context = bdrv_get_aio_context(bs);
    aio_context_acquire(aio_context);

    if (has_granularity) {
        if (granularity < 512 || !is_power_of_2(granularity)) {
            error_setg(errp, "Granularity must be power of 2 "
                             "and at least 512");
            goto out;
        }
    } else {
        /* Default to cluster size, if available: */
        granularity = bdrv_get_default_bitmap_granularity(bs);
    }

    bdrv_create_dirty_bitmap(bs, granularity, name, errp);

 out:
    aio_context_release(aio_context);
}

void qmp_block_dirty_bitmap_remove(const char *node, const char *name,
                                   Error **errp)
{
    AioContext *aio_context;
    BlockDriverState *bs;
    BdrvDirtyBitmap *bitmap;

    bitmap = block_dirty_bitmap_lookup(node, name, &bs, &aio_context, errp);
    if (!bitmap || !bs) {
        return;
    }

J
John Snow 已提交
2738 2739 2740 2741 2742 2743
    if (bdrv_dirty_bitmap_frozen(bitmap)) {
        error_setg(errp,
                   "Bitmap '%s' is currently frozen and cannot be removed",
                   name);
        goto out;
    }
2744
    bdrv_dirty_bitmap_make_anon(bitmap);
2745 2746
    bdrv_release_dirty_bitmap(bs, bitmap);

J
John Snow 已提交
2747
 out:
2748 2749 2750
    aio_context_release(aio_context);
}

J
John Snow 已提交
2751 2752 2753 2754 2755 2756 2757 2758 2759 2760 2761 2762 2763 2764 2765 2766 2767 2768 2769 2770 2771 2772 2773 2774 2775 2776 2777 2778
/**
 * Completely clear a bitmap, for the purposes of synchronizing a bitmap
 * immediately after a full backup operation.
 */
void qmp_block_dirty_bitmap_clear(const char *node, const char *name,
                                  Error **errp)
{
    AioContext *aio_context;
    BdrvDirtyBitmap *bitmap;
    BlockDriverState *bs;

    bitmap = block_dirty_bitmap_lookup(node, name, &bs, &aio_context, errp);
    if (!bitmap || !bs) {
        return;
    }

    if (bdrv_dirty_bitmap_frozen(bitmap)) {
        error_setg(errp,
                   "Bitmap '%s' is currently frozen and cannot be modified",
                   name);
        goto out;
    } else if (!bdrv_dirty_bitmap_enabled(bitmap)) {
        error_setg(errp,
                   "Bitmap '%s' is currently disabled and cannot be cleared",
                   name);
        goto out;
    }

F
Fam Zheng 已提交
2779
    bdrv_clear_dirty_bitmap(bitmap, NULL);
J
John Snow 已提交
2780 2781 2782 2783 2784

 out:
    aio_context_release(aio_context);
}

2785
void hmp_drive_del(Monitor *mon, const QDict *qdict)
2786 2787
{
    const char *id = qdict_get_str(qdict, "id");
2788
    BlockBackend *blk;
2789
    BlockDriverState *bs;
2790
    AioContext *aio_context;
2791
    Error *local_err = NULL;
2792

2793 2794
    bs = bdrv_find_node(id);
    if (bs) {
2795
        qmp_x_blockdev_del(id, &local_err);
2796 2797 2798 2799 2800 2801
        if (local_err) {
            error_report_err(local_err);
        }
        return;
    }

2802 2803
    blk = blk_by_name(id);
    if (!blk) {
2804
        error_report("Device '%s' not found", id);
2805
        return;
2806
    }
2807

2808
    if (!blk_legacy_dinfo(blk)) {
2809 2810
        error_report("Deleting device added with blockdev-add"
                     " is not supported");
2811
        return;
2812 2813
    }

M
Max Reitz 已提交
2814
    aio_context = blk_get_aio_context(blk);
2815 2816
    aio_context_acquire(aio_context);

M
Max Reitz 已提交
2817 2818 2819 2820 2821 2822 2823
    bs = blk_bs(blk);
    if (bs) {
        if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_DRIVE_DEL, &local_err)) {
            error_report_err(local_err);
            aio_context_release(aio_context);
            return;
        }
2824

2825
        blk_remove_bs(blk);
M
Max Reitz 已提交
2826
    }
2827

2828
    /* Make the BlockBackend and the attached BlockDriverState anonymous */
2829 2830
    monitor_remove_blk(blk);

2831 2832
    /* If this BlockBackend has a device attached to it, its refcount will be
     * decremented when the device is removed; otherwise we have to do so here.
2833
     */
2834
    if (blk_get_attached_dev(blk)) {
2835
        /* Further I/O must not pause the guest */
2836 2837
        blk_set_on_error(blk, BLOCKDEV_ON_ERROR_REPORT,
                         BLOCKDEV_ON_ERROR_REPORT);
2838
    } else {
2839
        blk_unref(blk);
2840 2841
    }

2842
    aio_context_release(aio_context);
2843
}
2844

2845 2846 2847
void qmp_block_resize(bool has_device, const char *device,
                      bool has_node_name, const char *node_name,
                      int64_t size, Error **errp)
2848
{
2849
    Error *local_err = NULL;
2850
    BlockDriverState *bs;
2851
    AioContext *aio_context;
2852
    int ret;
2853

2854 2855 2856
    bs = bdrv_lookup_bs(has_device ? device : NULL,
                        has_node_name ? node_name : NULL,
                        &local_err);
2857
    if (local_err) {
2858 2859 2860 2861
        error_propagate(errp, local_err);
        return;
    }

2862 2863 2864
    aio_context = bdrv_get_aio_context(bs);
    aio_context_acquire(aio_context);

2865
    if (!bdrv_is_first_non_filter(bs)) {
2866
        error_setg(errp, QERR_FEATURE_DISABLED, "resize");
2867
        goto out;
2868 2869 2870
    }

    if (size < 0) {
2871
        error_setg(errp, QERR_INVALID_PARAMETER_VALUE, "size", "a >0 size");
2872
        goto out;
2873 2874
    }

2875
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_RESIZE, NULL)) {
2876
        error_setg(errp, QERR_DEVICE_IN_USE, device);
2877
        goto out;
2878 2879
    }

2880 2881 2882
    /* complete all in-flight operations before resizing the device */
    bdrv_drain_all();

2883 2884
    ret = bdrv_truncate(bs, size);
    switch (ret) {
2885 2886 2887
    case 0:
        break;
    case -ENOMEDIUM:
2888
        error_setg(errp, QERR_DEVICE_HAS_NO_MEDIUM, device);
2889 2890
        break;
    case -ENOTSUP:
2891
        error_setg(errp, QERR_UNSUPPORTED);
2892 2893
        break;
    case -EACCES:
2894
        error_setg(errp, "Device '%s' is read only", device);
2895 2896
        break;
    case -EBUSY:
2897
        error_setg(errp, QERR_DEVICE_IN_USE, device);
2898 2899
        break;
    default:
2900
        error_setg_errno(errp, -ret, "Could not resize");
2901
        break;
2902
    }
2903 2904 2905

out:
    aio_context_release(aio_context);
2906
}
S
Stefan Hajnoczi 已提交
2907

2908
static void block_job_cb(void *opaque, int ret)
S
Stefan Hajnoczi 已提交
2909
{
2910 2911 2912 2913 2914
    /* Note that this function may be executed from another AioContext besides
     * the QEMU main loop.  If you need to access anything that assumes the
     * QEMU global mutex, use a BH or introduce a mutex.
     */

S
Stefan Hajnoczi 已提交
2915
    BlockDriverState *bs = opaque;
2916
    const char *msg = NULL;
S
Stefan Hajnoczi 已提交
2917

2918
    trace_block_job_cb(bs, bs->job, ret);
S
Stefan Hajnoczi 已提交
2919 2920

    assert(bs->job);
2921

S
Stefan Hajnoczi 已提交
2922
    if (ret < 0) {
2923
        msg = strerror(-ret);
S
Stefan Hajnoczi 已提交
2924 2925
    }

2926
    if (block_job_is_cancelled(bs->job)) {
2927
        block_job_event_cancelled(bs->job);
2928
    } else {
2929
        block_job_event_completed(bs->job, msg);
2930
    }
S
Stefan Hajnoczi 已提交
2931 2932
}

2933
void qmp_block_stream(bool has_job_id, const char *job_id, const char *device,
2934 2935 2936
                      bool has_base, const char *base,
                      bool has_backing_file, const char *backing_file,
                      bool has_speed, int64_t speed,
P
Paolo Bonzini 已提交
2937 2938
                      bool has_on_error, BlockdevOnError on_error,
                      Error **errp)
S
Stefan Hajnoczi 已提交
2939 2940
{
    BlockDriverState *bs;
2941
    BlockDriverState *base_bs = NULL;
2942
    AioContext *aio_context;
2943
    Error *local_err = NULL;
2944
    const char *base_name = NULL;
S
Stefan Hajnoczi 已提交
2945

P
Paolo Bonzini 已提交
2946 2947 2948 2949
    if (!has_on_error) {
        on_error = BLOCKDEV_ON_ERROR_REPORT;
    }

2950 2951
    bs = qmp_get_root_bs(device, errp);
    if (!bs) {
S
Stefan Hajnoczi 已提交
2952 2953 2954
        return;
    }

2955
    aio_context = bdrv_get_aio_context(bs);
2956 2957
    aio_context_acquire(aio_context);

2958
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_STREAM, errp)) {
2959
        goto out;
2960 2961
    }

2962
    if (has_base) {
2963 2964
        base_bs = bdrv_find_backing_image(bs, base);
        if (base_bs == NULL) {
2965
            error_setg(errp, QERR_BASE_NOT_FOUND, base);
2966
            goto out;
2967
        }
2968
        assert(bdrv_get_aio_context(base_bs) == aio_context);
2969
        base_name = base;
S
Stefan Hajnoczi 已提交
2970 2971
    }

2972 2973 2974 2975 2976
    /* if we are streaming the entire chain, the result will have no backing
     * file, and specifying one is therefore an error */
    if (base_bs == NULL && has_backing_file) {
        error_setg(errp, "backing file specified, but streaming the "
                         "entire chain");
2977
        goto out;
2978 2979 2980 2981 2982
    }

    /* backing_file string overrides base bs filename */
    base_name = has_backing_file ? backing_file : base_name;

2983 2984
    stream_start(has_job_id ? job_id : NULL, bs, base_bs, base_name,
                 has_speed ? speed : 0, on_error, block_job_cb, bs, &local_err);
2985
    if (local_err) {
2986
        error_propagate(errp, local_err);
2987
        goto out;
S
Stefan Hajnoczi 已提交
2988 2989 2990
    }

    trace_qmp_block_stream(bs, bs->job);
2991 2992 2993

out:
    aio_context_release(aio_context);
S
Stefan Hajnoczi 已提交
2994
}
2995

2996
void qmp_block_commit(bool has_job_id, const char *job_id, const char *device,
2997 2998
                      bool has_base, const char *base,
                      bool has_top, const char *top,
2999
                      bool has_backing_file, const char *backing_file,
3000 3001 3002 3003 3004
                      bool has_speed, int64_t speed,
                      Error **errp)
{
    BlockDriverState *bs;
    BlockDriverState *base_bs, *top_bs;
3005
    AioContext *aio_context;
3006 3007 3008 3009
    Error *local_err = NULL;
    /* This will be part of the QMP command, if/when the
     * BlockdevOnError change for blkmirror makes it in
     */
3010
    BlockdevOnError on_error = BLOCKDEV_ON_ERROR_REPORT;
3011

3012 3013 3014 3015
    if (!has_speed) {
        speed = 0;
    }

3016 3017 3018 3019 3020
    /* Important Note:
     *  libvirt relies on the DeviceNotFound error class in order to probe for
     *  live commit feature versions; for this to work, we must make sure to
     *  perform the device lookup before any generic errors that may occur in a
     *  scenario in which all optional arguments are omitted. */
3021 3022 3023 3024 3025 3026 3027 3028 3029 3030
    bs = qmp_get_root_bs(device, &local_err);
    if (!bs) {
        bs = bdrv_lookup_bs(device, device, NULL);
        if (!bs) {
            error_free(local_err);
            error_set(errp, ERROR_CLASS_DEVICE_NOT_FOUND,
                      "Device '%s' not found", device);
        } else {
            error_propagate(errp, local_err);
        }
3031
        return;
3032 3033
    }

3034
    aio_context = bdrv_get_aio_context(bs);
3035 3036
    aio_context_acquire(aio_context);

3037
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_COMMIT_SOURCE, errp)) {
3038
        goto out;
3039 3040 3041 3042 3043
    }

    /* default top_bs is the active layer */
    top_bs = bs;

3044
    if (has_top && top) {
3045 3046 3047 3048 3049 3050 3051
        if (strcmp(bs->filename, top) != 0) {
            top_bs = bdrv_find_backing_image(bs, top);
        }
    }

    if (top_bs == NULL) {
        error_setg(errp, "Top image file %s not found", top ? top : "NULL");
3052
        goto out;
3053 3054
    }

3055 3056
    assert(bdrv_get_aio_context(top_bs) == aio_context);

3057 3058 3059 3060 3061 3062 3063
    if (has_base && base) {
        base_bs = bdrv_find_backing_image(top_bs, base);
    } else {
        base_bs = bdrv_find_base(top_bs);
    }

    if (base_bs == NULL) {
3064
        error_setg(errp, QERR_BASE_NOT_FOUND, base ? base : "NULL");
3065
        goto out;
3066 3067
    }

3068 3069
    assert(bdrv_get_aio_context(base_bs) == aio_context);

3070 3071 3072 3073
    if (bdrv_op_is_blocked(base_bs, BLOCK_OP_TYPE_COMMIT_TARGET, errp)) {
        goto out;
    }

3074 3075 3076
    /* Do not allow attempts to commit an image into itself */
    if (top_bs == base_bs) {
        error_setg(errp, "cannot commit an image into itself");
3077
        goto out;
3078 3079
    }

F
Fam Zheng 已提交
3080
    if (top_bs == bs) {
3081 3082 3083
        if (has_backing_file) {
            error_setg(errp, "'backing-file' specified,"
                             " but 'top' is the active layer");
3084
            goto out;
3085
        }
3086
        commit_active_start(has_job_id ? job_id : NULL, bs, base_bs, speed,
3087
                            on_error, block_job_cb, bs, &local_err, false);
F
Fam Zheng 已提交
3088
    } else {
3089 3090
        commit_start(has_job_id ? job_id : NULL, bs, base_bs, top_bs, speed,
                     on_error, block_job_cb, bs,
3091
                     has_backing_file ? backing_file : NULL, &local_err);
F
Fam Zheng 已提交
3092
    }
3093 3094
    if (local_err != NULL) {
        error_propagate(errp, local_err);
3095
        goto out;
3096
    }
3097 3098 3099

out:
    aio_context_release(aio_context);
3100 3101
}

P
Pavel Butsykin 已提交
3102
static void do_drive_backup(DriveBackup *backup, BlockJobTxn *txn, Error **errp)
3103 3104 3105
{
    BlockDriverState *bs;
    BlockDriverState *target_bs;
3106
    BlockDriverState *source = NULL;
3107
    BdrvDirtyBitmap *bmap = NULL;
3108
    AioContext *aio_context;
3109
    QDict *options = NULL;
3110 3111 3112 3113
    Error *local_err = NULL;
    int flags;
    int64_t size;

P
Pavel Butsykin 已提交
3114 3115
    if (!backup->has_speed) {
        backup->speed = 0;
3116
    }
P
Pavel Butsykin 已提交
3117 3118
    if (!backup->has_on_source_error) {
        backup->on_source_error = BLOCKDEV_ON_ERROR_REPORT;
3119
    }
P
Pavel Butsykin 已提交
3120 3121
    if (!backup->has_on_target_error) {
        backup->on_target_error = BLOCKDEV_ON_ERROR_REPORT;
3122
    }
P
Pavel Butsykin 已提交
3123 3124 3125 3126 3127
    if (!backup->has_mode) {
        backup->mode = NEW_IMAGE_MODE_ABSOLUTE_PATHS;
    }
    if (!backup->has_job_id) {
        backup->job_id = NULL;
3128
    }
3129 3130 3131
    if (!backup->has_compress) {
        backup->compress = false;
    }
3132

P
Pavel Butsykin 已提交
3133
    bs = qmp_get_root_bs(backup->device, errp);
3134
    if (!bs) {
3135 3136 3137
        return;
    }

3138
    aio_context = bdrv_get_aio_context(bs);
3139 3140
    aio_context_acquire(aio_context);

P
Pavel Butsykin 已提交
3141 3142 3143
    if (!backup->has_format) {
        backup->format = backup->mode == NEW_IMAGE_MODE_EXISTING ?
                         NULL : (char*) bs->drv->format_name;
3144 3145
    }

F
Fam Zheng 已提交
3146
    /* Early check to avoid creating target */
3147
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_BACKUP_SOURCE, errp)) {
3148
        goto out;
3149 3150
    }

K
Kevin Wolf 已提交
3151
    flags = bs->open_flags | BDRV_O_RDWR;
3152

3153 3154
    /* See if we have a backing HD we can use to create our new image
     * on top of. */
P
Pavel Butsykin 已提交
3155
    if (backup->sync == MIRROR_SYNC_MODE_TOP) {
3156
        source = backing_bs(bs);
3157
        if (!source) {
P
Pavel Butsykin 已提交
3158
            backup->sync = MIRROR_SYNC_MODE_FULL;
3159 3160
        }
    }
P
Pavel Butsykin 已提交
3161
    if (backup->sync == MIRROR_SYNC_MODE_NONE) {
3162 3163 3164
        source = bs;
    }

3165 3166 3167
    size = bdrv_getlength(bs);
    if (size < 0) {
        error_setg_errno(errp, -size, "bdrv_getlength failed");
3168
        goto out;
3169 3170
    }

P
Pavel Butsykin 已提交
3171 3172
    if (backup->mode != NEW_IMAGE_MODE_EXISTING) {
        assert(backup->format);
3173
        if (source) {
P
Pavel Butsykin 已提交
3174
            bdrv_img_create(backup->target, backup->format, source->filename,
3175 3176 3177
                            source->drv->format_name, NULL,
                            size, flags, &local_err, false);
        } else {
P
Pavel Butsykin 已提交
3178
            bdrv_img_create(backup->target, backup->format, NULL, NULL, NULL,
3179 3180
                            size, flags, &local_err, false);
        }
3181 3182
    }

3183
    if (local_err) {
3184
        error_propagate(errp, local_err);
3185
        goto out;
3186 3187
    }

P
Pavel Butsykin 已提交
3188
    if (backup->format) {
3189
        options = qdict_new();
P
Pavel Butsykin 已提交
3190
        qdict_put(options, "driver", qstring_from_str(backup->format));
3191 3192
    }

P
Pavel Butsykin 已提交
3193
    target_bs = bdrv_open(backup->target, NULL, options, flags, errp);
M
Max Reitz 已提交
3194
    if (!target_bs) {
3195
        goto out;
3196 3197
    }

3198 3199
    bdrv_set_aio_context(target_bs, aio_context);

P
Pavel Butsykin 已提交
3200 3201
    if (backup->has_bitmap) {
        bmap = bdrv_find_dirty_bitmap(bs, backup->bitmap);
3202
        if (!bmap) {
P
Pavel Butsykin 已提交
3203
            error_setg(errp, "Bitmap '%s' could not be found", backup->bitmap);
3204
            bdrv_unref(target_bs);
3205 3206 3207 3208
            goto out;
        }
    }

P
Pavel Butsykin 已提交
3209
    backup_start(backup->job_id, bs, target_bs, backup->speed, backup->sync,
3210 3211
                 bmap, backup->compress, backup->on_source_error,
                 backup->on_target_error, block_job_cb, bs, txn, &local_err);
K
Kevin Wolf 已提交
3212
    bdrv_unref(target_bs);
3213 3214
    if (local_err != NULL) {
        error_propagate(errp, local_err);
3215
        goto out;
3216
    }
3217 3218 3219

out:
    aio_context_release(aio_context);
3220 3221
}

P
Pavel Butsykin 已提交
3222
void qmp_drive_backup(DriveBackup *arg, Error **errp)
3223
{
P
Pavel Butsykin 已提交
3224
    return do_drive_backup(arg, NULL, errp);
3225 3226
}

3227 3228
BlockDeviceInfoList *qmp_query_named_block_nodes(Error **errp)
{
3229
    return bdrv_named_nodes_list(errp);
3230 3231
}

P
Pavel Butsykin 已提交
3232
void do_blockdev_backup(BlockdevBackup *backup, BlockJobTxn *txn, Error **errp)
F
Fam Zheng 已提交
3233 3234 3235 3236 3237 3238
{
    BlockDriverState *bs;
    BlockDriverState *target_bs;
    Error *local_err = NULL;
    AioContext *aio_context;

P
Pavel Butsykin 已提交
3239 3240
    if (!backup->has_speed) {
        backup->speed = 0;
F
Fam Zheng 已提交
3241
    }
P
Pavel Butsykin 已提交
3242 3243 3244 3245 3246
    if (!backup->has_on_source_error) {
        backup->on_source_error = BLOCKDEV_ON_ERROR_REPORT;
    }
    if (!backup->has_on_target_error) {
        backup->on_target_error = BLOCKDEV_ON_ERROR_REPORT;
F
Fam Zheng 已提交
3247
    }
P
Pavel Butsykin 已提交
3248 3249
    if (!backup->has_job_id) {
        backup->job_id = NULL;
F
Fam Zheng 已提交
3250
    }
3251 3252 3253
    if (!backup->has_compress) {
        backup->compress = false;
    }
F
Fam Zheng 已提交
3254

P
Pavel Butsykin 已提交
3255
    bs = qmp_get_root_bs(backup->device, errp);
3256
    if (!bs) {
F
Fam Zheng 已提交
3257 3258 3259
        return;
    }

3260
    aio_context = bdrv_get_aio_context(bs);
F
Fam Zheng 已提交
3261 3262
    aio_context_acquire(aio_context);

P
Pavel Butsykin 已提交
3263
    target_bs = bdrv_lookup_bs(backup->target, backup->target, errp);
3264
    if (!target_bs) {
M
Max Reitz 已提交
3265 3266
        goto out;
    }
F
Fam Zheng 已提交
3267

3268 3269 3270 3271 3272 3273 3274 3275 3276 3277 3278
    if (bdrv_get_aio_context(target_bs) != aio_context) {
        if (!bdrv_has_blk(target_bs)) {
            /* The target BDS is not attached, we can safely move it to another
             * AioContext. */
            bdrv_set_aio_context(target_bs, aio_context);
        } else {
            error_setg(errp, "Target is attached to a different thread from "
                             "source.");
            goto out;
        }
    }
P
Pavel Butsykin 已提交
3279
    backup_start(backup->job_id, bs, target_bs, backup->speed, backup->sync,
3280 3281
                 NULL, backup->compress, backup->on_source_error,
                 backup->on_target_error, block_job_cb, bs, txn, &local_err);
F
Fam Zheng 已提交
3282 3283 3284 3285 3286 3287 3288
    if (local_err != NULL) {
        error_propagate(errp, local_err);
    }
out:
    aio_context_release(aio_context);
}

P
Pavel Butsykin 已提交
3289 3290 3291
void qmp_blockdev_backup(BlockdevBackup *arg, Error **errp)
{
    do_blockdev_backup(arg, NULL, errp);
3292 3293
}

3294 3295 3296
/* Parameter check and block job starting for drive mirroring.
 * Caller should hold @device and @target's aio context (must be the same).
 **/
3297
static void blockdev_mirror_common(const char *job_id, BlockDriverState *bs,
3298 3299 3300
                                   BlockDriverState *target,
                                   bool has_replaces, const char *replaces,
                                   enum MirrorSyncMode sync,
M
Max Reitz 已提交
3301
                                   BlockMirrorBackingMode backing_mode,
3302 3303 3304 3305 3306 3307 3308 3309 3310
                                   bool has_speed, int64_t speed,
                                   bool has_granularity, uint32_t granularity,
                                   bool has_buf_size, int64_t buf_size,
                                   bool has_on_source_error,
                                   BlockdevOnError on_source_error,
                                   bool has_on_target_error,
                                   BlockdevOnError on_target_error,
                                   bool has_unmap, bool unmap,
                                   Error **errp)
P
Paolo Bonzini 已提交
3311 3312 3313 3314 3315
{

    if (!has_speed) {
        speed = 0;
    }
3316 3317 3318 3319 3320 3321
    if (!has_on_source_error) {
        on_source_error = BLOCKDEV_ON_ERROR_REPORT;
    }
    if (!has_on_target_error) {
        on_target_error = BLOCKDEV_ON_ERROR_REPORT;
    }
3322 3323 3324
    if (!has_granularity) {
        granularity = 0;
    }
3325
    if (!has_buf_size) {
W
Wen Congyang 已提交
3326
        buf_size = 0;
3327
    }
3328 3329 3330
    if (!has_unmap) {
        unmap = true;
    }
3331

3332
    if (granularity != 0 && (granularity < 512 || granularity > 1048576 * 64)) {
3333 3334
        error_setg(errp, QERR_INVALID_PARAMETER_VALUE, "granularity",
                   "a value in range [512B, 64MB]");
3335 3336 3337
        return;
    }
    if (granularity & (granularity - 1)) {
3338 3339
        error_setg(errp, QERR_INVALID_PARAMETER_VALUE, "granularity",
                   "power of 2");
3340 3341
        return;
    }
P
Paolo Bonzini 已提交
3342

3343 3344 3345
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_MIRROR_SOURCE, errp)) {
        return;
    }
F
Fam Zheng 已提交
3346 3347 3348
    if (bdrv_op_is_blocked(target, BLOCK_OP_TYPE_MIRROR_TARGET, errp)) {
        return;
    }
3349 3350 3351 3352 3353 3354 3355 3356

    if (!bs->backing && sync == MIRROR_SYNC_MODE_TOP) {
        sync = MIRROR_SYNC_MODE_FULL;
    }

    /* pass the node name to replace to mirror start since it's loose coupling
     * and will allow to check whether the node still exist at mirror completion
     */
3357
    mirror_start(job_id, bs, target,
3358
                 has_replaces ? replaces : NULL,
M
Max Reitz 已提交
3359
                 speed, granularity, buf_size, sync, backing_mode,
3360 3361 3362 3363
                 on_source_error, on_target_error, unmap,
                 block_job_cb, bs, errp);
}

E
Eric Blake 已提交
3364
void qmp_drive_mirror(DriveMirror *arg, Error **errp)
3365 3366 3367 3368
{
    BlockDriverState *bs;
    BlockDriverState *source, *target_bs;
    AioContext *aio_context;
M
Max Reitz 已提交
3369
    BlockMirrorBackingMode backing_mode;
3370 3371 3372 3373
    Error *local_err = NULL;
    QDict *options = NULL;
    int flags;
    int64_t size;
E
Eric Blake 已提交
3374
    const char *format = arg->format;
3375

3376 3377
    bs = qmp_get_root_bs(arg->device, errp);
    if (!bs) {
P
Paolo Bonzini 已提交
3378 3379 3380
        return;
    }

3381
    aio_context = bdrv_get_aio_context(bs);
3382 3383
    aio_context_acquire(aio_context);

E
Eric Blake 已提交
3384 3385
    if (!arg->has_mode) {
        arg->mode = NEW_IMAGE_MODE_ABSOLUTE_PATHS;
3386
    }
P
Paolo Bonzini 已提交
3387

E
Eric Blake 已提交
3388 3389 3390
    if (!arg->has_format) {
        format = (arg->mode == NEW_IMAGE_MODE_EXISTING
                  ? NULL : bs->drv->format_name);
P
Paolo Bonzini 已提交
3391 3392
    }

K
Kevin Wolf 已提交
3393
    flags = bs->open_flags | BDRV_O_RDWR;
3394
    source = backing_bs(bs);
E
Eric Blake 已提交
3395 3396
    if (!source && arg->sync == MIRROR_SYNC_MODE_TOP) {
        arg->sync = MIRROR_SYNC_MODE_FULL;
P
Paolo Bonzini 已提交
3397
    }
E
Eric Blake 已提交
3398
    if (arg->sync == MIRROR_SYNC_MODE_NONE) {
3399 3400
        source = bs;
    }
P
Paolo Bonzini 已提交
3401

3402 3403 3404
    size = bdrv_getlength(bs);
    if (size < 0) {
        error_setg_errno(errp, -size, "bdrv_getlength failed");
3405
        goto out;
3406 3407
    }

E
Eric Blake 已提交
3408
    if (arg->has_replaces) {
3409
        BlockDriverState *to_replace_bs;
3410 3411
        AioContext *replace_aio_context;
        int64_t replace_size;
3412

E
Eric Blake 已提交
3413
        if (!arg->has_node_name) {
3414 3415
            error_setg(errp, "a node-name must be provided when replacing a"
                             " named node of the graph");
3416
            goto out;
3417 3418
        }

E
Eric Blake 已提交
3419
        to_replace_bs = check_to_replace_node(bs, arg->replaces, &local_err);
3420 3421 3422

        if (!to_replace_bs) {
            error_propagate(errp, local_err);
3423
            goto out;
3424 3425
        }

3426 3427 3428 3429 3430 3431
        replace_aio_context = bdrv_get_aio_context(to_replace_bs);
        aio_context_acquire(replace_aio_context);
        replace_size = bdrv_getlength(to_replace_bs);
        aio_context_release(replace_aio_context);

        if (size != replace_size) {
3432 3433
            error_setg(errp, "cannot replace image with a mirror image of "
                             "different size");
3434
            goto out;
3435 3436 3437
        }
    }

E
Eric Blake 已提交
3438
    if (arg->mode == NEW_IMAGE_MODE_ABSOLUTE_PATHS) {
M
Max Reitz 已提交
3439 3440 3441 3442 3443
        backing_mode = MIRROR_SOURCE_BACKING_CHAIN;
    } else {
        backing_mode = MIRROR_OPEN_BACKING_CHAIN;
    }

E
Eric Blake 已提交
3444 3445
    if ((arg->sync == MIRROR_SYNC_MODE_FULL || !source)
        && arg->mode != NEW_IMAGE_MODE_EXISTING)
3446
    {
P
Paolo Bonzini 已提交
3447
        /* create new image w/o backing file */
3448
        assert(format);
E
Eric Blake 已提交
3449
        bdrv_img_create(arg->target, format,
3450
                        NULL, NULL, NULL, size, flags, &local_err, false);
P
Paolo Bonzini 已提交
3451
    } else {
E
Eric Blake 已提交
3452
        switch (arg->mode) {
P
Paolo Bonzini 已提交
3453 3454 3455 3456
        case NEW_IMAGE_MODE_EXISTING:
            break;
        case NEW_IMAGE_MODE_ABSOLUTE_PATHS:
            /* create new image with backing file */
E
Eric Blake 已提交
3457
            bdrv_img_create(arg->target, format,
3458 3459
                            source->filename,
                            source->drv->format_name,
3460
                            NULL, size, flags, &local_err, false);
P
Paolo Bonzini 已提交
3461 3462 3463 3464 3465 3466
            break;
        default:
            abort();
        }
    }

3467
    if (local_err) {
3468
        error_propagate(errp, local_err);
3469
        goto out;
P
Paolo Bonzini 已提交
3470 3471
    }

3472
    options = qdict_new();
E
Eric Blake 已提交
3473 3474
    if (arg->has_node_name) {
        qdict_put(options, "node-name", qstring_from_str(arg->node_name));
3475
    }
3476 3477 3478
    if (format) {
        qdict_put(options, "driver", qstring_from_str(format));
    }
3479

3480 3481 3482
    /* Mirroring takes care of copy-on-write using the source's backing
     * file.
     */
E
Eric Blake 已提交
3483 3484
    target_bs = bdrv_open(arg->target, NULL, options,
                          flags | BDRV_O_NO_BACKING, errp);
M
Max Reitz 已提交
3485
    if (!target_bs) {
3486
        goto out;
P
Paolo Bonzini 已提交
3487 3488
    }

3489 3490
    bdrv_set_aio_context(target_bs, aio_context);

E
Eric Blake 已提交
3491 3492 3493 3494 3495 3496 3497 3498
    blockdev_mirror_common(arg->has_job_id ? arg->job_id : NULL, bs, target_bs,
                           arg->has_replaces, arg->replaces, arg->sync,
                           backing_mode, arg->has_speed, arg->speed,
                           arg->has_granularity, arg->granularity,
                           arg->has_buf_size, arg->buf_size,
                           arg->has_on_source_error, arg->on_source_error,
                           arg->has_on_target_error, arg->on_target_error,
                           arg->has_unmap, arg->unmap,
3499
                           &local_err);
K
Kevin Wolf 已提交
3500
    bdrv_unref(target_bs);
3501
    error_propagate(errp, local_err);
3502 3503
out:
    aio_context_release(aio_context);
P
Paolo Bonzini 已提交
3504 3505
}

3506 3507
void qmp_blockdev_mirror(bool has_job_id, const char *job_id,
                         const char *device, const char *target,
F
Fam Zheng 已提交
3508 3509 3510 3511 3512 3513 3514 3515 3516 3517 3518 3519 3520 3521
                         bool has_replaces, const char *replaces,
                         MirrorSyncMode sync,
                         bool has_speed, int64_t speed,
                         bool has_granularity, uint32_t granularity,
                         bool has_buf_size, int64_t buf_size,
                         bool has_on_source_error,
                         BlockdevOnError on_source_error,
                         bool has_on_target_error,
                         BlockdevOnError on_target_error,
                         Error **errp)
{
    BlockDriverState *bs;
    BlockDriverState *target_bs;
    AioContext *aio_context;
M
Max Reitz 已提交
3522
    BlockMirrorBackingMode backing_mode = MIRROR_LEAVE_BACKING_CHAIN;
F
Fam Zheng 已提交
3523 3524
    Error *local_err = NULL;

3525
    bs = qmp_get_root_bs(device, errp);
F
Fam Zheng 已提交
3526 3527 3528 3529 3530 3531 3532 3533 3534 3535 3536 3537 3538 3539
    if (!bs) {
        return;
    }

    target_bs = bdrv_lookup_bs(target, target, errp);
    if (!target_bs) {
        return;
    }

    aio_context = bdrv_get_aio_context(bs);
    aio_context_acquire(aio_context);

    bdrv_set_aio_context(target_bs, aio_context);

3540
    blockdev_mirror_common(has_job_id ? job_id : NULL, bs, target_bs,
M
Max Reitz 已提交
3541
                           has_replaces, replaces, sync, backing_mode,
F
Fam Zheng 已提交
3542 3543 3544 3545 3546 3547 3548
                           has_speed, speed,
                           has_granularity, granularity,
                           has_buf_size, buf_size,
                           has_on_source_error, on_source_error,
                           has_on_target_error, on_target_error,
                           true, true,
                           &local_err);
3549
    error_propagate(errp, local_err);
F
Fam Zheng 已提交
3550 3551 3552 3553

    aio_context_release(aio_context);
}

3554 3555
/* Get a block job using its ID and acquire its AioContext */
static BlockJob *find_block_job(const char *id, AioContext **aio_context,
3556
                                Error **errp)
3557
{
3558
    BlockJob *job;
3559

3560
    assert(id != NULL);
M
Max Reitz 已提交
3561

3562
    *aio_context = NULL;
3563

3564
    job = block_job_get(id);
M
Max Reitz 已提交
3565

3566 3567 3568 3569
    if (!job) {
        error_set(errp, ERROR_CLASS_DEVICE_NOT_ACTIVE,
                  "Block job '%s' not found", id);
        return NULL;
3570
    }
3571

3572 3573
    *aio_context = blk_get_aio_context(job->blk);
    aio_context_acquire(*aio_context);
3574

3575
    return job;
3576 3577
}

3578
void qmp_block_job_set_speed(const char *device, int64_t speed, Error **errp)
3579
{
3580
    AioContext *aio_context;
3581
    BlockJob *job = find_block_job(device, &aio_context, errp);
3582 3583 3584 3585 3586

    if (!job) {
        return;
    }

3587
    block_job_set_speed(job, speed, errp);
3588
    aio_context_release(aio_context);
3589
}
3590

3591 3592
void qmp_block_job_cancel(const char *device,
                          bool has_force, bool force, Error **errp)
3593
{
3594
    AioContext *aio_context;
3595
    BlockJob *job = find_block_job(device, &aio_context, errp);
3596

3597 3598 3599
    if (!job) {
        return;
    }
3600 3601 3602 3603 3604

    if (!has_force) {
        force = false;
    }

F
Fam Zheng 已提交
3605
    if (job->user_paused && !force) {
3606 3607
        error_setg(errp, "The block job for device '%s' is currently paused",
                   device);
3608
        goto out;
3609
    }
3610 3611 3612

    trace_qmp_block_job_cancel(job);
    block_job_cancel(job);
3613 3614
out:
    aio_context_release(aio_context);
3615
}
S
Stefan Hajnoczi 已提交
3616

3617 3618
void qmp_block_job_pause(const char *device, Error **errp)
{
3619
    AioContext *aio_context;
3620
    BlockJob *job = find_block_job(device, &aio_context, errp);
3621

F
Fam Zheng 已提交
3622
    if (!job || job->user_paused) {
3623 3624 3625
        return;
    }

F
Fam Zheng 已提交
3626
    job->user_paused = true;
3627 3628
    trace_qmp_block_job_pause(job);
    block_job_pause(job);
3629
    aio_context_release(aio_context);
3630 3631 3632 3633
}

void qmp_block_job_resume(const char *device, Error **errp)
{
3634
    AioContext *aio_context;
3635
    BlockJob *job = find_block_job(device, &aio_context, errp);
3636

F
Fam Zheng 已提交
3637
    if (!job || !job->user_paused) {
3638 3639 3640
        return;
    }

F
Fam Zheng 已提交
3641
    job->user_paused = false;
3642
    trace_qmp_block_job_resume(job);
3643
    block_job_iostatus_reset(job);
3644
    block_job_resume(job);
3645
    aio_context_release(aio_context);
3646 3647
}

P
Paolo Bonzini 已提交
3648 3649
void qmp_block_job_complete(const char *device, Error **errp)
{
3650
    AioContext *aio_context;
3651
    BlockJob *job = find_block_job(device, &aio_context, errp);
P
Paolo Bonzini 已提交
3652 3653 3654 3655 3656 3657 3658

    if (!job) {
        return;
    }

    trace_qmp_block_job_complete(job);
    block_job_complete(job, errp);
3659
    aio_context_release(aio_context);
P
Paolo Bonzini 已提交
3660 3661
}

3662 3663 3664 3665 3666 3667
void qmp_change_backing_file(const char *device,
                             const char *image_node_name,
                             const char *backing_file,
                             Error **errp)
{
    BlockDriverState *bs = NULL;
3668
    AioContext *aio_context;
3669 3670 3671 3672 3673 3674
    BlockDriverState *image_bs = NULL;
    Error *local_err = NULL;
    bool ro;
    int open_flags;
    int ret;

3675 3676
    bs = qmp_get_root_bs(device, errp);
    if (!bs) {
3677 3678 3679
        return;
    }

3680
    aio_context = bdrv_get_aio_context(bs);
3681 3682
    aio_context_acquire(aio_context);

3683 3684 3685
    image_bs = bdrv_lookup_bs(NULL, image_node_name, &local_err);
    if (local_err) {
        error_propagate(errp, local_err);
3686
        goto out;
3687 3688 3689 3690
    }

    if (!image_bs) {
        error_setg(errp, "image file not found");
3691
        goto out;
3692 3693 3694 3695 3696
    }

    if (bdrv_find_base(image_bs) == image_bs) {
        error_setg(errp, "not allowing backing file change on an image "
                         "without a backing file");
3697
        goto out;
3698 3699 3700 3701 3702
    }

    /* even though we are not necessarily operating on bs, we need it to
     * determine if block ops are currently prohibited on the chain */
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_CHANGE, errp)) {
3703
        goto out;
3704 3705 3706 3707 3708 3709
    }

    /* final sanity check */
    if (!bdrv_chain_contains(bs, image_bs)) {
        error_setg(errp, "'%s' and image file are not in the same chain",
                   device);
3710
        goto out;
3711 3712 3713 3714 3715 3716 3717 3718 3719 3720
    }

    /* if not r/w, reopen to make r/w */
    open_flags = image_bs->open_flags;
    ro = bdrv_is_read_only(image_bs);

    if (ro) {
        bdrv_reopen(image_bs, open_flags | BDRV_O_RDWR, &local_err);
        if (local_err) {
            error_propagate(errp, local_err);
3721
            goto out;
3722 3723 3724 3725 3726 3727 3728 3729 3730 3731 3732 3733 3734 3735 3736
        }
    }

    ret = bdrv_change_backing_file(image_bs, backing_file,
                               image_bs->drv ? image_bs->drv->format_name : "");

    if (ret < 0) {
        error_setg_errno(errp, -ret, "Could not change backing file to '%s'",
                         backing_file);
        /* don't exit here, so we can try to restore open flags if
         * appropriate */
    }

    if (ro) {
        bdrv_reopen(image_bs, open_flags, &local_err);
3737
        error_propagate(errp, local_err);
3738
    }
3739 3740 3741

out:
    aio_context_release(aio_context);
3742 3743
}

3744 3745 3746 3747 3748 3749 3750 3751 3752 3753 3754 3755 3756 3757
void hmp_drive_add_node(Monitor *mon, const char *optstr)
{
    QemuOpts *opts;
    QDict *qdict;
    Error *local_err = NULL;

    opts = qemu_opts_parse_noisily(&qemu_drive_opts, optstr, false);
    if (!opts) {
        return;
    }

    qdict = qemu_opts_to_qdict(opts, NULL);

    if (!qdict_get_try_str(qdict, "node-name")) {
3758
        QDECREF(qdict);
3759 3760 3761 3762 3763 3764 3765 3766 3767 3768 3769 3770 3771 3772 3773 3774
        error_report("'node-name' needs to be specified");
        goto out;
    }

    BlockDriverState *bs = bds_tree_init(qdict, &local_err);
    if (!bs) {
        error_report_err(local_err);
        goto out;
    }

    QTAILQ_INSERT_TAIL(&monitor_bdrv_states, bs, monitor_list);

out:
    qemu_opts_del(opts);
}

K
Kevin Wolf 已提交
3775 3776
void qmp_blockdev_add(BlockdevOptions *options, Error **errp)
{
3777
    BlockDriverState *bs;
K
Kevin Wolf 已提交
3778
    QObject *obj;
3779
    Visitor *v = qmp_output_visitor_new(&obj);
K
Kevin Wolf 已提交
3780 3781 3782
    QDict *qdict;
    Error *local_err = NULL;

3783
    visit_type_BlockdevOptions(v, NULL, &options, &local_err);
3784
    if (local_err) {
K
Kevin Wolf 已提交
3785 3786 3787 3788
        error_propagate(errp, local_err);
        goto fail;
    }

3789
    visit_complete(v, &obj);
K
Kevin Wolf 已提交
3790 3791 3792 3793
    qdict = qobject_to_qdict(obj);

    qdict_flatten(qdict);

3794 3795 3796 3797
    if (!qdict_get_try_str(qdict, "node-name")) {
        error_setg(errp, "'node-name' must be specified for the root node");
        goto fail;
    }
3798

3799 3800 3801
    bs = bds_tree_init(qdict, errp);
    if (!bs) {
        goto fail;
K
Kevin Wolf 已提交
3802 3803
    }

3804 3805
    QTAILQ_INSERT_TAIL(&monitor_bdrv_states, bs, monitor_list);

3806
    if (bs && bdrv_key_required(bs)) {
3807 3808
        QTAILQ_REMOVE(&monitor_bdrv_states, bs, monitor_list);
        bdrv_unref(bs);
3809 3810 3811 3812
        error_setg(errp, "blockdev-add doesn't support encrypted devices");
        goto fail;
    }

K
Kevin Wolf 已提交
3813
fail:
3814
    visit_free(v);
K
Kevin Wolf 已提交
3815 3816
}

3817
void qmp_x_blockdev_del(const char *node_name, Error **errp)
3818 3819 3820 3821
{
    AioContext *aio_context;
    BlockDriverState *bs;

3822 3823 3824
    bs = bdrv_find_node(node_name);
    if (!bs) {
        error_setg(errp, "Cannot find node %s", node_name);
3825 3826
        return;
    }
3827 3828 3829
    if (bdrv_has_blk(bs)) {
        error_setg(errp, "Node %s is in use", node_name);
        return;
3830
    }
3831
    aio_context = bdrv_get_aio_context(bs);
3832 3833
    aio_context_acquire(aio_context);

3834 3835 3836
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_DRIVE_DEL, errp)) {
        goto out;
    }
3837

3838 3839 3840 3841
    if (!bs->monitor_list.tqe_prev) {
        error_setg(errp, "Node %s is not owned by the monitor",
                   bs->node_name);
        goto out;
3842 3843
    }

3844 3845 3846 3847
    if (bs->refcnt > 1) {
        error_setg(errp, "Block device %s is in use",
                   bdrv_get_device_or_node_name(bs));
        goto out;
3848 3849
    }

3850 3851 3852
    QTAILQ_REMOVE(&monitor_bdrv_states, bs, monitor_list);
    bdrv_unref(bs);

3853 3854 3855 3856
out:
    aio_context_release(aio_context);
}

3857 3858 3859 3860 3861 3862 3863 3864 3865 3866 3867 3868 3869 3870 3871 3872 3873 3874 3875 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 3904 3905 3906 3907 3908 3909 3910 3911
static BdrvChild *bdrv_find_child(BlockDriverState *parent_bs,
                                  const char *child_name)
{
    BdrvChild *child;

    QLIST_FOREACH(child, &parent_bs->children, next) {
        if (strcmp(child->name, child_name) == 0) {
            return child;
        }
    }

    return NULL;
}

void qmp_x_blockdev_change(const char *parent, bool has_child,
                           const char *child, bool has_node,
                           const char *node, Error **errp)
{
    BlockDriverState *parent_bs, *new_bs = NULL;
    BdrvChild *p_child;

    parent_bs = bdrv_lookup_bs(parent, parent, errp);
    if (!parent_bs) {
        return;
    }

    if (has_child == has_node) {
        if (has_child) {
            error_setg(errp, "The parameters child and node are in conflict");
        } else {
            error_setg(errp, "Either child or node must be specified");
        }
        return;
    }

    if (has_child) {
        p_child = bdrv_find_child(parent_bs, child);
        if (!p_child) {
            error_setg(errp, "Node '%s' does not have child '%s'",
                       parent, child);
            return;
        }
        bdrv_del_child(parent_bs, p_child, errp);
    }

    if (has_node) {
        new_bs = bdrv_find_node(node);
        if (!new_bs) {
            error_setg(errp, "Node '%s' not found", node);
            return;
        }
        bdrv_add_child(parent_bs, new_bs, errp);
    }
}

3912
BlockJobInfoList *qmp_query_block_jobs(Error **errp)
S
Stefan Hajnoczi 已提交
3913
{
3914
    BlockJobInfoList *head = NULL, **p_next = &head;
3915
    BlockJob *job;
S
Stefan Hajnoczi 已提交
3916

3917 3918 3919
    for (job = block_job_next(NULL); job; job = block_job_next(job)) {
        BlockJobInfoList *elem = g_new0(BlockJobInfoList, 1);
        AioContext *aio_context = blk_get_aio_context(job->blk);
3920 3921

        aio_context_acquire(aio_context);
3922
        elem->value = block_job_query(job);
3923
        aio_context_release(aio_context);
3924 3925 3926

        *p_next = elem;
        p_next = &elem->next;
S
Stefan Hajnoczi 已提交
3927 3928
    }

3929
    return head;
S
Stefan Hajnoczi 已提交
3930
}
3931

3932
QemuOptsList qemu_common_drive_opts = {
3933
    .name = "drive",
3934
    .head = QTAILQ_HEAD_INITIALIZER(qemu_common_drive_opts.head),
3935 3936 3937 3938 3939 3940 3941 3942 3943
    .desc = {
        {
            .name = "snapshot",
            .type = QEMU_OPT_BOOL,
            .help = "enable/disable snapshot mode",
        },{
            .name = "aio",
            .type = QEMU_OPT_STRING,
            .help = "host AIO implementation (threads, native)",
3944 3945 3946 3947
        },{
            .name = BDRV_OPT_CACHE_WB,
            .type = QEMU_OPT_BOOL,
            .help = "Enable writeback mode",
3948 3949 3950 3951 3952 3953 3954 3955 3956 3957 3958 3959 3960
        },{
            .name = "format",
            .type = QEMU_OPT_STRING,
            .help = "disk format (raw, qcow2, ...)",
        },{
            .name = "rerror",
            .type = QEMU_OPT_STRING,
            .help = "read error action",
        },{
            .name = "werror",
            .type = QEMU_OPT_STRING,
            .help = "write error action",
        },{
3961
            .name = BDRV_OPT_READ_ONLY,
3962 3963 3964
            .type = QEMU_OPT_BOOL,
            .help = "open drive file as read-only",
        },{
3965
            .name = "throttling.iops-total",
3966 3967 3968
            .type = QEMU_OPT_NUMBER,
            .help = "limit total I/O operations per second",
        },{
3969
            .name = "throttling.iops-read",
3970 3971 3972
            .type = QEMU_OPT_NUMBER,
            .help = "limit read operations per second",
        },{
3973
            .name = "throttling.iops-write",
3974 3975 3976
            .type = QEMU_OPT_NUMBER,
            .help = "limit write operations per second",
        },{
3977
            .name = "throttling.bps-total",
3978 3979 3980
            .type = QEMU_OPT_NUMBER,
            .help = "limit total bytes per second",
        },{
3981
            .name = "throttling.bps-read",
3982 3983 3984
            .type = QEMU_OPT_NUMBER,
            .help = "limit read bytes per second",
        },{
3985
            .name = "throttling.bps-write",
3986 3987
            .type = QEMU_OPT_NUMBER,
            .help = "limit write bytes per second",
3988 3989 3990 3991 3992 3993 3994 3995 3996 3997 3998 3999 4000 4001 4002 4003 4004 4005 4006 4007 4008 4009 4010 4011
        },{
            .name = "throttling.iops-total-max",
            .type = QEMU_OPT_NUMBER,
            .help = "I/O operations burst",
        },{
            .name = "throttling.iops-read-max",
            .type = QEMU_OPT_NUMBER,
            .help = "I/O operations read burst",
        },{
            .name = "throttling.iops-write-max",
            .type = QEMU_OPT_NUMBER,
            .help = "I/O operations write burst",
        },{
            .name = "throttling.bps-total-max",
            .type = QEMU_OPT_NUMBER,
            .help = "total bytes burst",
        },{
            .name = "throttling.bps-read-max",
            .type = QEMU_OPT_NUMBER,
            .help = "total bytes read burst",
        },{
            .name = "throttling.bps-write-max",
            .type = QEMU_OPT_NUMBER,
            .help = "total bytes write burst",
4012 4013 4014 4015 4016 4017 4018 4019 4020 4021 4022 4023 4024 4025 4026 4027 4028 4029 4030 4031 4032 4033 4034 4035
        },{
            .name = "throttling.iops-total-max-length",
            .type = QEMU_OPT_NUMBER,
            .help = "length of the iops-total-max burst period, in seconds",
        },{
            .name = "throttling.iops-read-max-length",
            .type = QEMU_OPT_NUMBER,
            .help = "length of the iops-read-max burst period, in seconds",
        },{
            .name = "throttling.iops-write-max-length",
            .type = QEMU_OPT_NUMBER,
            .help = "length of the iops-write-max burst period, in seconds",
        },{
            .name = "throttling.bps-total-max-length",
            .type = QEMU_OPT_NUMBER,
            .help = "length of the bps-total-max burst period, in seconds",
        },{
            .name = "throttling.bps-read-max-length",
            .type = QEMU_OPT_NUMBER,
            .help = "length of the bps-read-max burst period, in seconds",
        },{
            .name = "throttling.bps-write-max-length",
            .type = QEMU_OPT_NUMBER,
            .help = "length of the bps-write-max burst period, in seconds",
4036 4037 4038 4039
        },{
            .name = "throttling.iops-size",
            .type = QEMU_OPT_NUMBER,
            .help = "when limiting by iops max size of an I/O in bytes",
4040 4041 4042 4043
        },{
            .name = "throttling.group",
            .type = QEMU_OPT_STRING,
            .help = "name of the block throttling group",
4044 4045 4046 4047
        },{
            .name = "copy-on-read",
            .type = QEMU_OPT_BOOL,
            .help = "copy read data from backing file into image file",
4048 4049 4050 4051
        },{
            .name = "detect-zeroes",
            .type = QEMU_OPT_STRING,
            .help = "try to optimize zero writes (off, on, unmap)",
4052 4053 4054 4055 4056 4057 4058 4059 4060 4061
        },{
            .name = "stats-account-invalid",
            .type = QEMU_OPT_BOOL,
            .help = "whether to account for invalid I/O operations "
                    "in the statistics",
        },{
            .name = "stats-account-failed",
            .type = QEMU_OPT_BOOL,
            .help = "whether to account for failed I/O operations "
                    "in the statistics",
4062 4063 4064 4065
        },
        { /* end of list */ }
    },
};
4066 4067 4068 4069 4070

QemuOptsList qemu_drive_opts = {
    .name = "drive",
    .head = QTAILQ_HEAD_INITIALIZER(qemu_drive_opts.head),
    .desc = {
4071 4072 4073 4074
        /*
         * no elements => accept any params
         * validation will happen later
         */
4075 4076 4077
        { /* end of list */ }
    },
};