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

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

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

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

63 64 65 66 67 68 69 70 71 72 73 74
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",
};

75
static int if_max_devs[IF_COUNT] = {
76 77 78 79
    /*
     * Do not change these numbers!  They govern how drive option
     * index maps to unit and bus.  That mapping is ABI.
     *
W
Wei Jiangang 已提交
80
     * All controllers used to implement if=T drives need to support
81 82 83 84 85 86 87 88 89 90 91
     * 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,
92 93
};

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

    if (max_devs <= 0) {
        return;
    }

107 108
    for (blk = blk_next(NULL); blk; blk = blk_next(blk)) {
        dinfo = blk_legacy_dinfo(blk);
109 110 111 112 113 114 115 116 117 118 119
        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;
}

120 121 122 123 124 125 126
/*
 * 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.
 */
127
void blockdev_mark_auto_del(BlockBackend *blk)
128
{
129
    DriveInfo *dinfo = blk_legacy_dinfo(blk);
130
    BlockDriverState *bs = blk_bs(blk);
131
    AioContext *aio_context;
132

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

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

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

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

148
    dinfo->auto_del = 1;
149 150
}

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

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

161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177
/**
 * 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;
}

178 179 180 181 182 183 184 185 186 187 188 189
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;
}

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

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

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

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

220 221 222 223
    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) {
224
            return dinfo;
225
        }
226 227 228 229 230
    }

    return NULL;
}

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

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

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

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

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

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

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

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

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

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

317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336
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;
        }

337 338 339
        case QTYPE_QNUM: {
            int64_t length = qnum_get_int(qobject_to_qnum(entry->value));

340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356
            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;
}

357 358
typedef enum { MEDIA_DISK, MEDIA_CDROM } DriveMediaType;

359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389
/* 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) {
390
        throttle_config_init(throttle_cfg);
391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416
        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);

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

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

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

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

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

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

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

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

493 494 495
    /* extract parameters */
    snapshot = qemu_opt_get_bool(opts, "snapshot", 0);

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

499 500
    writethrough = !qemu_opt_get_bool(opts, BDRV_OPT_CACHE_WB, true);

501 502
    id = qemu_opts_id(opts);

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

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

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

527 528
        if (qdict_haskey(bs_opts, "driver")) {
            error_setg(errp, "Cannot specify both 'driver' and 'format'");
529
            goto early_err;
530
        }
531
        qdict_put_str(bs_opts, "driver", buf);
532 533
    }

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

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

552
    if (snapshot) {
553
        bdrv_flags |= BDRV_O_SNAPSHOT;
554 555
    }

556 557
    read_only = qemu_opt_get_bool(opts, BDRV_OPT_READ_ONLY, false);

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

K
Kevin Wolf 已提交
562
        blk = blk_new(0, BLK_PERM_ALL);
563 564
        blk_rs = blk_get_root_state(blk);
        blk_rs->open_flags    = bdrv_flags;
565
        blk_rs->read_only     = read_only;
566 567
        blk_rs->detect_zeroes = detect_zeroes;

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

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

583 584 585 586
        if (runstate_check(RUN_STATE_INMIGRATE)) {
            bdrv_flags |= BDRV_O_INACTIVE;
        }

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

593
        bs->detect_zeroes = detect_zeroes;
594

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

599
        block_acct_setup(blk_get_stats(blk), account_invalid, account_failed);
600

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

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

617
    blk_set_enable_write_cache(blk, !writethrough);
618
    blk_set_on_error(blk, on_read_error, on_write_error);
619

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

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

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

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

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

653 654 655 656
    if (runstate_check(RUN_STATE_INMIGRATE)) {
        bdrv_flags |= BDRV_O_INACTIVE;
    }

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

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

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

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

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

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

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

778 779 780 781
        { /* end of list */ }
    },
};

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

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

811 812 813
        { "bps",            "throttling.bps-total" },
        { "bps_rd",         "throttling.bps-read" },
        { "bps_wr",         "throttling.bps-write" },
814

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

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

823
        { "iops_size",      "throttling.iops-size" },
824

825 826
        { "group",          "throttling.group" },

827
        { "readonly",       BDRV_OPT_READ_ONLY },
828 829 830
    };

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

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

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

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

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

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

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

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

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

907 908
    qdict_put_str(bs_opts, BDRV_OPT_READ_ONLY, read_only ? "on" : "off");
    qdict_put_str(bs_opts, "copy-on-read", copy_on_read ? "on" : "off");
909

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

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

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

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

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

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

    max_devs = if_max_devs[type];

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

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

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

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

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

1018 1019 1020 1021 1022 1023 1024 1025 1026 1027 1028 1029 1030 1031
    /* 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);
        }
1032
        qdict_put_str(bs_opts, "id", new_id);
1033 1034 1035
        g_free(new_id);
    }

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

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

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

1061 1062 1063 1064 1065 1066 1067 1068
    /* 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;
        }
1069
        qdict_put_str(bs_opts, "werror", werror);
1070 1071 1072 1073 1074 1075 1076 1077 1078
    }

    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;
        }
1079
        qdict_put_str(bs_opts, "rerror", rerror);
1080 1081
    }

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

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

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

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

1109 1110
    blk_set_legacy_dinfo(blk, dinfo);

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

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

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

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

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

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

    return bs;
}

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

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

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

    return blk;
}

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

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

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

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

        ret = bdrv_commit(bs);

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

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

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

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

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

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

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

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

    if (!has_id) {
        id = NULL;
    }

    if (!has_name) {
        name = NULL;
    }

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

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

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

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

1332 1333
    aio_context_release(aio_context);

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

    return info;
1344 1345 1346 1347

out_aio_context:
    aio_context_release(aio_context);
    return NULL;
1348
}
1349

1350 1351 1352 1353 1354 1355 1356 1357 1358 1359 1360 1361 1362 1363 1364 1365 1366 1367 1368 1369 1370 1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386 1387
/**
 * 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,
                                                  Error **errp)
{
    BlockDriverState *bs;
    BdrvDirtyBitmap *bitmap;

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

    bitmap = bdrv_find_dirty_bitmap(bs, name);
    if (!bitmap) {
        error_setg(errp, "Dirty bitmap '%s' not found", name);
1388
        return NULL;
1389 1390 1391 1392 1393 1394 1395 1396 1397
    }

    if (pbs) {
        *pbs = bs;
    }

    return bitmap;
}

1398
/* New and old BlockDriverState structs for atomic group operations */
1399

1400
typedef struct BlkActionState BlkActionState;
1401

1402 1403 1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416
/**
 * 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 {
1417
    size_t instance_size;
1418 1419 1420 1421 1422
    void (*prepare)(BlkActionState *common, Error **errp);
    void (*commit)(BlkActionState *common);
    void (*abort)(BlkActionState *common);
    void (*clean)(BlkActionState *common);
} BlkActionOps;
1423

1424 1425 1426 1427 1428 1429
/**
 * 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 已提交
1430
 * @block_job_txn: Transaction which this action belongs to.
1431 1432 1433 1434 1435
 * @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.
1436
 */
1437
struct BlkActionState {
1438
    TransactionAction *action;
1439
    const BlkActionOps *ops;
J
John Snow 已提交
1440 1441
    BlockJobTxn *block_job_txn;
    TransactionProperties *txn_props;
1442
    QSIMPLEQ_ENTRY(BlkActionState) entry;
1443 1444
};

1445 1446
/* internal snapshot private data */
typedef struct InternalSnapshotState {
1447
    BlkActionState common;
1448
    BlockDriverState *bs;
1449
    AioContext *aio_context;
1450
    QEMUSnapshotInfo sn;
1451
    bool created;
1452 1453
} InternalSnapshotState;

J
John Snow 已提交
1454 1455 1456 1457 1458 1459 1460 1461 1462 1463 1464 1465 1466 1467

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

1468
static void internal_snapshot_prepare(BlkActionState *common,
1469 1470
                                      Error **errp)
{
1471
    Error *local_err = NULL;
1472 1473 1474 1475 1476 1477 1478 1479 1480 1481
    const char *device;
    const char *name;
    BlockDriverState *bs;
    QEMUSnapshotInfo old_sn, *sn;
    bool ret;
    qemu_timeval tv;
    BlockdevSnapshotInternal *internal;
    InternalSnapshotState *state;
    int ret1;

1482
    g_assert(common->action->type ==
1483
             TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT_INTERNAL_SYNC);
1484
    internal = common->action->u.blockdev_snapshot_internal_sync.data;
1485 1486 1487 1488 1489 1490 1491
    state = DO_UPCAST(InternalSnapshotState, common, common);

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

    /* 2. check for validation */
J
John Snow 已提交
1492 1493 1494 1495
    if (action_check_completion_mode(common, errp) < 0) {
        return;
    }

1496 1497
    bs = qmp_get_root_bs(device, errp);
    if (!bs) {
1498 1499 1500
        return;
    }

1501
    /* AioContext is released in .clean() */
1502
    state->aio_context = bdrv_get_aio_context(bs);
1503 1504
    aio_context_acquire(state->aio_context);

1505 1506 1507
    state->bs = bs;
    bdrv_drained_begin(bs);

1508 1509 1510 1511
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_INTERNAL_SNAPSHOT, errp)) {
        return;
    }

