#from skeleton import skeleton
#extends skeleton

#def title
Info on $machine.name
#end def

#def infoTable()
<h2>Info</h2>
<table>
  #for $key, $value in $fields
  <tr><td>$key:</td><td>$value</td></tr>
  #end for
</table>
#end def

#def commands()
#if $on
 #if not $machine.type.hvm
  Console access: type
  <tt>ssh $machine.name@$config.console.hostname</tt>
  on Athena. <a href="https://xvm.scripts.mit.edu/wiki/SerialConsole">(more info)</a>
 #elif $has_vnc
  <strong><a href="vnc?machine_id=$machine.machine_id">Get Console</a></strong>
 #else
  VNC console not enabled; still booting?
 #end if
#end if
<form action="command" method="POST">
  <input type="hidden" name="back" value="info"/>
  <input type="hidden" name="machine_id" value="$machine.machine_id"/>
  <table>
      <tr>
	#if $on
	<td><button type="submit" class="button" name="action" value="Power off">Power off (hard)</button></td>
	<td><button type="submit" class="button" name="action" value="Shutdown">Shut down</button></td>
	<td><input type="submit" class="button" name="action" value="Reboot"/></td>
	#else
	<td><input type="submit" class="button" name="action" value="Power on"/></td>
	#end if
      <td>Boot CD:</td>
      <td>#slurp
#filter None
$cdromList()#slurp
#end filter
</td>
  </tr>
    <tr>
      <td><input type="submit" class="button" name="action" value="Delete VM" onclick="return confirm('Are you sure that you want to delete this VM?');"/></td>
    </tr>
  </table>
</form>
#end def

#def modifyForm()
#if $err
<p class="error">We had a problem with your request:</p>
#else if $varExists('new_machine')
<p>Successfully modified.</p>
#end if
#if $on
(To edit ram, disk size, or machine name, turn off the machine first.)
#end if
<form action="modify" method="POST">
  <input type="hidden" name="machine_id" value="$defaults.machine_id"/>
  <table>
    <tr><td>Description:</td><td colspan="2"><textarea name="description" rows="4" cols="60">$defaults.description</textarea></td></tr>
    <tr><td>Owner#slurp
#filter None
$helppopup("Owner")#slurp
#end filter
:</td><td><input type="text" name="owner", value="$defaults.owner"/></td></tr>
#filter None
$errorRow('owner', $err)
#end filter
    <tr><td>Administrator#slurp
#filter None
$helppopup("Administrator")#slurp
#end filter
:</td><td><input type="text" name="admin", value="$defaults.administrator"/></td></tr>
#filter None
$errorRow('administrator', $err)
#end filter
    <tr><td>Contact email:</td><td><input type="text" name="contact" value="$defaults.contact"/></td></tr>
#filter None
$errorRow('contact', $err)
#end filter
#if not $on
    <tr><td>Machine Name:</td><td><input type="text" name="name" value="$defaults.name"/>.${config.dns.domains[0]}</td></tr>
#filter None
$errorRow('name', $err)
#end filter
    <tr>
      <td>HVM/ParaVM#slurp
#filter None
$helppopup('HVM/ParaVM')#slurp
#end filter
</td>
      <td>#slurp
#filter None
$vmTypeList($defaults.type)#slurp
#end filter
</td>
    </tr>
    <tr><td>Ram:</td><td><input type="text" size=3 name="memory" value="$defaults.memory"/>MiB (max $max_mem)</td></tr>
#filter None
$errorRow('memory', $err)
#end filter
    <tr><td>Disk:</td><td><input type="text" size=3 name="disksize" value="$defaults.disk"/>GiB (max $max_disk)</td><td>WARNING: Modifying disk size may corrupt your data.</td></tr>
#filter None
$errorRow('disk', $err)
#end filter
#else
#filter None
$errorRow('name', $err)
$errorRow('memory', $err)
$errorRow('disk', $err)
#end filter
#end if
    <tr><td><input type="submit" class="button" name="action" value="Change"/></td></tr>
  </table>
</form>
#end def

#def body
<div id="info">
#filter None
  $infoTable()
#end filter
</div>

<h2>Commands</h2>
<div id="commands">
#filter None
  $commands()
#end filter
</div>
<h2>Settings</h2>
<div id="modify">
#filter None
  $modifyForm()
#end filter
</div>
#end def