1 /* 2 * Copy-on-read filter block driver 3 * 4 * Copyright (c) 2018 Red Hat, Inc. 5 * 6 * Author: 7 * Max Reitz <mreitz@redhat.com> 8 * 9 * This program is free software; you can redistribute it and/or 10 * modify it under the terms of the GNU General Public License as 11 * published by the Free Software Foundation; either version 2 or 12 * (at your option) version 3 of the License. 13 * 14 * This program is distributed in the hope that it will be useful, 15 * but WITHOUT ANY WARRANTY; without even the implied warranty of 16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 17 * GNU General Public License for more details. 18 * 19 * You should have received a copy of the GNU General Public License 20 * along with this program; if not, see <http://www.gnu.org/licenses/>. 21 */ 22 23 #include "qemu/osdep.h" 24 #include "block/block-io.h" 25 #include "block/block_int.h" 26 #include "qemu/module.h" 27 #include "qapi/error.h" 28 #include "qapi/qmp/qdict.h" 29 #include "block/copy-on-read.h" 30 31 32 typedef struct BDRVStateCOR { 33 BlockDriverState *bottom_bs; 34 bool chain_frozen; 35 } BDRVStateCOR; 36 37 38 static int cor_open(BlockDriverState *bs, QDict *options, int flags, 39 Error **errp) 40 { 41 BlockDriverState *bottom_bs = NULL; 42 BDRVStateCOR *state = bs->opaque; 43 /* Find a bottom node name, if any */ 44 const char *bottom_node = qdict_get_try_str(options, "bottom"); 45 int ret; 46 47 ret = bdrv_open_file_child(NULL, options, "file", bs, errp); 48 if (ret < 0) { 49 return ret; 50 } 51 52 bs->supported_read_flags = BDRV_REQ_PREFETCH; 53 54 bs->supported_write_flags = BDRV_REQ_WRITE_UNCHANGED | 55 (BDRV_REQ_FUA & bs->file->bs->supported_write_flags); 56 57 bs->supported_zero_flags = BDRV_REQ_WRITE_UNCHANGED | 58 ((BDRV_REQ_FUA | BDRV_REQ_MAY_UNMAP | BDRV_REQ_NO_FALLBACK) & 59 bs->file->bs->supported_zero_flags); 60 61 if (bottom_node) { 62 bottom_bs = bdrv_find_node(bottom_node); 63 if (!bottom_bs) { 64 error_setg(errp, "Bottom node '%s' not found", bottom_node); 65 qdict_del(options, "bottom"); 66 return -EINVAL; 67 } 68 qdict_del(options, "bottom"); 69 70 if (!bottom_bs->drv) { 71 error_setg(errp, "Bottom node '%s' not opened", bottom_node); 72 return -EINVAL; 73 } 74 75 if (bottom_bs->drv->is_filter) { 76 error_setg(errp, "Bottom node '%s' is a filter", bottom_node); 77 return -EINVAL; 78 } 79 80 if (bdrv_freeze_backing_chain(bs, bottom_bs, errp) < 0) { 81 return -EINVAL; 82 } 83 state->chain_frozen = true; 84 85 /* 86 * We do freeze the chain, so it shouldn't be removed. Still, storing a 87 * pointer worth bdrv_ref(). 88 */ 89 bdrv_ref(bottom_bs); 90 } 91 state->bottom_bs = bottom_bs; 92 93 /* 94 * We don't need to call bdrv_child_refresh_perms() now as the permissions 95 * will be updated later when the filter node gets its parent. 96 */ 97 98 return 0; 99 } 100 101 102 #define PERM_PASSTHROUGH (BLK_PERM_CONSISTENT_READ \ 103 | BLK_PERM_WRITE \ 104 | BLK_PERM_RESIZE) 105 #define PERM_UNCHANGED (BLK_PERM_ALL & ~PERM_PASSTHROUGH) 106 107 static void cor_child_perm(BlockDriverState *bs, BdrvChild *c, 108 BdrvChildRole role, 109 BlockReopenQueue *reopen_queue, 110 uint64_t perm, uint64_t shared, 111 uint64_t *nperm, uint64_t *nshared) 112 { 113 *nperm = perm & PERM_PASSTHROUGH; 114 *nshared = (shared & PERM_PASSTHROUGH) | PERM_UNCHANGED; 115 116 /* We must not request write permissions for an inactive node, the child 117 * cannot provide it. */ 118 if (!(bs->open_flags & BDRV_O_INACTIVE)) { 119 *nperm |= BLK_PERM_WRITE_UNCHANGED; 120 } 121 } 122 123 124 static int64_t coroutine_fn cor_co_getlength(BlockDriverState *bs) 125 { 126 return bdrv_co_getlength(bs->file->bs); 127 } 128 129 130 static int coroutine_fn cor_co_preadv_part(BlockDriverState *bs, 131 int64_t offset, int64_t bytes, 132 QEMUIOVector *qiov, 133 size_t qiov_offset, 134 BdrvRequestFlags flags) 135 { 136 int64_t n; 137 int local_flags; 138 int ret; 139 BDRVStateCOR *state = bs->opaque; 140 141 if (!state->bottom_bs) { 142 return bdrv_co_preadv_part(bs->file, offset, bytes, qiov, qiov_offset, 143 flags | BDRV_REQ_COPY_ON_READ); 144 } 145 146 while (bytes) { 147 local_flags = flags; 148 149 /* In case of failure, try to copy-on-read anyway */ 150 ret = bdrv_is_allocated(bs->file->bs, offset, bytes, &n); 151 if (ret <= 0) { 152 ret = bdrv_is_allocated_above(bdrv_backing_chain_next(bs->file->bs), 153 state->bottom_bs, true, offset, 154 n, &n); 155 if (ret > 0 || ret < 0) { 156 local_flags |= BDRV_REQ_COPY_ON_READ; 157 } 158 /* Finish earlier if the end of a backing file has been reached */ 159 if (n == 0) { 160 break; 161 } 162 } 163 164 /* Skip if neither read nor write are needed */ 165 if ((local_flags & (BDRV_REQ_PREFETCH | BDRV_REQ_COPY_ON_READ)) != 166 BDRV_REQ_PREFETCH) { 167 ret = bdrv_co_preadv_part(bs->file, offset, n, qiov, qiov_offset, 168 local_flags); 169 if (ret < 0) { 170 return ret; 171 } 172 } 173 174 offset += n; 175 qiov_offset += n; 176 bytes -= n; 177 } 178 179 return 0; 180 } 181 182 183 static int coroutine_fn cor_co_pwritev_part(BlockDriverState *bs, 184 int64_t offset, 185 int64_t bytes, 186 QEMUIOVector *qiov, 187 size_t qiov_offset, 188 BdrvRequestFlags flags) 189 { 190 return bdrv_co_pwritev_part(bs->file, offset, bytes, qiov, qiov_offset, 191 flags); 192 } 193 194 195 static int coroutine_fn cor_co_pwrite_zeroes(BlockDriverState *bs, 196 int64_t offset, int64_t bytes, 197 BdrvRequestFlags flags) 198 { 199 return bdrv_co_pwrite_zeroes(bs->file, offset, bytes, flags); 200 } 201 202 203 static int coroutine_fn cor_co_pdiscard(BlockDriverState *bs, 204 int64_t offset, int64_t bytes) 205 { 206 return bdrv_co_pdiscard(bs->file, offset, bytes); 207 } 208 209 210 static int coroutine_fn cor_co_pwritev_compressed(BlockDriverState *bs, 211 int64_t offset, 212 int64_t bytes, 213 QEMUIOVector *qiov) 214 { 215 return bdrv_co_pwritev(bs->file, offset, bytes, qiov, 216 BDRV_REQ_WRITE_COMPRESSED); 217 } 218 219 220 static void coroutine_fn cor_co_eject(BlockDriverState *bs, bool eject_flag) 221 { 222 bdrv_co_eject(bs->file->bs, eject_flag); 223 } 224 225 226 static void coroutine_fn cor_co_lock_medium(BlockDriverState *bs, bool locked) 227 { 228 bdrv_co_lock_medium(bs->file->bs, locked); 229 } 230 231 232 static void cor_close(BlockDriverState *bs) 233 { 234 BDRVStateCOR *s = bs->opaque; 235 236 if (s->chain_frozen) { 237 s->chain_frozen = false; 238 bdrv_unfreeze_backing_chain(bs, s->bottom_bs); 239 } 240 241 bdrv_unref(s->bottom_bs); 242 } 243 244 245 static BlockDriver bdrv_copy_on_read = { 246 .format_name = "copy-on-read", 247 .instance_size = sizeof(BDRVStateCOR), 248 249 .bdrv_open = cor_open, 250 .bdrv_close = cor_close, 251 .bdrv_child_perm = cor_child_perm, 252 253 .bdrv_co_getlength = cor_co_getlength, 254 255 .bdrv_co_preadv_part = cor_co_preadv_part, 256 .bdrv_co_pwritev_part = cor_co_pwritev_part, 257 .bdrv_co_pwrite_zeroes = cor_co_pwrite_zeroes, 258 .bdrv_co_pdiscard = cor_co_pdiscard, 259 .bdrv_co_pwritev_compressed = cor_co_pwritev_compressed, 260 261 .bdrv_co_eject = cor_co_eject, 262 .bdrv_co_lock_medium = cor_co_lock_medium, 263 264 .has_variable_length = true, 265 .is_filter = true, 266 }; 267 268 269 void bdrv_cor_filter_drop(BlockDriverState *cor_filter_bs) 270 { 271 BDRVStateCOR *s = cor_filter_bs->opaque; 272 273 /* unfreeze, as otherwise bdrv_replace_node() will fail */ 274 if (s->chain_frozen) { 275 s->chain_frozen = false; 276 bdrv_unfreeze_backing_chain(cor_filter_bs, s->bottom_bs); 277 } 278 bdrv_drop_filter(cor_filter_bs, &error_abort); 279 bdrv_unref(cor_filter_bs); 280 } 281 282 283 static void bdrv_copy_on_read_init(void) 284 { 285 bdrv_register(&bdrv_copy_on_read); 286 } 287 288 block_init(bdrv_copy_on_read_init); 289