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

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

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

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

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

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

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

    if (max_devs <= 0) {
        return;
    }

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

    if_max_devs[type] = max_devs;
}

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

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

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

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

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

147
    dinfo->auto_del = 1;
148 149
}

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

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

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

    return -1;
}

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

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

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

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

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

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

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

    return NULL;
}

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

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

    return rs;
}

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

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

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

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

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

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

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

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

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

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

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

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

352 353
typedef enum { MEDIA_DISK, MEDIA_CDROM } DriveMediaType;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

496 497
    id = qemu_opts_id(opts);

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

588
        bs->detect_zeroes = detect_zeroes;
589

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

    max_devs = if_max_devs[type];

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

1106 1107
    blk_set_legacy_dinfo(blk, dinfo);

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

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

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

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

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

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

    return bs;
}

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

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

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

    return blk;
}

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

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

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

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

        ret = bdrv_commit(bs);

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

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

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

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

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

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

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

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

    if (!has_id) {
        id = NULL;
    }

    if (!has_name) {
        name = NULL;
    }

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

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

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

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

1329 1330
    aio_context_release(aio_context);

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

    return info;
1341 1342 1343 1344

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

1347 1348 1349 1350 1351 1352 1353 1354 1355 1356 1357 1358 1359 1360 1361 1362 1363 1364 1365 1366 1367 1368 1369 1370 1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406 1407 1408
/**
 * block_dirty_bitmap_lookup:
 * Return a dirty bitmap (if present), after validating
 * the node reference and bitmap names.
 *
 * @node: The name of the BDS node to search for bitmaps
 * @name: The name of the bitmap to search for
 * @pbs: Output pointer for BDS lookup, if desired. Can be NULL.
 * @paio: Output pointer for aio_context acquisition, if desired. Can be NULL.
 * @errp: Output pointer for error information. Can be NULL.
 *
 * @return: A bitmap object on success, or NULL on failure.
 */
static BdrvDirtyBitmap *block_dirty_bitmap_lookup(const char *node,
                                                  const char *name,
                                                  BlockDriverState **pbs,
                                                  AioContext **paio,
                                                  Error **errp)
{
    BlockDriverState *bs;
    BdrvDirtyBitmap *bitmap;
    AioContext *aio_context;

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

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

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

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

    return bitmap;

 fail:
    aio_context_release(aio_context);
    return NULL;
}

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

1411
typedef struct BlkActionState BlkActionState;
1412

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

        flags |= BDRV_O_NO_BACKING;
1741 1742
    }

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

    hbitmap_free(state->backup);
}

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

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

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

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

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

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

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

    return props;
}

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

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

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

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

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

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

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

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

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

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

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

    /* success */
    goto exit;

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

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

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

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

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

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

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

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

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

    aio_context_release(aio_context);
2257 2258
}

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

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

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

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

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

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

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

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

    return 0;
}

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

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

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

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

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

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

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

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

    blk_dev_change_media_cb(blk, true);
}

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

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

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

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

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

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

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

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

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

    blk_remove_bs(blk);

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

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

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

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

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

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

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

    blk_insert_bs(blk, bs);

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

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

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

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

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

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

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

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

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

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

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

    switch (read_only) {
    case BLOCKDEV_CHANGE_READ_ONLY_MODE_RETAIN:
        break;

    case BLOCKDEV_CHANGE_READ_ONLY_MODE_READ_ONLY:
        bdrv_flags &= ~BDRV_O_RDWR;
        break;

    case BLOCKDEV_CHANGE_READ_ONLY_MODE_READ_WRITE:
        bdrv_flags |= BDRV_O_RDWR;
        break;

    default:
        abort();
    }

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

    bdrv_create_dirty_bitmap(bs, granularity, name, errp);

 out:
    aio_context_release(aio_context);
}

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

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

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

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

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

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

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

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

 out:
    aio_context_release(aio_context);
}

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

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

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

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

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

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

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

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

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

2842
    aio_context_release(aio_context);
