From f1ed6a32939717d89e7bc3f9c0934b7788f2708a Mon Sep 17 00:00:00 2001 From: Pino Toscano Date: Wed, 21 Jun 2017 16:34:05 +0200 Subject: [PATCH] resize: make sure the input disk is read-only Fixes commit 8a2b0738d1b79f288b14fc35294567430d10b7ec. (cherry picked from commit 1ca2a8b7ba41d7e4baf1aec5d65ace3b66f2dc37) --- resize/resize.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/resize/resize.ml b/resize/resize.ml index dc96b23..4028aa1 100644 --- a/resize/resize.ml +++ b/resize/resize.ml @@ -348,7 +348,7 @@ read the man page virt-resize(1). (* Add in and out disks to the handle and launch. *) let connect_both_disks () = let g = open_guestfs () in - add_drive_uri g ?format (snd infile); + add_drive_uri g ?format ~readonly:true (snd infile); (* The output disk is being created, so use cache=unsafe here. *) add_drive_uri g ?format:output_format ~readonly:false ~cachemode:"unsafe" (snd outfile); -- 2.9.4