1512
    if (bdrv_is_read_only(bs)) {
1513
        error_setg(errp, "Device '%s' is read only", device);
1514 1515 1516 1517
        return;
    }

    if (!bdrv_can_snapshot(bs)) {
1518 1519 1520
        error_setg(errp, "Block format '%s' used by device '%s' "
                   "does not support internal snapshots",
                   bs->drv->format_name, device);
1521 1522 1523 1524 1525 1526 1527 1528 1529
        return;
    }

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

    /* check whether a snapshot with name exist */
1530 1531 1532 1533
    ret = bdrv_snapshot_find_by_id_and_name(bs, NULL, name, &old_sn,
                                            &local_err);
    if (local_err) {
        error_propagate(errp, local_err);
1534 1535 1536 1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558
        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 */
1559
    state->created = true;
1560 1561
}

1562
static void internal_snapshot_abort(BlkActionState *common)
1563 1564 1565 1566 1567 1568 1569
{
    InternalSnapshotState *state =
                             DO_UPCAST(InternalSnapshotState, common, common);
    BlockDriverState *bs = state->bs;
    QEMUSnapshotInfo *sn = &state->sn;
    Error *local_error = NULL;

1570
    if (!state->created) {
1571 1572 1573 1574
        return;
    }

    if (bdrv_snapshot_delete(bs, sn->id_str, sn->name, &local_error) < 0) {
1575 1576 1577 1578 1579
        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));
1580 1581 1582
    }
}

1583
static void internal_snapshot_clean(BlkActionState *common)
1584 1585 1586 1587 1588
{
    InternalSnapshotState *state = DO_UPCAST(InternalSnapshotState,
                                             common, common);

    if (state->aio_context) {
1589 1590 1591
        if (state->bs) {
            bdrv_drained_end(state->bs);
        }
1592 1593 1594 1595
        aio_context_release(state->aio_context);
    }
}

1596
/* external snapshot private data */
1597
typedef struct ExternalSnapshotState {
1598
    BlkActionState common;
1599 1600
    BlockDriverState *old_bs;
    BlockDriverState *new_bs;
1601
    AioContext *aio_context;
1602
    bool overlay_appended;
1603
} ExternalSnapshotState;
1604

1605
static void external_snapshot_prepare(BlkActionState *common,
1606 1607
                                      Error **errp)
{
M
Max Reitz 已提交
1608
    int flags = 0;
1609
    QDict *options = NULL;
1610
    Error *local_err = NULL;
1611
    /* Device and node name of the image to generate the snapshot from */
1612
    const char *device;
1613
    const char *node_name;
1614 1615 1616
    /* Reference to the new image (for 'blockdev-snapshot') */
    const char *snapshot_ref;
    /* File name of the new image (for 'blockdev-snapshot-sync') */
1617
    const char *new_image_file;
1618 1619
    ExternalSnapshotState *state =
                             DO_UPCAST(ExternalSnapshotState, common, common);
1620
    TransactionAction *action = common->action;
1621

1622 1623 1624 1625 1626
    /* 'blockdev-snapshot' and 'blockdev-snapshot-sync' have similar
     * purpose but a different set of parameters */
    switch (action->type) {
    case TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT:
        {
1627
            BlockdevSnapshot *s = action->u.blockdev_snapshot.data;
1628 1629 1630 1631 1632 1633 1634 1635
            device = s->node;
            node_name = s->node;
            new_image_file = NULL;
            snapshot_ref = s->overlay;
        }
        break;
    case TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT_SYNC:
        {
1636
            BlockdevSnapshotSync *s = action->u.blockdev_snapshot_sync.data;
1637 1638 1639 1640 1641 1642 1643 1644
            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();
1645 1646 1647
    }

    /* start processing */
J
John Snow 已提交
1648 1649 1650 1651
    if (action_check_completion_mode(common, errp) < 0) {
        return;
    }

1652 1653
    state->old_bs = bdrv_lookup_bs(device, node_name, errp);
    if (!state->old_bs) {
1654 1655 1656
        return;
    }

1657 1658 1659
    /* 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);
1660
    bdrv_drained_begin(state->old_bs);
1661

1662
    if (!bdrv_is_inserted(state->old_bs)) {
1663
        error_setg(errp, QERR_DEVICE_HAS_NO_MEDIUM, device);
1664 1665 1666
        return;
    }

1667 1668
    if (bdrv_op_is_blocked(state->old_bs,
                           BLOCK_OP_TYPE_EXTERNAL_SNAPSHOT, errp)) {
1669 1670 1671
        return;
    }

1672 1673
    if (!bdrv_is_read_only(state->old_bs)) {
        if (bdrv_flush(state->old_bs)) {
1674
            error_setg(errp, QERR_IO_ERROR);
1675 1676 1677 1678
            return;
        }
    }

1679
    if (!bdrv_is_first_non_filter(state->old_bs)) {
1680
        error_setg(errp, QERR_FEATURE_DISABLED, "snapshot");
1681 1682 1683
        return;
    }

1684
    if (action->type == TRANSACTION_ACTION_KIND_BLOCKDEV_SNAPSHOT_SYNC) {
1685
        BlockdevSnapshotSync *s = action->u.blockdev_snapshot_sync.data;
1686 1687 1688 1689
        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;
1690

1691 1692
        if (node_name && !snapshot_node_name) {
            error_setg(errp, "New snapshot node name missing");
1693 1694 1695
            return;
        }

1696 1697 1698 1699 1700 1701 1702
        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;
1703
        flags &= ~(BDRV_O_SNAPSHOT | BDRV_O_NO_BACKING | BDRV_O_COPY_ON_READ);
1704 1705 1706 1707

        /* create new image w/backing file */
        mode = s->has_mode ? s->mode : NEW_IMAGE_MODE_ABSOLUTE_PATHS;
        if (mode != NEW_IMAGE_MODE_EXISTING) {
1708 1709 1710 1711 1712
            int64_t size = bdrv_getlength(state->old_bs);
            if (size < 0) {
                error_setg_errno(errp, -size, "bdrv_getlength failed");
                return;
            }
1713 1714 1715
            bdrv_img_create(new_image_file, format,
                            state->old_bs->filename,
                            state->old_bs->drv->format_name,
1716
                            NULL, size, flags, false, &local_err);
1717 1718 1719 1720 1721 1722 1723 1724
            if (local_err) {
                error_propagate(errp, local_err);
                return;
            }
        }

        options = qdict_new();
        if (s->has_snapshot_node_name) {
1725
            qdict_put_str(options, "node-name", snapshot_node_name);
1726
        }
1727
        qdict_put_str(options, "driver", format);
1728 1729

        flags |= BDRV_O_NO_BACKING;
1730 1731
    }

M
Max Reitz 已提交
1732 1733
    state->new_bs = bdrv_open(new_image_file, snapshot_ref, options, flags,
                              errp);
1734
    /* We will manually add the backing_hd field to the bs later */
M
Max Reitz 已提交
1735
    if (!state->new_bs) {
1736 1737 1738
        return;
    }

K
Kevin Wolf 已提交
1739
    if (bdrv_has_blk(state->new_bs)) {
1740
        error_setg(errp, "The snapshot is already in use");
1741 1742 1743 1744 1745 1746 1747 1748 1749 1750
        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");
1751 1752 1753 1754 1755
        return;
    }

    if (!state->new_bs->drv->supports_backing) {
        error_setg(errp, "The snapshot does not support backing images");
1756 1757 1758
        return;
    }

1759 1760
    bdrv_set_aio_context(state->new_bs, state->aio_context);

1761 1762 1763 1764 1765 1766 1767 1768
    /* This removes our old bs and adds the new bs. This is an operation that
     * can fail, so we need to do it in .prepare; undoing it for abort is
     * always possible. */
    bdrv_ref(state->new_bs);
    bdrv_append(state->new_bs, state->old_bs, &local_err);
    if (local_err) {
        error_propagate(errp, local_err);
        return;
1769
    }
1770
    state->overlay_appended = true;
1771 1772
}

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

1778 1779 1780
    /* 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 */
1781
    if (!atomic_read(&state->old_bs->copy_on_read)) {
1782 1783 1784
        bdrv_reopen(state->old_bs, state->old_bs->open_flags & ~BDRV_O_RDWR,
                    NULL);
    }
1785 1786
}

1787
static void external_snapshot_abort(BlkActionState *common)
1788
{
1789 1790 1791
    ExternalSnapshotState *state =
                             DO_UPCAST(ExternalSnapshotState, common, common);
    if (state->new_bs) {
1792
        if (state->overlay_appended) {
1793 1794 1795
            bdrv_ref(state->old_bs);   /* we can't let bdrv_set_backind_hd()
                                          close state->old_bs; we need it */
            bdrv_set_backing_hd(state->new_bs, NULL, &error_abort);
1796
            bdrv_replace_node(state->new_bs, state->old_bs, &error_abort);
1797
            bdrv_unref(state->old_bs); /* bdrv_replace_node() ref'ed old_bs */
1798
        }
1799
    }
1800 1801
}

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

1813
typedef struct DriveBackupState {
1814
    BlkActionState common;
1815
    BlockDriverState *bs;
1816
    AioContext *aio_context;
1817 1818 1819
    BlockJob *job;
} DriveBackupState;

1820
static BlockJob *do_drive_backup(DriveBackup *backup, BlockJobTxn *txn,
P
Pavel Butsykin 已提交
1821
                            Error **errp);
1822

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

1830
    assert(common->action->type == TRANSACTION_ACTION_KIND_DRIVE_BACKUP);
1831
    backup = common->action->u.drive_backup.data;
