function ewiki_page_css_container(&$o, &$id, &$data, &$action) { $sterilized_id = trim(preg_replace('/[^\w\d]+/', "-", $id), "-"); $sterilized_id = preg_replace('/^(\d)/', 'page$1', $sterilized_id); $o = "\n"; } function ewiki_split_title ($id='', $split=-1, $entities=1) { if ($split==-1) { $split = $GLOBALS["ewiki_config"]["split_title"]; } strlen($id) or ($id = $GLOBALS["ewiki_id"]); if ($split) { $id = preg_replace("/([".EWIKI_CHARS_L."])([".EWIKI_CHARS_U."]+)/", "$1 $2", $id); } return($entities ? htmlentities($id) : $id); } function ewiki_add_title(&$html, $id, &$data, $action, $go_action="links") { if (EWIKI_PRINT_TITLE) $html = "\n" . $html; } function ewiki_make_title($id='', $title='', $class=3, $action="view", $go_action="links", $may_split=1) { global $ewiki_config, $ewiki_plugins, $ewiki_title, $ewiki_id; #-- advanced handler if ($pf = @$ewiki_plugins["make_title"][0]) { return($pf($title, $class, $action, $go_action, $may_split)); } #-- disabled elseif (!$ewiki_config["print_title"]) { return(""); } #-- get id if (empty($id)) { $id = $ewiki_id; } #-- get title if (!strlen($title)) { $title = $ewiki_title; // already in &html; format } elseif ($ewiki_config["split_title"] && $may_split) { $title = ewiki_split_title($title, $ewiki_config["split_title"], 0&($title!=$ewiki_title)); } else { $title = htmlentities($title); } #-- title mangling if ($pf_a = @$ewiki_plugins["title_transform"]) { foreach ($pf_a as $pf) { $pf($id, $title, $go_action); } } #-- clickable link or simple headline if ($class <= $ewiki_config["print_title"]) { if ($uu = @$ewiki_config["link_title_action"][$action]) { $go_action = $uu; } if ($uu = @$ewiki_config["link_title_url"]) { $href = $uu; unset($ewiki_config["link_title_url"]); } else { $href = ewiki_script($go_action, $id); } $o = '' . ($title) . ''; } else { $o = $title; } // h2.page.title is obsolete; h2.text-title recommended return('

' . $o . '

'); } function ewiki_page_view($id, &$data, $action, $all=1) { global $ewiki_plugins, $ewiki_config; $o = ""; #-- render requested wiki page <-- goal !!! $render_args = array( "scan_links" => 1, "html" => (EWIKI_ALLOW_HTML||(@$data["flags"]&EWIKI_DB_F_HTML)), ); $o .= '\n"; if (!$all) { return($o); } #-- control line + other per-page info stuff if ($pf_a = $ewiki_plugins["view_append"]) { ksort($pf_a); $o .= "\n"; } if ($pf_a = $ewiki_plugins["view_final"]) { ksort($pf_a); foreach ($pf_a as $n => $pf) { $pf($o, $id, $data, $action); } } if (!empty($_REQUEST["thankyou"]) && $ewiki_config["edit_thank_you"]) { $o = '\n" . $o; } if (EWIKI_HIT_COUNTING) { ewiki_db::HIT($id); } return($o); } #-------------------------------------------------------------------- util --- /* retrieves "$id/$action" string from URL / QueryString / PathInfo, change this in conjunction with ewiki_script() to customize your URLs further whenever desired */ function ewiki_id() { ($id = @$_REQUEST["id"]) or ($id = @$_REQUEST["name"]) or ($id = @$_REQUEST["page"]) or ($id = @$_REQUEST["file"]) or (EWIKI_USE_PATH_INFO) and isset($_SERVER["PATH_INFO"]) and ($_SERVER["PATH_INFO"] != $_SERVER["SCRIPT_NAME"]) // Apache+PHP workaround and ($id = ltrim($_SERVER["PATH_INFO"], "/")) or (!isset($_REQUEST["id"])) and ($id = trim(strtok($_SERVER["QUERY_STRING"], "&?;"))); if (!strlen($id) || ($id=="id=")) { $id = EWIKI_PAGE_INDEX; } (EWIKI_URLDECODE) && ($id = urldecode($id)); return($id); } /* replaces EWIKI_SCRIPT, works more sophisticated, and bypasses various design flaws - if only the first parameter is used (old style), it can contain a complete "action/WikiPage" - but this is ambigutious - else $asid is the action, and $id contains the WikiPageName - $ewiki_config["script"] will now be used in favour of the constant - needs more work on _BINARY, should be a separate function */ function ewiki_script($asid, $id=false, $params="", $bin=0, $html=1, $script=NULL) { global $ewiki_config, $ewiki_plugins; #-- get base script url from config vars if (empty($script)) { $script = &$ewiki_config[!$bin?"script":"script_binary"]; } $alt_style = (EWIKI_USE_ACTION_PARAM >= 2); $ins_prefix = (EWIKI_ACTION_TAKE_ASIS); #-- separate $action and $id for old style requests if ($id === false) { if (strpos($asid, EWIKI_ACTION_SEP_CHAR) !== false) { $asid = strtok($asid, EWIKI_ACTION_SEP_CHAR); $id = strtok("\000"); } else { $id = $asid; $asid = ""; } } #-- prepare params if (is_array($params)) { $uu = $params; $params = ""; if ($uu) foreach ($uu as $k=>$v) { $params .= (strlen($params)? "&" : "") . rawurlencode($k) . "=" . rawurlencode($v); } } #-- use action= parameter instead of prefix/ if ($alt_style) { $params = "action=$asid" . (strlen($params)? "&": "") . $params; if (!$ins_prefix) { $asid = ""; } } #-- workaround slashes in $id if (empty($asid) && (strpos($id, EWIKI_ACTION_SEP_CHAR) !== false) && !$bin && $ins_prefix) { $asid = EWIKI_DEFAULT_ACTION; } /*paranoia*/ $asid = trim($asid, EWIKI_ACTION_SEP_CHAR); #-- make url if (EWIKI_URLENCODE) { $id = urlencode($id); $asid = urlencode($asid); } else { // only urlencode &, %, ? for example } $url = $script; if ($asid) { $id = $asid . EWIKI_ACTION_SEP_CHAR . $id; #= "action/PageName" } if (strpos($url, "%s") !== false) { $url = str_replace("%s", $id, $url); } else { $url .= $id; } #-- add url params if (strlen($params)) { $url .= (strpos($url,"?")!==false ? "&":"?") . $params; } #-- fin if ($html) { $url = str_replace("&", "&", $url); } return($url); } /* this ewiki_script() wrapper is used to generate URLs to binary content in the ewiki database */ function ewiki_script_binary($asid, $id=false, $params=array(), $upload=0) { $upload |= is_string($params) && strlen($params) || count($params); #-- generate URL directly to the plainly saved data file, # see also plugins/db/binary_store if (defined("EWIKI_DB_STORE_URL") && !$upload) { $url = EWIKI_DB_STORE_URL . urlencode(rawurlencode(strtok($id, "?"))); } #-- else get standard URL (thru ewiki.php) from ewiki_script() else { $url = ewiki_script($asid, $id, $params, "_BINARY=1"); } return($url); } /* this function returns the absolute ewiki_script url, if EWIKI_SCRIPT_URL is set, else it guesses the value */ function ewiki_script_url($asid="", $id="", $params="") { global $ewiki_action, $ewiki_id, $ewiki_config; if ($asid||$id) { return ewiki_script($asid, $id, $params, false, true, ewiki_script_url()); } if ($url = $ewiki_config["script_url"]) { return($url); } $scr_template = $ewiki_config["script"]; $scr_current = ewiki_script($ewiki_action, $ewiki_id); $req_uri = $_SERVER["REQUEST_URI"]; $qs = $_SERVER["QUERY_STRING"]?1:0; $sn = $_SERVER["SCRIPT_NAME"]; if (($p = strpos($req_uri, $scr_current)) !== false) { $url = substr($req_uri, 0, $p) . $scr_template; } elseif (($qs) && (strpos($scr_template, "?") !== false)) { $url = substr($req_uri, 0, strpos($req_uri, "?")) . substr($scr_template, strpos($scr_template, "?")); } elseif (($p = strrpos($sn, "/")) && (strncmp($req_uri, $sn, $p) == 0)) { $url = $sn . "?id="; } else { return(NULL); #-- could not guess it } $url = (@$_SERVER["HTTPS"] ? "https" : "http") . "://" . EWIKI_SERVER . $url; return($ewiki_config["script_url"] = $url); } #------------------------------------------------------------ page plugins --- #-- links/ action function ewiki_page_links($id, &$data, $action) { $o = ewiki_make_title($id, ewiki_t("PAGESLINKINGTO", array("title"=>$id)), 1, $action, "", "_MAY_SPLIT=1"); if ($pages = ewiki_get_backlinks($id)) { $o .= ewiki_list_pages($pages); } else { $o .= ewiki_t("This page isn't linked from anywhere else."); } return($o); } #-- get all pages, that are linking to $id function ewiki_get_backlinks($id) { $result = ewiki_db::SEARCH("refs", $id); $pages = array(); $id_i = EWIKI_CASE_INSENSITIVE ? strtolower($id) : $id; while ($row = $result->get(0, 0x0077)) { if (strpos(EWIKI_CASE_INSENSITIVE ?strtolower($row["refs"]) :$row["refs"], "\n$id_i\n") !== false) { $pages[] = $row["id"]; } } return($pages); } #-- get all existing pages (as array of pagenames), that are linked from $id function ewiki_get_links($id) { if ($data = ewiki_db::GET($id)) { $refs = explode("\n", trim($data["refs"])); $r = array(); foreach (ewiki_db::FIND($refs) as $id=>$exists) { if ($exists) { $r[] = $id; } } return($r); } } #-- outputs listing from page name array function ewiki_list_pages($pages=array(), $limit=NULL, $value_as_title=0, $pf_list=false) { global $ewiki_plugins; $o = ""; if (!isset($limit)) { ($limit = 0 + $_REQUEST[EWIKI_UP_LISTLIM]) or ($limit = EWIKI_LIST_LIMIT); } $is_num = !empty($pages[0]); $lines = array(); $n = 0; if ($pages) foreach ($pages as $id=>$add_text) { $title = $id; $params = ""; if (is_array($add_text)) { list($id, $params, $title, $add_text) = $add_text; if (!$title) { $title = $id; } } elseif ($is_num) { $id = $title = $add_text; $add_text = ""; } elseif ($value_as_title) { $title = $add_text; $add_text = ""; } $lines[] = '' . ewiki_split_title($title) . ' ' . $add_text; if (($limit > 0) && ($n++ >= $limit)) { break; } } if ($pf_a = @$ewiki_plugins["list_transform"]) { foreach ($pf_a as $pf_transform) { $pf_transform($lines); } } if (($pf_list) || ($pf_list = @$ewiki_plugins["list_pages"][0])) { $o = $pf_list($lines); } elseif($lines) { $o = "· " . implode("
\n· ", $lines) . "
\n"; } return($o); } #---------------------------------------------------------- page plugins --- #-- list of all existing pages (without hidden + protected) function ewiki_page_index($id=0, $data=0, $action=0, $args=array()) { global $ewiki_plugins; $o = ewiki_make_title($id, $id, 2); $exclude = $args ? ("\n" . implode("\n", preg_split("/\s*[,;:\|]\s*/", $args["exclude"])) . "\n") : ""; $sorted = array(); $sorted = array_keys($ewiki_plugins["page"]); $result = ewiki_db::GETALL(array("flags"), EWIKI_DB_F_TYPE, EWIKI_DB_F_TEXT); while ($row = $result->get(0, 0x0037, EWIKI_DB_F_TEXT)) { if (!stristr($exclude, "\n".$row["id"]."\n")) { $sorted[] = $row["id"]; } } natcasesort($sorted); $o .= ewiki_list_pages($sorted, 0, 0, $ewiki_plugins["list_dict"][0]); return($o); } #-- scans database for extremes (by given page meta data information), # generates page listing then from list //@TODO: split $asc parameter into $asc and $firstver function ewiki_page_ordered_list($orderby="created", $asc=0, $print="%n", $title="", $bad_flags=0) { $o = ewiki_make_title("", $title, 2, ".list", "links", 0); $sorted = array(); $result = ewiki_db::GETALL(array($orderby)); while ($row = $result->get(0, 0x0037, EWIKI_DB_F_TEXT)) { if ($asc >= 0) { // version 1 is most accurate for {hits} $row = ewiki_db::GET($row["id"], 1); } if (! ($bad_flags & $row["flags"])) { $sorted[$row["id"]] = $row[$orderby]; } } if ($asc != 0) { arsort($sorted); } else { asort($sorted); } if ($sorted) foreach ($sorted as $name => $value) { if (empty($value)) { $value = "0"; } $sorted[$name] = strftime(str_replace('%n', $value, $print), $value); } $o .= ewiki_list_pages($sorted); return($o); } function ewiki_page_newest($id, $data, $action) { return( ewiki_page_ordered_list("created", -1, ewiki_t("LASTCHANGED"), ewiki_t("NEWESTPAGES")) ); } function ewiki_page_updates($id, $data, $action) { return ewiki_page_ordered_list("lastmodified", -1, ewiki_t("LASTCHANGED"), EWIKI_PAGE_UPDATES, EWIKI_DB_F_MINOR); } function ewiki_page_hits($id, $data, $action) { return( ewiki_page_ordered_list("hits", 1, "%n hits", EWIKI_PAGE_HITS) ); } function ewiki_page_versions($id, $data, $action) { return( ewiki_page_ordered_list("version", -1, "%n changes", EWIKI_PAGE_VERSIONS) ); } function ewiki_page_search($id, &$data, $action) { $o = ewiki_make_title($id, $id, 2, $action); if (! ($q = @$_REQUEST["q"])) { $o .= ''; $o .= ewiki_form("q::30", "") . '

