blockdev.c 120.8 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"
51
#include "block/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;
}

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

237 238
    for (blk = blk_next(NULL); blk; blk = blk_next(blk)) {
        dinfo = blk_legacy_dinfo(blk);
239
        if (!blk_get_attached_dev(blk) && !dinfo->is_default &&
J
John Snow 已提交
240
            dinfo->type != IF_NONE) {
241 242
            loc_push_none(&loc);
            qemu_opts_loc_restore(dinfo->opts);
243
            error_report("machine type does not support"
244 245 246
                         " if=%s,bus=%d,unit=%d",
                         if_name[dinfo->type], dinfo->bus, dinfo->unit);
            loc_pop(&loc);
247
            orphans = true;
J
John Snow 已提交
248 249 250
        }
    }

251 252 253
    if (orphans) {
        exit(1);
    }
J
John Snow 已提交
254 255
}

256 257 258 259 260 261 262
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));
}

263 264 265
int drive_get_max_bus(BlockInterfaceType type)
{
    int max_bus;
266
    BlockBackend *blk;
267 268 269
    DriveInfo *dinfo;

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

279 280 281 282 283 284 285 286 287 288
/* 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]++);
}

289 290
static void bdrv_format_print(void *opaque, const char *name)
{
291
    error_printf(" %s", name);
292 293
}

294 295
typedef struct {
    QEMUBH *bh;
F
Fam Zheng 已提交
296 297
    BlockDriverState *bs;
} BDRVPutRefBH;
298

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

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 352 353 354
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;
}

355 356
typedef enum { MEDIA_DISK, MEDIA_CDROM } DriveMediaType;

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 385 386 387
/* 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) {
388
        throttle_config_init(throttle_cfg);
389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414
        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);

415 416 417 418 419 420 421 422 423 424 425 426 427
        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);

428 429 430
        throttle_cfg->op_size =
            qemu_opt_get_number(opts, "throttling.iops-size", 0);

431
        if (!throttle_is_valid(throttle_cfg, errp)) {
432 433 434 435 436 437 438 439
            return;
        }
    }

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

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

472 473 474
    /* 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");
475
    opts = qemu_opts_create(&qemu_common_drive_opts, id, 1, &error);
476
    if (error) {
477
        error_propagate(errp, error);
478
        goto err_no_opts;
479 480 481
    }

    qemu_opts_absorb_qdict(opts, bs_opts, &error);
482
    if (error) {
483
        error_propagate(errp, error);
484
        goto early_err;
485 486 487 488 489 490
    }

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

491 492 493
    /* extract parameters */
    snapshot = qemu_opt_get_bool(opts, "snapshot", 0);

494 495 496
    account_invalid = qemu_opt_get_bool(opts, "stats-account-invalid", true);
    account_failed = qemu_opt_get_bool(opts, "stats-account-failed", true);

497 498
    writethrough = !qemu_opt_get_bool(opts, BDRV_OPT_CACHE_WB, true);

499 500
    id = qemu_opts_id(opts);

501 502 503 504 505 506 507 508
    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;
    }
509

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

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

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

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

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

550
    if (snapshot) {
551
        bdrv_flags |= BDRV_O_SNAPSHOT;
552 553
    }

554 555
    read_only = qemu_opt_get_bool(opts, BDRV_OPT_READ_ONLY, false);

556
    /* init */
557
    if ((!file || !*file) && !qdict_size(bs_opts)) {
558 559
        BlockBackendRootState *blk_rs;

560
        blk = blk_new();
561 562
        blk_rs = blk_get_root_state(blk);
        blk_rs->open_flags    = bdrv_flags;
563
        blk_rs->read_only     = read_only;
564 565
        blk_rs->detect_zeroes = detect_zeroes;

566 567 568
        QDECREF(bs_opts);
    } else {
        if (file && !*file) {
569 570
            file = NULL;
        }
571

572 573 574 575 576
        /* 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");
577 578
        qdict_set_default_str(bs_opts, BDRV_OPT_READ_ONLY,
                              read_only ? "on" : "off");
579
        assert((bdrv_flags & BDRV_O_CACHE_MASK) == 0);
580

581 582 583 584
        if (runstate_check(RUN_STATE_INMIGRATE)) {
            bdrv_flags |= BDRV_O_INACTIVE;
        }

585
        blk = blk_new_open(file, NULL, bs_opts, bdrv_flags, errp);
586 587 588 589
        if (!blk) {
            goto err_no_bs_opts;
        }
        bs = blk_bs(blk);
590

591
        bs->detect_zeroes = detect_zeroes;
592

593 594
        if (bdrv_key_required(bs)) {
            autostart = 0;
595
        }
596 597

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

599 600 601 602
        if (!parse_stats_intervals(blk_get_stats(blk), interval_list, errp)) {
            blk_unref(blk);
            blk = NULL;
            goto err_no_bs_opts;
603
        }
604 605
    }

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

615
    blk_set_enable_write_cache(blk, !writethrough);
616
    blk_set_on_error(blk, on_read_error, on_write_error);
617

618
    if (!monitor_add_blk(blk, id, errp)) {
619 620 621 622 623
        blk_unref(blk);
        blk = NULL;
        goto err_no_bs_opts;
    }

624
err_no_bs_opts:
625
    qemu_opts_del(opts);
626 627
    QDECREF(interval_dict);
    QDECREF(interval_list);
628
    return blk;
629

630 631
early_err:
    qemu_opts_del(opts);
632 633
    QDECREF(interval_dict);
    QDECREF(interval_list);
634 635
err_no_opts:
    QDECREF(bs_opts);
636
    return NULL;
637 638
}

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

644 645 646 647 648
    /* 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");
649
    qdict_set_default_str(bs_opts, BDRV_OPT_READ_ONLY, "off");
650

651 652 653 654
    if (runstate_check(RUN_STATE_INMIGRATE)) {
        bdrv_flags |= BDRV_O_INACTIVE;
    }

K
Kevin Wolf 已提交
655
    return bdrv_open(NULL, NULL, bs_opts, bdrv_flags, errp);
656 657
}

658 659 660 661 662 663 664 665 666 667 668 669 670
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 已提交
671 672 673 674 675 676 677
/* 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);
}

678 679
static void qemu_opt_rename(QemuOpts *opts, const char *from, const char *to,
                            Error **errp)
680 681 682 683 684
{
    const char *value;

    value = qemu_opt_get(opts, from);
    if (value) {
685 686 687 688 689
        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;
        }
690 691 692 693
    }

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

699 700 701 702 703
QemuOptsList qemu_legacy_drive_opts = {
    .name = "drive",
    .head = QTAILQ_HEAD_INITIALIZER(qemu_legacy_drive_opts.head),
    .desc = {
        {
704 705 706 707 708 709 710 711 712 713 714 715
            .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",
        },{
716 717 718
            .name = "media",
            .type = QEMU_OPT_STRING,
            .help = "media type (disk, cdrom)",
719 720 721 722
        },{
            .name = "if",
            .type = QEMU_OPT_STRING,
            .help = "interface (ide, scsi, sd, mtd, floppy, pflash, virtio)",
723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738
        },{
            .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)",
739 740 741 742
        },{
            .name = "boot",
            .type = QEMU_OPT_BOOL,
            .help = "(deprecated, ignored)",
743 744 745 746
        },{
            .name = "addr",
            .type = QEMU_OPT_STRING,
            .help = "pci address (virtio only)",
747 748 749 750
        },{
            .name = "serial",
            .type = QEMU_OPT_STRING,
            .help = "disk serial number",
M
Max Reitz 已提交
751 752 753 754
        },{
            .name = "file",
            .type = QEMU_OPT_STRING,
            .help = "file name",
755
        },
756 757 758

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

776 777 778 779
        { /* end of list */ }
    },
};

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

800
    /* Change legacy command line options into QMP ones */
801 802 803 804 805 806 807
    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" },
808

809 810 811
        { "bps",            "throttling.bps-total" },
        { "bps_rd",         "throttling.bps-read" },
        { "bps_wr",         "throttling.bps-write" },
812

813 814 815
        { "iops_max",       "throttling.iops-total-max" },
        { "iops_rd_max",    "throttling.iops-read-max" },
        { "iops_wr_max",    "throttling.iops-write-max" },
816

817 818 819
        { "bps_max",        "throttling.bps-total-max" },
        { "bps_rd_max",     "throttling.bps-read-max" },
        { "bps_wr_max",     "throttling.bps-write-max" },
820

821
        { "iops_size",      "throttling.iops-size" },
822

823 824
        { "group",          "throttling.group" },

825
        { "readonly",       BDRV_OPT_READ_ONLY },
826 827 828
    };

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

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

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

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

863 864 865 866
    /* Get a QDict for processing the options */
    bs_opts = qdict_new();
    qemu_opts_to_qdict(all_opts, bs_opts);

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

875 876 877 878 879 880 881
    /* 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");
    }

882 883 884 885 886 887 888
    /* 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 已提交
889
            read_only = true;
890 891 892 893 894 895
        } else {
            error_report("'%s' invalid media", value);
            goto fail;
        }
    }

896
    /* copy-on-read is disabled with a warning for read-only devices */
897
    read_only |= qemu_opt_get_bool(legacy_opts, BDRV_OPT_READ_ONLY, false);
898 899 900 901 902 903 904
    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;
    }

905
    qdict_put(bs_opts, BDRV_OPT_READ_ONLY,
906 907 908 909
              qstring_from_str(read_only ? "on" : "off"));
    qdict_put(bs_opts, "copy-on-read",
              qstring_from_str(copy_on_read ? "on" :"off"));

910 911 912 913 914 915 916 917 918 919 920 921 922 923 924
    /* 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;
    }

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 954 955 956
    /* 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;
957 958 959 960
        } else if (!strcmp(value, "large")) {
            translation = BIOS_ATA_TRANSLATION_LARGE;
        } else if (!strcmp(value, "rechs")) {
            translation = BIOS_ATA_TRANSLATION_RECHS;
961 962 963 964 965 966 967 968 969 970 971 972 973 974 975
        } 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;
        }
    }

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 1012 1013 1014
    /* 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;
    }

1015 1016 1017
    /* Serial number */
    serial = qemu_opt_get(legacy_opts, "serial");

1018 1019 1020 1021 1022 1023 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035
    /* 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);
    }

1036 1037 1038 1039 1040 1041 1042 1043 1044
    /* 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;
1045 1046
        devopts = qemu_opts_create(qemu_find_opts("device"), NULL, 0,
                                   &error_abort);
1047
        if (arch_type == QEMU_ARCH_S390X) {
1048
            qemu_opt_set(devopts, "driver", "virtio-blk-ccw", &error_abort);
1049
        } else {
1050
            qemu_opt_set(devopts, "driver", "virtio-blk-pci", &error_abort);
1051
        }
1052 1053
        qemu_opt_set(devopts, "drive", qdict_get_str(bs_opts, "id"),
                     &error_abort);
1054
        if (devaddr) {
1055
            qemu_opt_set(devopts, "addr", devaddr, &error_abort);
1056 1057 1058
        }
    }

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

1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073 1074 1075 1076 1077 1078 1079 1080 1081
    /* 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));
    }

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

1094 1095
    /* Create legacy DriveInfo */
    dinfo = g_malloc0(sizeof(*dinfo));
1096
    dinfo->opts = all_opts;
1097

1098 1099 1100 1101 1102
    dinfo->cyls = cyls;
    dinfo->heads = heads;
    dinfo->secs = secs;
    dinfo->trans = translation;

1103
    dinfo->type = type;
1104 1105
    dinfo->bus = bus_id;
    dinfo->unit = unit_id;
