function print_welcome_block($block = true, $config = "", $side, $index)
{
    global $pgv_lang, $PGV_IMAGE_DIR, $PGV_IMAGES;
    $id = "user_welcome";
    $title = $pgv_lang["welcome"] . " " . getUserFullName(PGV_USER_ID);
    $content = "<table class=\"blockcontent\" cellspacing=\"0\" cellpadding=\"0\" style=\" width: 100%; direction:ltr;\"><tr>";
    $content .= "<td class=\"tab_active_bottom\" colspan=\"3\" ></td></tr><tr>";
    if (get_user_setting(PGV_USER_ID, 'editaccount') == 'Y') {
        $content .= "<td class=\"center details2\" style=\" width: 33%; clear: none; vertical-align: top; margin-top: 2px;\"><a href=\"edituser.php\"><img src=\"" . $PGV_IMAGE_DIR . "/" . $PGV_IMAGES["mygedview"]["small"] . "\" border=\"0\" alt=\"" . $pgv_lang["myuserdata"] . "\" title=\"" . $pgv_lang["myuserdata"] . "\" /><br />" . $pgv_lang["myuserdata"] . "</a></td>";
    }
    if (PGV_USER_GEDCOM_ID) {
        $content .= "<td class=\"center details2\" style=\" width: 34%; clear: none; vertical-align: top; margin-top: 2px;\"><a href=\"" . encode_url("pedigree.php?rootid=" . PGV_USER_GEDCOM_ID) . "\"><img src=\"" . $PGV_IMAGE_DIR . "/" . $PGV_IMAGES["pedigree"]["small"] . "\" border=\"0\" alt=\"" . $pgv_lang["my_pedigree"] . "\" title=\"" . $pgv_lang["my_pedigree"] . "\" /><br />" . $pgv_lang["my_pedigree"] . "</a></td>";
        $content .= "<td class=\"center details2\" style=\" width: 33%; clear: none; vertical-align: top; margin-top: 2px;\"><a href=\"" . encode_url("individual.php?pid=" . PGV_USER_GEDCOM_ID) . "\"><img src=\"" . $PGV_IMAGE_DIR . "/" . $PGV_IMAGES["indis"]["small"] . "\" border=\"0\" alt=\"" . $pgv_lang["my_indi"] . "\" title=\"" . $pgv_lang["my_indi"] . "\" /><br />" . $pgv_lang["my_indi"] . "</a></td>";
    }
    $content .= "</tr><tr><td class=\"center\" colspan=\"3\">";
    $content .= print_help_link("mygedview_customize_help", "qm", "", false, true);
    $content .= "<a href=\"javascript:;\" onclick=\"window.open('" . encode_url("index_edit.php?name=" . PGV_USER_NAME . "&ctype=user") . "', '_blank', 'top=50,left=10,width=600,height=350,scrollbars=1,resizable=1');\">" . $pgv_lang["customize_page"] . "</a>";
    $content .= "<br />" . format_timestamp(client_time());
    $content .= "</td>";
    $content .= "</tr></table>";
    global $THEME_DIR;
    if ($block) {
        require $THEME_DIR . 'templates/block_small_temp.php';
    } else {
        require $THEME_DIR . 'templates/block_main_temp.php';
    }
}

 public function getFirstResult($search, $filename)
 {
     //print "http://www.chartlyrics.com/search.aspx?q=".replace_space($search);
     $getdata_source = getdata("http://www.chartlyrics.com/search.aspx?q=" . replace_space($search), $curl);
     $getdata = explode('<th style="width: auto">', $getdata_source);
     $getdata = explode('[END] Page', $getdata[1]);
     $getdata = explode('<a href="', $getdata[0]);
     $achou = false;
     if (count($getdata) > 1) {
         $pecah = $getdata[1];
         //foreach($getdata as $pecah){
         $data = explode('</a>', $pecah);
         $data = explode('<td>', $data[0]);
         $data = array_unique(explode('</th>', $data[0]));
         //$gay = $data[0];
         foreach ($data as $gay) {
             $gay = explode('">', $gay);
             if (!strpos($gay[0], "add.aspx")) {
                 if (isset($gay[1])) {
                     $string = $gay[0] . ":" . $gay[1] . ":" . str_replace(".php", "", str_replace("_", ".", $filename));
                     //echo "<center><a href='?lyrics=".encode_url($string, 'encode')."'>$gay[1]</a><br /></center>";
                     //print encode_url($string, 'encode');
                     $achou = true;
                     $this->get_result(encode_url($string, 'encode'));
                 }
             }
         }
         //}
     }
     if (!$achou) {
         echo "0";
     }
 }

