PHP ewiki_db::FIND方法代码示例

function ewiki_page_wantedpages($id, $data, $action)
{
    #-- collect referenced pages
    $result = ewiki_db::GETALL(array("refs"));
    while ($row = $result->get()) {
        if (EWIKI_PROTECTED_MODE && EWIKI_PROTECTED_MODE_HIDING && !ewiki_auth($row["id"], $uu, "view")) {
            continue;
        }
        $refs .= $row["refs"];
    }
    #-- build array
    $refs = array_unique(explode("\n", $refs));
    #-- strip existing pages from array
    $refs = ewiki_db::FIND($refs);
    foreach ($refs as $id => $exists) {
        if (EWIKI_PROTECTED_MODE && EWIKI_PROTECTED_MODE_HIDING && !ewiki_auth($row["id"], $uu, "view")) {
            continue;
        }
        if (!$exists && !strstr($id, "://") && strlen(trim($id))) {
            $wanted[] = $id;
        }
    }
    #-- print out
    $o .= "<ul>\n";
    foreach ($wanted as $page) {
        $o .= "  <li>" . ewiki_link($page) . "</li>\n";
    }
    $o .= "<ul>\n";
    return $o;
}

function ewiki_linking_titlefix(&$title, &$href, &$href2, &$type)
{
    global $ewiki_links;
    $href_mod = str_replace("  ", " ", $href);
    $href_mod = str_replace(' ', '_', $href);
    // Edit 'Nov09: replace spaces with underscores
    $find = ewiki_db::FIND(array($href_mod));
    if ($find[$href_mod]) {
        $str = '<a href="' . ewiki_script("", rawurlencode($href_mod)) . htmlentities($href2) . '">' . $title . '</a>';
        $type = array("wikipage", "title-swapped");
    } else {
        $str = '<span class="NotFound"><a href="' . ewiki_script("", rawurlencode($href_mod)) . htmlentities($href2) . '">' . $title . '</a></span>';
        $type = array("wikipage", "title-swapped");
    }
    return $str;
}

function ewiki_plural_alternative($id)
{
    #-- make possible plural/singular $id versions
    $variants = ewiki_plural_variants($id);
    array_shift($variants);
    # skip original
    #-- search in DB
    $variants = ewiki_db::FIND($variants);
    foreach ($variants as $new_id => $exists) {
        if ($new_id && $exists) {
            return $new_id;
        }
    }
    #-- none found
    return false;
}

function ewiki_imgupload_better_fn(&$fn, &$id, &$meta, &$ext)
{
    $parent = $_REQUEST[EWIKI_UP_PARENTID];
    $name = $meta["Content-Location"];
    $bad_names = '/^(DSC.?0\\d+|test|bild.?\\d+|pic.?\\d+|image.?\\d+|img.?\\d+)/i';
    #-- normalize desired name (discard path/ and old .extension)
    $name = substr($name, strrpos($name, "/\\"));
    $name = substr($name, 0, strrpos($name, "."));
    $name = preg_replace('/[^-_+.\\w\\d]+/', "_", $name);
    #-- filter names
    if (preg_match($bad_names, $name)) {
        $name = "";
    } elseif (strlen($name) < 5) {
        $name = "";
    }
    #-- check if wish name is free
    if ($name) {
        $name = $name . ".{$ext}";
        $found = ewiki_db::FIND(array($name));
        if ($found[$name]) {
            $name = "";
            // no, is used
        }
    }
    #-- else use page name as base
    if (!$name && $parent) {
        for ($n = 1; $n++; $n <= 99) {
            $name = "{$parent}.{$n}.{$ext}";
            $found = ewiki_db::FIND(array($name));
            if ($found[$name]) {
                $name = "";
                // name is already occoupied
            } else {
                break;
                // done
            }
        }
    }
    #-- assign new internal:// name
    if ($name) {
        $id = EWIKI_IDF_INTERNAL . $name;
    } else {
        // (it else gets a md5md5md5md5-sum as name)
    }
}