2843
}
2844

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

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

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

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

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

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

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

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

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

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

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

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

    assert(bs->job);
2921

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

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

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

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

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

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

2959 2960 2961 2962 2963 2964
    if (has_base && has_base_node) {
        error_setg(errp, "'base' and 'base-node' cannot be specified "
                   "at the same time");
        goto out;
    }

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

2975 2976 2977 2978 2979 2980 2981 2982 2983 2984 2985 2986 2987 2988
    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;
    }

2989 2990 2991 2992 2993 2994 2995
    /* 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;
        }
    }

2996 2997 2998 2999 3000
    /* 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");
3001
        goto out;
3002 3003 3004 3005 3006
    }

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

3007 3008
    stream_start(has_job_id ? job_id : NULL, bs, base_bs, base_name,
                 has_speed ? speed : 0, on_error, block_job_cb, bs, &local_err);
3009
    if (local_err) {
3010
        error_propagate(errp, local_err);
3011
        goto out;
S
Stefan Hajnoczi 已提交
3012 3013 3014
    }

    trace_qmp_block_stream(bs, bs->job);
3015 3016 3017

out:
    aio_context_release(aio_context);
S
Stefan Hajnoczi 已提交
3018
}
3019

3020
void qmp_block_commit(bool has_job_id, const char *job_id, const char *device,
3021 3022
                      bool has_base, const char *base,
                      bool has_top, const char *top,
3023
                      bool has_backing_file, const char *backing_file,
3024 3025 3026 3027
                      bool has_speed, int64_t speed,
                      Error **errp)
{
    BlockDriverState *bs;
3028
    BlockDriverState *iter;
3029
    BlockDriverState *base_bs, *top_bs;
3030
    AioContext *aio_context;
3031 3032 3033 3034
    Error *local_err = NULL;
    /* This will be part of the QMP command, if/when the
     * BlockdevOnError change for blkmirror makes it in
     */
3035
    BlockdevOnError on_error = BLOCKDEV_ON_ERROR_REPORT;
3036

3037 3038 3039 3040
    if (!has_speed) {
        speed = 0;
    }

3041 3042 3043 3044 3045
    /* 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. */
3046 3047 3048 3049 3050 3051 3052 3053 3054 3055
    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);
        }
3056
        return;
3057 3058
    }

3059
    aio_context = bdrv_get_aio_context(bs);
3060 3061
    aio_context_acquire(aio_context);

3062
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_COMMIT_SOURCE, errp)) {
3063
        goto out;
3064 3065 3066 3067 3068
    }

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

3069
    if (has_top && top) {
3070 3071 3072 3073 3074 3075 3076
        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");
3077
        goto out;
3078 3079
    }

3080 3081
    assert(bdrv_get_aio_context(top_bs) == aio_context);

3082 3083 3084 3085 3086 3087 3088
    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) {
3089
        error_setg(errp, QERR_BASE_NOT_FOUND, base ? base : "NULL");
3090
        goto out;
3091 3092
    }

3093 3094
    assert(bdrv_get_aio_context(base_bs) == aio_context);

3095 3096 3097 3098
    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;
        }
3099 3100
    }

3101 3102 3103
    /* Do not allow attempts to commit an image into itself */
    if (top_bs == base_bs) {
        error_setg(errp, "cannot commit an image into itself");
3104
        goto out;
3105 3106
    }

F
Fam Zheng 已提交
3107
    if (top_bs == bs) {
3108 3109 3110
        if (has_backing_file) {
            error_setg(errp, "'backing-file' specified,"
                             " but 'top' is the active layer");
3111
            goto out;
3112
        }
3113
        commit_active_start(has_job_id ? job_id : NULL, bs, base_bs, speed,
3114
                            on_error, block_job_cb, bs, &local_err, false);
F
Fam Zheng 已提交
3115
    } else {
3116 3117 3118 3119
        BlockDriverState *overlay_bs = bdrv_find_overlay(bs, top_bs);
        if (bdrv_op_is_blocked(overlay_bs, BLOCK_OP_TYPE_COMMIT_TARGET, errp)) {
            goto out;
        }
3120 3121
        commit_start(has_job_id ? job_id : NULL, bs, base_bs, top_bs, speed,
                     on_error, block_job_cb, bs,
3122
                     has_backing_file ? backing_file : NULL, &local_err);
F
Fam Zheng 已提交
3123
    }