1106
    dinfo->devaddr = devaddr;
1107 1108
    dinfo->serial = g_strdup(serial);

1109 1110
    blk_set_legacy_dinfo(blk, dinfo);

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

1122
fail:
1123
    qemu_opts_del(legacy_opts);
1124
    QDECREF(bs_opts);
1125
    return dinfo;
1126 1127
}

1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149
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;
}

1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172
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;
}

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

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

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

        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);
1202 1203 1204 1205
    }
    if (ret < 0) {
        monitor_printf(mon, "'commit' error for '%s': %s\n", device,
                       strerror(-ret));
1206 1207 1208
    }
}

1209
static void blockdev_do_action(TransactionAction *action, Error **errp)
1210
{
1211
    TransactionActionList list;
1212

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

1218 1219 1220 1221 1222
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,
1223
                                bool has_format, const char *format,
1224
                                bool has_mode, NewImageMode mode, Error **errp)
1225
{
1226
    BlockdevSnapshotSync snapshot = {
1227
        .has_device = has_device,
1228
        .device = (char *) device,
1229 1230
        .has_node_name = has_node_name,
        .node_name = (char *) node_name,
1231
        .snapshot_file = (char *) snapshot_file,
1232 1233
        .has_snapshot_node_name = has_snapshot_node_name,
        .snapshot_node_name = (char *) snapshot_node_name,
1234 1235 1236 1237 1238
        .has_format = has_format,
        .format = (char *) format,
        .has_mode = has_mode,
        .mode = mode,
    };
1239 1240
    TransactionAction action = {
        .type = TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT_SYNC,
1241
        .u.blockdev_snapshot_sync.data = &snapshot,
1242 1243
    };
    blockdev_do_action(&action, errp);
1244 1245
}

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

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

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

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

    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 已提交
1306
        goto out_aio_context;
1307 1308
    }

1309 1310 1311 1312
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_INTERNAL_SNAPSHOT_DELETE, errp)) {
        goto out_aio_context;
    }

1313
    ret = bdrv_snapshot_find_by_id_and_name(bs, id, name, &sn, &local_err);
1314
    if (local_err) {
1315
        error_propagate(errp, local_err);
1316
        goto out_aio_context;
1317 1318 1319 1320 1321 1322
    }
    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);
1323
        goto out_aio_context;
1324 1325 1326
    }

    bdrv_snapshot_delete(bs, id, name, &local_err);
1327
    if (local_err) {
1328
        error_propagate(errp, local_err);
1329
        goto out_aio_context;
1330 1331
    }

1332 1333
    aio_context_release(aio_context);

1334
    info = g_new0(SnapshotInfo, 1);
1335 1336 1337 1338 1339 1340 1341 1342 1343
    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;
1344 1345 1346 1347

out_aio_context:
    aio_context_release(aio_context);
    return NULL;
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 1409 1410 1411
/**
 * 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;
}

1412
/* New and old BlockDriverState structs for atomic group operations */
1413

1414
typedef struct BlkActionState BlkActionState;
1415

1416 1417 1418 1419 1420 1421 1422 1423 1424 1425 1426 1427 1428 1429 1430
/**
 * 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 {
1431
    size_t instance_size;
1432 1433 1434 1435 1436
    void (*prepare)(BlkActionState *common, Error **errp);
    void (*commit)(BlkActionState *common);
    void (*abort)(BlkActionState *common);
    void (*clean)(BlkActionState *common);
} BlkActionOps;
1437

1438 1439 1440 1441 1442 1443
/**
 * 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 已提交
1444
 * @block_job_txn: Transaction which this action belongs to.
1445 1446 1447 1448 1449
 * @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.
1450
 */
1451
struct BlkActionState {
1452
    TransactionAction *action;
1453
    const BlkActionOps *ops;
J
John Snow 已提交
1454 1455
    BlockJobTxn *block_job_txn;
    TransactionProperties *txn_props;
1456
    QSIMPLEQ_ENTRY(BlkActionState) entry;
1457 1458
};

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

J
John Snow 已提交
1468 1469 1470 1471 1472 1473 1474 1475 1476 1477 1478 1479 1480 1481

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

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

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

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

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

1510 1511
    bs = qmp_get_root_bs(device, errp);
    if (!bs) {
1512 1513 1514
        return;
    }

1515
    /* AioContext is released in .clean() */
1516
    state->aio_context = bdrv_get_aio_context(bs);
1517 1518
    aio_context_acquire(state->aio_context);

1519 1520 1521
    state->bs = bs;
    bdrv_drained_begin(bs);

1522 1523 1524 1525
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_INTERNAL_SNAPSHOT, errp)) {
        return;
    }

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

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

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

    /* check whether a snapshot with name exist */
1544 1545 1546 1547
    ret = bdrv_snapshot_find_by_id_and_name(bs, NULL, name, &old_sn,
                                            &local_err);
    if (local_err) {
        error_propagate(errp, local_err);
1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572
        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 */
1573
    state->created = true;
1574 1575
}

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

1584
    if (!state->created) {
1585 1586 1587 1588
        return;
    }

    if (bdrv_snapshot_delete(bs, sn->id_str, sn->name, &local_error) < 0) {
1589 1590 1591 1592 1593
        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));
1594 1595 1596
    }
}

1597
static void internal_snapshot_clean(BlkActionState *common)
1598 1599 1600 1601 1602
{
    InternalSnapshotState *state = DO_UPCAST(InternalSnapshotState,
                                             common, common);

    if (state->aio_context) {
1603 1604 1605
        if (state->bs) {
            bdrv_drained_end(state->bs);
        }
1606 1607 1608 1609
        aio_context_release(state->aio_context);
    }
}

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

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

1635 1636 1637 1638 1639
    /* 'blockdev-snapshot' and 'blockdev-snapshot-sync' have similar
     * purpose but a different set of parameters */
    switch (action->type) {
    case TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT:
        {
1640
            BlockdevSnapshot *s = action->u.blockdev_snapshot.data;
1641 1642 1643 1644 1645 1646 1647 1648
            device = s->node;
            node_name = s->node;
            new_image_file = NULL;
            snapshot_ref = s->overlay;
        }
        break;
    case TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT_SYNC:
        {
1649
            BlockdevSnapshotSync *s = action->u.blockdev_snapshot_sync.data;
1650 1651 1652 1653 1654 1655 1656 1657
            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();
1658 1659 1660
    }

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

1665 1666
    state->old_bs = bdrv_lookup_bs(device, node_name, errp);
    if (!state->old_bs) {
1667 1668 1669
        return;
    }

1670 1671 1672
    /* 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);
1673
    bdrv_drained_begin(state->old_bs);
1674

1675
    if (!bdrv_is_inserted(state->old_bs)) {
1676
        error_setg(errp, QERR_DEVICE_HAS_NO_MEDIUM, device);
1677 1678 1679
        return;
    }

1680 1681
    if (bdrv_op_is_blocked(state->old_bs,
                           BLOCK_OP_TYPE_EXTERNAL_SNAPSHOT, errp)) {
1682 1683 1684
        return;
    }

1685 1686
    if (!bdrv_is_read_only(state->old_bs)) {
        if (bdrv_flush(state->old_bs)) {
1687
            error_setg(errp, QERR_IO_ERROR);
1688 1689 1690 1691
            return;
        }
    }

1692
    if (!bdrv_is_first_non_filter(state->old_bs)) {
1693
        error_setg(errp, QERR_FEATURE_DISABLED, "snapshot");
1694 1695 1696
        return;
    }

1697
    if (action->type == TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT_SYNC) {
1698
        BlockdevSnapshotSync *s = action->u.blockdev_snapshot_sync.data;
1699 1700 1701 1702
        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;
1703

1704 1705
        if (node_name && !snapshot_node_name) {
            error_setg(errp, "New snapshot node name missing");
1706 1707 1708
            return;
        }

1709 1710 1711 1712 1713 1714 1715
        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;
1716
        flags &= ~(BDRV_O_SNAPSHOT | BDRV_O_NO_BACKING | BDRV_O_COPY_ON_READ);
1717 1718 1719 1720

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

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

K
Kevin Wolf 已提交
1753
    if (bdrv_has_blk(state->new_bs)) {
1754
        error_setg(errp, "The snapshot is already in use");
1755 1756 1757 1758 1759 1760 1761 1762 1763 1764
        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");
1765 1766 1767 1768 1769
        return;
    }

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

1773
static void external_snapshot_commit(BlkActionState *common)
1774
{
1775 1776
    ExternalSnapshotState *state =
                             DO_UPCAST(ExternalSnapshotState, common, common);
1777

1778 1779
    bdrv_set_aio_context(state->new_bs, state->aio_context);

1780 1781
    /* This removes our old bs and adds the new bs */
    bdrv_append(state->new_bs, state->old_bs);
1782 1783 1784
    /* 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 */
1785 1786 1787 1788
    if (!state->old_bs->copy_on_read) {
        bdrv_reopen(state->old_bs, state->old_bs->open_flags & ~BDRV_O_RDWR,
                    NULL);
    }
1789 1790
}

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

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

1810
typedef struct DriveBackupState {
1811
    BlkActionState common;
1812
    BlockDriverState *bs;
1813
    AioContext *aio_context;
1814 1815 1816
    BlockJob *job;
} DriveBackupState;

1817
static BlockJob *do_drive_backup(DriveBackup *backup, BlockJobTxn *txn,
P
Pavel Butsykin 已提交
1818
                            Error **errp);
1819

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

1827
    assert(common->action->type == TRANSACTION_ACTION_KIND_DRIVE_BACKUP);
1828
    backup = common->action->u.drive_backup.data;
1829

1830 1831
    bs = qmp_get_root_bs(backup->device, errp);
    if (!bs) {
1832 1833 1834
        return;
    }

1835
    /* AioContext is released in .clean() */
1836
    state->aio_context = bdrv_get_aio_context(bs);
1837
    aio_context_acquire(state->aio_context);
1838 1839
    bdrv_drained_begin(bs);
    state->bs = bs;
1840

1841
    state->job = do_drive_backup(backup, common->block_job_txn, &local_err);
1842
    if (local_err) {
1843 1844 1845
        error_propagate(errp, local_err);
        return;
    }
1846
}
1847

1848 1849 1850 1851 1852
static void drive_backup_commit(BlkActionState *common)
{
    DriveBackupState *state = DO_UPCAST(DriveBackupState, common, common);
    assert(state->job);
    block_job_start(state->job);
1853 1854
}

1855
static void drive_backup_abort(BlkActionState *common)
1856 1857 1858
{
    DriveBackupState *state = DO_UPCAST(DriveBackupState, common, common);

1859 1860
    if (state->job) {
        block_job_cancel_sync(state->job);
1861 1862 1863
    }
}

1864
static void drive_backup_clean(BlkActionState *common)
1865 1866 1867 1868
{
    DriveBackupState *state = DO_UPCAST(DriveBackupState, common, common);

    if (state->aio_context) {
1869
        bdrv_drained_end(state->bs);
1870 1871 1872 1873
        aio_context_release(state->aio_context);
    }
}

1874
typedef struct BlockdevBackupState {
1875
    BlkActionState common;
1876 1877 1878 1879 1880
    BlockDriverState *bs;
    BlockJob *job;
    AioContext *aio_context;
} BlockdevBackupState;

1881 1882
static BlockJob *do_blockdev_backup(BlockdevBackup *backup, BlockJobTxn *txn,
                                    Error **errp);
1883