function action_url($action, $type, $params)
{
    global $_ACTION_VIEW, $_ACTION_REVERSE;
    if (isset($_ACTION_REVERSE[$action])) {
        if ($type == 'get') {
            needed_params(array('values'), $params);
            list($base, $params_) = view($_ACTION_VIEW[$_ACTION_REVERSE[$action]], $params, true);
            if (REWRITE_URL) {
                if (count($params['values']) > 1) {
                    die('Only support one value as action parameter');
                }
                return build_url($base . ($base != '' && $base[strlen($base) - 1] != '/' ? '/' : '') . 'action/' . $action . '/' . encode_url($params['values'][0]), $params_);
            } else {
                return build_url($base, array_replace($params_, array('action' => $action, 'values' => $params['values'])));
            }
        } elseif ($type == 'post') {
            return view($_ACTION_VIEW[$action], $params);
        } else {
            die('action type sould be "get" or "post", not ' . $type);
        }
    } else {
        print_r($_ACTION_REVERSE);
        die('Unknow action ' . $action);
    }
}

function print_recent_changes($block = true, $config = "", $side, $index)
{
    global $pgv_lang, $ctype;
    global $PGV_IMAGE_DIR, $PGV_IMAGES, $PGV_BLOCKS;
    $block = true;
    // Always restrict this block's height
    if (empty($config)) {
        $config = $PGV_BLOCKS["print_recent_changes"]["config"];
    }
    if ($config["days"] < 1) {
        $config["days"] = 30;
    }
    if (isset($config["hide_empty"])) {
        $HideEmpty = $config["hide_empty"];
    } else {
        $HideEmpty = "no";
    }
    $found_facts = get_recent_changes(client_jd() - $config['days']);
    // Start output
    if (count($found_facts) == 0 and $HideEmpty == "yes") {
        return false;
    }
    // Print block header
    $id = "recent_changes";
    $title = print_help_link("recent_changes_help", "qm", "", false, true);
    if ($PGV_BLOCKS["print_recent_changes"]["canconfig"]) {
        if ($ctype == "gedcom" && PGV_USER_GEDCOM_ADMIN || $ctype == "user" && PGV_USER_ID) {
            if ($ctype == "gedcom") {
                $name = PGV_GEDCOM;
            } else {
                $name = PGV_USER_NAME;
            }
            $title .= "<a href=\"javascript: configure block\" onclick=\"window.open('" . encode_url("index_edit.php?name={$name}&ctype={$ctype}&action=configure&side={$side}&index={$index}") . "', '_blank', 'top=50,left=50,width=600,height=350,scrollbars=1,resizable=1'); return false;\">";
            $title .= "<img class=\"adminicon\" src=\"{$PGV_IMAGE_DIR}/" . $PGV_IMAGES["admin"]["small"] . "\" width=\"15\" height=\"15\" border=\"0\" alt=\"" . $pgv_lang["config_block"] . "\" /></a>";
        }
    }
    $title .= $pgv_lang["recent_changes"];
    $content = "";
    // Print block content
    $pgv_lang["global_num1"] = $config["days"];
    // Make this visible
    if (count($found_facts) == 0) {
        $content .= print_text("recent_changes_none", 0, 1);
    } else {
        $content .= print_text("recent_changes_some", 0, 1);
        // sortable table
        require_once PGV_ROOT . 'includes/functions/functions_print_lists.php';
        ob_start();
        print_changes_table($found_facts);
        $content .= ob_get_clean();
    }
    global $THEME_DIR;
    if ($block) {
        require $THEME_DIR . 'templates/block_small_temp.php';
    } else {
        require $THEME_DIR . 'templates/block_main_temp.php';
    }
}

/**
 * Prints a user news/journal
 *
 */