3124 3125
    if (local_err != NULL) {
        error_propagate(errp, local_err);
3126
        goto out;
3127
    }
3128 3129 3130

out:
    aio_context_release(aio_context);
3131 3132
}

P
Pavel Butsykin 已提交
3133
static void do_drive_backup(DriveBackup *backup, BlockJobTxn *txn, Error **errp)
3134 3135 3136
{
    BlockDriverState *bs;
    BlockDriverState *target_bs;
3137
    BlockDriverState *source = NULL;
3138
    BdrvDirtyBitmap *bmap = NULL;
3139
    AioContext *aio_context;
3140
    QDict *options = NULL;
3141 3142 3143 3144
    Error *local_err = NULL;
    int flags;
    int64_t size;

P
Pavel Butsykin 已提交
3145 3146
    if (!backup->has_speed) {
        backup->speed = 0;
3147
    }
P
Pavel Butsykin 已提交
3148 3149
    if (!backup->has_on_source_error) {
        backup->on_source_error = BLOCKDEV_ON_ERROR_REPORT;
3150
    }
P
Pavel Butsykin 已提交
3151 3152
    if (!backup->has_on_target_error) {
        backup->on_target_error = BLOCKDEV_ON_ERROR_REPORT;
3153
    }
P
Pavel Butsykin 已提交
3154 3155 3156 3157 3158
    if (!backup->has_mode) {
        backup->mode = NEW_IMAGE_MODE_ABSOLUTE_PATHS;
    }
    if (!backup->has_job_id) {
        backup->job_id = NULL;
3159
    }
3160 3161 3162
    if (!backup->has_compress) {
        backup->compress = false;
    }
3163

P
Pavel Butsykin 已提交
3164
    bs = qmp_get_root_bs(backup->device, errp);
3165
    if (!bs) {
3166 3167 3168
        return;
    }

3169
    aio_context = bdrv_get_aio_context(bs);
3170 3171
    aio_context_acquire(aio_context);

P
Pavel Butsykin 已提交
3172 3173 3174
    if (!backup->has_format) {
        backup->format = backup->mode == NEW_IMAGE_MODE_EXISTING ?
                         NULL : (char*) bs->drv->format_name;
3175 3176
    }

F
Fam Zheng 已提交
3177
    /* Early check to avoid creating target */
3178
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_BACKUP_SOURCE, errp)) {
3179
        goto out;
3180 3181
    }

K
Kevin Wolf 已提交
3182
    flags = bs->open_flags | BDRV_O_RDWR;
3183

3184 3185
    /* See if we have a backing HD we can use to create our new image
     * on top of. */
P
Pavel Butsykin 已提交
3186
    if (backup->sync == MIRROR_SYNC_MODE_TOP) {
3187
        source = backing_bs(bs);
3188
        if (!source) {
P
Pavel Butsykin 已提交
3189
            backup->sync = MIRROR_SYNC_MODE_FULL;
3190 3191
        }
    }
P
Pavel Butsykin 已提交
3192
    if (backup->sync == MIRROR_SYNC_MODE_NONE) {
3193 3194 3195
        source = bs;
    }

3196 3197 3198
    size = bdrv_getlength(bs);
    if (size < 0) {
        error_setg_errno(errp, -size, "bdrv_getlength failed");
3199
        goto out;
3200 3201
    }

