block/blkverify.c

   1 /*
   2  * Block protocol for block driver correctness testing
   3  *
   4  * Copyright (C) 2010 IBM, Corp.
   5  *
   6  * This work is licensed under the terms of the GNU GPL, version 2 or later.
   7  * See the COPYING file in the top-level directory.
   8  */
   9
  10 #include "qemu/osdep.h"
  11 #include "qapi/error.h"
  12 #include "qemu/sockets.h" /* for EINPROGRESS on Windows */
  13 #include "block/block-io.h"
  14 #include "block/block_int.h"
  15 #include "qapi/qmp/qdict.h"
  16 #include "qapi/qmp/qstring.h"
  17 #include "qemu/cutils.h"
  18 #include "qemu/module.h"
  19 #include "qemu/option.h"
  20 #include "qemu/memalign.h"
  21
  22 typedef struct {
  23     BdrvChild *test_file;
  24 } BDRVBlkverifyState;
  25
  26 typedef struct BlkverifyRequest {
  27     Coroutine *co;
  28     BlockDriverState *bs;
  29
  30     /* Request metadata */
  31     bool is_write;
  32     uint64_t offset;
  33     uint64_t bytes;
  34     int flags;
  35
  36     int (*request_fn)(BdrvChild *, int64_t, int64_t, QEMUIOVector *,
  37                       BdrvRequestFlags);
  38
  39     int ret;                    /* test image result */
  40     int raw_ret;                /* raw image result */
  41
  42     unsigned int done;          /* completion counter */
  43
  44     QEMUIOVector *qiov;         /* user I/O vector */
  45     QEMUIOVector *raw_qiov;     /* cloned I/O vector for raw file */
  46 } BlkverifyRequest;
  47
  48 static void G_GNUC_PRINTF(2, 3) blkverify_err(BlkverifyRequest *r,
  49                                              const char *fmt, ...)
  50 {
  51     va_list ap;
  52
  53     va_start(ap, fmt);
  54     fprintf(stderr, "blkverify: %s offset=%" PRId64 " bytes=%" PRId64 " ",
  55             r->is_write ? "write" : "read", r->offset, r->bytes);
  56     vfprintf(stderr, fmt, ap);
  57     fprintf(stderr, "\n");
  58     va_end(ap);
  59     exit(1);
  60 }
  61
  62 /* Valid blkverify filenames look like blkverify:path/to/raw_image:path/to/image */
  63 static void blkverify_parse_filename(const char *filename, QDict *options,
  64                                      Error **errp)
  65 {
  66     const char *c;
  67     QString *raw_path;
  68
  69
  70     /* Parse the blkverify: prefix */
  71     if (!strstart(filename, "blkverify:", &filename)) {
  72         /* There was no prefix; therefore, all options have to be already
  73            present in the QDict (except for the filename) */
  74         qdict_put_str(options, "x-image", filename);
  75         return;
  76     }
  77
  78     /* Parse the raw image filename */
  79     c = strchr(filename, ':');
  80     if (c == NULL) {
  81         error_setg(errp, "blkverify requires raw copy and original image path");
  82         return;
  83     }
  84
  85     /* TODO Implement option pass-through and set raw.filename here */
  86     raw_path = qstring_from_substr(filename, 0, c - filename);
  87     qdict_put(options, "x-raw", raw_path);
  88
  89     /* TODO Allow multi-level nesting and set file.filename here */
  90     filename = c + 1;
  91     qdict_put_str(options, "x-image", filename);
  92 }
  93
  94 static QemuOptsList runtime_opts = {
  95     .name = "blkverify",
  96     .head = QTAILQ_HEAD_INITIALIZER(runtime_opts.head),
  97     .desc = {
  98         {
  99             .name = "x-raw",
 100             .type = QEMU_OPT_STRING,
 101             .help = "[internal use only, will be removed]",
 102         },
 103         {
 104             .name = "x-image",
 105             .type = QEMU_OPT_STRING,
 106             .help = "[internal use only, will be removed]",
 107         },
 108         { /* end of list */ }
 109     },
 110 };
 111
 112 static int blkverify_open(BlockDriverState *bs, QDict *options, int flags,
 113                           Error **errp)
 114 {
 115     BDRVBlkverifyState *s = bs->opaque;
 116     QemuOpts *opts;
 117     int ret;
 118
 119     opts = qemu_opts_create(&runtime_opts, NULL, 0, &error_abort);
 120     if (!qemu_opts_absorb_qdict(opts, options, errp)) {
 121         ret = -EINVAL;
 122         goto fail;
 123     }
 124
 125     /* Open the raw file */
 126     ret = bdrv_open_file_child(qemu_opt_get(opts, "x-raw"), options, "raw",
 127                                bs, errp);
 128     if (ret < 0) {
 129         goto fail;
 130     }
 131
 132     /* Open the test file */
 133     s->test_file = bdrv_open_child(qemu_opt_get(opts, "x-image"), options,
 134                                    "test", bs, &child_of_bds, BDRV_CHILD_DATA,
 135                                    false, errp);
 136     if (!s->test_file) {
 137         ret = -EINVAL;
 138         goto fail;
 139     }
 140
 141     bs->supported_write_flags = BDRV_REQ_WRITE_UNCHANGED;
 142     bs->supported_zero_flags = BDRV_REQ_WRITE_UNCHANGED;
 143
 144     ret = 0;
 145 fail:
 146     qemu_opts_del(opts);
 147     return ret;
 148 }
 149
 150 static void blkverify_close(BlockDriverState *bs)
 151 {
 152     BDRVBlkverifyState *s = bs->opaque;
 153
 154     bdrv_graph_wrlock(NULL);
 155     bdrv_unref_child(bs, s->test_file);
 156     s->test_file = NULL;
 157     bdrv_graph_wrunlock();
 158 }
 159
 160 static int64_t coroutine_fn GRAPH_RDLOCK
 161 blkverify_co_getlength(BlockDriverState *bs)
 162 {
 163     BDRVBlkverifyState *s = bs->opaque;
 164
 165     return bdrv_co_getlength(s->test_file->bs);
 166 }
 167
 168 static void coroutine_fn blkverify_do_test_req(void *opaque)
 169 {
 170     BlkverifyRequest *r = opaque;
 171     BDRVBlkverifyState *s = r->bs->opaque;
 172
 173     r->ret = r->request_fn(s->test_file, r->offset, r->bytes, r->qiov,
 174                            r->flags);
 175     r->done++;
 176     qemu_coroutine_enter_if_inactive(r->co);
 177 }
 178
 179 static void coroutine_fn blkverify_do_raw_req(void *opaque)
 180 {
 181     BlkverifyRequest *r = opaque;
 182
 183     r->raw_ret = r->request_fn(r->bs->file, r->offset, r->bytes, r->raw_qiov,
 184                                r->flags);
 185     r->done++;
 186     qemu_coroutine_enter_if_inactive(r->co);
 187 }
 188
 189 static int coroutine_fn
 190 blkverify_co_prwv(BlockDriverState *bs, BlkverifyRequest *r, uint64_t offset,
 191                   uint64_t bytes, QEMUIOVector *qiov, QEMUIOVector *raw_qiov,
 192                   int flags, bool is_write)
 193 {
 194     Coroutine *co_a, *co_b;
 195
 196     *r = (BlkverifyRequest) {
 197         .co         = qemu_coroutine_self(),
 198         .bs         = bs,
 199         .offset     = offset,
 200         .bytes      = bytes,
 201         .qiov       = qiov,
 202         .raw_qiov   = raw_qiov,
 203         .flags      = flags,
 204         .is_write   = is_write,
 205         .request_fn = is_write ? bdrv_co_pwritev : bdrv_co_preadv,
 206     };
 207
 208     co_a = qemu_coroutine_create(blkverify_do_test_req, r);
 209     co_b = qemu_coroutine_create(blkverify_do_raw_req, r);
 210
 211     qemu_coroutine_enter(co_a);
 212     qemu_coroutine_enter(co_b);
 213
 214     while (r->done < 2) {
 215         qemu_coroutine_yield();
 216     }
 217
 218     if (r->ret != r->raw_ret) {
 219         blkverify_err(r, "return value mismatch %d != %d", r->ret, r->raw_ret);
 220     }
 221
 222     return r->ret;
 223 }
 224
 225 static int coroutine_fn
 226 blkverify_co_preadv(BlockDriverState *bs, int64_t offset, int64_t bytes,
 227                     QEMUIOVector *qiov, BdrvRequestFlags flags)
 228 {
 229     BlkverifyRequest r;
 230     QEMUIOVector raw_qiov;
 231     void *buf;
 232     ssize_t cmp_offset;
 233     int ret;
 234
 235     buf = qemu_blockalign(bs->file->bs, qiov->size);
 236     qemu_iovec_init(&raw_qiov, qiov->niov);
 237     qemu_iovec_clone(&raw_qiov, qiov, buf);
 238
 239     ret = blkverify_co_prwv(bs, &r, offset, bytes, qiov, &raw_qiov,
 240                             flags & ~BDRV_REQ_REGISTERED_BUF, false);
 241
 242     cmp_offset = qemu_iovec_compare(qiov, &raw_qiov);
 243     if (cmp_offset != -1) {
 244         blkverify_err(&r, "contents mismatch at offset %" PRId64,
 245                       offset + cmp_offset);
 246     }
 247
 248     qemu_iovec_destroy(&raw_qiov);
 249     qemu_vfree(buf);
 250
 251     return ret;
 252 }
 253
 254 static int coroutine_fn
 255 blkverify_co_pwritev(BlockDriverState *bs, int64_t offset, int64_t bytes,
 256                      QEMUIOVector *qiov, BdrvRequestFlags flags)
 257 {
 258     BlkverifyRequest r;
 259     return blkverify_co_prwv(bs, &r, offset, bytes, qiov, qiov, flags, true);
 260 }
 261
 262 static int coroutine_fn GRAPH_RDLOCK blkverify_co_flush(BlockDriverState *bs)
 263 {
 264     BDRVBlkverifyState *s = bs->opaque;
 265
 266     /* Only flush test file, the raw file is not important */
 267     return bdrv_co_flush(s->test_file->bs);
 268 }
 269
 270 static bool GRAPH_RDLOCK
 271 blkverify_recurse_can_replace(BlockDriverState *bs,
 272                               BlockDriverState *to_replace)
 273 {
 274     BDRVBlkverifyState *s = bs->opaque;
 275
 276     /*
 277      * blkverify quits the whole qemu process if there is a mismatch
 278      * between bs->file->bs and s->test_file->bs.  Therefore, we know
 279      * know that both must match bs and we can recurse down to either.
 280      */
 281     return bdrv_recurse_can_replace(bs->file->bs, to_replace) ||
 282            bdrv_recurse_can_replace(s->test_file->bs, to_replace);
 283 }
 284
 285 static void blkverify_refresh_filename(BlockDriverState *bs)
 286 {
 287     BDRVBlkverifyState *s = bs->opaque;
 288
 289     if (bs->file->bs->exact_filename[0]
 290         && s->test_file->bs->exact_filename[0])
 291     {
 292         int ret = snprintf(bs->exact_filename, sizeof(bs->exact_filename),
 293                            "blkverify:%s:%s",
 294                            bs->file->bs->exact_filename,
 295                            s->test_file->bs->exact_filename);
 296         if (ret >= sizeof(bs->exact_filename)) {
 297             /* An overflow makes the filename unusable, so do not report any */
 298             bs->exact_filename[0] = 0;
 299         }
 300     }
 301 }
 302
 303 static char *blkverify_dirname(BlockDriverState *bs, Error **errp)
 304 {
 305     /* In general, there are two BDSs with different dirnames below this one;
 306      * so there is no unique dirname we could return (unless both are equal by
 307      * chance). Therefore, to be consistent, just always return NULL. */
 308     error_setg(errp, "Cannot generate a base directory for blkverify nodes");
 309     return NULL;
 310 }
 311
 312 static BlockDriver bdrv_blkverify = {
 313     .format_name                      = "blkverify",
 314     .protocol_name                    = "blkverify",
 315     .instance_size                    = sizeof(BDRVBlkverifyState),
 316
 317     .bdrv_parse_filename              = blkverify_parse_filename,
 318     .bdrv_file_open                   = blkverify_open,
 319     .bdrv_close                       = blkverify_close,
 320     .bdrv_child_perm                  = bdrv_default_perms,
 321     .bdrv_co_getlength                = blkverify_co_getlength,
 322     .bdrv_refresh_filename            = blkverify_refresh_filename,
 323     .bdrv_dirname                     = blkverify_dirname,
 324
 325     .bdrv_co_preadv                   = blkverify_co_preadv,
 326     .bdrv_co_pwritev                  = blkverify_co_pwritev,
 327     .bdrv_co_flush                    = blkverify_co_flush,
 328
 329     .is_filter                        = true,
 330     .bdrv_recurse_can_replace         = blkverify_recurse_can_replace,
 331 };
 332
 333 static void bdrv_blkverify_init(void)
 334 {
 335     bdrv_register(&bdrv_blkverify);
 336 }
 337
 338 block_init(bdrv_blkverify_init);