1884
static void blockdev_backup_prepare(BlkActionState *common, Error **errp)
1885 1886 1887
{
    BlockdevBackupState *state = DO_UPCAST(BlockdevBackupState, common, common);
    BlockdevBackup *backup;
1888
    BlockDriverState *bs, *target;
1889 1890
    Error *local_err = NULL;

1891
    assert(common->action->type == TRANSACTION_ACTION_KIND_BLOCKDEV_BACKUP);
1892
    backup = common->action->u.blockdev_backup.data;
1893

1894 1895
    bs = qmp_get_root_bs(backup->device, errp);
    if (!bs) {
1896 1897 1898
        return;
    }

1899
    target = bdrv_lookup_bs(backup->target, backup->target, errp);
M
Max Reitz 已提交
1900
    if (!target) {
1901 1902 1903 1904
        return;
    }

    /* AioContext is released in .clean() */
1905
    state->aio_context = bdrv_get_aio_context(bs);
1906
    if (state->aio_context != bdrv_get_aio_context(target)) {
1907 1908 1909 1910 1911
        state->aio_context = NULL;
        error_setg(errp, "Backup between two IO threads is not implemented");
        return;
    }
    aio_context_acquire(state->aio_context);
1912
    state->bs = bs;
1913
    bdrv_drained_begin(state->bs);
1914

1915
    state->job = do_blockdev_backup(backup, common->block_job_txn, &local_err);
1916 1917 1918 1919
    if (local_err) {
        error_propagate(errp, local_err);
        return;
    }
1920
}
1921

1922 1923 1924 1925 1926
static void blockdev_backup_commit(BlkActionState *common)
{
    BlockdevBackupState *state = DO_UPCAST(BlockdevBackupState, common, common);
    assert(state->job);
    block_job_start(state->job);
1927 1928
}

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

1933 1934
    if (state->job) {
        block_job_cancel_sync(state->job);
1935 1936 1937
    }
}

1938
static void blockdev_backup_clean(BlkActionState *common)
1939 1940 1941 1942
{
    BlockdevBackupState *state = DO_UPCAST(BlockdevBackupState, common, common);

    if (state->aio_context) {
1943
        bdrv_drained_end(state->bs);
1944 1945 1946 1947
        aio_context_release(state->aio_context);
    }
}

F
Fam Zheng 已提交
1948
typedef struct BlockDirtyBitmapState {
1949
    BlkActionState common;
F
Fam Zheng 已提交
1950 1951 1952 1953 1954 1955 1956
    BdrvDirtyBitmap *bitmap;
    BlockDriverState *bs;
    AioContext *aio_context;
    HBitmap *backup;
    bool prepared;
} BlockDirtyBitmapState;

1957
static void block_dirty_bitmap_add_prepare(BlkActionState *common,
F
Fam Zheng 已提交
1958 1959 1960 1961 1962 1963 1964
                                           Error **errp)
{
    Error *local_err = NULL;
    BlockDirtyBitmapAdd *action;
    BlockDirtyBitmapState *state = DO_UPCAST(BlockDirtyBitmapState,
                                             common, common);

J
John Snow 已提交
1965 1966 1967 1968
    if (action_check_completion_mode(common, errp) < 0) {
        return;
    }

1969
    action = common->action->u.block_dirty_bitmap_add.data;
F
Fam Zheng 已提交
1970 1971 1972 1973 1974 1975 1976 1977 1978 1979 1980 1981
    /* 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);
    }
}

1982
static void block_dirty_bitmap_add_abort(BlkActionState *common)
F
Fam Zheng 已提交
1983 1984 1985 1986 1987
{
    BlockDirtyBitmapAdd *action;
    BlockDirtyBitmapState *state = DO_UPCAST(BlockDirtyBitmapState,
                                             common, common);

1988
    action = common->action->u.block_dirty_bitmap_add.data;
F
Fam Zheng 已提交
1989 1990 1991 1992 1993 1994 1995 1996
    /* 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);
    }
}

1997
static void block_dirty_bitmap_clear_prepare(BlkActionState *common,
F
Fam Zheng 已提交
1998 1999 2000 2001 2002 2003
                                             Error **errp)
{
    BlockDirtyBitmapState *state = DO_UPCAST(BlockDirtyBitmapState,
                                             common, common);
    BlockDirtyBitmap *action;

J
John Snow 已提交
2004 2005 2006 2007
    if (action_check_completion_mode(common, errp) < 0) {
        return;
    }

2008
    action = common->action->u.block_dirty_bitmap_clear.data;
F
Fam Zheng 已提交
2009 2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023 2024 2025 2026 2027 2028 2029
    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() */
}

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

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

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

    hbitmap_free(state->backup);
}

2046
static void block_dirty_bitmap_clear_clean(BlkActionState *common)
F
Fam Zheng 已提交
2047 2048 2049 2050 2051 2052 2053 2054 2055
{
    BlockDirtyBitmapState *state = DO_UPCAST(BlockDirtyBitmapState,
                                             common, common);

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

2056
static void abort_prepare(BlkActionState *common, Error **errp)
2057 2058 2059 2060
{
    error_setg(errp, "Transaction aborted using Abort action");
}

2061
static void abort_commit(BlkActionState *common)
2062
{
2063
    g_assert_not_reached(); /* this action never succeeds */
2064 2065
}

2066
static const BlkActionOps actions[] = {
2067 2068 2069 2070 2071
    [TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT] = {
        .instance_size = sizeof(ExternalSnapshotState),
        .prepare  = external_snapshot_prepare,
        .commit   = external_snapshot_commit,
        .abort = external_snapshot_abort,
2072
        .clean = external_snapshot_clean,
2073
    },
2074
    [TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT_SYNC] = {
2075
        .instance_size = sizeof(ExternalSnapshotState),
2076 2077 2078
        .prepare  = external_snapshot_prepare,
        .commit   = external_snapshot_commit,
        .abort = external_snapshot_abort,
2079
        .clean = external_snapshot_clean,
2080
    },
2081 2082 2083
    [TRANSACTION_ACTION_KIND_DRIVE_BACKUP] = {
        .instance_size = sizeof(DriveBackupState),
        .prepare = drive_backup_prepare,
2084
        .commit = drive_backup_commit,
2085
        .abort = drive_backup_abort,
2086
        .clean = drive_backup_clean,
2087
    },
2088 2089 2090
    [TRANSACTION_ACTION_KIND_BLOCKDEV_BACKUP] = {
        .instance_size = sizeof(BlockdevBackupState),
        .prepare = blockdev_backup_prepare,
2091
        .commit = blockdev_backup_commit,
2092 2093 2094
        .abort = blockdev_backup_abort,
        .clean = blockdev_backup_clean,
    },
2095
    [TRANSACTION_ACTION_KIND_ABORT] = {
2096
        .instance_size = sizeof(BlkActionState),
2097 2098 2099
        .prepare = abort_prepare,
        .commit = abort_commit,
    },
2100 2101 2102 2103
    [TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT_INTERNAL_SYNC] = {
        .instance_size = sizeof(InternalSnapshotState),
        .prepare  = internal_snapshot_prepare,
        .abort = internal_snapshot_abort,
2104
        .clean = internal_snapshot_clean,
2105
    },
F
Fam Zheng 已提交
2106 2107 2108 2109 2110 2111 2112 2113 2114 2115 2116 2117
    [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,
    }
2118 2119
};

J
John Snow 已提交
2120 2121 2122 2123 2124 2125 2126 2127 2128 2129 2130 2131 2132 2133 2134 2135 2136 2137 2138
/**
 * 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;
}

2139
/*
2140 2141
 * 'Atomic' group operations.  The operations are performed as a set, and if
 * any fail then we roll back all operations in the group.
2142
 */
J
John Snow 已提交
2143 2144 2145 2146
void qmp_transaction(TransactionActionList *dev_list,
                     bool has_props,
                     struct TransactionProperties *props,
                     Error **errp)
2147
{
2148
    TransactionActionList *dev_entry = dev_list;
J
John Snow 已提交
2149
    BlockJobTxn *block_job_txn = NULL;
2150
    BlkActionState *state, *next;
2151
    Error *local_err = NULL;
2152

2153
    QSIMPLEQ_HEAD(snap_bdrv_states, BlkActionState) snap_bdrv_states;
2154 2155
    QSIMPLEQ_INIT(&snap_bdrv_states);

J
John Snow 已提交
2156 2157 2158 2159 2160 2161 2162 2163
    /* 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();
    }

2164
    /* drain all i/o before any operations */
2165 2166
    bdrv_drain_all();

2167
    /* We don't do anything in this loop that commits us to the operations */
2168
    while (NULL != dev_entry) {
2169
        TransactionAction *dev_info = NULL;
2170
        const BlkActionOps *ops;
2171

2172 2173 2174
        dev_info = dev_entry->value;
        dev_entry = dev_entry->next;

2175
        assert(dev_info->type < ARRAY_SIZE(actions));
2176

2177
        ops = &actions[dev_info->type];
2178 2179
        assert(ops->instance_size > 0);

2180 2181 2182
        state = g_malloc0(ops->instance_size);
        state->ops = ops;
        state->action = dev_info;
J
John Snow 已提交
2183 2184
        state->block_job_txn = block_job_txn;
        state->txn_props = props;
2185
        QSIMPLEQ_INSERT_TAIL(&snap_bdrv_states, state, entry);
2186

2187
        state->ops->prepare(state, &local_err);
2188
        if (local_err) {
2189 2190
            error_propagate(errp, local_err);
            goto delete_and_fail;
2191 2192 2193
        }
    }

2194
    QSIMPLEQ_FOREACH(state, &snap_bdrv_states, entry) {
2195 2196 2197
        if (state->ops->commit) {
            state->ops->commit(state);
        }
2198 2199 2200 2201 2202 2203
    }

    /* success */
    goto exit;

delete_and_fail:
2204
    /* failure, and it is all-or-none; roll back all operations */
2205 2206 2207
    QSIMPLEQ_FOREACH(state, &snap_bdrv_states, entry) {
        if (state->ops->abort) {
            state->ops->abort(state);
2208
        }
2209 2210
    }
exit:
2211 2212 2213
    QSIMPLEQ_FOREACH_SAFE(state, &snap_bdrv_states, entry, next) {
        if (state->ops->clean) {
            state->ops->clean(state);
2214
        }
2215
        g_free(state);
2216
    }
J
John Snow 已提交
2217 2218 2219 2220
    if (!has_props) {
        qapi_free_TransactionProperties(props);
    }
    block_job_txn_unref(block_job_txn);
2221 2222
}

2223 2224 2225
void qmp_eject(bool has_device, const char *device,
               bool has_id, const char *id,
               bool has_force, bool force, Error **errp)
2226
{
2227
    Error *local_err = NULL;
2228 2229 2230 2231 2232
    int rc;

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

2234 2235 2236
    rc = do_open_tray(has_device ? device : NULL,
                      has_id ? id : NULL,
                      force, &local_err);
2237
    if (rc && rc != -ENOSYS) {
2238
        error_propagate(errp, local_err);
L
Luiz Capitulino 已提交
2239
        return;
2240
    }
2241
    error_free(local_err);
2242

2243
    qmp_x_blockdev_remove_medium(has_device, device, has_id, id, errp);
2244 2245
}

2246 2247 2248
void qmp_block_passwd(bool has_device, const char *device,
                      bool has_node_name, const char *node_name,
                      const char *password, Error **errp)
2249
{
2250
    Error *local_err = NULL;
2251
    BlockDriverState *bs;
2252
    AioContext *aio_context;
2253

2254 2255 2256
    bs = bdrv_lookup_bs(has_device ? device : NULL,
                        has_node_name ? node_name : NULL,
                        &local_err);
2257
    if (local_err) {
2258
        error_propagate(errp, local_err);
L
Luiz Capitulino 已提交
2259
        return;
2260 2261
    }

2262 2263 2264
    aio_context = bdrv_get_aio_context(bs);
    aio_context_acquire(aio_context);

2265
    bdrv_add_key(bs, password, errp);
2266 2267

    aio_context_release(aio_context);
2268 2269
}

2270 2271 2272 2273 2274 2275 2276 2277 2278 2279
/*
 * 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.
2280
 */
2281 2282
static int do_open_tray(const char *blk_name, const char *qdev_id,
                        bool force, Error **errp)
M
Max Reitz 已提交
2283 2284
{
    BlockBackend *blk;
2285
    const char *device = qdev_id ?: blk_name;
M
Max Reitz 已提交
2286 2287
    bool locked;

2288
    blk = qmp_get_blk(blk_name, qdev_id, errp);
M
Max Reitz 已提交
2289
    if (!blk) {
2290
        return -ENODEV;
M
Max Reitz 已提交
2291 2292 2293 2294
    }

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

2298
    if (!blk_dev_has_tray(blk)) {
2299 2300
        error_setg(errp, "Device '%s' does not have a tray", device);
        return -ENOSYS;
2301 2302
    }

M
Max Reitz 已提交
2303
    if (blk_dev_is_tray_open(blk)) {
2304
        return 0;
M
Max Reitz 已提交
2305 2306 2307 2308 2309 2310 2311 2312 2313 2314
    }

    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);
    }