function print_user_news($block = true, $config = "", $side, $index)
{
    global $pgv_lang, $PGV_IMAGE_DIR, $PGV_IMAGES, $TEXT_DIRECTION, $ctype;
    $usernews = getUserNews(PGV_USER_ID);
    $id = "user_news";
    $title = print_help_link("mygedview_myjournal_help", "qm", "", false, true);
    $title .= $pgv_lang["my_journal"];
    $content = "";
    if (count($usernews) == 0) {
        $content .= $pgv_lang["no_journal"] . ' ';
    }
    foreach ($usernews as $key => $news) {
        $day = date("j", $news["date"]);
        $mon = date("M", $news["date"]);
        $year = date("Y", $news["date"]);
        $content .= "<div class=\"person_box\">";
        $ct = preg_match("/#(.+)#/", $news["title"], $match);
        if ($ct > 0) {
            if (isset($pgv_lang[$match[1]])) {
                $news["title"] = str_replace($match[0], $pgv_lang[$match[1]], $news["title"]);
            }
        }
        $content .= "<span class=\"news_title\">" . PrintReady($news["title"]) . "</span><br />";
        $content .= "<span class=\"news_date\">" . format_timestamp($news["date"]) . "</span><br /><br />";
        if (preg_match("/#(.+)#/", $news["text"], $match)) {
            if (isset($pgv_lang[$match[1]])) {
                $news["text"] = str_replace($match[0], $pgv_lang[$match[1]], $news["text"]);
            }
        }
        if (preg_match("/#(.+)#/", $news["text"], $match)) {
            if (isset($pgv_lang[$match[1]])) {
                $news["text"] = str_replace($match[0], $pgv_lang[$match[1]], $news["text"]);
            }
            if (isset(${$match}[1])) {
                $news["text"] = str_replace($match[0], ${$match}[1], $news["text"]);
            }
        }
        $trans = get_html_translation_table(HTML_SPECIALCHARS);
        $trans = array_flip($trans);
        $news["text"] = strtr($news["text"], $trans);
        $news["text"] = nl2br($news["text"]);
        $content .= PrintReady($news["text"]) . "<br /><br />";
        $content .= "<a href=\"javascript:;\" onclick=\"editnews('{$key}'); return false;\">" . $pgv_lang["edit"] . "</a> | ";
        $content .= "<a href=\"" . encode_url("index.php?action=deletenews&news_id={$key}&ctype={$ctype}") . "\" onclick=\"return confirm('" . $pgv_lang["confirm_journal_delete"] . "');\">" . $pgv_lang["delete"] . "</a><br />";
        $content .= "</div><br />";
    }
    if (PGV_USER_ID) {
        $content .= "<br /><a href=\"javascript:;\" onclick=\"addnews('" . PGV_USER_ID . "'); return false;\">" . $pgv_lang["add_journal"] . "</a>";
    }
    global $THEME_DIR;
    if ($block) {
        require $THEME_DIR . 'templates/block_small_temp.php';
    } else {
        require $THEME_DIR . 'templates/block_main_temp.php';
    }
}

 public function get_result($request)
 {
     $request = encode_url($request, "decode");
     $getname = explode(':', $request);
     $url = replace_space("http://www.chartlyrics.com" . $getname[0]);
     $getlyrics = getdata("{$url}", $curl);
     $getlyrics = explode('alt="" title="', $getlyrics);
     $getlyrics = explode('" />', $getlyrics[1]);
     $getlyrics = explode('<div id="adlyric">', $getlyrics[1]);
     echo "<center><br><font size=60><b>{$getname['1']}</b></font><br><br>{$getlyrics['0']}</center>";
 }

 public function get_result($request)
 {
     $request = encode_url($request, "decode");
     $getname = explode(':', $request);
     $url = replace_space("http://www.lyrics007.com" . $getname[0]);
     $getlyrics = getdata("{$url}", $curl);
     $getlyrics = explode('display:block;float:left;padding-top:5px;', $getlyrics);
     $getlyrics = explode('/print.php?id=TWpnNE1qVTE', $getlyrics[1]);
     $getlyrics = explode('</fb:like>', $getlyrics[0]);
     $getlyrics = explode('<script type="text/javascript">', $getlyrics[1]);
     echo "<center><br><font size=60><b>{$getname['1']}</b></font><br><br>{$getlyrics['0']}</center>";
 }

