function import_gedcom_file($gedcom_id, $path, $filename)
{
// Read the file in blocks of roughly 64K. Ensure that each block
// contains complete gedcom records. This will ensure we don’t split
// multi-byte characters, as well as simplifying the code to import
// each block.
$file_data = '';
$fp = fopen($path, 'rb');
WT_DB::exec("START TRANSACTION");
WT_DB::prepare("DELETE FROM `##gedcom_chunk` WHERE gedcom_id=?")->execute(array($gedcom_id));
while (!feof($fp)) {
$file_data .= fread($fp, 65536);
// There is no strrpos() function that searches for substrings :-(
for ($pos = strlen($file_data) - 1; $pos > 0; --$pos) {
if ($file_data[$pos] == '0' && ($file_data[$pos - 1] == "\n" || $file_data[$pos - 1] == "\r")) {
// We’ve found the last record boundary in this chunk of data
break;
}
}
if ($pos) {
WT_DB::prepare("INSERT INTO `##gedcom_chunk` (gedcom_id, chunk_data) VALUES (?, ?)")->execute(array($gedcom_id, substr($file_data, 0, $pos)));
$file_data = substr($file_data, $pos);
}
}
WT_DB::prepare("INSERT INTO `##gedcom_chunk` (gedcom_id, chunk_data) VALUES (?, ?)")->execute(array($gedcom_id, $file_data));
set_gedcom_setting($gedcom_id, 'gedcom_filename', $filename);
WT_DB::exec("COMMIT");
fclose($fp);
}
//
// The script should assume that it can be interrupted at
// any point, and be able to continue by re-running the script.
// Fatal errors, however, should be allowed to throw exceptions,
// which will be caught by the framework.
// It shouldn't do anything that might take more than a few
// seconds, for systems with low timeout values.
//
// 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
if (!defined('WT_WEBTREES')) {
header('HTTP/1.0 403 Forbidden');
exit;
}
WT_DB::exec("CREATE TABLE IF NOT EXISTS `##news` (" . " n_id INTEGER AUTO_INCREMENT NOT NULL," . " n_username VARCHAR(100) NOT NULL," . " n_date INTEGER NOT NULL," . " n_title VARCHAR(255) NOT NULL," . " n_text TEXT NOT NULL," . " PRIMARY KEY (n_id)," . " KEY ix1 (n_username)" . ") COLLATE utf8_unicode_ci ENGINE=InnoDB");
// Update the version to indicate success
WT_Site::setPreference($schema_name, $next_version);
// It shouldn't do anything that might take more than a few
// seconds, for systems with low timeout values.
//
// webtrees: Web based Family History software
// Copyright (C) 2014 Greg Roach
//
// 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
if (!defined('WT_WEBTREES')) {
header('HTTP/1.0 403 Forbidden');
exit;
}
// Create all of the tables needed for this module
try {
WT_DB::exec("ALTER TABLE `##placelocation` ADD (" . " pl_media VARCHAR(60) NULL," . " sv_long FLOAT NOT NULL DEFAULT 0," . " sv_lati FLOAT NOT NULL DEFAULT 0," . " sv_bearing FLOAT NOT NULL DEFAULT 0," . " sv_elevation FLOAT NOT NULL DEFAULT 0," . " sv_zoom FLOAT NOT NULL DEFAULT 1" . ")");
} catch (PDOException $ex) {
// Already done this?
}
// Update the version to indicate success
WT_Site::preference($schema_name, $next_version);
//
// 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
if (!defined('WT_WEBTREES')) {
header('HTTP/1.0 403 Forbidden');
exit;
}
// Delete any data that might violate the new constraints
WT_DB::exec("DELETE FROM `##news`" . " WHERE user_id NOT IN (SELECT user_id FROM `##user` )" . " OR gedcom_id NOT IN (SELECT gedcom_id FROM `##gedcom`)");
// Add the new constraints
try {
WT_DB::exec("ALTER TABLE `##news`" . " ADD FOREIGN KEY news_fk1 (user_id ) REFERENCES `##user` (user_id) ON DELETE CASCADE," . " ADD FOREIGN KEY news_fk2 (gedcom_id) REFERENCES `##gedcom` (gedcom_id) ON DELETE CASCADE");
} catch (PDOException $ex) {
// Already updated?
}
// Update the version to indicate success
WT_Site::setPreference($schema_name, $next_version);
exit;
}
} else {
// No config file. Set one up.
header('Location: ' . WT_SERVER_NAME . WT_SCRIPT_PATH . 'setup.php');
exit;
}
$WT_REQUEST = new Zend_Controller_Request_Http();
require WT_ROOT . 'includes/authentication.php';
// Connect to the database
try {
WT_DB::createInstance($dbconfig['dbhost'], $dbconfig['dbport'], $dbconfig['dbname'], $dbconfig['dbuser'], $dbconfig['dbpass']);
define('WT_TBLPREFIX', $dbconfig['tblpfx']);
unset($dbconfig);
// Some of the FAMILY JOIN HUSBAND JOIN WIFE queries can excede the MAX_JOIN_SIZE setting
WT_DB::exec("SET NAMES 'utf8' COLLATE 'utf8_unicode_ci', SQL_BIG_SELECTS=1");
try {
WT_DB::updateSchema(WT_ROOT . 'includes/db_schema/', 'WT_SCHEMA_VERSION', WT_SCHEMA_VERSION);
} catch (PDOException $ex) {
// The schema update scripts should never fail. If they do, there is no clean recovery.
die($ex);
}
} catch (PDOException $ex) {
header('Location: ' . WT_SERVER_NAME . WT_SCRIPT_PATH . 'site-unavailable.php');
exit;
}
// The config.ini.php file must always be in a fixed location.
// Other user files can be stored elsewhere...
define('WT_DATA_DIR', realpath(WT_Site::preference('INDEX_DIRECTORY') ? WT_Site::preference('INDEX_DIRECTORY') : 'data') . DIRECTORY_SEPARATOR);
// If we have a preferred URL (e.g. www.example.com instead of www.isp.com/~example), then redirect to it.
$SERVER_URL = WT_Site::preference('SERVER_URL');
// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
if (!defined('WT_WEBTREES')) {
header('HTTP/1.0 403 Forbidden');
exit;
}
// Add new columns
try {
WT_DB::exec("ALTER TABLE `##news`" . " ADD user_id INTEGER NULL AFTER n_id," . " ADD gedcom_id INTEGER NULL AFTER user_id," . " ADD updated TIMESTAMP ON UPDATE CURRENT_TIMESTAMP DEFAULT CURRENT_TIMESTAMP," . " ADD KEY news_ix1 (user_id, updated)," . " ADD KEY news_ix2 (gedcom_id, updated)");
} catch (PDOException $ex) {
// Already updated?
}
// Migrate data from the old columns to the new ones
try {
WT_DB::exec("UPDATE `##news` n" . " LEFT JOIN `##gedcom` g ON (n.n_username=g.gedcom_name)" . " LEFT JOIN `##user` u ON (n.n_username=u.user_name)" . " SET n.gedcom_id=g.gedcom_id, n.user_id=u.user_id, updated=FROM_UNIXTIME(n_date)");
} catch (PDOException $ex) {
// Already updated?
}
// Delete orphaned rows
try {
WT_DB::exec("DELETE FROM `##news` WHERE user_id IS NULL AND gedcom_id IS NULL");
} catch (PDOException $ex) {
// Already updated?
}
// Delete/rename old columns
try {
WT_DB::exec("ALTER TABLE `##news`" . " DROP n_username, DROP n_date," . " CHANGE n_id news_id INTEGER NOT NULL AUTO_INCREMENT," . " CHANGE n_title subject VARCHAR(255) COLLATE utf8_unicode_ci," . " CHANGE n_text body TEXT COLLATE utf8_unicode_ci");
} catch (PDOException $ex) {
// Already updated?
}
// Update the version to indicate success
WT_Site::preference($schema_name, $next_version);
//
// The script should assume that it can be interrupted at
// any point, and be able to continue by re-running the script.
// Fatal errors, however, should be allowed to throw exceptions,
// which will be caught by the framework.
// It shouldn't do anything that might take more than a few
// seconds, for systems with low timeout values.
//
// 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
if (!defined('WT_WEBTREES')) {
header('HTTP/1.0 403 Forbidden');
exit;
}
WT_DB::exec("UPDATE `##placelocation` SET pl_icon=REPLACE(pl_icon, '.gif', '.png')");
// Update the version to indicate success
WT_Site::setPreference($schema_name, $next_version);
$data = WT_DB::prepare("SELECT gedcom_chunk_id, REPLACE(chunk_data, '\r', '\n') AS chunk_data" . " FROM `##gedcom_chunk`" . " WHERE gedcom_chunk_id=?")->execute(array($data->gedcom_chunk_id))->fetchOneRow();
}
if (!$data) {
break;
}
try {
// Import all the records in this chunk of data
foreach (preg_split('/\\n+(?=0)/', $data->chunk_data) as $rec) {
import_record($rec, $gedcom_id, false);
}
// Mark the chunk as imported
WT_DB::prepare("UPDATE `##gedcom_chunk` SET imported=TRUE WHERE gedcom_chunk_id=?")->execute(array($data->gedcom_chunk_id));
} catch (PDOException $ex) {
WT_DB::exec("ROLLBACK");
if ($ex->getCode() == '40001') {
// "SQLSTATE[40001]: Serialization failure: 1213 Deadlock found when trying to get lock; try restarting transaction"
// The documentation says that if you get this error, wait and try again.....
sleep(1);
$controller->addInlineJavascript('jQuery("#import' . $gedcom_id . '").load("import.php?gedcom_id=' . $gedcom_id . '&u=' . uniqid() . '");');
} else {
// A fatal error. Nothing we can do?
echo '<span class="error">', $ex->getMessage(), '</span>';
$controller->addInlineJavascript('jQuery("#actions' . $gedcom_id . '").toggle();');
}
exit;
}
}
WT_DB::exec("COMMIT");
// Reload.....
// Use uniqid() to prevent jQuery caching the previous response.
$controller->addInlineJavascript('jQuery("#import' . $gedcom_id . '").load("import.php?gedcom_id=' . $gedcom_id . '&u=' . uniqid() . '");');
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
}
// The script should assume that it can be interrupted at
// any point, and be able to continue by re-running the script.
// Fatal errors, however, should be allowed to throw exceptions,
// which will be caught by the framework.
// It shouldn't do anything that might take more than a few
// seconds, for systems with low timeout values.
//
// webtrees: Web based Family History software
// Copyright (C) 2014 Greg Roach
//
// 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
if (!defined('WT_WEBTREES')) {
header('HTTP/1.0 403 Forbidden');
exit;
}
// Create all of the tables needed for this module
WT_DB::exec("CREATE TABLE IF NOT EXISTS `##placelocation` (" . " pl_id INTEGER NOT NULL," . " pl_parent_id INTEGER NULL," . " pl_level INTEGER NULL," . " pl_place VARCHAR(255) NULL," . " pl_long VARCHAR(30) NULL," . " pl_lati VARCHAR(30) NULL," . " pl_zoom INTEGER NULL," . " pl_icon VARCHAR(255) NULL," . " PRIMARY KEY (pl_id)," . " KEY ix1 (pl_level)," . " KEY ix2 (pl_long)," . " KEY ix3 (pl_lati)," . " KEY ix4 (pl_place)," . " KEY ix5 (pl_parent_id)" . ") COLLATE utf8_unicode_ci ENGINE=InnoDB");
// Update the version to indicate success
WT_Site::setPreference($schema_name, $next_version);
try {
WT_DB::exec("ALTER TABLE `##favorites`" . " CHANGE fv_id favorite_id INTEGER AUTO_INCREMENT NOT NULL," . " CHANGE fv_gid xref VARCHAR(20) NULL," . " CHANGE fv_type favorite_type ENUM('INDI', 'FAM', 'SOUR', 'REPO', 'OBJE', 'NOTE', 'URL') NOT NULL," . " CHANGE fv_url url VARCHAR(255) NULL," . " CHANGE fv_title title VARCHAR(255) NULL," . " CHANGE fv_note note VARCHAR(1000) NULL," . " ADD user_id INTEGER NULL AFTER favorite_id," . " ADD gedcom_id INTEGER NOT NULL AFTER user_id," . " DROP KEY ix1," . " ADD KEY news_ix1 (gedcom_id, user_id)");
} catch (PDOException $ex) {
// Already updated?
}
// Migrate data from the old columns to the new ones
try {
WT_DB::exec("UPDATE `##favorites` f" . " LEFT JOIN `##gedcom` g ON (f.fv_file =g.gedcom_name)" . " LEFT JOIN `##user` u ON (f.fv_username=u.user_name)" . " SET f.gedcom_id=g.gedcom_id, f.user_id=u.user_id");
} catch (PDOException $ex) {
// Already updated?
}
// Delete orphaned rows
try {
WT_DB::exec("DELETE FROM `##favorites` WHERE user_id IS NULL AND gedcom_id IS NULL");
} catch (PDOException $ex) {
// Already updated?
}
// Delete the old column
try {
WT_DB::exec("ALTER TABLE `##favorites` DROP fv_username, DROP fv_file");
} catch (PDOException $ex) {
// Already updated?
}
// Rename the table
try {
WT_DB::exec("RENAME TABLE `##favorites` TO `##favorite`");
} catch (PDOException $ex) {
// Already updated?
}
// Update the version to indicate success
WT_Site::setPreference($schema_name, $next_version);
// Fatal errors, however, should be allowed to throw exceptions,
// which will be caught by the framework.
// It shouldn't do anything that might take more than a few
// seconds, for systems with low timeout values.
//
// webtrees: Web based Family History software
// Copyright (C) 2014 webtrees development team.
//
// Derived from PhpGedView
// Copyright (C) 2009 Greg Roach
//
// 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
if (!defined('WT_WEBTREES')) {
header('HTTP/1.0 403 Forbidden');
exit;
}
WT_DB::exec("CREATE TABLE IF NOT EXISTS `##favorites` (" . " fv_id INTEGER AUTO_INCREMENT NOT NULL," . " fv_username VARCHAR(32) NOT NULL," . " fv_gid VARCHAR(20) NULL," . " fv_type VARCHAR(15) NULL," . " fv_file VARCHAR(100) NULL," . " fv_url VARCHAR(255) NULL," . " fv_title VARCHAR(255) NULL," . " fv_note TEXT NULL," . " PRIMARY KEY (fv_id)," . " KEY ix1 (fv_username)" . ") COLLATE utf8_unicode_ci ENGINE=InnoDB");
// Update the version to indicate success
WT_Site::preference($schema_name, $next_version);
stateDuration: 180,
pagingType: "full_numbers",
columns: [
/* 0 ip_address */ { dataSort: 1, class: "ip_address" },
/* 0 ip_address (sort) */ { type: "num", visible: false },
/* 1 user_agent_pattern */ { class: "ua_string" },
/* 2 updated */ { class: "ua_string" },
/* 3 <allowed> */ { sortable: false, class: "center" },
/* 4 <banned> */ { sortable: false, class: "center" },
/* 5 <search-engine> */ { sortable: false, class: "center" }
]
});
');
// Delete any "unknown" visitors that are now "known".
// This could happen every time we create/update a rule.
WT_DB::exec("DELETE unknown" . " FROM `##site_access_rule` AS unknown" . " JOIN `##site_access_rule` AS known ON (unknown.user_agent_pattern LIKE known.user_agent_pattern)" . " WHERE unknown.rule='unknown' AND known.rule<>'unknown'" . " AND unknown.ip_address_start BETWEEN known.ip_address_start AND known.ip_address_end");
?>
<h2><?php
echo WT_I18N::translate('Restrict access to the site, using IP addresses and user-agent strings');
?>
</h2>
<p><?php
echo WT_I18N::translate('The following rules are used to decide whether a visitor is a human being (allow full access), a search-engine robot (allow restricted access) or an unwanted crawler (deny all access).');
?>
</p>
<table id="site_access_rules" style="width:100%;">
<thead>
<tr>
//WT_DB::exec(
// "CREATE TABLE IF NOT EXISTS `##language` (".
// " language_tag VARCHAR(16) NOT NULL,".
// " iso15924_code CHAR(4) NOT NULL,".
// " cldr_code VARCHAR(16) NOT NULL,".
// " launchpad_code VARCHAR(16) NOT NULL,".
// " collation VARCHAR(16) NOT NULL,".
// " language_name VARCHAR(64) NOT NULL,".
// " language_name_base VARCHAR(64) NOT NULL,".
// " enabled ENUM ('yes', 'no') DEFAULT 'yes' NOT NULL,".
// " PRIMARY KEY (language_tag),".
// " INDEX (language_name_base, language_name)".
// ") COLLATE utf8_unicode_ci ENGINE=InnoDB"
//);
WT_DB::exec("CREATE TABLE IF NOT EXISTS `##site_access_rule` (" . " site_access_rule_id INTEGER NOT NULL AUTO_INCREMENT," . " ip_address_start INTEGER UNSIGNED NOT NULL DEFAULT 0," . " ip_address_end INTEGER UNSIGNED NOT NULL DEFAULT 4294967295," . " user_agent_pattern VARCHAR(255) NOT NULL," . " rule ENUM('allow', 'deny', 'robot', 'unknown') NOT NULL DEFAULT 'unknown'," . " comment VARCHAR(255) NOT NULL," . " updated TIMESTAMP NOT NULL DEFAULT CURRENT_TIMESTAMP ON UPDATE CURRENT_TIMESTAMP," . " PRIMARY KEY (site_access_rule_id)," . " UNIQUE KEY `##site_access_rule_ix1` (ip_address_end, ip_address_start, user_agent_pattern, rule)," . " KEY `##site_access_rule_ix2` (rule)" . ") ENGINE=InnoDB COLLATE=utf8_unicode_ci");
WT_DB::exec("INSERT IGNORE INTO `##site_access_rule` (user_agent_pattern, rule, comment) VALUES" . " ('Mozilla/5.0 (%) Gecko/% %/%', 'allow', 'Gecko-based browsers')," . " ('Mozilla/5.0 (%) AppleWebKit/% (KHTML, like Gecko)%', 'allow', 'WebKit-based browsers')," . " ('Opera/% (%) Presto/% Version/%', 'allow', 'Presto-based browsers')," . " ('Mozilla/% (compatible; MSIE %', 'allow', 'Trident-based browsers')," . " ('Mozilla/% (Windows%; Trident%; rv:%) like Gecko', 'allow', 'Modern Internet Explorer')," . " ('Mozilla/5.0 (compatible; Konqueror/%', 'allow', 'Konqueror browser')");
WT_DB::prepare("INSERT IGNORE INTO `##gedcom` (gedcom_id, gedcom_name) VALUES " . " (-1, 'DEFAULT_TREE')")->execute();
WT_DB::prepare("INSERT IGNORE INTO `##user` (user_id, user_name, real_name, email, password) VALUES " . " (-1, 'DEFAULT_USER', 'DEFAULT_USER', 'DEFAULT_USER', 'DEFAULT_USER'), (1, ?, ?, ?, ?)")->execute(array($_POST['wtuser'], $_POST['wtname'], $_POST['wtemail'], password_hash($_POST['wtpass'], PASSWORD_DEFAULT)));
WT_DB::prepare("INSERT IGNORE INTO `##user_setting` (user_id, setting_name, setting_value) VALUES " . " (1, 'canadmin', ?)," . " (1, 'language', ?)," . " (1, 'verified', ?)," . " (1, 'verified_by_admin', ?)," . " (1, 'editaccount', ?)," . " (1, 'auto_accept', ?)," . " (1, 'visibleonline', ?)")->execute(array(1, WT_LOCALE, 1, 1, 1, 0, 1));
WT_DB::prepare("INSERT IGNORE INTO `##site_setting` (setting_name, setting_value) VALUES " . "('WT_SCHEMA_VERSION', '-2')," . "('INDEX_DIRECTORY', 'data/')," . "('USE_REGISTRATION_MODULE', '1')," . "('REQUIRE_ADMIN_AUTH_REGISTRATION', '1')," . "('ALLOW_USER_THEMES', '1')," . "('ALLOW_CHANGE_GEDCOM', '1')," . "('SESSION_TIME', '7200')," . "('SMTP_ACTIVE', 'internal')," . "('SMTP_HOST', 'localhost')," . "('SMTP_PORT', '25')," . "('SMTP_AUTH', '1')," . "('SMTP_AUTH_USER', '')," . "('SMTP_AUTH_PASS', '')," . "('SMTP_SSL', 'none')," . "('SMTP_HELO', ?)," . "('SMTP_FROM_NAME', ?)")->execute(array($_SERVER['SERVER_NAME'], $_SERVER['SERVER_NAME']));
// Search for all installed modules, and enable them.
WT_Module::getInstalledModules('enabled');
// Create the default settings for new users/family trees
WT_DB::prepare("INSERT INTO `##block` (user_id, location, block_order, module_name) VALUES (-1, 'main', 1, 'todays_events'), (-1, 'main', 2, 'user_messages'), (-1, 'main', 3, 'user_favorites'), (-1, 'side', 1, 'user_welcome'), (-1, 'side', 2, 'random_media'), (-1, 'side', 3, 'upcoming_events'), (-1, 'side', 4, 'logged_in')")->execute();
WT_DB::prepare("INSERT INTO `##block` (gedcom_id, location, block_order, module_name) VALUES (-1, 'main', 1, 'gedcom_stats'), (-1, 'main', 2, 'gedcom_news'), (-1, 'main', 3, 'gedcom_favorites'), (-1, 'main', 4, 'review_changes'), (-1, 'side', 1, 'gedcom_block'), (-1, 'side', 2, 'random_media'), (-1, 'side', 3, 'todays_events'), (-1, 'side', 4, 'logged_in')")->execute();
// Create the blocks for the admin user
WT_DB::prepare("INSERT INTO `##block` (user_id, location, block_order, module_name)" . " SELECT 1, location, block_order, module_name" . " FROM `##block`" . " WHERE user_id=-1")->execute();
// Write the config file. We already checked that this would work.
$config_ini_php = '; <' . '?php exit; ?' . '> DO NOT DELETE THIS LINE' . PHP_EOL . 'dbhost="' . addcslashes($_POST['dbhost'], '"') . '"' . PHP_EOL . 'dbport="' . addcslashes($_POST['dbport'], '"') . '"' . PHP_EOL . 'dbuser="******"') . '"' . PHP_EOL . 'dbpass="******"') . '"' . PHP_EOL . 'dbname="' . addcslashes($_POST['dbname'], '"') . '"' . PHP_EOL . 'tblpfx="' . addcslashes($_POST['tblpfx'], '"') . '"' . PHP_EOL;
file_put_contents(WT_DATA_DIR . 'config.ini.php', $config_ini_php);
// Done - start using webtrees
// It shouldn't do anything that might take more than a few
// seconds, for systems with low timeout values.
//
// 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
if (!defined('WT_WEBTREES')) {
header('HTTP/1.0 403 Forbidden');
exit;
}
// Add the new constraints
try {
WT_DB::exec("ALTER TABLE `##favorite` CHANGE note note VARCHAR(1000) NULL");
} catch (PDOException $ex) {
// Already updated?
}
// Update the version to indicate success
WT_Site::preference($schema_name, $next_version);
// 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
if (!defined('WT_WEBTREES')) {
header('HTTP/1.0 403 Forbidden');
exit;
}
// Delete old/unused settings
WT_DB::exec("DELETE FROM `##gedcom_setting` WHERE setting_name IN ('USE_GEONAMES')");
try {
// Indexes created by setup.php or schema update 17-18
WT_DB::exec("ALTER TABLE `##site_access_rule` DROP INDEX ix1, DROP INDEX ix2, DROP INDEX ix3");
// Indexes created by schema update 17-18
WT_DB::exec("ALTER TABLE `##site_access_rule` DROP INDEX ix4, DROP INDEX ix5, DROP INDEX ix6");
} catch (Exception $ex) {
// Already done?
}
// User data may contains duplicates - these will prevent us from creating the new indexes
WT_DB::exec("DELETE t1 FROM `##site_access_rule` AS t1 JOIN (SELECT MIN(site_access_rule_id) AS site_access_rule_id, ip_address_end, ip_address_start, user_agent_pattern FROM `##site_access_rule`) AS t2 ON t1.ip_address_end = t2.ip_address_end AND t1.ip_address_start = t2.ip_address_start AND t1.user_agent_pattern = t2.user_agent_pattern AND t1.site_access_rule_id <> t2.site_access_rule_id");
// ix1 - covering index for visitor lookup
// ix2 - for total counts in admin page
//try {
WT_DB::exec("ALTER TABLE `##site_access_rule` ADD UNIQUE INDEX `##site_access_rule_ix1` (ip_address_end, ip_address_start, user_agent_pattern, rule), ADD INDEX `##site_access_rule_ix2` (rule)");
//} catch (Exception $ex) {
// Already done?
//}
// Update the version to indicate success
WT_Site::preference($schema_name, $next_version);