2315 2316

    if (locked && !force) {
2317 2318 2319
        error_setg(errp, "Device '%s' is locked and force was not specified, "
                   "wait for tray to open and try again", device);
        return -EINPROGRESS;
2320 2321 2322 2323 2324
    }

    return 0;
}

2325 2326 2327
void qmp_blockdev_open_tray(bool has_device, const char *device,
                            bool has_id, const char *id,
                            bool has_force, bool force,
2328 2329
                            Error **errp)
{
2330 2331 2332
    Error *local_err = NULL;
    int rc;

2333 2334 2335
    if (!has_force) {
        force = false;
    }
2336 2337 2338
    rc = do_open_tray(has_device ? device : NULL,
                      has_id ? id : NULL,
                      force, &local_err);
2339 2340 2341 2342 2343
    if (rc && rc != -ENOSYS && rc != -EINPROGRESS) {
        error_propagate(errp, local_err);
        return;
    }
    error_free(local_err);
M
Max Reitz 已提交
2344 2345
}

2346 2347 2348
void qmp_blockdev_close_tray(bool has_device, const char *device,
                             bool has_id, const char *id,
                             Error **errp)
M
Max Reitz 已提交
2349 2350 2351
{
    BlockBackend *blk;

2352 2353 2354 2355
    device = has_device ? device : NULL;
    id = has_id ? id : NULL;

    blk = qmp_get_blk(device, id, errp);
M
Max Reitz 已提交
2356 2357 2358 2359 2360
    if (!blk) {
        return;
    }

    if (!blk_dev_has_removable_media(blk)) {
2361
        error_setg(errp, "Device '%s' is not removable", device ?: id);
M
Max Reitz 已提交
2362 2363 2364
        return;
    }

2365 2366 2367 2368 2369
    if (!blk_dev_has_tray(blk)) {
        /* Ignore this command on tray-less devices */
        return;
    }

M
Max Reitz 已提交
2370 2371 2372 2373 2374 2375 2376
    if (!blk_dev_is_tray_open(blk)) {
        return;
    }

    blk_dev_change_media_cb(blk, true);
}

2377 2378
void qmp_x_blockdev_remove_medium(bool has_device, const char *device,
                                  bool has_id, const char *id, Error **errp)
M
Max Reitz 已提交
2379 2380 2381 2382
{
    BlockBackend *blk;
    BlockDriverState *bs;
    AioContext *aio_context;
2383
    bool has_attached_device;
M
Max Reitz 已提交
2384

2385 2386 2387 2388
    device = has_device ? device : NULL;
    id = has_id ? id : NULL;

    blk = qmp_get_blk(device, id, errp);
M
Max Reitz 已提交
2389 2390 2391 2392 2393
    if (!blk) {
        return;
    }

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

2396 2397
    if (has_attached_device && !blk_dev_has_removable_media(blk)) {
        error_setg(errp, "Device '%s' is not removable", device ?: id);
M
Max Reitz 已提交
2398 2399 2400
        return;
    }

2401 2402 2403 2404
    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 已提交
2405 2406 2407 2408 2409 2410 2411 2412 2413 2414 2415 2416 2417 2418 2419 2420 2421
        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);

2422 2423 2424 2425 2426 2427 2428 2429
    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 已提交
2430 2431 2432 2433
out:
    aio_context_release(aio_context);
}

2434
static void qmp_blockdev_insert_anon_medium(BlockBackend *blk,
M
Max Reitz 已提交
2435 2436 2437 2438 2439 2440 2441 2442
                                            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)) {
2443
        error_setg(errp, "Device is not removable");
M
Max Reitz 已提交
2444 2445 2446
        return;
    }

2447
    if (has_device && blk_dev_has_tray(blk) && !blk_dev_is_tray_open(blk)) {
2448
        error_setg(errp, "Tray of the device is not open");
M
Max Reitz 已提交
2449 2450 2451 2452
        return;
    }

    if (blk_bs(blk)) {
2453
        error_setg(errp, "There already is a medium in the device");
M
Max Reitz 已提交
2454 2455 2456 2457 2458
        return;
    }

    blk_insert_bs(blk, bs);

2459 2460 2461 2462 2463 2464 2465 2466
    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 已提交
2467 2468
}

2469 2470 2471
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 已提交
2472
{
2473
    BlockBackend *blk;
M
Max Reitz 已提交
2474 2475
    BlockDriverState *bs;

2476 2477 2478 2479 2480 2481 2482
    blk = qmp_get_blk(has_device ? device : NULL,
                      has_id ? id : NULL,
                      errp);
    if (!blk) {
        return;
    }

M
Max Reitz 已提交
2483 2484 2485 2486 2487 2488
    bs = bdrv_find_node(node_name);
    if (!bs) {
        error_setg(errp, "Node '%s' not found", node_name);
        return;
    }

K
Kevin Wolf 已提交
2489
    if (bdrv_has_blk(bs)) {
2490
        error_setg(errp, "Node '%s' is already in use", node_name);
M
Max Reitz 已提交
2491 2492 2493
        return;
    }

2494
    qmp_blockdev_insert_anon_medium(blk, bs, errp);
M
Max Reitz 已提交
2495 2496
}

2497 2498 2499
void qmp_blockdev_change_medium(bool has_device, const char *device,
                                bool has_id, const char *id,
                                const char *filename,
M
Max Reitz 已提交
2500
                                bool has_format, const char *format,
2501 2502
                                bool has_read_only,
                                BlockdevChangeReadOnlyMode read_only,
M
Max Reitz 已提交
2503
                                Error **errp)
2504 2505 2506
{
    BlockBackend *blk;
    BlockDriverState *medium_bs = NULL;
M
Max Reitz 已提交
2507
    int bdrv_flags;
2508
    bool detect_zeroes;
2509
    int rc;
2510 2511 2512
    QDict *options = NULL;
    Error *err = NULL;

2513 2514 2515
    blk = qmp_get_blk(has_device ? device : NULL,
                      has_id ? id : NULL,
                      errp);
2516 2517 2518 2519 2520 2521 2522 2523 2524
    if (!blk) {
        goto fail;
    }

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

    bdrv_flags = blk_get_open_flags_from_root_state(blk);
2525 2526
    bdrv_flags &= ~(BDRV_O_TEMPORARY | BDRV_O_SNAPSHOT | BDRV_O_NO_BACKING |
        BDRV_O_PROTOCOL);
2527

2528 2529 2530 2531 2532 2533 2534 2535 2536 2537 2538 2539 2540 2541 2542 2543 2544 2545 2546 2547
    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();
    }

2548 2549 2550 2551 2552
    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 已提交
2553
    if (has_format) {
2554 2555 2556
        qdict_put(options, "driver", qstring_from_str(format));
    }

M
Max Reitz 已提交
2557 2558
    medium_bs = bdrv_open(filename, NULL, options, bdrv_flags, errp);
    if (!medium_bs) {
2559 2560 2561 2562 2563 2564 2565 2566 2567
        goto fail;
    }

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

2568 2569 2570
    rc = do_open_tray(has_device ? device : NULL,
                      has_id ? id : NULL,
                      false, &err);
2571
    if (rc && rc != -ENOSYS) {
2572 2573 2574
        error_propagate(errp, err);
        goto fail;
    }
2575 2576
    error_free(err);
    err = NULL;
2577

2578
    qmp_x_blockdev_remove_medium(has_device, device, has_id, id, &err);
2579 2580 2581 2582 2583
    if (err) {
        error_propagate(errp, err);
        goto fail;
    }

2584
    qmp_blockdev_insert_anon_medium(blk, medium_bs, &err);
2585 2586 2587 2588 2589
    if (err) {
        error_propagate(errp, err);
        goto fail;
    }

2590
    qmp_blockdev_close_tray(has_device, device, has_id, id, errp);