1832

1833 1834
    bs = qmp_get_root_bs(backup->device, errp);
    if (!bs) {
1835 1836 1837
        return;
    }

1838
    /* AioContext is released in .clean() */
1839
    state->aio_context = bdrv_get_aio_context(bs);
1840
    aio_context_acquire(state->aio_context);
1841 1842
    bdrv_drained_begin(bs);
    state->bs = bs;
1843

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

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

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

1862 1863
    if (state->job) {
        block_job_cancel_sync(state->job);
1864 1865 1866
    }
}

1867
static void drive_backup_clean(BlkActionState *common)
1868 1869 1870 1871
{
    DriveBackupState *state = DO_UPCAST(DriveBackupState, common, common);

    if (state->aio_context) {
1872
        bdrv_drained_end(state->bs);
1873 1874 1875 1876
        aio_context_release(state->aio_context);
    }
}

1877
typedef struct BlockdevBackupState {
1878
    BlkActionState common;
1879 1880 1881 1882 1883
    BlockDriverState *bs;
    BlockJob *job;
    AioContext *aio_context;
} BlockdevBackupState;

1884 1885
static BlockJob *do_blockdev_backup(BlockdevBackup *backup, BlockJobTxn *txn,
                                    Error **errp);
1886

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

1894
    assert(common->action->type == TRANSACTION_ACTION_KIND_BLOCKDEV_BACKUP);
1895
    backup = common->action->u.blockdev_backup.data;
1896

1897 1898
    bs = qmp_get_root_bs(backup->device, errp);
    if (!bs) {
1899 1900 1901
        return;
    }

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

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

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

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

1932
static void blockdev_backup_abort(BlkActionState *common)
1933 1934 1935
{
    BlockdevBackupState *state = DO_UPCAST(BlockdevBackupState, common, common);

1936 1937
    if (state->job) {
        block_job_cancel_sync(state->job);
1938 1939 1940
    }
}

1941
static void blockdev_backup_clean(BlkActionState *common)
1942 1943 1944 1945
{
    BlockdevBackupState *state = DO_UPCAST(BlockdevBackupState, common, common);

    if (state->aio_context) {
1946
        bdrv_drained_end(state->bs);
1947 1948 1949 1950
        aio_context_release(state->aio_context);
    }
}

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

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

J
John Snow 已提交
1968 1969 1970 1971
    if (action_check_completion_mode(common, errp) < 0) {
        return;
    }

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

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

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

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

J
John Snow 已提交
2007 2008 2009 2010
    if (action_check_completion_mode(common, errp) < 0) {
        return;
    }

2011
    action = common->action->u.block_dirty_bitmap_clear.data;
F
Fam Zheng 已提交
2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023 2024 2025 2026 2027 2028 2029 2030 2031
    state->bitmap = block_dirty_bitmap_lookup(action->node,
                                              action->name,
                                              &state->bs,
                                              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() */
}

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

J
John Snow 已提交
2037 2038 2039
    if (state->backup) {
        bdrv_undo_clear_dirty_bitmap(state->bitmap, state->backup);
    }
F
Fam Zheng 已提交
2040 2041
}

2042
static void block_dirty_bitmap_clear_commit(BlkActionState *common)
F
Fam Zheng 已提交
2043 2044 2045 2046 2047 2048 2049
{
    BlockDirtyBitmapState *state = DO_UPCAST(BlockDirtyBitmapState,
                                             common, common);

    hbitmap_free(state->backup);
}

2050
static void block_dirty_bitmap_clear_clean(BlkActionState *common)
F
Fam Zheng 已提交
2051 2052 2053 2054 2055 2056 2057 2058 2059
{
    BlockDirtyBitmapState *state = DO_UPCAST(BlockDirtyBitmapState,
                                             common, common);

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

2060
static void abort_prepare(BlkActionState *common, Error **errp)
2061 2062 2063 2064
{
    error_setg(errp, "Transaction aborted using Abort action");
}

2065
static void abort_commit(BlkActionState *common)
2066
{
2067
    g_assert_not_reached(); /* this action never succeeds */
2068 2069
}

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

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

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

2157
    QSIMPLEQ_HEAD(snap_bdrv_states, BlkActionState) snap_bdrv_states;
2158 2159
    QSIMPLEQ_INIT(&snap_bdrv_states);

J
John Snow 已提交
2160 2161 2162 2163 2164 2165 2166 2167
    /* 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();
    }

2168
    /* drain all i/o before any operations */
2169 2170
    bdrv_drain_all();

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

2176 2177 2178
        dev_info = dev_entry->value;
        dev_entry = dev_entry->next;

2179
        assert(dev_info->type < ARRAY_SIZE(actions));
2180

2181
        ops = &actions[dev_info->type];
2182 2183
        assert(ops->instance_size > 0);

2184 2185 2186
        state = g_malloc0(ops->instance_size);
        state->ops = ops;
        state->action = dev_info;
J
John Snow 已提交
2187 2188
        state->block_job_txn = block_job_txn;
        state->txn_props = props;
2189
        QSIMPLEQ_INSERT_TAIL(&snap_bdrv_states, state, entry);
2190

2191
        state->ops->prepare(state, &local_err);
2192
        if (local_err) {
2193 2194
            error_propagate(errp, local_err);
            goto delete_and_fail;
2195 2196 2197
        }
    }

2198
    QSIMPLEQ_FOREACH(state, &snap_bdrv_states, entry) {
2199 2200 2201
        if (state->ops->commit) {
            state->ops->commit(state);
        }
2202 2203 2204 2205 2206 2207
    }

    /* success */
    goto exit;

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

2227 2228 2229
void qmp_eject(bool has_device, const char *device,
               bool has_id, const char *id,
               bool has_force, bool force, Error **errp)
2230
{
2231
    Error *local_err = NULL;
2232 2233 2234 2235 2236
    int rc;

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

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

2247
    qmp_x_blockdev_remove_medium(has_device, device, has_id, id, errp);
2248 2249
}

2250 2251 2252
void qmp_block_passwd(bool has_device, const char *device,
                      bool has_node_name, const char *node_name,
                      const char *password, Error **errp)
2253
{
2254
    Error *local_err = NULL;
2255
    BlockDriverState *bs;
2256
    AioContext *aio_context;
2257

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

2266 2267 2268
    aio_context = bdrv_get_aio_context(bs);
    aio_context_acquire(aio_context);

2269
    bdrv_add_key(bs, password, errp);
2270 2271

    aio_context_release(aio_context);
2272 2273
}

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

2292
    blk = qmp_get_blk(blk_name, qdev_id, errp);
M
Max Reitz 已提交
2293
    if (!blk) {
2294
        return -ENODEV;
M
Max Reitz 已提交
2295 2296 2297 2298
    }

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

2302
    if (!blk_dev_has_tray(blk)) {
2303 2304
        error_setg(errp, "Device '%s' does not have a tray", device);
        return -ENOSYS;
2305 2306
    }

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

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

    if (!locked || force) {
2317
        blk_dev_change_media_cb(blk, false, &error_abort);
M
Max Reitz 已提交
2318
    }
2319 2320

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

    return 0;
}

2329 2330 2331
void qmp_blockdev_open_tray(bool has_device, const char *device,
                            bool has_id, const char *id,
                            bool has_force, bool force,
2332 2333
                            Error **errp)
{
2334 2335 2336
    Error *local_err = NULL;
    int rc;

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

2350 2351 2352
void qmp_blockdev_close_tray(bool has_device, const char *device,
                             bool has_id, const char *id,
                             Error **errp)
M
Max Reitz 已提交
2353 2354
{
    BlockBackend *blk;
2355
    Error *local_err = NULL;
M
Max Reitz 已提交
2356

2357 2358 2359 2360
    device = has_device ? device : NULL;
    id = has_id ? id : NULL;

    blk = qmp_get_blk(device, id, errp);
M
Max Reitz 已提交
2361 2362 2363 2364 2365
    if (!blk) {
        return;
    }

    if (!blk_dev_has_removable_media(blk)) {
2366
        error_setg(errp, "Device '%s' is not removable", device ?: id);
M
Max Reitz 已提交
2367 2368 2369
        return;
    }

2370 2371 2372 2373 2374
    if (!blk_dev_has_tray(blk)) {
        /* Ignore this command on tray-less devices */
        return;
    }

M
Max Reitz 已提交
2375 2376 2377 2378
    if (!blk_dev_is_tray_open(blk)) {
        return;
    }

2379 2380 2381 2382 2383
    blk_dev_change_media_cb(blk, true, &local_err);
    if (local_err) {
        error_propagate(errp, local_err);
        return;
    }
M
Max Reitz 已提交
2384 2385
}

2386 2387
void qmp_x_blockdev_remove_medium(bool has_device, const char *device,
                                  bool has_id, const char *id, Error **errp)
M
Max Reitz 已提交
2388 2389 2390 2391
{
    BlockBackend *blk;
    BlockDriverState *bs;
    AioContext *aio_context;
2392
    bool has_attached_device;
M
Max Reitz 已提交
2393

2394 2395 2396 2397
    device = has_device ? device : NULL;
    id = has_id ? id : NULL;

    blk = qmp_get_blk(device, id, errp);
M
Max Reitz 已提交
2398 2399 2400 2401 2402
    if (!blk) {
        return;
    }

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

2405 2406
    if (has_attached_device && !blk_dev_has_removable_media(blk)) {
        error_setg(errp, "Device '%s' is not removable", device ?: id);
M
Max Reitz 已提交
2407 2408 2409
        return;
    }

2410 2411 2412 2413
    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 已提交
2414 2415 2416 2417 2418 2419 2420 2421 2422 2423 2424 2425 2426 2427 2428 2429 2430
        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);

2431 2432 2433 2434 2435
    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). */
