RackTables git mirrors - racktables/blob - inc/interface.php

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