2591 2592 2593 2594 2595 2596 2597 2598

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 已提交
2599
/* throttling disk I/O limits */
2600
void qmp_block_set_io_throttle(BlockIOThrottle *arg, Error **errp)
Z
Zhi Yong Wu 已提交
2601
{
2602
    ThrottleConfig cfg;
Z
Zhi Yong Wu 已提交
2603
    BlockDriverState *bs;
2604
    BlockBackend *blk;
2605
    AioContext *aio_context;
Z
Zhi Yong Wu 已提交
2606

2607 2608 2609
    blk = qmp_get_blk(arg->has_device ? arg->device : NULL,
                      arg->has_id ? arg->id : NULL,
                      errp);
2610
    if (!blk) {
2611
        return;
Z
Zhi Yong Wu 已提交
2612
    }
M
Max Reitz 已提交
2613 2614 2615 2616

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

2617
    bs = blk_bs(blk);
M
Max Reitz 已提交
2618
    if (!bs) {
2619
        error_setg(errp, "Device has no medium");
M
Max Reitz 已提交
2620 2621
        goto out;
    }
Z
Zhi Yong Wu 已提交
2622

2623
    throttle_config_init(&cfg);
2624 2625 2626
    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;
2627

2628 2629 2630
    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;
2631

2632 2633
    if (arg->has_bps_max) {
        cfg.buckets[THROTTLE_BPS_TOTAL].max = arg->bps_max;
2634
    }
2635 2636
    if (arg->has_bps_rd_max) {
        cfg.buckets[THROTTLE_BPS_READ].max = arg->bps_rd_max;
2637
    }
2638 2639
    if (arg->has_bps_wr_max) {
        cfg.buckets[THROTTLE_BPS_WRITE].max = arg->bps_wr_max;
2640
    }
2641 2642
    if (arg->has_iops_max) {
        cfg.buckets[THROTTLE_OPS_TOTAL].max = arg->iops_max;
2643
    }
2644 2645
    if (arg->has_iops_rd_max) {
        cfg.buckets[THROTTLE_OPS_READ].max = arg->iops_rd_max;
2646
    }
2647 2648
    if (arg->has_iops_wr_max) {
        cfg.buckets[THROTTLE_OPS_WRITE].max = arg->iops_wr_max;
2649
    }
Z
Zhi Yong Wu 已提交
2650

2651 2652
    if (arg->has_bps_max_length) {
        cfg.buckets[THROTTLE_BPS_TOTAL].burst_length = arg->bps_max_length;
2653
    }
2654 2655
    if (arg->has_bps_rd_max_length) {
        cfg.buckets[THROTTLE_BPS_READ].burst_length = arg->bps_rd_max_length;
2656
    }
2657 2658
    if (arg->has_bps_wr_max_length) {
        cfg.buckets[THROTTLE_BPS_WRITE].burst_length = arg->bps_wr_max_length;
2659
    }
2660 2661
    if (arg->has_iops_max_length) {
        cfg.buckets[THROTTLE_OPS_TOTAL].burst_length = arg->iops_max_length;
2662
    }
2663 2664
    if (arg->has_iops_rd_max_length) {
        cfg.buckets[THROTTLE_OPS_READ].burst_length = arg->iops_rd_max_length;
2665
    }
2666 2667
    if (arg->has_iops_wr_max_length) {
        cfg.buckets[THROTTLE_OPS_WRITE].burst_length = arg->iops_wr_max_length;
2668 2669
    }

2670 2671
    if (arg->has_iops_size) {
        cfg.op_size = arg->iops_size;
2672
    }
2673

2674
    if (!throttle_is_valid(&cfg, errp)) {
M
Max Reitz 已提交
2675
        goto out;
Z
Zhi Yong Wu 已提交
2676 2677
    }

2678 2679 2680
    if (throttle_enabled(&cfg)) {
        /* Enable I/O limits if they're not enabled yet, otherwise
         * just update the throttling group. */
2681
        if (!blk_get_public(blk)->throttle_state) {
2682
            blk_io_limits_enable(blk,
2683 2684 2685
                                 arg->has_group ? arg->group :
                                 arg->has_device ? arg->device :
                                 arg->id);
2686 2687
        } else if (arg->has_group) {
            blk_io_limits_update_group(blk, arg->group);
2688 2689
        }
        /* Set the new throttling configuration */
2690 2691
        blk_set_io_limits(blk, &cfg);
    } else if (blk_get_public(blk)->throttle_state) {
2692
        /* If all throttling settings are set to 0, disable I/O limits */
2693
        blk_io_limits_disable(blk);
Z
Zhi Yong Wu 已提交
2694
    }
2695

M
Max Reitz 已提交
2696
out:
2697
    aio_context_release(aio_context);
Z
Zhi Yong Wu 已提交
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 2738 2739 2740 2741 2742 2743 2744 2745 2746 2747 2748
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 已提交
2749 2750 2751 2752 2753 2754
    if (bdrv_dirty_bitmap_frozen(bitmap)) {
        error_setg(errp,
                   "Bitmap '%s' is currently frozen and cannot be removed",
                   name);
        goto out;
    }
2755
    bdrv_dirty_bitmap_make_anon(bitmap);
2756 2757
    bdrv_release_dirty_bitmap(bs, bitmap);

J
John Snow 已提交
2758
 out:
2759 2760 2761
    aio_context_release(aio_context);
}

J
John Snow 已提交
2762 2763 2764 2765 2766 2767 2768 2769 2770 2771 2772 2773 2774 2775 2776 2777 2778 2779 2780 2781 2782 2783 2784 2785 2786 2787 2788 2789
/**
 * 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 已提交
2790
    bdrv_clear_dirty_bitmap(bitmap, NULL);
J
John Snow 已提交
2791 2792 2793 2794 2795

 out:
    aio_context_release(aio_context);
}

2796
void hmp_drive_del(Monitor *mon, const QDict *qdict)
2797 2798
{
    const char *id = qdict_get_str(qdict, "id");
2799
    BlockBackend *blk;
2800
    BlockDriverState *bs;
2801
    AioContext *aio_context;
2802
    Error *local_err = NULL;
2803

2804 2805
    bs = bdrv_find_node(id);
    if (bs) {
2806
        qmp_x_blockdev_del(id, &local_err);
2807 2808 2809 2810 2811 2812
        if (local_err) {
            error_report_err(local_err);
        }
        return;
    }

2813 2814
    blk = blk_by_name(id);
    if (!blk) {
2815
        error_report("Device '%s' not found", id);
2816
        return;
2817
    }
2818

2819
    if (!blk_legacy_dinfo(blk)) {
2820 2821
        error_report("Deleting device added with blockdev-add"
                     " is not supported");
2822
        return;
2823 2824
    }

M
Max Reitz 已提交
2825
    aio_context = blk_get_aio_context(blk);
2826 2827
    aio_context_acquire(aio_context);

M
Max Reitz 已提交
2828 2829 2830 2831 2832 2833 2834
    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;
        }
2835

2836
        blk_remove_bs(blk);
M
Max Reitz 已提交
2837
    }
2838

2839
    /* Make the BlockBackend and the attached BlockDriverState anonymous */
2840 2841
    monitor_remove_blk(blk);

2842 2843
    /* 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.
2844
     */
2845
    if (blk_get_attached_dev(blk)) {
2846
        /* Further I/O must not pause the guest */
2847 2848
        blk_set_on_error(blk, BLOCKDEV_ON_ERROR_REPORT,
                         BLOCKDEV_ON_ERROR_REPORT);
2849
    } else {
2850
        blk_unref(blk);
2851 2852
    }

2853
    aio_context_release(aio_context);
2854
}
2855

2856 2857 2858
void qmp_block_resize(bool has_device, const char *device,
                      bool has_node_name, const char *node_name,
                      int64_t size, Error **errp)
2859
{
2860
    Error *local_err = NULL;
2861
    BlockDriverState *bs;
2862
    AioContext *aio_context;
2863
    int ret;
2864

2865 2866 2867
    bs = bdrv_lookup_bs(has_device ? device : NULL,
                        has_node_name ? node_name : NULL,
                        &local_err);
2868
    if (local_err) {
2869 2870 2871 2872
        error_propagate(errp, local_err);
        return;
    }

2873 2874 2875
    aio_context = bdrv_get_aio_context(bs);
    aio_context_acquire(aio_context);

2876
    if (!bdrv_is_first_non_filter(bs)) {
2877
        error_setg(errp, QERR_FEATURE_DISABLED, "resize");
2878
        goto out;
2879 2880 2881
    }

    if (size < 0) {
2882
        error_setg(errp, QERR_INVALID_PARAMETER_VALUE, "size", "a >0 size");
2883
        goto out;
2884 2885
    }

2886
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_RESIZE, NULL)) {
2887
        error_setg(errp, QERR_DEVICE_IN_USE, device);
2888
        goto out;
2889 2890
    }

2891 2892 2893
    /* complete all in-flight operations before resizing the device */
    bdrv_drain_all();

2894 2895
    ret = bdrv_truncate(bs, size);
    switch (ret) {
2896 2897 2898
    case 0:
        break;
    case -ENOMEDIUM:
2899
        error_setg(errp, QERR_DEVICE_HAS_NO_MEDIUM, device);
2900 2901
        break;
    case -ENOTSUP:
2902
        error_setg(errp, QERR_UNSUPPORTED);
2903 2904
        break;
    case -EACCES:
2905
        error_setg(errp, "Device '%s' is read only", device);
2906 2907
        break;
    case -EBUSY:
2908
        error_setg(errp, QERR_DEVICE_IN_USE, device);
2909 2910
        break;
    default:
2911
        error_setg_errno(errp, -ret, "Could not resize");
2912
        break;
2913
    }
2914 2915 2916

out:
    aio_context_release(aio_context);
2917
}
S
Stefan Hajnoczi 已提交
2918

2919
void qmp_block_stream(bool has_job_id, const char *job_id, const char *device,
2920
                      bool has_base, const char *base,
2921
                      bool has_base_node, const char *base_node,
2922 2923
                      bool has_backing_file, const char *backing_file,
                      bool has_speed, int64_t speed,
P
Paolo Bonzini 已提交
2924 2925
                      bool has_on_error, BlockdevOnError on_error,
                      Error **errp)
S
Stefan Hajnoczi 已提交
2926
{
2927
    BlockDriverState *bs, *iter;
2928
    BlockDriverState *base_bs = NULL;
2929
    AioContext *aio_context;
2930
    Error *local_err = NULL;
2931
    const char *base_name = NULL;
S
Stefan Hajnoczi 已提交
2932

P
Paolo Bonzini 已提交
2933 2934 2935 2936
    if (!has_on_error) {
        on_error = BLOCKDEV_ON_ERROR_REPORT;
    }

2937
    bs = bdrv_lookup_bs(device, device, errp);
2938
    if (!bs) {
S
Stefan Hajnoczi 已提交
2939 2940 2941
        return;
    }

2942
    aio_context = bdrv_get_aio_context(bs);
2943 2944
    aio_context_acquire(aio_context);

2945 2946 2947 2948 2949 2950
    if (has_base && has_base_node) {
        error_setg(errp, "'base' and 'base-node' cannot be specified "
                   "at the same time");
        goto out;
    }

2951
    if (has_base) {
2952 2953
        base_bs = bdrv_find_backing_image(bs, base);
        if (base_bs == NULL) {
2954
            error_setg(errp, QERR_BASE_NOT_FOUND, base);
2955
            goto out;
2956
        }
2957
        assert(bdrv_get_aio_context(base_bs) == aio_context);
2958
        base_name = base;
S
Stefan Hajnoczi 已提交
2959 2960
    }

2961 2962 2963 2964 2965 2966 2967 2968 2969 2970 2971 2972 2973 2974
    if (has_base_node) {
        base_bs = bdrv_lookup_bs(NULL, base_node, errp);
        if (!base_bs) {
            goto out;
        }
        if (bs == base_bs || !bdrv_chain_contains(bs, base_bs)) {
            error_setg(errp, "Node '%s' is not a backing image of '%s'",
                       base_node, device);
            goto out;
        }
        assert(bdrv_get_aio_context(base_bs) == aio_context);
        base_name = base_bs->filename;
    }

2975 2976 2977 2978 2979 2980 2981
    /* Check for op blockers in the whole chain between bs and base */
    for (iter = bs; iter && iter != base_bs; iter = backing_bs(iter)) {
        if (bdrv_op_is_blocked(iter, BLOCK_OP_TYPE_STREAM, errp)) {
            goto out;
        }
    }

2982 2983 2984 2985 2986
    /* 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");
2987
        goto out;
2988 2989 2990 2991 2992
    }

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

2993
    stream_start(has_job_id ? job_id : NULL, bs, base_bs, base_name,
2994
                 has_speed ? speed : 0, on_error, &local_err);
2995
    if (local_err) {
2996
        error_propagate(errp, local_err);
2997
        goto out;
S
Stefan Hajnoczi 已提交
2998 2999 3000
    }

    trace_qmp_block_stream(bs, bs->job);
3001 3002 3003

out:
    aio_context_release(aio_context);
S
Stefan Hajnoczi 已提交
3004
}
3005

3006
void qmp_block_commit(bool has_job_id, const char *job_id, const char *device,
3007 3008
                      bool has_base, const char *base,
                      bool has_top, const char *top,
3009
                      bool has_backing_file, const char *backing_file,
3010 3011 3012 3013
                      bool has_speed, int64_t speed,
                      Error **errp)
{
    BlockDriverState *bs;
3014
    BlockDriverState *iter;
3015
    BlockDriverState *base_bs, *top_bs;
3016
    AioContext *aio_context;
3017 3018 3019 3020
    Error *local_err = NULL;
    /* This will be part of the QMP command, if/when the
     * BlockdevOnError change for blkmirror makes it in
     */
3021
    BlockdevOnError on_error = BLOCKDEV_ON_ERROR_REPORT;
3022

3023 3024 3025 3026
    if (!has_speed) {
        speed = 0;
    }

3027 3028 3029 3030 3031
    /* 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. */
3032 3033 3034 3035 3036 3037 3038 3039 3040 3041
    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);
        }