function print_html_block($block = true, $config = "", $side, $index)
{
    global $pgv_lang, $PGV_IMAGE_DIR, $TEXT_DIRECTION, $PGV_IMAGES, $HTML_BLOCK_COUNT, $PGV_BLOCKS, $ctype;
    if (empty($config)) {
        $config = $PGV_BLOCKS["print_html_block"]["config"];
    }
    if (!isset($HTML_BLOCK_COUNT)) {
        $HTML_BLOCK_COUNT = 0;
    }
    $HTML_BLOCK_COUNT++;
    $id = "html_block{$HTML_BLOCK_COUNT}";
    $title = "";
    $ct = preg_match("/#(.+)#/", $config["html"], $match);
    if ($ct > 0) {
        if (isset($pgv_lang[$match[1]])) {
            $config["html"] = str_replace($match[0], $pgv_lang[$match[1]], $config["html"]);
        }
    }
    $ct = preg_match("/#(.+)#/", $config["html"], $match);
    if ($ct > 0) {
        if (isset($pgv_lang[$match[1]])) {
            $config["html"] = str_replace($match[0], $pgv_lang[$match[1]], $config["html"]);
        }
        $varname = $match[1];
        if (!empty(${$varname})) {
            $value = ${$varname};
            $config["html"] = str_replace($match[0], $value, $config["html"]);
        }
    }
    $content = $config["html"];
    if ($PGV_BLOCKS["print_html_block"]["canconfig"]) {
        if ($ctype == "gedcom" && PGV_USER_GEDCOM_ADMIN || $ctype == "user" && PGV_USER_ID) {
            if ($ctype == "gedcom") {
                $name = PGV_GEDCOM;
            } else {
                $name = PGV_USER_NAME;
            }
            $content .= "<br /><a href=\"javascript:;\" onclick=\"window.open('" . encode_url("index_edit.php?name={$name}&ctype={$ctype}&action=configure&side={$side}&index={$index}") . "', '_blank', 'top=50,left=50,width=600,height=350,scrollbars=1,resizable=1'); return false;\">";
            $content .= "<img class=\"adminicon\" src=\"{$PGV_IMAGE_DIR}/" . $PGV_IMAGES["admin"]["small"] . "\" width=\"15\" height=\"15\" border=\"0\" alt=\"" . $pgv_lang["config_block"] . "\" title=\"" . $pgv_lang["config_block"] . "\" /></a>\n";
        }
    }
    global $THEME_DIR;
    if ($block) {
        require $THEME_DIR . 'templates/block_small_temp.php';
    } else {
        require $THEME_DIR . 'templates/block_main_temp.php';
    }
}

function print_gedcom_block($block = true, $config = "", $side, $index)
{
    global $hitCount, $pgv_lang, $SHOW_COUNTER;
    $id = "gedcom_welcome";
    $title = PrintReady(get_gedcom_setting(PGV_GED_ID, 'title'));
    $content = "<div class=\"center\">";
    $content .= "<br />" . format_timestamp(client_time()) . "<br />\n";
    if ($SHOW_COUNTER) {
        $content .= $pgv_lang["hit_count"] . " " . $hitCount . "<br />\n";
    }
    $content .= "\n<br />";
    if (PGV_USER_GEDCOM_ADMIN) {
        $content .= "<a href=\"javascript:;\" onclick=\"window.open('" . encode_url("index_edit.php?name=" . PGV_GEDCOM . "&ctype=gedcom") . "', '_blank', 'top=50,left=10,width=600,height=500,scrollbars=1,resizable=1'); return false;\">" . $pgv_lang["customize_gedcom_page"] . "</a><br />\n";
    }
    $content .= "</div>";
    global $THEME_DIR;
    require $THEME_DIR . 'templates/block_main_temp.php';
}

 function init()
 {
     // Cannot edit with a "remember me" login.
     if ($_SESSION["cookie_login"]) {
         header('Location: ' . encode_url("login.php?type=simple&url=" . urlencode("edit_interface.php?" . decode_url($QUERY_STRING)), false));
         exit;
     }
     // Coming soon ???
     $this->has_familysearch = file_exists('modules/FamilySearch/familySearchWrapper.php');
     if ($this->has_familysearch) {
         require_once 'modules/FamilySearch/familySearchWrapper.php';
     }
     // The PID can come from a URL or a form
     $this->pid = safe_REQUEST($_REQUEST, 'pid', PGV_REGEX_XREF);
     $this->person = Person::getInstance($this->pid);
     $this->server_list = get_server_list();
     $this->gedcom_list = get_all_gedcoms();
     unset($this->gedcom_list[PGV_GED_ID]);
     // Other input values come from the form
     $this->form_txtPID = safe_POST('txtPID', PGV_REGEX_XREF);
     $this->form_cbRelationship = safe_POST('cbRelationship');
     $this->form_location = safe_POST('location');
     $this->form_txtURL = safe_POST('txtURL', PGV_REGEX_URL);
     $this->form_txtTitle = safe_POST('txtTitle', '[^<>"%{};]+');
     $this->form_txtGID = safe_POST('txtGID', $this->gedcom_list);
     $this->form_txtUsername = safe_POST('txtUsername', PGV_REGEX_USERNAME);
     $this->form_txtPassword = safe_POST('txtPassword', PGV_REGEX_PASSWORD);
     $this->form_cbExistingServers = safe_POST('cbExistingServers', array_keys($this->server_list));
     $this->form_txtCB_Title = safe_POST('txtCB_Title', '[^<>"%{};]+');
     $this->form_txtCB_GID = safe_POST('txtCB_GID', $this->gedcom_list);
     $this->form_txtFS_URL = safe_POST('txtFS_URL', PGV_REGEX_URL);
     $this->form_txtFS_Title = safe_POST('txtFS_Title', '[^<>"%{};]+');
     $this->form_txtFS_GID = safe_POST('txtFS_GID', $this->gedcom_list);
     $this->form_txtFS_Username = safe_POST('txtFS_Username', PGV_REGEX_USERNAME);
     $this->form_txtFS_Password = safe_POST('txtFS_Password', PGV_REGEX_PASSWORD);
     if (is_null($this->form_location)) {
         if ($this->server_list) {
             $this->form_location = 'existing';
         } else {
             $this->form_location = 'remote';
         }
     }
 }