function ewiki_initialization_wizard($id, &$data, &$action)
{
    global $ewiki_plugins;
    #-- proceed only if frontpage missing or explicetely requested
    if (strtolower($id) == "wikisetupwizard" || $id == EWIKI_PAGE_INDEX && $action == "edit" && empty($data["version"]) && !$_REQUEST["abort"]) {
        if ($_REQUEST["abort"]) {
        } elseif (empty($_REQUEST["init"])) {
            $o = "<h2>WikiSetupWizard</h2>\n";
            $o .= "You don't have any pages in your Wiki yet, so we should try to read-in the default ones from <tt>init-pages/</tt> now.<br /><br />";
            $o .= '<a href="' . ewiki_script("", $id, array("init" => "now")) . '">[InitializeWikiDatabase]</a>';
            $o .= " &nbsp; ";
            $o .= '<a href="' . ewiki_script("", $id, array("abort" => "this")) . '">[NoThanks]</a>';
            $o .= "<br /><br />";
            #-- analyze and print settings and misconfigurations
            $pf_db = $ewiki_plugins["database"][0];
            $db = substr("_{$pf_db}", strrpos($pf_db, "_") + 1);
            $o .= '<table border="0" width="90%" class="diagnosis">';
            $o .= '<tr><td>DatabaseBackend</td><td>';
            $o .= "<b>" . $db . "</b><br />";
            if ($db == "files" || strstr($db, "f2")) {
                $o .= "<small>_DBFILES_DIR='</small><tt>" . EWIKI_DBFILES_DIRECTORY . "'</tt>";
                if (strpos(EWIKI_DBFILES_DIRECTORY, "tmp")) {
                    $o .= "<br /><b>Warning</b>: Storing your pages into a temporary directory is not what you want (there they would get deleted randomly), except for testing purposes of course. See the README.";
                }
            } else {
                $o .= "(looks ok)";
            }
            $o .= "</td></tr>";
            $o .= '<tr><td>WikiSoftware</td><td>ewiki ' . EWIKI_VERSION . "</td></tr>";
            $o .= "</table>";
            #-- more diagnosis
            if (ini_get("magic_quotes")) {
                $o .= "<b>Warning</b>: Your PHP interpreter has enabled the ugly and outdated '<i>magic_quotes</i>'. This will lead to problems, so please ask your provider to correct it; or fix it yourself with .htaccess settings as documented in the README. Otherwise don't forget to include() the <tt>fragments/strip_wonderful_slashes.php</tt> (it's ok to proceed for the moment).<br /><br />";
            }
            if (ini_get("register_globals")) {
                $o .= "<b>Security warning</b>: The horrible '<i>register_globals</i>' setting is enabled. Without always using <tt>fragments/strike_register_globals.php</tt> or letting your provider fix that, you could get into trouble some day.<br /><br />";
            }
            return '<div class="wiki view WikiSetupWizard">' . $o . '</div>';
        } else {
            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" => "1", "content" => $content, "author" => ewiki_author("ewiki_initialize"), "refs" => $refs, "lastmodified" => filemtime("{$path}/{$filename}"), "created" => filectime("{$path}/{$filename}"));
                            ewiki_db::WRITE($save);
                        }
                    }
                }
                closedir($dh);
                ewiki_log("initializing database", 0);
            } else {
                return "<b>ewiki error</b>: could not read from directory " . realpath($path) . "<br />\n";
            }
            #-- try to view/ that newly inserted page
            if ($data = ewiki_db::GET($id)) {
                $action = "view";
            }
            #-- let ewiki_page() proceed as usual
            return "";
        }
    }
}

<?php

/*
   lists pages which are referenced but not yet written
   (AKA "DanglingSymlinks")
*/
#-- title
echo ewiki_make_title($id, $id, 2);
#-- collect referenced pages
$result = ewiki_db::GETALL(array("refs"));
while ($row = $result->get()) {
    if (EWIKI_PROTECTED_MODE && EWIKI_PROTECTED_MODE_HIDING && !ewiki_auth($row["id"], $uu, "view")) {
        continue;
    }
    $refs .= $row["refs"];
}
#-- build array
$refs = array_unique(explode("\n", $refs));
#-- strip existing pages from array
$refs = ewiki_db::FIND($refs);
foreach ($refs as $id => $exists) {
    if (!$exists && !strstr($id, "://") && strlen(trim($id))) {
        $wanted[] = $id;
    }
}
#-- print out
echo "<ul>\n";
foreach ($wanted as $page) {
    echo "  <li>" . ewiki_link($page) . "</li>\n";
}
echo "<ul>\n";

