source: trunk/packages/sipb-xen-www/code/templates/list.tmpl @ 432

Last change on this file since 432 was 426, checked in by price, 17 years ago

Link to help on 'owner' and 'administrator' in list

File size: 3.5 KB
RevLine 
[113]1#from skeleton import skeleton
2#extends skeleton
3
[205]4
[113]5#def title
[422]6VM List
[113]7#end def
8
[425]9#def createForm()
[205]10#if $cant_add_vm
11<p>$cant_add_vm</p>
[113]12#else
[425]13<h2>Create a new VM</h2>
[205]14#if $err
15<p class="error">We had a problem with your request:</p>
16#else if $varExists('new_machine')
17<p>Congratulations! You successfully created a new VM called $new_machine.</p>
18#end if
[207]19    <form action="create" method="POST">
20    <input type="hidden" name="back" value="list"/>
[205]21      <table>
22      $errorRow('create', $err)
23        <tr>
24          <td>Name</td>
25          <td><input type="text" name="name" value="$defaults.name"/></td>
26        </tr>
27$errorRow('name', $err)
28        <tr>
29          <td>Memory</td>
[229]30          <td><input type="text" name="memory" value="$defaults.memory" size=3/> MiB ($max_memory max)</td>
[205]31        </tr>
32$errorRow('memory', $err)
33        <tr>
34          <td>Disk</td>
[229]35          <td><input type="text" name="disk" value="$defaults.disk" size=3/> GiB (${"%0.1f" % ($max_disk-0.05)} max)</td>
[205]36        </tr>
37$errorRow('disk', $err)
38        <tr>
39          <td>HVM/ParaVM$helppopup('hvm_paravm')</td>
40          <td>
41#for $value, $name in (('hvm', 'HVM'), ('paravm', 'ParaVM'))
42   <input #slurp
43#if $defaults.vmtype == $value then 'checked' else ''
44 type="radio" name="vmtype" value="$value">$name</input>
45#end for
46          </td>
47        </tr>
48$errorRow('vmtype', $err)
49        <tr>
50          <td>Boot CD</td>
51          <td>$cdromList($cdroms, $defaults.cdrom)</td>
52        </tr>
53$errorRow('cdrom', $err)
[228]54        <tr>
[340]55          <td>Clone image?</td>
[406]56          <td><input type="checkbox" name="clone_from" id="clone_from" value="ice3" onchange="onclone(event)"/>
57              (experimental; 1-2 minutes, and you have an etch machine; root pw is 'password'.)
58              <script type='text/javascript'>function onclone(e){ document.getElementById('cdromlist').value = ''; }</script></td>
[340]59        </tr>
60$errorRow('cdrom', $err)
61        <tr>
[228]62          <td>Owner</td>
63          <td><input type="text" name="owner" value="$defaults.owner"/></td>
64        </tr>
65        $errorRow('owner', $err)
[205]66      </table>
67      <input type="submit" class="button" value="Create it!"/>
68    </form>
69#end if
70#end def
71
72#def machineRow($machine)
[113]73      <tr>
74        <td><a href="info?machine_id=$machine.machine_id">$machine.name</a></td>
75        <td>${machine.memory}M</td>
76        <td>$machine.owner</td>
[234]77        <td>$machine.administrator</td>
[113]78#if $machine.nics
79#set $nic = $machine.nics[0]
80        <td>$nic.ip</td>
81#else
82        <td></td>
83#end if
[133]84<td>#slurp
[205]85#if $machine.uptime
86$machine.uptime#slurp
[133]87#end if
88</td>
89        <td>#slurp
[144]90#if $has_vnc[$machine] == True
[133]91<a href="vnc?machine_id=$machine.machine_id">Console</a>#slurp
[424]92#else if $has_vnc[$machine] != 'Off'
[144]93$has_vnc[$machine]
[133]94#end if
95</td>
[113]96        <td>
[207]97          <form action="command" method="post">
98            <input type="hidden" name="back" value="list"/>
[113]99            <input type="hidden" name="machine_id"
100                   value="$machine.machine_id"/>
[205]101<input type="submit" class="button" name="action" value="#slurp
[228]102#if $machine.uptime then 'Power off' else 'Power on'
[205]103"/>
[113]104          </form>
105        </td>
106      </tr>
[205]107#end def
108
109#def machineList($machines)
110    <table>
111      <tr>
[424]112        <th>Name</th>
113        <th>Memory</th>
[426]114        <th>Owner$helppopup('owner')</th>
115        <th>Administrator$helppopup('administrator')</th>
[424]116        <th>IP</th>
117        <th>Uptime</th>
118        <th>VNC</th>
119        <th></th>
120      </tr>
[205]121      #for $machine in $machines:
122        $machineRow($machine)
[113]123      #end for
124    </table>
[205]125#end def
126
127
128#def body
[423]129<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>
[205]130#if not $machines
131<p>You don't currently control any VMs.</p>  
[144]132#end if
[207]133    <p><a href="list">refresh</a></p>
[205]134    <div id="machinelist">
135    $machineList($machines)
136    </div>
[425]137$createForm()
[113]138#end def
Note: See TracBrowser for help on using the repository browser.