download gzipped virtual hard drive, force kvm boot order

slapos/recipe/kvm/template/kvm_run.in

@@ -7,6 +7,8 @@ import os
 import socket
 import subprocess
 import urllib
+import gzip
+import shutil
 
 # XXX: give all of this through parameter, don't use this as template, but as module
 qemu_img_path = '%(qemu-img-path)s'
@@ -19,6 +21,7 @@ default_disk_image = '%(default-disk-image)s'
 disk_path = '%(disk-path)s'
 virtual_hard_drive_url = '%(virtual-hard-drive-url)s'.strip()
 virtual_hard_drive_md5sum = '%(virtual-hard-drive-md5sum)s'.strip()
+virtual_hard_drive_gzipped = '%(virtual-hard-drive-gzipped)s'.strip()
 nat_rules = '%(nat-rules)s'.strip()
 use_tap = '%(use-tap)s'
 tap_interface = '%(tap-interface)s'
@@ -61,21 +64,29 @@ def getSocketStatus(host, port):
 if not os.path.exists(disk_path) and virtual_hard_drive_url != '':
   print('Downloading virtual hard drive...')
   try:
-    urllib.urlretrieve(virtual_hard_drive_url, disk_path)
+    downloaded_disk = disk_path
+    if virtual_hard_drive_gzipped == 'True':
+      downloaded_disk = '%%s.gz' %% disk_path
+    urllib.urlretrieve(virtual_hard_drive_url, downloaded_disk)
   except:
-    os.remove(disk_path)
+    os.remove(downloaded_disk)
     raise
   md5sum = virtual_hard_drive_md5sum.strip()
   if md5sum:
     print('Checking MD5 checksum...')
-    local_md5sum = md5Checksum(disk_path)
+    local_md5sum = md5Checksum(downloaded_disk)
     if local_md5sum != md5sum:
-      os.remove(disk_path)
+      os.remove(downloaded_disk)
       raise Exception('MD5 mismatch. MD5 of local file is %%s, Specified MD5 is %%s.' %% (
           local_md5sum, md5sum))
     print('MD5sum check passed.')
   else:
     print('Warning: not checksum specified.')
+  if downloaded_disk.endswith('.gz'):
+    with open(disk_path, 'w') as disk:
+      with gzip.open(downloaded_disk, 'rb') as disk_gz:
+        shutil.copyfileobj(disk_gz, disk)
+    os.remove(downloaded_disk)
 
 # Create disk if doesn't exist
 # XXX: move to Buildout profile
@@ -99,7 +110,7 @@ kvm_argument_list = [qemu_path,
   '-m', ram_size,
   '-drive', 'file=%%s,if=%%s' %% (disk_path, disk_type),
   '-vnc', '%%s:1,ipv4,password' %% listen_ip,
-  '-boot', 'menu=on',
+  '-boot', 'order=cd,menu=on',
   '-qmp', 'unix:%%s,server' %% socket_path,
   '-pidfile', pid_file_path,
 ]

software/kvm/instance-kvm.cfg.jinja2

@@ -90,6 +90,7 @@ nat-rules = ${slap-parameter:nat-rules}
 
 virtual-hard-drive-url = ${slap-parameter:virtual-hard-drive-url}
 virtual-hard-drive-md5sum = ${slap-parameter:virtual-hard-drive-md5sum}
+virtual-hard-drive-gzipped = ${slap-parameter:virtual-hard-drive-gzipped}
 
 shell-path = {{ dash_executable_location }}
 qemu-path =  {{ qemu_executable_location }}
@@ -253,3 +254,4 @@ use-tap = False
 
 virtual-hard-drive-url =
 virtual-hard-drive-md5sum =
+virtual-hard-drive-gzipped = False