function ewiki_linkdatabase($id, &$data, $action)
{
    if ($_REQUEST["action"] == "links" && $id == "action=links" && empty($_REQUEST["id"])) {
        $o = array("editlink" => 0, "empty" => 0, "names" => 1, "unique" => 1, "sort" => 1, "exists" => 2, "url" => 0, "inter" => 0, "search" => "");
        $o = array_merge($o, $_REQUEST);
        #-- first read in all pages
        $res = ewiki_db::GETALL(array("flags", "version", "refs"));
        $all = array();
        while ($row = $res->get()) {
            if (($row["version"] & EWIKI_DB_F_TYPE) == EWIKI_DB_F_TEXT) {
                $refs = trim($row["refs"]);
                if (!$o["empty"] && empty($refs)) {
                    continue;
                }
                $all[$row["id"]] = $refs;
            }
        }
        #-- sort
        ksort($all);
        #-- output
        $out = "";
        foreach ($all as $i => $refs) {
            $refs = explode("\n", $refs);
            if ($refs) {
                $refs = ewiki_db::FIND($refs);
            }
            foreach ($refs as $ri => $rv) {
                if ($o["exists"] != 2) {
                    if ($rv != $o["exists"]) {
                        unset($refs[$ri]);
                    }
                }
                if ($o["url"] != 1) {
                    if ($o["url"] xor strpos($ri, "://")) {
                        unset($refs[$ri]);
                    }
                }
                if ($o["inter"] != 1) {
                    if ($o["inter"] xor strpos($ri, ":") && !strpos($ri, "://")) {
                        unset($refs[$ri]);
                    }
                }
                if ($o["search"] && strpos($ri, $o["search"]) === false) {
                    unset($refs[$ri]);
                }
            }
            if (!$o["empty"] && empty($refs)) {
                continue;
            }
            if ($o["sort"]) {
                asort($refs);
            }
            $out .= "<a href=\"" . ewiki_script("", $i) . "\">{$i}</a>  ";
            foreach ($refs as $i => $rv) {
                $title = $o[names] ? $i : " ";
                if ($rv) {
                    $out .= " <a href=\"" . ewiki_script("", $i) . "\">{$title}</a>";
                } else {
                    $out .= " {$title}";
                    if ($o["editlink"]) {
                        $out .= "<a href=\"" . ewiki_script("", $i) . "\">?</a>";
                    }
                }
            }
            $out .= "\n";
        }
        return "\n<pre>\n\n\n\n{$out}</pre>\n";
    } elseif ($id == "LinkDatabase") {
        $url = "url:?";
        #      $url = "ErfurtWiki:";
        return ewiki_format(<<<EOT
!!! LinkDatabase

The LinkDatabase provides a list of all internal pages together with the
links outgoing from each.

* [{$url}action=links] list pages and links, using default options
* [{$url}action=links&editlink=1] add the "?" link for not existent pages
* [{$url}action=links&empty=1] allowes listing of pages without forward links
* [{$url}action=links&names=0] no link title, just the <a href="...">
* [{$url}action=links&sort=0] order pages and their links
* [{$url}action=links&exists=0] only links to not existing pages
* [{$url}action=links&exists=1] only existing page links
* [{$url}action=links&url=1] add URLs
* [{$url}action=links&url=2] __only__ URLs
* [{$url}action=links&inter=1] add ~InterWiki:Links
* [{$url}action=links&inter=2] __only__ ~InterWiki:Links
* [{$url}action=links&search=google] apply search pattern to page links

handy combinations
* [{$url}action=links&inter=1&editlink=1&empty=1&url=1&sort=0&names=1] show all links
* [{$url}action=links&search=sourceforge&url=2] only URL links to sourceforge
* [{$url}action=links&sort=0&exists=0] unsorted missing pages

Only [{$url}action=links&unique=0] has not been implemented.

EOT
);
    }
}

