r2745 - stuffInRackspace(): sayonara, this data is in rack structure already
[racktables] / inc / interface.php
index 2fa653bd38ec4a2b636983c44de1fe54e5ca4d76..8846dea1d9c4ff2d188eba70af91568f1b1ad50f 100644 (file)
@@ -93,6 +93,9 @@ $image['destroy']['height'] = 16;
 $image['nodestroy']['path'] = 'pix/tango-user-trash-16x16-gray.png';
 $image['nodestroy']['width'] = 16;
 $image['nodestroy']['height'] = 16;
+$image['NODESTROY']['path'] = 'pix/tango-user-trash-32x32-gray.png';
+$image['NODESTROY']['width'] = 32;
+$image['NODESTROY']['height'] = 32;
 $image['DESTROY']['path'] = 'pix/tango-user-trash-32x32.png';
 $image['DESTROY']['width'] = 32;
 $image['DESTROY']['height'] = 32;
@@ -210,10 +213,17 @@ $attrtypes = array
        'dict' => '[D] dictionary record'
 );
 
+// Rack thumbnail image width summands: "front", "interior" and "rear" elements w/o surrounding border.
+$rtwidth = array
+(
+       0 => 9,
+       1 => 21,
+       2 => 9
+);
+
 // Main menu.
 function renderIndex ()
 {
-       global $root;
 ?>
 <table border=0 cellpadding=0 cellspacing=0 width='100%'>
        <tr>
@@ -226,7 +236,7 @@ function renderIndex ()
                                                <?php printImageHREF ('rackspace'); ?></a></h1>
                                        </td>
                                        <td>
-                                               <h1><a href='<?php echo makeHref(array('page'=>'objects')) ?>'>Objects<br>
+                                               <h1><a href='<?php echo makeHref(array('page'=>'depot')) ?>'>Objects<br>
                                                <?php printImageHREF ('objects'); ?></a></h1>
                                        </td>
                                        <td>
@@ -263,36 +273,47 @@ function renderIndex ()
 
 function renderRackspace ()
 {
-       $tagfilter = getTagFilter();
-       $tagfilter_str = getTagFilterStr ($tagfilter);
-       showMessageOrError();
        echo "<table class=objview border=0 width='100%'><tr><td class=pcleft>";
-       renderTagFilterPortlet ($tagfilter, 'rack');
+       $cellfilter = getCellFilter();
+       renderCellFilterPortlet ($cellfilter, 'rack');
        echo '</td><td class=pcright>';
        echo '<table border=0 cellpadding=10 cellpadding=1>';
        // generate thumb gallery
-       $rackrowList = getRackspace ($tagfilter);
        global $nextorder;
        $rackwidth = getRackImageWidth();
+       // Zero value effectively disables the limit.
+       $maxPerRow = getConfigVar ('RACKS_PER_ROW');
        $order = 'odd';
-       foreach ($rackrowList as $rackrow)
+       foreach (getRackRows() as $row_id => $row_name)
        {
+               $rackList = filterCellList (listCells ('rack', $row_id), $cellfilter['expression']);
+               if (!count ($rackList) and count ($cellfilter['expression']))
+                       continue;
+               $rackListIdx = 0;
                echo "<tr class=row_${order}><th class=tdleft>";
-               echo "<a href='".makeHref(array('page'=>'row', 'row_id'=>$rackrow['row_id']))."${tagfilter_str}'>";
-               echo "${rackrow['row_name']}</a></th>";
-               $rackList = getRacksForRow ($rackrow['row_id'], $tagfilter);
-               echo "<td><table border=0 cellspacing=5><tr>";
-               foreach ($rackList as $rack)
-               {
-                       echo "<td align=center><a href='".makeHref(array('page'=>'rack', 'rack_id'=>$rack['id']))."'>";
-                       echo "<img border=0 width=${rackwidth} height=";
-                       echo getRackImageHeight ($rack['height']);
-                       echo " title='${rack['height']} units'";
-                       echo "src='render_image.php?img=minirack&rack_id=${rack['id']}'>";
-                       echo "<br>${rack['name']}</a></td>";
-               }
+               echo "<a href='".makeHref(array('page'=>'row', 'row_id'=>$row_id))."${cellfilter['urlextra']}'>";
+               echo "${row_name}</a></th><td><table border=0 cellspacing=5><tr>";
+               if (!count ($rackList))
+                       echo "<td>(empty row)</td>";
+               else
+                       foreach ($rackList as $rack)
+                       {
+                               if ($rackListIdx > 0 and $maxPerRow > 0 and $rackListIdx % $maxPerRow == 0)
+                               {
+                                       echo '</tr></table></tr>';
+                                       echo "<tr class=row_${order}><th class=tdleft>${row_name} (continued)";
+                                       echo "</th><td><table border=0 cellspacing=5><tr>";
+                                       $order = $nextorder[$order];
+                               }
+                               echo "<td align=center><a href='".makeHref(array('page'=>'rack', 'rack_id'=>$rack['id']))."'>";
+                               echo "<img border=0 width=${rackwidth} height=";
+                               echo getRackImageHeight ($rack['height']);
+                               echo " title='${rack['height']} units'";
+                               echo "src='render_image.php?img=minirack&rack_id=${rack['id']}'>";
+                               echo "<br>${rack['name']}</a></td>";
+                               $rackListIdx++;
+                       }
                echo "</tr></table></tr>\n";
-               $order = $nextorder[$order];
        }
        echo "</table>\n";
        echo "</td></tr></table>\n";
@@ -303,31 +324,32 @@ function renderRackspaceRowEditor ()
        function printNewItemTR ()
        {
                printOpFormIntro ('addRow');
-               echo "<tr><td><input type=text name=name tabindex=100></td><td>";
+               echo "<tr><td>";
+               printImageHREF ('create', 'Add new row', TRUE);
+               echo "</td><td><input type=text name=name tabindex=100></td><td>";
                printImageHREF ('create', 'Add new row', TRUE, 101);
-               echo "</td><td></td></tr></form>";
+               echo "</td></tr></form>";
        }
-       global $pageno, $tabno;
-       showMessageOrError();
        startPortlet ('Rows');
        echo "<table border=0 cellspacing=0 cellpadding=5 align=center class=widetable>\n";
-       echo "<tr><th>Name</th></tr>\n";
+       echo "<tr><th>&nbsp;</th><th>Name</th><th>&nbsp;</th></tr>\n";
        if (getConfigVar ('ADDNEW_AT_TOP') == 'yes')
                printNewItemTR();
-       $rackrowList = getRackspace ();
-       foreach ($rackrowList as $rackrow)
+       foreach (getRackRows() as $row_id => $row_name)
        {
-               printOpFormIntro ('updateRow', array ('row_id' => $rackrow['row_id']));
-               echo "<tr><td><input type=text name=name value='${rackrow['row_name']}'></td><td>";
-               printImageHREF ('save', 'Save changes', TRUE);
-               echo "</td></form><td>";
-               if ($rackrow['count'] == 0)
+               echo "<tr><td>";
+               if ($rc = count (listCells ('rack', $row_id)))
+                       printImageHREF ('nodestroy', "${rc} rack(s) here");
+               else
                {
-                       echo "<a href=\"".makeHrefProcess(array('op'=>'delete', 'row_id'=>$rackrow['row_id'], 'name'=>$rackrow['row_name']))."\">";
-                       printImageHREF ('delete', 'Delete row');
+                       echo "<a href=\"".makeHrefProcess(array('op'=>'delete', 'row_id'=>$row_id))."\">";
+                       printImageHREF ('destroy', 'Delete row');
                        echo "</a>";
                }
-               echo "</td></tr>\n";
+               printOpFormIntro ('updateRow', array ('row_id' => $row_id));
+               echo "</td><td><input type=text name=name value='${row_name}'></td><td>";
+               printImageHREF ('save', 'Save changes', TRUE);
+               echo "</form></td></tr>\n";
        }
        if (getConfigVar ('ADDNEW_AT_TOP') != 'yes')
                printNewItemTR();
@@ -335,20 +357,15 @@ function renderRackspaceRowEditor ()
        finishPortlet();
 }
 
-function renderRow ($row_id = 0)
+function renderRow ($row_id)
 {
-       if ($row_id == 0)
-       {
-               showError ('Invalid row_id', __FUNCTION__);
-               return;
-       }
        if (($rowInfo = getRackRowInfo ($row_id)) == NULL)
        {
                showError ('getRackRowInfo() failed', __FUNCTION__);
                return;
        }
-       $tagfilter = getTagFilter();
-       $rackList = getRacksForRow ($row_id, $tagfilter);
+       $cellfilter = getCellFilter();
+       $rackList = filterCellList (listCells ('rack', $row_id), $cellfilter['expression']);
        // Main layout starts.
        echo "<table border=0 class=objectview cellspacing=0 cellpadding=0>";
 
@@ -363,29 +380,36 @@ function renderRow ($row_id = 0)
        echo "</td></tr>\n";
        echo "</table><br>\n";
        finishPortlet();
+       renderCellFilterPortlet ($cellfilter, 'rack', 'row_id', $row_id);
 
-       echo "</td><td class=pcright rowspan=2>";
+       echo "</td><td class=pcright>";
 
        global $nextorder;
        $rackwidth = getRackImageWidth() * getConfigVar ('ROW_SCALE');
+       // Maximum number of racks per row is proportionally less, but at least 1.
+       $maxPerRow = max (floor (getConfigVar ('RACKS_PER_ROW') / getConfigVar ('ROW_SCALE')), 1);
+       $rackListIdx = 0;
        $order = 'odd';
        startPortlet ('Racks');
        echo "<table border=0 cellspacing=5 align='center'><tr>";
        foreach ($rackList as $rack)
        {
+               if ($rackListIdx % $maxPerRow == 0)
+               {
+                       if ($rackListIdx > 0)
+                               echo '</tr>';
+                       echo '<tr>';
+               }
                echo "<td align=center class=row_${order}><a href='".makeHref(array('page'=>'rack', 'rack_id'=>$rack['id']))."'>";
                echo "<img border=0 width=${rackwidth} height=" . (getRackImageHeight ($rack['height']) * getConfigVar ('ROW_SCALE'));
                echo " title='${rack['height']} units'";
                echo "src='render_image.php?img=minirack&rack_id=${rack['id']}'>";
                echo "<br>${rack['name']}</a></td>";
                $order = $nextorder[$order];
+               $rackListIdx++;
        }
        echo "</tr></table>\n";
        finishPortlet();
-       echo "</td></tr>";
-
-       echo "<tr><td class=pcleft>";
-       renderTagFilterPortlet ($tagfilter, 'rack', 'row_id', $row_id);
        echo "</td></tr></table>";
 }
 
@@ -403,20 +427,87 @@ function showError ($info = '', $location = 'N/A')
        echo "Go back or try starting from <a href='".makeHref()."'>index page</a>.<br></div>\n";
 }
 
