]> CyberLeo.Net >> Repos - SourceForge/phpwiki.git/blob - lib/config.php
PageList enhanced and improved.
[SourceForge/phpwiki.git] / lib / config.php
1 <?php
2 rcs_id('$Id: config.php,v 1.82 2004-02-15 21:34:37 rurban Exp $');
3 /*
4  * NOTE: the settings here should probably not need to be changed.
5 *
6 *
7 * (The user-configurable settings have been moved to index.php.)
8 */
9
10 if (!defined("LC_ALL")) {
11     // Backward compatibility (for PHP < 4.0.5)
12     define("LC_ALL", "LC_ALL");
13     define("LC_CTYPE", "LC_CTYPE");
14 }
15
16 function isCGI() {
17     return @preg_match('/CGI/',$GLOBALS['HTTP_ENV_VARS']['GATEWAY_INTERFACE']);
18 }
19
20 /*
21 // copy some $_ENV vars to $_SERVER for CGI compatibility. php does it automatically since when?
22 if (isCGI()) {
23     foreach (explode(':','SERVER_SOFTWARE:SERVER_NAME:GATEWAY_INTERFACE:SERVER_PROTOCOL:SERVER_PORT:REQUEST_METHOD:HTTP_ACCEPT:PATH_INFO:PATH_TRANSLATED:SCRIPT_NAME:QUERY_STRING:REMOTE_HOST:REMOTE_ADDR:REMOTE_USER:AUTH_TYPE:CONTENT_TYPE:CONTENT_LENGTH') as $key) {
24         $GLOBALS['HTTP_SERVER_VARS'][$key] = &$GLOBALS['HTTP_ENV_VARS'][$key];
25     }
26 }
27 */
28
29 // essential internal stuff
30 set_magic_quotes_runtime(0);
31
32 // Some constants.
33
34 // "\x80"-"\x9f" (and "\x00" - "\x1f") are non-printing control
35 // chars in iso-8859-*
36 // $FieldSeparator = "\263"; //this is a superscript 3 in ISO-8859-1.
37 $FieldSeparator = "\x81";
38
39 require_once('lib/FileFinder.php');
40 // Search PHP's include_path to find file or directory.
41 function FindFile ($file, $missing_okay = false, $slashify = false)
42 {
43     static $finder;
44     if (!isset($finder))
45         $finder = new FileFinder;
46     $s = $finder->findFile($file, $missing_okay);
47     if ($slashify)
48       $s = $finder->slashifyPath($s);
49     return $s;
50 }
51
52 // Search PHP's include_path to find file or directory.
53 // Searches for "locale/$LANG/$file", then for "$file".
54 function FindLocalizedFile ($file, $missing_okay = false)
55 {
56     static $finder;
57     if (!isset($finder))
58         $finder = new LocalizedFileFinder;
59     return $finder->findFile($file, $missing_okay);
60 }
61
62 function FindLocalizedButtonFile ($file, $missing_okay = false)
63 {
64     static $buttonfinder;
65     if (!isset($buttonfinder))
66         $buttonfinder = new LocalizedButtonFinder;
67     return $buttonfinder->findFile($file, $missing_okay);
68 }
69
70 //
71 // Set up (possibly fake) gettext()
72 //
73 if (!function_exists ('bindtextdomain')) {
74     $locale = array();
75
76     function gettext ($text) { 
77         global $locale;
78         if (!empty ($locale[$text]))
79             return $locale[$text];
80         return $text;
81     }
82
83     function _ ($text) {
84         return gettext($text);
85     }
86 }
87 else {
88     bindtextdomain("phpwiki", FindFile("locale", false, true));
89     textdomain("phpwiki");
90 }
91
92
93 /**
94  * Smart? setlocale().
95  *
96  * This is a version of the builtin setlocale() which is
97  * smart enough to try some alternatives...
98  *
99  * @param mixed $category
100  * @param string $locale
101  * @return string The new locale, or <code>false</code> if unable
102  *  to set the requested locale.
103  * @see setlocale
104  */
105 function guessing_setlocale ($category, $locale) {
106     if ($res = setlocale($category, $locale))
107         return $res;
108
109     $alt = array('en' => array('C', 'en_US', 'en_GB', 'en_AU', 'en_CA', 'english'),
110                  'de' => array('de_DE', 'deutsch', 'german'),
111                  'es' => array('es_ES', 'es_MX', 'es_AR', 'spanish'),
112                  'nl' => array('nl_NL', 'dutch'),
113                  'fr' => array('fr_FR', 'français', 'french'),
114                  'it' => array('it_IT'),
115                  'sv' => array('sv_SE')
116                  );
117     
118     list ($lang) = split('_', $locale);
119     if (!isset($alt[$lang]))
120         return false;
121         
122     foreach ($alt[$lang] as $try) {
123         // Try first with charset appended...
124         $try = $try . '.' . CHARSET;
125         if ($res = setlocale($category, $try))
126             return $res;
127         foreach (array('@', ".", '_') as $sep) {
128             list ($try) = split($sep, $try);
129             if ($res = setlocale($category, $try))
130                 return $res;
131         }
132     }
133     return false;
134
135     // A standard locale name is typically of  the  form
136     // language[_territory][.codeset][@modifier],  where  language is
137     // an ISO 639 language code, territory is an ISO 3166 country code,
138     // and codeset  is  a  character  set or encoding identifier like
139     // ISO-8859-1 or UTF-8.
140 }
141
142 function update_locale ($loc) {
143     $newlocale = guessing_setlocale(LC_ALL, $loc);
144     if (!$newlocale) {
145         trigger_error(sprintf(_("Can't set locale: '%s'"), $loc), E_USER_NOTICE);
146         $loc = setlocale(LC_ALL, '');  // pull locale from environment.
147         list ($loc,) = split('_', $loc, 2);
148         $GLOBALS['LANG'] = $loc;
149         return false;
150     }
151
152     $GLOBALS['LANG'] = $loc;
153     // Try to put new locale into environment (so any
154     // programs we run will get the right locale.)
155     //
156     // If PHP is in safe mode, this is not allowed,
157     // so hide errors...
158     @putenv("LC_ALL=$newlocale");
159     @putenv("LANG=$newlocale");
160     
161     if (!function_exists ('bindtextdomain')) {
162         // Reinitialize translation array.
163         global $locale;
164         $locale = array();
165         if ( ($lcfile = FindLocalizedFile("LC_MESSAGES/phpwiki.php", 'missing_ok')) ) {
166             include($lcfile);
167         }
168     }
169
170     // To get the POSIX character classes in the PCRE's (e.g.
171     // [[:upper:]]) to match extended characters (e.g. GrüßGott), we have
172     // to set the locale, using setlocale().
173     //
174     // The problem is which locale to set?  We would like to recognize all
175     // upper-case characters in the iso-8859-1 character set as upper-case
176     // characters --- not just the ones which are in the current $LANG.
177     //
178     // As it turns out, at least on my system (Linux/glibc-2.2) as long as
179     // you setlocale() to anything but "C" it works fine.  (I'm not sure
180     // whether this is how it's supposed to be, or whether this is a bug
181     // in the libc...)
182     //
183     // We don't currently use the locale setting for anything else, so for
184     // now, just set the locale to US English.
185     //
186     // FIXME: Not all environments may support en_US?  We should probably
187     // have a list of locales to try.
188     if (setlocale(LC_CTYPE, 0) == 'C')
189         setlocale(LC_CTYPE, 'en_US.' . CHARSET );
190     else
191         setlocale(LC_CTYPE, $newlocale);
192
193     return $newlocale;
194 }
195
196 if (!defined('DEFAULT_LANGUAGE'))
197      define('DEFAULT_LANGUAGE', 'en');
198
199
200 /** string pcre_fix_posix_classes (string $regexp)
201 *
202 * Older version (pre 3.x?) of the PCRE library do not support
203 * POSIX named character classes (e.g. [[:alnum:]]).
204 *
205 * This is a helper function which can be used to convert a regexp
206 * which contains POSIX named character classes to one that doesn't.
207 *
208 * All instances of strings like '[:<class>:]' are replaced by the equivalent
209 * enumerated character class.
210 *
211 * Implementation Notes:
212 *
213 * Currently we use hard-coded values which are valid only for
214 * ISO-8859-1.  Also, currently on the classes [:alpha:], [:alnum:],
215 * [:upper:] and [:lower:] are implemented.  (The missing classes:
216 * [:blank:], [:cntrl:], [:digit:], [:graph:], [:print:], [:punct:],
217 * [:space:], and [:xdigit:] could easily be added if needed.)
218 *
219 * This is a hack.  I tried to generate these classes automatically
220 * using ereg(), but discovered that in my PHP, at least, ereg() is
221 * slightly broken w.r.t. POSIX character classes.  (It includes
222 * "\xaa" and "\xba" in [:alpha:].)
223 *
224 * So for now, this will do.  --Jeff <dairiki@dairiki.org> 14 Mar, 2001
225 */
226 function pcre_fix_posix_classes ($regexp) {
227     // First check to see if our PCRE lib supports POSIX character
228     // classes.  If it does, there's nothing to do.
229     if (preg_match('/[[:upper:]]/', 'Ä'))
230         return $regexp;
231
232     static $classes = array(
233                             'alnum' => "0-9A-Za-z\xc0-\xd6\xd8-\xf6\xf8-\xff",
234                             'alpha' => "A-Za-z\xc0-\xd6\xd8-\xf6\xf8-\xff",
235                             'upper' => "A-Z\xc0-\xd6\xd8-\xde",
236                             'lower' => "a-z\xdf-\xf6\xf8-\xff"
237                             );
238
239     $keys = join('|', array_keys($classes));
240
241     return preg_replace("/\[:($keys):]/e", '$classes["\1"]', $regexp);
242 }
243
244 $WikiNameRegexp = pcre_fix_posix_classes($WikiNameRegexp);
245 $KeywordLinkRegexp = pcre_fix_posix_classes($KeywordLinkRegexp);
246
247 //////////////////////////////////////////////////////////////////
248 // Autodetect URL settings:
249 //
250 if (!defined('SERVER_NAME')) define('SERVER_NAME', $HTTP_SERVER_VARS['SERVER_NAME']);
251 if (!defined('SERVER_PORT')) define('SERVER_PORT', $HTTP_SERVER_VARS['SERVER_PORT']);
252 if (!defined('SERVER_PROTOCOL')) {
253     if (empty($HTTP_SERVER_VARS['HTTPS']) || $HTTP_SERVER_VARS['HTTPS'] == 'off')
254         define('SERVER_PROTOCOL', 'http');
255     else
256         define('SERVER_PROTOCOL', 'https');
257 }
258
259 function deduce_script_name() {
260     $s = &$GLOBALS['HTTP_SERVER_VARS'];
261     $script = @$s['SCRIPT_NAME'];
262     if (empty($script) or $script[0] != '/') {
263         // Some places (e.g. Lycos) only supply a relative name in
264         // SCRIPT_NAME, but give what we really want in SCRIPT_URL.
265         if (!empty($s['SCRIPT_URL']))
266             $script = $s['SCRIPT_URL'];
267     }
268     return $script;
269 }
270
271 if (!defined('SCRIPT_NAME'))
272     define('SCRIPT_NAME', deduce_script_name());
273
274 if (!defined('USE_PATH_INFO'))
275 {
276     /*
277      * If SCRIPT_NAME does not look like php source file,
278      * or user cgi we assume that php is getting run by an
279      * action handler in /cgi-bin.  In this case,
280      * I think there is no way to get Apache to pass
281      * useful PATH_INFO to the php script (PATH_INFO
282      * is used to the the php interpreter where the
283      * php script is...)
284      */
285     switch (php_sapi_name()) {
286     case 'apache':
287         define('USE_PATH_INFO', true);
288         break;
289     case 'cgi':
290     case 'apache2filter':
291         define('USE_PATH_INFO', false);
292         break;
293     default:
294         define('USE_PATH_INFO', ereg('\.(php3?|cgi)$', SCRIPT_NAME));
295         break;
296     }
297 }
298      
299 // If user has not defined DATA_PATH, we want to use relative URLs.
300 if (!defined('DATA_PATH') && USE_PATH_INFO)
301      define('DATA_PATH', '..');
302
303 function IsProbablyRedirectToIndex () {
304     // This might be a redirect to the DirectoryIndex,
305     // e.g. REQUEST_URI = /dir/  got redirected
306     // to SCRIPT_NAME = /dir/index.php
307
308     // In this case, the proper virtual path is still
309     // $SCRIPT_NAME, since pages appear at
310     // e.g. /dir/index.php/HomePage.
311
312     $requri = preg_quote($GLOBALS['HTTP_SERVER_VARS']['REQUEST_URI'], '%');
313     return preg_match("%^${requri}[^/]*$%", $GLOBALS['HTTP_SERVER_VARS']['SCRIPT_NAME']);
314 }
315
316
317 if (!defined('VIRTUAL_PATH')) {
318     // We'd like to auto-detect when the cases where apaches
319     // 'Action' directive (or similar means) is used to
320     // redirect page requests to a cgi-handler.
321     //
322     // In cases like this, requests for e.g. /wiki/HomePage
323     // get redirected to a cgi-script called, say,
324     // /path/to/wiki/index.php.  The script gets all
325     // of /wiki/HomePage as it's PATH_INFO.
326     //
327     // The problem is:
328     //   How to detect when this has happened reliably?
329     //   How to pick out the "virtual path" (in this case '/wiki')?
330     //
331     // (Another time an redirect might occur is to a DirectoryIndex
332     // -- the requested URI is '/wikidir/', the request gets
333     // passed to '/wikidir/index.php'.  In this case, the
334     // proper VIRTUAL_PATH is '/wikidir/index.php', since the
335     // pages will appear at e.g. '/wikidir/index.php/HomePage'.
336     //
337
338     $REDIRECT_URL = &$HTTP_SERVER_VARS['REDIRECT_URL'];
339     if (USE_PATH_INFO and isset($REDIRECT_URL)
340         and ! IsProbablyRedirectToIndex()) {
341         // FIXME: This is a hack, and won't work if the requested
342         // pagename has a slash in it.
343         define('VIRTUAL_PATH', dirname($REDIRECT_URL . 'x'));
344     } else {
345         define('VIRTUAL_PATH', SCRIPT_NAME);
346     }
347 }
348
349 if (SERVER_PORT
350     && SERVER_PORT != (SERVER_PROTOCOL == 'https' ? 443 : 80)) {
351     define('SERVER_URL',
352            SERVER_PROTOCOL . '://' . SERVER_NAME . ':' . SERVER_PORT);
353 }
354 else {
355     define('SERVER_URL',
356            SERVER_PROTOCOL . '://' . SERVER_NAME);
357 }
358
359 if (VIRTUAL_PATH != SCRIPT_NAME) {
360     // Apache action handlers are used.
361     define('PATH_INFO_PREFIX', VIRTUAL_PATH . '/');
362 }
363 else
364     define('PATH_INFO_PREFIX', '/');
365
366
367 define('PHPWIKI_BASE_URL',
368        SERVER_URL . (USE_PATH_INFO ? VIRTUAL_PATH . '/' : SCRIPT_NAME));
369
370 //////////////////////////////////////////////////////////////////
371 // Select database
372 //
373 if (empty($DBParams['dbtype']))
374     $DBParams['dbtype'] = 'dba';
375
376 if (!defined('WIKI_NAME'))
377     define('WIKI_NAME', _("An unnamed PhpWiki"));
378
379 if (!defined('THEME'))
380     define('THEME', 'default');
381
382 if (!defined('HOME_PAGE'))
383     define('HOME_PAGE', _("HomePage"));
384
385
386 // FIXME: delete
387 // Access log
388 if (!defined('ACCESS_LOG'))
389      define('ACCESS_LOG', '');
390
391 // FIXME: delete
392 // Get remote host name, if apache hasn't done it for us
393 if (empty($HTTP_SERVER_VARS['REMOTE_HOST']) && ENABLE_REVERSE_DNS)
394      $HTTP_SERVER_VARS['REMOTE_HOST'] = gethostbyaddr($HTTP_SERVER_VARS['REMOTE_ADDR']);
395
396 // check whether the crypt() function is needed and present
397 if (defined('ENCRYPTED_PASSWD') && !function_exists('crypt')) {
398     $error = sprintf(_("Encrypted passwords cannot be used: %s."),
399                      "'function crypt()' not available in this version of php");
400     trigger_error($error);
401 }
402
403 if (!defined('ADMIN_PASSWD') or ADMIN_PASSWD == '')
404     trigger_error(_("The admin password cannot be empty. Please update your /index.php"));
405
406 if (defined('USE_DB_SESSION') and USE_DB_SESSION) {
407     if ($DBParams['dbtype'] != 'SQL') {
408         trigger_error(sprintf(_("You can use %s only with %s"), 
409                                 'DB_Session', '$DBParams[\'dbtype\']: SQL'), 
410                           E_USER_ERROR);
411         // this is flawed. constants cannot be changed.
412         define('USE_DB_SESSION',false);
413     }
414     elseif (! $DBParams['db_session_table'] ) {
415         trigger_error(_("Empty db_session_table. Turn USE_DB_SESSION off or define the table name."), 
416                           E_USER_ERROR);
417         // this is flawed. constants cannot be changed.
418         define('USE_DB_SESSION',false);
419     }
420 } else {
421     // default: true (since v1.3.8)
422     if (!defined('USE_DB_SESSION'))
423         define('USE_DB_SESSION',true);
424 }
425 // legacy:
426 if (!defined('ENABLE_USER_NEW')) define('ENABLE_USER_NEW',true);
427 if (!defined('ALLOW_USER_LOGIN'))
428     define('ALLOW_USER_LOGIN', defined('ALLOW_USER_PASSWORDS') && ALLOW_USER_PASSWORDS);
429 if (!defined('ALLOW_ANON_USER')) define('ALLOW_ANON_USER', true); 
430 if (!defined('ALLOW_ANON_EDIT')) define('ALLOW_ANON_EDIT', false); 
431 if (!defined('REQUIRE_SIGNIN_BEFORE_EDIT')) define('REQUIRE_SIGNIN_BEFORE_EDIT', ! ALLOW_ANON_EDIT);
432 if (!defined('ALLOW_BOGO_LOGIN')) define('ALLOW_BOGO_LOGIN', true);
433
434 if (ALLOW_USER_LOGIN and empty($DBAuthParams['auth_dsn'])) {
435     if (isset($DBParams['dsn']))
436         $DBAuthParams['auth_dsn'] = $DBParams['dsn'];
437 }
438
439 // For emacs users
440 // Local Variables:
441 // mode: php
442 // tab-width: 8
443 // c-basic-offset: 4
444 // c-hanging-comment-ender-p: nil
445 // indent-tabs-mode: nil
446 // End:
447 ?>