/**
 * Print RSS Block
 *
 * Prints a block allowing the user to login to the site directly from the portal
 */
function print_RSS_block($block = true, $config = "", $side, $index)
{
    global $LANGUAGE, $pgv_lang;
    $id = "rss_block";
    $title = print_help_link("rss_feed_help", "qm", "", false, true);
    $title .= $pgv_lang["rss_feeds"];
    $content = "<div class=\"center\">";
    $content .= "<form method=\"post\" action=\"\" name=\"rssform\">";
    $content .= "<br />";
    $content .= "<select name=\"rssStyle\" class=\"header_select\" onchange=\"javascript:document.getElementById('rss_button').href = '" . encode_url("rss.php?ged=" . PGV_GEDCOM . "&lang={$LANGUAGE}") . "' + (document.rssform.module.value==''? '' : '&module=' + document.rssform.module.value) + (document.rssform.rssStyle.value==''? '' : '&rssStyle=' + document.rssform.rssStyle.value) + (document.rssform.auth.value==''? '' : '&auth=' + document.rssform.auth.value);\">";
    $content .= "<option value=\"ATOM\" selected=\"selected\">ATOM 1.0</option>";
    $content .= "<option value=\"RSS2.0\">RSS 2.0</option>";
    $content .= "<option value=\"RSS1.0\">RSS 1.0</option>";
    $content .= "<option value=\"ATOM0.3\">ATOM 0.3</option>";
    $content .= "<option value=\"RSS0.91\">RSS 0.91</option>";
    $content .= "<option value=\"HTML\">HTML</option>";
    $content .= "<option value=\"JS\">JavaScript</option>";
    $content .= "</select>";
    $content .= "<select name=\"module\" class=\"header_select\" onchange=\"javascript:document.getElementById('rss_button').href = '" . encode_url("rss.php?ged=" . PGV_GEDCOM . "&lang={$LANGUAGE}") . "' + (document.rssform.module.value==''? '' : '&module=' + document.rssform.module.value) + (document.rssform.rssStyle.value==''? '' : '&rssStyle=' + document.rssform.rssStyle.value) + (document.rssform.auth.value==''? '' : '&auth=' + document.rssform.auth.value);\">";
    $content .= "<option value=\"\">" . $pgv_lang["all"] . "</option>";
    $content .= "<option value=\"today\">" . $pgv_lang["on_this_day"] . " </option>";
    $content .= "<option value=\"upcoming\">" . $pgv_lang["upcoming_events"] . "</option>";
    $content .= "<option value=\"gedcomStats\">" . $pgv_lang["gedcom_stats"] . "</option>";
    $content .= "<option value=\"gedcomNews\">" . $pgv_lang["gedcom_news"] . "</option>";
    $content .= "<option value=\"top10Surnames\">" . $pgv_lang["block_top10"] . "</option>";
    $content .= "<option value=\"recentChanges\">" . $pgv_lang["recent_changes"] . "</option>";
    $content .= "<option value=\"randomMedia\">" . $pgv_lang["random_picture"] . "</option>";
    $content .= "</select>";
    $content .= " <a id=\"rss_button\" href=\"" . encode_url("rss.php?ged=" . PGV_GEDCOM . "&lang={$LANGUAGE}") . "\"><img class=\"icon\" src=\"images/feed-icon16x16.png\" alt=\"RSS\" title=\"RSS\" /></a>";
    $content .= "</form></div>";
    $content .= "<div class=\"center\">";
    $content .= "</div>";
    global $THEME_DIR;
    if ($block) {
        require $THEME_DIR . 'templates/block_small_temp.php';
    } else {
        require $THEME_DIR . 'templates/block_main_temp.php';
    }
}