3042
        return;
3043 3044
    }

3045
    aio_context = bdrv_get_aio_context(bs);
3046 3047
    aio_context_acquire(aio_context);

3048
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_COMMIT_SOURCE, errp)) {
3049
        goto out;
3050 3051 3052 3053 3054
    }

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

3055
    if (has_top && top) {
3056 3057 3058 3059 3060 3061 3062
        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");
3063
        goto out;
3064 3065
    }

3066 3067
    assert(bdrv_get_aio_context(top_bs) == aio_context);

3068 3069 3070 3071 3072 3073 3074
    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) {
3075
        error_setg(errp, QERR_BASE_NOT_FOUND, base ? base : "NULL");
3076
        goto out;
3077 3078
    }

3079 3080
    assert(bdrv_get_aio_context(base_bs) == aio_context);

3081 3082 3083 3084
    for (iter = top_bs; iter != backing_bs(base_bs); iter = backing_bs(iter)) {
        if (bdrv_op_is_blocked(iter, BLOCK_OP_TYPE_COMMIT_TARGET, errp)) {
            goto out;
        }
3085 3086
    }

3087 3088 3089
    /* Do not allow attempts to commit an image into itself */
    if (top_bs == base_bs) {
        error_setg(errp, "cannot commit an image into itself");
3090
        goto out;
3091 3092
    }

F
Fam Zheng 已提交
3093
    if (top_bs == bs) {
3094 3095 3096
        if (has_backing_file) {
            error_setg(errp, "'backing-file' specified,"
                             " but 'top' is the active layer");
3097
            goto out;
3098
        }
3099
        commit_active_start(has_job_id ? job_id : NULL, bs, base_bs,
3100 3101
                            BLOCK_JOB_DEFAULT, speed, on_error, NULL, NULL,
                            &local_err, false);
F
Fam Zheng 已提交
3102
    } else {
3103 3104 3105 3106
        BlockDriverState *overlay_bs = bdrv_find_overlay(bs, top_bs);
        if (bdrv_op_is_blocked(overlay_bs, BLOCK_OP_TYPE_COMMIT_TARGET, errp)) {
            goto out;
        }
3107
        commit_start(has_job_id ? job_id : NULL, bs, base_bs, top_bs, speed,
3108 3109
                     on_error, has_backing_file ? backing_file : NULL,
                     &local_err);
F
Fam Zheng 已提交
3110
    }
3111 3112
    if (local_err != NULL) {
        error_propagate(errp, local_err);
3113
        goto out;
3114
    }
3115 3116 3117

out:
    aio_context_release(aio_context);
3118 3119
}

3120 3121
static BlockJob *do_drive_backup(DriveBackup *backup, BlockJobTxn *txn,
                                 Error **errp)
3122 3123 3124
{
    BlockDriverState *bs;
    BlockDriverState *target_bs;
3125
    BlockDriverState *source = NULL;
3126
    BlockJob *job = NULL;
3127
    BdrvDirtyBitmap *bmap = NULL;
3128
    AioContext *aio_context;
3129
    QDict *options = NULL;
3130 3131 3132 3133
    Error *local_err = NULL;
    int flags;
    int64_t size;

P
Pavel Butsykin 已提交
3134 3135
    if (!backup->has_speed) {
        backup->speed = 0;
3136
    }
P
Pavel Butsykin 已提交
3137 3138
    if (!backup->has_on_source_error) {
        backup->on_source_error = BLOCKDEV_ON_ERROR_REPORT;
3139
    }
P
Pavel Butsykin 已提交
3140 3141
    if (!backup->has_on_target_error) {
        backup->on_target_error = BLOCKDEV_ON_ERROR_REPORT;
3142
    }
P
Pavel Butsykin 已提交
3143 3144 3145 3146 3147
    if (!backup->has_mode) {
        backup->mode = NEW_IMAGE_MODE_ABSOLUTE_PATHS;
    }
    if (!backup->has_job_id) {
        backup->job_id = NULL;
3148
    }
3149 3150 3151
    if (!backup->has_compress) {
        backup->compress = false;
    }
3152

P
Pavel Butsykin 已提交
3153
    bs = qmp_get_root_bs(backup->device, errp);
3154
    if (!bs) {
3155
        return NULL;
3156 3157
    }

3158
    aio_context = bdrv_get_aio_context(bs);
3159 3160
    aio_context_acquire(aio_context);

P
Pavel Butsykin 已提交
3161 3162 3163
    if (!backup->has_format) {
        backup->format = backup->mode == NEW_IMAGE_MODE_EXISTING ?
                         NULL : (char*) bs->drv->format_name;
3164 3165
    }

F
Fam Zheng 已提交
3166
    /* Early check to avoid creating target */
3167
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_BACKUP_SOURCE, errp)) {
3168
        goto out;
3169 3170
    }

K
Kevin Wolf 已提交
3171
    flags = bs->open_flags | BDRV_O_RDWR;
3172

3173 3174
    /* See if we have a backing HD we can use to create our new image
     * on top of. */
P
Pavel Butsykin 已提交
3175
    if (backup->sync == MIRROR_SYNC_MODE_TOP) {
3176
        source = backing_bs(bs);
3177
        if (!source) {
P
Pavel Butsykin 已提交
3178
            backup->sync = MIRROR_SYNC_MODE_FULL;
3179 3180
        }
    }
P
Pavel Butsykin 已提交
3181
    if (backup->sync == MIRROR_SYNC_MODE_NONE) {
3182 3183 3184
        source = bs;
    }

3185 3186 3187
    size = bdrv_getlength(bs);
    if (size < 0) {
        error_setg_errno(errp, -size, "bdrv_getlength failed");
3188
        goto out;
3189 3190
    }

P
Pavel Butsykin 已提交
3191 3192
    if (backup->mode != NEW_IMAGE_MODE_EXISTING) {
        assert(backup->format);
3193
        if (source) {
P
Pavel Butsykin 已提交
3194
            bdrv_img_create(backup->target, backup->format, source->filename,
3195 3196 3197
                            source->drv->format_name, NULL,
                            size, flags, &local_err, false);
        } else {
P
Pavel Butsykin 已提交
3198
            bdrv_img_create(backup->target, backup->format, NULL, NULL, NULL,
3199 3200
                            size, flags, &local_err, false);
        }
3201 3202
    }

3203
    if (local_err) {
3204
        error_propagate(errp, local_err);
3205
        goto out;
3206 3207
    }

P
Pavel Butsykin 已提交
3208
    if (backup->format) {
3209
        options = qdict_new();
P
Pavel Butsykin 已提交
3210
        qdict_put(options, "driver", qstring_from_str(backup->format));
3211 3212
    }

P
Pavel Butsykin 已提交
3213
    target_bs = bdrv_open(backup->target, NULL, options, flags, errp);
M
Max Reitz 已提交
3214
    if (!target_bs) {
3215
        goto out;
3216 3217
    }

3218 3219
    bdrv_set_aio_context(target_bs, aio_context);

P
Pavel Butsykin 已提交
3220 3221
    if (backup->has_bitmap) {
        bmap = bdrv_find_dirty_bitmap(bs, backup->bitmap);
3222
        if (!bmap) {
P
Pavel Butsykin 已提交
3223
            error_setg(errp, "Bitmap '%s' could not be found", backup->bitmap);
3224
            bdrv_unref(target_bs);
3225 3226 3227 3228
            goto out;
        }
    }

3229 3230 3231 3232
    job = backup_job_create(backup->job_id, bs, target_bs, backup->speed,
                            backup->sync, bmap, backup->compress,
                            backup->on_source_error, backup->on_target_error,
                            BLOCK_JOB_DEFAULT, NULL, NULL, txn, &local_err);
K
Kevin Wolf 已提交
3233
    bdrv_unref(target_bs);
3234 3235
    if (local_err != NULL) {
        error_propagate(errp, local_err);
3236
        goto out;
3237
    }
3238 3239 3240

out:
    aio_context_release(aio_context);
3241
    return job;
3242 3243
}

P
Pavel Butsykin 已提交
3244
void qmp_drive_backup(DriveBackup *arg, Error **errp)
3245
{
3246 3247 3248 3249 3250 3251

    BlockJob *job;
    job = do_drive_backup(arg, NULL, errp);
    if (job) {
        block_job_start(job);
    }
3252 3253
}

3254 3255
BlockDeviceInfoList *qmp_query_named_block_nodes(Error **errp)
{
3256
    return bdrv_named_nodes_list(errp);
3257 3258
}

3259 3260
BlockJob *do_blockdev_backup(BlockdevBackup *backup, BlockJobTxn *txn,
                             Error **errp)
F
Fam Zheng 已提交
3261 3262 3263 3264 3265
{
    BlockDriverState *bs;
    BlockDriverState *target_bs;
    Error *local_err = NULL;
    AioContext *aio_context;
3266
    BlockJob *job = NULL;
F
Fam Zheng 已提交
3267

P
Pavel Butsykin 已提交
3268 3269
    if (!backup->has_speed) {
        backup->speed = 0;
F
Fam Zheng 已提交
3270
    }
P
Pavel Butsykin 已提交
3271 3272 3273 3274 3275
    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 已提交
3276
    }
P
Pavel Butsykin 已提交
3277 3278
    if (!backup->has_job_id) {
        backup->job_id = NULL;
F
Fam Zheng 已提交
3279
    }
3280 3281 3282
    if (!backup->has_compress) {
        backup->compress = false;
    }
F
Fam Zheng 已提交
3283

P
Pavel Butsykin 已提交
3284
    bs = qmp_get_root_bs(backup->device, errp);
3285
    if (!bs) {
3286
        return NULL;
F
Fam Zheng 已提交
3287 3288
    }

3289
    aio_context = bdrv_get_aio_context(bs);
F
Fam Zheng 已提交
3290 3291
    aio_context_acquire(aio_context);

P
Pavel Butsykin 已提交
3292
    target_bs = bdrv_lookup_bs(backup->target, backup->target, errp);
3293
    if (!target_bs) {
M
Max Reitz 已提交
3294 3295
        goto out;
    }
F
Fam Zheng 已提交
3296

3297 3298 3299 3300 3301 3302 3303 3304 3305 3306 3307
    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;
        }
    }
3308 3309 3310 3311
    job = backup_job_create(backup->job_id, bs, target_bs, backup->speed,
                            backup->sync, NULL, backup->compress,
                            backup->on_source_error, backup->on_target_error,
                            BLOCK_JOB_DEFAULT, NULL, NULL, txn, &local_err);
F
Fam Zheng 已提交
3312 3313 3314 3315 3316
    if (local_err != NULL) {
        error_propagate(errp, local_err);
    }
out:
    aio_context_release(aio_context);
3317
    return job;
F
Fam Zheng 已提交
3318 3319
}

P
Pavel Butsykin 已提交
3320 3321
void qmp_blockdev_backup(BlockdevBackup *arg, Error **errp)
{
3322 3323 3324 3325 3326
    BlockJob *job;
    job = do_blockdev_backup(arg, NULL, errp);
    if (job) {
        block_job_start(job);
    }
3327 3328
}

3329 3330 3331
/* Parameter check and block job starting for drive mirroring.
 * Caller should hold @device and @target's aio context (must be the same).
 **/
