all rights reserved. // distributable under GPL see COPYING // // many codes are imported from the MoinMoin // some codes are reused from the Phiki // // * MoinMoin is a python based wiki clone based on the PikiPiki // by Ju"rgen Hermann // * PikiPiki is a python based wiki clone by MartinPool // * Phiki is a php based wiki clone based on the MoinMoin // by Fred C. Yankowski // // $Id: wiki.php,v 1.319 2006/07/21 12:44:21 wkpark Exp $ // $_revision = substr('$Revision: 1.319 $',1,-1); $_release = '1.1.2'; #ob_start("ob_gzhandler"); error_reporting(E_ALL ^ E_NOTICE); #error_reporting(E_ALL); $Config=getConfig("config.php",array('init'=>1)); include("wikilib.php"); $timing=new Timer(); function getPlugin($pluginname) { static $plugins=array(); if ($plugins) return $plugins[strtolower($pluginname)]; global $DBInfo; if ($DBInfo->include_path) $dirs=explode(':',$DBInfo->include_path); else $dirs=array('.'); foreach ($dirs as $dir) { $handle= @opendir($dir.'/plugin'); if (!$handle) continue; while ($file= readdir($handle)) { if (is_dir($dir."/plugin/$file")) continue; $name= substr($file,0,-4); $plugins[strtolower($name)]= $name; } } if (is_array($DBInfo->myplugins)) $plugins=array_merge($plugins,$DBInfo->myplugins); return $plugins[strtolower($pluginname)]; } function getModule($module,$name) { $mod=$module.'_'.$name; if (!class_exists($mod)) include_once('lib/'.strtolower($module).'.'.$name.'.php'); return $mod; } function getProcessor($pro_name) { static $processors=array(); if ($processors) return $processors[strtolower($pro_name)]; global $DBInfo; if ($DBInfo->include_path) $dirs=explode(':',$DBInfo->include_path); else $dirs=array('.'); foreach ($dirs as $dir) { $handle= @opendir($dir.'/plugin/processor'); if (!$handle) continue; while ($file= readdir($handle)) { if (is_dir($dir."/plugin/processor/$file")) continue; $name= substr($file,0,-4); $processors[strtolower($name)]= $name; } } if (is_array($DBInfo->myprocessors)) $processors=array_merge($processors,$DBInfo->myprocessors); return $processors[strtolower($pro_name)]; } function getFilter($filtername) { static $filters=array(); if ($filters) return $filters[strtolower($filtername)]; global $DBInfo; if ($DBInfo->include_path) $dirs=explode(':',$DBInfo->include_path); else $dirs=array('.'); foreach ($dirs as $dir) { $handle= @opendir($dir.'/plugin/filter'); if (!$handle) continue; while ($file= readdir($handle)) { if (is_dir($dir."/plugin/filter/$file")) continue; $name= substr($file,0,-4); $filters[strtolower($name)]= $name; } } if (is_array($DBInfo->filters)) $filters=array_merge($filters,$DBInfo->filters); return $filters[strtolower($filtername)]; } if (!function_exists ('bindtextdomain')) { $locale = array(); function gettext ($text) { global $locale; if (!empty ($locale[$text])) return $locale[$text]; return $text; } function _ ($text) { return gettext($text); } } function goto_form($action,$type="",$form="") { if ($type==1) { return "
Title Contents 
"; } else if ($type==2) { return "
"; } else if ($type==3) { return "
Title(?) Contents(/) 
"; } else { return <<
FORM; } } function kbd_handler() { global $DBInfo; if (!$DBInfo->kbd_script) return ''; $prefix=get_scriptname(); $sep= $DBInfo->query_prefix; print << /*frontpage"; /*]]>*/ EOS; } class Timer { var $timers=array(); var $total=0.0; function Timer() { $mt= explode(" ",microtime()); $this->save=$mt[0]+$mt[1]; } function Check($name="default") { $mt= explode(" ",microtime()); $now=$mt[0]+$mt[1]; $diff=$now-$this->save; $this->save=$now; if (isset($this->timers[$name])) $this->timers[$name]+=$diff; else $this->timers[$name]=$diff; $this->total+=$diff; } function Write() { while (list($name,$d) = each($this->timers)) { $out.=sprintf("%10s :%3.4f sec (%3.2f %%)\n",$name,$d,$d/$this->total*100); } return $out; } function Total() { return sprintf("%4.4f sec\n",$this->total); } function Clean() { $this->timers=array(); } } class MetaDB_dba extends MetaDB { var $metadb; var $aux=array(); function MetaDB_dba($file,$type="db3") { if (function_exists('dba_open')) $this->metadb=@dba_open($file.".cache","r",$type); } function close() { dba_close($this->metadb); } function attachDB($db) { $this->aux=$db; } function getSisterSites($pagename,$mode=1) { if (!$this->aux->hasPage($pagename) and !dba_exists($pagename,$this->metadb)) { if ($mode) return ''; return false; } if (!$mode) return true; $sisters=dba_fetch($pagename,$this->metadb); $addons=$this->aux->getSisterSites($pagename,$mode); if ($sisters) $ret='[wiki:'.str_replace(' ',":$pagename] [wiki:",$sisters).":$pagename]"; $pagename=_preg_search_escape($pagename); if ($addons) $ret=rtrim($addons.' '.$ret); if ($mode==1 and strlen($ret) > 80) return "[wiki:TwinPages:$pagename]"; return preg_replace("/((:[^\s]+){2})(\:$pagename)/","\\1",$ret); } function getTwinPages($pagename,$mode=1) { if (!$this->aux->hasPage($pagename) and !dba_exists($pagename,$this->metadb)) { if ($mode) return array(); return false; } if (!$mode) return true; $twins=dba_fetch($pagename,$this->metadb); $addons=$this->aux->getTwinPages($pagename,$mode); $ret=array(); if ($twins) { $ret="wiki:".str_replace(" ",":$pagename wiki:",$twins). ":$pagename"; $pagename=_preg_search_escape($pagename); $ret= preg_replace("/((:[^\s]+){2})(\:$pagename)/","\\1",$ret); $ret= explode(' ',$ret); } if ($addons) $ret=array_merge($addons,$ret); if (sizeof($ret) > 8) { if ($mode==1) return array("TwinPages:$pagename"); $ret=array_map(create_function('$a','return " * $a";'),$ret); } return $ret; } function hasPage($pagename) { if (dba_exists($pagename,$this->metadb)) return true; return false; } function getAllPages() { if ($this->keys) return $this->keys; for ($key= dba_firstkey($this->metadb); $key !== false; $key= dba_nextkey($this->metadb)) { $keys[] = $key; } $this->keys=$keys; return $keys; } function getLikePages($needle,$count=500) { $keys=array(); if (!$needle) return $keys; for ($key= dba_firstkey($this->metadb); $key !== false; $key= dba_nextkey($this->metadb)) { if (preg_match("/($needle)/i",$key)) { $keys[] = $key; $count--; } if ($count < 0) break; } return $keys; } } class MetaDB { function MetaDB() { return; } function getSisterSites($pagename,$mode=1) { if ($mode) return ''; return false; } function getTwinPages($pagename,$mode=1) { if ($mode) return array(); return false; } function hasPage($pgname) { return false; } function getAllPages() { return array(); } function getLikePages() { return array(); } function close() { } } class MetaDB_text extends MetaDB { var $db=array(); function MetaDB_text($file) { $lines=file($file); foreach ($lines as $line) { if ($line[0]=='#' or !trim($line)) continue; # support three types of aliases # # destdest1,dest2,dest3,... # if (($p=strpos($line,'>')) !== false) { list($key,$list)=explode('>',trim($line),2); $this->db[$key]=$list; } else { if (($p=strpos($line,'<')) !== false) { list($val,$keys)=explode('<',trim($line),2); $keys=explode(',',$keys); } else { $keys=explode(',',trim($line)); $val=array_shift($keys); } foreach ($keys as $k) { $this->db[$k]=$this->db[$k] ? $this->db[$k].','.$val:$val; } } } } function hasPage($pagename) { if ($this->db[$pagename]) return true; return false; } function getTwinPages($pagename,$mode=1) { if (!$this->db[$pagename]) { if ($mode) return array(); return false; } if (!$mode) return true; $twins=$this->db[$pagename]; $ret='[wiki:'.str_replace(',',"] [wiki:",$twins).']'; $pagename=_preg_search_escape($pagename); $ret= preg_replace("/((:[^\s]+){2})(\:$pagename)/","\\1",$ret); return explode(' ',$ret); } function getSisterSites($pagename,$mode=1) { if (!$this->db[$pagename]) { if ($mode) return ''; return false; } if (!$mode) return true; $twins=$this->db[$pagename]; $ret='[wiki:'.str_replace(',',"] [wiki:",$twins).']'; return $ret; } function getAllPages() { return array_keys($this->db); } } class Counter_dba { var $counter; var $DB; function Counter_dba($DB) { if (!function_exists('dba_open')) return; if (!file_exists($DB->data_dir."/counter.db")) $this->counter=dba_open($DB->data_dir."/counter.db","n",$DB->dba_type); else $this->counter=@dba_open($DB->data_dir."/counter.db","w",$DB->dba_type); $this->DB=&$DB; } function incCounter($pagename,$options="") { if ($this->DB->owners and in_array($options['id'],$this->DB->owners)) return; $count=dba_fetch($pagename,$this->counter); if (!$count) $count=0; $count++; dba_replace($pagename,$count,$this->counter); } function pageCounter($pagename) { $count=dba_fetch($pagename,$this->counter); return $count; } function close() { dba_close($this->counter); } } class Counter { function Counter($DB="") { } function incCounter($page,$options="") { } function pageCounter($page) { return 1; } function close() { } } class Security { var $DB; function Security($DB="") { $this->DB=$DB; } # $options[page]: pagename # $options[id]: user id function readable($options="") { return 1; } function writable($options="") { if (!$options['page']) return 0; # XXX return $this->DB->_isWritable($options['page']); } function validuser($options="") { return 1; } function is_allowed($action="read",$options) { return 1; } function is_protected($action="read",$options) { # password protected POST actions $protected_actions=array( "deletepage","deletefile","rename","rcspurge","rcs","chmod","backup","restore"); $action=strtolower($action); if (in_array($action,$protected_actions)) { return 1; } return 0; } function is_valid_password($passwd,$options) { return $this->DB->admin_passwd==crypt($passwd,$this->DB->admin_passwd); } } function getConfig($configfile, $options=array()) { if (!file_exists($configfile)) { if ($options['init']) { $script= preg_replace("/\/([^\/]+)\.php$/","/monisetup.php", $_SERVER['SCRIPT_NAME']); header("Location: $script"); exit; } return array(); } #foreach ($options as $key=>$val) $$key=$val; extract($options); unset($key,$val,$options); include($configfile); unset($configfile); $config=get_defined_vars(); # print_r($config); # if ($menu) $config['menu']=$menu; # if ($icons) $config['icons']=$icons; # if ($icon) $config['icon']=$icon; # if ($actions) $config['actions']=$actions; if (isset($config['include_path'])) ini_set('include_path',$config['include_path']); return $config; } class WikiDB { function WikiDB($config=array()) { # Default Configuations $this->frontpage='FrontPage'; $this->sitename='UnnamedWiki'; $this->upload_dir= 'pds'; $this->data_dir= './data'; $this->query_prefix='/'; $this->umask= 02; $this->charset='utf-8'; $this->lang='auto'; $this->dba_type="db3"; $this->use_counter=0; $this->text_dir= $this->data_dir.'/text'; $this->cache_dir= $this->data_dir.'/cache'; $this->vartmp_dir= '/var/tmp'; $this->intermap= $this->data_dir.'/intermap.txt'; $this->interwikirule=''; $this->editlog_name= $this->data_dir.'/editlog'; $this->shared_intermap=$this->data_dir."/text/InterMap"; $this->shared_metadb=$this->data_dir."/metadb"; $this->url_prefix= '/moniwiki'; $this->imgs_dir= $this->url_prefix.'/imgs'; $this->css_dir= 'css'; $this->css_url= $this->url_prefix.'/css/default.css'; $this->kbd_script= $this->url_prefix.'/css/kbd.js'; $this->logo_img= $this->imgs_dir.'/moniwiki-logo.gif'; $this->logo_page= $this->frontpage; $this->logo_string= '[logo]'; $this->metatags=''; $this->use_smileys=1; $this->hr="
"; $this->date_fmt= 'Y-m-d'; $this->date_fmt_rc= 'D d M Y'; $this->date_fmt_blog= 'M d, Y'; $this->datetime_fmt= 'Y-m-d H:i:s'; #$this->changed_time_fmt = ' . . . . [h:i a]'; $this->changed_time_fmt= ' [h:i a]'; # used by RecentChanges macro $this->admin_passwd= 'daEPulu0FLGhk'; # default value moniwiki $this->purge_passwd= ''; $this->rcs_user='root'; $this->actions= array('DeletePage','LikePages'); $this->show_hosts= TRUE; $this->iconset='moni'; $this->css_friendly='0'; $this->goto_type=''; $this->goto_form=''; $this->template_regex='[a-z]Template$'; $this->category_regex='^Category[A-Z]'; $this->notify=0; $this->trail=0; $this->origin=0; $this->arrow=" › "; $this->home='Home'; $this->diff_type='fancy'; $this->hr_type='simple'; $this->nonexists='simple'; $this->use_category=1; $this->use_camelcase=1; $this->use_sistersites=1; $this->use_singlebracket=1; $this->use_twinpages=1; $this->use_hostname=1; $this->email_guard='hex'; $this->pagetype=array(); $this->smiley='wikismiley'; $this->convmap=array(0xac00, 0xd7a3, 0x0000, 0xffff); /* for euc-kr */ $this->theme=''; $this->inline_latex=0; $this->processors=array(); $this->perma_icon='#'; $this->purple_icon='#'; $this->use_purple=0; $this->version_class='RCS'; $this->title_rule='((?<=[a-z0-9]|[B-Z]{2})([A-Z][a-z]))'; # set user-specified configuration if ($config) { # read configurations foreach ($config as $key=>$val) $this->$key=$val; } if (!$this->purge_passwd) $this->purge_passwd=$this->admin_passwd; # if (!$this->menu) { $this->menu= array($this->frontpage=>"accesskey='1'",'FindPage'=>"accesskey='4'",'TitleIndex'=>"accesskey='3'",'RecentChanges'=>"accesskey='2'"); $this->menu_bra=""; $this->menu_cat="|"; $this->menu_sep="|"; } // for lower version compatibility $this->imgs_dir_url=$this->imgs_dir.'/'; $this->imgs_dir_interwiki=$this->imgs_dir.'/'; $imgs_realdir=basename($this->imgs_dir); if (file_exists($imgs_realdir.'/interwiki/'.'moniwiki-16.png')) $this->imgs_dir_interwiki=$this->imgs_dir.'/interwiki/'; if (empty($this->icon)) { $iconset=$this->iconset; $imgdir=$this->imgs_dir; // for lower version compatibility $ext='png'; if (is_dir($imgs_realdir.'/'.$iconset)) $iconset.='/'; else $iconset.='-'; if (!file_exists($imgs_realdir.'/'.$iconset.'home.png')) $ext='gif'; if (file_exists($imgs_realdir.'/'.$iconset.'http.png')) $this->imgs_dir_url=$this->imgs_dir.'/'.$iconset; $this->icon['upper']="U"; $this->icon['edit']="E"; $this->icon['diff']="D"; $this->icon['del']="(del)"; $this->icon['info']="I"; $this->icon['rss']="RSS"; $this->icon['show']="R"; $this->icon['find']="S"; $this->icon['help']="H"; $this->icon['www']="www"; $this->icon['mailto']="M"; $this->icon['create']="N"; $this->icon['new']="U"; $this->icon['updated']="U"; $this->icon['user']="UserPreferences"; $this->icon['home']="M"; $this->icon['main']="^"; $this->icon['print']="P"; $this->icon['attach']="@"; $this->icon['external']="[]"; $this->icon_sep=" "; $this->icon_bra=" "; $this->icon_cat=" "; } if (empty($this->icons)) { $this->icons=array( array("","?action=edit",$this->icon['edit'],"accesskey='e'"), array("","?action=diff",$this->icon['diff'],"accesskey='c'"), array("","",$this->icon['show']), array("FindPage","",$this->icon['find']), array("","?action=info",$this->icon['info']), array("","?action=subscribe",$this->icon['mailto']), array("HelpContents","",$this->icon['help']), ); } # load smileys if ($this->use_smileys){ include_once($this->smiley.".php"); # set smileys rule if ($this->shared_smileymap and file_exists($this->shared_smileymap)) { $myicons=array(); $lines=file($this->shared_smileymap); foreach ($lines as $l) { if ($l[0] != ' ') continue; if (!preg_match('/^ \*\s*([^ ]+)\s(.*)$/',$l,$m)) continue; $name=_preg_escape($m[1]); list($img,$extra)=explode(' ',$m[2]); if (preg_match('/^(http|ftp):.*\.(png|jpg|jpeg|gif)/',$img)) { $myicons[$name]=array(16,16,0,$img); } else { continue; } } #print_r($myicons); $smileys=array_merge($smileys,$myicons); } $tmp=array_keys($smileys); $tmp=array_map("_preg_escape",$tmp); $rule=join($tmp,"|"); $this->smiley_rule=$rule; $this->smileys=$smileys; } # ??? Number of lines output per each flush() call. // $this->lines_per_flush = 10; # ??? Is mod_rewrite being used to translate 'WikiWord' to // $this->rewrite = true; if ($this->path) putenv("PATH=".$this->path); if ($this->rcs_user) putenv('LOGNAME='.$this->rcs_user); if ($this->timezone) putenv('TZ='.$this->timezone); $this->interwiki=null; if ($this->use_alias) $this->alias=new MetaDB_text($this->aliaspage); else $this->alias=new MetaDB(); if ($this->shared_metadb) $this->metadb=new MetaDB_dba($this->shared_metadb,$this->dba_type); if (!$this->metadb->metadb) { if ($this->alias) $this->metadb=$this->alias; else $this->metadb=new MetaDB(); } else { $this->metadb->attachDB($this->alias); } if ($this->use_counter) $this->counter=new Counter_dba($this); if (!$this->counter->counter) $this->counter=new Counter(); if (isset($this->security_class)) { include_once("plugin/security/$this->security_class.php"); $class="Security_".$this->security_class; $this->security=new $class ($this); } else $this->security=new Security($this); if ($this->filters) { if (!is_array($this->filters)) { $this->filters=preg_split('/(\||,)/',$this->filters); } } if ($this->postfilters) { if (!is_array($this->postfilters)) { $this->postfilters=preg_split('/(\||,)/',$this->postfilters); } } # check and prepare $url_mappings if ($this->url_mappings) { if (!is_array($this->url_mappings)) { $maps=explode("\n",$this->url_mappings); $tmap=array(); $rule=''; foreach ($maps as $map) { if (strpos($map,' ')) { $key=strtok($map,' '); $val=strtok(''); $tmap["$key"]=$val; $rule.=preg_quote($key,'/').'|'; } } $this->url_mappings=$tmap; $this->url_mapping_rule=substr($rule,0,-1); } } } function Close() { $this->metadb->close(); $this->counter->close(); } function _getPageKey($pagename) { # normalize a pagename to uniq key # moinmoin style internal encoding #$name=rawurlencode($pagename); #$name=strtr($name,"%","_"); #$name=preg_replace("/%([a-f0-9]{2})/ie","'_'.strtolower('\\1')",$name); #$name=preg_replace(".","_2e",$name); $name=preg_replace("/([^a-z0-9]{1})/ie","'_'.strtolower(dechex(ord(substr('\\1',-1))))",$pagename); #$name=preg_replace("/([^a-z0-9]{1})/ie","'_'.strtolower(dechex(ord('\\1')))",$pagename); return $name; } function getPageKey($pagename) { #$name=preg_replace("/([^a-z0-9]{1})/ie","'_'.strtolower(dechex(ord('\\1')))",$pagename); $name=preg_replace("/([^a-z0-9]{1})/ie","'_'.strtolower(dechex(ord(substr('\\1',-1))))",$pagename); return $this->text_dir . '/' . $name; } function pageToKeyname($pagename) { return preg_replace("/([^a-z0-9]{1})/ie","'_'.strtolower(dechex(ord(substr('\\1',-1))))",$pagename); #return preg_replace("/([^a-z0-9]{1})/ie","'_'.strtolower(dechex(ord('\\1')))",$pagename); } function hasPage($pagename) { if (!$pagename) return false; $name=$this->getPageKey($pagename); return @file_exists($name); } function getPage($pagename,$options="") { return new WikiPage($pagename,$options); } function keyToPagename($key) { # return preg_replace("/_([a-f0-9]{2})/e","chr(hexdec('\\1'))",$key); # $pagename=preg_replace("/_([a-f0-9]{2})/","%\\1",$key); # $pagename=str_replace("_","%",$key); $pagename=strtr($key,'_','%'); return rawurldecode($pagename); } function getPageLists($options=array()) { $pages = array(); $pcid=md5(serialize($options)); $pc=new Cache_text('pagelist'); if (filemtime($this->text_dir) < $pc->mtime($pcid) and $pc->exists($pcid)) { $list=unserialize($pc->fetch($pcid)); if (is_array($list)) return $list; } $handle = opendir($this->text_dir); if (!$options) { while ($file = readdir($handle)) { if (is_dir($this->text_dir."/".$file)) continue; $pages[] = $this->keyToPagename($file); } closedir($handle); $pc->update($pcid,serialize($pages)); return $pages; } else if ($options['limit']) { # XXX while ($file = readdir($handle)) { if (is_dir($this->text_dir."/".$file)) continue; if (filemtime($this->text_dir."/".$file) > $options['limit']) $pages[] = $this->keyToPagename($file); } closedir($handle); } else if ($options['count']) { $count=$options['count']; while (($file = readdir($handle)) && $count > 0) { if (is_dir($this->text_dir."/".$file)) continue; $pages[] = $this->keyToPagename($file); $count--; } closedir($handle); } else if ($options['date']) { while ($file = readdir($handle)) { if (is_dir($this->text_dir."/".$file)) continue; $mtime=filemtime($this->text_dir."/".$file); $pagename= $this->keyToPagename($file); $pages[$pagename]= $mtime; } closedir($handle); } $pc->update($pcid,serialize($pages)); return $pages; } function getLikePages($needle) { $pages= array(); $all= $this->getPageLists(); foreach ($all as $page) { if (preg_match("/($needle)/",$page)) $pages[] = $page; } return $pages; } function getCounter() { return sizeof($this->getPageLists()); } function addLogEntry($page_name, $remote_name,$comment,$action="SAVE") { $user=new User(); if ($user->id != 'Anonymous') { $udb=new UserDB($this); $udb->checkUser($user); } $comment=strtr($comment,"\t"," "); $fp_editlog = fopen($this->editlog_name, 'a+'); $time= time(); if ($this->use_hostname) $host= gethostbyaddr($remote_name); else $host= $remote_name; $page_name=trim($page_name); $msg="$page_name\t$remote_name\t$time\t$host\t$user->id\t$comment\t$action\n"; fwrite($fp_editlog, $msg); fclose($fp_editlog); } function editlog_raw_lines($days,$opts=array()) { $lines=array(); $time_current= time(); $secs_per_day= 24*60*60; if ($opts['ago']) { $date_from= $time_current - ($opts['ago'] * $secs_per_day); $date_to= $date_from + ($days * $secs_per_day); } else { if ($opts['items']) { $date_from= $time_current - (365 * $secs_per_day); } else { $date_from= $time_current - ($days * $secs_per_day); } $date_to= $time_current; } $check=$date_to; $itemnum=$opts['items'] ? $opts['items']:200; $fp= fopen($this->editlog_name, 'r'); while (is_resource($fp) and ($fz=filesize($this->editlog_name))>0){ fseek($fp,0,SEEK_END); if ($fz <= 1024) { fseek($fp,0); $ll=rtrim(fread($fp,1024)); $lines=array_reverse(explode("\n",$ll)); break; } $a=-1; // hack, don't read last \n char. $last=''; fseek($fp,0,SEEK_END); while($date_from < $check and !feof($fp)){ $rlen=$fz + $a; if ($rlen > 1024) { $rlen=1024;} else if ($rlen <= 0) break; $a-=$rlen; fseek($fp,$a,SEEK_END); $l=fread($fp,$rlen); if ($rlen != 1024) $l="\n".$l; // hack, for the first log entry. while(($p=strrpos($l,"\n"))!==false) { $line=substr($l,$p+1).$last; $l=substr($l,0,$p); $dumm=explode("\t",$line,4); $check=$dumm[2]; if ($date_from>$check) break; if ($date_to>$check) { $lines[]=$line; $pages[$dumm[0]]=1; if (sizeof($pages) >= $itemnum) { $check=0; break; } } $last=''; } $last=$l.$last; } #print $a; #print sizeof($lines); #print_r($lines); fclose($fp); break; } if ($opts['quick']) { foreach($lines as $line) { $dum=explode("\t",$line,2); if ($keys[$dum[0]]) continue; $keys[$dum[0]]=1; $out[]=$line; } $lines=$out; } return $lines; } function _replace_variables($body,$options) { if ($this->template_regex && preg_match("/$this->template_regex/",$options['page'])) return $body; $time=gmdate("Y-m-d\TH:i:s"); if ($options['id'] == 'Anonymous') { $id=$options['name'] ? _stripslashes($options['name']):$_SERVER['REMOTE_ADDR']; } else { $id=$options['id']; if (!preg_match('/([A-Z][a-z0-9]+){2,}/',$id)) $id='['.$id.']'; } $body=preg_replace("/@DATE@/","[[Date($time)]]",$body); $body=preg_replace("/@USERNAME@/","$id",$body); $body=preg_replace("/@TIME@/","[[DateTime($time)]]",$body); $body=preg_replace("/@SIG@/","-- $id [[DateTime($time)]]",$body); $body=preg_replace("/@PAGE@/",$options['page'],$body); $body=preg_replace("/@date@/","$time",$body); return $body; } function savePage(&$page,$comment="",$options=array()) { $user=new User(); if ($user->id != 'Anonymous') { $udb=new UserDB($this); $udb->checkUser($user); } else { if (strlen($comment)>80) $comment=''; } $REMOTE_ADDR=$_SERVER['REMOTE_ADDR']; $comment=escapeshellcmd($comment); $keyname=$this->_getPageKey($page->name); $key=$this->text_dir."/$keyname"; $fp=fopen($key,"w"); if (!$fp) return -1; flock($fp,LOCK_EX); $body=$this->_replace_variables($page->body,$options); $page->write($body); fwrite($fp, $body); flock($fp,LOCK_UN); fclose($fp); $log=$REMOTE_ADDR.';;'.$user->id.';;'.$comment; if ($this->version_class) { $class=getModule('Version',$this->version_class); $version=new $class ($this); $ret=$version->ci($page->name,$log); } # check minor edits XXX $minor=0; if ($this->use_minorcheck or $options['minorcheck']) { $info=$page->get_info(); if ($info[1]) { eval('$check='.$info[1].';'); if (abs($check) < 3) $minor=1; } } if (!$options['minor'] and !$minor) $this->addLogEntry($keyname, $REMOTE_ADDR,$comment,"SAVE"); return 0; } function deletePage($page,$options='') { $REMOTE_ADDR=$_SERVER['REMOTE_ADDR']; $comment=$options['comment']; $user=new User(); if ($user->id != 'Anonymous') { $udb=new UserDB($this); $udb->checkUser($user); } $keyname=$this->_getPageKey($page->name); if ($this->version_class) { $class=getModule('Version',$this->version_class); $version=new $class ($this); $log=$REMOTE_ADDR.';;'.$user->id.';;'.$comment; $ret=$version->ci($page->name,$log); if ($options['history']) $version->delete($page->name); } $delete=@unlink($this->text_dir."/$keyname"); $this->addLogEntry($keyname, $REMOTE_ADDR,$comment,"SAVE"); $handle= opendir($this->cache_dir); while ($file= readdir($handle)) { if ($file[0] != '.' and is_dir("$this->cache_dir/$file")) { $cache= new Cache_text($file); $cache->remove($page->name); # blog cache if ($file == 'blogchanges') { $handle2= opendir("$this->cache_dir/$file"); while ($fcache= readdir($handle2)) { #print $keyname.';'.$fcache."\n"; if (preg_match("/\d+_2e$keyname$/",$fcache)) unlink("$this->cache_dir/$file/$fcache"); } } # for blog cache } } } function renamePage($pagename,$new,$options='') { $REMOTE_ADDR=$_SERVER['REMOTE_ADDR']; $okey=$this->getPageKey($pagename); $nkey=$this->getPageKey($new); $okeyname=$this->_getPageKey($pagename); $keyname=$this->_getPageKey($new); rename($okey,$nkey); $newdir=$this->upload_dir.'/'.$keyname; $olddir=$this->upload_dir.'/'.$this->_getPageKey($pagename); if (!file_exists($newdir) and file_exists($olddir)) rename($olddir,$newdir); if ($options['history'] && $this->version_class) { $class=getModule('Version',$this->version_class); $version=new $class ($this); $version->rename($pagename,$new); } $comment=sprintf(_("Rename %s to %s"),$pagename,$new); $this->addLogEntry($okeyname, $REMOTE_ADDR,'',"SAVE"); $this->addLogEntry($keyname, $REMOTE_ADDR,$comment,"SAVE"); } function _isWritable($pagename) { $key=$this->getPageKey($pagename); # True if page can be changed return @is_writable($key) or !@file_exists($key); } function getPerms($pagename) { $key=$this->getPageKey($pagename); if (file_exists($key)) return fileperms($key); return 0666; } function setPerms($pagename,$perms) { umask(0700); $key=$this->getPageKey($pagename); if (file_exists($key)) chmod($key,$perms); } } class Version_RCS { var $DB; function Version_RCS($DB) { $this->DB=$DB; $this->NULL=''; if(getenv("OS")!="Windows_NT") $this->NULL=' 2>/dev/null'; if ($DB->rcs_error_log) $this->NULL=''; } function _filename($pagename) { # have to be factored out XXX # Return filename where this word/page should be stored. return $this->DB->getPageKey($pagename); } function co($pagename,$rev,$opt='') { $filename= $this->_filename($pagename); $fp=@popen("co -x,v/ -q -p\"".$rev."\" ".$filename.$this->NULL,"r"); $out=''; if (is_resource($fp)) { while (!feof($fp)) { $line=fgets($fp,2048); $out.= $line; } pclose($fp); } return $out; } function ci($pagename,$log) { $key=$this->_filename($pagename); $pagename=escapeshellcmd($pagename); $fp=@popen("ci -l -x,v/ -q -t-\"".$pagename."\" -m\"".$log."\" ".$key.$this->NULL,"r"); if ($fp) pclose($fp); } function rlog($pagename,$rev='',$opt='',$oldopt='') { if ($rev) $rev = "-r$rev"; $filename=$this->_filename($pagename); $fp= popen("rlog $opt $oldopt -x,v/ $rev ".$filename.$this->NULL,"r"); $out=''; if ($fp) { while (!feof($fp)) { $line=fgets($fp,1024); $out .= $line; } pclose($fp); } return $out; } function diff($pagename,$rev="",$rev2="") { $rev = escapeshellcmd($rev); $rev2 = escapeshellcmd($rev2); if ($rev) $option="-r$rev "; if ($rev2) $option.="-r$rev2 "; $filename=$this->_filename($pagename); $fp=popen("rcsdiff -x,v/ -u $option ".$filename.$this->NULL,'r'); if (!$fp) return ''; while (!feof($fp)) { # trashing first two lines $line=fgets($fp,1024); if (preg_match('/^--- /',$line)) { $line=fgets($fp,1024); break; } } while (!feof($fp)) { $line=fgets($fp,1024); $out.= $line; } pclose($fp); return $out; } function purge($pagename,$rev) { } function delete($pagename) { $keyname=$this->DB->_getPageKey($pagename); @unlink($this->DB->text_dir."/RCS/$keyname,v"); } function rename($pagename,$new) { $keyname=$this->DB->_getPageKey($new); $oname=$this->DB->_getPageKey($pagename); rename($this->DB->text_dir."/RCS/$oname,v", $this->DB->text_dir."/RCS/$keyname,v"); } function get_rev($pagename,$mtime='',$last=0) { if ($last==1) { $tag='head:'; $opt='-h'; } else $tag='revision'; if ($mtime) { $date=gmdate('Y/m/d H:i:s',$mtime); if ($date) { $opt="-d\<'$date'"; $tag='revision'; } } $out= $this->rlog($pagename,'',$opt); if ($out) { for ($line=strtok($out,"\n"); $line !== false;$line=strtok("\n")) { preg_match("/^$tag\s+([\d\.]+)$/",$line,$match); if ($match[1]) { $rev=$match[1]; break; } } } return $rev; } } class Cache_text { function Cache_text($arena) { global $DBInfo; umask(000); $this->cache_dir=$DBInfo->cache_dir."/$arena"; if (!file_exists($this->cache_dir)) mkdir($this->cache_dir, 0777); } function getKey($pagename) { $name=preg_replace("/([^a-z0-9]{1})/ie","'_'.strtolower(dechex(ord('\\1')))",$pagename); return $this->cache_dir . '/' . $name; } function update($pagename,$val,$mtime="") { if (!$pagename) return false; $key=$this->getKey($pagename); if (file_exists($key) and !is_writable($key)) return false; if ($mtime and ($mtime <= $this->mtime($key))) return false; if (is_array($val)) $val=join("\n",array_keys($val))."\n"; else $val=str_replace("\r","",$val); $this->_save($key,$val); return true; } function _save($key,$val) { umask(011); $fp=fopen($key,"w+"); if ($fp) { flock($fp,LOCK_EX); fwrite($fp,$val); flock($fp,LOCK_UN); fclose($fp); } } function _del($key) { unlink($key); } function fetch($pagename,$mtime="") { $key=$this->getKey($pagename); if ($this->_exists($key)) { if (!$mtime) { return $this->_fetch($key); } else if ($this->_mtime($key) > $mtime) return $this->_fetch($key); } return false; } function exists($pagename) { $key=$this->getKey($pagename); return $this->_exists($key); } function _exists($key) { return @file_exists($key); } function _fetch($key) { $fp=fopen($key,"r"); $content=''; if (($size=filesize($key)) >0) $content=fread($fp,$size); fclose($fp); return $content; } function _mtime($key) { return filemtime($key); } function mtime($pagename) { $key=$this->getKey($pagename); if ($this->_exists($key)) return $this->_mtime($key); return 0; } # function needsUpdate($pagename) { # $key=$this->getKey($pagename); # } function remove($pagename) { $key=$this->getKey($pagename); if ($this->_exists($key)) unlink($key); } } class WikiPage { var $fp; var $filename; var $rev; var $body; function WikiPage($name,$options="") { if ($options['rev']) $this->rev=$options['rev']; else $this->rev=0; # current rev. $this->name= $name; $this->filename= $this->_filename($name); $this->urlname= _rawurlencode($name); $this->body= ""; $this->title=get_title($name); #$this->title=preg_replace("/((?<=[A-Za-z0-9])[A-Z][a-z0-9])/"," \\1",$name); } function _filename($pagename) { # have to be factored out XXX # Return filename where this word/page should be stored. global $DBInfo; return $DBInfo->getPageKey($pagename); } function exists() { # Does a page for the given word already exist? return @file_exists($this->filename); } # function writable() { # # True if page can be changed # return is_writable($this->filename) or !$this->exists(); # } function mtime () { return @filemtime($this->filename); } function size() { if ($this->fsize) return $this->fsize; $this->fsize=@filesize($this->filename); return $this->fsize; } function get_raw_body($options='') { global $DBInfo; if ($this->body && !$options['rev']) return $this->body; if ($this->rev || $options['rev']) { if ($options['rev']) $rev=$options['rev']; else $rev=$this->rev; if ($DBInfo->version_class) { $class=getModule('Version',$DBInfo->version_class); $version=new $class ($DBInfo); $out = $version->co($this->name,$rev); return $out; } else { return _("Version info does not supported in this wiki"); } } $fp=@fopen($this->filename,"r"); if (!$fp) { if (file_exists($this->filename)) { $out="You have no permission to see this page.\n\n"; $out.="See MoniWiki/AccessControl\n"; return $out; } $out=_("File does not exists"); return $out; } $this->fsize=filesize($this->filename); if ($this->fsize > 0) $body=fread($fp,$this->fsize); fclose($fp); $this->body=$body; return $this->body; } function _get_raw_body() { $fp=@fopen($this->filename,"r"); if ($fp) { $size=filesize($this->filename); if ($size >0) $this->body=fread($fp,$size); fclose($fp); } else return ''; return $this->body; } function set_raw_body($body) { $this->body=$body; } function update() { if ($this->body) $this->write($this->body); } function write($body) { #if ($body) $this->body=$body; } function get_rev($mtime="",$last=0) { global $DBInfo; if ($DBInfo->version_class) { $class=getModule('Version',$DBInfo->version_class); $version=new $class ($DBInfo); $rev= $version->get_rev($this->name,$mtime,$last); if ($rev > 1.0) return $rev; } return ''; } function get_info($rev='') { global $DBInfo; $info=array('','','','',''); if (!$rev) $rev=$this->get_rev('',1); if (!$rev) return $info; if ($DBInfo->version_class) { $class=getModule('Version',$DBInfo->version_class); $version=new $class ($DBInfo); $out= $version->rlog($this->name,$rev,$opt); } else { return $info; } $state=0; if ($out) { for ($line=strtok($out,"\n"); $line !== false;$line=strtok("\n")) { if ($state == 0 and preg_match("/^date:\s.*$/",$line)) { $tmp=preg_replace("/date:\s(.*);\s+author:.*;\s+state:.*;/","\\1",rtrim($line)); $tmp=explode('lines:',$tmp); $info[0]=$tmp[0];$info[1]=$tmp[1]; $state=1; } else if ($state) { list($info[2],$info[3],$info[4])=explode(';;',$line,3); break; } } } return $info; } } class Formatter { var $sister_idx=1; var $group=''; var $use_purple=1; var $purple_number=0; var $java_scripts=array(); function Formatter($page="",$options="") { global $DBInfo; $this->page=$page; $this->head_num=1; $this->head_dep=0; $this->sect_num=0; $this->toc=0; $this->highlight=""; $this->prefix= get_scriptname(); $this->url_prefix= $DBInfo->url_prefix; $this->imgs_dir= $DBInfo->imgs_dir; $this->imgs_dir_interwiki=$DBInfo->imgs_dir_interwiki; $this->imgs_dir_url=$DBInfo->imgs_dir_url; $this->actions= $DBInfo->actions; $this->inline_latex= $DBInfo->inline_latex == 1 ? 'latex':$DBInfo->inline_latex; $this->use_purple=$DBInfo->use_purple; $this->section_edit=$DBInfo->use_sectionedit; $this->auto_linebreak=$DBInfo->auto_linebreak; $this->nonexists=$DBInfo->nonexists; $this->url_mappings=$DBInfo->url_mappings; $this->url_mapping_rule=$DBInfo->url_mapping_rule; $this->css_friendly=$DBInfo->css_friendly; $this->use_smartdiff=$DBInfo->use_smartdiff; $this->use_easyalias=$DBInfo->use_easyalias; $this->submenu=$DBInfo->submenu; $this->email_guard=$DBInfo->email_guard; if (($p=strpos($page->name,"~"))) $this->group=substr($page->name,0,$p+1); $this->sister_on=1; $this->sisters=array(); $this->foots=array(); $this->pagelinks=array(); $this->aliases=array(); $this->icons=""; $this->quote_style=$DBInfo->quote_style? $DBInfo->quote_style:'quote'; $this->themedir= $DBInfo->themedir ? $DBInfo->themedir:dirname(__FILE__); $this->themeurl= $DBInfo->themeurl ? $DBInfo->themeurl:$DBInfo->url_prefix; $this->set_theme($options['theme']); $this->NULL=''; if(getenv("OS")!="Windows_NT") $this->NULL=' 2>/dev/null'; $this->external_on=0; $this->external_target=''; if ($DBInfo->external_target) $this->external_target='target="'.$DBInfo->external_target.'"'; $this->baserule=array("/<([^\s<>])/", "/'''([^']*)'''/","/(?baserepl=array("<\\1", "\\1","\\1", "\\1","\\1", "`\\1'","\\1", "\$formatter->$DBInfo->hr_type"."_hr('\\1')", "
", "\\1", "\\1", "\\1", "\\1", "\\1", "\\1", #"
\n", ); # NoSmoke's MultiLineCell hack $this->extrarule=array("/{{\|(.*)\|}}/","/{{\|/","/\|}}/"); $this->extrarepl=array("
\\1
","
","
"); # set smily_rule,_repl if ($DBInfo->smileys) { $this->smiley_rule='/(?<=\s|^|>)('.$DBInfo->smiley_rule.')(?=\s|$)/e'; $this->smiley_repl="\$formatter->smiley_repl('\\1')"; #$this->baserule[]=$smiley_rule; #$this->baserepl[]=$smiley_repl; } $this->footrule="\[\*[^\]]*\s[^\]]+\]"; $this->cache= new Cache_text("pagelinks"); $this->bcache= new Cache_text("backlinks"); } function set_wordrule($pis=array()) { global $DBInfo; $camelcase= isset($pis['#camelcase']) ? $pis['#camelcase']: $DBInfo->use_camelcase; $sbracket= isset($pis['#singlebracket']) ? $pis['#singlebracket']: $DBInfo->use_singlebracket; #$punct="<\"\'}\]\|;,\.\!"; $punct="<\'}\]\)\|;\.\!"; # , is omitted for the WikiPedia $url="wiki|http|https|ftp|nntp|news|irc|telnet|mailto|file|attachment"; if ($DBInfo->url_schemas) $url.='|'.$DBInfo->url_schemas; $urlrule="((?:$url):\"[^\"]+\"[^\s$punct]*|(?:$url):([^\s$punct]|(\.?[^\s$punct]))+)"; #$urlrule="((?:$url):(\.?[^\s$punct])+)"; #$urlrule="((?:$url):[^\s$punct]+(\.?[^\s$punct]+)+\s?)"; # solw slow slow #(?P(?:/?[A-Z]([a-z0-9]+|[A-Z]*(?=[A-Z][a-z0-9]|\b))){2,}) $this->wordrule= # single bracketed rule [http://blah.blah.com Blah Blah] "(\[\^?($url):[^\s\]]+(\s[^\]]+)?\])|". # InterWiki # strict but slow #"\b(".$DBInfo->interwikirule."):([^<>\s\'\/]{1,2}[^\(\)<>\s\']+\s{0,1})|". #"\b([A-Z][a-zA-Z]+):([^<>\s\'\/]{1,2}[^\(\)<>\s\']+\s{0,1})|". #"\b([A-Z][a-zA-Z]+):([^<>\s\'\/]{1,2}[^\(\)<>\s\']+[^\(\)<>\s\',\.:\?\!]+)|". "(\b|\^?)([A-Z][a-zA-Z]+):([^\(\)<>\s\']*[^\(\)<>\s\'\",\.:\?\!]*(\s(?![\x21-\x7e]))?)"; if ($camelcase) $this->wordrule.='|'. "(?wordrule.='|'. "(?wordrule.='|'. # double bracketed rule similar with MediaWiki [[Hello World]] "(?]{1,255})\]\](?!\])|". # bracketed with double quotes ["Hello World"] "(?wordrule.= "|(?]{1,255})\](?!\])"; else # only anchor [#hello], footnote [* note] allowed $this->wordrule.= "|(?]{1,255})\](?!\])"; return $this->wordrule; } function header($args) { header($args); } function set_theme($theme="") { global $DBInfo; if ($theme) { $this->themedir.="/theme/$theme"; $this->themeurl.="/theme/$theme"; } $options['themedir']=$this->themedir; $options['themeurl']=$this->themeurl; $options['frontpage']=$DBInfo->frontpage; $this->icon=array(); if (file_exists($this->themedir."/theme.php")) { $data=getConfig($this->themedir."/theme.php",$options); #print_r($data); if ($data) { # read configurations while (list($key,$val) = each($data)) $this->$key=$val; } } $this->icon=array_merge($DBInfo->icon,$this->icon); if (!isset($this->icon_bra)) { $this->icon_bra=$DBInfo->icon_bra; $this->icon_cat=$DBInfo->icon_cat; $this->icon_sep=$DBInfo->icon_sep; } if (!$this->menu) { $this->menu=&$DBInfo->menu; } if (!isset($this->menu_bra)) { $this->menu_bra=$DBInfo->menu_bra; $this->menu_cat=$DBInfo->menu_cat; $this->menu_sep=$DBInfo->menu_sep; } if (!$this->icons) { $this->icons=&$DBInfo->icons; } if (!$this->purple_icon) { $this->purple_icon=$DBInfo->purple_icon; } if (!$this->perma_icon) { $this->perma_icon=$DBInfo->perma_icon; } } function get_redirect() { $body=$this->page->get_raw_body(); if ($body[0]=='#' and substr($body,0,10)=='#redirect ') { list($line,$dumm)=explode("\n",$body,2); list($tag,$val)=explode(" ",$line,2); if ($val) $this->pi['#redirect']=$val; } } function get_instructions(&$body) { global $DBInfo; $pikeys=array('#redirect','#action','#title','#keywords','#noindex', '#filter','#postfilter','#twinpages','#notwins','#nocomment', '#language','#camelcase','#nocamelcase', '#singlebracket','#nosinglebracket'); $pi=array(); if (!$body) { if (!$this->page->exists()) return ''; if ($this->pi) return $this->pi; $body=$this->page->get_raw_body(); $update_body=1; } if (!$this->pi['#format']) { # XXX $pos=strpos($this->page->name,'/') ? 1:0; $key=strtok($this->page->name,'/'); $format=$DBInfo->pagetype[$key]; if ($format) { $temp=explode("/",$format); $format=$temp[$pos]; } } if (!$format and $body[0] == '<') { list($line, $dummy)= explode("\n", $body,2); if (substr($line,0,6) == 'page->write($body." "); # workaround XXX #if ($update_body) $this->page->write($body); return $pi; } function highlight_repl($val,$colref=array()) { static $color=array("style='background-color:#ffff99;'", "style='background-color:#99ffff;'", "style='background-color:#99ff99;'", "style='background-color:#ff9999;'", "style='background-color:#ff99ff;'", "style='background-color:#9999ff;'", "style='background-color:#999999;'", "style='background-color:#886800;'", "style='background-color:#004699;'", "style='background-color:#990099;'"); $val=str_replace("\\\"",'"',$val); if ($val[0]=="<") return $val; $key=strtolower($val); if (isset($colref[$key])) return "$val"; return "$val"; } function write($raw) { print $raw; } function link_repl($url,$attr='') { #if ($url[0]=='<') { print $url;return $url;} $url=str_replace('\"','"',$url); if ($url[0]=="[") { $url=substr($url,1,-1); $force=1; } switch ($url[0]) { case '{': $url=substr($url,3,-3); if ($url[0]=='#' and ($p=strpos($url,' '))) { $col=strtok($url,' '); $url=strtok(''); if (!preg_match('/^#[0-9a-f]{6}$/',$col)) $col=substr($col,1); return "$url"; } else if (preg_match('/^((?:\+|\-)([1-6]?))(?=\s)(.*)$/',$url,$m)) { if ($m[2]=='') $m[1].='1'; return "$m[3]"; } if ($url[0]==' ' and in_array($url[1],array('#','-','+')) !==false) $url=substr($url,1); return "".str_replace("<","<",$url).""; # No link break; case '[': $url=substr($url,1,-1); return $this->macro_repl($url); # No link break; case '$': #return processor_latex($this,"#!latex\n".$url); $url=preg_replace('/<\/?sup>/','^',$url); if ($url[1] != '$') $opt=array('type'=>'inline'); return $this->processor_repl($this->inline_latex,$url,$opt); break; case '#': # Anchor syntax in the MoinMoin 1.1 $anchor=strtok($url,' '); return ($word=strtok('')) ? $this->link_to($anchor,$word): ""; break; case '*': return $this->macro_repl('FootNote',$url); break; case '!': $url=substr($url,1); return $url; break; default: break; } if (strpos($url,":")) { if ($url[0]=='a') # attachment: return $this->macro_repl('Attachment',substr($url,11)); if ($url[0] == '^') { $attr.=' target="_blank" '; $url=substr($url,1); $external_icon=$this->icon['external']; } if ($this->url_mappings) { $url= preg_replace('/('.$this->url_mapping_rule.')/ie',"\$this->url_mappings['\\1']",$url); } if (preg_match("/^mailto:/",$url)) { $email=substr($url,7); $link=$name=email_guard($email,$this->email_guard); $link=preg_replace('/&(?!#?[a-z0-9]+;)/i','&',$link); return $this->icon['mailto']."$link$external_icon"; } if (preg_match("/^(w|[A-Z])/",$url)) # InterWiki or wiki: return $this->interwiki_repl($url,'',$attr,$external_icon); if ($force or strpos($url," ")) { # have a space ? list($url,$text)=explode(" ",$url,2); $link=str_replace('&','&',$url); if (!$text) $text=$url; else { if (preg_match("/^(http|ftp).*\.(png|gif|jpeg|jpg)$/i",$text)) { $text=str_replace('&','&',$text); return "external_target title='$url'>$url"; } if ($this->external_on) $external_link='('.$url.')'; } if (substr($url,0,7)=='http://' and $url[7]=='?') { $link=substr($url,7); return "$text"; } $icon=strtok($url,':'); return "[$icon]". "external_target href='$link'>$text".$external_icon.$external_link; } # have no space $link=str_replace('&','&',$url); if (preg_match("/^(http|https|ftp)/",$url)) { if (preg_match("/(^.*\.(png|gif|jpeg|jpg))(([\?&]([a-z]+=[0-9a-z]+))*)$/i",$url,$match)) { $url=$match[1]; $attrs=explode('&',substr($match[3],1)); foreach ($attrs as $arg) { $name=strtok($arg,'='); $val=strtok(' '); if ($name and $val) $attr.=$name.'="'.$val.'" '; if ($name == 'align') $attr.='class="img'.ucfirst($val).'" '; } return "$link"; } } return "external_target>$url"; } else { if ($url[0]=="?") $url=substr($url,1); return $this->word_repl($url,'',$attr); } } function interwiki_repl($url,$text='',$attr='',$extra='') { global $DBInfo; if ($url[0]=="w") $url=substr($url,5); $wiki=''; # wiki:MoinMoin:FrontPage # wiki:MoinMoin/FrontPage for MoinMoin compatibility. if (preg_match('/^([A-Z][a-zA-Z]+):(.*)$/',$url,$m)) { $wiki=$m[1]; $url=$m[2]; } # wiki:"Hello World" wiki:MoinMoin:"Hello World" # [wiki:"Hello World" hello world] if ($url[0]=='"') { if (preg_match('/^((")?[^"]+\2)((\s+)?(.*))?$/',$url,$m)) { $url=$m[1]; if (isset($m[5])) $text=$m[5]; } } else if (($p=strpos($url,' '))!==false) { $dummy=substr($url,0,$p); $text=substr($url,$p+1); $url=$dummy; } if ($wiki== '') { # wiki:FrontPage (not supported in the MoinMoin) # or [wiki:FrontPage Home Page] $page=&$url; if (!$text) return $this->word_repl($page,''.$extra,$attr,1); return $this->word_repl($page,$text.$extra,$attr,1); } $page=$url; if ($page[0]=='"') # "extended wiki name" $page=substr($page,1,-1); $url=$DBInfo->interwiki[$wiki]; # invalid InterWiki name if (!$url) { $dum0=preg_replace("/(".$this->wordrule.")/e","\$this->link_repl('\\1')",$wiki); return $dum0.':'.($page?$this->link_repl($page,$text):''); } if ($page=='/') $page=''; if (substr($page,-1)==' ') $sep=''; // auto append SixSingleQuotes $urlpage=_urlencode(trim($page)); #$urlpage=trim($page); if (strpos($url,'$PAGE') === false) $url.=$urlpage; else { # GtkRef http://developer.gnome.org/doc/API/2.0/gtk/$PAGE.html # GtkRef:GtkTreeView#GtkTreeView # is rendered as http://...GtkTreeView.html#GtkTreeView $page_only=strtok($urlpage,'#?'); $query= substr($urlpage,strlen($page_only)); #if ($query and !$text) $text=strtok($page,'#?'); $url=str_replace('$PAGE',$page_only,$url).$query; } $icon=$this->imgs_dir_interwiki.strtolower($wiki).'-16.png'; $sx=16;$sy=16; if ($DBInfo->intericon[$wiki]) { $icon=$DBInfo->intericon[$wiki][2]; $sx=$DBInfo->intericon[$wiki][0]; $sy=$DBInfo->intericon[$wiki][1]; } $img="". "\"$wiki:\""; #if (!$text) $text=str_replace("%20"," ",$page); if (!$text) $text=urldecode($page); else if (preg_match("/^(http|ftp|attachment):.*\.(png|gif|jpeg|jpg)$/i",$text)) { if (substr($text,0,11)=='attachment:') { $fname=substr($text,11); $ntext=$this->macro_repl('Attachment',$fname,1); if (!file_exists($ntext)) $text=$this->macro_repl('Attachment',$fname); else { $text=qualifiedUrl($DBInfo->url_prefix.'/'.$ntext); $text= "$text"; } } else $text= "$text"; $img=''; } if (preg_match("/\.(png|gif|jpeg|jpg)$/i",$url)) return "$text$extra"; if (!$text) return $img; return $img. "$text$extra$sep"; } function store_pagelinks() { global $DBInfo; unset($this->pagelinks['TwinPages']); $new=array_keys($this->pagelinks); $cur=unserialize($this->cache->fetch($this->page->name)); if (!is_array($cur)) $cur=array(); $ad=array_diff($new,$cur); $de=array_diff($cur,$new); // merge new backlinks foreach ($ad as $a) { if (!$a or !$DBInfo->hasPage($a)) continue; $bl=unserialize($this->bcache->fetch($a)); if (!is_array($bl)) $bl=array(); array_merge($bl,array($this->page->name)); $bl=array_unique($bl); $this->bcache->update($a,serialize($bl)); } // remove back links foreach ($de as $d) { if (!$d or !$DBInfo->hasPage($d)) continue; $bl=unserialize($this->bcache->fetch($d)); if (!is_array($bl)) $bl=array(); $bl=array_diff($bl,array($this->page->name)); $this->bcache->update($d,serialize($bl)); } // XXX if ($new) $this->cache->update($this->page->name,serialize($new)); else $this->cache->remove($this->page->name); # $this->page->mtime()); } function get_pagelinks() { if (!$this->wordrule) $this->set_wordrule(); if ($this->cache->exists($this->page->name)) { $links=$this->cache->fetch($this->page->name); if ($links !== false) return unserialize($links); } // no pagelinks found. XXX return array(); } function get_backlinks() { if ($this->bcache->exists($this->page->name)) { $links=$this->bcache->fetch($this->page->name); if ($links !== false) return unserialize($links); } // no backlinks found. XXX return array(); } function word_repl($word,$text='',$attr='',$nogroup=0,$islink=1) { global $DBInfo; $nonexists='nonexists_'.$this->nonexists; if ($word[0]=='"') { # ["extended wiki name"] $extended=1; $page=substr($word,1,-1); $word=$page; } else #$page=preg_replace("/\s+/","",$word); # concat words $page=normalize($word); # concat words if (!$DBInfo->use_twikilink) $islink=0; list($page,$page_text,$gpage)= normalize_word($page,$this->group,$this->page->name,$nogroup,$islink); if ($text) { if (preg_match("/^(http|ftp|attachment).*\.(png|gif|jpeg|jpg)$/i",$text)) { if (substr($text,0,11)=='attachment:') { $fname=substr($text,11); $ntext=$this->macro_repl('Attachment',$fname,1); if (!file_exists($ntext)) { $word=$this->macro_repl('Attachment',$fname); } else { $text=qualifiedUrl($DBInfo->url_prefix.'/'.$ntext); $word= "$text"; } } else { $text=str_replace('&','&',$text); $word="$word"; } } else $word=$text; } else { $word=$text=$page_text ? $page_text:$word; #print $text; $word=htmlspecialchars($word); $word=str_replace('&#','&#',$word); # hack } $url=_urlencode($page); $url_only=strtok($url,'#?'); # for [WikiName#tag] [wiki:WikiName#tag Tag] #$query= substr($url,strlen($url_only)); if ($extended) $page=rawurldecode($url_only); # C++ else $page=urldecode($url_only); $url=$this->link_url($url); #check current page if ($page == $this->page->name) $attr.='class="current"'; //$url=$this->link_url(_rawurlencode($page)); # XXX if (isset($this->pagelinks[$page])) { $idx=$this->pagelinks[$page]; switch($idx) { case 0: #return "?$word"; return call_user_func(array(&$this,$nonexists),$word,$url); case -1: return "$word"; case -2: return "$word". "›"; case -3: #$url=$this->link_url(_rawurlencode($gpage)); return $this->link_tag(_rawurlencode($gpage),'',$this->icon['main']). "$word"; default: return "$word". "›$idx"; } } else if ($DBInfo->hasPage($page)) { $this->pagelinks[$page]=-1; return "$word"; } else { if ($gpage and $DBInfo->hasPage($gpage)) { $this->pagelinks[$page]=-3; #$url=$this->link_url(_rawurlencode($gpage)); return $this->link_tag(_rawurlencode($gpage),'',$this->icon['main']). "$word"; } if ($this->aliases[$page]) return $this->aliases[$page]; if ($this->sister_on) { $sisters=$DBInfo->metadb->getSisterSites($page, $DBInfo->use_sistersites); if ($sisters === true) { $this->pagelinks[$page]=-2; return "$word". "›"; } if ($sisters) { if ($this->use_easyalias and strpos($sisters,' ') === false) { # this is a alias $this->use_easyalias=0; $url=$this->link_repl(substr($sisters,0,-1).' '.$word.']'); $this->use_easyalias=1; $this->aliases[$page]=$url; return $url; } $this->sisters[]="   ". "". "$this->sister_idx›  ". "$sisters
"; $this->pagelinks[$page]=$this->sister_idx++; $idx=$this->pagelinks[$page]; } if ($idx > 0) { return "$word". "". "". "›$idx"; } } $this->pagelinks[$page]=0; #return "?$word"; return call_user_func(array(&$this,$nonexists),$word,$url); } } function nonexists_simple($word,$url) { return "?$word"; } function nonexists_nolink($word,$url) { return "$word"; } function nonexists_always($word,$url) { return "$word"; } function nonexists_forcelink($word,$url) { return "$word"; } function nonexists_fancy($word,$url) { global $DBInfo; if ($word[0]=='<' and preg_match('/^<[^>]+>/',$word)) return "$word"; #if (preg_match("/^[a-zA-Z0-9\/~]/",$word)) if (ord($word[0]) < 125) { $link=$word[0]; if ($word[0]=='&') { $link=strtok($word,';').';';$last=strtok(''); } else $last=substr($word,1); return "$link".$last; } if (strtolower($DBInfo->charset) == 'utf-8') $utfword=$word; else if (function_exists('iconv')) $utfword=iconv($DBInfo->charset,'utf-8',$word); if ($utfword) { if (function_exists('mb_encode_numericentity')) { $mbword=mb_encode_numericentity($utfword,$DBInfo->convmap,'utf-8'); } else { include_once('lib/compat.php'); $mbword=utf8_mb_encode($utfword); } $tag=strtok($mbword,';').';'; $last=strtok(''); if ($tag) return "$tag".$last; } return "?$word"; } function head_repl($depth,$head) { $dep=strlen($depth); $this->nobr=1; $head=str_replace('\"','"',$head); # revert \\" to \" if (!$this->depth_top) { $this->depth_top=$dep; $depth=1; } else { $depth=$dep - $this->depth_top + 1; if ($depth <= 0) $depth=1; } # $depth=$dep; # if ($dep==1) $depth++; # depth 1 is regarded same as depth 2 # $depth--; $num="".$this->head_num; $odepth=$this->head_dep; if ($head[0] == '#') { # reset TOC numberings if ($this->toc_prefix) $this->toc_prefix++; else $this->toc_prefix=1; $head[0]=' '; $dum=explode(".",$num); $i=sizeof($dum); for ($j=0;$j<$i;$j++) $dum[$j]=1; $dum[$i-1]=0; $num=join($dum,"."); } $open=""; $close=""; if ($odepth && ($depth > $odepth)) { $num.=".1"; } else if ($odepth) { $dum=explode(".",$num); $i=sizeof($dum)-1; while ($depth < $odepth && $i > 0) { unset($dum[$i]); $i--; $odepth--; } $dum[$i]++; $num=join($dum,"."); } $this->head_dep=$depth; # save old $this->head_num=$num; $prefix=$this->toc_prefix; if ($this->toc) $head="$num $head"; $perma=''; if ($this->perma_icon) $perma=" $this->perma_icon"; return "$close$open$edit$head$perma"; } function macro_repl($macro,$value='',$options='') { preg_match("/^([A-Za-z]+)(\((.*)\))?$/",$macro,$match); if (!$match) return $this->word_repl($macro); $bra='';$ket=''; if ($this->wikimarkup and !$options['nomarkup']) { $bra= ""; $ket= ''; } if (!$value and $match[1] and $match[2]) { #strpos($macro,'(') !== false)) { $name=$match[1]; $args=($match[2] and !$match[3]) ? true:$match[3]; } else { $name=$macro; $args=$value; } $plugin=($np=getPlugin($name))?$np:$name; if (!function_exists ("macro_".$plugin)) { #if (!$np) return "[[".$name."]]"; if (!$np) return $this->link_repl($name); // XXX include_once("plugin/$plugin.php"); if (!function_exists ("macro_".$plugin)) return '[['.$macro.']]'; } $ret=call_user_func_array("macro_$plugin",array(&$this,$args,$options)); return $bra.$ret.$ket; } function processor_repl($processor,$value,$options="") { if (!function_exists("processor_".$processor)) { $pf=getProcessor($processor); if (!$pf) return call_user_func('processor_plain',$this,$value,$options); include_once("plugin/processor/$pf.php"); $processor=$pf; } return call_user_func("processor_$processor",$this,$value,$options); } function filter_repl($filter,$value,$options='') { if (!function_exists('filter_'.$filter)) { $ff=getFilter($filter); if (!$ff) return $value; include_once("plugin/filter/$ff.php"); #$filter=$ff; } if (!function_exists ("filter_".$filter)) return $value; return call_user_func("filter_$filter",$this,$value,$options); } function postfilter_repl($filter,$value,$options='') { if (!function_exists('postfilter_'.$filter) and !function_exists('filter_'.$filter)) { $ff=getFilter($filter); if (!$ff) return $value; include_once("plugin/filter/$ff.php"); #$filter=$ff; } if (!function_exists ("postfilter_".$filter)) return $value; return call_user_func("postfilter_$filter",$this,$value,$options); } function ajax_repl($action,$options='') { if (!function_exists('ajax_'.$action) and !function_exists('do_'.$action)) { $ff=getPlugin($action); if (!$ff) return $value; include_once("plugin/$ff.php"); } if (!function_exists ("ajax_".$action)) return ajax_invalid($this,array('title'=>_("Invalid ajax action."))); return call_user_func("ajax_$action",$this,$options); } function smiley_repl($smiley) { global $DBInfo; $img=$DBInfo->smileys[$smiley][3]; $alt=str_replace("<","<",$smiley); if (preg_match('/^(http|ftp):/',$img)) return "$alt"; return "$alt"; } function link_url($pageurl,$query_string="") { global $DBInfo; $sep=$DBInfo->query_prefix; if (!$query_string and $this->query_string) $query_string=$this->query_string; if ($sep == '?') { if ($pageurl && $query_string[0]=='?') # add 'dummy=1' to work around the buggy php $query_string= '&'.substr($query_string,1).'&dummy=1'; # Did you have a problem with &dummy=1 ? # then, please replace above line with next line. #$query_string= '&'.substr($query_string,1); $query_string= $pageurl.$query_string; } else $query_string= $pageurl.$query_string; return sprintf("%s%s%s", $this->prefix, $sep, $query_string); } function link_tag($pageurl,$query_string="", $text="",$attr="") { # Return a link with given query_string. if (!$text) $text= $pageurl; # XXX if (!$pageurl) $pageurl=$this->page->urlname; $url=$this->link_url($pageurl,$query_string); return sprintf("%s", $url, $attr, $text); } function link_to($query_string="",$text="",$attr="") { if (!$text) $text=htmlspecialchars($this->page->name); return $this->link_tag($this->page->urlname,$query_string,$text,$attr); } function fancy_hr($rule) { $sz=($sz=strlen($rule)-4) < 6 ? ($sz ? $sz+2:0):8; $size=$sz ? " size='$sz'":''; return "
"; } function simple_hr() { return "
"; } function _list($on,$list_type,$numtype="",$closetype="", $divtype=' class="indent"') { if ($list_type=="dd") { if ($on) #$list_type="dl>'.$this->_purple().'"; return "<$list_type type='$numtype[0]'>"; } return "$close$open<$list_type>\n"; } else { return "\n$close$open"; } } function _check_p($in_p) { if ($in_p) { $in_p='li'; return "
\n
"; #close } return ''; } function _td_span($str,$align='') { $len=strlen($str)/2; if ($len==1) return ''; $attr[]="colspan='$len'"; #$attr[]="align='center' colspan='$len'"; return implode(' ',$attr); } function _td_attr($val) { if (!$val) return ''; $para=substr($val,4,-1); # rowspan if (preg_match("/^(\^|v)?\|(\d+)$/",$para,$match)) { $attr[]="rowspan='$match[2]'"; if ($match[1]) { if ($match[1] == '^') $attr[]="valign='top'"; else $attr[]="valign='bottom'"; } } else if (preg_match("/^\-(\d+)$/",$para,$match)) $attr[]="colspan='$match[1]'"; else if ($para[0]=='#') $attr[]="bgcolor='".strtolower($para)."'"; else $attr[]=strtolower($para); return implode(' ',$attr).' '; } function _table($on,&$attr) { if (!$on) return "\n"; $tattr=substr($attr,4,-1); if ($tattr[0]=='#') { $tattr="bgcolor='".strtolower($tattr)."'"; } else if (substr($tattr,0,5)=='table') { $tattr=substr($tattr,5); $attr=''; } else { if ($tattr=='') $attr=''; $tattr=''; } return "\n"; } function _purple() { if (!$this->use_purple) return ''; $id=sprintf('%03d',$this->purple_number++); $nid='p'.$id; return "(".$id.")"; } function _div($on,&$in_div,&$enclose,$attr='') { $tag=array("\n",""); if ($on) { $in_div++; $open=$enclose;} else { if (!$in_div) return ''; $close=$enclose; $in_div--; } $enclose=''; if (!$on) $purple=$this->_purple(); #return "(".$in_div.")".$tag[$on]; return $purple.$open.$tag[$on].$close; } function _li($on,$empty='') { $tag=array("\n",'
  • '); if (!$on and !$empty) $purple=$this->_purple(); return $purple.$tag[$on]; } function _fixpath() { $this->url_prefix= qualifiedUrl($DBInfo->url_prefix); $this->prefix= qualifiedUrl($this->prefix); $this->imgs_dir= qualifiedUrl($this->imgs_dir); $this->imgs_dir_interwiki=qualifiedUrl($this->imgs_dir_interwiki); $this->imgs_dir_url=qualifiedUrl($this->imgs_dir_url); } function send_page($body="",$options=array()) { global $DBInfo; if ($options['fixpath']) $this->_fixpath(); if ($body) { $pi=$this->get_instructions($body); $this->set_wordrule($pi); $fts=array(); if ($pi['#filter']) $fts=preg_split('/(\||,)/',$pi['#filter']); if ($DBInfo->filters) $fts=array_merge($fts,$DBInfo->filters); if ($fts) { foreach ($fts as $ft) { $body=$this->filter_repl($ft,$body,$options); } } if ($pi['#format']) { if ($pi['args']) $pi_line="#!".$pi['#format']." $pi[args]\n"; print call_user_func("processor_".$pi['#format'],$this, $pi_line.$this->page->body,$options); return; } $lines=explode("\n",$body); } else { if ($options['rev']) { $body=$this->page->get_raw_body($options); $pi=$this->get_instructions($body); } else { $pi=$this->get_instructions($dum); $body=$this->page->get_raw_body($options); } $this->set_wordrule($pi); $fts=array(); if ($pi['#filter']) $fts=preg_split('/(\||,)/',$pi['#filter']); if ($DBInfo->filters) $fts=array_merge($fts,$DBInfo->filters); if ($fts) { foreach ($fts as $ft) { $body=$this->filter_repl($ft,$body,$options); } } $this->pi=$pi; if ($pi['#format']) { if ($pi['args']) $pi_line="#!".$pi['#format']." $pi[args]\n"; print call_user_func("processor_".$pi['#format'],$this,$pi_line.$body,$options); if ($DBInfo->use_tagging and isset($pi['#keywords'])) { $tmp="----\n"; if (is_string($DBInfo->use_tagging)) $tmp.=$DBInfo->use_tagging; else $tmp.="Tags: [[Keywords]]"; $this->send_page($tmp); // XXX } $this->store_pagelinks(); // XXX return; } if ($body) { $body=rtrim($body); # delete last empty line $lines=explode("\n",$body); } else $lines=array(); if ($DBInfo->use_tagging and isset($pi['#keywords'])) { $lines[]="----"; if (is_string($DBInfo->use_tagging)) $lines[]=$DBInfo->use_tagging; else $lines[]="Tags: [[Keywords]]"; } $twin_mode=$DBInfo->use_twinpages; if (isset($pi['#twinpages'])) $twin_mode=$pi['#twinpages']; $twins=$DBInfo->metadb->getTwinPages($this->page->name,$twin_mode); if ($twins === true) { if ($DBInfo->interwiki['TwinPages']) { if ($lines) $lines[]="----"; $lines[]=sprintf(_("See %s"),"[wiki:TwinPages:".$this->page->name." "._("TwinPages")."]"); } } else if ($twins) { if ($lines) $lines[]="----"; if (sizeof($twins)>8) $twins[0]="\n".$twins[0]; $twins[0]=_("See [TwinPages]:").$twins[0]; $lines=array_merge($lines,$twins); } } # have no contents if (!$lines) return; $text=''; $in_p=''; $in_div=0; $in_li=0; $in_pre=0; $in_table=0; $li_open=0; $li_empty=0; $div_enclose=''; $my_div=0; $indent_list[0]=0; $indent_type[0]=""; $oline=''; $wordrule="({{{(?U)(.+)}}})|". "\[\[([A-Za-z0-9]+(\(((?inline_latex) # single line latex syntax $wordrule.="(?<=\s|^|>)\\$([^\\$]+)\\$(?:\s|$)|". "(?<=\s|^|>)\\$\\$([^\\$]+)\\$\\$(?:\s|$)|"; #if ($DBInfo->builtin_footnote) # builtin footnote support $wordrule.=$this->footrule.'|'; $wordrule.=$this->wordrule; $formatter=&$this; foreach ($lines as $line) { # empty line if (!strlen($line)) { if ($in_pre) { $this->pre_line.="\n";continue;} if ($in_li) { if ($in_table) { $text.=$this->_table(0,$dumm);$in_table=0;$li_empty=1; } $text.=$this->_purple()."
    \n"; if ($li_empty==0 && !$this->auto_linebreak ) $text.="
    \n"; $li_empty=1; continue; } if ($in_table) { $text.=$this->_table(0,$dumm)."
    \n";$in_table=0; continue; } else { #if ($in_p) { $text.="
    \n"; $in_p='';} if ($in_p) { $text.=$this->_div(0,$in_div,$div_enclose)."
    \n"; $in_p='';} else if ($in_p=='') { $text.="
    \n";} continue; } } if (!$in_pre and $line[0]=='#' and $line[1]=='#') { $out=''; if ($line[2]=='[') { $macro=substr($line,4,-2); $out= $this->macro_repl($macro,'',array('nomarkup'=>1)); } else if ($line[2]=='#') { $div_enclose.='
    '; $my_div++; } else if ($line[2]=='.') { $div_enclose.='
    '; $my_div++; } else if ($my_div>0) { $div_enclose.='
    '; $my_div--; } if ($this->wikimarkup) $text=$text."$out"; else $text.=$out; unset($out); continue; # comments } $ll=strlen($line); if ($line[$ll-1]=='&') { $oline.=substr($line,0,-1)."\n"; continue; } else { $line=$oline.$line; $oline=''; } $p_closeopen=''; if (preg_match('/-{4,}$/',$line)) { if ($this->auto_linebreak) $this->nobr=1; // XXX if ($in_p) { $p_closeopen=$this->_div(0,$in_div,$div_enclose); $in_p='';} } else if ($in_p == '' and $line!=='') { $p_closeopen=$this->_div(1,$in_div,$div_enclose); $in_p= $line; } if ($in_pre) { if (strpos($line,"}}}")===false) { $this->pre_line.=$line."\n"; continue; } else { #$p=strrpos($line,"}}}"); $p= strlen($line) - strpos(strrev($line),'}}}') - 1; if ($p>2 and $line[$p-3]=='\\') { $this->pre_line.=substr($line,0,$p-3).substr($line,$p-2)."\n"; continue; } $this->pre_line.=substr($line,0,$p-2); $line=substr($line,$p+1); $in_pre=-1; } #} else if ($in_pre == 0 && preg_match("/{{{[^}]*$/",$line)) { #} else if (preg_match("/(\{{2,3})[^{}]*$/",$line,$m)) { } else if (!(strpos($line,"{{{")===false) and preg_match("/{{{[^{}]*$/",$line)) { #$p=strrpos($line,"{{{")-2; #$p= strlen($line) - strpos(strrev($line),$m[1]) - strlen($m[1]); $p= strlen($line) - strpos(strrev($line),'{{{') - 3; $processor=""; $in_pre=1; $np=0; # check processor if ($line[$p+3] == "#" and $line[$p+4] == "!") { list($tag,$dummy)=explode(" ",substr($line,$p+5),2); if (function_exists("processor_".$tag)) { $processor=$tag; } else if ($pf=getProcessor($tag)) { include_once("plugin/processor/$pf.php"); $processor=$pf; } } else if ($line[$p+3] == ":") { # new formatting rule for a quote block (pre block + wikilinks) $line[$p+3]=" "; $np=1; if ($line[$p+4]=='#' or $line[$p+4]=='.') { $pre_style=strtok(substr($line,$p+4),' '); $np++; if ($pre_style) $np+=strlen($pre_style); } else $pre_style=''; $in_quote=1; } $this->pre_line=substr($line,$p+$np+3); if (trim($this->pre_line)) $this->pre_line.="\n"; $line=substr($line,0,$p); if (!$line and $this->auto_linebreak) $this->nobr=1; } // split into chunks $chunk=preg_split('/({{{.+}}})/U',$line,-1,PREG_SPLIT_DELIM_CAPTURE); $nc=''; $k=1; foreach ($chunk as $c) { if ($k%2) { $nc.=preg_replace($this->baserule,$this->baserepl,$c); } else if (in_array($c[3],array('#','-','+'))) { # {{{#color text}}} $nc.=preg_replace($this->baserule,$this->baserepl,$c); } else $nc.=$c; $k++; } $line=$nc; #$line=preg_replace($this->baserule,$this->baserepl,$line); #if ($in_p and ($in_pre==1 or $in_li)) $line=$this->_check_p().$line; # bullet and indentation # and quote begin with ">" if ($in_pre != -1 && preg_match("/^(((>\s)*>(?!>))|(\s*>*))/",$line,$match)) { #if (preg_match("/^(\s*)/",$line,$match)) { #print "{".$match[1].'}'; $open=""; $close=""; $indtype="dd"; $indlen=strlen($match[0]); if ($indlen > 0) { $line=substr($line,$indlen); # check div type. if ($match[0][$indlen-1]=='>') { # get user defined style if (($line[0]=='.' or $line[0]=='#') and ($p=strpos($line,' '))) { if ($line[0]=='.') $dt='class'; else $dt='id'; $divtype=" $dt=\"".substr($line,1,$p-1).'"'; $line=substr($line,$p+1); } else $divtype=' class="indent '.$this->quote_style.'"'; } else { $divtype=' class="indent"'; } if ($line[0]=='*') { $limatch[1]='*'; $line=preg_replace("/^(\*\s?)/","
  • ",$line); if ($indent_list[$in_li] == $indlen && $indent_type[$in_li]!='dd') $line=$this->_li(0).$line; $numtype=""; $indtype="ul"; } elseif (preg_match("/^(([1-9]\d*|[aAiI])\.)(#\d+)?\s/",$line,$limatch)){ $line=preg_replace("/^((\d+|[aAiI])\.(#\d+)?)/","
  • ",$line); if ($indent_list[$in_li] == $indlen) $line=$this->_li(0).$line; $numtype=$limatch[2][0]; if ($limatch[3]) $numtype.=substr($limatch[3],1); $indtype="ol"; } elseif (preg_match("/^([^:]+)::\s/",$line,$limatch)) { $line=preg_replace("/^[^:]+::\s/", "
    ".$limatch[1]."
    ",$line); if ($indent_list[$in_li] == $indlen) $line="
    \n".$line; $numtype=""; $indtype="dl"; } } if ($indent_list[$in_li] < $indlen) { $in_li++; $indent_list[$in_li]=$indlen; # add list depth $indent_type[$in_li]=$indtype; # add list type $open.=$this->_list(1,$indtype,$numtype,'',$divtype); } else if ($indent_list[$in_li] > $indlen) { while($in_li >= 0 && $indent_list[$in_li] > $indlen) { if ($indent_type[$in_li]!='dd' && $li_open == $in_li) $close.=$this->_li(0,$li_empty); $close.=$this->_list(0,$indent_type[$in_li],"", $indent_type[$in_li-1]); unset($indent_list[$in_li]); unset($indent_type[$in_li]); $in_li--; } #$li_empty=0; } $li_empty=0; if ($indent_list[$in_li] <= $indlen || $limatch) $li_open=$in_li; else $li_open=0; } #if (!$in_pre && !$in_table && preg_match("/^\|\|.*\|\|$/",$line)) { if (!$in_pre && $line[0]=='|' && !$in_table && preg_match("/^(\|([^\|]+)?\|((\|\|)*))(<[^>\|]*>)?(.*)(\|\|)$/s",$line,$match)) { $open.=$this->_table(1,$match[5]); if ($match[2]) $open.='
    • '; if (!$match[5]) $line='||'.$match[3].$match[6].'||'; $in_table=1; #} elseif ($in_table && !preg_match("/^\|\|.*\|\|$/",$line)){ } elseif ($in_table && $line[0]!='|' && !preg_match("/^\|\|.*\|\|$/s",$line)){ $close=$this->_table(0,$dumm).$close; $in_table=0; } if ($in_table) { $line=substr($line,0,-2); $cells=preg_split('/((?:\|\|)+)/',$line,-1, PREG_SPLIT_DELIM_CAPTURE); $row=''; for ($i=1,$s=sizeof($cells);$i<$s;$i+=2) { $align='';$attr=''; preg_match('/^((<[^>]+>)?)(\s?)(.*)(?\n",$cell); if ($m[3] and $m[5]) $align='align="center"'; else if (!$m[3]) $align=''; else if (!$m[5]) $align='align="right"'; $attr=$this->_td_attr($m[1]); $attr.=$this->_td_span($cells[$i]); $row.="'; } $line=''.$row.''; $line=str_replace('\"','"',$line); # revert \\" to \" } # FIXME for smart diff XXX (one line ins/del) if ($this->use_smartdiff) $line=preg_replace('/<(\/)?(ins|del)/','<\\1\\2',$line); # InterWiki, WikiName, {{{ }}}, !WikiName, ?single, ["extended wiki name"] # urls, [single bracket name], [urls text], [[macro]] $line=preg_replace("/(".$wordrule.")/e","\$this->link_repl('\\1')",$line); # FIXME for smart diff XXX (one line ins/del) if ($this->use_smartdiff) $line=preg_replace('/<(\/)?(ins|del)/','<\\1\\2',$line); # Headings if (preg_match("/(?sect_num++; if ($p_closeopen) { // ignore last open $p_closeopen=''; $this->_div(0,$in_div,$div_enclose); } while($in_div > 0) $p_closeopen.=$this->_div(0,$in_div,$div_enclose); $p_closeopen.=$this->_div(1,$in_div,$div_enclose); $in_p=''; if ($this->section_edit && !$this->preview) { $act='edit'; if ($DBInfo->sectionedit_attr) { if (!is_string($DBInfo->sectionedit_attr)) $sect_attr=' onclick="javascript:sectionEdit(null,this,'. $this->sect_num.');return false;"'; else $sect_attr=$DBInfo->sectionedit_attr; } $url=$this->link_url($this->page->urlname, '?action='.$act.'&section='.$this->sect_num); $lab=_("edit"); $edit="
    [$lab]
    \n"; $anchor_id='sect-'.$this->sect_num; $anchor=""; } $line=$anchor.$edit.$this->head_repl($m[1],$m[2]); $edit='';$anchor=''; } #$line=preg_replace("/(?head_repl("$1","$2","$3"),$line); # Smiley if ($this->smiley_rule) $line=preg_replace($this->smiley_rule,$this->smiley_repl,$line); # NoSmoke's MultiLineCell hack #$line=preg_replace(array("/{{\|/","/\|}}/"), # array("
    '.$match[2].'
    ".$cell.'
    ","
    "),$line); if ($this->auto_linebreak and in_array(trim($line),array('{{|','|}}'))) $this->nobr=1; $line=preg_replace($this->extrarule,$this->extrarepl,$line); #if ($this->auto_linebreak and preg_match('/
    $/',$line)) # $this->nobr=1; $line=$close.$p_closeopen.$open.$line; $open="";$close=""; if ($in_pre==-1) { $in_pre=0; # for smart diff $show_raw=0; if ($this->use_smartdiff and preg_match('/<(ins|del) class=\'diff-(added|removed)\'>/', $this->pre_line)) $show_raw=1; if ($processor and !$show_raw) { $value=$this->pre_line; $out= call_user_func("processor_$processor",$this,$value,$options); if ($this->wikimarkup) $line='
    '."$out
    "; else $line=$out.$line; unset($out); } else if ($in_quote) { # htmlfy '<' $pre=str_replace("<","<",$this->pre_line); # for smart diff if ($this->use_smartdiff) $pre=preg_replace("/<(\/?)(ins|del)/","<\\1\\2",$pre); $pre=preg_replace($this->baserule,$this->baserepl,$pre); $pre=preg_replace("/(".$wordrule.")/e","\$this->link_repl('\\1')",$pre); $attr='class="quote"'; if ($pre_style) { $tag=$pre_style[0]; $style=substr($pre_style,1); switch($tag) { case '#': $attr="id='$style'"; break; case '.': $attr="class='$style'"; break; } } $line="
    \n".$pre."
    \n".$line; $in_quote=0; } else { # htmlfy '<', '&' $pre=str_replace(array('&','<'), array("&","<"), $this->pre_line); $pre=preg_replace("/<(\/?)(ins|del)/","<\\1\\2",$pre); # FIXME Check open/close tags in $pre $out="
    \n".$pre."
    "; if ($this->wikimarkup) $out='
    '."".$out."
    "; $line=$out."\n".$line; unset($out); } $this->nobr=1; } if ($this->auto_linebreak && !$in_table && !$this->nobr) $text.=$line."
    \n"; else $text.=$line."\n"; $this->nobr=0; # empty line for quoted div if (!$this->auto_linebreak and !$in_pre and trim($line) =='') $text.="
    \n"; } # end rendering loop # for smart_diff (div) if ($this->use_smartdiff) $text= preg_replace('/<(\/)?(div( class=.diff-(added|removed).)?)>/', '<\\2>',$text); # highlight text if ($this->highlight) { $highlight=_preg_search_escape($this->highlight); $colref=preg_split("/\|/",$highlight); #$colref=preg_split("/\s+/",$highlight); $highlight=join("|",$colref); $colref=array_flip(array_map("strtolower",$colref)); $text=preg_replace('/((<[^>]*>)|('.$highlight.'))/ie', "\$this->highlight_repl('\\1',\$colref)",$text); } $fts=array(); if ($pi['#postfilter']) $fts=preg_split('/(\||,)/',$pi['#postfilter']); if ($DBInfo->postfilters) $fts=array_merge($fts,$DBInfo->postfilters); if ($fts) { foreach ($fts as $ft) $text=$this->postfilter_repl($ft,$text,$options); } # close all tags $close=""; # close pre,table if ($in_pre) $close.="\n"; if ($in_table) $close.="\n"; # close indent while($in_li >= 0 && $indent_list[$in_li] > 0) { if ($indent_type[$in_li]!='dd' && $li_open == $in_li) $close.=$this->_li(0); # $close.=$this->_list(0,$indent_type[$in_li]); $close.=$this->_list(0,$indent_type[$in_li],"",$indent_type[$in_li-1]); unset($indent_list[$in_li]); unset($indent_type[$in_li]); $in_li--; } # close div #if ($in_p) $close.="
    \n"; # if ($in_p) $close.=$this->_div(0,$in_div,$div_enclose); # #if ($div_enclose) $close.=$this->_div(0,$in_div,$div_enclose); while ($my_div>0) { $close.="
    \n"; $my_div--;} while($in_div > 0) $close.=$this->_div(0,$in_div,$div_enclose); # activate tag #$text=preg_replace("/(<)(\/?del>)/i","<\\2",$text); $text.=$close; print $text; if ($this->sisters and !$options['nosisters']) { $sister_save=$this->sister_on; $this->sister_on=0; $sisters=join("\n",$this->sisters); $sisters=preg_replace("/(".$wordrule.")/e","\$this->link_repl('\\1')",$sisters); $msg=_("Sister Sites Index"); print "
    \n
    ----
    \n$msg
    \n$sisters
    \n"; $this->sister_on=$sister_save; } if ($options['pagelinks']) $this->store_pagelinks(); } function register_javascripts($js) { if (is_array($js)) { array_merge($this->java_scripts,$js); } else if (!in_array($js,$this->java_scripts)) { $this->java_scripts[]=$js; } } function get_javascripts() { $out=''; foreach ($this->java_scripts as $js) { $out.=' JSHEAD; print $metatags."\n".$keywords; print " $DBInfo->sitename: ".$options['title']."\n"; if ($upper) print ' \n"; $raw_url=$this->link_url($this->page->urlname,"?action=raw"); $print_url=$this->link_url($this->page->urlname,"?action=print"); print ' \n"; print ' \n"; if ($options['css_url']) print ' '; # default CSS else print << EOS; print "\n\n\n"; } } function get_actions($args='',$options) { $menu=array(); if ($this->pi['#action'] && !in_array($this->pi['#action'],$this->actions)){ list($act,$txt)=explode(" ",$this->pi['#action'],2); if (!$txt) $txt=$act; $menu[]= $this->link_to("?action=$act",_($txt),"accesskey='x'"); if (strtolower($act) == 'blog') $this->actions[]='BlogRss'; } else if ($args['editable']) { if ($args['editable']==1) $menu[]= $this->link_to("?action=edit",_("EditText"),"accesskey='x'"); else $menu[]= _("NotEditable"); } else $menu[]= $this->link_to('?action=show',_("ShowPage")); $menu[]=$this->link_tag("FindPage","",_("FindPage")); if (!$args['noaction']) { foreach ($this->actions as $action) { if (strpos($action,' ')) { list($act,$text)=explode(' ',$action,2); $menu[]= $this->link_to($act,_($text)); } else { $menu[]= $this->link_to("?action=$action",_($action)); } } } return $menu; } function send_footer($args='',$options='') { global $DBInfo; print "
    \n"; print $DBInfo->hr; if ($args['editable'] and !$DBInfo->security->writable($options)) $args['editable']=-1; $menus=$this->get_actions($args,$options); if (!$DBInfo->hide_actions or ($DBInfo->hide_actions and $options['id']!='Anonymous')) { if (!$this->css_friendly) { $menu=$this->menu_bra.implode($this->menu_sep,$menus).$this->menu_cat; } else { $menu="
    "; $menu.='
    • '.implode("
      • \n
    • \n",$menus)."
    "; $menu.="
    "; } } if ($mtime=$this->page->mtime()) { if ($options['tz_offset'] != '') { $lastedit=gmdate("Y-m-d",$mtime+$options['tz_offset']); $lasttime=gmdate("H:i:s",$mtime+$options['tz_offset']); } else { $lastedit=date("Y-m-d",$mtime); $lasttime=date("H:i:s",$mtime); } } $banner= <<Valid XHTML 1.0! Valid CSS! powered by MoniWiki FOOT; if ($options['timer']) { $options['timer']->Check(); $timer=$options['timer']->Total(); } if (file_exists($this->themedir."/footer.php")) { $themeurl=$this->themeurl; include($this->themedir."/footer.php"); } else { print "
    "; print $menu; if (!$this->css_friendly) print $banner; else print "
    $banner
    \n"; print "\n
    \n"; } print "\n\n"; #include "prof_results.php"; } function send_title($msgtitle="", $link="", $options="") { // Generate and output the top part of the HTML page. global $DBInfo; $name=$this->page->urlname; $action=$this->link_url($name); $saved_pagelinks = $this->pagelinks; # find upper page $pos=strrpos($name,"/"); $mypgname=$this->page->name; if ($pos > 0) { $upper=substr($name,0,$pos); $upper_icon=$this->link_tag($upper,'',$this->icon['upper'])." "; } else if ($this->group) { $group=$this->group; $mypgname=substr($this->page->name,strlen($group)); $upper=_urlencode($mypgname); $upper_icon=$this->link_tag($upper,'',$this->icon['main'])." "; } $title=htmlspecialchars($this->pi['#title']); $msgtitle=htmlspecialchars($msgtitle); if (!$msgtitle) $msgtitle=$options['title']; if (!$title) { if ($group) { # for UserNameSpace $title=$mypgname; $groupt=substr($group,0,-1).' »'; $groupt= "$groupt"; } else $title=$this->page->title; $title=htmlspecialchars($title); } # setup title variables #$heading=$this->link_to("?action=fullsearch&value="._urlencode($name),$title); if ($DBInfo->use_backlinks) $qext='&backlinks=1'; $title="$groupt$title"; #$title="$title"; if ($link) $title="$title"; else if (empty($options['nolink'])) $title=$this->link_to("?action=fullsearch$qext&value="._urlencode($mypgname),$title,"class='wikiTitle'"); $logo=$this->link_tag($DBInfo->logo_page,'',$DBInfo->logo_string); $goto_form=$DBInfo->goto_form ? $DBInfo->goto_form : goto_form($action,$DBInfo->goto_type); if ($options['msg'] or $msgtitle) { $mtitle=$msgtitle ? "

    ".$msgtitle."

    \n":""; $msg=<< $mtitle$options[msg] MSG; } # navi bar $menu=array(); if ($options['quicklinks']) { # get from the user setting $quicklinks=array_flip(explode("\t",$options['quicklinks'])); } else { # get from the config.php $quicklinks=$this->menu; } $sister_save=$this->sister_on; $this->sister_on=0; $titlemnu=0; foreach ($quicklinks as $item=>$attr) { if (strpos($item,' ') === false) { if (strpos($attr,'=') === false) $attr="accesskey='$attr'"; if ($item == $this->page->name) { $attr.=" class='current'"; $titlemnu=1; } # like 'MoniWiki'=>'accesskey="1"' $menu[]=$this->word_repl($item,_($item),$attr); # $menu[]=$this->link_tag($item,"",_($item),$attr); } else { # like a 'http://moniwiki.sf.net MoniWiki' $menu[]=$this->link_repl($item,$attr); } } if ($DBInfo->use_titlemenu and $titlemnu == 0 ) { $attr="class='current'"; # XXX make title more shorter ? $mnuname=htmlspecialchars($this->page->name); if ($DBInfo->hasPage($this->page->name) and strlen($mnuname) < 10) $menu[]=$this->word_repl($mypgname,$mnuname,$attr); } $this->sister_on=$sister_save; if (!$this->css_friendly) { $menu=$this->menu_bra.join($this->menu_sep,$menu).$this->menu_cat; } else { #for ($i=0,$szm=sizeof($menu);$i<$szm;$i++) { # #if $menu[$i]== # $menu[$i]="
  • ".$menu[$i]."
    • \n"; #} $menu='
    • '.implode("
    • ",$menu)."
    \n"; # set current attribute. $menu=preg_replace("/(li)>(]+current[^>]+)/", "$1 class='current'>$2",$menu); } # submenu XXX if ($this->submenu) { $smenu=array(); $mnu_pgname=($group ? $group.'~':'').$this->submenu; if ($DBInfo->hasPage($mnu_pgname)) { $pg=$DBInfo->getPage($mnu_pgname); $mnu_raw=$pg->get_raw_body(); $mlines=explode("\n",$mnu_raw); foreach ($mlines as $l) { if ($mk and preg_match('/^\s{2,}\*\s*(.*)$/',$l,$m)) { if (!is_array($smenu[$mk])) $smenu[$mk]=array(); $smenu[$mk][]=$m[1]; if (!$smenu[$m[1]]) $smenu[$m[1]]=$mk; } else if (preg_match('/^ \*\s*(.*)$/',$l,$m)) { $mk=$m[1]; } } #print_r($smenu); $cmenu=null; if ($smenu[$this->page->name]) { $cmenu=&$smenu[$this->page->name]; } else if ($smenu['Main']) { $cmenu=&$smenu['Main']; } if ($cmenu) { if (is_array($cmenu)) { $smenua=$cmenu; } else { $smenua=$smenu[$cmenu]; } $submenus=array(); foreach ($smenua as $item) { $submenus[]=$this->link_repl($item); } #print_r($submenus); $submenu='\n"; # set current attribute. $submenu=preg_replace("/(li)>(]+current[^>]+)/", "$1 class='current'>$2",$submenu); } } } # icons #if ($upper) # $upper_icon=$this->link_tag($upper,'',$this->icon['upper'])." "; if ($this->icons) { $icon=array(); foreach ($this->icons as $item) { if ($item[3]) $attr=$item[3]; else $attr=''; $icon[]=$this->link_tag($item[0],$item[1],$item[2],$attr); } $icons=$this->icon_bra.join($this->icon_sep,$icon).$this->icon_cat; } $rss_icon=$this->link_tag("RecentChanges","?action=rss_rc",$this->icon['rss'])." "; # UserPreferences if ($options['id'] != "Anonymous") { $user_link=$this->link_tag("UserPreferences","",$options['id']); if ($DBInfo->hasPage($options['id'])) $home=$this->link_tag($options['id'],"",$this->icon['home'])." "; } else $user_link=$this->link_tag("UserPreferences","",_($this->icon['user'])); # print the title kbd_handler(); # if (file_exists($this->themedir."/header.php")) { $trail="
    \n".$this->trail."
    \n"; $origin="
    \n".$this->origin."
    \n"; $themeurl=$this->themeurl; include($this->themedir."/header.php"); } else { #default header $header=""; $header.=""; if ($DBInfo->logo_string) { $header.=""; } $header.=""; $header.="
    "; $header.=$logo; $header.="$title
    \n"; $header.=$goto_form; $header.="
    \n"; # menu print "
    \n"; print $header; if (!$this->css_friendly) print $menu." ".$user_link." ".$upper_icon.$icons.$home.$rss_icon; else { print "
    ".$user_link."
    "; print "
    ".$upper_icon.$icons.$home.$rss_icon.'
    '; print $menu; } print $msg; print "
    \n"; } if (empty($themeurl) or !$this->_newtheme) { print $DBInfo->hr; if ($options['trail']) { print "
    \n"; print $this->trail; print "
    \n"; } if ($this->origin) { print "
    \n"; print $this->origin; print "
    \n"; } } print "
    \n"; $this->pagelinks=$saved_pagelinks; } function set_origin($pagename) { global $DBInfo; $orig=''; if ($pagename != $DBInfo->frontpage) { # save setting $sister_save=$this->sister_on; $this->sister_on=0; $parent=_($DBInfo->home); $text=''; if ($this->group) { $group=strtok($pagename,'~'); $text=strtok(''); #$pagename=$group.'.'.$text; #$pagename='[wiki:'.$pagename.' '.$text.']'; $main=strtok($text,'/'); } if ($group) # represent: Main > MoniWiki > WikiName # real link: MoniWiki > Ko~MoniWiki > Ko~MoniWiki/WikiName $origin=$this->word_repl('"'.$main.'"',_("Main"),'',1,0); else # represent: Home > WikiName > SubPage # real link: $frontpage > WikiName > WikiName/SubPage $origin=$this->word_repl('"'.$DBInfo->frontpage.'"',$parent,'',1,0); $parent=''; $text=strtok($text,'/'); $key=strtok($pagename,'/'); while($key !== false) { if ($parent) $parent.='/'.$key; else { $parent.=$key; $key=$text; } $okey=$key; $key=strtok('/'); if ($key) $origin.=$DBInfo->arrow.$this->word_repl('"'.$parent.'"',$okey,'',1,0); else $origin.=$DBInfo->arrow.$this->word_repl('"'.$parent.'"',$okey,'',1,0); } # reset pagelinks $this->pagelinks=array(); $this->sister_on=$sister_save; } else { $origin=$DBInfo->home; } $this->origin=$origin; } function set_trailer($trailer="",$pagename,$size=5) { global $DBInfo; if (!$trailer) $trail=$DBInfo->frontpage; else $trail=$trailer; $trails=array_diff(explode("\t",trim($trail)),array($pagename)); $sister_save=$this->sister_on; $this->sister_on=0; $this->trail=""; foreach ($trails as $page) { $this->trail.=$this->word_repl('"'.$page.'"','','',1,0).$DBInfo->arrow; } $this->trail.= ' '.htmlspecialchars($pagename); $this->pagelinks=array(); # reset pagelinks $this->sister_on=$sister_save; if (!in_array($pagename,$trails)) $trails[]=$pagename; $idx=count($trails) - $size; if ($idx > 0) $trails=array_slice($trails,$idx); $trail=join("\t",$trails); setcookie('MONI_TRAIL',$trail,time()+60*60*24*30,get_scriptname()); } function errlog($prefix="LoG") { global $DBInfo; $this->mylog=''; $this->LOG=''; if ($DBInfo->use_errlog) { if(getenv("OS")!="Windows_NT") { $this->mylog=tempnam($DBInfo->vartmp_dir,$prefix); $this->LOG=' 2>'.$this->mylog; } } else { if(getenv("OS")!="Windows_NT") $this->LOG=' 2>/dev/null'; } } function get_errlog() { global $DBInfo; $log=&$this->mylog; if ($log and file_exists($log) and ($sz=filesize($log))) { $fd=fopen($log,'r'); if (is_resource($fd)) { $maxl=$DBInfo->errlog_maxline ? min($DBInfo->errlog_maxline,200):20; if ($sz <= $maxl*70) { # approx log size ~ line * 70 $out=fread($fd,$sz); } else { for ($i=0;($i<$maxl) and ($s=fgets($fd,1024));$i++) $out.=$s; $out.= "...\n"; } fclose($fd); unlink($log); $this->LOG=''; $this->mylog=''; if (!$DBInfo->raw_errlog) { $out=preg_replace('/(\/[a-z0-9.]+)+/','/XXX',$out); } return $out; } } return ''; } } # end-of-Formatter # setup the locale like as the phpwiki style function get_locales($mode=1) { $languages=array( 'en'=>array('en_US','english',''), 'fr'=>array('fr_FR','france',''), 'ko'=>array('ko_KR','korean',''), ); $lang= strtolower($_SERVER['HTTP_ACCEPT_LANGUAGE']); $lang= strtr($lang,'_','-'); $langs=explode(',',preg_replace(array("/;[^;,]+/","/\-[a-z]+/"),'',$lang)); if ($languages[$langs[0]]) return array($languages[$langs[0]][0]); return array($languages[0][0]); } function set_locale($lang,$charset='') { $supported=array( 'en_US'=>array('ISO-8859-1'), 'fr_FR'=>array('ISO-8859-1'), 'ko_KR'=>array('EUC-KR','UHC'), ); if ($lang == 'auto') { # get broswer's settings $langs=get_locales(); $lang= $langs[0]; $charset= strtoupper($charset); # XXX if (function_exists('nl_langinfo')) $server_charset= nl_langinfo(CODESET); if ($charset == 'UTF-8') { if ($charset != $server_charset) $lang.=".".$charset; } else { if ($supported[$lang] && in_array($charset,$supported[$lang])) { return $lang.'.'.$charset; } else { return 'en_US'; // default } } } return $lang; } # get the pagename function get_pagename() { global $DBInfo; // $_SERVER["PATH_INFO"] has bad value under CGI mode // set 'cgi.fix_pathinfo=1' in the php.ini under // apache 2.0.x + php4.2.x Win32 if (!empty($_SERVER['PATH_INFO'])) { if ($_SERVER['PATH_INFO'][0] == '/') $pagename=substr($_SERVER['PATH_INFO'],1); if (!$pagename) { $pagename = $DBInfo->frontpage; } $pagename=_stripslashes($pagename); } else if (!empty($_SERVER['QUERY_STRING'])) { if (isset($goto)) $pagename=$goto; else { $pagename = $_SERVER['QUERY_STRING']; $temp = strtok($pagename,"&"); if ($temp and strpos($temp,"=")) $pagename = $DBInfo->frontpage; else $result = preg_match('/^([^&=]+)/',$pagename,$matches); if ($result) { $pagename = urldecode($matches[1]); $_SERVER['QUERY_STRING']=substr($_SERVER['QUERY_STRING'],strlen($pagename)); } } if (!$pagename) $pagename= $DBInfo->frontpage; } else { $pagename = $DBInfo->frontpage; } if ($pagename[0]=='~' and ($p=strpos($pagename,"/"))) $pagename=substr($pagename,1,$p-1)."~".substr($pagename,$p+1); return $pagename; } # Start Main $DBInfo= new WikiDB($Config); register_shutdown_function(array(&$DBInfo,'Close')); $user=new User(); $options=array(); $options['id']=$user->id; # MoniWiki theme if ((empty($DBInfo->theme) or isset($_GET['action'])) and isset($_GET['theme'])) $theme=$_GET['theme']; else if ($DBInfo->theme_css) $theme=$DBInfo->theme; if ($theme) $options['theme']=$theme; if ($DBInfo->trail) { $options['trail']=$user->trail ? $user->trail:''; } if ($options['id'] != 'Anonymous') { $udb=new UserDB($DBInfo); $userinfo=$udb->getUser($user->id); # Does it have valid ticket ? if ($user->ticket == $userinfo->info['ticket']) { $user=$userinfo; $options['css_url']=$user->info['css_url']; $options['quicklinks']=$user->info['quicklinks']; $options['tz_offset']=$user->info['tz_offset']; if (!$theme) $options['theme']=$user->info['theme']; } else { $options['id']='Anonymous'; $options['css_url']=$user->css; $options['tz_offset']=$user->tz_offset; if (!$theme) $options['theme']=$user->theme; } } else { $options['css_url']=$user->css; $options['tz_offset']=$user->tz_offset; if (!$theme) $options['theme']=$theme=$user->theme; } if (!$options['theme']) $options['theme']=$theme=$DBInfo->theme; if ($theme and ($DBInfo->theme_css or !$options['css_url'])) $options['css_url']=($DBInfo->themeurl ? $DBInfo->themeurl:$DBInfo->url_prefix)."/theme/$theme/css/default.css"; $options['timer']=&$timing; $options['timer']->Check("load"); $lang= set_locale($DBInfo->lang,$DBInfo->charset); $DBInfo->lang=$lang; if (isset($locale)) { if (!@include_once('locale/'.$lang.'/LC_MESSAGES/moniwiki.php')) @include_once('locale/'.substr($lang,0,2).'/LC_MESSAGES/moniwiki.php'); } else if (substr($lang,0,2) == 'en') { $test=setlocale(LC_ALL, $lang); } else { if ($DBInfo->include_path) $dirs=explode(':',$DBInfo->include_path); else $dirs=array('.'); $test=setlocale(LC_ALL, $lang); foreach ($dirs as $dir) { $ldir=$dir.'/locale'; if (is_dir($ldir)) { bindtextdomain('moniwiki', $ldir); textdomain("moniwiki"); break; } } if ($DBInfo->set_lang) putenv("LANG=".$lang); if (function_exists('bind_textdomain_codeset')) bind_textdomain_codeset ('moniwiki', $DBInfo->charset); } $pagename=get_pagename(); //function render($pagename,$options) { if ($pagename) { global $DBInfo; # get primary variables if ($_SERVER['REQUEST_METHOD']=="POST") { # hack for TWiki plugin if ($_FILES['filepath']['name']) $action='draw'; if ($GLOBALS['HTTP_RAW_POST_DATA']) { # RAW posted data. the $value and $action could be accessed under # "register_globals = On" in the php.ini # hack for Oekaki: PageName----action----filename list($pagename,$action,$value)=explode('----',$pagename,3); $options['value']=$value; } else { $value=$_POST['value']; $action=$_POST['action'] ? $_POST['action']:$action; } $goto=$_POST['goto']; } else if ($_SERVER['REQUEST_METHOD']=="GET") { $action=$_GET['action']; $value=$_GET['value']; $goto=$_GET['goto']; $rev=$_GET['rev']; $refresh=($options['id'] == 'Anonymous') ? 0:$_GET['refresh']; } if (($p=strpos($action,'/'))!==false) { $action_mode=substr($action,$p+1); $action=substr($action,0,$p); } #print $_SERVER['REQUEST_URI']; $options['page']=$pagename; # if ($action=="recall" || $action=="raw" && $rev) { # $options['rev']=$rev; # $page = $DBInfo->getPage($pagename,$options); # } else $page = $DBInfo->getPage($pagename); $formatter = new Formatter($page,$options); $formatter->macro_repl('InterWiki','',array('init'=>1)); $formatter->refresh=$refresh; $formatter->tz_offset=$options['tz_offset']; // check black list if (!empty($DBInfo->blacklist)) { include_once 'lib/checkip.php'; if (check_ip($DBInfo->blacklist, $_SERVER['REMOTE_ADDR'])) { $options['title']=_("You are in the black list"); $options['msg']=_("Please contact WikiMasters"); do_invalid($formatter,$options); return; } } if (!empty($DBInfo->kiwirian)) { if (!is_array($DBInfo->kiwirian)) { $DBInfo->kiwirian=explode(':',$DBInfo->kiwirian); } if (in_array($options['id'],$DBInfo->kiwirian)) { $options['title']=_("You are blocked in this wiki"); $options['msg']=_("Please contact WikiMasters"); do_invalid($formatter,$options); return; } } while (!$action or $action=='show') { if ($value) { # ?value=Hello $options['value']=$value; do_goto($formatter,$options); return; } else if ($goto) { # ?goto=Hello $options['value']=$goto; do_goto($formatter,$options); return; } if (!$page->exists()) { if ($DBInfo->auto_search && $action!='show' && $p=getPlugin($DBInfo->auto_search)) { $action=$DBInfo->auto_search; break; } $formatter->send_header("Status: 404 Not found",$options); $twins=$DBInfo->metadb->getTwinPages($page->name,2); if ($twins) { $formatter->send_title('','',$options); $twins="\n".join("\n",$twins); $formatter->send_page(_("See [TwinPages]: ").$twins); echo "
    ". $formatter->link_to("?action=edit",$formatter->icon['create']._("Create this page")); } else { $formatter->send_title(sprintf("%s Not Found",$page->name),"",$options); $button= $formatter->link_to("?action=edit",$formatter->icon['create']._("Create this page")); print $button; $searchval=htmlspecialchars($options['page']); print sprintf(_(" or click %s to fullsearch this page.\n"),$formatter->link_to("?action=fullsearch&value=$searchval",_("title"))); print $formatter->macro_repl('LikePages',$page->name,$err); if ($err['extra']) print $err['extra']; print "
    \n$button"; $options['linkto']="?action=edit&template="; $tmpls= macro_TitleSearch($formatter,$DBInfo->template_regex,$options); if ($tmpls) { print _(" or alternativly, use one of these templates:\n"); print $tmpls; } else { print "

    "._("You have no templates")."

    "; } print sprintf(_("To create your own templates, add a page with '%s' pattern.\n"),$DBInfo->template_regex); } $args['editable']=1; $formatter->send_footer($args,$options); return; } # display this page if ($DBInfo->use_redirect_msg and $action=='show' and $_GET['redirect']){ $options['msg']= sprintf(_("Redirected from page \"%s\""), $formatter->link_tag($_GET['redirect'],'?action=show')); } # increase counter $DBInfo->counter->incCounter($pagename,$options); if (!$action) $options['pi']=1; # protect a recursivly called #redirect if ($DBInfo->control_read and !$DBInfo->security->is_allowed('read',$options)) { do_invalid($formatter,$options); return; } $formatter->pi=$formatter->get_instructions($dum); if ($DBInfo->body_attr) $options['attr']=$DBInfo->body_attr; $formatter->send_header("",$options); $formatter->send_title("","",$options); if ($formatter->pi['#title'] and $DBInfo->use_titlecache) { $tcache=new Cache_text('title'); if (!$tcache->exists($pagename) or $_GET['update_title']) $tcache->update($pagename,$formatter->pi['#title']); } if ($DBInfo->use_keywords or $_GET['update_keywords']) { $tcache=new Cache_text('keywords'); if (!$formatter->pi['#keywords']) { $tcache->remove($pagename); } else if (!$tcache->exists($pagename) or $tcache->mtime($pagename) < $formatter->page->mtime() or $_GET['update_keywords']) { $keys=explode(',',$formatter->pi['#keywords']); $keys=array_map('trim',$keys); $tcache->update($pagename,serialize($keys)); } } $formatter->write("
    \n"); $options['timer']->Check("init"); $options['pagelinks']=1; # $cache=new Cache_text('pages'); # if ($cache->exists($pagename)) { # print $cache->fetch($pagename); # } else { # ob_start(); $formatter->send_page('',$options); if ($DBInfo->use_referer) log_referer($_SERVER['HTTP_REFERER'],$pagename); flush(); # ob_end_flush(); # ob_end_clean(); # $out=ob_get_contents(); # ob_end_clean(); # print $out; # $cache->update($pagename,$out); # } $options['timer']->Check("send_page"); $formatter->write("
    \n"); if ($DBInfo->extra_macros and !$formatter->pi['#format']) { if ($formatter->pi['#nocomment']) $options['nocomment']=1; if (!is_array($DBInfo->extra_macros)) { print '
    '."\n"; print $formatter->macro_repl($DBInfo->extra_macros,'',$options); print '
    '."\n"; } else { print '
    '."\n"; foreach ($DBInfo->extra_macros as $macro) print $formatter->macro_repl($macro,'',$options); print '
    '."\n"; } } $args['editable']=1; $formatter->send_footer($args,$options); return; } if ($action) { $options['metatags']=''; $options['custom']=''; $options['help']=''; $options['value']=$value; if (!$DBInfo->security->is_allowed($action,$options)) { if ($options['custom']!='' and method_exists($DBInfo->security,$options['custom'])) { $options['action']=$action; if ($action) call_user_func(array(&$DBInfo->security,$options['custom']),$formatter,$options); return; } $msg=sprintf(_("You are not allowed to '%s'"),$action); $formatter->send_header("Status: 406 Not Acceptable",$options); $formatter->send_title($msg,"", $options); if ($options['err']) $formatter->send_page($options['err']); if ($options['help'] and method_exists($DBInfo->security,$options['help'])) { print "
    "; print call_user_method($options['help'],$DBInfo->security,$formatter,$options); print "
    \n"; } $formatter->send_footer($args,$options); return; } else if ($_SERVER['REQUEST_METHOD']=="POST" and $DBInfo->security->is_protected($action,$options) and !$DBInfo->security->is_valid_password($_POST['passwd'],$options)) { # protect some POST actions and check a password $title = sprintf(_("Fail to \"%s\" !"), $action); $formatter->send_header("",$options); $formatter->send_title($title,"",$options); $formatter->send_page("== "._("Please enter the valid password")." =="); $formatter->send_footer("",$options); return; } if (in_array($action_mode,array('ajax','macro'))) { if ($_SERVER['REQUEST_METHOD']=="POST") $options=array_merge($_POST,$options); else $options=array_merge($_GET,$options); $options['action_mode']=$action_mode; if ($action_mode=='ajax') $formatter->ajax_repl($action,$options); else if ($DBInfo->use_macro_as_action) # XXX print $formatter->macro_repl($action,$options['value'],$options); else do_invalid($formatter,$options); return; } $plugin=($pn=getPlugin($action)) ? $pn:$action; if (!function_exists("do_post_".$plugin) and !function_exists("do_".$plugin) and $pn){ include_once("plugin/$pn.php"); } if (function_exists("do_".$plugin)) { if ($_SERVER['REQUEST_METHOD']=="POST") $options=array_merge($_POST,$options); else $options=array_merge($_GET,$options); call_user_func("do_$plugin",$formatter,$options); return; } else if (function_exists("do_post_".$plugin)) { if ($_SERVER['REQUEST_METHOD']=="POST") $options=array_merge($_POST,$options); else { # do_post_* set some primary variables as $options $options['value']=$_GET['value']; } call_user_func("do_post_$plugin",$formatter,$options); return; } do_invalid($formatter,$options); return; } } //$pagename=get_pagename(); //render($pagename,$options); // vim:et:sts=2: ?>