2436
        blk_dev_change_media_cb(blk, false, &error_abort);
2437 2438
    }

M
Max Reitz 已提交
2439 2440 2441 2442
out:
    aio_context_release(aio_context);
}

2443
static void qmp_blockdev_insert_anon_medium(BlockBackend *blk,
M
Max Reitz 已提交
2444 2445
                                            BlockDriverState *bs, Error **errp)
{
2446
    Error *local_err = NULL;
M
Max Reitz 已提交
2447
    bool has_device;
2448
    int ret;
M
Max Reitz 已提交
2449 2450 2451 2452 2453

    /* 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)) {
2454
        error_setg(errp, "Device is not removable");
M
Max Reitz 已提交
2455 2456 2457
        return;
    }

2458
    if (has_device && blk_dev_has_tray(blk) && !blk_dev_is_tray_open(blk)) {
2459
        error_setg(errp, "Tray of the device is not open");
M
Max Reitz 已提交
2460 2461 2462 2463
        return;
    }

    if (blk_bs(blk)) {
2464
        error_setg(errp, "There already is a medium in the device");
M
Max Reitz 已提交
2465 2466 2467
        return;
    }

2468 2469 2470 2471
    ret = blk_insert_bs(blk, bs, errp);
    if (ret < 0) {
        return;
    }
M
Max Reitz 已提交
2472

2473 2474 2475 2476 2477 2478
    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). */
2479 2480 2481 2482 2483 2484
        blk_dev_change_media_cb(blk, true, &local_err);
        if (local_err) {
            error_propagate(errp, local_err);
            blk_remove_bs(blk);
            return;
        }
2485
    }
M
Max Reitz 已提交
2486 2487
}

2488 2489 2490
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 已提交
2491
{
2492
    BlockBackend *blk;
M
Max Reitz 已提交
2493 2494
    BlockDriverState *bs;

2495 2496 2497 2498 2499 2500 2501
    blk = qmp_get_blk(has_device ? device : NULL,
                      has_id ? id : NULL,
                      errp);
    if (!blk) {
        return;
    }

M
Max Reitz 已提交
2502 2503 2504 2505 2506 2507
    bs = bdrv_find_node(node_name);
    if (!bs) {
        error_setg(errp, "Node '%s' not found", node_name);
        return;
    }

K
Kevin Wolf 已提交
2508
    if (bdrv_has_blk(bs)) {
2509
        error_setg(errp, "Node '%s' is already in use", node_name);
M
Max Reitz 已提交
2510 2511 2512
        return;
    }

2513
    qmp_blockdev_insert_anon_medium(blk, bs, errp);
M
Max Reitz 已提交
2514 2515
}

2516 2517 2518
void qmp_blockdev_change_medium(bool has_device, const char *device,
                                bool has_id, const char *id,
                                const char *filename,
M
Max Reitz 已提交
2519
                                bool has_format, const char *format,
2520 2521
                                bool has_read_only,
                                BlockdevChangeReadOnlyMode read_only,
M
Max Reitz 已提交
2522
                                Error **errp)
2523 2524 2525
{
    BlockBackend *blk;
    BlockDriverState *medium_bs = NULL;
M
Max Reitz 已提交
2526
    int bdrv_flags;
2527
    bool detect_zeroes;
2528
    int rc;
2529 2530 2531
    QDict *options = NULL;
    Error *err = NULL;

2532 2533 2534
    blk = qmp_get_blk(has_device ? device : NULL,
                      has_id ? id : NULL,
                      errp);
2535 2536 2537 2538 2539 2540 2541 2542 2543
    if (!blk) {
        goto fail;
    }

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

    bdrv_flags = blk_get_open_flags_from_root_state(blk);
2544 2545
    bdrv_flags &= ~(BDRV_O_TEMPORARY | BDRV_O_SNAPSHOT | BDRV_O_NO_BACKING |
        BDRV_O_PROTOCOL);
2546

2547 2548 2549 2550 2551 2552 2553 2554 2555 2556 2557 2558 2559 2560 2561 2562 2563 2564 2565 2566
    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();
    }

2567 2568
    options = qdict_new();
    detect_zeroes = blk_get_detect_zeroes_from_root_state(blk);
2569
    qdict_put_str(options, "detect-zeroes", detect_zeroes ? "on" : "off");
2570

M
Max Reitz 已提交
2571
    if (has_format) {
2572
        qdict_put_str(options, "driver", format);
2573 2574
    }

M
Max Reitz 已提交
2575 2576
    medium_bs = bdrv_open(filename, NULL, options, bdrv_flags, errp);
    if (!medium_bs) {
2577 2578 2579 2580 2581 2582 2583 2584 2585
        goto fail;
    }

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

2586 2587 2588
    rc = do_open_tray(has_device ? device : NULL,
                      has_id ? id : NULL,
                      false, &err);
2589
    if (rc && rc != -ENOSYS) {
2590 2591 2592
        error_propagate(errp, err);
        goto fail;
    }
2593 2594
    error_free(err);
    err = NULL;
2595

2596
    qmp_x_blockdev_remove_medium(has_device, device, has_id, id, &err);
2597 2598 2599 2600 2601
    if (err) {
        error_propagate(errp, err);
        goto fail;
    }

2602
    qmp_blockdev_insert_anon_medium(blk, medium_bs, &err);
2603 2604 2605 2606 2607
    if (err) {
        error_propagate(errp, err);
        goto fail;
    }

2608
    qmp_blockdev_close_tray(has_device, device, has_id, id, errp);
2609 2610 2611 2612 2613 2614 2615 2616

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 已提交
2617
/* throttling disk I/O limits */
2618
void qmp_block_set_io_throttle(BlockIOThrottle *arg, Error **errp)
Z
Zhi Yong Wu 已提交
2619
{
2620
    ThrottleConfig cfg;
Z
Zhi Yong Wu 已提交
2621
    BlockDriverState *bs;
2622
    BlockBackend *blk;
2623
    AioContext *aio_context;
Z
Zhi Yong Wu 已提交
2624

2625 2626 2627
    blk = qmp_get_blk(arg->has_device ? arg->device : NULL,
                      arg->has_id ? arg->id : NULL,
                      errp);
2628
    if (!blk) {
2629
        return;
Z
Zhi Yong Wu 已提交
2630
    }
M
Max Reitz 已提交
2631 2632 2633 2634

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

2635
    bs = blk_bs(blk);
M
Max Reitz 已提交
2636
    if (!bs) {
2637
        error_setg(errp, "Device has no medium");
M
Max Reitz 已提交
2638 2639
        goto out;
    }
Z
Zhi Yong Wu 已提交
2640

2641
    throttle_config_init(&cfg);
2642 2643 2644
    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;
2645

2646 2647 2648
    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;
2649

2650 2651
    if (arg->has_bps_max) {
        cfg.buckets[THROTTLE_BPS_TOTAL].max = arg->bps_max;
2652
    }
2653 2654
    if (arg->has_bps_rd_max) {
        cfg.buckets[THROTTLE_BPS_READ].max = arg->bps_rd_max;
2655
    }
2656 2657
    if (arg->has_bps_wr_max) {
        cfg.buckets[THROTTLE_BPS_WRITE].max = arg->bps_wr_max;
2658
    }
2659 2660
    if (arg->has_iops_max) {
        cfg.buckets[THROTTLE_OPS_TOTAL].max = arg->iops_max;
2661
    }
2662 2663
    if (arg->has_iops_rd_max) {
        cfg.buckets[THROTTLE_OPS_READ].max = arg->iops_rd_max;
2664
    }
2665 2666
    if (arg->has_iops_wr_max) {
        cfg.buckets[THROTTLE_OPS_WRITE].max = arg->iops_wr_max;
2667
    }
Z
Zhi Yong Wu 已提交
2668

2669 2670
    if (arg->has_bps_max_length) {
        cfg.buckets[THROTTLE_BPS_TOTAL].burst_length = arg->bps_max_length;
2671
    }
2672 2673
    if (arg->has_bps_rd_max_length) {
        cfg.buckets[THROTTLE_BPS_READ].burst_length = arg->bps_rd_max_length;
2674
    }
2675 2676
    if (arg->has_bps_wr_max_length) {
        cfg.buckets[THROTTLE_BPS_WRITE].burst_length = arg->bps_wr_max_length;
2677
    }
2678 2679
    if (arg->has_iops_max_length) {
        cfg.buckets[THROTTLE_OPS_TOTAL].burst_length = arg->iops_max_length;
2680
    }
2681 2682
    if (arg->has_iops_rd_max_length) {
        cfg.buckets[THROTTLE_OPS_READ].burst_length = arg->iops_rd_max_length;
2683
    }
2684 2685
    if (arg->has_iops_wr_max_length) {
        cfg.buckets[THROTTLE_OPS_WRITE].burst_length = arg->iops_wr_max_length;
2686 2687
    }

2688 2689
    if (arg->has_iops_size) {
        cfg.op_size = arg->iops_size;
2690
    }
2691

2692
    if (!throttle_is_valid(&cfg, errp)) {
M
Max Reitz 已提交
2693
        goto out;
Z
Zhi Yong Wu 已提交
2694 2695
    }

2696 2697 2698
    if (throttle_enabled(&cfg)) {
        /* Enable I/O limits if they're not enabled yet, otherwise
         * just update the throttling group. */
2699
        if (!blk_get_public(blk)->throttle_state) {
2700
            blk_io_limits_enable(blk,
2701 2702 2703
                                 arg->has_group ? arg->group :
                                 arg->has_device ? arg->device :
                                 arg->id);
2704 2705
        } else if (arg->has_group) {
            blk_io_limits_update_group(blk, arg->group);
2706 2707
        }
        /* Set the new throttling configuration */
2708 2709
        blk_set_io_limits(blk, &cfg);
    } else if (blk_get_public(blk)->throttle_state) {
2710
        /* If all throttling settings are set to 0, disable I/O limits */
2711
        blk_io_limits_disable(blk);
Z
Zhi Yong Wu 已提交
2712
    }
2713

M
Max Reitz 已提交
2714
out:
2715
    aio_context_release(aio_context);
Z
Zhi Yong Wu 已提交
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)
{
    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;
    }

    if (has_granularity) {
        if (granularity < 512 || !is_power_of_2(granularity)) {
            error_setg(errp, "Granularity must be power of 2 "
                             "and at least 512");
2738
            return;
2739 2740 2741 2742 2743 2744 2745 2746 2747 2748 2749 2750 2751 2752 2753
        }
    } else {
        /* Default to cluster size, if available: */
        granularity = bdrv_get_default_bitmap_granularity(bs);
    }

    bdrv_create_dirty_bitmap(bs, granularity, name, errp);
}

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