P
Pavel Butsykin 已提交
3202 3203
    if (backup->mode != NEW_IMAGE_MODE_EXISTING) {
        assert(backup->format);
3204
        if (source) {
P
Pavel Butsykin 已提交
3205
            bdrv_img_create(backup->target, backup->format, source->filename,
3206 3207 3208
                            source->drv->format_name, NULL,
                            size, flags, &local_err, false);
        } else {
P
Pavel Butsykin 已提交
3209
            bdrv_img_create(backup->target, backup->format, NULL, NULL, NULL,
3210 3211
                            size, flags, &local_err, false);
        }
3212 3213
    }

3214
    if (local_err) {
3215
        error_propagate(errp, local_err);
3216
        goto out;
3217 3218
    }

P
Pavel Butsykin 已提交
3219
    if (backup->format) {
3220
        options = qdict_new();
P
Pavel Butsykin 已提交
3221
        qdict_put(options, "driver", qstring_from_str(backup->format));
3222 3223
    }

P
Pavel Butsykin 已提交
3224
    target_bs = bdrv_open(backup->target, NULL, options, flags, errp);
M
Max Reitz 已提交
3225
    if (!target_bs) {
3226
        goto out;
3227 3228
    }

3229 3230
    bdrv_set_aio_context(target_bs, aio_context);

P
Pavel Butsykin 已提交
3231 3232
    if (backup->has_bitmap) {
        bmap = bdrv_find_dirty_bitmap(bs, backup->bitmap);
3233
        if (!bmap) {
P
Pavel Butsykin 已提交
3234
            error_setg(errp, "Bitmap '%s' could not be found", backup->bitmap);
3235
            bdrv_unref(target_bs);
3236 3237 3238 3239
            goto out;
        }
    }

P
Pavel Butsykin 已提交
3240
    backup_start(backup->job_id, bs, target_bs, backup->speed, backup->sync,
3241 3242
                 bmap, backup->compress, backup->on_source_error,
                 backup->on_target_error, block_job_cb, bs, txn, &local_err);
K
Kevin Wolf 已提交
3243
    bdrv_unref(target_bs);
3244 3245
    if (local_err != NULL) {
        error_propagate(errp, local_err);
3246
        goto out;
3247
    }
3248 3249 3250

out:
    aio_context_release(aio_context);
3251 3252
}

P
Pavel Butsykin 已提交
3253
void qmp_drive_backup(DriveBackup *arg, Error **errp)
3254
{
P
Pavel Butsykin 已提交
3255
    return do_drive_backup(arg, NULL, errp);
3256 3257
}

3258 3259
BlockDeviceInfoList *qmp_query_named_block_nodes(Error **errp)
{
3260
    return bdrv_named_nodes_list(errp);
3261 3262
}

P
Pavel Butsykin 已提交
3263
void do_blockdev_backup(BlockdevBackup *backup, BlockJobTxn *txn, Error **errp)
F
Fam Zheng 已提交
3264 3265 3266 3267 3268 3269
{
    BlockDriverState *bs;
    BlockDriverState *target_bs;
    Error *local_err = NULL;
    AioContext *aio_context;

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

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

3291
    aio_context = bdrv_get_aio_context(bs);
F
Fam Zheng 已提交
3292 3293
    aio_context_acquire(aio_context);

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

3299 3300 3301 3302 3303 3304 3305 3306 3307 3308 3309
    if (bdrv_get_aio_context(target_bs) != aio_context) {
        if (!bdrv_has_blk(target_bs)) {
            /* The target BDS is not attached, we can safely move it to another
             * AioContext. */
            bdrv_set_aio_context(target_bs, aio_context);
        } else {
            error_setg(errp, "Target is attached to a different thread from "
                             "source.");
            goto out;
        }
    }
P
Pavel Butsykin 已提交
3310
    backup_start(backup->job_id, bs, target_bs, backup->speed, backup->sync,
3311 3312
                 NULL, backup->compress, backup->on_source_error,
                 backup->on_target_error, block_job_cb, bs, txn, &local_err);
F
Fam Zheng 已提交
3313 3314 3315 3316 3317 3318 3319
    if (local_err != NULL) {
        error_propagate(errp, local_err);
    }
out:
    aio_context_release(aio_context);
}