3332
static void blockdev_mirror_common(const char *job_id, BlockDriverState *bs,
3333 3334 3335
                                   BlockDriverState *target,
                                   bool has_replaces, const char *replaces,
                                   enum MirrorSyncMode sync,
M
Max Reitz 已提交
3336
                                   BlockMirrorBackingMode backing_mode,
3337 3338 3339 3340 3341 3342 3343 3344 3345
                                   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 已提交
3346 3347 3348 3349 3350
{

    if (!has_speed) {
        speed = 0;
    }
3351 3352 3353 3354 3355 3356
    if (!has_on_source_error) {
        on_source_error = BLOCKDEV_ON_ERROR_REPORT;
    }
    if (!has_on_target_error) {
        on_target_error = BLOCKDEV_ON_ERROR_REPORT;
    }
3357 3358 3359
    if (!has_granularity) {
        granularity = 0;
    }
3360
    if (!has_buf_size) {
W
Wen Congyang 已提交
3361
        buf_size = 0;
3362
    }
3363 3364 3365
    if (!has_unmap) {
        unmap = true;
    }
3366

3367
    if (granularity != 0 && (granularity < 512 || granularity > 1048576 * 64)) {
3368 3369
        error_setg(errp, QERR_INVALID_PARAMETER_VALUE, "granularity",
                   "a value in range [512B, 64MB]");
3370 3371 3372
        return;
    }
    if (granularity & (granularity - 1)) {
3373 3374
        error_setg(errp, QERR_INVALID_PARAMETER_VALUE, "granularity",
                   "power of 2");
3375 3376
        return;
    }
P
Paolo Bonzini 已提交
3377

3378 3379 3380
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_MIRROR_SOURCE, errp)) {
        return;
    }
F
Fam Zheng 已提交
3381 3382 3383
    if (bdrv_op_is_blocked(target, BLOCK_OP_TYPE_MIRROR_TARGET, errp)) {
        return;
    }
3384 3385 3386 3387 3388 3389 3390 3391

    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
     */
3392
    mirror_start(job_id, bs, target,
3393
                 has_replaces ? replaces : NULL,
M
Max Reitz 已提交
3394
                 speed, granularity, buf_size, sync, backing_mode,
3395
                 on_source_error, on_target_error, unmap, errp);
3396 3397
}

E
Eric Blake 已提交
3398
void qmp_drive_mirror(DriveMirror *arg, Error **errp)
3399 3400 3401 3402
{
    BlockDriverState *bs;
    BlockDriverState *source, *target_bs;
    AioContext *aio_context;
M
Max Reitz 已提交
3403
    BlockMirrorBackingMode backing_mode;
3404 3405 3406 3407
    Error *local_err = NULL;
    QDict *options = NULL;
    int flags;
    int64_t size;
E
Eric Blake 已提交
3408
    const char *format = arg->format;
3409

3410 3411
    bs = qmp_get_root_bs(arg->device, errp);
    if (!bs) {
P
Paolo Bonzini 已提交
3412 3413 3414
        return;
    }

3415
    aio_context = bdrv_get_aio_context(bs);
3416 3417
    aio_context_acquire(aio_context);

E
Eric Blake 已提交
3418 3419
    if (!arg->has_mode) {
        arg->mode = NEW_IMAGE_MODE_ABSOLUTE_PATHS;
3420
    }
P
Paolo Bonzini 已提交
3421

E
Eric Blake 已提交
3422 3423 3424
    if (!arg->has_format) {
        format = (arg->mode == NEW_IMAGE_MODE_EXISTING
                  ? NULL : bs->drv->format_name);
P
Paolo Bonzini 已提交
3425 3426
    }

K
Kevin Wolf 已提交
3427
    flags = bs->open_flags | BDRV_O_RDWR;
3428
    source = backing_bs(bs);
E
Eric Blake 已提交
3429 3430
    if (!source && arg->sync == MIRROR_SYNC_MODE_TOP) {
        arg->sync = MIRROR_SYNC_MODE_FULL;
P
Paolo Bonzini 已提交
3431
    }
E
Eric Blake 已提交
3432
    if (arg->sync == MIRROR_SYNC_MODE_NONE) {
3433 3434
        source = bs;
    }
P
Paolo Bonzini 已提交
3435

3436 3437 3438
    size = bdrv_getlength(bs);
    if (size < 0) {
        error_setg_errno(errp, -size, "bdrv_getlength failed");
3439
        goto out;
3440 3441
    }

E
Eric Blake 已提交
3442
    if (arg->has_replaces) {
3443
        BlockDriverState *to_replace_bs;
3444 3445
        AioContext *replace_aio_context;
        int64_t replace_size;
3446

E
Eric Blake 已提交
3447
        if (!arg->has_node_name) {
3448 3449
            error_setg(errp, "a node-name must be provided when replacing a"
                             " named node of the graph");
3450
            goto out;
3451 3452
        }

E
Eric Blake 已提交
3453
        to_replace_bs = check_to_replace_node(bs, arg->replaces, &local_err);
3454 3455 3456

        if (!to_replace_bs) {
            error_propagate(errp, local_err);
3457
            goto out;
3458 3459
        }

3460 3461 3462 3463 3464 3465
        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) {
3466 3467
            error_setg(errp, "cannot replace image with a mirror image of "
                             "different size");
3468
            goto out;
3469 3470 3471
        }
    }

E
Eric Blake 已提交
3472
    if (arg->mode == NEW_IMAGE_MODE_ABSOLUTE_PATHS) {
M
Max Reitz 已提交
3473 3474 3475 3476 3477
        backing_mode = MIRROR_SOURCE_BACKING_CHAIN;
    } else {
        backing_mode = MIRROR_OPEN_BACKING_CHAIN;
    }

E
Eric Blake 已提交
3478 3479
    if ((arg->sync == MIRROR_SYNC_MODE_FULL || !source)
        && arg->mode != NEW_IMAGE_MODE_EXISTING)
3480
    {
P
Paolo Bonzini 已提交
3481
        /* create new image w/o backing file */
3482
        assert(format);
E
Eric Blake 已提交
3483
        bdrv_img_create(arg->target, format,
3484
                        NULL, NULL, NULL, size, flags, &local_err, false);
P
Paolo Bonzini 已提交
3485
    } else {
E
Eric Blake 已提交
3486
        switch (arg->mode) {
P
Paolo Bonzini 已提交
3487 3488 3489 3490
        case NEW_IMAGE_MODE_EXISTING:
            break;
        case NEW_IMAGE_MODE_ABSOLUTE_PATHS:
            /* create new image with backing file */
E
Eric Blake 已提交
3491
            bdrv_img_create(arg->target, format,
3492 3493
                            source->filename,
                            source->drv->format_name,
3494
                            NULL, size, flags, &local_err, false);
P
Paolo Bonzini 已提交
3495 3496 3497 3498 3499 3500
            break;
        default:
            abort();
        }
    }

3501
    if (local_err) {
3502
        error_propagate(errp, local_err);
3503
        goto out;
P
Paolo Bonzini 已提交
3504 3505
    }

3506
    options = qdict_new();
E
Eric Blake 已提交
3507 3508
    if (arg->has_node_name) {
        qdict_put(options, "node-name", qstring_from_str(arg->node_name));
3509
    }
3510 3511 3512
    if (format) {
        qdict_put(options, "driver", qstring_from_str(format));
    }
3513

3514 3515 3516
    /* Mirroring takes care of copy-on-write using the source's backing
     * file.
     */
E
Eric Blake 已提交
3517 3518
    target_bs = bdrv_open(arg->target, NULL, options,
                          flags | BDRV_O_NO_BACKING, errp);
M
Max Reitz 已提交
3519
    if (!target_bs) {
3520
        goto out;
P
Paolo Bonzini 已提交
3521 3522
    }

3523 3524
    bdrv_set_aio_context(target_bs, aio_context);

E
Eric Blake 已提交
3525 3526 3527 3528 3529 3530 3531 3532
    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,
3533
                           &local_err);
K
Kevin Wolf 已提交
3534
    bdrv_unref(target_bs);
3535
    error_propagate(errp, local_err);
3536 3537
out:
    aio_context_release(aio_context);
P
Paolo Bonzini 已提交
3538 3539
}

3540 3541
void qmp_blockdev_mirror(bool has_job_id, const char *job_id,
                         const char *device, const char *target,
F
Fam Zheng 已提交
3542 3543 3544 3545 3546 3547 3548 3549 3550 3551 3552 3553 3554 3555
                         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 已提交
3556
    BlockMirrorBackingMode backing_mode = MIRROR_LEAVE_BACKING_CHAIN;
F
Fam Zheng 已提交
3557 3558
    Error *local_err = NULL;

3559
    bs = qmp_get_root_bs(device, errp);
F
Fam Zheng 已提交
3560 3561 3562 3563 3564 3565 3566 3567 3568 3569 3570 3571 3572 3573
    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);

3574
    blockdev_mirror_common(has_job_id ? job_id : NULL, bs, target_bs,
M
Max Reitz 已提交
3575
                           has_replaces, replaces, sync, backing_mode,
F
Fam Zheng 已提交
3576 3577 3578 3579 3580 3581 3582
                           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);
3583
    error_propagate(errp, local_err);
F
Fam Zheng 已提交
3584 3585 3586 3587

    aio_context_release(aio_context);
}

3588 3589
/* Get a block job using its ID and acquire its AioContext */
static BlockJob *find_block_job(const char *id, AioContext **aio_context,
3590
                                Error **errp)
3591
{
3592
    BlockJob *job;
3593

3594
    assert(id != NULL);
M
Max Reitz 已提交
3595

3596
    *aio_context = NULL;
3597

3598
    job = block_job_get(id);
M
Max Reitz 已提交
3599

3600 3601 3602 3603
    if (!job) {
        error_set(errp, ERROR_CLASS_DEVICE_NOT_ACTIVE,
                  "Block job '%s' not found", id);
        return NULL;
3604
    }
3605

3606 3607
    *aio_context = blk_get_aio_context(job->blk);
    aio_context_acquire(*aio_context);
3608

3609
    return job;
3610 3611
}

3612
void qmp_block_job_set_speed(const char *device, int64_t speed, Error **errp)
3613
{
3614
    AioContext *aio_context;
3615
    BlockJob *job = find_block_job(device, &aio_context, errp);
3616 3617 3618 3619 3620

    if (!job) {
        return;
    }

3621
    block_job_set_speed(job, speed, errp);
3622
    aio_context_release(aio_context);
3623
}
3624

3625 3626
void qmp_block_job_cancel(const char *device,
                          bool has_force, bool force, Error **errp)
3627
{
3628
    AioContext *aio_context;
3629
    BlockJob *job = find_block_job(device, &aio_context, errp);
3630

3631 3632 3633
    if (!job) {
        return;
    }
3634 3635 3636 3637 3638

    if (!has_force) {
        force = false;
    }

3639
    if (block_job_user_paused(job) && !force) {
3640 3641
        error_setg(errp, "The block job for device '%s' is currently paused",
                   device);
3642
        goto out;
3643
    }
3644 3645 3646

    trace_qmp_block_job_cancel(job);
    block_job_cancel(job);
3647 3648
out:
    aio_context_release(aio_context);
3649
}
S
Stefan Hajnoczi 已提交
3650

3651 3652
void qmp_block_job_pause(const char *device, Error **errp)
{
3653
    AioContext *aio_context;
3654
    BlockJob *job = find_block_job(device, &aio_context, errp);
3655

3656
    if (!job || block_job_user_paused(job)) {
3657 3658 3659 3660
        return;
    }

    trace_qmp_block_job_pause(job);
3661
    block_job_user_pause(job);
3662
    aio_context_release(aio_context);
3663 3664 3665 3666
}