2754
    bitmap = block_dirty_bitmap_lookup(node, name, &bs, errp);
2755 2756 2757 2758
    if (!bitmap || !bs) {
        return;
    }

J
John Snow 已提交
2759 2760 2761 2762
    if (bdrv_dirty_bitmap_frozen(bitmap)) {
        error_setg(errp,
                   "Bitmap '%s' is currently frozen and cannot be removed",
                   name);
2763
        return;
J
John Snow 已提交
2764
    }
2765
    bdrv_dirty_bitmap_make_anon(bitmap);
2766 2767 2768
    bdrv_release_dirty_bitmap(bs, bitmap);
}

J
John Snow 已提交
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)
{
    BdrvDirtyBitmap *bitmap;
    BlockDriverState *bs;

2779
    bitmap = block_dirty_bitmap_lookup(node, name, &bs, errp);
J
John Snow 已提交
2780 2781 2782 2783 2784 2785 2786 2787
    if (!bitmap || !bs) {
        return;
    }

    if (bdrv_dirty_bitmap_frozen(bitmap)) {
        error_setg(errp,
                   "Bitmap '%s' is currently frozen and cannot be modified",
                   name);
2788
        return;
J
John Snow 已提交
2789 2790 2791 2792
    } else if (!bdrv_dirty_bitmap_enabled(bitmap)) {
        error_setg(errp,
                   "Bitmap '%s' is currently disabled and cannot be cleared",
                   name);
2793
        return;
J
John Snow 已提交
2794 2795
    }

F
Fam Zheng 已提交
2796
    bdrv_clear_dirty_bitmap(bitmap, NULL);
J
John Snow 已提交
2797 2798
}

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

2807 2808
    bs = bdrv_find_node(id);
    if (bs) {
2809
        qmp_blockdev_del(id, &local_err);
2810 2811 2812 2813 2814 2815
        if (local_err) {
            error_report_err(local_err);
        }
        return;
    }

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

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

M
Max Reitz 已提交
2828
    aio_context = blk_get_aio_context(blk);
2829 2830
    aio_context_acquire(aio_context);

M
Max Reitz 已提交
2831 2832 2833 2834 2835 2836 2837
    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;
        }
2838

2839
        blk_remove_bs(blk);
M
Max Reitz 已提交
2840
    }
2841

2842
    /* Make the BlockBackend and the attached BlockDriverState anonymous */
2843 2844
    monitor_remove_blk(blk);

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

2856
    aio_context_release(aio_context);
2857
}
2858

2859 2860 2861
void qmp_block_resize(bool has_device, const char *device,
                      bool has_node_name, const char *node_name,
                      int64_t size, Error **errp)
2862
{
2863
    Error *local_err = NULL;
2864
    BlockBackend *blk = NULL;
2865
    BlockDriverState *bs;
2866
    AioContext *aio_context;
2867
    int ret;
2868

2869 2870 2871
    bs = bdrv_lookup_bs(has_device ? device : NULL,
                        has_node_name ? node_name : NULL,
                        &local_err);
2872
    if (local_err) {
2873 2874 2875 2876
        error_propagate(errp, local_err);
        return;
    }

2877 2878 2879
    aio_context = bdrv_get_aio_context(bs);
    aio_context_acquire(aio_context);

2880
    if (!bdrv_is_first_non_filter(bs)) {
2881
        error_setg(errp, QERR_FEATURE_DISABLED, "resize");
2882
        goto out;
2883 2884 2885
    }

    if (size < 0) {
2886
        error_setg(errp, QERR_INVALID_PARAMETER_VALUE, "size", "a >0 size");
2887
        goto out;
2888 2889
    }

2890
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_RESIZE, NULL)) {
2891
        error_setg(errp, QERR_DEVICE_IN_USE, device);
2892
        goto out;
2893 2894
    }

K
Kevin Wolf 已提交
2895
    blk = blk_new(BLK_PERM_RESIZE, BLK_PERM_ALL);
2896 2897 2898 2899
    ret = blk_insert_bs(blk, bs, errp);
    if (ret < 0) {
        goto out;
    }
2900

2901
    bdrv_drained_begin(bs);
2902
    ret = blk_truncate(blk, size, errp);
2903
    bdrv_drained_end(bs);
2904 2905

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

2910
void qmp_block_stream(bool has_job_id, const char *job_id, const char *device,
2911
                      bool has_base, const char *base,
2912
                      bool has_base_node, const char *base_node,
2913 2914
                      bool has_backing_file, const char *backing_file,
                      bool has_speed, int64_t speed,
P
Paolo Bonzini 已提交
2915 2916
                      bool has_on_error, BlockdevOnError on_error,
                      Error **errp)
S
Stefan Hajnoczi 已提交
2917
{
2918
    BlockDriverState *bs, *iter;
2919
    BlockDriverState *base_bs = NULL;
2920
    AioContext *aio_context;
2921
    Error *local_err = NULL;
2922
    const char *base_name = NULL;
S
Stefan Hajnoczi 已提交
2923

P
Paolo Bonzini 已提交
2924 2925 2926 2927
    if (!has_on_error) {
        on_error = BLOCKDEV_ON_ERROR_REPORT;
    }

2928
    bs = bdrv_lookup_bs(device, device, errp);
2929
    if (!bs) {
S
Stefan Hajnoczi 已提交
2930 2931 2932
        return;
    }

2933
    aio_context = bdrv_get_aio_context(bs);
2934 2935
    aio_context_acquire(aio_context);

2936 2937 2938 2939 2940 2941
    if (has_base && has_base_node) {
        error_setg(errp, "'base' and 'base-node' cannot be specified "
                   "at the same time");
        goto out;
    }

2942
    if (has_base) {
2943 2944
        base_bs = bdrv_find_backing_image(bs, base);
        if (base_bs == NULL) {
2945
            error_setg(errp, QERR_BASE_NOT_FOUND, base);
2946
            goto out;
2947
        }
2948
        assert(bdrv_get_aio_context(base_bs) == aio_context);
2949
        base_name = base;
S
Stefan Hajnoczi 已提交
2950 2951
    }

2952 2953 2954 2955 2956 2957 2958 2959 2960 2961 2962 2963 2964 2965
    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;
    }

2966 2967 2968 2969 2970 2971 2972
    /* 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;
        }
    }

2973 2974 2975 2976 2977
    /* 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");
2978
        goto out;
2979 2980 2981 2982 2983
    }

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

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

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

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

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

3015 3016 3017
    if (!has_speed) {
        speed = 0;
    }
3018 3019 3020
    if (!has_filter_node_name) {
        filter_node_name = NULL;
    }
3021

3022 3023 3024 3025 3026
    /* 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. */
3027 3028 3029 3030 3031 3032 3033 3034 3035 3036
    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);
        }
3037
        return;
3038 3039
    }

3040
    aio_context = bdrv_get_aio_context(bs);
3041 3042
    aio_context_acquire(aio_context);

3043
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_COMMIT_SOURCE, errp)) {
3044
        goto out;
3045 3046 3047 3048 3049
    }

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

3050
    if (has_top && top) {
3051 3052 3053 3054 3055 3056 3057
        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");
3058
        goto out;
3059 3060
    }

3061 3062
    assert(bdrv_get_aio_context(top_bs) == aio_context);

3063 3064 3065 3066 3067 3068 3069
    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) {
3070
        error_setg(errp, QERR_BASE_NOT_FOUND, base ? base : "NULL");
3071
        goto out;
3072 3073
    }

3074 3075
    assert(bdrv_get_aio_context(base_bs) == aio_context);

3076 3077 3078 3079
    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;
        }
3080 3081
    }

3082 3083 3084
    /* Do not allow attempts to commit an image into itself */
    if (top_bs == base_bs) {
        error_setg(errp, "cannot commit an image into itself");
3085
        goto out;
3086 3087
    }

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