P
Pavel Butsykin 已提交
3320 3321 3322
void qmp_blockdev_backup(BlockdevBackup *arg, Error **errp)
{
    do_blockdev_backup(arg, NULL, errp);
3323 3324
}

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

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

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

3374 3375 3376
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_MIRROR_SOURCE, errp)) {
        return;
    }
F
Fam Zheng 已提交
3377 3378 3379
    if (bdrv_op_is_blocked(target, BLOCK_OP_TYPE_MIRROR_TARGET, errp)) {
        return;
    }
3380 3381 3382 3383 3384 3385 3386 3387

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

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

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

3412
    aio_context = bdrv_get_aio_context(bs);
3413 3414
    aio_context_acquire(aio_context);

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

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

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

3433 3434 3435
    size = bdrv_getlength(bs);
    if (size < 0) {
        error_setg_errno(errp, -size, "bdrv_getlength failed");
3436
        goto out;
3437 3438
    }

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

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

E
Eric Blake 已提交
3450
        to_replace_bs = check_to_replace_node(bs, arg->replaces, &local_err);
3451 3452 3453

        if (!to_replace_bs) {
            error_propagate(errp, local_err);
3454
            goto out;
3455 3456
        }

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

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

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

3498
    if (local_err) {
3499
        error_propagate(errp, local_err);
3500
        goto out;
P
Paolo Bonzini 已提交
3501 3502
    }

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

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

3520 3521
    bdrv_set_aio_context(target_bs, aio_context);

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

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

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

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

    aio_context_release(aio_context);
}

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

3591
    assert(id != NULL);
M
Max Reitz 已提交
3592

3593
    *aio_context = NULL;
3594

3595
    job = block_job_get(id);
M
Max Reitz 已提交
3596

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

3603 3604
    *aio_context = blk_get_aio_context(job->blk);
    aio_context_acquire(*aio_context);
3605

3606
    return job;
3607 3608
}

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

    if (!job) {
        return;
    }

3618
    block_job_set_speed(job, speed, errp);
3619
    aio_context_release(aio_context);
3620
}
3621

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

3628 3629 3630
    if (!job) {
        return;
    }
3631 3632 3633 3634 3635

    if (!has_force) {
        force = false;
    }

F
Fam Zheng 已提交
3636
    if (job->user_paused && !force) {
3637 3638
        error_setg(errp, "The block job for device '%s' is currently paused",
                   device);
3639
        goto out;
3640
    }
3641 3642 3643

    trace_qmp_block_job_cancel(job);
    block_job_cancel(job);
3644 3645
out:
    aio_context_release(aio_context);
3646
}
S
Stefan Hajnoczi 已提交
3647

3648 3649
void qmp_block_job_pause(const char *device, Error **errp)
{
3650
    AioContext *aio_context;
3651
    BlockJob *job = find_block_job(device, &aio_context, errp);
3652

F
Fam Zheng 已提交
3653
    if (!job || job->user_paused) {
3654 3655 3656
        return;
    }

F
Fam Zheng 已提交
3657
    job->user_paused = true;
3658 3659
    trace_qmp_block_job_pause(job);
    block_job_pause(job);
3660
    aio_context_release(aio_context);
3661 3662 3663 3664
}

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

F
Fam Zheng 已提交
3668
    if (!job || !job->user_paused) {
3669 3670 3671
        return;
    }

F
Fam Zheng 已提交
3672
    job->user_paused = false;
3673
    trace_qmp_block_job_resume(job);
3674
    block_job_iostatus_reset(job);
3675
    block_job_resume(job);
3676
    aio_context_release(aio_context);
3677 3678
}

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

    if (!job) {
        return;
    }

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

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

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

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

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

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

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

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

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

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

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

out:
    aio_context_release(aio_context);
3773 3774
}

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

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

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

    qdict_flatten(qdict);

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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