lib/IniConfig.php

   1 <?php
   2 rcs_id('$Id$');
   3 /**
   4  * A configurator intended to read its config from a PHP-style INI file,
   5  * instead of a PHP file.
   6  *
   7  * Pass a filename to the IniConfig() function and it will read all it's
   8  * definitions from there, all by itself, and proceed to do a mass-define
   9  * of all valid PHPWiki config items.  In this way, we can hopefully be
  10  * totally backwards-compatible with the old index.php method, while still
  11  * providing a much tastier on-going experience.
  12  *
  13  * @author: Joby Walker, Reini Urban, Matthew Palmer
  14  */
  15 /*
  16  * Copyright 2004,2005,2006,2007 $ThePhpWikiProgrammingTeam
  17  * Copyright 2008-2009 Marc-Etienne Vargenau, Alcatel-Lucent
  18  *
  19  * This file is part of PhpWiki.
  20  *
  21  * PhpWiki is free software; you can redistribute it and/or modify
  22  * it under the terms of the GNU General Public License as published by
  23  * the Free Software Foundation; either version 2 of the License, or
  24  * (at your option) any later version.
  25  *
  26  * PhpWiki is distributed in the hope that it will be useful,
  27  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  28  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  29  * GNU General Public License for more details.
  30  *
  31  * You should have received a copy of the GNU General Public License
  32  * along with PhpWiki; if not, write to the Free Software
  33  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  34  */
  35
  36 /**
  37  * DONE:
  38  * - Convert the value lists to provide defaults, so that every "if
  39  *      (defined())" and "if (!defined())" can fuck off to the dismal hole
  40  *      it belongs in.
  41  * - config.ini => config.php dumper for faster startup. (really faster? to time)
  42  *
  43  * TODO:
  44  * - Old-style index.php => config/config.ini converter.
  45  *
  46  * - Don't use too much globals for easier integration into other projects
  47  *   (namespace pollution). (gforge, phpnuke, postnuke, phpBB2, carolina, ...)
  48  *   Use one global $phpwiki object instead which holds the cfg vars, constants
  49  *   and all other globals.
  50  *     (global $FieldSeparator, $charset, $WikiNameRegexp, $KeywordLinkRegexp;
  51  *      global $DisabledActions, $DBParams, $LANG, $AllActionPages)
  52  *
  53  * - Resurrect the larger "config object" code (in config/) so it'll aid the
  54  *   GUI config writers, and allow us to do proper validation and default
  55  *   value handling.
  56  *
  57  * - Get rid of WikiNameRegexp and KeywordLinkRegexp as globals by finding
  58  *   everywhere that uses them as variables and modify the code to use
  59  *   them as constants. Will involve hacking around
  60  *   pcre_fix_posix_classes (probably with redefines()).
  61  */
  62
  63 include_once (dirname(__FILE__)."/config.php");
  64 include_once (dirname(__FILE__)."/FileFinder.php");
  65
  66 /**
  67  * Speed-up iniconfig loading.
  68  *
  69  * Dump the static parts of the parsed config/config.ini settings to a fast-loadable config.php file.
  70  * The dynamic parts are then evaluated as before.
  71  * Requires write-permissions to config/config.php
  72  */
  73 function save_dump($file) {
  74     $vars =& $GLOBALS; // copy + unset not possible
  75     $ignore = array();
  76     foreach (array("SERVER","ENV","GET","POST","REQUEST","COOKIE","FILES") as $key) {
  77         $ignore["HTTP_".$key."_VARS"]++;
  78         $ignore["_".$key]++;
  79     }
  80     foreach (array("HTTP_POST_FILES","GLOBALS","RUNTIMER","ErrorManager",'RCS_IDS','LANG',
  81                    'HOME_PAGE','request','SCRIPT_NAME','VIRTUAL_PATH','SCRIPT_FILENAME') as $key)
  82         $ignore[$key]++;
  83     $fp = fopen($file, "wb");
  84     fwrite($fp,"<?php\n");
  85     fwrite($fp,"function wiki_configrestore(){\n");
  86     //TODO: optimize this by removing ignore, big serialized array and merge into existing GLOBALS
  87     foreach ($vars as $var => $val) {
  88         if (!$ignore[$var])
  89             fwrite($fp, "\$GLOBALS['".$var."']=unserialize(\""
  90                             .addslashes(serialize($val))."\");\n");
  91     }
  92     // cannot be optimized, maybe leave away predefined consts somehow
  93     foreach (get_defined_constants() as $var => $val) {
  94         if (substr($var,0,4) != "PHP_" and substr($var,0,2) != "E_"
  95             and substr($var,0,2) != "T_"  and substr($var,0,2) != "M_")
  96             fwrite($fp, "if(!defined('".$var."')) define('".$var."',unserialize(\""
  97                         .addslashes(serialize($val))."\"));\n");
  98     }
  99     fwrite($fp, "return 'noerr';}");
 100     fwrite($fp,"?>");
 101     fclose($fp);
 102 }
 103
 104 function _check_int_constant(&$c) {
 105   // if int value == string value, force int type
 106   if (sprintf("%d",(int)$c) === $c) { // DEBUG & _DEBUG_bla
 107     $c = (int)$c;
 108   }
 109 }
 110
 111 function IniConfig($file) {
 112
 113     // check config/config.php dump for faster startup
 114     $dump = substr($file, 0, -3)."php";
 115     if (isWindows($dump)) $dump = str_replace("/","\\",$dump);
 116     if (file_exists($dump) and is_readable($dump) and sort_file_mtime($dump, $file) < 0) {
 117         @include($dump);
 118         if (function_exists('wiki_configrestore') and (wiki_configrestore() === 'noerr')) {
 119             fixup_dynamic_configs();
 120             return;
 121         }
 122     }
 123
 124     // First-time installer detection here...
 125     // Similar to SetupWiki()
 126     if (!file_exists($file)) {
 127         // We need to DATA_PATH for configurator, or pass the posted values
 128         // somewhow to the script
 129         include_once(dirname(__FILE__)."/install.php");
 130         run_install("_part1");
 131         if (!defined("_PHPWIKI_INSTALL_RUNNING"))
 132             trigger_error("Datasource file '$file' does not exist", E_USER_ERROR);
 133         exit();
 134     }
 135
 136     // List of all valid config options to be define()d which take "values" (not
 137     // booleans). Needs to be categorised, and generally made a lot tidier.
 138     $_IC_VALID_VALUE = array
 139         ('WIKI_NAME', 'ADMIN_USER', 'ADMIN_PASSWD',
 140          'DEFAULT_DUMP_DIR', 'HTML_DUMP_DIR',
 141          'HTML_DUMP_SUFFIX', 'MAX_UPLOAD_SIZE', 'MINOR_EDIT_TIMEOUT',
 142          'ACCESS_LOG', 'CACHE_CONTROL', 'CACHE_CONTROL_MAX_AGE',
 143          'COOKIE_EXPIRATION_DAYS', 'COOKIE_DOMAIN',
 144          'PASSWORD_LENGTH_MINIMUM', 'USER_AUTH_POLICY',
 145          'GROUP_METHOD',
 146          'EDITING_POLICY', 'THEME', 'CHARSET',
 147          'WIKI_PGSRC', 'DEFAULT_WIKI_PGSRC',
 148          'ALLOWED_PROTOCOLS', 'INLINE_IMAGES', 'SUBPAGE_SEPARATOR', /*'KEYWORDS',*/
 149          // extra logic:
 150          //'DATABASE_PREFIX', 'DATABASE_DSN', 'DATABASE_TYPE', 'DATABASE_DBHANDLER',
 151          'DATABASE_OPTIMISE_FREQUENCY',
 152          'INTERWIKI_MAP_FILE', 'COPYRIGHTPAGE_TITLE', 'COPYRIGHTPAGE_URL',
 153          'AUTHORPAGE_TITLE', 'AUTHORPAGE_URL',
 154          'WIKI_NAME_REGEXP',
 155          'PLUGIN_CACHED_DATABASE', 'PLUGIN_CACHED_FILENAME_PREFIX',
 156          'PLUGIN_CACHED_HIGHWATER', 'PLUGIN_CACHED_LOWWATER', 'PLUGIN_CACHED_MAXLIFETIME',
 157          'PLUGIN_CACHED_MAXARGLEN', 'PLUGIN_CACHED_IMGTYPES',
 158          'WYSIWYG_BACKEND',
 159          // extra logic:
 160          'SERVER_NAME','SERVER_PORT','SCRIPT_NAME', 'DATA_PATH', 'PHPWIKI_DIR', 'VIRTUAL_PATH',
 161          'EXTERNAL_HTML2PDF_PAGELIST', 'PLUGIN_CACHED_CACHE_DIR'
 162          );
 163
 164     // Optional values which need to be defined.
 165     // These are not defined in config-default.ini and empty if not defined.
 166     $_IC_OPTIONAL_VALUE = array
 167         (
 168          'DEBUG', 'TEMP_DIR', 'DEFAULT_LANGUAGE',
 169          'LDAP_AUTH_HOST','LDAP_SET_OPTION','LDAP_BASE_DN', 'LDAP_AUTH_USER',
 170          'LDAP_AUTH_PASSWORD','LDAP_SEARCH_FIELD','LDAP_OU_GROUP','LDAP_OU_USERS',
 171          'AUTH_USER_FILE','DBAUTH_AUTH_DSN',
 172          'IMAP_AUTH_HOST', 'POP3_AUTH_HOST',
 173          'AUTH_USER_FILE', 'AUTH_GROUP_FILE', 'AUTH_SESS_USER', 'AUTH_SESS_LEVEL',
 174          'GOOGLE_LICENSE_KEY','FORTUNE_DIR',
 175          'DISABLE_GETIMAGESIZE','DBADMIN_USER','DBADMIN_PASSWD',
 176          'SESSION_SAVE_PATH',
 177          'TOOLBAR_PAGELINK_PULLDOWN', 'TOOLBAR_TEMPLATE_PULLDOWN', 'TOOLBAR_IMAGE_PULLDOWN',
 178          'EXTERNAL_LINK_TARGET', 'ACCESS_LOG_SQL', 'USE_EXTERNAL_HTML2PDF',
 179          'LOGIN_LOG','LDAP_SEARCH_FILTER'
 180          );
 181
 182     // List of all valid config options to be define()d which take booleans.
 183     $_IC_VALID_BOOL = array
 184         ('ENABLE_USER_NEW', 'ENABLE_PAGEPERM', 'ENABLE_EDIT_TOOLBAR', 'JS_SEARCHREPLACE',
 185          'ENABLE_XHTML_XML', 'ENABLE_DOUBLECLICKEDIT', 'ENABLE_LIVESEARCH', 'ENABLE_ACDROPDOWN',
 186          'USECACHE', 'WIKIDB_NOCACHE_MARKUP',
 187          'ENABLE_REVERSE_DNS', 'ENCRYPTED_PASSWD', 'ZIPDUMP_AUTH',
 188          'ENABLE_RAW_HTML', 'ENABLE_RAW_HTML_LOCKEDONLY', 'ENABLE_RAW_HTML_SAFE',
 189          'STRICT_MAILABLE_PAGEDUMPS', 'COMPRESS_OUTPUT',
 190          'ALLOW_ANON_USER', 'ALLOW_ANON_EDIT',
 191          'ALLOW_BOGO_LOGIN', 'ALLOW_USER_PASSWORDS',
 192          'AUTH_USER_FILE_STORABLE', 'ALLOW_HTTP_AUTH_LOGIN',
 193          'ALLOW_USER_LOGIN', 'ALLOW_LDAP_LOGIN', 'ALLOW_IMAP_LOGIN',
 194          'WARN_NONPUBLIC_INTERWIKIMAP', 'USE_PATH_INFO',
 195          'DISABLE_HTTP_REDIRECT',
 196          'PLUGIN_CACHED_USECACHE', 'PLUGIN_CACHED_FORCE_SYNCMAP',
 197          'BLOG_DEFAULT_EMPTY_PREFIX', 'DATABASE_PERSISTENT',
 198          'ENABLE_DISCUSSION_LINK', 'ENABLE_CAPTCHA',
 199          'ENABLE_WYSIWYG', 'WYSIWYG_DEFAULT_PAGETYPE_HTML',
 200          'DISABLE_MARKUP_WIKIWORD', 'ENABLE_MARKUP_COLOR',
 201          'ENABLE_MARKUP_DIVSPAN', 'USE_BYTEA', 'UPLOAD_USERDIR', 'DISABLE_UNITS',
 202          'ENABLE_SEARCHHIGHLIGHT', 'DISABLE_UPLOAD_ONLY_ALLOWED_EXTENSIONS',
 203          'ENABLE_AUTH_OPENID', 'INSECURE_ACTIONS_LOCALHOST_ONLY',
 204          'ENABLE_MAILNOTIFY', 'ENABLE_RECENTCHANGESBOX', 'ENABLE_PAGE_PUBLIC',
 205          'ENABLE_AJAX', 'ENABLE_EXTERNAL_PAGES',
 206          'READONLY'
 207          );
 208
 209     $rs = @parse_ini_file($file);
 210     $rsdef = @parse_ini_file(dirname(__FILE__)."/../config/config-default.ini");
 211     foreach ($rsdef as $k => $v) {
 212         if (defined($k)) {
 213             $rs[$k] = constant($k);
 214         } elseif (!isset($rs[$k])) {
 215             $rs[$k] = $v;
 216         }
 217     }
 218     unset($k); unset($v);
 219
 220     foreach ($_IC_VALID_VALUE as $item) {
 221         if (defined($item)) {
 222             unset($rs[$item]);
 223             continue;
 224         }
 225         if (array_key_exists($item, $rs)) {
 226             _check_int_constant($rs[$item]);
 227             define($item, $rs[$item]);
 228             unset($rs[$item]);
 229         //} elseif (array_key_exists($item, $rsdef)) {
 230         //    define($item, $rsdef[$item]);
 231         // calculate them later or not at all:
 232         } elseif (in_array($item,
 233                            array('DATABASE_PREFIX', 'SERVER_NAME', 'SERVER_PORT',
 234                                  'SCRIPT_NAME', 'DATA_PATH', 'PHPWIKI_DIR', 'VIRTUAL_PATH',
 235                                  'LDAP_AUTH_HOST','IMAP_AUTH_HOST','POP3_AUTH_HOST',
 236                                  'PLUGIN_CACHED_CACHE_DIR','EXTERNAL_HTML2PDF_PAGELIST')))
 237         {
 238             ;
 239         } elseif (!defined("_PHPWIKI_INSTALL_RUNNING")) {
 240             trigger_error(sprintf("missing config setting for %s",$item));
 241         }
 242     }
 243     unset($item);
 244
 245     // Boolean options are slightly special - if they're set to any of
 246     // '', 'false', '0', or 'no' (all case-insensitive) then the value will
 247     // be a boolean false, otherwise if there is anything set it'll
 248     // be true.
 249     foreach ($_IC_VALID_BOOL as $item) {
 250         if (defined($item)) {
 251             unset($rs[$item]);
 252             continue;
 253         }
 254         if (array_key_exists($item, $rs)) {
 255             $val = $rs[$item];
 256         //} elseif (array_key_exists($item, $rsdef)) {
 257         //    $val = $rsdef[$item];
 258         } else {
 259             $val = false;
 260             //trigger_error(sprintf("missing boolean config setting for %s",$item));
 261         }
 262
 263         // calculate them later: old or dynamic constants
 264         if (!array_key_exists($item, $rs) and
 265             in_array($item, array('USE_PATH_INFO', 'USE_DB_SESSION',
 266                                   'ALLOW_HTTP_AUTH_LOGIN', 'ALLOW_LDAP_LOGIN',
 267                                   'ALLOW_IMAP_LOGIN', 'ALLOW_USER_LOGIN',
 268                                   'REQUIRE_SIGNIN_BEFORE_EDIT',
 269                                   'WIKIDB_NOCACHE_MARKUP',
 270                                   'COMPRESS_OUTPUT', 'USE_BYTEA', 'READONLY',
 271                                   )))
 272         {
 273             ;
 274         }
 275         elseif (!$val) {
 276             define($item, false);
 277         }
 278         elseif (strtolower($val) == 'false' ||
 279                 strtolower($val) == 'no' ||
 280                 $val == '' ||
 281                 $val == false ||
 282                 $val == '0') {
 283             define($item, false);
 284         }
 285         else {
 286             define($item, true);
 287         }
 288         unset($rs[$item]);
 289     }
 290     unset($item);
 291
 292     // Database
 293     global $DBParams;
 294     foreach (array('DATABASE_TYPE'      => 'dbtype',
 295                    'DATABASE_DSN'       => 'dsn',
 296                    'DATABASE_SESSION_TABLE' => 'db_session_table',
 297                    'DATABASE_DBA_HANDLER'   => 'dba_handler',
 298                    'DATABASE_DIRECTORY' => 'directory',
 299                    'DATABASE_TIMEOUT'   => 'timeout',
 300                    'DATABASE_PREFIX'    => 'prefix')
 301              as $item => $k)
 302     {
 303         if (defined($item)) {
 304             $DBParams[$k] = constant($item);
 305             unset($rs[$item]);
 306         } elseif (array_key_exists($item, $rs)) {
 307             $DBParams[$k] = $rs[$item];
 308             define($item, $rs[$item]);
 309             unset($rs[$item]);
 310         } elseif (array_key_exists($item, $rsdef)) {
 311             $DBParams[$k] = $rsdef[$item];
 312             define($item, $rsdef[$item]);
 313             unset($rsdef[$item]);
 314         }
 315     }
 316     $valid_database_types = array('SQL','ADODB','PDO','dba','file','flatfile','cvs','cvsclient');
 317     if (!in_array(DATABASE_TYPE, $valid_database_types))
 318         trigger_error(sprintf("Invalid DATABASE_TYPE=%s. Choose one of %s",
 319                               DATABASE_TYPE, join(",", $valid_database_types)),
 320                       E_USER_ERROR);
 321     unset($valid_database_types);
 322     if (DATABASE_TYPE == 'PDO') {
 323         if (!check_php_version(5))
 324             trigger_error("Invalid DATABASE_TYPE=PDO. PDO requires at least php-5.0!",
 325                           E_USER_ERROR);
 326         // try to load it dynamically (unix only)
 327         if (!loadPhpExtension("pdo")) {
 328             echo $GLOBALS['php_errormsg'], "<br>\n";
 329             trigger_error(sprintf("dl() problem: Required extension '%s' could not be loaded!",
 330                                   "pdo"),
 331                           E_USER_ERROR);
 332         }
 333     }
 334     // Detect readonly database, e.g. system mounted read-only for maintenance
 335     // via dbh->readonly later. Unfortunately not possible as constant.
 336
 337     // USE_DB_SESSION default logic:
 338     if (!defined('USE_DB_SESSION')) {
 339         if ($DBParams['db_session_table']
 340             and in_array($DBParams['dbtype'], array('SQL','ADODB','PDO'))) {
 341             define('USE_DB_SESSION', true);
 342         } elseif ($DBParams['dbtype'] == 'dba' and check_php_version(4,1,2)) {
 343             define('USE_DB_SESSION', true); // Depends on db handler as well.
 344                                             // BerkeleyDB on older php has problems
 345                                             // with multiple db handles.
 346         } else {
 347             define('USE_DB_SESSION', false);
 348         }
 349     }
 350     unset($item); unset($k);
 351
 352     // Expiry stuff
 353     global $ExpireParams;
 354     foreach (array('major','minor','author') as $major) {
 355         foreach (array('max_age','min_age','min_keep','keep','max_keep') as $max) {
 356             $item = strtoupper($major) . '_'. strtoupper($max);
 357             if (defined($item)) $val = constant($item);
 358             elseif (array_key_exists($item, $rs))
 359                 $val = $rs[$item];
 360             elseif (array_key_exists($item, $rsdef))
 361                 $val = $rsdef[$item];
 362             if (!isset($ExpireParams[$major]))
 363                 $ExpireParams[$major] = array();
 364             $ExpireParams[$major][$max] = $val;
 365             unset($rs[$item]);
 366         }
 367     }
 368     unset($item); unset($major); unset($max);
 369
 370     // User authentication
 371     if (!isset($GLOBALS['USER_AUTH_ORDER'])) {
 372         if (isset($rs['USER_AUTH_ORDER']))
 373             $GLOBALS['USER_AUTH_ORDER'] = preg_split('/\s*:\s*/',
 374                                                      $rs['USER_AUTH_ORDER']);
 375         else
 376             $GLOBALS['USER_AUTH_ORDER'] = array("PersonalPage");
 377     }
 378
 379     // Now it's the external DB authentication stuff's turn
 380     if (in_array('Db', $GLOBALS['USER_AUTH_ORDER']) && empty($rs['DBAUTH_AUTH_DSN'])) {
 381         $rs['DBAUTH_AUTH_DSN'] = $DBParams['dsn'];
 382     }
 383
 384     global $DBAuthParams;
 385     $DBAP_MAP = array('DBAUTH_AUTH_DSN' => 'auth_dsn',
 386                       'DBAUTH_AUTH_CHECK' => 'auth_check',
 387                       'DBAUTH_AUTH_USER_EXISTS' => 'auth_user_exists',
 388                       'DBAUTH_AUTH_CRYPT_METHOD' => 'auth_crypt_method',
 389                       'DBAUTH_AUTH_UPDATE' => 'auth_update',
 390                       'DBAUTH_AUTH_CREATE' => 'auth_create',
 391                       'DBAUTH_PREF_SELECT' => 'pref_select',
 392                       'DBAUTH_PREF_INSERT' => 'pref_insert',
 393                       'DBAUTH_PREF_UPDATE' => 'pref_update',
 394                       'DBAUTH_IS_MEMBER' => 'is_member',
 395                       'DBAUTH_GROUP_MEMBERS' => 'group_members',
 396                       'DBAUTH_USER_GROUPS' => 'user_groups'
 397                       );
 398     foreach ($DBAP_MAP as $rskey => $apkey) {
 399         if (defined($rskey)) {
 400             $DBAuthParams[$apkey] = constant($rskey);
 401         } elseif (isset($rs[$rskey])) {
 402             $DBAuthParams[$apkey] = $rs[$rskey];
 403             define($rskey, $rs[$rskey]);
 404         } elseif (isset($rsdef[$rskey])) {
 405             $DBAuthParams[$apkey] = $rsdef[$rskey];
 406             define($rskey, $rsdef[$rskey]);
 407         }
 408         unset($rs[$rskey]);
 409     }
 410     unset($rskey); unset($apkey);
 411
 412     // TODO: Currently unsupported on non-SQL. Nice to have for RhNavPlugin
 413     // CHECKME: PDO
 414     if (array_key_exists('ACCESS_LOG_SQL', $rs)) {
 415         // WikiDB_backend::isSql() not yet loaded
 416         if (!in_array(DATABASE_TYPE, array('SQL','ADODB','PDO')))
 417             // override false config setting on no SQL WikiDB database.
 418             define('ACCESS_LOG_SQL', 0);
 419     }
 420     // SQL defaults to ACCESS_LOG_SQL = 2
 421     else {
 422         define('ACCESS_LOG_SQL',
 423                in_array(DATABASE_TYPE, array('SQL','ADODB','PDO')) ? 2 : 0);
 424     }
 425
 426     if (empty($rs['TEMP_DIR'])) {
 427         $rs['TEMP_DIR'] = "/tmp";
 428         if (getenv("TEMP"))
 429             $rs['TEMP_DIR'] = getenv("TEMP");
 430     }
 431     // optional values will be set to '' to simplify the logic.
 432     foreach ($_IC_OPTIONAL_VALUE as $item) {
 433         if (defined($item)) {
 434             unset($rs[$item]);
 435             continue;
 436         }
 437         if (array_key_exists($item, $rs)) {
 438             _check_int_constant($rs[$item]);
 439             define($item, $rs[$item]);
 440             unset($rs[$item]);
 441         } else
 442             define($item, '');
 443     }
 444
 445     if (USE_EXTERNAL_HTML2PDF) {
 446         $item = 'EXTERNAL_HTML2PDF_PAGELIST';
 447         if (defined($item)) {
 448             unset($rs[$item]);
 449         } elseif (array_key_exists($item, $rs)) {
 450             define($item, $rs[$item]);
 451             unset($rs[$item]);
 452         } elseif (array_key_exists($item, $rsdef)) {
 453             define($item, $rsdef[$item]);
 454         }
 455     }
 456     unset($item);
 457
 458     // LDAP bind options
 459     global $LDAP_SET_OPTION;
 460     if (defined('LDAP_SET_OPTION') and LDAP_SET_OPTION) {
 461         $optlist = preg_split('/\s*:\s*/', LDAP_SET_OPTION);
 462         foreach ($optlist as $opt) {
 463             $bits = preg_split('/\s*=\s*/', $opt, 2);
 464             if (count($bits) == 2) {
 465                 if (is_string($bits[0]) and defined($bits[0]))
 466                     $bits[0] = constant($bits[0]);
 467                 $LDAP_SET_OPTION[$bits[0]] = $bits[1];
 468             }
 469             else {
 470                 // Possibly throw some sort of error?
 471             }
 472         }
 473         unset($opt); unset($bits);
 474     }
 475
 476     // Default Wiki pages to force loading from pgsrc
 477     global $GenericPages;
 478     $GenericPages = preg_split('/\s*:\s*/', @$rs['DEFAULT_WIKI_PAGES']);
 479
 480     // Wiki name regexp:  Should be a define(), but might needed to be changed at runtime
 481     // (different LC_CHAR need different posix classes)
 482     global $WikiNameRegexp;
 483     $WikiNameRegexp = constant('WIKI_NAME_REGEXP');
 484     if (!trim($WikiNameRegexp))
 485        $WikiNameRegexp = '(?<![[:alnum:]])(?:[[:upper:]][[:lower:]]+){2,}(?![[:alnum:]])';
 486
 487     // Got rid of global $KeywordLinkRegexp by using a TextSearchQuery instead
 488     // of "Category:Topic"
 489     if (!isset($rs['KEYWORDS'])) $rs['KEYWORDS'] = @$rsdef['KEYWORDS'];
 490     if (!isset($rs['KEYWORDS'])) $rs['KEYWORDS'] = "Category* OR Topic*";
 491     if ($rs['KEYWORDS'] == 'Category:Topic') $rs['KEYWORDS'] = "Category* OR Topic*";
 492     if (!defined('KEYWORDS')) define('KEYWORDS', $rs['KEYWORDS']);
 493     //if (empty($keywords)) $keywords = array("Category","Topic");
 494     //$KeywordLinkRegexp = '(?<=' . implode('|^', $keywords) . ')[[:upper:]].*$';
 495
 496     // TODO: can this be a constant?
 497     global $DisabledActions;
 498     if (!array_key_exists('DISABLED_ACTIONS', $rs)
 499         and array_key_exists('DISABLED_ACTIONS', $rsdef))
 500         $rs['DISABLED_ACTIONS'] = @$rsdef['DISABLED_ACTIONS'];
 501     if (array_key_exists('DISABLED_ACTIONS', $rs))
 502         $DisabledActions = preg_split('/\s*:\s*/', $rs['DISABLED_ACTIONS']);
 503
 504     global $PLUGIN_CACHED_IMGTYPES;
 505     $PLUGIN_CACHED_IMGTYPES = preg_split('/\s*[|:]\s*/', PLUGIN_CACHED_IMGTYPES);
 506
 507     if (!defined('PLUGIN_CACHED_CACHE_DIR')) {
 508         if (empty($rs['PLUGIN_CACHED_CACHE_DIR']) and !empty($rsdef['PLUGIN_CACHED_CACHE_DIR']))
 509             $rs['PLUGIN_CACHED_CACHE_DIR'] = $rsdef['PLUGIN_CACHED_CACHE_DIR'];
 510         if (empty($rs['PLUGIN_CACHED_CACHE_DIR'])) {
 511             if (!empty($rs['INCLUDE_PATH'])) {
 512                 @ini_set('include_path', $rs['INCLUDE_PATH']);
 513                 $GLOBALS['INCLUDE_PATH'] = $rs['INCLUDE_PATH'];
 514             }
 515             $rs['PLUGIN_CACHED_CACHE_DIR'] = TEMP_DIR . '/cache';
 516             if (!FindFile($rs['PLUGIN_CACHED_CACHE_DIR'], 1)) { // [29ms]
 517                 FindFile(TEMP_DIR, false, 1);            // TEMP must exist!
 518                 mkdir($rs['PLUGIN_CACHED_CACHE_DIR'], 0777);
 519             }
 520             // will throw an error if not exists.
 521             define('PLUGIN_CACHED_CACHE_DIR', FindFile($rs['PLUGIN_CACHED_CACHE_DIR'],false,1));
 522         } else {
 523             define('PLUGIN_CACHED_CACHE_DIR', $rs['PLUGIN_CACHED_CACHE_DIR']);
 524             // will throw an error if not exists.
 525             FindFile(PLUGIN_CACHED_CACHE_DIR);
 526         }
 527     }
 528
 529     // process the rest of the config.ini settings:
 530     foreach ($rs as $item => $v) {
 531         if (defined($item)) {
 532             continue;
 533         } else {
 534             _check_int_constant($v);
 535             define($item, $v);
 536         }
 537     }
 538     unset($item); unset($v);
 539
 540     unset($rs);
 541     unset($rsdef);
 542
 543     fixup_static_configs($file); //[1ms]
 544     // Dump all globals and constants
 545     // The question is if reading this is faster then doing IniConfig() + fixup_static_configs()
 546     if (is_writable($dump)) {
 547         save_dump($dump);
 548     }
 549     // store locale[] in config.php? This is too problematic.
 550     fixup_dynamic_configs($file); // [100ms]
 551 }
 552
 553 function _ignore_unknown_charset_warning(&$error) {
 554     //htmlspecialchars(): charset `iso-8859-2' not supported, assuming iso-8859-1
 555     if (preg_match('/^htmlspecialchars\(\): charset \`.+\' not supported, assuming iso-8859-1/',
 556                    $error->errstr)) {
 557         $error->errno = 0;
 558         return true;  // Ignore error
 559     }
 560     return false;
 561 }
 562
 563 // moved from lib/config.php [1ms]
 564 function fixup_static_configs($file) {
 565     global $FieldSeparator, $charset, $WikiNameRegexp, $AllActionPages;
 566     global $HTTP_SERVER_VARS, $DBParams, $LANG, $ErrorManager;
 567     // init FileFinder to add proper include paths
 568     FindFile("lib/interwiki.map",true);
 569
 570     // "\x80"-"\x9f" (and "\x00" - "\x1f") are non-printing control
 571     // chars in iso-8859-*
 572     // $FieldSeparator = "\263"; // this is a superscript 3 in ISO-8859-1.
 573     // $FieldSeparator = "\xFF"; // this byte should never appear in utf-8
 574     // Get rid of constant. pref is dynamic and language specific
 575     $charset = CHARSET;
 576     // Disabled: Let the admin decide which charset.
 577     //if (isset($LANG) and in_array($LANG,array('zh')))
 578     //    $charset = 'utf-8';
 579     if (strtolower($charset) == 'utf-8')
 580         $FieldSeparator = "\xFF";
 581     else
 582         $FieldSeparator = "\x81";
 583
 584     // Some exotic charsets are not supported by htmlspecialchars, which just prints an E_WARNING.
 585     // Even on simple 8bit charsets, where just <>& need to be replaced. For iso-8859-[2-4] e.g.
 586     // See <php-src>/ext/standard/html.c
 587     // For performance reasons we require a magic constant to ignore this warning.
 588     if (defined('IGNORE_CHARSET_NOT_SUPPORTED_WARNING')
 589         and IGNORE_CHARSET_NOT_SUPPORTED_WARNING)
 590     {
 591         $ErrorManager->pushErrorHandler
 592             (new WikiFunctionCb('_ignore_unknown_charset_warning'));
 593     }
 594     // Used by SetupWiki to pull in required pages, if not translated, then in english.
 595     // Also used by _WikiTranslation. Really important are only those which return pagelists
 596     // or contain basic functionality.
 597     /*
 598       All pages containing plugins of the same name as the filename:
 599       cd pgsrc
 600       grep -l '\?plugin ' *| perl -ne'$/=0;chop; s/%([\da-fA-F]{2})/pack("C",hex($1))/ge; next LINE if m{^(Help/|Template|Pgsrc)}; print "$_\n"; {local $/;open F,"<$_"; $f=join("",<F>);} push @a,$_ if $f=~/plugin $_/; END{print join(":",@a)};'
 601      */
 602     $AllActionPages = explode(':',
 603       'AllPages:AllUsers:AppendText:AuthorHistory:'
 604       .'BackLinks:BlogArchives:BlogJournal:'
 605       .'CreatePage:'
 606       .'FindPage:FullTextSearch:FuzzyPages:'
 607       .'LikePages:LinkDatabase:LinkSearch:ListRelations:'
 608       .'ModeratedPage:MostPopular:'
 609       .'NewPagesPerUser:'
 610       .'OrphanedPages:'
 611       .'PageDump:PageHistory:PageInfo:PluginManager:'
 612       .'RandomPage:RecentChanges:RecentComments:RelatedChanges:'
 613       .'SearchHighlight:SemanticRelations:SemanticSearch:SystemInfo:'
 614       .'TitleSearch:'
 615       .'UpLoad:UserPreferences:'
 616       .'WantedPages:WatchPage:WhoIsOnline:WikiAdminSelect:WikiBlog:'
 617       // plus some derivations
 618       .'AllPagesCreatedByMe:AllPagesLastEditedByMe:AllPagesOwnedByMe:AllUserPages:'
 619       .'FullRecentChanges:'
 620       .'LeastPopular:LockedPages:'
 621       .'MyRecentEdits:MyRecentChanges:'
 622       .'PhpWikiAdministration:'
 623       .'PhpWikiAdministration/Chown:'
 624       .'PhpWikiAdministration/Markup:'
 625       .'PhpWikiAdministration/Purge:'
 626       .'PhpWikiAdministration/Remove:'
 627       .'PhpWikiAdministration/Rename:'
 628       .'PhpWikiAdministration/SearchReplace:'
 629       .'PhpWikiAdministration/SetAcl:'
 630       .'RecentChangesMyPages:RecentEdits:RecentNewPages:'
 631       .'UserContribs');
 632
 633     // The GFORGE theme omits them
 634     if (!defined('GFORGE') or !GFORGE) {
 635        // Add some some action pages depending on configuration
 636        if (defined('DEBUG') and DEBUG) {
 637           $AllActionPages[] = 'DebugInfo';
 638           $AllActionPages[] = 'EditMetaData';
 639           $AllActionPages[] = 'SpellCheck'; // SpellCheck does not work
 640           $AllActionPages[] = 'PhpWikiAdministration/Chmod';
 641        }
 642        $AllActionPages[] = 'InterWikiSearch';
 643        $AllActionPages[] = 'LdapSearch';
 644        $AllActionPages[] = 'PasswordReset';
 645        $AllActionPages[] = 'RateIt'; // RateIt works only in wikilens derived themes
 646        $AllActionPages[] = 'TranslateText';
 647        $AllActionPages[] = 'UriResolver';
 648     }
 649     if (defined('GFORGE') and GFORGE) {
 650        if (defined('ENABLE_EXTERNAL_PAGES') and ENABLE_EXTERNAL_PAGES) {
 651           $AllActionPages[] = 'ExternalPages';
 652        }
 653     }
 654
 655     // If user has not defined PHPWIKI_DIR, and we need it
 656     if (!defined('PHPWIKI_DIR') and !file_exists("themes/default")) {
 657         $themes_dir = FindFile("themes");
 658         define('PHPWIKI_DIR', dirname($themes_dir));
 659     }
 660
 661     // If user has not defined DATA_PATH, we want to use relative URLs.
 662     if (!defined('DATA_PATH')) {
 663         // fix similar to the one suggested by jkalmbach for
 664         // installations in the webrootdir, like "http://phpwiki.org/HomePage"
 665         if (!defined('SCRIPT_NAME'))
 666             define('SCRIPT_NAME', deduce_script_name());
 667         $temp = dirname(SCRIPT_NAME);
 668         if ( ($temp == '/') || ($temp == '\\') )
 669             $temp = '';
 670         define('DATA_PATH', $temp);
 671         /*
 672         if (USE_PATH_INFO)
 673             define('DATA_PATH', '..');
 674         */
 675     }
 676
 677     //////////////////////////////////////////////////////////////////
 678     // Select database
 679     //
 680     if (empty($DBParams['dbtype']))
 681         $DBParams['dbtype'] = 'dba';
 682
 683     if (!defined('THEME'))
 684         define('THEME', 'default');
 685
 686     /*$configurator_link = HTML(HTML::br(), "=>",
 687                               HTML::a(array('href'=>DATA_PATH."/configurator.php"),
 688                                                                   _("Configurator")));*/
 689     // check whether the crypt() function is needed and present
 690     if (defined('ENCRYPTED_PASSWD') && !function_exists('crypt')) {
 691         $error = sprintf("Encrypted passwords cannot be used: %s.",
 692                          "'function crypt()' not available in this version of php");
 693         trigger_error($error, E_USER_WARNING);
 694         if (!preg_match("/config\-dist\.ini$/", $file)) { // protect against recursion
 695             include_once(dirname(__FILE__)."/install.php");
 696             run_install("_part1");
 697             exit();
 698         }
 699     }
 700
 701     // Basic configurator validation
 702     if (!defined('ADMIN_USER') or ADMIN_USER == '') {
 703         $error = sprintf("%s may not be empty. Please update your configuration.",
 704                          "ADMIN_USER");
 705         // protect against recursion
 706         if (!preg_match("/config\-(dist|default)\.ini$/", $file)
 707             and !defined("_PHPWIKI_INSTALL_RUNNING"))
 708         {
 709             include_once(dirname(__FILE__)."/install.php");
 710             run_install("_part1");
 711             trigger_error($error, E_USER_ERROR);
 712             exit();
 713         } elseif ($HTTP_SERVER_VARS["REQUEST_METHOD"] == "POST") {
 714             $GLOBALS['HTTP_GET_VARS']['show'] = '_part1';
 715             trigger_error($error, E_USER_WARNING);
 716         }
 717     }
 718     if (!defined('ADMIN_PASSWD') or ADMIN_PASSWD == '') {
 719         $error = sprintf("%s may not be empty. Please update your configuration.",
 720                          "ADMIN_PASSWD");
 721         // protect against recursion
 722         if (!preg_match("/config\-(dist|default)\.ini$/", $file)
 723            and !defined("_PHPWIKI_INSTALL_RUNNING"))
 724         {
 725             include_once(dirname(__FILE__)."/install.php");
 726             run_install("_part1");
 727             trigger_error($error, E_USER_ERROR);
 728             exit();
 729         } elseif ($HTTP_SERVER_VARS["REQUEST_METHOD"] == "POST") {
 730             $GLOBALS['HTTP_GET_VARS']['show'] = '_part1';
 731             trigger_error($error, E_USER_WARNING);
 732         }
 733     }
 734
 735     if (defined('USE_DB_SESSION') and USE_DB_SESSION) {
 736         if (! $DBParams['db_session_table'] ) {
 737             $DBParams['db_session_table'] = @$DBParams['prefix'] . 'session';
 738             trigger_error(sprintf("DATABASE_SESSION_TABLE configuration set to %s.",
 739                                   $DBParams['db_session_table']),
 740                           E_USER_ERROR);
 741         }
 742     }
 743     // legacy:
 744     if (!defined('ENABLE_USER_NEW')) define('ENABLE_USER_NEW',true);
 745     if (!defined('ALLOW_USER_LOGIN'))
 746         define('ALLOW_USER_LOGIN', defined('ALLOW_USER_PASSWORDS') && ALLOW_USER_PASSWORDS);
 747     if (!defined('ALLOW_ANON_USER')) define('ALLOW_ANON_USER', true);
 748     if (!defined('ALLOW_ANON_EDIT')) define('ALLOW_ANON_EDIT', false);
 749     if (!defined('REQUIRE_SIGNIN_BEFORE_EDIT')) define('REQUIRE_SIGNIN_BEFORE_EDIT', ! ALLOW_ANON_EDIT);
 750     if (!defined('ALLOW_BOGO_LOGIN')) define('ALLOW_BOGO_LOGIN', true);
 751     if (!ENABLE_USER_NEW) {
 752       if (!defined('ALLOW_HTTP_AUTH_LOGIN'))
 753           define('ALLOW_HTTP_AUTH_LOGIN', false);
 754       if (!defined('ALLOW_LDAP_LOGIN'))
 755           define('ALLOW_LDAP_LOGIN', function_exists('ldap_connect') and defined('LDAP_AUTH_HOST'));
 756       if (!defined('ALLOW_IMAP_LOGIN'))
 757           define('ALLOW_IMAP_LOGIN', function_exists('imap_open') and defined('IMAP_AUTH_HOST'));
 758     }
 759
 760     if (ALLOW_USER_LOGIN and !empty($DBAuthParams) and empty($DBAuthParams['auth_dsn'])) {
 761         if (isset($DBParams['dsn']))
 762             $DBAuthParams['auth_dsn'] = $DBParams['dsn'];
 763     }
 764 }
 765
 766 /**
 767  * Define constants which are client or request specific and should not be dumped statically.
 768  * Such as the language, and the virtual and server paths, which might be overridden
 769  * by startup scripts for wiki farms.
 770  */
 771 function fixup_dynamic_configs($file) {
 772     global $WikiNameRegexp;
 773     global $HTTP_SERVER_VARS, $DBParams, $LANG;
 774
 775     if (defined('INCLUDE_PATH') and INCLUDE_PATH) {
 776         @ini_set('include_path', INCLUDE_PATH);
 777         $GLOBALS['INCLUDE_PATH'] = INCLUDE_PATH;
 778     }
 779     if (defined('SESSION_SAVE_PATH') and SESSION_SAVE_PATH)
 780         @ini_set('session.save_path', SESSION_SAVE_PATH);
 781     if (!defined('DEFAULT_LANGUAGE'))   // not needed anymore
 782         define('DEFAULT_LANGUAGE', ''); // detect from client
 783
 784     // Gforge hack
 785     if (!defined('GFORGE') or !GFORGE) {
 786         // Disable update_locale because Zend Debugger crash
 787         if(! extension_loaded('Zend Debugger')) {
 788             update_locale(isset($LANG) ? $LANG : DEFAULT_LANGUAGE);
 789         }
 790     }
 791
 792     if (empty($LANG)) {
 793         if (!defined("DEFAULT_LANGUAGE") or !DEFAULT_LANGUAGE) {
 794             // TODO: defer this to WikiRequest::initializeLang()
 795             $LANG = guessing_lang();
 796             guessing_setlocale (LC_ALL,$LANG);
 797         }
 798         else
 799             $LANG = DEFAULT_LANGUAGE;
 800     }
 801
 802     // Set up (possibly fake) gettext()
 803     // Todo: this could be moved to fixup_static_configs()
 804     // Bug #1381464 with php-5.1.1
 805     if (!function_exists ('bindtextdomain')
 806         and !function_exists ('gettext')
 807         and !function_exists ('_'))
 808     {
 809         $locale = array();
 810
 811         function gettext ($text) {
 812             global $locale;
 813             if (!empty ($locale[$text]))
 814                 return $locale[$text];
 815             return $text;
 816         }
 817         function _ ($text) {
 818             return gettext($text);
 819         }
 820     }
 821     else {
 822         $chback = 0;
 823         if ($LANG != 'en') {
 824
 825             // Working around really weird gettext problems: (4.3.2, 4.3.6 win)
 826             // bindtextdomain() in returns the current domain path.
 827             // 1. If the script is not index.php but something like "de", on a different path
 828             //    then bindtextdomain() fails, but after chdir to the correct path it will work okay.
 829             // 2. But the weird error "Undefined variable: bindtextdomain" is generated then.
 830             $bindtextdomain_path = FindFile("locale", false, true);
 831             if (isWindows())
 832                 $bindtextdomain_path = str_replace("/", "\\", $bindtextdomain_path);
 833             $bindtextdomain_real = @bindtextdomain("phpwiki", $bindtextdomain_path);
 834             if (realpath($bindtextdomain_real) != realpath($bindtextdomain_path)) {
 835                 // this will happen with virtual_paths. chdir and try again.
 836                 chdir($bindtextdomain_path);
 837                 $chback = 1;
 838                 $bindtextdomain_real = @bindtextdomain("phpwiki", $bindtextdomain_path);
 839             }
 840         }
 841         // tell gettext not to use unicode. PHP >= 4.2.0. Thanks to Kai Krakow.
 842         if (defined('CHARSET') and function_exists('bind_textdomain_codeset'))
 843             @bind_textdomain_codeset("phpwiki", CHARSET);
 844         if ($LANG != 'en')
 845             textdomain("phpwiki");
 846         if ($chback) { // change back
 847             chdir($bindtextdomain_real . (isWindows() ? "\\.." : "/.."));
 848         }
 849     }
 850
 851     // language dependent updates:
 852     $WikiNameRegexp = pcre_fix_posix_classes($WikiNameRegexp);
 853     //if ($KeywordLinkRegexp) $KeywordLinkRegexp = pcre_fix_posix_classes($KeywordLinkRegexp);
 854     if (!defined('CATEGORY_GROUP_PAGE'))
 855         define('CATEGORY_GROUP_PAGE',_("CategoryGroup"));
 856     if (!defined('WIKI_NAME'))
 857         define('WIKI_NAME', _("An unnamed PhpWiki"));
 858     if (!defined('HOME_PAGE'))
 859         define('HOME_PAGE', _("HomePage"));
 860
 861
 862     //////////////////////////////////////////////////////////////////
 863     // Autodetect URL settings:
 864     //
 865     foreach (array('SERVER_NAME','SERVER_PORT') as $var) {
 866         //FIXME: for CGI without _SERVER
 867         if (!defined($var) and !empty($HTTP_SERVER_VARS[$var]))
 868             // IPV6 fix by matt brown, #1546571
 869             // An IPv6 address must be surrounded by square brackets to form a valid server name.
 870             if ($var == 'SERVER_NAME' &&
 871                     strstr($HTTP_SERVER_VARS[$var], ':')) {
 872                 define($var, '[' . $HTTP_SERVER_VARS[$var] . ']');
 873             } else {
 874                 define($var, $HTTP_SERVER_VARS[$var]);
 875             }
 876     }
 877     if (!defined('SERVER_NAME')) define('SERVER_NAME', '127.0.0.1');
 878     if (!defined('SERVER_PORT')) define('SERVER_PORT', 80);
 879     if (!defined('SERVER_PROTOCOL')) {
 880         if (empty($HTTP_SERVER_VARS['HTTPS']) || $HTTP_SERVER_VARS['HTTPS'] == 'off')
 881             define('SERVER_PROTOCOL', 'http');
 882         else
 883             define('SERVER_PROTOCOL', 'https');
 884     }
 885
 886     if (!defined('SCRIPT_NAME'))
 887         define('SCRIPT_NAME', deduce_script_name());
 888
 889     if (!defined('USE_PATH_INFO')) {
 890         if (isCGI())
 891             define('USE_PATH_INFO', false);
 892         else {
 893             /*
 894              * If SCRIPT_NAME does not look like php source file,
 895              * or user cgi we assume that php is getting run by an
 896              * action handler in /cgi-bin.  In this case,
 897              * I think there is no way to get Apache to pass
 898              * useful PATH_INFO to the php script (PATH_INFO
 899              * is used to the the php interpreter where the
 900              * php script is...)
 901              */
 902             switch (php_sapi_name()) {
 903             case 'apache':
 904             case 'apache2handler':
 905                 define('USE_PATH_INFO', true);
 906                 break;
 907             case 'cgi':
 908             case 'apache2filter':
 909                 define('USE_PATH_INFO', false);
 910                 break;
 911             default:
 912                 define('USE_PATH_INFO', ereg('\.(php3?|cgi)$', SCRIPT_NAME));
 913                 break;
 914             }
 915         }
 916     }
 917
 918     if (SERVER_PORT
 919         && SERVER_PORT != (SERVER_PROTOCOL == 'https' ? 443 : 80)) {
 920         define('SERVER_URL',
 921                SERVER_PROTOCOL . '://' . SERVER_NAME . ':' . SERVER_PORT);
 922     }
 923     else {
 924         define('SERVER_URL',
 925                SERVER_PROTOCOL . '://' . SERVER_NAME);
 926     }
 927
 928     if (!defined('VIRTUAL_PATH')) {
 929         // We'd like to auto-detect when the cases where apaches
 930         // 'Action' directive (or similar means) is used to
 931         // redirect page requests to a cgi-handler.
 932         //
 933         // In cases like this, requests for e.g. /wiki/HomePage
 934         // get redirected to a cgi-script called, say,
 935         // /path/to/wiki/index.php.  The script gets all
 936         // of /wiki/HomePage as it's PATH_INFO.
 937         //
 938         // The problem is:
 939         //   How to detect when this has happened reliably?
 940         //   How to pick out the "virtual path" (in this case '/wiki')?
 941         //
 942         // (Another time an redirect might occur is to a DirectoryIndex
 943         // -- the requested URI is '/wikidir/', the request gets
 944         // passed to '/wikidir/index.php'.  In this case, the
 945         // proper VIRTUAL_PATH is '/wikidir/index.php', since the
 946         // pages will appear at e.g. '/wikidir/index.php/HomePage'.
 947         //
 948
 949         $REDIRECT_URL = &$HTTP_SERVER_VARS['REDIRECT_URL'];
 950         if (USE_PATH_INFO and isset($REDIRECT_URL)
 951             and ! IsProbablyRedirectToIndex()) {
 952             // FIXME: This is a hack, and won't work if the requested
 953             // pagename has a slash in it.
 954             $temp = strtr(dirname($REDIRECT_URL . 'x'),"\\",'/');
 955             if ( ($temp == '/') || ($temp == '\\') )
 956                 $temp = '';
 957             define('VIRTUAL_PATH', $temp);
 958         } else {
 959             define('VIRTUAL_PATH', SCRIPT_NAME);
 960         }
 961     }
 962
 963     if (VIRTUAL_PATH != SCRIPT_NAME) {
 964         // Apache action handlers are used.
 965         define('PATH_INFO_PREFIX', VIRTUAL_PATH . '/');
 966     }
 967     else
 968         define('PATH_INFO_PREFIX', '/');
 969
 970     define('PHPWIKI_BASE_URL',
 971            SERVER_URL . (USE_PATH_INFO ? VIRTUAL_PATH . '/' : SCRIPT_NAME));
 972
 973     // Detect PrettyWiki setup (not loading index.php directly)
 974     // $SCRIPT_FILENAME should be the same as __FILE__ in index.php
 975     if (!isset($SCRIPT_FILENAME))
 976         $SCRIPT_FILENAME = @$HTTP_SERVER_VARS['SCRIPT_FILENAME'];
 977     if (!isset($SCRIPT_FILENAME))
 978         $SCRIPT_FILENAME = @$HTTP_ENV_VARS['SCRIPT_FILENAME'];
 979     if (!isset($SCRIPT_FILENAME))
 980         $SCRIPT_FILENAME = dirname(__FILE__.'/../') . '/index.php';
 981     if (isWindows())
 982         $SCRIPT_FILENAME = str_replace('\\\\','\\',strtr($SCRIPT_FILENAME, '/', '\\'));
 983     define('SCRIPT_FILENAME', $SCRIPT_FILENAME);
 984
 985     // Get remote host name, if apache hasn't done it for us
 986     if (empty($HTTP_SERVER_VARS['REMOTE_HOST'])
 987         and !empty($HTTP_SERVER_VARS['REMOTE_ADDR'])
 988         and ENABLE_REVERSE_DNS)
 989         $HTTP_SERVER_VARS['REMOTE_HOST'] = gethostbyaddr($HTTP_SERVER_VARS['REMOTE_ADDR']);
 990
 991 }
 992
 993 // (c-file-style: "gnu")
 994 // Local Variables:
 995 // mode: php
 996 // tab-width: 8
 997 // c-basic-offset: 4
 998 // c-hanging-comment-ender-p: nil
 999 // indent-tabs-mode: nil
1000 // End:
1001 ?>