| 1 | #from skeleton import skeleton |
|---|
| 2 | #extends skeleton |
|---|
| 3 | |
|---|
| 4 | #def title |
|---|
| 5 | Info on $machine.name |
|---|
| 6 | #end def |
|---|
| 7 | |
|---|
| 8 | #def infoTable() |
|---|
| 9 | <h2>Info</h2> |
|---|
| 10 | <table> |
|---|
| 11 | #for $key, $value in $fields |
|---|
| 12 | <tr><td>$key:</td><td>$value</td></tr> |
|---|
| 13 | #end for |
|---|
| 14 | </table> |
|---|
| 15 | #end def |
|---|
| 16 | |
|---|
| 17 | #def commands() |
|---|
| 18 | <form action="command" method="POST"> |
|---|
| 19 | <input type="hidden" name="back" value="info"/> |
|---|
| 20 | <input type="hidden" name="machine_id" value="$machine.machine_id"/> |
|---|
| 21 | <table> |
|---|
| 22 | |
|---|
| 23 | <tr><td colspan=3> |
|---|
| 24 | #if $on |
|---|
| 25 | #if $has_vnc |
|---|
| 26 | <strong><a href="vnc?machine_id=$machine.machine_id">Get Console</a></strong> |
|---|
| 27 | #else |
|---|
| 28 | VNC console not enabled; still booting? |
|---|
| 29 | #end if |
|---|
| 30 | #else |
|---|
| 31 | |
|---|
| 32 | #end if |
|---|
| 33 | </td></tr> |
|---|
| 34 | <tr> |
|---|
| 35 | #if $on |
|---|
| 36 | <td><button type="submit" class="button" name="action" value="Power off">Power off (hard)</button></td> |
|---|
| 37 | <td><button type="submit" class="button" name="action" value="Shutdown">Shut down</button></td> |
|---|
| 38 | <td><input type="submit" class="button" name="action" value="Reboot"/></td> |
|---|
| 39 | #else |
|---|
| 40 | <td><input type="submit" class="button" name="action" value="Power on"/></td> |
|---|
| 41 | #end if |
|---|
| 42 | <td>Boot CD:</td> |
|---|
| 43 | <td>#slurp |
|---|
| 44 | #filter None |
|---|
| 45 | $cdromList()#slurp |
|---|
| 46 | #end filter |
|---|
| 47 | </td> |
|---|
| 48 | </tr> |
|---|
| 49 | <tr> |
|---|
| 50 | <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> |
|---|
| 51 | </tr> |
|---|
| 52 | </table> |
|---|
| 53 | </form> |
|---|
| 54 | #end def |
|---|
| 55 | |
|---|
| 56 | #def modifyForm() |
|---|
| 57 | #if $err |
|---|
| 58 | <p class="error">We had a problem with your request:</p> |
|---|
| 59 | #else if $varExists('new_machine') |
|---|
| 60 | <p>Successfully modified.</p> |
|---|
| 61 | #end if |
|---|
| 62 | #if $on |
|---|
| 63 | (To edit ram, disk size, or machine name, turn off the machine first.) |
|---|
| 64 | #end if |
|---|
| 65 | <form action="modify" method="POST"> |
|---|
| 66 | <input type="hidden" name="machine_id" value="$defaults.machine_id"/> |
|---|
| 67 | <table> |
|---|
| 68 | <tr><td>Description:</td><td colspan="2"><textarea name="description" rows="4" cols="60">$defaults.description</textarea></td></tr> |
|---|
| 69 | <tr><td>Owner#slurp |
|---|
| 70 | #filter None |
|---|
| 71 | $helppopup("Owner")#slurp |
|---|
| 72 | #end filter |
|---|
| 73 | :</td><td><input type="text" name="owner", value="$defaults.owner"/></td></tr> |
|---|
| 74 | #filter None |
|---|
| 75 | $errorRow('owner', $err) |
|---|
| 76 | #end filter |
|---|
| 77 | <tr><td>Administrator#slurp |
|---|
| 78 | #filter None |
|---|
| 79 | $helppopup("Administrator")#slurp |
|---|
| 80 | #end filter |
|---|
| 81 | :</td><td><input type="text" name="admin", value="$defaults.administrator"/></td></tr> |
|---|
| 82 | #filter None |
|---|
| 83 | $errorRow('administrator', $err) |
|---|
| 84 | #end filter |
|---|
| 85 | <tr><td>Contact email:</td><td><input type="text" name="contact" value="$defaults.contact"/></td></tr> |
|---|
| 86 | #filter None |
|---|
| 87 | $errorRow('contact', $err) |
|---|
| 88 | #end filter |
|---|
| 89 | #if not $on |
|---|
| 90 | <tr><td>Machine Name:</td><td><input type="text" name="name" value="$defaults.name"/>.${config.dns.domains[0]}</td></tr> |
|---|
| 91 | #filter None |
|---|
| 92 | $errorRow('name', $err) |
|---|
| 93 | #end filter |
|---|
| 94 | <tr> |
|---|
| 95 | <td>HVM/ParaVM#slurp |
|---|
| 96 | #filter None |
|---|
| 97 | $helppopup('HVM/ParaVM')#slurp |
|---|
| 98 | #end filter |
|---|
| 99 | </td> |
|---|
| 100 | <td>#slurp |
|---|
| 101 | #filter None |
|---|
| 102 | $vmTypeList($defaults.type)#slurp |
|---|
| 103 | #end filter |
|---|
| 104 | </td> |
|---|
| 105 | </tr> |
|---|
| 106 | <tr><td>Ram:</td><td><input type="text" size=3 name="memory" value="$defaults.memory"/>MiB (max $max_mem)</td></tr> |
|---|
| 107 | #filter None |
|---|
| 108 | $errorRow('memory', $err) |
|---|
| 109 | #end filter |
|---|
| 110 | <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> |
|---|
| 111 | #filter None |
|---|
| 112 | $errorRow('disk', $err) |
|---|
| 113 | #end filter |
|---|
| 114 | #else |
|---|
| 115 | #filter None |
|---|
| 116 | $errorRow('name', $err) |
|---|
| 117 | $errorRow('memory', $err) |
|---|
| 118 | $errorRow('disk', $err) |
|---|
| 119 | #end filter |
|---|
| 120 | #end if |
|---|
| 121 | <tr><td><input type="submit" class="button" name="action" value="Change"/></td></tr> |
|---|
| 122 | </table> |
|---|
| 123 | </form> |
|---|
| 124 | #end def |
|---|
| 125 | |
|---|
| 126 | #def body |
|---|
| 127 | <div id="info"> |
|---|
| 128 | #filter None |
|---|
| 129 | $infoTable() |
|---|
| 130 | #end filter |
|---|
| 131 | </div> |
|---|
| 132 | |
|---|
| 133 | <h2>Commands</h2> |
|---|
| 134 | <div id="commands"> |
|---|
| 135 | #filter None |
|---|
| 136 | $commands() |
|---|
| 137 | #end filter |
|---|
| 138 | </div> |
|---|
| 139 | <h2>Settings</h2> |
|---|
| 140 | <div id="modify"> |
|---|
| 141 | #filter None |
|---|
| 142 | $modifyForm() |
|---|
| 143 | #end filter |
|---|
| 144 | </div> |
|---|
| 145 | #end def |
|---|