/**
* get edit menu
*/
function getEditMenu()
{
$SHOW_GEDCOM_RECORD = get_gedcom_setting(WT_GED_ID, 'SHOW_GEDCOM_RECORD');
if (!$this->record || $this->record->isOld()) {
return null;
}
// edit menu
$menu = new WT_Menu(WT_I18N::translate('Edit'), '#', 'menu-obje');
if (WT_USER_CAN_EDIT) {
$submenu = new WT_Menu(WT_I18N::translate('Edit media object'), '#', 'menu-obje-edit');
$submenu->addOnclick("window.open('addmedia.php?action=editmedia&pid={$this->record->getXref()}', '_blank', edit_window_specs)");
$menu->addSubmenu($submenu);
// main link displayed on page
if (array_key_exists('GEDFact_assistant', WT_Module::getActiveModules())) {
$submenu = new WT_Menu(WT_I18N::translate('Manage links'), '#', 'menu-obje-link');
$submenu->addOnclick("return ilinkitem('" . $this->record->getXref() . "','manage');");
} else {
$submenu = new WT_Menu(WT_I18N::translate('Set link'), '#', 'menu-obje-link');
$ssubmenu = new WT_Menu(WT_I18N::translate('To individual'), '#', 'menu-obje-link-indi');
$ssubmenu->addOnclick("return ilinkitem('" . $this->record->getXref() . "','person');");
$submenu->addSubMenu($ssubmenu);
$ssubmenu = new WT_Menu(WT_I18N::translate('To family'), '#', 'menu-obje-link-fam');
$ssubmenu->addOnclick("return ilinkitem('" . $this->record->getXref() . "','family');");
$submenu->addSubMenu($ssubmenu);
$ssubmenu = new WT_Menu(WT_I18N::translate('To source'), '#', 'menu-obje-link-sour');
$ssubmenu->addOnclick("return ilinkitem('" . $this->record->getXref() . "','source');");
$submenu->addSubMenu($ssubmenu);
}
$menu->addSubmenu($submenu);
}
// delete
if (WT_USER_CAN_EDIT) {
$submenu = new WT_Menu(WT_I18N::translate('Delete'), '#', 'menu-obje-del');
$submenu->addOnclick("return delete_media('" . WT_I18N::translate('Are you sure you want to delete “%s”?', strip_tags($this->record->getFullName())) . "', '" . $this->record->getXref() . "');");
$menu->addSubmenu($submenu);
}
// edit raw
if (Auth::isAdmin() || WT_USER_CAN_EDIT && $SHOW_GEDCOM_RECORD) {
$submenu = new WT_Menu(WT_I18N::translate('Edit raw GEDCOM'), '#', 'menu-obje-editraw');
$submenu->addOnclick("return edit_raw('" . $this->record->getXref() . "');");
$menu->addSubmenu($submenu);
}
// add to favorites
if (array_key_exists('user_favorites', WT_Module::getActiveModules())) {
$submenu = new WT_Menu(WT_I18N::translate('Add to favorites'), '#', 'menu-obje-addfav');
$submenu->addOnclick("jQuery.post('module.php?mod=user_favorites&mod_action=menu-add-favorite',{xref:'" . $this->record->getXref() . "'},function(){location.reload();})");
$menu->addSubmenu($submenu);
}
//-- get the link for the first submenu and set it as the link for the main menu
if (isset($menu->submenus[0])) {
$link = $menu->submenus[0]->onclick;
$menu->addOnclick($link);
}
return $menu;
}
public function modAction($mod_action)
{
switch ($mod_action) {
case 'admin_batch_update':
$controller = new WT_Controller_Page();
$controller->setPageTitle(WT_I18N::translate('Batch update'))->restrictAccess(Auth::isAdmin())->pageHeader();
// TODO: these files should be methods in this class
require WT_ROOT . WT_MODULES_DIR . $this->getName() . '/' . $mod_action . '.php';
$mod = new batch_update();
echo $mod->main();
break;
default:
header('HTTP/1.0 404 Not Found');
}
}
/**
* get edit menu
*/
function getEditMenu()
{
$SHOW_GEDCOM_RECORD = get_gedcom_setting(WT_GED_ID, 'SHOW_GEDCOM_RECORD');
if (!$this->record || $this->record->isOld()) {
return null;
}
// edit menu
$menu = new WT_Menu(WT_I18N::translate('Edit'), '#', 'menu-repo');
if (WT_USER_CAN_EDIT) {
$fact = $this->record->getFirstFact('NAME');
$submenu = new WT_Menu(WT_I18N::translate('Edit repository'), '#', 'menu-repo-edit');
if ($fact) {
// Edit existing name
$submenu->addOnclick('return edit_record(\'' . $this->record->getXref() . '\', \'' . $fact->getFactId() . '\');');
} else {
// Add new name
$submenu->addOnclick('return add_fact(\'' . $this->record->getXref() . '\', \'NAME\');');
}
$menu->addSubmenu($submenu);
}
// delete
if (WT_USER_CAN_EDIT) {
$submenu = new WT_Menu(WT_I18N::translate('Delete'), '#', 'menu-repo-del');
$submenu->addOnclick("return delete_repository('" . WT_I18N::translate('Are you sure you want to delete “%s”?', strip_tags($this->record->getFullName())) . "', '" . $this->record->getXref() . "');");
$menu->addSubmenu($submenu);
}
// edit raw
if (Auth::isAdmin() || WT_USER_CAN_EDIT && $SHOW_GEDCOM_RECORD) {
$submenu = new WT_Menu(WT_I18N::translate('Edit raw GEDCOM'), '#', 'menu-repo-editraw');
$submenu->addOnclick("return edit_raw('" . $this->record->getXref() . "');");
$menu->addSubmenu($submenu);
}
// add to favorites
if (array_key_exists('user_favorites', WT_Module::getActiveModules())) {
$submenu = new WT_Menu(WT_I18N::translate('Add to favorites'), '#', 'menu-repo-addfav');
$submenu->addOnclick("jQuery.post('module.php?mod=user_favorites&mod_action=menu-add-favorite',{xref:'" . $this->record->getXref() . "'},function(){location.reload();})");
$menu->addSubmenu($submenu);
}
//-- get the link for the first submenu and set it as the link for the main menu
if (isset($menu->submenus[0])) {
$link = $menu->submenus[0]->onclick;
$menu->addOnclick($link);
}
return $menu;
}
/**
* PDF Setup - WT_Report_PDF
*/
function setup()
{
parent::setup();
// Setup the PDF class with custom size pages because WT supports more page sizes. If WT sends an unknown size name then the default would be A4
$this->pdf = new PDF($this->orientation, parent::unit, array($this->pagew, $this->pageh), self::unicode, "UTF-8", self::diskcache);
// Setup the PDF margins
$this->pdf->setMargins($this->leftmargin, $this->topmargin, $this->rightmargin);
$this->pdf->SetHeaderMargin($this->headermargin);
$this->pdf->SetFooterMargin($this->footermargin);
//Set auto page breaks
$this->pdf->SetAutoPageBreak(true, $this->bottommargin);
// Set font subsetting
$this->pdf->setFontSubsetting(self::subsetting);
// Setup PDF compression
$this->pdf->SetCompression(self::compression);
// Setup RTL support
$this->pdf->setRTL($this->rtl);
// Set the document information
// Only admin should see the version number
$appversion = WT_WEBTREES;
if (Auth::isAdmin()) {
$appversion .= " " . WT_VERSION;
}
$this->pdf->SetCreator($appversion . " (" . parent::wt_url . ")");
// Not implemented yet - WT_Report_Base::setup()
$this->pdf->SetAuthor($this->rauthor);
$this->pdf->SetTitle($this->title);
$this->pdf->SetSubject($this->rsubject);
$this->pdf->SetKeywords($this->rkeywords);
$this->pdf->setReport($this);
if ($this->showGenText) {
// The default style name for Generated by.... is 'genby'
$element = new CellPDF(0, 10, 0, "C", "", "genby", 1, ".", ".", 0, 0, "", "", true);
$element->addText($this->generatedby);
$element->setUrl(parent::wt_url);
$this->pdf->addFooter($element);
}
}
// UI for online updating of the config file.
//
// webtrees: Web based Family History software
// Copyright (C) 2014 webtrees development team.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
use Michelf\MarkdownExtra;
use WT\Auth;
define('WT_SCRIPT_NAME', 'admin_site_readme.php');
require './includes/session.php';
$controller = new WT_Controller_Page();
$controller->restrictAccess(Auth::isAdmin())->setPageTitle(WT_I18N::translate('README documentation'))->pageHeader();
?>
<div class="markdown" dir="ltr" lang="en">
<?php
echo MarkdownExtra::defaultTransform(file_get_contents('README.md'));
?>
</div>
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
use WT\Auth;
use WT\User;
define('WT_SCRIPT_NAME', 'admin_pgv_to_wt.php');
require './includes/session.php';
//require WT_ROOT.'includes/functions/functions_edit.php';
// We can only import into an empty system, so deny access if we have already created a gedcom or added users.
if (WT_GED_ID || count(User::all()) > 1) {
header('Location: ' . WT_SERVER_NAME . WT_SCRIPT_PATH);
exit;
}
$controller = new WT_Controller_Page();
$controller->restrictAccess(Auth::isAdmin())->setPageTitle(WT_I18N::translate('PhpGedView to webtrees transfer wizard'));
$error = '';
$warning = '';
$PGV_PATH = WT_Filter::post('PGV_PATH');
if ($PGV_PATH) {
if (!is_dir($PGV_PATH) || !is_readable($PGV_PATH . '/config.php')) {
$error = WT_I18N::translate('The specified directory does not contain an installation of PhpGedView');
} else {
// Load the configuration settings
$config_php = file_get_contents($PGV_PATH . '/config.php');
// The easiest way to do this is to exec() the file - but not lines containing require or PHP tags
$config_php = preg_replace(array('/^\\s*(include|require).*/m', '/.*<\\?php.*/', '/.*\\?>.*/'), '', $config_php);
eval($config_php);
// $INDEX_DIRECTORY can be either absolute or relative to the PhpGedView root.
if (preg_match('/^(\\/|\\|[A-Z]:)/', $INDEX_DIRECTORY)) {
$INDEX_DIRECTORY = realpath($INDEX_DIRECTORY);
public function getTabContent()
{
global $controller;
$html = '<div id="' . $this->getName() . '_content">';
//Show Lightbox-Album header Links
if (WT_USER_CAN_EDIT) {
$html .= '<table class="facts_table"><tr><td class="descriptionbox rela">';
// Add a new media object
if (get_gedcom_setting(WT_GED_ID, 'MEDIA_UPLOAD') >= WT_USER_ACCESS_LEVEL) {
$html .= '<span><a href="#" onclick="window.open(\'addmedia.php?action=showmediaform&linktoid=' . $controller->record->getXref() . '\', \'_blank\', \'resizable=1,scrollbars=1,top=50,height=780,width=600\');return false;">';
$html .= '<img src="' . WT_CSS_URL . 'images/image_add.png" id="head_icon" class="icon" title="' . WT_I18N::translate('Add a new media object') . '" alt="' . WT_I18N::translate('Add a new media object') . '">';
$html .= WT_I18N::translate('Add a new media object');
$html .= '</a></span>';
// Link to an existing item
$html .= '<span><a href="#" onclick="window.open(\'inverselink.php?linktoid=' . $controller->record->getXref() . '&linkto=person\', \'_blank\', \'resizable=1,scrollbars=1,top=50,height=300,width=450\');">';
$html .= '<img src="' . WT_CSS_URL . 'images/image_link.png" id="head_icon" class="icon" title="' . WT_I18N::translate('Link to an existing media object') . '" alt="' . WT_I18N::translate('Link to an existing media object') . '">';
$html .= WT_I18N::translate('Link to an existing media object');
$html .= '</a></span>';
}
if (WT_USER_GEDCOM_ADMIN && $this->get_media()) {
// Popup Reorder Media
$html .= '<span><a href="#" onclick="reorder_media(\'' . $controller->record->getXref() . '\')">';
$html .= '<img src="' . WT_CSS_URL . 'images/images.png" id="head_icon" class="icon" title="' . WT_I18N::translate('Re-order media') . '" alt="' . WT_I18N::translate('Re-order media') . '">';
$html .= WT_I18N::translate('Re-order media');
$html .= '</a></span>';
}
$html .= '</td></tr></table>';
}
// Used when sorting media on album tab page
$html .= '<table class="facts_table"><tr><td class="facts_value">';
// one-cell table - for presentation only
$html .= '<ul class="album-list">';
foreach ($this->get_media() as $media) {
//View Edit Menu ----------------------------------
//Get media item Notes
$haystack = $media->getGedcom();
$needle = '1 NOTE';
$before = substr($haystack, 0, strpos($haystack, $needle));
$after = substr(strstr($haystack, $needle), strlen($needle));
$notes = print_fact_notes($before . $needle . $after, 1, true);
// Prepare Below Thumbnail menu ----------------------------------------------------
$menu = new WT_Menu('<div style="overflow: hidden; text-overflow: ellipsis; white-space: nowrap">' . $media->getFullName() . '</div>');
$menu->addClass('', 'submenu');
// View Notes
if (strpos($media->getGedcom(), "\n1 NOTE")) {
$submenu = new WT_Menu(WT_I18N::translate('View notes'));
// Notes Tooltip ----------------------------------------------------
$submenu->addOnclick("modalNotes('" . WT_Filter::escapeJs($notes) . "','" . WT_I18N::translate('View notes') . "'); return false;");
$submenu->addClass("submenuitem");
$menu->addSubMenu($submenu);
}
//View Details
$submenu = new WT_Menu(WT_I18N::translate('View details'), $media->getHtmlUrl());
$submenu->addClass("submenuitem");
$menu->addSubMenu($submenu);
//View Sources
$source_menu = null;
foreach ($media->getFacts('SOUR') as $source_fact) {
$source = $source_fact->getTarget();
if ($source && $source->canShow()) {
if (!$source_menu) {
// Group sources under a top level menu
$source_menu = new WT_Menu(WT_I18N::translate('Sources'), '#', null, 'right', 'right');
$source_menu->addClass('submenuitem', 'submenu');
}
//now add a link to the actual source as a submenu
$submenu = new WT_Menu($source->getFullName(), $source->getHtmlUrl());
$submenu->addClass('submenuitem', 'submenu');
$source_menu->addSubMenu($submenu);
}
}
if ($source_menu) {
$menu->addSubMenu($source_menu);
}
if (WT_USER_CAN_EDIT) {
// Edit Media
$submenu = new WT_Menu(WT_I18N::translate('Edit media'));
$submenu->addOnclick("return window.open('addmedia.php?action=editmedia&pid=" . $media->getXref() . "', '_blank', edit_window_specs);");
$submenu->addClass("submenuitem");
$menu->addSubMenu($submenu);
if (Auth::isAdmin()) {
// Manage Links
if (array_key_exists('GEDFact_assistant', WT_Module::getActiveModules())) {
$submenu = new WT_Menu(WT_I18N::translate('Manage links'));
$submenu->addOnclick("return window.open('inverselink.php?mediaid=" . $media->getXref() . "&linkto=manage', '_blank', find_window_specs);");
$submenu->addClass("submenuitem");
$menu->addSubMenu($submenu);
} else {
$submenu = new WT_Menu(WT_I18N::translate('Set link'), '#', null, 'right', 'right');
$submenu->addClass('submenuitem', 'submenu');
$ssubmenu = new WT_Menu(WT_I18N::translate('To individual'));
$ssubmenu->addOnclick("return window.open('inverselink.php?mediaid=" . $media->getXref() . "&linkto=person', '_blank', find_window_specs);");
$ssubmenu->addClass('submenuitem', 'submenu');
$submenu->addSubMenu($ssubmenu);
$ssubmenu = new WT_Menu(WT_I18N::translate('To family'));
$ssubmenu->addOnclick("return window.open('inverselink.php?mediaid=" . $media->getXref() . "&linkto=family', '_blank', find_window_specs);");
$ssubmenu->addClass('submenuitem', 'submenu');
$submenu->addSubMenu($ssubmenu);
$ssubmenu = new WT_Menu(WT_I18N::translate('To source'));
$ssubmenu->addOnclick("return window.open('inverselink.php?mediaid=" . $media->getXref() . "&linkto=source', '_blank', find_window_specs);");
$ssubmenu->addClass('submenuitem', 'submenu');
$submenu->addSubMenu($ssubmenu);
$menu->addSubMenu($submenu);
}
// Unlink media
$submenu = new WT_Menu(WT_I18N::translate('Unlink media'));
$submenu->addOnclick("return unlink_media('" . WT_I18N::translate('Are you sure you want to remove links to this media object?') . "', '" . $controller->record->getXref() . "', '" . $media->getXref() . "');");
$submenu->addClass("submenuitem");
$menu->addSubMenu($submenu);
}
}
$html .= '<li class="album-list-item">';
$html .= '<div class="album-image">' . $media->displayImage() . '</div>';
$html .= '<div class="album-title">' . $menu->getMenu() . '</div>';
$html .= '</li>';
}
$html .= '</ul>';
$html .= '</td></tr></table>';
return $html;
}
require './includes/session.php';
// Some variables are initialised from GET (so we can set initial values in URLs),
// but are submitted in POST so we can have long body text.
$subject = WT_Filter::post('subject', null, WT_Filter::get('subject'));
$body = WT_Filter::post('body');
$from_name = WT_Filter::post('from_name');
$from_email = WT_Filter::post('from_email');
$action = WT_Filter::post('action', 'compose|send', 'compose');
$to = WT_Filter::post('to', null, WT_Filter::get('to'));
$method = WT_Filter::post('method', 'messaging|messaging2|messaging3|mailto|none', WT_Filter::get('method', 'messaging|messaging2|messaging3|mailto|none', 'messaging2'));
$url = WT_Filter::postUrl('url', WT_Filter::getUrl('url'));
$controller = new WT_Controller_Simple();
$controller->setPageTitle(WT_I18N::translate('webtrees message'));
$to_user = User::findByIdentifier($to);
// Only admins can send broadcast messages
if ((!$to_user || $to == 'all' || $to == 'last_6mo' || $to == 'never_logged') && !Auth::isAdmin()) {
// TODO, what if we have a user called "all" or "last_6mo" or "never_logged" ???
WT_FlashMessages::addMessage(WT_I18N::translate('Message was not sent'));
$controller->pageHeader();
$controller->addInlineJavascript('window.opener.location.reload(); window.close();');
exit;
}
$errors = '';
// Is this message from a member or a visitor?
if (WT_USER_ID) {
$from = WT_USER_NAME;
} else {
// Visitors must provide a valid email address
if ($from_email && (!preg_match("/(.+)@(.+)/", $from_email, $match) || function_exists('checkdnsrr') && checkdnsrr($match[2]) === false)) {
$errors .= '<p class="ui-state-error">' . WT_I18N::translate('Please enter a valid email address.') . '</p>';
$action = 'compose';
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
use WT\Auth;
define('WT_SCRIPT_NAME', 'admin_site_clean.php');
require './includes/session.php';
$controller = new WT_Controller_Page();
$controller->restrictAccess(Auth::isAdmin())->setPageTitle(WT_I18N::translate('Clean up data folder'))->pageHeader();
require WT_ROOT . 'includes/functions/functions_edit.php';
function full_rmdir($dir)
{
if (!is_writable($dir)) {
if (!@chmod($dir, WT_PERM_EXE)) {
return false;
}
}
$d = dir($dir);
while (false !== ($entry = $d->read())) {
if ($entry == '.' || $entry == '..') {
continue;
}
$entry = $dir . '/' . $entry;
if (is_dir($entry)) {
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
use WT\Auth;
define('WT_SCRIPT_NAME', 'admin_users_bulk.php');
require './includes/session.php';
$controller = new WT_Controller_Page();
$controller->restrictAccess(Auth::isAdmin())->setPageTitle(WT_I18N::translate('Send broadcast messages'))->pageHeader();
?>
<div id="users_bulk">
<p>
<a href="#" onclick="message('all', 'messaging2', ''); return false;">
<?php
echo WT_I18N::translate('Send message to all users');
?>
</a>
</p>
<p>
<a href="#" onclick="message('never_logged', 'messaging2', ''); return false;">
<?php
echo WT_I18N::translate('Send message to users who have never logged in');
?>
</a>
function addMessage($message)
{
global $WT_TREE, $WT_REQUEST;
$success = true;
$sender = User::findByIdentifier($message['from']);
$recipient = User::findByIdentifier($message['to']);
// Sender may not be a webtrees user
if ($sender) {
$sender_email = $sender->getEmail();
$sender_real_name = $sender->getRealName();
} else {
$sender_email = $message['from'];
$sender_real_name = $message['from_name'];
}
// Send a copy of the copy message back to the sender.
if ($message['method'] != 'messaging') {
// Switch to the sender’s language.
if ($sender) {
WT_I18N::init($sender->getSetting('language'));
}
$copy_email = $message['body'];
if (!empty($message['url'])) {
$copy_email .= WT_Mail::EOL . WT_Mail::EOL . '--------------------------------------' . WT_Mail::EOL . WT_I18N::translate('This message was sent while viewing the following URL: ') . $message['url'] . WT_Mail::EOL;
}
$copy_email .= WT_Mail::auditFooter();
if ($sender) {
// Message from a logged-in user
$copy_email = WT_I18N::translate('You sent the following message to a webtrees user:'******' ' . $recipient->getRealName() . WT_Mail::EOL . WT_Mail::EOL . $copy_email;
} else {
// Message from a visitor
$copy_email = WT_I18N::translate('You sent the following message to a webtrees administrator:') . WT_Mail::EOL . WT_Mail::EOL . WT_Mail::EOL . $copy_email;
}
$success = $success && WT_Mail::send($WT_TREE, $sender_email, $sender_real_name, WT_Site::preference('SMTP_FROM_NAME'), $WT_TREE->preference('title'), WT_I18N::translate('webtrees message') . ' - ' . $message['subject'], $copy_email);
}
// Switch to the recipient’s language.
WT_I18N::init($recipient->getSetting('language'));
if (isset($message['from_name'])) {
$message['body'] = WT_I18N::translate('Your name:') . ' ' . $message['from_name'] . WT_Mail::EOL . WT_I18N::translate('Email address:') . ' ' . $message['from_email'] . WT_Mail::EOL . WT_Mail::EOL . $message['body'];
}
// Add another footer - unless we are an admin
if (!Auth::isAdmin()) {
if (!empty($message['url'])) {
$message['body'] .= WT_Mail::EOL . WT_Mail::EOL . '--------------------------------------' . WT_Mail::EOL . WT_I18N::translate('This message was sent while viewing the following URL: ') . $message['url'] . WT_Mail::EOL;
}
$message['body'] .= WT_Mail::auditFooter();
}
if (empty($message['created'])) {
$message['created'] = gmdate("D, d M Y H:i:s T");
}
if ($message['method'] != 'messaging3' && $message['method'] != 'mailto' && $message['method'] != 'none') {
WT_DB::prepare("INSERT INTO `##message` (sender, ip_address, user_id, subject, body) VALUES (? ,? ,? ,? ,?)")->execute(array($message['from'], $WT_REQUEST->getClientIp(), $recipient->getUserId(), $message['subject'], str_replace('<br>', '', $message['body'])));
}
if ($message['method'] != 'messaging') {
if ($sender) {
$original_email = WT_I18N::translate('The following message has been sent to your webtrees user account from ');
$original_email .= $sender->getRealName();
} else {
$original_email = WT_I18N::translate('The following message has been sent to your webtrees user account from ');
if (!empty($message['from_name'])) {
$original_email .= $message['from_name'];
} else {
$original_email .= $message['from'];
}
}
$original_email .= WT_Mail::EOL . WT_Mail::EOL . $message['body'];
$success = $success && WT_Mail::send($WT_TREE, $recipient->getEmail(), $recipient->getRealName(), $sender_email, $sender_real_name, WT_I18N::translate('webtrees message') . ' - ' . $message['subject'], $original_email);
}
WT_I18N::init(WT_LOCALE);
// restore language settings if needed
return $success;
}
<?php
echo WT_I18N::translate('A new version of webtrees is available.');
?>
<a href="admin_site_upgrade.php" class="error">
<?php
echo WT_I18N::translate('Upgrade to webtrees %s', WT_Filter::escapeHtml($latest_version));
?>
</a>
</p>
<?php
}
?>
</div>
<?php
if (Auth::isAdmin() && $old_files) {
?>
<h2><span class="warning"><?php
echo WT_I18N::translate('Old files found');
?>
</span></h2>
<div>
<p>
<?php
echo WT_I18N::translate('Files have been found from a previous version of webtrees. Old files can sometimes be a security risk. You should delete them.');
?>
</p>
<ul>
<?php
foreach ($old_files as $old_file) {
?>
private function fetchFriendList()
{
global $WT_SESSION, $controller;
$controller = new WT_Controller_Page();
$controller->addInlineJavaScript("\n \$('head').append('<link rel=\"stylesheet\" href=\"" . WT_MODULES_DIR . $this->getName() . "/facebook.css?v=" . WT_FACEBOOK_VERSION . "\" />');", WT_Controller_Page::JS_PRIORITY_LOW);
$preApproved = unserialize($this->getSetting('preapproved'));
if (WT_Filter::postArray('preApproved') && WT_Filter::checkCsrf()) {
$roleRows = WT_Filter::postArray('preApproved');
$fbUsernames = WT_Filter::postArray('facebook_username', WT_REGEX_USERNAME);
foreach ($fbUsernames as $facebook_username) {
$facebook_username = $this->cleanseFacebookUsername($facebook_username);
$this->appendPreapproved($preApproved, $facebook_username, $roleRows);
}
$this->setSetting('preapproved', serialize($preApproved));
WT_FlashMessages::addMessage(WT_I18N::translate('Users successfully imported from Facebook'));
header("Location: module.php?mod=" . $this->getName() . "&mod_action=admin");
exit;
}
if (empty($WT_SESSION->facebook_access_token)) {
$this->error_page(WT_I18N::translate("You must <a href='%s'>login to the site via Facebook</a> in order to import friends from Facebook", "index.php?logout=1"));
}
$graph_url = "https://graph.facebook.com/" . self::api_dir . "me/friends?fields=first_name,last_name,name,username&access_token=" . $WT_SESSION->facebook_access_token;
$friendsResponse = $this->fetch_url($graph_url);
if ($friendsResponse === FALSE) {
$this->error_page(WT_I18N::translate("Could not fetch your friends from Facebook. Note that this feature won't work for Facebook Apps created after 2014-04-30 due to a Facebook policy change."));
}
$controller->restrictAccess(\WT\Auth::isAdmin())->setPageTitle($this->getTitle())->pageHeader();
$friends = json_decode($friendsResponse);
if (empty($friends->data)) {
$this->error_page(WT_I18N::translate("No friend data"));
return;
}
function nameSort($a, $b)
{
return strcmp($a->last_name . " " . $a->first_name, $b->last_name . " " . $b->first_name);
}
usort($friends->data, "nameSort");
echo "<form id='facebook_friend_list' method='post' action=''>";
require_once WT_ROOT . 'includes/functions/functions_edit.php';
// for select_edit_control
$index = 0;
foreach (WT_Tree::getAll() as $tree) {
$class = $index++ % 2 ? 'odd' : 'even';
echo "<label>" . $tree->tree_name_html . " - " . WT_I18N::translate('Role') . help_link('role') . ": " . select_edit_control('preApproved[' . $tree->tree_id . '][canedit]', $this->get_edit_options(), NULL, NULL) . "</label>";
}
foreach ($friends->data as $friend) {
$facebook_username = $this->cleanseFacebookUsername(isset($friend->username) ? $friend->username : $friend->id);
// Exclude friends who are already pre-approved or are current users
if (isset($preApproved[$facebook_username]) || $this->get_user_id_from_facebook_username($facebook_username)) {
continue;
}
echo "<label><input name='facebook_username[]' type='checkbox' value='" . $facebook_username . "'/>" . $friend->name . "</label>";
}
echo WT_Filter::getCsrf();
echo "<button>Select Friends</button></form>";
}
function print_indi_form($nextaction, WT_Individual $person = null, WT_Family $family = null, WT_Fact $name_fact = null, $famtag = 'CHIL', $gender = 'U')
{
global $WORD_WRAPPED_NOTES, $NPFX_accept, $SHOW_GEDCOM_RECORD, $bdm, $STANDARD_NAME_FACTS, $ADVANCED_NAME_FACTS;
global $QUICK_REQUIRED_FACTS, $QUICK_REQUIRED_FAMFACTS, $controller;
$SURNAME_TRADITION = get_gedcom_setting(WT_GED_ID, 'SURNAME_TRADITION');
if ($person) {
$xref = $person->getXref();
} elseif ($family) {
$xref = $family->getXref();
} else {
$xref = 'new';
}
$name_fields = array();
if ($name_fact) {
$name_fact_id = $name_fact->getFactId();
$name_type = $name_fact->getAttribute('TYPE');
$namerec = $name_fact->getGedcom();
// Populate the standard NAME field and subfields
foreach ($STANDARD_NAME_FACTS as $tag) {
if ($tag == 'NAME') {
$name_fields[$tag] = $name_fact->getValue();
} else {
$name_fields[$tag] = $name_fact->getAttribute($tag);
}
}
} else {
$name_fact_id = null;
$name_type = null;
$namerec = null;
// Populate the standard NAME field and subfields
foreach ($STANDARD_NAME_FACTS as $tag) {
$name_fields[$tag] = '';
}
}
$bdm = '';
// used to copy '1 SOUR' to '2 SOUR' for BIRT DEAT MARR
echo '<div id="edit_interface-page">';
echo '<h4>', $controller->getPageTitle(), '</h4>';
init_calendar_popup();
echo '<form method="post" name="addchildform" onsubmit="return checkform();">';
echo '<input type="hidden" name="ged" value="', WT_Filter::escapeHtml(WT_GEDCOM), '">';
echo '<input type="hidden" name="action" value="', $nextaction, '">';
echo '<input type="hidden" name="fact_id" value="', $name_fact_id, '">';
echo '<input type="hidden" name="xref" value="', $xref, '">';
echo '<input type="hidden" name="famtag" value="', $famtag, '">';
echo '<input type="hidden" name="gender" value="', $gender, '">';
echo '<input type="hidden" name="goto" value="">';
// set by javascript
echo WT_Filter::getCsrf();
echo '<table class="facts_table">';
switch ($nextaction) {
case 'add_child_to_family_action':
case 'add_child_to_individual_action':
// When adding a new child, specify the pedigree
add_simple_tag('0 PEDI');
break;
case 'update':
// When adding/editing a name, specify the type
add_simple_tag('0 TYPE ' . $name_type, '', '', null, $person);
break;
}
$new_marnm = '';
// Inherit surname from parents, spouse or child
if (!$namerec) {
// We’ll need the parent’s name to set the child’s surname
if ($family) {
$father = $family->getHusband();
if ($father && $father->getFirstFact('NAME')) {
$father_name = $father->getFirstFact('NAME')->getValue();
} else {
$father_name = '';
}
$mother = $family->getWife();
if ($mother && $mother->getFirstFact('NAME')) {
$mother_name = $mother->getFirstFact('NAME')->getValue();
} else {
$mother_name = '';
}
} else {
$father_name = '';
$mother_name = '';
}
// We’ll need the spouse/child’s name to set the spouse/parent’s surname
if ($person && $person->getFirstFact('NAME')) {
$indi_name = $person->getFirstFact('NAME')->getValue();
} else {
$indi_name = '';
}
// Different cultures do surnames differently
switch ($SURNAME_TRADITION) {
case 'spanish':
//Mother: Maria /AAAA BBBB/
//Father: Jose /CCCC DDDD/
//Child: Pablo /CCCC AAAA/
switch ($nextaction) {
case 'add_child_to_family_action':
if (preg_match('/\\/(\\S+) \\S+\\//', $mother_name, $matchm) && preg_match('/\\/(\\S+) \\S+\\//', $father_name, $matchf)) {
$name_fields['SURN'] = $matchf[1] . ' ' . $matchm[1];
$name_fields['NAME'] = '/' . $name_fields['SURN'] . '/';
}
break;
case 'add_parent_to_individual_action':
if ($famtag == 'HUSB' && preg_match('/\\/(\\S+) \\S+\\//', $indi_name, $match)) {
$name_fields['SURN'] = $match[1];
$name_fields['NAME'] = '/' . $name_fields['SURN'] . '/';
}
if ($famtag == 'WIFE' && preg_match('/\\/\\S+ (\\S+)\\//', $indi_name, $match)) {
$name_fields['SURN'] = $match[1];
$name_fields['NAME'] = '/' . $name_fields['SURN'] . '/';
}
break;
case 'add_child_to_individual_action':
case 'add_spouse_to_individual_action':
case 'add_spouse_to_family_action':
break;
}
break;
case 'portuguese':
//Mother: Maria /AAAA BBBB/
//Father: Jose /CCCC DDDD/
//Child: Pablo /BBBB DDDD/
switch ($nextaction) {
case 'add_child_to_family_action':
if (preg_match('/\\/\\S+\\s+(\\S+)\\//', $mother_name, $matchm) && preg_match('/\\/\\S+\\s+(\\S+)\\//', $father_name, $matchf)) {
$name_fields['SURN'] = $matchf[1] . ' ' . $matchm[1];
$name_fields['NAME'] = '/' . $name_fields['SURN'] . '/';
}
break;
case 'add_parent_to_individual_action':
if ($famtag == 'HUSB' && preg_match('/\\/\\S+\\s+(\\S+)\\//', $indi_name, $match)) {
$name_fields['SURN'] = $match[1];
$name_fields['NAME'] = '/' . $name_fields['SURN'] . '/';
}
if ($famtag == 'WIFE' && preg_match('/\\/(\\S+)\\s+\\S+\\//', $indi_name, $match)) {
$name_fields['SURN'] = $match[1];
$name_fields['NAME'] = '/' . $name_fields['SURN'] . '/';
}
break;
case 'add_child_to_individual_action':
case 'add_spouse_to_individual_action':
case 'add_spouse_to_family_action':
break;
}
break;
case 'icelandic':
// Sons get their father’s given name plus “sson”
// Daughters get their father’s given name plus “sdottir”
switch ($nextaction) {
case 'add_child_to_family_action':
if ($gender == 'M' && preg_match('/(\\S+)\\s+\\/.*\\//', $father_name, $match)) {
$name_fields['SURN'] = preg_replace('/s$/', '', $match[1]) . 'sson';
$name_fields['NAME'] = '/' . $name_fields['SURN'] . '/';
}
if ($gender == 'F' && preg_match('/(\\S+)\\s+\\/.*\\//', $father_name, $match)) {
$name_fields['SURN'] = preg_replace('/s$/', '', $match[1]) . 'sdottir';
$name_fields['NAME'] = '/' . $name_fields['SURN'] . '/';
}
break;
case 'add_parent_to_individual_action':
if ($famtag == 'HUSB' && preg_match('/(\\S+)sson\\s+\\/.*\\//i', $indi_name, $match)) {
$name_fields['GIVN'] = $match[1];
$name_fields['NAME'] = $name_fields['GIVN'] . ' //';
}
if ($famtag == 'WIFE' && preg_match('/(\\S+)sdottir\\s+\\/.*\\//i', $indi_name, $match)) {
$name_fields['GIVN'] = $match[1];
$name_fields['NAME'] = $name_fields['GIVN'] . ' //';
}
break;
case 'add_child_to_individual_action':
case 'add_spouse_to_individual_action':
case 'add_spouse_to_family_action':
break;
}
break;
case 'patrilineal':
// Father gives his surname to his children
switch ($nextaction) {
case 'add_child_to_family_action':
if (preg_match('/\\/((?:[a-z]{2,3} )*)(.*)\\//i', $father_name, $match)) {
$name_fields['SURN'] = $match[2];
$name_fields['SPFX'] = trim($match[1]);
$name_fields['NAME'] = "/{$match[1]}{$match[2]}/";
}
break;
case 'add_parent_to_individual_action':
if ($famtag == 'HUSB' && preg_match('/\\/((?:[a-z]{2,3} )*)(.*)\\//i', $indi_name, $match)) {
$name_fields['SURN'] = $match[2];
$name_fields['SPFX'] = trim($match[1]);
$name_fields['NAME'] = "/{$match[1]}{$match[2]}/";
}
break;
case 'add_child_to_individual_action':
case 'add_spouse_to_individual_action':
case 'add_spouse_to_family_action':
break;
}
break;
case 'matrilineal':
// Mother gives her surname to her children
switch ($nextaction) {
case 'add_child_to_family_action':
if (preg_match('/\\/((?:[a-z]{2,3} )*)(.*)\\//i', $mother, $match)) {
$name_fields['SURN'] = $match[2];
$name_fields['SPFX'] = trim($match[1]);
$name_fields['NAME'] = "/{$match[1]}{$match[2]}/";
}
break;
case 'add_parent_to_individual_action':
if ($famtag == 'WIFE' && preg_match('/\\/((?:[a-z]{2,3} )*)(.*)\\//i', $indi_name, $match)) {
$name_fields['SURN'] = $match[2];
$name_fields['SPFX'] = trim($match[1]);
$name_fields['NAME'] = "/{$match[1]}{$match[2]}/";
}
break;
case 'add_child_to_individual_action':
case 'add_spouse_to_individual_action':
case 'add_spouse_to_family_action':
break;
}
break;
case 'paternal':
case 'polish':
case 'lithuanian':
// Father gives his surname to his wife and children
switch ($nextaction) {
case 'add_spouse_to_individual_action':
if ($famtag == 'WIFE' && preg_match('/\\/(.*)\\//', $indi_name, $match)) {
if ($SURNAME_TRADITION == 'polish') {
$match[1] = preg_replace(array('/ski$/', '/cki$/', '/dzki$/', '/żki$/'), array('ska', 'cka', 'dzka', 'żka'), $match[1]);
} elseif ($SURNAME_TRADITION == 'lithuanian') {
$match[1] = preg_replace(array('/as$/', '/is$/', '/ys$/', '/us$/'), array('ienė', 'ienė', 'ienė', 'ienė'), $match[1]);
}
$new_marnm = $match[1];
}
break;
case 'add_child_to_family_action':
if (preg_match('/\\/((?:[a-z]{2,3} )*)(.*)\\//i', $father_name, $match)) {
$name_fields['SURN'] = $match[2];
if ($SURNAME_TRADITION == 'polish' && $gender == 'F') {
$match[2] = preg_replace(array('/ski$/', '/cki$/', '/dzki$/', '/żki$/'), array('ska', 'cka', 'dzka', 'żka'), $match[2]);
} elseif ($SURNAME_TRADITION == 'lithuanian' && $gender == 'F') {
$match[2] = preg_replace(array('/as$/', '/a$/', '/is$/', '/ys$/', '/ius$/', '/us$/'), array('aitė', 'aitė', 'ytė', 'ytė', 'iūtė', 'utė'), $match[2]);
}
$name_fields['SPFX'] = trim($match[1]);
$name_fields['NAME'] = "/{$match[1]}{$match[2]}/";
}
break;
case 'add_child_to_individual_action':
if ($person->getSex() == 'M' && preg_match('/\\/((?:[a-z]{2,3} )*)(.*)\\//i', $indi_name, $match)) {
$name_fields['SURN'] = $match[2];
if ($SURNAME_TRADITION == 'polish' && $gender == 'F') {
$match[2] = preg_replace(array('/ski$/', '/cki$/', '/dzki$/', '/żki$/'), array('ska', 'cka', 'dzka', 'żka'), $match[2]);
} elseif ($SURNAME_TRADITION == 'lithuanian' && $gender == 'F') {
$match[2] = preg_replace(array('/as$/', '/a$/', '/is$/', '/ys$/', '/ius$/', '/us$/'), array('aitė', 'aitė', 'ytė', 'ytė', 'iūtė', 'utė'), $match[2]);
}
$name_fields['SPFX'] = trim($match[1]);
$name_fields['NAME'] = "/{$match[1]}{$match[2]}/";
}
break;
case 'add_parent_to_individual_action':
if ($famtag == 'HUSB' && preg_match('/\\/((?:[a-z]{2,3} )*)(.*)\\//i', $indi_name, $match)) {
if ($SURNAME_TRADITION == 'polish' && $gender == 'M') {
$match[2] = preg_replace(array('/ska$/', '/cka$/', '/dzka$/', '/żka$/'), array('ski', 'cki', 'dzki', 'żki'), $match[2]);
} elseif ($SURNAME_TRADITION == 'lithuanian') {
// not a complete list as the rules are somewhat complicated but will do 95% correctly
$match[2] = preg_replace(array('/aitė$/', '/ytė$/', '/iūtė$/', '/utė$/'), array('as', 'is', 'ius', 'us'), $match[2]);
}
$name_fields['SPFX'] = trim($match[1]);
$name_fields['SURN'] = $match[2];
$name_fields['NAME'] = "/{$match[1]}{$match[2]}/";
}
if ($famtag == 'WIFE' && preg_match('/\\/((?:[a-z]{2,3} )*)(.*)\\//i', $indi_name, $match)) {
if ($SURNAME_TRADITION == 'lithuanian') {
$match[2] = preg_replace(array('/as$/', '/is$/', '/ys$/', '/us$/'), array('ienė', 'ienė', 'ienė', 'ienė'), $match[2]);
$match[2] = preg_replace(array('/aitė$/', '/ytė$/', '/iūtė$/', '/utė$/'), array('ienė', 'ienė', 'ienė', 'ienė'), $match[2]);
}
$new_marnm = $match[2];
}
break;
case 'add_spouse_to_family_action':
break;
}
break;
}
}
// Initialise an empty name field
if (empty($name_fields['NAME'])) {
$name_fields['NAME'] = '//';
}
// Populate any missing 2 XXXX fields from the 1 NAME field
$npfx_accept = implode('|', $NPFX_accept);
if (preg_match("/((({$npfx_accept})\\.? +)*)([^\n\\/\"]*)(\"(.*)\")? *\\/(([a-z]{2,3} +)*)(.*)\\/ *(.*)/i", $name_fields['NAME'], $name_bits)) {
if (empty($name_fields['NPFX'])) {
$name_fields['NPFX'] = $name_bits[1];
}
if (empty($name_fields['SPFX']) && empty($name_fields['SURN'])) {
$name_fields['SPFX'] = trim($name_bits[7]);
// For names with two surnames, there will be four slashes.
// Turn them into a list
$name_fields['SURN'] = preg_replace('~/[^/]*/~', ',', $name_bits[9]);
}
if (empty($name_fields['GIVN'])) {
$name_fields['GIVN'] = $name_bits[4];
}
// Don’t automatically create an empty NICK - it is an “advanced” field.
if (empty($name_fields['NICK']) && !empty($name_bits[6]) && !preg_match('/^2 NICK/m', $namerec)) {
$name_fields['NICK'] = $name_bits[6];
}
}
// Edit the standard name fields
foreach ($name_fields as $tag => $value) {
add_simple_tag("0 {$tag} {$value}");
}
// Get the advanced name fields
$adv_name_fields = array();
if (preg_match_all('/(' . WT_REGEX_TAG . ')/', $ADVANCED_NAME_FACTS, $match)) {
foreach ($match[1] as $tag) {
$adv_name_fields[$tag] = '';
}
}
// This is a custom tag, but webtrees uses it extensively.
if ($SURNAME_TRADITION == 'paternal' || $SURNAME_TRADITION == 'polish' || $SURNAME_TRADITION == 'lithuanian' || strpos($namerec, '2 _MARNM') !== false) {
$adv_name_fields['_MARNM'] = '';
}
if (isset($adv_name_fields['TYPE'])) {
unset($adv_name_fields['TYPE']);
}
foreach ($adv_name_fields as $tag => $dummy) {
// Edit existing tags
if (preg_match_all("/2 {$tag} (.+)/", $namerec, $match)) {
foreach ($match[1] as $value) {
if ($tag == '_MARNM') {
$mnsct = preg_match('/\\/(.+)\\//', $value, $match2);
$marnm_surn = '';
if ($mnsct > 0) {
$marnm_surn = $match2[1];
}
add_simple_tag("2 _MARNM " . $value);
add_simple_tag("2 _MARNM_SURN " . $marnm_surn);
} else {
add_simple_tag("2 {$tag} {$value}", '', WT_Gedcom_Tag::getLabel("NAME:{$tag}", $person));
}
}
}
// Allow a new row to be entered if there was no row provided
if (count($match[1]) == 0 && empty($name_fields[$tag]) || $tag != '_HEB' && $tag != 'NICK') {
if ($tag == '_MARNM') {
if (strstr($ADVANCED_NAME_FACTS, '_MARNM') == false) {
add_simple_tag("0 _MARNM");
add_simple_tag("0 _MARNM_SURN {$new_marnm}");
}
} else {
add_simple_tag("0 {$tag}", '', WT_Gedcom_Tag::getLabel("NAME:{$tag}", $person));
}
}
}
// Handle any other NAME subfields that aren’t included above (SOUR, NOTE, _CUSTOM, etc)
if ($namerec) {
$gedlines = explode("\n", $namerec);
// -- find the number of lines in the record
$fields = explode(' ', $gedlines[0]);
$glevel = $fields[0];
$level = $glevel;
$type = trim($fields[1]);
$tags = array();
$i = 0;
do {
if ($type != 'TYPE' && !isset($name_fields[$type]) && !isset($adv_name_fields[$type])) {
$text = '';
for ($j = 2; $j < count($fields); $j++) {
if ($j > 2) {
$text .= ' ';
}
$text .= $fields[$j];
}
while ($i + 1 < count($gedlines) && preg_match("/" . ($level + 1) . " (CON[CT]) ?(.*)/", $gedlines[$i + 1], $cmatch) > 0) {
if ($cmatch[1] == "CONT") {
$text .= "\n";
}
if ($WORD_WRAPPED_NOTES) {
$text .= ' ';
}
$text .= $cmatch[2];
$i++;
}
add_simple_tag($level . ' ' . $type . ' ' . $text);
}
$tags[] = $type;
$i++;
if (isset($gedlines[$i])) {
$fields = explode(' ', $gedlines[$i]);
$level = $fields[0];
if (isset($fields[1])) {
$type = $fields[1];
}
}
} while ($level > $glevel && $i < count($gedlines));
}
// If we are adding a new individual, add the basic details
if ($nextaction != 'update') {
echo '</table><br><table class="facts_table">';
// 1 SEX
if ($famtag == "HUSB" || $gender == "M") {
add_simple_tag("0 SEX M");
} elseif ($famtag == "WIFE" || $gender == "F") {
add_simple_tag("0 SEX F");
} else {
add_simple_tag("0 SEX");
}
$bdm = "BD";
if (preg_match_all('/(' . WT_REGEX_TAG . ')/', $QUICK_REQUIRED_FACTS, $matches)) {
foreach ($matches[1] as $match) {
if (!in_array($match, explode('|', WT_EVENTS_DEAT))) {
addSimpleTags($match);
}
}
}
//-- if adding a spouse add the option to add a marriage fact to the new family
if ($nextaction == 'add_spouse_to_individual_action' || $nextaction == 'add_spouse_to_family_action') {
$bdm .= "M";
if (preg_match_all('/(' . WT_REGEX_TAG . ')/', $QUICK_REQUIRED_FAMFACTS, $matches)) {
foreach ($matches[1] as $match) {
addSimpleTags($match);
}
}
}
if (preg_match_all('/(' . WT_REGEX_TAG . ')/', $QUICK_REQUIRED_FACTS, $matches)) {
foreach ($matches[1] as $match) {
if (in_array($match, explode('|', WT_EVENTS_DEAT))) {
addSimpleTags($match);
}
}
}
}
echo keep_chan($person);
echo "</table>";
if ($nextaction == 'update') {
// GEDCOM 5.5.1 spec says NAME doesn’t get a OBJE
print_add_layer('SOUR');
print_add_layer('NOTE');
print_add_layer('SHARED_NOTE');
} else {
print_add_layer('SOUR', 1);
print_add_layer('OBJE', 1);
print_add_layer('NOTE', 1);
print_add_layer('SHARED_NOTE', 1);
}
// If we are editing an existing name, allow raw GEDCOM editing
if ($name_fact && (Auth::isAdmin() || $SHOW_GEDCOM_RECORD)) {
echo '<br><br><a href="edit_interface.php?action=editrawfact&xref=', $xref, '&fact_id=', $name_fact->getFactId(), '&ged=', WT_GEDURL, '">', WT_I18N::translate('Edit raw GEDCOM'), '</a>';
}
echo '<p id="save-cancel">';
echo '<input type="submit" class="save" value="', WT_I18N::translate('save'), '">';
if (preg_match('/^add_(child|spouse|parent|unlinked_indi)/', $nextaction)) {
echo '<input type="submit" class="save" value="', WT_I18N::translate('go to new individual'), '" onclick="document.addchildform.goto.value=\'new\';">';
}
echo '<input type="button" class="cancel" value="', WT_I18N::translate('close'), '" onclick="window.close();">';
echo '</p>';
echo '</form>';
$controller->addInlineJavascript('
SURNAME_TRADITION="' . $SURNAME_TRADITION . '";
gender="' . $gender . '";
famtag="' . $famtag . '";
function trim(str) {
str=str.replace(/\\s\\s+/g, " ");
return str.replace(/(^\\s+)|(\\s+$)/g, "");
}
function lang_class(str) {
if (str.match(/[\\u0370-\\u03FF]/)) return "greek";
if (str.match(/[\\u0400-\\u04FF]/)) return "cyrillic";
if (str.match(/[\\u0590-\\u05FF]/)) return "hebrew";
if (str.match(/[\\u0600-\\u06FF]/)) return "arabic";
return "latin"; // No matched text implies latin :-)
}
// Generate a full name from the name components
function generate_name() {
var frm =document.forms[0];
var npfx=frm.NPFX.value;
var givn=frm.GIVN.value;
var spfx=frm.SPFX.value;
var surn=frm.SURN.value;
var nsfx=frm.NSFX.value;
if (SURNAME_TRADITION=="polish" && (gender=="F" || famtag=="WIFE")) {
surn=surn.replace(/ski$/, "ska");
surn=surn.replace(/cki$/, "cka");
surn=surn.replace(/dzki$/, "dzka");
surn=surn.replace(/żki$/, "żka");
}
// Commas are used in the GIVN and SURN field to separate lists of surnames.
// For example, to differentiate the two Spanish surnames from an English
// double-barred name.
// Commas *may* be used in other fields, and will form part of the NAME.
if (WT_LOCALE=="vi" || WT_LOCALE=="hu") {
// Default format: /SURN/ GIVN
return trim(npfx+" /"+trim(spfx+" "+surn).replace(/ *, */g, " ")+"/ "+givn.replace(/ *, */g, " ")+" "+nsfx);
} else if (WT_LOCALE=="zh") {
// Default format: /SURN/GIVN
return trim(npfx+" /"+trim(spfx+" "+surn).replace(/ *, */g, " ")+"/"+givn.replace(/ *, */g, " ")+" "+nsfx);
} else {
// Default format: GIVN /SURN/
return trim(npfx+" "+givn.replace(/ *, */g, " ")+" /"+trim(spfx+" "+surn).replace(/ *, */g, " ")+"/ "+nsfx);
}
}
// Update the NAME and _MARNM fields from the name components
// and also display the value in read-only "gedcom" format.
function updatewholename() {
// don’t update the name if the user manually changed it
if (manualChange) return;
// Update NAME field from components and display it
var frm =document.forms[0];
var npfx=frm.NPFX.value;
var givn=frm.GIVN.value;
var spfx=frm.SPFX.value;
var surn=frm.SURN.value;
var nsfx=frm.NSFX.value;
document.getElementById("NAME").value=generate_name();
document.getElementById("NAME_display").innerText=frm.NAME.value;
// Married names inherit some NSFX values, but not these
nsfx=nsfx.replace(/^(I|II|III|IV|V|VI|Junior|Jr\\.?|Senior|Sr\\.?)$/i, "");
// Update _MARNM field from _MARNM_SURN field and display it
// Be careful of mixing latin/hebrew/etc. character sets.
var ip=document.getElementsByTagName("input");
var marnm_id="";
var romn="";
var heb="";
for (var i=0; i<ip.length; i++) {
var val=ip[i].value;
if (ip[i].id.indexOf("_HEB")==0)
heb=val;
if (ip[i].id.indexOf("ROMN")==0)
romn=val;
if (ip[i].id.indexOf("_MARNM")==0) {
if (ip[i].id.indexOf("_MARNM_SURN")==0) {
var msurn="";
if (val!="") {
var lc=lang_class(document.getElementById(ip[i].id).value);
if (lang_class(frm.NAME.value)==lc)
msurn=trim(npfx+" "+givn+" /"+val+"/ "+nsfx);
else if (lc=="hebrew")
msurn=heb.replace(/\\/.*\\//, "/"+val+"/");
else if (lang_class(romn)==lc)
msurn=romn.replace(/\\/.*\\//, "/"+val+"/");
}
document.getElementById(marnm_id).value=msurn;
document.getElementById(marnm_id+"_display").innerHTML=msurn;
} else {
marnm_id=ip[i].id;
}
}
}
}
// Toggle the name editor fields between
// <input type="hidden"> <span style="display:inline">
// <input type="text"> <span style="display:hidden">
var oldName = "";
var manualChange = false;
function convertHidden(eid) {
var input1 = jQuery("#" + eid);
var input2 = jQuery("#" + eid + "_display");
// Note that IE does not allow us to change the type of an input, so we must create a new one.
if (input1.attr("type")=="hidden") {
input1.replaceWith(input1.clone().attr("type", "text"));
input2.hide();
} else {
input1.replaceWith(input1.clone().attr("type", "hidden"));
input2.show();
}
}
/**
* if the user manually changed the NAME field, then update the textual
* HTML representation of it
* If the value changed set manualChange to true so that changing
* the other fields doesn’t change the NAME line
*/
function updateTextName(eid) {
var element = document.getElementById(eid);
if (element) {
if (element.value!=oldName) manualChange = true;
var delement = document.getElementById(eid+"_display");
if (delement) {
delement.innerHTML = element.value;
}
}
}
function checkform() {
var ip=document.getElementsByTagName("input");
for (var i=0; i<ip.length; i++) {
// ADD slashes to _HEB and _AKA names
if (ip[i].id.indexOf("_AKA")==0 || ip[i].id.indexOf("_HEB")==0 || ip[i].id.indexOf("ROMN")==0)
if (ip[i].value.indexOf("/")<0 && ip[i].value!="")
ip[i].value=ip[i].value.replace(/([^\\s]+)\\s*$/, "/$1/");
// Blank out temporary _MARNM_SURN
if (ip[i].id.indexOf("_MARNM_SURN")==0)
ip[i].value="";
// Convert "xxx yyy" and "xxx y yyy" surnames to "xxx,yyy"
if ((SURNAME_TRADITION=="spanish" || "SURNAME_TRADITION"=="portuguese") && ip[i].id.indexOf("SURN")==0) {
ip[i].value=document.forms[0].SURN.value.replace(/^\\s*([^\\s,]{2,})\\s+([iIyY] +)?([^\\s,]{2,})\\s*$/, "$1,$3");
}
}
return true;
}
// If the name isn’t initially formed from the components in a standard way,
// then don’t automatically update it.
if (document.getElementById("NAME").value!=generate_name() && document.getElementById("NAME").value!="//") {
convertHidden("NAME");
}
');
echo '</div>';
}
jQuery("#log_list").dataTable( {
"dom": \'<"H"pf<"dt-clear">irl>t<"F"pl>\',
"processing": true,
"serverSide": true,
"ajax": "' . WT_SERVER_NAME . WT_SCRIPT_PATH . WT_SCRIPT_NAME . '?action=load_json&from=' . $from . '&to=' . $to . '&type=' . $type . '&oldged=' . rawurlencode($oldged) . '&newged=' . rawurlencode($newged) . '&xref=' . rawurlencode($xref) . '&user='******'&gedc=' . rawurlencode($gedc) . '",
' . WT_I18N::datatablesI18N(array(10, 20, 50, 100, 500, 1000, -1)) . ',
jQueryUI: true,
autoWidth: false,
sorting: [[ 0, "desc" ]],
pageLength: ' . Auth::user()->getSetting('admin_site_change_page_size', 10) . ',
pagingType: "full_numbers",
columns: [
/* Timestamp */ { },
/* Status */ { },
/* Record */ { },
/* Old data */ { class: "raw_gedcom", sortable: false },
/* New data */ { class: "raw_gedcom", sortable: false },
/* User */ { },
/* Family tree */ { }
]
});
');
$url = WT_SCRIPT_NAME . '?from=' . rawurlencode($from) . '&to=' . rawurlencode($to) . '&type=' . rawurlencode($type) . '&oldged=' . rawurlencode($oldged) . '&newged=' . rawurlencode($newged) . '&xref=' . rawurlencode($xref) . '&user='******'&gedc=' . rawurlencode($gedc);
$users_array = array();
foreach (User::all() as $tmp_user) {
$users_array[$tmp_user->getUserName()] = $tmp_user->getUserName();
}
echo '<form name="changes" method="get" action="' . WT_SCRIPT_NAME . '">', '<input type="hidden" name="action", value="show">', '<table class="site_change">', '<tr>', '<td colspan="6">', WT_I18N::translate('From %s to %s', '<input class="log-date" name="from" value="' . WT_Filter::escapeHtml($from) . '">', '<input class="log-date" name="to" value="' . WT_Filter::escapeHtml($to) . '">'), '</td>', '</tr><tr>', '<td>', WT_I18N::translate('Status'), '<br>', select_edit_control('type', $statuses, null, $type, ''), '</td>', '<td>', WT_I18N::translate('Record'), '<br><input class="log-filter" name="xref" value="', WT_Filter::escapeHtml($xref), '"> ', '</td>', '<td>', WT_I18N::translate('Old data'), '<br><input class="log-filter" name="oldged" value="', WT_Filter::escapeHtml($oldged), '"> ', '</td>', '<td>', WT_I18N::translate('New data'), '<br><input class="log-filter" name="newged" value="', WT_Filter::escapeHtml($newged), '"> ', '</td>', '<td>', WT_I18N::translate('User'), '<br>', select_edit_control('user', $users_array, '', $user, ''), '</td>', '<td>', WT_I18N::translate('Family tree'), '<br>', select_edit_control('gedc', WT_Tree::getNameList(), '', $gedc, Auth::isAdmin() ? '' : 'disabled'), '</td>', '</tr><tr>', '<td colspan="6">', '<input type="submit" value="', WT_I18N::translate('Filter'), '">', '<input type="submit" value="', WT_I18N::translate('Export'), '" onclick="document.changes.action.value=\'export\';return true;" ', $action == 'show' ? '' : 'disabled="disabled"', '>', '<input type="submit" value="', WT_I18N::translate('Delete'), '" onclick="if (confirm(\'', WT_Filter::escapeHtml(WT_I18N::translate('Permanently delete these records?')), '\')) {document.changes.action.value=\'delete\';return true;} else {return false;}" ', $action == 'show' ? '' : 'disabled="disabled"', '>', '</td>', '</tr>', '</table>', '</form>';
if ($action) {
echo '<br>', '<table id="log_list">', '<thead>', '<tr>', '<th>', WT_I18N::translate('Timestamp'), '</th>', '<th>', WT_I18N::translate('Status'), '</th>', '<th>', WT_I18N::translate('Record'), '</th>', '<th>', WT_I18N::translate('Old data'), '</th>', '<th>', WT_I18N::translate('New data'), '</th>', '<th>', WT_I18N::translate('User'), '</th>', '<th>', WT_I18N::translate('Family tree'), '</th>', '</tr>', '</thead>', '<tbody>', '</tbody>', '</table>';
}
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
use WT\Auth;
define('WT_SCRIPT_NAME', 'admin_site_config.php');
require './includes/session.php';
require WT_ROOT . 'includes/functions/functions_edit.php';
$controller = new WT_Controller_Page();
$controller->restrictAccess(Auth::isAdmin())->addExternalJavascript(WT_JQUERY_JEDITABLE_URL)->addInlineJavascript('jQuery("#tabs").tabs();')->setPageTitle(WT_I18N::translate('Site configuration'))->pageHeader();
// Lists of options for <select> controls.
$SMTP_SSL_OPTIONS = array('none' => WT_I18N::translate('none'), 'ssl' => WT_I18N::translate('ssl'), 'tls' => WT_I18N::translate('tls'));
$SMTP_ACTIVE_OPTIONS = array('internal' => WT_I18N::translate('Use PHP mail to send messages'), 'external' => WT_I18N::translate('Use SMTP to send messages'));
$WELCOME_TEXT_AUTH_MODE_OPTIONS = array(0 => WT_I18N::translate('No predefined text'), 1 => WT_I18N::translate('Predefined text that states all users can request a user account'), 2 => WT_I18N::translate('Predefined text that states admin will decide on each request for a user account'), 3 => WT_I18N::translate('Predefined text that states only family members can request a user account'), 4 => WT_I18N::translate('Choose user defined welcome text typed below'));
?>
<div id="site-config">
<div id="tabs">
<ul>
<li>
<a href="#site"><span><?php
echo WT_I18N::translate('Site configuration');
?>
</span></a>
</li>
<li>
static function _usersLoggedInTotal($type = 'all')
{
$anon = 0;
$visible = 0;
foreach (User::allLoggedIn() as $user) {
if (Auth::isAdmin() || $user->getSetting('visibleonline')) {
$visible++;
} else {
$anon++;
}
}
if ($type == 'anon') {
return $anon;
} elseif ($type == 'visible') {
return $visible;
} else {
return $visible + $anon;
}
}
private function adminPlaces()
{
require WT_ROOT . 'includes/functions/functions_edit.php';
$action = WT_Filter::get('action');
$parent = WT_Filter::get('parent');
$inactive = WT_Filter::getBool('inactive');
$deleteRecord = WT_Filter::get('deleteRecord');
if (!isset($parent)) {
$parent = 0;
}
$controller = new WT_Controller_Page();
$controller->restrictAccess(Auth::isAdmin());
if ($action == 'ExportFile' && Auth::isAdmin()) {
Zend_Session::writeClose();
$tmp = $this->placeIdToHierarchy($parent);
$maxLevel = $this->getHighestLevel();
if ($maxLevel > 8) {
$maxLevel = 8;
}
$tmp[0] = 'places';
$outputFileName = preg_replace('/[:;\\/\\\\(\\)\\{\\}\\[\\] $]/', '_', implode('-', $tmp)) . '.csv';
header('Content-Type: application/octet-stream');
header('Content-Disposition: attachment; filename="' . $outputFileName . '"');
echo '"', WT_I18N::translate('Level'), '";"', WT_I18N::translate('Country'), '";';
if ($maxLevel > 0) {
echo '"', WT_I18N::translate('State'), '";';
}
if ($maxLevel > 1) {
echo '"', WT_I18N::translate('County'), '";';
}
if ($maxLevel > 2) {
echo '"', WT_I18N::translate('City'), '";';
}
if ($maxLevel > 3) {
echo '"', WT_I18N::translate('Place'), '";';
}
if ($maxLevel > 4) {
echo '"', WT_I18N::translate('Place'), '";';
}
if ($maxLevel > 5) {
echo '"', WT_I18N::translate('Place'), '";';
}
if ($maxLevel > 6) {
echo '"', WT_I18N::translate('Place'), '";';
}
if ($maxLevel > 7) {
echo '"', WT_I18N::translate('Place'), '";';
}
echo '"', WT_I18N::translate('Longitude'), '";"', WT_I18N::translate('Latitude'), '";';
echo '"', WT_I18N::translate('Zoom level'), '";"', WT_I18N::translate('Icon'), '";', WT_EOL;
$this->outputLevel($parent);
exit;
}
$controller->setPageTitle(WT_I18N::translate('Google Maps™'))->pageHeader();
?>
<table id="gm_config">
<tr>
<th>
<a href="module.php?mod=googlemap&mod_action=admin_config">
<?php
echo WT_I18N::translate('Google Maps™ preferences');
?>
</a>
</th>
<th>
<a class="current" href="module.php?mod=googlemap&mod_action=admin_places">
<?php
echo WT_I18N::translate('Geographic data');
?>
</a>
</th>
<th>
<a href="module.php?mod=googlemap&mod_action=admin_placecheck">
<?php
echo WT_I18N::translate('Place check');
?>
</a>
</th>
</tr>
</table>
<?php
if ($action == 'ImportGedcom') {
$placelist = array();
$j = 0;
$gedcom_records = WT_DB::prepare("SELECT i_gedcom FROM `##individuals` WHERE i_file=? UNION ALL SELECT f_gedcom FROM `##families` WHERE f_file=?")->execute(array(WT_GED_ID, WT_GED_ID))->fetchOneColumn();
foreach ($gedcom_records as $gedrec) {
$i = 1;
$placerec = get_sub_record(2, '2 PLAC', $gedrec, $i);
while (!empty($placerec)) {
if (preg_match("/2 PLAC (.+)/", $placerec, $match)) {
$placelist[$j] = array();
$placelist[$j]['place'] = trim($match[1]);
if (preg_match("/4 LATI (.*)/", $placerec, $match)) {
$placelist[$j]['lati'] = trim($match[1]);
if ($placelist[$j]['lati'][0] != 'N' && $placelist[$j]['lati'][0] != 'S') {
if ($placelist[$j]['lati'] < 0) {
$placelist[$j]['lati'][0] = 'S';
} else {
$placelist[$j]['lati'] = 'N' . $placelist[$j]['lati'];
}
}
} else {
$placelist[$j]['lati'] = NULL;
}
if (preg_match("/4 LONG (.*)/", $placerec, $match)) {
$placelist[$j]['long'] = trim($match[1]);
if ($placelist[$j]['long'][0] != 'E' && $placelist[$j]['long'][0] != 'W') {
if ($placelist[$j]['long'] < 0) {
$placelist[$j]['long'][0] = 'W';
} else {
$placelist[$j]['long'] = 'E' . $placelist[$j]['long'];
}
}
} else {
$placelist[$j]['long'] = NULL;
}
$j = $j + 1;
}
$i = $i + 1;
$placerec = get_sub_record(2, '2 PLAC', $gedrec, $i);
}
}
asort($placelist);
$prevPlace = '';
$prevLati = '';
$prevLong = '';
$placelistUniq = array();
$j = 0;
foreach ($placelist as $k => $place) {
if ($place['place'] != $prevPlace) {
$placelistUniq[$j] = array();
$placelistUniq[$j]['place'] = $place['place'];
$placelistUniq[$j]['lati'] = $place['lati'];
$placelistUniq[$j]['long'] = $place['long'];
$j = $j + 1;
} elseif ($place['place'] == $prevPlace && ($place['lati'] != $prevLati || $place['long'] != $prevLong)) {
if ($placelistUniq[$j - 1]['lati'] == 0 || $placelistUniq[$j - 1]['long'] == 0) {
$placelistUniq[$j - 1]['lati'] = $place['lati'];
$placelistUniq[$j - 1]['long'] = $place['long'];
} elseif ($place['lati'] != '0' || $place['long'] != '0') {
echo 'Difference: previous value = ', $prevPlace, ', ', $prevLati, ', ', $prevLong, ' current = ', $place['place'], ', ', $place['lati'], ', ', $place['long'], '<br>';
}
}
$prevPlace = $place['place'];
$prevLati = $place['lati'];
$prevLong = $place['long'];
}
$highestIndex = $this->getHighestIndex();
$default_zoom_level = array(4, 7, 10, 12);
foreach ($placelistUniq as $k => $place) {
$parent = preg_split('/ *, */', $place['place']);
$parent = array_reverse($parent);
$parent_id = 0;
for ($i = 0; $i < count($parent); $i++) {
if (!isset($default_zoom_level[$i])) {
$default_zoom_level[$i] = $default_zoom_level[$i - 1];
}
$escparent = $parent[$i];
if ($escparent == '') {
$escparent = 'Unknown';
}
$row = WT_DB::prepare("SELECT pl_id, pl_long, pl_lati, pl_zoom FROM `##placelocation` WHERE pl_level=? AND pl_parent_id=? AND pl_place LIKE ?")->execute(array($i, $parent_id, $escparent))->fetchOneRow();
if ($i < count($parent) - 1) {
// Create higher-level places, if necessary
if (empty($row)) {
$highestIndex++;
WT_DB::prepare("INSERT INTO `##placelocation` (pl_id, pl_parent_id, pl_level, pl_place, pl_zoom) VALUES (?, ?, ?, ?, ?)")->execute(array($highestIndex, $parent_id, $i, $escparent, $default_zoom_level[$i]));
echo WT_Filter::escapeHtml($escparent), '<br>';
$parent_id = $highestIndex;
} else {
$parent_id = $row->pl_id;
}
} else {
// Create lowest-level place, if necessary
if (empty($row->pl_id)) {
$highestIndex++;
WT_DB::prepare("INSERT INTO `##placelocation` (pl_id, pl_parent_id, pl_level, pl_place, pl_long, pl_lati, pl_zoom) VALUES (?, ?, ?, ?, ?, ?, ?)")->execute(array($highestIndex, $parent_id, $i, $escparent, $place['long'], $place['lati'], $default_zoom_level[$i]));
echo WT_Filter::escapeHtml($escparent), '<br>';
} else {
if (empty($row->pl_long) && empty($row->pl_lati) && $place['lati'] != '0' && $place['long'] != '0') {
WT_DB::prepare("UPDATE `##placelocation` SET pl_lati=?, pl_long=? WHERE pl_id=?")->execute(array($place['lati'], $place['long'], $row->pl_id));
echo WT_Filter::escapeHtml($escparent), '<br>';
}
}
}
}
}
$parent = 0;
}
if ($action == 'ImportFile') {
$placefiles = array();
$this->findFiles(WT_MODULES_DIR . 'googlemap/extra');
sort($placefiles);
?>
<form method="post" enctype="multipart/form-data" id="importfile" name="importfile" action="module.php?mod=googlemap&mod_action=admin_places&action=ImportFile2">
<table class="gm_plac_edit">
<tr>
<th><?php
echo WT_I18N::translate('File containing places (CSV)');
?>
</th>
<td><input type="file" name="placesfile" size="50"></td>
</tr>
<?php
if (count($placefiles) > 0) {
?>
<tr>
<th><?php
echo WT_I18N::translate('Server file containing places (CSV)'), help_link('PLIF_LOCALFILE', 'googlemap');
?>
</th>
<td>
<select name="localfile">
<option></option>
<?php
foreach ($placefiles as $p => $placefile) {
?>
<option value="<?php
echo WT_Filter::escapeHtml($placefile);
?>
"><?php
if (substr($placefile, 0, 1) == "/") {
echo substr($placefile, 1);
} else {
echo $placefile;
}
?>
</option>
<?php
}
?>
</select>
</td>
</tr>
<?php
}
?>
<tr>
<th><?php
echo WT_I18N::translate('Delete all existing geographic data before importing the file.');
?>
</th>
<td><input type="checkbox" name="cleardatabase"></td>
</tr>
<tr>
<th><?php
echo WT_I18N::translate('Do not create new locations, just import coordinates for existing locations.');
?>
</th>
<td><input type="checkbox" name="updateonly"></td>
</tr>
<tr>
<th><?php
echo WT_I18N::translate('Overwrite existing coordinates.');
?>
</th>
<td><input type="checkbox" name="overwritedata"></td>
</tr>
</table>
<input id="savebutton" type="submit" value="<?php
echo WT_I18N::translate('Continue adding');
?>
"><br>
</form>
<?php
exit;
}
if ($action == 'ImportFile2') {
$country_names = array();
foreach (WT_Stats::iso3166() as $key => $value) {
$country_names[$key] = WT_I18N::translate($key);
}
if (isset($_POST['cleardatabase'])) {
WT_DB::exec("DELETE FROM `##placelocation` WHERE 1=1");
}
if (!empty($_FILES['placesfile']['tmp_name'])) {
$lines = file($_FILES['placesfile']['tmp_name']);
} elseif (!empty($_REQUEST['localfile'])) {
$lines = file(WT_MODULES_DIR . 'googlemap/extra' . $_REQUEST['localfile']);
}
// Strip BYTE-ORDER-MARK, if present
if (!empty($lines[0]) && substr($lines[0], 0, 3) == WT_UTF8_BOM) {
$lines[0] = substr($lines[0], 3);
}
asort($lines);
$highestIndex = $this->getHighestIndex();
$placelist = array();
$j = 0;
$maxLevel = 0;
foreach ($lines as $p => $placerec) {
$fieldrec = explode(';', $placerec);
if ($fieldrec[0] > $maxLevel) {
$maxLevel = $fieldrec[0];
}
}
$fields = count($fieldrec);
$set_icon = true;
if (!is_dir(WT_MODULES_DIR . 'googlemap/places/flags/')) {
$set_icon = false;
}
foreach ($lines as $p => $placerec) {
$fieldrec = explode(';', $placerec);
if (is_numeric($fieldrec[0]) && $fieldrec[0] <= $maxLevel) {
$placelist[$j] = array();
$placelist[$j]['place'] = '';
for ($ii = $fields - 4; $ii > 1; $ii--) {
if ($fieldrec[0] > $ii - 2) {
$placelist[$j]['place'] .= $fieldrec[$ii] . ',';
}
}
foreach ($country_names as $countrycode => $countryname) {
if ($countrycode == strtoupper($fieldrec[1])) {
$fieldrec[1] = $countryname;
break;
}
}
$placelist[$j]['place'] .= $fieldrec[1];
$placelist[$j]['long'] = $fieldrec[$fields - 4];
$placelist[$j]['lati'] = $fieldrec[$fields - 3];
$placelist[$j]['zoom'] = $fieldrec[$fields - 2];
if ($set_icon) {
$placelist[$j]['icon'] = trim($fieldrec[$fields - 1]);
} else {
$placelist[$j]['icon'] = '';
}
$j = $j + 1;
}
}
$prevPlace = '';
$prevLati = '';
$prevLong = '';
$placelistUniq = array();
$j = 0;
foreach ($placelist as $k => $place) {
if ($place['place'] != $prevPlace) {
$placelistUniq[$j] = array();
$placelistUniq[$j]['place'] = $place['place'];
$placelistUniq[$j]['lati'] = $place['lati'];
$placelistUniq[$j]['long'] = $place['long'];
$placelistUniq[$j]['zoom'] = $place['zoom'];
$placelistUniq[$j]['icon'] = $place['icon'];
$j = $j + 1;
} elseif ($place['place'] == $prevPlace && ($place['lati'] != $prevLati || $place['long'] != $prevLong)) {
if ($placelistUniq[$j - 1]['lati'] == 0 || $placelistUniq[$j - 1]['long'] == 0) {
$placelistUniq[$j - 1]['lati'] = $place['lati'];
$placelistUniq[$j - 1]['long'] = $place['long'];
$placelistUniq[$j - 1]['zoom'] = $place['zoom'];
$placelistUniq[$j - 1]['icon'] = $place['icon'];
} elseif ($place['lati'] != '0' || $place['long'] != '0') {
echo 'Difference: previous value = ', $prevPlace, ', ', $prevLati, ', ', $prevLong, ' current = ', $place['place'], ', ', $place['lati'], ', ', $place['long'], '<br>';
}
}
$prevPlace = $place['place'];
$prevLati = $place['lati'];
$prevLong = $place['long'];
}
$default_zoom_level = array();
$default_zoom_level[0] = 4;
$default_zoom_level[1] = 7;
$default_zoom_level[2] = 10;
$default_zoom_level[3] = 12;
foreach ($placelistUniq as $k => $place) {
$parent = explode(',', $place['place']);
$parent = array_reverse($parent);
$parent_id = 0;
for ($i = 0; $i < count($parent); $i++) {
$escparent = $parent[$i];
if ($escparent == '') {
$escparent = 'Unknown';
}
$row = WT_DB::prepare("SELECT pl_id, pl_long, pl_lati, pl_zoom, pl_icon FROM `##placelocation` WHERE pl_level=? AND pl_parent_id=? AND pl_place LIKE ? ORDER BY pl_place")->execute(array($i, $parent_id, $escparent))->fetchOneRow();
if (empty($row)) {
// this name does not yet exist: create entry
if (!isset($_POST['updateonly'])) {
$highestIndex = $highestIndex + 1;
if ($i + 1 == count($parent)) {
$zoomlevel = $place['zoom'];
} elseif (isset($default_zoom_level[$i])) {
$zoomlevel = $default_zoom_level[$i];
} else {
$zoomlevel = $this->getSetting('GM_MAX_ZOOM');
}
if ($place['lati'] == '0' || $place['long'] == '0' || $i + 1 < count($parent)) {
WT_DB::prepare("INSERT INTO `##placelocation` (pl_id, pl_parent_id, pl_level, pl_place, pl_zoom, pl_icon) VALUES (?, ?, ?, ?, ?, ?)")->execute(array($highestIndex, $parent_id, $i, $escparent, $zoomlevel, $place['icon']));
} else {
//delete leading zero
$pl_lati = str_replace(array('N', 'S', ','), array('', '-', '.'), $place['lati']);
$pl_long = str_replace(array('E', 'W', ','), array('', '-', '.'), $place['long']);
if ($pl_lati >= 0) {
$place['lati'] = 'N' . abs($pl_lati);
} elseif ($pl_lati < 0) {
$place['lati'] = 'S' . abs($pl_lati);
}
if ($pl_long >= 0) {
$place['long'] = 'E' . abs($pl_long);
} elseif ($pl_long < 0) {
$place['long'] = 'W' . abs($pl_long);
}
WT_DB::prepare("INSERT INTO `##placelocation` (pl_id, pl_parent_id, pl_level, pl_place, pl_long, pl_lati, pl_zoom, pl_icon) VALUES (?, ?, ?, ?, ?, ?, ?, ?)")->execute(array($highestIndex, $parent_id, $i, $escparent, $place['long'], $place['lati'], $zoomlevel, $place['icon']));
}
$parent_id = $highestIndex;
}
} else {
$parent_id = $row->pl_id;
if (isset($_POST['overwritedata']) && $i + 1 == count($parent)) {
WT_DB::prepare("UPDATE `##placelocation` SET pl_lati=?, pl_long=?, pl_zoom=?, pl_icon=? WHERE pl_id=?")->execute(array($place['lati'], $place['long'], $place['zoom'], $place['icon'], $parent_id));
} else {
if (($row->pl_long == '0' || $row->pl_long == null) && ($row->pl_lati == '0' || $row->pl_lati == null)) {
WT_DB::prepare("UPDATE `##placelocation` SET pl_lati=?, pl_long=? WHERE pl_id=?")->execute(array($place['lati'], $place['long'], $parent_id));
}
if (empty($row->pl_icon) && !empty($place['icon'])) {
WT_DB::prepare("UPDATE `##placelocation` SET pl_icon=? WHERE pl_id=?")->execute(array($place['icon'], $parent_id));
}
}
}
}
}
$parent = 0;
}
if ($action == 'DeleteRecord') {
$exists = WT_DB::prepare("SELECT 1 FROM `##placelocation` WHERE pl_parent_id=?")->execute(array($deleteRecord))->fetchOne();
if (!$exists) {
WT_DB::prepare("DELETE FROM `##placelocation` WHERE pl_id=?")->execute(array($deleteRecord));
} else {
echo '<table class="facts_table"><tr><td>', WT_I18N::translate('Location not removed: this location contains sub-locations'), '</td></tr></table>';
}
}
?>
<script>
function updateList(inactive) {
window.location.href='<?php
if (strstr($_SERVER['REQUEST_URI'], '&inactive', true)) {
$uri = strstr($_SERVER['REQUEST_URI'], '&inactive', true);
} else {
$uri = $_SERVER['REQUEST_URI'];
}
echo $uri, '&inactive=';
?>
'+inactive;
}
function edit_place_location(placeid) {
window.open('module.php?mod=googlemap&mod_action=places_edit&action=update&placeid='+placeid, '_blank', gmap_window_specs);
return false;
}
function add_place_location(placeid) {
window.open('module.php?mod=googlemap&mod_action=places_edit&action=add&placeid='+placeid, '_blank', gmap_window_specs);
return false;
}
function delete_place(placeid) {
var answer=confirm('<?php
echo WT_I18N::translate('Remove this location?');
?>
');
if (answer == true) {
window.location = '<?php
echo $_SERVER['REQUEST_URI'];
?>
&action=DeleteRecord&deleteRecord=' + placeid;
}
}
</script>
<?php
echo '<div id="gm_breadcrumb">';
$where_am_i = $this->placeIdToHierarchy($parent);
foreach (array_reverse($where_am_i, true) as $id => $place) {
if ($id == $parent) {
if ($place != 'Unknown') {
echo WT_Filter::escapeHtml($place);
} else {
echo WT_I18N::translate('unknown');
}
} else {
echo '<a href="module.php?mod=googlemap&mod_action=admin_places&parent=', $id, '&inactive=', $inactive, '">';
if ($place != 'Unknown') {
echo WT_Filter::escapeHtml($place), '</a>';
} else {
echo WT_I18N::translate('unknown'), '</a>';
}
}
echo ' - ';
}
echo '<a href="module.php?mod=googlemap&mod_action=admin_places&parent=0&inactive=', $inactive, '">', WT_I18N::translate('Top level'), '</a></div>';
echo '<form name="active" method="post" action="module.php?mod=googlemap&mod_action=admin_places&parent=', $parent, '&inactive=', $inactive, '"><div id="gm_active">';
echo '<label for="inactive">', WT_I18N::translate('Show inactive places'), '</label>';
echo '<input type="checkbox" name="inactive" id="inactive"';
if ($inactive) {
echo ' checked="checked"';
}
echo ' onclick="updateList(this.checked)"';
echo '>', help_link('PLE_ACTIVE', 'googlemap'), '</div></form>';
$placelist = $this->getPlaceListLocation($parent, $inactive);
echo '<div class="gm_plac_edit">';
echo '<table class="gm_plac_edit"><tr>';
echo '<th>', WT_Gedcom_Tag::getLabel('PLAC'), '</th>';
echo '<th>', WT_Gedcom_Tag::getLabel('LATI'), '</th>';
echo '<th>', WT_Gedcom_Tag::getLabel('LONG'), '</th>';
echo '<th>', WT_I18N::translate('Zoom level'), '</th>';
echo '<th>', WT_I18N::translate('Icon'), '</th>';
echo '<th>';
echo WT_I18N::translate('Edit'), '</th><th>', WT_I18N::translate('Delete'), '</th></tr>';
if (count($placelist) == 0) {
echo '<tr><td colspan="7" class="accepted">', WT_I18N::translate('No places found'), '</td></tr>';
}
foreach ($placelist as $place) {
echo '<tr><td><a href="module.php?mod=googlemap&mod_action=admin_places&parent=', $place['place_id'], '&inactive=', $inactive, '">';
if ($place['place'] != 'Unknown') {
echo WT_Filter::escapeHtml($place['place']), '</a></td>';
} else {
echo WT_I18N::translate('unknown'), '</a></td>';
}
echo '<td>', $place['lati'], '</td>';
echo '<td>', $place['long'], '</td>';
echo '<td>', $place['zoom'], '</td>';
echo '<td>';
if ($place['icon'] == NULL || $place['icon'] == '') {
if ($place['lati'] == NULL || $place['long'] == NULL || $place['lati'] == '0' && $place['long'] == '0') {
echo '<img src="', WT_STATIC_URL, WT_MODULES_DIR, 'googlemap/images/mm_20_yellow.png">';
} else {
echo '<img src="', WT_STATIC_URL, WT_MODULES_DIR, 'googlemap/images/mm_20_red.png">';
}
} else {
echo '<img src="', WT_STATIC_URL, WT_MODULES_DIR, 'googlemap/', $place['icon'], '" width="25" height="15">';
}
echo '</td>';
echo '<td class="narrow"><a href="#" onclick="edit_place_location(', $place['place_id'], ');return false;" class="icon-edit" title="', WT_I18N::translate('Edit'), '"></a></td>';
$noRows = WT_DB::prepare("SELECT COUNT(pl_id) FROM `##placelocation` WHERE pl_parent_id=?")->execute(array($place['place_id']))->fetchOne();
if ($noRows == 0) {
?>
<td><a href="#" onclick="delete_place(<?php
echo $place['place_id'];
?>
);return false;" class="icon-delete" title="<?php
echo WT_I18N::translate('Remove');
?>
"></a></td>
<?php
} else {
?>
<td><i class="icon-delete-grey"></i></td>
<?php
}
?>
</tr>
<?php
}
?>
</table>
</div>
<table id="gm_manage">
<tr>
<td>
<?php
echo WT_I18N::translate('Add a new geographic location');
?>
</td>
<td>
<form action="?" onsubmit="add_place_location(this.parent_id.options[this.parent_id.selectedIndex].value); return false;">
<?php
echo select_edit_control('parent_id', $where_am_i, WT_I18N::translate('Top level'), $parent);
?>
<input type="submit" value="<?php
echo WT_I18N::translate('Add');
?>
">
</form>
</td>
</tr>
<tr>
<td>
<?php
echo WT_I18N::translate('Import all places from a family tree');
?>
</td>
<td>
<form action="module.php" method="get">
<input type="hidden" name="mod" value="googlemap">
<input type="hidden" name="mod_action" value="admin_places">
<input type="hidden" name="action" value="ImportGedcom">
<?php
echo select_edit_control('ged', WT_Tree::getNameList(), null, WT_GEDCOM);
?>
<input type="submit" value="<?php
echo WT_I18N::translate('Import');
?>
">
</form>
</td>
</tr>
<tr>
<td>
<?php
echo WT_I18N::translate('Upload geographic data');
?>
</td>
<td>
<form action="module.php" method="get">
<input type="hidden" name="mod" value="googlemap">
<input type="hidden" name="mod_action" value="admin_places">
<input type="hidden" name="action" value="ImportFile">
<input type="submit" value="<?php
echo WT_I18N::translate('Upload');
?>
">
</form>
</td>
</tr>
<tr>
<td>
<?php
echo WT_I18N::translate('Download geographic data');
?>
</td>
<td>
<form action="module.php" method="get">
<input type="hidden" name="mod" value="googlemap">
<input type="hidden" name="mod_action" value="admin_places">
<input type="hidden" name="action" value="ExportFile">
<?php
echo select_edit_control('parent', $where_am_i, WT_I18N::translate('All'), WT_GED_ID);
?>
<input type="submit" value="<?php
echo WT_I18N::translate('Download');
?>
">
</form>
</td>
</tr>
</table>
<?php
}
function whoisonline()
{
$NumAnonymous = 0;
$loggedusers = array();
$content = '';
foreach (User::allLoggedIn() as $user) {
if (Auth::isAdmin() || $user->getSetting('visibleonline')) {
$loggedusers[] = $user;
} else {
$NumAnonymous++;
}
}
$LoginUsers = count($loggedusers);
$content .= '<div class="logged_in_count">';
if ($NumAnonymous) {
$content .= WT_I18N::plural('%d anonymous logged-in user', '%d anonymous logged-in users', $NumAnonymous, $NumAnonymous);
if ($LoginUsers) {
$content .= ' | ';
}
}
if ($LoginUsers) {
$content .= WT_I18N::plural('%d logged-in user', '%d logged-in users', $LoginUsers, $LoginUsers);
}
$content .= '</div>';
$content .= '<div class="logged_in_list">';
if (WT_USER_ID) {
foreach ($loggedusers as $user) {
$content .= '<div class="logged_in_name">';
$content .= WT_Filter::escapeHtml($user->getRealName()) . ' - ' . WT_Filter::escapeHtml($user->getUserName());
if (WT_USER_ID != $user->getUserId() && $user->getSetting('contactmethod') != 'none') {
$content .= ' <a class="icon-email" href="#" onclick="return message(\'' . WT_Filter::escapeJs($user->getUserName()) . '\', \'\', \'' . WT_Filter::escapeJs(get_query_url()) . '\');" title="' . WT_I18N::translate('Send message') . '"></a>';
}
$content .= '</div>';
}
}
$content .= '</div>';
return $content;
}
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
use WT\Auth;
define('WT_SCRIPT_NAME', 'admin_site_access.php');
require './includes/session.php';
require WT_ROOT . 'includes/functions/functions_edit.php';
$controller = new WT_Controller_Page();
$controller->restrictAccess(Auth::isAdmin())->addExternalJavascript(WT_JQUERY_DATATABLES_URL)->addExternalJavascript(WT_JQUERY_JEDITABLE_URL)->setPageTitle(WT_I18N::translate('Site access rules'));
$action = WT_Filter::get('action');
switch ($action) {
case 'delete':
$user_access_rule_id = WT_Filter::getInteger('site_access_rule_id');
WT_DB::prepare("DELETE FROM `##site_access_rule` WHERE site_access_rule_id=?")->execute(array($user_access_rule_id));
break;
case 'allow':
case 'deny':
case 'robot':
$user_access_rule_id = WT_Filter::getInteger('site_access_rule_id');
WT_DB::prepare("UPDATE `##site_access_rule` SET rule=? WHERE site_access_rule_id=?")->execute(array($action, $user_access_rule_id));
break;
case 'load_rules':
Zend_Session::writeClose();
// AJAX callback for datatables
}
$html .= '</ul>';
} else {
$html .= '<div class="error">' . WT_I18N::translate('This media object is not linked to any other record.') . '</div>';
}
return $html;
}
////////////////////////////////////////////////////////////////////////////////
// Start here
////////////////////////////////////////////////////////////////////////////////
// Preserver the pagination/filtering/sorting between requests, so that the
// browser’s back button works. Pagination is dependent on the currently
// selected folder.
$table_id = md5($files . $media_folder . $media_path . $subfolders);
$controller = new WT_Controller_Page();
$controller->restrictAccess(Auth::isAdmin())->setPageTitle(WT_I18N::translate('Media'))->addExternalJavascript(WT_JQUERY_DATATABLES_URL)->pageHeader()->addInlineJavascript('
jQuery("#media-table-' . $table_id . '").dataTable({
dom: \'<"H"pf<"dt-clear">irl>t<"F"pl>\',
processing: true,
serverSide: true,
ajax: "' . WT_SERVER_NAME . WT_SCRIPT_PATH . WT_SCRIPT_NAME . '?action=load_json&files=' . $files . '&media_folder=' . $media_folder . '&media_path=' . $media_path . '&subfolders=' . $subfolders . '",
' . WT_I18N::datatablesI18N(array(5, 10, 20, 50, 100, 500, 1000, -1)) . ',
jQueryUI: true,
autoWidth:false,
pageLength: 10,
pagingType: "full_numbers",
stateSave: true,
stateDuration: 300,
columns: [
{},
{ sortable: false },
// Delete the record itself
$record->deleteRecord();
} else {
header('HTTP/1.0 406 Not Acceptable');
}
break;
case 'delete-user':
$user = User::find(WT_Filter::postInteger('user_id'));
if ($user && Auth::isAdmin() && Auth::user() !== $user) {
Log::addAuthenticationLog('Deleted user: '******'masquerade':
$user = User::find(WT_Filter::postInteger('user_id'));
if ($user && Auth::isAdmin() && Auth::user() !== $user) {
Log::addAuthenticationLog('Masquerade as user: '******'HTTP/1.0 406 Not Acceptable');
}
break;
case 'unlink-media':
// Remove links from an individual and their spouse-family records to a media object.
// Used by the "unlink" option on the album (lightbox) tab.
require WT_ROOT . 'includes/functions/functions_edit.php';
$source = WT_Individual::getInstance(WT_Filter::post('source', WT_REGEX_XREF));
$target = WT_Filter::post('target', WT_REGEX_XREF);
if ($source && $source->canShow() && $source->canEdit() && $target) {
// Consider the individual and their spouse-family records
$sources = $source->getSpouseFamilies();
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
use WT\Auth;
define('WT_SCRIPT_NAME', 'admin_module_sidebar.php');
require 'includes/session.php';
require WT_ROOT . 'includes/functions/functions_edit.php';
$controller = new WT_Controller_Page();
$controller->restrictAccess(Auth::isAdmin())->setPageTitle(WT_I18N::translate('Module administration'))->pageHeader()->addInlineJavascript('
jQuery("#sidebars_table").sortable({items: ".sortme", forceHelperSize: true, forcePlaceholderSize: true, opacity: 0.7, cursor: "move", axis: "y"});
//-- update the order numbers after drag-n-drop sorting is complete
jQuery("#sidebars_table").bind("sortupdate", function(event, ui) {
jQuery("#"+jQuery(this).attr("id")+" input").each(
function (index, value) {
value.value = index+1;
}
);
});
');
$modules = WT_Module::getActiveSidebars(WT_GED_ID, WT_PRIV_HIDE);
$action = WT_Filter::post('action');
if ($action == 'update_mods' && WT_Filter::checkCsrf()) {
foreach ($modules as $module_name => $module) {
// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
use WT\Auth;
define('WT_SCRIPT_NAME', 'index_edit.php');
require './includes/session.php';
$controller = new WT_Controller_Ajax();
// Only one of $user_id and $gedcom_id should be set
$user_id = WT_Filter::get('user_id', WT_REGEX_INTEGER, WT_Filter::post('user_id', WT_REGEX_INTEGER));
if ($user_id) {
$gedcom_id = null;
} else {
$gedcom_id = WT_Filter::get('gedcom_id', WT_REGEX_INTEGER, WT_Filter::post('gedcom_id', WT_REGEX_INTEGER));
}
// Only an admin can edit the "default" page
// Only managers can edit the "home page"
// Only a user or an admin can edit a user’s "my page"
if ($gedcom_id < 0 && !Auth::isAdmin() || $gedcom_id > 0 && !Auth::isManager(WT_Tree::get($gedcom_id)) || $user_id && Auth::id() != $user_id && !Auth::isAdmin()) {
$controller->pageHeader();
$controller->addInlineJavascript('window.location.reload();');
exit;
}
$action = WT_Filter::get('action');
if (isset($_REQUEST['main'])) {
$main = $_REQUEST['main'];
} else {
$main = array();
}
if (isset($_REQUEST['right'])) {
$right = $_REQUEST['right'];
} else {
$right = array();
}
/**
* get edit menu
*/
function getEditMenu()
{
$SHOW_GEDCOM_RECORD = get_gedcom_setting(WT_GED_ID, 'SHOW_GEDCOM_RECORD');
if (!$this->record || $this->record->isOld()) {
return null;
}
// edit menu
$menu = new WT_Menu(WT_I18N::translate('Edit'), '#', 'menu-indi');
$menu->addLabel($menu->label, 'down');
// What behaviour shall we give the main menu? If we leave it blank, the framework
// will copy the first submenu - which may be edit-raw or delete.
// As a temporary solution, make it edit the name
$menu->addOnclick("return false;");
if (WT_USER_CAN_EDIT) {
foreach ($this->record->getFacts() as $fact) {
if ($fact->getTag() == 'NAME' && $fact->canEdit()) {
$menu->addOnclick("return edit_name('" . $this->record->getXref() . "', '" . $fact->getFactId() . "');");
}
break;
}
$submenu = new WT_Menu(WT_I18N::translate('Add a new name'), '#', 'menu-indi-addname');
$submenu->addOnclick("return add_name('" . $this->record->getXref() . "');");
$menu->addSubmenu($submenu);
$has_sex_record = false;
$submenu = new WT_Menu(WT_I18N::translate('Edit gender'), '#', 'menu-indi-editsex');
foreach ($this->record->getFacts() as $fact) {
if ($fact->getTag() == 'SEX' && $fact->canEdit()) {
$submenu->addOnclick("return edit_record('" . $this->record->getXref() . "', '" . $fact->getFactId() . "');");
$has_sex_record = true;
break;
}
}
if (!$has_sex_record) {
$submenu->addOnclick("return add_new_record('" . $this->record->getXref() . "', 'SEX');");
}
$menu->addSubmenu($submenu);
if (count($this->record->getSpouseFamilies()) > 1) {
$submenu = new WT_Menu(WT_I18N::translate('Re-order families'), '#', 'menu-indi-orderfam');
$submenu->addOnclick("return reorder_families('" . $this->record->getXref() . "');");
$menu->addSubmenu($submenu);
}
}
// delete
if (WT_USER_CAN_EDIT) {
$submenu = new WT_Menu(WT_I18N::translate('Delete'), '#', 'menu-indi-del');
$submenu->addOnclick("return delete_individual('" . WT_I18N::translate('Are you sure you want to delete “%s”?', WT_Filter::escapeJs(strip_tags($this->record->getFullName()))) . "', '" . $this->record->getXref() . "');");
$menu->addSubmenu($submenu);
}
// edit raw
if (Auth::isAdmin() || WT_USER_CAN_EDIT && $SHOW_GEDCOM_RECORD) {
$submenu = new WT_Menu(WT_I18N::translate('Edit raw GEDCOM'), '#', 'menu-indi-editraw');
$submenu->addOnclick("return edit_raw('" . $this->record->getXref() . "');");
$menu->addSubmenu($submenu);
}
// add to favorites
if (array_key_exists('user_favorites', WT_Module::getActiveModules())) {
$submenu = new WT_Menu(WT_I18N::translate('Add to favorites'), '#', 'menu-indi-addfav');
$submenu->addOnclick("jQuery.post('module.php?mod=user_favorites&mod_action=menu-add-favorite',{xref:'" . $this->record->getXref() . "'},function(){location.reload();})");
$menu->addSubmenu($submenu);
}
return $menu;
}
/**
* get edit menu
*/
function getEditMenu()
{
$SHOW_GEDCOM_RECORD = get_gedcom_setting(WT_GED_ID, 'SHOW_GEDCOM_RECORD');
if (!$this->record || $this->record->isOld()) {
return null;
}
// edit menu
$menu = new WT_Menu(WT_I18N::translate('Edit'), '#', 'menu-fam');
$menu->addLabel($menu->label, 'down');
if (WT_USER_CAN_EDIT) {
// edit_fam / members
$submenu = new WT_Menu(WT_I18N::translate('Change family members'), '#', 'menu-fam-change');
$submenu->addOnclick("return change_family_members('" . $this->record->getXref() . "');");
$menu->addSubmenu($submenu);
// edit_fam / add child
$submenu = new WT_Menu(WT_I18N::translate('Add a child to this family'), '#', 'menu-fam-addchil');
$submenu->addOnclick("return add_child_to_family('" . $this->record->getXref() . "', 'U');");
$menu->addSubmenu($submenu);
// edit_fam / reorder_children
if ($this->record->getNumberOfChildren() > 1) {
$submenu = new WT_Menu(WT_I18N::translate('Re-order children'), '#', 'menu-fam-orderchil');
$submenu->addOnclick("return reorder_children('" . $this->record->getXref() . "');");
$menu->addSubmenu($submenu);
}
}
// delete
if (WT_USER_CAN_EDIT) {
$submenu = new WT_Menu(WT_I18N::translate('Delete'), '#', 'menu-fam-del');
$submenu->addOnclick("return delete_family('" . WT_I18N::translate('Deleting the family will unlink all of the individuals from each other but will leave the individuals in place. Are you sure you want to delete this family?') . "', '" . $this->record->getXref() . "');");
$menu->addSubmenu($submenu);
}
// edit raw
if (Auth::isAdmin() || WT_USER_CAN_EDIT && $SHOW_GEDCOM_RECORD) {
$submenu = new WT_Menu(WT_I18N::translate('Edit raw GEDCOM'), '#', 'menu-fam-editraw');
$submenu->addOnclick("return edit_raw('" . $this->record->getXref() . "');");
$menu->addSubmenu($submenu);
}
// add to favorites
if (array_key_exists('user_favorites', WT_Module::getActiveModules())) {
$submenu = new WT_Menu(WT_I18N::translate('Add to favorites'), '#', 'menu-fam-addfav');
$submenu->addOnclick("jQuery.post('module.php?mod=user_favorites&mod_action=menu-add-favorite',{xref:'" . $this->record->getXref() . "'},function(){location.reload();})");
$menu->addSubmenu($submenu);
}
//-- get the link for the first submenu and set it as the link for the main menu
if (isset($menu->submenus[0])) {
$link = $menu->submenus[0]->onclick;
$menu->addOnclick($link);
}
return $menu;
}
}
// Total filtered/unfiltered rows
$recordsFiltered = WT_DB::prepare("SELECT FOUND_ROWS()")->fetchColumn();
$recordsTotal = WT_DB::prepare($SELECT2 . $WHERE)->execute($args)->fetchColumn();
header('Content-type: application/json');
echo json_encode(array('sEcho' => WT_Filter::getInteger('sEcho'), 'recordsTotal' => $recordsTotal, 'recordsFiltered' => $recordsFiltered, 'data' => $data));
exit;
}
$controller->pageHeader()->addExternalJavascript(WT_JQUERY_DATATABLES_URL)->addInlineJavascript('
jQuery("#log_list").dataTable( {
dom: \'<"H"pf<"dt-clear">irl>t<"F"pl>\',
processing: true,
serverSide: true,
ajax: "' . WT_SERVER_NAME . WT_SCRIPT_PATH . WT_SCRIPT_NAME . '?action=load_json&from=' . $from . '&to=' . $to . '&type=' . $type . '&text=' . rawurlencode($text) . '&ip=' . rawurlencode($ip) . '&user='******'&gedc=' . rawurlencode($gedc) . '",
' . WT_I18N::datatablesI18N(array(10, 20, 50, 100, 500, 1000, -1)) . ',
jQueryUI: true,
autoWidth: false,
sorting: [[ 0, "desc" ]],
pageLength: ' . Auth::user()->getSetting('admin_site_log_page_size', 20) . ',
pagingType: "full_numbers"
});
');
$url = WT_SCRIPT_NAME . '?from=' . rawurlencode($from) . '&to=' . rawurlencode($to) . '&type=' . rawurlencode($type) . '&text=' . rawurlencode($text) . '&ip=' . rawurlencode($ip) . '&user='******'&gedc=' . rawurlencode($gedc);
$users_array = array();
foreach (User::all() as $tmp_user) {
$users_array[$tmp_user->getUserName()] = $tmp_user->getUserName();
}
echo '<form name="logs" method="get" action="' . WT_SCRIPT_NAME . '">', '<input type="hidden" name="action", value="show">', '<table class="site_logs">', '<tr>', '<td colspan="6">', WT_I18N::translate('From %s to %s', '<input class="log-date" name="from" value="' . WT_Filter::escapeHtml($from) . '">', '<input class="log-date" name="to" value="' . WT_Filter::escapeHtml($to) . '">'), '</td>', '</tr><tr>', '<td>', WT_I18N::translate('Type'), '<br>', select_edit_control('type', array('' => '', 'auth' => 'auth', 'config' => 'config', 'debug' => 'debug', 'edit' => 'edit', 'error' => 'error', 'media' => 'media', 'search' => 'search'), null, $type, ''), '</td>', '<td>', WT_I18N::translate('Message'), '<br><input class="log-filter" name="text" value="', WT_Filter::escapeHtml($text), '"> ', '</td>', '<td>', WT_I18N::translate('IP address'), '<br><input class="log-filter" name="ip" value="', WT_Filter::escapeHtml($ip), '"> ', '</td>', '<td>', WT_I18N::translate('User'), '<br>', select_edit_control('user', $users_array, '', $user, ''), '</td>', '<td>', WT_I18N::translate('Family tree'), '<br>', select_edit_control('gedc', WT_Tree::getNameList(), '', $gedc, Auth::isAdmin() ? '' : 'disabled'), '</td>', '</tr><tr>', '<td colspan="6">', '<input type="submit" value="', WT_I18N::translate('Filter'), '">', '<input type="submit" value="', WT_I18N::translate('Export'), '" onclick="document.logs.action.value=\'export\';return true;" ', $action == 'show' ? '' : 'disabled="disabled"', '>', '<input type="submit" value="', WT_I18N::translate('Delete'), '" onclick="if (confirm(\'', WT_Filter::escapeHtml(WT_I18N::translate('Permanently delete these records?')), '\')) {document.logs.action.value=\'delete\';return true;} else {return false;}" ', $action == 'show' ? '' : 'disabled="disabled"', '>', '</td>', '</tr>', '</table>', '</form>';
if ($action) {
echo '<br>', '<table id="log_list">', '<thead>', '<tr>', '<th>', WT_I18N::translate('Timestamp'), '</th>', '<th>', WT_I18N::translate('Type'), '</th>', '<th>', WT_I18N::translate('Message'), '</th>', '<th>', WT_I18N::translate('IP address'), '</th>', '<th>', WT_I18N::translate('User'), '</th>', '<th>', WT_I18N::translate('Family tree'), '</th>', '</tr>', '</thead>', '<tbody>', '</tbody>', '</table>';
}
}
$latest_version_html = '<span dir="ltr">' . $latest_version . '</span>';
$download_url_html = '<b dir="auto"><a href="' . WT_Filter::escapeHtml($download_url) . '">' . WT_Filter::escapeHtml($download_url) . '</a></b>';
// Show a friendly message while the site is being upgraded
$lock_file = __DIR__ . DIRECTORY_SEPARATOR . 'data' . DIRECTORY_SEPARATOR . 'offline.txt';
$lock_file_html = '<span dir="ltr">' . WT_Filter::escapeHtml($lock_file) . '</span>';
$lock_file_text = WT_I18N::translate('This site is being upgraded. Try again in a few minutes.') . PHP_EOL . format_timestamp(WT_TIMESTAMP) . WT_I18N::translate('UTC');
// Success/failure indicators
$icon_success = '<i class="icon-yes"></i>';
$icon_failure = '<i class="icon-failure"></i>';
// Need confirmation for various actions
$continue = WT_Filter::post('continue', '1') && WT_Filter::checkCsrf();
$modules_action = WT_Filter::post('modules', 'ignore|disable');
$themes_action = WT_Filter::post('themes', 'ignore|disable');
$controller = new WT_Controller_Page();
$controller->restrictAccess(Auth::isAdmin())->setPageTitle(WT_I18N::translate('Upgrade wizard'))->pageHeader();
// Flush output as it happens - only effective on some webserver configurations.
ob_implicit_flush(true);
if (ob_get_level()) {
ob_end_flush();
}
echo '<h2>', $controller->getPageTitle(), '</h2>';
if ($latest_version == '') {
echo '<p>', WT_I18N::translate('No upgrade information is available.'), '</p>';
exit;
}
if (version_compare(WT_VERSION, $latest_version) >= 0) {
echo '<p>', WT_I18N::translate('This is the latest version of webtrees. No upgrade is available.'), '</p>';
exit;
}
echo '<form method="POST" action="admin_site_upgrade.php">';
<tr>
<td>', WT_I18N::translate('Language'), '</td>
<td>', edit_field_language('user_language', $user_language), '</td>';
if (WT_Site::preference('ALLOW_USER_THEMES')) {
echo '<td>', WT_I18N::translate('Theme'), help_link('THEME'), '</td>
<td>
<select name="new_user_theme">
<option value="" selected="selected">', WT_Filter::escapeHtml(WT_I18N::translate('<default theme>')), '</option>';
foreach (get_theme_names() as $themename => $themedir) {
echo '<option value="', $themedir, '">', $themename, '</option>';
}
echo '</select>
</td>';
}
echo '</tr>';
if (Auth::isAdmin()) {
echo '<tr>
<td>', WT_I18N::translate('Admin comments on user'), '</td>
<td colspan="3"><textarea style="width:95%;" rows="5" name="new_comment" value="', WT_Filter::escapeHtml($new_comment), '"></textarea></td>
</tr>';
}
echo '<tr>
<th colspan="4">', WT_I18N::translate('Family tree access and settings'), '</th>
</tr>
<tr>
<td colspan="4">
<table id="adduser2">
<tr>
<th>', WT_I18N::translate('Family tree'), '</th>
<th>', WT_I18N::translate('Default individual'), help_link('default_individual'), '</th>
<th>', WT_I18N::translate('Individual record'), help_link('useradmin_gedcomid'), '</th>
case 'theme':
break;
default:
// An unrecognized setting
fail();
}
// Authorised and valid - make update
$user->setSetting($id2, $value);
ok();
case 'module':
//////////////////////////////////////////////////////////////////////////////
// Table name: WT_MODULE
// ID format: module-{column}-{module_name}
//////////////////////////////////////////////////////////////////////////////
// Authorisation
if (!Auth::isAdmin()) {
fail();
}
switch ($id1) {
case 'status':
case 'tab_order':
case 'menu_order':
case 'sidebar_order':
WT_DB::prepare("UPDATE `##module` SET {$id1}=? WHERE module_name=?")->execute(array($value, $id2));
ok();
default:
fail();
}
default:
// An unrecognized table
fail();
