lib/WikiDB.php

   1 <?php //-*-php-*-
   2 rcs_id('$Id: WikiDB.php,v 1.112 2004-11-30 17:45:53 rurban Exp $');
   3
   4 require_once('lib/PageType.php');
   5
   6 /**
   7  * The classes in the file define the interface to the
   8  * page database.
   9  *
  10  * @package WikiDB
  11  * @author Geoffrey T. Dairiki <dairiki@dairiki.org>
  12  *         Reini Urban
  13  */
  14
  15 /**
  16  * Force the creation of a new revision.
  17  * @see WikiDB_Page::createRevision()
  18  */
  19 if (!defined('WIKIDB_FORCE_CREATE'))
  20     define('WIKIDB_FORCE_CREATE', -1);
  21
  22 /**
  23  * Abstract base class for the database used by PhpWiki.
  24  *
  25  * A <tt>WikiDB</tt> is a container for <tt>WikiDB_Page</tt>s which in
  26  * turn contain <tt>WikiDB_PageRevision</tt>s.
  27  *
  28  * Conceptually a <tt>WikiDB</tt> contains all possible
  29  * <tt>WikiDB_Page</tt>s, whether they have been initialized or not.
  30  * Since all possible pages are already contained in a WikiDB, a call
  31  * to WikiDB::getPage() will never fail (barring bugs and
  32  * e.g. filesystem or SQL database problems.)
  33  *
  34  * Also each <tt>WikiDB_Page</tt> always contains at least one
  35  * <tt>WikiDB_PageRevision</tt>: the default content (e.g. "Describe
  36  * [PageName] here.").  This default content has a version number of
  37  * zero.
  38  *
  39  * <tt>WikiDB_PageRevision</tt>s have read-only semantics. One can
  40  * only create new revisions or delete old ones --- one can not modify
  41  * an existing revision.
  42  */
  43 class WikiDB {
  44     /**
  45      * Open a WikiDB database.
  46      *
  47      * This is a static member function. This function inspects its
  48      * arguments to determine the proper subclass of WikiDB to
  49      * instantiate, and then it instantiates it.
  50      *
  51      * @access public
  52      *
  53      * @param hash $dbparams Database configuration parameters.
  54      * Some pertinent paramters are:
  55      * <dl>
  56      * <dt> dbtype
  57      * <dd> The back-end type.  Current supported types are:
  58      *   <dl>
  59      *   <dt> SQL
  60      *     <dd> Generic SQL backend based on the PEAR/DB database abstraction
  61      *       library. (More stable and conservative)
  62      *   <dt> ADODB
  63      *     <dd> Another generic SQL backend. (More current features are tested here. Much faster)
  64      *   <dt> dba
  65      *     <dd> Dba based backend. The default and by far the fastest.
  66      *   <dt> cvs
  67      *     <dd>
  68      *   <dt> file
  69      *     <dd> flat files
  70      *   </dl>
  71      *
  72      * <dt> dsn
  73      * <dd> (Used by the SQL and ADODB backends.)
  74      *      The DSN specifying which database to connect to.
  75      *
  76      * <dt> prefix
  77      * <dd> Prefix to be prepended to database tables (and file names).
  78      *
  79      * <dt> directory
  80      * <dd> (Used by the dba backend.)
  81      *      Which directory db files reside in.
  82      *
  83      * <dt> timeout
  84      * <dd> Used only by the dba backend so far.
  85      *      And: When optimizing mysql it closes timed out mysql processes.
  86      *      otherwise only used for dba: Timeout in seconds for opening (and
  87      *      obtaining lock) on the dbm file.
  88      *
  89      * <dt> dba_handler
  90      * <dd> (Used by the dba backend.)
  91      *
  92      *      Which dba handler to use. Good choices are probably either
  93      *      'gdbm' or 'db2'.
  94      * </dl>
  95      *
  96      * @return WikiDB A WikiDB object.
  97      **/
  98     function open ($dbparams) {
  99         $dbtype = $dbparams{'dbtype'};
 100         include_once("lib/WikiDB/$dbtype.php");
 101
 102         $class = 'WikiDB_' . $dbtype;
 103         return new $class ($dbparams);
 104     }
 105
 106
 107     /**
 108      * Constructor.
 109      *
 110      * @access private
 111      * @see open()
 112      */
 113     function WikiDB (&$backend, $dbparams) {
 114         $this->_backend = &$backend;
 115         // don't do the following with the auth_dsn!
 116         if (isset($dbparams['auth_dsn'])) return;
 117
 118         $this->_cache = new WikiDB_cache($backend);
 119         $GLOBALS['request']->_dbi = $this;
 120
 121         // If the database doesn't yet have a timestamp, initialize it now.
 122         if ($this->get('_timestamp') === false)
 123             $this->touch();
 124
 125         //FIXME: devel checking.
 126         //$this->_backend->check();
 127     }
 128
 129     /**
 130      * Get any user-level warnings about this WikiDB.
 131      *
 132      * Some back-ends, e.g. by default create there data files in the
 133      * global /tmp directory. We would like to warn the user when this
 134      * happens (since /tmp files tend to get wiped periodically.)
 135      * Warnings such as these may be communicated from specific
 136      * back-ends through this method.
 137      *
 138      * @access public
 139      *
 140      * @return string A warning message (or <tt>false</tt> if there is
 141      * none.)
 142      */
 143     function genericWarnings() {
 144         return false;
 145     }
 146
 147     /**
 148      * Close database connection.
 149      *
 150      * The database may no longer be used after it is closed.
 151      *
 152      * Closing a WikiDB invalidates all <tt>WikiDB_Page</tt>s,
 153      * <tt>WikiDB_PageRevision</tt>s and <tt>WikiDB_PageIterator</tt>s
 154      * which have been obtained from it.
 155      *
 156      * @access public
 157      */
 158     function close () {
 159         $this->_backend->close();
 160         $this->_cache->close();
 161     }
 162
 163     /**
 164      * Get a WikiDB_Page from a WikiDB.
 165      *
 166      * A {@link WikiDB} consists of the (infinite) set of all possible pages,
 167      * therefore this method never fails.
 168      *
 169      * @access public
 170      * @param string $pagename Which page to get.
 171      * @return WikiDB_Page The requested WikiDB_Page.
 172      */
 173     function getPage($pagename) {
 174         static $error_displayed = false;
 175         $pagename = (string) $pagename;
 176         if (DEBUG) {
 177             if ($pagename === '') {
 178                 if ($error_displayed) return false;
 179                 $error_displayed = true;
 180                 if (function_exists("xdebug_get_function_stack"))
 181                     var_dump(xdebug_get_function_stack());
 182                 trigger_error("empty pagename", E_USER_WARNING);
 183                 return false;
 184             }
 185         } else {
 186             assert($pagename != '');
 187         }
 188         return new WikiDB_Page($this, $pagename);
 189     }
 190
 191     /**
 192      * Determine whether page exists (in non-default form).
 193      *
 194      * <pre>
 195      *   $is_page = $dbi->isWikiPage($pagename);
 196      * </pre>
 197      * is equivalent to
 198      * <pre>
 199      *   $page = $dbi->getPage($pagename);
 200      *   $current = $page->getCurrentRevision();
 201      *   $is_page = ! $current->hasDefaultContents();
 202      * </pre>
 203      * however isWikiPage may be implemented in a more efficient
 204      * manner in certain back-ends.
 205      *
 206      * @access public
 207      *
 208      * @param string $pagename string Which page to check.
 209      *
 210      * @return boolean True if the page actually exists with
 211      * non-default contents in the WikiDataBase.
 212      */
 213     function isWikiPage ($pagename) {
 214         $page = $this->getPage($pagename);
 215         return $page->exists();
 216     }
 217
 218     /**
 219      * Delete page from the WikiDB.
 220      *
 221      * Deletes all revisions of the page from the WikiDB. Also resets
 222      * all page meta-data to the default values.
 223      *
 224      * @access public
 225      *
 226      * @param string $pagename Name of page to delete.
 227      */
 228     function deletePage($pagename) {
 229         $this->_cache->delete_page($pagename);
 230
 231         /* Generate notification emails? */
 232         if (! $this->isWikiPage($pagename) ) {
 233             $notify = $this->get('notify');
 234             if (!empty($notify) and is_array($notify)) {
 235                 //TODO: deferr it (quite a massive load if you remove some pages).
 236                 //TODO: notification class which catches all changes,
 237                 //  and decides at the end of the request what to mail. (type, page, who, what, users, emails)
 238                 // could be used for PageModeration also.
 239                 $page = new WikiDB_Page($this, $pagename);
 240                 list($emails, $userids) = $page->getPageChangeEmails($notify);
 241                 if (!empty($emails)) {
 242                     $editedby = sprintf(_("Removed by: %s"), $GLOBALS['request']->_user->getId()); // Todo: host_id
 243                     $emails = join(',', $emails);
 244                     $subject = sprintf(_("Page deleted %s"), urlencode($pagename));
 245                     if (mail($emails,"[".WIKI_NAME."] ".$subject,
 246                              $subject."\n".
 247                              $editedby."\n\n".
 248                              "Deleted $pagename"))
 249                         trigger_error(sprintf(_("PageChange Notification of %s sent to %s"),
 250                                               $pagename, join(',',$userids)), E_USER_NOTICE);
 251                     else
 252                         trigger_error(sprintf(_("PageChange Notification Error: Couldn't send %s to %s"),
 253                                               $pagename, join(',',$userids)), E_USER_WARNING);
 254                 }
 255             }
 256         }
 257
 258         //How to create a RecentChanges entry with explaining summary? Dynamically
 259         /*
 260         $page = $this->getPage($pagename);
 261         $current = $page->getCurrentRevision();
 262         $meta = $current->_data;
 263         $version = $current->getVersion();
 264         $meta['summary'] = _("removed");
 265         $page->save($current->getPackedContent(), $version + 1, $meta);
 266         */
 267     }
 268
 269     /**
 270      * Retrieve all pages.
 271      *
 272      * Gets the set of all pages with non-default contents.
 273      *
 274      * @access public
 275      *
 276      * @param boolean $include_defaulted Normally pages whose most
 277      * recent revision has empty content are considered to be
 278      * non-existant. Unless $include_defaulted is set to true, those
 279      * pages will not be returned.
 280      *
 281      * @return WikiDB_PageIterator A WikiDB_PageIterator which contains all pages
 282      *     in the WikiDB which have non-default contents.
 283      */
 284     function getAllPages($include_empty=false, $sortby=false, $limit=false, $exclude=false) {
 285         // HACK: memory_limit=8M will fail on too large pagesets. old php on unix only!
 286         if (USECACHE) {
 287             $mem = ini_get("memory_limit");
 288             if ($mem and !$limit and !isWindows() and !check_php_version(4,3)) {
 289                 $limit = 450;
 290                 $GLOBALS['request']->setArg('limit',$limit);
 291                 $GLOBALS['request']->setArg('paging','auto');
 292             }
 293         }
 294         $result = $this->_backend->get_all_pages($include_empty, $sortby, $limit, $exclude);
 295         return new WikiDB_PageIterator($this, $result, array('include_empty' => $include_empty,
 296                                                              'exclude' => $exclude,
 297                                                              'limit' => $limit));
 298     }
 299
 300     /**
 301      * $include_empty = true: include also empty pages
 302      * exclude: comma-seperated list pagenames: TBD: array of pagenames
 303      */
 304     function numPages($include_empty=false, $exclude='') {
 305         if (method_exists($this->_backend, 'numPages'))
 306             // FIXME: currently are all args ignored.
 307             $count = $this->_backend->numPages($include_empty, $exclude);
 308         else {
 309             // FIXME: exclude ignored.
 310             $iter = $this->getAllPages($include_empty, false, false, $exclude);
 311             $count = $iter->count();
 312             $iter->free();
 313         }
 314         return (int)$count;
 315     }
 316
 317     /**
 318      * Title search.
 319      *
 320      * Search for pages containing (or not containing) certain words
 321      * in their names.
 322      *
 323      * Pages are returned in alphabetical order whenever it is
 324      * practical to do so.
 325      *
 326      * FIXME: clarify $search syntax. provide glob=>TextSearchQuery converters
 327      *
 328      * @access public
 329      * @param TextSearchQuery $search A TextSearchQuery object
 330      * @return WikiDB_PageIterator A WikiDB_PageIterator containing the matching pages.
 331      * @see TextSearchQuery
 332      */
 333     function titleSearch($search) {
 334         $result = $this->_backend->text_search($search, false);
 335         return new WikiDB_PageIterator($this, $result);
 336     }
 337
 338     /**
 339      * Full text search.
 340      *
 341      * Search for pages containing (or not containing) certain words
 342      * in their entire text (this includes the page content and the
 343      * page name).
 344      *
 345      * Pages are returned in alphabetical order whenever it is
 346      * practical to do so.
 347      *
 348      * @access public
 349      *
 350      * @param TextSearchQuery $search A TextSearchQuery object.
 351      * @return WikiDB_PageIterator A WikiDB_PageIterator containing the matching pages.
 352      * @see TextSearchQuery
 353      */
 354     function fullSearch($search) {
 355         $result = $this->_backend->text_search($search, true);
 356         return new WikiDB_PageIterator($this, $result);
 357     }
 358
 359     /**
 360      * Find the pages with the greatest hit counts.
 361      *
 362      * Pages are returned in reverse order by hit count.
 363      *
 364      * @access public
 365      *
 366      * @param integer $limit The maximum number of pages to return.
 367      * Set $limit to zero to return all pages.  If $limit < 0, pages will
 368      * be sorted in decreasing order of popularity.
 369      *
 370      * @return WikiDB_PageIterator A WikiDB_PageIterator containing the matching
 371      * pages.
 372      */
 373     function mostPopular($limit = 20, $sortby = '-hits') {
 374         $result = $this->_backend->most_popular($limit, $sortby);
 375         return new WikiDB_PageIterator($this, $result);
 376     }
 377
 378     /**
 379      * Find recent page revisions.
 380      *
 381      * Revisions are returned in reverse order by creation time.
 382      *
 383      * @access public
 384      *
 385      * @param hash $params This hash is used to specify various optional
 386      *   parameters:
 387      * <dl>
 388      * <dt> limit
 389      *    <dd> (integer) At most this many revisions will be returned.
 390      * <dt> since
 391      *    <dd> (integer) Only revisions since this time (unix-timestamp) will be returned.
 392      * <dt> include_minor_revisions
 393      *    <dd> (boolean) Also include minor revisions.  (Default is not to.)
 394      * <dt> exclude_major_revisions
 395      *    <dd> (boolean) Don't include non-minor revisions.
 396      *         (Exclude_major_revisions implies include_minor_revisions.)
 397      * <dt> include_all_revisions
 398      *    <dd> (boolean) Return all matching revisions for each page.
 399      *         Normally only the most recent matching revision is returned
 400      *         for each page.
 401      * </dl>
 402      *
 403      * @return WikiDB_PageRevisionIterator A WikiDB_PageRevisionIterator containing the
 404      * matching revisions.
 405      */
 406     function mostRecent($params = false) {
 407         $result = $this->_backend->most_recent($params);
 408         return new WikiDB_PageRevisionIterator($this, $result);
 409     }
 410
 411     /**
 412      * @access public
 413      *
 414      * @return Iterator A generic iterator containing rows of (duplicate) pagename, wantedfrom.
 415      */
 416     function wantedPages($exclude_from='', $exclude='', $sortby=false, $limit=false) {
 417         return $this->_backend->wanted_pages($exclude_from, $exclude, $sortby, $limit);
 418         //return new WikiDB_PageIterator($this, $result);
 419     }
 420
 421
 422     /**
 423      * Call the appropriate backend method.
 424      *
 425      * @access public
 426      * @param string $from Page to rename
 427      * @param string $to   New name
 428      * @param boolean $updateWikiLinks If the text in all pages should be replaced.
 429      * @return boolean     true or false
 430      */
 431     function renamePage($from, $to, $updateWikiLinks = false) {
 432         assert(is_string($from) && $from != '');
 433         assert(is_string($to) && $to != '');
 434         $result = false;
 435         if (method_exists($this->_backend, 'rename_page')) {
 436             $oldpage = $this->getPage($from);
 437             $newpage = $this->getPage($to);
 438             //update all WikiLinks in existing pages
 439             //non-atomic! i.e. if rename fails the links are not undone
 440             if ($updateWikiLinks) {
 441                 require_once('lib/plugin/WikiAdminSearchReplace.php');
 442                 $links = $oldpage->getBackLinks();
 443                 while ($linked_page = $links->next()) {
 444                     WikiPlugin_WikiAdminSearchReplace::replaceHelper($this,$linked_page->getName(),$from,$to);
 445                 }
 446                 $links = $newpage->getBackLinks();
 447                 while ($linked_page = $links->next()) {
 448                     WikiPlugin_WikiAdminSearchReplace::replaceHelper($this,$linked_page->getName(),$from,$to);
 449                 }
 450             }
 451             if ($oldpage->exists() and ! $newpage->exists()) {
 452                 if ($result = $this->_backend->rename_page($from, $to)) {
 453                     //create a RecentChanges entry with explaining summary
 454                     $page = $this->getPage($to);
 455                     $current = $page->getCurrentRevision();
 456                     $meta = $current->_data;
 457                     $version = $current->getVersion();
 458                     $meta['summary'] = sprintf(_("renamed from %s"), $from);
 459                     $page->save($current->getPackedContent(), $version + 1, $meta);
 460                 }
 461             } elseif (!$oldpage->getCurrentRevision(false) and !$newpage->exists()) {
 462                 // if a version 0 exists try it also.
 463                 $result = $this->_backend->rename_page($from, $to);
 464             }
 465         } else {
 466             trigger_error(_("WikiDB::renamePage() not yet implemented for this backend"),
 467                           E_USER_WARNING);
 468         }
 469         /* Generate notification emails? */
 470         if ($result) {
 471             $notify = $this->get('notify');
 472             if (!empty($notify) and is_array($notify)) {
 473                 list($emails, $userids) = $oldpage->getPageChangeEmails($notify);
 474                 if (!empty($emails)) {
 475                     $oldpage->sendPageRenameNotification($to, &$meta, $emails, $userids);
 476                 }
 477             }
 478         }
 479         return $result;
 480     }
 481
 482     /** Get timestamp when database was last modified.
 483      *
 484      * @return string A string consisting of two integers,
 485      * separated by a space.  The first is the time in
 486      * unix timestamp format, the second is a modification
 487      * count for the database.
 488      *
 489      * The idea is that you can cast the return value to an
 490      * int to get a timestamp, or you can use the string value
 491      * as a good hash for the entire database.
 492      */
 493     function getTimestamp() {
 494         $ts = $this->get('_timestamp');
 495         return sprintf("%d %d", $ts[0], $ts[1]);
 496     }
 497
 498     /**
 499      * Update the database timestamp.
 500      *
 501      */
 502     function touch() {
 503         $ts = $this->get('_timestamp');
 504         $this->set('_timestamp', array(time(), $ts[1] + 1));
 505     }
 506
 507
 508     /**
 509      * Access WikiDB global meta-data.
 510      *
 511      * NOTE: this is currently implemented in a hackish and
 512      * not very efficient manner.
 513      *
 514      * @access public
 515      *
 516      * @param string $key Which meta data to get.
 517      * Some reserved meta-data keys are:
 518      * <dl>
 519      * <dt>'_timestamp' <dd> Data used by getTimestamp().
 520      * </dl>
 521      *
 522      * @return scalar The requested value, or false if the requested data
 523      * is not set.
 524      */
 525     function get($key) {
 526         if (!$key || $key[0] == '%')
 527             return false;
 528         /*
 529          * Hack Alert: We can use any page (existing or not) to store
 530          * this data (as long as we always use the same one.)
 531          */
 532         $gd = $this->getPage('global_data');
 533         $data = $gd->get('__global');
 534
 535         if ($data && isset($data[$key]))
 536             return $data[$key];
 537         else
 538             return false;
 539     }
 540
 541     /**
 542      * Set global meta-data.
 543      *
 544      * NOTE: this is currently implemented in a hackish and
 545      * not very efficient manner.
 546      *
 547      * @see get
 548      * @access public
 549      *
 550      * @param string $key  Meta-data key to set.
 551      * @param string $newval  New value.
 552      */
 553     function set($key, $newval) {
 554         if (!$key || $key[0] == '%')
 555             return;
 556
 557         $gd = $this->getPage('global_data');
 558         $data = $gd->get('__global');
 559         if ($data === false)
 560             $data = array();
 561
 562         if (empty($newval))
 563             unset($data[$key]);
 564         else
 565             $data[$key] = $newval;
 566
 567         $gd->set('__global', $data);
 568     }
 569
 570     /* TODO: these are really backend methods */
 571
 572     // SQL result: for simple select or create/update queries
 573     // returns the database specific resource type
 574     function genericSqlQuery($sql) {
 575         if (function_exists('debug_backtrace')) { // >= 4.3.0
 576             echo "<pre>", printSimpleTrace(debug_backtrace()), "</pre>\n";
 577         }
 578         trigger_error("no SQL database", E_USER_ERROR);
 579         return false;
 580     }
 581
 582     // SQL iter: for simple select or create/update queries
 583     // returns the generic iterator object (count,next)
 584     function genericSqlIter($sql, $field_list = NULL) {
 585         if (function_exists('debug_backtrace')) { // >= 4.3.0
 586             echo "<pre>", printSimpleTrace(debug_backtrace()), "</pre>\n";
 587         }
 588         trigger_error("no SQL database", E_USER_ERROR);
 589         return false;
 590     }
 591
 592     // see backend upstream methods
 593     // ADODB adds surrounding quotes, SQL not yet!
 594     function quote ($s) {
 595         return $s;
 596     }
 597
 598     function isOpen () {
 599         global $request;
 600         if (!$request->_dbi) return false;
 601         else return false; /* so far only needed for sql so false it.
 602                             later we have to check dba also */
 603     }
 604
 605     function getParam($param) {
 606         global $DBParams;
 607         if (isset($DBParams[$param])) return $DBParams[$param];
 608         elseif ($param == 'prefix') return '';
 609         else return false;
 610     }
 611
 612     function getAuthParam($param) {
 613         global $DBAuthParams;
 614         if (isset($DBAuthParams[$param])) return $DBAuthParams[$param];
 615         elseif ($param == 'USER_AUTH_ORDER') return $GLOBALS['USER_AUTH_ORDER'];
 616         elseif ($param == 'USER_AUTH_POLICY') return $GLOBALS['USER_AUTH_POLICY'];
 617         else return false;
 618     }
 619 };
 620
 621
 622 /**
 623  * An abstract base class which representing a wiki-page within a
 624  * WikiDB.
 625  *
 626  * A WikiDB_Page contains a number (at least one) of
 627  * WikiDB_PageRevisions.
 628  */
 629 class WikiDB_Page
 630 {
 631     function WikiDB_Page(&$wikidb, $pagename) {
 632         $this->_wikidb = &$wikidb;
 633         $this->_pagename = $pagename;
 634         if (DEBUG) {
 635             if (!(is_string($pagename) and $pagename != '')) {
 636                 if (function_exists("xdebug_get_function_stack")) {
 637                     echo "xdebug_get_function_stack(): "; var_dump(xdebug_get_function_stack());
 638                 } elseif (function_exists("debug_backtrace")) { // >= 4.3.0
 639                     printSimpleTrace(debug_backtrace());
 640                 }
 641                 trigger_error("empty pagename", E_USER_WARNING);
 642                 return false;
 643             }
 644         } else
 645             assert(is_string($pagename) and $pagename != '');
 646     }
 647
 648     /**
 649      * Get the name of the wiki page.
 650      *
 651      * @access public
 652      *
 653      * @return string The page name.
 654      */
 655     function getName() {
 656         return $this->_pagename;
 657     }
 658
 659     // To reduce the memory footprint for larger sets of pagelists,
 660     // we don't cache the content (only true or false) and
 661     // we purge the pagedata (_cached_html) also
 662     function exists() {
 663         if (isset($this->_wikidb->_cache->_id_cache[$this->_pagename])) return true;
 664         $current = $this->getCurrentRevision(false);
 665         return ! $current->hasDefaultContents();
 666     }
 667
 668     /**
 669      * Delete an old revision of a WikiDB_Page.
 670      *
 671      * Deletes the specified revision of the page.
 672      * It is a fatal error to attempt to delete the current revision.
 673      *
 674      * @access public
 675      *
 676      * @param integer $version Which revision to delete.  (You can also
 677      *  use a WikiDB_PageRevision object here.)
 678      */
 679     function deleteRevision($version) {
 680         $backend = &$this->_wikidb->_backend;
 681         $cache = &$this->_wikidb->_cache;
 682         $pagename = &$this->_pagename;
 683
 684         $version = $this->_coerce_to_version($version);
 685         if ($version == 0)
 686             return;
 687
 688         $backend->lock(array('page','version'));
 689         $latestversion = $cache->get_latest_version($pagename);
 690         if ($latestversion && $version == $latestversion) {
 691             $backend->unlock(array('page','version'));
 692             trigger_error(sprintf("Attempt to delete most recent revision of '%s'",
 693                                   $pagename), E_USER_ERROR);
 694             return;
 695         }
 696
 697         $cache->delete_versiondata($pagename, $version);
 698         $backend->unlock(array('page','version'));
 699     }
 700
 701     /*
 702      * Delete a revision, or possibly merge it with a previous
 703      * revision.
 704      *
 705      * The idea is this:
 706      * Suppose an author make a (major) edit to a page.  Shortly
 707      * after that the same author makes a minor edit (e.g. to fix
 708      * spelling mistakes he just made.)
 709      *
 710      * Now some time later, where cleaning out old saved revisions,
 711      * and would like to delete his minor revision (since there's
 712      * really no point in keeping minor revisions around for a long
 713      * time.)
 714      *
 715      * Note that the text after the minor revision probably represents
 716      * what the author intended to write better than the text after
 717      * the preceding major edit.
 718      *
 719      * So what we really want to do is merge the minor edit with the
 720      * preceding edit.
 721      *
 722      * We will only do this when:
 723      * <ul>
 724      * <li>The revision being deleted is a minor one, and
 725      * <li>It has the same author as the immediately preceding revision.
 726      * </ul>
 727      */
 728     function mergeRevision($version) {
 729         $backend = &$this->_wikidb->_backend;
 730         $cache = &$this->_wikidb->_cache;
 731         $pagename = &$this->_pagename;
 732
 733         $version = $this->_coerce_to_version($version);
 734         if ($version == 0)
 735             return;
 736
 737         $backend->lock(array('version'));
 738         $latestversion = $cache->get_latest_version($pagename);
 739         if ($latestversion && $version == $latestversion) {
 740             $backend->unlock(array('version'));
 741             trigger_error(sprintf("Attempt to merge most recent revision of '%s'",
 742                                   $pagename), E_USER_ERROR);
 743             return;
 744         }
 745
 746         $versiondata = $cache->get_versiondata($pagename, $version, true);
 747         if (!$versiondata) {
 748             // Not there? ... we're done!
 749             $backend->unlock(array('version'));
 750             return;
 751         }
 752
 753         if ($versiondata['is_minor_edit']) {
 754             $previous = $backend->get_previous_version($pagename, $version);
 755             if ($previous) {
 756                 $prevdata = $cache->get_versiondata($pagename, $previous);
 757                 if ($prevdata['author_id'] == $versiondata['author_id']) {
 758                     // This is a minor revision, previous version is
 759                     // by the same author. We will merge the
 760                     // revisions.
 761                     $cache->update_versiondata($pagename, $previous,
 762                                                array('%content' => $versiondata['%content'],
 763                                                      '_supplanted' => $versiondata['_supplanted']));
 764                 }
 765             }
 766         }
 767
 768         $cache->delete_versiondata($pagename, $version);
 769         $backend->unlock(array('version'));
 770     }
 771
 772
 773     /**
 774      * Create a new revision of a {@link WikiDB_Page}.
 775      *
 776      * @access public
 777      *
 778      * @param int $version Version number for new revision.
 779      * To ensure proper serialization of edits, $version must be
 780      * exactly one higher than the current latest version.
 781      * (You can defeat this check by setting $version to
 782      * {@link WIKIDB_FORCE_CREATE} --- not usually recommended.)
 783      *
 784      * @param string $content Contents of new revision.
 785      *
 786      * @param hash $metadata Metadata for new revision.
 787      * All values in the hash should be scalars (strings or integers).
 788      *
 789      * @param array $links List of pagenames which this page links to.
 790      *
 791      * @return WikiDB_PageRevision  Returns the new WikiDB_PageRevision object. If
 792      * $version was incorrect, returns false
 793      */
 794     function createRevision($version, &$content, $metadata, $links) {
 795         $backend = &$this->_wikidb->_backend;
 796         $cache = &$this->_wikidb->_cache;
 797         $pagename = &$this->_pagename;
 798         $cache->invalidate_cache($pagename);
 799
 800         $backend->lock(array('version','page','recent','link','nonempty'));
 801
 802         $latestversion = $backend->get_latest_version($pagename);
 803         $newversion = ($latestversion ? $latestversion : 0) + 1;
 804         assert($newversion >= 1);
 805
 806         if ($version != WIKIDB_FORCE_CREATE and $version != $newversion) {
 807             $backend->unlock(array('version','page','recent','link','nonempty'));
 808             return false;
 809         }
 810
 811         $data = $metadata;
 812
 813         foreach ($data as $key => $val) {
 814             if (empty($val) || $key[0] == '_' || $key[0] == '%')
 815                 unset($data[$key]);
 816         }
 817
 818         assert(!empty($data['author']));
 819         if (empty($data['author_id']))
 820             @$data['author_id'] = $data['author'];
 821
 822         if (empty($data['mtime']))
 823             $data['mtime'] = time();
 824
 825         if ($latestversion) {
 826             // Ensure mtimes are monotonic.
 827             $pdata = $cache->get_versiondata($pagename, $latestversion);
 828             if ($data['mtime'] < $pdata['mtime']) {
 829                 trigger_error(sprintf(_("%s: Date of new revision is %s"),
 830                                       $pagename,"'non-monotonic'"),
 831                               E_USER_NOTICE);
 832                 $data['orig_mtime'] = $data['mtime'];
 833                 $data['mtime'] = $pdata['mtime'];
 834             }
 835
 836             // FIXME: use (possibly user specified) 'mtime' time or
 837             // time()?
 838             $cache->update_versiondata($pagename, $latestversion,
 839                                        array('_supplanted' => $data['mtime']));
 840         }
 841
 842         $data['%content'] = &$content;
 843
 844         $cache->set_versiondata($pagename, $newversion, $data);
 845
 846         //$cache->update_pagedata($pagename, array(':latestversion' => $newversion,
 847         //':deleted' => empty($content)));
 848
 849         $backend->set_links($pagename, $links);
 850
 851         $backend->unlock(array('version','page','recent','link','nonempty'));
 852
 853         return new WikiDB_PageRevision($this->_wikidb, $pagename, $newversion,
 854                                        $data);
 855     }
 856
 857     /** A higher-level interface to createRevision.
 858      *
 859      * This takes care of computing the links, and storing
 860      * a cached version of the transformed wiki-text.
 861      *
 862      * @param string $wikitext  The page content.
 863      *
 864      * @param int $version Version number for new revision.
 865      * To ensure proper serialization of edits, $version must be
 866      * exactly one higher than the current latest version.
 867      * (You can defeat this check by setting $version to
 868      * {@link WIKIDB_FORCE_CREATE} --- not usually recommended.)
 869      *
 870      * @param hash $meta  Meta-data for new revision.
 871      */
 872     function save($wikitext, $version, $meta) {
 873         $formatted = new TransformedText($this, $wikitext, $meta);
 874         $type = $formatted->getType();
 875         $meta['pagetype'] = $type->getName();
 876         $links = $formatted->getWikiPageLinks();
 877
 878         $backend = &$this->_wikidb->_backend;
 879         $newrevision = $this->createRevision($version, $wikitext, $meta, $links);
 880         if ($newrevision and !WIKIDB_NOCACHE_MARKUP)
 881             $this->set('_cached_html', $formatted->pack());
 882
 883         // FIXME: probably should have some global state information
 884         // in the backend to control when to optimize.
 885         //
 886         // We're doing this here rather than in createRevision because
 887         // postgres can't optimize while locked.
 888         if (DEBUG or (time() % 50 == 0)) {
 889             if ($backend->optimize())
 890                 trigger_error(_("Optimizing database"), E_USER_NOTICE);
 891         }
 892
 893         /* Generate notification emails? */
 894         if (isa($newrevision, 'WikiDB_PageRevision')) {
 895             // Save didn't fail because of concurrent updates.
 896             $notify = $this->_wikidb->get('notify');
 897             if (!empty($notify) and is_array($notify)) {
 898                 list($emails, $userids) = $this->getPageChangeEmails($notify);
 899                 if (!empty($emails)) {
 900                     $this->sendPageChangeNotification($wikitext, $version, $meta, $emails, $userids);
 901                 }
 902             }
 903         }
 904
 905         $newrevision->_transformedContent = $formatted;
 906         return $newrevision;
 907     }
 908
 909     function getPageChangeEmails($notify) {
 910         $emails = array(); $userids = array();
 911         foreach ($notify as $page => $users) {
 912             if (glob_match($page, $this->_pagename)) {
 913                 foreach ($users as $userid => $user) {
 914                     if (!$user) { // handle the case for ModeratePage: no prefs, just userid's.
 915                         global $request;
 916                         $u = $request->getUser();
 917                         if ($u->UserName() == $userid) {
 918                             $prefs = $u->getPreferences();
 919                         } else {
 920                             // not current user
 921                             if (ENABLE_USER_NEW) {
 922                                 $u = WikiUser($userid);
 923                                 $u->getPreferences();
 924                                 $prefs = &$u->_prefs;
 925                             } else {
 926                                 $u = new WikiUser($GLOBALS['request'], $userid);
 927                                 $prefs = $u->getPreferences();
 928                             }
 929                         }
 930                         $emails[] = $prefs->get('email');
 931                         $userids[] = $userid;
 932                     } else {
 933                       if (!empty($user['verified']) and !empty($user['email'])) {
 934                         $emails[]  = $user['email'];
 935                         $userids[] = $userid;
 936                       } elseif (!empty($user['email'])) {
 937                         global $request;
 938                         // do a dynamic emailVerified check update
 939                         $u = $request->getUser();
 940                         if ($u->UserName() == $userid) {
 941                             if ($request->_prefs->get('emailVerified')) {
 942                                 $emails[] = $user['email'];
 943                                 $userids[] = $userid;
 944                                 $notify[$page][$userid]['verified'] = 1;
 945                                 $request->_dbi->set('notify', $notify);
 946                             }
 947                         } else {
 948                             // not current user
 949                             if (ENABLE_USER_NEW) {
 950                                 $u = WikiUser($userid);
 951                                 $u->getPreferences();
 952                                 $prefs = &$u->_prefs;
 953                             } else {
 954                                 $u = new WikiUser($GLOBALS['request'], $userid);
 955                                 $prefs = $u->getPreferences();
 956                             }
 957                             if ($prefs->get('emailVerified')) {
 958                                 $emails[] = $user['email'];
 959                                 $userids[] = $userid;
 960                                 $notify[$page][$userid]['verified'] = 1;
 961                                 $request->_dbi->set('notify', $notify);
 962                             }
 963                         }
 964                         // ignore verification
 965                         /*
 966                         if (DEBUG) {
 967                             if (!in_array($user['email'],$emails))
 968                                 $emails[] = $user['email'];
 969                         }
 970                         */
 971                     }
 972                   }
 973                 }
 974             }
 975         }
 976         $emails = array_unique($emails);
 977         $userids = array_unique($userids);
 978         return array($emails, $userids);
 979     }
 980
 981     /**
 982      * Send udiff for a changed page to multiple users.
 983      * See rename and remove methods also
 984      */
 985     function sendPageChangeNotification(&$wikitext, $version, $meta, $emails, $userids) {
 986         global $request;
 987         if (@is_array($request->_deferredPageChangeNotification)) {
 988             // collapse multiple changes (loaddir) into one email
 989             $request->_deferredPageChangeNotification[] = array($this->_pagename, $emails, $userids);
 990             return;
 991         }
 992         $backend = &$this->_wikidb->_backend;
 993         //$backend = &$request->_dbi->_backend;
 994         $subject = _("Page change").' '.urlencode($this->_pagename);
 995         $previous = $backend->get_previous_version($this->_pagename, $version);
 996         if (!isset($meta['mtime'])) $meta['mtime'] = time();
 997         if ($previous) {
 998             $difflink = WikiURL($this->_pagename, array('action'=>'diff'), true);
 999             $cache = &$this->_wikidb->_cache;
1000             //$cache = &$request->_dbi->_cache;
1001             $this_content = explode("\n", $wikitext);
1002             $prevdata = $cache->get_versiondata($this->_pagename, $previous, true);
1003             if (empty($prevdata['%content']))
1004                 $prevdata = $backend->get_versiondata($this->_pagename, $previous, true);
1005             $other_content = explode("\n", $prevdata['%content']);
1006
1007             include_once("lib/difflib.php");
1008             $diff2 = new Diff($other_content, $this_content);
1009             //$context_lines = max(4, count($other_content) + 1,
1010             //                     count($this_content) + 1);
1011             $fmt = new UnifiedDiffFormatter(/*$context_lines*/);
1012             $content  = $this->_pagename . " " . $previous . " " . Iso8601DateTime($prevdata['mtime']) . "\n";
1013             $content .= $this->_pagename . " " . $version . " " .  Iso8601DateTime($meta['mtime']) . "\n";
1014             $content .= $fmt->format($diff2);
1015
1016         } else {
1017             $difflink = WikiURL($this->_pagename,array(),true);
1018             $content = $this->_pagename . " " . $version . " " .  Iso8601DateTime($meta['mtime']) . "\n";
1019             $content .= _("New Page");
1020         }
1021         $editedby = sprintf(_("Edited by: %s"), $meta['author']);
1022         $emails = join(',',$emails);
1023         if (mail($emails,"[".WIKI_NAME."] ".$subject,
1024                  $subject."\n".
1025                  $editedby."\n".
1026                  $difflink."\n\n".
1027                  $content))
1028             trigger_error(sprintf(_("PageChange Notification of %s sent to %s"),
1029                                   $this->_pagename, join(',',$userids)), E_USER_NOTICE);
1030         else
1031             trigger_error(sprintf(_("PageChange Notification Error: Couldn't send %s to %s"),
1032                                   $this->_pagename, join(',',$userids)), E_USER_WARNING);
1033     }
1034
1035     /** support mass rename / remove (not yet tested)
1036      */
1037     function sendPageRenameNotification($to, &$meta, $emails, $userids) {
1038         global $request;
1039         if (@is_array($request->_deferredPageRenameNotification)) {
1040             $request->_deferredPageRenameNotification[] = array($this->_pagename, $to, $meta, $emails, $userids);
1041         } else {
1042             $from = $this->_pagename;
1043             $editedby = sprintf(_("Edited by: %s"), $meta['author']) . ' ' . $meta['author_id'];
1044             $emails = join(',',$emails);
1045             $subject = sprintf(_("Page rename %s to %s"), urlencode($from), urlencode($to));
1046             $link = WikiURL($to, true);
1047             if (mail($emails,"[".WIKI_NAME."] ".$subject,
1048                      $subject."\n".
1049                      $editedby."\n".
1050                      $link."\n\n".
1051                      "Renamed $from to $to"))
1052                 trigger_error(sprintf(_("PageChange Notification of %s sent to %s"),
1053                                       $from, join(',',$userids)), E_USER_NOTICE);
1054             else
1055                 trigger_error(sprintf(_("PageChange Notification Error: Couldn't send %s to %s"),
1056                                       $from, join(',',$userids)), E_USER_WARNING);
1057         }
1058     }
1059
1060     /**
1061      * Get the most recent revision of a page.
1062      *
1063      * @access public
1064      *
1065      * @return WikiDB_PageRevision The current WikiDB_PageRevision object.
1066      */
1067     function getCurrentRevision($need_content = true) {
1068         $backend = &$this->_wikidb->_backend;
1069         $cache = &$this->_wikidb->_cache;
1070         $pagename = &$this->_pagename;
1071
1072         // Prevent deadlock in case of memory exhausted errors
1073         // Pure selection doesn't really need locking here.
1074         //   sf.net bug#927395
1075         // I know it would be better to lock, but with lots of pages this deadlock is more
1076         // severe than occasionally get not the latest revision.
1077         // In spirit to wikiwiki: read fast, edit slower.
1078         //$backend->lock();
1079         $version = $cache->get_latest_version($pagename);
1080         // getRevision gets the content also!
1081         $revision = $this->getRevision($version, $need_content);
1082         //$backend->unlock();
1083         assert($revision);
1084         return $revision;
1085     }
1086
1087     /**
1088      * Get a specific revision of a WikiDB_Page.
1089      *
1090      * @access public
1091      *
1092      * @param integer $version  Which revision to get.
1093      *
1094      * @return WikiDB_PageRevision The requested WikiDB_PageRevision object, or
1095      * false if the requested revision does not exist in the {@link WikiDB}.
1096      * Note that version zero of any page always exists.
1097      */
1098     function getRevision($version, $need_content=true) {
1099         $cache = &$this->_wikidb->_cache;
1100         $pagename = &$this->_pagename;
1101
1102         if (! $version ) // 0 or false
1103             return new WikiDB_PageRevision($this->_wikidb, $pagename, 0);
1104
1105         assert($version > 0);
1106         $vdata = $cache->get_versiondata($pagename, $version, $need_content);
1107         if (!$vdata) {
1108             return false;
1109         }
1110         return new WikiDB_PageRevision($this->_wikidb, $pagename, $version,
1111                                        $vdata);
1112     }
1113
1114     /**
1115      * Get previous page revision.
1116      *
1117      * This method find the most recent revision before a specified
1118      * version.
1119      *
1120      * @access public
1121      *
1122      * @param integer $version  Find most recent revision before this version.
1123      *  You can also use a WikiDB_PageRevision object to specify the $version.
1124      *
1125      * @return WikiDB_PageRevision The requested WikiDB_PageRevision object, or false if the
1126      * requested revision does not exist in the {@link WikiDB}.  Note that
1127      * unless $version is greater than zero, a revision (perhaps version zero,
1128      * the default revision) will always be found.
1129      */
1130     function getRevisionBefore($version, $need_content=true) {
1131         $backend = &$this->_wikidb->_backend;
1132         $pagename = &$this->_pagename;
1133
1134         $version = $this->_coerce_to_version($version);
1135
1136         if ($version == 0)
1137             return false;
1138         //$backend->lock();
1139         $previous = $backend->get_previous_version($pagename, $version);
1140         $revision = $this->getRevision($previous, $need_content);
1141         //$backend->unlock();
1142         assert($revision);
1143         return $revision;
1144     }
1145
1146     /**
1147      * Get all revisions of the WikiDB_Page.
1148      *
1149      * This does not include the version zero (default) revision in the
1150      * returned revision set.
1151      *
1152      * @return WikiDB_PageRevisionIterator A
1153      *   WikiDB_PageRevisionIterator containing all revisions of this
1154      *   WikiDB_Page in reverse order by version number.
1155      */
1156     function getAllRevisions() {
1157         $backend = &$this->_wikidb->_backend;
1158         $revs = $backend->get_all_revisions($this->_pagename);
1159         return new WikiDB_PageRevisionIterator($this->_wikidb, $revs);
1160     }
1161
1162     /**
1163      * Find pages which link to or are linked from a page.
1164      *
1165      * @access public
1166      *
1167      * @param boolean $reversed Which links to find: true for backlinks (default).
1168      *
1169      * @return WikiDB_PageIterator A WikiDB_PageIterator containing
1170      * all matching pages.
1171      */
1172     function getLinks($reversed = true, $include_empty=false, $sortby=false, $limit=false, $exclude=false) {
1173         $backend = &$this->_wikidb->_backend;
1174         $result =  $backend->get_links($this->_pagename, $reversed, $include_empty, $sortby, $limit, $exclude);
1175         return new WikiDB_PageIterator($this->_wikidb, $result,
1176                                        array('include_empty' => $include_empty,
1177                                              'sortby' => $sortby,
1178                                              'limit' => $limit,
1179                                              'exclude' => $exclude));
1180     }
1181
1182     /**
1183      * All Links from other pages to this page.
1184      */
1185     function getBackLinks($include_empty=false, $sortby=false, $limit=false, $exclude=false) {
1186         return $this->getLinks(true, $include_empty, $sortby, $limit, $exclude);
1187     }
1188     /**
1189      * Forward Links: All Links from this page to other pages.
1190      */
1191     function getPageLinks($include_empty=false, $sortby=false, $limit=false, $exclude=false) {
1192         return $this->getLinks(false, $include_empty, $sortby, $limit, $exclude);
1193     }
1194
1195     /**
1196      * possibly faster link existance check. not yet accelerated.
1197      */
1198     function existLink($link, $reversed=false) {
1199         $backend = &$this->_wikidb->_backend;
1200         if (method_exists($backend,'exists_link'))
1201             return $backend->exists_link($this->_pagename, $link, $reversed);
1202         //$cache = &$this->_wikidb->_cache;
1203         // TODO: check cache if it is possible
1204         $iter = $this->getLinks($reversed, false);
1205         while ($page = $iter->next()) {
1206             if ($page->getName() == $link)
1207                 return $page;
1208         }
1209         $iter->free();
1210         return false;
1211     }
1212
1213     /**
1214      * Access WikiDB_Page meta-data.
1215      *
1216      * @access public
1217      *
1218      * @param string $key Which meta data to get.
1219      * Some reserved meta-data keys are:
1220      * <dl>
1221      * <dt>'locked'<dd> Is page locked?
1222      * <dt>'hits'  <dd> Page hit counter.
1223      * <dt>'pref'  <dd> Users preferences, stored in homepages.
1224      * <dt>'owner' <dd> Default: first author_id. We might add a group with a dot here:
1225      *                  E.g. "owner.users"
1226      * <dt>'perm'  <dd> Permission flag to authorize read/write/execution of
1227      *                  page-headers and content.
1228      * <dt>'score' <dd> Page score (not yet implement, do we need?)
1229      * </dl>
1230      *
1231      * @return scalar The requested value, or false if the requested data
1232      * is not set.
1233      */
1234     function get($key) {
1235         $cache = &$this->_wikidb->_cache;
1236         if (!$key || $key[0] == '%')
1237             return false;
1238         $data = $cache->get_pagedata($this->_pagename);
1239         return isset($data[$key]) ? $data[$key] : false;
1240     }
1241
1242     /**
1243      * Get all the page meta-data as a hash.
1244      *
1245      * @return hash The page meta-data.
1246      */
1247     function getMetaData() {
1248         $cache = &$this->_wikidb->_cache;
1249         $data = $cache->get_pagedata($this->_pagename);
1250         $meta = array();
1251         foreach ($data as $key => $val) {
1252             if (/*!empty($val) &&*/ $key[0] != '%')
1253                 $meta[$key] = $val;
1254         }
1255         return $meta;
1256     }
1257
1258     /**
1259      * Set page meta-data.
1260      *
1261      * @see get
1262      * @access public
1263      *
1264      * @param string $key  Meta-data key to set.
1265      * @param string $newval  New value.
1266      */
1267     function set($key, $newval) {
1268         $cache = &$this->_wikidb->_cache;
1269         $pagename = &$this->_pagename;
1270
1271         assert($key && $key[0] != '%');
1272
1273         $data = $cache->get_pagedata($pagename);
1274
1275         if (!empty($newval)) {
1276             if (!empty($data[$key]) && $data[$key] == $newval)
1277                 return;         // values identical, skip update.
1278         }
1279         else {
1280             if (empty($data[$key]))
1281                 return;         // values identical, skip update.
1282         }
1283
1284         $cache->update_pagedata($pagename, array($key => $newval));
1285     }
1286
1287     /**
1288      * Increase page hit count.
1289      *
1290      * FIXME: IS this needed?  Probably not.
1291      *
1292      * This is a convenience function.
1293      * <pre> $page->increaseHitCount(); </pre>
1294      * is functionally identical to
1295      * <pre> $page->set('hits',$page->get('hits')+1); </pre>
1296      * but less expensive (ignores the pagadata string)
1297      *
1298      * Note that this method may be implemented in more efficient ways
1299      * in certain backends.
1300      *
1301      * @access public
1302      */
1303     function increaseHitCount() {
1304         if (method_exists($this->_wikidb->_backend, 'increaseHitCount'))
1305             $this->_wikidb->_backend->increaseHitCount($this->_pagename);
1306         else {
1307             @$newhits = $this->get('hits') + 1;
1308             $this->set('hits', $newhits);
1309         }
1310     }
1311
1312     /**
1313      * Return a string representation of the WikiDB_Page
1314      *
1315      * This is really only for debugging.
1316      *
1317      * @access public
1318      *
1319      * @return string Printable representation of the WikiDB_Page.
1320      */
1321     function asString () {
1322         ob_start();
1323         printf("[%s:%s\n", get_class($this), $this->getName());
1324         print_r($this->getMetaData());
1325         echo "]\n";
1326         $strval = ob_get_contents();
1327         ob_end_clean();
1328         return $strval;
1329     }
1330
1331
1332     /**
1333      * @access private
1334      * @param integer_or_object $version_or_pagerevision
1335      * Takes either the version number (and int) or a WikiDB_PageRevision
1336      * object.
1337      * @return integer The version number.
1338      */
1339     function _coerce_to_version($version_or_pagerevision) {
1340         if (method_exists($version_or_pagerevision, "getContent"))
1341             $version = $version_or_pagerevision->getVersion();
1342         else
1343             $version = (int) $version_or_pagerevision;
1344
1345         assert($version >= 0);
1346         return $version;
1347     }
1348
1349     function isUserPage ($include_empty = true) {
1350         if (!$include_empty and !$this->exists()) return false;
1351         return $this->get('pref') ? true : false;
1352     }
1353
1354     // May be empty. Either the stored owner (/Chown), or the first authorized author
1355     function getOwner() {
1356         if ($owner = $this->get('owner'))
1357             return ($owner == "The PhpWiki programming team") ? ADMIN_USER : $owner;
1358         // check all revisions forwards for the first author_id
1359         $backend = &$this->_wikidb->_backend;
1360         $pagename = &$this->_pagename;
1361         $latestversion = $backend->get_latest_version($pagename);
1362         for ($v=1; $v <= $latestversion; $v++) {
1363             $rev = $this->getRevision($v,false);
1364             if ($rev and $owner = $rev->get('author_id')) {
1365                 return ($owner == "The PhpWiki programming team") ? ADMIN_USER : $owner;
1366             }
1367         }
1368         return '';
1369     }
1370
1371     // The authenticated author of the first revision or empty if not authenticated then.
1372     function getCreator() {
1373         if ($current = $this->getRevision(1,false)) return $current->get('author_id');
1374         else return '';
1375     }
1376
1377     // The authenticated author of the current revision.
1378     function getAuthor() {
1379         if ($current = $this->getCurrentRevision(false)) return $current->get('author_id');
1380         else return '';
1381     }
1382
1383 };
1384
1385 /**
1386  * This class represents a specific revision of a WikiDB_Page within
1387  * a WikiDB.
1388  *
1389  * A WikiDB_PageRevision has read-only semantics. You may only create
1390  * new revisions (and delete old ones) --- you cannot modify existing
1391  * revisions.
1392  */
1393 class WikiDB_PageRevision
1394 {
1395     //var $_transformedContent = false; // set by WikiDB_Page::save()
1396
1397     function WikiDB_PageRevision(&$wikidb, $pagename, $version, $versiondata = false) {
1398         $this->_wikidb = &$wikidb;
1399         $this->_pagename = $pagename;
1400         $this->_version = $version;
1401         $this->_data = $versiondata ? $versiondata : array();
1402         $this->_transformedContent = false; // set by WikiDB_Page::save()
1403     }
1404
1405     /**
1406      * Get the WikiDB_Page which this revision belongs to.
1407      *
1408      * @access public
1409      *
1410      * @return WikiDB_Page The WikiDB_Page which this revision belongs to.
1411      */
1412     function getPage() {
1413         return new WikiDB_Page($this->_wikidb, $this->_pagename);
1414     }
1415
1416     /**
1417      * Get the version number of this revision.
1418      *
1419      * @access public
1420      *
1421      * @return integer The version number of this revision.
1422      */
1423     function getVersion() {
1424         return $this->_version;
1425     }
1426
1427     /**
1428      * Determine whether this revision has defaulted content.
1429      *
1430      * The default revision (version 0) of each page, as well as any
1431      * pages which are created with empty content have their content
1432      * defaulted to something like:
1433      * <pre>
1434      *   Describe [ThisPage] here.
1435      * </pre>
1436      *
1437      * @access public
1438      *
1439      * @return boolean Returns true if the page has default content.
1440      */
1441     function hasDefaultContents() {
1442         $data = &$this->_data;
1443         return empty($data['%content']); // FIXME: what if it's the number 0? <>'' or === false
1444     }
1445
1446     /**
1447      * Get the content as an array of lines.
1448      *
1449      * @access public
1450      *
1451      * @return array An array of lines.
1452      * The lines should contain no trailing white space.
1453      */
1454     function getContent() {
1455         return explode("\n", $this->getPackedContent());
1456     }
1457
1458         /**
1459      * Get the pagename of the revision.
1460      *
1461      * @access public
1462      *
1463      * @return string pagename.
1464      */
1465     function getPageName() {
1466         return $this->_pagename;
1467     }
1468
1469     /**
1470      * Determine whether revision is the latest.
1471      *
1472      * @access public
1473      *
1474      * @return boolean True iff the revision is the latest (most recent) one.
1475      */
1476     function isCurrent() {
1477         if (!isset($this->_iscurrent)) {
1478             $page = $this->getPage();
1479             $current = $page->getCurrentRevision(false);
1480             $this->_iscurrent = $this->getVersion() == $current->getVersion();
1481         }
1482         return $this->_iscurrent;
1483     }
1484
1485     /**
1486      * Get the transformed content of a page.
1487      *
1488      * @param string $pagetype  Override the page-type of the revision.
1489      *
1490      * @return object An XmlContent-like object containing the page transformed
1491      * contents.
1492      */
1493     function getTransformedContent($pagetype_override=false) {
1494         $backend = &$this->_wikidb->_backend;
1495
1496         if ($pagetype_override) {
1497             // Figure out the normal page-type for this page.
1498             $type = PageType::GetPageType($this->get('pagetype'));
1499             if ($type->getName() == $pagetype_override)
1500                 $pagetype_override = false; // Not really an override...
1501         }
1502
1503         if ($pagetype_override) {
1504             // Overriden page type, don't cache (or check cache).
1505             return new TransformedText($this->getPage(),
1506                                        $this->getPackedContent(),
1507                                        $this->getMetaData(),
1508                                        $pagetype_override);
1509         }
1510
1511         $possibly_cache_results = true;
1512
1513         if (!USECACHE or WIKIDB_NOCACHE_MARKUP) {
1514             if (WIKIDB_NOCACHE_MARKUP == 'purge') {
1515                 // flush cache for this page.
1516                 $page = $this->getPage();
1517                 $page->set('_cached_html', false);
1518             }
1519             $possibly_cache_results = false;
1520         }
1521         elseif (!$this->_transformedContent) {
1522             //$backend->lock();
1523             if ($this->isCurrent()) {
1524                 $page = $this->getPage();
1525                 $this->_transformedContent = TransformedText::unpack($page->get('_cached_html'));
1526             }
1527             else {
1528                 $possibly_cache_results = false;
1529             }
1530             //$backend->unlock();
1531         }
1532
1533         if (!$this->_transformedContent) {
1534             $this->_transformedContent
1535                 = new TransformedText($this->getPage(),
1536                                       $this->getPackedContent(),
1537                                       $this->getMetaData());
1538
1539             if ($possibly_cache_results) {
1540                 // If we're still the current version, cache the transfomed page.
1541                 //$backend->lock();
1542                 if ($this->isCurrent()) {
1543                     $page->set('_cached_html', $this->_transformedContent->pack());
1544                 }
1545                 //$backend->unlock();
1546             }
1547         }
1548
1549         return $this->_transformedContent;
1550     }
1551
1552     /**
1553      * Get the content as a string.
1554      *
1555      * @access public
1556      *
1557      * @return string The page content.
1558      * Lines are separated by new-lines.
1559      */
1560     function getPackedContent() {
1561         $data = &$this->_data;
1562
1563
1564         if (empty($data['%content'])) {
1565             include_once('lib/InlineParser.php');
1566
1567             // A feature similar to taglines at http://www.wlug.org.nz/
1568             // Lib from http://www.aasted.org/quote/
1569             if (defined('FORTUNE_DIR')
1570                 and is_dir(FORTUNE_DIR)
1571                 and in_array($GLOBALS['request']->getArg('action'),
1572                              array('create','edit')))
1573             {
1574                 include_once("lib/fortune.php");
1575                 $fortune = new Fortune();
1576                 $quote = str_replace("\n<br>","\n", $fortune->quoteFromDir(FORTUNE_DIR));
1577                 return sprintf("<verbatim>\n%s</verbatim>\n\n"._("Describe %s here."),
1578                                $quote, "[" . WikiEscape($this->_pagename) . "]");
1579             }
1580             // Replace empty content with default value.
1581             return sprintf(_("Describe %s here."),
1582                            "[" . WikiEscape($this->_pagename) . "]");
1583         }
1584
1585         // There is (non-default) content.
1586         assert($this->_version > 0);
1587
1588         if (!is_string($data['%content'])) {
1589             // Content was not provided to us at init time.
1590             // (This is allowed because for some backends, fetching
1591             // the content may be expensive, and often is not wanted
1592             // by the user.)
1593             //
1594             // In any case, now we need to get it.
1595             $data['%content'] = $this->_get_content();
1596             assert(is_string($data['%content']));
1597         }
1598
1599         return $data['%content'];
1600     }
1601
1602     function _get_content() {
1603         $cache = &$this->_wikidb->_cache;
1604         $pagename = $this->_pagename;
1605         $version = $this->_version;
1606
1607         assert($version > 0);
1608
1609         $newdata = $cache->get_versiondata($pagename, $version, true);
1610         if ($newdata) {
1611             assert(is_string($newdata['%content']));
1612             return $newdata['%content'];
1613         }
1614         else {
1615             // else revision has been deleted... What to do?
1616             return __sprintf("Oops! Revision %s of %s seems to have been deleted!",
1617                              $version, $pagename);
1618         }
1619     }
1620
1621     /**
1622      * Get meta-data for this revision.
1623      *
1624      *
1625      * @access public
1626      *
1627      * @param string $key Which meta-data to access.
1628      *
1629      * Some reserved revision meta-data keys are:
1630      * <dl>
1631      * <dt> 'mtime' <dd> Time this revision was created (seconds since midnight Jan 1, 1970.)
1632      *        The 'mtime' meta-value is normally set automatically by the database
1633      *        backend, but it may be specified explicitly when creating a new revision.
1634      * <dt> orig_mtime
1635      *  <dd> To ensure consistency of RecentChanges, the mtimes of the versions
1636      *       of a page must be monotonically increasing.  If an attempt is
1637      *       made to create a new revision with an mtime less than that of
1638      *       the preceeding revision, the new revisions timestamp is force
1639      *       to be equal to that of the preceeding revision.  In that case,
1640      *       the originally requested mtime is preserved in 'orig_mtime'.
1641      * <dt> '_supplanted' <dd> Time this revision ceased to be the most recent.
1642      *        This meta-value is <em>always</em> automatically maintained by the database
1643      *        backend.  (It is set from the 'mtime' meta-value of the superceding
1644      *        revision.)  '_supplanted' has a value of 'false' for the current revision.
1645      *
1646      * FIXME: this could be refactored:
1647      * <dt> author
1648      *  <dd> Author of the page (as he should be reported in, e.g. RecentChanges.)
1649      * <dt> author_id
1650      *  <dd> Authenticated author of a page.  This is used to identify
1651      *       the distinctness of authors when cleaning old revisions from
1652      *       the database.
1653      * <dt> 'is_minor_edit' <dd> Set if change was marked as a minor revision by the author.
1654      * <dt> 'summary' <dd> Short change summary entered by page author.
1655      * </dl>
1656      *
1657      * Meta-data keys must be valid C identifers (they have to start with a letter
1658      * or underscore, and can contain only alphanumerics and underscores.)
1659      *
1660      * @return string The requested value, or false if the requested value
1661      * is not defined.
1662      */
1663     function get($key) {
1664         if (!$key || $key[0] == '%')
1665             return false;
1666         $data = &$this->_data;
1667         return isset($data[$key]) ? $data[$key] : false;
1668     }
1669
1670     /**
1671      * Get all the revision page meta-data as a hash.
1672      *
1673      * @return hash The revision meta-data.
1674      */
1675     function getMetaData() {
1676         $meta = array();
1677         foreach ($this->_data as $key => $val) {
1678             if (!empty($val) && $key[0] != '%')
1679                 $meta[$key] = $val;
1680         }
1681         return $meta;
1682     }
1683
1684
1685     /**
1686      * Return a string representation of the revision.
1687      *
1688      * This is really only for debugging.
1689      *
1690      * @access public
1691      *
1692      * @return string Printable representation of the WikiDB_Page.
1693      */
1694     function asString () {
1695         ob_start();
1696         printf("[%s:%d\n", get_class($this), $this->get('version'));
1697         print_r($this->_data);
1698         echo $this->getPackedContent() . "\n]\n";
1699         $strval = ob_get_contents();
1700         ob_end_clean();
1701         return $strval;
1702     }
1703 };
1704
1705
1706 /**
1707  * Class representing a sequence of WikiDB_Pages.
1708  * TODO: Enhance to php5 iterators
1709  */
1710 class WikiDB_PageIterator
1711 {
1712     function WikiDB_PageIterator(&$wikidb, &$iter, $options=false) {
1713         $this->_iter = $iter; // a WikiDB_backend_iterator
1714         $this->_wikidb = &$wikidb;
1715         $this->_options = $options;
1716     }
1717
1718     function count () {
1719         return $this->_iter->count();
1720     }
1721
1722     /**
1723      * Get next WikiDB_Page in sequence.
1724      *
1725      * @access public
1726      *
1727      * @return WikiDB_Page The next WikiDB_Page in the sequence.
1728      */
1729     function next () {
1730         if ( ! ($next = $this->_iter->next()) )
1731             return false;
1732
1733         $pagename = &$next['pagename'];
1734         if (!$pagename) {
1735             trigger_error('empty pagename in WikiDB_PageIterator::next()', E_USER_WARNING);
1736             var_dump($next);
1737             return false;
1738         }
1739         // there's always hits, but we cache only if more
1740         // (well not with file, cvs and dba)
1741         if (isset($next['pagedata']) and count($next['pagedata']) > 1) {
1742             $this->_wikidb->_cache->cache_data($next);
1743         // cache existing page id's since we iterate over all links in GleanDescription
1744         // and need them later for LinkExistingWord
1745         } elseif ($this->_options and array_key_exists('include_empty', $this->_options)
1746                   and !$this->_options['include_empty'] and isset($next['id'])) {
1747             $this->_wikidb->_cache->_id_cache[$next['pagename']] = $next['id'];
1748         }
1749         return new WikiDB_Page($this->_wikidb, $pagename);
1750     }
1751
1752     /**
1753      * Release resources held by this iterator.
1754      *
1755      * The iterator may not be used after free() is called.
1756      *
1757      * There is no need to call free(), if next() has returned false.
1758      * (I.e. if you iterate through all the pages in the sequence,
1759      * you do not need to call free() --- you only need to call it
1760      * if you stop before the end of the iterator is reached.)
1761      *
1762      * @access public
1763      */
1764     function free() {
1765         $this->_iter->free();
1766     }
1767
1768     function asArray() {
1769         $result = array();
1770         while ($page = $this->next())
1771             $result[] = $page;
1772         //$this->reset();
1773         return $result;
1774     }
1775
1776
1777 };
1778
1779 /**
1780  * A class which represents a sequence of WikiDB_PageRevisions.
1781  * TODO: Enhance to php5 iterators
1782  */
1783 class WikiDB_PageRevisionIterator
1784 {
1785     function WikiDB_PageRevisionIterator(&$wikidb, &$revisions, $options=false) {
1786         $this->_revisions = $revisions;
1787         $this->_wikidb = &$wikidb;
1788         $this->_options = $options;
1789     }
1790
1791     function count () {
1792         return $this->_revisions->count();
1793     }
1794
1795     /**
1796      * Get next WikiDB_PageRevision in sequence.
1797      *
1798      * @access public
1799      *
1800      * @return WikiDB_PageRevision
1801      * The next WikiDB_PageRevision in the sequence.
1802      */
1803     function next () {
1804         if ( ! ($next = $this->_revisions->next()) )
1805             return false;
1806
1807         //$this->_wikidb->_cache->cache_data($next);
1808
1809         $pagename = $next['pagename'];
1810         $version = $next['version'];
1811         $versiondata = $next['versiondata'];
1812         if (DEBUG) {
1813             if (!(is_string($pagename) and $pagename != '')) {
1814                 trigger_error("empty pagename",E_USER_WARNING);
1815                 return false;
1816             }
1817         } else assert(is_string($pagename) and $pagename != '');
1818         if (DEBUG) {
1819             if (!is_array($versiondata)) {
1820                 trigger_error("empty versiondata",E_USER_WARNING);
1821                 return false;
1822             }
1823         } else assert(is_array($versiondata));
1824         if (DEBUG) {
1825             if (!($version > 0)) {
1826                 trigger_error("invalid version",E_USER_WARNING);
1827                 return false;
1828             }
1829         } else assert($version > 0);
1830
1831         return new WikiDB_PageRevision($this->_wikidb, $pagename, $version,
1832                                        $versiondata);
1833     }
1834
1835     /**
1836      * Release resources held by this iterator.
1837      *
1838      * The iterator may not be used after free() is called.
1839      *
1840      * There is no need to call free(), if next() has returned false.
1841      * (I.e. if you iterate through all the revisions in the sequence,
1842      * you do not need to call free() --- you only need to call it
1843      * if you stop before the end of the iterator is reached.)
1844      *
1845      * @access public
1846      */
1847     function free() {
1848         $this->_revisions->free();
1849     }
1850
1851     function asArray() {
1852         $result = array();
1853         while ($rev = $this->next())
1854             $result[] = $rev;
1855         $this->free();
1856         return $result;
1857     }
1858 };
1859
1860 /** pseudo iterator
1861  */
1862 class WikiDB_Array_PageIterator
1863 {
1864     function WikiDB_Array_PageIterator(&$pagenames) {
1865         global $request;
1866         $this->_dbi = $request->getDbh();
1867         $this->_pages = $pagenames;
1868         reset($this->_pages);
1869     }
1870     function next() {
1871         $c =& current($this->_pages);
1872         next($this->_pages);
1873         return $c !== false ? $this->_dbi->getPage($c) : false;
1874     }
1875     function count() {
1876         return count($this->_pages);
1877     }
1878     function free() {}
1879     function asArray() {
1880         reset($this->_pages);
1881         return $this->_pages;
1882     }
1883 }
1884
1885 class WikiDB_Array_generic_iter
1886 {
1887     function WikiDB_Array_generic_iter($result) {
1888         // $result may be either an array or a query result
1889         if (is_array($result)) {
1890             $this->_array = $result;
1891         } elseif (is_object($result)) {
1892             $this->_array = $result->asArray();
1893         } else {
1894             $this->_array = array();
1895         }
1896         if (!empty($this->_array))
1897             reset($this->_array);
1898     }
1899     function next() {
1900         $c =& current($this->_array);
1901         next($this->_array);
1902         return $c !== false ? $c : false;
1903     }
1904     function count() {
1905         return count($this->_array);
1906     }
1907     function free() {}
1908     function asArray() {
1909         if (!empty($this->_array))
1910             reset($this->_array);
1911         return $this->_array;
1912     }
1913 }
1914
1915 /**
1916  * Data cache used by WikiDB.
1917  *
1918  * FIXME: Maybe rename this to caching_backend (or some such).
1919  *
1920  * @access private
1921  */
1922 class WikiDB_cache
1923 {
1924     // FIXME: beautify versiondata cache.  Cache only limited data?
1925
1926     function WikiDB_cache (&$backend) {
1927         $this->_backend = &$backend;
1928
1929         $this->_pagedata_cache = array();
1930         $this->_versiondata_cache = array();
1931         array_push ($this->_versiondata_cache, array());
1932         $this->_glv_cache = array();
1933         $this->_id_cache = array(); // formerly ->_dbi->_iwpcache (nonempty pages => id)
1934     }
1935
1936     function close() {
1937         $this->_pagedata_cache = array();
1938         $this->_versiondata_cache = array();
1939         $this->_glv_cache = array();
1940         $this->_id_cache = array();
1941     }
1942
1943     function get_pagedata($pagename) {
1944         assert(is_string($pagename) && $pagename != '');
1945         if (USECACHE) {
1946             $cache = &$this->_pagedata_cache;
1947             if (!isset($cache[$pagename]) || !is_array($cache[$pagename])) {
1948                 $cache[$pagename] = $this->_backend->get_pagedata($pagename);
1949                 // Never keep a ['%pagedata']['_cached_html'] in cache, other than the current page.
1950                 if (isset($cache[$pagename]['_cached_html'])
1951                     and $pagename != $GLOBALS['request']->getArg('pagename')) {
1952                     unset($cache[$pagename]['_cached_html']);
1953                 }
1954                 if (empty($cache[$pagename]))
1955                     $cache[$pagename] = array();
1956             }
1957             return $cache[$pagename];
1958         } else {
1959             return $this->_backend->get_pagedata($pagename);
1960         }
1961     }
1962
1963     function update_pagedata($pagename, $newdata) {
1964         assert(is_string($pagename) && $pagename != '');
1965         unset ($this->_pagedata_cache[$pagename]);
1966
1967         $this->_backend->update_pagedata($pagename, $newdata);
1968
1969         if (USECACHE and !empty($this->_pagedata_cache[$pagename]) and is_array($this->_pagedata_cache[$pagename])) {
1970             $cachedata = &$this->_pagedata_cache[$pagename];
1971             foreach($newdata as $key => $val)
1972                 $cachedata[$key] = $val;
1973         }
1974     }
1975
1976     function invalidate_cache($pagename) {
1977         unset ($this->_pagedata_cache[$pagename]);
1978         unset ($this->_versiondata_cache[$pagename]);
1979         unset ($this->_glv_cache[$pagename]);
1980         unset ($this->_id_cache[$pagename]);
1981         //unset ($this->_backend->_page_data);
1982     }
1983
1984     function delete_page($pagename) {
1985         $this->_backend->delete_page($pagename);
1986         $this->invalidate_cache($pagename);
1987     }
1988
1989     // FIXME: ugly and wrong. overwrites full cache with partial cache
1990     function cache_data($data) {
1991         ;
1992         //if (isset($data['pagedata']))
1993         //    $this->_pagedata_cache[$data['pagename']] = $data['pagedata'];
1994     }
1995
1996     function get_versiondata($pagename, $version, $need_content = false) {
1997         //  FIXME: Seriously ugly hackage
1998         if (USECACHE) {   //temporary - for debugging
1999             assert(is_string($pagename) && $pagename != '');
2000             // there is a bug here somewhere which results in an assertion failure at line 105
2001             // of ArchiveCleaner.php  It goes away if we use the next line.
2002             //$need_content = true;
2003             $nc = $need_content ? '1':'0';
2004             $cache = &$this->_versiondata_cache;
2005             if (!isset($cache[$pagename][$version][$nc])||
2006                 !(is_array ($cache[$pagename])) || !(is_array ($cache[$pagename][$version]))) {
2007                 $cache[$pagename][$version][$nc] =
2008                     $this->_backend->get_versiondata($pagename, $version, $need_content);
2009                 // If we have retrieved all data, we may as well set the cache for $need_content = false
2010                 if ($need_content){
2011                     $cache[$pagename][$version]['0'] =& $cache[$pagename][$version]['1'];
2012                 }
2013             }
2014             $vdata = $cache[$pagename][$version][$nc];
2015         } else {
2016             $vdata = $this->_backend->get_versiondata($pagename, $version, $need_content);
2017         }
2018         // FIXME: ugly.
2019         // Rationale: never keep ['%pagedata']['_cached_html'] in cache.
2020         if ($vdata && !empty($vdata['%pagedata'])) {
2021             $this->_pagedata_cache[$pagename] =& $vdata['%pagedata'];
2022             // only store _cached_html for the requested page
2023             if (USECACHE
2024                 and isset($vdata['%pagedata']['_cached_html'])
2025                 and $pagename != $GLOBALS['request']->getArg('pagename'))
2026             {
2027                 unset($this->_pagedata_cache[$pagename]['_cached_html']);
2028                 unset($cache[$pagename][$version][$nc]['%pagedata']['_cached_html']);
2029                 if ($need_content)
2030                     unset($cache[$pagename][$version][0]['%pagedata']['_cached_html']);
2031             }
2032         }
2033         return $vdata;
2034     }
2035
2036     function set_versiondata($pagename, $version, $data) {
2037         //unset($this->_versiondata_cache[$pagename][$version]);
2038
2039         $new = $this->_backend->set_versiondata($pagename, $version, $data);
2040         // Update the cache
2041         $this->_versiondata_cache[$pagename][$version]['1'] = $data;
2042         $this->_versiondata_cache[$pagename][$version]['0'] = $data;
2043         // Is this necessary?
2044         unset($this->_glv_cache[$pagename]);
2045     }
2046
2047     function update_versiondata($pagename, $version, $data) {
2048         $new = $this->_backend->update_versiondata($pagename, $version, $data);
2049         // Update the cache
2050         // FIXME: never keep ['%pagedata']['_cached_html'] in cache.
2051         $this->_versiondata_cache[$pagename][$version]['1'] = $data;
2052         // FIXME: hack
2053         $this->_versiondata_cache[$pagename][$version]['0'] = $data;
2054         // Is this necessary?
2055         unset($this->_glv_cache[$pagename]);
2056     }
2057
2058     function delete_versiondata($pagename, $version) {
2059         $new = $this->_backend->delete_versiondata($pagename, $version);
2060         if (isset($this->_versiondata_cache[$pagename][$version]['1']))
2061             unset ($this->_versiondata_cache[$pagename][$version]['1']);
2062         if (isset($this->_versiondata_cache[$pagename][$version]['0']))
2063             unset ($this->_versiondata_cache[$pagename][$version]['0']);
2064         if (isset($this->_glv_cache[$pagename]))
2065             unset ($this->_glv_cache[$pagename]);
2066     }
2067
2068     function get_latest_version($pagename)  {
2069         if (USECACHE) {
2070             assert (is_string($pagename) && $pagename != '');
2071             $cache = &$this->_glv_cache;
2072             if (!isset($cache[$pagename])) {
2073                 $cache[$pagename] = $this->_backend->get_latest_version($pagename);
2074                 if (empty($cache[$pagename]))
2075                     $cache[$pagename] = 0;
2076             }
2077             return $cache[$pagename];
2078         } else {
2079             return $this->_backend->get_latest_version($pagename);
2080         }
2081     }
2082 };
2083
2084 function _sql_debuglog($msg, $newline=true, $shutdown=false) {
2085     static $fp = false;
2086     static $i = 0;
2087     if (!$fp) {
2088         $stamp = strftime("%y%m%d-%H%M%S");
2089         $fp = fopen("/tmp/sql-$stamp.log", "a");
2090         register_shutdown_function("_sql_debuglog_shutdown_function");
2091     } elseif ($shutdown) {
2092         fclose($fp);
2093         return;
2094     }
2095     if ($newline) fputs($fp, "[$i++] $msg");
2096     else fwrite($fp, $msg);
2097 }
2098 function _sql_debuglog_shutdown_function() {
2099     _sql_debuglog('',false,true);
2100 }
2101
2102 // $Log: not supported by cvs2svn $
2103 // Revision 1.111  2004/11/28 20:39:43  rurban
2104 // deactivate pagecache overwrite: it is wrong
2105 //
2106 // Revision 1.110  2004/11/26 18:39:01  rurban
2107 // new regex search parser and SQL backends (90% complete, glob and pcre backends missing)
2108 //
2109 // Revision 1.109  2004/11/25 17:20:50  rurban
2110 // and again a couple of more native db args: backlinks
2111 //
2112 // Revision 1.108  2004/11/23 13:35:31  rurban
2113 // add case_exact search
2114 //
2115 // Revision 1.107  2004/11/21 11:59:16  rurban
2116 // remove final \n to be ob_cache independent
2117 //
2118 // Revision 1.106  2004/11/20 17:35:56  rurban
2119 // improved WantedPages SQL backends
2120 // PageList::sortby new 3rd arg valid_fields (override db fields)
2121 // WantedPages sql pager inexact for performance reasons:
2122 //   assume 3 wantedfrom per page, to be correct, no getTotal()
2123 // support exclude argument for get_all_pages, new _sql_set()
2124 //
2125 // Revision 1.105  2004/11/20 09:16:27  rurban
2126 // Fix bad-style Cut&Paste programming errors, detected by Charles Corrigan.
2127 //
2128 // Revision 1.104  2004/11/19 19:22:03  rurban
2129 // ModeratePage part1: change status
2130 //
2131 // Revision 1.103  2004/11/16 17:29:04  rurban
2132 // fix remove notification error
2133 // fix creation + update id_cache update
2134 //
2135 // Revision 1.102  2004/11/11 18:31:26  rurban
2136 // add simple backtrace on such general failures to get at least an idea where
2137 //
2138 // Revision 1.101  2004/11/10 19:32:22  rurban
2139 // * optimize increaseHitCount, esp. for mysql.
2140 // * prepend dirs to the include_path (phpwiki_dir for faster searches)
2141 // * Pear_DB version logic (awful but needed)
2142 // * fix broken ADODB quote
2143 // * _extract_page_data simplification
2144 //
2145 // Revision 1.100  2004/11/10 15:29:20  rurban
2146 // * requires newer Pear_DB (as the internal one): quote() uses now escapeSimple for strings
2147 // * ACCESS_LOG_SQL: fix cause request not yet initialized
2148 // * WikiDB: moved SQL specific methods upwards
2149 // * new Pear_DB quoting: same as ADODB and as newer Pear_DB.
2150 //   fixes all around: WikiGroup, WikiUserNew SQL methods, SQL logging
2151 //
2152 // Revision 1.99  2004/11/09 17:11:05  rurban
2153 // * revert to the wikidb ref passing. there's no memory abuse there.
2154 // * use new wikidb->_cache->_id_cache[] instead of wikidb->_iwpcache, to effectively
2155 //   store page ids with getPageLinks (GleanDescription) of all existing pages, which
2156 //   are also needed at the rendering for linkExistingWikiWord().
2157 //   pass options to pageiterator.
2158 //   use this cache also for _get_pageid()
2159 //   This saves about 8 SELECT count per page (num all pagelinks).
2160 // * fix passing of all page fields to the pageiterator.
2161 // * fix overlarge session data which got broken with the latest ACCESS_LOG_SQL changes
2162 //
2163 // Revision 1.98  2004/11/07 18:34:29  rurban
2164 // more logging fixes
2165 //
2166 // Revision 1.97  2004/11/07 16:02:51  rurban
2167 // new sql access log (for spam prevention), and restructured access log class
2168 // dbh->quote (generic)
2169 // pear_db: mysql specific parts seperated (using replace)
2170 //
2171 // Revision 1.96  2004/11/05 22:32:15  rurban
2172 // encode the subject to be 7-bit safe
2173 //
2174 // Revision 1.95  2004/11/05 20:53:35  rurban
2175 // login cleanup: better debug msg on failing login,
2176 // checked password less immediate login (bogo or anon),
2177 // checked olduser pref session error,
2178 // better PersonalPage without password warning on minimal password length=0
2179 //   (which is default now)
2180 //
2181 // Revision 1.94  2004/11/01 10:43:56  rurban
2182 // seperate PassUser methods into seperate dir (memory usage)
2183 // fix WikiUser (old) overlarge data session
2184 // remove wikidb arg from various page class methods, use global ->_dbi instead
2185 // ...
2186 //
2187 // Revision 1.93  2004/10/14 17:17:57  rurban
2188 // remove dbi WikiDB_Page param: use global request object instead. (memory)
2189 // allow most_popular sortby arguments
2190 //
2191 // Revision 1.92  2004/10/05 17:00:04  rurban
2192 // support paging for simple lists
2193 // fix RatingDb sql backend.
2194 // remove pages from AllPages (this is ListPages then)
2195 //
2196 // Revision 1.91  2004/10/04 23:41:19  rurban
2197 // delete notify: fix, @unset syntax error
2198 //
2199 // Revision 1.90  2004/09/28 12:50:22  rurban
2200 // https://sourceforge.net/forum/forum.php?thread_id=1150924&forum_id=18929
2201 //
2202 // Revision 1.89  2004/09/26 10:54:42  rurban
2203 // silence deferred check
2204 //
2205 // Revision 1.88  2004/09/25 18:16:40  rurban
2206 // unset more unneeded _cached_html. (Guess this should fix sf.net now)
2207 //
2208 // Revision 1.87  2004/09/25 16:25:40  rurban
2209 // notify on rename and remove (to be improved)
2210 //
2211 // Revision 1.86  2004/09/23 18:52:06  rurban
2212 // only fortune at create
2213 //
2214 // Revision 1.85  2004/09/16 08:00:51  rurban
2215 // just some comments
2216 //
2217 // Revision 1.84  2004/09/14 10:34:30  rurban
2218 // fix TransformedText call to use refs
2219 //
2220 // Revision 1.83  2004/09/08 13:38:00  rurban
2221 // improve loadfile stability by using markup=2 as default for undefined markup-style.
2222 // use more refs for huge objects.
2223 // fix debug=static issue in WikiPluginCached
2224 //
2225 // Revision 1.82  2004/09/06 12:08:49  rurban
2226 // memory_limit on unix workaround
2227 // VisualWiki: default autosize image
2228 //
2229 // Revision 1.81  2004/09/06 08:28:00  rurban
2230 // rename genericQuery to genericSqlQuery
2231 //
2232 // Revision 1.80  2004/07/09 13:05:34  rurban
2233 // just aesthetics
2234 //
2235 // Revision 1.79  2004/07/09 10:06:49  rurban
2236 // Use backend specific sortby and sortable_columns method, to be able to
2237 // select between native (Db backend) and custom (PageList) sorting.
2238 // Fixed PageList::AddPageList (missed the first)
2239 // Added the author/creator.. name to AllPagesBy...
2240 //   display no pages if none matched.
2241 // Improved dba and file sortby().
2242 // Use &$request reference
2243 //
2244 // Revision 1.78  2004/07/08 21:32:35  rurban
2245 // Prevent from more warnings, minor db and sort optimizations
2246 //
2247 // Revision 1.77  2004/07/08 19:04:42  rurban
2248 // more unittest fixes (file backend, metadata RatingsDb)
2249 //
2250 // Revision 1.76  2004/07/08 17:31:43  rurban
2251 // improve numPages for file (fixing AllPagesTest)
2252 //
2253 // Revision 1.75  2004/07/05 13:56:22  rurban
2254 // sqlite autoincrement fix
2255 //
2256 // Revision 1.74  2004/07/03 16:51:05  rurban
2257 // optional DBADMIN_USER:DBADMIN_PASSWD for action=upgrade (if no ALTER permission)
2258 // added atomic mysql REPLACE for PearDB as in ADODB
2259 // fixed _lock_tables typo links => link
2260 // fixes unserialize ADODB bug in line 180
2261 //
2262 // Revision 1.73  2004/06/29 08:52:22  rurban
2263 // Use ...version() $need_content argument in WikiDB also:
2264 // To reduce the memory footprint for larger sets of pagelists,
2265 // we don't cache the content (only true or false) and
2266 // we purge the pagedata (_cached_html) also.
2267 // _cached_html is only cached for the current pagename.
2268 // => Vastly improved page existance check, ACL check, ...
2269 //
2270 // Now only PagedList info=content or size needs the whole content, esp. if sortable.
2271 //
2272 // Revision 1.72  2004/06/25 14:15:08  rurban
2273 // reduce memory footprint by caching only requested pagedate content (improving most page iterators)
2274 //
2275 // Revision 1.71  2004/06/21 16:22:30  rurban
2276 // add DEFAULT_DUMP_DIR and HTML_DUMP_DIR constants, for easier cmdline dumps,
2277 // fixed dumping buttons locally (images/buttons/),
2278 // support pages arg for dumphtml,
2279 // optional directory arg for dumpserial + dumphtml,
2280 // fix a AllPages warning,
2281 // show dump warnings/errors on DEBUG,
2282 // don't warn just ignore on wikilens pagelist columns, if not loaded.
2283 // RateIt pagelist column is called "rating", not "ratingwidget" (Dan?)
2284 //
2285 // Revision 1.70  2004/06/18 14:39:31  rurban
2286 // actually check USECACHE
2287 //
2288 // Revision 1.69  2004/06/13 15:33:20  rurban
2289 // new support for arguments owner, author, creator in most relevant
2290 // PageList plugins. in WikiAdmin* via preSelectS()
2291 //
2292 // Revision 1.68  2004/06/08 21:03:20  rurban
2293 // updated RssParser for XmlParser quirks (store parser object params in globals)
2294 //
2295 // Revision 1.67  2004/06/07 19:12:49  rurban
2296 // fixed rename version=0, bug #966284
2297 //
2298 // Revision 1.66  2004/06/07 18:57:27  rurban
2299 // fix rename: Change pagename in all linked pages
2300 //
2301 // Revision 1.65  2004/06/04 20:32:53  rurban
2302 // Several locale related improvements suggested by Pierrick Meignen
2303 // LDAP fix by John Cole
2304 // reanable admin check without ENABLE_PAGEPERM in the admin plugins
2305 //
2306 // Revision 1.64  2004/06/04 16:50:00  rurban
2307 // add random quotes to empty pages
2308 //
2309 // Revision 1.63  2004/06/04 11:58:38  rurban
2310 // added USE_TAGLINES
2311 //
2312 // Revision 1.62  2004/06/03 22:24:41  rurban
2313 // reenable admin check on !ENABLE_PAGEPERM, honor s=Wildcard arg, fix warning after Remove
2314 //
2315 // Revision 1.61  2004/06/02 17:13:48  rurban
2316 // fix getRevisionBefore assertion
2317 //
2318 // Revision 1.60  2004/05/28 10:09:58  rurban
2319 // fix bug #962117, incorrect init of auth_dsn
2320 //
2321 // Revision 1.59  2004/05/27 17:49:05  rurban
2322 // renamed DB_Session to DbSession (in CVS also)
2323 // added WikiDB->getParam and WikiDB->getAuthParam method to get rid of globals
2324 // remove leading slash in error message
2325 // added force_unlock parameter to File_Passwd (no return on stale locks)
2326 // fixed adodb session AffectedRows
2327 // added FileFinder helpers to unify local filenames and DATA_PATH names
2328 // editpage.php: new edit toolbar javascript on ENABLE_EDIT_TOOLBAR
2329 //
2330 // Revision 1.58  2004/05/18 13:59:14  rurban
2331 // rename simpleQuery to genericQuery
2332 //
2333 // Revision 1.57  2004/05/16 22:07:35  rurban
2334 // check more config-default and predefined constants
2335 // various PagePerm fixes:
2336 //   fix default PagePerms, esp. edit and view for Bogo and Password users
2337 //   implemented Creator and Owner
2338 //   BOGOUSERS renamed to BOGOUSER
2339 // fixed syntax errors in signin.tmpl
2340 //
2341 // Revision 1.56  2004/05/15 22:54:49  rurban
2342 // fixed important WikiDB bug with DEBUG > 0: wrong assertion
2343 // improved SetAcl (works) and PagePerms, some WikiGroup helpers.
2344 //
2345 // Revision 1.55  2004/05/12 19:27:47  rurban
2346 // revert wrong inline optimization.
2347 //
2348 // Revision 1.54  2004/05/12 10:49:55  rurban
2349 // require_once fix for those libs which are loaded before FileFinder and
2350 //   its automatic include_path fix, and where require_once doesn't grok
2351 //   dirname(__FILE__) != './lib'
2352 // upgrade fix with PearDB
2353 // navbar.tmpl: remove spaces for IE &nbsp; button alignment
2354 //
2355 // Revision 1.53  2004/05/08 14:06:12  rurban
2356 // new support for inlined image attributes: [image.jpg size=50x30 align=right]
2357 // minor stability and portability fixes
2358 //
2359 // Revision 1.52  2004/05/06 19:26:16  rurban
2360 // improve stability, trying to find the InlineParser endless loop on sf.net
2361 //
2362 // remove end-of-zip comments to fix sf.net bug #777278 and probably #859628
2363 //
2364 // Revision 1.51  2004/05/06 17:30:37  rurban
2365 // CategoryGroup: oops, dos2unix eol
2366 // improved phpwiki_version:
2367 //   pre -= .0001 (1.3.10pre: 1030.099)
2368 //   -p1 += .001 (1.3.9-p1: 1030.091)
2369 // improved InstallTable for mysql and generic SQL versions and all newer tables so far.
2370 // abstracted more ADODB/PearDB methods for action=upgrade stuff:
2371 //   backend->backendType(), backend->database(),
2372 //   backend->listOfFields(),
2373 //   backend->listOfTables(),
2374 //
2375 // Revision 1.50  2004/05/04 22:34:25  rurban
2376 // more pdf support
2377 //
2378 // Revision 1.49  2004/05/03 11:16:40  rurban
2379 // fixed sendPageChangeNotification
2380 // subject rewording
2381 //
2382 // Revision 1.48  2004/04/29 23:03:54  rurban
2383 // fixed sf.net bug #940996
2384 //
2385 // Revision 1.47  2004/04/29 19:39:44  rurban
2386 // special support for formatted plugins (one-liners)
2387 //   like <small><plugin BlaBla ></small>
2388 // iter->asArray() helper for PopularNearby
2389 // db_session for older php's (no &func() allowed)
2390 //
2391 // Revision 1.46  2004/04/26 20:44:34  rurban
2392 // locking table specific for better databases
2393 //
2394 // Revision 1.45  2004/04/20 00:06:03  rurban
2395 // themable paging support
2396 //
2397 // Revision 1.44  2004/04/19 18:27:45  rurban
2398 // Prevent from some PHP5 warnings (ref args, no :: object init)
2399 //   php5 runs now through, just one wrong XmlElement object init missing
2400 // Removed unneccesary UpgradeUser lines
2401 // Changed WikiLink to omit version if current (RecentChanges)
2402 //
2403 // Revision 1.43  2004/04/18 01:34:20  rurban
2404 // protect most_popular from sortby=mtime
2405 //
2406 // Revision 1.42  2004/04/18 01:11:51  rurban
2407 // more numeric pagename fixes.
2408 // fixed action=upload with merge conflict warnings.
2409 // charset changed from constant to global (dynamic utf-8 switching)
2410 //
2411
2412 // Local Variables:
2413 // mode: php
2414 // tab-width: 8
2415 // c-basic-offset: 4
2416 // c-hanging-comment-ender-p: nil
2417 // indent-tabs-mode: nil
2418 // End:
2419 ?>