'; $o .= ewiki_form(":submit", $id); $o .= ''; } else { $found = array(); $q = preg_replace('/\s*[^\041-\175\200-\377]\s*/', ' ', $q); if ($q) foreach (explode(" ", $q) as $search) { if (empty($search)) { continue; } $result = ewiki_db::SEARCH("content", $search); while ($row = $result->get()) { #-- show this entry in page listings? if (EWIKI_PROTECTED_MODE && EWIKI_PROTECTED_MODE_HIDING && !ewiki_auth($row["id"], $row, "view")) { continue; } $found[] = $row["id"]; } } $o .= ewiki_list_pages($found); } return($o); } function ewiki_page_info($id, &$data, $action) { global $ewiki_plugins, $ewiki_config, $ewiki_links; $o = ewiki_make_title($id, ewiki_t("INFOABOUTPAGE")." '{$id}'", 2, $action,"", "_MAY_SPLIT=1"); $flagnames = array( "TEXT", "BIN", "DISABLED", "HTML", "READONLY", "WRITEABLE", "APPENDONLY", "SYSTEM", "PART", 10=>"HIDDEN", 17=>"EXEC", ); $show = array( "version", "author", "lastmodified", "created", "hits", "refs", "flags", "meta", "content" ); $no_refs = (boolean)$ewiki_config["info_refs_once"]; #-- versions to show $v_start = $data["version"]; if ( ($uu=0+@$_REQUEST[EWIKI_UP_PAGENUM]) && ($uu<=$v_start) ) { $v_start = $uu; } $v_end = $v_start - $ewiki_config["list_limit"]; if ( ($uu=0+@$_REQUEST[EWIKI_UP_PAGEEND]) && ($uu<=$v_start) ) { $v_end = $uu; } $v_end = max($v_end, 1); #-- go # the very ($first) entry is rendered more verbosely than the others for ($v=$v_start,$first=1; ($v>=$v_end); $v--,$first=0) { $current = ewiki_db::GET($id, $v); if (!strlen(trim($current["id"])) || !$current["version"]) { continue; } $o .= '' . "\n"; #-- additional info-actions $o .= '\n"; #-- print page database entry foreach($show as $i) { $value = @$current[$i]; #-- show database {fields} differently if ($i == "meta") { $str = ""; if ($value) foreach ($value as $n2=>$d2) { foreach ((array)$d2 as $n=>$d) { if (is_int($n)) { $n = $n2; } else { $n = "_$n"; } $str .= htmlentities("$n: $d") . "
\n"; } } $value = $str; } elseif (($i =="lastmodified")||($i =="created")) { #-- {lastmodified}, {created} $value = strftime("%c", $value); } elseif ($i == "content") { $value = strlen(trim($value)) . " bytes"; $i = "content size"; } elseif ($first && ($i == "refs") && !(EWIKI_PROTECTED_MODE && (EWIKI_PROTECTED_MODE_HIDING>=2))) { $a = explode("\n", trim($value)); $ewiki_links = ewiki_db::FIND($a); ewiki_merge_links($ewiki_links); foreach ($a as $n=>$link) { $a[$n] = ewiki_link_regex_callback(array("$link"), "force_noimg"); } $value = implode(", ", $a); } elseif (strpos($value, "\n") !== false) { #-- also for {refs} if ($no_refs && ($i == "refs")) { continue; } $value = str_replace("\n", ", ", trim($value)); } elseif ($i == "version") { $value = '$value)) . '">' . $value . ''; } elseif ($i == "flags") { $fstr = ""; for ($n = 0; $n < 32; $n++) { if ($value & (1 << $n)) { if (! ($s=$flagnames[$n])) { $s = "UU$n"; } $fstr .= $s . " "; } } $value = $fstr; } elseif ($i == "author") { $value = ewiki_author_html($value); } $o .= '' . '\n"; } $o .= "

	'; $o .= ewiki_control_links_list($id, $data, $ewiki_config["action_links"]["info"], $current["version"]); $o .= "
' . $i . '	' . $value . "

\n"; } #-- page result split if ($v >= 1) { $o .= "

