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