lib/PageList.php

   1 <?php rcs_id('$Id: PageList.php,v 1.132 2005-04-09 09:16:15 rurban Exp $');
   2
   3 /**
   4  * List a number of pagenames, optionally as table with various columns.
   5  * This library relieves some work for these plugins:
   6  *
   7  * AllPages, BackLinks, LikePages, MostPopular, TitleSearch, WikiAdmin* and more
   8  *
   9  * It also allows dynamic expansion of those plugins to include more
  10  * columns in their output.
  11  *
  12  * Column 'info=' arguments:
  13  *
  14  * 'pagename' _("Page Name")
  15  * 'mtime'    _("Last Modified")
  16  * 'hits'     _("Hits")
  17  * 'summary'  _("Last Summary")
  18  * 'version'  _("Version")),
  19  * 'author'   _("Last Author")),
  20  * 'locked'   _("Locked"), _("locked")
  21  * 'minor'    _("Minor Edit"), _("minor")
  22  * 'markup'   _("Markup")
  23  * 'size'     _("Size")
  24  * 'creator'  _("Creator")
  25  * 'owner'    _("Owner")
  26  * 'checkbox'  selectable checkbox at the left.
  27  * 'content'
  28  *
  29  * Special, custom columns: Either theme or plugin (WikiAdmin*) specific.
  30  * 'remove'   _("Remove")
  31  * 'perm'     _("Permission Mask")
  32  * 'acl'      _("ACL")
  33  * 'renamed_pagename'   _("Rename to")
  34  * 'ratingwidget', ... wikilens theme specific.
  35  * 'custom'   See plugin/_WikiTranslation
  36  *
  37  * Symbolic 'info=' arguments:
  38  * 'all'       All columns except the special columns
  39  * 'most'      pagename, mtime, author, size, hits, ...
  40  * 'some'      pagename, mtime, author
  41  *
  42  * FIXME: In this refactoring I (Jeff) have un-implemented _ctime, _cauthor, and
  43  * number-of-revision.  Note the _ctime and _cauthor as they were implemented
  44  * were somewhat flawed: revision 1 of a page doesn't have to exist in the
  45  * database.  If lots of revisions have been made to a page, it's more than likely
  46  * that some older revisions (include revision 1) have been cleaned (deleted).
  47  *
  48  * DONE:
  49  *   paging support: limit, offset args
  50  *   check PagePerm "list" access-type,
  51  *   all columns are sortable (Thanks to the wikilens team).
  52  *   cols > 1, comma, azhead, ordered (OL lists)
  53  *   ->supportedArgs() which arguments are supported, so that the plugin
  54  *                     doesn't explictly need to declare it
  55  *
  56  * FIXED:
  57  *   fix memory exhaustion on large pagelists with old --memory-limit php's only.
  58  *   Status: improved 2004-06-25 16:19:36 rurban
  59  *     but needs further testing.
  60  */
  61 class _PageList_Column_base {
  62     var $_tdattr = array();
  63
  64     function _PageList_Column_base ($default_heading, $align = false) {
  65         $this->_heading = $default_heading;
  66
  67         if ($align) {
  68             // align="char" isn't supported by any browsers yet :(
  69             //if (is_array($align))
  70             //    $this->_tdattr = $align;
  71             //else
  72             $this->_tdattr['align'] = $align;
  73         }
  74     }
  75
  76     function format ($pagelist, $page_handle, &$revision_handle) {
  77         return HTML::td($this->_tdattr,
  78                         HTML::raw('&nbsp;'),
  79                         $this->_getValue($page_handle, $revision_handle),
  80                         HTML::raw('&nbsp;'));
  81     }
  82
  83     function getHeading () {
  84         return $this->_heading;
  85     }
  86
  87     function setHeading ($heading) {
  88         $this->_heading = $heading;
  89     }
  90
  91     // old-style heading
  92     function heading () {
  93         // allow sorting?
  94         if (1 /* or in_array($this->_field, PageList::sortable_columns())*/) {
  95             // multiple comma-delimited sortby args: "+hits,+pagename"
  96             // asc or desc: +pagename, -pagename
  97             $sortby = PageList::sortby($this->_field, 'flip_order');
  98             //Fixme: pass all also other GET args along. (limit, p[])
  99             //TODO: support GET and POST
 100             $s = HTML::a(array('href' =>
 101                                $GLOBALS['request']->GetURLtoSelf(array('sortby' => $sortby,
 102                                                                        'nocache' => '1')),
 103                                'class' => 'pagetitle',
 104                                'title' => sprintf(_("Sort by %s"), $this->_field)),
 105                          HTML::raw('&nbsp;'), HTML::u($this->_heading), HTML::raw('&nbsp;'));
 106         } else {
 107             $s = HTML(HTML::raw('&nbsp;'), HTML::u($this->_heading), HTML::raw('&nbsp;'));
 108         }
 109         return HTML::th(array('align' => 'center'),$s);
 110     }
 111
 112     // new grid-style sortable heading
 113     // see activeui.js
 114     function button_heading ($pagelist, $colNum) {
 115         global $WikiTheme, $request;
 116         // allow sorting?
 117         if (1 /* or in_array($this->_field, PageList::sortable_columns()) */) {
 118             // multiple comma-delimited sortby args: "+hits,+pagename"
 119             $src = false;
 120             $noimg_src = $WikiTheme->getButtonURL('no_order');
 121             if ($noimg_src)
 122                 $noimg = HTML::img(array('src' => $noimg_src,
 123                                          'width' => '7',
 124                                          'height' => '7',
 125                                          'border' => 0,
 126                                          'alt'    => '.'));
 127             else
 128                 $noimg = HTML::raw('&nbsp;');
 129             if ($request->getArg('sortby')) {
 130                 if ($pagelist->sortby($colNum, 'check')) { // show icon?
 131                     $sortby = $pagelist->sortby($request->getArg('sortby'), 'flip_order');
 132                     //$request->setArg('sortby', $sortby);
 133                     $desc = (substr($sortby,0,1) == '-'); // asc or desc? (+pagename, -pagename)
 134                     $src = $WikiTheme->getButtonURL($desc ? 'asc_order' : 'desc_order');
 135                 } else {
 136                     $sortby = $pagelist->sortby($colNum, 'init');
 137                 }
 138             } else {
 139                 $sortby = $pagelist->sortby($colNum, 'init');
 140             }
 141             if (!$src) {
 142                 $img = $noimg;
 143                 //$img->setAttr('alt', _("Click to sort"));
 144             } else {
 145                 $img = HTML::img(array('src' => $src,
 146                                        'width' => '7',
 147                                        'height' => '7',
 148                                        'border' => 0,
 149                                        'alt' => _("Click to reverse sort order")));
 150             }
 151             $s = HTML::a(array('href' =>
 152                                //Fixme: pass all also other GET args along. (limit is ok, p[])
 153                                //Fixme: convert to POST submit[sortby]
 154                                $request->GetURLtoSelf(array('sortby' => $sortby,
 155                                                             /*'nocache' => '1'*/)),
 156                                'class' => 'gridbutton',
 157                                'title' => sprintf(_("Click to sort by %s"), $this->_field)),
 158                          HTML::raw('&nbsp;'),
 159                          $noimg,
 160                          HTML::raw('&nbsp;'),
 161                          $this->_heading,
 162                          HTML::raw('&nbsp;'),
 163                          $img,
 164                          HTML::raw('&nbsp;'));
 165         } else {
 166             $s = HTML(HTML::raw('&nbsp;'), $this->_heading, HTML::raw('&nbsp;'));
 167         }
 168         return HTML::th(array('align' => 'center', 'valign' => 'middle',
 169                               'class' => 'gridbutton'), $s);
 170     }
 171
 172     /**
 173      * Take two columns of this type and compare them.
 174      * An undefined value is defined to be < than the smallest defined value.
 175      * This base class _compare only works if the value is simple (e.g., a number).
 176      *
 177      * @param  $colvala  $this->_getValue() of column a
 178      * @param  $colvalb  $this->_getValue() of column b
 179      *
 180      * @return -1 if $a < $b, 1 if $a > $b, 0 otherwise.
 181      */
 182     function _compare($colvala, $colvalb) {
 183         if (is_string($colvala))
 184             return strcmp($colvala,$colvalb);
 185         $ret = 0;
 186         if (($colvala === $colvalb) || (!isset($colvala) && !isset($colvalb))) {
 187             ;
 188         } else {
 189             $ret = (!isset($colvala) || ($colvala < $colvalb)) ? -1 : 1;
 190         }
 191         return $ret;
 192     }
 193 };
 194
 195 class _PageList_Column extends _PageList_Column_base {
 196     function _PageList_Column ($field, $default_heading, $align = false) {
 197         $this->_PageList_Column_base($default_heading, $align);
 198
 199         $this->_need_rev = substr($field, 0, 4) == 'rev:';
 200         $this->_iscustom = substr($field, 0, 7) == 'custom:';
 201         if ($this->_iscustom) {
 202             $this->_field = substr($field, 7);
 203         }
 204         elseif ($this->_need_rev)
 205             $this->_field = substr($field, 4);
 206         else
 207             $this->_field = $field;
 208     }
 209
 210     function _getValue ($page_handle, &$revision_handle) {
 211         if ($this->_need_rev) {
 212             if (!$revision_handle)
 213                 // columns which need the %content should override this. (size, hi_content)
 214                 $revision_handle = $page_handle->getCurrentRevision(false);
 215             return $revision_handle->get($this->_field);
 216         }
 217         else {
 218             return $page_handle->get($this->_field);
 219         }
 220     }
 221
 222     function _getSortableValue ($page_handle, &$revision_handle) {
 223         $val = $this->_getValue($page_handle, $revision_handle);
 224         if ($this->_field == 'hits')
 225             return (int) $val;
 226         elseif (is_object($val))
 227             return $val->asString();
 228         else
 229             return (string) $val;
 230     }
 231 };
 232
 233 /* overcome a call_user_func limitation by not being able to do:
 234  * call_user_func_array(array(&$class, $class_name), $params);
 235  * So we need $class = new $classname($params);
 236  * And we add a 4th param to get at the parent $pagelist object
 237  */
 238 class _PageList_Column_custom extends _PageList_Column {
 239     function _PageList_Column_custom($params) {
 240         $this->_pagelist =& $params[3];
 241         $this->_PageList_Column($params[0], $params[1], $params[2]);
 242     }
 243 }
 244
 245 class _PageList_Column_size extends _PageList_Column {
 246     function format (&$pagelist, $page_handle, &$revision_handle) {
 247         return HTML::td($this->_tdattr,
 248                         HTML::raw('&nbsp;'),
 249                         $this->_getValue($pagelist, $page_handle, $revision_handle),
 250                         HTML::raw('&nbsp;'));
 251     }
 252
 253     function _getValue (&$pagelist, $page_handle, &$revision_handle) {
 254         if (!$revision_handle or (!$revision_handle->_data['%content']
 255                                   or $revision_handle->_data['%content'] === true)) {
 256             $revision_handle = $page_handle->getCurrentRevision(true);
 257             unset($revision_handle->_data['%pagedata']['_cached_html']);
 258         }
 259         $size = $this->_getSize($revision_handle);
 260         // we can safely purge the content when it is not sortable
 261         if (empty($pagelist->_sortby[$this->_field]))
 262             unset($revision_handle->_data['%content']);
 263         return $size;
 264     }
 265
 266     function _getSortableValue ($page_handle, &$revision_handle) {
 267         if (!$revision_handle)
 268             $revision_handle = $page_handle->getCurrentRevision(true);
 269         return (empty($revision_handle->_data['%content']))
 270                ? 0 : strlen($revision_handle->_data['%content']);
 271     }
 272
 273     function _getSize($revision_handle) {
 274         $bytes = @strlen($revision_handle->_data['%content']);
 275         return ByteFormatter($bytes);
 276     }
 277 }
 278
 279
 280 class _PageList_Column_bool extends _PageList_Column {
 281     function _PageList_Column_bool ($field, $default_heading, $text = 'yes') {
 282         $this->_PageList_Column($field, $default_heading, 'center');
 283         $this->_textIfTrue = $text;
 284         $this->_textIfFalse = new RawXml('&#8212;'); //mdash
 285     }
 286
 287     function _getValue ($page_handle, &$revision_handle) {
 288         //FIXME: check if $this is available in the parent (->need_rev)
 289         $val = _PageList_Column::_getValue($page_handle, $revision_handle);
 290         return $val ? $this->_textIfTrue : $this->_textIfFalse;
 291     }
 292 };
 293
 294 class _PageList_Column_checkbox extends _PageList_Column {
 295     function _PageList_Column_checkbox ($field, $default_heading, $name='p') {
 296         $this->_name = $name;
 297         $heading = HTML::input(array('type'  => 'button',
 298                                      'title' => _("Click to de-/select all pages"),
 299                                      //'width' => '100%',
 300                                      'name'  => $default_heading,
 301                                      'value' => $default_heading,
 302                                      'onclick' => "flipAll(this.form)"
 303                                      ));
 304         $this->_PageList_Column($field, $heading, 'center');
 305     }
 306     function _getValue ($pagelist, $page_handle, &$revision_handle) {
 307         $pagename = $page_handle->getName();
 308         $selected = !empty($pagelist->_selected[$pagename]);
 309         if (strstr($pagename,'[') or strstr($pagename,']')) {
 310             $pagename = str_replace(array('[',']'),array('%5B','%5D'),$pagename);
 311         }
 312         if ($selected) {
 313             return HTML::input(array('type' => 'checkbox',
 314                                      'name' => $this->_name . "[$pagename]",
 315                                      'value' => 1,
 316                                      'checked' => 'CHECKED'));
 317         } else {
 318             return HTML::input(array('type' => 'checkbox',
 319                                      'name' => $this->_name . "[$pagename]",
 320                                      'value' => 1));
 321         }
 322     }
 323     function format ($pagelist, $page_handle, &$revision_handle) {
 324         return HTML::td($this->_tdattr,
 325                         HTML::raw('&nbsp;'),
 326                         $this->_getValue($pagelist, $page_handle, $revision_handle),
 327                         HTML::raw('&nbsp;'));
 328     }
 329     // don't sort this javascript button
 330     function button_heading ($pagelist, $colNum) {
 331         $s = HTML(HTML::raw('&nbsp;'), $this->_heading, HTML::raw('&nbsp;'));
 332         return HTML::th(array('align' => 'center', 'valign' => 'middle',
 333                               'class' => 'gridbutton'), $s);
 334     }
 335 };
 336
 337 class _PageList_Column_time extends _PageList_Column {
 338     function _PageList_Column_time ($field, $default_heading) {
 339         $this->_PageList_Column($field, $default_heading, 'right');
 340         global $WikiTheme;
 341         $this->Theme = &$WikiTheme;
 342     }
 343
 344     function _getValue ($page_handle, &$revision_handle) {
 345         $time = _PageList_Column::_getValue($page_handle, $revision_handle);
 346         return $this->Theme->formatDateTime($time);
 347     }
 348 };
 349
 350 class _PageList_Column_version extends _PageList_Column {
 351     function _getValue ($page_handle, &$revision_handle) {
 352         if (!$revision_handle)
 353             $revision_handle = $page_handle->getCurrentRevision();
 354         return $revision_handle->getVersion();
 355     }
 356 };
 357
 358 // Output is hardcoded to limit of first 50 bytes. Otherwise
 359 // on very large Wikis this will fail if used with AllPages
 360 // (PHP memory limit exceeded)
 361 class _PageList_Column_content extends _PageList_Column {
 362     function _PageList_Column_content ($field, $default_heading, $align = false) {
 363         $this->_PageList_Column($field, $default_heading, $align);
 364         $this->bytes = 50;
 365         if ($field == 'content') {
 366             $this->_heading .= sprintf(_(" ... first %d bytes"),
 367                                        $this->bytes);
 368         } elseif ($field == 'hi_content') {
 369             global $HTTP_POST_VARS;
 370             if (!empty($HTTP_POST_VARS['admin_replace'])) {
 371                 $search = $HTTP_POST_VARS['admin_replace']['from'];
 372                 $this->_heading .= sprintf(_(" ... around %s"),
 373                                            '»'.$search.'«');
 374             }
 375         }
 376     }
 377
 378     function _getValue ($page_handle, &$revision_handle) {
 379         if (!$revision_handle or (!$revision_handle->_data['%content']
 380                                   or $revision_handle->_data['%content'] === true)) {
 381             $revision_handle = $page_handle->getCurrentRevision(true);
 382         }
 383         // Not sure why implode is needed here, I thought
 384         // getContent() already did this, but it seems necessary.
 385         $c = implode("\n", $revision_handle->getContent());
 386         if (empty($pagelist->_sortby[$this->_field]))
 387             unset($revision_handle->_data['%content']);
 388         if ($this->_field == 'hi_content') {
 389             global $HTTP_POST_VARS;
 390             unset($revision_handle->_data['%pagedata']['_cached_html']);
 391             $search = $HTTP_POST_VARS['admin_replace']['from'];
 392             if ($search and ($i = strpos($c,$search))) {
 393                 $l = strlen($search);
 394                 $j = max(0,$i - ($this->bytes / 2));
 395                 return HTML::div(array('style' => 'font-size:x-small'),
 396                                  HTML::div(array('class' => 'transclusion'),
 397                                            HTML::span(substr($c, $j, ($this->bytes / 2))),
 398                                            HTML::span(array("style"=>"background:yellow"),$search),
 399                                            HTML::span(substr($c, $i+$l, ($this->bytes / 2))))
 400                                  );
 401             } else {
 402                 $c = sprintf(_("%s not found"),
 403                              '»'.$search.'«');
 404                 return HTML::div(array('style' => 'font-size:x-small','align'=>'center'),
 405                                  $c);
 406             }
 407         } elseif (($len = strlen($c)) > $this->bytes) {
 408             $c = substr($c, 0, $this->bytes);
 409         }
 410         include_once('lib/BlockParser.php');
 411         // false --> don't bother processing hrefs for embedded WikiLinks
 412         $ct = TransformText($c, $revision_handle->get('markup'), false);
 413         if (empty($pagelist->_sortby[$this->_field]))
 414             unset($revision_handle->_data['%pagedata']['_cached_html']);
 415         return HTML::div(array('style' => 'font-size:x-small'),
 416                          HTML::div(array('class' => 'transclusion'), $ct),
 417                          // Don't show bytes here if size column present too
 418                          ($this->parent->_columns_seen['size'] or !$len) ? "" :
 419                            ByteFormatter($len, /*$longformat = */true));
 420     }
 421
 422     function _getSortableValue ($page_handle, &$revision_handle) {
 423         return substr(_PageList_Column::_getValue($page_handle, $revision_handle),0,50);
 424     }
 425 };
 426
 427 class _PageList_Column_author extends _PageList_Column {
 428     function _PageList_Column_author ($field, $default_heading, $align = false) {
 429         _PageList_Column::_PageList_Column($field, $default_heading, $align);
 430         $this->dbi =& $GLOBALS['request']->getDbh();
 431     }
 432
 433     function _getValue ($page_handle, &$revision_handle) {
 434         $author = _PageList_Column::_getValue($page_handle, $revision_handle);
 435         if (isWikiWord($author) && $this->dbi->isWikiPage($author))
 436             return WikiLink($author);
 437         else
 438             return $author;
 439     }
 440 };
 441
 442 class _PageList_Column_owner extends _PageList_Column_author {
 443     function _getValue ($page_handle, &$revision_handle) {
 444         $author = $page_handle->getOwner();
 445         if (isWikiWord($author) && $this->dbi->isWikiPage($author))
 446             return WikiLink($author);
 447         else
 448             return $author;
 449     }
 450 };
 451
 452 class _PageList_Column_creator extends _PageList_Column_author {
 453     function _getValue ($page_handle, &$revision_handle) {
 454         $author = $page_handle->getCreator();
 455         if (isWikiWord($author) && $this->dbi->isWikiPage($author))
 456             return WikiLink($author);
 457         else
 458             return $author;
 459     }
 460 };
 461
 462 class _PageList_Column_pagename extends _PageList_Column_base {
 463     var $_field = 'pagename';
 464
 465     function _PageList_Column_pagename () {
 466         $this->_PageList_Column_base(_("Page Name"));
 467         global $request;
 468         $this->dbi = &$request->getDbh();
 469     }
 470
 471     function _getValue ($page_handle, &$revision_handle) {
 472         if ($this->dbi->isWikiPage($page_handle->getName()))
 473             return WikiLink($page_handle, 'known');
 474         else
 475             return WikiLink($page_handle, 'unknown');
 476     }
 477
 478     function _getSortableValue ($page_handle, &$revision_handle) {
 479         return $page_handle->getName();
 480     }
 481
 482     /**
 483      * Compare two pagenames for sorting.  See _PageList_Column::_compare.
 484      **/
 485     function _compare($colvala, $colvalb) {
 486         return strcmp($colvala, $colvalb);
 487     }
 488 };
 489
 490 class PageList {
 491     var $_group_rows = 3;
 492     var $_columns = array();
 493     var $_columnsMap = array();      // Maps column name to column number.
 494     var $_excluded_pages = array();
 495     var $_pages = array();
 496     var $_caption = "";
 497     var $_pagename_seen = false;
 498     var $_types = array();
 499     var $_options = array();
 500     var $_selected = array();
 501     var $_sortby = array();
 502     var $_maxlen = 0;
 503
 504     function PageList ($columns = false, $exclude = false, $options = false) {
 505         if ($options)
 506             $this->_options = $options;
 507
 508         // let plugins predefine only certain objects, such its own custom pagelist columns
 509         if (!empty($this->_options['types'])) {
 510             $this->_types = $this->_options['types'];
 511             unset($this->_options['types']);
 512         }
 513         $this->_initAvailableColumns();
 514         $symbolic_columns =
 515             array(
 516                   'all' =>  array_diff(array_keys($this->_types), // all but...
 517                                        array('checkbox','remove','renamed_pagename',
 518                                              'content','hi_content','perm','acl')),
 519                   'most' => array('pagename','mtime','author','hits'),
 520                   'some' => array('pagename','mtime','author')
 521                   );
 522         if ($columns) {
 523             if (!is_array($columns))
 524                 $columns = explode(',', $columns);
 525             // expand symbolic columns:
 526             foreach ($symbolic_columns as $symbol => $cols) {
 527                 if (in_array($symbol,$columns)) { // e.g. 'checkbox,all'
 528                     $columns = array_diff(array_merge($columns,$cols),array($symbol));
 529                 }
 530             }
 531             if (!in_array('pagename',$columns))
 532                 $this->_addColumn('pagename');
 533             foreach ($columns as $col) {
 534                 $this->_addColumn($col);
 535             }
 536         }
 537         // If 'pagename' is already present, _addColumn() will not add it again
 538         $this->_addColumn('pagename');
 539
 540         foreach (array('sortby','limit','paging','count','dosort') as $key) {
 541           if (!empty($options) and !empty($options[$key])) {
 542             $this->_options[$key] = $options[$key];
 543           } else {
 544             $this->_options[$key] = $GLOBALS['request']->getArg($key);
 545           }
 546         }
 547         $this->_options['sortby'] = $this->sortby($this->_options['sortby'], 'init');
 548         if ($exclude) {
 549             if (is_string($exclude) and !is_array($exclude))
 550                 $exclude = $this->explodePageList($exclude, false,
 551                                                   $this->_options['sortby'],
 552                                                   $this->_options['limit']);
 553             $this->_excluded_pages = $exclude;
 554         }
 555         $this->_messageIfEmpty = _("<no matches>");
 556     }
 557
 558     // Currently PageList takes these arguments:
 559     // 1: info, 2: exclude, 3: hash of options
 560     // Here we declare which options are supported, so that
 561     // the calling plugin may simply merge this with its own default arguments
 562     function supportedArgs () {
 563         return array(// Currently supported options:
 564                      /* what columns, what pages */
 565                      'info'     => 'pagename',
 566                      'exclude'  => '',          // also wildcards, comma-seperated lists
 567                                                 // and <!plugin-list !> arrays
 568                      /* select pages by meta-data: */
 569                      'author'   => false, // current user by []
 570                      'owner'    => false, // current user by []
 571                      'creator'  => false, // current user by []
 572
 573                      /* for the sort buttons in <th> */
 574                      'sortby'   => '', // same as for WikiDB::getAllPages
 575                                        // (unsorted is faster)
 576
 577                      /* PageList pager options:
 578                       * These options may also be given to _generate(List|Table) later
 579                       * But limit and offset might help the query WikiDB::getAllPages()
 580                       */
 581                      'limit'    => 0,       // number of rows (pagesize)
 582                      'paging'   => 'auto',  // 'auto'   top + bottom rows if applicable
 583                      //                     // 'top'    top only if applicable
 584                      //                     // 'bottom' bottom only if applicable
 585                      //                     // 'none'   don't page at all
 586                      // (TODO: clarify what if $paging==false ?)
 587
 588                      /* list-style options (with single pagename column only so far) */
 589                      'cols'     => 1,       // side-by-side display of list (1-3)
 590                      'azhead'   => 0,       // 1: group by initials
 591                                             // 2: provide shortcut links to initials also
 592                      'comma'    => 0,       // condensed comma-seperated list,
 593                                             // 1 if without links, 2 if with
 594                      'commasep' => false,   // Default: ', '
 595                      'ordered'  => false,   // OL or just UL lists (ignored for comma)
 596                      );
 597     }
 598
 599     function setCaption ($caption_string) {
 600         $this->_caption = $caption_string;
 601     }
 602
 603     function getCaption () {
 604         // put the total into the caption if needed
 605         if (is_string($this->_caption) && strstr($this->_caption, '%d'))
 606             return sprintf($this->_caption, $this->getTotal());
 607         return $this->_caption;
 608     }
 609
 610     function setMessageIfEmpty ($msg) {
 611         $this->_messageIfEmpty = $msg;
 612     }
 613
 614
 615     function getTotal () {
 616         return !empty($this->_options['count'])
 617                ? (integer) $this->_options['count'] : count($this->_pages);
 618     }
 619
 620     function isEmpty () {
 621         return empty($this->_pages);
 622     }
 623
 624     function addPage($page_handle) {
 625         if (!empty($this->_excluded_pages)) {
 626             if (!in_array((is_string($page_handle) ? $page_handle : $page_handle->getName()),
 627                           $this->_excluded_pages))
 628                 $this->_pages[] = $page_handle;
 629         } else {
 630             $this->_pages[] = $page_handle;
 631         }
 632     }
 633
 634     function _getPageFromHandle($page_handle) {
 635         if (is_string($page_handle)) {
 636             if (empty($page_handle)) return $page_handle;
 637             //$dbi = $GLOBALS['request']->getDbh(); // no, safe memory!
 638             $page_handle = $GLOBALS['request']->_dbi->getPage($page_handle);
 639         }
 640         return $page_handle;
 641     }
 642
 643     /**
 644      * Take a PageList_Page object, and return an HTML object to display
 645      * it in a table or list row.
 646      */
 647     function _renderPageRow (&$page_handle, $i = 0) {
 648         $page_handle = $this->_getPageFromHandle($page_handle);
 649         //FIXME. only on sf.net
 650         if (!is_object($page_handle)) {
 651             trigger_error("PageList: Invalid page_handle $page_handle", E_USER_WARNING);
 652             return;
 653         }
 654         if (!isset($page_handle)
 655             or empty($page_handle)
 656             or (!empty($this->_excluded_pages)
 657                 and in_array($page_handle->getName(), $this->_excluded_pages)))
 658             return; // exclude page.
 659
 660         // enforce view permission
 661         if (!mayAccessPage('view', $page_handle->getName()))
 662             return;
 663
 664         $group = (int)($i / $this->_group_rows);
 665         $class = ($group % 2) ? 'oddrow' : 'evenrow';
 666         $revision_handle = false;
 667         $this->_maxlen = max($this->_maxlen, strlen($page_handle->getName()));
 668
 669         if (count($this->_columns) > 1) {
 670             $row = HTML::tr(array('class' => $class));
 671             foreach ($this->_columns as $col)
 672                 $row->pushContent($col->format($this, $page_handle, $revision_handle));
 673         } else {
 674             $col = $this->_columns[0];
 675             $row = $col->_getValue($page_handle, $revision_handle);
 676         }
 677
 678         return $row;
 679     }
 680
 681     function addPages ($page_iter) {
 682         //Todo: if limit check max(strlen(pagename))
 683         while ($page = $page_iter->next()) {
 684             $this->addPage($page);
 685         }
 686     }
 687
 688     function addPageList (&$list) {
 689         if (empty($list)) return;  // Protect reset from a null arg
 690         foreach ($list as $page) {
 691             if (is_object($page))
 692                 $page = $page->_pagename;
 693             $this->addPage((string)$page);
 694         }
 695     }
 696
 697     function maxLen() {
 698         global $request;
 699         $dbi =& $request->getDbh();
 700         if (isa($dbi,'WikiDB_SQL')) {
 701             extract($dbi->_backend->_table_names);
 702             $res = $dbi->_backend->_dbh->getOne("SELECT max(length(pagename)) FROM $page_tbl");
 703             if (DB::isError($res) || empty($res)) return false;
 704             else return $res;
 705         } elseif (isa($dbi,'WikiDB_ADODB')) {
 706             extract($dbi->_backend->_table_names);
 707             $row = $dbi->_backend->_dbh->getRow("SELECT max(length(pagename)) FROM $page_tbl");
 708             return $row ? $row[0] : false;
 709         } else
 710             return false;
 711     }
 712
 713     function getContent() {
 714         // Note that the <caption> element wants inline content.
 715         $caption = $this->getCaption();
 716
 717         if ($this->isEmpty())
 718             return $this->_emptyList($caption);
 719         elseif (count($this->_columns) == 1)
 720             return $this->_generateList($caption);
 721         else
 722             return $this->_generateTable($caption);
 723     }
 724
 725     function printXML() {
 726         PrintXML($this->getContent());
 727     }
 728
 729     function asXML() {
 730         return AsXML($this->getContent());
 731     }
 732
 733     /**
 734      * Handle sortby requests for the DB iterator and table header links.
 735      * Prefix the column with + or - like "+pagename","-mtime", ...
 736      *
 737      * Supported actions:
 738      *   'init'       :   unify with predefined order. "pagename" => "+pagename"
 739      *   'flip_order' :   "mtime" => "+mtime" => "-mtime" ...
 740      *   'db'         :   "-pagename" => "pagename DESC"
 741      *   'check'      :
 742      *
 743      * Now all columns are sortable. (patch by DanFr)
 744      * Some columns have native DB backend methods, some not.
 745      */
 746     function sortby ($column, $action, $valid_fields=false) {
 747         global $request;
 748
 749         if (empty($column)) return '';
 750         if (is_int($column)) {
 751             $column = $this->_columns[$column - 1]->_field;
 752             //$column = $col->_field;
 753         }
 754         //if (!is_string($column)) return '';
 755         // support multiple comma-delimited sortby args: "+hits,+pagename"
 756         // recursive concat
 757         if (strstr($column, ',')) {
 758             $result = ($action == 'check') ? true : array();
 759             foreach (explode(',', $column) as $col) {
 760                 if ($action == 'check')
 761                     $result = $result && $this->sortby($col, $action, $valid_fields);
 762                 else
 763                     $result[] = $this->sortby($col, $action, $valid_fields);
 764             }
 765             // 'check' returns true/false for every col. return true if all are true.
 766             // i.e. the unsupported 'every' operator in functional languages.
 767             if ($action == 'check')
 768                 return $result;
 769             else
 770                 return join(",", $result);
 771         }
 772         if (substr($column,0,1) == '+') {
 773             $order = '+'; $column = substr($column,1);
 774         } elseif (substr($column,0,1) == '-') {
 775             $order = '-'; $column = substr($column,1);
 776         }
 777         // default initial order: +pagename, -mtime, -hits
 778         if (empty($order))
 779             if (in_array($column, array('mtime','hits')))
 780                 $order = '-';
 781             else
 782                 $order = '+';
 783         if ($action == 'flip_order') {
 784             return ($order == '+' ? '-' : '+') . $column;
 785         } elseif ($action == 'init') {
 786             $this->_sortby[$column] = $order;
 787             return $order . $column;
 788         } elseif ($action == 'check') {
 789             return (!empty($this->_sortby[$column])
 790                     or ($request->getArg('sortby')
 791                         and strstr($request->getArg('sortby'),$column)));
 792         } elseif ($action == 'db') {
 793             // Performance enhancement: use native DB sort if possible.
 794             if (($valid_fields and in_array($column, $valid_fields))
 795                 or (method_exists($request->_dbi->_backend, 'sortable_columns')
 796                     and (in_array($column, $request->_dbi->_backend->sortable_columns())))) {
 797                 // omit this sort method from the _sortPages call at rendering
 798                 // asc or desc: +pagename, -pagename
 799                 return $column . ($order == '+' ? ' ASC' : ' DESC');
 800             } else {
 801                 return '';
 802             }
 803         }
 804         return '';
 805     }
 806
 807     // echo implode(":",explodeList("Test*",array("xx","Test1","Test2")));
 808     function explodePageList($input, $include_empty=false, $sortby=false,
 809                              $limit=false, $exclude=false)
 810     {
 811         if (empty($input)) return array();
 812         // expand wildcards from list of all pages
 813         if (preg_match('/[\?\*]/', $input)) {
 814             $dbi = $GLOBALS['request']->getDbh();
 815             // $dbi->titleSearch($input);
 816             //TODO: need an SQL optimization here
 817             $allPagehandles = $dbi->getAllPages($include_empty, $sortby, $limit,
 818                                                 $exclude);
 819             while ($pagehandle = $allPagehandles->next()) {
 820                 $allPages[] = $pagehandle->getName();
 821             }
 822             return explodeList($input, $allPages);
 823         } else {
 824             //TODO: do the sorting, normally not needed if used for exclude only
 825             return explode(',',$input);
 826         }
 827     }
 828
 829     function allPagesByAuthor($wildcard, $include_empty=false, $sortby=false,
 830                               $limit=false, $exclude=false) {
 831         $dbi = $GLOBALS['request']->getDbh();
 832         $allPagehandles = $dbi->getAllPages($include_empty, $sortby, $limit, $exclude);
 833         $allPages = array();
 834         if ($wildcard === '[]') {
 835             $wildcard = $GLOBALS['request']->_user->getAuthenticatedId();
 836             if (!$wildcard) return $allPages;
 837         }
 838         $do_glob = preg_match('/[\?\*]/', $wildcard);
 839         while ($pagehandle = $allPagehandles->next()) {
 840             $name = $pagehandle->getName();
 841             $author = $pagehandle->getAuthor();
 842             if ($author) {
 843                 if ($do_glob) {
 844                     if (glob_match($wildcard, $author))
 845                         $allPages[] = $name;
 846                 } elseif ($wildcard == $author) {
 847                       $allPages[] = $name;
 848                 }
 849             }
 850             // TODO: purge versiondata_cache
 851         }
 852         return $allPages;
 853     }
 854
 855     function allPagesByOwner($wildcard, $include_empty=false, $sortby=false,
 856                              $limit=false, $exclude=false) {
 857         $dbi = $GLOBALS['request']->getDbh();
 858         $allPagehandles = $dbi->getAllPages($include_empty, $sortby, $limit, $exclude);
 859         $allPages = array();
 860         if ($wildcard === '[]') {
 861             $wildcard = $GLOBALS['request']->_user->getAuthenticatedId();
 862             if (!$wildcard) return $allPages;
 863         }
 864         $do_glob = preg_match('/[\?\*]/', $wildcard);
 865         while ($pagehandle = $allPagehandles->next()) {
 866             $name = $pagehandle->getName();
 867             $owner = $pagehandle->getOwner();
 868             if ($owner) {
 869                 if ($do_glob) {
 870                     if (glob_match($wildcard, $owner))
 871                         $allPages[] = $name;
 872                 } elseif ($wildcard == $owner) {
 873                       $allPages[] = $name;
 874                 }
 875             }
 876         }
 877         return $allPages;
 878     }
 879
 880     function allPagesByCreator($wildcard, $include_empty=false, $sortby=false,
 881                                $limit=false, $exclude=false) {
 882         $dbi = $GLOBALS['request']->getDbh();
 883         $allPagehandles = $dbi->getAllPages($include_empty, $sortby, $limit, $exclude);
 884         $allPages = array();
 885         if ($wildcard === '[]') {
 886             $wildcard = $GLOBALS['request']->_user->getAuthenticatedId();
 887             if (!$wildcard) return $allPages;
 888         }
 889         $do_glob = preg_match('/[\?\*]/', $wildcard);
 890         while ($pagehandle = $allPagehandles->next()) {
 891             $name = $pagehandle->getName();
 892             $creator = $pagehandle->getCreator();
 893             if ($creator) {
 894                 if ($do_glob) {
 895                     if (glob_match($wildcard, $creator))
 896                         $allPages[] = $name;
 897                 } elseif ($wildcard == $creator) {
 898                       $allPages[] = $name;
 899                 }
 900             }
 901         }
 902         return $allPages;
 903     }
 904
 905     ////////////////////
 906     // private
 907     ////////////////////
 908     /** Plugin and theme hooks:
 909      *  If the pageList is initialized with $options['types'] these types are also initialized,
 910      *  overriding the standard types.
 911      */
 912     function _initAvailableColumns() {
 913         global $customPageListColumns;
 914         $standard_types =
 915             array(
 916                   'content'
 917                   => new _PageList_Column_content('rev:content', _("Content")),
 918                   // new: plugin specific column types initialised by the relevant plugins
 919                   /*
 920                   'hi_content' // with highlighted search for SearchReplace
 921                   => new _PageList_Column_content('rev:hi_content', _("Content")),
 922                   'remove'
 923                   => new _PageList_Column_remove('remove', _("Remove")),
 924                   // initialised by the plugin
 925                   'renamed_pagename'
 926                   => new _PageList_Column_renamed_pagename('rename', _("Rename to")),
 927                   'perm'
 928                   => new _PageList_Column_perm('perm', _("Permission")),
 929                   'acl'
 930                   => new _PageList_Column_acl('acl', _("ACL")),
 931                   */
 932                   'checkbox'
 933                   => new _PageList_Column_checkbox('p', _("Select")),
 934                   'pagename'
 935                   => new _PageList_Column_pagename,
 936                   'mtime'
 937                   => new _PageList_Column_time('rev:mtime', _("Last Modified")),
 938                   'hits'
 939                   => new _PageList_Column('hits', _("Hits"), 'right'),
 940                   'size'
 941                   => new _PageList_Column_size('rev:size', _("Size"), 'right'),
 942                                               /*array('align' => 'char', 'char' => ' ')*/
 943                   'summary'
 944                   => new _PageList_Column('rev:summary', _("Last Summary")),
 945                   'version'
 946                   => new _PageList_Column_version('rev:version', _("Version"),
 947                                                  'right'),
 948                   'author'
 949                   => new _PageList_Column_author('rev:author', _("Last Author")),
 950                   'owner'
 951                   => new _PageList_Column_owner('author_id', _("Owner")),
 952                   'creator'
 953                   => new _PageList_Column_creator('author_id', _("Creator")),
 954                   /*
 955                   'group'
 956                   => new _PageList_Column_author('group', _("Group")),
 957                   */
 958                   'locked'
 959                   => new _PageList_Column_bool('locked', _("Locked"),
 960                                                _("locked")),
 961                   'minor'
 962                   => new _PageList_Column_bool('rev:is_minor_edit',
 963                                                _("Minor Edit"), _("minor")),
 964                   'markup'
 965                   => new _PageList_Column('rev:markup', _("Markup")),
 966                   // 'rating' initialised by the wikilens theme hook: addPageListColumn
 967                   /*
 968                   'rating'
 969                   => new _PageList_Column_rating('rating', _("Rate")),
 970                   */
 971                   );
 972         if (empty($this->_types))
 973             $this->_types = array();
 974         // add plugin specific pageList columns, initialized by $options['types']
 975         $this->_types = array_merge($standard_types, $this->_types);
 976         // add theme custom specific pageList columns:
 977         //   set the 4th param as the current pagelist object.
 978         if (!empty($customPageListColumns)) {
 979             foreach ($customPageListColumns as $column => $params) {
 980                 $class_name = array_shift($params);
 981                 $params[3] =& $this;
 982                 $class = new $class_name($params);
 983                 $this->_types[$column] =& $class;
 984             }
 985         }
 986     }
 987
 988     function getOption($option) {
 989         if (array_key_exists($option, $this->_options)) {
 990             return $this->_options[$option];
 991         }
 992         else {
 993             return null;
 994         }
 995     }
 996
 997     /**
 998      * Add a column to this PageList, given a column name.
 999      * The name is a type, and optionally has a : and a label. Examples:
1000      *
1001      *   pagename
1002      *   pagename:This page
1003      *   mtime
1004      *   mtime:Last modified
1005      *
1006      * If this function is called multiple times for the same type, the
1007      * column will only be added the first time, and ignored the succeeding times.
1008      * If you wish to add multiple columns of the same type, use addColumnObject().
1009      *
1010      * @param column name
1011      * @return  true if column is added, false otherwise
1012      */
1013     function _addColumn ($column) {
1014
1015         if (isset($this->_columns_seen[$column]))
1016             return false;       // Already have this one.
1017         if (!isset($this->_types[$column]))
1018             $this->_initAvailableColumns();
1019         $this->_columns_seen[$column] = true;
1020
1021         if (strstr($column, ':'))
1022             list ($column, $heading) = explode(':', $column, 2);
1023
1024         // FIXME: these column types have hooks (objects) elsewhere
1025         // Omitting this warning should be overridable by the extension
1026         if (!isset($this->_types[$column])) {
1027             $silently_ignore = array('numbacklinks',
1028                                      'rating',/*'ratingwidget',*/
1029                                      'coagreement', 'minmisery',
1030                                      /*'prediction',*/
1031                                      'averagerating', 'top3recs');
1032             if (!in_array($column, $silently_ignore))
1033                 trigger_error(sprintf("%s: Bad column", $column), E_USER_NOTICE);
1034             return false;
1035         }
1036         // FIXME: anon users might rate and see ratings also.
1037         // Defer this logic to the plugin.
1038         if ($column == 'rating' and !$GLOBALS['request']->_user->isSignedIn())
1039             return false;
1040
1041         $this->addColumnObject($this->_types[$column]);
1042
1043         return true;
1044     }
1045
1046     /**
1047      * Add a column to this PageList, given a column object.
1048      *
1049      * @param $col object   An object derived from _PageList_Column.
1050      **/
1051     function addColumnObject($col) {
1052         if (is_array($col)) {// custom column object
1053             $params =& $col;
1054             $class_name = array_shift($params);
1055             $params[3] =& $this;
1056             $col = new $class_name($params);
1057         }
1058         $heading = $col->getHeading();
1059         if (!empty($heading))
1060             $col->setHeading($heading);
1061
1062         $this->_columns[] = $col;
1063         $this->_columnsMap[$col->_field] = count($this->_columns); // start with 1
1064     }
1065
1066     /**
1067      * Compare _PageList_Page objects.
1068      **/
1069     function _pageCompare(&$a, &$b) {
1070         if (empty($this->_sortby) or count($this->_sortby) == 0) {
1071             // No columns to sort by
1072             return 0;
1073         }
1074         else {
1075             $pagea = $this->_getPageFromHandle($a);  // If a string, convert to page
1076             assert(isa($pagea, 'WikiDB_Page'));
1077             $pageb = $this->_getPageFromHandle($b);  // If a string, convert to page
1078             assert(isa($pageb, 'WikiDB_Page'));
1079             foreach ($this->_sortby as $colNum => $direction) {
1080                 if (!is_int($colNum)) // or column fieldname
1081                     $colNum = $this->_columnsMap[$colNum];
1082                 $col = $this->_columns[$colNum - 1];
1083
1084                 assert(isset($col));
1085                 $revision_handle = false;
1086                 $aval = $col->_getSortableValue($pagea, $revision_handle);
1087                 $bval = $col->_getSortableValue($pageb, $revision_handle);
1088
1089                 $cmp = $col->_compare($aval, $bval);
1090                 if ($direction === "-")  // Reverse the sense of the comparison
1091                     $cmp *= -1;
1092
1093                 if ($cmp !== 0)
1094                     // This is the first comparison that is not equal-- go with it
1095                     return $cmp;
1096             }
1097             return 0;
1098         }
1099     }
1100
1101     /**
1102      * Put pages in order according to the sortby arg, if given
1103      * If the sortby cols are already sorted by the DB call, don't do usort.
1104      * TODO: optimize for multiple sortable cols
1105      */
1106     function _sortPages() {
1107         if (count($this->_sortby) > 0) {
1108             $need_sort = $this->_options['dosort'];
1109             foreach ($this->_sortby as $col => $dir) {
1110                 if (! $this->sortby($col, 'db'))
1111                     $need_sort = true;
1112             }
1113             if ($need_sort) { // There are some columns to sort by
1114                 usort($this->_pages, array($this, '_pageCompare'));
1115             }
1116         }
1117         //unset($GLOBALS['PhpWiki_pagelist']);
1118     }
1119
1120     function limit($limit) {
1121         if (is_array($limit)) return $limit;
1122         if (strstr($limit, ','))
1123             return split(',', $limit);
1124         else
1125             return array(0, $limit);
1126     }
1127
1128     function pagingTokens($numrows = false, $ncolumns = false, $limit = false) {
1129         if ($numrows === false)
1130             $numrows = $this->getTotal();
1131         if ($limit === false)
1132             $limit = $this->_options['limit'];
1133         if ($ncolumns === false)
1134             $ncolumns = count($this->_columns);
1135
1136         list($offset, $pagesize) = $this->limit($limit);
1137         if (!$pagesize or
1138             (!$offset and $numrows <= $pagesize) or
1139             ($offset + $pagesize < 0))
1140             return false;
1141
1142         $request = &$GLOBALS['request'];
1143         $pagename = $request->getArg('pagename');
1144         $defargs = $request->args;
1145         if (USE_PATH_INFO) unset($defargs['pagename']);
1146         if ($defargs['action'] == 'browse') unset($defargs['action']);
1147         $prev = $defargs;
1148
1149         $tokens = array();
1150         $tokens['PREV'] = false; $tokens['PREV_LINK'] = "";
1151         $tokens['COLS'] = count($this->_columns);
1152         $tokens['COUNT'] = $numrows;
1153         $tokens['OFFSET'] = $offset;
1154         $tokens['SIZE'] = $pagesize;
1155         $tokens['NUMPAGES'] = (int)($numrows / $pagesize)+1;
1156         $tokens['ACTPAGE'] = (int) (($offset+1) / $pagesize)+1;
1157         if ($offset > 0) {
1158             $prev['limit'] = max(0, $offset - $pagesize) . ",$pagesize";
1159             $prev['count'] = $numrows;
1160             $tokens['LIMIT'] = $prev['limit'];
1161             $tokens['PREV'] = true;
1162             $tokens['PREV_LINK'] = WikiURL($pagename, $prev);
1163             $prev['limit'] = "0,$pagesize";
1164             $tokens['FIRST_LINK'] = WikiURL($pagename, $prev);
1165         }
1166         $next = $defargs;
1167         $tokens['NEXT'] = false; $tokens['NEXT_LINK'] = "";
1168         if ($offset + $pagesize < $numrows) {
1169             $next['limit'] = min($offset + $pagesize, $numrows - $pagesize) . ",$pagesize";
1170             $next['count'] = $numrows;
1171             $tokens['LIMIT'] = $next['limit'];
1172             $tokens['NEXT'] = true;
1173             $tokens['NEXT_LINK'] = WikiURL($pagename, $next);
1174             $next['limit'] = $numrows - $pagesize . ",$pagesize";
1175             $tokens['LAST_LINK'] = WikiURL($pagename, $next);
1176         }
1177         return $tokens;
1178     }
1179
1180     // make a table given the caption
1181     function _generateTable($caption) {
1182         if (count($this->_sortby) > 0) $this->_sortPages();
1183
1184         $rows = array(); $i = 0;
1185         foreach ($this->_pages as $pagenum => $page) {
1186             $rows[] = $this->_renderPageRow($page, $i++);
1187         }
1188
1189         $table = HTML::table(array('cellpadding' => 0,
1190                                    'cellspacing' => 1,
1191                                    'border'      => 0,
1192                                    'class'       => 'pagelist'));
1193         if ($caption)
1194             $table->pushContent(HTML::caption(array('align'=>'top'), $caption));
1195
1196         //Warning: This is quite fragile. It depends solely on a private variable
1197         //         in ->_addColumn()
1198         if (!empty($this->_columns_seen['checkbox'])) {
1199             $table->pushContent($this->_jsFlipAll());
1200         }
1201         $do_paging = ( isset($this->_options['paging'])
1202                        and !empty($this->_options['limit'])
1203                        and $this->getTotal()
1204                        and $this->_options['paging'] != 'none' );
1205         $row = HTML::tr();
1206         $table_summary = array();
1207         $i = 1; // start with 1!
1208         foreach ($this->_columns as $col) {
1209             $heading = $col->button_heading($this, $i);
1210             if ( $do_paging
1211                  and isset($col->_field)
1212                  and $col->_field == 'pagename'
1213                  and ($maxlen = $this->maxLen())) {
1214                $heading->setAttr('width', $maxlen * 7);
1215             }
1216             $row->pushContent($heading);
1217             if (is_string($col->getHeading()))
1218                 $table_summary[] = $col->getHeading();
1219             $i++;
1220         }
1221         // Table summary for non-visual browsers.
1222         $table->setAttr('summary', sprintf(_("Columns: %s."),
1223                                            join(", ", $table_summary)));
1224         $table->pushContent(HTML::colgroup(array('span' => count($this->_columns))));
1225         if ( $do_paging ) {
1226             $tokens = $this->pagingTokens($this->getTotal(),
1227                                            count($this->_columns),
1228                                            $this->_options['limit']);
1229             if ($tokens === false) {
1230                 $table->pushContent(HTML::thead($row),
1231                                     HTML::tbody(false, $rows));
1232                 return $table;
1233             }
1234
1235             $paging = Template("pagelink", $tokens);
1236             if ($this->_options['paging'] != 'bottom')
1237                 $table->pushContent(HTML::thead($paging));
1238             $table->pushContent(HTML::tbody(false, HTML($row, $rows)));
1239             if ($this->_options['paging'] != 'top')
1240                 $table->pushContent(HTML::tfoot($paging));
1241             return $table;
1242         } else {
1243             $table->pushContent(HTML::thead($row),
1244                                 HTML::tbody(false, $rows));
1245             return $table;
1246         }
1247     }
1248
1249     function _jsFlipAll() {
1250       return JavaScript("
1251 function flipAll(formObj) {
1252   var isFirstSet = -1;
1253   for (var i=0; i < formObj.length; i++) {
1254       fldObj = formObj.elements[i];
1255       if ((fldObj.type == 'checkbox') && (fldObj.name.substring(0,2) == 'p[')) {
1256          if (isFirstSet == -1)
1257            isFirstSet = (fldObj.checked) ? true : false;
1258          fldObj.checked = (isFirstSet) ? false : true;
1259        }
1260    }
1261 }");
1262     }
1263
1264     /* recursive stack for private sublist options (azhead, cols) */
1265     function _saveOptions($opts) {
1266         $stack = array('pages' => $this->_pages);
1267         foreach ($opts as $k => $v) {
1268             $stack[$k] = $this->_options[$k];
1269             $this->_options[$k] = $v;
1270         }
1271         if (empty($this->_stack))
1272             $this->_stack = new Stack();
1273         $this->_stack->push($stack);
1274     }
1275     function _restoreOptions() {
1276         assert($this->_stack);
1277         $stack = $this->_stack->pop();
1278         $this->_pages = $stack['pages'];
1279         unset($stack['pages']);
1280         foreach ($stack as $k => $v) {
1281             $this->_options[$k] = $v;
1282         }
1283     }
1284
1285     // 'cols'   - split into several columns
1286     // 'azhead' - support <h3> grouping into initials
1287     // 'ordered' - OL or UL list (not yet inherited to all plugins)
1288     // 'comma'  - condensed comma-list only, 1: no links, >1: with links
1289     function _generateList($caption='') {
1290         if (empty($this->_pages)) return; // stop recursion
1291         $out = HTML();
1292         if ($caption)
1293             $out->pushContent(HTML::p($caption));
1294
1295         // need a recursive switch here for the azhead and cols grouping.
1296         if (!empty($this->_options['cols']) and $this->_options['cols'] > 1) {
1297             $count = count($this->_pages);
1298             $length = $count / $this->_options['cols'];
1299             $width = sprintf("%d", 100 / $this->_options['cols']).'%';
1300             $cols = HTML::tr(array('valign' => 'top'));
1301             for ($i=0; $i < $count; $i += $length) {
1302                 $this->_saveOptions(array('cols' => 0));
1303                 $this->_pages = array_slice($this->_pages, $i, $length);
1304                 $cols->pushContent(HTML::td(/*array('width' => $width),*/
1305                                             $this->_generateList()));
1306                 $this->_restoreOptions();
1307             }
1308             // speed up table rendering by defining colgroups
1309             $out->pushContent(HTML::table(HTML::colgroup(array('span' => $this->_options['cols'],
1310                                                                'width' => $width)),
1311                                           $cols));
1312             return $out;
1313         }
1314
1315         // Ignore azhead if not sorted by pagename
1316         if (!empty($this->_options['azhead'])
1317             and strstr($this->sortby($this->_options['sortby'], 'init'), "pagename")
1318             )
1319         {
1320             $cur_h = substr($this->_pages[0]->getName(), 0, 1);
1321             $out->pushContent(HTML::h3($cur_h));
1322             // group those pages together with same $h
1323             $j = 0;
1324             for ($i=0; $i < count($this->_pages); $i++) {
1325                 $page =& $this->_pages[$i];
1326                 $h = substr($page->getName(), 0, 1);
1327                 if ($h != $cur_h and $i > $j) {
1328                     $this->_saveOptions(array('cols' => 0, 'azhead' => 0));
1329                     $this->_pages = array_slice($this->_pages, $j, $i - $j);
1330                     $out->pushContent($this->_generateList());
1331                     $this->_restoreOptions();
1332                     $j = $i;
1333                     $out->pushContent(HTML::h3($h));
1334                     $cur_h = $h;
1335                 }
1336             }
1337             if ($i > $j) { // flush the rest
1338                 $this->_saveOptions(array('cols' => 0, 'azhead' => 0));
1339                 $this->_pages = array_slice($this->_pages, $j, $i - $j);
1340                 $out->pushContent($this->_generateList());
1341                 $this->_restoreOptions();
1342             }
1343             return $out;
1344         }
1345
1346         if (!empty($this->_options['comma'])) {
1347             if ($this->_options['comma'] == 1)
1348                 $out->pushContent($this->_generateCommaListAsString());
1349             else
1350                 $out->pushContent($this->_generateCommaList($this->_options['comma']));
1351             return $out;
1352         }
1353
1354         $do_paging = ( isset($this->_options['paging'])
1355                        and !empty($this->_options['limit'])
1356                        and $this->getTotal()
1357                        and $this->_options['paging'] != 'none' );
1358         if ( $do_paging ) {
1359             $tokens = $this->pagingTokens($this->getTotal(),
1360                                            count($this->_columns),
1361                                            $this->_options['limit']);
1362             if ($tokens) {
1363                 $paging = Template("pagelink", $tokens);
1364                 $out->pushContent(HTML::table($paging));
1365             }
1366         }
1367         if (!empty($this->_options['ordered']))
1368             $list = HTML::ol(array('class' => 'pagelist'));
1369         else
1370             $list = HTML::ul(array('class' => 'pagelist'));
1371         $i = 0;
1372         //TODO: currently we ignore limit here and hope tha the backend didn't ignore it. (BackLinks)
1373         if (!empty($this->_options['limit']))
1374             list($offset, $pagesize) = $this->limit($this->_options['limit']);
1375         else $pagesize=0;
1376         foreach ($this->_pages as $pagenum => $page) {
1377             $pagehtml = $this->_renderPageRow($page);
1378             $group = ($i++ / $this->_group_rows);
1379             //TODO: here we switch every row, in tables every third.
1380             //      unification or parametrized?
1381             $class = ($group % 2) ? 'oddrow' : 'evenrow';
1382             $list->pushContent(HTML::li(array('class' => $class), $pagehtml));
1383             if ($pagesize and $i > $pagesize) break;
1384         }
1385         $out->pushContent($list);
1386         if ( $do_paging and $tokens ) {
1387             $out->pushContent(HTML::table($paging));
1388         }
1389         return $out;
1390     }
1391
1392     // comma=1
1393     // Condense list without a href links: "Page1, Page2, ..."
1394     // Alternative $seperator = HTML::Raw(' &middot; ')
1395     function _generateCommaListAsString() {
1396         if (defined($this->_options['commasep']))
1397             $seperator = $this->_options['commasep'];
1398         else
1399             $seperator = ', ';
1400         $pages = array();
1401         foreach ($this->_pages as $pagenum => $page) {
1402             if ($s = $this->_renderPageRow($page)) // some pages are not viewable
1403                 $pages[] = is_string($s) ? $s : $s->asString();
1404         }
1405         return HTML(join($seperator, $pages));
1406     }
1407
1408     // comma=2
1409     // Normal WikiLink list.
1410     // Future: 1 = reserved for plain string (see above)
1411     //         2 and more => HTML link specialization?
1412     function _generateCommaList($style = false) {
1413         if (defined($this->_options['commasep']))
1414             $seperator = HTLM::Raw($this->_options['commasep']);
1415         else
1416             $seperator = ', ';
1417         $html = HTML();
1418         $html->pushContent($this->_renderPageRow($this->_pages[0]));
1419         next($this->_pages);
1420         foreach ($this->_pages as $pagenum => $page) {
1421             if ($s = $this->_renderPageRow($page)) // some pages are not viewable
1422                 $html->pushContent($seperator, $s);
1423         }
1424         return $html;
1425     }
1426
1427     function _emptyList($caption) {
1428         $html = HTML();
1429         if ($caption)
1430             $html->pushContent(HTML::p($caption));
1431         if ($this->_messageIfEmpty)
1432             $html->pushContent(HTML::blockquote(HTML::p($this->_messageIfEmpty)));
1433         return $html;
1434     }
1435
1436 };
1437
1438 /* List pages with checkboxes to select from.
1439  * The [Select] button toggles via _jsFlipAll
1440  */
1441
1442 class PageList_Selectable
1443 extends PageList {
1444
1445     function PageList_Selectable ($columns=false, $exclude=false, $options = false) {
1446         if ($columns) {
1447             if (!is_array($columns))
1448                 $columns = explode(',', $columns);
1449             if (!in_array('checkbox',$columns))
1450                 array_unshift($columns,'checkbox');
1451         } else {
1452             $columns = array('checkbox','pagename');
1453         }
1454         $this->PageList($columns, $exclude, $options);
1455     }
1456
1457     function addPageList ($array) {
1458         while (list($pagename,$selected) = each($array)) {
1459             if ($selected) $this->addPageSelected((string)$pagename);
1460             $this->addPage((string)$pagename);
1461         }
1462     }
1463
1464     function addPageSelected ($pagename) {
1465         $this->_selected[$pagename] = 1;
1466     }
1467 }
1468
1469 // $Log: not supported by cvs2svn $
1470 // Revision 1.131  2005/02/04 10:48:06  rurban
1471 // fix usort ref warning. Thanks to Charles Corrigan
1472 //
1473 // Revision 1.130  2005/01/28 12:07:36  rurban
1474 // reformatting
1475 //
1476 // Revision 1.129  2005/01/25 06:58:21  rurban
1477 // reformatting
1478 //
1479 // Revision 1.128  2004/12/26 17:31:35  rurban
1480 // fixed prev link logic
1481 //
1482 // Revision 1.127  2004/12/26 17:19:28  rurban
1483 // dont break sideeffecting sortby flips on paging urls (MostPopular)
1484 //
1485 // Revision 1.126  2004/12/16 18:26:57  rurban
1486 // Avoid double calculation
1487 //
1488 // Revision 1.125  2004/11/25 17:20:49  rurban
1489 // and again a couple of more native db args: backlinks
1490 //
1491 // Revision 1.124  2004/11/23 15:17:14  rurban
1492 // better support for case_exact search (not caseexact for consistency),
1493 // plugin args simplification:
1494 //   handle and explode exclude and pages argument in WikiPlugin::getArgs
1495 //     and exclude in advance (at the sql level if possible)
1496 //   handle sortby and limit from request override in WikiPlugin::getArgs
1497 // ListSubpages: renamed pages to maxpages
1498 //
1499 // Revision 1.123  2004/11/23 13:35:31  rurban
1500 // add case_exact search
1501 //
1502 // Revision 1.122  2004/11/21 11:59:15  rurban
1503 // remove final \n to be ob_cache independent
1504 //
1505 // Revision 1.121  2004/11/20 17:35:47  rurban
1506 // improved WantedPages SQL backends
1507 // PageList::sortby new 3rd arg valid_fields (override db fields)
1508 // WantedPages sql pager inexact for performance reasons:
1509 //   assume 3 wantedfrom per page, to be correct, no getTotal()
1510 // support exclude argument for get_all_pages, new _sql_set()
1511 //
1512 // Revision 1.120  2004/11/20 11:28:49  rurban
1513 // fix a yet unused PageList customPageListColumns bug (merge class not decl to _types)
1514 // change WantedPages to use PageList
1515 // change WantedPages to print the list of referenced pages, not just the count.
1516 //   the old version was renamed to WantedPagesOld
1517 //   fix and add handling of most standard PageList arguments (limit, exclude, ...)
1518 // TODO: pagename sorting, dumb/WantedPagesIter and SQL optimization
1519 //
1520 // Revision 1.119  2004/11/11 14:34:11  rurban
1521 // minor clarifications
1522 //
1523 // Revision 1.118  2004/11/01 10:43:55  rurban
1524 // seperate PassUser methods into seperate dir (memory usage)
1525 // fix WikiUser (old) overlarge data session
1526 // remove wikidb arg from various page class methods, use global ->_dbi instead
1527 // ...
1528 //
1529 // Revision 1.117  2004/10/14 21:06:01  rurban
1530 // fix dumphtml with USE_PATH_INFO (again). fix some PageList refs
1531 //
1532 // Revision 1.116  2004/10/14 19:19:33  rurban
1533 // loadsave: check if the dumped file will be accessible from outside.
1534 // and some other minor fixes. (cvsclient native not yet ready)
1535 //
1536 // Revision 1.115  2004/10/14 17:15:05  rurban
1537 // remove class _PageList_Page, fix sortby=0 (start with 1, use strings), fix _PageList_Column_content for old phps, hits as int
1538 //
1539 // Revision 1.114  2004/10/12 13:13:19  rurban
1540 // php5 compatibility (5.0.1 ok)
1541 //
1542 // Revision 1.113  2004/10/05 17:00:03  rurban
1543 // support paging for simple lists
1544 // fix RatingDb sql backend.
1545 // remove pages from AllPages (this is ListPages then)
1546 //
1547 // Revision 1.112  2004/10/04 23:39:58  rurban
1548 // list of page objects
1549 //
1550 // Revision 1.111  2004/09/24 18:50:45  rurban
1551 // fix paging of SqlResult
1552 //
1553 // Revision 1.110  2004/09/17 14:43:31  rurban
1554 // typo
1555 //
1556 // Revision 1.109  2004/09/17 14:22:10  rurban
1557 // update comments
1558 //
1559 // Revision 1.108  2004/09/17 12:46:22  rurban
1560 // seperate pagingTokens()
1561 // support new default args: comma (1 and 2), commasep, ordered, cols,
1562 //                           azhead (1 only)
1563 //
1564 // Revision 1.107  2004/09/14 10:29:08  rurban
1565 // exclude pages already in addPages to simplify plugins
1566 //
1567 // Revision 1.106  2004/09/06 10:22:14  rurban
1568 // oops, forgot global request
1569 //
1570 // Revision 1.105  2004/09/06 08:38:30  rurban
1571 // modularize paging helper (for SqlResult)
1572 //
1573 // Revision 1.104  2004/08/18 11:01:55  rurban
1574 // fixed checkbox list Select button:
1575 //   no GET request on click,
1576 //   only select the list checkbox entries, no other options.
1577 //
1578 // Revision 1.103  2004/07/09 10:06:49  rurban
1579 // Use backend specific sortby and sortable_columns method, to be able to
1580 // select between native (Db backend) and custom (PageList) sorting.
1581 // Fixed PageList::AddPageList (missed the first)
1582 // Added the author/creator.. name to AllPagesBy...
1583 //   display no pages if none matched.
1584 // Improved dba and file sortby().
1585 // Use &$request reference
1586 //
1587 // Revision 1.102  2004/07/08 21:32:35  rurban
1588 // Prevent from more warnings, minor db and sort optimizations
1589 //
1590 // Revision 1.101  2004/07/08 19:04:41  rurban
1591 // more unittest fixes (file backend, metadata RatingsDb)
1592 //
1593 // Revision 1.100  2004/07/07 15:02:26  dfrankow
1594 // Take out if that prevents column sorting
1595 //
1596 // Revision 1.99  2004/07/02 18:49:02  dfrankow
1597 // Change one line so that if addPageList() is passed null, it is still
1598 // okay.  The unit tests do this (ask to list AllUsers where there are no
1599 // users, or something like that).
1600 //
1601 // Revision 1.98  2004/07/01 08:51:22  rurban
1602 // dumphtml: added exclude, print pagename before processing
1603 //
1604 // Revision 1.97  2004/06/29 09:11:10  rurban
1605 // More memory optimization:
1606 //   don't cache unneeded _cached_html and %content for content and size columns
1607 //   (only if sortable, which will fail for too many pages)
1608 //
1609 // Revision 1.96  2004/06/29 08:47:42  rurban
1610 // Memory optimization (reference to parent, smart bool %content)
1611 // Fixed class grouping in table
1612 //
1613 // Revision 1.95  2004/06/28 19:00:01  rurban
1614 // removed non-portable LIMIT 1 (it's getOne anyway)
1615 // removed size from info=most: needs to much memory
1616 //
1617 // Revision 1.94  2004/06/27 10:26:02  rurban
1618 // oci8 patch by Philippe Vanhaesendonck + some ADODB notes+fixes
1619 //
1620 // Revision 1.93  2004/06/25 14:29:17  rurban
1621 // WikiGroup refactoring:
1622 //   global group attached to user, code for not_current user.
1623 //   improved helpers for special groups (avoid double invocations)
1624 // new experimental config option ENABLE_XHTML_XML (fails with IE, and document.write())
1625 // fixed a XHTML validation error on userprefs.tmpl
1626 //
1627 // Revision 1.92  2004/06/21 17:01:39  rurban
1628 // fix typo and rating method call
1629 //
1630 // Revision 1.91  2004/06/21 16:22:29  rurban
1631 // add DEFAULT_DUMP_DIR and HTML_DUMP_DIR constants, for easier cmdline dumps,
1632 // fixed dumping buttons locally (images/buttons/),
1633 // support pages arg for dumphtml,
1634 // optional directory arg for dumpserial + dumphtml,
1635 // fix a AllPages warning,
1636 // show dump warnings/errors on DEBUG,
1637 // don't warn just ignore on wikilens pagelist columns, if not loaded.
1638 // RateIt pagelist column is called "rating", not "ratingwidget" (Dan?)
1639 //
1640 // Revision 1.90  2004/06/18 14:38:21  rurban
1641 // adopt new PageList style
1642 //
1643 // Revision 1.89  2004/06/17 13:16:08  rurban
1644 // apply wikilens work to PageList: all columns are sortable (slightly fixed)
1645 //
1646 // Revision 1.88  2004/06/14 11:31:35  rurban
1647 // renamed global $Theme to $WikiTheme (gforge nameclash)
1648 // inherit PageList default options from PageList
1649 //   default sortby=pagename
1650 // use options in PageList_Selectable (limit, sortby, ...)
1651 // added action revert, with button at action=diff
1652 // added option regex to WikiAdminSearchReplace
1653 //
1654 // Revision 1.87  2004/06/13 16:02:12  rurban
1655 // empty list of pages if user=[] and not authenticated.
1656 //
1657 // Revision 1.86  2004/06/13 15:51:37  rurban
1658 // Support pagelist filter for current author,owner,creator by []
1659 //
1660 // Revision 1.85  2004/06/13 15:33:19  rurban
1661 // new support for arguments owner, author, creator in most relevant
1662 // PageList plugins. in WikiAdmin* via preSelectS()
1663 //
1664 // Revision 1.84  2004/06/08 13:51:56  rurban
1665 // some comments only
1666 //
1667 // Revision 1.83  2004/05/18 13:35:39  rurban
1668 //  improve Pagelist layout by equal pagename width for limited lists
1669 //
1670 // Revision 1.82  2004/05/16 22:07:35  rurban
1671 // check more config-default and predefined constants
1672 // various PagePerm fixes:
1673 //   fix default PagePerms, esp. edit and view for Bogo and Password users
1674 //   implemented Creator and Owner
1675 //   BOGOUSERS renamed to BOGOUSER
1676 // fixed syntax errors in signin.tmpl
1677 //
1678 // Revision 1.81  2004/05/13 12:30:35  rurban
1679 // fix for MacOSX border CSS attr, and if sort buttons are not found
1680 //
1681 // Revision 1.80  2004/04/20 00:56:00  rurban
1682 // more paging support and paging fix for shorter lists
1683 //
1684 // Revision 1.79  2004/04/20 00:34:16  rurban
1685 // more paging support
1686 //
1687 // Revision 1.78  2004/04/20 00:06:03  rurban
1688 // themable paging support
1689 //
1690 // Revision 1.77  2004/04/18 01:11:51  rurban
1691 // more numeric pagename fixes.
1692 // fixed action=upload with merge conflict warnings.
1693 // charset changed from constant to global (dynamic utf-8 switching)
1694 //
1695
1696 // (c-file-style: "gnu")
1697 // Local Variables:
1698 // mode: php
1699 // tab-width: 8
1700 // c-basic-offset: 4
1701 // c-hanging-comment-ender-p: nil
1702 // indent-tabs-mode: nil
1703 // End:
1704 ?>