"; } #-- ext info actions $o .= '\n"; return($o); } function ewiki_chunked_page($action, $id, $dir=-1, $start=10, $end=1, $limit=0, $overlap=0.25, $collapse_last=0.67) { global $ewiki_config; if (empty($limit)) { $limit = $ewiki_config["list_limit"]; } if ($overlap < 1) { $overlap = (int) ($limit * $overlap); } $p = ""; $n = $start; while ($n) { $n -= $dir * $overlap; $e = $n + $dir * ($limit + $overlap); if ($dir<0) { $e = max(1, $e); if ($e <= $collapse_last * $limit) { $e = 1; } } else { $e = min($end, $e); if ($e >= $collapse_last * $limit) { $e = $end; } } $o .= ($o?" · ":"") . ''. "$n-$e" . ''; if (($n=$e) <= $end) { $n = false; } } return(''); } function ewiki_page_edit($id, $data, $action) { global $ewiki_links, $ewiki_author, $ewiki_plugins, $ewiki_ring, $ewiki_errmsg, $ewiki_config; $hidden_postdata = array(); #-- previous version come back if ($ewiki_config["forced_version"]) { $current = ewiki_db::GET($id); $data["version"] = $current["version"]; unset($current); unset($_REQUEST["content"]); unset($_REQUEST["version"]); } #-- edit interception if ($pf_a = @$ewiki_plugins["edit_hook"]) foreach ($pf_a as $pf) { if ($output = $pf($id, $data, $hidden_postdata)) { return($output); } } #-- permission checks //@TODO: move into above hook, split out flag checks if (isset($ewiki_ring)) { $ring = $ewiki_ring; } else { $ring = 3; } $flags = @$data["flags"]; if (!($flags & EWIKI_DB_F_WRITEABLE)) { #-- perform auth $edit_ring = (EWIKI_PROTECTED_MODE>=2) ? (2) : (NULL); if (EWIKI_PROTECTED_MODE && !ewiki_auth($id, $data, $action, $edit_ring, "FORCE")) { return($ewiki_errmsg); } #-- flag checking if (($flags & EWIKI_DB_F_READONLY) and ($ring >= 2)) { return(ewiki_t("CANNOTCHANGEPAGE")); } if (($flags) and (($flags & EWIKI_DB_F_TYPE) != EWIKI_DB_F_TEXT) and ($ring >= 1)) { return(ewiki_t("CANNOTCHANGEPAGE")); } } #-- "Edit Me" $o = ewiki_make_title($id, ewiki_t("EDITTHISPAGE").(" '{$id}'"), 2, $action, "", "_MAY_SPLIT=1"); #-- normalize to UNIX newlines $_REQUEST["content"] = str_replace("\015\012", "\012", $_REQUEST["content"]); $_REQUEST["content"] = str_replace("\015", "\012", $_REQUEST["content"]); #-- preview if (isset($_REQUEST["preview"])) { $o .= $ewiki_plugins["edit_preview"][0]($data); } #-- save if (isset($_REQUEST["save"])) { #-- check for concurrent version saving $error = 0; if ((@$data["version"] >= 1) && (($data["version"] != @$_REQUEST["version"]) || (@$_REQUEST["version"] < 1))) { $pf = $ewiki_plugins["edit_patch"][0]; if (!$pf || !$pf($id, $data)) { $error = 1; $o .= ewiki_t("ERRVERSIONSAVE") . "

"; } } if (!$error) { #-- new pages` flags $set_flags = (@$data["flags"] & EWIKI_DB_F_COPYMASK); if (($set_flags & EWIKI_DB_F_TYPE) == 0) { $set_flags = EWIKI_DB_F_TEXT; } if (EWIKI_ALLOW_HTML) { $set_flags |= EWIKI_DB_F_HTML; } #-- mk db entry $save = array( "id" => $id, "version" => @$data["version"] + 1, "flags" => $set_flags, "content" => $_REQUEST["content"], "created" => ($uu=@$data["created"]) ? $uu : time(), "meta" => ($uu=@$data["meta"]) ? $uu : "", "hits" => ($uu=@$data["hits"]) ? $uu : "0", ); ewiki_data_update($save); #-- edit storage hooks if ($pf_a = @$ewiki_plugins["edit_save"]) { foreach ($pf_a as $pf) { $pf($save, $data); } } #-- save if (!$save || !ewiki_db::WRITE($save)) { $o .= $ewiki_errmsg ? $ewiki_errmsg : ewiki_t("ERRORSAVING"); } else { #-- prevent double saving, when ewiki_page() is re-called $_REQUEST = $_GET = $_POST = array(); $o = ewiki_t("THANKSFORCONTRIBUTION") . "

"; if (EWIKI_EDIT_REDIRECT) { $url = ewiki_script("", $id, "thankyou=1", 0, 0, ewiki_script_url()); $o .= ewiki_t("EDITCOMPLETE", array("url"=>htmlentities($url))); if (EWIKI_HTTP_HEADERS && !headers_sent()) { header("Status: 303 Redirect for GET"); $sid = defined("SID") ? EWIKI_ADDPARAMDELIM.SID : ""; header("Location: $url$sid"); #header("URI: $url"); #header("Refresh: 0; URL=$url"); } else { $o .= ''; } } else { $o .= ewiki_page($id); } } } //@REWORK // header("Reload-Location: " . ewiki_script("", $id, "", 0, 0, ewiki_script_url()) ); } else { #-- Edit

$o .= ewiki_page_edit_form($id, $data, $hidden_postdata); #-- additional forms if ($pf_a = $ewiki_plugins["edit_form_final"]) foreach ($pf_a as $pf) { $pf($o, $id, $data, $action); } } return($o); } function ewiki_data_update(&$data, $author="") { ewiki_db::UPDATE($data, $author); } function ewiki_new_data($id, $flags=EWIKI_DB_F_TEXT, $author="") { return(ewiki_db::CREATE($id, $flags, $author)); } #-- edit function ewiki_page_edit_form(&$id, &$data, &$hidden_postdata) { global $ewiki_plugins, $ewiki_config; #-- previously edited, or db fetched content if (@$_REQUEST["content"] || @$_REQUEST["version"]) { $data = array( "version" => &$_REQUEST["version"], "content" => &$_REQUEST["content"] ); } else { if (empty($data["version"])) { $data["version"] = 1; } @$data["content"] .= ""; } #-- normalize to DOS newlines $data["content"] = str_replace("\015\012", "\012", $data["content"]); $data["content"] = str_replace("\015", "\012", $data["content"]); $data["content"] = str_replace("\012", "\015\012", $data["content"]); $hidden_postdata["version"] = &$data["version"]; #-- edit textarea/form $o .= ewiki_t("EDIT_FORM_1") . '<form method="POST" enctype="multipart/form-data" action="' . ewiki_script("edit", $id) . '" name="ewiki"' . ' accept-charset="'.EWIKI_CHARSET.'">' . "\n"; #-- additional POST vars if ($hidden_postdata) foreach ($hidden_postdata as $name => $value) { $o .= '<input type="hidden" name="' . $name . '" value="' . $value . '" />' ."\n"; } if (EWIKI_CHARSET=="UTF-8") { $data["content"] = utf8_encode($data["content"]); } ($cols = strtok($ewiki_config["edit_box_size"], "x*/,;:")) && ($rows = strtok("x, ")) || ($cols=70) && ($rows=15); $o .= '<textarea wrap="soft" id="ewiki_content" name="content" rows="'.$rows . '" cols="' .$cols. '">' . htmlentities($data["content"]) . "" . $GLOBALS["ewiki_t"]["C"]["EDIT_TEXTAREA_RESIZE_JS"]; #-- more elements before the submit button if ($pf_a = $ewiki_plugins["edit_form_insert"]) foreach ($pf_a as $pf) { $o .= $pf($id, $data, $action); } $o .= "\n
\n" . ewiki_form("save:submit", "   ".ewiki_t("SAVE")."   ") . "   " . ewiki_form("preview:submit", "   ".ewiki_t("PREVIEW")."   ") . '   ' . ewiki_t("CANCEL_EDIT") . '
'; #-- additional form elements if ($pf_a = $ewiki_plugins["edit_form_append"]) foreach ($pf_a as $pf) { $o .= $pf($id, $data, $action); } $o .= "\n

\n" . ewiki_t("EDIT_FORM_2"); return(''); } #-- pic upload form function ewiki_page_edit_form_final_imgupload(&$o, &$id, &$data, &$action) { if (EWIKI_SCRIPT_BINARY && EWIKI_UP_UPLOAD && EWIKI_IMAGE_MAXSIZE) { $o .= "\n
\n". ''. "\n"; } } function ewiki_page_edit_preview(&$data) { return( '" ); } function ewiki_control_links($id, &$data, $action, $hide_hr=0, $hide_mtime=0) { global $ewiki_plugins, $ewiki_ring, $ewiki_config; $action_links = & $ewiki_config["action_links"][$action]; #-- disabled if (!$ewiki_config["control_line"]) { return(""); } $o = "\n" . '\n"; return($o); } #-- the core of ewiki_control_links, separated for use in info and plugins function ewiki_control_links_list($id, &$data, $action_links, $version=0) { global $ewiki_plugins, $ewiki_config; $o = ""; ($ins = @$ewiki_config["control_links_enclose"]) or ($ins = " "); if ($action_links) foreach ($action_links as $action => $title) if (!empty($ewiki_plugins["action"][$action]) || !empty($ewiki_plugins["action_always"][$action]) || strpos($action, ":/")) { if (EWIKI_PROTECTED_MODE && EWIKI_PROTECTED_MODE_HIDING && !ewiki_auth($id, $data, $action)) { continue; } $o .= $ins[1] . '$version):NULL) ) . '">' . ewiki_t($title) . ' ' . $ins[2]; #++   } $o = $ins[0] . $o . $ins[3]; return($o); } # ============================================================= rendering === ######## ### ### ######### ### ### ### ####### ######## #### ### ######### ### #### ### ####### ### ##### ### ### ##### ### ### ###### ######### ### #### ### ######### ###### ###### ######### ### #### ### ######### ###### ### ### ##### ### ### ### ### ##### ### ######## ### #### ######### ### ### #### ####### ######## ### ### ######### ### ### ### ####### /* The _format() function transforms $wiki_source pages into strings, also calls various markup and helper plugins during the transformation process. The $params array can activate various features and extensions. only accepts UNIX newlines! */ function ewiki_format ( $wiki_source, $params = array() ) { global $ewiki_links, $ewiki_plugins, $ewiki_config; #-- state vars $params = (array)$ewiki_config["format_params"] + (array)$params; $s = array( "in" => 0, # current input $iii[] block array index "para" => "", "line" => "", "post" => "", # string to append after current line/paragraph "line_i" => 0, "lines" => array(), "list" => "", # lists "tbl" => 0, # open table? "indent" => 0, # indentation "close" => array(), ); #-- aliases $in = &$s["in"]; $line = &$s["line"]; $lines = &$s["lines"]; $para = &$s["para"]; $post = &$s["post"]; $list = &$s["list"]; #-- input and output arrays if ($wiki_source[0] == "<") { # also prepend an empty line $wiki_source = "\n" . $wiki_source; # for faster strpos() searchs } $core_flags = 0x137F; # (0x0001=WikiMarkup, 0x0002=WikiLinks, 0x1000=MoreBlockPlugins) $iii = array( 0 => array( 0 => $wiki_source."\n", # body + empty line 1 => $core_flags, # rendering / behaviour options 2 => "core", # block plugin name ) ); $ooo = array( ); unset($wiki_source); #-- plugins $pf_tbl = @$ewiki_plugins["format_table"][0]; $pf_line = @$ewiki_plugins["format_line"]; #-- wikimarkup (wm) $htmlentities = $ewiki_config["htmlentities"]; $wm_indent = &$ewiki_config["wm_indent"]; $s["wm_indent_close"] = ""). ">"; $wm_table_defaults = &$ewiki_config["wm_table_defaults"]; $wm_source = &$ewiki_config["wm_source"]; $wm_list = &$ewiki_config["wm_list"]; $wm_list_chars = implode("", array_keys($wm_list)); $wm_style = &$ewiki_config["wm_style"]; $wm_start_end = &$ewiki_config["wm_start_end"]; $wm_max_header = &$ewiki_config["wm_max_header"]; $wm_publishing_headers = &$ewiki_config["wm_publishing_headers"]; $wm_whole_line = &$ewiki_config["wm_whole_line"]; #-- eleminate html $iii[0][0] = strtr($iii[0][0], $htmlentities); unset($htmlentities["&"]); #-- pre-processing plugins (working on wiki source) if ($pf_source = $ewiki_plugins["format_source"]) { foreach ($pf_source as $pf) $pf($iii[0][0]); } #-- simple markup $iii[0][0] = strtr($iii[0][0], $wm_source); #-- separate input into blocks ------------------------------------------ if ($ewiki_config["format_block"]) foreach ($ewiki_config["format_block"] as $btype=>$binfo) { #-- disabled block plugin? if ($binfo[2] && !$params[$binfo[2]]) { continue; } #-- traverse $iii[] $in = -1; while ((++$in) < count($iii)) { #-- search fragment delimeters if ($iii[$in][1] & 0x0100) while ( ($c = & $iii[$in][0]) && (($l = strpos($c, $binfo[0])) !== false) && ($r = strpos($c, $binfo[1], $l)) ) { $l_len = strlen($binfo[0]); $r_len = strlen($binfo[1]); $repl = array(); // pre-text if (($l > 0) && trim($text = substr($c, 0, $l))) { $repl[] = array($text, $core_flags, "core"); } // the extracted part if (trim($text = substr($c, $l+$l_len, $r-$l-$l_len))) { $repl[] = array($text, $binfo[3], "$btype"); } // rest if (($r+$r_len < strlen($c)) && trim($text = substr($c, $r+$r_len))) { $repl[] = array($text, $core_flags, "core"); } array_splice($iii, $in, 1, $repl); $in += 1; } } } #-- run format_block plugins $in = -1; while ((++$in) < count($iii)) { if (($btype = $iii[$in][2]) && ($pf_a = @$ewiki_plugins["format_block"][$btype])) { $c = &$iii[$in][0]; if ($iii[$in][1] & 0x0400) { $c = strtr($c, array_flip($htmlentities)); } foreach ($pf_a as $pf) { # current buffer $c and pointer $in into $iii[] and state $s $pf($c, $in, $iii, $s, $btype); } } } #-- wiki markup ------------------------------------------------------ $para = ""; $in = -1; while ((++$in) < count($iii)) { #-- wikimarkup if ($iii[$in][1] & 0x0001) { #-- input $lines buffer, and output buffer $ooo array $lines = explode("\n", $iii[$in][0]); $ooo[$in] = array( 0 => "", 1 => $iii[$in][1] ); $out = &$ooo[$in][0]; $s["bmarkup"] = ($iii[$in][1] & 0x0008); # lists/tables/paras $s["nopara"] = !($s["bmarkup"]); # disables indentation & paragraphs # should this disable lists and tables and ... # shouldn't it rather be a bit flag? #-- walk through wiki source lines $line_max = count($lines); if ($lines) foreach ($lines as $s["line_i"]=>$line) { #echo "line={$s[line_i]}:$line\n"; #-- empty lines separate paragraphs if (!ltrim($line)) { ewiki_format_close_para($ooo, $s); ewiki_format_close_tags($ooo, $s); if (!$s["nopara"]) { $out .= "\n"; } $line = ''; } #-- list/table/headline "BlockMarkup" --------------------------- if ($s["bmarkup"]) { #-- horiz bar if (!$list && !strncmp($line, "----", 4)) { $s["para"] .= "

---

\n"; continue; } #-- html comment if (!strncmp($line, "<!--", 7)) { $out .= "\n"; continue; } strlen($line) && ($c0 = $line[0]) or ($c0 = "\000"); #-- tables ------------------------ if (($c0 == "|") && ($s["tbl"] || ($line[strlen($line)-1] == "|"))) { if (!$s["tbl"]) { ewiki_format_close_para($ooo, $s); ewiki_format_close_tags($ooo, $s); $s["list"] = ""; } $line = substr($line, 1); if ($line[strlen($line)-1] == "|") { $line = substr($line, 0, -1); } if ($pf_tbl) { $pf_tbl($line, $ooo, $s); } else { if (!$s["tbl"]) { $out .= "\n"; $s["close"][] = "\n"; } $line = "\n" . str_replace("|", "\n", $line) . "\n"; } $s["tbl"] = 1; $para = false; } elseif ($s["tbl"]) { $s["tbl"] = 0; } #-- headlines if (($c0 == "!") && ($excl = strspn($line, "!"))) { if ($excl > $wm_max_header) { $excl = $wm_max_header; } $line = substr($line, $excl); //publishing headers go from h2 smaller "like word" $excl = $wm_publishing_headers? (1+$excl) :5 - $excl; $line = "" . $line . ""; if ($para) { ewiki_format_close_para($ooo, $s); } ewiki_format_close_tags($ooo, $s); $para = false; } #-- whole-line wikimarkup foreach ($wm_whole_line as $find=>$replace) { if (substr($line, 0, strlen($find)) == $find) { $line = "<$replace>" . ltrim(substr($line,strlen($find))) . ""; } } #-- indentation (space/tab markup) $n_indent = 0; if (!$list && (!$s["nopara"]) && ($n_indent = strspn($line, " "))) { $n_indent = (int) ($n_indent / 2.65); while ($n_indent > $s["indent"]) { $s["para"] .= $wm_indent; $s["indent"]++; } } while ($n_indent < $s["indent"]) { $s["para"] .= $s["wm_indent_close"] . "\n"; $s["indent"]--; } #-- list markup ------------------- if (isset($wm_list[$c0])) { if (!$list) { ewiki_format_close_para($ooo, $s); ewiki_format_close_tags($ooo, $s); } $new_len = strspn($line, $wm_list_chars); $new_list = substr($line, 0, $new_len); $old_len = strlen($list); $lchar = $new_list[$new_len-1]; list($lopen, $ltag1, $ltag2) = $wm_list[$lchar]; #-- exception: "--" is treated as literal if (($old_len===0) && (($new_len>=2) && ($new_list=="--"))) { $list = ''; # change this ^^ to an OR (||) # to filter bad list markup } else { #-- cut line $line = substr($line, $new_len); $lspace = ""; $linsert = ""; if ($ltag1) { $linsert = "<$ltag1>" . strtok($line, $lchar) . " "; $line = strtok("\000"); } #-- enum list types if (($lchar == "#") && ($line[1] == " ") && ($ltype = $line[0])) { if (($ltype >= "0") || ($ltype <= "z")) { $line = substr($line, 2); } else { $ltype = ""; } } #-- add another

st entry if ($new_len == $old_len) { $lspace = str_repeat(" ", $new_len); $out .= "\n" . $lspace . $linsert . "<$ltag2>"; } #-- add list elseif ($new_len > $old_len) { while ($new_len > ($old_len=strlen($list))) { $lchar = $new_list[$old_len]; $list .= $lchar; list($lopen, $ltag1, $ltag2) = $wm_list[$lchar]; $lclose = strtok($lopen, " "); $lspace = str_repeat(" ", $new_len); if (isset($ltype) && $ltype) { $ltype = ($ltype<"A"?"1": ($ltype=="I"?"I": ($ltype=="i"?"i": ($ltype<"a"?"A": "a")))); $lopen .= " type=\"$rltype\""; if ($rltype!=$ltype) { $lopen .= " start=\"$ltype\""; } } $out .= "\n$lspace<$lopen>\n" . "$lspace". $linsert . "<$ltag2>"; $s["close"][] = "$lspace"; $s["close"][] = "$lspace"; } } #-- close lists else { while ($new_len < ($old_len=strlen($list))) { $remove = $old_len-$new_len; ewiki_format_close_tags($ooo, $s, 2*$remove); $list = substr($list, 0, -$remove); } if ($new_len) { $lspace = str_repeat(" ", $new_len); $out .= "$lspace\n" . $lspace . $linsert . "<$ltag2>"; } } $list = $new_list; $para = false; } } elseif ($list) { if ($c0 == " ") { $para = false; } else { ewiki_format_close_tags($ooo, $s); $list = ""; } } }#--if $s["bmarkup"] -------------------------------------------- #-- text style triggers foreach ($wm_style as $find=>$replace) { $find_len = strlen($find); $loop = 20; while(($loop--) && (($l = strpos($line, $find)) !== false) && ($r = strpos($line, $find, $l + $find_len))) { $line = substr($line, 0, $l) . $replace[0] . substr($line, $l + strlen($find), $r - $l - $find_len) . $replace[1] . substr($line, $r + $find_len); } } #-- start-end markup foreach ($wm_start_end as $d) { $len0 = strlen($d[0]); $loop = 20; while(($loop--) && (($l = strpos($line, $d[0])) !== false) && ($r = strpos($line, $d[1], $l + $len0))) { $len1 = strlen($d[1]); $line = substr($line, 0, $l) . $d[2] . substr($line, $l + $len0, $r - $l - $len0) . $d[1] . substr($line, $r + $len1); } } #-- call wiki source formatting plugins that work on current line if ($pf_line) { foreach ($pf_line as $pf) $pf($out, $line, $post); } #-- add formatted line to page-output $line .= $post; if ($para === false) { $out .= $line; $para = ""; } else { $para .= $line . "\n"; } } #-- last block, or flags dictate a WikiSource blocks/para break? if (!isset($iii[$in+1]) || (($iii[$in+1][1] & 0x0010) ^ ($iii[$in][1] & 0x0010)) ) { ewiki_format_close_para($ooo, $s); ewiki_format_close_tags($ooo, $s); } } #-- copy as is into output buffer else { $ooo[$in] = $iii[$in]; } $iii[$in] = array(); } #-- wiki linking ------------------------------------------------------ $scan_src = ""; for ($in=0; $in $ooo[$in][0] . "\n" . $ooo[$in+1][0], 1 => $ooo[$in][1] | $ooo[$in+1][1], ); array_splice($ooo, $in+1, 1); } } #-- html character entities if (EWIKI_HTML_CHARS || ($ooo[$in][1] & 0x0004)) { $ooo[$in][0] = str_replace("&#", "&#", $ooo[$in][0]); } $scan_src .= $ooo[$in][0]; } #-- pre-scan if ($params["scan_links"]) { ewiki_scan_wikiwords($scan_src, $ewiki_links); } if ($pf_linkprep = @$ewiki_plugins["format_prepare_linking"]) { foreach ($pf_linkprep as $pf) $pf($scan_src); } $scan_src = NULL; #-- finally the link-creation-regex for ($in=0; $in tags if (!$s["nopara"]) { $s["para"] = "\n

" . ltrim($s["para"], "\n") . "

\n"; } #-- paragraph formation plugins if ($pf_a = @$GLOBALS["ewiki_plugins"]["format_para"]) { foreach ($pf_a as $pf) { $pf($s["para"], $ooo, $s); } } $out .= $s["para"]; $s["para"] = ""; } } function ewiki_format_close_tags(&$ooo, &$s, $count=100) { $out = &$ooo[$s["in"]][0]; if (!is_array($s) || !is_array($s["close"])) { die("\$s is garbaged == $s!!"); } while (($count--) && ($add = array_pop($s["close"]))) { $out .= $add . "\n"; } } function ewiki_format_pre(&$str, &$in, &$iii, &$s, $btype) { $str = "

" . $str . "

"; } function ewiki_format_html(&$str, &$in, &$iii, &$s) { $he = array_reverse($GLOBALS["ewiki_config"]["htmlentities"]); $str = strtr($str, array_flip($he)); $str = "" . $str . "\n\n"; } function ewiki_format_comment(&$str, &$in, &$iii, &$s, $btype) { $str = ""; } /* unclean pre-scanning for WikiWords in a page, pre-query to the db */ function ewiki_scan_wikiwords(&$wiki_source, &$ewiki_links, $se=0) { global $ewiki_config, $ewiki_id; #-- find matches preg_match_all($ewiki_config["wiki_pre_scan_regex"], $wiki_source, $uu); $uu = array_merge((array)$uu[1], (array)$uu[2], (array)@$uu[3], (array)$uu[4]); #-- clean up list, trim() spaces (allows more unclean regex) - page id unification foreach ($uu as $i=>$id) { $uu[$i] = trim($id); } unset($uu[""]); $uu = array_unique($uu); #-- unfold SubPage names if (EWIKI_SUBPAGE_START) { foreach ($uu as $i=>$id) { if ($id && (strpos(EWIKI_SUBPAGE_START, $id[0]) !== false)) { if ($id[1] == "/") { $id = substr($id, 1); } $uu[$i] = $ewiki_id . $id; } } } #-- query db $ewiki_links = ewiki_db::FIND($uu); #-- strip email adresses if ($se) { foreach ($ewiki_links as $c=>$uu) { if (strpos($c, "@") && (strpos($c, ".") || strpos($c, ":"))) { unset($ewiki_links[$c]); } } } } /* regex on page content, handled by callback (see below) */ function ewiki_render_wiki_links(&$o) { global $ewiki_links, $ewiki_config, $ewiki_plugins; #-- merge with dynamic pages list ewiki_merge_links($ewiki_links); #-- replace WikiWords $link_regex = &$ewiki_config["wiki_link_regex"]; $o = preg_replace_callback($link_regex, "ewiki_link_regex_callback", $o); #-- cleanup /////////// unset($ewiki_links); } /* combines with page plugin list, and makes all case-insensitive (=lowercased) in accord with EWIKI_CASE_INSENSITIVE (handled within ewiki_array) */ function ewiki_merge_links(&$ewiki_links) { global $ewiki_plugins; if ($ewiki_links !== true) { foreach ($ewiki_plugins["page"] as $page=>$uu) { $ewiki_links[$page] = 1; } $ewiki_links = ewiki_array($ewiki_links); } } /* link rendering (p)regex callback (ooutch, this is a complicated one) */ function ewiki_link_regex_callback($ii, $force_noimg=0) { global $ewiki_links, $ewiki_plugins, $ewiki_config, $ewiki_id; $str = trim($ii[0]); $type = array(); $states = array(); #-- link bracket '[' escaped with '!' or '~' if (($str[0] == "!") || ($str[0] == "~") || ($str[0] == "\\")) { return(substr($str, 1)); } if ($str[0] == "#") { $states["define"] = 1; $str = substr($str, 1); } if ($str[0] == "[") { $states["brackets"] = 1; $str = substr($str, 1, -1); if (!strlen($str)) { return("[]"); } //better: $ii[0] } #-- explicit title given via [ title | WikiLink ] $href = $title = strtok($str, "|"); if ($uu = strtok("|")) { $href = $uu; $states["titled"] = 1; } #-- title and href swapped: swap back if (strpos("://", $title) || strpos($title, ":") && !strpos($href, ":")) { $uu = $title; $title = $href; $href = $uu; } #-- new entitling scheme [ url "title" ] if ((($l=strpos($str, '"')) < ($r=strrpos($str, '"'))) && ($l!==false) ) { $title = substr($str, $l + 1, $r - $l - 1); $href = substr($str, 0, $l) . substr($str, $r + 1); $states["titled"] = 1; if (!$href) { return($ii[0]); } } #-- strip spaces $spaces_l = ($href[0]==" ") ?1:0; $spaces_r = ($href[strlen($href)-1]==" ") ?1:0; $title = ltrim(trim($title), "^"); $href = ltrim(trim($href), "^"); #-- strip_htmlentities() if (1&& (strpos($href, "&")!==false) && strpos($href, ";")) { ewiki_stripentities($href); } #-- anchors $href2 = ""; if (($p = strrpos($href, "#")) && ($p) && ($href[$p-1] != "&")) { $href2 = trim(substr($href, $p)); $href = trim(substr($href, 0, $p)); } elseif ($p === 0) { $states["define"] = 1; } if ($href == ".") { $href = $ewiki_id; } #-- SubPages $c0 = $href[0]; if ($c0 && (strpos(EWIKI_SUBPAGE_START, $c0) !== false)) { $_set = EWIKI_SUBPAGE_LONGTITLE && ($href==$title); if (($href[1] == "/")) { ##($c0 == ".") && $href = substr($href, 1); } $href = $ewiki_id . $href; if ($_set) { $title = $href; } } #-- for case-insensitivines $href_i = EWIKI_CASE_INSENSITIVE ? strtolower($href) : ($href); #-- injected URLs if (isset($ewiki_links[$href_i]) && strpos($inj_url = $ewiki_links[$href_i], "://")) { if ($href==$title) { $href = $inj_url; } } $states["title"] = &$title; #-- interwiki links if (strpos($href, ":") && ($uu = ewiki_interwiki($href, $type, $states))) { $href = $uu; $str = "$title"; } #-- action:WikiLinks elseif (isset($ewiki_plugins["action"][$a=strtolower(strtok($href, ":"))])) { $type = array($a, "action", "wikipage"); $str = '' . $title . ''; } #-- page anchor definitions, if ($href[0]=="#") elseif (@$states["define"]) { $type = array("anchor"); if ($title==$href) { $title = ""; // was " " before, but that's not required } $str = '' . ltrim($title, "#") . ''; } #-- inner page anchor jumps elseif (strlen($href2) && ($href==$ewiki_id) || ($href[0]=="#") && ($href2=&$href)) { $type = array("jump"); $str = '' . $title . ''; } #-- ordinary internal WikiLinks elseif (($ewiki_links === true) || @$ewiki_links[$href_i]) { $type = array("wikipage"); $str = '' . $title . ''; } #-- guess for mail@addresses, convert to URI if elseif (strpos($href, "@") && !strpos($href, ":")) { $type = array("email"); $href = "mailto:" . $href; } #-- not found fallback else { $str = ""; #-- a plugin may take care if ($pf_a = @$ewiki_plugins["link_notfound"]) { foreach ($pf_a as $pf) { if ($str = $pf($title, $href, $href2, $type)) { break; } } } #-- (QuestionMarkLink to edit/ action) if (!$str) { $type = array("notfound"); $t = $ewiki_config["qmark_links"]; $str = ewiki_script(isset($t[4]) ? "edit" : "", $href); if (strlen($t) >= 3) { $str = ($t[0] ? "$t[0]" :'') . ($t[1] ? "<$t[1]>$title" : $title) . ($t[2] ? "$t[2]" :''); } else { $str = "" . $title . ""; if ($t<0) { $str .= "?"; } } $str = '' . $str . ''; } } #-- convert standard and internal:// URLs $is_url = preg_match('°^('.implode('|', $ewiki_config["idf"]["url"]).')°', $href); $is_internal = 0; // if (!$is_url && ($ewiki_links[$href_i]["flags"] & EWIKI_DB_F_BINARY)) { $is_url = 1; $is_internal = 1; } if ($is_url) { $type[-2] = "url"; $type[-1] = strtok($href, ":"); #-- [http://url titles] if (strpos($href, " ") && ($title == $href)) { $href = strtok($href, " "); $title = strtok("\377"); } #-- URL plugins if ($pf_a = $ewiki_plugins["link_url"]) foreach ($pf_a as $pf) { if ($str = $pf($href, $title, $status)) { break 2; } } $meta = @$ewiki_links[$href]; #-- check for image files $ext = substr($href, strrpos($href,".")); $nocache = strpos($ext, "no"); $ext = strtok($ext, "?&#"); $obj = in_array($ext, $ewiki_config["idf"]["obj"]); $img = (strncmp(strtolower($href), "data:image/", 11) == 0) && ($nocache=1) || $obj || in_array($ext, $ewiki_config["idf"]["img"]); #-- internal:// references (binary files) $id = $href; if (EWIKI_SCRIPT_BINARY && ((strpos($href, EWIKI_IDF_INTERNAL)===0) || EWIKI_IMAGE_MAXSIZE && EWIKI_CACHE_IMAGES && $img && !$nocache) || $is_internal ) { $type = array("binary"); $href = ewiki_script_binary("", $href); } #-- output html reference if (!$img || $force_noimg || !$states["brackets"] || (strpos($href, EWIKI_IDF_INTERNAL) === 0)) { //@FIX: #add1 || $href2 (breaks #.jpeg hack, but had a purpose?) $str = '' . $title . ''; } #-- img tag else { $type = array("image"); if (is_string($meta)) { $meta = unserialize($meta); } $str = ewiki_link_img($href, $id, $title, $meta, $spaces_l+2*$spaces_r, $obj, $states); } } #-- icon/transform plugins ksort($type); if ($pf_a = @$ewiki_plugins["link_final"]) { foreach ($pf_a as $pf) { $pf($str, $type, $href, $title, $states); } } if (isset($states["xhtml"]) && $states["xhtml"]) { foreach ($states["xhtml"] as $attr=>$val) { $str = str_replace(" tag */ function ewiki_link_img($href, $id, $title, $meta, $spaces, $obj, $states) { #-- size of cached image $x = $meta["width"]; $y = $meta["height"]; #-- width/height given in url if ($p = strpos($id, '?')) { $id = str_replace("&", "&", substr($id, $p+1)); parse_str($id, $meta); if ($uu = $meta["x"].$meta["width"]) { $x = $uu; } if ($uu = $meta["y"].$meta["height"]) { $y = $uu; } if ($scale = $meta["r"] . $meta["scale"]) { if ($p = strpos($scale, "%")) { $scale = strpos($scale, 0, $p) / 100; } $x *= $scale; $y *= $scale; } } #-- alignment $align = array('', ' align="right"', ' align="left"', ' align="center"'); $align = $align[$spaces]; $size = ($x && $y ? " width=\"$x\" height=\"$y\"" : ""); #-- remove annoyances if ($href==$title) { $title = ""; } #-- do return ($obj ? '" : " />"); # htmlentities($title) } function ewiki_stripentities(&$str) { static $un = array("<"=>"<", ">"=>">", "&"=>"&"); $str = strtr($str, $un); } /* Returns URL if it encounters an InterWiki:Link or workalike. */ function ewiki_interwiki(&$href, &$type, &$s) { global $ewiki_config, $ewiki_plugins; $l = strpos($href, ":"); if ($l and (strpos($href,"//") != $l+1) and ($p1 = strtok($href, ":"))) { $page = strtok("\000"); if (($p2 = ewiki_array($ewiki_config["interwiki"], $p1)) !== NULL) { $p1 = $p2; $type = array("interwiki", $uu); while ($p1_alias = $ewiki_config["interwiki"][$p1]) { $type[] = $p1; $p1 = $p1_alias; } if (!strpos($p1, "%s")) { $p1 .= "%s"; } $href = str_replace("%s", $page, $p1); return($href); } elseif ($pf = $ewiki_plugins["intermap"][$p1]) { return($pf($p1, $page)); } elseif ($pf_a = $ewiki_plugins["interxhtml"]) { foreach($pf_a as $pf) { $pf($p1, $page, $s); } $href = $page; } } } /* implements FeatureWiki:InterMapWalking */ function ewiki_intermap_walking($id, &$data, $action) { if (empty($data["version"]) && ($href = ewiki_interwiki($id, $uu, $uu))) { header("Location: $href$sid"); return("$href"); } } function ewiki_link($pagename, $title="") { if (!($url = ewiki_interwiki($pagename, $uu, $uu))) { $url = ewiki_script("", $pagename); } if (!$title) { $title = $pagename; } return("".htmlentities($title).""); } # ========================================================================= ##### ## ## ## ## ##### ## ## ###### ## ### ## #### ###### ## ## ## ## ## ### ## ###### ## ## ## ## ##### ## #### ## ## ## ###### ###### ##### ## ####### ###### #### #### ## ### ## ## #### ###### ##### ## ## ### ## ## ### ## ## ## ### ## ###### ## ## ### ## ## ## ## ## ###### ## ## ## ## ## ## ## ## /* fetch & store */ function ewiki_binary($break=0) { global $ewiki_plugins; #-- reject calls if (!strlen($id = @$_REQUEST[EWIKI_UP_BINARY]) || !EWIKI_IDF_INTERNAL) { return(false); } if (headers_sent()) die("ewiki-binary configuration error"); #-- upload requests $upload_file = @$_FILES[EWIKI_UP_UPLOAD]; $add_meta = array(); if ($orig_name = @$upload_file["name"]) { $add_meta["Content-Location"] = urlencode($orig_name); $add_meta["Content-Disposition"] = 'inline; filename="'.urlencode(basename("remote://$orig_name")).'"'; } #-- what are we doing here? if (($id == EWIKI_IDF_INTERNAL) && ($upload_file)) { $do = "upload"; } else { $data = ewiki_db::GET($id); $flags = @$data["flags"]; if (EWIKI_DB_F_BINARY == ($flags & EWIKI_DB_F_TYPE)) { $do = "get"; } elseif (empty($data["version"]) and EWIKI_CACHE_IMAGES) { $do = "cache"; } else { $do = "nop"; } } #-- auth only happens when enforced with _PROTECTED_MODE_XXL setting # (authentication for inline images in violation of the WWW spirit) if ((EWIKI_PROTECTED_MODE>=5) && !ewiki_auth($id, $data, "binary-{$do}")) { return($_REQUEST["id"]="view/BinaryPermissionError"); } #-- upload an image if ($do == "upload"){ $id = ewiki_binary_save_image($upload_file["tmp_name"], "", $return=0, $add_meta); @unlink($upload_file["tmp_name"]); ($title = trim($orig_name, "/")) && ($title = preg_replace("/[^-._\w\d]+/", "_", substr(substr($orig_name, strrpos($title, "/")), 0, 20))) && ($title = ' \\"'.$title.'\\"') || ($title=""); if ($id) { echo<<Your uploaded file was saved as
[$id] .

EOF; } } #-- request for contents from the db elseif ($do == "get") { #-- send http_headers from meta if (is_array($data["meta"])) { foreach ($data["meta"] as $hdr=>$val) { if (($hdr[0] >= "A") && ($hdr[0] <= "Z")) { header("$hdr: $val"); } } } #-- fetch from binary store if ($pf_a = $ewiki_plugins["binary_get"]) { foreach ($pf_a as $pf) { $pf($id, $data["meta"]); } } #-- else fpassthru echo $data["content"]; } #-- fetch & cache requested URL, elseif ($do == "cache") { #-- check for standard protocol names, to prevent us from serving # evil requests for '/etc/passwd.jpeg' or '../.htaccess.gif' if (preg_match('@^\w?(http|ftp|https|ftps|sftp)\w?://@', $id)) { #-- generate local copy $filename = tempnam(EWIKI_TMP, "ewiki.local.temp."); if(!copy($id, $filename)){ ewiki_log("ewiki_binary: error copying $id to $filename", 0); } else { $add_meta = array( "Content-Location" => urlencode($id), "Content-Disposition" => 'inline; filename="'.urlencode(basename($id)).'"', 'PageType' => 'CachedImage' ); $result = ewiki_binary_save_image($filename, $id, "RETURN", $add_meta); } } #-- deliver if ($result && !$break) { ewiki_binary($break=1); } #-- mark URL as unavailable else { $data = array( "id" => $id, "version" => 1, "flags" => EWIKI_DB_F_DISABLED, "lastmodified" => time(), "created" => time(), "author" => ewiki_author("ewiki_binary_cache"), "content" => "", "meta" => array("Status"=>"404 Absent"), ); ewiki_db::WRITE($data); header("Location: $id"); ewiki_log("imgcache: did not find '$id', and marked it now in database as DISABLED", 2); } } #-- "we don't sell this!" else { if (strpos($id, EWIKI_IDF_INTERNAL) === false) { header("Status: 301 Located SomeWhere Else"); header("Location: $id"); } else { header("Status: 404 Absent"); header("X-Broken-URI: $id"); } } // you should not remove this one, it is really a good idea to use it! die(); } function ewiki_binary_save_image($filename, $id="", $return=0, $add_meta=array(), $accept_all=EWIKI_ACCEPT_BINARY, $care_for_images=1) { global $ewiki_plugins; #-- break on empty files if (!filesize($filename)) { return(false); } #-- check for image type and size $mime_types = array( "application/octet-stream", "image/gif", "image/jpeg", "image/png", "application/x-shockwave-flash" ); $ext_types = array( "bin", "gif", "jpeg", "png", "swf" ); list($width, $height, $mime_i, $uu) = getimagesize($filename); (!$mime_i) && ($mime_i=0) || ($mime = $mime_types[$mime_i]); #-- images expected if ($care_for_images) { #-- mime type if (!$mime_i && !$accept_all || !filesize($filename)) { ewiki_die(ewiki_t("BIN_NOIMG"), $return); return; } #-- resize image if ((strpos($mime,"image/")!==false) && (EWIKI_IMAGE_RESIZE)) { // filesize() check now in individual resize plugins if ($pf_a = $ewiki_plugins["image_resize"]) foreach ($pf_a as $pf) { $pf($filename, $mime, $return); clearstatcache(); } } #-- reject image if too large if(filesize($filename) > EWIKI_IMAGE_MAXSIZE) { ewiki_die(ewiki_t("BIN_IMGTOOLARGE"), $return); return; } #-- again check mime type and image sizes list($width, $height, $mime_i, $uu) = getimagesize($filename); (!$mime_i) && ($mime_i=0) || ($mime = $mime_types[$mime_i]); } ($ext = $ext_types[$mime_i]) or ($ext = $ext_types[0]); #-- binary files if ((!$mime_i) && ($pf = $ewiki_plugins["mime_magic"][0])) { if ($tmp = $pf($content)) { $mime = $tmp; } } if (!strlen($mime)) { $mime = $mime_types[0]; } #-- store size of binary file $add_meta["size"] = filesize($filename); $content = ""; #-- handler for (large/) binary content? if ($pf_a = $ewiki_plugins["binary_store"]) { foreach ($pf_a as $pf) { $pf($filename, $id, $add_meta, $ext); } } #-- read file into memory (2MB), to store it into the database if ($filename) { $f = fopen($filename, "rb"); $content = fread($f, 1<<21); fclose($f); } #-- generate db file name if (empty($id)) { $md5sum = md5($content); $id = EWIKI_IDF_INTERNAL . $md5sum . ".$ext"; ewiki_log("generated md5sum '$md5sum' from file content"); } #-- prepare meta data $meta = array( "class" => $mime_i ? "image" : "file", "Content-Type" => $mime, "Pragma" => "cache", ) + (array)$add_meta; if ($mime_i) { $meta["width"] = $width; $meta["height"] = $height; } #-- database entry $data = array( "id" => $id, "version" => "1", "author" => ewiki_author(), "flags" => EWIKI_DB_F_BINARY | EWIKI_DB_F_READONLY, "created" => time(), "lastmodified" => time(), "meta" => &$meta, "content" => &$content, ); #-- write if not exist $exists = ewiki_db::FIND(array($id)); if (! $exists[$id] ) { $result = ewiki_db::WRITE($data); ewiki_log("saving of '$id': " . ($result ? "ok" : "error")); } else { ewiki_log("binary_save_image: '$id' was already in the database", 2); } return($id); } # ========================================================================= #### #### #### ######## ######## ##### ##### #### ########## ########## ###### ###### #### #### ### #### ### ############# #### #### ############# #### ######## #### #### ### #### #### ######## #### #### # #### #### #### #### #### #### #### ### #### #### ### #### #### #### ######### ########## #### #### #### ####### ######## /* yes! it is not necessary to annoy people with country flags, if HTTP already provides means to determine the prefered language! */ function ewiki_localization() { global $ewiki_t; $deflangs = ','.@$_ENV["LANGUAGE"] . ','.@$_ENV["LANG"] . ",".EWIKI_DEFAULT_LANG . ",en,C"; foreach (explode(",", @$_SERVER["HTTP_ACCEPT_LANGUAGE"].$deflangs) as $l) { $l = strtok($l, ";"); $l = strtok($l, "-"); $l = strtok($l, "_"); $l = strtok($l, "."); if ($l = trim($l)) { $ewiki_t["languages"][] = strtolower($l); } } $ewiki_t["languages"] = array_unique($ewiki_t["languages"]); } /* poor mans gettext, $repl is an array of string replacements to get applied to the fetched text chunk, "$const" is either an entry from $ewiki_t[] or a larger text block containing _{text} replacement braces of the form "_{...}" */ function ewiki_t($const, $repl=array(), $pref_langs=array()) { global $ewiki_t; #-- use default language wishes if (empty($pref_langs)) { $pref_langs = $ewiki_t["languages"]; } #-- large text snippet replacing if (strpos($const, "_{") !== false) { while ( (($l=strpos($const,"_{")) || ($l===0)) && ($r=strpos($const,"}",$l)) ) { $const = substr($const, 0, $l) . ewiki_t(substr($const, $l+2, $r-$l-2)) . substr($const,$r+1); } } #-- just one string else foreach ($pref_langs as $l) { if (is_string($r = @$ewiki_t[$l][$const]) || ($r = @$ewiki_t[$l][strtoupper($const)])) { foreach ($repl as $key=>$value) { if ($key[0] != '$') { $key = '$'.$key; } $r = str_replace($key, $value, $r); } return($r); } } return($const); } /* takes all ISO-8859-1 characters into account but won't work with all databases */ function ewiki_lowercase($s) { $len = strlen($s); for ($i=0; $i<$len; $i++) { if (ord($s[$i]) >= 192) { $s[$i] = chr(ord($s[$i]) | 0x20); } } return(strtolower($s)); } function ewiki_log($msg, $error_type=3) { if ((EWIKI_LOGLEVEL >= 0) && ($error_type <= EWIKI_LOGLEVEL)) { $msg = time() . " - " . $_SERVER["REMOTE_ADDR"] . ":" . $_SERVER["REMOTE_PORT"] . " - " . $_SERVER["REQUEST_METHOD"] . " " . $_SERVER["REQUEST_URI"] . " - " . strtr($msg, "\n\r\000\377\t\f", "\r\r\r\r\t\f") . "\n"; error_log($msg, 3, EWIKI_LOGFILE); } } function ewiki_die($msg, $return=0) { ewiki_log($msg, 1); if ($return) { return($GLOBALS["ewiki_error"] = $msg); } else { die($msg); } } function ewiki_array_hash(&$a) { return(count($a) . ":" . implode(":", array_keys(array_slice($a, 0, 3)))); } /* provides an case-insensitive in_array replacement to search a page name in a list of others; the supplied $array WILL be lowercased afterwards, unless $dn was set */ function ewiki_in_array($value, &$array, $dn=0, $ci=EWIKI_CASE_INSENSITIVE) { static $as = array(); #-- work around pass-by-reference if ($dn && $ci) { $dest = array(); } else { $dest = &$array; } #-- make everything lowercase if ($ci) { $value = strtolower($value); if (empty($as[ewiki_array_hash($array)])) { // prevent working on the foreach ($array as $i=>$v) { // same array multiple times $dest[$i] = strtolower($v); } $as[ewiki_array_hash($dest)] = 1; } } #-- search in values return(in_array($value, $dest)); } /* case-insensitively retrieves an entry from an $array, or returns the given $array lowercased if $key was obmitted */ function ewiki_array($array, $key=false, $am=1, $ci=EWIKI_CASE_INSENSITIVE) { #-- make everything lowercase if ($ci) { $key = strtolower($key); $r = array(); foreach ($array as $i=>$v) { $i = strtolower($i); if (!$am || empty($r[$i])) { $r[$i] = $v; } else { $r[$i] .= $v; //RET: doubling for images`meta won't happen } // but should be "+" here for integers } $array = &$r; } #-- search in values if ($key) { return(@$array[$key]); } else { return($array); } } /* generates {author} string field for page database entry updates */ function ewiki_author($defstr="") { $author = @$GLOBALS["ewiki_author"]; ($ip = &$_SERVER["REMOTE_ADDR"]) or ($ip = "127.0.0.0"); ($port = $_SERVER["REMOTE_PORT"]) or ($port = "null"); #-- this call may be very slow (~20 sec) if (EWIKI_RESOLVE_DNS) { $hostname = gethostbyaddr($ip); } $remote = (($ip != $hostname) ? $hostname . " " : "") . $ip . ":" . $port; (empty($author)) && ( ($author = $defstr) || ($author = $_SERVER["HTTP_FROM"]) || // RFC2068 sect 14.22 ($author = $_SERVER["PHP_AUTH_USER"]) ); (empty($author)) && ($author = $remote) || ($author = addslashes($author) . " (" . $remote . ")" ); return($author); } /* decodes {author} field for display in pages */ function ewiki_author_html($orig, $tail=1) { $str = strtok($orig, " (|,;/[{<+"); $tail = $tail ? " " . strtok("\000") : ""; #-- only IP if (strpos($str, ":")) { return('$orig"); } #-- mail address elseif (strpos($str, "@")) { // email_protect_*() now takes care of plugin pages return("$str$tail"); } #-- host name elseif (strpos($str, ".") < strrpos($str, ".")) { return("$str$tail"); } #-- eventually an AuthorName else { return('' . $str . '' . $tail); } return($orig); } /* Returns a value of (true) if the currently logged in user (this must be handled by one of the plugin backends) is authenticated to do the current $action, or to view the current $id page. - alternatively just checks current authentication $ring permission level - errors are returned via the global $ewiki_errmsg */ function ewiki_auth($id, &$data, $action, $ring=false, $request_auth=0) { global $ewiki_plugins, $ewiki_ring, $ewiki_author, $ewiki_errmsg, $ewiki_config; $ok = true; $ewiki_errmsg=""; #echo "_a($id,dat,$action,$ring,$request_auth)
\n"; if (EWIKI_PROTECTED_MODE) { #-- set required vars if (!isset($ewiki_ring)) { $ewiki_ring = (int)EWIKI_AUTH_DEFAULT_RING; } if ($ring===false) { $ring = NULL; } if ($ewiki_config["create"] && ($action=="edit")) { $action = "create"; // used only/primarily in authentication plugins } #-- plugins to call $pf_login = @$ewiki_plugins["auth_query"][0]; $pf_perm = $ewiki_plugins["auth_perm"][0]; #-- nobody is currently logged in, so try to fetch username, # the login

