X-Git-Url: http://xvm.mit.edu/gitweb/invirt/packages/invirt-web.git/blobdiff_plain/bee5d6b79f93e627eb105cd443701ac1975fd927..5d194c948d57f1a6f0ff48b39117aa6070a65bf3:/code/templates/list.tmpl diff --git a/code/templates/list.tmpl b/code/templates/list.tmpl index 88bab49..2475542 100644 --- a/code/templates/list.tmpl +++ b/code/templates/list.tmpl @@ -6,11 +6,11 @@ VM List #end def -#def createTable() +#def createForm() #if $cant_add_vm

$cant_add_vm

#else -

Create a new VM:

+

Create a new VM

#if $err

We had a problem with your request:

#else if $varExists('new_machine') @@ -19,50 +19,85 @@ VM List
+#filter None $errorRow('create', $err) +#end filter +#filter None $errorRow('name', $err) +#end filter +#filter None $errorRow('memory', $err) +#end filter +#filter None $errorRow('disk', $err) - - - - +#end filter + + + + +#filter None $errorRow('vmtype', $err) +#end filter + + + + +#filter None +$errorRow('autoinstall', $err) +#end filter + - + + $errorRow('cdrom', $err) - - - - $errorRow('cdrom', $err) +#filter None $errorRow('owner', $err) +#end filter
Name
Memory MiB ($max_memory max)
Disk GiB (${"%0.1f" % ($max_disk-0.05)} max)
HVM/ParaVM$helppopup('hvm_paravm') -#for $value, $name in (('hvm', 'HVM'), ('paravm', 'ParaVM')) - $name -#end for -
HVM/ParaVM#slurp +#filter None +$helppopup('hvm_paravm')#slurp +#end filter + +#filter None +$vmTypeList($defaults.type) +#end filter +
Clone image? + (experimental; 1-2 minutes, and you have an etch machine; root pw is 'password'.) +
Boot CD$cdromList($cdroms, $defaults.cdrom) +#filter None +$cdromList($defaults.cdrom, "document.getElementById('cd_or_auto_cd').checked = true;document.getElementById('autoinstalllist').value = ''") +#end filter +
Clone image? - (experimental; 1-2 minutes, and you have an etch machine; root pw is 'password'.) -
Owner
@@ -90,7 +125,9 @@ $machine.uptime#slurp #if $has_vnc[$machine] == True Console#slurp #else if $has_vnc[$machine] != 'Off' +#filter None $has_vnc[$machine] +#end filter #end if @@ -111,15 +148,25 @@ $has_vnc[$machine] Name Memory - Owner - Administrator + Owner#slurp +#filter None +$helppopup('owner')#slurp +#end filter + + Administrator#slurp +#filter None +$helppopup('administrator')#slurp +#end filter + IP Uptime VNC #for $machine in $machines: + #filter None $machineRow($machine) + #end filter #end for #end def @@ -129,14 +176,14 @@ $has_vnc[$machine]

SIPB Virtual Servers is an alpha service. What does this mean?

#if not $machines

You don't currently control any VMs.

-#else -

You have the following VMs:

#end if

refresh

+ #filter None $machineList($machines) + #end filter
-
-$createTable() -
+#filter None +$createForm() +#end filter #end def