//.........这里部分代码省略.........
         }
     }
     print "</td></tr></table>";
     // For the root person, print a down arrow that allows changing the root of tree
     if ($showNav && $count == 1) {
         // NOTE: If statement OK
         if ($person->canDisplayName()) {
             // -- print left arrow for decendants so that we can move down the tree
             $famids = $person->getSpouseFamilies();
             //-- make sure there is more than 1 child in the family with parents
             $cfamids = $person->getChildFamilies();
             $num = 0;
             foreach ($cfamids as $famid => $family) {
                 if (!is_null($family)) {
                     $num += $family->getNumberOfChildren();
                 }
             }
             // NOTE: If statement OK
             if ($num > 0) {
                 print "\n\t\t<div class=\"center\" id=\"childarrow\" dir=\"" . $TEXT_DIRECTION . "\"";
                 print " style=\"position:absolute; width:" . $bwidth . "px; \">";
                 if ($this->view != "preview") {
                     print "<a href=\"javascript: " . $pgv_lang["show"] . "\" onclick=\"togglechildrenbox(); return false;\" onmouseover=\"swap_image('larrow',3);\" onmouseout=\"swap_image('larrow',3);\">";
                     print "<img id=\"larrow\" src=\"" . $PGV_IMAGE_DIR . "/" . $PGV_IMAGES["darrow"]["other"] . "\" border=\"0\" alt=\"\" />";
                     print "</a><br />";
                 }
                 print "\n\t\t<div id=\"childbox\" dir=\"" . $TEXT_DIRECTION . "\" style=\"width:" . $bwidth . "px; height:" . $bheight . "px; visibility: hidden;\">";
                 print "\n\t\t\t<table class=\"person_box\"><tr><td>";
                 foreach ($famids as $famid => $family) {
                     if (!is_null($family)) {
                         $spouse = $family->getSpouse($person);
                         if (!empty($spouse)) {
                             $spid = $spouse->getXref();
                             print "\n\t\t\t\t<a href=\"" . encode_url("hourglass.php?pid={$spid}&show_spouse={$this->show_spouse}&show_full={$this->show_full}&generations={$this->generations}&box_width={$this->box_width}") . "\"><span ";
                             $name = $spouse->getFullName();
                             $name = rtrim($name);
                             if (hasRTLText($name)) {
                                 print "class=\"name2\">";
                             } else {
                                 print "class=\"name1\">";
                             }
                             print PrintReady($name);
                             print "<br /></span></a>";
                         }
                         $children = $family->getChildren();
                         foreach ($children as $id => $child) {
                             $cid = $child->getXref();
                             print "\n\t\t\t\t&nbsp;&nbsp;<a href=\"" . encode_url("hourglass.php?pid={$cid}&show_spouse={$this->show_spouse}&show_full={$this->show_full}&generations={$this->generations}&box_width={$this->box_width}") . "\"><span ";
                             $name = $child->getFullName();
                             $name = rtrim($name);
                             if (hasRTLText($name)) {
                                 print "class=\"name2\">&lt; ";
                             } else {
                                 print "class=\"name1\">&lt; ";
                             }
                             print PrintReady($name);
                             print "<br /></span></a>";
                         }
                     }
                 }
                 //-- do we need to print this arrow?
                 print "<img src=\"" . $PGV_IMAGE_DIR . "/" . $PGV_IMAGES["rarrow"]["other"] . "\" border=\"0\" alt=\"\" /> ";
                 //-- print the siblings
                 foreach ($cfamids as $famid => $family) {
                     if (!is_null($family)) {
                         if (!is_null($family->getHusband()) || !is_null($family->getWife())) {

echo '<td class="optionbox"><select name="showall">';
echo '<option value="0"', $showall == 0 ? ' selected="selected"' : '', '>', $pgv_lang['err_rec'], '</option>';
echo '<option value="1"', $showall == 1 ? ' selected="selected"' : '', '>', $pgv_lang['all_rec'], '</option>';
echo '</select></td></tr>';
echo '<tr><td colspan="2" class="list_label"><input type="submit" value="', $pgv_lang['show'], '"><input type="hidden" name="action" value="go"></td></tr>';
echo '</table></form><hr />';
// Do not run until user clicks "show", as default page may take a while to load.
// Instead, show some useful help info.
if (!isset($_POST['action'])) {
    echo '<p>', $pgv_lang['gedcheck_text'], '</p><hr />';
    print_footer();
    exit;
}
// If we're checking a gedcom that is imported into the database, check that the file is synchronised
if ($ged == PGV_GEDCOM && !$SYNC_GEDCOM_FILE) {
    $ged_link = 'href="javascript:" onclick="window.open(\'' . encode_url("export_gedcom.php?export={$ged}") . '\', \'_blank\',\'left=50,top=50,width=500,height=500,resizable=1,scrollbars=1\');"';
    echo '<div class="error">', print_text('gedcheck_sync', 0, 1), '</div><hr/>';
}
// Special cases.  Other facts link to themselves; SUBN, SUBN, OBJE, NOTE, REPO, SOUR
$XREF_LINK = array('FAMC' => 'FAM', 'FAMS' => 'FAM', 'HUSB' => 'INDI', 'WIFE' => 'INDI', 'CHIL' => 'INDI', 'ASSO' => 'INDI', 'ALIA' => 'INDI', 'ANCI' => 'SUBM', 'DESI' => 'SUBM', '_PGV_OBJS' => 'OBJE', 'AUTH' => 'INDI');
// Use the global settings for these (if they exist)
if (isset($FAM_FACTS_UNIQUE)) {
    $fam_facts_unique = preg_split('/[, ;:]+/', $FAM_FACTS_UNIQUE, -1, PREG_SPLIT_NO_EMPTY);
} else {
    $fam_facts_unique = array();
}
if (isset($INDI_FACTS_UNIQUE)) {
    $indi_facts_unique = preg_split('/[, ;:]+/', $INDI_FACTS_UNIQUE, -1, PREG_SPLIT_NO_EMPTY);
} else {
    $indi_facts_unique = array();
}

        print $pgv_lang["current_gedcoms"];
        print "</td>";
        foreach ($configuredlanguages["gedcom"] as $key => $value) {
            if (!isset($currentkey)) {
                $currentkey = $key;
            }
            if ($currentkey != $key) {
                print "</td></tr><tr><td class=\"facts_value\" colspan=\"2\" valign=\"top\">";
                $currentkey = $key;
            } else {
                print "<td class=\"facts_value\" colspan=\"2\" valign=\"top\">";
            }
            // Print gedcom names
            foreach ($value as $gedcomname => $used) {
                echo '<a href="', encode_url("editconfig_gedcom.php?ged={$gedcomname}"), '" target="blank">', $gedcomname, '</a><br />';
            }
            print "</td><td class=\"facts_value\" colspan=\"2\" valign=\"top\">";
            // Print language name and flag
            print "<img src=\"" . $language_settings[$key]["flagsfile"] . "\" class=\"brightflag\" alt=\"" . $pgv_lang["lang_name_" . $key] . "\" title=\"" . $pgv_lang["lang_name_" . $key] . "\" />&nbsp;" . $pgv_lang["lang_name_" . $key] . "<br />";
        }
        print "</td></tr><tr><td  class=\"facts_value\" colspan=\"5\" valign=\"top\">" . $pgv_lang["users_langs"] . "</td><td class=\"facts_value\" colspan=\"2\">";
        foreach ($configuredlanguages["users"] as $key => $value) {
            print "<img src=\"" . $language_settings[$key]["flagsfile"] . "\" class=\"brightflag\" alt=\"" . $pgv_lang["lang_name_" . $key] . "\" title=\"" . $pgv_lang["lang_name_" . $key] . "\" />&nbsp;<a href=\"" . encode_url("useradmin.php?action=listusers&filter=language&usrlang={$key}") . "\">" . $pgv_lang["lang_name_" . $key] . "</a><br />";
        }
        print "</td></tr>";
}
print "</table>";
print "</form>";
$LANGUAGE = $USERLANG;
print "</div>";
print_footer();

/**
 *
 * Replaces the meta content refresh URL with a proxified version.
 *
 **/
function replaceMetaContent($match)
{
    global $_script_url;
    global $_config;
    return 'content="0;url=' . $_script_url . '?' . $_config['url_var_name'] . '=' . encode_url($match[1]) . '"';
}

 for ($lt = 0; $lt < pg_numrows($res); $lt++) {
     $nick = pg_result($res, $lt, 0);
     $jid = pg_result($res, $lt, 1);
     $grp = pg_result($res, $lt, 2);
     if ($grp == "") {
         $grp = $con_no_g[$lang];
     }
     if ($col == "e0e9f7") {
         $col = "e8eef7";
     } else {
         $col = "e0e9f7";
     }
     $predefined = "{$jid}";
     $predefined = encode_url($predefined, $token, $url_key);
     $predefined_s = "from:{$jid}";
     $predefined_s = encode_url($predefined_s, $token, $url_key);
     if (in_array($jid, $do_notlog_list) == TRUE) {
         $selected = "selected";
     } else {
         $selected = "";
     }
     if ($selected != "") {
         $col = "b7b7b7";
     }
     print '<tr bgcolor="' . $col . '" onMouseOver="this.bgColor=\'c3d9ff\';" onMouseOut="this.bgColor=\'#' . $col . '\';">' . "\n";
     print '<td title="' . $con_title[$lang] . '" style="padding-left:7px" onclick="window.location=\'chat_map.php?chat_map=' . $predefined . '\';"><b>' . cut_nick(htmlspecialchars($nick)) . '</b></td>' . "\n";
     print '<td>(<i>' . htmlspecialchars($jid) . '</i>)</td>' . "\n";
     print '<td style="text-align: center;">' . cut_nick(htmlspecialchars($grp)) . '</td>' . "\n";
     print '<td style="text-align: center;"><a href="chat_map.php?chat_map=' . $predefined . '"><u>' . $show_chat_as_map[$lang] . '</u></a>|<a href="search_v2.php?b=' . $predefined_s . '"><u>' . $show_chat_stream[$lang] . '</u></a></td>';
     print '<td style="text-align: center;">' . "\n";
     // temporary solution we should put integers here instead of full jids

    // Row 1 column 3: title "Undo all"
    $output2 .= "<td class=\"list_label\">" . $pgv_lang['undo_all'] . "</td></tr>";
    // Row 2 column 1: action "Accept all"
    $output2 .= "<tr><td class=\"list_value\">";
    $count = 0;
    foreach ($changedgedcoms as $ged => $value) {
        if ($count != 0) {
            $output2 .= "<br /><br />";
        }
        $output2 .= "<a href=\"" . encode_url("edit_changes.php?action=acceptall&ged={$ged}") . "\">{$ged} - " . $pgv_lang['accept_all'] . "</a>";
        $count++;
    }
    $output2 .= "</td>";
    // Row 2 column 2: separator
    $output2 .= "<td class=\"list_value width25\">&nbsp;</td>";
    // Row 2 column 3: action "Undo all"
    $output2 .= "<td class=\"list_value\">";
    $count = 0;
    foreach ($changedgedcoms as $ged => $value) {
        if ($count != 0) {
            $output2 .= "<br /><br />";
        }
        $output2 .= "<a href=\"" . encode_url("edit_changes.php?action=undoall&ged={$ged}") . "\" onclick=\"return confirm('" . $pgv_lang['undo_all_confirm'] . "');\">{$ged} - " . $pgv_lang['undo_all'] . "</a>";
        $count++;
    }
    $output2 .= '</td></tr></table>';
    echo '<center>', $pgv_lang['accept_gedcom'], '<br />', $output2, $output, $output2, '</center>';
}
echo '</div>';
echo "<br /><br /><center><a href=\"javascript:;\" onclick=\"if (window.opener.showchanges) window.opener.showchanges(); window.close();\">", $pgv_lang['close_window'], '</a><br /></center>';
print_simple_footer();

 /**
  * get the other menu
  * @return Menu
  */
 function &getOtherMenu()
 {
     global $TEXT_DIRECTION, $PGV_IMAGE_DIR, $PGV_IMAGES, $GEDCOM, $pgv_lang;
     global $SHOW_GEDCOM_RECORD, $ENABLE_CLIPPINGS_CART;
     if ($TEXT_DIRECTION == "rtl") {
         $ff = "_rtl";
     } else {
         $ff = "";
     }
     if (!$this->note->canDisplayDetails() || !$SHOW_GEDCOM_RECORD && $ENABLE_CLIPPINGS_CART < PGV_USER_ACCESS_LEVEL) {
         $tempvar = false;
         return $tempvar;
     }
     // other menu
     $menu = new Menu($pgv_lang['other']);
     $menu->addClass("submenuitem{$ff}", "submenuitem_hover{$ff}", "submenu{$ff}");