r2171 - likewise the previous commit, on the tag editor tab this time
[racktables] / inc / interface.php
CommitLineData
b325120a 1<?php
e673ee24
DO
2/*
3*
4* This file contains frontend functions for RackTables.
5*
6*/
7
9c0b0016
DO
8// Interface function's special.
9$nextorder['odd'] = 'even';
10$nextorder['even'] = 'odd';
11
52c836b1
DO
12// address allocation type
13$aat = array
14(
15 'regular' => 'Connected',
16 'virtual' => 'Loopback',
17 'shared' => 'Shared',
18 'router' => 'Router',
19);
beb9e88a 20// address allocation code, IPv4 addresses and objects view
52c836b1
DO
21$aac = array
22(
23 'regular' => '',
24 'virtual' => '<strong>L</strong>',
25 'shared' => '<strong>S</strong>',
26 'router' => '<strong>R</strong>',
27);
beb9e88a
DO
28// address allocation code, IPv4 networks view
29$aac2 = array
30(
31 'regular' => '',
32 'virtual' => '<strong>L:</strong>',
33 'router' => '<strong>R:</strong>',
34);
52c836b1 35
7056988c
DO
36// Let's have it here, so extensions can add their own images.
37$image = array();
38$image['error']['path'] = 'pix/error.png';
39$image['error']['width'] = 76;
40$image['error']['height'] = 17;
41$image['logo']['path'] = 'pix/defaultlogo.png';
42$image['logo']['width'] = 210;
43$image['logo']['height'] = 40;
44$image['rackspace']['path'] = 'pix/racks.png';
45$image['rackspace']['width'] = 218;
46$image['rackspace']['height'] = 200;
47$image['objects']['path'] = 'pix/server.png';
48$image['objects']['width'] = 218;
49$image['objects']['height'] = 200;
50$image['ipv4space']['path'] = 'pix/addressspace.png';
51$image['ipv4space']['width'] = 218;
52$image['ipv4space']['height'] = 200;
53$image['ipv4slb']['path'] = 'pix/slb.png';
54$image['ipv4slb']['width'] = 218;
55$image['ipv4slb']['height'] = 200;
56$image['config']['path'] = 'pix/configuration.png';
57$image['config']['width'] = 218;
58$image['config']['height'] = 200;
59$image['reports']['path'] = 'pix/report.png';
60$image['reports']['width'] = 218;
61$image['reports']['height'] = 200;
62$image['useup']['path'] = 'pix/tango-edit-clear.png';
63$image['useup']['width'] = 16;
64$image['useup']['height'] = 16;
65$image['link']['path'] = 'pix/tango-network-wired.png';
66$image['link']['width'] = 16;
67$image['link']['height'] = 16;
68$image['unlink']['path'] = 'pix/tango-edit-clear.png';
69$image['unlink']['width'] = 16;
70$image['unlink']['height'] = 16;
71$image['add']['path'] = 'pix/tango-list-add.png';
72$image['add']['width'] = 16;
73$image['add']['height'] = 16;
74$image['delete']['path'] = 'pix/tango-list-remove.png';
75$image['delete']['width'] = 16;
76$image['delete']['height'] = 16;
77$image['nodelete']['path'] = 'pix/tango-list-remove-shadow.png';
78$image['nodelete']['width'] = 16;
79$image['nodelete']['height'] = 16;
80$image['grant'] = $image['add'];
81$image['revoke'] = $image['delete'];
82$image['inservice']['path'] = 'pix/tango-emblem-system.png';
83$image['inservice']['width'] = 16;
84$image['inservice']['height'] = 16;
85$image['notinservice']['path'] = 'pix/tango-dialog-error.png';
86$image['notinservice']['width'] = 16;
87$image['notinservice']['height'] = 16;
88$image['blockuser'] = $image['inservice'];
89$image['unblockuser'] = $image['notinservice'];
90$image['find']['path'] = 'pix/tango-system-search.png';
91$image['find']['width'] = 16;
92$image['find']['height'] = 16;
93$image['spacer']['path'] = 'pix/pixel.png';
94$image['spacer']['width'] = 16;
95$image['spacer']['height'] = 16;
96$image['next']['path'] = 'pix/tango-go-next.png';
97$image['next']['width'] = 32;
98$image['next']['height'] = 32;
99$image['prev']['path'] = 'pix/tango-go-previous.png';
100$image['prev']['width'] = 32;
101$image['prev']['height'] = 32;
102$image['clear']['path'] = 'pix/tango-edit-clear.png';
103$image['clear']['width'] = 16;
104$image['clear']['height'] = 16;
61a61189
DO
105$image['CLEAR']['path'] = 'pix/tango-edit-clear-big.png';
106$image['CLEAR']['width'] = 32;
107$image['CLEAR']['height'] = 32;
7056988c
DO
108$image['save']['path'] = 'pix/tango-document-save.png';
109$image['save']['width'] = 16;
110$image['save']['height'] = 16;
111$image['SAVE']['path'] = 'pix/tango-document-save-big.png';
112$image['SAVE']['width'] = 32;
113$image['SAVE']['height'] = 32;
114$image['create']['path'] = 'pix/tango-document-new.png';
115$image['create']['width'] = 16;
116$image['create']['height'] = 16;
117$image['CREATE']['path'] = 'pix/tango-document-new-big.png';
118$image['CREATE']['width'] = 32;
119$image['CREATE']['height'] = 32;
120$image['DENIED']['path'] = 'pix/tango-dialog-error-big.png';
121$image['DENIED']['width'] = 32;
122$image['DENIED']['height'] = 32;
123
e5c4506d
DO
124// This may be populated later onsite, report rendering function will use it.
125// See the $systemreport for structure.
126$localreports = array();
127
e673ee24
DO
128// Main menu.
129function renderIndex ()
130{
131 global $root;
132?>
133<table border=0 cellpadding=0 cellspacing=0 width='100%'>
134 <tr>
135 <td>
136 <div style='text-align: center; margin: 10px; '>
137 <table width='100%' cellspacing=0 cellpadding=30 class=mainmenu border=0>
138 <tr>
139 <td>
b325120a
DO
140 <h1><a href='<?php echo $root; ?>?page=rackspace'>Rackspace<br>
141 <?php printImageHREF ('rackspace'); ?></a></h1>
e673ee24
DO
142 </td>
143 <td>
b325120a
DO
144 <h1><a href='<?php echo $root; ?>?page=objects'>Objects<br>
145 <?php printImageHREF ('objects'); ?></a></h1>
e673ee24
DO
146 </td>
147 <td>
b325120a
DO
148 <h1><a href='<?php echo $root; ?>?page=ipv4space'>IPv4 space<br>
149 <?php printImageHREF ('ipv4space'); ?></a></h1>
e673ee24
DO
150 </td>
151 </tr>
152 </table>
153 <table width='100%' cellspacing=0 cellpadding=30 class=mainmenu border=0>
154 <tr>
155 <td>
b325120a
DO
156 <h1><a href='<?php echo $root; ?>?page=config'>Configuration<br>
157 <?php printImageHREF ('config'); ?></a></h1>
e673ee24
DO
158 </td>
159 <td>
da95280e 160 <h1><a href='<?php echo $root; ?>?page=reports'>Reports<br>
b325120a 161 <?php printImageHREF ('reports'); ?></a></h1>
e673ee24 162 </td>
ae545907 163 <td>
f973f491
DO
164 <h1><a href='<?php echo $root; ?>?page=ipv4slb'>IPv4 SLB<br>
165 <?php printImageHREF ('ipv4slb'); ?></a></h1>
ae545907 166 </td>
e673ee24
DO
167 </tr>
168 </table>
169 </div>
170 </td>
171 </tr>
172</table>
b325120a 173<?php
e673ee24
DO
174}
175
176function renderRackspace ()
177{
932cf41f 178 $tagfilter = getTagFilter();
094a8e6e 179 $tagfilter_str = getTagFilterStr ($tagfilter);
489a7502
DO
180 echo "<table class=objview border=0 width='100%'><tr><td class=pcleft>";
181 renderTagFilterPortlet ($tagfilter, 'rack');
182 echo '</td><td class=pcright>';
183 echo '<table border=0 cellpadding=10 cellpadding=1>';
e673ee24 184 // generate thumb gallery
489a7502 185 $rackrowList = getRackspace ($tagfilter);
9c0b0016 186 global $root, $nextorder;
d5157018 187 $rackwidth = getRackImageWidth();
e673ee24
DO
188 $order = 'odd';
189 foreach ($rackrowList as $rackrow)
190 {
84466afa 191 echo "<tr class=row_${order}><th class=tdleft>";
a0d54e7e
DO
192 echo "<a href='${root}?page=row&row_id=${rackrow['row_id']}${tagfilter_str}'>";
193 echo "${rackrow['row_name']}</a></th>";
194 $rackList = getRacksForRow ($rackrow['row_id'], $tagfilter);
e673ee24 195 echo "<td><table border=0 cellspacing=5><tr>";
64b95774 196 foreach ($rackList as $rack)
e673ee24
DO
197 {
198 echo "<td align=center><a href='${root}?page=rack&rack_id=${rack['id']}'>";
199 echo "<img border=0 width=${rackwidth} height=";
d5157018 200 echo getRackImageHeight ($rack['height']);
e673ee24 201 echo " title='${rack['height']} units'";
d2ec5490 202 echo "src='render_image.php?img=minirack&rack_id=${rack['id']}'>";
e673ee24
DO
203 echo "<br>${rack['name']}</a></td>";
204 }
205 echo "</tr></table></tr>\n";
206 $order = $nextorder[$order];
207 }
208 echo "</table>\n";
489a7502 209 echo "</td></tr></table>\n";
e673ee24
DO
210}
211
d5157018 212function renderRow ($row_id = 0)
e673ee24
DO
213{
214 if ($row_id == 0)
215 {
39a6338a 216 showError ('Invalid row_id', __FUNCTION__);
e673ee24
DO
217 return;
218 }
219 if (($rowInfo = getRackRowInfo ($row_id)) == NULL)
220 {
39a6338a 221 showError ('getRackRowInfo() failed', __FUNCTION__);
e673ee24
DO
222 return;
223 }
a0d54e7e
DO
224 $tagfilter = getTagFilter();
225 $rackList = getRacksForRow ($row_id, $tagfilter);
e673ee24
DO
226 // Main layout starts.
227 echo "<table border=0 class=objectview cellspacing=0 cellpadding=0>";
228
229 // Left portlet with row information.
230 echo "<tr><td class=pcleft>";
a8ce7234 231 startPortlet ($rowInfo['name']);
e673ee24 232 echo "<table border=0 cellspacing=0 cellpadding=3 width='100%'>\n";
e673ee24
DO
233 echo "<tr><th width='50%' class=tdright>Racks:</th><td class=tdleft>${rowInfo['count']}</td></tr>\n";
234 echo "<tr><th width='50%' class=tdright>Units:</th><td class=tdleft>${rowInfo['sum']}</td></tr>\n";
04d619d0 235 echo "<tr><th width='50%' class=tdright>%% used:</th><td class=tdleft>";
114e50af
DO
236 renderProgressBar (getRSUforRackRow ($rackList));
237 echo "</td></tr>\n";
e673ee24
DO
238 echo "</table><br>\n";
239 finishPortlet();
240
a0d54e7e 241 echo "</td><td class=pcright rowspan=2>";
e673ee24 242
9c0b0016 243 global $root, $nextorder;
d5157018 244 $rackwidth = getRackImageWidth() * getConfigVar ('ROW_SCALE');
e673ee24
DO
245 $order = 'odd';
246 startPortlet ('Racks');
247 echo "<table border=0 cellspacing=5 align='center'><tr>";
64b95774 248 foreach ($rackList as $rack)
e673ee24
DO
249 {
250 echo "<td align=center class=row_${order}><a href='${root}?page=rack&rack_id=${rack['id']}'>";
d5157018 251 echo "<img border=0 width=${rackwidth} height=" . (getRackImageHeight ($rack['height']) * getConfigVar ('ROW_SCALE'));
e673ee24 252 echo " title='${rack['height']} units'";
d2ec5490 253 echo "src='render_image.php?img=minirack&rack_id=${rack['id']}'>";
e673ee24
DO
254 echo "<br>${rack['name']}</a></td>";
255 $order = $nextorder[$order];
256 }
257 echo "</tr></table>\n";
258 finishPortlet();
a0d54e7e 259 echo "</td></tr>";
e673ee24 260
a0d54e7e
DO
261 echo "<tr><td class=pcleft>";
262 renderTagFilterPortlet ($tagfilter, 'rack', 'row_id', $row_id);
e673ee24
DO
263 echo "</td></tr></table>";
264}
265
04f110a0 266function showError ($info = '', $location = 'N/A')
e673ee24
DO
267{
268 global $root;
04f110a0
DO
269 if (preg_match ('/\.php$/', $location))
270 $location = basename ($location);
271 elseif ($location != 'N/A')
272 $location = $location . '()';
273 echo "<div class=msg_error>An error has occured in [${location}]. ";
e673ee24
DO
274 if (empty ($info))
275 echo 'No additional information is available.';
276 else
277 echo "Additional information:<br><p>\n<pre>\n${info}\n</pre></p>";
278 echo "Go back or try starting from <a href='${root}'>index page</a>.<br></div>\n";
279}
280
281// This function renders rack as HTML table.
282function renderRack ($rack_id = 0, $hl_obj_id = 0)
283{
284 if ($rack_id == 0)
285 {
39a6338a 286 showError ('Invalid rack_id', __FUNCTION__);
e673ee24
DO
287 return;
288 }
289 if (($rackData = getRackData ($rack_id)) == NULL)
290 {
39a6338a 291 showError ('getRackData() failed', __FUNCTION__);
e673ee24
DO
292 return;
293 }
294 global $root, $pageno, $tabno;
295 markAllSpans ($rackData);
296 if ($hl_obj_id > 0)
297 highlightObject ($rackData, $hl_obj_id);
298 markupObjectProblems ($rackData);
299 $prev_id = getPrevIDforRack ($rackData['row_id'], $rack_id);
300 $next_id = getNextIDforRack ($rackData['row_id'], $rack_id);
d48d8820
DO
301 echo "<center><table border=0><tr valign=middle>";
302 echo "<td><h2><a href='${root}?page=row&row_id=${rackData['row_id']}'>${rackData['row_name']}</a> :</h2></td>";
e673ee24
DO
303 // FIXME: use 'bypass'?
304 if ($prev_id != NULL)
9803c56c 305 {
d48d8820 306 echo "<td><a href='${root}?page=rack&rack_id=${prev_id}'>";
9803c56c 307 printImageHREF ('prev', 'previous rack');
d48d8820 308 echo "</a></td>";
9803c56c 309 }
d48d8820 310 echo "<td><h2><a href='${root}?page=rack&rack_id=${rackData['id']}'>${rackData['name']}</a></h2></td>";
e673ee24 311 if ($next_id != NULL)
9803c56c 312 {
d48d8820 313 echo "<td><a href='${root}?page=rack&rack_id=${next_id}'>";
f444c095 314 printImageHREF ('next', 'next rack');
d48d8820 315 echo "</a></td>";
9803c56c 316 }
d48d8820 317 echo "</h2></td></tr></table>\n";
1c81a02c
DO
318 if ($rackData['left_is_front'] == 'yes')
319 $markup = array ('left' => 'Front', 'right' => 'Back');
320 else
321 $markup = array ('left' => 'Back', 'right' => 'Front');
e673ee24 322 echo "<table class=rack border=0 cellspacing=0 cellpadding=1>\n";
9ddfe309
DO
323 echo "<tr><th width='10%'>&nbsp;</th><th width='20%'>${markup['left']}</th>";
324 echo "<th width='50%'>Interior</th><th width='20%'>${markup['right']}</th></tr>\n";
e673ee24
DO
325 for ($i = $rackData['height']; $i > 0; $i--)
326 {
9ddfe309 327 echo '<tr><th>' . ($rackData['bottom_is_unit1'] == 'yes' ? $i : $rackData['height'] - $i + 1) . '</th>';
e673ee24
DO
328 for ($locidx = 0; $locidx < 3; $locidx++)
329 {
330 if (isset ($rackData[$i][$locidx]['skipped']))
331 continue;
332 $state = $rackData[$i][$locidx]['state'];
333 echo "<td class=state_${state}";
334 if (isset ($rackData[$i][$locidx]['hl']))
335 echo $rackData[$i][$locidx]['hl'];
336 if (isset ($rackData[$i][$locidx]['colspan']))
337 echo ' colspan=' . $rackData[$i][$locidx]['colspan'];
338 if (isset ($rackData[$i][$locidx]['rowspan']))
339 echo ' rowspan=' . $rackData[$i][$locidx]['rowspan'];
340 echo ">";
341 switch ($state)
342 {
343 case 'T':
344 $objectData = getObjectInfo ($rackData[$i][$locidx]['object_id']);
345 if (!empty ($objectData['asset_no']))
346 $prefix = "<div title='${objectData['asset_no']}";
347 else
348 $prefix = "<div title='no asset tag";
349 // Don't tell about label, if it matches common name.
350 if ($objectData['name'] != $objectData['label'] and !empty ($objectData['label']))
351 $suffix = ", visible label is \"${objectData['label']}\"'>";
352 else
353 $suffix = "'>";
354 echo $prefix . $suffix;
355 echo "<a href='${root}?page=object&object_id=${objectData['id']}'>${objectData['dname']}</a></div>";
356 break;
357 case 'A':
358 echo '<div title="This rackspace does not exist">&nbsp;</div>';
359 break;
360 case 'F':
361 echo '<div title="Free rackspace">&nbsp;</div>';
362 break;
363 case 'U':
364 echo '<div title="Problematic rackspace, you CAN\'T mount here">&nbsp;</div>';
365 break;
366 default:
367 echo '<div title="No data">&nbsp;</div>';
368 break;
369 }
370 echo '</td>';
371 }
372 echo "</tr>\n";
373 }
374 echo "</table></center>\n";
375}
376
e673ee24
DO
377function renderNewRackForm ($row_id)
378{
f19c75d6 379 showMessageOrError();
f19c75d6 380
50b4ba85 381 startPortlet ('Add one');
f19c75d6 382 printOpFormIntro ('addRack', array ('got_data' => 'TRUE'));
e673ee24 383 echo '<table border=0 align=center>';
b901bf1f
DO
384 $defh = getConfigVar ('DEFAULT_RACK_HEIGHT');
385 if ($defh == 0)
386 $defh = '';
72d52730
DO
387 echo "<tr><th class=tdright>Rack name (*):</th><td class=tdleft><input type=text name=rack_name tabindex=1></td>";
388 echo "<td rowspan=4>Assign tags:<br>";
389 renderTagSelect();
390 echo "</td></tr>\n";
b8094ae4 391 echo "<tr><th class=tdright>Height in units (*):</th><td class=tdleft><input type=text name=rack_height1 tabindex=2 value='${defh}'></td></tr>\n";
4134b5c0 392 echo "<tr><th class=tdright>Comment:</th><td class=tdleft><input type=text name=rack_comment tabindex=3></td></tr>\n";
f19c75d6
DO
393 echo "<tr><td class=submit colspan=2>";
394 printImageHREF ('CREATE', 'Add', TRUE);
395 echo "</td></tr></table></form>";
406b54bd 396 finishPortlet();
406b54bd 397
50b4ba85 398 startPortlet ('Add many');
f19c75d6 399 printOpFormIntro ('addRack', array ('got_mdata' => 'TRUE'));
50b4ba85
DO
400 echo '<table border=0 align=center>';
401 $defh = getConfigVar ('DEFAULT_RACK_HEIGHT');
402 if ($defh == 0)
403 $defh = '';
72d52730
DO
404 echo "<tr><th class=tdright>Height in units (*):</th><td class=tdleft><input type=text name=rack_height2 value='${defh}'></td>";
405 echo "<td rowspan=3 valign=top>Assign tags:<br>";
406 renderTagSelect();
407 echo "</td></tr>\n";
50b4ba85 408 echo "<tr><th class=tdright>Rack names (*):</th><td class=tdleft><textarea name=rack_names cols=40 rows=25></textarea></td></tr>\n";
f19c75d6
DO
409 echo "<tr><td class=submit colspan=2>";
410 printImageHREF ('CREATE', 'Add', TRUE);
e673ee24
DO
411 echo '</form></table>';
412 finishPortlet();
413}
414
415function renderEditObjectForm ($object_id)
416{
417 showMessageOrError();
e673ee24 418
22bb04da 419 global $pageno, $tabno, $root;
e673ee24
DO
420 $object = getObjectInfo ($object_id);
421 if ($object == NULL)
422 {
39a6338a 423 showError ('getObjectInfo() failed', __FUNCTION__);
e673ee24
DO
424 return;
425 }
e673ee24
DO
426 echo '<table border=0 width=100%><tr>';
427
428 echo '<td class=pcleft>';
429 startPortlet ('Static attributes');
43fb6eaf 430 printOpFormIntro ('update');
e673ee24
DO
431 echo '<table border=0 align=center>';
432 echo "<tr><th class=tdright>Type:</th><td class=tdleft>";
433 printSelect (getObjectTypeList(), 'object_type_id', $object['objtype_id']);
434 echo "</td></tr>\n";
22bb04da 435 // baseline info
e673ee24
DO
436 echo "<tr><th class=tdright>Common name:</th><td class=tdleft><input type=text name=object_name value='${object['name']}'></td></tr>\n";
437 echo "<tr><th class=tdright>Visible label:</th><td class=tdleft><input type=text name=object_label value='${object['label']}'></td></tr>\n";
438 echo "<tr><th class=tdright>Asset tag:</th><td class=tdleft><input type=text name=object_asset_no value='${object['asset_no']}'></td></tr>\n";
439 echo "<tr><th class=tdright>Barcode:</th><td class=tdleft><input type=text name=object_barcode value='${object['barcode']}'></td></tr>\n";
440 echo "<tr><th class=tdright>Has problems:</th><td class=tdleft><input type=checkbox name=object_has_problems";
441 if ($object['has_problems'] == 'yes')
442 echo ' checked';
443 echo "></td></tr>\n";
444 echo "<tr><td colspan=2><b>Comment:</b><br><textarea name=object_comment rows=10 cols=80>${object['comment']}</textarea></td></tr>";
5bbbeaa2
DO
445 echo "<tr><th class=submit colspan=2>";
446 printImageHREF ('SAVE', 'Save changes', TRUE);
447 echo "</td></tr>\n";
e673ee24
DO
448 echo '</form></table><br>';
449 finishPortlet();
450 echo '</td>';
451
22bb04da 452 // stickers
e673ee24
DO
453 echo '<td class=pcright>';
454 startPortlet ('Optional attributes');
455 $values = getAttrValues ($object_id);
e673ee24
DO
456 echo "<table cellspacing=0 cellpadding=5 align=center class=widetable>\n";
457 echo "<tr><th>&nbsp;</th><th>Attribute</th><th>Value</th><th>&nbsp;</th></tr>\n";
43fb6eaf 458 printOpFormIntro ('updateStickers');
0dfb8a2a
DO
459 echo '<input type=hidden name=num_attrs value=' . count($values) . ">\n";
460
461 $i = 0;
e673ee24
DO
462 foreach ($values as $record)
463 {
0dfb8a2a 464 echo "<input type=hidden name=${i}_attr_id value=${record['id']}>";
0c4605ab 465 echo '<tr><td>';
ca1fec24 466 if (!empty ($record['value']))
0c4605ab 467 {
22bb04da 468 echo "<a href='${root}process.php?page=${pageno}&tab=${tabno}&op=clearSticker&object_id=${object_id}&attr_id=${record['id']}'>";
d48d8820 469 printImageHREF ('clear', 'Clear value');
0c4605ab
DO
470 echo '</a>';
471 }
472 else
d48d8820 473 echo '&nbsp;';
0c4605ab 474 echo '</td>';
e673ee24
DO
475 echo "<td class=tdright>${record['name']}:</td><td class=tdleft>";
476 switch ($record['type'])
477 {
478 case 'uint':
479 case 'float':
480 case 'string':
0dfb8a2a 481 echo "<input type=text name=${i}_value value='${record['value']}'>";
e673ee24
DO
482 break;
483 case 'dict':
484 $chapter = readChapter ($record['chapter_name']);
4c330a14 485 $chapter[0] = '-- NOT SET --';
0dfb8a2a 486 printSelect ($chapter, "${i}_value", $record['key']);
e673ee24
DO
487 break;
488 }
0dfb8a2a
DO
489 echo "</td></tr>\n";
490 $i++;
e673ee24 491 }
5bbbeaa2
DO
492 echo "<tr><td colspan=3>";
493 printImageHREF ('SAVE', 'Save changes', TRUE);
494 echo "</td></tr>\n";
0dfb8a2a 495 echo "</form>";
e673ee24
DO
496 echo "</table>\n";
497 finishPortlet();
498 echo '</td>';
499
500 echo '</tr><tr>';
501
502 echo '<td colspan=2>';
503 startPortlet ('history');
504 renderHistory ($pageno, $object_id);
505 finishPortlet();
506 echo '</td>';
507
508 echo '</tr></table>';
509}
510
511// This is a clone of renderEditObjectForm().
512function renderEditRackForm ($rack_id)
513{
0c2b7c4a
DO
514 showMessageOrError();
515 global $pageno;
e673ee24
DO
516 $rack = getRackData ($rack_id);
517 if ($rack == NULL)
518 {
39a6338a 519 showError ('getRackData() failed', __FUNCTION__);
e673ee24
DO
520 return;
521 }
522
e673ee24 523 startPortlet ('Rack attributes');
7056988c 524 printOpFormIntro ('updateRack');
e673ee24
DO
525 echo '<table border=0 align=center>';
526 echo "<tr><th class=tdright>Rack row:</th><td class=tdleft>";
4c330a14 527 printSelect (readChapter ('RackRow'), 'rack_row_id', $rack['row_id']);
e673ee24
DO
528 echo "</td></tr>\n";
529 echo "<tr><th class=tdright>Name (required):</th><td class=tdleft><input type=text name=rack_name value='${rack['name']}'></td></tr>\n";
530 echo "<tr><th class=tdright>Height (required):</th><td class=tdleft><input type=text name=rack_height value='${rack['height']}'></td></tr>\n";
531 echo "<tr><th class=tdright>Comment:</th><td class=tdleft><input type=text name=rack_comment value='${rack['comment']}'></td></tr>\n";
7056988c
DO
532 echo "<tr><td class=submit colspan=2>";
533 printImageHREF ('SAVE', 'Save changes', TRUE);
534 echo "</td></tr>\n";
e673ee24
DO
535 echo '</form></table><br>';
536 finishPortlet();
537
538 startPortlet ('History');
539 renderHistory ($pageno, $rack_id);
540 finishPortlet();
541}
542
543// This is a helper for creators and editors.
544function printSelect ($rowList, $select_name, $selected_id = 1)
545{
9e7f32a7
DO
546 // First collect all data for OPTGROUPs, then ouput it and dump
547 // the rest of records as is.
548 $optgroup = array();
549 $other = array();
4c330a14 550 foreach ($rowList as $dict_key => $dict_value)
e673ee24 551 {
f0b540a3 552 if (strpos ($dict_value, '%GSKIP%') !== FALSE)
9e7f32a7 553 {
f0b540a3 554 $tmp = explode ('%GSKIP%', $dict_value, 2);
9e7f32a7
DO
555 $optgroup[$tmp[0]][$dict_key] = $tmp[1];
556 }
f0b540a3 557 elseif (strpos ($dict_value, '%GPASS%') !== FALSE)
2613bc1c 558 {
f0b540a3 559 $tmp = explode ('%GPASS%', $dict_value, 2);
2613bc1c
DO
560 $optgroup[$tmp[0]][$dict_key] = $tmp[1];
561 }
9e7f32a7
DO
562 else
563 $other[$dict_key] = $dict_value;
564 }
565 echo "<select name=${select_name}>";
566 if (!count ($optgroup))
567 {
568 foreach ($other as $dict_key => $dict_value)
569 {
570 echo "<option value=${dict_key}";
571 if ($dict_key == $selected_id)
572 echo ' selected';
573 echo ">${dict_value}</option>";
574 }
575 }
576 else
577 {
578 foreach ($optgroup as $groupname => $groupdata)
579 {
580 echo "<optgroup label='${groupname}'>";
581 foreach ($groupdata as $dict_key => $dict_value)
582 {
583 echo "<option value=${dict_key}";
584 if ($dict_key == $selected_id)
585 echo ' selected';
586 echo ">${dict_value}</option>";
587 }
588 echo "</optgroup>\n";
589 }
590 if (count ($other))
591 {
592 echo "<optgroup label='other'>\n";
593 foreach ($other as $dict_key => $dict_value)
594 {
595 echo "<option value=${dict_key}";
596 if ($dict_key == $selected_id)
597 echo ' selected';
598 echo ">${dict_value}</option>";
599 }
600 echo "</optgroup>\n";
601 }
e673ee24
DO
602 }
603 echo "</select>";
604}
605
254673dd
DO
606// used by renderGridForm() and renderRackPage()
607function renderRackInfoPortlet ($rackData)
608{
d9c609c4 609 global $root;
254673dd
DO
610 startPortlet ('summary');
611 echo "<table border=0 cellspacing=0 cellpadding=3 width='100%'>\n";
612 echo "<tr><th width='50%' class=tdright>Rack row:</th><td class=tdleft>${rackData['row_name']}</td></tr>\n";
613 echo "<tr><th width='50%' class=tdright>Name:</th><td class=tdleft>${rackData['name']}</td></tr>\n";
614 echo "<tr><th width='50%' class=tdright>Height:</th><td class=tdleft>${rackData['height']}</td></tr>\n";
04d619d0 615 echo "<tr><th width='50%' class=tdright>%% used:</th><td class=tdleft>";
254673dd
DO
616 renderProgressBar (getRSUforRack ($rackData));
617 echo "</td></tr>\n";
618 echo "<tr><th width='50%' class=tdright>Objects:</th><td class=tdleft>";
abef7149 619 echo count (stuffInRackspace ($rackData));
254673dd 620 echo "</td></tr>\n";
e2ac59cf 621 printTagTRs ("${root}?page=rackspace&");
254673dd
DO
622 if (!empty ($rackData['comment']))
623 echo "<tr><th width='50%' class=tdright>Comment:</th><td class=tdleft>${rackData['comment']}</td></tr>\n";
624 echo '</table>';
625 finishPortlet();
626}
627
e673ee24 628// This is a universal editor of rack design/waste.
7056988c 629// FIXME: switch to using printOpFormIntro()
bb09cca0 630function renderGridForm ($rack_id = 0, $filter, $header, $submit, $state1, $state2)
e673ee24
DO
631{
632 if ($rack_id == 0)
633 {
591ff2c4 634 showError ('Invalid rack_id', __FUNCTION__);
e673ee24
DO
635 return;
636 }
637 if (($rackData = getRackData ($rack_id)) == NULL)
638 {
591ff2c4 639 showError ('getRackData() failed', __FUNCTION__);
e673ee24
DO
640 return;
641 }
642
643 global $root, $pageno, $tabno;
254673dd 644 $filter ($rackData);
e673ee24
DO
645 markupObjectProblems ($rackData);
646
647 // Process form submit.
648 if (isset ($_REQUEST['do_update']))
649 {
650 $log[] = processGridForm ($rackData, $state1, $state2);
254673dd
DO
651 printLog ($log);
652 $rackData = getRackData ($rack_id);
653 $filter ($rackData);
654 markupObjectProblems ($rackData);
e673ee24
DO
655 }
656
657 // Render the result whatever it is.
658 // Main layout.
659 echo "<table border=0 class=objectview cellspacing=0 cellpadding=0>";
660 echo "<tr><td colspan=2 align=center><h1>${rackData['name']}</h1></td></tr>\n";
661
662 // Left column with information portlet.
663 echo "<tr><td class=pcleft height='1%' width='50%'>";
254673dd 664 renderRackInfoPortlet ($rackData);
e673ee24 665 echo "</td>\n";
bb09cca0 666 echo "<td class=pcright>";
e673ee24
DO
667
668 // Grid form.
669 startPortlet ($header);
670 echo "<center>\n";
671 echo "<table class=rack border=0 cellspacing=0 cellpadding=1>\n";
672 echo "<tr><th width='10%'>&nbsp;</th><th width='20%'>Front</th>";
673 echo "<th width='50%'>Interior</th><th width='20%'>Back</th></tr>\n";
9d479d56 674 echo "<form method=post action='${root}?'>\n";
e673ee24
DO
675 echo "<input type=hidden name=page value=${pageno}>\n";
676 echo "<input type=hidden name=tab value=${tabno}>\n";
677 echo "<input type=hidden name=rack_id value=${rack_id}>\n";
678 markupAtomGrid ($rackData, $state2);
679 renderAtomGrid ($rackData);
680 echo "</table></center>\n";
681 echo "<br><input type=submit name=do_update value='${submit}'></form><br><br>\n";
682 finishPortlet();
bb09cca0 683 echo "</td></tr></table>\n";
e673ee24
DO
684}
685
686function renderRackDesign ($rack_id)
687{
bb09cca0 688 renderGridForm ($rack_id, 'applyRackDesignMask', 'Rack design', 'Set rack design', 'A', 'F');
e673ee24
DO
689}
690
691function renderRackProblems ($rack_id = 0)
692{
bb09cca0 693 renderGridForm ($rack_id, 'applyRackProblemMask', 'Rack problems', 'Mark unusable atoms', 'F', 'U');
e673ee24
DO
694}
695
696function startPortlet ($title = '')
697{
698 echo "<div class=portlet><h2>${title}</h2>";
699}
700
701function finishPortlet ()
702{
703 echo "</div>\n";
704}
705
706function printRefsOfType ($refs, $type, $eq)
707{
708 global $root;
709 $gotone=0;
710 foreach ($refs as $ref)
711 {
712 if ($eq($ref['type'], $type))
713 {
714 if ($gotone) echo ', ';
4b2bf583
DO
715 echo "<a href='${root}?page=object&object_id=${ref['object_id']}'>";
716 if (!empty ($ref['name']))
717 echo $ref['name'] . '@';
718 echo "${ref['object_name']}</a>";
e673ee24
DO
719 $gotone=1;
720 }
721 }
722}
723
724function renderRackObject ($object_id = 0)
725{
52c836b1 726 global $root, $nextorder, $aac;
e673ee24
DO
727 if ($object_id <= 0)
728 {
591ff2c4 729 showError ('Invalid object_id', __FUNCTION__);
e673ee24
DO
730 return;
731 }
732 $info = getObjectInfo ($object_id);
733 if ($info == NULL)
734 {
591ff2c4 735 showError ('getObjectInfo() failed', __FUNCTION__);
e673ee24
DO
736 return;
737 }
738 // Main layout starts.
739 echo "<table border=0 class=objectview cellspacing=0 cellpadding=0>";
740 echo "<tr><td colspan=2 align=center><h1>${info['dname']}</h1></td></tr>\n";
741 // left column with uknown number of portlets
742 echo "<tr><td class=pcleft>";
0ab782bc 743 startPortlet ('summary');
e673ee24
DO
744 echo "<table border=0 cellspacing=0 cellpadding=3 width='100%'>\n";
745 if (!empty ($info['name']))
746 echo "<tr><th width='50%' class=tdright>Common name:</th><td class=tdleft>${info['name']}</td></tr>\n";
9c0b0016 747 elseif (in_array ($info['objtype_id'], explode (',', getConfigVar ('NAMEFUL_OBJTYPES'))))
a0ec6295 748 echo "<tr><td colspan=2 class=msg_error>Common name is missing.</td></tr>\n";
e2ac59cf 749 echo "<tr><th width='50%' class=tdright>Object type:</th>";
8e700dd1 750 echo "<td class=tdleft><a href='${root}?page=objgroup&group_id=${info['objtype_id']}&hl_object_id=${object_id}'>${info['objtype_name']}</a></td></tr>\n";
e673ee24
DO
751 if (!empty ($info['asset_no']))
752 echo "<tr><th width='50%' class=tdright>Asset tag:</th><td class=tdleft>${info['asset_no']}</td></tr>\n";
a6305acc 753 elseif (in_array ($info['objtype_id'], explode (',', getConfigVar ('REQUIRE_ASSET_TAG_FOR'))))
a0ec6295 754 echo "<tr><td colspan=2 class=msg_error>Asset tag is missing.</td></tr>\n";
e673ee24
DO
755 if (!empty ($info['label']))
756 echo "<tr><th width='50%' class=tdright>Visible label:</th><td class=tdleft>${info['label']}</td></tr>\n";
757 if (!empty ($info['barcode']))
758 echo "<tr><th width='50%' class=tdright>Barcode:</th><td class=tdleft>${info['barcode']}</td></tr>\n";
759 if ($info['has_problems'] == 'yes')
760 echo "<tr><td colspan=2 class=msg_error>Has problems</td></tr>\n";
24cbe8af 761 foreach (getAttrValues ($object_id, TRUE) as $record)
e673ee24 762 if (!empty ($record['value']))
50a954f6 763 echo "<tr><th width='50%' class=opt_attr_th>${record['name']}:</th><td class=tdleft>${record['a_value']}</td></tr>\n";
e2ac59cf 764 printTagTRs ("${root}?page=objgroup&group_id=${info['objtype_id']}&");
e673ee24
DO
765 echo "</table><br>\n";
766 finishPortlet();
767
768 if (!empty ($info['comment']))
769 {
770 startPortlet ('Comment');
6cc5d6cd 771 echo '<div class=commentblock>' . string_insert_hrefs ($info['comment']) . '</div>';
e673ee24
DO
772 finishPortlet ();
773 }
774
775 $ports = getObjectPortsAndLinks ($object_id);
776 if (count ($ports))
777 {
0ab782bc 778 startPortlet ('ports and links');
e673ee24
DO
779 usort($ports, 'sortByName');
780 if ($ports)
781 {
782 $hl_port_id = 0;
783 if (isset ($_REQUEST['hl_port_id']))
784 {
2c6c7645 785 assertUIntArg ('hl_port_id', __FUNCTION__);
e673ee24
DO
786 $hl_port_id = $_REQUEST['hl_port_id'];
787 }
788 echo "<table cellspacing=0 cellpadding='5' align='center' class='widetable'>\n";
789 echo "<tr><th>Local name</th><th>Visible label</th><th>Port type</th><th>L2 address</th>";
790 echo "<th>Rem. Object</th><th>Rem. port</th></tr>\n";
791 foreach ($ports as $port)
792 {
793 echo '<tr';
794 if ($hl_port_id == $port['id'])
795 echo ' class=port_highlight';
796 echo "><td>${port['name']}</td><td>${port['label']}</td><td>${port['type']}</td>";
797 echo "<td>${port['l2address']}</td>";
798 if ($port['remote_object_id'])
799 {
8e700dd1 800 echo "<td><a href='${root}?page=object&object_id=${port['remote_object_id']}&hl_port_id=${port['remote_id']}'>${port['remote_object_name']}</a></td>";
e673ee24
DO
801 echo "<td>${port['remote_name']}</td>";
802 }
803 elseif (!empty ($port['reservation_comment']))
804 {
805 echo "<td><b>Reserved;</b></td>";
806 echo "<td>${port['reservation_comment']}</td>";
807 }
808 else
809 echo '<td>&nbsp;</td><td>&nbsp;</td>';
810 echo "</tr>\n";
811 }
812 echo "</table><br>\n";
813 }
814 finishPortlet();
815 }
85970da2 816
0ab782bc
DO
817 $alloclist = getObjectIPv4Allocations ($object_id);
818 if (count ($alloclist))
e673ee24 819 {
f28fbe8b 820 startPortlet ('IPv4 addresses');
e673ee24 821 echo "<table cellspacing=0 cellpadding='5' align='center' class='widetable'>\n";
f0ed1181 822 if (getConfigVar ('EXT_IPV4_VIEW') == 'yes')
71287f1c 823 echo "<tr><th>OS interface</th><th>IP address</th><th colspan=2>network</th><th>routed by</th><th>peers</th></tr>\n";
83fdf85f
DO
824 else
825 echo "<tr><th>OS interface</th><th>IP address</th><th>peers</th></tr>\n";
fc0e3978
DO
826 $hl_ipv4_addr = '';
827 if (isset ($_REQUEST['hl_ipv4_addr']))
828 {
829 assertIPv4Arg ('hl_ipv4_addr', __FUNCTION__);
830 $hl_ipv4_addr = $_REQUEST['hl_ipv4_addr'];
831 }
85970da2 832 foreach ($alloclist as $dottedquad => $alloc)
e673ee24 833 {
0ab782bc
DO
834 $address_name = niftyString ($alloc['addrinfo']['name']);
835 $class = $alloc['addrinfo']['class'];
85970da2 836 $secondclass = ($hl_ipv4_addr == $dottedquad) ? 'tdleft port_highlight' : 'tdleft';
83fdf85f 837 $netid = getIPv4AddressNetworkId ($dottedquad);
71287f1c 838 $netinfo = getIPv4NetworkInfo ($netid);
83fdf85f
DO
839 echo "<tr class='${class}' valign=top><td class=tdleft>${alloc['osif']}</td><td class='${secondclass}'>";
840 echo "<a href='${root}?page=ipaddress&ip=" . $dottedquad . "&hl_object_id=${object_id}'>${dottedquad}</a>";
f0ed1181 841 if (getConfigVar ('EXT_IPV4_VIEW') != 'yes')
83fdf85f
DO
842 {
843 if (NULL === $netid)
844 $suffix = '/??';
845 else
83fdf85f 846 echo '<small>/' . $netinfo['mask'] . '</small>';
83fdf85f 847 }
351b1f45 848 echo '&nbsp;' . $aac[$alloc['type']];
83fdf85f
DO
849 if (!empty ($alloc['addrinfo']['name']))
850 echo '(' . niftyString ($alloc['addrinfo']['name']) . ')';
851 echo '</td>';
f0ed1181 852 if (getConfigVar ('EXT_IPV4_VIEW') == 'yes')
b90c3907 853 {
83fdf85f 854 if (NULL === $netid)
71287f1c 855 echo '<td colspan=2>?</td>';
83fdf85f 856 else
fd30f6e4 857 printIPv4NetInfoTDs ($netinfo, $secondclass);
71287f1c 858 echo "<td class='${secondclass}'>";
83fdf85f
DO
859 // FIXME: These cals are really heavy, replace them with a more appropriate dedicated function.
860 $netdata = getIPv4Network ($netid);
861 $newline = '';
862 foreach (findRouters ($netdata['addrlist']) as $router)
863 {
864 if ($router['id'] == $object_id)
865 continue;
866 echo $newline . $router['addr'] . ", <a href='${root}?page=object&object_id=${router['id']}&hl_ipv4_addr=${router['addr']}'>";
867 echo (empty ($router['iface']) ? '' : $router['iface'] . '@') . $router['dname'] . '</a>';
868 $routertags = loadRackObjectTags ($router['id']);
869 if (count ($routertags))
351b1f45 870 echo '<br><small>' . serializeTags ($routertags, "${root}?page=objects&tab=default&") . '</small>';
83fdf85f
DO
871 $newline = '<br>';
872 }
873 echo '</td>';
b90c3907 874 }
83fdf85f 875 // peers
0ab782bc 876 echo "<td class='${secondclass}'>\n";
0ab782bc 877 $prefix = '';
2c817354 878 if ($alloc['addrinfo']['reserved'] == 'yes')
e673ee24 879 {
85970da2 880 echo $prefix . '<strong>RESERVED</strong>';
0ab782bc
DO
881 $prefix = '; ';
882 }
883 foreach ($alloc['addrinfo']['allocs'] as $allocpeer)
884 {
885 if ($allocpeer['object_id'] == $object_id)
886 continue;
887 echo $prefix . "<a href='${root}?page=object&object_id=${allocpeer['object_id']}'>";
888 if (!empty ($allocpeer['osif']))
889 echo $allocpeer['osif'] . '@';
890 echo $allocpeer['object_name'] . '</a>';
0ab782bc 891 $prefix = '; ';
e673ee24 892 }
e673ee24
DO
893 echo "</td></tr>\n";
894 }
895 echo "</table><br>\n";
896 finishPortlet();
897 }
898
eeb4a5d8 899 $forwards = getNATv4ForObject ($object_id);
e673ee24
DO
900 if (count($forwards['in']) or count($forwards['out']))
901 {
f28fbe8b 902 startPortlet('NATv4');
e673ee24
DO
903
904 if (count($forwards['out']))
905 {
906
f28fbe8b 907 echo "<h3>locally performed NAT</h3>";
e673ee24 908
105a3bc8 909 echo "<table class='widetable' cellpadding=5 cellspacing=0 border=0 align='center'>\n";
f28fbe8b 910 echo "<tr><th>Proto</th><th>Match endpoint</th><th>Translate to</th><th>Target object</th><th>Rule comment</th></tr>\n";
e673ee24
DO
911
912 foreach ($forwards['out'] as $pf)
913 {
2c817354
DO
914 $class = 'trerror';
915 $osif = '';
916 if (isset ($alloclist [$pf['localip']]))
917 {
918 $class = $alloclist [$pf['localip']]['addrinfo']['class'];
919 $osif = $alloclist [$pf['localip']]['osif'] . ': ';
920 }
e673ee24 921 echo "<tr class='$class'>";
2c817354 922 echo "<td>${pf['proto']}</td><td class=tdleft>${osif}<a href='${root}?page=ipaddress&tab=default&ip=${pf['localip']}'>${pf['localip']}</a>:${pf['localport']}</td>";
f28fbe8b 923 echo "<td class=tdleft><a href='${root}?page=ipaddress&tab=default&ip=${pf['remoteip']}'>${pf['remoteip']}</a>:${pf['remoteport']}</td>";
53ef3908 924 $address = getIPv4Address ($pf['remoteip']);
e673ee24 925 echo "<td class='description'>";
53ef3908
DO
926 if (count ($address['allocs']))
927 foreach($address['allocs'] as $bond)
f28fbe8b
DO
928 echo "<a href='${root}?page=object&tab=default&object_id=${bond['object_id']}'>${bond['object_name']}(${bond['name']})</a> ";
929 elseif (!empty ($pf['remote_addr_name']))
930 echo '(' . $pf['remote_addr_name'] . ')';
53ef3908 931 echo "</td><td class='description'>${pf['description']}</td></tr>";
e673ee24
DO
932 }
933 echo "</table><br><br>";
934 }
935 if (count($forwards['in']))
936 {
f28fbe8b 937 echo "<h3>arriving NAT connections</h3>";
105a3bc8 938 echo "<table class='widetable' cellpadding=5 cellspacing=0 border=0 align='center'>\n";
f28fbe8b 939 echo "<tr><th>Matched endpoint</th><th>Source object</th><th>Translated to</th><th>Rule comment</th></tr>\n";
e673ee24
DO
940 foreach ($forwards['in'] as $pf)
941 {
942 echo "<tr>";
943 echo "<td>${pf['proto']}/<a href='${root}?page=ipaddress&tab=default&ip=${pf['localip']}'>${pf['localip']}</a>:${pf['localport']}</td>";
e673ee24 944 echo "<td class='description'><a href='${root}?page=object&tab=default&object_id=${pf['object_id']}'>${pf['object_name']}</a>";
e673ee24
DO
945 echo "</td><td><a href='${root}?page=ipaddress&tab=default&ip=${pf['remoteip']}'>${pf['remoteip']}</a>:${pf['remoteport']}</td>";
946 echo "<td class='description'>${pf['description']}</td></tr>";
947 }
e673ee24
DO
948 echo "</table><br><br>";
949 }
950 finishPortlet();
951 }
952
78e7b769
DO
953 $pools = getRSPoolsForObject ($object_id);
954 if (count ($pools))
955 {
300826cb 956 $order = 'odd';
78e7b769
DO
957 startPortlet ('Real server pools');
958 echo "<table cellspacing=0 cellpadding=5 align=center class=widetable>\n";
732e4578 959 echo "<tr><th>VS</th><th>RS pool</th><th>RS</th><th>VS config</th><th>RS config</th></tr>\n";
748805bf 960 foreach ($pools as $vs_id => $info)
78e7b769 961 {
300826cb 962 echo "<tr valign=top class=row_${order}><td class=tdleft><a href='${root}?page=ipv4vs&vs_id=${vs_id}'>";
748805bf
DO
963 echo buildVServiceName ($info);
964 echo '</a>';
965 if (!empty ($info['name']))
300826cb 966 echo "<br>${info['name']}";
0e692350 967 echo "</td><td class=tdleft><a href='${root}?page=ipv4rsp&pool_id=${info['pool_id']}'>";
748805bf 968 echo (empty ($info['pool_name']) ? 'ANONYMOUS' : $info['pool_name']);
732e4578
DO
969 echo '</a></td><td class=tdleft>' . $info['rscount'] . '</td>';
970 echo "<td class=tdleft><pre>${info['vsconfig']}</pre></td>";
971 echo "<td class=tdleft><pre>${info['rsconfig']}</pre></td>";
78e7b769 972 echo "</tr>\n";
300826cb 973 $order = $nextorder[$order];
78e7b769
DO
974 }
975 echo "</table>\n";
976 finishPortlet();
977 }
e673ee24
DO
978 echo "</td>\n";
979
7056988c 980 // After left column we have (surprise!) right column with rackspace portlet only.
e673ee24
DO
981 echo "<td class=pcright>";
982 // rackspace portlet
0ab782bc 983 startPortlet ('rackspace allocation');
e673ee24
DO
984 // FIXME: now we call getRackData() twice
985 $racks = getResidentRacksData ($object_id);
986 foreach ($racks as $rackData)
987 renderRack ($rackData['id'], $object_id);
988 echo '<br>';
989 finishPortlet();
990 echo "</td></tr>";
991 echo "</table>\n";
992}
993
994function renderRackMultiSelect ($sname, $racks, $selected)
995{
04571888
DO
996 // Transform the given flat list into a list of groups, each representing a rack row.
997 $rdata = array();
e673ee24 998 foreach ($racks as $rack)
04571888
DO
999 if (!isset ($rdata[$rack['row_name']]))
1000 $rdata[$rack['row_name']] = array ($rack['id'] => $rack['name']);
1001 else
1002 $rdata[$rack['row_name']][$rack['id']] = $rack['name'];
1003 echo "<select name=${sname} multiple size=" . getConfigVar ('MAXSELSIZE') . " onchange='getElementById(\"racks\").submit()'>\n";
1004 foreach ($rdata as $optgroup => $racklist)
e673ee24 1005 {
04571888
DO
1006 echo "<optgroup label='${optgroup}'>";
1007 foreach ($racklist as $rack_id => $rack_name)
1008 {
1009 echo "<option value=${rack_id}";
1010 if (!(array_search ($rack_id, $selected) === FALSE))
1011 echo ' selected';
1012 echo">${rack_name}</option>\n";
1013 }
e673ee24
DO
1014 }
1015 echo "</select>\n";
1016}
1017
1018function showMessageOrError ()
1019{
46f92ff7 1020 if (isset ($_REQUEST['message']))
e673ee24 1021 echo "<div class=msg_success>${_REQUEST['message']}</div>";
46f92ff7 1022 elseif (isset ($_REQUEST['error']))
e673ee24 1023 echo "<div class=msg_error>${_REQUEST['error']}</div>";
46f92ff7
DO
1024 elseif (isset ($_REQUEST['log']))
1025 printLog (unserialize (base64_decode ($_REQUEST['log'])));
e673ee24
DO
1026}
1027
1028// This function renders a form for port edition.
1029function renderPortsForObject ($object_id = 0)
1030{
1031 global $root, $pageno, $tabno;
1032 if ($object_id <= 0)
1033 {
591ff2c4 1034 showError ('Invalid object_id', __FUNCTION__);
e673ee24
DO
1035 return;
1036 }
1037 showMessageOrError();
1038 startPortlet ('Ports and interfaces');
1039 $ports = getObjectPortsAndLinks ($object_id);
1040 usort($ports, 'sortByName');
1041 echo "<table cellspacing=0 cellpadding='5' align='center' class='widetable'>\n";
1042 echo "<tr><th>&nbsp;</th><th>Local name</th><th>Visible label</th><th>Port type</th><th>L2 address</th>";
1043 echo "<th>Rem. object</th><th>Rem. port</th><th>(Un)link or (un)reserve</th><th>&nbsp;</th></tr>\n";
1044 foreach ($ports as $port)
1045 {
7056988c 1046 printOpFormIntro ('editPort', array ('port_id' => $port['id']));
e673ee24
DO
1047 echo "<tr><td><a href='${root}process.php?op=delPort&page=${pageno}&tab=${tabno}&port_id=${port['id']}&object_id=$object_id&port_name=${port['name']}'>";
1048 printImageHREF ('delete', 'Unlink and Delete this port');
1049 echo "</a></td>\n";
1050 echo "<td><input type=text name=name value='${port['name']}' size=8></td>";
1051 echo "<td><input type=text name=label value='${port['label']}' size=24></td>";
1052 echo "<td>${port['type']}</td>\n";
1053 echo "<td><input type=text name=l2address value='${port['l2address']}'></td>\n";
1054 if ($port['remote_object_id'])
1055 {
1056 echo "<td><a href='${root}?page=object&object_id=${port['remote_object_id']}'>${port['remote_object_name']}</a></td>";
1057 echo "<td>${port['remote_name']}</td>";
1058 echo "<td><a href='${root}process.php?op=unlinkPort&page=${pageno}&tab=${tabno}&port_id=${port['id']}&object_id=$object_id&port_name=";
1059 echo urlencode ($port['name']);
1060 echo "&remote_port_name=${port['remote_name']}&remote_object_name=${port['remote_object_name']}'>";
1061 printImageHREF ('unlink', 'Unlink this port');
1062 echo "</a></td>";
1063 }
1064 elseif (!empty ($port['reservation_comment']))
1065 {
1066 echo "<td><b>Reserved;</b></td>";
1067 echo "<td><input type=text name=reservation_comment value='${port['reservation_comment']}'></td>";
1068 echo "<td><a href='${root}process.php?op=useup&page=${pageno}&tab=${tabno}&port_id=${port['id']}&object_id=${object_id}'>";
1069 printImageHREF ('useup', 'Use up this port');
1070 echo "</a></td>";
1071 }
1072 else
1073 {
1074 echo "<td>&nbsp;</td><td>&nbsp;</td>";
1075 echo "<td>";
1076 echo "<a href='javascript:;' onclick='window.open(\"${root}link_helper.php?port=${port['id']}&type=${port['type_id']}&object_id=$object_id&port_name=";
1077 echo urlencode ($port['name']);
1078 echo "\",\"findlink\",\"height=700, width=400, location=no, menubar=no, resizable=yes, scrollbars=no, status=no, titlebar=no, toolbar=no\");'>";
1079 printImageHREF ('link', 'Link this port');
1080 echo "</a> <input type=text name=reservation_comment>";
1081 echo "</td>\n";
1082 }
5bbbeaa2
DO
1083 echo "<td>";
1084 printImageHREF ('save', 'Save changes', TRUE);
1085 echo "</td></form></tr>\n";
e673ee24 1086 }
7056988c
DO
1087 printOpFormIntro ('addPort');
1088 echo "<tr><td>";
d48d8820
DO
1089 printImageHREF ('add', '', TRUE, 104);
1090 echo "</td><td><input type=text size=8 name=port_name tabindex=100></td>\n";
e673ee24 1091 echo "<td><input type=text size=24 name=port_label tabindex=101></td>";
e673ee24
DO
1092 echo "<td><select name='port_type_id' tabindex=102>\n";
1093 $types = getPortTypes();
9c0b0016 1094 $default_port_type = getConfigVar ('default_port_type');
e673ee24
DO
1095 foreach ($types as $typeid => $typename)
1096 {
1097 echo "<option value='${typeid}'";
1098 if ($typeid == $default_port_type)
1099 echo " selected";
1100 echo ">${typename}</option>\n";
1101 }
1102 echo "</select></td>";
1103 echo "<td><input type=text name=port_l2address tabindex=103></td>\n";
d48d8820 1104 echo "<td colspan=4>&nbsp;</td></tr></form>";
e673ee24
DO
1105 echo "</table><br>\n";
1106 finishPortlet();
1107
1108 startPortlet ('Add/update multiple ports');
7056988c 1109 printOpFormIntro ('addMultiPorts');
e673ee24 1110 echo 'Format: <select name=format>';
e673ee24
DO
1111 echo '<option value=c3600asy>Cisco 3600 async: sh line | inc TTY</option>';
1112 echo '<option value=fiwg selected>Foundry ServerIron/FastIron WorkGroup/Edge: sh int br</option>';
e673ee24 1113 echo '<option value=fisxii>Foundry FastIron SuperX/II4000: sh int br</option>';
351d4dbf 1114 echo '<option value=ssv1>SSV:&lt;interface name&gt; &lt;MAC address&gt;</option>';
e673ee24
DO
1115 echo "</select>";
1116 echo 'Default port type: ';
1117 echo "<select name=port_type>\n";
1118 foreach ($types as $typeid => $typename)
1119 {
1120 echo "<option value='${typeid}'";
1121 if ($typeid == $default_port_type)
1122 echo " selected";
1123 echo ">${typename}</option>\n";
1124 }
1125 echo "</select>";
1126 echo "<input type=submit value='Parse output'><br>\n";
1127 echo "<textarea name=input cols=100 rows=50></textarea><br>\n";
1128 echo '</form>';
1129 finishPortlet();
1130}
1131
72d8ced3 1132function renderIPv4ForObject ($object_id = 0)
e673ee24 1133{
52c836b1 1134 global $root, $pageno, $tabno, $aat;
e673ee24
DO
1135 if ($object_id <= 0)
1136 {
591ff2c4 1137 showError ('Invalid object_id', __FUNCTION__);
e673ee24
DO
1138 return;
1139 }
1140 showMessageOrError();
72d8ced3 1141 startPortlet ('Allocations');
85970da2 1142 $alloclist = getObjectIPv4Allocations ($object_id);
e673ee24 1143 echo "<table cellspacing=0 cellpadding='5' align='center' class='widetable'>\n";
72d8ced3 1144 echo "<tr><th>&nbsp;</th><th>OS interface</th><th>IP address</th><th>description</th><th>type</th><th>misc</th><th>&nbsp</th></tr>\n";
85970da2 1145 foreach ($alloclist as $dottedquad => $alloc)
e673ee24 1146 {
85970da2
DO
1147 $address_name = niftyString ($alloc['addrinfo']['name']);
1148 $class = $alloc['addrinfo']['class'];
1149 printOpFormIntro ('updIPv4Allocation', array ('ip' => $dottedquad));
1150 echo "<tr class='$class'><td><a href='${root}process.php?op=delIPv4Allocation&page=${pageno}&tab=${tabno}&ip=${dottedquad}&object_id=$object_id'>";
e673ee24
DO
1151 printImageHREF ('delete', 'Delete this IPv4 address');
1152 echo "</a></td>";
85970da2
DO
1153 echo "<td class=tdleft><input type='text' name='bond_name' value='${alloc['osif']}' size=10></td>";
1154 echo "<td class=tdleft><a href='${root}?page=ipaddress&ip=${dottedquad}'>${dottedquad}</a></td>";
52c836b1 1155 echo "<td class='description'>$address_name</td>\n<td>";
85970da2 1156 printSelect ($aat, 'bond_type', $alloc['type']);
e673ee24 1157 echo "</td><td>";
85970da2 1158 $prefix = '';
4940e4d5 1159 if ($alloc['addrinfo']['reserved'] == 'yes')
e673ee24 1160 {
85970da2
DO
1161 echo $prefix . '<strong>RESERVED</strong>';
1162 $prefix = '; ';
e673ee24 1163 }
85970da2 1164 foreach ($alloc['addrinfo']['allocs'] as $allocpeer)
e673ee24 1165 {
85970da2
DO
1166 if ($allocpeer['object_id'] == $object_id)
1167 continue;
1168 echo $prefix . "<a href='${root}?page=object&object_id=${allocpeer['object_id']}'>";
1169 if (!empty ($allocpeer['osif']))
1170 echo $allocpeer['osif'] . '@';
1171 echo $allocpeer['object_name'] . '</a>';
1172 $prefix = '; ';
e673ee24 1173 }
d54b9495
DO
1174 echo "</td><td>";
1175 printImageHREF ('save', 'Save changes', TRUE);
1176 echo "</td></form></tr>\n";
e673ee24
DO
1177 }
1178
7056988c
DO
1179 printOpFormIntro ('addIPv4Allocation');
1180 echo "<tr><td>";
d54b9495 1181 printImageHREF ('add', 'Allocate new address', TRUE, 99);
7056988c
DO
1182 echo "</td>";
1183 echo "<td class=tdleft><input type='text' size='10' name='bond_name' tabindex=100></td>\n";
1184 echo "<td class=tdleft><input type=text name='ip' tabindex=101></td>\n";
1185 echo "<td>&nbsp;</td><td>";
52c836b1 1186 printSelect ($aat, 'bond_type');
7056988c 1187 echo "</td><td colspan=2>&nbsp;</td></tr></form></table><br>\n";
e673ee24
DO
1188 finishPortlet();
1189
1190}
1191
baf37d01
DO
1192// Log structure versions:
1193// 1: the whole structure is a list of code-message pairs
1194// 2 and later: there's a "v" field set, which indicates the version
1195// 2: there's a "m" list set to hold message code and optional arguments
e673ee24
DO
1196function printLog ($log)
1197{
baf37d01
DO
1198 switch (TRUE)
1199 {
1200 case !isset ($log['v']):
ebb5441d 1201 case $log['v'] == 1:
baf37d01 1202 foreach ($log as $key => $record)
ebb5441d 1203 if ($key !== 'v')
baf37d01
DO
1204 echo "<div class=msg_${record['code']}>${record['message']}</div>";
1205 break;
1206 case $log['v'] == 2:
1207 $msginfo = array
1208 (
ebb5441d 1209 0 => array ('code' => 'success', 'format' => 'Success: %s'),
baf37d01
DO
1210 1 => array ('code' => 'success', 'format' => '%u new records done, %u already existed'),
1211 2 => array ('code' => 'success', 'format' => 'NATv4 rule was successfully added.'),
1212 3 => array ('code' => 'success', 'format' => 'NATv4 rule was successfully deleted.'),
1213 4 => array ('code' => 'success', 'format' => 'NATv4 rule was successfully updated'),
1214 5 => array ('code' => 'success', 'format' => 'Port %s was added successfully'),
1215 6 => array ('code' => 'success', 'format' => 'Port %s was updated successfully'),
1216 7 => array ('code' => 'success', 'format' => 'Port %s was deleted successfully'),
1217 8 => array ('code' => 'success', 'format' => 'Port %s successfully linked with port %s at object %s'),
1218 9 => array ('code' => 'success', 'format' => 'Port %s was successfully unlinked from %s@%s'),
1219 10 => array ('code' => 'success', 'format' => 'Added %u ports, updated %u ports, encountered %u errors.'),
1220 11 => array ('code' => 'success', 'format' => 'Reservation removed.'),
1221 12 => array ('code' => 'success', 'format' => 'allocation updated'),
1222 13 => array ('code' => 'success', 'format' => 'allocated'),
1223 14 => array ('code' => 'success', 'format' => 'deallocated'),
1224 15 => array ('code' => 'success', 'format' => 'Reset succeeded.'),
1225 16 => array ('code' => 'success', 'format' => 'Update done'),
1226 17 => array ('code' => 'success', 'format' => 'Update(s) succeeded.'),
1227 18 => array ('code' => 'success', 'format' => 'Load balancer was successfully added'),
1228 19 => array ('code' => 'success', 'format' => 'Load balancer was successfully deleted'),
1229 20 => array ('code' => 'success', 'format' => 'Load balancer info was successfully updated'),
1230 21 => array ('code' => 'success', 'format' => 'Generation complete'),
1231 22 => array ('code' => 'success', 'format' => 'Chained %u tags'),
1232 23 => array ('code' => 'success', 'format' => 'IPv4 prefix successfully added'),
1233 24 => array ('code' => 'success', 'format' => 'IPv4 prefix deleted'),
1234 25 => array ('code' => 'success', 'format' => 'IPv4 prefix updated'),
1235 26 => array ('code' => 'success', 'format' => '%u IP address(es) were successfully updated'),
1236 27 => array ('code' => 'success', 'format' => 'IPv4 address updated'),
1237 28 => array ('code' => 'success', 'format' => 'Virtual service was successfully created'),
1238 29 => array ('code' => 'success', 'format' => 'Virtual service was successfully deleted'),
1239 30 => array ('code' => 'success', 'format' => 'Virtual service was successfully updated'),
1240 31 => array ('code' => 'success', 'format' => 'RS pool was successfully created'),
1241 32 => array ('code' => 'success', 'format' => 'RS pool was successfully deleted'),
1242 33 => array ('code' => 'success', 'format' => 'RS pool was successfully updated'),
1243 34 => array ('code' => 'success', 'format' => 'Real server was successfully added'),
1244 35 => array ('code' => 'success', 'format' => 'Real server was successfully deleted'),
1245 36 => array ('code' => 'success', 'format' => 'Real server was successfully updated'),
1246 37 => array ('code' => 'success', 'format' => 'Successfully added %u real servers'),
1247 38 => array ('code' => 'success', 'format' => '%u real server(s) were successfully (de)activated'),
1248 39 => array ('code' => 'success', 'format' => 'User account %s updated.'),
1249 40 => array ('code' => 'success', 'format' => 'User account %s created.'),
1250 41 => array ('code' => 'success', 'format' => 'User account disabled.'),
1251 42 => array ('code' => 'success', 'format' => 'User account enabled.'),
1252 43 => array ('code' => 'success', 'format' => 'Saved successfully.'),
1253 44 => array ('code' => 'success', 'format' => '%s failures and %s successfull changes.'),
1254 45 => array ('code' => 'success', 'format' => "Attribute '%s' created."),
1255 46 => array ('code' => 'success', 'format' => 'Rename successful.'),
1256 47 => array ('code' => 'success', 'format' => 'Attribute was deleted.'),
1257 48 => array ('code' => 'success', 'format' => 'Supplement succeeded.'),
1258 49 => array ('code' => 'success', 'format' => 'Reduction succeeded.'),
1259 50 => array ('code' => 'success', 'format' => 'Reduction succeeded.'),
1260 51 => array ('code' => 'success', 'format' => 'Update succeeded.'),
1261 52 => array ('code' => 'success', 'format' => 'Supplement succeeded.'),
1262 53 => array ('code' => 'success', 'format' => 'Chapter was deleted.'),
1263 54 => array ('code' => 'success', 'format' => 'Chapter was updated.'),
1264 55 => array ('code' => 'success', 'format' => 'Chapter was added.'),
1265 56 => array ('code' => 'success', 'format' => 'Update succeeded.'),
1266 57 => array ('code' => 'success', 'format' => 'Reset complete'),
1267 58 => array ('code' => 'success', 'format' => "Successfully deleted tag ."),
1268 59 => array ('code' => 'success', 'format' => "Created tag '%s'."),
1269 60 => array ('code' => 'success', 'format' => "Updated tag '%s'."),
ebb5441d 1270 61 => array ('code' => 'success', 'format' => 'Password changed successfully.'),
24dcb9d8 1271 62 => array ('code' => 'success', 'format' => 'gw: %s'),
f0ff4930
DO
1272 63 => array ('code' => 'success', 'format' => '%u change request(s) have been processed'),
1273 64 => array ('code' => 'success', 'format' => 'Port %s@%s has been assigned to VLAN %u'),
f19c75d6 1274 65 => array ('code' => 'success', 'format' => "Added new rack '%s'"),
03e6ef01 1275 66 => array ('code' => 'success', 'format' => "File sent Ok via handler '%s'"),
abef7149 1276 67 => array ('code' => 'success', 'format' => "Tag rolling done, %u objects involved"),
0c2b7c4a 1277 68 => array ('code' => 'success', 'format' => "Updated rack '%s'"),
f0ff4930 1278
ebb5441d
DO
1279 100 => array ('code' => 'error', 'format' => 'Generic error: %s'),
1280 101 => array ('code' => 'error', 'format' => 'Port name cannot be empty'),
1281 102 => array ('code' => 'error', 'format' => "Error creating user account '%s'"),
1282 103 => array ('code' => 'error', 'format' => 'getHashByID() failed'),
1283 104 => array ('code' => 'error', 'format' => "Error updating user account '%s'"),
1284 105 => array ('code' => 'error', 'format' => 'Error enabling user account.'),
1285 106 => array ('code' => 'error', 'format' => 'Error disabling user account.'),
1286 107 => array ('code' => 'error', 'format' => 'Admin account cannot be disabled'),
1287 108 => array ('code' => 'error', 'format' => '%u failures and %u successfull changes.'),
1288 109 => array ('code' => 'error', 'format' => 'Update failed!'),
1289 110 => array ('code' => 'error', 'format' => 'Supplement failed!'),
1290 111 => array ('code' => 'error', 'format' => 'Reduction failed!'),
1291 112 => array ('code' => 'error', 'format' => 'Error adding chapter.'),
1292 113 => array ('code' => 'error', 'format' => 'Error updating chapter.'),
1293 114 => array ('code' => 'error', 'format' => 'Error deleting chapter.'),
1294 115 => array ('code' => 'error', 'format' => 'Error renaming attribute.'),
1295 116 => array ('code' => 'error', 'format' => 'Error creating attribute.'),
1296 117 => array ('code' => 'error', 'format' => 'Error deleting attribute.'),
1297 118 => array ('code' => 'error', 'format' => 'Supplement failed!'),
1298 119 => array ('code' => 'error', 'format' => 'Reduction failed!'),
1299 120 => array ('code' => 'error', 'format' => 'Reset failed!'),
1300 121 => array ('code' => 'error', 'format' => 'commitUpdateObject() failed'),
1301 122 => array ('code' => 'error', 'format' => 'One or more update(s) failed!'),
1302 123 => array ('code' => 'error', 'format' => 'Cannot process submitted data: unknown format code.'),
1303 124 => array ('code' => 'error', 'format' => 'Error removing reservation!'),
1304 125 => array ('code' => 'error', 'format' => "Update failed with error: '%s'"),
1305 126 => array ('code' => 'error', 'format' => 'addRStoRSPool() failed'),
1306 127 => array ('code' => 'error', 'format' => 'Added %u real servers and encountered %u errors'),
1307 128 => array ('code' => 'error', 'format' => 'commitDeleteRS() failed'),
1308 129 => array ('code' => 'error', 'format' => 'commitDeleteLB() failed'),
1309 130 => array ('code' => 'error', 'format' => 'commitDeleteVS() failed'),
1310 131 => array ('code' => 'error', 'format' => 'invalid format requested'),
1311 132 => array ('code' => 'error', 'format' => 'invalid protocol'),
1312 133 => array ('code' => 'error', 'format' => 'commitUpdateRS() failed'),
1313 134 => array ('code' => 'error', 'format' => 'commitUpdateLB() failed'),
1314 135 => array ('code' => 'error', 'format' => 'commitUpdateVS() failed'),
1315 136 => array ('code' => 'error', 'format' => 'addLBtoRSPool() failed'),
1316 137 => array ('code' => 'error', 'format' => 'addLBtoRSPool() failed'),
1317 138 => array ('code' => 'error', 'format' => 'commitDeleteRSPool() failed'),
1318 139 => array ('code' => 'error', 'format' => 'commitUpdateRSPool() failed'),
1319 140 => array ('code' => 'error', 'format' => 'Encountered %u errors, (de)activated %u real servers'),
1320 141 => array ('code' => 'error', 'format' => 'Encountered %u errors, updated %u IP address(es)'),
1321 142 => array ('code' => 'error', 'format' => 'executeAutoPorts() failed'),
1322 143 => array ('code' => 'error', 'format' => 'Tried chaining %u tags, but experienced %u errors.'),
1323 144 => array ('code' => 'error', 'format' => "Error deleting tag: '%s'"),
1324 145 => array ('code' => 'error', 'format' => "Invalid tag name '%s'"),
1325 146 => array ('code' => 'error', 'format' => "Tag '%s' (or similar name) already exists"),
1326 147 => array ('code' => 'error', 'format' => "Could not create tag '%s' because of error '%s'"),
1327 148 => array ('code' => 'error', 'format' => "Could not update tag '%s' because of error '%s'"),
1328 149 => array ('code' => 'error', 'format' => 'Turing test failed'),
1329 150 => array ('code' => 'error', 'format' => 'Can only change password under DB authentication.'),
1330 151 => array ('code' => 'error', 'format' => 'Old password doesn\'t match.'),
1331 152 => array ('code' => 'error', 'format' => 'New passwords don\'t match.'),
1332 153 => array ('code' => 'error', 'format' => 'Password change failed.'),
1333 154 => array ('code' => 'error', 'format' => "Verification error: %s"),
1334 155 => array ('code' => 'error', 'format' => 'Save failed.'),
1335 156 => array ('code' => 'error', 'format' => 'getSwitchVLANs() failed'),
e81fb764 1336 157 => array ('code' => 'error', 'format' => 'operation not permitted'),
24dcb9d8
DO
1337 158 => array ('code' => 'error', 'format' => 'Ignoring malformed record #%u in form submit'),
1338 159 => array ('code' => 'error', 'format' => 'Permission denied moving port %s from VLAN%u to VLAN%u'),
1339 160 => array ('code' => 'error', 'format' => 'Invalid arguments'),
1340 161 => array ('code' => 'error', 'format' => 'Endpoint not found. Please either set FQDN attribute or assign an IP address to the object.'),
1341 162 => array ('code' => 'error', 'format' => 'More than one IP address is assigned to this object, please configure FQDN attribute.'),
1342 163 => array ('code' => 'error', 'format' => 'Failed to get any response from queryGateway() or the gateway died'),
c030232f 1343 164 => array ('code' => 'error', 'format' => 'Gateway failure: %s.'),
24dcb9d8
DO
1344 165 => array ('code' => 'error', 'format' => 'Gateway failure: malformed reply.'),
1345 166 => array ('code' => 'error', 'format' => 'gw: %s'),
f0ff4930
DO
1346 167 => array ('code' => 'error', 'format' => 'Could not find port %s'),
1347 168 => array ('code' => 'error', 'format' => 'Port %s is a trunk'),
1348 169 => array ('code' => 'error', 'format' => 'Failed to configure %s, connector returned code %u'),
5222f192 1349 170 => array ('code' => 'error', 'format' => 'There is no network for IP address "%s"'),
f19c75d6
DO
1350 171 => array ('code' => 'error', 'format' => "Failed creating rack '%s'. Already exists in this row?"),
1351 172 => array ('code' => 'error', 'format' => 'Malformed request'),
e5c4506d
DO
1352 173 => array ('code' => 'error', 'format' => "Invalid IPv4 prefix '%s'"),
1353 174 => array ('code' => 'error', 'format' => 'Bad IPv4 address'),
1354 175 => array ('code' => 'error', 'format' => 'Invalid netmask'),
1355 176 => array ('code' => 'error', 'format' => 'This network already exists'),
0c2b7c4a 1356 177 => array ('code' => 'error', 'format' => 'commitUpdateRack() failed'),
f0ff4930 1357
24dcb9d8
DO
1358 200 => array ('code' => 'warning', 'format' => 'generic warning: %s'),
1359 201 => array ('code' => 'warning', 'format' => 'nothing happened...'),
1360 202 => array ('code' => 'warning', 'format' => 'gw: %s'),
f0ff4930
DO
1361 203 => array ('code' => 'warning', 'format' => 'Port %s seems to be the first in VLAN %u at this switch.'),
1362 204 => array ('code' => 'warning', 'format' => 'Check uplink/downlink configuration for proper operation.'),
1363 205 => array ('code' => 'warning', 'format' => '%u change request(s) have been ignored'),
baf37d01
DO
1364 );
1365 // Handle the arguments. Is there any better way to do it?
1366 foreach ($log['m'] as $record)
1367 {
5222f192
DO
1368 if (!isset ($record['c']) or !isset ($msginfo[$record['c']]))
1369 {
1370 echo '<div class=msg_neutral>(this message was lost)</div>';
1371 continue;
1372 }
baf37d01
DO
1373 if (isset ($record['a']))
1374 switch (count ($record['a']))
1375 {
1376 case 1:
1377 $msgtext = sprintf
1378 (
1379 $msginfo[$record['c']]['format'],
1380 $record['a'][0]
1381 );
1382 break;
1383 case 2:
1384 $msgtext = sprintf
1385 (
1386 $msginfo[$record['c']]['format'],
1387 $record['a'][0],
1388 $record['a'][1]
1389 );
1390 break;
1391 case 3:
1392 $msgtext = sprintf
1393 (
1394 $msginfo[$record['c']]['format'],
1395 $record['a'][0],
1396 $record['a'][1],
1397 $record['a'][2]
1398 );
1399 break;
1400 case 4:
1401 default:
1402 $msgtext = sprintf
1403 (
1404 $msginfo[$record['c']]['format'],
1405 $record['a'][0],
1406 $record['a'][1],
1407 $record['a'][2],
1408 $record['a'][3]
1409 );
1410 break;
1411 }
1412 else
1413 $msgtext = $msginfo[$record['c']]['format'];
1414 echo '<div class=msg_' . $msginfo[$record['c']]['code'] . ">${msgtext}</div>";
1415 }
1416 break;
1417 default:
1418 echo '<div class=msg_error>' . __FUNCTION__ . ': internal error</div>';
1419 break;
1420 }
e673ee24
DO
1421}
1422
1423/*
1424The following conditions must be followed:
14251. We can mount onto free atoms only. This means: if any record for an atom
1426already exists in RackSpace, it can't be used for mounting.
14272. We can't unmount from 'W' atoms. Operator should review appropriate comments
1428and either delete them before unmounting or refuse to unmount the object.
1429*/
1430
1431// We extensively use $_REQUEST in the function.
7056988c 1432// FIXME: move related code into ophandler
e673ee24
DO
1433function renderRackSpaceForObject ($object_id = 0)
1434{
1435 if ($object_id <= 0)
1436 {
591ff2c4 1437 showError ('Invalid object_id', __FUNCTION__);
e673ee24
DO
1438 return;
1439 }
1440 $is_submit = isset ($_REQUEST['got_atoms']);
1441 $is_update = isset ($_REQUEST['rackmulti'][0]);
1442 $info = getObjectInfo ($object_id);
1443 if ($info == NULL)
1444 {
591ff2c4 1445 showError ('getObjectInfo() failed', __FUNCTION__);
e673ee24
DO
1446 return;
1447 }
1448 // Always process occupied racks plus racks chosen by user. First get racks with
1449 // already allocated rackspace...
1450 $workingRacksData = getResidentRacksData ($object_id);
1451 if ($workingRacksData === NULL)
1452 {
1453 print_r ($workingRacksData);
591ff2c4 1454 showError ('getResidentRacksData() failed', __FUNCTION__);
e673ee24
DO
1455 return;
1456 }
1457
1458 // ...and then add those chosen by user (if any).
1459 if ($is_update)
1460 foreach ($_REQUEST['rackmulti'] as $cand_id)
1461 {
1462 if (!isset ($workingRacksData[$cand_id]))
1463 {
1464 $rackData = getRackData ($cand_id);
1465 if ($rackData == NULL)
1466 {
591ff2c4 1467 showError ('getRackData() failed', __FUNCTION__);
e673ee24
DO
1468 return NULL;
1469 }
1470 $workingRacksData[$cand_id] = $rackData;
1471 }
1472 }
1473
1474 // Do it only once...
1475 foreach ($workingRacksData as &$rackData)
1476 applyObjectMountMask ($rackData, $object_id);
1477 // Now we workaround an old caveat: http://bugs.php.net/bug.php?id=37410
1478 unset ($rackData);
1479
1480 // Here we process form submit by trying to save all submitted info to database.
1481 if ($is_submit)
1482 {
1483 $oldMolecule = getMoleculeForObject ($object_id);
1484 $worldchanged = FALSE;
1485 $log = array();
1486 foreach ($workingRacksData as $rack_id => $rackData)
1487 {
1488 $logrecord = processGridForm ($rackData, 'F', 'T', $object_id);
1489 $log[] = $logrecord;
1490 if ($logrecord['code'] != 300)
1491 {
1492 $worldchanged = TRUE;
1493 // Reload our working copy after form processing.
1494 $rackData = getRackData ($rack_id);
1495 if ($rackData == NULL)
4d2e93f2 1496 $log[] = array ('code' => 500, 'message' => 'Working copy update failed in ', __FUNCTION__);
e673ee24
DO
1497 applyObjectMountMask ($rackData, $object_id);
1498 $workingRacksData[$rack_id] = $rackData;
1499 }
1500 }
1501 if ($worldchanged)
1502 {
1503 // Log a record.
1504 $newMolecule = getMoleculeForObject ($object_id);
1505 $oc = count ($oldMolecule);
1506 $nc = count ($newMolecule);
1507 $omid = $oc ? createMolecule ($oldMolecule) : 'NULL';
1508 $nmid = $nc ? createMolecule ($newMolecule) : 'NULL';
1509 global $remote_username;
1510 $comment = empty ($_REQUEST['comment']) ? 'NULL' : "'${_REQUEST['comment']}'";
1511 $query =
1512 "insert into MountOperation(object_id, old_molecule_id, new_molecule_id, user_name, comment) " .
1513 "values (${object_id}, ${omid}, ${nmid}, '${remote_username}', ${comment})";
1514 global $dbxlink;
1515 $result = $dbxlink->query ($query);
1516 if ($result == NULL)
1517 $log[] = array ('code' => 'error', 'message' => 'SQL query failed during history logging.');
1518 else
1519 $log[] = array ('code' => 'success', 'message' => 'History logged.');
1520 }
1521 printLog ($log);
1522 }
1523
1524 // This is the time for rendering.
1525 global $root, $pageno, $tabno;
1526 echo "<form id='racks' action='${root}'>";
1527 echo "<input type=hidden name=page value='${pageno}'>\n";
1528 echo "<input type=hidden name=tab value='${tabno}'>\n";
1529 echo "<input type=hidden name=object_id value='${object_id}'>\n";
1530 // Main layout starts.
1531 echo "<table border=0 class=objectview cellspacing=0 cellpadding=0><tr>";
1532
1533 // Left portlet with rack list.
1534 echo "<td class=pcleft height='1%'>";
1535 startPortlet ('Racks');
1536 $allRacksData = getRacksForRow();
4b8d413e
DO
1537 if (count ($allRacksData) <= getConfigVar ('RACK_PRESELECT_THRESHOLD'))
1538 {
1539 foreach (array_keys ($allRacksData) as $rack_id)
1540 {
1541 $rackData = getRackData ($rack_id);
1542 if ($rackData == NULL)
1543 {
1544 showError ('getRackData() failed', __FUNCTION__);
1545 return NULL;
1546 }
1547 $workingRacksData[$rack_id] = $rackData;
1548 }
1549 foreach ($workingRacksData as &$rackData)
1550 applyObjectMountMask ($rackData, $object_id);
1551 unset ($rackData);
1552 }
1553 renderRackMultiSelect ('rackmulti[]', $allRacksData, array_keys ($workingRacksData));
e673ee24
DO
1554 echo "<br>";
1555 echo "<br>";
1556 finishPortlet();
1557 echo "</td>";
1558
1559 // Middle portlet with comment and submit.
1560 echo "<td class=pcleft>";
1561 startPortlet ('Comment');
1562 echo "<textarea name=comment rows=10 cols=40></textarea><br>\n";
1563 echo "<input type=submit value='Save' name=got_atoms>\n";
1564 echo "<br>";
1565 echo "<br>";
1566 finishPortlet();
1567 echo "</td>";
1568
1569 // Right portlet with rendered racks. If this form submit is not final, we have to
1570 // reflect the former state of the grid in current form.
1571 echo "<td class=pcright rowspan=2 height='1%'>";
1572 startPortlet ('Working copy');
1573 echo '<table border=0 cellspacing=10 align=center><tr>';
1574 foreach ($workingRacksData as $rack_id => $rackData)
1575 {
1576 // Order is important here: only original allocation is highlighted.
1577 highlightObject ($rackData, $object_id);
1578 markupAtomGrid ($rackData, 'T');
1579 // If we have a form processed, discard user input and show new database
1580 // contents.
1581 if (!$is_submit and $is_update)
1582 mergeGridFormToRack ($rackData);
1583 echo "<td valign=top>";
1584 echo "<center>\n<h2>${rackData['name']}</h2>\n";
1585 echo "<table class=rack border=0 cellspacing=0 cellpadding=1>\n";
1586 echo "<tr><th width='10%'>&nbsp;</th><th width='20%'>Front</th>";
1587 echo "<th width='50%'>Interior</th><th width='20%'>Back</th></tr>\n";
1588 renderAtomGrid ($rackData);
9b7468b7
DO
1589 echo "<tr><th width='10%'>&nbsp;</th><th width='20%'>Front</th>";
1590 echo "<th width='50%'>Interior</th><th width='20%'>Back</th></tr>\n";
e673ee24
DO
1591 echo "</table></center>\n";
1592 echo '</td>';
1593 }
1594 echo "</tr></table>";
1595 finishPortlet();
1596 echo "</td>\n";
1597
1598 echo "</form>\n";
1599 echo "</tr></table>\n";
1600}
1601
1602function renderMolecule ($mdata, $object_id)
1603{
1604 // sort data out
1605 $rackpack = array();
1606 global $loclist;
64b95774 1607 foreach ($mdata as $rua)
e673ee24
DO
1608 {
1609 $rack_id = $rua['rack_id'];
1610 $unit_no = $rua['unit_no'];
1611 $atom = $rua['atom'];
1612 if (!isset ($rackpack[$rack_id]))
1613 {
1614 $rackData = getRackData ($rack_id);
1615 for ($i = $rackData['height']; $i > 0; $i--)
1616 for ($locidx = 0; $locidx < 3; $locidx++)
1617 $rackData[$i][$locidx]['state'] = 'F';
1618 $rackpack[$rack_id] = $rackData;
1619 }
1620 $rackpack[$rack_id][$unit_no][$loclist[$atom]]['state'] = 'T';
1621 $rackpack[$rack_id][$unit_no][$loclist[$atom]]['object_id'] = $object_id;
1622 }
1623 // now we have some racks to render
64b95774 1624 foreach ($rackpack as $rackData)
e673ee24
DO
1625 {
1626 markAllSpans ($rackData);
1627 echo "<table class=molecule cellspacing=0>\n";
1628 echo "<caption>${rackData['name']}</caption>\n";
1629 echo "<tr><th width='10%'>&nbsp;</th><th width='20%'>Front</th><th width='50%'>Interior</th><th width='20%'>Back</th></tr>\n";
1630 for ($i = $rackData['height']; $i > 0; $i--)
1631 {
1632 echo "<tr><th>$i</th>";
1633 for ($locidx = 0; $locidx < 3; $locidx++)
1634 {
1635 $state = $rackData[$i][$locidx]['state'];
1636 echo "<td class=state_${state}>&nbsp;</td>\n";
1637 }
1638 echo "</tr>\n";
1639 }
1640 echo "</table>\n";
1641 }
1642}
1643
1644function renderUnmountedObjectsPortlet ()
1645{
1646 startPortlet ('Unmounted objects');
1647 $objs = getUnmountedObjects();
1648 if ($objs === NULL)
1649 {
591ff2c4 1650 showError ('getUnmountedObjects() failed', __FUNCTION__);
e673ee24
DO
1651 return;
1652 }
1653 global $root, $nextorder;
1654 $order = 'odd';
1655 echo '<br><br><table border=0 cellpadding=5 cellspacing=0 align=center class=cooltable>';
18d94c29 1656 echo '<tr><th>Common name</th><th>Visible label</th><th>Asset number</th><th>Barcode</th></tr>';
e673ee24
DO
1657 foreach ($objs as $obj)
1658 {
1659 echo "<tr class=row_${order}><td><a href='${root}?page=object&object_id=${obj['id']}'>${obj['dname']}</a></td>";
1660 echo "<td>${obj['label']}</td>";
18d94c29
DO
1661 echo "<td>${obj['asset_no']}</td>";
1662 echo "<td>${obj['barcode']}</td></tr>";
e673ee24
DO
1663 $order = $nextorder[$order];
1664 }
1665 echo "</table><br>\n";
1666 finishPortlet();
1667}
1668
1669function renderProblematicObjectsPortlet ()
1670{
1671 startPortlet ('Problematic objects');
1672 $objs = getProblematicObjects();
1673 if ($objs === NULL)
1674 {
591ff2c4 1675 showError ('getProblematicObjects() failed', __FUNCTION__);
e673ee24
DO
1676 return;
1677 }
1678 global $root, $nextorder;
1679 $order = 'odd';
1680 echo '<br><br><table border=0 cellpadding=5 cellspacing=0 align=center class=cooltable>';
1681 echo '<tr><th>Type</th><th>Common name</th></tr>';
1682 foreach ($objs as $obj)
1683 {
1684 echo "<tr class=row_${order}><td>${obj['objtype_name']}</td>";
1685 echo "<td><a href='${root}?page=object&object_id=${obj['id']}'>${obj['dname']}</a></tr>";
1686 $order = $nextorder[$order];
1687 }
1688 echo "</table><br>\n";
1689 finishPortlet();
1690}
1691
7cc02fc1
DO
1692function renderObjectSpace ()
1693{
105cea6e 1694 global $root, $taglist, $tagtree;
7cc02fc1
DO
1695 echo "<table border=0 class=objectview>\n";
1696 echo "<tr><td class=pcleft width='50%'>";
1697 startPortlet ('View all by type');
1698 $groupInfo = getObjectGroupInfo();
1699 if ($groupInfo === NULL)
1700 {
1701 showError ('getObjectGroupInfo() failed', __FUNCTION__);
1702 return;
1703 }
1704 if (count ($groupInfo) == 0)
1705 echo "No objects exist in DB";
1706 else
1707 {
1708 echo '<div align=left><ul>';
1709 foreach ($groupInfo as $gi)
1710 echo "<li><a href='${root}?page=objgroup&group_id=${gi['id']}'>${gi['name']}</a> (${gi['count']})</li>";
1711 echo '</ul></div>';
1712 }
1713 finishPortlet();
1714
1715 echo '</td><td class=pcright>';
1716
1717 startPortlet ('View all by tag');
1718 if (count ($taglist) == 0)
1719 echo "No tags exist in DB";
1720 else
1721 renderTagCloud ('object');
1722 finishPortlet();
e673ee24
DO
1723 echo "</td></tr></table>\n";
1724}
1725
466dcbe6 1726function renderObjectGroup ()
7cc02fc1
DO
1727{
1728 global $root, $pageno, $tabno, $nextorder, $taglist, $tagtree;
2c6c7645 1729 assertUIntArg ('group_id', __FUNCTION__, TRUE);
7cc02fc1 1730 $group_id = $_REQUEST['group_id'];
a0d54e7e
DO
1731 $tagfilter = getTagFilter();
1732 $tagfilter_str = getTagFilterStr ($tagfilter);
7cc02fc1
DO
1733 echo "<table border=0 class=objectview>\n";
1734 echo "<tr><td class=pcleft width='25%'>";
1735 startPortlet ('change type');
1736 $groupInfo = getObjectGroupInfo();
1737 if ($groupInfo === NULL)
1738 {
1739 showError ('getObjectGroupInfo() failed', __FUNCTION__);
1740 return;
1741 }
1742 if (count ($groupInfo) == 0)
1743 echo "No objects exist in DB";
1744 else
1745 {
1746 echo '<div align=left><ul>';
1747 foreach ($groupInfo as $gi)
1748 {
a0d54e7e 1749 echo "<li><a href='${root}?page=${pageno}&group_id=${gi['id']}${tagfilter_str}'>";
105cea6e
DO
1750 if ($gi['id'] == $group_id)
1751 echo '<strong>';
1752 echo "${gi['name']}</a>";
1753 if ($gi['id'] == $group_id)
1754 echo '</strong>';
1755 echo " (${gi['count']})";
1756 if ($gi['id'] == $group_id)
1757 echo ' &larr;';
1758 echo "</li>";
7cc02fc1
DO
1759 }
1760 echo '</ul></div>';
1761 }
1762 finishPortlet();
1763
1764 echo '</td><td class=pcleft>';
1765
1766 startPortlet ('Objects');
11c8e4be 1767 $objects = getObjectList ($group_id, $tagfilter, getTFMode());
7cc02fc1
DO
1768 if ($objects === NULL)
1769 {
1770 showError ('getObjectList() failed', __FUNCTION__);
1771 return;
1772 }
1773 echo '<br><br><table border=0 cellpadding=5 cellspacing=0 align=center class=cooltable>';
1774 echo '<tr><th>Common name</th><th>Visible label</th><th>Asset tag</th><th>Barcode</th><th>Rack</th></tr>';
1775 $order = 'odd';
1776 foreach ($objects as $obj)
1777 {
8e700dd1
DO
1778 if (isset ($_REQUEST['hl_object_id']) and $_REQUEST['hl_object_id'] == $obj['id'])
1779 $secondclass = 'tdleft port_highlight';
1780 else
1781 $secondclass = 'tdleft';
1782 echo "<tr class=row_${order}><td class='${secondclass}'><a href='${root}?page=object&object_id=${obj['id']}'>${obj['dname']}</a></td>";
1783 echo "<td class='${secondclass}'>${obj['label']}</td>";
1784 echo "<td class='${secondclass}'>${obj['asset_no']}</td>";
1785 echo "<td class='${secondclass}'>${obj['barcode']}</td>";
7cc02fc1 1786 if ($obj['rack_id'])
8e700dd1 1787 echo "<td class='${secondclass}'><a href='${root}?page=rack&rack_id=${obj['rack_id']}'>${obj['Rack_name']}</a></td>";
7cc02fc1 1788 else
8e700dd1 1789 echo "<td class='${secondclass}'>Unmounted</td>";
7cc02fc1
DO
1790 echo '</tr>';
1791 $order = $nextorder[$order];
1792 }
1793 echo '</table>';
1794 finishPortlet();
1795
1796 echo "</td><td class=pcright width='25%'>";
1797
a0d54e7e 1798 renderTagFilterPortlet ($tagfilter, 'object', 'group_id', $group_id);
7cc02fc1 1799 echo "</td></tr></table>\n";
e673ee24
DO
1800}
1801
1802function renderEmptyPortsSelect ($port_id, $type_id)
1803{
1804 $ports = getEmptyPortsOfType($type_id);
1805 usort($ports, 'sortEmptyPorts');
1806 foreach ($ports as $port)
1807 {
1808 if ($port_id == $port['Port_id'])
1809 continue;
1810 echo "<option value='${port['Port_id']}' onclick='getElementById(\"remote_port_name\").value=\"${port['Port_name']}\"; getElementById(\"remote_object_name\").value=\"${port['Object_name']}\";'>${port['Object_name']} ${port['Port_name']}</option>\n";
1811 }
1812}
1813
6ef9683b 1814function renderAllIPv4Allocations ()
e673ee24 1815{
6ef9683b 1816 $addresses = getAllIPv4Allocations();
e673ee24
DO
1817 usort($addresses, 'sortObjectAddressesAndNames');
1818 foreach ($addresses as $address)
1819 {
1820 echo "<option value='${address['ip']}' onclick='getElementById(\"ip\").value=\"${address['ip']}\";'>${address['object_name']} ${address['name']} ${address['ip']}</option>\n";
1821 }
1822}
1823
1824// History viewer for history-enabled simple dictionaries.
1825function renderHistory ($object_type, $object_id)
1826{
1827 switch ($object_type)
1828 {
1829 case 'row':
1830 $query = "select ctime, user_name, name, deleted, comment from RackRowHistory where id = ${object_id} order by ctime";
1831 $header = '<tr><th>change time</th><th>author</th><th>rack row name</th><th>is deleted?</th><th>rack row comment</th></tr>';
1832 $extra = 4;
1833 break;
1834 case 'rack':
1835 $query =
1836 "select ctime, user_name, rh.name, rh.deleted, d.dict_value as name, rh.height, rh.comment " .
1837 "from RackHistory as rh left join Dictionary as d on rh.row_id = d.dict_key " .
1838 "natural join Chapter " .
1839 "where chapter_name = 'RackRow' and rh.id = ${object_id} order by ctime";
1840 $header = '<tr><th>change time</th><th>author</th><th>rack name</th><th>is deleted?</th><th>rack row name</th><th>rack height</th><th>rack comment</th></tr>';
1841 $extra = 6;
1842 break;
1843 case 'object':
1844 $query =
1845 "select ctime, user_name, name, label, barcode, asset_no, deleted, has_problems, dict_value, comment " .
1846 "from RackObjectHistory inner join Dictionary on objtype_id = dict_key natural join Chapter " .
1847 "where chapter_name = 'RackObjectType' and id=${object_id} order by ctime";
1848 $header = '<tr><th>change time</th><th>author</th><th>common name</th><th>visible label</th><th>barcode</th><th>asset no</th><th>is deleted?</th><th>has problems?</th><th>object type</th><th>comment</th></tr>';
1849 $extra = 9;
1850 break;
1851 default:
591ff2c4 1852 showError ("Uknown object type '${object_type}'", __FUNCTION__);
e673ee24
DO
1853 return;
1854 }
1855 global $dbxlink;
1856 $result = $dbxlink->query ($query);
1857 if ($result == NULL)
1858 {
591ff2c4 1859 showError ('SQL query failed', __FUNCTION__);
e673ee24
DO
1860 return;
1861 }
1862 echo '<table border=0 cellpadding=5 cellspacing=0 align=center class=cooltable>';
1863 $order = 'odd';
1864 global $nextorder;
1865 echo $header;
1866 while ($row = $result->fetch (PDO::FETCH_NUM))
1867 {
1868 echo "<tr class=row_${order}><td>${row[0]}</td>";
1869 for ($i = 1; $i <= $extra; $i++)
1870 echo "<td>" . $row[$i] . "</td>";
1871 echo "</tr>\n";
1872 $order = $nextorder[$order];
1873 }
1874 echo "</table><br>\n";
1875}
1876
1877function renderRackspaceHistory ()
1878{
1879 global $root, $nextorder, $pageno, $tabno;
1880 $order = 'odd';
1881 $history = getRackspaceHistory();
1882 // Show the last operation by default.
1883 if (isset ($_REQUEST['op_id']))
1884 $op_id = $_REQUEST['op_id'];
1885 elseif (isset ($history[0]['mo_id']))
1886 $op_id = $history[0]['mo_id'];
1887 else $op_id = NULL;
1888
1889 $omid = NULL;
1890 $nmid = NULL;
1891 $object_id = 1;
1892 if ($op_id)
1893 list ($omid, $nmid) = getOperationMolecules ($op_id);
1894
1895 // Main layout starts.
1896 echo "<table border=0 class=objectview cellspacing=0 cellpadding=0>";
1897
1898 // Left top portlet with old allocation.
1899 echo "<tr><td class=pcleft>";
1900 startPortlet ('Old allocation');
1901 if ($omid)
1902 {
1903 $oldMolecule = getMolecule ($omid);
1904 renderMolecule ($oldMolecule, $object_id);
1905 }
1906 else
1907 echo "nothing";
1908 finishPortlet();
1909
1910 echo '</td><td class=pcright>';
1911
1912 // Right top portlet with new allocation
1913 startPortlet ('New allocation');
1914 if ($nmid)
1915 {
1916 $newMolecule = getMolecule ($nmid);
1917 renderMolecule ($newMolecule, $object_id);
1918 }
1919 else
1920 echo "nothing";
1921 finishPortlet();
1922
1923 echo '</td></tr><tr><td colspan=2>';
1924
1925 // Bottom portlet with list
1926
1927 startPortlet ('Rackspace allocation history');
1928 echo "<table border=0 cellpadding=5 cellspacing=0 align=center class=cooltable>\n";
1929 echo "<tr><th>timestamp</th><th>author</th><th>rack object ID</th><th>rack object type</th><th>rack object name</th><th>comment</th></tr>\n";
1930 foreach ($history as $row)
1931 {
1932 if ($row['mo_id'] == $op_id)
1933 $class = 'hl';
1934 else
1935 $class = "row_${order}";
1936 echo "<tr class=${class}><td><a href='${root}?page=${pageno}&tab=${tabno}&op_id=${row['mo_id']}'>${row['ctime']}</a></td>";
1937 echo "<td>${row['user_name']}</td>";
1938 echo "<td>${row['ro_id']}</td><td>${row['objtype_name']}</td><td>${row['name']}</td><td>${row['comment']}</td>\n";
1939 echo "</tr>\n";
1940 $order = $nextorder[$order];
1941 }
1942 echo "</table>\n";
1943 finishPortlet();
1944
1945 echo '</td></tr></table>';
1946
1947}
1948
04d619d0 1949function renderIPv4Space ()
e673ee24 1950{
8b4876a5 1951 global $root, $pageno;
a7fe7729 1952
74ccacff
DO
1953 echo "<table border=0 class=objectview>\n";
1954 echo "<tr><td class=pcleft>";
1955
932cf41f 1956 $tagfilter = getTagFilter();
11c8e4be 1957 $addrspaceList = getAddressspaceList ($tagfilter, getTFMode());
57dece2f 1958 $tagcache = array();
04d619d0
DO
1959 startPortlet ('networks (' . count ($addrspaceList) . ')');
1960 echo "<table class='widetable' border=0 cellpadding=5 cellspacing=0 align='center'>\n";
57dece2f 1961 echo "<tr><th>prefix</th><th>name/tags</th><th>%% used</th>";
f0ed1181 1962 if (getConfigVar ('EXT_IPV4_VIEW') == 'yes')
57dece2f
DO
1963 echo "<th>routed by</th>";
1964 echo "</tr>\n";
e673ee24
DO
1965 foreach ($addrspaceList as $iprange)
1966 {
53ef3908 1967 $netdata = getIPv4Network ($iprange['id']);
53ef3908
DO
1968 $total = ($netdata['ip_bin'] | $netdata['mask_bin_inv']) - ($netdata['ip_bin'] & $netdata['mask_bin']) + 1;
1969 $used = count ($netdata['addrlist']);
71287f1c
DO
1970 echo "<tr valign=top>";
1971 printIPv4NetInfoTDs ($netdata);
1972 echo "<td class=tdcenter>";
119f2ad2 1973 renderProgressBar ($used/$total);
57dece2f 1974 echo "<br><small>${used}/${total}</small></td>";
f0ed1181 1975 if (getConfigVar ('EXT_IPV4_VIEW') == 'yes')
57dece2f
DO
1976 printRoutersTD (findRouters ($netdata['addrlist']), $tagcache);
1977 echo "</tr>";
e673ee24
DO
1978 }
1979 echo "</table>\n";
a7fe7729 1980 finishPortlet();
74ccacff 1981 echo '</td><td class=pcright>';
5b7bd02e 1982 renderTagFilterPortlet ($tagfilter, 'ipv4net');
74ccacff 1983 echo "</td></tr></table>\n";
f973f491 1984}
a7fe7729 1985
f973f491
DO
1986function renderIPv4SLB ()
1987{
80e85ea1 1988 global $root, $page, $nextorder;
a7fe7729 1989
6fec9f39 1990 startPortlet ('SLB configuration');
b3c50e6c 1991 echo "<table border=0 width='100%'><tr>";
ee437dab 1992 foreach (array ('ipv4vslist', 'ipv4rsplist', 'rservers', 'lbs') as $pno)
e57dca7f 1993 echo "<td><h3><a href='${root}?page=${pno}'>" . $page[$pno]['title'] . "</a></h3></td>";
b3c50e6c
DO
1994 echo '</tr></table>';
1995 finishPortlet();
1996
c3bdc503 1997 $summary = getSLBSummary();
6fec9f39 1998 startPortlet ('SLB tactical overview');
4cadac8f
DO
1999 // A single id-keyed array isn't used here to preserve existing
2000 // order of LBs returned by getSLBSummary()
c3bdc503
DO
2001 $lblist = array();
2002 $lbdname = array();
4cadac8f 2003 foreach ($summary as $vipdata)
da04825a 2004 foreach (array_keys ($vipdata['lblist']) as $lb_object_id)
c3bdc503
DO
2005 if (!in_array ($lb_object_id, $lblist))
2006 {
2007 $oi = getObjectInfo ($lb_object_id);
2008 $lbdname[$lb_object_id] = $oi['dname'];
2009 $lblist[] = $lb_object_id;
2010 }
2011 if (!count ($summary))
2012 echo 'none configured';
2013 else
2014 {
80e85ea1 2015 $order = 'odd';
c3bdc503 2016 echo "<table class='widetable' border=0 cellpadding=5 cellspacing=0 align='center'>\n";
a7bc13c8 2017 echo "<tr><th>VS&nbsp;&darr; LB&nbsp;&rarr;</th>";
c3bdc503 2018 foreach ($lblist as $lb_object_id)
71b8bda1 2019 echo "<th><a href='${root}?page=object&tab=default&object_id=${lb_object_id}'>" . $lbdname[$lb_object_id] . "</a></th>";
c3bdc503 2020 echo "</tr>\n";
4cadac8f
DO
2021 foreach ($summary as $vsid => $vsdata)
2022 {
49fb2686 2023 echo "<tr class=row_${order}><td class=tdleft><a href='$root?page=ipv4vs&tab=default&vs_id=${vsid}'>";
8d790216 2024 echo buildVServiceName ($vsdata);
6fec9f39
DO
2025 echo '</a>';
2026 if (!empty ($vsdata['name']))
300826cb 2027 echo "<br>${vsdata['name']}";
6fec9f39 2028 echo "</td>";
4cadac8f 2029 foreach ($lblist as $lb_object_id)
da04825a 2030 {
60fbcece 2031 echo '<td class=tdleft>';
2b4eee17 2032 if (!isset ($vsdata['lblist'][$lb_object_id]))
da04825a
DO
2033 echo '&nbsp;';
2034 else
6fec9f39
DO
2035 {
2036 echo $vsdata['lblist'][$lb_object_id]['size'];
79a9edb4
DO
2037// echo " (<a href='${root}?page=ipv4rsp&pool_id=";
2038// echo $vsdata['lblist'][$lb_object_id]['id'] . "'>";
2039// echo $vsdata['lblist'][$lb_object_id]['name'] . '</a>)';
6fec9f39 2040 }
da04825a
DO
2041 echo '</td>';
2042 }
2043 echo "</tr>\n";
80e85ea1 2044 $order = $nextorder[$order];
4cadac8f 2045 }
c3bdc503
DO
2046 echo "</table>\n";
2047 }
a7fe7729 2048 finishPortlet ();
e673ee24
DO
2049}
2050
04d619d0 2051function renderIPv4SpaceEditor ()
e673ee24
DO
2052{
2053 global $root, $pageno, $tabno;
2054 showMessageOrError();
2a201216 2055
a262e150
DO
2056 // IPv4 validator
2057?>
2058 <script type="text/javascript">
2059 function init() {
2060 document.add_new_range.range.setAttribute('match', "^\\d\\d?\\d?\\.\\d\\d?\\d?\\.\\d\\d?\\d?\\.\\d\\d?\\d?\\/\\d\\d?$");
2061
2062 Validate.init();
2063 }
2064 window.onload=init;
2065 </script>
2066<?php
2067
4c0653e2 2068 startPortlet ("Add new");
04d619d0 2069 echo '<table border=0 cellpadding=10 align=center>';
7056988c
DO
2070 // This form requires a name, so JavaScript validator can find it.
2071 // No printOpFormIntro() hence
04d619d0 2072 echo "<form method=post name='add_new_range' action='${root}process.php'>\n";
42023f03 2073 echo "<input type=hidden name=op value=addIPv4Prefix>\n";
2a201216
DY
2074 echo "<input type=hidden name=page value='${pageno}'>\n";
2075 echo "<input type=hidden name=tab value='${tabno}'>\n";
04d619d0
DO
2076 // tags column
2077 echo '<tr><td rowspan=4><h3>assign tags</h3>';
5c0bb421 2078 renderTagSelect();
04d619d0
DO
2079 echo '</td>';
2080 // inputs column
2081 echo "<th class=tdright>prefix</th><td class=tdleft><input type=text name='range' size=18 class='live-validate' tabindex=1></td>";
2082 echo "<tr><th class=tdright>name</th><td class=tdleft><input type=text name='name' size='20' tabindex=2></td></tr>";
2083 echo "<tr><th class=tdright>connected network</th><td class=tdleft><input type=checkbox name='is_bcast' tabindex=3 checked></td></tr>";
2084 echo "<tr><td colspan=2>";
4c0653e2 2085 printImageHREF ('CREATE', 'Add a new network', TRUE, 4);
04d619d0 2086 echo '</td></tr>';
2a201216 2087 echo "</form></table><br><br>\n";
5c0bb421 2088 finishPortlet();
2a201216 2089
e673ee24 2090 $addrspaceList = getAddressspaceList();
04d619d0 2091 if (count ($addrspaceList))
e673ee24 2092 {
04d619d0
DO
2093 startPortlet ('Manage existing (' . count ($addrspaceList) . ')');
2094 echo "<table class='widetable' border=0 cellpadding=5 cellspacing=0 align='center'>\n";
2095 echo "<tr><th>&nbsp;</th><th>prefix</th><th>name</th><th>&nbsp;</th></tr>";
2096 foreach ($addrspaceList as $iprange)
e673ee24 2097 {
04d619d0
DO
2098 $netdata = getIPv4Network ($iprange['id']);
2099 $usedips = count ($netdata['addrlist']);
2100 $totalips = ($netdata['ip_bin'] | $netdata['mask_bin_inv']) - ($netdata['ip_bin'] & $netdata['mask_bin']) + 1;
2101 echo "<form method=post action='${root}process.php?page=${pageno}&tab=${tabno}&op=updIPv4Prefix&id=${iprange['id']}'>";
2102 echo '<tr valign=top><td>';
2103 if ($usedips == 0)
2104 {
2105 echo "<a href='${root}process.php?op=delIPv4Prefix&page=${pageno}&tab=${tabno}&id=${iprange['id']}'>";
2106 printImageHREF ('delete', 'Delete this IP range');
2107 echo "</a>";
2108 }
2109 else
2110 printImageHREF ('nodelete', 'There are IP addresses allocated or reserved');
2111 echo "</td>\n<td class=tdleft>${netdata['ip']}/${netdata['mask']}</td>";
2112 echo "<td><input type=text name=name size=40 value='${netdata['name']}'>";
2113 echo "</td><td>";
2114 printImageHREF ('save', 'Save changes', TRUE);
2115 echo "</td></tr></form>\n";
e673ee24 2116 }
04d619d0
DO
2117 echo "</table>";
2118 finishPortlet();
e673ee24 2119 }
e673ee24
DO
2120}
2121
beb9e88a 2122function renderIPv4Network ($id)
e673ee24 2123{
beb9e88a 2124 global $root, $pageno, $tabno, $aac2;
545478d0
DO
2125 $netmaskbylen = array
2126 (
2127 32 => '255.255.255.255',
2128 31 => '255.255.255.254',
2129 30 => '255.255.255.252',
2130 29 => '255.255.255.248',
2131 28 => '255.255.255.240',
2132 27 => '255.255.255.224',
2133 26 => '255.255.255.192',
2134 25 => '255.255.255.128',
2135 24 => '255.255.255.0',
2136 23 => '255.255.254.0',
2137 22 => '255.255.252.0',
2138 21 => '255.255.248.0',
2139 20 => '255.255.240.0',
2140 19 => '255.255.224.0',
2141 18 => '255.255.192.0',
2142 17 => '255.255.128.0',
2143 16 => '255.255.0.0',
2144 15 => '255.254.0.0',
2145 14 => '255.252.0.0',
2146 13 => '255.248.0.0',
2147 12 => '255.240.0.0',
2148 11 => '255.224.0.0',
2149 10 => '255.192.0.0',
2150 9 => '255.128.0.0',
2151 8 => '255.0.0.0',
2152 7 => '254.0.0.0',
2153 6 => '252.0.0.0',
2154 5 => '248.0.0.0',
2155 4 => '240.0.0.0',
2156 3 => '224.0.0.0',
2157 2 => '192.0.0.0',
2158 1 => '128.0.0.0'
2159 );
2160 $wildcardbylen = array
2161 (
2162 32 => '0.0.0.0',
2163 31 => '0.0.0.1',
2164 30 => '0.0.0.3',
2165 29 => '0.0.0.7',
2166 28 => '0.0.0.15',
2167 27 => '0.0.0.31',
2168 26 => '0.0.0.63',
2169 25 => '0.0.0.127',
2170 24 => '0.0.0.255',
2171 23 => '0.0.1.255',
2172 22 => '0.0.3.255',
2173 21 => '0.0.7.255',
2174 20 => '0.0.15.255',
2175 19 => '0.0.31.255',
2176 18 => '0.0.63.255',
2177 17 => '0.0.127.255',
2178 16 => '0.0.255.25',
2179 15 => '0.1.255.255',
2180 14 => '0.3.255.255',
2181 13 => '0.7.255.255',
2182 12 => '0.15.255.255',
2183 11 => '0.31.255.255',
2184 10 => '0.63.255.255',
2185 9 => '0.127.255.255',
2186 8 => '0.255.255.255',
2187 7 => '1.255.255.255',
2188 6 => '3.255.255.255',
2189 5 => '7.255.255.255',
2190 4 => '15.255.255.255',
2191 3 => '31.255.255.255',
2192 2 => '63.255.255.255',
2193 1 => '127.255.255.255'
2194 );
b901bf1f 2195 $maxperpage = getConfigVar ('IPV4_ADDRS_PER_PAGE');
e673ee24
DO
2196 if (isset($_REQUEST['pg']))
2197 $page = $_REQUEST['pg'];
2198 else
2199 $page=0;
2200
2d318652 2201 $range = getIPv4Network ($id);
2034d968
DO
2202 echo "<table border=0 class=objectview cellspacing=0 cellpadding=0>";
2203 echo "<tr><td colspan=2 align=center><h1>${range['ip']}/${range['mask']}</h1><h2>${range['name']}</h2></td></tr>\n";
2204
2205 echo "<tr><td class=pcleft width='50%'>";
2206 startPortlet ('summary');
2207 $total = ($range['ip_bin'] | $range['mask_bin_inv']) - ($range['ip_bin'] & $range['mask_bin']) + 1;
2208 $used = count ($range['addrlist']);
2209 echo "<table border=0 cellspacing=0 cellpadding=3 width='100%'>\n";
04d619d0
DO
2210
2211 echo "<tr><th width='50%' class=tdright>%% used:</th><td class=tdleft>";
2034d968
DO
2212 renderProgressBar ($used/$total);
2213 echo "&nbsp;${used}/${total}</td></tr>\n";
04d619d0 2214
545478d0
DO
2215 echo "<tr><th width='50%' class=tdright>Netmask:</th><td class=tdleft>";
2216 echo $netmaskbylen[$range['mask']];
2217 echo "</td></tr>\n";
04d619d0 2218
545478d0
DO
2219 echo "<tr><th width='50%' class=tdright>Wildcard bits:</th><td class=tdleft>";
2220 echo $wildcardbylen[$range['mask']];
2221 echo "</td></tr>\n";
04d619d0 2222
f3d0cb20 2223 $routers = findRouters ($range['addrlist']);
f0ed1181 2224 if (getConfigVar ('EXT_IPV4_VIEW') == 'yes' and count ($routers))
04d619d0 2225 {
57dece2f 2226 echo "<tr><th width='50%' class=tdright>Routed by:</th>";
f3d0cb20 2227 printRoutersTD ($routers);
57dece2f 2228 echo "</tr>\n";
04d619d0
DO
2229 }
2230
e2ac59cf 2231 printTagTRs ("${root}?page=ipv4space&");
2034d968
DO
2232 echo "</table><br>\n";
2233 finishPortlet();
2234 echo "</td>\n";
e673ee24 2235
2034d968
DO
2236 echo "<td class=pcright>";
2237 startPortlet ('details');
e673ee24
DO
2238 $startip = $range['ip_bin'] & $range['mask_bin'];
2239 $endip = $range['ip_bin'] | $range['mask_bin_inv'];
2240 $realstartip = $startip;
2241 $realendip = $endip;
2242 $numpages = 0;
2243 if($endip - $startip > $maxperpage)
2244 {
e673ee24
DO
2245 $numpages = ($endip - $startip)/$maxperpage;
2246 $startip = $startip + $page * $maxperpage;
2247 $endip = $startip + $maxperpage-1;
2248 }
2249 echo "<center>";
b901bf1f
DO
2250 if ($numpages)
2251 echo '<h3>' . long2ip ($startip) . ' ~ ' . long2ip ($endip) . '</h3>';
e673ee24
DO
2252 for ($i=0; $i<$numpages; $i++)
2253 {
2254 if ($i == $page)
2255 echo "<b>$i</b> ";
2256 else
a60e0851 2257 echo "<a href='${root}?page=${pageno}&tab=${tabno}&id=$id&pg=$i'>$i</a> ";
e673ee24
DO
2258 }
2259 echo "</center>";
2260
beb9e88a 2261 echo "<table class='widetable' border=0 cellspacing=0 cellpadding=5 align='center' width='100%'>\n";
e673ee24
DO
2262 echo "<tr><th>Address</th><th>Name</th><th>Allocation</th></tr>\n";
2263
2264
b2035dca
DO
2265 for ($ip = $startip; $ip <= $endip; $ip++) :
2266 if (isset ($_REQUEST['hl_ipv4_addr']) and ip2long ($_REQUEST['hl_ipv4_addr']) == $ip)
2267 $secondstyle = 'tdleft port_highlight';
2727c7df 2268 else
b2035dca
DO
2269 $secondstyle = 'tdleft';
2270 if (!isset ($range['addrlist'][$ip]))
e673ee24 2271 {
b2035dca
DO
2272 echo "<tr><td class=tdleft><a href='${root}?page=ipaddress&ip=" . long2ip ($ip) . "'>" . long2ip ($ip);
2273 echo "</a></td><td class='${secondstyle}'>&nbsp;</td><td class='${secondstyle}'>&nbsp;</td></tr>\n";
2274 continue;
2275 }
b2035dca 2276 $addr = $range['addrlist'][$ip];
2d318652 2277 echo "<tr class='${addr['class']}'>";
e673ee24 2278
b2035dca
DO
2279 echo "<td class=tdleft><a href='${root}?page=ipaddress&ip=${addr['ip']}'>${addr['ip']}</a></td>";
2280 echo "<td class='${secondstyle}'>${addr['name']}</td><td class='${secondstyle}'>";
2281 $delim = '';
2282 $prologue = '';
2283 if ( $addr['reserved'] == 'yes')
2284 {
2d318652 2285 echo "<strong>RESERVED</strong> ";
b2035dca
DO
2286 $delim = '; ';
2287 }
2d318652 2288 foreach ($range['addrlist'][$ip]['allocs'] as $ref)
b2035dca 2289 {
beb9e88a
DO
2290 echo $delim . $aac2[$ref['type']];
2291 echo "<a href='${root}?page=object&object_id=${ref['object_id']}";
b2035dca
DO
2292 echo "&hl_ipv4_addr=${addr['ip']}'>";
2293 echo $ref['name'] . (empty ($ref['name']) ? '' : '@');
2294 echo "${ref['object_name']}</a>";
2295 $delim = '; ';
2296 }
2297 if ($delim != '')
2298 {
6131056c 2299 $delim = '';
b2035dca
DO
2300 $prologue = '<br>';
2301 }
2d318652 2302 foreach ($range['addrlist'][$ip]['lblist'] as $ref)
b2035dca
DO
2303 {
2304 echo $prologue;
602663f4 2305 $prologue = '';
b2035dca
DO
2306 echo "${delim}<a href='${root}?page=object&object_id=${ref['object_id']}'>";
2307 echo "${ref['object_name']}</a>:<a href='${root}?page=ipv4vs&vs_id=${ref['vs_id']}'>";
2308 echo "${ref['vport']}/${ref['proto']}</a>&rarr;";
2309 $delim = '; ';
2310 }
2311 if ($delim != '')
2312 {
2313 $delim = '';
2314 $prologue = '<br>';
e673ee24 2315 }
2d318652 2316 foreach ($range['addrlist'][$ip]['rslist'] as $ref)
b2035dca
DO
2317 {
2318 echo $prologue;
2319 $prologue = '';
2320 echo "${delim}&rarr;${ref['rsport']}@<a href='${root}?page=ipv4rsp&pool_id=${ref['rspool_id']}'>";
2321 echo "${ref['rspool_name']}</a>";
2322 $delim = '; ';
2323 }
2324 echo "</td></tr>\n";
2325 endfor;
2727c7df 2326 // end of iteration
e673ee24
DO
2327
2328 echo "</table>";
2034d968
DO
2329 finishPortlet();
2330 echo "</td></tr></table>\n";
e673ee24
DO
2331}
2332
53ef3908 2333function renderIPv4NetworkProperties ($id)
e673ee24 2334{
e673ee24 2335 showMessageOrError();
53ef3908
DO
2336 $netdata = getIPv4NetworkInfo ($id);
2337 echo "<center><h1>${netdata['ip']}/${netdata['mask']}</h1></center>\n";
e673ee24 2338 echo "<table border=0 cellpadding=10 cellpadding=1 align='center'>\n";
7056988c 2339 printOpFormIntro ('editRange');
53ef3908
DO
2340 echo "<tr><td class='tdright'>Name:</td><td class='tdleft'><input type=text name=name size=20 value='${netdata['name']}'></tr>";
2341 echo "<tr><td colspan=2 class=tdcenter>";
2342 printImageHREF ('SAVE', 'Save changes', TRUE);
2343 echo "</td></form></tr></table>\n";
e673ee24
DO
2344
2345}
2346
2d318652 2347function renderIPv4Address ($dottedquad)
e673ee24 2348{
52c836b1 2349 global $root, $aat;
2d318652 2350 $address = getIPv4Address ($dottedquad);
68225375 2351 echo "<table border=0 class=objectview cellspacing=0 cellpadding=0>";
2d318652
DO
2352 echo "<tr><td colspan=2 align=center><h1>${dottedquad}</h1></td></tr>\n";
2353 if (!empty ($address['name']))
68225375 2354 echo "<tr><td colspan=2 align=center><h2>${address['name']}</h2></td></tr>\n";
e673ee24 2355
68225375
DO
2356 echo "<tr><td class=pcleft>";
2357 startPortlet ('summary');
2358 echo "<table border=0 cellspacing=0 cellpadding=3 width='100%'>\n";
04d619d0 2359 echo "<tr><th width='50%' class=tdright>Allocations:</th><td class=tdleft>" . count ($address['allocs']) . "</td></tr>\n";
68225375
DO
2360 echo "<tr><th width='50%' class=tdright>Originated NAT connections:</th><td class=tdleft>" . count ($address['outpf']) . "</td></tr>\n";
2361 echo "<tr><th width='50%' class=tdright>Arriving NAT connections:</th><td class=tdleft>" . count ($address['inpf']) . "</td></tr>\n";
04d619d0 2362 echo "<tr><th width='50%' class=tdright>SLB virtual services:</th><td class=tdleft>" . count ($address['lblist']) . "</td></tr>\n";
68225375
DO
2363 echo "<tr><th width='50%' class=tdright>SLB real servers:</th><td class=tdleft>" . count ($address['rslist']) . "</td></tr>\n";
2364 printTagTRs();
2365 echo "</table><br>\n";
2366 finishPortlet();
2367 echo "</td>\n";
e673ee24 2368
68225375 2369 echo "<td class=pcright>";
e673ee24 2370
2d318652 2371 if (!empty ($address['class']))
59bebe2b 2372 {
8e700dd1 2373 startPortlet ('allocations');
2d318652
DO
2374 echo "<table class='widetable' cellpadding=5 cellspacing=0 border=0 align='center' width='100%'>\n";
2375 echo "<tr><th>object</th><th>OS interface</th><th>allocation type</th></tr>\n";
2376 $class = $address['class'];
2377 // render all allocation records for this address the same way
59bebe2b 2378 if ($address['reserved'] == 'yes')
2d318652
DO
2379 echo "<tr class='${class}'><td colspan=2>&nbsp;</td><td class=tdleft><strong>RESERVED</strong></td></tr>";
2380 foreach ($address['allocs'] as $bond)
59bebe2b 2381 {
8e700dd1
DO
2382 if (isset ($_REQUEST['hl_object_id']) and $_REQUEST['hl_object_id'] == $bond['object_id'])
2383 $secondclass = 'tdleft port_highlight';
2384 else
2385 $secondclass = 'tdleft';
2386 echo "<tr class='$class'><td class=tdleft><a href='${root}?page=object&object_id=${bond['object_id']}";
2d318652 2387 echo "&hl_ipv4_addr=${dottedquad}'>${bond['object_name']}</td><td class='${secondclass}'>${bond['name']}</td><td class='${secondclass}'><strong>";
52c836b1
DO
2388 echo $aat[$bond['type']];
2389 echo "</strong></td></tr>\n";
59bebe2b
DO
2390 }
2391 echo "</table><br><br>";
2392 finishPortlet();
2393 }
e673ee24 2394
f3d0cb20
DO
2395 // FIXME: The returned list is structured differently, than we expect it to be. One of the sides
2396 // must be fixed.
2d318652 2397 if (count ($address['lblist']))
e673ee24 2398 {
2d318652
DO
2399 startPortlet ('Virtual services (' . count ($address['lblist']) . ')');
2400 echo "<table class='widetable' cellpadding=5 cellspacing=0 border=0 align='center' width='100%'>\n";
59bebe2b 2401 echo "<tr><th>VS</th><th>name</th></tr>\n";
2d318652 2402 foreach ($address['lblist'] as $vsinfo)
e673ee24 2403 {
2d318652 2404 echo "<tr><td class=tdleft><a href='${root}?page=ipv4vs&vs_id=${vsinfo['vs_id']}'>";
59bebe2b 2405 echo buildVServiceName ($vsinfo) . "</a></td><td class=tdleft>";
5fe1ed76 2406 echo $vsinfo['name'] . "</td></tr>\n";
e673ee24 2407 }
59bebe2b
DO
2408 echo "</table><br><br>";
2409 finishPortlet();
e673ee24 2410 }
5fe1ed76
DO
2411
2412 if (count ($address['rslist']))
2413 {
2414 startPortlet ('Real servers (' . count ($address['rslist']) . ')');
2d318652 2415 echo "<table class='widetable' cellpadding=5 cellspacing=0 border=0 align='center' width='100%'>\n";
53f4b619 2416 echo "<tr><th>&nbsp;</th><th>port</th><th>RS pool</th></tr>\n";
5fe1ed76
DO
2417 foreach ($address['rslist'] as $rsinfo)
2418 {
2419 echo "<tr><td>";
2420 if ($rsinfo['inservice'] == 'yes')
2421 printImageHREF ('inservice', 'in service');
2422 else
2423 printImageHREF ('notinservice', 'NOT in service');
2d318652
DO
2424 echo "</td><td class=tdleft>${rsinfo['rsport']}</td><td class=tdleft><a href='${root}?page=ipv4rsp&pool_id=${rsinfo['rspool_id']}'>";
2425 echo $rsinfo['rspool_name'] . "</a></td></tr>\n";
5fe1ed76
DO
2426 }
2427 echo "</table><br><br>";
2428 finishPortlet();
2429 }
2430
68225375
DO
2431 if (count ($address['outpf']))
2432 {
105a3bc8 2433 startPortlet ('departing NAT rules');
2d318652 2434 echo "<table class='widetable' cellpadding=5 cellspacing=0 border=0 align='center' width='100%'>\n";
105a3bc8
DO
2435 echo "<tr><th>proto</th><th>from</th><th>to</th><th>comment</th></tr>\n";
2436 foreach ($address['outpf'] as $rule)
2437 echo "<tr><td>${rule['proto']}</td><td>${rule['localip']}:${rule['localport']}</td><td>${rule['remoteip']}:${rule['localport']}</td><td>${rule['description']}</td></tr>";
2438 echo "</table>";
68225375
DO
2439 finishPortlet();
2440 }
105a3bc8
DO
2441
2442 if (count ($address['inpf']))
2443 {
2444 startPortlet ('arriving NAT rules');
2d318652 2445 echo "<table class='widetable' cellpadding=5 cellspacing=0 border=0 align='center' width='100%'>\n";
105a3bc8
DO
2446 echo "<tr><th>proto</th><th>from</th><th>to</th><th>comment</th></tr>\n";
2447 foreach ($address['inpf'] as $rule)
2448 echo "<tr><td>${rule['proto']}</td><td>${rule['localip']}:${rule['localport']}</td><td>${rule['remoteip']}:${rule['localport']}</td><td>${rule['description']}</td></tr>";
2449 echo "</table>";
2450 finishPortlet();
2451 }
2452
68225375
DO
2453 echo "</td></tr>";
2454 echo "</table>\n";
e673ee24
DO
2455}
2456
2d318652 2457function renderIPv4AddressProperties ($dottedquad)
e673ee24 2458{
e673ee24 2459 showMessageOrError();
2d318652
DO
2460 $address = getIPv4Address ($dottedquad);
2461 echo "<center><h1>$dottedquad</h1></center>\n";
7056988c 2462
1fbc9fd6 2463 startPortlet ('update');
e673ee24 2464 echo "<table border=0 cellpadding=10 cellpadding=1 align='center'>\n";
7056988c 2465 printOpFormIntro ('editAddress');
2d318652
DO
2466 echo "<tr><td class='tdright'>Name:</td><td class='tdleft'><input type=text name=name size=20 value='${address['name']}'></tr>";
2467 echo "<td class='tdright'>Reserved:</td><td class='tdleft'><input type=checkbox name=reserved size=20 ";
2468 echo ($address['reserved']=='yes') ? 'checked' : '';
53ef3908
DO
2469 echo "></tr><tr><td colspan=2 class='tdcenter'>";
2470 printImageHREF ('SAVE', 'Save changes', TRUE);
2471 echo "</td></form></tr></table>\n";
1fbc9fd6
DO
2472 finishPortlet();
2473 if (empty ($address['name']) and $address['reserved'] == 'no')
2474 return;
7056988c 2475
1fbc9fd6 2476 startPortlet ('release');
7056988c 2477 printOpFormIntro ('editAddress', array ('name' => '', 'reserved' => ''));
1fbc9fd6
DO
2478 echo "<input type=submit value='release'></form>";
2479 finishPortlet();
e673ee24
DO
2480}
2481
2d318652 2482function renderIPv4AddressAllocations ($dottedquad)
e673ee24 2483{
e673ee24 2484 showMessageOrError();
2d318652 2485 global $pageno, $tabno, $root, $aat;
e673ee24 2486
2d318652
DO
2487 $address = getIPv4Address ($dottedquad);
2488 $class = $address['class'];
2489 echo "<center><h1>${dottedquad}</h1></center>\n";
105a3bc8 2490 echo "<table class='widetable' cellpadding=5 cellspacing=0 border=0 align='center'>\n";
2d318652 2491 echo "<tr><th>&nbsp;</th><th>object</th><th>OS interface</th><th>allocation type</th><th>&nbsp;</th></tr>\n";
e673ee24
DO
2492
2493 if ($address['reserved'] == 'yes')
2d318652
DO
2494 echo "<tr class='${class}'><td colspan=3>&nbsp;</td><td class=tdleft><strong>RESERVED</strong></td><td>&nbsp;</td></tr>";
2495 foreach ($address['allocs'] as $bond)
e673ee24 2496 {
7056988c
DO
2497 echo "<tr class='$class'>";
2498 printOpFormIntro ('updIPv4Allocation', array ('object_id' => $bond['object_id']));
2d318652 2499 echo "<td><a href='${root}process.php?op=delIPv4Allocation&page=${pageno}&tab=${tabno}&ip=${dottedquad}&object_id=${bond['object_id']}'>";
e673ee24
DO
2500 printImageHREF ('delete', 'Unallocate address');
2501 echo "</a></td>";
2d318652 2502 echo "<td><a href='${root}?page=object&object_id=${bond['object_id']}&hl_ipv4_addr=${dottedquad}'>${bond['object_name']}</td>";
52c836b1
DO
2503 echo "<td><input type='text' name='bond_name' value='${bond['name']}' size=10></td><td>";
2504 printSelect ($aat, 'bond_type', $bond['type']);
2505 echo "</td><td>";
b4c1ef87
DO
2506 printImageHREF ('save', 'Save changes', TRUE);
2507 echo "</td></form></tr>\n";
e673ee24 2508 }
7056988c 2509 printOpFormIntro ('addIPv4Allocation');
b4c1ef87
DO
2510 echo "<td>";
2511 printImageHREF ('add', 'new allocation', TRUE);
2512 echo "</td><td><select name='object_id'>";
e673ee24 2513
6dbdc7c7 2514 foreach (explode (',', getConfigVar ('IPV4_PERFORMERS')) as $type)
e9132485 2515 foreach (getNarrowObjectList ($type) as $object)
e673ee24 2516 echo "<option value='${object['id']}'>${object['dname']}</option>";
e673ee24 2517
52c836b1
DO
2518 echo "</select></td><td><input type='text' name='bond_name' value='' size=10></td><td>";
2519 printSelect ($aat, 'bond_type');
2520 echo "</td><td>&nbsp;</td></form></tr>";
e673ee24
DO
2521 echo "</table><br><br>";
2522
2523}
2524
eeb4a5d8 2525function renderNATv4ForObject ($object_id = 0)
e673ee24
DO
2526{
2527 global $pageno, $tabno, $root;
2528
2529 $info = getObjectInfo ($object_id);
eeb4a5d8 2530 $forwards = getNATv4ForObject ($object_id);
2c817354 2531 $alloclist = getObjectIPv4Allocations ($object_id);
e673ee24 2532 showMessageOrError();
f28fbe8b 2533 echo "<center><h2>locally performed NAT</h2></center>";
e673ee24 2534
105a3bc8 2535 echo "<table class='widetable' cellpadding=5 cellspacing=0 border=0 align='center'>\n";
d54b9495 2536 echo "<tr><th></th><th>Match endpoint</th><th>Translate to</th><th>Target object</th><th>Comment</th><th>&nbsp;</th></tr>\n";
e673ee24
DO
2537
2538 foreach ($forwards['out'] as $pf)
2539 {
2c817354
DO
2540 $class = 'trerror';
2541 $osif = '';
2542 if (isset ($alloclist [$pf['localip']]))
2543 {
2544 $class = $alloclist [$pf['localip']]['addrinfo']['class'];
2545 $osif = $alloclist [$pf['localip']]['osif'] . ': ';
2546 }
e673ee24
DO
2547
2548 echo "<tr class='$class'>";
72d8ced3 2549 echo "<td><a href='${root}process.php?op=delNATv4Rule&localip=${pf['localip']}&localport=${pf['localport']}&remoteip=${pf['remoteip']}&remoteport=${pf['remoteport']}&proto=${pf['proto']}&object_id=$object_id&page=${pageno}&tab=${tabno}'>";
4de22e7e
DO
2550 printImageHREF ('delete', 'Delete NAT rule');
2551 echo "</a></td>";
2c817354 2552 echo "<td>${pf['proto']}/${osif}<a href='${root}?page=ipaddress&tab=default&ip=${pf['localip']}'>${pf['localip']}</a>:${pf['localport']}";
f28fbe8b
DO
2553 if (!empty ($pf['local_addr_name']))
2554 echo ' (' . $pf['local_addr_name'] . ')';
2555 echo "</td>";
e673ee24
DO
2556 echo "<td><a href='${root}?page=ipaddress&tab=default&ip=${pf['remoteip']}'>${pf['remoteip']}</a>:${pf['remoteport']}</td>";
2557
53ef3908 2558 $address = getIPv4Address ($pf['remoteip']);
e673ee24
DO
2559
2560 echo "<td class='description'>";
53ef3908
DO
2561 if (count ($address['allocs']))
2562 foreach ($address['allocs'] as $bond)
f28fbe8b
DO
2563 echo "<a href='${root}?page=object&tab=default&object_id=${bond['object_id']}'>${bond['object_name']}(${bond['name']})</a> ";
2564 elseif (!empty ($pf['remote_addr_name']))
2565 echo '(' . $pf['remote_addr_name'] . ')';
7056988c
DO
2566 printOpFormIntro
2567 (
2568 'updNATv4Rule',
2569 array
2570 (
2571 'localip' => $pf['localip'],
2572 'localport' => $pf['localport'],
2573 'remoteip' => $pf['remoteip'],
2574 'remoteport' => $pf['remoteport'],
2575 'proto' => $pf['proto']
2576 )
2577 );
2578 echo "</td><td class='description'>";
d54b9495
DO
2579 echo "<input type='text' name='description' value='${pf['description']}'></td><td>";
2580 printImageHREF ('save', 'Save changes', TRUE);
2581 echo "</td></form></tr>";
e673ee24 2582 }
7056988c 2583 printOpFormIntro ('addNATv4Rule');
d54b9495
DO
2584 echo "<tr align='center'><td>";
2585 printImageHREF ('add', 'Add new NAT rule', TRUE);
2586 echo '</td><td>';
eeb4a5d8 2587 printSelect (array ('TCP' => 'TCP', 'UDP' => 'UDP'), 'proto');
52c3543f 2588 echo "<select name='localip' tabindex=1>";
e673ee24 2589
2c817354
DO
2590 foreach ($alloclist as $dottedquad => $alloc)
2591 {
2592 $name = empty ($alloc['addrinfo']['name']) ? '' : (' (' . niftyString ($alloc['addrinfo']['name']) . ')');
2593 $osif = empty ($alloc['osif']) ? '' : ($alloc['osif'] . ': ');
2594 echo "<option value='${dottedquad}'>${osif}${dottedquad}${name}</option>";
2595 }
e673ee24 2596
52c3543f
DO
2597 echo "</select>:<input type='text' name='localport' size='4' tabindex=2></td>";
2598 echo "<td><input type='text' name='remoteip' id='remoteip' size='10' tabindex=3>";
4de22e7e
DO
2599 echo "<a href='javascript:;' onclick='window.open(\"${root}/find_object_ip_helper.php\", \"findobjectip\", \"height=700, width=400, location=no, menubar=no, resizable=yes, scrollbars=no, status=no, titlebar=no, toolbar=no\");'>";
2600 printImageHREF ('find', 'Find object');
2601 echo "</a>";
52c3543f 2602 echo ":<input type='text' name='remoteport' size='4' tabindex=4></td><td></td>";
d54b9495 2603 echo "<td colspan=1><input type='text' name='description' size='20' tabindex=5></td><td>&nbsp;</td></tr>";
e673ee24
DO
2604 echo "</form>";
2605
2606 echo "</table><br><br>";
2607
f28fbe8b 2608 echo "<center><h2>arriving NAT connections</h2></center>";
105a3bc8 2609 echo "<table class='widetable' cellpadding=5 cellspacing=0 border=0 align='center'>\n";
e673ee24
DO
2610 echo "<tr><th></th><th>Source</th><th>Source objects</th><th>Target</th><th>Description</th></tr>\n";
2611
2612 foreach ($forwards['in'] as $pf)
2613 {
72d8ced3 2614 echo "<tr><td><a href='${root}process.php?op=delNATv4Rule&localip=${pf['localip']}&localport=${pf['localport']}&remoteip=${pf['remoteip']}&remoteport=${pf['remoteport']}&proto=${pf['proto']}&object_id=${pf['object_id']}&page=${pageno}&tab=${tabno}'>";
4de22e7e
DO
2615 printImageHREF ('delete', 'Delete NAT rule');
2616 echo "</a></td>";
e673ee24
DO
2617 echo "<td>${pf['proto']}/<a href='${root}?page=ipaddress&tab=default&ip=${pf['localip']}'>${pf['localip']}</a>:${pf['localport']}</td>";
2618 echo "<td class='description'><a href='${root}?page=object&tab=default&object_id=${pf['object_id']}'>${pf['object_name']}</a>";
2619 echo "</td><td><a href='${root}?page=ipaddress&tab=default&ip=${pf['remoteip']}'>${pf['remoteip']}</a>:${pf['remoteport']}</td>";
2620 echo "<td class='description'>${pf['description']}</td></tr>";
2621 }
2622
e673ee24 2623 echo "</table><br><br>";
e673ee24
DO
2624}
2625
7056988c 2626// FIXME: move related code away into ophandler(s)
e673ee24
DO
2627function renderAddMultipleObjectsForm ()
2628{
20c901a7 2629 global $root, $pageno, $tabno, $nextorder;
e673ee24
DO
2630
2631 $type_id = array();
7f791d1d 2632 $global_type_id = 0;
e673ee24
DO
2633 $name = array();
2634 $asset_no = array();
ce4d1a79 2635 $keepvalues1 = $keepvalues2 = FALSE;
7f791d1d 2636 $log = array();
e673ee24 2637 // Look for current submit.
7f791d1d 2638 if (isset ($_REQUEST['got_fast_data']))
e673ee24 2639 {
f60bb422 2640 $taglist = isset ($_REQUEST['taglist']) ? $_REQUEST['taglist'] : array();
ce4d1a79 2641 $keepvalues1 = TRUE;
9c0b0016
DO
2642 $max = getConfigVar ('MASSCOUNT');
2643 for ($i = 0; $i < $max; $i++)
e673ee24
DO
2644 {
2645 if (!isset ($_REQUEST["${i}_object_type_id"]))
2646 {
2647 $log[] = array ('code' => 'error', 'message' => "Submitted form is invalid at line " . $i + 1);
2648 break;
2649 }
2c6c7645
DO
2650 assertUIntArg ("${i}_object_type_id", __FUNCTION__, TRUE);
2651 assertStringArg ("${i}_object_name", __FUNCTION__, TRUE);
2652 assertStringArg ("${i}_object_label", __FUNCTION__, TRUE);
2653 assertStringArg ("${i}_object_asset_no", __FUNCTION__, TRUE);
2654 assertStringArg ("${i}_object_barcode", __FUNCTION__, TRUE);
e673ee24
DO
2655 $type_id[$i] = $_REQUEST["${i}_object_type_id"];
2656 // Save user input for possible rendering.
2657 $name[$i] = $_REQUEST["${i}_object_name"];
2658 $label[$i] = $_REQUEST["${i}_object_label"];
2659 $asset_no[$i] = $_REQUEST["${i}_object_asset_no"];
2660 $barcode[$i] = $_REQUEST["${i}_object_barcode"];
2661
f60bb422 2662 // It's better to skip silently, than to print a notice.
e673ee24
DO
2663 if ($type_id[$i] == 0)
2664 continue;
f60bb422 2665 if (commitAddObject ($name[$i], $label[$i], $barcode[$i], $type_id[$i], $asset_no[$i], $taglist) === TRUE)
e673ee24
DO
2666 $log[] = array ('code' => 'success', 'message' => "Added new object '${name[$i]}'");
2667 else
4d2e93f2 2668 $log[] = array ('code' => 'error', 'message' => __FUNCTION__ . ': commitAddObject() failed');
e673ee24 2669 }
e673ee24 2670 }
7f791d1d
DO
2671 elseif (isset ($_REQUEST['got_very_fast_data']))
2672 {
f60bb422 2673 $taglist = isset ($_REQUEST['taglist']) ? $_REQUEST['taglist'] : array();
ce4d1a79 2674 $keepvalues2 = TRUE;
2c6c7645
DO
2675 assertUIntArg ('global_type_id', __FUNCTION__, TRUE);
2676 assertStringArg ('namelist', __FUNCTION__, TRUE);
7f791d1d
DO
2677 $global_type_id = $_REQUEST['global_type_id'];
2678 if ($global_type_id == 0)
2679 {
2680 if (!empty ($_REQUEST['namelist']))
2681 $log[] = array ('code' => 'error', 'message' => 'Object type is not selected, check the form below');
2682 else
2683 $log[] = array ('code' => 'error', 'message' => 'Empty form has been ignored. Cheers.');
2684 }
2685 else
2686 {
2687 // The name extractor below was stolen from ophandlers.php:addMultiPorts()
2688 $names1 = explode ('\n', $_REQUEST['namelist']);
2689 $names2 = array();
2690 foreach ($names1 as $line)
2691 {
2692 $parts = explode ('\r', $line);
2693 reset ($parts);
2694 if (empty ($parts[0]))
2695 continue;
2696 else
2697 $names2[] = rtrim ($parts[0]);
2698 }
2699 foreach ($names2 as $cname)
f60bb422 2700 if (commitAddObject ($cname, '', '', $global_type_id, '', $taglist) === TRUE)
7f791d1d
DO
2701 $log[] = array ('code' => 'success', 'message' => "Added new object '${cname}'");
2702 else
2703 $log[] = array ('code' => 'error', 'message' => "Could not add '${cname}'");
2704 }
2705 }
2706 printLog ($log);
e673ee24
DO
2707
2708 // Render a form for the next.
2709 $typelist = getObjectTypeList();
4c330a14 2710 $typelist[0] = 'select type...';
7f791d1d 2711
f60bb422
DO
2712 startPortlet ('Distinct types, same tags');
2713 $max = getConfigVar ('MASSCOUNT');
20c901a7 2714 echo "<form name=fastform method=post action='${root}?page=${pageno}&tab=${tabno}'>";
e673ee24 2715 echo '<table border=0 align=center>';
f60bb422
DO
2716 echo "<tr><th>Object type</th><th>Common name</th><th>Visible label</th>";
2717 echo "<th>Asset tag</th><th>Barcode</th><th>Tags</th></tr>\n";
7f791d1d 2718 // If a user forgot to select object type on input, we keep his
e673ee24 2719 // previous input in the form.
9c0b0016 2720 for ($i = 0; $i < $max; $i++)
e673ee24 2721 {
7f791d1d 2722 echo '<tr><td>';
e7ade6bf
DO
2723 // Don't employ DEFAULT_OBJECT_TYPE to avoid creating ghost records for pre-selected empty rows.
2724 printSelect ($typelist, "${i}_object_type_id", 0);
e673ee24
DO
2725 echo '</td>';
2726 echo "<td><input type=text size=30 name=${i}_object_name";
ce4d1a79 2727 if ($keepvalues1 and isset ($name[$i]) and (!isset ($type_id[$i]) or $type_id[$i] == 0))
e673ee24
DO
2728 echo " value='${name[$i]}'";
2729 echo "></td>";
2730 echo "<td><input type=text size=30 name=${i}_object_label";
ce4d1a79 2731 if ($keepvalues1 and isset ($label[$i]) and (!isset ($type_id[$i]) or $type_id[$i] == 0))
e673ee24
DO
2732 echo " value='${label[$i]}'";
2733 echo "></td>";
2734 echo "<td><input type=text size=20 name=${i}_object_asset_no";
ce4d1a79 2735 if ($keepvalues1 and isset ($asset_no[$i]) and (!isset ($type_id[$i]) or $type_id[$i] == 0))
e673ee24
DO
2736 echo " value='${asset_no[$i]}'";
2737 echo "></td>";
2738 echo "<td><input type=text size=10 name=${i}_object_barcode";
ce4d1a79 2739 if ($keepvalues1 and isset ($barcode[$i]) and (!isset ($type_id[$i]) or $type_id[$i] == 0))
e673ee24
DO
2740 echo " value='${barcode[$i]}'";
2741 echo "></td>";
f60bb422
DO
2742 if ($i == 0)
2743 {
2744 echo "<td valign=top rowspan=${max}>";
2745 renderTagSelect();
2746 echo "</td>\n";
2747 }
e673ee24 2748 echo "</tr>\n";
e673ee24 2749 }
216c84bb 2750 echo "<tr><td class=submit colspan=5><input type=submit name=got_fast_data value='Go!'></td></tr>\n";
e673ee24
DO
2751 echo "</form></table>\n";
2752 finishPortlet();
7f791d1d 2753
f60bb422 2754 startPortlet ('Same type, same tags');
20c901a7 2755 echo "<form name=veryfastform method=post action='${root}?page=${pageno}&tab=${tabno}'>";
f60bb422
DO
2756 echo "<table border=0 align=center><tr><th>names</th><th>type</th></tr>";
2757 echo "<tr><td rowspan=3><textarea name=namelist cols=40 rows=25>\n";
ce4d1a79 2758 if ($keepvalues2 and $global_type_id == 0)
7f791d1d 2759 echo $_REQUEST['namelist'];
f60bb422
DO
2760 echo "</textarea></td><td valign=top>";
2761 printSelect ($typelist, "global_type_id", getConfigVar ('DEFAULT_OBJECT_TYPE'));
2762 echo "</td></tr>";
2763 echo "<tr><th>Tags</th></tr>";
2764 echo "<tr><td valign=top>";
2765 renderTagSelect();
2766 echo "</td></tr>";
2767 echo "<tr><td colspan=2><input type=submit name=got_very_fast_data value='Go!'></td></tr></table>\n";
2768 echo "</form>\n";
7f791d1d 2769 finishPortlet();
e673ee24
DO
2770}
2771
2772function printGreeting ()
2773{
59cd003e 2774 global $remote_username, $accounts, $root;
e673ee24 2775 $account = $accounts[$remote_username];
7056988c
DO
2776 $person = empty ($account['user_realname']) ? $account['user_name'] : $account['user_realname'];
2777 echo "Hello, ${person}. This is RackTables " . CODE_VERSION . ". Click <a href='${root}?logout'>here</a> to logout.";
e673ee24
DO
2778}
2779
2780function renderSearchResults ()
2781{
2782 global $remote_username, $root;
2783 $terms = trim ($_REQUEST['q']);
2784 if (empty ($terms))
2785 {
591ff2c4 2786 showError ('Search string cannot be empty.', __FUNCTION__);
e673ee24
DO
2787 return;
2788 }
54522168 2789 if (!permitted ('objects', 'default'))
e673ee24 2790 {
591ff2c4 2791 showError ('You are not authorized for viewing information about objects.', __FUNCTION__);
e673ee24
DO
2792 return;
2793 }
ea5fc465 2794 $nhits = 0;
e673ee24
DO
2795 // If we search for L2 address, we can either find one or find none.
2796 if
2797 (
2798 preg_match ('/^[0-9a-f][0-9a-f]?:[0-9a-f][0-9a-f]?:[0-9a-f][0-9a-f]?:[0-9a-f][0-9a-f]?:[0-9a-f][0-9a-f]?:[0-9a-f][0-9a-f]?$/i', $terms) or
2799 preg_match ('/^[0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f]$/i', $terms) or
ea5fc465
DO
2800 preg_match ('/^[0-9a-f][0-9a-f][0-9a-f][0-9a-f].[0-9a-f][0-9a-f][0-9a-f][0-9a-f].[0-9a-f][0-9a-f][0-9a-f][0-9a-f]$/i', $terms) or
2801 // STP bridge ID: bridge priotity + port MAC address. Cut off first 4 chars and look for MAC address.
2802 preg_match ('/^[0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f]$/i', $terms)
e673ee24
DO
2803 )
2804 // Search for L2 address.
2805 {
3ec29bf4
DO
2806 $terms = str_replace ('.', '', $terms);
2807 $terms = str_replace (':', '', $terms);
ea5fc465 2808 $terms = substr ($terms, -12);
e673ee24
DO
2809 $result = searchByl2address ($terms);
2810 if ($result !== NULL)
2811 {
ea5fc465
DO
2812 $nhits++;
2813 $lasthit = 'port';
2814 $summary['port'][] = $result;
e673ee24 2815 }
e673ee24
DO
2816 }
2817 elseif (preg_match ('/^[0-9][0-9]?[0-9]?\.[0-9]?[0-9]?[0-9]?\.[0-9][0-9]?[0-9]?\.[0-9]?[0-9]?[0-9]?$/i', $terms))
2818 // Search for IP address.
2819 {
bb0a44e9 2820 if (NULL !== getIPv4AddressNetworkId ($terms))
e673ee24 2821 {
ea5fc465 2822 $nhits++;
f3d0cb20
DO
2823 $lasthit = 'ipv4addressbydq';
2824 $summary['ipv4addressbydq'][] = $terms;
e673ee24 2825 }
e673ee24
DO
2826 }
2827 else
ea5fc465 2828 // Search for objects, addresses, networks, virtual services and RS pools by their description.
e673ee24 2829 {
ea5fc465
DO
2830 $tmp = getObjectSearchResults ($terms);
2831 if (count ($tmp))
e673ee24 2832 {
ea5fc465
DO
2833 $nhits += count ($tmp);
2834 $lasthit = 'object';
2835 $summary['object'] = $tmp;
e673ee24 2836 }
ea5fc465
DO
2837 $tmp = getIPv4AddressSearchResult ($terms);
2838 if (count ($tmp))
e673ee24 2839 {
ea5fc465 2840 $nhits += count ($tmp);
f3d0cb20
DO
2841 $lasthit = 'ipv4addressbydescr';
2842 $summary['ipv4addressbydescr'] = $tmp;
ea5fc465
DO
2843 }
2844 $tmp = getIPv4PrefixSearchResult ($terms);
2845 if (count ($tmp))
2846 {
2847 $nhits += count ($tmp);
2848 $lasthit = 'ipv4network';
2849 $summary['ipv4network'] = $tmp;
2850 }
05411ccd
DO
2851 $tmp = getIPv4RSPoolSearchResult ($terms);
2852 if (count ($tmp))
2853 {
2854 $nhits += count ($tmp);
2855 $lasthit = 'ipv4rspool';
2856 $summary['ipv4rspool'] = $tmp;
2857 }
2858 $tmp = getIPv4VServiceSearchResult ($terms);
2859 if (count ($tmp))
2860 {
2861 $nhits += count ($tmp);
2862 $lasthit = 'ipv4vs';
2863 $summary['ipv4vs'] = $tmp;
2864 }
6a88e734
DO
2865 $tmp = getAccountSearchResult ($terms);
2866 if (count ($tmp))
2867 {
2868 $nhits += count ($tmp);
2869 $lasthit = 'user';
2870 $summary['user'] = $tmp;
2871 }
ea5fc465
DO
2872 }
2873 if ($nhits == 0)
2874 echo "<center><h2>Nothing found for '${terms}'</h2></center>";
2875 elseif ($nhits == 1)
2876 {
2877 $record = current ($summary[$lasthit]);
2878 switch ($lasthit)
2879 {
2880 case 'port':
2881 echo "<script language='Javascript'>document.location='${root}?page=object";
2882 echo "&hl_port_id=" . $record['port_id'];
2883 echo "&object_id=" . $record['object_id'] . "';//</script>";
2884 break;
f3d0cb20
DO
2885 case 'ipv4addressbydq':
2886 $parentnet = getIPv4AddressNetworkId ($record);
2887 if ($parentnet !== NULL)
79a9edb4 2888 echo "<script language='Javascript'>document.location='${root}?page=iprange&tab=default&id=${parentnet}&hl_ipv4_addr=${record}';//</script>";
f3d0cb20
DO
2889 else
2890 echo "<script language='Javascript'>document.location='${root}?page=ipaddress&ip=${record}';//</script>";
ea5fc465 2891 break;
f3d0cb20
DO
2892 case 'ipv4addressbydescr':
2893 $parentnet = getIPv4AddressNetworkId ($record['ip']);
2894 if ($parentnet !== NULL)
79a9edb4 2895 echo "<script language='Javascript'>document.location='${root}?page=iprange&tab=default&id=${parentnet}&hl_ipv4_addr=${record['ip']}';//</script>";
f3d0cb20
DO
2896 else
2897 echo "<script language='Javascript'>document.location='${root}?page=ipaddress&ip=${record['ip']}';//</script>";
ea5fc465
DO
2898 break;
2899 case 'ipv4network':
2900 echo "<script language='Javascript'>document.location='${root}?page=iprange";
2901 echo "&id=${record['id']}";
2902 echo "';//</script>";
2903 break;
2904 case 'object':
2905 echo "<script language='Javascript'>document.location='${root}?page=object&object_id=${record['id']}';//</script>";
2906 break;
05411ccd 2907 case 'ipv4rspool':
0e692350 2908 echo "<script language='Javascript'>document.location='${root}?page=ipv4rsp&pool_id=${record['pool_id']}';//</script>";
05411ccd
DO
2909 break;
2910 case 'ipv4vs':
49fb2686 2911 echo "<script language='Javascript'>document.location='${root}?page=ipv4vs&vs_id=${record['id']}';//</script>";
05411ccd 2912 break;
6a88e734
DO
2913 case 'user':
2914 echo "<script language='Javascript'>document.location='${root}?page=user&user_id=${record['user_id']}';//</script>";
2915 break;
ea5fc465
DO
2916 }
2917 return;
2918 }
2919 else
2920 {
2921 global $nextorder;
2922 $order = 'odd';
2923 echo "<center><h2>${nhits} result(s) found for '${terms}'</h2></center>";
2924 foreach ($summary as $where => $what)
2925 switch ($where)
e673ee24 2926 {
ea5fc465 2927 case 'object':
06adfe89 2928 startPortlet ("<a href='${root}?page=objects'>Objects</a>");
ea5fc465
DO
2929 echo '<table border=0 cellpadding=5 cellspacing=0 align=center class=cooltable>';
2930 echo '<tr><th>Common name</th><th>Visible label</th><th>Asset tag</th><th>barcode</th></tr>';
2931 foreach ($what as $obj)
2932 {
2933 echo "<tr class=row_${order}><td><a href=\"${root}?page=object&object_id=${obj['id']}\">${obj['dname']}</a></td>";
2934 echo "<td>${obj['label']}</td>";
2935 echo "<td>${obj['asset_no']}</td>";
2936 echo "<td>${obj['barcode']}</td></tr>";
2937 $order = $nextorder[$order];
2938 }
2939 echo '</table>';
2940 finishPortlet();
2941 break;
2942 case 'ipv4network':
06adfe89 2943 startPortlet ("<a href='${root}?page=ipv4space'>IPv4 networks</a>");
ea5fc465 2944 echo '<table border=0 cellpadding=5 cellspacing=0 align=center class=cooltable>';
3c41194e 2945 echo '<tr><th>network</th><th>name/tags</th></tr>';
71287f1c 2946 foreach ($what as $netinfo)
ea5fc465 2947 {
71287f1c
DO
2948 echo "<tr class=row_${order} valign=top>";
2949 printIPv4NetInfoTDs ($netinfo);
2950 echo "</tr>\n";
ea5fc465
DO
2951 $order = $nextorder[$order];
2952 }
2953 echo '</table>';
2954 finishPortlet();
2955 break;
f3d0cb20 2956 case 'ipv4addressbydescr':
ea5fc465
DO
2957 startPortlet ('IPv4 addresses');
2958 echo '<table border=0 cellpadding=5 cellspacing=0 align=center class=cooltable>';
f3d0cb20 2959 // FIXME: address, parent network, routers (if extended view is enabled)
ea5fc465
DO
2960 echo '<tr><th>Address</th><th>Descritpion</th></tr>';
2961 foreach ($what as $addr)
2962 {
f3d0cb20
DO
2963 echo "<tr class=row_${order}><td class=tdleft>";
2964 $parentnet = getIPv4AddressNetworkId ($addr['ip']);
2965 if ($parentnet !== NULL)
2966 echo "<a href='${root}?page=iprange&id=${parentnet}&hl_ipv4_addr=${addr['ip']}'>${addr['ip']}</a></td>";
2967 else
2968 echo "<a href='${root}?page=ipaddress&ip=${addr['ip']}'>${addr['ip']}</a></td>";
ea5fc465
DO
2969 echo "<td class=tdleft>${addr['name']}</td></tr>";
2970 $order = $nextorder[$order];
2971 }
2972 echo '</table>';
2973 finishPortlet();
2974 break;
05411ccd 2975 case 'ipv4rspool':
ee437dab 2976 startPortlet ("<a href='${root}?page=ipv4rsplist'>RS pools</a>");
05411ccd
DO
2977 echo '<table border=0 cellpadding=5 cellspacing=0 align=center class=cooltable>';
2978 foreach ($what as $rspool)
2979 {
0e692350 2980 echo "<tr class=row_${order}><td class=tdleft><a href='${root}?page=ipv4rsp&pool_id=${rspool['pool_id']}'>";
05411ccd
DO
2981 echo buildRSPoolName ($rspool);
2982 echo "</a></td></tr>";
2983 $order = $nextorder[$order];
2984 }
2985 echo '</table>';
2986 finishPortlet();
2987 break;
2988 case 'ipv4vs':
a239e016 2989 startPortlet ("<a href='${root}?page=ipv4vslist'>Virtual services</a>");
05411ccd
DO
2990 echo '<table border=0 cellpadding=5 cellspacing=0 align=center class=cooltable>';
2991 echo '<tr><th>VS</th><th>Descritpion</th></tr>';
2992 foreach ($what as $vs)
2993 {
49fb2686 2994 echo "<tr class=row_${order}><td class=tdleft><a href='${root}?page=ipv4vs&vs_id=${vs['id']}'>";
05411ccd 2995 echo buildVServiceName ($vs);
6a88e734
DO
2996 echo "</a></td><td class=tdleft>${vs['name']}</td></tr>";
2997 $order = $nextorder[$order];
2998 }
2999 echo '</table>';
3000 finishPortlet();
3001 break;
3002 case 'user':
3003 startPortlet ("<a href='${root}?page=userlist'>Users</a>");
3004 echo '<table border=0 cellpadding=5 cellspacing=0 align=center class=cooltable>';
3005 echo '<tr><th>username</th><th>realname</th></tr>';
3006 foreach ($what as $item)
3007 {
3008 echo "<tr class=row_${order}><td class=tdleft><a href='${root}?page=user&user_id=${item['user_id']}'>";
3009 echo $item['user_name'];
3010 echo "</a></td><td class=tdleft>${item['user_realname']}</td></tr>";
05411ccd
DO
3011 $order = $nextorder[$order];
3012 }
3013 echo '</table>';
3014 finishPortlet();
3015 break;
e673ee24 3016 }
e673ee24
DO
3017 }
3018}
3019
3020// This function prints a table of checkboxes to aid the user in toggling mount atoms
3021// from one state to another. The first argument is rack data as
3022// produced by getRackData(), the second is the value used for the 'unckecked' state
3023// and the third is the value used for 'checked' state.
3024// Usage contexts:
3025// for mounting an object: printAtomGrid ($data, 'F', 'T')
3026// for changing rack design: printAtomGrid ($data, 'A', 'F')
3027// for adding rack problem: printAtomGrid ($data, 'F', 'U')
3028// for adding object problem: printAtomGrid ($data, 'T', 'W')
3029
3030function renderAtomGrid ($data)
3031{
3032 $rack_id = $data['id'];
3033 for ($unit_no = $data['height']; $unit_no > 0; $unit_no--)
3034 {
3035 echo "<tr><th>${unit_no}</th>";
3036 for ($locidx = 0; $locidx < 3; $locidx++)
3037 {
3038 $state = $data[$unit_no][$locidx]['state'];
3039 echo "<td class=state_${state}";
3040 if (isset ($data[$unit_no][$locidx]['hl']))
3041 echo $data[$unit_no][$locidx]['hl'];
3042 echo ">";
3043 if (!($data[$unit_no][$locidx]['enabled'] === TRUE))
3044 echo '<input type=checkbox disabled>';
3045 else
3046 echo "<input type=checkbox" . $data[$unit_no][$locidx]['checked'] . " name=atom_${rack_id}_${unit_no}_${locidx}>";
3047 echo '</td>';
3048 }
3049 echo "</tr>\n";
3050 }
3051}
3052
59427701 3053function renderUserList ()
e673ee24 3054{
9048d42b 3055 global $nextorder, $accounts, $root, $pageno;
59427701
DO
3056 echo "<table border=0 class=objectview>\n";
3057 echo "<tr><td class=pcleft>";
e673ee24
DO
3058 startPortlet ('User accounts');
3059 echo "<table class=cooltable border=0 cellpadding=5 cellspacing=0 align=center>\n";
3060 echo "<tr><th class=tdleft>Username</th><th class=tdleft>Real name</th></tr>";
3061 $order = 'odd';
59427701 3062 $tagfilter = getTagFilter();
11c8e4be 3063 foreach (getUserAccounts ($tagfilter, getTFMode()) as $user)
e673ee24 3064 {
9048d42b
DO
3065 echo "<tr class=row_${order} valign=top><td class=tdleft><a href='${root}?page=user&user_id=${user['user_id']}'>";
3066 echo "${user['user_name']}</a>";
3067 $usertags = loadUserTags ($user['user_id']);
3068 if (count ($usertags))
3069 echo '<br><small>' . serializeTags ($usertags, "${root}?page=${pageno}&tab=default&") . '</small>';
3070 echo "</td><td class=tdleft>${user['user_realname']}</td></li>";
e673ee24
DO
3071 $order = $nextorder[$order];
3072 }
3073 echo '</table>';
3074 finishPortlet();
59427701
DO
3075 echo '</td><td class=pcright>';
3076 renderTagFilterPortlet ($tagfilter, 'user');
3077 echo "</td></tr></table>\n";
e673ee24
DO
3078}
3079
59427701 3080function renderUserListEditor ()
e673ee24
DO
3081{
3082 global $root, $pageno, $tabno, $accounts;
3083 startPortlet ('User accounts');
3084 showMessageOrError();
3085 echo "<table cellspacing=0 cellpadding=5 align=center class=widetable>\n";
623457f8 3086 echo "<tr><th>status (click to change)</th><th>Username</th><th>Real name</th><th>Password</th><th>&nbsp;</th></tr>\n";
e673ee24
DO
3087 foreach ($accounts as $account)
3088 {
7056988c
DO
3089 printOpFormIntro ('updateUser', array ('user_id' => $account['user_id']));
3090 echo "<tr><td>";
e673ee24
DO
3091 if ($account['user_enabled'] == 'yes' && $account['user_id'] != 1)
3092 {
59427701 3093 echo "<a href='${root}process.php?op=disableUser&page=${pageno}&tab=${tabno}&user_id=${account['user_id']}'>";
e673ee24
DO
3094 printImageHREF ('blockuser', 'disable account');
3095 echo "</a>\n";
3096 }
3097 if ($account['user_enabled'] == 'no' && $account['user_id'] != 1)
3098 {
59427701 3099 echo "<a href='${root}process.php?op=enableUser&page=${pageno}&tab=${tabno}&user_id=${account['user_id']}'>";
e673ee24
DO
3100 printImageHREF ('unblockuser', 'enable account');
3101 echo "</a>\n";
3102 }
3103 // Otherwise skip icon.
3104 echo "</td>";
3105 echo "<td><input type=text name=username value='${account['user_name']}' size=16></td>";
3106 echo "<td><input type=text name=realname value='${account['user_realname']}' size=24></td>";
8e5763a7
DO
3107 echo "<td><input type=password name=password value='${account['user_password_hash']}' size=64></td><td>";
3108 printImageHREF ('save', 'Save changes', TRUE);
3109 echo "</td></form></tr>\n";
e673ee24 3110 }
7056988c 3111 printOpFormIntro ('createUser');
8e5763a7 3112 echo "<td>&nbsp;</td><td><input type=text size=16 name=username tabindex=100></td>\n";
e673ee24 3113 echo "<td><input type=text size=24 name=realname tabindex=101></td>";
8e5763a7
DO
3114 echo "<td><input type=password size=64 name=password tabindex=102></td><td>";
3115 printImageHREF ('create', 'Add new account', TRUE, 103);
3116 echo "</td></tr></form>";
e673ee24
DO
3117 echo "</table><br>\n";
3118 finishPortlet();
3119}
3120
17c32f4c
DO
3121function renderPortMapViewer ()
3122{
3123 renderPortMap (FALSE);
3124}
3125
3126function renderPortMapEditor ()
3127{
3128 renderPortMap (TRUE);
3129}
3130
e673ee24
DO
3131function renderPortMap ($editable = FALSE)
3132{
3133 global $nextorder, $root, $pageno, $tabno;
3134 showMessageOrError();
3135 startPortlet ("Port compatibility map");
3136 $ptlist = getPortTypes();
3137 $pclist = getPortCompat();
3138 $pctable = buildPortCompatMatrixFromList ($ptlist, $pclist);
3139 if ($editable)
7056988c 3140 printOpFormIntro ('save');
e673ee24
DO
3141 echo "<table class=cooltable border=0 cellpadding=5 cellspacing=0 align=center>\n";
3142 echo "<tr><th class=vert_th>&nbsp;</th>";
3143 foreach ($ptlist as $name2)
3144 echo "<th>to ${name2}</th>";
3145 echo "</tr>";
3146 // Make a copy to have an independent array pointer.
3147 $ptlistY = $ptlist;
3148 $order = 'odd';
3149 foreach ($ptlistY as $type1 => $name1)
3150 {
3151 echo "<tr class=row_${order}><th class=vert_th style='border-bottom: 0px;'>from $name1</th>";
3152 foreach ($ptlist as $type2 => $name2)
3153 {
92b38217 3154 echo '<td' . ($pctable[$type1][$type2] ? " class=portmap_highlight_$order" : '') . '>';
19acd465 3155 echo '<input type=checkbox' . ($editable ? " name=atom_${type1}_${type2}" : ' disabled');
e673ee24
DO
3156 echo ($pctable[$type1][$type2] ? ' checked' : '') . '></td>';
3157 }
3158 echo "</tr>\n";
3159 $order = $nextorder[$order];
3160 }
3161 echo '</table><br>';
3162 if ($editable)
3163 {
7056988c 3164 printImageHREF ('SAVE', 'Save changes', TRUE);
e673ee24
DO
3165 echo "</form>";
3166 }
3167 finishPortlet();
3168}
3169
3170function renderConfigMainpage ()
3171{
3172 global $pageno, $root;
3173 $children = getDirectChildPages ($pageno);
3174 echo '<ul>';
27ef67da
DO
3175 // FIXME: assume all config kids to have static titles at the moment,
3176 // but use some proper abstract function later.
e673ee24 3177 foreach ($children as $cpageno => $child)
27ef67da 3178 echo "<li><a href='${root}?page=${cpageno}'>" . $child['title'] . "</li>\n";
e673ee24
DO
3179 echo '';
3180 echo '</ul>';
3181}
3182
3183function renderRackPage ($rack_id)
3184{
3185 if ($rack_id == 0)
3186 {
7056988c 3187 showError ('Invalid argument', __FUNCTION__);
e673ee24
DO
3188 return;
3189 }
3190 if (($rackData = getRackData ($rack_id)) == NULL)
3191 {
591ff2c4 3192 showError ('getRackData() failed', __FUNCTION__);
e673ee24
DO
3193 return;
3194 }
3195 echo "<table border=0 class=objectview cellspacing=0 cellpadding=0><tr>";
3196
3197 // Left column with information.
3198 echo "<td class=pcleft>";
254673dd 3199 renderRackInfoPortlet ($rackData);
e673ee24
DO
3200 echo '</td>';
3201
3202 // Right column with rendered rack.
3203 echo '<td>';
3204 startPortlet ('Rack diagram');
3205 renderRack ($rack_id);
3206 finishPortlet();
3207 echo '</td>';
3208
3209 echo '</tr></table>';
3210}
3211
3212function renderDictionary ()
3213{
3214 global $nextorder;
2dd59b15 3215 $dict = getDict (TRUE);
aa28ebdf 3216 echo "<br><table class=cooltable border=0 cellpadding=5 cellspacing=0 align=center>\n";
aa28ebdf
DO
3217 foreach ($dict as $chapter_no => $chapter)
3218 {
a22ec5b4 3219 $order = 'odd';
83d2fcca 3220 echo "<tr><th>Chapter</th><th>refs</th><th>Word</th></tr>\n";
aa28ebdf
DO
3221 $wc = count ($chapter['word']);
3222 echo "<tr class=row_${order}><td class=tdleft" . ($wc ? " rowspan = ${wc}" : '');
3223 echo "><div title='number=${chapter_no}'>${chapter['name']} (${wc} records)</div></td>";
3224 if (!$wc)
3225 echo "<td colspan=2>none</td>";
3226 else
e673ee24 3227 {
aa28ebdf
DO
3228 $chap_start = TRUE;
3229 foreach ($chapter['word'] as $key => $value)
3230 {
3231 if (!$chap_start)
3232 echo "<tr class=row_${order}>";
3233 else
3234 $chap_start = FALSE;
6bb8e41d
DO
3235 echo '<td>' . ($chapter['refcnt'][$key] ? $chapter['refcnt'][$key] : '&nbsp;') . '</td>';
3236 echo "<td><div title='key=${key}'>${value}</div></td></tr>\n";
aa28ebdf
DO
3237 $order = $nextorder[$order];
3238 }
e673ee24 3239 }
e673ee24 3240 }
2dd59b15 3241 echo "</table>\n<br>";
e673ee24
DO
3242}
3243
3244function renderDictionaryEditor ()
3245{
f632bd28 3246 global $root, $pageno, $tabno, $nextorder;
e673ee24 3247 $dict = getDict();
95d80773 3248 showMessageOrError();
f632bd28
DO
3249 echo "<br><table class=cooltable border=0 cellpadding=5 cellspacing=0 align=center>\n";
3250 foreach ($dict as $chapter_no => $chapter)
e673ee24 3251 {
f632bd28 3252 $order = 'odd';
b2f9fa84 3253 echo "<tr><th>Chapter</th><th>&nbsp;</th><th>Word</th><th>&nbsp;</th></tr>\n";
f632bd28
DO
3254 $wc = count ($chapter['word']);
3255 // One extra span for the new record per each chapter block.
3256 echo "<tr class=row_${order}><td class=tdleft" . ($wc ? ' rowspan = ' . ($wc + 1) : '');
3257 echo "><div title='number=${chapter_no}'>${chapter['name']} (${wc} records)</div></td>";
7056988c
DO
3258 printOpFormIntro ('add', array ('chapter_no' => $chapter['no']));
3259 echo "<td>";
3260 printImageHREF ('add', 'Add new', TRUE);
3261 echo "</td>";
f632bd28 3262 echo "<td class=tdright><input type=text name=dict_value size=32></td>";
7056988c 3263 echo "<td>&nbsp;</td>";
f632bd28 3264 echo '</tr></form>';
b2f9fa84 3265 $order = $nextorder[$order];
e673ee24
DO
3266 foreach ($chapter['word'] as $key => $value)
3267 {
7056988c 3268 printOpFormIntro ('upd', array ('chapter_no' => $chapter['no'], 'dict_key' => $key));
95d80773 3269 echo "<tr class=row_${order}><td>";
f632bd28
DO
3270 // Prevent deleting words currently used somewhere.
3271 if ($chapter['refcnt'][$key])
b2f9fa84 3272 printImageHREF ('nodelete', 'referenced ' . $chapter['refcnt'][$key] . ' time(s)');
f632bd28
DO
3273 else
3274 {
3275 echo "<a href='${root}process.php?page=${pageno}&tab=${tabno}&op=del&chapter_no=${chapter['no']}&dict_key=${key}'>";
3276 printImageHREF ('delete', 'Delete word');
3277 echo "</a>";
3278 }
3279 echo '</td>';
7056988c
DO
3280 echo "<td class=tdright><input type=text name=dict_value size=32 value='${value}'></td><td>";
3281 printImageHREF ('save', 'Save changes', TRUE);
3282 echo "</td></tr></form>\n";
f632bd28
DO
3283 $order = $nextorder[$order];
3284 } // foreach ($chapter['word']
3285 } // foreach ($dict
3286 echo "</table>\n";
e673ee24
DO
3287}
3288
3289// We don't allow to rename/delete a sticky chapter and we don't allow
3290// to delete a non-empty chapter.
3291function renderChaptersEditor ()
3292{
3293 global $root, $pageno, $tabno;
3294 showMessageOrError();
3295 $dict = getDict();
3296 echo "<table cellspacing=0 cellpadding=5 align=center class=widetable>\n";
3297 echo '<tr><th>&nbsp;</th><th>Chapter name</th><th>Words</th><th>&nbsp;</th></tr>';
3298 foreach ($dict as $chapter)
3299 {
3300 $wordcount = count ($chapter['word']);
3301 $sticky = $chapter['sticky'];
7056988c 3302 printOpFormIntro ('upd', array ('chapter_no' => $chapter['no']));
e673ee24
DO
3303 echo '<tr>';
3304 echo '<td>';
0c4605ab
DO
3305 if ($sticky)
3306 printImageHREF ('nodelete', 'system chapter');
3307 elseif ($wordcount > 0)
3308 printImageHREF ('nodelete', 'contains ' . $wordcount . ' word(s)');
e673ee24
DO
3309 else
3310 {
3311 echo "<a href='${root}process.php?page=${pageno}&tab=${tabno}&op=del&chapter_no=${chapter['no']}'>";
3312 printImageHREF ('delete', 'Remove chapter');
3313 echo "</a>";
3314 }
3315 echo '</td>';
3316 echo "<td><input type=text name=chapter_name value='${chapter['name']}'" . ($sticky ? ' disabled' : '') . "></td>";
3317 echo "<td class=tdleft>${wordcount}</td><td>";
3318 if ($sticky)
3319 echo '&nbsp;';
3320 else
7056988c 3321 printImageHREF ('save', 'Save changes', TRUE);
e673ee24
DO
3322 echo '</td></tr>';
3323 echo '</form>';
3324 }
7056988c 3325 printOpFormIntro ('add');
e673ee24 3326 echo '<tr><td>';
7056988c 3327 printImageHREF ('add', 'Add new', TRUE);
e673ee24
DO
3328 echo "</td><td colspan=3><input type=text name=chapter_name></td>";
3329 echo '</tr>';
3330 echo '</form>';
3331 echo "</table>\n";
3332}
3333
3334function renderAttributes ()
3335{
3336 global $nextorder;
3337 $attrMap = getAttrMap();
3338 startPortlet ('Optional attributes');
3339 echo "<table class=cooltable border=0 cellpadding=5 cellspacing=0 align=center>\n";
3340 echo "<tr><th class=tdleft>Attribute name</th><th class=tdleft>Attribute type</th><th class=tdleft>Applies to</th></tr>";
3341 $order = 'odd';
3342 foreach ($attrMap as $attr)
3343 {
3344 echo "<tr class=row_${order}>";
3345 echo "<td class=tdleft>${attr['name']}</td>";
3346 echo "<td class=tdleft>${attr['type']}</td>";
3347 echo '<td class=tdleft>';
3348 if (count ($attr['application']) == 0)
3349 echo '&nbsp;';
3350 else
3351 foreach ($attr['application'] as $app)
3352 if ($attr['type'] == 'dict')
3353 echo "${app['objtype_name']} (values from '${app['chapter_name']}')<br>";
3354 else
3355 echo "${app['objtype_name']}<br>";
3356 echo '</td>';
3357 echo "</tr>\n";
3358 $order = $nextorder[$order];
3359 }
3360 echo "</table><br>\n";
3361 finishPortlet();
3362}
3363
3364function renderEditAttributesForm ()
3365{
3366 global $root, $pageno, $tabno;
3367 $attrMap = getAttrMap();
3368 showMessageOrError();
3369 startPortlet ('Optional attributes');
3370 echo "<table cellspacing=0 cellpadding=5 align=center class=widetable>\n";
3371 echo '<tr><th>&nbsp;</th><th>Name</th><th>Type</th><th>&nbsp;</th></tr>';