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

Last change on this file since 304 was 280, checked in by ecprice, 17 years ago

Put alpha message in SVN

File size: 3.1 KB
Line 
1#from skeleton import skeleton
2#extends skeleton
3
4
5#def title
6List of your VMs
7#end def
8
9#def createTable()
10#if $cant_add_vm
11<p>$cant_add_vm</p>
12#else
13<p>Create a new VM:</p>
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
19    <form action="create" method="POST">
20    <input type="hidden" name="back" value="list"/>
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>
30          <td><input type="text" name="memory" value="$defaults.memory" size=3/> MiB ($max_memory max)</td>
31        </tr>
32$errorRow('memory', $err)
33        <tr>
34          <td>Disk</td>
35          <td><input type="text" name="disk" value="$defaults.disk" size=3/> GiB (${"%0.1f" % ($max_disk-0.05)} max)</td>
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)
54        <tr>
55          <td>Owner</td>
56          <td><input type="text" name="owner" value="$defaults.owner"/></td>
57        </tr>
58        $errorRow('owner', $err)
59      </table>
60      <input type="submit" class="button" value="Create it!"/>
61    </form>
62#end if
63#end def
64
65#def machineRow($machine)
66      <tr>
67        <td><a href="info?machine_id=$machine.machine_id">$machine.name</a></td>
68        <td>${machine.memory}M</td>
69        <td>$machine.owner</td>
70        <td>$machine.administrator</td>
71#if $machine.nics
72#set $nic = $machine.nics[0]
73        <td>$nic.ip</td>
74#else
75        <td></td>
76#end if
77<td>#slurp
78#if $machine.uptime
79$machine.uptime#slurp
80#else
81Off#slurp
82#end if
83</td>
84        <td>#slurp
85#if $has_vnc[$machine] == True
86<a href="vnc?machine_id=$machine.machine_id">Console</a>#slurp
87#else
88$has_vnc[$machine]
89#end if
90</td>
91        <td>
92          <form action="command" method="post">
93            <input type="hidden" name="back" value="list"/>
94            <input type="hidden" name="machine_id"
95                   value="$machine.machine_id"/>
96<input type="submit" class="button" name="action" value="#slurp
97#if $machine.uptime then 'Power off' else 'Power on'
98"/>
99          </form>
100        </td>
101      </tr>
102#end def
103
104#def machineList($machines)
105    <table>
106      <tr>
107        <td>Name</td>
108        <td>Memory</td>
109        <td>Owner</td>
110        <td>Administrator</td>
111        <td>IP</td>
112        <td>Uptime</td>
113        <td>VNC</td>
114        <td></td>
115      #for $machine in $machines:
116        $machineRow($machine)
117      #end for
118    </table>
119#end def
120
121
122#def body
123<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>
124#if not $machines
125<p>You don't currently control any VMs.</p>  
126#else
127    <p>You have the following VMs:</p>
128#end if
129    <p><a href="list">refresh</a></p>
130    <div id="machinelist">
131    $machineList($machines)
132    </div>
133<div id="createtable">
134$createTable()
135</div>
136#end def
Note: See TracBrowser for help on using the repository browser.