function renderCalendar($pgname, $more, $year = NULL, $month = NULL)
{
    if (preg_match(CALENDAR_PAGE_TITLE_REGEX, $pgname, $match)) {
        $pgname = $match[1];
    }
    $month_names = explode(" ", ewiki_t("MONTHS"));
    $day_names = explode(" ", ewiki_t("DAYABBRVS"));
    if (!isset($year)) {
        $year = date("Y");
    }
    if (!isset($month)) {
        $month = date("n");
    }
    $shift = 0;
    $today_ts = mktime(0, 0, 0, $month, date("d"), $year);
    // non relative date
    $firstday_month_ts = mktime(0, 0, 0, $month, 1, $year);
    // first day of the month
    $lastday_month_ts = mktime(0, 0, 0, $month + 1, 0, $year);
    // last day of the month
    $numYear = date("Y", $firstday_month_ts);
    $numMonth = date("m", $firstday_month_ts);
    $textMonth = $month_names[date("m", $firstday_month_ts) - 1];
    $daysInMonth = date("t", $firstday_month_ts);
    $dayMonth_start = date("w", $firstday_month_ts);
    if ($dayMonth_start == 0) {
        $dayMonth_start = 7;
    }
    $dayMonth_end = date("w", $lastday_month_ts);
    if ($dayMonth_end == 0) {
        $dayMonth_end = 7;
    }
    $ret = "";
    #-- start table, print month name as title
    $ret .= '<table class="calendar caltable" cellpadding="2" cellspacing="1">' . "\n";
    $ret .= '<tr><th class="head calhead" colspan="7">';
    $ret .= ($more ? '<a href="' . ewiki_script(EWIKI_ACTION_CALENDAR, $pgname, 'year=' . $year) . '">' : "") . $textMonth . "&nbsp;&nbsp;" . $numYear . ($more ? "</a>" : "");
    $ret .= "</th></tr>\n";
    #-- output days
    $ret .= "<tr>\n";
    for ($n = 0; $n < 7; $n++) {
        $ret .= '<th class="days daynames caldays">' . $day_names[$n] . '</th>';
    }
    $ret .= "</tr>\n";
    #-- not-existent days
    $ret .= "<tr>\n";
    for ($k = 1; $k < $dayMonth_start; $k++) {
        $ret .= "<td>&nbsp;</td>\n";
    }
    #-- pre-scan for calendar day pages
    $f = array();
    for ($i = 1; $i <= $daysInMonth; $i++) {
        $f[] = $pgname . CALENDAR_NAME_SEP . $numYear . $numMonth . (strlen($i) < 2 ? "0{$i}" : "{$i}");
    }
    $f = ewiki_db::FIND($f);
    for ($i = 1; $i <= $daysInMonth; $i++) {
        $day_i_ts = mktime(0, 0, 0, date("n", $firstday_month_ts), $i, date("Y", $firstday_month_ts));
        $day_i = date("w", $day_i_ts);
        if ($day_i == 0) {
            $day_i = 7;
        }
        #-- calendar day page name
        $page = $pgname . CALENDAR_NAME_SEP . $numYear . $numMonth . (strlen($i) < 2 ? "0{$i}" : "{$i}");
        #-- retrieve and check rights if running in protected mode
        if (EWIKI_PROTECTED_MODE && EWIKI_PROTECTED_MODE_HIDING && $f[$page] && !ewiki_auth($page, $uu, "view", $ring = false, $force = 0)) {
            unset($f[$page]);
        }
        #-- link to calendar day page
        $link_i = '<a href="' . ewiki_script("", $page) . '"' . ($f[$page] ? ' class="found calpg"><b>' . $i . '</b>' : ' class="hide calhide">' . $i) . "</a>";
        #-- day table cell
        $day_class = $month == date("n") && $today_ts == $day_i_ts ? "today caltoday" : "day calday";
        $ret .= '<td class="' . $day_class . '">' . $link_i . "</td>";
        #-- close week-row
        if ($day_i == 7 && $i < $daysInMonth) {
            $ret .= "</tr><tr>\n";
        } else {
            if ($day_i == 7 && $i == $daysInMonth) {
                $ret .= "</tr>\n";
            } else {
                if ($i == $daysInMonth) {
                    for ($h = $dayMonth_end; $h < 7; $h++) {
                        $ret .= "<td>&nbsp;</td>\n";
                    }
                    $ret .= "</tr>\n";
                }
            }
        }
    }
    $ret .= "</table>\n";
    return $ret;
}