X-Git-Url: http://xvm.mit.edu/gitweb/invirt/packages/invirt-web.git/blobdiff_plain/e37dd15bbf8683bab8454ea0eec8e9968ce982b2..49367cafdfc40dd28e306aabe5ccc5787aab915a:/code/templates/list.tmpl?ds=inline

diff --git a/code/templates/list.tmpl b/code/templates/list.tmpl
index 6e06c53..7611329 100644
--- a/code/templates/list.tmpl
+++ b/code/templates/list.tmpl
@@ -3,14 +3,14 @@
 
 
 #def title
-List of your VMs
+VM List
 #end def
 
-#def createTable()
+#def createForm()
 #if $cant_add_vm
 <p>$cant_add_vm</p>
 #else
-<p>Create a new VM:</p>
+<h2>Create a new VM</h2>
 #if $err
 <p class="error">We had a problem with your request:</p>
 #else if $varExists('new_machine')
@@ -52,6 +52,13 @@ $errorRow('vmtype', $err)
 	</tr>
 $errorRow('cdrom', $err)
 	<tr>
+	  <td>Clone image?</td>
+	  <td><input type="checkbox" name="clone_from" id="clone_from" value="ice3" onchange="onclone(event)"/>
+	      (experimental; 1-2 minutes, and you have an etch machine; root pw is 'password'.)
+	      <script type='text/javascript'>function onclone(e){ document.getElementById('cdromlist').value = ''; }</script></td>
+	</tr>
+$errorRow('cdrom', $err)
+	<tr>
 	  <td>Owner</td>
 	  <td><input type="text" name="owner" value="$defaults.owner"/></td>
 	</tr>
@@ -77,14 +84,12 @@ $errorRow('cdrom', $err)
 <td>#slurp
 #if $machine.uptime
 $machine.uptime#slurp
-#else
-Off#slurp
 #end if
 </td>
 	<td>#slurp
 #if $has_vnc[$machine] == True
 <a href="vnc?machine_id=$machine.machine_id">Console</a>#slurp
-#else
+#else if $has_vnc[$machine] != 'Off'
 $has_vnc[$machine]
 #end if
 </td>
@@ -104,14 +109,15 @@ $has_vnc[$machine]
 #def machineList($machines)
     <table>
       <tr>
-	<td>Name</td>
-	<td>Memory</td>
-	<td>Owner</td>
-        <td>Administrator</td>
-	<td>IP</td>
-	<td>Uptime</td>
-	<td>VNC</td>
-	<td></td>
+	<th>Name</th>
+	<th>Memory</th>
+	<th>Owner$helppopup('owner')</th>
+        <th>Administrator$helppopup('administrator')</th>
+	<th>IP</th>
+	<th>Uptime</th>
+	<th>VNC</th>
+	<th></th>
+      </tr>
       #for $machine in $machines:
 	$machineRow($machine)
       #end for
@@ -120,17 +126,13 @@ $has_vnc[$machine]
 
 
 #def body
-<p style="font-size: 125%;"><strong>Note:</strong> sipb-xen is a very alpha service. <a href="/static/about.html">What does this mean?</a></p>
+<p style="font-size: 125%;">SIPB Virtual Servers is an <strong>alpha service</strong>.  <a href="/static/about.html">What does this mean?</a></p>
 #if not $machines
 <p>You don't currently control any VMs.</p>   
-#else
-    <p>You have the following VMs:</p>
 #end if
     <p><a href="list">refresh</a></p>
     <div id="machinelist">
     $machineList($machines)
     </div>
-<div id="createtable">
-$createTable()
-</div>
+$createForm()
 #end def