void qmp_block_job_resume(const char *device, Error **errp)
{
3667
    AioContext *aio_context;
3668
    BlockJob *job = find_block_job(device, &aio_context, errp);
3669

3670
    if (!job || !block_job_user_paused(job)) {
3671 3672 3673 3674
        return;
    }

    trace_qmp_block_job_resume(job);
3675
    block_job_iostatus_reset(job);
3676
    block_job_user_resume(job);
3677
    aio_context_release(aio_context);
3678 3679
}

P
Paolo Bonzini 已提交
3680 3681
void qmp_block_job_complete(const char *device, Error **errp)
{
3682
    AioContext *aio_context;
3683
    BlockJob *job = find_block_job(device, &aio_context, errp);
P
Paolo Bonzini 已提交
3684 3685 3686 3687 3688 3689 3690

    if (!job) {
        return;
    }

    trace_qmp_block_job_complete(job);
    block_job_complete(job, errp);
3691
    aio_context_release(aio_context);
P
Paolo Bonzini 已提交
3692 3693
}

3694 3695 3696 3697 3698 3699
void qmp_change_backing_file(const char *device,
                             const char *image_node_name,
                             const char *backing_file,
                             Error **errp)
{
    BlockDriverState *bs = NULL;
3700
    AioContext *aio_context;
3701 3702 3703 3704 3705 3706
    BlockDriverState *image_bs = NULL;
    Error *local_err = NULL;
    bool ro;
    int open_flags;
    int ret;

3707 3708
    bs = qmp_get_root_bs(device, errp);
    if (!bs) {
3709 3710 3711
        return;
    }

3712
    aio_context = bdrv_get_aio_context(bs);
3713 3714
    aio_context_acquire(aio_context);

3715 3716 3717
    image_bs = bdrv_lookup_bs(NULL, image_node_name, &local_err);
    if (local_err) {
        error_propagate(errp, local_err);
3718
        goto out;
3719 3720 3721 3722
    }

    if (!image_bs) {
        error_setg(errp, "image file not found");
3723
        goto out;
3724 3725 3726 3727 3728
    }

    if (bdrv_find_base(image_bs) == image_bs) {
        error_setg(errp, "not allowing backing file change on an image "
                         "without a backing file");
3729
        goto out;
3730 3731 3732 3733 3734
    }

    /* 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)) {
3735
        goto out;
3736 3737 3738 3739 3740 3741
    }

    /* final sanity check */
    if (!bdrv_chain_contains(bs, image_bs)) {
        error_setg(errp, "'%s' and image file are not in the same chain",
                   device);
3742
        goto out;
3743 3744 3745 3746 3747 3748 3749 3750 3751 3752
    }

    /* 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);
3753
            goto out;
3754 3755 3756 3757 3758 3759 3760 3761 3762 3763 3764 3765 3766 3767 3768
        }
    }

    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);
3769
        error_propagate(errp, local_err);
3770
    }
3771 3772 3773

out:
    aio_context_release(aio_context);
3774 3775
}

3776 3777 3778 3779 3780 3781 3782 3783 3784 3785 3786 3787 3788 3789
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")) {
3790
        QDECREF(qdict);
3791 3792 3793 3794 3795 3796 3797 3798 3799 3800 3801 3802 3803 3804 3805 3806
        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 已提交
3807 3808
void qmp_blockdev_add(BlockdevOptions *options, Error **errp)
{
3809
    BlockDriverState *bs;
K
Kevin Wolf 已提交
3810
    QObject *obj;
3811
    Visitor *v = qobject_output_visitor_new(&obj);
K
Kevin Wolf 已提交
3812 3813 3814
    QDict *qdict;
    Error *local_err = NULL;

3815
    visit_type_BlockdevOptions(v, NULL, &options, &local_err);
3816
    if (local_err) {
K
Kevin Wolf 已提交
3817 3818 3819 3820
        error_propagate(errp, local_err);
        goto fail;
    }

3821
    visit_complete(v, &obj);
K
Kevin Wolf 已提交
3822 3823 3824 3825
    qdict = qobject_to_qdict(obj);

    qdict_flatten(qdict);

3826 3827 3828 3829
    if (!qdict_get_try_str(qdict, "node-name")) {
        error_setg(errp, "'node-name' must be specified for the root node");
        goto fail;
    }
3830

3831 3832 3833
    bs = bds_tree_init(qdict, errp);
    if (!bs) {
        goto fail;
K
Kevin Wolf 已提交
3834 3835
    }

3836 3837
    QTAILQ_INSERT_TAIL(&monitor_bdrv_states, bs, monitor_list);

3838
    if (bs && bdrv_key_required(bs)) {
3839 3840
        QTAILQ_REMOVE(&monitor_bdrv_states, bs, monitor_list);
        bdrv_unref(bs);
3841 3842 3843 3844
        error_setg(errp, "blockdev-add doesn't support encrypted devices");
        goto fail;
    }

K
Kevin Wolf 已提交
3845
fail:
3846
    visit_free(v);
K
Kevin Wolf 已提交
3847 3848
}

3849
void qmp_x_blockdev_del(const char *node_name, Error **errp)
3850 3851 3852 3853
{
    AioContext *aio_context;
    BlockDriverState *bs;

3854 3855 3856
    bs = bdrv_find_node(node_name);
    if (!bs) {
        error_setg(errp, "Cannot find node %s", node_name);
3857 3858
        return;
    }
3859 3860 3861
    if (bdrv_has_blk(bs)) {
        error_setg(errp, "Node %s is in use", node_name);
        return;
3862
    }
3863
    aio_context = bdrv_get_aio_context(bs);
3864 3865
    aio_context_acquire(aio_context);

3866 3867 3868
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_DRIVE_DEL, errp)) {
        goto out;
    }
3869

3870 3871 3872 3873
    if (!bs->monitor_list.tqe_prev) {
        error_setg(errp, "Node %s is not owned by the monitor",
                   bs->node_name);
        goto out;
3874 3875
    }

3876 3877 3878 3879
    if (bs->refcnt > 1) {
        error_setg(errp, "Block device %s is in use",
                   bdrv_get_device_or_node_name(bs));
        goto out;
3880 3881
    }

3882 3883 3884
    QTAILQ_REMOVE(&monitor_bdrv_states, bs, monitor_list);
    bdrv_unref(bs);

3885 3886 3887 3888
out:
    aio_context_release(aio_context);
}

3889 3890 3891 3892 3893 3894 3895 3896 3897 3898 3899 3900 3901 3902 3903 3904 3905 3906 3907 3908 3909 3910 3911 3912 3913 3914 3915 3916 3917 3918 3919 3920 3921 3922 3923 3924 3925 3926 3927 3928 3929 3930 3931 3932 3933 3934 3935 3936 3937 3938 3939 3940 3941 3942 3943
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);
    }
}

3944
BlockJobInfoList *qmp_query_block_jobs(Error **errp)
S
Stefan Hajnoczi 已提交
3945
{
3946
    BlockJobInfoList *head = NULL, **p_next = &head;
3947
    BlockJob *job;
S
Stefan Hajnoczi 已提交
3948

3949
    for (job = block_job_next(NULL); job; job = block_job_next(job)) {
3950 3951
        BlockJobInfoList *elem;
        AioContext *aio_context;
3952

3953 3954 3955 3956 3957
        if (block_job_is_internal(job)) {
            continue;
        }
        elem = g_new0(BlockJobInfoList, 1);
        aio_context = blk_get_aio_context(job->blk);
3958
        aio_context_acquire(aio_context);
3959
        elem->value = block_job_query(job, errp);
3960
        aio_context_release(aio_context);
3961 3962 3963 3964 3965
        if (!elem->value) {
            g_free(elem);
            qapi_free_BlockJobInfoList(head);
            return NULL;
        }
3966 3967
        *p_next = elem;
        p_next = &elem->next;
S
Stefan Hajnoczi 已提交
3968 3969
    }

3970
    return head;
S
Stefan Hajnoczi 已提交
3971
}
3972

3973
QemuOptsList qemu_common_drive_opts = {
3974
    .name = "drive",
3975
    .head = QTAILQ_HEAD_INITIALIZER(qemu_common_drive_opts.head),
3976 3977 3978 3979 3980 3981 3982 3983 3984
    .desc = {
        {
            .name = "snapshot",
            .type = QEMU_OPT_BOOL,
            .help = "enable/disable snapshot mode",
        },{
            .name = "aio",
            .type = QEMU_OPT_STRING,
            .help = "host AIO implementation (threads, native)",
3985 3986 3987 3988
        },{
            .name = BDRV_OPT_CACHE_WB,
            .type = QEMU_OPT_BOOL,
            .help = "Enable writeback mode",
3989 3990 3991 3992 3993 3994 3995 3996 3997 3998 3999 4000 4001
        },{
            .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",
        },{
4002
            .name = BDRV_OPT_READ_ONLY,
4003 4004 4005
            .type = QEMU_OPT_BOOL,
            .help = "open drive file as read-only",
        },{
4006
            .name = "throttling.iops-total",
4007 4008 4009
            .type = QEMU_OPT_NUMBER,
            .help = "limit total I/O operations per second",
        },{
4010
            .name = "throttling.iops-read",
4011 4012 4013
            .type = QEMU_OPT_NUMBER,
            .help = "limit read operations per second",
        },{
4014
            .name = "throttling.iops-write",
4015 4016 4017
            .type = QEMU_OPT_NUMBER,
            .help = "limit write operations per second",
        },{
4018
            .name = "throttling.bps-total",
4019 4020 4021
            .type = QEMU_OPT_NUMBER,
            .help = "limit total bytes per second",
        },{
4022
            .name = "throttling.bps-read",
4023 4024 4025
            .type = QEMU_OPT_NUMBER,
            .help = "limit read bytes per second",
        },{
4026
            .name = "throttling.bps-write",
4027 4028
            .type = QEMU_OPT_NUMBER,
            .help = "limit write bytes per second",
4029 4030 4031 4032 4033 4034 4035 4036 4037 4038 4039 4040 4041 4042 4043 4044 4045 4046 4047 4048 4049 4050 4051 4052
        },{
            .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",
4053 4054 4055 4056 4057 4058 4059 4060 4061 4062 4063 4064 4065 4066 4067 4068 4069 4070 4071 4072 4073 4074 4075 4076
        },{
            .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",
4077 4078 4079 4080
        },{
            .name = "throttling.iops-size",
            .type = QEMU_OPT_NUMBER,
            .help = "when limiting by iops max size of an I/O in bytes",
4081 4082 4083 4084
        },{
            .name = "throttling.group",
            .type = QEMU_OPT_STRING,
            .help = "name of the block throttling group",
4085 4086 4087 4088
        },{
            .name = "copy-on-read",
            .type = QEMU_OPT_BOOL,
            .help = "copy read data from backing file into image file",
4089 4090 4091 4092
        },{
            .name = "detect-zeroes",
            .type = QEMU_OPT_STRING,
            .help = "try to optimize zero writes (off, on, unmap)",
4093 4094 4095 4096 4097 4098 4099 4100 4101 4102
        },{
            .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",
4103 4104 4105 4106
        },
        { /* end of list */ }
    },
};
4107 4108 4109 4110 4111

QemuOptsList qemu_drive_opts = {
    .name = "drive",
    .head = QTAILQ_HEAD_INITIALIZER(qemu_drive_opts.head),
    .desc = {
4112 4113 4114 4115
        /*
         * no elements => accept any params
         * validation will happen later
         */
4116 4117 4118
        { /* end of list */ }
    },
};