init.php

   1 <?php
   2 /////////////////////////////////////////////////
   3 // PukiWiki - Yet another WikiWikiWeb clone.
   4 //
   5 // $Id: init.php,v 1.92 2004/07/23 14:38:33 henoheno Exp $
   6 //
   7
   8 /////////////////////////////////////////////////
   9 // ½é´üÀßÄê (¥¨¥é¡¼½ÐÎÏ¥ì¥Ù¥ë)
  10 error_reporting(E_ERROR | E_PARSE);     // (E_WARNING | E_NOTICE)¤ò½ü³°¤·¤Æ¤¤¤Þ¤¹
  11 //error_reporting(E_ALL);
  12
  13 /////////////////////////////////////////////////
  14 // ½é´üÀßÄê (Ê¸»ú¥¨¥ó¥³¡¼¥É¡¢¸À¸ì)
  15 define('LANG','ja');    // Select 'ja' or 'en'
  16 define('SOURCE_ENCODING','EUC-JP');
  17
  18 // mbstring extension ´ØÏ¢
  19 mb_language('Japanese');
  20 mb_internal_encoding(SOURCE_ENCODING);
  21 ini_set('mbstring.http_input', 'pass');
  22 mb_http_output('pass');
  23 mb_detect_order('auto');
  24
  25 /////////////////////////////////////////////////
  26 // ½é´üÀßÄê(ÀßÄê¥Õ¥¡¥¤¥ë¤Î¾ì½ê)
  27 define('LANG_FILE', DATA_HOME . LANG . '.lng');
  28 define('INI_FILE',  DATA_HOME . './pukiwiki.ini.php');
  29
  30 /////////////////////////////////////////////////
  31 // ½é´üÀßÄê (¥Ð¡¼¥¸¥ç¥ó/Ãøºî¸¢)
  32 define('S_VERSION','1.4.3');
  33 define('S_COPYRIGHT','
  34 <strong>"PukiWiki" '.S_VERSION.'</strong> Copyright &copy; 2001-2004
  35 <a href="http://pukiwiki.org">PukiWiki Developers Team</a>.
  36 License is <a href="http://www.gnu.org/">GNU/GPL</a>.<br />
  37 Based on "PukiWiki" 1.3 by <a href="http://factage.com/sng/">sng</a>
  38 ');
  39
  40 /////////////////////////////////////////////////
  41 // ½é´üÀßÄê (¥µ¡¼¥ÐÊÑ¿ô)
  42 foreach (array('SCRIPT_NAME', 'SERVER_ADMIN', 'SERVER_NAME',
  43         'SERVER_PORT', 'SERVER_SOFTWARE') as $key) {
  44         define($key, isset($_SERVER[$key]) ? $_SERVER[$key] : '');
  45         unset(${$key}, $_SERVER[$key], $HTTP_SERVER_VARS[$key]);
  46 }
  47
  48 /////////////////////////////////////////////////
  49 // ½é´üÀßÄê (¥°¥í¡¼¥Ð¥ëÊÑ¿ô)
  50
  51 // µÓÃí
  52 $foot_explain = array();
  53 // ´ØÏ¢¤¹¤ë¥Ú¡¼¥¸
  54 $related = array();
  55 // <head>Æâ¤ËÄÉ²Ã¤¹¤ë¥¿¥°
  56 $head_tags = array();
  57
  58 /////////////////////////////////////////////////
  59 // ½é´üÀßÄê(»þ´Ö)
  60 define('LOCALZONE',date('Z'));
  61 define('UTIME',time() - LOCALZONE);
  62 define('MUTIME',getmicrotime());
  63
  64 /////////////////////////////////////////////////
  65 // ¥Õ¥¡¥¤¥ëÆÉ¤ß¹þ¤ß
  66 $die = '';
  67 foreach(array('LANG_FILE', 'INI_FILE') as $file){
  68         if (!file_exists(constant($file)) || !is_readable(constant($file))) {
  69                 $die = "${die}File is not found. ($file)\n";
  70         } else {
  71                 require(constant($file));
  72         }
  73 }
  74 if ($die) { die_message(nl2br("\n\n" . $die)); }
  75
  76 /////////////////////////////////////////////////
  77 // INI_FILE: $script: ½é´üÀßÄê
  78 if (!isset($script) or $script == '') {
  79         $script = get_script_uri();
  80         if ($script === FALSE or (php_sapi_name() == 'cgi' and !is_url($script,TRUE))) {
  81                 die_message('get_script_uri() failed: Please set $script at INI_FILE manually.');
  82         }
  83 }
  84
  85 /////////////////////////////////////////////////
  86 // INI_FILE: $agents:  UserAgent¤Î¼±ÊÌ
  87
  88 $ua = 'HTTP_USER_AGENT';
  89 $user_agent = $matches = array();
  90
  91 $user_agent['agent'] = isset($_SERVER['HTTP_USER_AGENT']) ? $_SERVER['HTTP_USER_AGENT'] : '';
  92 unset(${$ua}, $_SERVER[$ua], $HTTP_SERVER_VARS[$ua], $ua);      // safety
  93
  94 foreach ($agents as $agent) {
  95         if (preg_match($agent['pattern'], $user_agent['agent'], $matches)) {
  96                 $user_agent['profile'] = isset($agent['profile']) ? $agent['profile'] : '';
  97                 $user_agent['name']    = isset($matches[1]) ? $matches[1] : ''; // device or browser name
  98                 $user_agent['vers']    = isset($matches[2]) ? $matches[2] : ''; // 's version
  99                 break;
 100         }
 101 }
 102 unset($agents, $matches);
 103
 104 // Profile-related init and setting
 105 define('UA_PROFILE', isset($user_agent['profile']) ? $user_agent['profile'] : '');
 106
 107 //// Not needed now
 108 // define('INI_PRO_FILE', SUB_DIR . 'init.' . UA_PROFILE . '.php');
 109 // if (file_exists(INI_PRO_FILE) && is_readable(INI_PRO_FILE)) {
 110 //      require(INI_PRO_FILE);  // A chance to set or rewrite $user_agent['name'] and ['vers'] automatically
 111 // }
 112
 113 define('UA_INI_FILE', UA_PROFILE . '.ini.php');
 114 if (!file_exists(UA_INI_FILE) || !is_readable(UA_INI_FILE)) {
 115         die_message('UA_INI_FILE for "' . UA_PROFILE . '" not found.');
 116 } else {
 117         require(UA_INI_FILE); // Also manually
 118 }
 119
 120 define('UA_NAME', isset($user_agent['name']) ? $user_agent['name'] : '');
 121 define('UA_VERS', isset($user_agent['vers']) ? $user_agent['vers'] : '');
 122 unset($user_agent);     // Unset after reading UA_INI_FILE
 123
 124 /////////////////////////////////////////////////
 125 // ¥Ç¥£¥ì¥¯¥È¥ê¤Î¥Á¥§¥Ã¥¯
 126
 127 $die = '';
 128 foreach(array('DATA_DIR', 'DIFF_DIR', 'BACKUP_DIR', 'CACHE_DIR') as $dir){
 129         if(!is_writable(constant($dir))) {
 130                 $die = "${die}Directory is not found or not writable ($dir)\n";
 131         }
 132 }
 133
 134 // ÀßÄê¥Õ¥¡¥¤¥ë¤ÎÊÑ¿ô¥Á¥§¥Ã¥¯
 135 $temp = '';
 136 foreach(array('rss_max', 'page_title', 'note_hr', 'related_link', 'show_passage',
 137         'rule_related_str', 'load_template_func') as $var){
 138         if (!isset(${$var})) { $temp .= "\$$var\n"; }
 139 }
 140 if ($temp) {
 141         if ($die) { $die .= "\n"; }     // A breath
 142         $die = "${die}Variable(s) not found: (Maybe the old *.ini.php?)\n" . $temp;
 143 }
 144
 145 $temp = '';
 146 foreach(array('LANG', 'PLUGIN_DIR') as $def){
 147         if (!defined($def)) $temp .= "$def\n";
 148 }
 149 if ($temp) {
 150         if ($die) { $die .= "\n"; }     // A breath
 151         $die = "${die}Define(s) not found: (Maybe the old *.ini.php?)\n" . $temp;
 152 }
 153
 154 if($die){ die_message(nl2br("\n\n" . $die)); }
 155 unset($die, $temp);
 156
 157 /////////////////////////////////////////////////
 158 // É¬¿Ü¤Î¥Ú¡¼¥¸¤¬Â¸ºß¤·¤Ê¤±¤ì¤Ð¡¢¶õ¤Î¥Õ¥¡¥¤¥ë¤òºîÀ®¤¹¤ë
 159
 160 foreach(array($defaultpage, $whatsnew, $interwiki) as $page){
 161         if (!is_page($page)) { touch(get_filename($page)); }
 162 }
 163
 164 /////////////////////////////////////////////////
 165 // ³°Éô¤«¤é¤¯¤ëÊÑ¿ô¤ò¥Á¥§¥Ã¥¯
 166
 167 // Prohibit $_GET attack
 168 foreach (array('msg', 'pass') as $key) {
 169         if (isset($_GET[$key])) die_message("Sorry, already reserved: $key=");
 170 }
 171
 172 $_GET    = input_filter($_GET);    $get    = & $_GET;
 173 $_POST   = input_filter($_POST);   $post   = & $_POST;
 174 $_COOKIE = input_filter($_COOKIE); $cookie = & $_COOKIE;
 175
 176 // Expire risk
 177 unset($HTTP_GET_VARS, $HTTP_POST_VARS); //, 'SERVER', 'ENV', 'SESSION', ...
 178
 179 /////////////////////////////////////////////////
 180 // Ê¸»ú¥³¡¼¥É¤òÊÑ´¹
 181
 182 // <form> ¤ÇÁ÷¿®¤µ¤ì¤¿Ê¸»ú (¥Ö¥é¥¦¥¶¤¬¥¨¥ó¥³¡¼¥É¤·¤¿¥Ç¡¼¥¿) ¤Î¥³¡¼¥É¤òÊÑ´¹
 183 // post ¤Ï¾ï¤Ë <form> ¤Ê¤Î¤Ç¡¢É¬¤ºÊÑ´¹
 184 if (isset($post['encode_hint']) && $post['encode_hint'] != '')
 185 {
 186         // html.php ¤ÎÃæ¤Ç¡¢<form> ¤Ë encode_hint ¤ò»Å¹þ¤ó¤Ç¤¤¤ë¤Î¤Ç¡¢
 187         // encode_hint ¤òÍÑ¤¤¤Æ¥³¡¼¥É¸¡½Ð¤¹¤ë¡£
 188         // Á´ÂÎ¤ò¸«¤Æ¥³¡¼¥É¸¡½Ð¤¹¤ë¤È¡¢µ¡¼ï°ÍÂ¸Ê¸»ú¤ä¡¢Ì¯¤Ê¥Ð¥¤¥Ê¥ê
 189         // ¥³¡¼¥É¤¬º®Æþ¤·¤¿¾ì¹ç¤Ë¡¢¥³¡¼¥É¸¡½Ð¤Ë¼ºÇÔ¤¹¤ë¶²¤ì¤¬¤¢¤ë¡£
 190         $encode = mb_detect_encoding($post['encode_hint']);
 191         mb_convert_variables(SOURCE_ENCODING, $encode, $post);
 192         mb_convert_variables(SOURCE_ENCODING, $encode, $vars);
 193 }
 194 else if (isset($post['charset']) && $post['charset'] != '')
 195 {
 196         // TrackBack Ping¤Ë´Þ¤Þ¤ì¤Æ¤¤¤ë¤³¤È¤¬¤¢¤ë
 197         // »ØÄê¤µ¤ì¤¿¾ì¹ç¤Ï¡¢¤½¤ÎÆâÍÆ¤ÇÊÑ´¹¤ò»î¤ß¤ë
 198         // ¤¦¤Þ¤¯¤¤¤«¤Ê¤«¤Ã¤¿¾ì¹ç¤Ï¥³¡¼¥É¸¡½Ð¤ÎÀßÄê¤ÇÊÑ´¹¤·¤Ê¤ª¤·
 199         if (mb_convert_variables(SOURCE_ENCODING, $post['charset'], $post) !== $post['charset'])
 200                 mb_convert_variables(SOURCE_ENCODING, 'auto', $post);
 201
 202         if (mb_convert_variables(SOURCE_ENCODING, $vars['charset'], $vars) !== $vars['charset'])
 203                 mb_convert_variables(SOURCE_ENCODING, 'auto', $vars);
 204 }
 205 else if (count($post) > 0)
 206 {
 207         // ¥Ç¥Ð¥Ã¥°ÍÑ¤Ë¡¢¼è¤ê¤¢¤¨¤º¡¢·Ù¹ð¥á¥Ã¥»¡¼¥¸¤ò½Ð¤·¤Æ¤ª¤¤Þ¤¹¡£
 208         // echo "<p>Warning: 'encode_hint' field is not found in the posted data.</p>\n";
 209
 210         // Á´Éô¤Þ¤È¤á¤Æ¡¢¥³¡¼¥É¸¡½Ð¡¢ÊÑ´¹
 211         mb_convert_variables(SOURCE_ENCODING, 'auto', $post);
 212         mb_convert_variables(SOURCE_ENCODING, 'auto', $vars);
 213 }
 214
 215 // get ¤Ï <form> ¤«¤é¤Î¾ì¹ç¤È¡¢<a href="http;//script/?query> ¤Î¾ì¹ç¤¬¤¢¤ë
 216 if (isset($get['encode_hint']) && $get['encode_hint'] != '')
 217 {
 218         // <form> ¤Î¾ì¹ç¤Ï¡¢¥Ö¥é¥¦¥¶¤¬¥¨¥ó¥³¡¼¥É¤·¤Æ¤¤¤ë¤Î¤Ç¡¢¥³¡¼¥É¸¡½Ð¡¦ÊÑ´¹¤¬É¬Í×¡£
 219         // encode_hint ¤¬´Þ¤Þ¤ì¤Æ¤¤¤ë¤Ï¤º¤Ê¤Î¤Ç¡¢¤½¤ì¤ò¸«¤Æ¡¢¥³¡¼¥É¸¡½Ð¤·¤¿¸å¡¢ÊÑ´¹¤¹¤ë¡£
 220         // ÍýÍ³¤Ï¡¢post ¤ÈÆ±ÍÍ
 221         $encode = mb_detect_encoding($get['encode_hint']);
 222         mb_convert_variables(SOURCE_ENCODING, $encode, $get);
 223 }
 224 // <a href...> ¤Î¾ì¹ç¤Ï¡¢¥µ¡¼¥Ð¡¼¤¬ rawurlencode ¤·¤Æ¤¤¤ë¤Î¤Ç¡¢¥³¡¼¥ÉÊÑ´¹¤ÏÉÔÍ×
 225
 226 // QUERY_STRING¤ò¼èÆÀ
 227 // cmd¤âplugin¤â»ØÄê¤µ¤ì¤Æ¤¤¤Ê¤¤¾ì¹ç¤Ï¡¢QUERY_STRING¤ò¥Ú¡¼¥¸Ì¾¤«InterWikiName¤Ç¤¢¤ë¤È¤ß¤Ê¤¹°Ù
 228 // ¤Þ¤¿¡¢URI ¤ò urlencode ¤»¤º¤Ë¼êÂÇ¤Á¤ÇÆþÎÏ¤·¤¿¾ì¹ç¤ËÂÐ½è¤¹¤ë°Ù
 229 $arg = '';
 230 if (isset($_SERVER['QUERY_STRING']) && $_SERVER['QUERY_STRING']) {
 231         $arg = $_SERVER['QUERY_STRING'];
 232 } else if (isset($_SERVER['argv']) && count($_SERVER['argv'])) {
 233         $arg = $_SERVER['argv'][0];
 234 }
 235 // \0 ½üµî
 236 $arg = input_filter($arg);
 237
 238 // unset QUERY_STRINGs
 239 foreach (array('QUERY_STRING', 'argv', 'argc') as $key) {
 240         unset(${$key}, $_SERVER[$key], $HTTP_SERVER_VARS[$key]);
 241 }
 242 // $_SERVER['REQUEST_URI'] is used by func.php NOW
 243 unset($REQUEST_URI, $HTTP_SERVER_VARS['REQUEST_URI']);
 244
 245 // URI ¼êÂÇ¤Î¾ì¹ç¡¢¥³¡¼¥ÉÊÑ´¹¤·¡¢get[] ¤Ë¾å½ñ¤
 246 // mb_convert_variables¤Î¥Ð¥°(?)ÂÐºö ÇÛÎó¤ÇÅÏ¤µ¤Ê¤¤¤ÈÍî¤Á¤ë
 247 $arg = array($arg);
 248 mb_convert_variables(SOURCE_ENCODING, 'auto', $arg);
 249 $arg = $arg[0];
 250
 251 $matches = array();
 252 foreach (explode('&', $arg) as $tmp_string)
 253 {
 254         if (preg_match('/^([^=]+)=(.+)/', $tmp_string, $matches)
 255                 and mb_detect_encoding($matches[2]) != 'ASCII')
 256         {
 257                 $get[$matches[1]] = $matches[2];
 258         }
 259 }
 260 unset($matches);
 261
 262 /////////////////////////////////////////////////
 263 // GET + POST = $vars
 264
 265 $_REQUEST = input_filter($_REQUEST);
 266 $vars = & $_REQUEST;
 267
 268 // ÆþÎÏ¥Á¥§¥Ã¥¯: cmd, plugin ¤ÎÊ¸»úÎó¤Ï±Ñ¿ô»ú°Ê³°¤¢¤ê¤¨¤Ê¤¤
 269 foreach(array('cmd', 'plugin') as $var){
 270         if (array_key_exists($var, $vars) &&
 271             ! preg_match('/^[a-zA-Z][a-zA-Z0-9_]*$/', $vars[$var])) {
 272                 unset($get[$var], $post[$var], $vars[$var]);
 273         }
 274 }
 275
 276 // À°·Á: page, strip_bracket()
 277 if (array_key_exists('page', $vars)) {
 278         $get['page'] = $post['page'] = $vars['page']  = strip_bracket($vars['page']);
 279 } else {
 280         $get['page'] = $post['page'] = $vars['page'] = '';
 281 }
 282
 283 // À°·Á: msg, ²þ¹Ô¤ò¼è¤ê½ü¤¯
 284 if (isset($vars['msg'])) {
 285         $get['msg'] = $post['msg'] = $vars['msg'] = str_replace("\r",'',$vars['msg']);
 286 }
 287
 288 // ¸åÊý¸ß´¹À (?md5=...)
 289 if (array_key_exists('md5', $vars) and $vars['md5'] != '') {
 290         $get['cmd'] = $post['cmd'] = $vars['cmd'] = 'md5';
 291 }
 292
 293 // TrackBack Ping
 294 if (array_key_exists('tb_id', $vars) and $vars['tb_id'] != '') {
 295         $get['cmd'] = $post['cmd'] = $vars['cmd'] = 'tb';
 296 }
 297
 298 // cmd¤âplugin¤â»ØÄê¤µ¤ì¤Æ¤¤¤Ê¤¤¾ì¹ç¤Ï¡¢QUERY_STRING¤ò¥Ú¡¼¥¸Ì¾¤«InterWikiName¤Ç¤¢¤ë¤È¤ß¤Ê¤¹
 299 if (!array_key_exists('cmd',$vars)  and !array_key_exists('plugin',$vars))
 300 {
 301         if ($arg == '')
 302         {
 303                 //¤Ê¤Ë¤â»ØÄê¤µ¤ì¤Æ¤¤¤Ê¤«¤Ã¤¿¾ì¹ç¤Ï$defaultpage¤òÉ½¼¨
 304                 $arg = $defaultpage;
 305         }
 306         $arg = rawurldecode($arg);
 307         $arg = strip_bracket($arg);
 308         $arg = input_filter($arg);
 309
 310         $get['cmd']  = $post['cmd']  = $vars['cmd']  = 'read';
 311         $get['page'] = $post['page'] = $vars['page'] = $arg;
 312 }
 313
 314 // ÆþÎÏ¥Á¥§¥Ã¥¯: 'cmd=' prohibits nasty 'plugin='
 315 if (isset($vars['cmd']) && isset($vars['plugin']))
 316         unset($get['plugin'], $post['plugin'], $vars['plugin']);
 317
 318
 319 /////////////////////////////////////////////////
 320 // ½é´üÀßÄê($WikiName,$BracketName¤Ê¤É)
 321 // $WikiName = '[A-Z][a-z]+(?:[A-Z][a-z]+)+';
 322 // $WikiName = '\b[A-Z][a-z]+(?:[A-Z][a-z]+)+\b';
 323 // $WikiName = '(?<![[:alnum:]])(?:[[:upper:]][[:lower:]]+){2,}(?![[:alnum:]])';
 324 // $WikiName = '(?<!\w)(?:[A-Z][a-z]+){2,}(?!\w)';
 325
 326 // BugTrack/304»ÃÄêÂÐ½è
 327 $WikiName = '(?:[A-Z][a-z]+){2,}(?!\w)';
 328
 329 // $BracketName = ':?[^\s\]#&<>":]+:?';
 330 $BracketName = '(?!\s):?[^\r\n\t\f\[\]<>#&":]+:?(?<!\s)';
 331
 332 // InterWiki
 333 $InterWikiName = "(\[\[)?((?:(?!\s|:|\]\]).)+):(.+)(?(1)\]\])";
 334
 335 // Ãí¼á
 336 $NotePattern = '/\(\(((?:(?>(?:(?!\(\()(?!\)\)(?:[^\)]|$)).)+)|(?R))*)\)\)/ex';
 337
 338 /////////////////////////////////////////////////
 339 // ½é´üÀßÄê(¥æ¡¼¥¶ÄêµÁ¥ë¡¼¥ëÆÉ¤ß¹þ¤ß)
 340 require(DATA_HOME . 'rules.ini.php');
 341
 342 /////////////////////////////////////////////////
 343 // ½é´üÀßÄê(¤½¤ÎÂ¾¤Î¥°¥í¡¼¥Ð¥ëÊÑ¿ô)
 344
 345 // ¸½ºß»þ¹ï
 346 $now = format_date(UTIME);
 347
 348 // skinÆâ¤ÇDTDÀë¸À¤òÀÚ¤êÂØ¤¨¤ë¤Î¤Ë»ÈÍÑ¡£paint.inc.phpÂÐºö
 349 $html_transitional = FALSE;
 350 // FALSE:XHTML 1.1
 351 // TRUE :XHTML 1.0 Transitional
 352
 353 // ¥Õ¥§¥¤¥¹¥Þ¡¼¥¯¤ò$line_rules¤Ë²Ã¤¨¤ë
 354 if ($usefacemark) { $line_rules += $facemark_rules; }
 355 unset($facemark_rules);
 356
 357 // ¼ÂÂÎ»²¾È¥Ñ¥¿¡¼¥ó¤ª¤è¤Ó¥·¥¹¥Æ¥à¤Ç»ÈÍÑ¤¹¤ë¥Ñ¥¿¡¼¥ó¤ò$line_rules¤Ë²Ã¤¨¤ë
 358 //$entity_pattern = '[a-zA-Z0-9]{2,8}';
 359 $entity_pattern = trim(join('',file(CACHE_DIR.'entities.dat')));
 360
 361 $line_rules = array_merge(array(
 362         '&amp;(#[0-9]+|#x[0-9a-f]+|' . $entity_pattern . ');' => '&$1;',
 363         "\r"          => "<br />\n",    /* ¹ÔËö¤Ë¥Á¥ë¥À¤Ï²þ¹Ô */
 364         '#related$'   => '<del>#related</del>',
 365         '^#contents$' => '<del>#contents</del>'
 366 ), $line_rules);
 367
 368 ?>