-// This function renders rack as HTML table.
-function renderRack ($rack_id = 0, $hl_obj_id = 0)
+// This function assures that specified argument was passed
+// and is a number greater than zero.
+function assertUIntArg ($argname, $caller = 'N/A', $allow_zero = FALSE)
 {
-       if ($rack_id == 0)
+       if (!isset ($_REQUEST[$argname]))
        {
-               showError ('Invalid rack_id', __FUNCTION__);
-               return;
+               showError ("Parameter '${argname}' is missing (calling function is [${caller}]).", __FUNCTION__);
+               die();
        }
-       if (($rackData = getRackData ($rack_id)) == NULL)
+       if (!is_numeric ($_REQUEST[$argname]))
        {
-               showError ('getRackData() failed', __FUNCTION__);
-               return;
+               showError ("Parameter '${argname}' is not a number (calling function is [${caller}]).", __FUNCTION__);
+               die();
        }
-       global $pageno, $tabno;
+       if ($_REQUEST[$argname] < 0)
+       {
+               showError ("Parameter '${argname}' is less than zero (calling function is [${caller}]).", __FUNCTION__);
+               die();
+       }
+       if (!$allow_zero and $_REQUEST[$argname] == 0)
+       {
+               showError ("Parameter '${argname}' is equal to zero (calling function is [${caller}]).", __FUNCTION__);
+               die();
+       }
+}
+
+// This function assures that specified argument was passed
+// and is a non-empty string.
+function assertStringArg ($argname, $caller = 'N/A', $ok_if_empty = FALSE)
+{
+       if (!isset ($_REQUEST[$argname]))
+       {
+               showError ("Parameter '${argname}' is missing (calling function is [${caller}]).", __FUNCTION__);
+               die();
+       }
+       if (!is_string ($_REQUEST[$argname]))
+       {
+               showError ("Parameter '${argname}' is not a string (calling function is [${caller}]).", __FUNCTION__);
+               die();
+       }
+       if (!$ok_if_empty and empty ($_REQUEST[$argname]))
+       {
+               showError ("Parameter '${argname}' is an empty string (calling function is [${caller}]).", __FUNCTION__);
+               die();
+       }
+}
+
+function assertBoolArg ($argname, $caller = 'N/A', $ok_if_empty = FALSE)
+{
+       if (!isset ($_REQUEST[$argname]))
+       {
+               showError ("Parameter '${argname}' is missing (calling function is [${caller}]).", __FUNCTION__);
+               die();
+       }
+       if (!is_string ($_REQUEST[$argname]) or $_REQUEST[$argname] != 'on')
+       {
+               showError ("Parameter '${argname}' is not a string (calling function is [${caller}]).", __FUNCTION__);
+               die();
+       }
+       if (!$ok_if_empty and empty ($_REQUEST[$argname]))
+       {
+               showError ("Parameter '${argname}' is an empty string (calling function is [${caller}]).", __FUNCTION__);
+               die();
+       }
+}
+
+function assertIPv4Arg ($argname, $caller = 'N/A', $ok_if_empty = FALSE)
+{
+       assertStringArg ($argname, $caller, $ok_if_empty);
+       if (!empty ($_REQUEST[$argname]) and long2ip (ip2long ($_REQUEST[$argname])) !== $_REQUEST[$argname])
+       {
+               showError ("IPv4 address validation failed for value '" . $_REQUEST[$argname] . "' (calling function is [${caller}]).", __FUNCTION__);
+               die();
+       }
+}
+
+// This function renders rack as HTML table.
+function renderRack ($rack_id, $hl_obj_id = 0)
+{
+       $rackData = spotEntity ('rack', $rack_id);
+       amplifyCell ($rackData);
        markAllSpans ($rackData);
        if ($hl_obj_id > 0)
                highlightObject ($rackData, $hl_obj_id);
@@ -497,8 +588,6 @@ function renderRack ($rack_id = 0, $hl_obj_id = 0)
 
 function renderNewRackForm ($row_id)
 {
-       showMessageOrError();
-
        startPortlet ('Add one');
        printOpFormIntro ('addRack', array ('got_data' => 'TRUE'));
        echo '<table border=0 align=center>';
@@ -507,7 +596,7 @@ function renderNewRackForm ($row_id)
                $defh = '';
        echo "<tr><th class=tdright>Rack name (*):</th><td class=tdleft><input type=text name=rack_name tabindex=1></td>";
        echo "<td rowspan=4>Assign tags:<br>";
-       renderTagSelect();
+       renderNewEntityTags();
        echo "</td></tr>\n";
        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";
        echo "<tr><th class=tdright>Comment:</th><td class=tdleft><input type=text name=rack_comment tabindex=3></td></tr>\n";
@@ -524,7 +613,7 @@ function renderNewRackForm ($row_id)
                $defh = '';
        echo "<tr><th class=tdright>Height in units (*):</th><td class=tdleft><input type=text name=rack_height2 value='${defh}'></td>";
        echo "<td rowspan=3 valign=top>Assign tags:<br>";
-       renderTagSelect();
+       renderNewEntityTags();
        echo "</td></tr>\n";
        echo "<tr><th class=tdright>Rack names (*):</th><td class=tdleft><textarea name=rack_names cols=40 rows=25></textarea></td></tr>\n";
        echo "<tr><td class=submit colspan=2>";
@@ -535,9 +624,7 @@ function renderNewRackForm ($row_id)
 
 function renderEditObjectForm ($object_id)
 {
-       showMessageOrError();
-
-       global $pageno, $tabno;
+       global $pageno;
        $object = getObjectInfo ($object_id);
        if ($object == NULL)
        {
@@ -546,39 +633,23 @@ function renderEditObjectForm ($object_id)
        }
        startPortlet ();
        printOpFormIntro ('update');
-       echo '<table border=0 width=100%><tr><td class=pcleft>';
 
        // static attributes
-       echo '<table border=0 align=center>';
-       echo "<tr><th colspan=2><h2>Static attributes</h2></th></tr>";
-       echo "<tr><th class=tdright>Type:</th><td class=tdleft>";
+       echo '<table border=0 cellspacing=0 cellpadding=3 align=center>';
+       echo "<tr><td>&nbsp;</td><th colspan=2><h2>Attributes</h2></th></tr>";
+       echo "<tr><td>&nbsp;</td><th class=tdright>Type:</th><td class=tdleft>";
        printSelect (getObjectTypeList(), 'object_type_id', $object['objtype_id']);
        echo "</td></tr>\n";
        // baseline info
-       echo "<tr><th class=tdright>Common name:</th><td class=tdleft><input type=text name=object_name value='${object['name']}'></td></tr>\n";
-       echo "<tr><th class=tdright>Visible label:</th><td class=tdleft><input type=text name=object_label value='${object['label']}'></td></tr>\n";
-       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";
-       echo "<tr><th class=tdright>Barcode:</th><td class=tdleft><input type=text name=object_barcode value='${object['barcode']}'></td></tr>\n";
-       echo "<tr><th class=tdright>Has problems:</th><td class=tdleft><input type=checkbox name=object_has_problems";
-       if ($object['has_problems'] == 'yes')
-               echo ' checked';
-       echo "></td></tr>\n";
-       echo "<tr><th class=tdright>Actions:</th><td class=tdleft><a href='".
-               makeHrefProcess(array('op'=>'deleteObject', 'page'=>'objects', 'tab'=>'default', 'object_id'=>$object_id, 'name'=>$object['name'])).
-               "' onclick=\"javascript:return confirm('Are you sure you want to delete the object?')\">Delete object</a></td></tr>\n";
-       echo "<tr><td colspan=2><b>Comment:</b><br><textarea name=object_comment rows=10 cols=80>${object['comment']}</textarea></td></tr>";
-       echo '</table>';
-
-       echo '</td><td class=pcright>';
-       
+       echo "<tr><td>&nbsp;</td><th class=tdright>Common name:</th><td class=tdleft><input type=text name=object_name value='${object['name']}'></td></tr>\n";
+       echo "<tr><td>&nbsp;</td><th class=tdright>Visible label:</th><td class=tdleft><input type=text name=object_label value='${object['label']}'></td></tr>\n";
+       echo "<tr><td>&nbsp;</td><th class=tdright>Asset tag:</th><td class=tdleft><input type=text name=object_asset_no value='${object['asset_no']}'></td></tr>\n";
+       echo "<tr><td>&nbsp;</td><th class=tdright>Barcode:</th><td class=tdleft><input type=text name=object_barcode value='${object['barcode']}'></td></tr>\n";
        // optional attributes
        $values = getAttrValues ($object_id);
+       echo '<input type=hidden name=num_attrs value=' . count($values) . ">\n";
        if (count($values) > 0)
        {
-               echo "<table border=0 cellspacing=0 cellpadding=5 align=center class=widetable>\n";
-               echo "<tr><th colspan=3><h2>Optional attributes</h2></th></tr>";
-               echo "<tr><th>&nbsp;</th><th>Attribute</th><th>Value</th></tr>\n";
-               echo '<input type=hidden name=num_attrs value=' . count($values) . ">\n";
                $i = 0;
                foreach ($values as $record)
                {
@@ -593,7 +664,7 @@ function renderEditObjectForm ($object_id)
                        else
                                echo '&nbsp;';
                        echo '</td>';
-                       echo "<td class=tdright>${record['name']}:</td><td class=tdleft>";
+                       echo "<th class=sticker>${record['name']}:</th><td class=tdleft>";
                        switch ($record['type'])
                        {
                                case 'uint':
@@ -611,11 +682,17 @@ function renderEditObjectForm ($object_id)
                        echo "</td></tr>\n";
                        $i++;
                }
-               echo "</table>";
        }
-       echo "</td></tr>\n";
+       echo "<tr><td>&nbsp;</td><th class=tdright>Has problems:</th><td class=tdleft><input type=checkbox name=object_has_problems";
+       if ($object['has_problems'] == 'yes')
+               echo ' checked';
+       echo "></td></tr>\n";
+       echo "<tr><td>&nbsp;</td><th class=tdright>Actions:</th><td class=tdleft><a href='".
+               makeHrefProcess(array('op'=>'deleteObject', 'page'=>'depot', 'tab'=>'default', 'object_id'=>$object_id)).
+               "' onclick=\"javascript:return confirm('Are you sure you want to delete the object?')\">Delete object</a></td></tr>\n";
+       echo "<tr><td colspan=3><b>Comment:</b><br><textarea name=object_comment rows=10 cols=80>${object['comment']}</textarea></td></tr>";
 
-       echo "<tr><th class=submit colspan=2>";
+       echo "<tr><th class=submit colspan=3>";
        printImageHREF ('SAVE', 'Save changes', TRUE);
        echo "</form></th></tr></table>\n";
        finishPortlet();
@@ -630,14 +707,9 @@ function renderEditObjectForm ($object_id)
 // This is a clone of renderEditObjectForm().
 function renderEditRackForm ($rack_id)
 {
-       showMessageOrError();
        global $pageno;
-       $rack = getRackData ($rack_id);
-       if ($rack == NULL)
-       {
-               showError ('getRackData() failed', __FUNCTION__);
-               return;
-       }
+       $rack = spotEntity ('rack', $rack_id);
+       amplifyCell ($rack);
 
        startPortlet ('Rack attributes');
        printOpFormIntro ('updateRack');
@@ -708,7 +780,7 @@ function renderRackInfoPortlet ($rackData)
        renderProgressBar (getRSUforRack ($rackData));
        echo "</td></tr>\n";
        echo "<tr><th width='50%' class=tdright>Objects:</th><td class=tdleft>";
-       echo count (stuffInRackspace ($rackData));
+       echo count ($rackData['mountedObjects']);
        echo "</td></tr>\n";
        printTagTRs (makeHref(array('page'=>'rackspace', 'tab'=>'default'))."&");
        if (!empty ($rackData['comment']))
@@ -719,20 +791,10 @@ function renderRackInfoPortlet ($rackData)
 
 // This is a universal editor of rack design/waste.
 // FIXME: switch to using printOpFormIntro()
-function renderGridForm ($rack_id = 0, $filter, $header, $submit, $state1, $state2)
+function renderGridForm ($rack_id, $filter, $header, $submit, $state1, $state2)
 {
-       if ($rack_id == 0)
-       {
-               showError ('Invalid rack_id', __FUNCTION__);
-               return;
-       }
-       if (($rackData = getRackData ($rack_id)) == NULL)
-       {
-               showError ('getRackData() failed', __FUNCTION__);
-               return;
-       }
-       showMessageOrError();
-       global $pageno, $tabno;
+       $rackData = spotEntity ('rack', $rack_id);
+       amplifyCell ($rackData);
        $filter ($rackData);
        markupObjectProblems ($rackData);
 
@@ -769,7 +831,7 @@ function renderRackDesign ($rack_id)
        renderGridForm ($rack_id, 'applyRackDesignMask', 'Rack design', 'Set rack design', 'A', 'F');
 }
 
-function renderRackProblems ($rack_id = 0)
+function renderRackProblems ($rack_id)
 {
        renderGridForm ($rack_id, 'applyRackProblemMask', 'Rack problems', 'Mark unusable atoms', 'F', 'U');
 }
@@ -784,31 +846,9 @@ function finishPortlet ()
        echo "</div>\n";
 }
 
-function printRefsOfType ($refs, $type, $eq)
-{
-       $gotone=0;
-       foreach ($refs as $ref)
-       {
-               if ($eq($ref['type'], $type))
-               {
-                       if ($gotone) echo ', ';
-                       echo "<a href='".makeHref(array('page'=>'object', 'object_id'=>$ref['object_id']))."'>";
-                       if (!empty ($ref['name']))
-                               echo $ref['name'] . '@';
-                       echo "${ref['object_name']}</a>";
-                       $gotone=1;
-               }
-       }
-}
-
-function renderRackObject ($object_id = 0)
+function renderRackObject ($object_id)
 {
        global $nextorder, $aac;
-       if ($object_id <= 0)
-       {
-               showError ('Invalid object_id', __FUNCTION__);
-               return;
-       }
        $info = getObjectInfo ($object_id);
        if ($info == NULL)
        {
@@ -826,8 +866,13 @@ function renderRackObject ($object_id = 0)
                echo "<tr><th width='50%' class=tdright>Common name:</th><td class=tdleft>${info['name']}</td></tr>\n";
        elseif (considerConfiguredConstraint ('object', $object_id, 'NAMEWARN_LISTSRC'))
                echo "<tr><td colspan=2 class=msg_error>Common name is missing.</td></tr>\n";
-       echo "<tr><th width='50%' class=tdright>Object type:</th>";
-       echo "<td class=tdleft><a href='".makeHref(array('page'=>'objgroup', 'group_id'=>$info['objtype_id'], 'hl_object_id'=>$object_id))."'>${info['objtype_name']}</a></td></tr>\n";
+       echo "<tr><th width='50%' class=tdright>Object type:</th><td class=tdleft><a href='";
+       echo makeHref (array (
+               'page' => 'depot',
+               'tab' => 'default',
+               'cfe' => '{$typeid_' . $info['objtype_id'] . '}'
+       ));
+       echo "'>${info['objtype_name']}</a></td></tr>\n";
        if (!empty ($info['asset_no']))
                echo "<tr><th width='50%' class=tdright>Asset tag:</th><td class=tdleft>${info['asset_no']}</td></tr>\n";
        elseif (considerConfiguredConstraint ('object', $object_id, 'ASSETWARN_LISTSRC'))
@@ -840,8 +885,20 @@ function renderRackObject ($object_id = 0)
                echo "<tr><td colspan=2 class=msg_error>Has problems</td></tr>\n";
        foreach (getAttrValues ($object_id, TRUE) as $record)
                if (!empty ($record['value']))
-                       echo "<tr><th width='50%' class=tdright><span class=sticker>${record['name']}</span>:</th><td class=tdleft>${record['a_value']}</td></tr>\n";
-       printTagTRs (makeHref(array('page'=>'objgroup', 'tab'=>'default', 'group_id'=>$info['objtype_id']))."&");
+                       echo "<tr><th width='50%' class=sticker>${record['name']}:</th><td class=sticker>${record['a_value']}</td></tr>\n";
+       printTagTRs
+       (
+               makeHref
+               (
+                       array
+                       (
+                               'page'=>'depot',
+                               'tab'=>'default',
+                               'andor' => 'and',
+                               'cfe' => '{$typeid_' . $info['objtype_id'] . '}',
+                       )
+               )."&"
+       );
        echo "</table><br>\n";
        finishPortlet();
 
@@ -1101,7 +1158,7 @@ function showMessageOrError ()
 }
 
 // This function renders a form for port edition.
-function renderPortsForObject ($object_id = 0)
+function renderPortsForObject ($object_id)
 {
        function printNewItemTR ()
        {
@@ -1116,13 +1173,6 @@ function renderPortsForObject ($object_id = 0)
                printImageHREF ('add', 'add a port', TRUE, 104);
                echo "</td></tr></form>";
        }
-       global $pageno, $tabno;
-       if ($object_id <= 0)
-       {
-               showError ('Invalid object_id', __FUNCTION__);
-               return;
-       }
-       showMessageOrError();
        startPortlet ('Ports and interfaces');
        $ports = getObjectPortsAndLinks ($object_id);
        usort($ports, 'sortByName');
@@ -1214,7 +1264,7 @@ function renderPortsForObject ($object_id = 0)
        finishPortlet();
 }
 
-function renderIPv4ForObject ($object_id = 0)
+function renderIPv4ForObject ($object_id)
 {
        function printNewItemTR ()
        {
@@ -1231,13 +1281,7 @@ function renderIPv4ForObject ($object_id = 0)
                printImageHREF ('add', 'allocate', TRUE, 103);
                echo "</td></tr></form>";
        }
-       global $pageno, $tabno, $aat;
-       if ($object_id <= 0)
-       {
-               showError ('Invalid object_id', __FUNCTION__);
-               return;
-       }
-       showMessageOrError();
+       global $aat;
        startPortlet ('Allocations');
        $alloclist = getObjectIPv4Allocations ($object_id);
        echo "<table cellspacing=0 cellpadding='5' align='center' class='widetable'>\n";
@@ -1410,23 +1454,24 @@ function printLog ($log)
                                66 => array ('code' => 'success', 'format' => "File sent Ok via handler '%s'"),
                                67 => array ('code' => 'success', 'format' => "Tag rolling done, %u objects involved"),
                                68 => array ('code' => 'success', 'format' => "Updated rack '%s'"),
-                               69 => array ('code' => 'success', 'format' => 'File %s was added successfully'),
-                               70 => array ('code' => 'success', 'format' => 'File %s was updated successfully'),
-                               71 => array ('code' => 'success', 'format' => 'File %s was linked successfully'),
-                               72 => array ('code' => 'success', 'format' => 'File %s was unlinked successfully'),
-                               73 => array ('code' => 'success', 'format' => 'File %s was deleted successfully'),
-                               74 => array ('code' => 'success', 'format' => 'Row %s was added successfully'),
-                               75 => array ('code' => 'success', 'format' => 'Row %s was updated successfully'),
-                               76 => array ('code' => 'success', 'format' => 'Object %s was deleted successfully'),
-                               77 => array ('code' => 'success', 'format' => 'Row %s was deleted successfully'),
-                               78 => array ('code' => 'success', 'format' => 'File %s saved Ok'),
-                               79 => array ('code' => 'success', 'format' => 'Rack %s was deleted successfully'),
+                               69 => array ('code' => 'success', 'format' => 'File "%s" was added successfully'),
+                               70 => array ('code' => 'success', 'format' => 'File "%s" was updated successfully'),
+                               71 => array ('code' => 'success', 'format' => 'File "%s" was linked successfully'),
+                               72 => array ('code' => 'success', 'format' => 'File was unlinked successfully'),
+                               73 => array ('code' => 'success', 'format' => 'File "%s" was deleted successfully'),
+                               74 => array ('code' => 'success', 'format' => 'Row "%s" was added successfully'),
+                               75 => array ('code' => 'success', 'format' => 'Row "%s" was updated successfully'),
+                               76 => array ('code' => 'success', 'format' => 'Object "%s" was deleted successfully'),
+                               77 => array ('code' => 'success', 'format' => 'Row "%s" was deleted successfully'),
+                               78 => array ('code' => 'success', 'format' => 'File "%s" saved Ok'),
+                               79 => array ('code' => 'success', 'format' => 'Rack "%s" was deleted successfully'),
+                               80 => array ('code' => 'success', 'format' => "Added new object '%s'"),
 
 // records 100~199 with fatal error messages
                                100 => array ('code' => 'error', 'format' => '%s'),
                                101 => array ('code' => 'error', 'format' => 'Port name cannot be empty'),
                                102 => array ('code' => 'error', 'format' => "Error creating user account '%s'"),
-                               103 => array ('code' => 'error', 'format' => 'getHashByID() failed'),
+                               103 => array ('code' => 'error', 'format' => 'User not found!'),
                                104 => array ('code' => 'error', 'format' => "Error updating user account '%s'"),
 // ...
 // ...
@@ -1469,9 +1514,9 @@ function printLog ($log)
                                143 => array ('code' => 'error', 'format' => 'Tried chaining %u tags, but experienced %u errors.'),
                                144 => array ('code' => 'error', 'format' => "Error deleting tag: '%s'"),
                                145 => array ('code' => 'error', 'format' => "Invalid tag name '%s'"),
-                               146 => array ('code' => 'error', 'format' => "Tag '%s' (or similar name) already exists"),
-                               147 => array ('code' => 'error', 'format' => "Could not create tag '%s' because of error '%s'"),
-                               148 => array ('code' => 'error', 'format' => "Could not update tag '%s' because of error '%s'"),
+// ...
+                               147 => array ('code' => 'error', 'format' => "Could not create tag '%s': %s"),
+                               148 => array ('code' => 'error', 'format' => "Could not update tag '%s': %s"),
                                149 => array ('code' => 'error', 'format' => 'Turing test failed'),
                                150 => array ('code' => 'error', 'format' => 'Can only change password under DB authentication.'),
                                151 => array ('code' => 'error', 'format' => 'Old password doesn\'t match.'),
@@ -1507,6 +1552,10 @@ function printLog ($log)
                                181 => array ('code' => 'error', 'format' => "file uploads not allowed, change 'file_uploads' parameter in php.ini"),
                                182 => array ('code' => 'error', 'format' => 'SQL query failed: %s'),
                                183 => array ('code' => 'error', 'format' => "Tag id '%s' does not exist."),
+                               184 => array ('code' => 'error', 'format' => 'Submitted form is invalid at line %u'),
+                               185 => array ('code' => 'error', 'format' => "Failed to add object '%s'"),
+                               186 => array ('code' => 'error', 'format' => 'Incomplete form has been ignored. Cheers.'),
+                               187 => array ('code' => 'error', 'format' => "Internal error in function '%s'"),
 
 // records 200~299 with warnings
                                200 => array ('code' => 'warning', 'format' => '%s'),
@@ -1517,6 +1566,7 @@ function printLog ($log)
                                205 => array ('code' => 'warning', 'format' => '%u change request(s) have been ignored'),
                                206 => array ('code' => 'warning', 'format' => 'Rack is not empty'),
                                207 => array ('code' => 'warning', 'format' => 'Ignored empty request'),
+
                        );
                        // Handle the arguments. Is there any better way to do it?
                        foreach ($log['m'] as $record)
@@ -1585,15 +1635,8 @@ and either delete them before unmounting or refuse to unmount the object.
 */
 
 // We extensively use $_REQUEST in the function.
-// FIXME: move related code into ophandler
-function renderRackSpaceForObject ($object_id = 0)
+function renderRackSpaceForObject ($object_id)
 {
-       if ($object_id <= 0)
-       {
-               showError ('Invalid object_id', __FUNCTION__);
-               return;
-       }
-       $is_submit = isset ($_REQUEST['got_atoms']);
        $is_update = isset ($_REQUEST['rackmulti'][0]);
        $info = getObjectInfo ($object_id);
        if ($info == NULL)
@@ -1603,13 +1646,8 @@ function renderRackSpaceForObject ($object_id = 0)
        }
        // Always process occupied racks plus racks chosen by user. First get racks with
        // already allocated rackspace...
-       $workingRacksData = getResidentRacksData ($object_id);
-       if ($workingRacksData === NULL)
-       {
-               print_r ($workingRacksData);
-               showError ('getResidentRacksData() failed', __FUNCTION__);
-               return;
-       }
+       if (NULL === ($workingRacksData = getResidentRacksData ($object_id)))
+               die; // some error already shown
 
        // ...and then add those chosen by user (if any).
        if (isset($_REQUEST['rackmulti']))
@@ -1617,12 +1655,12 @@ function renderRackSpaceForObject ($object_id = 0)
                {
                        if (!isset ($workingRacksData[$cand_id]))
                        {
-                               $rackData = getRackData ($cand_id);
-                               if ($rackData == NULL)
+                               if (NULL == ($rackData = spotEntity ('rack', $cand_id)))
                                {
-                                       showError ('getRackData() failed', __FUNCTION__);
+                                       showError ('Rack not found', __FUNCTION__);
                                        return NULL;
                                }
+                               amplifyCell ($rackData);
                                $workingRacksData[$cand_id] = $rackData;
                        }
                }
@@ -1639,10 +1677,6 @@ function renderRackSpaceForObject ($object_id = 0)
        unset ($rackData);
 
        // This is the time for rendering.
-       global $pageno, $tabno;
-
-       showMessageOrError();
-
 
        // Main layout starts.
        echo "<table border=0 class=objectview cellspacing=0 cellpadding=0><tr>";
@@ -1650,18 +1684,13 @@ function renderRackSpaceForObject ($object_id = 0)
        // Left portlet with rack list.
        echo "<td class=pcleft height='1%'>";
        startPortlet ('Racks');
-       $allRacksData = getRacksForRow();
+       $allRacksData = listCells ('rack');
        if (count ($allRacksData) <= getConfigVar ('RACK_PRESELECT_THRESHOLD'))
        {
-               foreach (array_keys ($allRacksData) as $rack_id)
+               foreach ($allRacksData as $rack)
                {
-                       $rackData = getRackData ($rack_id);
-                       if ($rackData == NULL)
-                       {
-                               showError ('getRackData() failed', __FUNCTION__);
-                               return NULL;
-                       }
-                       $workingRacksData[$rack_id] = $rackData;
+                       amplifyCell ($rack);
+                       $workingRacksData[$rack_id] = $rack;
                }
                foreach ($workingRacksData as &$rackData)
                        applyObjectMountMask ($rackData, $object_id);
@@ -1695,7 +1724,7 @@ function renderRackSpaceForObject ($object_id = 0)
                markupAtomGrid ($rackData, 'T');
                // If we have a form processed, discard user input and show new database
                // contents.
-               if (!$is_submit and $is_update)
+               if ($is_update)
                        mergeGridFormToRack ($rackData);
                echo "<td valign=top>";
                echo "<center>\n<h2>${rackData['name']}</h2>\n";
@@ -1733,7 +1762,8 @@ function renderMolecule ($mdata, $object_id)
                $atom = $rua['atom'];
                if (!isset ($rackpack[$rack_id]))
                {
-                       $rackData = getRackData ($rack_id);
+                       $rackData = spotEntity ('rack', $rack_id);
+                       amplifyCell ($rackData);
                        for ($i = $rackData['height']; $i > 0; $i--)
                                for ($locidx = 0; $locidx < 3; $locidx++)
                                        $rackData[$i][$locidx]['state'] = 'F';
@@ -1763,138 +1793,31 @@ function renderMolecule ($mdata, $object_id)
        }
 }
 
-function renderUnmountedObjectsPortlet ()
-{
-       startPortlet ('Unmounted objects');
-       $objs = getUnmountedObjects();
-       if ($objs === NULL)
-       {
-               showError ('getUnmountedObjects() failed', __FUNCTION__);
-               return;
-       }
-       global $nextorder;
-       $order = 'odd';
-       echo '<br><br><table border=0 cellpadding=5 cellspacing=0 align=center class=cooltable>';
-       echo '<tr><th>Common name</th><th>Visible label</th><th>Asset number</th><th>Barcode</th></tr>';
-       foreach ($objs as $obj)
-       {
-               echo "<tr class=row_${order}><td><a href='".makeHref(array('page'=>'object', 'object_id'=>$obj['id']))."'>${obj['dname']}</a></td>";
-               echo "<td>${obj['label']}</td>";
-               echo "<td>${obj['asset_no']}</td>";
-               echo "<td>${obj['barcode']}</td>";
-               echo "</tr>";
-               $order = $nextorder[$order];
-       }
-       echo "</table><br>\n";
-       finishPortlet();
-}
-
-function renderProblematicObjectsPortlet ()
+function renderEmptyPortsSelect ($port_id, $type_id)
 {
-       startPortlet ('Problematic objects');
-       $objs = getProblematicObjects();
-       if ($objs === NULL)
-       {
-               showError ('getProblematicObjects() failed', __FUNCTION__);
-               return;
-       }
-       global $nextorder;
-       $order = 'odd';
-       echo '<br><br><table border=0 cellpadding=5 cellspacing=0 align=center class=cooltable>';
-       echo '<tr><th>Type</th><th>Common name</th></tr>';
-       foreach ($objs as $obj)
+       $ports = getEmptyPortsOfType($type_id);
+       usort($ports, 'sortEmptyPorts');
+       foreach ($ports as $port)
        {
-               echo "<tr class=row_${order}><td>${obj['objtype_name']}</td>";
-               echo "<td><a href='".makeHref(array('page'=>'object', 'object_id'=>$obj['id']))."'>${obj['dname']}</a></tr>";
-               $order = $nextorder[$order];
+               if ($port_id == $port['Port_id'])
+                       continue;
+               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";
        }
-       echo "</table><br>\n";
-       finishPortlet();
 }
 
-function renderObjectSpace ()
+function renderDepot ()
 {
-       global $taglist, $tagtree;
-       showMessageOrError();
-       echo "<table border=0 class=objectview>\n";
-       echo "<tr><td class=pcleft width='50%'>";
-       startPortlet ('View all by type');
-       $groupInfo = getObjectGroupInfo();
-       if ($groupInfo === NULL)
-       {
-               showError ('getObjectGroupInfo() failed', __FUNCTION__);
-               return;
-       }
-       if (count ($groupInfo) == 0)
-               echo "No objects exist in DB";
-       else
-       {
-               echo '<div align=left><ul>';
-               foreach ($groupInfo as $gi)
-                       echo "<li><a href='".makeHref(array('page'=>'objgroup', 'group_id'=>$gi['id']))."'>${gi['name']}</a> (${gi['count']})</li>";
-               echo '</ul></div>';
-       }
-       finishPortlet();
-
-       echo '</td><td class=pcright>';
-
-       startPortlet ('View all by tag');
-       if (count ($taglist) == 0)
-               echo "No tags exist in DB";
-       else
-               renderTagCloud ('object');
-       finishPortlet();
-       echo "</td></tr></table>\n";
-}
+       global $pageno, $nextorder;
+       $cellfilter = getCellFilter();
+       $objects = filterCellList (listCells ('object'), $cellfilter['expression']);
 
-function renderObjectGroup ()
-{
-       global $pageno, $tabno, $nextorder, $taglist, $tagtree;
-       showMessageOrError();
-       assertUIntArg ('group_id', __FUNCTION__, TRUE);
-       $group_id = $_REQUEST['group_id'];
-       $tagfilter = getTagFilter();
-       $tagfilter_str = getTagFilterStr ($tagfilter);
        echo "<table border=0 class=objectview>\n";
-       echo "<tr><td class=pcleft width='25%'>";
-       startPortlet ('change type');
-       $groupInfo = getObjectGroupInfo();
-       if ($groupInfo === NULL)
-       {
-               showError ('getObjectGroupInfo() failed', __FUNCTION__);
-               return;
-       }
-       if (count ($groupInfo) == 0)
-               echo "No objects exist in DB";
-       else
-       {
-               echo '<div align=left><ul>';
-               foreach ($groupInfo as $gi)
-               {
-                       echo "<li><a href='".makeHref(array('page'=>$pageno, 'group_id'=>$gi['id']))."${tagfilter_str}'>";
-                       if ($gi['id'] == $group_id)
-                               echo '<strong>';
-                       echo "${gi['name']}</a>";
-                       if ($gi['id'] == $group_id)
-                               echo '</strong>';
-                       echo " (${gi['count']})";
-                       if ($gi['id'] == $group_id)
-                               echo ' &larr;';
-                       echo "</li>";
-               }
-               echo '</ul></div>';
-       }
-       finishPortlet();
-
-       echo '</td><td class=pcleft>';
+       echo "<tr><td class=pcleft>";
 
-       $objects = getObjectList ($group_id, $tagfilter, getTFMode());
-       if (isset ($_REQUEST['pfilter']))
-               $objects = filterEntityList ($objects, 'object', interpretPredicate ($_REQUEST['pfilter']));
        startPortlet ('Objects (' . count ($objects) . ')');
        if ($objects === NULL)
        {
-               showError ('getObjectList() failed', __FUNCTION__);
+               showError ('Fatal error retrieving object list', __FUNCTION__);
                return;
        }
        echo '<br><br><table border=0 cellpadding=5 cellspacing=0 align=center class=cooltable>';
@@ -1909,7 +1832,7 @@ function renderObjectGroup ()
                $tags = loadEntityTags ('object', $obj['id']);
                echo "<tr class=row_${order} valign=top><td class='${secondclass}'><a href='".makeHref(array('page'=>'object', 'object_id'=>$obj['id']))."'><strong>${obj['dname']}</strong></a>";
                if (count ($tags))
-                       echo '<br><small>' . serializeTags ($tags, makeHref(array('page'=>$pageno, 'tab'=>'default', 'group_id'=>$group_id))."&") . '</small>';
+                       echo '<br><small>' . serializeTags ($tags, makeHref(array('page'=>$pageno, 'tab'=>'default')) . '&') . '</small>';
                echo "</td><td class='${secondclass}'>${obj['label']}</td>";
                echo "<td class='${secondclass}'>${obj['asset_no']}</td>";
                echo "<td class='${secondclass}'>${obj['barcode']}</td>";
@@ -1925,57 +1848,35 @@ function renderObjectGroup ()
 
        echo "</td><td class=pcright width='25%'>";
 
-       renderTagFilterPortlet ($tagfilter, 'object', 'group_id', $group_id);
+       renderCellFilterPortlet ($cellfilter, 'object');
        echo "</td></tr></table>\n";
 }
 
-function renderEmptyPortsSelect ($port_id, $type_id)
-{
-       $ports = getEmptyPortsOfType($type_id);
-       usort($ports, 'sortEmptyPorts');
-       foreach ($ports as $port)
-       {
-               if ($port_id == $port['Port_id'])
-                       continue;
-               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";
-       }
-}
-
-function renderAllIPv4Allocations ()
-{
-       $addresses = getAllIPv4Allocations();
-       usort($addresses, 'sortObjectAddressesAndNames');
-       foreach ($addresses as $address)
-       {
-               echo "<option value='${address['ip']}' onclick='getElementById(\"ip\").value=\"${address['ip']}\";'>${address['object_name']} ${address['name']} ${address['ip']}</option>\n";
-       }
-}
-
 // History viewer for history-enabled simple dictionaries.
 function renderHistory ($object_type, $object_id)
 {
        switch ($object_type)
        {
                case 'row':
-                       $query = "select ctime, user_name, name, deleted, comment from RackRowHistory where id = ${object_id} order by ctime";
-                       $header = '<tr><th>change time</th><th>author</th><th>rack row name</th><th>is deleted?</th><th>rack row comment</th></tr>';
-                       $extra = 4;
+                       $query = "select ctime, user_name, name, comment from RackRowHistory where id = ${object_id} order by ctime";
+                       $header = '<tr><th>change time</th><th>author</th><th>rack row name</th><th>rack row comment</th></tr>';
+                       $extra = 3;
                        break;
                case 'rack':
                        $query =
-                               "select ctime, user_name, rh.name, rh.deleted, rr.name as name, rh.height, rh.comment " .
+                               "select ctime, user_name, rh.name, rr.name as name, rh.height, rh.comment " .
                                "from RackHistory as rh left join RackRow as rr on rh.row_id = rr.id " .
                                "where rh.id = ${object_id} order by ctime";
-                       $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>';
-                       $extra = 6;
+                       $header = '<tr><th>change time</th><th>author</th><th>rack name</th><th>rack row name</th><th>rack height</th><th>rack comment</th></tr>';
+                       $extra = 5;
                        break;
                case 'object':
                        $query =
-                               "select ctime, user_name, RackObjectHistory.name as name, label, barcode, asset_no, deleted, has_problems, dict_value, comment " .
+                               "select ctime, user_name, RackObjectHistory.name as name, label, barcode, asset_no, has_problems, dict_value, comment " .
                                "from RackObjectHistory inner join Dictionary on objtype_id = dict_key join Chapter on Dictionary.chapter_id = Chapter.id " .
                                "where Chapter.name = 'RackObjectType' and RackObjectHistory.id=${object_id} order by ctime";
-                       $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>';
-                       $extra = 9;
+                       $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>has problems?</th><th>object type</th><th>comment</th></tr>';
+                       $extra = 8;
                        break;
                default:
                        showError ("Uknown object type '${object_type}'", __FUNCTION__);
@@ -2137,9 +2038,9 @@ function renderIPv4SpaceRecords ($tree, &$tagcache, $baseurl, $target = 0, $leve
 function renderIPv4Space ()
 {
        global $pageno, $tabno;
-       $tagfilter = getTagFilter();
-       $netlist = getIPv4NetworkList ($tagfilter, getTFMode());
-
+       $cellfilter = getCellFilter();
+       $netlist = filterCellList (listCells ('ipv4net'), $cellfilter['expression']);
+       array_walk ($netlist, 'amplifyCell');
 
        $netcount = count ($netlist);
        // expand request can take either natural values or "ALL". Zero means no expanding.
@@ -2151,9 +2052,12 @@ function renderIPv4Space ()
        startPortlet ("networks (${netcount})");
        echo '<h4>';
        if ($eid === 0)
-               echo 'auto-collapsing at threshold ' . getConfigVar ('TREE_THRESHOLD') . " (<a href='".makeHref(array('page'=>$pageno, 'tab'=>$tabno, 'eid'=>'ALL'))."'>expand all</a>)";
+               echo 'auto-collapsing at threshold ' . getConfigVar ('TREE_THRESHOLD') .
+                       " (<a href='".makeHref(array('page'=>$pageno, 'tab'=>$tabno, 'eid'=>'ALL')) .
+                       $cellfilter['urlextra'] . "'>expand all</a>)";
        elseif ($eid === 'ALL')
-               echo "expanding all (<a href='".makeHref(array('page'=>$pageno, 'tab'=>$tabno))."'>auto-collapse</a>)";
+               echo "expanding all (<a href='".makeHref(array('page'=>$pageno, 'tab'=>$tabno)) .
+                       $cellfilter['urlextra'] . "'>auto-collapse</a>)";
        else
        {
                $netinfo = getIPv4NetworkInfo ($eid);
@@ -2165,12 +2069,12 @@ function renderIPv4Space ()
                echo "<th>routed by</th>";
        echo "</tr>\n";
        $tagcache = array();
-       $baseurl = makeHref(array('page'=>$pageno, 'tab'=>$tabno)) . getTagFilterStr ($tagfilter);
+       $baseurl = makeHref(array('page'=>$pageno, 'tab'=>$tabno)) . $cellfilter['urlextra'];
        renderIPv4SpaceRecords ($tree, $tagcache, $baseurl, $eid);
        echo "</table>\n";
        finishPortlet();
        echo '</td><td class=pcright>';
-       renderTagFilterPortlet ($tagfilter, 'ipv4net');
+       renderCellFilterPortlet ($cellfilter, 'ipv4net');
        echo "</td></tr></table>\n";
 }
 
@@ -2242,9 +2146,6 @@ function renderIPv4SLB ()
 
 function renderIPv4SpaceEditor ()
 {
-       global $pageno, $tabno;
-       showMessageOrError();
-
        // IPv4 validator
 ?>
        <script type="text/javascript">
@@ -2265,7 +2166,7 @@ function renderIPv4SpaceEditor ()
        echo "<input type=hidden name=op value=addIPv4Prefix>\n";
        // tags column
        echo '<tr><td rowspan=4><h3>assign tags</h3>';
-       renderTagSelect();
+       renderNewEntityTags();
        echo '</td>';
        // inputs column
        echo "<th class=tdright>prefix</th><td class=tdleft><input type=text name='range' size=18 class='live-validate' tabindex=1></td>";
@@ -2277,7 +2178,8 @@ function renderIPv4SpaceEditor ()
        echo "</form></table><br><br>\n";
        finishPortlet();
 
-       $addrspaceList = getIPv4NetworkList();
+       $addrspaceList = listCells ('ipv4net');
+       array_walk ($addrspaceList, 'amplifyCell');
        if (count ($addrspaceList))
        {
                startPortlet ('Manage existing (' . count ($addrspaceList) . ')');
@@ -2568,7 +2470,6 @@ function renderIPv4Network ($id)
 
 function renderIPv4NetworkProperties ($id)
 {
-       showMessageOrError();
        $netdata = getIPv4NetworkInfo ($id);
        echo "<center><h1>${netdata['ip']}/${netdata['mask']}</h1></center>\n";
        echo "<table border=0 cellpadding=10 cellpadding=1 align='center'>\n";
@@ -2690,7 +2591,6 @@ function renderIPv4Address ($dottedquad)
 
 function renderIPv4AddressProperties ($dottedquad)
 {
-       showMessageOrError();
        $address = getIPv4Address ($dottedquad);
        echo "<center><h1>$dottedquad</h1></center>\n";
 
@@ -2717,7 +2617,6 @@ function renderIPv4AddressProperties ($dottedquad)
 
 function renderIPv4AddressAllocations ($dottedquad)
 {
-       showMessageOrError();
        function printNewItemTR ()
        {
                global $aat;
@@ -2732,7 +2631,7 @@ function renderIPv4AddressAllocations ($dottedquad)
                printImageHREF ('add', 'allocate', TRUE, 103);
                echo "</td></form></tr>";
        }
-       global $pageno, $tabno, $aat;
+       global $aat;
 
        $address = getIPv4Address ($dottedquad);
 
@@ -2767,9 +2666,8 @@ function renderIPv4AddressAllocations ($dottedquad)
        echo "</table><br><br>";
 }
 
-function renderNATv4ForObject ($object_id = 0)
+function renderNATv4ForObject ($object_id)
 {
-       global $root;
        function printNewItemTR ($alloclist)
        {
                printOpFormIntro ('addNATv4Rule');
@@ -2797,12 +2695,10 @@ function renderNATv4ForObject ($object_id = 0)
                printImageHREF ('add', 'Add new NAT rule', TRUE, 6);
                echo "</td></tr></form>";
        }
-       global $pageno, $tabno;
        
        $info = getObjectInfo ($object_id);
        $forwards = getNATv4ForObject ($object_id);
        $alloclist = getObjectIPv4Allocations ($object_id);
-       showMessageOrError();
        echo "<center><h2>locally performed NAT</h2></center>";
 
        echo "<table class='widetable' cellpadding=5 cellspacing=0 border=0 align='center'>\n";
@@ -2897,59 +2793,36 @@ function renderNATv4ForObject ($object_id = 0)
        echo "</table><br><br>";
 }
 
-// FIXME: move related code away into ophandler(s)
 function renderAddMultipleObjectsForm ()
 {
-       global $root, $pageno, $tabno, $nextorder;
-
-       $type_id = array();
-       $global_type_id = 0;
-       $name = array();
-       $asset_no = array();
-       $keepvalues1 = $keepvalues2 = FALSE;
-       showMessageOrError();
-
-       // Render a form for the next.
        $typelist = getObjectTypeList();
        $typelist[0] = 'select type...';
+       $max = getConfigVar ('MASSCOUNT');
+       $tabindex = 100;
 
        startPortlet ('Distinct types, same tags');
-       $max = getConfigVar ('MASSCOUNT');
        printOpFormIntro ('addObjects');
        echo '<table border=0 align=center>';
        echo "<tr><th>Object type</th><th>Common name</th><th>Visible label</th>";
        echo "<th>Asset tag</th><th>Barcode</th><th>Tags</th></tr>\n";
-       // If a user forgot to select object type on input, we keep his
-       // previous input in the form.
        for ($i = 0; $i < $max; $i++)
        {
                echo '<tr><td>';
                // Don't employ DEFAULT_OBJECT_TYPE to avoid creating ghost records for pre-selected empty rows.
-               printSelect ($typelist, "${i}_object_type_id", 0);
+               printSelect ($typelist, "${i}_object_type_id", 0, $tabindex);
                echo '</td>';
-               echo "<td><input type=text size=30 name=${i}_object_name";
-               if ($keepvalues1 and isset ($name[$i]) and (!isset ($type_id[$i]) or $type_id[$i] == 0))
-                       echo " value='${name[$i]}'";
-               echo "></td>";
-               echo "<td><input type=text size=30 name=${i}_object_label";
-               if ($keepvalues1 and isset ($label[$i]) and (!isset ($type_id[$i]) or $type_id[$i] == 0))
-                       echo " value='${label[$i]}'";
-               echo "></td>";
-               echo "<td><input type=text size=20 name=${i}_object_asset_no";
-               if ($keepvalues1 and isset ($asset_no[$i]) and (!isset ($type_id[$i]) or $type_id[$i] == 0))
-                       echo " value='${asset_no[$i]}'";
-               echo "></td>";
-               echo "<td><input type=text size=10 name=${i}_object_barcode";
-               if ($keepvalues1 and isset ($barcode[$i]) and (!isset ($type_id[$i]) or $type_id[$i] == 0))
-                       echo " value='${barcode[$i]}'";
-               echo "></td>";
+               echo "<td><input type=text size=30 name=${i}_object_name tabindex=${tabindex}></td>";
+               echo "<td><input type=text size=30 name=${i}_object_label tabindex=${tabindex}></td>";
+               echo "<td><input type=text size=20 name=${i}_object_asset_no tabindex=${tabindex}></td>";
+               echo "<td><input type=text size=10 name=${i}_object_barcode tabindex=${tabindex}></td>";
                if ($i == 0)
                {
                        echo "<td valign=top rowspan=${max}>";
-                       renderTagSelect();
+                       renderNewEntityTags();
                        echo "</td>\n";
                }
                echo "</tr>\n";
+               $tabindex++;
        }
        echo "<tr><td class=submit colspan=5><input type=submit name=got_fast_data value='Go!'></td></tr>\n";
        echo "</form></table>\n";
@@ -2959,14 +2832,12 @@ function renderAddMultipleObjectsForm ()
        printOpFormIntro ('addLotOfObjects');
        echo "<table border=0 align=center><tr><th>names</th><th>type</th></tr>";
        echo "<tr><td rowspan=3><textarea name=namelist cols=40 rows=25>\n";
-       if ($keepvalues2 and $global_type_id == 0)
-               echo $_REQUEST['namelist'];
        echo "</textarea></td><td valign=top>";
        printSelect ($typelist, "global_type_id", getConfigVar ('DEFAULT_OBJECT_TYPE'));
        echo "</td></tr>";
        echo "<tr><th>Tags</th></tr>";
        echo "<tr><td valign=top>";
-       renderTagSelect();
+       renderNewEntityTags();
        echo "</td></tr>";
        echo "<tr><td colspan=2><input type=submit name=got_very_fast_data value='Go!'></td></tr></table>\n";
        echo "</form>\n";
@@ -2990,7 +2861,7 @@ function renderSearchResults ()
                showError ('Search string cannot be empty.', __FUNCTION__);
                return;
        }
-       if (!permitted ('objects', 'default'))
+       if (!permitted ('depot', 'default'))
        {
                showError ('You are not authorized for viewing information about objects.', __FUNCTION__);
                return;
@@ -3152,7 +3023,7 @@ function renderSearchResults ()
                        switch ($where)
                        {
                                case 'object':
-                                       startPortlet ("<a href='${root}?page=objects'>Objects</a>");
+                                       startPortlet ("<a href='${root}?page=depot'>Objects</a>");
                                        echo '<table border=0 cellpadding=5 cellspacing=0 align=center class=cooltable>';
                                        echo '<tr><th>Common name</th><th>Visible label</th><th>Asset tag</th><th>Barcode</th></tr>';
                                        foreach ($what as $obj)
@@ -3233,7 +3104,7 @@ function renderSearchResults ()
                                        foreach ($what as $item)
                                        {
                                                echo "<tr class=row_${order}><td class=tdleft>";
-                                               renderUserCell ($item);
+                                               renderCell ($item);
                                                echo "</td></tr>";
                                                $order = $nextorder[$order];
                                        }
@@ -3259,7 +3130,7 @@ function renderSearchResults ()
 
 // This function prints a table of checkboxes to aid the user in toggling mount atoms
 // from one state to another. The first argument is rack data as
-// produced by getRackData(), the second is the value used for the 'unckecked' state
+// produced by amplifyCell(), the second is the value used for the 'unckecked' state
 // and the third is the value used for 'checked' state.
 // Usage contexts:
 // for mounting an object:             printAtomGrid ($data, 'F', 'T')
@@ -3291,29 +3162,42 @@ function renderAtomGrid ($data)
        }
 }
 
-function renderUserList ()
+function renderCellList ($realm = NULL, $title = 'items', $do_amplify = FALSE)
 {
-       global $nextorder, $accounts, $root, $pageno;
+       if ($realm === NULL)
+       {
+               global $pageno;
+               $realm = $pageno;
+       }
+       global $nextorder;
+       $order = 'odd';
+       $cellfilter = getCellFilter();
+       $celllist = filterCellList (listCells ($realm), $cellfilter['expression']);
+       if ($do_amplify)
+               array_walk ($celllist, 'amplifyCell');
        echo "<table border=0 class=objectview>\n";
        echo "<tr><td class=pcleft>";
-       startPortlet ('User accounts');
+       startPortlet ($title . ' (' . count ($celllist) . ')');
        echo "<table class=cooltable border=0 cellpadding=5 cellspacing=0 align=center>\n";
-       $order = 'odd';
-       $tagfilter = getTagFilter();
-       foreach (getUserAccounts ($tagfilter, getTFMode()) as $user)
+       foreach ($celllist as $cell)
        {
                echo "<tr class=row_${order}><td>";
-               renderUserCell ($user);
+               renderCell ($cell);
                echo "</td></tr>\n";
                $order = $nextorder[$order];
        }
        echo '</table>';
        finishPortlet();
        echo '</td><td class=pcright>';
-       renderTagFilterPortlet ($tagfilter, 'user');
+       renderCellFilterPortlet ($cellfilter, $realm);
        echo "</td></tr></table>\n";
 }
 
+function renderUserList ()
+{
+       renderCellList ('user', 'User accounts');
+}
+
 function renderUserListEditor ()
 {
        function printNewItemTR ()
@@ -3325,9 +3209,8 @@ function renderUserListEditor ()
                printImageHREF ('create', 'Add new account', TRUE, 103);
                echo "</td></tr></form>";
        }
-       global $root, $pageno, $tabno, $accounts;
-       startPortlet ('User accounts');
-       showMessageOrError();
+       $accounts = listCells ('user');
+       startPortlet ('User accounts (' . count ($accounts) . ')');
        echo "<table cellspacing=0 cellpadding=5 align=center class=widetable>\n";
        echo "<tr><th>Username</th><th>Real name</th><th>Password</th><th>&nbsp;</th></tr>\n";
        if (getConfigVar ('ADDNEW_AT_TOP') == 'yes')
@@ -3359,8 +3242,7 @@ function renderPortMapEditor ()
 
 function renderPortMap ($editable = FALSE)
 {
-       global $nextorder, $pageno, $tabno;
-       showMessageOrError();
+       global $nextorder;
        startPortlet ("Port compatibility map");
        $ptlist = getPortTypes();
        $pclist = getPortCompat();
@@ -3396,31 +3278,27 @@ function renderPortMap ($editable = FALSE)
        finishPortlet();
 }
 
+// Find direct sub-pages and dump as a list.
+// FIXME: assume all config kids to have static titles at the moment,
+// but use some proper abstract function later.
 function renderConfigMainpage ()
 {
-       global $pageno, $root;
-       $children = getDirectChildPages ($pageno);
+       global $pageno, $page, $root;
        echo '<ul>';
-       // FIXME: assume all config kids to have static titles at the moment,
-       // but use some proper abstract function later.
-       foreach ($children as $cpageno => $child)
-               echo "<li><a href='${root}?page=${cpageno}'>" . $child['title'] . "</li>\n";
-       echo '';
+       foreach ($page as $cpageno => $cpage)
+               if (isset ($cpage['parent']) and $cpage['parent'] == $pageno)
+                       echo "<li><a href='${root}?page=${cpageno}'>" . $cpage['title'] . "</li>\n";
        echo '</ul>';
 }
 
 function renderRackPage ($rack_id)
 {
-       if ($rack_id == 0)
-       {
-               showError ('Invalid argument', __FUNCTION__);
-               return;
-       }
-       if (($rackData = getRackData ($rack_id)) == NULL)
+       if (NULL == ($rackData = spotEntity ('rack', $rack_id)))
        {
-               showError ('getRackData() failed', __FUNCTION__);
+               showError ('Rack not found', __FUNCTION__);
                return;
        }
+       amplifyCell ($rackData);
        echo "<table border=0 class=objectview cellspacing=0 cellpadding=0><tr>";
 
        // Left column with information.
@@ -3442,11 +3320,10 @@ function renderRackPage ($rack_id)
 function renderDictionary ()
 {
        global $nextorder;
-       $dict = getDict (TRUE);
        echo '<ul>';
-       foreach ($dict as $chapter_no => $chapter)
+       foreach (getChapterList() as $chapter_no => $chapter)
        {
-               $wc = count ($chapter['word']);
+               $wc = $chapter['wordc'];
                echo "<li><a href='".makeHref(array('page'=>'chapter', 'chapter_no'=>$chapter_no))."'>${chapter['name']}</a>";
                echo " (${wc} records)</li>";
        }
@@ -3487,7 +3364,7 @@ function renderChapter ($tgt_chapter_no)
 
 function renderChapterEditor ($tgt_chapter_no)
 {
-       global $pageno, $tabno, $nextorder;
+       global $nextorder;
        function printNewItemTR ()
        {
                printOpFormIntro ('add');
@@ -3499,7 +3376,6 @@ function renderChapterEditor ($tgt_chapter_no)
                echo '</td></tr></form>';
        }
        $dict = getDict();
-       showMessageOrError();
        echo "<br><table class=cooltable border=0 cellpadding=5 cellspacing=0 align=center>\n";
        foreach ($dict as $chapter_no => $chapter)
        {
@@ -3554,33 +3430,39 @@ function renderChaptersEditor ()
        {
                printOpFormIntro ('add');
                echo '<tr><td>';
-               printImageHREF ('add', 'Add new', TRUE);
+               printImageHREF ('create', 'Add new', TRUE);
                echo "</td><td><input type=text name=chapter_name tabindex=100></td><td>&nbsp;</td><td>";
-               printImageHREF ('add', 'Add new', TRUE, 101);
+               printImageHREF ('create', 'Add new', TRUE, 101);
                echo '</td></tr></form>';
        }
-       global $pageno, $tabno;
-       showMessageOrError();
-       $dict = getDict();
+       $dict = getChapterList();
+       foreach (array_keys ($dict) as $chapter_no)
+               $dict[$chapter_no]['mapped'] = FALSE;
+       foreach (getAttrMap() as $attrinfo)
+               if ($attrinfo['type'] == 'dict')
+                       foreach ($attrinfo['application'] as $app)
+                               $dict[$app['chapter_no']]['mapped'] = TRUE;
        echo "<table cellspacing=0 cellpadding=5 align=center class=widetable>\n";
        echo '<tr><th>&nbsp;</th><th>Chapter name</th><th>Words</th><th>&nbsp;</th></tr>';
        if (getConfigVar ('ADDNEW_AT_TOP') == 'yes')
                printNewItemTR();
-       foreach ($dict as $chapter)
+       foreach ($dict as $chapter_id => $chapter)
        {
-               $wordcount = count ($chapter['word']);
-               $sticky = $chapter['sticky'];
-               printOpFormIntro ('upd', array ('chapter_no' => $chapter['no']));
+               $wordcount = $chapter['wordc'];
+               $sticky = $chapter['sticky'] == 'yes';
+               printOpFormIntro ('upd', array ('chapter_no' => $chapter_id));
                echo '<tr>';
                echo '<td>';
                if ($sticky)
-                       printImageHREF ('nodelete', 'system chapter');
+                       printImageHREF ('nodestroy', 'system chapter');
                elseif ($wordcount > 0)
-                       printImageHREF ('nodelete', 'contains ' . $wordcount . ' word(s)');
+                       printImageHREF ('nodestroy', 'contains ' . $wordcount . ' word(s)');
+               elseif ($chapter['mapped'])
+                       printImageHREF ('nodestroy', 'used in attribute map');
                else
                {
-                       echo "<a href='".makeHrefProcess(array('op'=>'del', 'chapter_no'=>$chapter['no']))."'>";
-                       printImageHREF ('delete', 'Remove chapter');
+                       echo "<a href='".makeHrefProcess(array('op'=>'del', 'chapter_no'=>$chapter_id))."'>";
+                       printImageHREF ('destroy', 'Remove chapter');
                        echo "</a>";
                }
                echo '</td>';
@@ -3642,9 +3524,7 @@ function renderEditAttributesForm ()
                printImageHREF ('add', 'Create attribute', TRUE, 102);
                echo '</td></tr></form>';
        }
-       global $pageno, $tabno;
        $attrMap = getAttrMap();
-       showMessageOrError();
        startPortlet ('Optional attributes');
        echo "<table cellspacing=0 cellpadding=5 align=center class=widetable>\n";
        echo '<tr><th>&nbsp;</th><th>Name</th><th>Type</th><th>&nbsp;</th></tr>';
@@ -3687,19 +3567,16 @@ function renderEditAttrMapForm ()
                echo '<td>';
                printSelect (getObjectTypeList(), 'objtype_id', NULL, 101);
                echo '</td>';
-               $dict = getDict();
                echo '<td><select name=chapter_no tabindex=102>';
-               foreach ($dict as $chapter)
-                       if (!$chapter['sticky'])
-                               echo "<option value='${chapter['no']}'>${chapter['name']}</option>";
+               foreach (getChapterList() as $chapter)
+                       if ($chapter['sticky'] != 'yes')
+                               echo "<option value='${chapter['id']}'>${chapter['name']}</option>";
                echo '</select></td><td>';
                printImageHREF ('add', '', TRUE, 103);
                echo '</td></tr>';
                echo '</form>';
        }
-       global $pageno, $tabno;
        $attrMap = getAttrMap();
-       showMessageOrError();
        startPortlet ('Attribute map');
        echo "<table cellspacing=0 cellpadding=5 align=center class=widetable>\n";
        echo '<tr><th>&nbsp;</th><th>Attribute name</th><th>Object type</th><th>Dictionary chapter</th><th>&nbsp;</th></tr>';
@@ -3734,13 +3611,18 @@ function renderEditAttrMapForm ()
 }
 
 function printImageHREF ($tag, $title = '', $do_input = FALSE, $tabindex = 0)
+{
+       echo getImageHREF ($tag, $title, $do_input, $tabindex);
+}
+
+function getImageHREF ($tag, $title = '', $do_input = FALSE, $tabindex = 0)
 {
        global $root, $image;
        if (!isset ($image[$tag]))
                $tag = 'error';
        $img = $image[$tag];
        if ($do_input == TRUE)
-               echo
+               return
                        "<input type=image name=submit class=icon " .
                        "src='${root}${img['path']}' " .
                        "border=0 " .
@@ -3748,7 +3630,7 @@ function printImageHREF ($tag, $title = '', $do_input = FALSE, $tabindex = 0)
                        (empty ($title) ? '' : " title='${title}'") . // JT: Add title to input hrefs too
                        ">";
        else
-               echo
+               return
                        "<img " .
                        "src='${root}${img['path']}' " .
                        "width=${img['width']} " .
@@ -3893,7 +3775,6 @@ function dragon ()
 function renderUIConfig ()
 {
        global $configCache, $nextorder;
-       showMessageOrError();
        startPortlet ('Current configuration');
        echo '<table class=cooltable border=0 cellpadding=5 cellspacing=0 align=center width="50%">';
        echo '<tr><th class=tdleft>Option</th><th class=tdleft>Value</th></tr>';
@@ -3914,7 +3795,6 @@ function renderUIConfig ()
 function renderUIConfigEditForm ()
 {
        global $configCache;
-       showMessageOrError();
        startPortlet ('Current configuration');
        echo "<table cellspacing=0 cellpadding=5 align=center class=widetable width='50%'>\n";
        echo "<tr><th class=tdleft>Option</th>";
@@ -3942,9 +3822,8 @@ function renderUIConfigEditForm ()
 
 // This function queries the gateway about current VLAN configuration and
 // renders a form suitable for submit. Ah, and it does submit processing as well.
-function renderVLANMembership ($object_id = 0)
+function renderVLANMembership ($object_id)
 {
-       showMessageOrError();
        $data = getSwitchVLANs ($object_id);
        if ($data === NULL)
        {
@@ -4080,14 +3959,8 @@ function renderVLANMembership ($object_id = 0)
        echo '</td></tr></table>';
 }
 
-function renderSNMPPortFinder ($object_id = 0)
+function renderSNMPPortFinder ($object_id)
 {
-       showMessageOrError();
-       if ($object_id <= 0)
-       {
-               showError ('Invalid argument', __FUNCTION__);
-               return;
-       }
        printOpFormIntro ('querySNMPData');
        if (!extension_loaded ('snmp'))
        {
@@ -4113,14 +3986,8 @@ function renderUIResetForm()
        echo "</form>";
 }
 
-function renderLVSConfig ($object_id = 0)
+function renderLVSConfig ($object_id)
 {
-       showMessageOrError();
-       if ($object_id <= 0)
-       {
-               showError ('Invalid argument', __FUNCTION__);
-               return;
-       }
        echo '<br>';
        printOpFormIntro ('submitSLBConfig');
        echo "<center><input type=submit value='Submit for activation'></center>";
@@ -4138,7 +4005,8 @@ function renderVirtualService ($vsid)
                showError ('Invalid argument', __FUNCTION__);
                return;
        }
-       $vsinfo = getVServiceInfo ($vsid);
+       $vsinfo = spotEntity ('ipv4vs', $vsid);
+       amplifyCell ($vsinfo);
        echo '<table border=0 class=objectview cellspacing=0 cellpadding=0>';
        if (!empty ($vsinfo['name']))
                echo "<tr><td colspan=2 align=center><h1>${vsinfo['name']}</h1></td></tr>\n";
@@ -4150,7 +4018,7 @@ function renderVirtualService ($vsid)
        if (!empty ($vsinfo['name']))
                echo "<tr><th width='50%' class=tdright>Name:</th><td class=tdleft>${vsinfo['name']}</td></tr>\n";
        echo "<tr><th width='50%' class=tdright>Protocol:</th><td class=tdleft>${vsinfo['proto']}</td></tr>\n";
-       echo "<tr><th width='50%' class=tdright>Virtual IP address:</th><td class=tdleft><a href='".makeHref(array('page'=>'ipaddress', 'tab'=>'default', 'ip'=>$vsinfo['vid']))."'>${vsinfo['vip']}</a></td></tr>\n";
+       echo "<tr><th width='50%' class=tdright>Virtual IP address:</th><td class=tdleft><a href='".makeHref(array('page'=>'ipaddress', 'tab'=>'default', 'ip'=>$vsinfo['vip']))."'>${vsinfo['vip']}</a></td></tr>\n";
        echo "<tr><th width='50%' class=tdright>Virtual port:</th><td class=tdleft>${vsinfo['vport']}</td></tr>\n";
        printTagTRs (makeHref(array('page'=>'ipv4vslist', 'tab'=>'default'))."&");
        if (!empty ($vsinfo['vsconfig']))
@@ -4222,16 +4090,11 @@ function renderProgressBar ($percentage = 0, $theme = '')
        echo (empty ($theme) ? '' : "&theme=${theme}") . "'>";
 }
 
-function renderRSPoolServerForm ($pool_id = 0)
+function renderRSPoolServerForm ($pool_id)
 {
-       global $pageno, $tabno, $nextorder;
-       if ($pool_id <= 0)
-       {
-               showError ('Invalid pool_id', __FUNCTION__);
-               return;
-       }
-       showMessageOrError();
-       $poolInfo = getRSPoolInfo ($pool_id);
+       global $nextorder;
+       $poolInfo = spotEntity ('ipv4rspool', $pool_id);
+       amplifyCell ($poolInfo);
 
        if (($rsc = count ($poolInfo['rslist'])))
        {
@@ -4301,15 +4164,11 @@ function renderRSPoolServerForm ($pool_id = 0)
        finishPortlet();
 }
 
-function renderRSPoolLBForm ($pool_id = 0)
+function renderRSPoolLBForm ($pool_id)
 {
-       global $pageno, $tabno, $nextorder;
-       showMessageOrError();
-
-       $poolInfo = getRSPoolInfo ($pool_id);
-       $vs_list = array ();
-       foreach (getVSList() as $vsid => $vsinfo)
-               $vs_list[$vsid] = buildVServiceName ($vsinfo) . (empty ($vsinfo['name']) ? '' : " (${vsinfo['name']})");
+       global $nextorder;
+       $poolInfo = spotEntity ('ipv4rspool', $pool_id);
+       amplifyCell ($poolInfo);
 
        if (count ($poolInfo['lblist']))
        {
@@ -4343,7 +4202,7 @@ function renderRSPoolLBForm ($pool_id = 0)
        printOpFormIntro ('addLB');
        echo "<tr valign=top><th>LB / VS</th><td class=tdleft>";
        printSelect (getNarrowObjectList ('IPV4LB_LISTSRC'), 'object_id', NULL, 1);
-       printSelect ($vs_list, 'vs_id', NULL, 2);
+       printSelect (getIPv4VSOptions(), 'vs_id', NULL, 2);
        echo "</td><td>";
        printImageHREF ('add', 'Configure LB', TRUE, 5);
        echo "</td></tr>\n";
@@ -4353,11 +4212,11 @@ function renderRSPoolLBForm ($pool_id = 0)
        finishPortlet();
 }
 
-function renderVServiceLBForm ($vs_id = 0)
+function renderVServiceLBForm ($vs_id)
 {
-       global $pageno, $tabno, $nextorder;
-       showMessageOrError();
-       $vsinfo = getVServiceInfo ($vs_id);
+       global $nextorder;
+       $vsinfo = spotEntity ('ipv4vs', $vs_id);
+       amplifyCell ($vsinfo);
 
        if (count ($vsinfo['rspool']))
        {
@@ -4386,15 +4245,12 @@ function renderVServiceLBForm ($vs_id = 0)
                finishPortlet();
        }
 
-       $rsplist = array();
-       foreach (getRSPoolList() as $pool_id => $poolInfo)
-               $rsplist[$pool_id] = $poolInfo['name'];
        startPortlet ('Add new');
        echo "<table cellspacing=0 cellpadding=5 align=center class=widetable>\n";
        printOpFormIntro ('addLB');
        echo "<tr valign=top><th>LB / RS pool</th><td class=tdleft>";
        printSelect (getNarrowObjectList ('IPV4LB_LISTSRC'), 'object_id', NULL, 1);
-       printSelect ($rsplist, 'pool_id', NULL, 2);
+       printSelect (getIPv4RSPoolOptions(), 'pool_id', NULL, 2);
        echo "</td><td>";
        printImageHREF ('add', 'Configure LB', TRUE, 5);
        echo "</td></tr>\n";
@@ -4404,18 +4260,14 @@ function renderVServiceLBForm ($vs_id = 0)
        finishPortlet();
 }
 
-function renderRSPool ($pool_id = 0)
+function renderRSPool ($pool_id)
 {
        global $nextorder;
-       if ($pool_id <= 0)
-       {
-               showError ('Invalid pool_id', __FUNCTION__);
-               return;
-       }
-       $poolInfo = getRSPoolInfo ($pool_id);
+       $poolInfo = spotEntity ('ipv4rspool', $pool_id);
+       amplifyCell ($poolInfo);
        if ($poolInfo == NULL)
        {
-               showError ('getRSPoolInfo() returned NULL', __FUNCTION__);
+               showError ('Could not load data!', __FUNCTION__);
                return;
        }
 
@@ -4485,36 +4337,12 @@ function renderRSPool ($pool_id = 0)
 
 function renderVSList ()
 {
-       global $pageno, $nextorder;
-       $tagfilter = getTagFilter();
-       $vslist = getVSList ($tagfilter, getTFMode());
-       echo "<table border=0 class=objectview>\n";
-       echo "<tr><td class=pcleft>";
-
-       startPortlet ('Virtual services (' . count ($vslist) . ')');
-       echo "<table class=widetable border=0 cellpadding=10 cellspacing=0 align=center>\n";
-       echo "<tr><th>endpoint, name, tags</th><th>VS configuration</th><th>RS configuration</th></tr>";
-       $order = 'odd';
-       foreach ($vslist as $vsid => $vsinfo)
-       {
-               echo "<tr align=left valign=top class=row_${order}><td class=tdleft>";
-               renderVSCell ($vsid);
-               echo "</td><td class=slbconf>${vsinfo['vsconfig']}</td>";
-               echo "<td class=slbconf>${vsinfo['rsconfig']}</td>";
-               echo "</tr>\n";
-               $order = $nextorder[$order];
-       }
-       echo "</table>";
-       finishPortlet();
-       echo '</td><td class=pcright>';
-       renderTagFilterPortlet ($tagfilter, 'ipv4vs');
-       echo '</td></tr></table>';
+       renderCellList ('ipv4vs', 'Virtual services');
 }
 
 function renderVSListEditForm ()
 {
-       global $pageno, $tabno, $nextorder;
-       showMessageOrError();
+       global $nextorder;
        $protocols = array ('TCP' => 'TCP', 'UDP' => 'UDP');
 
        startPortlet ('Add new');
@@ -4533,14 +4361,14 @@ function renderVSListEditForm ()
        printImageHREF ('CREATE', 'create virtual service', TRUE);
        echo "</td></tr><tr><th>VS configuration</th><td colspan=4 class=tdleft><textarea name=vsconfig rows=10 cols=80></textarea></td>\n";
        echo "<td rowspan=2><h3>assign tags</h3>";
-       renderTagSelect();
+       renderNewEntityTags();
        echo "</td></tr>";
        echo "<tr><th>RS configuration</th><td colspan=4 class=tdleft><textarea name=rsconfig rows=10 cols=80></textarea></td></tr>\n";
        echo "</table>";
        echo "</form>\n";
        finishPortlet();
 
-       $vslist = getVSList();
+       $vslist = listCells ('ipv4vs');
        if (!count ($vslist))
                return;
        startPortlet ('Manage existing (' . count ($vslist) . ')');
@@ -4578,48 +4406,12 @@ function renderVSListEditForm ()
 
 function renderRSPoolList ()
 {
-       global $pageno, $nextorder;
-       $tagfilter = getTagFilter();
-       $pool_list = getRSPoolList ($tagfilter, getTFMode());
-       if ($pool_list === NULL)
-       {
-               showError ('getRSPoolList() failed', __FUNCTION__);
-               return;
-       }
-       echo "<table border=0 class=objectview>\n";
-       echo "<tr><td class=pcleft>";
-       startPortlet ('RS pools (' . count ($pool_list) . ')');
-       echo "<table class=widetable border=0 cellpadding=10 cellspacing=0 align=center>\n";
-       echo "<tr><th>name, refcnt, tags</th><th>VS configuration</th><th>RS configuration</th></tr>";
-       $order = 'odd';
-       foreach ($pool_list as $pool_id => $pool_info)
-       {
-               $pooltags = loadEntityTags ('ipv4rspool', $pool_id);
-               echo "<tr valign=top class=row_${order}><td class=tdleft>";
-               echo "<a href='".makeHref(array('page'=>'ipv4rspool', 'pool_id'=>$pool_id))."'>" . (empty ($pool_info['name']) ? 'ANONYMOUS' : $pool_info['name']) . '</a>';
-               echo ($pool_info['refcnt'] ? ", ${pool_info['refcnt']}" : '');
-               if (count ($pooltags))
-               {
-                       echo '<br>';
-                       echo serializeTags ($pooltags, makeHref(array('page'=>$pageno, 'tab'=>'default'))."&");
-               }
-               echo "</td><td class=tdleft><pre>${pool_info['vsconfig']}</pre></td>";
-               echo "<td class=tdleft><pre>${pool_info['rsconfig']}</pre></td>";
-               echo "</tr>\n";
-               $order = $nextorder[$order];
-       }
-       echo "</table>";
-       finishPortlet ();
-       echo '</td><td class=pcright>';
-       renderTagFilterPortlet ($tagfilter, 'ipv4rspool');
-       echo '</td></tr></table>';
+       renderCellList ('ipv4rspool', 'RS pools');
 }
 
 function editRSPools ()
 {
-       global $pageno, $tabno, $nextorder;
-       showMessageOrError();
-
+       global $nextorder;
        startPortlet ('Add new');
        printOpFormIntro ('add');
        echo "<table class=widetable border=0 cellpadding=10 cellspacing=0 align=center>\n";
@@ -4628,13 +4420,13 @@ function editRSPools ()
        printImageHREF ('CREATE', 'create real server pool', TRUE);
        echo "</td></tr><tr><th>VS configuration</th><td><textarea name=vsconfig rows=10 cols=80></textarea></td>";
        echo "<td rowspan=2><h3>assign tags</h3>";
-       renderTagSelect();
+       renderNewEntityTags();
        echo "</td></tr>";
        echo "<tr><th>RS configuration</th><td><textarea name=rsconfig rows=10 cols=80></textarea></td></tr>";
        echo "</table></form>";
        finishPortlet();
 
-       $pool_list = getRSPoolList();
+       $pool_list = listCells ('ipv4rspool');
        if (!count ($pool_list))
                return;
        startPortlet ('Manage existing (' . count ($pool_list) . ')');
@@ -4645,7 +4437,7 @@ function editRSPools ()
        {
                printOpFormIntro ('upd', array ('pool_id' => $pool_id));
                echo "<tr valign=top class=row_${order}><td>";
-               if ($pool_info['refcnt'])
+               if ($pool_info['refcnt'] or $pool_info['rscount'])
                        printImageHREF ('nodelete', 'RS pool is used ' . $pool_info['refcnt'] . ' time(s)');
                else
                {
@@ -4669,7 +4461,7 @@ function renderRealServerList ()
 {
        global $nextorder;
        $rslist = getRSList ();
-       $pool_list = getRSPoolList ();
+       $pool_list = listCells ('ipv4rspool');
        echo "<table class=widetable border=0 cellpadding=10 cellspacing=0 align=center>\n";
        echo "<tr><th>RS pool</th><th>in service</th><th>real IP address</th><th>real port</th><th>RS configuration</th></tr>";
        $order = 'even';
@@ -4715,15 +4507,10 @@ function renderLBList ()
        echo "</table>";
 }
 
-function renderRSPoolRSInServiceForm ($pool_id = 0)
+function renderRSPoolRSInServiceForm ($pool_id)
 {
-       if ($pool_id <= 0)
-       {
-               showError ('Invalid pool_id', __FUNCTION__);
-               return;
-       }
-       showMessageOrError();
-       $poolInfo = getRSPoolInfo ($pool_id);
+       $poolInfo = spotEntity ('ipv4rspool', $pool_id);
+       amplifyCell ($poolInfo);
        printOpFormIntro ('upd', array ('rscount' => count ($poolInfo['rslist'])));
        echo "<table class=widetable border=0 cellpadding=10 cellspacing=0 align=center>\n";
        echo "<tr><th>RS address</th><th>RS port</th><th>RS configuration</th><th>in service</th></tr>\n";
@@ -4741,14 +4528,8 @@ function renderRSPoolRSInServiceForm ($pool_id = 0)
        echo "</td></tr></table>\n</form>";
 }
 
-function renderLivePTR ($id = 0)
+function renderLivePTR ($id)
 {
-       if ($id == 0)
-       {
-               showError ("Invalid argument", __FUNCTION__);
-               return;
-       }
-       showMessageOrError();
        if (isset($_REQUEST['pg']))
                $page = $_REQUEST['pg'];
        else
@@ -4788,6 +4569,7 @@ function renderLivePTR ($id = 0)
        echo "<table class='widetable' border=0 cellspacing=0 cellpadding=5 align='center'>\n";
        echo "<tr><th>address</th><th>current name</th><th>DNS data</th><th>import</th></tr>\n";
        $idx = 1;
+       $box_counter = 1;
        $cnt_match = $cnt_mismatch = $cnt_missing = 0;
        for ($ip = $startip; $ip <= $endip; $ip++)
        {
@@ -4829,13 +4611,15 @@ function renderLivePTR ($id = 0)
                echo "'><a href='".makeHref(array('page'=>'ipaddress', 'ip'=>$straddr))."'>${straddr}</a></td>";
                echo "<td class=tdleft>${addr['name']}</td><td class=tdleft>${ptrname}</td><td>";
                if ($print_cbox)
-                       echo "<input type=checkbox name=import_${idx} tabindex=${idx}>";
+                       echo "<input type=checkbox name=import_${idx} tabindex=${idx} id=atom_1_" . $box_counter++ . "_1>";
                else
                        echo '&nbsp;';
                echo "</td></tr>\n";
                $idx++;
        }
-       echo "<tr><td colspan=4 align=center><input type=submit value='Import selected records'></td></tr>";
+       echo "<tr><td colspan=3 align=center><input type=submit value='Import selected records'></td><td>";
+       echo --$box_counter ? "<a href='javascript:;' onclick=\"toggleColumnOfAtoms(1, 1, ${box_counter})\">(toggle selection)</a>" : '&nbsp;';
+       echo "</td></tr>";
        echo "</table>";
        echo "</form>";
        finishPortlet();
@@ -4854,16 +4638,8 @@ function renderLivePTR ($id = 0)
        echo "</td></tr></table>\n";
 }
 
-function renderAutoPortsForm ($object_id = 0)
+function renderAutoPortsForm ($object_id)
 {
-       if ($object_id <= 0)
-       {
-               showError ('Invalid object_id', __FUNCTION__);
-               return;
-       }
-       // If the below call has any data to display, the non-default redirection from the generator
-       // has failed. Don't ignore the message log anyway.
-       showMessageOrError();
        $info = getObjectInfo ($object_id);
        $ptlist = readChapter ('PortType');
        echo "<table class='widetable' border=0 cellspacing=0 cellpadding=5 align='center'>\n";
@@ -4880,6 +4656,7 @@ function renderAutoPortsForm ($object_id = 0)
 
 function renderTagRowForViewer ($taginfo, $level = 0)
 {
+       $self = __FUNCTION__;
        if (!count ($taginfo['kids']))
                $level++; // Shift instead of placing a spacer. This won't impact any nested nodes.
        echo "<tr><td align=left style='padding-left: " . ($level * 16) . "px;'>";
@@ -4889,25 +4666,13 @@ function renderTagRowForViewer ($taginfo, $level = 0)
        echo $taginfo['tag'] . '</span>';
        echo "</td></tr>\n";
        foreach ($taginfo['kids'] as $kid)
-               renderTagRowForViewer ($kid, $level + 1);
-}
-
-// FIXME: generated hyperlink must depend on the realm given
-function renderTagRowForCloud ($taginfo, $realm, $level = 0)
-{
-       echo "<tr><td align=left style='padding-left: " . ($level * 16) . "px;'>";
-       echo "<a href='".makeHref(array('page'=>'objgroup', 'group_id'=>0, 'tagfilter[]'=>$taginfo['id']))."'>";
-       echo $taginfo['tag'] . '</a>';
-       if (isset ($taginfo['refcnt'][$realm]))
-               echo ' (' . $taginfo['refcnt'][$realm] . ')';
-       echo "</td></tr>\n";
-       foreach ($taginfo['kids'] as $kid)
-               renderTagRowForCloud ($kid, $realm, $level + 1);
+               $self ($kid, $level + 1);
 }
 
 function renderTagRowForEditor ($taginfo, $level = 0)
 {
-       global $pageno, $tabno, $taglist;
+       $self = __FUNCTION__;
+       global $taglist;
        if (!count ($taginfo['kids']))
                $level++; // Idem
        echo "<tr><td align=left style='padding-left: " . ($level * 16) . "px;'>";
@@ -4938,7 +4703,7 @@ function renderTagRowForEditor ($taginfo, $level = 0)
        printImageHREF ('save', 'Save changes', TRUE);
        echo "</form></td></tr>\n";
        foreach ($taginfo['kids'] as $kid)
-               renderTagRowForEditor ($kid, $level + 1);
+               $self ($kid, $level + 1);
 }
 
 function renderTagTree ()
@@ -4954,19 +4719,6 @@ function renderTagTree ()
        echo '</table></center>';
 }
 
-function renderTagCloud ($realm = '')
-{
-       global $taglist, $tagtree;
-       echo '<table>';
-       foreach (getObjectiveTagTree ($tagtree, $realm) as $taginfo)
-       {
-               echo '<tr>';
-               renderTagRowForCloud ($taginfo, $realm);
-               echo "</tr>\n";
-       }
-       echo '</table>';
-}
-
 function renderTagTreeEditor ()
 {
        function printNewItemTR ()
@@ -4984,7 +4736,6 @@ function renderTagTreeEditor ()
                echo "</td></tr></form>\n";
        }
        global $taglist, $tagtree;
-       showMessageOrError();
 
        $otags = getOrphanedTags();
        if (count ($otags))
@@ -5023,64 +4774,36 @@ function renderTagTreeEditor ()
        finishPortlet();
 }
 
-// Output a sequence of OPTION elements, selecting those, which are present on the
-// given (not effective) explicit tags list.
-function renderTagOption ($taginfo, $level = 0)
+function renderTagCheckbox ($inputname, $preselect, $taginfo, $level = 0)
 {
-       global $target_given_tags;
        $self = __FUNCTION__;
-       $selected = tagOnChain ($taginfo, $target_given_tags) ? ' selected' : '';
-       echo '<option value=' . $taginfo['id'] . "${selected}>";
-       for ($i = 0; $i < $level; $i++)
-               echo '-- ';
-       echo $taginfo['tag'] . "</option>\n";
-       foreach ($taginfo['kids'] as $kid)
-               $self ($kid, $level + 1);
-}
-
-function renderTagCheckbox ($taginfo, $level = 0)
-{
-       global $target_given_tags;
-       $self = __FUNCTION__;
-       $selected = tagOnChain ($taginfo, $target_given_tags) ? ' checked' : '';
-       echo "<tr><td colspan=2 align=left style='padding-left: " . ($level * 16) . "px;'>";
-       echo '<input type=checkbox name=taglist[] value=' . $taginfo['id'] . "${selected}> ";
+       if (tagOnChain ($taginfo, $preselect))
+       {
+               $selected = ' checked';
+               $class = 'seltagbox';
+       }
+       else
+       {
+               $selected = '';
+               $class = 'tagbox';
+       }
+       echo "<tr><td colspan=2 class=${class} style='padding-left: " . ($level * 16) . "px;'>";
+       echo "<input type=checkbox name='${inputname}[]' value='${taginfo['id']}'${selected}> ";
        echo $taginfo['tag'] . "</td></tr>\n";
        foreach ($taginfo['kids'] as $kid)
-               $self ($kid, $level + 1);
-}
-
-// Idem, but select those, which are shown on the $_REQUEST['tagfiler'] array.
-// Ignore tag ids, which can't be found on the tree.
-function renderTagOptionForFilter ($taginfo, $tagfilter, $realm, $level = 0)
-{
-       $selected = tagOnIdList ($taginfo, $tagfilter) ?' selected' : '';
-       echo '<option value=' . $taginfo['id'] . "${selected}>";
-       for ($i = 0; $i < $level; $i++)
-               echo '-- ';
-       echo $taginfo['tag'] . (isset ($taginfo['refcnt'][$realm]) ? ' (' . $taginfo['refcnt'][$realm] . ')' : '') . "</option>\n";
-       foreach ($taginfo['kids'] as $kid)
-               renderTagOptionForFilter ($kid, $tagfilter, $realm, $level + 1);
+               $self ($inputname, $preselect, $kid, $level + 1);
 }
 
-function renderEntityTags ($entity_id = 0)
+function renderEntityTags ($entity_id)
 {
-       global $tagtree, $target_given_tags, $pageno, $page, $etype_by_pageno, $target_given_tags;
-       if ($entity_id <= 0)
-       {
-               showError ('Invalid or missing arguments', __FUNCTION__);
-               return;
-       }
-       showMessageOrError();
-       $entity_realm = $etype_by_pageno[$pageno];
+       global $tagtree, $target_given_tags, $pageno, $page, $target_given_tags;
        $bypass_name = $page[$pageno]['bypass'];
        startPortlet ('Tag list');
-       if (count ($target_given_tags))
-               echo '<h3>(' . serializeTags ($target_given_tags) . ')</h3>';
-       echo '<table border=0 align=center>';
-       printOpFormIntro ('saveTags', array ($bypass_name => $entity_id));
+       echo '<table border=0 cellspacing=0 cellpadding=3 align=center>';
+       printOpFormIntro ('saveTags');
+       // Show a tree of tags with preselection, which matches current chain.
        foreach ($tagtree as $taginfo)
-               renderTagCheckbox ($taginfo);
+               renderTagCheckbox ('taglist', $target_given_tags, $taginfo);
        echo '<tr><td class=tdleft>';
        printImageHREF ('SAVE', 'Save changes', TRUE);
        echo "</form></td><td class=tdright>";
@@ -5088,10 +4811,11 @@ function renderEntityTags ($entity_id = 0)
                printImageHREF ('CLEAR gray');
        else
        {
-               printOpFormIntro ('saveTags', array ($bypass_name => $entity_id, 'taglist[]' => ''));
+               printOpFormIntro ('saveTags', array ('taglist[]' => ''));
                printImageHREF ('CLEAR', 'Reset all tags', TRUE);
+               echo '</form>';
        }
-       echo '</form></td></tr></table>';
+       echo '</td></tr></table>';
        finishPortlet();
 }
 
@@ -5100,105 +4824,123 @@ function printTagTRs ($baseurl = '')
        global $expl_tags, $impl_tags, $auto_tags, $target_given_tags;
        if (getConfigVar ('SHOW_EXPLICIT_TAGS') == 'yes' and count ($target_given_tags))
        {
-               echo "<tr><th width='50%' class=tdright><span class=tagheader>Given explicit tags</span>:</th><td class=tdleft>";
+               echo "<tr><th width='50%' class=tagchain>Given explicit tags:</th><td class=tagchain>";
                echo serializeTags ($target_given_tags, $baseurl) . "</td></tr>\n";
-       }
-       if (getConfigVar ('SHOW_EXPLICIT_TAGS') == 'yes' and count ($expl_tags))
-       {
-               echo "<tr><th width='50%' class=tdright><span class=tagheader>Effective explicit tags</span>:</th><td class=tdleft>";
-               echo serializeTags ($expl_tags, $baseurl) . "</td></tr>\n";
+               // only display "effective" line, when if differs
+               if (tagChainCmp ($target_given_tags, $expl_tags))
+                       echo "<tr><th width='50%' class=tagchain>Effective explicit tags:</th><td class=tagchain>" .
+                               serializeTags ($expl_tags, $baseurl) . "</td></tr>\n";
        }
        if (getConfigVar ('SHOW_IMPLICIT_TAGS') == 'yes' and count ($impl_tags))
        {
-               echo "<tr><th width='50%' class=tdright>Effective implicit tags:</th><td class=tdleft>";
+               echo "<tr><th width='50%' class=tagchain>Effective implicit tags:</th><td class=tagchain>";
                echo serializeTags ($impl_tags, $baseurl) . "</td></tr>\n";
        }
        if (getConfigVar ('SHOW_AUTOMATIC_TAGS') == 'yes' and count ($auto_tags))
        {
-               echo "<tr><th width='50%' class=tdright>Automatic tags:</th><td class=tdleft>";
+               echo "<tr><th width='50%' class=tagchain>Automatic tags:</th><td class=tagchain>";
                echo serializeTags ($auto_tags) . "</td></tr>\n";
        }
 }
 
-// Detect, filter and return requested tag filter mode: either 'and' or 'or'.
-function getTFMode ()
-{
-       if (isset ($_REQUEST['tfmode']) and $_REQUEST['tfmode'] == 'all')
-               return 'all';
-       return 'any';
-}
-
-// Output a portlet with currently selected tags and prepare a form for update.
-function renderTagFilterPortlet ($tagfilter, $realm, $bypass_name = '', $bypass_value = '')
+// This one is going to replace the tag filter.
+function renderCellFilterPortlet ($preselect, $realm, $bypass_name = '', $bypass_value = '')
 {
        global $pageno, $tabno, $taglist, $tagtree;
-       $objectivetags = getObjectiveTagTree ($tagtree, $realm);
-       startPortlet ('T-filter');
-       if (!count ($objectivetags))
-       {
-               echo "None defined for current realm.<br>";
-               return;
-       }
-       echo '<table border=0 align=center>';
-
-       if (count ($tagfilter))
-               echo '<h3>(' . serializeTags (buildTagChainFromIds ($tagfilter)) . ')</h3>';
-       echo "<form method=get>\n";
-       echo "<input type=hidden name=page value=${pageno}>\n";
-       echo "<input type=hidden name=tab value=${tabno}>\n";
-       if ($bypass_name != '')
-               echo "<input type=hidden name=${bypass_name} value='${bypass_value}'>\n";
-       echo '<tr><td colspan=2><select name=tagfilter[] multiple size=' . getConfigVar ('MAXSELSIZE') . '>';
-       foreach ($objectivetags as $taginfo)
-               renderTagOptionForFilter ($taginfo, complementByKids ($tagfilter), $realm);
-       echo '</select></td></tr><tr><td>';
-//     $tfmode = getTFMode();
-//     echo '<input type=radio name=tfmode value=all' . ($tfmode == 'all' ? ' checked' : '') . '>all ';
-//     echo '<input type=radio name=tfmode value=any' . ($tfmode == 'any' ? ' checked' : '') . '>any ';
-       printImageHREF ('apply', 'Apply filter', TRUE);
-       echo "</form></td><td>";
-
-       // "reset"
-       echo "<form method=get>\n";
-       echo "<input type=hidden name=page value=${pageno}>\n";
-       echo "<input type=hidden name=tab value=${tabno}>\n";
-       if ($bypass_name != '')
-               echo "<input type=hidden name=${bypass_name} value='${bypass_value}'>\n";
-       printImageHREF ('clear', 'reset', TRUE);
-       echo '</form></td></tr></table>';
-       finishPortlet();
-       global $rackCode;
-       // underscore cannot start predicate name
-       $options = array ('_' => '-- NOT SET --');
-       foreach (array_keys (buildPredicateTable ($rackCode)) as $predicatename)
-               $options[$predicatename] = "[${predicatename}]";
-       if (!count ($options))
-               return;
-       startPortlet ('P-filter');
+       startPortlet ('filter');
        echo "<form method=get>\n";
-       echo "<input type=hidden name=page value=${pageno}>\n";
-       echo "<input type=hidden name=tab value=${tabno}>\n";
-       if ($bypass_name != '')
-               echo "<input type=hidden name=${bypass_name} value='${bypass_value}'>\n";
        echo '<table border=0 align=center>';
-       echo '<tr><td colspan=2>';
-       printSelect ($options, 'pfilter', isset ($_REQUEST['pfilter']) ? $_REQUEST['pfilter'] : NULL);
-       echo '</td></tr><tr><td>';
-       printImageHREF ('apply', 'Apply filter', TRUE);
-       echo "</form></td><td>";
-       // "reset"
-       echo "<form method=get>\n";
-       echo "<input type=hidden name=page value=${pageno}>\n";
-       echo "<input type=hidden name=tab value=${tabno}>\n";
-       if ($bypass_name != '')
-               echo "<input type=hidden name=${bypass_name} value='${bypass_value}'>\n";
-       printImageHREF ('clear', 'reset', TRUE);
-       echo '</form></td></tr></table>';
+       $ruler = "<tr><td colspan=2 class=tagbox><hr></td></tr>\n";
+       $hr = '';
+       // and/or block
+       if (getConfigVar ('FILTER_SUGGEST_ANDOR') == 'yes' or strlen ($preselect['andor']))
+       {
+               echo $hr;
+               $hr = $ruler;
+               $andor = strlen ($preselect['andor']) ? $preselect['andor'] : getConfigVar ('FILTER_DEFAULT_ANDOR');
+               echo '<tr>';
+               foreach (array ('and', 'or') as $boolop)
+               {
+                       $class = $andor == $boolop ? 'seltagbox' : 'tagbox';
+                       $checked = $andor == $boolop ? ' checked' : '';
+                       echo "<td class=${class}><input type=radio name=andor value=${boolop}";
+                       echo $checked . ">${boolop}</input></td>";
+               }
+       }
+       // tags block
+       if (getConfigVar ('FILTER_SUGGEST_TAGS') == 'yes' or count ($preselect['tagidlist']))
+       {
+               echo $hr;
+               $hr = $ruler;
+               // Show a tree of tags, pre-select according to currently requested list filter.
+               global $tagtree;
+               $objectivetags = getObjectiveTagTree ($tagtree, $realm);
+               if (!count ($objectivetags))
+                       echo "<tr><td colspan=2 class='tagbox sparenetwork'>(nothing is tagged yet)</td></tr>";
+               else
+                       foreach ($objectivetags as $taginfo)
+                               renderTagCheckbox ('cft', buildTagChainFromIds ($preselect['tagidlist']), $taginfo);
+       }
+       // predicates block
+       if (getConfigVar ('FILTER_SUGGEST_PREDICATES') == 'yes' or count ($preselect['pnamelist']))
+       {
+               echo $hr;
+               $hr = $ruler;
+               global $pTable;
+               $myPredicates = array();
+               $psieve = getConfigVar ('FILTER_PREDICATE_SIEVE');
+               // Repack matching predicates in a way, which tagOnChain() understands.
+               foreach (array_keys ($pTable) as $pname)
+                       if (mb_ereg_match ($psieve, $pname))
+                               $myPredicates[] = array ('id' => $pname, 'tag' => $pname, 'kids' => array());
+               if (!count ($myPredicates))
+                       echo "<tr><td colspan=2 class='tagbox sparenetwork'>(no predicates to show)</td></tr>";
+               else
+               {
+                       // Repack preselect likewise.
+                       $myPreselect = array();
+                       foreach ($preselect['pnamelist'] as $pname)
+                               $myPreselect[] = array ('id' => $pname);
+                       foreach ($myPredicates as $pinfo)
+                               renderTagCheckbox ('cfp', $myPreselect, $pinfo);
+               }
+       }
+       // extra code
+       if (getConfigVar ('FILTER_SUGGEST_EXTRA') == 'yes' or strlen ($preselect['extratext']))
+       {
+               echo $hr;
+               $hr = $ruler;
+               $class = isset ($preselect['extraclass']) ? 'class=' . $preselect['extraclass'] : '';
+               echo "<tr><td colspan=2><textarea name=cfe ${class}>\n" . $preselect['extratext'];
+               echo "</textarea></td></tr>\n";
+       }
+       // submit block
+       {
+               echo $hr;
+               $hr = $ruler;
+               // "apply"
+               echo '<tr><td>';
+               echo "<input type=hidden name=page value=${pageno}>\n";
+               echo "<input type=hidden name=tab value=${tabno}>\n";
+               if ($bypass_name != '')
+                       echo "<input type=hidden name=${bypass_name} value='${bypass_value}'>\n";
+               printImageHREF ('apply', 'Apply filter', TRUE);
+               echo "</form></td><td>";
+               // "reset"
+               echo "<form method=get>\n";
+               echo "<input type=hidden name=page value=${pageno}>\n";
+               echo "<input type=hidden name=tab value=${tabno}>\n";
+               if ($bypass_name != '')
+                       echo "<input type=hidden name=${bypass_name} value='${bypass_value}'>\n";
+               printImageHREF ('clear', 'reset', TRUE);
+               echo '</form></td></tr>';
+       }
+       echo '</table>';
        finishPortlet();
 }
 
 // Dump all tags in a single SELECT element.
-function renderTagSelect ()
+function renderNewEntityTags ()
 {
        global $taglist, $tagtree;
        if (!count ($taglist))
@@ -5208,7 +4950,7 @@ function renderTagSelect ()
        }
        echo '<div class=tagselector><table border=0 align=center>';
        foreach ($tagtree as $taginfo)
-               renderTagCheckbox ($taginfo);
+               renderTagCheckbox ('taglist', array(), $taginfo);
        echo '</table></div>';
 }
 
@@ -5217,14 +4959,13 @@ function renderTagRollerForRow ($row_id)
        $a = rand (1, 20);
        $b = rand (1, 20);
        $sum = $a + $b;
-       showMessageOrError();
        printOpFormIntro ('rollTags', array ('realsum' => $sum));
        echo "<table border=1 align=center>";
        echo "<tr><td colspan=2>This special tool allows assigning tags to physical contents (racks <strong>and all contained objects</strong>) of the current ";
        echo "rack row.<br>The tag(s) selected below will be ";
        echo "appended to already assigned tag(s) of each particular entity. </td></tr>";
        echo "<tr><th>Tags</th><td>";
-       renderTagSelect();
+       renderNewEntityTags();
        echo "</td></tr>";
        echo "<tr><th>Control question: the sum of ${a} and ${b}</th><td><input type=text name=sum></td></tr>";
        echo "<tr><td colspan=2 align=center><input type=submit value='Go!'></td></tr>";
@@ -5233,19 +4974,15 @@ function renderTagRollerForRow ($row_id)
 
 function renderObjectSLB ($object_id)
 {
-       global $pageno, $tabno, $nextorder;
-       showMessageOrError();
-       $vs_list = $rsplist = array();
-       foreach (getVSList() as $vsid => $vsinfo)
-               $vs_list[$vsid] = buildVServiceName ($vsinfo) . (empty ($vsinfo['name']) ? '' : " (${vsinfo['name']})");
-       foreach (getRSPoolList() as $pool_id => $poolInfo)
-               $rsplist[$pool_id] = $poolInfo['name'];
+       global $nextorder;
+       // Keep the list in a variable to assist in decoding pool name below.
+       $rsplist = getIPv4RSPoolOptions();
 
        startPortlet ('Add new');
        echo "<table cellspacing=0 cellpadding=5 align=center class=widetable>\n";
        printOpFormIntro ('addLB');
        echo "<tr valign=top><th>VS / RS pool</th><td class=tdleft>";
-       printSelect ($vs_list, 'vs_id', NULL, 1);
+       printSelect (getIPv4VSOptions(), 'vs_id', NULL, 1);
        echo "</td><td>";
        printSelect ($rsplist, 'pool_id', NULL, 2);
        echo "</td><td>";
@@ -5286,8 +5023,7 @@ function renderObjectSLB ($object_id)
 
 function renderEditRSPool ($pool_id)
 {
-       showMessageOrError();
-       $poolinfo = getRSPoolInfo ($pool_id);
+       $poolinfo = spotEntity ('ipv4rspool', $pool_id);
        printOpFormIntro ('updIPv4RSP');
        echo '<table border=0 align=center>';
        echo "<tr><th class=tdright>name:</th><td class=tdleft><input type=text name=name value='${poolinfo['name']}'></td></tr>\n";
@@ -5301,8 +5037,8 @@ function renderEditRSPool ($pool_id)
 
 function renderEditVService ($vsid)
 {
-       showMessageOrError();
-       $vsinfo = getVServiceInfo ($vsid);
+       $vsinfo = spotEntity ('ipv4vs', $vsid);
+       amplifyCell ($vsinfo);
        printOpFormIntro ('updIPv4VS');
        echo '<table border=0 align=center>';
        echo "<tr><th class=tdright>VIP:</th><td class=tdleft><input tabindex=1 type=text name=vip value='${vsinfo['vip']}'></td></tr>\n";
@@ -5342,7 +5078,6 @@ function renderRackCodeViewer ()
 function renderRackCodeEditor ()
 {
        $text = loadScript ('RackCode');
-       showMessageOrError();
        printOpFormIntro ('saveRackCode');
        echo <<<ENDJAVASCRIPT
 <script type="text/javascript">
@@ -5404,32 +5139,32 @@ ENDJAVASCRIPT;
 
 function renderUser ($user_id)
 {
-       global $accounts, $target_given_tags;
-       $username = getUsernameByID ($user_id);
+       global $target_given_tags;
+       $userinfo = getUserInfo ($user_id);
 
        startPortlet ('summary');
        echo '<table border=0 align=center>';
-       echo "<tr><th class=tdright>Account name:</th><td class=tdleft>${username}</td></tr>";
-       echo '<tr><th class=tdright>Real name:</th><td class=tdleft>' . $accounts[$username]['user_realname'] . '</td></tr>';
+       echo "<tr><th class=tdright>Account name:</th><td class=tdleft>${userinfo['user_name']}</td></tr>";
+       echo '<tr><th class=tdright>Real name:</th><td class=tdleft>' . $userinfo['user_realname'] . '</td></tr>';
        // Using printTagTRs() is inappropriate here, because autotags will be filled with current user's
        // data, not the viewed one. Another special reason is that the displayed user's given tags are in
        // the "target" chain.
        $baseurl = makeHref(array('page'=>'userlist', 'tab'=>'default'))."&";
        if (getConfigVar ('SHOW_EXPLICIT_TAGS') == 'yes' and count ($target_given_tags))
        {
-               echo "<tr><th width='50%' class=tdright><span class=tagheader>Given explicit tags</span>:</th><td class=tdleft>";
+               echo "<tr><th width='50%' class=tagchain>Given explicit tags:</th><td class=tagchain>";
                echo serializeTags ($target_given_tags, $baseurl) . "</td></tr>\n";
        }
        $target_shadow = getImplicitTags ($target_given_tags);
        if (getConfigVar ('SHOW_IMPLICIT_TAGS') == 'yes' and count ($target_shadow))
        {
-               echo "<tr><th width='50%' class=tdright><span class=tagheader>Given implicit tags</span>:</th><td class=tdleft>";
+               echo "<tr><th width='50%' class=tagchain>Given implicit tags:</th><td class=tagchain>";
                echo serializeTags ($target_shadow, $baseurl) . "</td></tr>\n";
        }
-       $target_auto_tags = generateEntityAutoTags ('user', $username);
+       $target_auto_tags = generateEntityAutoTags ('user', $userinfo['user_name']);
        if (getConfigVar ('SHOW_AUTOMATIC_TAGS') == 'yes' and count ($target_auto_tags))
        {
-               echo "<tr><th width='50%' class=tdright><span class=tagheader>Automatic tags</span>:</th><td class=tdleft>";
+               echo "<tr><th width='50%' class=tagchain>Automatic tags:</th><td class=tagchain>";
                echo serializeTags ($target_auto_tags) . "</td></tr>\n";
        }
        echo '</table>';
@@ -5440,7 +5175,6 @@ function renderUser ($user_id)
 
 function renderMyPasswordEditor ()
 {
-       showMessageOrError();
        printOpFormIntro ('changeMyPassword');
        echo '<table border=0 align=center>';
        echo "<tr><th class=tdright>Current password (*):</th><td><input type=password name=oldpassword tabindex=1></td></tr>";
@@ -5458,7 +5192,6 @@ function renderAccessDenied ()
        echo '<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />';
        echo "<link rel=stylesheet type='text/css' href=pi.css />\n";
        echo "<link rel=icon href='" . getFaviconURL() . "' type='image/x-icon' />";
-       echo "<link rel=icon href='" . getFaviconURL() . "' type='image/x-icon' />";
        echo "</head><body>";
        global $root, $pageno, $tabno,
                $user_given_tags,
@@ -5472,15 +5205,15 @@ function renderAccessDenied ()
        echo ' access denied ';
        printImageHREF ('DENIED');
        echo '</h3></th></tr>';
-       echo "<tr><th width='50%' class=tdright><span class=tagheader>User given tags</span>:</th><td class=tdleft>";
+       echo "<tr><th width='50%' class=tagchain>User given tags:</th><td class=tagchain>";
        echo serializeTags ($user_given_tags) . "&nbsp;</td></tr>\n";
-       echo "<tr><th width='50%' class=tdright><span class=tagheader>Target given tags</span>:</th><td class=tdleft>";
+       echo "<tr><th width='50%' class=tagchain>Target given tags:</th><td class=tagchain>";
        echo serializeTags ($target_given_tags) . "&nbsp;</td></tr>\n";
-       echo "<tr><th width='50%' class=tdright><span class=tagheader>Effective explicit tags</span>:</th><td class=tdleft>";
+       echo "<tr><th width='50%' class=tagchain>Effective explicit tags:</th><td class=tagchain>";
        echo serializeTags ($expl_tags) . "&nbsp;</td></tr>\n";
-       echo "<tr><th width='50%' class=tdright><span class=tagheader>Effective implicit tags</span>:</th><td class=tdleft>";
+       echo "<tr><th width='50%' class=tagchain>Effective implicit tags:</th><td class=tagchain>";
        echo serializeTags ($impl_tags) . "&nbsp;</td></tr>\n";
-       echo "<tr><th width='50%' class=tdright><span class=tagheader>Automatic tags</span>:</th><td class=tdleft>";
+       echo "<tr><th width='50%' class=tagchain>Automatic tags:</th><td class=tagchain>";
        echo serializeTags ($auto_tags) . "&nbsp;</td></tr>\n";
        echo "<tr><th width='50%' class=tdright>Requested page:</th><td class=tdleft>${pageno}</td></tr>\n";
        echo "<tr><th width='50%' class=tdright>Requested tab:</th><td class=tdleft>${tabno}</td></tr>\n";
@@ -5491,49 +5224,17 @@ function renderAccessDenied ()
 
 function renderMyAccount ()
 {
-       global $remote_username, $accounts;
+       global $remote_username, $remote_displayname;
        echo "<table border=0 class=objectview cellspacing=0 cellpadding=0 width='50%'>";
        echo "<tr><td colspan=2 align=center><h1>${remote_username}</h1></td></tr>\n";
-       echo "<tr><td colspan=2 align=center><h2>" . $accounts[$remote_username]['user_realname'] . "</h2></td></tr>\n";
+       echo "<tr><td colspan=2 align=center><h2>${remote_displayname}</h2></td></tr>\n";
        echo "</table>";
 }
 
 // File-related functions
-function renderFileSpace ()
-{
-       global $taglist, $tagtree;
-       echo "<table border=0 class=objectview>\n";
-       echo "<tr><td class=pcleft width='50%'>";
-       startPortlet ('View all by link');
-       $linkInfo = getFileLinkInfo();
-       if ($linkInfo === NULL)
-       {
-               showError ('getFileLinkInfo() failed', __FUNCTION__);
-               return;
-       }
-       if (count ($linkInfo) == 0)
-               echo "No files exist in DB";
-       else
-       {
-               echo '<div align=left><ul>';
-               foreach ($linkInfo as $li)
-                       echo "<li><a href='".makeHref(array('page'=>'filesbylink', 'entity_type'=>$li['entity_type']))."'>${li['name']}</a> (${li['count']})</li>";
-               echo '</ul></div>';
-       }
-       finishPortlet();
-       echo '</td><td class=pcright>';
-       renderTagFilterPortlet (getTagFilter(), 'file');
-       echo "</td></tr></table>\n";
-}
-
-function renderFile ($file_id = 0)
+function renderFile ($file_id)
 {
        global $nextorder, $aac, $root;
-       if ($file_id <= 0)
-       {
-               showError ('Invalid file_id', __FUNCTION__);
-               return;
-       }
        $file = getFileInfo ($file_id);
        if ($file == NULL)
        {
@@ -5572,18 +5273,16 @@ function renderFile ($file_id = 0)
        {
                startPortlet ('Links (' . count ($links) . ')');
                echo "<table cellspacing=0 cellpadding='5' align='center' class='widetable'>\n";
-               global $accounts;
                foreach ($links as $link)
                {
                        echo '<tr><td class=tdleft>';
                        switch ($link['entity_type'])
                        {
                                case 'user':
-                                       $username = getUsernameByID ($link['entity_id']);
-                                       if (NULL === $username or !isset ($accounts[$username]))
+                                       if (NULL === ($userinfo = getUserInfo ($link['entity_id'])))
                                                echo "Internal error: user id ${link['entity_id']} not found";
                                        else
-                                               renderUserCell ($accounts[$username]);
+                                               renderCell ($userinfo);
                                        break;
                                case 'ipv4net':
                                        renderIPv4NetCell (getIPv4NetworkInfo ($link['entity_id']));
@@ -5614,25 +5313,22 @@ function renderFile ($file_id = 0)
 
 function renderFileReuploader ()
 {
-       showMessageOrError();
        startPortlet ('Replace existing contents');
-       printOpFormIntro ('replaceFile', array ('MAX_FILE_SIZE' => convertToBytes(get_cfg_var('upload_max_filesize'))), TRUE);
+       printOpFormIntro ('replaceFile', array (), TRUE);
        echo "<input type=file size=10 name=file tabindex=100>&nbsp;\n";
        printImageHREF ('save', 'Save changes', TRUE, 101);
        echo "</form>\n";
        finishPortlet();
 }
 
-function renderFileProperties ($file_id = 0)
+function renderFileProperties ($file_id)
 {
-       global $root;
        $file = getFileInfo ($file_id);
        if ($file === NULL)
        {
                showError ('getFileInfo() failed', __FUNCTION__);
                return;
        }
-       showMessageOrError();
        echo '<table border=0 align=center>';
        printOpFormIntro ('updateFile');
        echo "<tr><th class=tdright>MIME-type:</th><td class=tdleft><input tabindex=101 type=text name=file_type value='";
@@ -5646,17 +5342,20 @@ function renderFileProperties ($file_id = 0)
        echo '</th></tr></form></table>';
 }
 
-// Used for uploading a parentless file
-function renderFileUploadForm ()
+function renderFileBrowser ()
 {
-       global $aat, $pageno, $tabno, $nextorder;
+       renderCellList ('file', 'Files', TRUE);
+}
 
-       showMessageOrError();
+// Like renderFileBrowser(), but with the option to delete files
+function renderFileManager ()
+{
+       global $nextorder;
+       // Used for uploading a parentless file
        startPortlet ('Upload new');
        echo "<table border=0 cellspacing=0 cellpadding='5' align='center' class='widetable'>\n";
        echo "<tr><th>File</th><th>Comment</th><th></th></tr>\n";
-
-       printOpFormIntro ('addFile', array ('MAX_FILE_SIZE' => convertToBytes(get_cfg_var('upload_max_filesize'))), TRUE);
+       printOpFormIntro ('addFile', array (), TRUE);
        echo "<tr>";
        echo "<td class=tdleft><input type='file' size='10' name='file' tabindex=100></td>\n";
        echo "<td class=tdleft><textarea tabindex=101 name=comment rows=10 cols=80></textarea></td>\n";
@@ -5665,86 +5364,42 @@ function renderFileUploadForm ()
        echo '</td></tr></form>';
        echo "</table><br>\n";
        finishPortlet();
-}
 
-function renderFilesByLink ()
-{
-       global $pageno, $tabno, $nextorder, $taglist, $tagtree, $root;
-       assertStringArg ('entity_type', __FUNCTION__, TRUE);
-       $entity_type = $_REQUEST['entity_type'];
-       $tagfilter = getTagFilter();
-       $tagfilter_str = getTagFilterStr ($tagfilter);
-       echo "<table border=0 class=objectview>\n";
-       echo "<tr><td class=pcleft width='25%'>";
-
-       startPortlet ('change type');
-       $linkInfo = getFileLinkInfo();
-       if ($linkInfo === NULL)
-       {
-               showError ('getFileLinkInfo() failed', __FUNCTION__);
+       $files = listCells ('file');
+       if (!count ($files))
                return;
-       }
-       if (count ($linkInfo) == 0)
-               echo 'No files exist in DB';
-       else
-       {
-               echo '<div align=left><ul>';
-               foreach ($linkInfo as $li)
-               {
-                       echo "<li><a href='".makeHref(array('page'=>$pageno, 'entity_type'=>$li['entity_type']))."${tagfilter_str}'>";
-                       if ($li['entity_type'] == $entity_type)
-                               echo '<strong>';
-                       echo "${li['name']}</a>";
-                       if ($li['entity_type'] == $entity_type)
-                               echo '</strong>';
-                       echo " (${li['count']})";
-                       if ($li['entity_type'] == $entity_type)
-                               echo ' &larr;';
-                       echo "</li>";
-               }
-               echo '</ul></div>';
-       }
-       finishPortlet();
-
-       echo '</td><td class=pcleft>';
 
-       $files = getFileList ($entity_type, $tagfilter, getTFMode());
-       startPortlet ('Files (' . count ($files) . ')');
-       if ($files === NULL)
-       {
-               showError ('getFileList() failed', __FUNCTION__);
-               return;
-       }
-       echo '<br><br><table cellpadding=5 cellspacing=0 align=center class=cooltable>';
-       echo '<tr><th>File</th><th>Linked to</th><th>Actions</th></tr>';
+       startPortlet ('Manage existing (' . count ($files) . ')');
        $order = 'odd';
+       echo '<table cellpadding=5 cellspacing=0 align=center class=cooltable>';
+       echo '<tr><th>File</th><th>Unlink</th><th>Destroy</th></tr>';
        foreach ($files as $file)
        {
                printf("<tr class=row_%s valign=top><td class=tdleft>", $order);
-               renderFileCell ($file);
-               echo "</td><td class='tdleft'>";
-               $links = getFileLinks($file['id']);
-               if (count ($links))
-                       printf("<small>%s</small>", serializeFileLinks($links));
-               echo "</td><td class=tdleft>";
-               echo "<a href='".makeHrefProcess(array('op'=>'deleteFile', 'file_id'=>$file['id'], 'entity_type'=>$entity_type)).
-                       "' onclick=\"javascript:return confirm('Are you sure you want to delete the file?')\">";
-               printImageHREF ('DESTROY', 'Delete file');
-               echo "</a></td></tr>\n";
+               renderCell ($file);
+               // Don't load links data earlier to enable special processing.
+               amplifyCell ($file);
+               echo '</td><td class=tdleft>';
+               echo serializeFileLinks ($file['links'], TRUE);
+               echo '</td><td class=tdcenter>';
+               if (count ($file['links']))
+                       printImageHREF ('NODESTROY', 'References (' . count ($file['links']) . ')');
+               else
+               {
+                       echo "<a href='".makeHrefProcess(array('op'=>'deleteFile', 'file_id'=>$file['id'])).
+                               "' onclick=\"javascript:return confirm('Are you sure you want to delete the file?')\">";
+                       printImageHREF ('DESTROY', 'Delete file');
+                       echo "</a>";
+               }
+               echo "</td></tr>\n";
                $order = $nextorder[$order];
        }
        echo '</table>';
        finishPortlet();
-
-       echo "</td><td class=pcright width='25%'>";
-
-       renderTagFilterPortlet ($tagfilter, 'file', 'entity_type', $entity_type);
-       echo "</td></tr></table>\n";
 }
 
 function renderFilesPortlet ($entity_type = NULL, $entity_id = 0)
 {
-       global $root;
        if ($entity_type == NULL || $entity_id <= 0)
        {
                showError ('Invalid entity info', __FUNCTION__);
@@ -5770,24 +5425,17 @@ function renderFilesPortlet ($entity_type = NULL, $entity_id = 0)
        }
 }
 
-function renderFilesForEntity ($entity_id = 0)
+function renderFilesForEntity ($entity_id)
 {
-       global $root, $page, $pageno, $tabno, $etype_by_pageno;
-       if ($entity_id <= 0)
-       {
-               showError ('Invalid entity info', __FUNCTION__);
-               return;
-       }
-
-       showMessageOrError();
+       global $page, $pageno, $etype_by_pageno;
        // Now derive entity_type and bypass_name from pageno.
        $entity_type = $etype_by_pageno[$pageno];
        $id_name = $page[$pageno]['bypass'];
        
-       startPortlet ('Upload new');
+       startPortlet ('Upload and link new');
        echo "<table border=0 cellspacing=0 cellpadding='5' align='center' class='widetable'>\n";
        echo "<tr><th>File</th><th>Comment</th><th></th></tr>\n";
-       printOpFormIntro ('addFile', array ('entity_type' => $entity_type, 'entity_id' => $entity_id, 'MAX_FILE_SIZE' => convertToBytes(get_cfg_var('upload_max_filesize'))), TRUE);
+       printOpFormIntro ('addFile', array (), TRUE);
        echo "<tr>";
        echo "<td class=tdleft><input type='file' size='10' name='file' tabindex=100></td>\n";
        echo "<td class=tdleft><textarea tabindex=101 name=comment rows=10 cols=80></textarea></td><td>\n";
@@ -5799,7 +5447,7 @@ function renderFilesForEntity ($entity_id = 0)
        $files = getAllUnlinkedFiles ($entity_type, $entity_id);
        if (count ($files))
        {
-               startPortlet ('Use existing');
+               startPortlet ('Link existing (' . count ($files) . ')');
                printOpFormIntro ('linkFile');
                echo "<table border=0 cellspacing=0 cellpadding='5' align='center'>\n";
                echo '<tr><td class=tdleft>';
@@ -5814,19 +5462,16 @@ function renderFilesForEntity ($entity_id = 0)
        $filelist = getFilesOfEntity ($entity_type, $entity_id);
        if (count ($filelist))
        {
-               startPortlet ('Manage linked');
+               startPortlet ('Manage linked (' . count ($filelist) . ')');
                echo "<table border=0 cellspacing=0 cellpadding='5' align='center' class='widetable'>\n";
-               echo "<tr><th>File</th><th>Comment</th><th>Actions</th></tr>\n";
+               echo "<tr><th>File</th><th>Comment</th><th>Unlink</th></tr>\n";
                foreach ($filelist as $file_id => $file)
                {
                        echo "<tr valign=top><td class=tdleft>";
                        renderFileCell ($file);
-                       echo "</td><td class=tdleft>${file['comment']}</td><td class=tdleft>";
-                       echo "<a href='".makeHrefProcess(array('op'=>'unlinkFile', 'link_id'=>$file['link_id'], $id_name=>$entity_id, 'name'=>$file['name']))."'>";
+                       echo "</td><td class=tdleft>${file['comment']}</td><td class=tdcenter>";
+                       echo "<a href='".makeHrefProcess(array('op'=>'unlinkFile', 'link_id'=>$file['link_id'], $id_name=>$entity_id))."'>";
                        printImageHREF ('CUT', 'Unlink file');
-                       echo "<a href='".makeHrefProcess(array('op'=>'deleteFile', 'file_id'=>$file['id'], $id_name=>$entity_id)).
-                               "' onclick=\"javascript:return confirm('Are you sure you want to delete the file?')\">";
-                       printImageHREF ('DESTROY', 'Unlink and delete file');
                        echo "</a></td></tr>\n";
                }
                echo "</table><br>\n";
@@ -5844,11 +5489,11 @@ function printOpFormIntro ($opname, $extra = array(), $upload = FALSE)
        echo "<form method=post name=${opname} action='${root}process.php?page=${pageno}&tab=${tabno}&op=${opname}'";
        if ($upload)
                echo " enctype='multipart/form-data'";
-       echo ">\n";
+       echo ">";
        if (isset ($page[$pageno]['bypass']) and isset ($_REQUEST[$page[$pageno]['bypass']]))
                $extra[$page[$pageno]['bypass']] = $_REQUEST[$page[$pageno]['bypass']];
        foreach ($extra as $inputname => $inputvalue)
-               echo "<input type=hidden name=${inputname} value='${inputvalue}'>\n";
+               echo "<input type=hidden name=${inputname} value='${inputvalue}'>";
 }
 
 // This is a dual-purpose formating function:
@@ -5868,7 +5513,6 @@ function niftyString ($string, $maxlen = 30)
 // Iterate over what findRouters() returned and output some text suitable for a TD element.
 function printRoutersTD ($rlist)
 {
-       global $root;
        $rtrclass = 'tdleft';
        foreach ($rlist as $rtr)
        {
@@ -5938,6 +5582,28 @@ function renderIPv4NetCell ($netinfo)
        echo "</td></tr></table>";
 }
 
+function renderCell ($cell)
+{
+       switch ($cell['realm'])
+       {
+       case 'user':
+               renderUserCell ($cell);
+               break;
+       case 'file':
+               renderFileCell ($cell);
+               break;
+       case 'ipv4vs':
+               renderIPv4VSCell ($cell);
+               break;
+       case 'ipv4rspool':
+               renderRSPoolCell ($cell['id'], $cell['name']);
+               break;
+       default:
+               showError ('odd data', __FUNCTION__);
+               break;
+       }
+}
+
 function renderUserCell ($account)
 {
        global $root;
@@ -5950,8 +5616,9 @@ function renderUserCell ($account)
        else
                echo "<tr><td class=sparenetwork>no name</td></tr>";
        echo '<td>';
-       $tags = loadEntityTags ('user', $account['user_id']);
-       echo count ($tags) ? ("<small>" . serializeTags ($tags) . "</small>") : '&nbsp;';
+       if (!isset ($account['etags']))
+               $account['etags'] = loadEntityTags ('user', $account['user_id']);
+       echo count ($account['etags']) ? ("<small>" . serializeTags ($account['etags']) . "</small>") : '&nbsp;';
        echo "</td></tr></table>";
 }
 
@@ -5984,7 +5651,7 @@ function renderRSPoolCell ($pool_id, $pool_name)
 // FIXME: migrate to renderIPv4VSCell()
 function renderVSCell ($vs_id)
 {
-       renderIPv4VSCell (getVServiceInfo ($vs_id));
+       renderIPv4VSCell (spotEntity ('ipv4vs', $vs_id));
 }
 
 function renderIPv4VSCell ($vsinfo)
@@ -5994,8 +5661,10 @@ function renderIPv4VSCell ($vsinfo)
        printImageHREF ('VS');
        echo "</td><td>";
        echo "<a href='${root}?page=ipv4vs&vs_id=${vsinfo['id']}'>";
-       echo buildVServiceName ($vsinfo);
-       echo "</a></td></tr><tr><td>";
+       // FIXME: this is a workaround
+       if (!isset ($vsinfo['dname']))
+               $vsinfo['dname'] = buildVServiceName ($vsinfo);
+       echo $vsinfo['dname'] . "</a></td></tr><tr><td>";
        echo $vsinfo['name'];
        echo '</td></tr><tr><td>';
        $tags = loadEntityTags ('ipv4vs', $vsinfo['id']);
@@ -6038,9 +5707,13 @@ function renderFileCell ($fileinfo)
        }
        echo "</td><td>";
        printf ("<a href='${root}?page=file&file_id=%s'><strong>%s</strong></a>", $fileinfo['id'], niftyString ($fileinfo['name']));
+       echo "</td><td rowspan=3 valign=top>";
+       if (isset ($fileinfo['links']) and count ($fileinfo['links']))
+               printf ("<small>%s</small>", serializeFileLinks ($fileinfo['links']));
        echo "</td></tr><tr><td>";
-       $tags = loadEntityTags ('file', $fileinfo['id']);
-       echo count ($tags) ? ("<small>" . serializeTags ($tags) . "</small>") : '&nbsp;';
+       if (!isset ($fileinfo['etags']))
+               $fileinfo['etags'] = loadEntityTags ('file', $fileinfo['id']);
+       echo count ($fileinfo['etags']) ? ("<small>" . serializeTags ($fileinfo['etags']) . "</small>") : '&nbsp;';
        echo "</td></tr><tr><td><a href='${root}download.php?file_id=${fileinfo['id']}'>";
        printImageHREF ('download', 'Download file');
        echo '</a>&nbsp;';
@@ -6098,7 +5771,6 @@ function getFilePreviewCode ($file)
 function renderTextEditor ($file_id)
 {
        global $CodePressMap;
-       showMessageOrError();
        $fullInfo = getFile ($file_id);
        printOpFormIntro ('updateFileText', array ('mtime_copy' => $fullInfo['mtime']));
        preg_match('/.+\.([^.]*)$/', $fullInfo['name'], $matches); # get file extension
@@ -6113,4 +5785,275 @@ function renderTextEditor ($file_id)
        echo "</td></tr>\n</table></form>\n";
 }
 
+function showPathAndSearch ($pageno)
+{
+       // This function returns array of page numbers leading to the target page
+       // plus page number of target page itself. The first element is the target
+       // page number and the last element is the index page number.
+       function getPath ($targetno)
+       {
+               $self = __FUNCTION__;
+               global $page;
+               $path = array();
+               // Recursion breaks at first parentless page.
+               if (!isset ($page[$targetno]['parent']))
+                       $path = array ($targetno);
+               else
+               {
+                       $path = $self ($page[$targetno]['parent']);
+                       $path[] = $targetno;
+               }
+               return $path;
+       }
+       global $root, $page;
+       // Path.
+       echo "<td class=activemenuitem width='99%'>" . getConfigVar ('enterprise');
+       $path = getPath ($pageno);
+       foreach ($path as $no)
+       {
+               if (isset ($page[$no]['title']))
+                       $title = array
+                       (
+                               'name' => $page[$no]['title'],
+                               'params' => array()
+                       );
+               else
+                       $title = dynamic_title_decoder ($no);
+               echo ": <a href='${root}?page=${no}&tab=default";
+               foreach ($title['params'] as $param_name => $param_value)
+                       echo "&${param_name}=${param_value}";
+               echo "'>" . $title['name'] . "</a>";
+       }
+       echo "</td>";
+       // Search form.
+       echo "<td><table border=0 cellpadding=0 cellspacing=0><tr><td>Search:</td>";
+       echo "<form name=search method=get action='${root}'><td>";
+       echo '<input type=hidden name=page value=search>';
+       // This input will be the first, if we don't add ports or addresses.
+       echo "<input type=text name=q size=20 tabindex=1000></td></form></tr></table></td>";
+}
+
+function getTitle ($pageno)
+{
+       global $page;
+       if (isset ($page[$pageno]['title']))
+               return $page[$pageno]['title'];
+       $tmp = dynamic_title_decoder ($pageno);
+       return $tmp['name'];
+}
+
+function showTabs ($pageno, $tabno)
+{
+       global $tab, $root, $page, $trigger, $tabextraclass;
+       if (!isset ($tab[$pageno]['default']))
+               return;
+       echo "<td><div class=greynavbar><ul id=foldertab style='margin-bottom: 0px; padding-top: 10px;'>";
+       foreach ($tab[$pageno] as $tabidx => $tabtitle)
+       {
+               // Hide forbidden tabs.
+               if (!permitted ($pageno, $tabidx))
+                       continue;
+               // Dynamic tabs should only be shown in certain cases (trigger exists and returns true).
+               if (isset ($trigger[$pageno][$tabidx]))
+               {
+                       $ok = $trigger[$pageno][$tabidx] ();
+                       if (!$ok)
+                               continue;
+               }
+               $class = ($tabidx == $tabno) ? 'current' : 'std';
+               $extra = (isset ($tabextraclass[$pageno][$tabidx])) ? $tabextraclass[$pageno][$tabidx] : '';
+               echo "<li><a class=${class}{$extra}";
+               echo " href='${root}?page=${pageno}&tab=${tabidx}";
+               if (isset ($page[$pageno]['bypass']) and isset ($_REQUEST[$page[$pageno]['bypass']]))
+               {
+                       $bpname = $page[$pageno]['bypass'];
+                       $bpval = $_REQUEST[$bpname];
+                       echo "&${bpname}=${bpval}";
+               }
+               echo "'>${tabtitle}</a></li>\n";
+       }
+       echo "</ul></div></td>\n";
+}
+
+// Arg is path page number, which can be different from the primary page number,
+// for example title for 'ipv4net' can be requested to build navigation path for
+// both IPv4 network and IPv4 address. Another such page number is 'row', which
+// fires for both row and its racks. Use pageno for decision in such cases.
+function dynamic_title_decoder ($path_position)
+{
+       switch ($path_position)
+       {
+       case 'index':
+               return array
+               (
+                       'name' => '/' . getConfigVar ('enterprise'),
+                       'params' => array()
+               );
+       case 'chapter':
+               assertUIntArg ('chapter_no', __FUNCTION__);
+               $chapters = getChapterList();
+               $chapter_no = $_REQUEST['chapter_no'];
+               $chapter_name = isset ($chapters[$chapter_no]) ? $chapters[$chapter_no]['name'] : 'N/A';
+               return array
+               (
+                       'name' => "Chapter '${chapter_name}'",
+                       'params' => array ('chapter_no' => $chapter_no)
+               );
+       case 'user':
+               assertUIntArg ('user_id', __FUNCTION__);
+               $userinfo = getUserInfo ($_REQUEST['user_id']);
+               return array
+               (
+                       'name' => "Local user '" . $userinfo['user_name'] . "'",
+                       'params' => array ('user_id' => $_REQUEST['user_id'])
+               );
+       case 'ipv4rspool':
+               assertUIntArg ('pool_id', __FUNCTION__);
+               $poolInfo = spotEntity ('ipv4rspool', $_REQUEST['pool_id']);
+               return array
+               (
+                       'name' => empty ($poolInfo['name']) ? 'ANONYMOUS' : $poolInfo['name'],
+                       'params' => array ('pool_id' => $_REQUEST['pool_id'])
+               );
+       case 'ipv4vs':
+               assertUIntArg ('vs_id', __FUNCTION__);
+               $tmp = spotEntity ('ipv4vs', $_REQUEST['vs_id']);
+               return array
+               (
+                       'name' => $tmp['dname'],
+                       'params' => array ('vs_id' => $_REQUEST['vs_id'])
+               );
+       case 'object':
+               assertUIntArg ('object_id', __FUNCTION__);
+               $object = getObjectInfo ($_REQUEST['object_id']);
+               if ($object == NULL)
+                       return array
+                       (
+                               'name' => __FUNCTION__ . '() failure',
+                               'params' => array()
+                       );
+               return array
+               (
+                       'name' => $object['dname'],
+                       'params' => array ('object_id' => $_REQUEST['object_id'])
+               );
+       case 'rack':
+               assertUIntArg ('rack_id', __FUNCTION__);
+               $rack = spotEntity ('rack', $_REQUEST['rack_id']);
+               return array
+               (
+                       'name' => $rack['name'],
+                       'params' => array ('rack_id' => $_REQUEST['rack_id'])
+               );
+       case 'search':
+               if (isset ($_REQUEST['q']))
+                       return array
+                       (
+                               'name' => "search results for '${_REQUEST['q']}'",
+                               'params' => array ('q' => $_REQUEST['q'])
+                       );
+               else
+                       return array
+                       (
+                               'name' => 'search results',
+                               'params' => array()
+                       );
+       case 'file':
+               assertUIntArg ('file_id', __FUNCTION__);
+               $file = getFileInfo ($_REQUEST['file_id']);
+               if ($file == NULL)
+                       return array
+                       (
+                               'name' => __FUNCTION__ . '() failure',
+                               'params' => array()
+                       );
+               return array
+               (
+                       'name' => htmlspecialchars ($file['name']),
+                       'params' => array ('file_id' => $_REQUEST['file_id'])
+               );
+       case 'ipaddress':
+               assertIPv4Arg ('ip', __FUNCTION__);
+               return array
+               (
+                       'name' => $_REQUEST['ip'],
+                       'params' => array ('ip' => $_REQUEST['ip'])
+               );
+       case 'ipv4net':
+               global $pageno;
+               switch ($pageno)
+               {
+               case 'ipv4net':
+                       assertUIntArg ('id', __FUNCTION__);
+                       $range = getIPv4NetworkInfo ($_REQUEST['id']);
+                       return array
+                       (
+                               'name' => $range['ip'] . '/' . $range['mask'],
+                               'params' => array ('id' => $_REQUEST['id'])
+                       );
+               case 'ipaddress':
+                       assertIPv4Arg ('ip', __FUNCTION__);
+                       $range = getIPv4NetworkInfo (getIPv4AddressNetworkId ($_REQUEST['ip']));
+                       return array
+                       (
+                               'name' => $range['ip'] . '/' . $range['mask'],
+                               'params' => array
+                               (
+                                       'id' => $range['id'],
+                                       'hl_ipv4_addr' => $_REQUEST['ip']
+                               )
+                       );
+               default:
+                       return array
+                       (
+                               'name' => __FUNCTION__ . '() failure',
+                               'params' => array()
+                       );
+               }
+       case 'row':
+               global $pageno;
+               switch ($pageno)
+               {
+               case 'rack':
+                       assertUIntArg ('rack_id', __FUNCTION__);
+                       $rack = spotEntity ('rack', $_REQUEST['rack_id']);
+                       if ($rack == NULL)
+                       {
+                               showError ('Rack not found', __FUNCTION__);
+                               return NULL;
+                       }
+                       return array
+                       (
+                               'name' => $rack['row_name'],
+                               'params' => array ('row_id' => $rack['row_id'])
+                       );
+               case 'row':
+                       assertUIntArg ('row_id', __FUNCTION__);
+                       $rowInfo = getRackRowInfo ($_REQUEST['row_id']);
+                       if ($rowInfo == NULL)
+                       {
+                               showError ('getRackRowInfo() failed', __FUNCTION__);
+                               return NULL;
+                       }
+                       return array
+                       (
+                               'name' => $rowInfo['name'],
+                               'params' => array ('row_id' => $_REQUEST['row_id'])
+                       );
+               default:
+                       return array
+                       (
+                               'name' => __FUNCTION__ . '() failure',
+                               'params' => array()
+                       );
+               }
+       default:
+               return array
+               (
+                       'name' => __FUNCTION__ . '() failure',
+                       'params' => array()
+               );
+       }
+}
+
 ?>