is not yet enforced if ($pf_login && empty($ewiki_auth_user)) { $pf_login($data, 0); } #-- check permission for current request (page/action/ring) if ($pf_perm) { #-- via _auth handler $ok = $pf_perm($id, $data, $action, $ring, $request_auth); #-- if it failed, we really depend on the login , # and then recall the _perm plugin if ($pf_login && (($request_auth >= 2) || !$ok && $request_auth && (empty($ewiki_auth_user) || EWIKI_AUTO_LOGIN) && empty($ewiki_errmsg))) { //@FIXME: complicated if() - strip empty(errmsg) ?? $pf_login($data, $request_auth); $ok = $pf_perm($id, $data, $action, $ring, $request_auth=0); } } else { $ok = !isset($ring) || isset($ring) && ($ewiki_ring <= $ring); } #-- return error string if (!$ok && empty($ewiki_errmsg)) { ewiki_log("ewiki_auth: Access Denied ($action/$id, $ring/$ewiki_ring, $request_auth)"); $ewiki_errmsg = ewiki_t("FORBIDDEN"); } } return($ok); } /* Queries all registered ["auth_userdb"] plugins for the given username, and compares password to against "db" value, sets $ewiki_ring and returns(true) if valid. */ function ewiki_auth_user($username, $password) { global $ewiki_ring, $ewiki_errmsg, $ewiki_auth_user, $ewiki_plugins, $ewiki_author; if (empty($username)) { return(false); } if (($password[0] == "$") || (strlen($password) > 12)) { ewiki_log("_auth_userdb: password was transmitted in encoded form, or is just too long (login attemp for user '$username')", 2); return(false); } if ($pf_u = $ewiki_plugins["auth_userdb"]) foreach ($pf_u as $pf) { if (function_exists($pf) && ($entry = $pf($username, $password))) { #-- get and compare password if ($entry = (array) $entry) { $enc_pw = $entry[0]; } $success = false || ($enc_pw == substr($password, 0, 12)) || ($enc_pw == md5($password)) || ($enc_pw == crypt($password, substr($enc_pw, 0, 2))) || function_exists("sha1") && ($enc_pw == sha1($password)); $success &= $enc_pw != "*"; #-- return if it matches if ($success) { if (isset($entry[1])) { $ewiki_ring = (int)($entry[1]); } else { $ewiki_ring = 2; //(EWIKI_AUTH_DEFAULT_RING - 1); } if (empty($ewiki_author)) { ($ewiki_author = $entry[2]) or ($ewiki_author = $username); } return($success && ($ewiki_auth_user=$username)); } } } if ($username || $password) { ewiki_log("_auth_userdb: wrong password supplied for user '$username', not verified against any userdb", 3); $ewiki_errmsg = "wrong username and/or password"; # ewiki_auth($uu, $uu, $uu, $uu, 2); } return(false); } /* Returns field html strings, looks up previously selected values. Don't use it for textareas, $value magically elects the input field type. */ function ewiki_form($name, $value, $label="", $_text="| |\n", $inj="") { global $_EWIKI, $ewiki_id; static $fid = 50; static $_sel = ' selected="selected"', $_chk = ' checked="checked"'; #-- prepare $o = ""; $_text = explode("|", $_text); list($name, $type, $width, $height) = explode(":", $name); $type = $type ? (strpos($type, "a") ? "a" : (strpos($type, "b") ? "b" : $type[0])) : "t"; if ($inj) { $inj = " $inj"; } $old_value = @$_EWIKI["form"][$ewiki_id][$name]; #-- select fields if ((($type=="s") || strpos($value, "|")) && ($v = explode("|", $value))) { $value = array(); foreach ($v as $opt) { $opt = strtok($opt, "="); ($title = strtok("|")) or ($title = $opt); $value[$opt] = $title; } } #-- label, surrounding text $o .= "$_text[0]"; if ($fid++ && $label) { $o .= "$label"; } echo "$_text[1]"; #-- submit (as "button") if (!$name || ($type=="b")) { if ($name) { $name = " name=\"$name\""; } $o .= ""; } #-- select elseif (is_array($value)) { $o .= ""; $no_val = isset($value[0]); foreach ($value as $val=>$title) { if ($no_val) { $val = $title; } $sel = (!$old_value && strpos($val, "!") || ($old_value==$val)) ? $_sel : ""; $o .= '' . trim(rtrim($title, "!")) . ''; } $o .= ""; } #-- checkbox elseif (($type=="c") || strpos($value, "]")) { if (isset($old_value)) { $value = $old_value ? "1x" : ""; } $sel = strpos($value, "x") ? $_chk : ""; $o .= ""; } #-- textarea elseif ($type=="a") { if ($width && $height) { $inj .= " cols=\"$width\" rows=\"$height\""; } $o .= "" . htmlentities($value) . ""; } #-- input field; text or hidden else { if ($width) { $inj .= " size=\"$width\""; } if (isset($old_value)) { $value = $old_value; } $type = ($type == "t") ? "text" : "hidden"; $o .= ""; } #-- fin $o .= "$_text[2]"; return($o); } /* reads all files from "./init-pages/" into the database, when ewiki is run for the very first time and the FrontPage does not yet exist in the database */ function ewiki_eventually_initialize(&$id, &$data, &$action) { #-- initialize database only if frontpage missing if (($id==EWIKI_PAGE_INDEX) && ($action=="edit") && empty($data["version"])) { ewiki_db::INIT(); if ($dh = @opendir($path=EWIKI_INIT_PAGES)) { while ($filename = readdir($dh)) { if (preg_match('/^(['.EWIKI_CHARS_U.']+['.EWIKI_CHARS_L.']+\w*)+/', $filename)) { $found = ewiki_db::FIND(array($filename)); if (! $found[$filename]) { $content = implode("", file("$path/$filename")); ewiki_scan_wikiwords($content, $ewiki_links, "_STRIP_EMAIL=1"); $refs = "\n\n" . implode("\n", array_keys($ewiki_links)) . "\n\n"; $save = array( "id" => "$filename", "version" => "1", "flags" => EWIKI_DB_F_TEXT, "content" => $content, "author" => ewiki_author("ewiki_initialize"), "refs" => $refs, "lastmodified" => filemtime("$path/$filename"), "created" => filectime("$path/$filename") // (not exact) ); ewiki_db::WRITE($save); } } } closedir($dh); } else { echo "ewiki error: could not read from directory ". realpath($path) ."
\n"; } #-- try to view/ that newly inserted page if ($data = ewiki_db::GET($id)) { $action = "view"; } } } #--------------------------------------------------------------------------- ######## ### ######## ### ######## ### ###### ######## ######## ### ######## ### ######## ### ###### ######## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ######## ## ## ###### ###### ## ## ## ## ## ## ## ######## ## ## ###### ###### ## ## ######### ## ######### ## ## ######### ## ## ## ## ######### ## ######### ## ## ######### ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ## ######## ## ## ## ## ## ######## ## ## ###### ######## ######## ## ## ## ## ## ######## ## ## ###### ######## #-- database API (static wrapper around backends) class ewiki_db { #-- load page # returns database entry as array for the page whose name was given in # $id key, usually fetches the latest version of a page, unless a specific # $version was requested # function GET($id, $version=false) { global $ewiki_db; $r = $ewiki_db->GET($id, 0+$version); ewiki_db::expand($r); return($r); } #-- save page # stores the page $hash into the database, while not overwriting existing # entries unless $overwrite was set; returns 0 on failure, 1 if completed # function WRITE($hash, $overwrite=0) { global $ewiki_db; if (is_array($hash) && count($hash) && !defined("EWIKI_DB_LOCK")) { #-- settype (for flat-file databases) $hash["version"] += 0; $hash["hits"] += 0; $hash["lastmodified"] += 0; $hash["created"] += 0; ewiki_db::shrink($hash); return $ewiki_db->WRITE($hash, $overwrite); } } #-- search # returns dbquery_result object of database entries (also arrays), where # the one specified column matches the specified content string; # it is not guaranteed to only search/return the latest version of a page; # $field may be an array, in which case an OR-search is emulated # function SEARCH($field, $content, $ci=1, $regex=0, $mask=0x0000, $filter=0x0000) { global $ewiki_db; $ci = ($ci ? "i" : false); #-- multisearch (or connected) if (is_array($field)) { if (isset($field[0])) { // multiple $field names, just one $content string $uu = $field; $field = array(); foreach ($uu as $f) { $field[$f] = $content; } } $r = new ewiki_dbquery_result(array($field)); foreach ($field as $f=>$c) { $add = $ewiki_db->SEARCH($f, $c, $ci, $regex, $mask, $filter); $r->entries = array_merge($r->entries, $add->entries); unset($add); // dispose, hopefully } } #-- single query else { $r = $ewiki_db->SEARCH($field, $content, $ci, $regex, $mask, $filter); ewiki_db::dbquery_result($r); } return($r); } #-- full page list # returns an dbquery_result object with __all__ pages, where each entry # is made up of at least the fields from the database requested with the # $fields array, e.g. array("flags","meta","lastmodified"); # function GETALL($fields, $mask=0x0000, $filter=0x0000) { global $ewiki_db; $fields[] = "flags"; $fields[] = "version"; $fields = array_flip($fields); unset($fields["id"]); $fields = array_flip($fields); $r = $ewiki_db->GETALL($fields); ewiki_db::dbquery_result($r); return($r); } #-- check page existence # searches for all given page names (in $list) in the database and returns # an associative array with page names as keys and booleans as values; # (int)0 for missing pages, and for existing ones the associated value is # the page {flags} value or the {meta} data array (for binary entries) # function FIND($list) { global $ewiki_db; if (!count($list)) { return($list); } return $ewiki_db->FIND($list); } #-- page hits # increases the {hit} counter for the page given by $id # function HIT($id) { global $ewiki_db; return $ewiki_db->HIT($id); } #-- admin functions function DELETE($id, $version=false) { global $ewiki_db; if (!defined("EWIKI_DB_LOCK")) return $ewiki_db->DELETE($id, $version); } function INIT() { global $ewiki_db; return $ewiki_db->INIT(); } #-- virtual features # ::CREATE() creates a new page hash (template) # ::UPDATE() renews meta data (except version) to allow ::WRITE() # ::APPEND() adds content to an existing text page # function CREATE($id, $flags=EWIKI_DB_F_TEXT, $author="") { $data = array( "id"=>$id, "version"=>1, "flags"=>$flags, "content"=>"", "meta"=>array(), "hits"=>0, "created"=>time(), "lastmodified"=>time(), "author"=>ewiki_author($author), ); return($data); } function UPDATE(&$data, $author="") { global $ewiki_links; #-- regenerate backlinks entry ewiki_scan_wikiwords($data["content"], $ewiki_links, "_STRIP_EMAIL=1"); $data["refs"] = "\n\n".implode("\n", array_keys($ewiki_links))."\n\n"; #-- update meta info $data["lastmodified"] = time(); $data["author"] = ewiki_author($author); $data["meta"]["user-agent"] = trim($_SERVER["HTTP_USER_AGENT"]); } function APPEND($id, $text, $textonly=1) { ($data = ewiki_db::GET($id)) or ($data = ewiki_db::CREATE($id)); if (!strlen(trim($text)) or $textonly && (($data["flags"]&EWIKI_DB_F_TYPE) != EWIKI_DB_F_TEXT)) { return; } $data["content"] .= $text; ewiki_db::UPDATE($data); $data["version"]++; return ewiki_db::WRITE($data); } #-- helper code function expand(&$r) { if (isset($r["meta"]) && is_string($r["meta"]) && strlen($r["meta"])) { $r["meta"] = unserialize($r["meta"]); } } function shrink(&$r) { if (isset($r["meta"]) && is_array($r["meta"])) { $r["meta"] = serialize($r["meta"]); } } function dbquery_result(&$r) { if (is_array($r)) { $z = new ewiki_dbquery_result(array_keys($args)); foreach ($r as $id=>$row) { $z->add($row); } $r = $z; } } } // end of class #-- returned for SEARCH and GETALL queries, as those operations are # otherwise too memory exhaustive class ewiki_dbquery_result { var $keys = array(); var $entries = array(); var $buffer = EWIKI_DBQUERY_BUFFER; var $size = 0; function ewiki_dbquery_result($keys) { $keys = array_merge((array)$keys, array(-50=>"id", "version", "flags")); $this->keys = array_unique($keys); } function add($row) { if (is_array($row)) { if ($this->buffer) { $this->size += strlen(serialize($row)); $this->buffer = $this->size <= EWIKI_DBQUERY_BUFFER; ewiki_db::expand($row); } else { $row = $row["id"]; } } $this->entries[] = $row; } function get($all=0, $flags=0x0000, $type=0) { $row = array(); $prot_hide = ($flags&0x0020) && EWIKI_PROTECTED_MODE && EWIKI_PROTECTED_MODE_HIDING; $flag_hide = ($flags&0x0003); do { if (count($this->entries)) { #-- fetch very first entry from $entries list $r = array_shift($this->entries); #-- finish if buffered entry if (is_array($r) && !$all) { $row = $r; } #-- else refetch complete entry from database else { if (is_array($r)) { $r = $r["id"]; } $r = ewiki_db::GET($r); if (!$all) { foreach ($this->keys as $key) { $row[$key] = $r[$key]; } } else { $row = $r; } } unset($r); } else { return(NULL); // no more entries } #-- expand {meta} field if (is_array($row) && is_string(@$row["meta"])) { $row["meta"] = unserialize($row["meta"]); } #-- drop unwanted results if ($prot_hide && !ewiki_auth($row["id"], $row, 'view') || ($flag_hide && ($row["flags"] & (EWIKI_DB_F_HIDDEN|EWIKI_DB_F_DISABLED))) || ($type) && (($row["flags"] & EWIKI_DB_F_TYPE) != $type)) { $row = array(); } } while (empty($row) && ($prot_hide || $flag_hide)); return($row); } function count() { return(count($this->entries)); } } #-- obsolete compatibility wrapper function ewiki_database($action, $args, $sw1=0, $sw2=0, $pf=false) { switch ($action) { case "GET": return ewiki_db::GET($args["id"], @$args["version"]); case "WRITE": return ewiki_db::WRITE($args, 0); case "OVERWRITE": return ewiki_db::WRITE($args, 1); case "FIND": return ewiki_db::FIND($args); case "GETALL": return ewiki_db::GETALL($args); case "SEARCH": return ewiki_db::SEARCH(implode("",array_keys($args)), implode("",$args)); case "HIT": return ewiki_db::HIT($args["id"]); case "DELETE": return ewiki_db::DELETE($args["id"], $args["version"]); case "INIT": return ewiki_db::INIT(); } echo "error: unknown database call '$action'
\n"; return false; } #-- MySQL database backend (default, but will be teared out soon) # Note: this is of course an abuse of the relational database scheme, # but necessary for real db independence and abstraction class ewiki_database_mysql { function ewiki_database_mysql() { $this->table = EWIKI_DB_TABLE_NAME; } function GET($id, $version=false) { $id = mysql_escape_string($id); if ($version) { $version = "AND (version=$version)"; } else { $version=""; } $result = mysql_query("SELECT *, pagename as id FROM {$this->table} WHERE (pagename='$id') $version ORDER BY version DESC LIMIT 1" ); echo mysql_error(); if ($result && ($r = mysql_fetch_array($result, MYSQL_ASSOC))) { unset($r["pagename"]); return($r); } } function HIT($id) { $id = mysql_escape_string($id); mysql_query("UPDATE {$this->table} SET hits=(hits+1) WHERE pagename='$id'"); } function WRITE($hash, $overwrite=0) { $COMMAND = $overwrite ? "REPLACE" : "INSERT"; $sql1 = $sql2 = ""; $hash["pagename"] = $hash["id"]; unset($hash["id"]); foreach ($hash as $index=>$value) { if (is_int($index)) { continue; } $a = ($sql1 ? ', ' : ''); $sql1 .= $a . $index; $sql2 .= $a . "'" . mysql_escape_string($value) . "'"; } $result = mysql_query("$COMMAND INTO {$this->table} ($sql1) VALUES ($sql2)"); $result = ($result && mysql_affected_rows()) ?1:0; return($result); } function FIND($list) { $r = array(); $sql = ""; foreach (array_values($list) as $id) { if (strlen($id)) { $r[$id] = 0; $sql .= ($sql ? " OR " : "") . "(pagename='" . mysql_escape_string($id) . "')"; } } $result = mysql_query("SELECT pagename AS id, meta, flags FROM {$this->table} WHERE $sql"); if ($result) { while ($row = mysql_fetch_array($result)) { $id = $row["id"]; if (strlen($row["meta"])) { $r[$id] = unserialize($row["meta"]); $r[$id]["flags"] = $row["flags"]; } else { $r[$id] = $row["flags"]; } } } return($r); } function GETALL($fields, $mask=0, $filter=0) { $fields = implode(", ", $fields); $f_sql = $mask ? "WHERE ((flags & $mask) = $filter)" : ""; $result = mysql_query("SELECT pagename AS id, $fields FROM {$this->table} $f_sql GROUP BY id, version DESC" ); $r = new ewiki_dbquery_result($fields); $last = ""; if ($result) while ($row = mysql_fetch_array($result, MYSQL_ASSOC)) { $drop = EWIKI_CASE_INSENSITIVE ? strtolower($row["id"]) : $row["id"]; if (($last != $drop) && ($last = $drop)) { $r->add($row); } } return($r); } function SEARCH($field, $content, $ci="i", $regex=0, $mask=0, $filter=0) { $sql_fields = ", $field"; if ($field == "id") { $field = "pagename"; $sql_fields = ""; } $content = mysql_escape_string($content); if ($mask) { $sql_flags = "AND ((flags & $mask) = $filter)"; } if ($regex) { $sql_strsearch = "($field REGEXP '$content')"; } elseif ($ci) { $sql_strsearch = "LOCATE('".strtolower($content)."', LCASE($field))"; } else { $sql_strsearch = "LOCATE('$content', $field)"; } $result = mysql_query( "SELECT pagename AS id, version, flags $sql_fields FROM {$this->table} WHERE $sql_strsearch $sql_flags GROUP BY id, version DESC "); $r = new ewiki_dbquery_result(array("id","version",$field)); $last = ""; if ($result) while ($row = mysql_fetch_array($result, MYSQL_ASSOC)) { $drop = EWIKI_CASE_INSENSITIVE ? strtolower($row["id"]) : $row["id"]; if (($last != $drop) && ($last = $drop)) { $r->add($row); } } return($r); } function DELETE($id, $version) { $id = mysql_escape_string($id); mysql_query("DELETE FROM {$this->table} WHERE pagename='$id' AND version=$version"); } function INIT() { mysql_query("CREATE TABLE {$this->table} (pagename VARCHAR(160) NOT NULL, version INTEGER UNSIGNED NOT NULL DEFAULT 0, flags INTEGER UNSIGNED DEFAULT 0, content MEDIUMTEXT, author VARCHAR(100) DEFAULT 'ewiki', created INTEGER UNSIGNED DEFAULT ".time().", lastmodified INTEGER UNSIGNED DEFAULT 0, refs MEDIUMTEXT, meta MEDIUMTEXT, hits INTEGER UNSIGNED DEFAULT 0, PRIMARY KEY id (pagename, version) ) "); echo mysql_error(); } } // end of class ewiki_database_mysql ?>