#from skeleton import skeleton #extends skeleton #import datetime #def title VM List #end def #def createForm() #if $cant_add_vm

$cant_add_vm

#else

Create a new VM

#if $err

We had a problem with your request:

#else if $varExists('new_machine')

Congratulations! You successfully created a new VM called $new_machine.

#end if
#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 #if $can_clone #else #end if #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#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'.) Image cloning is currently disabled for maintenance
Boot CD #filter None $cdromList($defaults.cdrom, "document.getElementById('cd_or_auto_cd').checked = true;document.getElementById('autoinstalllist').value = ''") #end filter
Owner
#end if #end def #def machineRow($machine) $machine.name ${machine.memory}M $machine.owner $machine.administrator #if $machine.nics #set $nic = $machine.nics[0] $nic.ip #else #end if #slurp #if $machine.uptime ${datetime.timedelta(seconds=int(machine.uptime))}#slurp #end if #slurp #if $has_vnc[$machine] == True Console#slurp #else if $has_vnc[$machine] != 'Off' #filter None $has_vnc[$machine] #end filter #end if
#end def #def machineList($machines) #for $machine in $machines: #filter None $machineRow($machine) #end filter #end for
Name Memory Owner#slurp #filter None $helppopup('Owner')#slurp #end filter Administrator#slurp #filter None $helppopup('Administrator')#slurp #end filter IP Uptime VNC
#end def #def body

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

#if not $machines

You don't currently control any VMs.

#end if

refresh

#filter None $machineList($machines) #end filter
#filter None $createForm() #end filter #end def