out:
    aio_context_release(aio_context);
3113 3114
}

3115 3116
static BlockJob *do_drive_backup(DriveBackup *backup, BlockJobTxn *txn,
                                 Error **errp)
3117 3118 3119
{
    BlockDriverState *bs;
    BlockDriverState *target_bs;
3120
    BlockDriverState *source = NULL;
3121
    BlockJob *job = NULL;
3122
    BdrvDirtyBitmap *bmap = NULL;
3123
    AioContext *aio_context;
3124
    QDict *options = NULL;
3125 3126 3127
    Error *local_err = NULL;
    int flags;
    int64_t size;
3128
    bool set_backing_hd = false;
3129

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

P
Pavel Butsykin 已提交
3149
    bs = qmp_get_root_bs(backup->device, errp);
3150
    if (!bs) {
3151
        return NULL;
3152 3153
    }

3154
    aio_context = bdrv_get_aio_context(bs);
3155 3156
    aio_context_acquire(aio_context);

P
Pavel Butsykin 已提交
3157 3158 3159
    if (!backup->has_format) {
        backup->format = backup->mode == NEW_IMAGE_MODE_EXISTING ?
                         NULL : (char*) bs->drv->format_name;
3160 3161
    }

F
Fam Zheng 已提交
3162
    /* Early check to avoid creating target */
3163
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_BACKUP_SOURCE, errp)) {
3164
        goto out;
3165 3166
    }

K
Kevin Wolf 已提交
3167
    flags = bs->open_flags | BDRV_O_RDWR;
3168

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

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

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

3201
    if (local_err) {
3202
        error_propagate(errp, local_err);
3203
        goto out;
3204 3205
    }

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

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

3218 3219
    bdrv_set_aio_context(target_bs, aio_context);

3220 3221 3222 3223 3224 3225 3226 3227
    if (set_backing_hd) {
        bdrv_set_backing_hd(target_bs, source, &local_err);
        if (local_err) {
            bdrv_unref(target_bs);
            goto out;
        }
    }

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

3237 3238 3239 3240
    job = backup_job_create(backup->job_id, bs, target_bs, backup->speed,
                            backup->sync, bmap, backup->compress,
                            backup->on_source_error, backup->on_target_error,
                            BLOCK_JOB_DEFAULT, NULL, NULL, txn, &local_err);
K
Kevin Wolf 已提交
3241
    bdrv_unref(target_bs);
3242 3243
    if (local_err != NULL) {
        error_propagate(errp, local_err);
3244
        goto out;
3245
    }
3246 3247 3248

out:
    aio_context_release(aio_context);
3249
    return job;
3250 3251
}

P
Pavel Butsykin 已提交
3252
void qmp_drive_backup(DriveBackup *arg, Error **errp)
3253
{
3254 3255 3256 3257 3258 3259

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

3262 3263
BlockDeviceInfoList *qmp_query_named_block_nodes(Error **errp)
{
3264
    return bdrv_named_nodes_list(errp);
3265 3266
}

3267 3268
BlockJob *do_blockdev_backup(BlockdevBackup *backup, BlockJobTxn *txn,
                             Error **errp)
F
Fam Zheng 已提交
3269 3270 3271 3272 3273
{
    BlockDriverState *bs;
    BlockDriverState *target_bs;
    Error *local_err = NULL;
    AioContext *aio_context;
3274
    BlockJob *job = NULL;
F
Fam Zheng 已提交
3275

P
Pavel Butsykin 已提交
3276 3277
    if (!backup->has_speed) {
        backup->speed = 0;
F
Fam Zheng 已提交
3278
    }
P
Pavel Butsykin 已提交
3279 3280 3281 3282 3283
    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 已提交
3284
    }
P
Pavel Butsykin 已提交
3285 3286
    if (!backup->has_job_id) {
        backup->job_id = NULL;
F
Fam Zheng 已提交
3287
    }
3288 3289 3290
    if (!backup->has_compress) {
        backup->compress = false;
    }
F
Fam Zheng 已提交
3291

P
Pavel Butsykin 已提交
3292
    bs = qmp_get_root_bs(backup->device, errp);
3293
    if (!bs) {
3294
        return NULL;
F
Fam Zheng 已提交
3295 3296
    }

3297
    aio_context = bdrv_get_aio_context(bs);
F
Fam Zheng 已提交
3298 3299
    aio_context_acquire(aio_context);

P
Pavel Butsykin 已提交
3300
    target_bs = bdrv_lookup_bs(backup->target, backup->target, errp);
3301
    if (!target_bs) {
M
Max Reitz 已提交
3302 3303
        goto out;
    }
F
Fam Zheng 已提交
3304

3305 3306 3307 3308 3309 3310 3311 3312 3313 3314 3315
    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;
        }
    }
3316 3317 3318 3319
    job = backup_job_create(backup->job_id, bs, target_bs, backup->speed,
                            backup->sync, NULL, backup->compress,
                            backup->on_source_error, backup->on_target_error,
                            BLOCK_JOB_DEFAULT, NULL, NULL, txn, &local_err);
F
Fam Zheng 已提交
3320 3321 3322 3323 3324
    if (local_err != NULL) {
        error_propagate(errp, local_err);
    }
out:
    aio_context_release(aio_context);
3325
    return job;
F
Fam Zheng 已提交
3326 3327
}

P
Pavel Butsykin 已提交
3328 3329
void qmp_blockdev_backup(BlockdevBackup *arg, Error **errp)
{
3330 3331 3332 3333 3334
    BlockJob *job;
    job = do_blockdev_backup(arg, NULL, errp);
    if (job) {
        block_job_start(job);
    }
3335 3336
}

3337 3338 3339
/* Parameter check and block job starting for drive mirroring.
 * Caller should hold @device and @target's aio context (must be the same).
 **/
3340
static void blockdev_mirror_common(const char *job_id, BlockDriverState *bs,
3341 3342 3343
                                   BlockDriverState *target,
                                   bool has_replaces, const char *replaces,
                                   enum MirrorSyncMode sync,
M
Max Reitz 已提交
3344
                                   BlockMirrorBackingMode backing_mode,
3345 3346 3347 3348 3349 3350 3351 3352
                                   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,
3353 3354
                                   bool has_filter_node_name,
                                   const char *filter_node_name,
3355
                                   Error **errp)
P
Paolo Bonzini 已提交
3356 3357 3358 3359 3360
{

    if (!has_speed) {
        speed = 0;
    }
3361 3362 3363 3364 3365 3366
    if (!has_on_source_error) {
        on_source_error = BLOCKDEV_ON_ERROR_REPORT;
    }
    if (!has_on_target_error) {
        on_target_error = BLOCKDEV_ON_ERROR_REPORT;
    }
3367 3368 3369
    if (!has_granularity) {
        granularity = 0;
    }
3370
    if (!has_buf_size) {
W
Wen Congyang 已提交
3371
        buf_size = 0;
3372
    }
3373 3374 3375
    if (!has_unmap) {
        unmap = true;
    }
3376 3377 3378
    if (!has_filter_node_name) {
        filter_node_name = NULL;
    }
3379

3380
    if (granularity != 0 && (granularity < 512 || granularity > 1048576 * 64)) {
3381 3382
        error_setg(errp, QERR_INVALID_PARAMETER_VALUE, "granularity",
                   "a value in range [512B, 64MB]");
3383 3384 3385
        return;
    }
    if (granularity & (granularity - 1)) {
3386 3387
        error_setg(errp, QERR_INVALID_PARAMETER_VALUE, "granularity",
                   "power of 2");
3388 3389
        return;
    }
P
Paolo Bonzini 已提交
3390

3391 3392 3393
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_MIRROR_SOURCE, errp)) {
        return;
    }
F
Fam Zheng 已提交
3394 3395 3396
    if (bdrv_op_is_blocked(target, BLOCK_OP_TYPE_MIRROR_TARGET, errp)) {
        return;
    }
3397 3398 3399 3400 3401 3402 3403 3404

    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
     */
3405
    mirror_start(job_id, bs, target,
3406
                 has_replaces ? replaces : NULL,
M
Max Reitz 已提交
3407
                 speed, granularity, buf_size, sync, backing_mode,
3408 3409
                 on_source_error, on_target_error, unmap, filter_node_name,
                 errp);
3410 3411
}

