.
*/
/**
* Class Place - Gedcom Place functionality.
*/
class Place {
const GEDCOM_SEPARATOR = ', ';
/**
* @var string[] e.g. array('Westminster', 'London', 'England')
*/
private $gedcom_place;
/**
* @var Tree We may have the same place name in different trees
*/
private $tree;
/**
* @param string $gedcom_place
* @param Tree $tree
*/
public function __construct($gedcom_place, $tree) {
if ($gedcom_place) {
$this->gedcom_place = explode(self::GEDCOM_SEPARATOR, $gedcom_place);
} else {
// Empty => "Top level"
$this->gedcom_place = array();
}
$this->gedcom_id = $tree;
}
/**
* @return integer
*/
public function getPlaceId() {
$place_id = 0;
foreach (array_reverse($this->gedcom_place) as $place) {
$place_id = Database::prepare(
"SELECT SQL_CACHE p_id FROM `##places` WHERE p_parent_id = :parent_id AND p_place = :place AND p_file = :tree_id"
)->execute(array(
'parent_id' => $place_id,
'place' => $place,
'tree_id' => $this->gedcom_id,
))->fetchOne();
}
return $place_id;
}
/**
* @return Place
*/
public function getParentPlace() {
return new Place(implode(self::GEDCOM_SEPARATOR, array_slice($this->gedcom_place, 1)), $this->tree);
}
/**
* @return Place[]
*/
public function getChildPlaces() {
$children = array();
if ($this->getPlaceId()) {
$parent_text = self::GEDCOM_SEPARATOR . $this->getGedcomName();
} else {
$parent_text = '';
}
$rows = Database::prepare(
"SELECT SQL_CACHE p_place FROM `##places`" .
" WHERE p_parent_id = :parent_id AND p_file = :tree_id" .
" ORDER BY p_place COLLATE :collation"
)->execute(array(
'parent_id' => $this->getPlaceId(),
'tree_id' => $this->gedcom_id,
'collation' => I18N::$collation,
))->fetchOneColumn();
foreach ($rows as $row) {
$children[] = new Place($row . $parent_text, $this->tree);
}
return $children;
}
/**
* @return string
*/
public function getURL() {
$url = 'placelist.php';
foreach (array_reverse($this->gedcom_place) as $n => $place) {
$url .= $n ? '&' : '?';
$url .= 'parent%5B%5D=' . rawurlencode($place);
}
$url .= '&ged=' . rawurlencode(get_gedcom_from_id($this->gedcom_id));
return $url;
}
/**
* @return string
*/
public function getGedcomName() {
return implode(self::GEDCOM_SEPARATOR, $this->gedcom_place);
}
/**
* @return string
*/
public function getPlaceName() {
$place = reset($this->gedcom_place);
return $place ? '' . Filter::escapeHtml($place) . '' : I18N::translate('unknown');
}
/**
* @return bool
*/
public function isEmpty() {
return empty($this->gedcom_place);
}
/**
* @return string
*/
public function getFullName() {
if (true) {
// If a place hierarchy is a single entity
return '' . Filter::escapeHtml(implode(I18N::$list_separator, $this->gedcom_place)) . '';
} else {
// If a place hierarchy is a list of distinct items
$tmp = array();
foreach ($this->gedcom_place as $place) {
$tmp[] = '' . Filter::escapeHtml($place) . '';
}
return implode(I18N::$list_separator, $tmp);
}
}
/**
* For lists and charts, where the full name won’t fit.
*
* @return string
*/
public function getShortName() {
$SHOW_PEDIGREE_PLACES = Tree::findById($this->gedcom_id)->getPreference('SHOW_PEDIGREE_PLACES');
if ($SHOW_PEDIGREE_PLACES >= count($this->gedcom_place)) {
// A short place name - no need to abbreviate
return $this->getFullName();
} else {
// Abbreviate the place name, for lists
if (Tree::findById($this->gedcom_id)->getPreference('SHOW_PEDIGREE_PLACES_SUFFIX')) {
// The *last* $SHOW_PEDIGREE_PLACES components
$short_name = implode(self::GEDCOM_SEPARATOR, array_slice($this->gedcom_place, -$SHOW_PEDIGREE_PLACES));
} else {
// The *first* $SHOW_PEDIGREE_PLACES components
$short_name = implode(self::GEDCOM_SEPARATOR, array_slice($this->gedcom_place, 0, $SHOW_PEDIGREE_PLACES));
}
// Add a tool-tip showing the full name
return '' . Filter::escapeHtml($short_name) . '';
}
}
/**
* For the "view all" option of placelist.php and find.php
*
* @return string
*/
public function getReverseName() {
$tmp = array();
foreach (array_reverse($this->gedcom_place) as $place) {
$tmp[] = '' . Filter::escapeHtml($place) . '';
}
return implode(I18N::$list_separator, $tmp);
}
/**
* @param Tree $tree
*
* @return string[]
*/
public static function allPlaces($tree) {
$places = array();
$rows =
Database::prepare(
"SELECT SQL_CACHE CONCAT_WS(', ', p1.p_place, p2.p_place, p3.p_place, p4.p_place, p5.p_place, p6.p_place, p7.p_place, p8.p_place, p9.p_place)" .
" FROM `##places` AS p1" .
" LEFT JOIN `##places` AS p2 ON (p1.p_parent_id =p 2.p_id)" .
" LEFT JOIN `##places` AS p3 ON (p2.p_parent_id = p3.p_id)" .
" LEFT JOIN `##places` AS p4 ON (p3.p_parent_id = p4.p_id)" .
" LEFT JOIN `##places` AS p5 ON (p4.p_parent_id = p5.p_id)" .
" LEFT JOIN `##places` AS p6 ON (p5.p_parent_id = p6.p_id)" .
" LEFT JOIN `##places` AS p7 ON (p6.p_parent_id = p7.p_id)" .
" LEFT JOIN `##places` AS p8 ON (p7.p_parent_id = p8.p_id)" .
" LEFT JOIN `##places` AS p9 ON (p8.p_parent_id = p9.p_id)" .
" WHERE p1.p_file = :tree_id" .
" ORDER BY CONCAT_WS(', ', p9.p_place, p8.p_place, p7.p_place, p6.p_place, p5.p_place, p4.p_place, p3.p_place, p2.p_place, p1.p_place) COLLATE '" . I18N::$collation . "'"
)
->execute(array(
'tree_id' => $tree->getTreeId()
))->fetchOneColumn();
foreach ($rows as $row) {
$places[] = new Place($row, $tree);
}
return $places;
}
/**
* @param string $filter
* @param Tree $tree
*
* @return Place[]
*/
public static function findPlaces($filter, $tree) {
$places = array();
$rows =
Database::prepare(
"SELECT SQL_CACHE CONCAT_WS(', ', p1.p_place, p2.p_place, p3.p_place, p4.p_place, p5.p_place, p6.p_place, p7.p_place, p8.p_place, p9.p_place)" .
" FROM `##places` AS p1" .
" LEFT JOIN `##places` AS p2 ON (p1.p_parent_id = p2.p_id)" .
" LEFT JOIN `##places` AS p3 ON (p2.p_parent_id = p3.p_id)" .
" LEFT JOIN `##places` AS p4 ON (p3.p_parent_id = p4.p_id)" .
" LEFT JOIN `##places` AS p5 ON (p4.p_parent_id = p5.p_id)" .
" LEFT JOIN `##places` AS p6 ON (p5.p_parent_id = p6.p_id)" .
" LEFT JOIN `##places` AS p7 ON (p6.p_parent_id = p7.p_id)" .
" LEFT JOIN `##places` AS p8 ON (p7.p_parent_id = p8.p_id)" .
" LEFT JOIN `##places` AS p9 ON (p8.p_parent_id = p9.p_id)" .
" WHERE CONCAT_WS(', ', p1.p_place, p2.p_place, p3.p_place, p4.p_place, p5.p_place, p6.p_place, p7.p_place, p8.p_place, p9.p_place) LIKE CONCAT('%', :filter_1, '%') AND CONCAT_WS(', ', p1.p_place, p2.p_place, p3.p_place, p4.p_place, p5.p_place, p6.p_place, p7.p_place, p8.p_place, p9.p_place) NOT LIKE CONCAT('%,%', :filter_2, '%') AND p1.p_file = :tree_id" .
" ORDER BY CONCAT_WS(', ', p1.p_place, p2.p_place, p3.p_place, p4.p_place, p5.p_place, p6.p_place, p7.p_place, p8.p_place, p9.p_place) COLLATE '" . I18N::$collation . "'"
)->execute(array(
'filter_1' => preg_quote($filter),
'filter_2' => preg_quote($filter),
'tree_id' => $tree->getTreeId()
))->fetchOneColumn();
foreach ($rows as $row) {
$places[] = new Place($row, $tree);
}
return $places;
}
}