[pve-devel] [PATCH qemu-server v4 3/3] Add new qm option 'diskimport' to import external disk images

[Emmanuel Kasper]

The VM must be already existing, and the synthax is

qm diskimport 421 minix204.img pve4tank

where 421 is an already existing VM
---
 PVE/CLI/qm.pm | 45 +++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 45 insertions(+)

diff --git a/PVE/CLI/qm.pm b/PVE/CLI/qm.pm
index 44439dd..ea3a0d5 100755
--- a/PVE/CLI/qm.pm
+++ b/PVE/CLI/qm.pm
@@ -17,6 +17,7 @@ use PVE::SafeSyslog;
 use PVE::INotify;
 use PVE::RPCEnvironment;
 use PVE::QemuServer;
+use PVE::QemuServer::ImportDisk;
 use PVE::API2::Qemu;
 use JSON;
 use PVE::JSONSchema qw(get_standard_option);
@@ -380,6 +381,48 @@ __PACKAGE__->register_method ({
     }});
 
 __PACKAGE__->register_method ({
+    name => 'importdisk',
+    path => 'importdisk',
+    method => 'POST',
+    description => "Import an external disk image as an unused disk in a VM. The
+ image format has to be supported by qemu-img(1).",
+    parameters => {
+	additionalProperties => 0,
+	properties => {
+	    vmid => get_standard_option('pve-vmid', {completion => \&PVE::QemuServer::complete_vmid}),
+	    source => {
+		description => 'Path to the disk image to import',
+		type => 'string',
+		optional => 0,
+	    },
+	    storage => {
+		description => 'Target storage ID',
+		type => 'string',
+		completion => \&PVE::Storage::complete_storage_enabled,
+		optional => 0,
+	    },
+	    format => {
+		type => 'string',
+		description => 'Target format',
+		enum => [ 'raw', 'qcow2', 'vmdk' ],
+		optional => 1,
+	    },
+	},
+    },
+    returns => { type => 'null'},
+    code => sub {
+	my ($params) = @_;
+
+	# check if VM exists
+	PVE::QemuConfig->load_config($params->{vmid});
+
+	PVE::QemuServer::ImportDisk::do_import($params->{source}, $params->{vmid},
+	    $params->{storage}, { format => $params->{format} });
+
+	return undef;
+    }});
+
+__PACKAGE__->register_method ({
     name => 'terminal',
     path => 'terminal',
     method => 'POST',
@@ -587,6 +630,8 @@ our $cmddef = {
     nbdstop => [ __PACKAGE__, 'nbdstop', ['vmid']],
 
     terminal => [ __PACKAGE__, 'terminal', ['vmid']],
+
+    importdisk => [ __PACKAGE__, 'importdisk', ['vmid', 'source', 'storage']],
 };
 
 1;
-- 
2.11.0