E
Eric Blake 已提交
3412
void qmp_drive_mirror(DriveMirror *arg, Error **errp)
3413 3414 3415 3416
{
    BlockDriverState *bs;
    BlockDriverState *source, *target_bs;
    AioContext *aio_context;
M
Max Reitz 已提交
3417
    BlockMirrorBackingMode backing_mode;
3418 3419 3420 3421
    Error *local_err = NULL;
    QDict *options = NULL;
    int flags;
    int64_t size;
E
Eric Blake 已提交
3422
    const char *format = arg->format;
3423

3424 3425
    bs = qmp_get_root_bs(arg->device, errp);
    if (!bs) {
P
Paolo Bonzini 已提交
3426 3427 3428
        return;
    }

3429
    aio_context = bdrv_get_aio_context(bs);
3430 3431
    aio_context_acquire(aio_context);

E
Eric Blake 已提交
3432 3433
    if (!arg->has_mode) {
        arg->mode = NEW_IMAGE_MODE_ABSOLUTE_PATHS;
3434
    }
P
Paolo Bonzini 已提交
3435

E
Eric Blake 已提交
3436 3437 3438
    if (!arg->has_format) {
        format = (arg->mode == NEW_IMAGE_MODE_EXISTING
                  ? NULL : bs->drv->format_name);
P
Paolo Bonzini 已提交
3439 3440
    }

K
Kevin Wolf 已提交
3441
    flags = bs->open_flags | BDRV_O_RDWR;
3442
    source = backing_bs(bs);
E
Eric Blake 已提交
3443 3444
    if (!source && arg->sync == MIRROR_SYNC_MODE_TOP) {
        arg->sync = MIRROR_SYNC_MODE_FULL;
P
Paolo Bonzini 已提交
3445
    }
E
Eric Blake 已提交
3446
    if (arg->sync == MIRROR_SYNC_MODE_NONE) {
3447 3448
        source = bs;
    }
P
Paolo Bonzini 已提交
3449

3450 3451 3452
    size = bdrv_getlength(bs);
    if (size < 0) {
        error_setg_errno(errp, -size, "bdrv_getlength failed");
3453
        goto out;
3454 3455
    }

E
Eric Blake 已提交
3456
    if (arg->has_replaces) {
3457
        BlockDriverState *to_replace_bs;
3458 3459
        AioContext *replace_aio_context;
        int64_t replace_size;
3460

E
Eric Blake 已提交
3461
        if (!arg->has_node_name) {
3462 3463
            error_setg(errp, "a node-name must be provided when replacing a"
                             " named node of the graph");
3464
            goto out;
3465 3466
        }

E
Eric Blake 已提交
3467
        to_replace_bs = check_to_replace_node(bs, arg->replaces, &local_err);
3468 3469 3470

        if (!to_replace_bs) {
            error_propagate(errp, local_err);
3471
            goto out;
3472 3473
        }

3474 3475 3476 3477 3478 3479
        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) {
3480 3481
            error_setg(errp, "cannot replace image with a mirror image of "
                             "different size");
3482
            goto out;
3483 3484 3485
        }
    }

E
Eric Blake 已提交
3486
    if (arg->mode == NEW_IMAGE_MODE_ABSOLUTE_PATHS) {
M
Max Reitz 已提交
3487 3488 3489 3490 3491
        backing_mode = MIRROR_SOURCE_BACKING_CHAIN;
    } else {
        backing_mode = MIRROR_OPEN_BACKING_CHAIN;
    }

E
Eric Blake 已提交
3492 3493
    if ((arg->sync == MIRROR_SYNC_MODE_FULL || !source)
        && arg->mode != NEW_IMAGE_MODE_EXISTING)
3494
    {
P
Paolo Bonzini 已提交
3495
        /* create new image w/o backing file */
3496
        assert(format);
E
Eric Blake 已提交
3497
        bdrv_img_create(arg->target, format,
3498
                        NULL, NULL, NULL, size, flags, false, &local_err);
P
Paolo Bonzini 已提交
3499
    } else {
E
Eric Blake 已提交
3500
        switch (arg->mode) {
P
Paolo Bonzini 已提交
3501 3502 3503 3504
        case NEW_IMAGE_MODE_EXISTING:
            break;
        case NEW_IMAGE_MODE_ABSOLUTE_PATHS:
            /* create new image with backing file */
E
Eric Blake 已提交
3505
            bdrv_img_create(arg->target, format,
3506 3507
                            source->filename,
                            source->drv->format_name,
3508
                            NULL, size, flags, false, &local_err);
P
Paolo Bonzini 已提交
3509 3510 3511 3512 3513 3514
            break;
        default:
            abort();
        }
    }

3515
    if (local_err) {
3516
        error_propagate(errp, local_err);
3517
        goto out;
P
Paolo Bonzini 已提交
3518 3519
    }

3520
    options = qdict_new();
E
Eric Blake 已提交
3521
    if (arg->has_node_name) {
3522
        qdict_put_str(options, "node-name", arg->node_name);
3523
    }
3524
    if (format) {
3525
        qdict_put_str(options, "driver", format);
3526
    }
3527

3528 3529 3530
    /* Mirroring takes care of copy-on-write using the source's backing
     * file.
     */
E
Eric Blake 已提交
3531 3532
    target_bs = bdrv_open(arg->target, NULL, options,
                          flags | BDRV_O_NO_BACKING, errp);
M
Max Reitz 已提交
3533
    if (!target_bs) {
3534
        goto out;
P
Paolo Bonzini 已提交
3535 3536
    }

3537 3538
    bdrv_set_aio_context(target_bs, aio_context);

E
Eric Blake 已提交
3539 3540 3541 3542 3543 3544 3545 3546
    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,
3547
                           false, NULL,
3548
                           &local_err);
K
Kevin Wolf 已提交
3549
    bdrv_unref(target_bs);
3550
    error_propagate(errp, local_err);
3551 3552
out:
    aio_context_release(aio_context);
P
Paolo Bonzini 已提交
3553 3554
}

3555 3556
void qmp_blockdev_mirror(bool has_job_id, const char *job_id,
                         const char *device, const char *target,
F
Fam Zheng 已提交
3557 3558 3559 3560 3561 3562 3563 3564 3565
                         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,
3566 3567
                         bool has_filter_node_name,
                         const char *filter_node_name,
F
Fam Zheng 已提交
3568 3569 3570 3571 3572
                         Error **errp)
{
    BlockDriverState *bs;
    BlockDriverState *target_bs;
    AioContext *aio_context;
M
Max Reitz 已提交
3573
    BlockMirrorBackingMode backing_mode = MIRROR_LEAVE_BACKING_CHAIN;
F
Fam Zheng 已提交
3574 3575
    Error *local_err = NULL;

3576
    bs = qmp_get_root_bs(device, errp);
F
Fam Zheng 已提交
3577 3578 3579 3580 3581 3582 3583 3584 3585 3586 3587 3588 3589 3590
    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);

3591
    blockdev_mirror_common(has_job_id ? job_id : NULL, bs, target_bs,
M
Max Reitz 已提交
3592
                           has_replaces, replaces, sync, backing_mode,
F
Fam Zheng 已提交
3593 3594 3595 3596 3597 3598
                           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,
3599
                           has_filter_node_name, filter_node_name,
F
Fam Zheng 已提交
3600
                           &local_err);
3601
    error_propagate(errp, local_err);
F
Fam Zheng 已提交
3602 3603 3604 3605

    aio_context_release(aio_context);
}

3606 3607
/* Get a block job using its ID and acquire its AioContext */
static BlockJob *find_block_job(const char *id, AioContext **aio_context,
3608
                                Error **errp)
3609
{
3610
    BlockJob *job;
3611

3612
    assert(id != NULL);
M
Max Reitz 已提交
3613

3614
    *aio_context = NULL;
3615

3616
    job = block_job_get(id);
M
Max Reitz 已提交
3617

3618 3619 3620 3621
    if (!job) {
        error_set(errp, ERROR_CLASS_DEVICE_NOT_ACTIVE,
                  "Block job '%s' not found", id);
        return NULL;
3622
    }
3623

3624 3625
    *aio_context = blk_get_aio_context(job->blk);
    aio_context_acquire(*aio_context);
3626

3627
    return job;
3628 3629
}

3630
void qmp_block_job_set_speed(const char *device, int64_t speed, Error **errp)
3631
{
3632
    AioContext *aio_context;
3633
    BlockJob *job = find_block_job(device, &aio_context, errp);
3634 3635 3636 3637 3638

    if (!job) {
        return;
    }

3639
    block_job_set_speed(job, speed, errp);
3640
    aio_context_release(aio_context);
3641
}
3642

3643 3644
void qmp_block_job_cancel(const char *device,
                          bool has_force, bool force, Error **errp)
3645
{
3646
    AioContext *aio_context;
3647
    BlockJob *job = find_block_job(device, &aio_context, errp);
3648

3649 3650 3651
    if (!job) {
        return;
    }
3652 3653 3654 3655 3656

    if (!has_force) {
        force = false;
    }

3657
    if (block_job_user_paused(job) && !force) {
3658 3659
        error_setg(errp, "The block job for device '%s' is currently paused",
                   device);
3660
        goto out;
3661
    }
3662 3663 3664

    trace_qmp_block_job_cancel(job);
    block_job_cancel(job);
3665 3666
out:
    aio_context_release(aio_context);
3667
}
S
Stefan Hajnoczi 已提交
3668

3669 3670
void qmp_block_job_pause(const char *device, Error **errp)
{
3671
    AioContext *aio_context;
3672
    BlockJob *job = find_block_job(device, &aio_context, errp);
3673

3674
    if (!job || block_job_user_paused(job)) {
3675 3676 3677 3678
        return;
    }

    trace_qmp_block_job_pause(job);
3679
    block_job_user_pause(job);
3680
    aio_context_release(aio_context);
3681 3682 3683 3684
}

void qmp_block_job_resume(const char *device, Error **errp)
{
3685
    AioContext *aio_context;
3686
    BlockJob *job = find_block_job(device, &aio_context, errp);
3687

3688
    if (!job || !block_job_user_paused(job)) {
3689 3690 3691 3692
        return;
    }

    trace_qmp_block_job_resume(job);
3693
    block_job_user_resume(job);
3694
    aio_context_release(aio_context);
3695 3696
}

P
Paolo Bonzini 已提交
3697 3698
void qmp_block_job_complete(const char *device, Error **errp)
{
3699
    AioContext *aio_context;
3700
    BlockJob *job = find_block_job(device, &aio_context, errp);
P
Paolo Bonzini 已提交
3701 3702 3703 3704 3705 3706 3707

    if (!job) {
        return;
    }

    trace_qmp_block_job_complete(job);
    block_job_complete(job, errp);
3708
    aio_context_release(aio_context);
P
Paolo Bonzini 已提交
3709 3710
}

3711 3712 3713 3714 3715 3716
void qmp_change_backing_file(const char *device,
                             const char *image_node_name,
                             const char *backing_file,
                             Error **errp)
{
    BlockDriverState *bs = NULL;
3717
    AioContext *aio_context;
3718 3719 3720 3721 3722 3723
    BlockDriverState *image_bs = NULL;
    Error *local_err = NULL;
    bool ro;
    int open_flags;
    int ret;

3724 3725
    bs = qmp_get_root_bs(device, errp);
    if (!bs) {
3726 3727 3728
        return;
    }

3729
    aio_context = bdrv_get_aio_context(bs);
3730 3731
    aio_context_acquire(aio_context);

3732 3733 3734
    image_bs = bdrv_lookup_bs(NULL, image_node_name, &local_err);
    if (local_err) {
        error_propagate(errp, local_err);
3735
        goto out;
3736 3737 3738 3739
    }

    if (!image_bs) {
        error_setg(errp, "image file not found");
3740
        goto out;
3741 3742 3743 3744 3745
    }

    if (bdrv_find_base(image_bs) == image_bs) {
        error_setg(errp, "not allowing backing file change on an image "
                         "without a backing file");
3746
        goto out;
3747 3748 3749 3750 3751
    }

    /* 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)) {
3752
        goto out;
3753 3754 3755 3756 3757 3758
    }

    /* final sanity check */
    if (!bdrv_chain_contains(bs, image_bs)) {
        error_setg(errp, "'%s' and image file are not in the same chain",
                   device);
3759
        goto out;
3760 3761 3762 3763 3764 3765 3766 3767 3768 3769
    }

    /* 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);
3770
            goto out;
3771 3772 3773 3774 3775 3776 3777 3778 3779 3780 3781 3782 3783 3784 3785
        }
    }

    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);
3786
        error_propagate(errp, local_err);
3787
    }
3788 3789 3790

out:
    aio_context_release(aio_context);
3791 3792
}

3793 3794 3795 3796 3797 3798 3799 3800 3801 3802 3803 3804 3805 3806
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")) {
3807
        QDECREF(qdict);
3808 3809 3810 3811 3812 3813 3814 3815 3816 3817 3818 3819 3820 3821 3822 3823
        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 已提交
3824 3825
void qmp_blockdev_add(BlockdevOptions *options, Error **errp)
{
3826
    BlockDriverState *bs;
K
Kevin Wolf 已提交
3827
    QObject *obj;
3828
    Visitor *v = qobject_output_visitor_new(&obj);
K
Kevin Wolf 已提交
3829 3830 3831
    QDict *qdict;
    Error *local_err = NULL;

3832
    visit_type_BlockdevOptions(v, NULL, &options, &local_err);
3833
    if (local_err) {
K
Kevin Wolf 已提交
3834 3835 3836 3837
        error_propagate(errp, local_err);
        goto fail;
    }

3838
    visit_complete(v, &obj);
K
Kevin Wolf 已提交
3839 3840 3841 3842
    qdict = qobject_to_qdict(obj);

    qdict_flatten(qdict);

3843 3844 3845 3846
    if (!qdict_get_try_str(qdict, "node-name")) {
        error_setg(errp, "'node-name' must be specified for the root node");
        goto fail;
    }
3847

3848 3849 3850
    bs = bds_tree_init(qdict, errp);
    if (!bs) {
        goto fail;
K
Kevin Wolf 已提交
3851 3852
    }

3853 3854
    QTAILQ_INSERT_TAIL(&monitor_bdrv_states, bs, monitor_list);

3855
    if (bs && bdrv_key_required(bs)) {
3856 3857
        QTAILQ_REMOVE(&monitor_bdrv_states, bs, monitor_list);
        bdrv_unref(bs);
3858 3859 3860 3861
        error_setg(errp, "blockdev-add doesn't support encrypted devices");
        goto fail;
    }

K
Kevin Wolf 已提交
3862
fail:
3863
    visit_free(v);
K
Kevin Wolf 已提交
3864 3865
}

3866
void qmp_blockdev_del(const char *node_name, Error **errp)
3867 3868 3869 3870
{
    AioContext *aio_context;
    BlockDriverState *bs;

3871 3872 3873
    bs = bdrv_find_node(node_name);
    if (!bs) {
        error_setg(errp, "Cannot find node %s", node_name);
3874 3875
        return;
    }
3876 3877 3878
    if (bdrv_has_blk(bs)) {
        error_setg(errp, "Node %s is in use", node_name);
        return;
3879
    }
3880
    aio_context = bdrv_get_aio_context(bs);
3881 3882
    aio_context_acquire(aio_context);

3883 3884 3885
    if (bdrv_op_is_blocked(bs, BLOCK_OP_TYPE_DRIVE_DEL, errp)) {
        goto out;
    }
3886

3887 3888 3889 3890
    if (!bs->monitor_list.tqe_prev) {
        error_setg(errp, "Node %s is not owned by the monitor",
                   bs->node_name);
        goto out;
3891 3892
    }

3893 3894 3895 3896
    if (bs->refcnt > 1) {
        error_setg(errp, "Block device %s is in use",
                   bdrv_get_device_or_node_name(bs));
        goto out;
3897 3898
    }

3899 3900 3901
    QTAILQ_REMOVE(&monitor_bdrv_states, bs, monitor_list);
    bdrv_unref(bs);

3902 3903 3904 3905
out:
    aio_context_release(aio_context);
}

3906 3907 3908 3909 3910 3911 3912 3913 3914 3915 3916 3917 3918 3919 3920 3921 3922 3923 3924 3925 3926 3927 3928 3929 3930 3931 3932 3933 3934 3935 3936 3937 3938 3939 3940 3941 3942 3943 3944 3945 3946 3947 3948 3949 3950 3951 3952 3953 3954 3955 3956 3957 3958 3959 3960
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);
    }
}

3961
BlockJobInfoList *qmp_query_block_jobs(Error **errp)
S
Stefan Hajnoczi 已提交
3962
{
3963
    BlockJobInfoList *head = NULL, **p_next = &head;
3964
    BlockJob *job;
S
Stefan Hajnoczi 已提交
3965

3966
    for (job = block_job_next(NULL); job; job = block_job_next(job)) {
3967 3968
        BlockJobInfoList *elem;
        AioContext *aio_context;
3969

3970 3971 3972 3973 3974
        if (block_job_is_internal(job)) {
            continue;
        }
        elem = g_new0(BlockJobInfoList, 1);
        aio_context = blk_get_aio_context(job->blk);
3975
        aio_context_acquire(aio_context);
3976
        elem->value = block_job_query(job, errp);
3977
        aio_context_release(aio_context);
3978 3979 3980 3981 3982
        if (!elem->value) {
            g_free(elem);
            qapi_free_BlockJobInfoList(head);
            return NULL;
        }
3983 3984
        *p_next = elem;
        p_next = &elem->next;
S
Stefan Hajnoczi 已提交
3985 3986
    }

3987
    return head;
S
Stefan Hajnoczi 已提交
3988
}
3989

3990
QemuOptsList qemu_common_drive_opts = {
3991
    .name = "drive",
3992
    .head = QTAILQ_HEAD_INITIALIZER(qemu_common_drive_opts.head),
3993 3994 3995 3996 3997 3998 3999 4000 4001
    .desc = {
        {
            .name = "snapshot",
            .type = QEMU_OPT_BOOL,
            .help = "enable/disable snapshot mode",
        },{
            .name = "aio",
            .type = QEMU_OPT_STRING,
            .help = "host AIO implementation (threads, native)",
4002 4003 4004 4005
        },{
            .name = BDRV_OPT_CACHE_WB,
            .type = QEMU_OPT_BOOL,
            .help = "Enable writeback mode",
4006 4007 4008 4009 4010 4011 4012 4013 4014 4015 4016 4017 4018
        },{
            .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",
        },{
4019
            .name = BDRV_OPT_READ_ONLY,
4020 4021
            .type = QEMU_OPT_BOOL,
            .help = "open drive file as read-only",
4022 4023 4024 4025 4026
        },

        THROTTLE_OPTS,

        {
4027 4028 4029
            .name = "throttling.group",
            .type = QEMU_OPT_STRING,
            .help = "name of the block throttling group",
4030 4031 4032 4033
        },{
            .name = "copy-on-read",
            .type = QEMU_OPT_BOOL,
            .help = "copy read data from backing file into image file",
4034 4035 4036 4037
        },{
            .name = "detect-zeroes",
            .type = QEMU_OPT_STRING,
            .help = "try to optimize zero writes (off, on, unmap)",
4038 4039 4040 4041 4042 4043 4044 4045 4046 4047
        },{
            .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",
4048 4049 4050 4051
        },
        { /* end of list */ }
    },
};
4052 4053 4054 4055 4056

QemuOptsList qemu_drive_opts = {
    .name = "drive",
    .head = QTAILQ_HEAD_INITIALIZER(qemu_drive_opts.head),
    .desc = {
4057 4058 4059 4060
        /*
         * no elements => accept any params
         * validation will happen later
         */
4061 4062 4063
        { /* end of list */ }
    },
};