fisharebest / webtrees

app/Fact.php

Indentation +561 added lines, -561 removed lines

@@ -21,565 +21,565 @@
  * A GEDCOM fact or event object.
  */
 class Fact {
-	/** @var string Unique identifier for this fact (currently implemented as a hash of the raw data). */
-	private $fact_id;
-
-	/** @var GedcomRecord The GEDCOM record from which this fact is taken */
-	private $parent;
-
-	/** @var string The raw GEDCOM data for this fact */
-	private $gedcom;
-
-	/** @var string The GEDCOM tag for this record */
-	private $tag;
-
-	/** @var bool Is this a recently deleted fact, pending approval? */
-	private $pending_deletion = false;
-
-	/** @var bool Is this a recently added fact, pending approval? */
-	private $pending_addition = false;
-
-	/** @var Date The date of this fact, from the “2 DATE …” attribute */
-	private $date;
-
-	/** @var Place The place of this fact, from the “2 PLAC …” attribute */
-	private $place;
-
-	/** @var int Temporary(!) variable Used by Functions::sortFacts() */
-	public $sortOrder;
-
-	/**
-	 * Create an event object from a gedcom fragment.
-	 * We need the parent object (to check privacy) and a (pseudo) fact ID to
-	 * identify the fact within the record.
-	 *
-	 * @param string          $gedcom
-	 * @param GedcomRecord $parent
-	 * @param string          $fact_id
-	 *
-	 * @throws \InvalidArgumentException
-	 */
-	public function __construct($gedcom, GedcomRecord $parent, $fact_id) {
-		if (preg_match('/^1 (' . WT_REGEX_TAG . ')/', $gedcom, $match)) {
-			$this->gedcom  = $gedcom;
-			$this->parent  = $parent;
-			$this->fact_id = $fact_id;
-			$this->tag     = $match[1];
-		} else {
-			throw new \InvalidArgumentException('Invalid GEDCOM data passed to Fact::_construct(' . $gedcom . ')');
-		}
-	}
-
-	/**
-	 * Get the value of level 1 data in the fact
-	 * Allow for multi-line values
-	 *
-	 * @return string|null
-	 */
-	public function getValue() {
-		if (preg_match('/^1 (?:' . $this->tag . ') ?(.*(?:(?:\n2 CONT ?.*)*))/', $this->gedcom, $match)) {
-			return preg_replace("/\n2 CONT ?/", "\n", $match[1]);
-		} else {
-			return null;
-		}
-	}
-
-	/**
-	 * Get the record to which this fact links
-	 *
-	 * @return Individual|Family|Source|Repository|Media|Note|null
-	 */
-	public function getTarget() {
-		$xref = trim($this->getValue(), '@');
-		switch ($this->tag) {
-		case 'FAMC':
-		case 'FAMS':
-			return Family::getInstance($xref, $this->getParent()->getTree());
-		case 'HUSB':
-		case 'WIFE':
-		case 'CHIL':
-			return Individual::getInstance($xref, $this->getParent()->getTree());
-		case 'SOUR':
-			return Source::getInstance($xref, $this->getParent()->getTree());
-		case 'OBJE':
-			return Media::getInstance($xref, $this->getParent()->getTree());
-		case 'REPO':
-			return Repository::getInstance($xref, $this->getParent()->getTree());
-		case 'NOTE':
-			return Note::getInstance($xref, $this->getParent()->getTree());
-		default:
-			return GedcomRecord::getInstance($xref, $this->getParent()->getTree());
-		}
-	}
-
-	/**
-	 * Get the value of level 2 data in the fact
-	 *
-	 * @param string $tag
-	 *
-	 * @return string|null
-	 */
-	public function getAttribute($tag) {
-		if (preg_match('/\n2 (?:' . $tag . ') ?(.*(?:(?:\n3 CONT ?.*)*)*)/', $this->gedcom, $match)) {
-			return preg_replace("/\n3 CONT ?/", "\n", $match[1]);
-		} else {
-			return null;
-		}
-	}
-
-	/**
-	 * Do the privacy rules allow us to display this fact to the current user
-	 *
-	 * @param int|null $access_level
-	 *
-	 * @return bool
-	 */
-	public function canShow($access_level = null) {
-		if ($access_level === null) {
-			$access_level = Auth::accessLevel($this->getParent()->getTree());
-		}
-
-		// Does this record have an explicit RESN?
-		if (strpos($this->gedcom, "\n2 RESN confidential")) {
-			return Auth::PRIV_NONE >= $access_level;
-		}
-		if (strpos($this->gedcom, "\n2 RESN privacy")) {
-			return Auth::PRIV_USER >= $access_level;
-		}
-		if (strpos($this->gedcom, "\n2 RESN none")) {
-			return true;
-		}
-
-		// Does this record have a default RESN?
-		$xref                    = $this->parent->getXref();
-		$fact_privacy            = $this->parent->getTree()->getFactPrivacy();
-		$individual_fact_privacy = $this->parent->getTree()->getIndividualFactPrivacy();
-		if (isset($individual_fact_privacy[$xref][$this->tag])) {
-			return $individual_fact_privacy[$xref][$this->tag] >= $access_level;
-		}
-		if (isset($fact_privacy[$this->tag])) {
-			return $fact_privacy[$this->tag] >= $access_level;
-		}
-
-		// No restrictions - it must be public
-		return true;
-	}
-
-	/**
-	 * Check whether this fact is protected against edit
-	 *
-	 * @return bool
-	 */
-	public function canEdit() {
-		// Managers can edit anything
-		// Members cannot edit RESN, CHAN and locked records
-		return
-			$this->parent->canEdit() && !$this->isPendingDeletion() && (
-				Auth::isManager($this->parent->getTree()) ||
-				Auth::isEditor($this->parent->getTree()) && strpos($this->gedcom, "\n2 RESN locked") === false && $this->getTag() != 'RESN' && $this->getTag() != 'CHAN'
-			);
-	}
-
-	/**
-	 * The place where the event occured.
-	 *
-	 * @return Place
-	 */
-	public function getPlace() {
-		if ($this->place === null) {
-			$this->place = new Place($this->getAttribute('PLAC'), $this->getParent()->getTree());
-		}
-
-		return $this->place;
-	}
-
-	/**
-	 * Get the date for this fact.
-	 * We can call this function many times, especially when sorting,
-	 * so keep a copy of the date.
-	 *
-	 * @return Date
-	 */
-	public function getDate() {
-		if ($this->date === null) {
-			$this->date = new Date($this->getAttribute('DATE'));
-		}
-
-		return $this->date;
-	}
-
-	/**
-	 * The raw GEDCOM data for this fact
-	 *
-	 * @return string
-	 */
-	public function getGedcom() {
-		return $this->gedcom;
-	}
-
-	/**
-	 * Get a (pseudo) primary key for this fact.
-	 *
-	 * @return string
-	 */
-	public function getFactId() {
-		return $this->fact_id;
-	}
-
-	// What sort of fact is this?
-	/**
-	 * What is the tag (type) of this fact, such as BIRT, MARR or DEAT.
-	 *
-	 * @return string
-	 */
-	public function getTag() {
-		return $this->tag;
-	}
-
-	/**
-	 * Used to convert a real fact (e.g. BIRT) into a close-relative’s fact (e.g. _BIRT_CHIL)
-	 *
-	 * @param string $tag
-	 */
-	public function setTag($tag) {
-		$this->tag = $tag;
-	}
-
-	//
-	/**
-	 * The Person/Family record where this Fact came from
-	 *
-	 * @return Individual|Family|Source|Repository|Media|Note|GedcomRecord
-	 */
-	public function getParent() {
-		return $this->parent;
-	}
-
-	/**
-	 * Get the name of this fact type, for use as a label.
-	 *
-	 * @return string
-	 */
-	public function getLabel() {
-		switch ($this->tag) {
-		case 'EVEN':
-		case 'FACT':
-			if ($this->getAttribute('TYPE')) {
-				// Custom FACT/EVEN - with a TYPE
-				return I18N::translate(Filter::escapeHtml($this->getAttribute('TYPE')));
-			}
-			// no break - drop into next case
-		default:
-			return GedcomTag::getLabel($this->tag, $this->parent);
-		}
-	}
-
-	/**
-	 * This is a newly deleted fact, pending approval.
-	 */
-	public function setPendingDeletion() {
-		$this->pending_deletion = true;
-		$this->pending_addition = false;
-	}
-
-	/**
-	 * Is this a newly deleted fact, pending approval.
-	 *
-	 * @return bool
-	 */
-	public function isPendingDeletion() {
-		return $this->pending_deletion;
-	}
-
-	/**
-	 * This is a newly added fact, pending approval.
-	 */
-	public function setPendingAddition() {
-		$this->pending_addition = true;
-		$this->pending_deletion = false;
-	}
-
-	/**
-	 * Is this a newly added fact, pending approval.
-	 *
-	 * @return bool
-	 */
-	public function isPendingAddition() {
-		return $this->pending_addition;
-	}
-
-	/**
-	 * Source citations linked to this fact
-	 *
-	 * @return string[]
-	 */
-	public function getCitations() {
-		preg_match_all('/\n(2 SOUR @(' . WT_REGEX_XREF . ')@(?:\n[3-9] .*)*)/', $this->getGedcom(), $matches, PREG_SET_ORDER);
-		$citations = array();
-		foreach ($matches as $match) {
-			$source = Source::getInstance($match[2], $this->getParent()->getTree());
-			if ($source->canShow()) {
-				$citations[] = $match[1];
-			}
-		}
-
-		return $citations;
-	}
-
-	/**
-	 * Notes (inline and objects) linked to this fact
-	 *
-	 * @return string[]|Note[]
-	 */
-	public function getNotes() {
-		$notes = array();
-		preg_match_all('/\n2 NOTE ?(.*(?:\n3.*)*)/', $this->getGedcom(), $matches);
-		foreach ($matches[1] as $match) {
-			$note = preg_replace("/\n3 CONT ?/", "\n", $match);
-			if (preg_match('/@(' . WT_REGEX_XREF . ')@/', $note, $nmatch)) {
-				$note = Note::getInstance($nmatch[1], $this->getParent()->getTree());
-				if ($note && $note->canShow()) {
-					// A note object
-					$notes[] = $note;
-				}
-			} else {
-				// An inline note
-				$notes[] = $note;
-			}
-		}
-
-		return $notes;
-	}
-
-	/**
-	 * Media objects linked to this fact
-	 *
-	 * @return Media[]
-	 */
-	public function getMedia() {
-		$media = array();
-		preg_match_all('/\n2 OBJE @(' . WT_REGEX_XREF . ')@/', $this->getGedcom(), $matches);
-		foreach ($matches[1] as $match) {
-			$obje = Media::getInstance($match, $this->getParent()->getTree());
-			if ($obje->canShow()) {
-				$media[] = $obje;
-			}
-		}
-
-		return $media;
-	}
-
-	/**
-	 * A one-line summary of the fact - for charts, etc.
-	 *
-	 * @return string
-	 */
-	public function summary() {
-		$attributes = array();
-		$target     = $this->getTarget();
-		if ($target) {
-			$attributes[] = $target->getFullName();
-		} else {
-			// Fact value
-			$value = $this->getValue();
-			if ($value !== '' && $value !== 'Y') {
-				$attributes[] = '<span dir="auto">' . Filter::escapeHtml($value) . '</span>';
-			}
-			// Fact date
-			$date = $this->getDate();
-			if ($date->isOK()) {
-				if (in_array($this->getTag(), explode('|', WT_EVENTS_BIRT)) && $this->getParent() instanceof Individual && $this->getParent()->getTree()->getPreference('SHOW_PARENTS_AGE')) {
-					$attributes[] = $date->display() . FunctionsPrint::formatParentsAges($this->getParent(), $date);
-				} else {
-					$attributes[] = $date->display();
-				}
-			}
-			// Fact place
-			if (!$this->getPlace()->isEmpty()) {
-				$attributes[] = $this->getPlace()->getShortName();
-			}
-		}
-
-		$class = 'fact_' . $this->getTag();
-		if ($this->isPendingAddition()) {
-			$class .= ' new';
-		} elseif ($this->isPendingDeletion()) {
-			$class .= ' old';
-		}
-
-		return
-			'<div class="' . $class . '">' .
-			/* I18N: a label/value pair, such as “Occupation: Farmer”. Some languages may need to change the punctuation. */
-			I18N::translate('<span class="label">%1$s:</span> <span class="field" dir="auto">%2$s</span>', $this->getLabel(), implode(' — ', $attributes)) .
-			'</div>';
-	}
-
-	/**
-	 * Static Helper functions to sort events
-	 *
-	 * @param Fact $a Fact one
-	 * @param Fact $b Fact two
-	 *
-	 * @return int
-	 */
-	public static function compareDate(Fact $a, Fact $b) {
-		if ($a->getDate()->isOK() && $b->getDate()->isOK()) {
-			// If both events have dates, compare by date
-			$ret = Date::compare($a->getDate(), $b->getDate());
-
-			if ($ret == 0) {
-				// If dates are the same, compare by fact type
-				$ret = self::compareType($a, $b);
-
-				// If the fact type is also the same, retain the initial order
-				if ($ret == 0) {
-					$ret = $a->sortOrder - $b->sortOrder;
-				}
-			}
-
-			return $ret;
-		} else {
-			// One or both events have no date - retain the initial order
-			return $a->sortOrder - $b->sortOrder;
-		}
-	}
-
-	/**
-	 * Static method to compare two events by their type.
-	 *
-	 * @param Fact $a Fact one
-	 * @param Fact $b Fact two
-	 *
-	 * @return int
-	 */
-	public static function compareType(Fact $a, Fact $b) {
-		global $factsort;
-
-		if (empty($factsort)) {
-			$factsort = array_flip(
-				array(
-					'BIRT',
-					'_HNM',
-					'ALIA', '_AKA', '_AKAN',
-					'ADOP', '_ADPF', '_ADPF',
-					'_BRTM',
-					'CHR', 'BAPM',
-					'FCOM',
-					'CONF',
-					'BARM', 'BASM',
-					'EDUC',
-					'GRAD',
-					'_DEG',
-					'EMIG', 'IMMI',
-					'NATU',
-					'_MILI', '_MILT',
-					'ENGA',
-					'MARB', 'MARC', 'MARL', '_MARI', '_MBON',
-					'MARR', 'MARR_CIVIL', 'MARR_RELIGIOUS', 'MARR_PARTNERS', 'MARR_UNKNOWN', '_COML',
-					'_STAT',
-					'_SEPR',
-					'DIVF',
-					'MARS',
-					'_BIRT_CHIL',
-					'DIV', 'ANUL',
-					'_BIRT_', '_MARR_', '_DEAT_', '_BURI_', // other events of close relatives
-					'CENS',
-					'OCCU',
-					'RESI',
-					'PROP',
-					'CHRA',
-					'RETI',
-					'FACT', 'EVEN',
-					'_NMR', '_NMAR', 'NMR',
-					'NCHI',
-					'WILL',
-					'_HOL',
-					'_????_',
-					'DEAT',
-					'_FNRL', 'CREM', 'BURI', '_INTE',
-					'_YART',
-					'_NLIV',
-					'PROB',
-					'TITL',
-					'COMM',
-					'NATI',
-					'CITN',
-					'CAST',
-					'RELI',
-					'SSN', 'IDNO',
-					'TEMP',
-					'SLGC', 'BAPL', 'CONL', 'ENDL', 'SLGS',
-					'ADDR', 'PHON', 'EMAIL', '_EMAIL', 'EMAL', 'FAX', 'WWW', 'URL', '_URL',
-					'FILE', // For media objects
-					'AFN', 'REFN', '_PRMN', 'REF', 'RIN', '_UID',
-					'OBJE', 'NOTE', 'SOUR',
-					'CHAN', '_TODO',
-				)
-			);
-		}
-
-		// Facts from same families stay grouped together
-		// Keep MARR and DIV from the same families from mixing with events from other FAMs
-		// Use the original order in which the facts were added
-		if ($a->parent instanceof Family && $b->parent instanceof Family && $a->parent !== $b->parent) {
-			return $a->sortOrder - $b->sortOrder;
-		}
-
-		$atag = $a->getTag();
-		$btag = $b->getTag();
-
-		// Events not in the above list get mapped onto one that is.
-		if (!array_key_exists($atag, $factsort)) {
-			if (preg_match('/^(_(BIRT|MARR|DEAT|BURI)_)/', $atag, $match)) {
-				$atag = $match[1];
-			} else {
-				$atag = "_????_";
-			}
-		}
-
-		if (!array_key_exists($btag, $factsort)) {
-			if (preg_match('/^(_(BIRT|MARR|DEAT|BURI)_)/', $btag, $match)) {
-				$btag = $match[1];
-			} else {
-				$btag = "_????_";
-			}
-		}
-
-		// - Don't let dated after DEAT/BURI facts sort non-dated facts before DEAT/BURI
-		// - Treat dated after BURI facts as BURI instead
-		if ($a->getAttribute('DATE') !== null && $factsort[$atag] > $factsort['BURI'] && $factsort[$atag] < $factsort['CHAN']) {
-			$atag = 'BURI';
-		}
-
-		if ($b->getAttribute('DATE') !== null && $factsort[$btag] > $factsort['BURI'] && $factsort[$btag] < $factsort['CHAN']) {
-			$btag = 'BURI';
-		}
-
-		$ret = $factsort[$atag] - $factsort[$btag];
-
-		// If facts are the same then put dated facts before non-dated facts
-		if ($ret == 0) {
-			if ($a->getAttribute('DATE') !== null && $b->getAttribute('DATE') === null) {
-				return -1;
-			}
-
-			if ($b->getAttribute('DATE') !== null && $a->getAttribute('DATE') === null) {
-				return 1;
-			}
-
-			// If no sorting preference, then keep original ordering
-			$ret = $a->sortOrder - $b->sortOrder;
-		}
-
-		return $ret;
-	}
-
-	/**
-	 * Allow native PHP functions such as array_unique() to work with objects
-	 *
-	 * @return string
-	 */
-	public function __toString() {
-		return $this->fact_id . '@' . $this->parent->getXref();
-	}
+    /** @var string Unique identifier for this fact (currently implemented as a hash of the raw data). */
+    private $fact_id;
+
+    /** @var GedcomRecord The GEDCOM record from which this fact is taken */
+    private $parent;
+
+    /** @var string The raw GEDCOM data for this fact */
+    private $gedcom;
+
+    /** @var string The GEDCOM tag for this record */
+    private $tag;
+
+    /** @var bool Is this a recently deleted fact, pending approval? */
+    private $pending_deletion = false;
+
+    /** @var bool Is this a recently added fact, pending approval? */
+    private $pending_addition = false;
+
+    /** @var Date The date of this fact, from the “2 DATE …” attribute */
+    private $date;
+
+    /** @var Place The place of this fact, from the “2 PLAC …” attribute */
+    private $place;
+
+    /** @var int Temporary(!) variable Used by Functions::sortFacts() */
+    public $sortOrder;
+
+    /**
+     * Create an event object from a gedcom fragment.
+     * We need the parent object (to check privacy) and a (pseudo) fact ID to
+     * identify the fact within the record.
+     *
+     * @param string          $gedcom
+     * @param GedcomRecord $parent
+     * @param string          $fact_id
+     *
+     * @throws \InvalidArgumentException
+     */
+    public function __construct($gedcom, GedcomRecord $parent, $fact_id) {
+        if (preg_match('/^1 (' . WT_REGEX_TAG . ')/', $gedcom, $match)) {
+            $this->gedcom  = $gedcom;
+            $this->parent  = $parent;
+            $this->fact_id = $fact_id;
+            $this->tag     = $match[1];
+        } else {
+            throw new \InvalidArgumentException('Invalid GEDCOM data passed to Fact::_construct(' . $gedcom . ')');
+        }
+    }
+
+    /**
+     * Get the value of level 1 data in the fact
+     * Allow for multi-line values
+     *
+     * @return string|null
+     */
+    public function getValue() {
+        if (preg_match('/^1 (?:' . $this->tag . ') ?(.*(?:(?:\n2 CONT ?.*)*))/', $this->gedcom, $match)) {
+            return preg_replace("/\n2 CONT ?/", "\n", $match[1]);
+        } else {
+            return null;
+        }
+    }
+
+    /**
+     * Get the record to which this fact links
+     *
+     * @return Individual|Family|Source|Repository|Media|Note|null
+     */
+    public function getTarget() {
+        $xref = trim($this->getValue(), '@');
+        switch ($this->tag) {
+        case 'FAMC':
+        case 'FAMS':
+            return Family::getInstance($xref, $this->getParent()->getTree());
+        case 'HUSB':
+        case 'WIFE':
+        case 'CHIL':
+            return Individual::getInstance($xref, $this->getParent()->getTree());
+        case 'SOUR':
+            return Source::getInstance($xref, $this->getParent()->getTree());
+        case 'OBJE':
+            return Media::getInstance($xref, $this->getParent()->getTree());
+        case 'REPO':
+            return Repository::getInstance($xref, $this->getParent()->getTree());
+        case 'NOTE':
+            return Note::getInstance($xref, $this->getParent()->getTree());
+        default:
+            return GedcomRecord::getInstance($xref, $this->getParent()->getTree());
+        }
+    }
+
+    /**
+     * Get the value of level 2 data in the fact
+     *
+     * @param string $tag
+     *
+     * @return string|null
+     */
+    public function getAttribute($tag) {
+        if (preg_match('/\n2 (?:' . $tag . ') ?(.*(?:(?:\n3 CONT ?.*)*)*)/', $this->gedcom, $match)) {
+            return preg_replace("/\n3 CONT ?/", "\n", $match[1]);
+        } else {
+            return null;
+        }
+    }
+
+    /**
+     * Do the privacy rules allow us to display this fact to the current user
+     *
+     * @param int|null $access_level
+     *
+     * @return bool
+     */
+    public function canShow($access_level = null) {
+        if ($access_level === null) {
+            $access_level = Auth::accessLevel($this->getParent()->getTree());
+        }
+
+        // Does this record have an explicit RESN?
+        if (strpos($this->gedcom, "\n2 RESN confidential")) {
+            return Auth::PRIV_NONE >= $access_level;
+        }
+        if (strpos($this->gedcom, "\n2 RESN privacy")) {
+            return Auth::PRIV_USER >= $access_level;
+        }
+        if (strpos($this->gedcom, "\n2 RESN none")) {
+            return true;
+        }
+
+        // Does this record have a default RESN?
+        $xref                    = $this->parent->getXref();
+        $fact_privacy            = $this->parent->getTree()->getFactPrivacy();
+        $individual_fact_privacy = $this->parent->getTree()->getIndividualFactPrivacy();
+        if (isset($individual_fact_privacy[$xref][$this->tag])) {
+            return $individual_fact_privacy[$xref][$this->tag] >= $access_level;
+        }
+        if (isset($fact_privacy[$this->tag])) {
+            return $fact_privacy[$this->tag] >= $access_level;
+        }
+
+        // No restrictions - it must be public
+        return true;
+    }
+
+    /**
+     * Check whether this fact is protected against edit
+     *
+     * @return bool
+     */
+    public function canEdit() {
+        // Managers can edit anything
+        // Members cannot edit RESN, CHAN and locked records
+        return
+            $this->parent->canEdit() && !$this->isPendingDeletion() && (
+                Auth::isManager($this->parent->getTree()) ||
+                Auth::isEditor($this->parent->getTree()) && strpos($this->gedcom, "\n2 RESN locked") === false && $this->getTag() != 'RESN' && $this->getTag() != 'CHAN'
+            );
+    }
+
+    /**
+     * The place where the event occured.
+     *
+     * @return Place
+     */
+    public function getPlace() {
+        if ($this->place === null) {
+            $this->place = new Place($this->getAttribute('PLAC'), $this->getParent()->getTree());
+        }
+
+        return $this->place;
+    }
+
+    /**
+     * Get the date for this fact.
+     * We can call this function many times, especially when sorting,
+     * so keep a copy of the date.
+     *
+     * @return Date
+     */
+    public function getDate() {
+        if ($this->date === null) {
+            $this->date = new Date($this->getAttribute('DATE'));
+        }
+
+        return $this->date;
+    }
+
+    /**
+     * The raw GEDCOM data for this fact
+     *
+     * @return string
+     */
+    public function getGedcom() {
+        return $this->gedcom;
+    }
+
+    /**
+     * Get a (pseudo) primary key for this fact.
+     *
+     * @return string
+     */
+    public function getFactId() {
+        return $this->fact_id;
+    }
+
+    // What sort of fact is this?
+    /**
+     * What is the tag (type) of this fact, such as BIRT, MARR or DEAT.
+     *
+     * @return string
+     */
+    public function getTag() {
+        return $this->tag;
+    }
+
+    /**
+     * Used to convert a real fact (e.g. BIRT) into a close-relative’s fact (e.g. _BIRT_CHIL)
+     *
+     * @param string $tag
+     */
+    public function setTag($tag) {
+        $this->tag = $tag;
+    }
+
+    //
+    /**
+     * The Person/Family record where this Fact came from
+     *
+     * @return Individual|Family|Source|Repository|Media|Note|GedcomRecord
+     */
+    public function getParent() {
+        return $this->parent;
+    }
+
+    /**
+     * Get the name of this fact type, for use as a label.
+     *
+     * @return string
+     */
+    public function getLabel() {
+        switch ($this->tag) {
+        case 'EVEN':
+        case 'FACT':
+            if ($this->getAttribute('TYPE')) {
+                // Custom FACT/EVEN - with a TYPE
+                return I18N::translate(Filter::escapeHtml($this->getAttribute('TYPE')));
+            }
+            // no break - drop into next case
+        default:
+            return GedcomTag::getLabel($this->tag, $this->parent);
+        }
+    }
+
+    /**
+     * This is a newly deleted fact, pending approval.
+     */
+    public function setPendingDeletion() {
+        $this->pending_deletion = true;
+        $this->pending_addition = false;
+    }
+
+    /**
+     * Is this a newly deleted fact, pending approval.
+     *
+     * @return bool
+     */
+    public function isPendingDeletion() {
+        return $this->pending_deletion;
+    }
+
+    /**
+     * This is a newly added fact, pending approval.
+     */
+    public function setPendingAddition() {
+        $this->pending_addition = true;
+        $this->pending_deletion = false;
+    }
+
+    /**
+     * Is this a newly added fact, pending approval.
+     *
+     * @return bool
+     */
+    public function isPendingAddition() {
+        return $this->pending_addition;
+    }
+
+    /**
+     * Source citations linked to this fact
+     *
+     * @return string[]
+     */
+    public function getCitations() {
+        preg_match_all('/\n(2 SOUR @(' . WT_REGEX_XREF . ')@(?:\n[3-9] .*)*)/', $this->getGedcom(), $matches, PREG_SET_ORDER);
+        $citations = array();
+        foreach ($matches as $match) {
+            $source = Source::getInstance($match[2], $this->getParent()->getTree());
+            if ($source->canShow()) {
+                $citations[] = $match[1];
+            }
+        }
+
+        return $citations;
+    }
+
+    /**
+     * Notes (inline and objects) linked to this fact
+     *
+     * @return string[]|Note[]
+     */
+    public function getNotes() {
+        $notes = array();
+        preg_match_all('/\n2 NOTE ?(.*(?:\n3.*)*)/', $this->getGedcom(), $matches);
+        foreach ($matches[1] as $match) {
+            $note = preg_replace("/\n3 CONT ?/", "\n", $match);
+            if (preg_match('/@(' . WT_REGEX_XREF . ')@/', $note, $nmatch)) {
+                $note = Note::getInstance($nmatch[1], $this->getParent()->getTree());
+                if ($note && $note->canShow()) {
+                    // A note object
+                    $notes[] = $note;
+                }
+            } else {
+                // An inline note
+                $notes[] = $note;
+            }
+        }
+
+        return $notes;
+    }
+
+    /**
+     * Media objects linked to this fact
+     *
+     * @return Media[]
+     */
+    public function getMedia() {
+        $media = array();
+        preg_match_all('/\n2 OBJE @(' . WT_REGEX_XREF . ')@/', $this->getGedcom(), $matches);
+        foreach ($matches[1] as $match) {
+            $obje = Media::getInstance($match, $this->getParent()->getTree());
+            if ($obje->canShow()) {
+                $media[] = $obje;
+            }
+        }
+
+        return $media;
+    }
+
+    /**
+     * A one-line summary of the fact - for charts, etc.
+     *
+     * @return string
+     */
+    public function summary() {
+        $attributes = array();
+        $target     = $this->getTarget();
+        if ($target) {
+            $attributes[] = $target->getFullName();
+        } else {
+            // Fact value
+            $value = $this->getValue();
+            if ($value !== '' && $value !== 'Y') {
+                $attributes[] = '<span dir="auto">' . Filter::escapeHtml($value) . '</span>';
+            }
+            // Fact date
+            $date = $this->getDate();
+            if ($date->isOK()) {
+                if (in_array($this->getTag(), explode('|', WT_EVENTS_BIRT)) && $this->getParent() instanceof Individual && $this->getParent()->getTree()->getPreference('SHOW_PARENTS_AGE')) {
+                    $attributes[] = $date->display() . FunctionsPrint::formatParentsAges($this->getParent(), $date);
+                } else {
+                    $attributes[] = $date->display();
+                }
+            }
+            // Fact place
+            if (!$this->getPlace()->isEmpty()) {
+                $attributes[] = $this->getPlace()->getShortName();
+            }
+        }
+
+        $class = 'fact_' . $this->getTag();
+        if ($this->isPendingAddition()) {
+            $class .= ' new';
+        } elseif ($this->isPendingDeletion()) {
+            $class .= ' old';
+        }
+
+        return
+            '<div class="' . $class . '">' .
+            /* I18N: a label/value pair, such as “Occupation: Farmer”. Some languages may need to change the punctuation. */
+            I18N::translate('<span class="label">%1$s:</span> <span class="field" dir="auto">%2$s</span>', $this->getLabel(), implode(' — ', $attributes)) .
+            '</div>';
+    }
+
+    /**
+     * Static Helper functions to sort events
+     *
+     * @param Fact $a Fact one
+     * @param Fact $b Fact two
+     *
+     * @return int
+     */
+    public static function compareDate(Fact $a, Fact $b) {
+        if ($a->getDate()->isOK() && $b->getDate()->isOK()) {
+            // If both events have dates, compare by date
+            $ret = Date::compare($a->getDate(), $b->getDate());
+
+            if ($ret == 0) {
+                // If dates are the same, compare by fact type
+                $ret = self::compareType($a, $b);
+
+                // If the fact type is also the same, retain the initial order
+                if ($ret == 0) {
+                    $ret = $a->sortOrder - $b->sortOrder;
+                }
+            }
+
+            return $ret;
+        } else {
+            // One or both events have no date - retain the initial order
+            return $a->sortOrder - $b->sortOrder;
+        }
+    }
+
+    /**
+     * Static method to compare two events by their type.
+     *
+     * @param Fact $a Fact one
+     * @param Fact $b Fact two
+     *
+     * @return int
+     */
+    public static function compareType(Fact $a, Fact $b) {
+        global $factsort;
+
+        if (empty($factsort)) {
+            $factsort = array_flip(
+                array(
+                    'BIRT',
+                    '_HNM',
+                    'ALIA', '_AKA', '_AKAN',
+                    'ADOP', '_ADPF', '_ADPF',
+                    '_BRTM',
+                    'CHR', 'BAPM',
+                    'FCOM',
+                    'CONF',
+                    'BARM', 'BASM',
+                    'EDUC',
+                    'GRAD',
+                    '_DEG',
+                    'EMIG', 'IMMI',
+                    'NATU',
+                    '_MILI', '_MILT',
+                    'ENGA',
+                    'MARB', 'MARC', 'MARL', '_MARI', '_MBON',
+                    'MARR', 'MARR_CIVIL', 'MARR_RELIGIOUS', 'MARR_PARTNERS', 'MARR_UNKNOWN', '_COML',
+                    '_STAT',
+                    '_SEPR',
+                    'DIVF',
+                    'MARS',
+                    '_BIRT_CHIL',
+                    'DIV', 'ANUL',
+                    '_BIRT_', '_MARR_', '_DEAT_', '_BURI_', // other events of close relatives
+                    'CENS',
+                    'OCCU',
+                    'RESI',
+                    'PROP',
+                    'CHRA',
+                    'RETI',
+                    'FACT', 'EVEN',
+                    '_NMR', '_NMAR', 'NMR',
+                    'NCHI',
+                    'WILL',
+                    '_HOL',
+                    '_????_',
+                    'DEAT',
+                    '_FNRL', 'CREM', 'BURI', '_INTE',
+                    '_YART',
+                    '_NLIV',
+                    'PROB',
+                    'TITL',
+                    'COMM',
+                    'NATI',
+                    'CITN',
+                    'CAST',
+                    'RELI',
+                    'SSN', 'IDNO',
+                    'TEMP',
+                    'SLGC', 'BAPL', 'CONL', 'ENDL', 'SLGS',
+                    'ADDR', 'PHON', 'EMAIL', '_EMAIL', 'EMAL', 'FAX', 'WWW', 'URL', '_URL',
+                    'FILE', // For media objects
+                    'AFN', 'REFN', '_PRMN', 'REF', 'RIN', '_UID',
+                    'OBJE', 'NOTE', 'SOUR',
+                    'CHAN', '_TODO',
+                )
+            );
+        }
+
+        // Facts from same families stay grouped together
+        // Keep MARR and DIV from the same families from mixing with events from other FAMs
+        // Use the original order in which the facts were added
+        if ($a->parent instanceof Family && $b->parent instanceof Family && $a->parent !== $b->parent) {
+            return $a->sortOrder - $b->sortOrder;
+        }
+
+        $atag = $a->getTag();
+        $btag = $b->getTag();
+
+        // Events not in the above list get mapped onto one that is.
+        if (!array_key_exists($atag, $factsort)) {
+            if (preg_match('/^(_(BIRT|MARR|DEAT|BURI)_)/', $atag, $match)) {
+                $atag = $match[1];
+            } else {
+                $atag = "_????_";
+            }
+        }
+
+        if (!array_key_exists($btag, $factsort)) {
+            if (preg_match('/^(_(BIRT|MARR|DEAT|BURI)_)/', $btag, $match)) {
+                $btag = $match[1];
+            } else {
+                $btag = "_????_";
+            }
+        }
+
+        // - Don't let dated after DEAT/BURI facts sort non-dated facts before DEAT/BURI
+        // - Treat dated after BURI facts as BURI instead
+        if ($a->getAttribute('DATE') !== null && $factsort[$atag] > $factsort['BURI'] && $factsort[$atag] < $factsort['CHAN']) {
+            $atag = 'BURI';
+        }
+
+        if ($b->getAttribute('DATE') !== null && $factsort[$btag] > $factsort['BURI'] && $factsort[$btag] < $factsort['CHAN']) {
+            $btag = 'BURI';
+        }
+
+        $ret = $factsort[$atag] - $factsort[$btag];
+
+        // If facts are the same then put dated facts before non-dated facts
+        if ($ret == 0) {
+            if ($a->getAttribute('DATE') !== null && $b->getAttribute('DATE') === null) {
+                return -1;
+            }
+
+            if ($b->getAttribute('DATE') !== null && $a->getAttribute('DATE') === null) {
+                return 1;
+            }
+
+            // If no sorting preference, then keep original ordering
+            $ret = $a->sortOrder - $b->sortOrder;
+        }
+
+        return $ret;
+    }
+
+    /**
+     * Allow native PHP functions such as array_unique() to work with objects
+     *
+     * @return string
+     */
+    public function __toString() {
+        return $this->fact_id . '@' . $this->parent->getXref();
+    }
 }

Switch Indentation +26 added lines, -26 removed lines

@@ -92,23 +92,23 @@ 
 	public function getTarget() {
 		$xref = trim($this->getValue(), '@');
 		switch ($this->tag) {
-		case 'FAMC':
-		case 'FAMS':
-			return Family::getInstance($xref, $this->getParent()->getTree());
-		case 'HUSB':
-		case 'WIFE':
-		case 'CHIL':
-			return Individual::getInstance($xref, $this->getParent()->getTree());
-		case 'SOUR':
-			return Source::getInstance($xref, $this->getParent()->getTree());
-		case 'OBJE':
-			return Media::getInstance($xref, $this->getParent()->getTree());
-		case 'REPO':
-			return Repository::getInstance($xref, $this->getParent()->getTree());
-		case 'NOTE':
-			return Note::getInstance($xref, $this->getParent()->getTree());
-		default:
-			return GedcomRecord::getInstance($xref, $this->getParent()->getTree());
+		    case 'FAMC':
+		    case 'FAMS':
+			    return Family::getInstance($xref, $this->getParent()->getTree());
+		    case 'HUSB':
+		    case 'WIFE':
+		    case 'CHIL':
+			    return Individual::getInstance($xref, $this->getParent()->getTree());
+		    case 'SOUR':
+			    return Source::getInstance($xref, $this->getParent()->getTree());
+		    case 'OBJE':
+			    return Media::getInstance($xref, $this->getParent()->getTree());
+		    case 'REPO':
+			    return Repository::getInstance($xref, $this->getParent()->getTree());
+		    case 'NOTE':
+			    return Note::getInstance($xref, $this->getParent()->getTree());
+		    default:
+			    return GedcomRecord::getInstance($xref, $this->getParent()->getTree());
 		}
 	}
 
@@ -262,15 +262,15 @@ 
 	 */
 	public function getLabel() {
 		switch ($this->tag) {
-		case 'EVEN':
-		case 'FACT':
-			if ($this->getAttribute('TYPE')) {
-				// Custom FACT/EVEN - with a TYPE
-				return I18N::translate(Filter::escapeHtml($this->getAttribute('TYPE')));
-			}
-			// no break - drop into next case
-		default:
-			return GedcomTag::getLabel($this->tag, $this->parent);
+		    case 'EVEN':
+		    case 'FACT':
+			    if ($this->getAttribute('TYPE')) {
+				    // Custom FACT/EVEN - with a TYPE
+				    return I18N::translate(Filter::escapeHtml($this->getAttribute('TYPE')));
+			    }
+			    // no break - drop into next case
+		    default:
+			    return GedcomTag::getLabel($this->tag, $this->parent);
 		}
 	}
 

Braces +52 added lines, -26 removed lines

@@ -20,7 +20,8 @@ 
 /**
  * A GEDCOM fact or event object.
  */
-class Fact {
+class Fact
+{
 	/** @var string Unique identifier for this fact (currently implemented as a hash of the raw data). */
 	private $fact_id;
 
@@ -59,7 +60,8 @@ 
 	 *
 	 * @throws \InvalidArgumentException
 	 */
-	public function __construct($gedcom, GedcomRecord $parent, $fact_id) {
+	public function __construct($gedcom, GedcomRecord $parent, $fact_id)
+	{
 		if (preg_match('/^1 (' . WT_REGEX_TAG . ')/', $gedcom, $match)) {
 			$this->gedcom  = $gedcom;
 			$this->parent  = $parent;
@@ -76,7 +78,8 @@ 
 	 *
 	 * @return string|null
 	 */
-	public function getValue() {
+	public function getValue()
+	{
 		if (preg_match('/^1 (?:' . $this->tag . ') ?(.*(?:(?:\n2 CONT ?.*)*))/', $this->gedcom, $match)) {
 			return preg_replace("/\n2 CONT ?/", "\n", $match[1]);
 		} else {
@@ -89,7 +92,8 @@ 
 	 *
 	 * @return Individual|Family|Source|Repository|Media|Note|null
 	 */
-	public function getTarget() {
+	public function getTarget()
+	{
 		$xref = trim($this->getValue(), '@');
 		switch ($this->tag) {
 		case 'FAMC':
@@ -119,7 +123,8 @@ 
 	 *
 	 * @return string|null
 	 */
-	public function getAttribute($tag) {
+	public function getAttribute($tag)
+	{
 		if (preg_match('/\n2 (?:' . $tag . ') ?(.*(?:(?:\n3 CONT ?.*)*)*)/', $this->gedcom, $match)) {
 			return preg_replace("/\n3 CONT ?/", "\n", $match[1]);
 		} else {
@@ -134,7 +139,8 @@ 
 	 *
 	 * @return bool
 	 */
-	public function canShow($access_level = null) {
+	public function canShow($access_level = null)
+	{
 		if ($access_level === null) {
 			$access_level = Auth::accessLevel($this->getParent()->getTree());
 		}
@@ -170,7 +176,8 @@ 
 	 *
 	 * @return bool
 	 */
-	public function canEdit() {
+	public function canEdit()
+	{
 		// Managers can edit anything
 		// Members cannot edit RESN, CHAN and locked records
 		return
@@ -185,7 +192,8 @@ 
 	 *
 	 * @return Place
 	 */
-	public function getPlace() {
+	public function getPlace()
+	{
 		if ($this->place === null) {
 			$this->place = new Place($this->getAttribute('PLAC'), $this->getParent()->getTree());
 		}
@@ -200,7 +208,8 @@ 
 	 *
 	 * @return Date
 	 */
-	public function getDate() {
+	public function getDate()
+	{
 		if ($this->date === null) {
 			$this->date = new Date($this->getAttribute('DATE'));
 		}
@@ -213,7 +222,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getGedcom() {
+	public function getGedcom()
+	{
 		return $this->gedcom;
 	}
 
@@ -222,7 +232,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getFactId() {
+	public function getFactId()
+	{
 		return $this->fact_id;
 	}
 
@@ -232,7 +243,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getTag() {
+	public function getTag()
+	{
 		return $this->tag;
 	}
 
@@ -241,7 +253,8 @@ 
 	 *
 	 * @param string $tag
 	 */
-	public function setTag($tag) {
+	public function setTag($tag)
+	{
 		$this->tag = $tag;
 	}
 
@@ -251,7 +264,8 @@ 
 	 *
 	 * @return Individual|Family|Source|Repository|Media|Note|GedcomRecord
 	 */
-	public function getParent() {
+	public function getParent()
+	{
 		return $this->parent;
 	}
 
@@ -260,7 +274,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getLabel() {
+	public function getLabel()
+	{
 		switch ($this->tag) {
 		case 'EVEN':
 		case 'FACT':
@@ -277,7 +292,8 @@ 
 	/**
 	 * This is a newly deleted fact, pending approval.
 	 */
-	public function setPendingDeletion() {
+	public function setPendingDeletion()
+	{
 		$this->pending_deletion = true;
 		$this->pending_addition = false;
 	}
@@ -287,14 +303,16 @@ 
 	 *
 	 * @return bool
 	 */
-	public function isPendingDeletion() {
+	public function isPendingDeletion()
+	{
 		return $this->pending_deletion;
 	}
 
 	/**
 	 * This is a newly added fact, pending approval.
 	 */
-	public function setPendingAddition() {
+	public function setPendingAddition()
+	{
 		$this->pending_addition = true;
 		$this->pending_deletion = false;
 	}
@@ -304,7 +322,8 @@ 
 	 *
 	 * @return bool
 	 */
-	public function isPendingAddition() {
+	public function isPendingAddition()
+	{
 		return $this->pending_addition;
 	}
 
@@ -313,7 +332,8 @@ 
 	 *
 	 * @return string[]
 	 */
-	public function getCitations() {
+	public function getCitations()
+	{
 		preg_match_all('/\n(2 SOUR @(' . WT_REGEX_XREF . ')@(?:\n[3-9] .*)*)/', $this->getGedcom(), $matches, PREG_SET_ORDER);
 		$citations = array();
 		foreach ($matches as $match) {
@@ -331,7 +351,8 @@ 
 	 *
 	 * @return string[]|Note[]
 	 */
-	public function getNotes() {
+	public function getNotes()
+	{
 		$notes = array();
 		preg_match_all('/\n2 NOTE ?(.*(?:\n3.*)*)/', $this->getGedcom(), $matches);
 		foreach ($matches[1] as $match) {
@@ -356,7 +377,8 @@ 
 	 *
 	 * @return Media[]
 	 */
-	public function getMedia() {
+	public function getMedia()
+	{
 		$media = array();
 		preg_match_all('/\n2 OBJE @(' . WT_REGEX_XREF . ')@/', $this->getGedcom(), $matches);
 		foreach ($matches[1] as $match) {
@@ -374,7 +396,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function summary() {
+	public function summary()
+	{
 		$attributes = array();
 		$target     = $this->getTarget();
 		if ($target) {
@@ -422,7 +445,8 @@ 
 	 *
 	 * @return int
 	 */
-	public static function compareDate(Fact $a, Fact $b) {
+	public static function compareDate(Fact $a, Fact $b)
+	{
 		if ($a->getDate()->isOK() && $b->getDate()->isOK()) {
 			// If both events have dates, compare by date
 			$ret = Date::compare($a->getDate(), $b->getDate());
@@ -452,7 +476,8 @@ 
 	 *
 	 * @return int
 	 */
-	public static function compareType(Fact $a, Fact $b) {
+	public static function compareType(Fact $a, Fact $b)
+	{
 		global $factsort;
 
 		if (empty($factsort)) {
@@ -579,7 +604,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function __toString() {
+	public function __toString()
+	{
 		return $this->fact_id . '@' . $this->parent->getXref();
 	}
 }

app/Stats.php

Indentation +6934 added lines, -6934 removed lines

@@ -34,5529 +34,5529 @@ 
  * are also used elsewhere in the code.
  */
 class Stats {
-	/** @var Tree Generate statistics for a specified tree. */
-	private $tree;
-
-	/** @var string[] All public functions are available as keywords - except these ones */
-	private $public_but_not_allowed = array(
-		'__construct', 'embedTags', 'iso3166', 'getAllCountries', 'getAllTagsTable', 'getAllTagsText', 'statsPlaces', 'statsBirthQuery', 'statsDeathQuery', 'statsMarrQuery', 'statsAgeQuery', 'monthFirstChildQuery', 'statsChildrenQuery', 'statsMarrAgeQuery',
-	);
-
-	/** @var string[] List of GEDCOM media types */
-	private $_media_types = array('audio', 'book', 'card', 'certificate', 'coat', 'document', 'electronic', 'magazine', 'manuscript', 'map', 'fiche', 'film', 'newspaper', 'painting', 'photo', 'tombstone', 'video', 'other');
-
-	/**
-	 * Create the statistics for a tree.
-	 *
-	 * @param Tree $tree Generate statistics for this tree
-	 */
-	public function __construct(Tree $tree) {
-		$this->tree = $tree;
-	}
-
-	/**
-	 * Return a string of all supported tags and an example of its output in table row form.
-	 *
-	 * @return string
-	 */
-	public function getAllTagsTable() {
-		$examples = array();
-		foreach (get_class_methods($this) as $method) {
-			$reflection = new \ReflectionMethod($this, $method);
-			if ($reflection->isPublic() && !in_array($method, $this->public_but_not_allowed)) {
-				$examples[$method] = $this->$method();
-			}
-		}
-		ksort($examples);
-
-		$html = '';
-		foreach ($examples as $tag => $value) {
-			$html .= '<tr>';
-			$html .= '<td class="list_value_wrap">' . $tag . '</td>';
-			$html .= '<td class="list_value_wrap">' . $value . '</td>';
-			$html .= '</tr>';
-		}
-
-		return
-			'<table id="keywords" style="width:100%; table-layout:fixed"><thead>' .
-			'<tr>' .
-			'<th class="list_label_wrap width25">' .
-			I18N::translate('Embedded variable') .
-			'</th>' .
-			'<th class="list_label_wrap width75">' .
-			I18N::translate('Resulting value') .
-			'</th>' .
-			'</tr>' .
-			'</thead><tbody>' .
-			$html .
-			'</tbody></table>';
-	}
-
-	/**
-	 * Return a string of all supported tags in plain text.
-	 *
-	 * @return string
-	 */
-	public function getAllTagsText() {
-		$examples = array();
-		foreach (get_class_methods($this) as $method) {
-			$reflection = new \ReflectionMethod($this, $method);
-			if ($reflection->isPublic() && !in_array($method, $this->public_but_not_allowed)) {
-				$examples[$method] = $method;
-			}
-		}
-		ksort($examples);
-
-		return implode('<br>', $examples);
-	}
-
-	/**
-	 * Get tags and their parsed results.
-	 *
-	 * @param string $text
-	 *
-	 * @return string[][]
-	 */
-	private function getTags($text) {
-		static $funcs;
-
-		// Retrive all class methods
-		isset($funcs) or $funcs = get_class_methods($this);
-
-		// Extract all tags from the provided text
-		preg_match_all("/#([^#]+)(?=#)/", (string) $text, $match);
-		$tags       = $match[1];
-		$c          = count($tags);
-		$new_tags   = array(); // tag to replace
-		$new_values = array(); // value to replace it with
-
-		/*
+    /** @var Tree Generate statistics for a specified tree. */
+    private $tree;
+
+    /** @var string[] All public functions are available as keywords - except these ones */
+    private $public_but_not_allowed = array(
+        '__construct', 'embedTags', 'iso3166', 'getAllCountries', 'getAllTagsTable', 'getAllTagsText', 'statsPlaces', 'statsBirthQuery', 'statsDeathQuery', 'statsMarrQuery', 'statsAgeQuery', 'monthFirstChildQuery', 'statsChildrenQuery', 'statsMarrAgeQuery',
+    );
+
+    /** @var string[] List of GEDCOM media types */
+    private $_media_types = array('audio', 'book', 'card', 'certificate', 'coat', 'document', 'electronic', 'magazine', 'manuscript', 'map', 'fiche', 'film', 'newspaper', 'painting', 'photo', 'tombstone', 'video', 'other');
+
+    /**
+     * Create the statistics for a tree.
+     *
+     * @param Tree $tree Generate statistics for this tree
+     */
+    public function __construct(Tree $tree) {
+        $this->tree = $tree;
+    }
+
+    /**
+     * Return a string of all supported tags and an example of its output in table row form.
+     *
+     * @return string
+     */
+    public function getAllTagsTable() {
+        $examples = array();
+        foreach (get_class_methods($this) as $method) {
+            $reflection = new \ReflectionMethod($this, $method);
+            if ($reflection->isPublic() && !in_array($method, $this->public_but_not_allowed)) {
+                $examples[$method] = $this->$method();
+            }
+        }
+        ksort($examples);
+
+        $html = '';
+        foreach ($examples as $tag => $value) {
+            $html .= '<tr>';
+            $html .= '<td class="list_value_wrap">' . $tag . '</td>';
+            $html .= '<td class="list_value_wrap">' . $value . '</td>';
+            $html .= '</tr>';
+        }
+
+        return
+            '<table id="keywords" style="width:100%; table-layout:fixed"><thead>' .
+            '<tr>' .
+            '<th class="list_label_wrap width25">' .
+            I18N::translate('Embedded variable') .
+            '</th>' .
+            '<th class="list_label_wrap width75">' .
+            I18N::translate('Resulting value') .
+            '</th>' .
+            '</tr>' .
+            '</thead><tbody>' .
+            $html .
+            '</tbody></table>';
+    }
+
+    /**
+     * Return a string of all supported tags in plain text.
+     *
+     * @return string
+     */
+    public function getAllTagsText() {
+        $examples = array();
+        foreach (get_class_methods($this) as $method) {
+            $reflection = new \ReflectionMethod($this, $method);
+            if ($reflection->isPublic() && !in_array($method, $this->public_but_not_allowed)) {
+                $examples[$method] = $method;
+            }
+        }
+        ksort($examples);
+
+        return implode('<br>', $examples);
+    }
+
+    /**
+     * Get tags and their parsed results.
+     *
+     * @param string $text
+     *
+     * @return string[][]
+     */
+    private function getTags($text) {
+        static $funcs;
+
+        // Retrive all class methods
+        isset($funcs) or $funcs = get_class_methods($this);
+
+        // Extract all tags from the provided text
+        preg_match_all("/#([^#]+)(?=#)/", (string) $text, $match);
+        $tags       = $match[1];
+        $c          = count($tags);
+        $new_tags   = array(); // tag to replace
+        $new_values = array(); // value to replace it with
+
+        /*
 		 * Parse block tags.
 		 */
-		for ($i = 0; $i < $c; $i++) {
-			$full_tag = $tags[$i];
-			// Added for new parameter support
-			$params = explode(':', $tags[$i]);
-			if (count($params) > 1) {
-				$tags[$i] = array_shift($params);
-			} else {
-				$params = array();
-			}
-
-			// Generate the replacement value for the tag
-			if (method_exists($this, $tags[$i])) {
-				$new_tags[]   = "#{$full_tag}#";
-				$new_values[] = call_user_func_array(array($this, $tags[$i]), array($params));
-			}
-		}
-
-		return array($new_tags, $new_values);
-	}
-
-	/**
-	 * Embed tags in text
-	 *
-	 * @param string $text
-	 *
-	 * @return string
-	 */
-	public function embedTags($text) {
-		if (strpos($text, '#') !== false) {
-			list($new_tags, $new_values) = $this->getTags($text);
-			$text                        = str_replace($new_tags, $new_values, $text);
-		}
-
-		return $text;
-	}
-
-	/**
-	 * Get the name used for GEDCOM files and URLs.
-	 *
-	 * @return string
-	 */
-	public function gedcomFilename() {
-		return $this->tree->getName();
-	}
-
-	/**
-	 * Get the internal ID number of the tree.
-	 *
-	 * @return int
-	 */
-	public function gedcomId() {
-		return $this->tree->getTreeId();
-	}
-
-	/**
-	 * Get the descriptive title of the tree.
-	 *
-	 * @return string
-	 */
-	public function gedcomTitle() {
-		return $this->tree->getTitleHtml();
-	}
-
-	/**
-	 * Get information from the GEDCOM's HEAD record.
-	 *
-	 * @return string[]
-	 */
-	private function gedcomHead() {
-		$title   = '';
-		$version = '';
-		$source  = '';
-
-		$head = GedcomRecord::getInstance('HEAD', $this->tree);
-		$sour = $head->getFirstFact('SOUR');
-		if ($sour) {
-			$source  = $sour->getValue();
-			$title   = $sour->getAttribute('NAME');
-			$version = $sour->getAttribute('VERS');
-		}
-
-		return array($title, $version, $source);
-	}
-
-	/**
-	 * Get the software originally used to create the GEDCOM file.
-	 *
-	 * @return string
-	 */
-	public function gedcomCreatedSoftware() {
-		$head = $this->gedcomHead();
-
-		return $head[0];
-	}
-
-	/**
-	 * Get the version of software which created the GEDCOM file.
-	 *
-	 * @return string
-	 */
-	public function gedcomCreatedVersion() {
-		$head = $this->gedcomHead();
-		// fix broken version string in Family Tree Maker
-		if (strstr($head[1], 'Family Tree Maker ')) {
-			$p       = strpos($head[1], '(') + 1;
-			$p2      = strpos($head[1], ')');
-			$head[1] = substr($head[1], $p, ($p2 - $p));
-		}
-		// Fix EasyTree version
-		if ($head[2] == 'EasyTree') {
-			$head[1] = substr($head[1], 1);
-		}
-
-		return $head[1];
-	}
-
-	/**
-	 * Get the date the GEDCOM file was created.
-	 *
-	 * @return string
-	 */
-	public function gedcomDate() {
-		$head = GedcomRecord::getInstance('HEAD', $this->tree);
-		$fact = $head->getFirstFact('DATE');
-		if ($fact) {
-			$date = new Date($fact->getValue());
-
-			return $date->display();
-		}
-
-		return '';
-	}
-
-	/**
-	 * When was this tree last updated?
-	 *
-	 * @return string
-	 */
-	public function gedcomUpdated() {
-		$row = Database::prepare(
-			"SELECT d_year, d_month, d_day FROM `##dates` WHERE d_julianday1 = (SELECT MAX(d_julianday1) FROM `##dates` WHERE d_file =? AND d_fact='CHAN') LIMIT 1"
-		)->execute(array($this->tree->getTreeId()))->fetchOneRow();
-		if ($row) {
-			$date = new Date("{$row->d_day} {$row->d_month} {$row->d_year}");
-
-			return $date->display();
-		} else {
-			return $this->gedcomDate();
-		}
-	}
-
-	/**
-	 * What is the significant individual from this tree?
-	 *
-	 * @return string
-	 */
-	public function gedcomRootId() {
-		return $this->tree->getPreference('PEDIGREE_ROOT_ID');
-	}
-
-	/**
-	 * Convert totals into percentages.
-	 *
-	 * @param string $total
-	 * @param string $type
-	 *
-	 * @return string
-	 */
-	private function getPercentage($total, $type) {
-		switch ($type) {
-		case 'individual':
-			$type = $this->totalIndividualsQuery();
-			break;
-		case 'family':
-			$type = $this->totalFamiliesQuery();
-			break;
-		case 'source':
-			$type = $this->totalSourcesQuery();
-			break;
-		case 'note':
-			$type = $this->totalNotesQuery();
-			break;
-		case 'all':
-		default:
-			$type = $this->totalIndividualsQuery() + $this->totalFamiliesQuery() + $this->totalSourcesQuery();
-			break;
-		}
-		if ($type == 0) {
-			return I18N::percentage(0, 1);
-		} else {
-			return I18N::percentage($total / $type, 1);
-		}
-	}
-
-	/**
-	 * How many GEDCOM records exist in the tree.
-	 *
-	 * @return string
-	 */
-	public function totalRecords() {
-		return I18N::number($this->totalIndividualsQuery() + $this->totalFamiliesQuery() + $this->totalSourcesQuery());
-	}
-
-	/**
-	 * How many individuals exist in the tree.
-	 *
-	 * @return int
-	 */
-	private function totalIndividualsQuery() {
-		return (int) Database::prepare(
-			"SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id"
-		)->execute(array(
-			'tree_id' => $this->tree->getTreeId(),
-		))->fetchOne();
-	}
-
-	/**
-	 * How many individuals exist in the tree.
-	 *
-	 * @return string
-	 */
-	public function totalIndividuals() {
-		return I18N::number($this->totalIndividualsQuery());
-	}
-
-	/**
-	 * How many individuals have one or more sources.
-	 *
-	 * @return int
-	 */
-	private function totalIndisWithSourcesQuery() {
-		return (int) Database::prepare(
-			"SELECT COUNT(DISTINCT i_id)" .
-			" FROM `##individuals` JOIN `##link` ON i_id = l_from AND i_file = l_file" .
-			" WHERE l_file = :tree_id AND l_type = 'SOUR'"
-		)->execute(array(
-			'tree_id' => $this->tree->getTreeId(),
-		))->fetchOne();
-	}
-
-	/**
-	 * How many individuals have one or more sources.
-	 *
-	 * @return string
-	 */
-	public function totalIndisWithSources() {
-		return I18N::number($this->totalIndisWithSourcesQuery());
-	}
-
-	/**
-	 * Create a chart showing individuals with/without sources.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function chartIndisWithSources($params = array()) {
-		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
-		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
-		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
-		$WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
-
-		if (isset($params[0]) && $params[0] != '') {
-			$size = strtolower($params[0]);
-		} else {
-			$size = $WT_STATS_S_CHART_X . 'x' . $WT_STATS_S_CHART_Y;
-		}
-		if (isset($params[1]) && $params[1] != '') {
-			$color_from = strtolower($params[1]);
-		} else {
-			$color_from = $WT_STATS_CHART_COLOR1;
-		}
-		if (isset($params[2]) && $params[2] != '') {
-			$color_to = strtolower($params[2]);
-		} else {
-			$color_to = $WT_STATS_CHART_COLOR2;
-		}
-		$sizes    = explode('x', $size);
-		$tot_indi = $this->totalIndividualsQuery();
-		if ($tot_indi == 0) {
-			return '';
-		} else {
-			$tot_sindi_per = round($this->totalIndisWithSourcesQuery() / $tot_indi, 3);
-			$chd           = $this->arrayToExtendedEncoding(array(100 - 100 * $tot_sindi_per, 100 * $tot_sindi_per));
-			$chl           = I18N::translate('Without sources') . ' - ' . I18N::percentage(1 - $tot_sindi_per, 1) . '|' .
-				I18N::translate('With sources') . ' - ' . I18N::percentage($tot_sindi_per, 1);
-			$chart_title = I18N::translate('Individuals with sources');
-
-			return '<img src="https://chart.googleapis.com/chart?cht=p3&amp;chd=e:' . $chd . '&amp;chs=' . $size . '&amp;chco=' . $color_from . ',' . $color_to . '&amp;chf=bg,s,ffffff00&amp;chl=' . rawurlencode($chl) . '" width="' . $sizes[0] . '" height="' . $sizes[1] . '" alt="' . $chart_title . '" title="' . $chart_title . '">';
-		}
-	}
-
-	/**
-	 * Show the total individuals as a percentage.
-	 *
-	 * @return string
-	 */
-	public function totalIndividualsPercentage() {
-		return $this->getPercentage($this->totalIndividualsQuery(), 'all');
-	}
-
-	/**
-	 * Count the total families.
-	 *
-	 * @return int
-	 */
-	private function totalFamiliesQuery() {
-		return (int) Database::prepare(
-			"SELECT COUNT(*) FROM `##families` WHERE f_file = :tree_id"
-		)->execute(array(
-			'tree_id' => $this->tree->getTreeId(),
-		))->fetchOne();
-	}
-
-	/**
-	 * Count the total families.
-	 *
-	 * @return string
-	 */
-	public function totalFamilies() {
-		return I18N::number($this->totalFamiliesQuery());
-	}
-
-	/**
-	 * Count the families with source records.
-	 *
-	 * @return int
-	 */
-	private function totalFamsWithSourcesQuery() {
-		return (int) Database::prepare(
-			"SELECT COUNT(DISTINCT f_id)" .
-			" FROM `##families` JOIN `##link` ON f_id = l_from AND f_file = l_file" .
-			" WHERE l_file = :tree_id AND l_type = 'SOUR'"
-		)->execute(array(
-			'tree_id' => $this->tree->getTreeId(),
-		))->fetchOne();
-	}
-
-	/**
-	 * Count the families with with source records.
-	 *
-	 * @return string
-	 */
-	public function totalFamsWithSources() {
-		return I18N::number($this->totalFamsWithSourcesQuery());
-	}
-
-	/**
-	 * Create a chart of individuals with/without sources.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function chartFamsWithSources($params = array()) {
-		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
-		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
-		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
-		$WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
-
-		if (isset($params[0]) && $params[0] != '') {
-			$size = strtolower($params[0]);
-		} else {
-			$size = $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y;
-		}
-		if (isset($params[1]) && $params[1] != '') {
-			$color_from = strtolower($params[1]);
-		} else {
-			$color_from = $WT_STATS_CHART_COLOR1;
-		}
-		if (isset($params[2]) && $params[2] != '') {
-			$color_to = strtolower($params[2]);
-		} else {
-			$color_to = $WT_STATS_CHART_COLOR2;
-		}
-		$sizes   = explode('x', $size);
-		$tot_fam = $this->totalFamiliesQuery();
-		if ($tot_fam == 0) {
-			return '';
-		} else {
-			$tot_sfam_per = round($this->totalFamsWithSourcesQuery() / $tot_fam, 3);
-			$chd          = $this->arrayToExtendedEncoding(array(100 - 100 * $tot_sfam_per, 100 * $tot_sfam_per));
-			$chl          = I18N::translate('Without sources') . ' - ' . I18N::percentage(1 - $tot_sfam_per, 1) . '|' .
-				I18N::translate('With sources') . ' - ' . I18N::percentage($tot_sfam_per, 1);
-			$chart_title = I18N::translate('Families with sources');
-
-			return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&chs={$size}&amp;chco={$color_from},{$color_to}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . $chart_title . "\" title=\"" . $chart_title . "\" />";
-		}
-	}
-
-	/**
-	 * Show the total families as a percentage.
-	 *
-	 * @return string
-	 */
-	public function totalFamiliesPercentage() {
-		return $this->getPercentage($this->totalFamiliesQuery(), 'all');
-	}
-
-	/**
-	 * Count the total number of sources.
-	 *
-	 * @return int
-	 */
-	private function totalSourcesQuery() {
-		return (int) Database::prepare(
-			"SELECT COUNT(*) FROM `##sources` WHERE s_file = :tree_id"
-		)->execute(array(
-			'tree_id' => $this->tree->getTreeId(),
-		))->fetchOne();
-	}
-
-	/**
-	 * Count the total number of sources.
-	 *
-	 * @return string
-	 */
-	public function totalSources() {
-		return I18N::number($this->totalSourcesQuery());
-	}
-
-	/**
-	 * Show the number of sources as a percentage.
-	 *
-	 * @return string
-	 */
-	public function totalSourcesPercentage() {
-		return $this->getPercentage($this->totalSourcesQuery(), 'all');
-	}
-
-	/**
-	 * Count the number of notes.
-	 *
-	 * @return int
-	 */
-	private function totalNotesQuery() {
-		return (int) Database::prepare(
-			"SELECT COUNT(*) FROM `##other` WHERE o_type='NOTE' AND o_file = :tree_id"
-		)->execute(array(
-			'tree_id' => $this->tree->getTreeId(),
-		))->fetchOne();
-	}
-
-	/**
-	 * Count the number of notes.
-	 *
-	 * @return string
-	 */
-	public function totalNotes() {
-		return I18N::number($this->totalNotesQuery());
-	}
-
-	/**
-	 * Show the number of notes as a percentage.
-	 *
-	 * @return string
-	 */
-	public function totalNotesPercentage() {
-		return $this->getPercentage($this->totalNotesQuery(), 'all');
-	}
-
-	/**
-	 * Count the number of repositories.
-	 *
-	 * @return int
-	 */
-	private function totalRepositoriesQuery() {
-		return (int) Database::prepare(
-			"SELECT COUNT(*) FROM `##other` WHERE o_type='REPO' AND o_file = :tree_id"
-		)->execute(array(
-			'tree_id' => $this->tree->getTreeId(),
-		))->fetchOne();
-	}
-
-	/**
-	 * Count the number of repositories
-	 *
-	 * @return string
-	 */
-	public function totalRepositories() {
-		return I18N::number($this->totalRepositoriesQuery());
-	}
-
-	/**
-	 * Show the total number of repositories as a percentage.
-	 *
-	 * @return string
-	 */
-	public function totalRepositoriesPercentage() {
-		return $this->getPercentage($this->totalRepositoriesQuery(), 'all');
-	}
-
-	/**
-	 * Count the surnames.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function totalSurnames($params = array()) {
-		if ($params) {
-			$opt      = 'IN (' . implode(',', array_fill(0, count($params), '?')) . ')';
-			$distinct = '';
-		} else {
-			$opt      = "IS NOT NULL";
-			$distinct = 'DISTINCT';
-		}
-		$params[] = $this->tree->getTreeId();
-		$total =
-			Database::prepare(
-				"SELECT COUNT({$distinct} n_surn COLLATE '" . I18N::collation() . "')" .
-				" FROM `##name`" .
-				" WHERE n_surn COLLATE '" . I18N::collation() . "' {$opt} AND n_file=?"
-			)->execute(
-				$params
-			)->fetchOne();
-
-		return I18N::number($total);
-	}
-
-	/**
-	 * Count the number of distinct given names, or count the number of
-	 * occurrences of a specific name or names.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function totalGivennames($params = array()) {
-		if ($params) {
-			$qs       = implode(',', array_fill(0, count($params), '?'));
-			$params[] = $this->tree->getTreeId();
-			$total    =
-				Database::prepare("SELECT COUNT( n_givn) FROM `##name` WHERE n_givn IN ({$qs}) AND n_file=?")
-					->execute($params)
-					->fetchOne();
-		} else {
-			$total =
-				Database::prepare("SELECT COUNT(DISTINCT n_givn) FROM `##name` WHERE n_givn IS NOT NULL AND n_file=?")
-					->execute(array($this->tree->getTreeId()))
-					->fetchOne();
-		}
-
-		return I18N::number($total);
-	}
-
-	/**
-	 * Count the number of events (with dates).
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function totalEvents($params = array()) {
-		$sql  = "SELECT COUNT(*) AS tot FROM `##dates` WHERE d_file=?";
-		$vars = array($this->tree->getTreeId());
-
-		$no_types = array('HEAD', 'CHAN');
-		if ($params) {
-			$types = array();
-			foreach ($params as $type) {
-				if (substr($type, 0, 1) == '!') {
-					$no_types[] = substr($type, 1);
-				} else {
-					$types[] = $type;
-				}
-			}
-			if ($types) {
-				$sql .= ' AND d_fact IN (' . implode(', ', array_fill(0, count($types), '?')) . ')';
-				$vars = array_merge($vars, $types);
-			}
-		}
-		$sql .= ' AND d_fact NOT IN (' . implode(', ', array_fill(0, count($no_types), '?')) . ')';
-		$vars = array_merge($vars, $no_types);
-
-		return I18N::number(Database::prepare($sql)->execute($vars)->fetchOne());
-	}
-
-	/**
-	 * Count the number of births.
-	 *
-	 * @return string
-	 */
-	public function totalEventsBirth() {
-		return $this->totalEvents(explode('|', WT_EVENTS_BIRT));
-	}
-
-	/**
-	 * Count the number of births.
-	 *
-	 * @return string
-	 */
-	public function totalBirths() {
-		return $this->totalEvents(array('BIRT'));
-	}
-
-	/**
-	 * Count the number of deaths.
-	 *
-	 * @return string
-	 */
-	public function totalEventsDeath() {
-		return $this->totalEvents(explode('|', WT_EVENTS_DEAT));
-	}
-
-	/**
-	 * Count the number of deaths.
-	 *
-	 * @return string
-	 */
-	public function totalDeaths() {
-		return $this->totalEvents(array('DEAT'));
-	}
-
-	/**
-	 * Count the number of marriages.
-	 *
-	 * @return string
-	 */
-	public function totalEventsMarriage() {
-		return $this->totalEvents(explode('|', WT_EVENTS_MARR));
-	}
-
-	/**
-	 * Count the number of marriages.
-	 *
-	 * @return string
-	 */
-	public function totalMarriages() {
-		return $this->totalEvents(array('MARR'));
-	}
-
-	/**
-	 * Count the number of divorces.
-	 *
-	 * @return string
-	 */
-	public function totalEventsDivorce() {
-		return $this->totalEvents(explode('|', WT_EVENTS_DIV));
-	}
-
-	/**
-	 * Count the number of divorces.
-	 *
-	 * @return string
-	 */
-	public function totalDivorces() {
-		return $this->totalEvents(array('DIV'));
-	}
-
-	/**
-	 * Count the number of other events.
-	 *
-	 * @return string
-	 */
-	public function totalEventsOther() {
-		$facts    = array_merge(explode('|', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT));
-		$no_facts = array();
-		foreach ($facts as $fact) {
-			$fact       = '!' . str_replace('\'', '', $fact);
-			$no_facts[] = $fact;
-		}
-
-		return $this->totalEvents($no_facts);
-	}
-
-	/**
-	 * Count the number of males.
-	 *
-	 * @return int
-	 */
-	private function totalSexMalesQuery() {
-		return (int) Database::prepare(
-			"SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id AND i_sex = 'M'"
-		)->execute(array(
-			'tree_id' => $this->tree->getTreeId(),
-		))->fetchOne();
-	}
-
-	/**
-	 * Count the number of males.
-	 *
-	 * @return string
-	 */
-	public function totalSexMales() {
-		return I18N::number($this->totalSexMalesQuery());
-	}
-
-	/**
-	 * Count the number of males
-	 *
-	 * @return string
-	 */
-	public function totalSexMalesPercentage() {
-		return $this->getPercentage($this->totalSexMalesQuery(), 'individual');
-	}
-
-	/**
-	 * Count the number of females.
-	 *
-	 * @return int
-	 */
-	private function totalSexFemalesQuery() {
-		return (int) Database::prepare(
-			"SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id AND i_sex = 'F'"
-		)->execute(array(
-			'tree_id' => $this->tree->getTreeId(),
-		))->fetchOne();
-	}
-
-	/**
-	 * Count the number of females.
-	 *
-	 * @return string
-	 */
-	public function totalSexFemales() {
-		return I18N::number($this->totalSexFemalesQuery());
-	}
-
-	/**
-	 * Count the number of females.
-	 *
-	 * @return string
-	 */
-	public function totalSexFemalesPercentage() {
-		return $this->getPercentage($this->totalSexFemalesQuery(), 'individual');
-	}
-
-	/**
-	 * Count the number of individuals with unknown sex.
-	 *
-	 * @return int
-	 */
-	private function totalSexUnknownQuery() {
-		return (int) Database::prepare(
-			"SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id AND i_sex = 'U'"
-		)->execute(array(
-			'tree_id' => $this->tree->getTreeId(),
-		))->fetchOne();
-	}
-
-	/**
-	 * Count the number of individuals with unknown sex.
-	 *
-	 * @return string
-	 */
-	public function totalSexUnknown() {
-		return I18N::number($this->totalSexUnknownQuery());
-	}
-
-	/**
-	 * Count the number of individuals with unknown sex.
-	 *
-	 * @return string
-	 */
-	public function totalSexUnknownPercentage() {
-		return $this->getPercentage($this->totalSexUnknownQuery(), 'individual');
-	}
-
-	/**
-	 * Generate a chart showing sex distribution.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function chartSex($params = array()) {
-		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
-		$WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
-
-		if (isset($params[0]) && $params[0] != '') {
-			$size = strtolower($params[0]);
-		} else {
-			$size = $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y;
-		}
-		if (isset($params[1]) && $params[1] != '') {
-			$color_female = strtolower($params[1]);
-		} else {
-			$color_female = 'ffd1dc';
-		}
-		if (isset($params[2]) && $params[2] != '') {
-			$color_male = strtolower($params[2]);
-		} else {
-			$color_male = '84beff';
-		}
-		if (isset($params[3]) && $params[3] != '') {
-			$color_unknown = strtolower($params[3]);
-		} else {
-			$color_unknown = '777777';
-		}
-		$sizes = explode('x', $size);
-		// Raw data - for calculation
-		$tot_f = $this->totalSexFemalesQuery();
-		$tot_m = $this->totalSexMalesQuery();
-		$tot_u = $this->totalSexUnknownQuery();
-		$tot   = $tot_f + $tot_m + $tot_u;
-		// I18N data - for display
-		$per_f = $this->totalSexFemalesPercentage();
-		$per_m = $this->totalSexMalesPercentage();
-		$per_u = $this->totalSexUnknownPercentage();
-		if ($tot == 0) {
-			return '';
-		} elseif ($tot_u > 0) {
-			$chd = $this->arrayToExtendedEncoding(array(4095 * $tot_u / $tot, 4095 * $tot_f / $tot, 4095 * $tot_m / $tot));
-			$chl =
-				I18N::translateContext('unknown people', 'Unknown') . ' - ' . $per_u . '|' .
-				I18N::translate('Females') . ' - ' . $per_f . '|' .
-				I18N::translate('Males') . ' - ' . $per_m;
-			$chart_title =
-				I18N::translate('Males') . ' - ' . $per_m . I18N::$list_separator .
-				I18N::translate('Females') . ' - ' . $per_f . I18N::$list_separator .
-				I18N::translateContext('unknown people', 'Unknown') . ' - ' . $per_u;
-
-			return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_unknown},{$color_female},{$color_male}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . $chart_title . "\" title=\"" . $chart_title . "\" />";
-		} else {
-			$chd = $this->arrayToExtendedEncoding(array(4095 * $tot_f / $tot, 4095 * $tot_m / $tot));
-			$chl =
-				I18N::translate('Females') . ' - ' . $per_f . '|' .
-				I18N::translate('Males') . ' - ' . $per_m;
-			$chart_title = I18N::translate('Males') . ' - ' . $per_m . I18N::$list_separator .
-				I18N::translate('Females') . ' - ' . $per_f;
-
-			return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_female},{$color_male}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . $chart_title . "\" title=\"" . $chart_title . "\" />";
-		}
-	}
-
-	/**
-	 * Count the number of living individuals.
-	 *
-	 * The totalLiving/totalDeceased queries assume that every dead person will
-	 * have a DEAT record. It will not include individuals who were born more
-	 * than MAX_ALIVE_AGE years ago, and who have no DEAT record.
-	 * A good reason to run the “Add missing DEAT records” batch-update!
-	 *
-	 * @return int
-	 */
-	private function totalLivingQuery() {
-		return (int) Database::prepare(
-			"SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id AND i_gedcom NOT REGEXP '\\n1 (" . WT_EVENTS_DEAT . ")'"
-		)->execute(array(
-			'tree_id' => $this->tree->getTreeId(),
-		))->fetchOne();
-	}
-
-	/**
-	 * Count the number of living individuals.
-	 *
-	 * @return string
-	 */
-	public function totalLiving() {
-		return I18N::number($this->totalLivingQuery());
-	}
-
-	/**
-	 * Count the number of living individuals.
-	 *
-	 * @return string
-	 */
-	public function totalLivingPercentage() {
-		return $this->getPercentage($this->totalLivingQuery(), 'individual');
-	}
-
-	/**
-	 * Count the number of dead individuals.
-	 *
-	 * @return int
-	 */
-	private function totalDeceasedQuery() {
-		return (int) Database::prepare(
-			"SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id AND i_gedcom REGEXP '\\n1 (" . WT_EVENTS_DEAT . ")'"
-		)->execute(array(
-			'tree_id' => $this->tree->getTreeId(),
-		))->fetchOne();
-	}
-
-	/**
-	 * Count the number of dead individuals.
-	 *
-	 * @return string
-	 */
-	public function totalDeceased() {
-		return I18N::number($this->totalDeceasedQuery());
-	}
-
-	/**
-	 * Count the number of dead individuals.
-	 *
-	 * @return string
-	 */
-	public function totalDeceasedPercentage() {
-		return $this->getPercentage($this->totalDeceasedQuery(), 'individual');
-	}
-
-	/**
-	 * Create a chart showing mortality.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function chartMortality($params = array()) {
-		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
-		$WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
-
-		if (isset($params[0]) && $params[0] != '') {
-			$size = strtolower($params[0]);
-		} else {
-			$size = $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y;
-		}
-		if (isset($params[1]) && $params[1] != '') {
-			$color_living = strtolower($params[1]);
-		} else {
-			$color_living = 'ffffff';
-		}
-		if (isset($params[2]) && $params[2] != '') {
-			$color_dead = strtolower($params[2]);
-		} else {
-			$color_dead = 'cccccc';
-		}
-		$sizes = explode('x', $size);
-		// Raw data - for calculation
-		$tot_l = $this->totalLivingQuery();
-		$tot_d = $this->totalDeceasedQuery();
-		$tot   = $tot_l + $tot_d;
-		// I18N data - for display
-		$per_l = $this->totalLivingPercentage();
-		$per_d = $this->totalDeceasedPercentage();
-		if ($tot == 0) {
-			return '';
-		} else {
-			$chd = $this->arrayToExtendedEncoding(array(4095 * $tot_l / $tot, 4095 * $tot_d / $tot));
-			$chl =
-				I18N::translate('Living') . ' - ' . $per_l . '|' .
-				I18N::translate('Dead') . ' - ' . $per_d . '|';
-			$chart_title = I18N::translate('Living') . ' - ' . $per_l . I18N::$list_separator .
-				I18N::translate('Dead') . ' - ' . $per_d;
-
-			return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_living},{$color_dead}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . $chart_title . "\" title=\"" . $chart_title . "\" />";
-		}
-	}
-
-	/**
-	 * Count the number of users.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function totalUsers($params = array()) {
-		if (isset($params[0])) {
-			$total = count(User::all()) + (int) $params[0];
-		} else {
-			$total = count(User::all());
-		}
-
-		return I18N::number($total);
-	}
-
-	/**
-	 * Count the number of administrators.
-	 *
-	 * @return string
-	 */
-	public function totalAdmins() {
-		return I18N::number(count(User::allAdmins()));
-	}
-
-	/**
-	 * Count the number of administrators.
-	 *
-	 * @return string
-	 */
-	public function totalNonAdmins() {
-		return I18N::number(count(User::all()) - count(User::allAdmins()));
-	}
-
-	/**
-	 * Count the number of media records with a given type.
-	 *
-	 * @param string $type
-	 *
-	 * @return int
-	 */
-	private function totalMediaType($type = 'all') {
-		if (!in_array($type, $this->_media_types) && $type != 'all' && $type != 'unknown') {
-			return 0;
-		}
-		$sql  = "SELECT COUNT(*) AS tot FROM `##media` WHERE m_file=?";
-		$vars = array($this->tree->getTreeId());
-
-		if ($type != 'all') {
-			if ($type == 'unknown') {
-				// There has to be a better way then this :(
-				foreach ($this->_media_types as $t) {
-					$sql .= " AND (m_gedcom NOT LIKE ? AND m_gedcom NOT LIKE ?)";
-					$vars[] = "%3 TYPE {$t}%";
-					$vars[] = "%1 _TYPE {$t}%";
-				}
-			} else {
-				$sql .= " AND (m_gedcom LIKE ? OR m_gedcom LIKE ?)";
-				$vars[] = "%3 TYPE {$type}%";
-				$vars[] = "%1 _TYPE {$type}%";
-			}
-		}
-
-		return (int) Database::prepare($sql)->execute($vars)->fetchOne();
-	}
-
-	/**
-	 * Count the number of media records.
-	 *
-	 * @return string
-	 */
-	public function totalMedia() {
-		return I18N::number($this->totalMediaType('all'));
-	}
-
-	/**
-	 * Count the number of media records with type "audio".
-	 *
-	 * @return string
-	 */
-	public function totalMediaAudio() {
-		return I18N::number($this->totalMediaType('audio'));
-	}
-
-	/**
-	 * Count the number of media records with type "book".
-	 *
-	 * @return string
-	 */
-	public function totalMediaBook() {
-		return I18N::number($this->totalMediaType('book'));
-	}
-
-	/**
-	 * Count the number of media records with type "card".
-	 *
-	 * @return string
-	 */
-	public function totalMediaCard() {
-		return I18N::number($this->totalMediaType('card'));
-	}
-
-	/**
-	 * Count the number of media records with type "certificate".
-	 *
-	 * @return string
-	 */
-	public function totalMediaCertificate() {
-		return I18N::number($this->totalMediaType('certificate'));
-	}
-
-	/**
-	 * Count the number of media records with type "coat of arms".
-	 *
-	 * @return string
-	 */
-	public function totalMediaCoatOfArms() {
-		return I18N::number($this->totalMediaType('coat'));
-	}
-
-	/**
-	 * Count the number of media records with type "document".
-	 *
-	 * @return string
-	 */
-	public function totalMediaDocument() {
-		return I18N::number($this->totalMediaType('document'));
-	}
-
-	/**
-	 * Count the number of media records with type "electronic".
-	 *
-	 * @return string
-	 */
-	public function totalMediaElectronic() {
-		return I18N::number($this->totalMediaType('electronic'));
-	}
-
-	/**
-	 * Count the number of media records with type "magazine".
-	 *
-	 * @return string
-	 */
-	public function totalMediaMagazine() {
-		return I18N::number($this->totalMediaType('magazine'));
-	}
-
-	/**
-	 * Count the number of media records with type "manuscript".
-	 *
-	 * @return string
-	 */
-	public function totalMediaManuscript() {
-		return I18N::number($this->totalMediaType('manuscript'));
-	}
-
-	/**
-	 * Count the number of media records with type "map".
-	 *
-	 * @return string
-	 */
-	public function totalMediaMap() {
-		return I18N::number($this->totalMediaType('map'));
-	}
-
-	/**
-	 * Count the number of media records with type "microfiche".
-	 *
-	 * @return string
-	 */
-	public function totalMediaFiche() {
-		return I18N::number($this->totalMediaType('fiche'));
-	}
-
-	/**
-	 * Count the number of media records with type "microfilm".
-	 *
-	 * @return string
-	 */
-	public function totalMediaFilm() {
-		return I18N::number($this->totalMediaType('film'));
-	}
-
-	/**
-	 * Count the number of media records with type "newspaper".
-	 *
-	 * @return string
-	 */
-	public function totalMediaNewspaper() {
-		return I18N::number($this->totalMediaType('newspaper'));
-	}
-
-	/**
-	 * Count the number of media records with type "painting".
-	 *
-	 * @return string
-	 */
-	public function totalMediaPainting() {
-		return I18N::number($this->totalMediaType('painting'));
-	}
-
-	/**
-	 * Count the number of media records with type "photograph".
-	 *
-	 * @return string
-	 */
-	public function totalMediaPhoto() {
-		return I18N::number($this->totalMediaType('photo'));
-	}
-
-	/**
-	 * Count the number of media records with type "tombstone".
-	 *
-	 * @return string
-	 */
-	public function totalMediaTombstone() {
-		return I18N::number($this->totalMediaType('tombstone'));
-	}
-
-	/**
-	 * Count the number of media records with type "video".
-	 *
-	 * @return string
-	 */
-	public function totalMediaVideo() {
-		return I18N::number($this->totalMediaType('video'));
-	}
-
-	/**
-	 * Count the number of media records with type "other".
-	 *
-	 * @return string
-	 */
-	public function totalMediaOther() {
-		return I18N::number($this->totalMediaType('other'));
-	}
-
-	/**
-	 * Count the number of media records with type "unknown".
-	 *
-	 * @return string
-	 */
-	public function totalMediaUnknown() {
-		return I18N::number($this->totalMediaType('unknown'));
-	}
-
-	/**
-	 * Create a chart of media types.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function chartMedia($params = array()) {
-		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
-		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
-		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
-		$WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
-
-		if (isset($params[0]) && $params[0] != '') {
-			$size = strtolower($params[0]);
-		} else {
-			$size = $WT_STATS_S_CHART_X . 'x' . $WT_STATS_S_CHART_Y;
-		}
-		if (isset($params[1]) && $params[1] != '') {
-			$color_from = strtolower($params[1]);
-		} else {
-			$color_from = $WT_STATS_CHART_COLOR1;
-		}
-		if (isset($params[2]) && $params[2] != '') {
-			$color_to = strtolower($params[2]);
-		} else {
-			$color_to = $WT_STATS_CHART_COLOR2;
-		}
-		$sizes = explode('x', $size);
-		$tot   = $this->totalMediaType('all');
-		// Beware divide by zero
-		if ($tot == 0) {
-			return I18N::translate('None');
-		}
-		// Build a table listing only the media types actually present in the GEDCOM
-		$mediaCounts = array();
-		$mediaTypes  = "";
-		$chart_title = "";
-		$c           = 0;
-		$max         = 0;
-		$media       = array();
-		foreach ($this->_media_types as $type) {
-			$count = $this->totalMediaType($type);
-			if ($count > 0) {
-				$media[$type] = $count;
-				if ($count > $max) {
-					$max = $count;
-				}
-				$c += $count;
-			}
-		}
-		$count = $this->totalMediaType('unknown');
-		if ($count > 0) {
-			$media['unknown'] = $tot - $c;
-			if ($tot - $c > $max) {
-				$max = $count;
-			}
-		}
-		if (($max / $tot) > 0.6 && count($media) > 10) {
-			arsort($media);
-			$media = array_slice($media, 0, 10);
-			$c     = $tot;
-			foreach ($media as $cm) {
-				$c -= $cm;
-			}
-			if (isset($media['other'])) {
-				$media['other'] += $c;
-			} else {
-				$media['other'] = $c;
-			}
-		}
-		asort($media);
-		foreach ($media as $type => $count) {
-			$mediaCounts[] = round(100 * $count / $tot, 0);
-			$mediaTypes .= GedcomTag::getFileFormTypeValue($type) . ' - ' . I18N::number($count) . '|';
-			$chart_title .= GedcomTag::getFileFormTypeValue($type) . ' (' . $count . '), ';
-		}
-		$chart_title = substr($chart_title, 0, -2);
-		$chd         = $this->arrayToExtendedEncoding($mediaCounts);
-		$chl         = substr($mediaTypes, 0, -1);
-
-		return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_from},{$color_to}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . $chart_title . "\" title=\"" . $chart_title . "\" />";
-	}
-
-	/**
-	 * Birth and Death
-	 *
-	 * @param string $type
-	 * @param string $life_dir
-	 * @param string $birth_death
-	 *
-	 * @return string
-	 */
-	private function mortalityQuery($type = 'full', $life_dir = 'ASC', $birth_death = 'BIRT') {
-		if ($birth_death == 'MARR') {
-			$query_field = "'MARR'";
-		} elseif ($birth_death == 'DIV') {
-			$query_field = "'DIV'";
-		} elseif ($birth_death == 'BIRT') {
-			$query_field = "'BIRT'";
-		} else {
-			$query_field = "'DEAT'";
-		}
-		if ($life_dir == 'ASC') {
-			$dmod = 'MIN';
-		} else {
-			$dmod = 'MAX';
-		}
-		$rows = $this->runSql(
-			"SELECT d_year, d_type, d_fact, d_gid" .
-			" FROM `##dates`" .
-			" WHERE d_file={$this->tree->getTreeId()} AND d_fact IN ({$query_field}) AND d_julianday1=(" .
-			" SELECT {$dmod}( d_julianday1 )" .
-			" FROM `##dates`" .
-			" WHERE d_file={$this->tree->getTreeId()} AND d_fact IN ({$query_field}) AND d_julianday1<>0 )" .
-			" LIMIT 1"
-		);
-		if (!isset($rows[0])) {
-			return '';
-		}
-		$row    = $rows[0];
-		$record = GedcomRecord::getInstance($row['d_gid'], $this->tree);
-		switch ($type) {
-		default:
-		case 'full':
-			if ($record->canShow()) {
-				$result = $record->formatList('span', false, $record->getFullName());
-			} else {
-				$result = I18N::translate('This information is private and cannot be shown.');
-			}
-			break;
-		case 'year':
-			$date   = new Date($row['d_type'] . ' ' . $row['d_year']);
-			$result = $date->display();
-			break;
-		case 'name':
-			$result = "<a href=\"" . $record->getHtmlUrl() . "\">" . $record->getFullName() . "</a>";
-			break;
-		case 'place':
-			$fact = GedcomRecord::getInstance($row['d_gid'], $this->tree)->getFirstFact($row['d_fact']);
-			if ($fact) {
-				$result = FunctionsPrint::formatFactPlace($fact, true, true, true);
-			} else {
-				$result = I18N::translate('Private');
-			}
-			break;
-		}
-
-		return $result;
-	}
-
-	/**
-	 * Places
-	 *
-	 * @param string $what
-	 * @param string $fact
-	 * @param int    $parent
-	 * @param bool   $country
-	 *
-	 * @return int[]|string[][]
-	 */
-	public function statsPlaces($what = 'ALL', $fact = '', $parent = 0, $country = false) {
-		if ($fact) {
-			if ($what == 'INDI') {
-				$rows = Database::prepare(
-					"SELECT i_gedcom AS ged FROM `##individuals` WHERE i_file = :tree_id AND i_gedcom LIKE '%\n2 PLAC %'"
-				)->execute(array(
-					'tree_id' => $this->tree->getTreeId(),
-				))->fetchAll();
-			} elseif ($what == 'FAM') {
-				$rows = Database::prepare(
-					"SELECT f_gedcom AS ged FROM `##families` WHERE f_file = :tree_id AND f_gedcom LIKE '%\n2 PLAC %'"
-				)->execute(array(
-					'tree_id' => $this->tree->getTreeId(),
-				))->fetchAll();
-			}
-			$placelist = array();
-			foreach ($rows as $row) {
-				if (preg_match('/\n1 ' . $fact . '(?:\n[2-9].*)*\n2 PLAC (.+)/', $row->ged, $match)) {
-					if ($country) {
-						$tmp   = explode(Place::GEDCOM_SEPARATOR, $match[1]);
-						$place = end($tmp);
-					} else {
-						$place = $match[1];
-					}
-					if (!isset($placelist[$place])) {
-						$placelist[$place] = 1;
-					} else {
-						$placelist[$place]++;
-					}
-				}
-			}
-
-			return $placelist;
-		} elseif ($parent > 0) {
-			// used by placehierarchy googlemap module
-			if ($what == 'INDI') {
-				$join = " JOIN `##individuals` ON pl_file = i_file AND pl_gid = i_id";
-			} elseif ($what == 'FAM') {
-				$join = " JOIN `##families` ON pl_file = f_file AND pl_gid = f_id";
-			} else {
-				$join = "";
-			}
-			$rows = $this->runSql(
-				" SELECT" .
-				" p_place AS place," .
-				" COUNT(*) AS tot" .
-				" FROM" .
-				" `##places`" .
-				" JOIN `##placelinks` ON pl_file=p_file AND p_id=pl_p_id" .
-				$join .
-				" WHERE" .
-				" p_id={$parent} AND" .
-				" p_file={$this->tree->getTreeId()}" .
-				" GROUP BY place"
-			);
-
-			return $rows;
-		} else {
-			if ($what == 'INDI') {
-				$join = " JOIN `##individuals` ON pl_file = i_file AND pl_gid = i_id";
-			} elseif ($what == 'FAM') {
-				$join = " JOIN `##families` ON pl_file = f_file AND pl_gid = f_id";
-			} else {
-				$join = "";
-			}
-			$rows = $this->runSql(
-				" SELECT" .
-				" p_place AS country," .
-				" COUNT(*) AS tot" .
-				" FROM" .
-				" `##places`" .
-				" JOIN `##placelinks` ON pl_file=p_file AND p_id=pl_p_id" .
-				$join .
-				" WHERE" .
-				" p_file={$this->tree->getTreeId()}" .
-				" AND p_parent_id='0'" .
-				" GROUP BY country ORDER BY tot DESC, country ASC"
-			);
-
-			return $rows;
-		}
-	}
-
-	/**
-	 * Count total places.
-	 *
-	 * @return int
-	 */
-	private function totalPlacesQuery() {
-		return
-			(int) Database::prepare("SELECT COUNT(*) FROM `##places` WHERE p_file=?")
-				->execute(array($this->tree->getTreeId()))
-				->fetchOne();
-	}
-
-	/**
-	 * Count total places.
-	 *
-	 * @return string
-	 */
-	public function totalPlaces() {
-		return I18N::number($this->totalPlacesQuery());
-	}
-
-	/**
-	 * Create a chart showing where events occurred.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function chartDistribution($params = array()) {
-		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
-		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
-		$WT_STATS_CHART_COLOR3 = Theme::theme()->parameter('distribution-chart-low-values');
-		$WT_STATS_MAP_X        = Theme::theme()->parameter('distribution-chart-x');
-		$WT_STATS_MAP_Y        = Theme::theme()->parameter('distribution-chart-y');
-
-		if (isset($params[0])) {
-			$chart_shows = $params[0];
-		} else {
-			$chart_shows = 'world';
-		}
-		if (isset($params[1])) {
-			$chart_type = $params[1];
-		} else {
-			$chart_type = '';
-		}
-		if (isset($params[2])) {
-			$surname = $params[2];
-		} else {
-			$surname = '';
-		}
-
-		if ($this->totalPlacesQuery() == 0) {
-			return '';
-		}
-		// Get the country names for each language
-		$country_to_iso3166 = array();
-		foreach (I18N::activeLocales() as $locale) {
-			I18N::init($locale->languageTag());
-			$countries = $this->getAllCountries();
-			foreach ($this->iso3166() as $three => $two) {
-				$country_to_iso3166[$three]             = $two;
-				$country_to_iso3166[$countries[$three]] = $two;
-			}
-		}
-		I18N::init(WT_LOCALE);
-		switch ($chart_type) {
-		case 'surname_distribution_chart':
-			if ($surname == "") {
-				$surname = $this->getCommonSurname();
-			}
-			$chart_title = I18N::translate('Surname distribution chart') . ': ' . $surname;
-			// Count how many people are events in each country
-			$surn_countries = array();
-			$indis          = QueryName::individuals($this->tree, I18N::strtoupper($surname), '', '', false, false);
-			foreach ($indis as $person) {
-				if (preg_match_all('/^2 PLAC (?:.*, *)*(.*)/m', $person->getGedcom(), $matches)) {
-					// webtrees uses 3 letter country codes and localised country names, but google uses 2 letter codes.
-					foreach ($matches[1] as $country) {
-						if (array_key_exists($country, $country_to_iso3166)) {
-							if (array_key_exists($country_to_iso3166[$country], $surn_countries)) {
-								$surn_countries[$country_to_iso3166[$country]]++;
-							} else {
-								$surn_countries[$country_to_iso3166[$country]] = 1;
-							}
-						}
-					}
-				}
-			};
-			break;
-		case 'birth_distribution_chart':
-			$chart_title = I18N::translate('Birth by country');
-			// Count how many people were born in each country
-			$surn_countries = array();
-			$b_countries    = $this->statsPlaces('INDI', 'BIRT', 0, true);
-			foreach ($b_countries as $place => $count) {
-				$country = $place;
-				if (array_key_exists($country, $country_to_iso3166)) {
-					if (!isset($surn_countries[$country_to_iso3166[$country]])) {
-						$surn_countries[$country_to_iso3166[$country]] = $count;
-					} else {
-						$surn_countries[$country_to_iso3166[$country]] += $count;
-					}
-				}
-			}
-			break;
-		case 'death_distribution_chart':
-			$chart_title = I18N::translate('Death by country');
-			// Count how many people were death in each country
-			$surn_countries = array();
-			$d_countries    = $this->statsPlaces('INDI', 'DEAT', 0, true);
-			foreach ($d_countries as $place => $count) {
-				$country = $place;
-				if (array_key_exists($country, $country_to_iso3166)) {
-					if (!isset($surn_countries[$country_to_iso3166[$country]])) {
-						$surn_countries[$country_to_iso3166[$country]] = $count;
-					} else {
-						$surn_countries[$country_to_iso3166[$country]] += $count;
-					}
-				}
-			}
-			break;
-		case 'marriage_distribution_chart':
-			$chart_title = I18N::translate('Marriage by country');
-			// Count how many families got marriage in each country
-			$surn_countries = array();
-			$m_countries    = $this->statsPlaces('FAM');
-			// webtrees uses 3 letter country codes and localised country names, but google uses 2 letter codes.
-			foreach ($m_countries as $place) {
-				$country = $place['country'];
-				if (array_key_exists($country, $country_to_iso3166)) {
-					if (!isset($surn_countries[$country_to_iso3166[$country]])) {
-						$surn_countries[$country_to_iso3166[$country]] = $place['tot'];
-					} else {
-						$surn_countries[$country_to_iso3166[$country]] += $place['tot'];
-					}
-				}
-			}
-			break;
-		case 'indi_distribution_chart':
-		default:
-			$chart_title = I18N::translate('Individual distribution chart');
-			// Count how many people have events in each country
-			$surn_countries = array();
-			$a_countries    = $this->statsPlaces('INDI');
-			// webtrees uses 3 letter country codes and localised country names, but google uses 2 letter codes.
-			foreach ($a_countries as $place) {
-				$country = $place['country'];
-				if (array_key_exists($country, $country_to_iso3166)) {
-					if (!isset($surn_countries[$country_to_iso3166[$country]])) {
-						$surn_countries[$country_to_iso3166[$country]] = $place['tot'];
-					} else {
-						$surn_countries[$country_to_iso3166[$country]] += $place['tot'];
-					}
-				}
-			}
-			break;
-		}
-		$chart_url = "https://chart.googleapis.com/chart?cht=t&amp;chtm=" . $chart_shows;
-		$chart_url .= "&amp;chco=" . $WT_STATS_CHART_COLOR1 . "," . $WT_STATS_CHART_COLOR3 . "," . $WT_STATS_CHART_COLOR2; // country colours
-		$chart_url .= "&amp;chf=bg,s,ECF5FF"; // sea colour
-		$chart_url .= "&amp;chs=" . $WT_STATS_MAP_X . "x" . $WT_STATS_MAP_Y;
-		$chart_url .= "&amp;chld=" . implode('', array_keys($surn_countries)) . "&amp;chd=s:";
-		foreach ($surn_countries as $count) {
-			$chart_url .= substr(WT_GOOGLE_CHART_ENCODING, (int) ($count / max($surn_countries) * 61), 1);
-		}
-		$chart = '<div id="google_charts" class="center">';
-		$chart .= '<p>' . $chart_title . '</p>';
-		$chart .= '<div><img src="' . $chart_url . '" alt="' . $chart_title . '" title="' . $chart_title . '" class="gchart" /><br>';
-		$chart .= '<table class="center"><tr>';
-		$chart .= '<td bgcolor="#' . $WT_STATS_CHART_COLOR2 . '" width="12"></td><td>' . I18N::translate('Highest population') . '</td>';
-		$chart .= '<td bgcolor="#' . $WT_STATS_CHART_COLOR3 . '" width="12"></td><td>' . I18N::translate('Lowest population') . '</td>';
-		$chart .= '<td bgcolor="#' . $WT_STATS_CHART_COLOR1 . '" width="12"></td><td>' . I18N::translate('Nobody at all') . '</td>';
-		$chart .= '</tr></table></div></div>';
-
-		return $chart;
-	}
-
-	/**
-	 * A list of common countries.
-	 *
-	 * @return string
-	 */
-	public function commonCountriesList() {
-		$countries = $this->statsPlaces();
-		if (empty($countries)) {
-			return '';
-		}
-		$top10 = array();
-		$i     = 1;
-		// Get the country names for each language
-		$country_names = array();
-		foreach (I18N::activeLocales() as $locale) {
-			I18N::init($locale->languageTag());
-			$all_countries = $this->getAllCountries();
-			foreach ($all_countries as $country_code => $country_name) {
-				$country_names[$country_name] = $country_code;
-			}
-		}
-		I18N::init(WT_LOCALE);
-		$all_db_countries = array();
-		foreach ($countries as $place) {
-			$country = trim($place['country']);
-			if (array_key_exists($country, $country_names)) {
-				if (!isset($all_db_countries[$country_names[$country]][$country])) {
-					$all_db_countries[$country_names[$country]][$country] = (int) $place['tot'];
-				} else {
-					$all_db_countries[$country_names[$country]][$country] += (int) $place['tot'];
-				}
-			}
-		}
-		// get all the user’s countries names
-		$all_countries = $this->getAllCountries();
-		foreach ($all_db_countries as $country_code => $country) {
-			$top10[] = '<li>';
-			foreach ($country as $country_name => $tot) {
-				$tmp   = new Place($country_name, $this->tree);
-				$place = '<a href="' . $tmp->getURL() . '" class="list_item">' . $all_countries[$country_code] . '</a>';
-				$top10[] .= $place . ' - ' . I18N::number($tot);
-			}
-			$top10[] .= '</li>';
-			if ($i++ == 10) {
-				break;
-			}
-		}
-		$top10 = implode('', $top10);
-
-		return '<ul>' . $top10 . '</ul>';
-	}
-
-	/**
-	 * A list of common birth places.
-	 *
-	 * @return string
-	 */
-	public function commonBirthPlacesList() {
-		$places = $this->statsPlaces('INDI', 'BIRT');
-		$top10  = array();
-		$i      = 1;
-		arsort($places);
-		foreach ($places as $place => $count) {
-			$tmp     = new Place($place, $this->tree);
-			$place   = '<a href="' . $tmp->getURL() . '" class="list_item">' . $tmp->getFullName() . '</a>';
-			$top10[] = '<li>' . $place . ' - ' . I18N::number($count) . '</li>';
-			if ($i++ == 10) {
-				break;
-			}
-		}
-		$top10 = implode('', $top10);
-
-		return '<ul>' . $top10 . '</ul>';
-	}
-
-	/**
-	 * A list of common death places.
-	 *
-	 * @return string
-	 */
-	public function commonDeathPlacesList() {
-		$places = $this->statsPlaces('INDI', 'DEAT');
-		$top10  = array();
-		$i      = 1;
-		arsort($places);
-		foreach ($places as $place => $count) {
-			$tmp     = new Place($place, $this->tree);
-			$place   = '<a href="' . $tmp->getURL() . '" class="list_item">' . $tmp->getFullName() . '</a>';
-			$top10[] = '<li>' . $place . ' - ' . I18N::number($count) . '</li>';
-			if ($i++ == 10) {
-				break;
-			}
-		}
-		$top10 = implode('', $top10);
-
-		return '<ul>' . $top10 . '</ul>';
-	}
-
-	/**
-	 * A list of common marriage places.
-	 *
-	 * @return string
-	 */
-	public function commonMarriagePlacesList() {
-		$places = $this->statsPlaces('FAM', 'MARR');
-		$top10  = array();
-		$i      = 1;
-		arsort($places);
-		foreach ($places as $place => $count) {
-			$tmp     = new Place($place, $this->tree);
-			$place   = '<a href="' . $tmp->getURL() . '" class="list_item">' . $tmp->getFullName() . '</a>';
-			$top10[] = '<li>' . $place . ' - ' . I18N::number($count) . '</li>';
-			if ($i++ == 10) {
-				break;
-			}
-		}
-		$top10 = implode('', $top10);
-
-		return '<ul>' . $top10 . '</ul>';
-	}
-
-	/**
-	 * Create a chart of birth places.
-	 *
-	 * @param bool     $simple
-	 * @param bool     $sex
-	 * @param int      $year1
-	 * @param int      $year2
-	 * @param string[] $params
-	 *
-	 * @return array|string
-	 */
-	public function statsBirthQuery($simple = true, $sex = false, $year1 = -1, $year2 = -1, $params = array()) {
-		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
-		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
-		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
-		$WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
-
-		if ($simple) {
-			$sql =
-				"SELECT FLOOR(d_year/100+1) AS century, COUNT(*) AS total FROM `##dates` " .
-				"WHERE " .
-				"d_file={$this->tree->getTreeId()} AND " .
-				"d_year<>0 AND " .
-				"d_fact='BIRT' AND " .
-				"d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')";
-		} elseif ($sex) {
-			$sql =
-				"SELECT d_month, i_sex, COUNT(*) AS total FROM `##dates` " .
-				"JOIN `##individuals` ON d_file = i_file AND d_gid = i_id " .
-				"WHERE " .
-				"d_file={$this->tree->getTreeId()} AND " .
-				"d_fact='BIRT' AND " .
-				"d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')";
-		} else {
-			$sql =
-				"SELECT d_month, COUNT(*) AS total FROM `##dates` " .
-				"WHERE " .
-				"d_file={$this->tree->getTreeId()} AND " .
-				"d_fact='BIRT' AND " .
-				"d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')";
-		}
-		if ($year1 >= 0 && $year2 >= 0) {
-			$sql .= " AND d_year BETWEEN '{$year1}' AND '{$year2}'";
-		}
-		if ($simple) {
-			$sql .= " GROUP BY century ORDER BY century";
-		} else {
-			$sql .= " GROUP BY d_month";
-			if ($sex) {
-				$sql .= ", i_sex";
-			}
-		}
-		$rows = $this->runSql($sql);
-		if ($simple) {
-			if (isset($params[0]) && $params[0] != '') {
-				$size = strtolower($params[0]);
-			} else {
-				$size = $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y;
-			}
-			if (isset($params[1]) && $params[1] != '') {
-				$color_from = strtolower($params[1]);
-			} else {
-				$color_from = $WT_STATS_CHART_COLOR1;
-			}
-			if (isset($params[2]) && $params[2] != '') {
-				$color_to = strtolower($params[2]);
-			} else {
-				$color_to = $WT_STATS_CHART_COLOR2;
-			}
-			$sizes = explode('x', $size);
-			$tot   = 0;
-			foreach ($rows as $values) {
-				$tot += $values['total'];
-			}
-			// Beware divide by zero
-			if ($tot == 0) {
-				return '';
-			}
-			$centuries = "";
-			$counts    = array();
-			foreach ($rows as $values) {
-				$counts[] = round(100 * $values['total'] / $tot, 0);
-				$centuries .= $this->centuryName($values['century']) . ' - ' . I18N::number($values['total']) . '|';
-			}
-			$chd = $this->arrayToExtendedEncoding($counts);
-			$chl = rawurlencode(substr($centuries, 0, -1));
-
-			return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_from},{$color_to}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Births by century') . "\" title=\"" . I18N::translate('Births by century') . "\" />";
-		} else {
-			return $rows;
-		}
-	}
-
-	/**
-	 * Create a chart of death places.
-	 *
-	 * @param bool     $simple
-	 * @param bool     $sex
-	 * @param int      $year1
-	 * @param int      $year2
-	 * @param string[] $params
-	 *
-	 * @return array|string
-	 */
-	public function statsDeathQuery($simple = true, $sex = false, $year1 = -1, $year2 = -1, $params = array()) {
-		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
-		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
-		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
-		$WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
-
-		if ($simple) {
-			$sql =
-				"SELECT FLOOR(d_year/100+1) AS century, COUNT(*) AS total FROM `##dates` " .
-				"WHERE " .
-				"d_file={$this->tree->getTreeId()} AND " .
-				'd_year<>0 AND ' .
-				"d_fact='DEAT' AND " .
-				"d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')";
-		} elseif ($sex) {
-			$sql =
-				"SELECT d_month, i_sex, COUNT(*) AS total FROM `##dates` " .
-				"JOIN `##individuals` ON d_file = i_file AND d_gid = i_id " .
-				"WHERE " .
-				"d_file={$this->tree->getTreeId()} AND " .
-				"d_fact='DEAT' AND " .
-				"d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')";
-		} else {
-			$sql =
-				"SELECT d_month, COUNT(*) AS total FROM `##dates` " .
-				"WHERE " .
-				"d_file={$this->tree->getTreeId()} AND " .
-				"d_fact='DEAT' AND " .
-				"d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')";
-		}
-		if ($year1 >= 0 && $year2 >= 0) {
-			$sql .= " AND d_year BETWEEN '{$year1}' AND '{$year2}'";
-		}
-		if ($simple) {
-			$sql .= " GROUP BY century ORDER BY century";
-		} else {
-			$sql .= " GROUP BY d_month";
-			if ($sex) {
-				$sql .= ", i_sex";
-			}
-		}
-		$rows = $this->runSql($sql);
-		if ($simple) {
-			if (isset($params[0]) && $params[0] != '') {
-				$size = strtolower($params[0]);
-			} else {
-				$size = $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y;
-			}
-			if (isset($params[1]) && $params[1] != '') {
-				$color_from = strtolower($params[1]);
-			} else {
-				$color_from = $WT_STATS_CHART_COLOR1;
-			}
-			if (isset($params[2]) && $params[2] != '') {
-				$color_to = strtolower($params[2]);
-			} else {
-				$color_to = $WT_STATS_CHART_COLOR2;
-			}
-			$sizes = explode('x', $size);
-			$tot   = 0;
-			foreach ($rows as $values) {
-				$tot += $values['total'];
-			}
-			// Beware divide by zero
-			if ($tot == 0) {
-				return '';
-			}
-			$centuries = "";
-			$counts    = array();
-			foreach ($rows as $values) {
-				$counts[] = round(100 * $values['total'] / $tot, 0);
-				$centuries .= $this->centuryName($values['century']) . ' - ' . I18N::number($values['total']) . '|';
-			}
-			$chd = $this->arrayToExtendedEncoding($counts);
-			$chl = rawurlencode(substr($centuries, 0, -1));
-
-			return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_from},{$color_to}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Deaths by century') . "\" title=\"" . I18N::translate('Deaths by century') . "\" />";
-		}
-
-		return $rows;
-	}
-
-	/**
-	 * Find the earliest birth.
-	 *
-	 * @return string
-	 */
-	public function firstBirth() {
-		return $this->mortalityQuery('full', 'ASC', 'BIRT');
-	}
-
-	/**
-	 * Find the earliest birth year.
-	 *
-	 * @return string
-	 */
-	public function firstBirthYear() {
-		return $this->mortalityQuery('year', 'ASC', 'BIRT');
-	}
-
-	/**
-	 * Find the name of the earliest birth.
-	 *
-	 * @return string
-	 */
-	public function firstBirthName() {
-		return $this->mortalityQuery('name', 'ASC', 'BIRT');
-	}
-
-	/**
-	 * Find the earliest birth place.
-	 *
-	 * @return string
-	 */
-	public function firstBirthPlace() {
-		return $this->mortalityQuery('place', 'ASC', 'BIRT');
-	}
-
-	/**
-	 * Find the latest birth.
-	 *
-	 * @return string
-	 */
-	public function lastBirth() {
-		return $this->mortalityQuery('full', 'DESC', 'BIRT');
-	}
-
-	/**
-	 * Find the latest birth year.
-	 *
-	 * @return string
-	 */
-	public function lastBirthYear() {
-		return $this->mortalityQuery('year', 'DESC', 'BIRT');
-	}
-
-	/**
-	 * Find the latest birth name.
-	 *
-	 * @return string
-	 */
-	public function lastBirthName() {
-		return $this->mortalityQuery('name', 'DESC', 'BIRT');
-	}
-
-	/**
-	 * Find the latest birth place.
-	 *
-	 * @return string
-	 */
-	public function lastBirthPlace() {
-		return $this->mortalityQuery('place', 'DESC', 'BIRT');
-	}
-
-	/**
-	 * General query on births.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function statsBirth($params = array()) {
-		return $this->statsBirthQuery(true, false, -1, -1, $params);
-	}
-
-	/**
-	 * Find the earliest death.
-	 *
-	 * @return string
-	 */
-	public function firstDeath() {
-		return $this->mortalityQuery('full', 'ASC', 'DEAT');
-	}
-
-	/**
-	 * Find the earliest death year.
-	 *
-	 * @return string
-	 */
-	public function firstDeathYear() {
-		return $this->mortalityQuery('year', 'ASC', 'DEAT');
-	}
-
-	/**
-	 * Find the earliest death name.
-	 *
-	 * @return string
-	 */
-	public function firstDeathName() {
-		return $this->mortalityQuery('name', 'ASC', 'DEAT');
-	}
-
-	/**
-	 * Find the earliest death place.
-	 *
-	 * @return string
-	 */
-	public function firstDeathPlace() {
-		return $this->mortalityQuery('place', 'ASC', 'DEAT');
-	}
-
-	/**
-	 * Find the latest death.
-	 *
-	 * @return string
-	 */
-	public function lastDeath() {
-		return $this->mortalityQuery('full', 'DESC', 'DEAT');
-	}
-
-	/**
-	 * Find the latest death year.
-	 *
-	 * @return string
-	 */
-	public function lastDeathYear() {
-		return $this->mortalityQuery('year', 'DESC', 'DEAT');
-	}
-
-	/**
-	 * Find the latest death name.
-	 *
-	 * @return string
-	 */
-	public function lastDeathName() {
-		return $this->mortalityQuery('name', 'DESC', 'DEAT');
-	}
-
-	/**
-	 * Find the place of the latest death.
-	 *
-	 * @return string
-	 */
-	public function lastDeathPlace() {
-		return $this->mortalityQuery('place', 'DESC', 'DEAT');
-	}
-
-	/**
-	 * General query on deaths.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function statsDeath($params = array()) {
-		return $this->statsDeathQuery(true, false, -1, -1, $params);
-	}
-
-	/**
-	 * Lifespan
-	 *
-	 * @param string $type
-	 * @param string $sex
-	 *
-	 * @return string
-	 */
-	private function longlifeQuery($type = 'full', $sex = 'F') {
-		$sex_search = ' 1=1';
-		if ($sex == 'F') {
-			$sex_search = " i_sex='F'";
-		} elseif ($sex == 'M') {
-			$sex_search = " i_sex='M'";
-		}
-
-		$rows = $this->runSql(
-			" SELECT" .
-			" death.d_gid AS id," .
-			" death.d_julianday2-birth.d_julianday1 AS age" .
-			" FROM" .
-			" `##dates` AS death," .
-			" `##dates` AS birth," .
-			" `##individuals` AS indi" .
-			" WHERE" .
-			" indi.i_id=birth.d_gid AND" .
-			" birth.d_gid=death.d_gid AND" .
-			" death.d_file={$this->tree->getTreeId()} AND" .
-			" birth.d_file=death.d_file AND" .
-			" birth.d_file=indi.i_file AND" .
-			" birth.d_fact='BIRT' AND" .
-			" death.d_fact='DEAT' AND" .
-			" birth.d_julianday1<>0 AND" .
-			" death.d_julianday1>birth.d_julianday2 AND" .
-			$sex_search .
-			" ORDER BY" .
-			" age DESC LIMIT 1"
-		);
-		if (!isset($rows[0])) {
-			return '';
-		}
-		$row    = $rows[0];
-		$person = Individual::getInstance($row['id'], $this->tree);
-		switch ($type) {
-		default:
-		case 'full':
-			if ($person->canShowName()) {
-				$result = $person->formatList('span', false, $person->getFullName());
-			} else {
-				$result = I18N::translate('This information is private and cannot be shown.');
-			}
-			break;
-		case 'age':
-			$result = I18N::number((int) ($row['age'] / 365.25));
-			break;
-		case 'name':
-			$result = "<a href=\"" . $person->getHtmlUrl() . "\">" . $person->getFullName() . "</a>";
-			break;
-		}
-
-		return $result;
-	}
-
-	/**
-	 * Find the oldest individuals.
-	 *
-	 * @param string   $type
-	 * @param string   $sex
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	private function topTenOldestQuery($type = 'list', $sex = 'BOTH', $params = array()) {
-		if ($sex === 'F') {
-			$sex_search = " AND i_sex='F' ";
-		} elseif ($sex === 'M') {
-			$sex_search = " AND i_sex='M' ";
-		} else {
-			$sex_search = '';
-		}
-		if (isset($params[0])) {
-			$total = (int) $params[0];
-		} else {
-			$total = 10;
-		}
-		$rows = $this->runSql(
-			"SELECT " .
-			" MAX(death.d_julianday2-birth.d_julianday1) AS age, " .
-			" death.d_gid AS deathdate " .
-			"FROM " .
-			" `##dates` AS death, " .
-			" `##dates` AS birth, " .
-			" `##individuals` AS indi " .
-			"WHERE " .
-			" indi.i_id=birth.d_gid AND " .
-			" birth.d_gid=death.d_gid AND " .
-			" death.d_file={$this->tree->getTreeId()} AND " .
-			" birth.d_file=death.d_file AND " .
-			" birth.d_file=indi.i_file AND " .
-			" birth.d_fact='BIRT' AND " .
-			" death.d_fact='DEAT' AND " .
-			" birth.d_julianday1<>0 AND " .
-			" death.d_julianday1>birth.d_julianday2 " .
-			$sex_search .
-			"GROUP BY deathdate " .
-			"ORDER BY age DESC " .
-			"LIMIT " . $total
-		);
-		if (!isset($rows[0])) {
-			return '';
-		}
-		$top10 = array();
-		foreach ($rows as $row) {
-			$person = Individual::getInstance($row['deathdate'], $this->tree);
-			$age    = $row['age'];
-			if ((int) ($age / 365.25) > 0) {
-				$age = (int) ($age / 365.25) . 'y';
-			} elseif ((int) ($age / 30.4375) > 0) {
-				$age = (int) ($age / 30.4375) . 'm';
-			} else {
-				$age = $age . 'd';
-			}
-			$age = FunctionsDate::getAgeAtEvent($age);
-			if ($person->canShow()) {
-				if ($type == 'list') {
-					$top10[] = "<li><a href=\"" . $person->getHtmlUrl() . "\">" . $person->getFullName() . "</a> (" . $age . ")" . "</li>";
-				} else {
-					$top10[] = "<a href=\"" . $person->getHtmlUrl() . "\">" . $person->getFullName() . "</a> (" . $age . ")";
-				}
-			}
-		}
-		if ($type == 'list') {
-			$top10 = implode('', $top10);
-		} else {
-			$top10 = implode(' ', $top10);
-		}
-		if (I18N::direction() === 'rtl') {
-			$top10 = str_replace(array('[', ']', '(', ')', '+'), array('&rlm;[', '&rlm;]', '&rlm;(', '&rlm;)', '&rlm;+'), $top10);
-		}
-		if ($type == 'list') {
-			return '<ul>' . $top10 . '</ul>';
-		}
-
-		return $top10;
-	}
-
-	/**
-	 * Find the oldest living individuals.
-	 *
-	 * @param string   $type
-	 * @param string   $sex
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	private function topTenOldestAliveQuery($type = 'list', $sex = 'BOTH', $params = array()) {
-		if (!Auth::isMember($this->tree)) {
-			return I18N::translate('This information is private and cannot be shown.');
-		}
-		if ($sex == 'F') {
-			$sex_search = " AND i_sex='F'";
-		} elseif ($sex == 'M') {
-			$sex_search = " AND i_sex='M'";
-		} else {
-			$sex_search = '';
-		}
-		if (isset($params[0])) {
-			$total = (int) $params[0];
-		} else {
-			$total = 10;
-		}
-		$rows = $this->runSql(
-			"SELECT" .
-			" birth.d_gid AS id," .
-			" MIN(birth.d_julianday1) AS age" .
-			" FROM" .
-			" `##dates` AS birth," .
-			" `##individuals` AS indi" .
-			" WHERE" .
-			" indi.i_id=birth.d_gid AND" .
-			" indi.i_gedcom NOT REGEXP '\\n1 (" . WT_EVENTS_DEAT . ")' AND" .
-			" birth.d_file={$this->tree->getTreeId()} AND" .
-			" birth.d_fact='BIRT' AND" .
-			" birth.d_file=indi.i_file AND" .
-			" birth.d_julianday1<>0" .
-			$sex_search .
-			" GROUP BY id" .
-			" ORDER BY age" .
-			" ASC LIMIT " . $total
-		);
-		$top10 = array();
-		foreach ($rows as $row) {
-			$person = Individual::getInstance($row['id'], $this->tree);
-			$age    = (WT_CLIENT_JD - $row['age']);
-			if ((int) ($age / 365.25) > 0) {
-				$age = (int) ($age / 365.25) . 'y';
-			} elseif ((int) ($age / 30.4375) > 0) {
-				$age = (int) ($age / 30.4375) . 'm';
-			} else {
-				$age = $age . 'd';
-			}
-			$age = FunctionsDate::getAgeAtEvent($age);
-			if ($type === 'list') {
-				$top10[] = "<li><a href=\"" . $person->getHtmlUrl() . "\">" . $person->getFullName() . "</a> (" . $age . ")" . "</li>";
-			} else {
-				$top10[] = "<a href=\"" . $person->getHtmlUrl() . "\">" . $person->getFullName() . "</a> (" . $age . ")";
-			}
-		}
-		if ($type === 'list') {
-			$top10 = implode('', $top10);
-		} else {
-			$top10 = implode('; ', $top10);
-		}
-		if (I18N::direction() === 'rtl') {
-			$top10 = str_replace(array('[', ']', '(', ')', '+'), array('&rlm;[', '&rlm;]', '&rlm;(', '&rlm;)', '&rlm;+'), $top10);
-		}
-		if ($type === 'list') {
-			return '<ul>' . $top10 . '</ul>';
-		}
-
-		return $top10;
-	}
-
-	/**
-	 * Find the average lifespan.
-	 *
-	 * @param string $sex
-	 * @param bool   $show_years
-	 *
-	 * @return string
-	 */
-	private function averageLifespanQuery($sex = 'BOTH', $show_years = false) {
-		if ($sex === 'F') {
-			$sex_search = " AND i_sex='F' ";
-		} elseif ($sex === 'M') {
-			$sex_search = " AND i_sex='M' ";
-		} else {
-			$sex_search = '';
-		}
-		$rows = $this->runSql(
-			"SELECT " .
-			" AVG(death.d_julianday2-birth.d_julianday1) AS age " .
-			"FROM " .
-			" `##dates` AS death, " .
-			" `##dates` AS birth, " .
-			" `##individuals` AS indi " .
-			"WHERE " .
-			" indi.i_id=birth.d_gid AND " .
-			" birth.d_gid=death.d_gid AND " .
-			" death.d_file=" . $this->tree->getTreeId() . " AND " .
-			" birth.d_file=death.d_file AND " .
-			" birth.d_file=indi.i_file AND " .
-			" birth.d_fact='BIRT' AND " .
-			" death.d_fact='DEAT' AND " .
-			" birth.d_julianday1<>0 AND " .
-			" death.d_julianday1>birth.d_julianday2 " .
-			$sex_search
-		);
-		if (!isset($rows[0])) {
-			return '';
-		}
-		$row = $rows[0];
-		$age = $row['age'];
-		if ($show_years) {
-			if ((int) ($age / 365.25) > 0) {
-				$age = (int) ($age / 365.25) . 'y';
-			} elseif ((int) ($age / 30.4375) > 0) {
-				$age = (int) ($age / 30.4375) . 'm';
-			} elseif (!empty($age)) {
-				$age = $age . 'd';
-			}
-
-			return FunctionsDate::getAgeAtEvent($age);
-		} else {
-			return I18N::number($age / 365.25);
-		}
-	}
-
-	/**
-	 * General query on ages.
-	 *
-	 * @param bool     $simple
-	 * @param string   $related
-	 * @param string   $sex
-	 * @param int      $year1
-	 * @param int      $year2
-	 * @param string[] $params
-	 *
-	 * @return array|string
-	 */
-	public function statsAgeQuery($simple = true, $related = 'BIRT', $sex = 'BOTH', $year1 = -1, $year2 = -1, $params = array()) {
-		if ($simple) {
-			if (isset($params[0]) && $params[0] != '') {
-				$size = strtolower($params[0]);
-			} else {
-				$size = '230x250';
-			}
-			$sizes = explode('x', $size);
-			$rows  = $this->runSql(
-				"SELECT" .
-				" ROUND(AVG(death.d_julianday2-birth.d_julianday1)/365.25,1) AS age," .
-				" FLOOR(death.d_year/100+1) AS century," .
-				" i_sex AS sex" .
-				" FROM" .
-				" `##dates` AS death," .
-				" `##dates` AS birth," .
-				" `##individuals` AS indi" .
-				" WHERE" .
-				" indi.i_id=birth.d_gid AND" .
-				" birth.d_gid=death.d_gid AND" .
-				" death.d_file={$this->tree->getTreeId()} AND" .
-				" birth.d_file=death.d_file AND" .
-				" birth.d_file=indi.i_file AND" .
-				" birth.d_fact='BIRT' AND" .
-				" death.d_fact='DEAT' AND" .
-				" birth.d_julianday1<>0 AND" .
-				" birth.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND" .
-				" death.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND" .
-				" death.d_julianday1>birth.d_julianday2" .
-				" GROUP BY century, sex ORDER BY century, sex");
-			if (empty($rows)) {
-				return '';
-			}
-			$chxl    = '0:|';
-			$countsm = '';
-			$countsf = '';
-			$countsa = '';
-			$out     = array();
-			foreach ($rows as $values) {
-				$out[$values['century']][$values['sex']] = $values['age'];
-			}
-			foreach ($out as $century => $values) {
-				if ($sizes[0] < 980) {
-					$sizes[0] += 50;
-				}
-				$chxl .= $this->centuryName($century) . '|';
-				$average = 0;
-				if (isset($values['F'])) {
-					$countsf .= $values['F'] . ',';
-					$average = $values['F'];
-				} else {
-					$countsf .= '0,';
-				}
-				if (isset($values['M'])) {
-					$countsm .= $values['M'] . ',';
-					if ($average == 0) {
-						$countsa .= $values['M'] . ',';
-					} else {
-						$countsa .= (($values['M'] + $average) / 2) . ',';
-					}
-				} else {
-					$countsm .= '0,';
-					if ($average == 0) {
-						$countsa .= '0,';
-					} else {
-						$countsa .= $values['F'] . ',';
-					}
-				}
-			}
-			$countsm = substr($countsm, 0, -1);
-			$countsf = substr($countsf, 0, -1);
-			$countsa = substr($countsa, 0, -1);
-			$chd     = 't2:' . $countsm . '|' . $countsf . '|' . $countsa;
-			$decades = '';
-			for ($i = 0; $i <= 100; $i += 10) {
-				$decades .= '|' . I18N::number($i);
-			}
-			$chxl .= '1:||' . I18N::translate('century') . '|2:' . $decades . '|3:||' . I18N::translate('Age') . '|';
-			$title = I18N::translate('Average age related to death century');
-			if (count($rows) > 6 || mb_strlen($title) < 30) {
-				$chtt = $title;
-			} else {
-				$offset  = 0;
-				$counter = array();
-				while ($offset = strpos($title, ' ', $offset + 1)) {
-					$counter[] = $offset;
-				}
-				$half = (int) (count($counter) / 2);
-				$chtt = substr_replace($title, '|', $counter[$half], 1);
-			}
-
-			return '<img src="' . "https://chart.googleapis.com/chart?cht=bvg&amp;chs={$sizes[0]}x{$sizes[1]}&amp;chm=D,FF0000,2,0,3,1|N*f1*,000000,0,-1,11,1|N*f1*,000000,1,-1,11,1&amp;chf=bg,s,ffffff00|c,s,ffffff00&amp;chtt=" . rawurlencode($chtt) . "&amp;chd={$chd}&amp;chco=0000FF,FFA0CB,FF0000&amp;chbh=20,3&amp;chxt=x,x,y,y&amp;chxl=" . rawurlencode($chxl) . "&amp;chdl=" . rawurlencode(I18N::translate('Males') . '|' . I18N::translate('Females') . '|' . I18N::translate('Average age at death')) . "\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Average age related to death century') . "\" title=\"" . I18N::translate('Average age related to death century') . "\" />";
-		} else {
-			$sex_search = '';
-			$years      = '';
-			if ($sex == 'F') {
-				$sex_search = " AND i_sex='F'";
-			} elseif ($sex == 'M') {
-				$sex_search = " AND i_sex='M'";
-			}
-			if ($year1 >= 0 && $year2 >= 0) {
-				if ($related == 'BIRT') {
-					$years = " AND birth.d_year BETWEEN '{$year1}' AND '{$year2}'";
-				} elseif ($related == 'DEAT') {
-					$years = " AND death.d_year BETWEEN '{$year1}' AND '{$year2}'";
-				}
-			}
-			$rows = $this->runSql(
-				"SELECT" .
-				" death.d_julianday2-birth.d_julianday1 AS age" .
-				" FROM" .
-				" `##dates` AS death," .
-				" `##dates` AS birth," .
-				" `##individuals` AS indi" .
-				" WHERE" .
-				" indi.i_id=birth.d_gid AND" .
-				" birth.d_gid=death.d_gid AND" .
-				" death.d_file={$this->tree->getTreeId()} AND" .
-				" birth.d_file=death.d_file AND" .
-				" birth.d_file=indi.i_file AND" .
-				" birth.d_fact='BIRT' AND" .
-				" death.d_fact='DEAT' AND" .
-				" birth.d_julianday1<>0 AND" .
-				" birth.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND" .
-				" death.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND" .
-				" death.d_julianday1>birth.d_julianday2" .
-				$years .
-				$sex_search .
-				" ORDER BY age DESC");
-
-			return $rows;
-		}
-	}
-
-	/**
-	 * General query on ages.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function statsAge($params = array()) {
-		return $this->statsAgeQuery(true, 'BIRT', 'BOTH', -1, -1, $params);
-	}
-
-	/**
-	 * Find the lognest lived individual.
-	 *
-	 * @return string
-	 */
-	public function longestLife() {
-		return $this->longlifeQuery('full', 'BOTH');
-	}
-
-	/**
-	 * Find the age of the longest lived individual.
-	 *
-	 * @return string
-	 */
-	public function longestLifeAge() {
-		return $this->longlifeQuery('age', 'BOTH');
-	}
-
-	/**
-	 * Find the name of the longest lived individual.
-	 *
-	 * @return string
-	 */
-	public function longestLifeName() {
-		return $this->longlifeQuery('name', 'BOTH');
-	}
-
-	/**
-	 * Find the oldest individuals.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topTenOldest($params = array()) {
-		return $this->topTenOldestQuery('nolist', 'BOTH', $params);
-	}
-
-	/**
-	 * Find the oldest living individuals.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topTenOldestList($params = array()) {
-		return $this->topTenOldestQuery('list', 'BOTH', $params);
-	}
-
-	/**
-	 * Find the oldest living individuals.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topTenOldestAlive($params = array()) {
-		return $this->topTenOldestAliveQuery('nolist', 'BOTH', $params);
-	}
-
-	/**
-	 * Find the oldest living individuals.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topTenOldestListAlive($params = array()) {
-		return $this->topTenOldestAliveQuery('list', 'BOTH', $params);
-	}
-
-	/**
-	 * Find the average lifespan.
-	 *
-	 * @param bool $show_years
-	 *
-	 * @return string
-	 */
-	public function averageLifespan($show_years = false) {
-		return $this->averageLifespanQuery('BOTH', $show_years);
-	}
-
-	/**
-	 * Find the longest lived female.
-	 *
-	 * @return string
-	 */
-	public function longestLifeFemale() {
-		return $this->longlifeQuery('full', 'F');
-	}
-
-	/**
-	 * Find the age of the longest lived female.
-	 *
-	 * @return string
-	 */
-	public function longestLifeFemaleAge() {
-		return $this->longlifeQuery('age', 'F');
-	}
-
-	/**
-	 * Find the name of the longest lived female.
-	 *
-	 * @return string
-	 */
-	public function longestLifeFemaleName() {
-		return $this->longlifeQuery('name', 'F');
-	}
-
-	/**
-	 * Find the oldest females.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topTenOldestFemale($params = array()) {
-		return $this->topTenOldestQuery('nolist', 'F', $params);
-	}
-
-	/**
-	 * Find the oldest living females.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topTenOldestFemaleList($params = array()) {
-		return $this->topTenOldestQuery('list', 'F', $params);
-	}
-
-	/**
-	 * Find the oldest living females.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topTenOldestFemaleAlive($params = array()) {
-		return $this->topTenOldestAliveQuery('nolist', 'F', $params);
-	}
-
-	/**
-	 * Find the oldest living females.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topTenOldestFemaleListAlive($params = array()) {
-		return $this->topTenOldestAliveQuery('list', 'F', $params);
-	}
-
-	/**
-	 * Find the average lifespan of females.
-	 *
-	 * @param bool $show_years
-	 *
-	 * @return string
-	 */
-	public function averageLifespanFemale($show_years = false) {
-		return $this->averageLifespanQuery('F', $show_years);
-	}
-
-	/**
-	 * Find the longest lived male.
-	 *
-	 * @return string
-	 */
-	public function longestLifeMale() {
-		return $this->longlifeQuery('full', 'M');
-	}
-
-	/**
-	 * Find the age of the longest lived male.
-	 *
-	 * @return string
-	 */
-	public function longestLifeMaleAge() {
-		return $this->longlifeQuery('age', 'M');
-	}
-
-	/**
-	 * Find the name of the longest lived male.
-	 *
-	 * @return string
-	 */
-	public function longestLifeMaleName() {
-		return $this->longlifeQuery('name', 'M');
-	}
-
-	/**
-	 * Find the longest lived males.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topTenOldestMale($params = array()) {
-		return $this->topTenOldestQuery('nolist', 'M', $params);
-	}
-
-	/**
-	 * Find the longest lived males.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topTenOldestMaleList($params = array()) {
-		return $this->topTenOldestQuery('list', 'M', $params);
-	}
-
-	/**
-	 * Find the longest lived living males.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topTenOldestMaleAlive($params = array()) {
-		return $this->topTenOldestAliveQuery('nolist', 'M', $params);
-	}
-
-	/**
-	 * Find the longest lived living males.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topTenOldestMaleListAlive($params = array()) {
-		return $this->topTenOldestAliveQuery('list', 'M', $params);
-	}
-
-	/**
-	 * Find the average male lifespan.
-	 *
-	 * @param bool $show_years
-	 *
-	 * @return string
-	 */
-	public function averageLifespanMale($show_years = false) {
-		return $this->averageLifespanQuery('M', $show_years);
-	}
-
-	/**
-	 * Events
-	 *
-	 * @param string $type
-	 * @param string $direction
-	 * @param string $facts
-	 *
-	 * @return string
-	 */
-	private function eventQuery($type, $direction, $facts) {
-		$eventTypes = array(
-			'BIRT' => I18N::translate('birth'),
-			'DEAT' => I18N::translate('death'),
-			'MARR' => I18N::translate('marriage'),
-			'ADOP' => I18N::translate('adoption'),
-			'BURI' => I18N::translate('burial'),
-			'CENS' => I18N::translate('census added'),
-		);
-
-		$fact_query = "IN ('" . str_replace('|', "','", $facts) . "')";
-
-		if ($direction != 'ASC') {
-			$direction = 'DESC';
-		}
-		$rows = $this->runSql(''
-			. ' SELECT'
-			. ' d_gid AS id,'
-			. ' d_year AS year,'
-			. ' d_fact AS fact,'
-			. ' d_type AS type'
-			. ' FROM'
-			. " `##dates`"
-			. ' WHERE'
-			. " d_file={$this->tree->getTreeId()} AND"
-			. " d_gid<>'HEAD' AND"
-			. " d_fact {$fact_query} AND"
-			. ' d_julianday1<>0'
-			. ' ORDER BY'
-			. " d_julianday1 {$direction}, d_type LIMIT 1"
-		);
-		if (!isset($rows[0])) {
-			return '';
-		}
-		$row    = $rows[0];
-		$record = GedcomRecord::getInstance($row['id'], $this->tree);
-		switch ($type) {
-		default:
-		case 'full':
-			if ($record->canShow()) {
-				$result = $record->formatList('span', false, $record->getFullName());
-			} else {
-				$result = I18N::translate('This information is private and cannot be shown.');
-			}
-			break;
-		case 'year':
-			$date   = new Date($row['type'] . ' ' . $row['year']);
-			$result = $date->display();
-			break;
-		case 'type':
-			if (isset($eventTypes[$row['fact']])) {
-				$result = $eventTypes[$row['fact']];
-			} else {
-				$result = GedcomTag::getLabel($row['fact']);
-			}
-			break;
-		case 'name':
-			$result = "<a href=\"" . $record->getHtmlUrl() . "\">" . $record->getFullName() . "</a>";
-			break;
-		case 'place':
-			$fact = $record->getFirstFact($row['fact']);
-			if ($fact) {
-				$result = FunctionsPrint::formatFactPlace($fact, true, true, true);
-			} else {
-				$result = I18N::translate('Private');
-			}
-			break;
-		}
-
-		return $result;
-	}
-
-	/**
-	 * Find the earliest event.
-	 *
-	 * @return string
-	 */
-	public function firstEvent() {
-		return $this->eventQuery('full', 'ASC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
-	}
-
-	/**
-	 * Find the year of the earliest event.
-	 *
-	 * @return string
-	 */
-	public function firstEventYear() {
-		return $this->eventQuery('year', 'ASC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
-	}
-
-	/**
-	 * Find the type of the earliest event.
-	 *
-	 * @return string
-	 */
-	public function firstEventType() {
-		return $this->eventQuery('type', 'ASC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
-	}
-
-	/**
-	 * Find the name of the individual with the earliest event.
-	 *
-	 * @return string
-	 */
-	public function firstEventName() {
-		return $this->eventQuery('name', 'ASC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
-	}
-
-	/**
-	 * Find the location of the earliest event.
-	 *
-	 * @return string
-	 */
-	public function firstEventPlace() {
-		return $this->eventQuery('place', 'ASC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
-	}
-
-	/**
-	 * Find the latest event.
-	 *
-	 * @return string
-	 */
-	public function lastEvent() {
-		return $this->eventQuery('full', 'DESC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
-	}
-
-	/**
-	 * Find the year of the latest event.
-	 *
-	 * @return string
-	 */
-	public function lastEventYear() {
-		return $this->eventQuery('year', 'DESC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
-	}
-
-	/**
-	 * Find the type of the latest event.
-	 *
-	 * @return string
-	 */
-	public function lastEventType() {
-		return $this->eventQuery('type', 'DESC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
-	}
-
-	/**
-	 * Find the name of the individual with the latest event.
-	 *
-	 * @return string
-	 */
-	public function lastEventName() {
-		return $this->eventQuery('name', 'DESC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
-	}
-
-	/**
-	 * FInd the location of the latest event.
-	 *
-	 * @return string
-	 */
-	public function lastEventPlace() {
-		return $this->eventQuery('place', 'DESC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
-	}
-
-	/**
-	 * Query the database for marriage tags.
-	 *
-	 * @param string $type
-	 * @param string $age_dir
-	 * @param string $sex
-	 * @param bool   $show_years
-	 *
-	 * @return string
-	 */
-	private function marriageQuery($type = 'full', $age_dir = 'ASC', $sex = 'F', $show_years = false) {
-		if ($sex == 'F') {
-			$sex_field = 'f_wife';
-		} else {
-			$sex_field = 'f_husb';
-		}
-		if ($age_dir != 'ASC') {
-			$age_dir = 'DESC';
-		}
-		$rows = $this->runSql(
-			" SELECT fam.f_id AS famid, fam.{$sex_field}, married.d_julianday2-birth.d_julianday1 AS age, indi.i_id AS i_id" .
-			" FROM `##families` AS fam" .
-			" LEFT JOIN `##dates` AS birth ON birth.d_file = {$this->tree->getTreeId()}" .
-			" LEFT JOIN `##dates` AS married ON married.d_file = {$this->tree->getTreeId()}" .
-			" LEFT JOIN `##individuals` AS indi ON indi.i_file = {$this->tree->getTreeId()}" .
-			" WHERE" .
-			" birth.d_gid = indi.i_id AND" .
-			" married.d_gid = fam.f_id AND" .
-			" indi.i_id = fam.{$sex_field} AND" .
-			" fam.f_file = {$this->tree->getTreeId()} AND" .
-			" birth.d_fact = 'BIRT' AND" .
-			" married.d_fact = 'MARR' AND" .
-			" birth.d_julianday1 <> 0 AND" .
-			" married.d_julianday2 > birth.d_julianday1 AND" .
-			" i_sex='{$sex}'" .
-			" ORDER BY" .
-			" married.d_julianday2-birth.d_julianday1 {$age_dir} LIMIT 1"
-		);
-		if (!isset($rows[0])) {
-			return '';
-		}
-		$row = $rows[0];
-		if (isset($row['famid'])) {
-			$family = Family::getInstance($row['famid'], $this->tree);
-		}
-		if (isset($row['i_id'])) {
-			$person = Individual::getInstance($row['i_id'], $this->tree);
-		}
-		switch ($type) {
-		default:
-		case 'full':
-			if ($family->canShow()) {
-				$result = $family->formatList('span', false, $person->getFullName());
-			} else {
-				$result = I18N::translate('This information is private and cannot be shown.');
-			}
-			break;
-		case 'name':
-			$result = '<a href="' . $family->getHtmlUrl() . '">' . $person->getFullName() . '</a>';
-			break;
-		case 'age':
-			$age = $row['age'];
-			if ($show_years) {
-				if ((int) ($age / 365.25) > 0) {
-					$age = (int) ($age / 365.25) . 'y';
-				} elseif ((int) ($age / 30.4375) > 0) {
-					$age = (int) ($age / 30.4375) . 'm';
-				} else {
-					$age = $age . 'd';
-				}
-				$result = FunctionsDate::getAgeAtEvent($age);
-			} else {
-				$result = I18N::number((int) ($age / 365.25));
-			}
-			break;
-		}
-
-		return $result;
-	}
-
-	/**
-	 * General query on age at marriage.
-	 *
-	 * @param string   $type
-	 * @param string   $age_dir
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	private function ageOfMarriageQuery($type = 'list', $age_dir = 'ASC', $params = array()) {
-		if (isset($params[0])) {
-			$total = (int) $params[0];
-		} else {
-			$total = 10;
-		}
-		if ($age_dir != 'ASC') {
-			$age_dir = 'DESC';
-		}
-		$hrows = $this->runSql(
-			" SELECT DISTINCT fam.f_id AS family, MIN(husbdeath.d_julianday2-married.d_julianday1) AS age" .
-			" FROM `##families` AS fam" .
-			" LEFT JOIN `##dates` AS married ON married.d_file = {$this->tree->getTreeId()}" .
-			" LEFT JOIN `##dates` AS husbdeath ON husbdeath.d_file = {$this->tree->getTreeId()}" .
-			" WHERE" .
-			" fam.f_file = {$this->tree->getTreeId()} AND" .
-			" husbdeath.d_gid = fam.f_husb AND" .
-			" husbdeath.d_fact = 'DEAT' AND" .
-			" married.d_gid = fam.f_id AND" .
-			" married.d_fact = 'MARR' AND" .
-			" married.d_julianday1 < husbdeath.d_julianday2 AND" .
-			" married.d_julianday1 <> 0" .
-			" GROUP BY family" .
-			" ORDER BY age {$age_dir}");
-		$wrows = $this->runSql(
-			" SELECT DISTINCT fam.f_id AS family, MIN(wifedeath.d_julianday2-married.d_julianday1) AS age" .
-			" FROM `##families` AS fam" .
-			" LEFT JOIN `##dates` AS married ON married.d_file = {$this->tree->getTreeId()}" .
-			" LEFT JOIN `##dates` AS wifedeath ON wifedeath.d_file = {$this->tree->getTreeId()}" .
-			" WHERE" .
-			" fam.f_file = {$this->tree->getTreeId()} AND" .
-			" wifedeath.d_gid = fam.f_wife AND" .
-			" wifedeath.d_fact = 'DEAT' AND" .
-			" married.d_gid = fam.f_id AND" .
-			" married.d_fact = 'MARR' AND" .
-			" married.d_julianday1 < wifedeath.d_julianday2 AND" .
-			" married.d_julianday1 <> 0" .
-			" GROUP BY family" .
-			" ORDER BY age {$age_dir}");
-		$drows = $this->runSql(
-			" SELECT DISTINCT fam.f_id AS family, MIN(divorced.d_julianday2-married.d_julianday1) AS age" .
-			" FROM `##families` AS fam" .
-			" LEFT JOIN `##dates` AS married ON married.d_file = {$this->tree->getTreeId()}" .
-			" LEFT JOIN `##dates` AS divorced ON divorced.d_file = {$this->tree->getTreeId()}" .
-			" WHERE" .
-			" fam.f_file = {$this->tree->getTreeId()} AND" .
-			" married.d_gid = fam.f_id AND" .
-			" married.d_fact = 'MARR' AND" .
-			" divorced.d_gid = fam.f_id AND" .
-			" divorced.d_fact IN ('DIV', 'ANUL', '_SEPR', '_DETS') AND" .
-			" married.d_julianday1 < divorced.d_julianday2 AND" .
-			" married.d_julianday1 <> 0" .
-			" GROUP BY family" .
-			" ORDER BY age {$age_dir}");
-		if (!isset($hrows) && !isset($wrows) && !isset($drows)) {
-			return '';
-		}
-		$rows = array();
-		foreach ($drows as $family) {
-			$rows[$family['family']] = $family['age'];
-		}
-		foreach ($hrows as $family) {
-			if (!isset($rows[$family['family']])) {
-				$rows[$family['family']] = $family['age'];
-			}
-		}
-		foreach ($wrows as $family) {
-			if (!isset($rows[$family['family']])) {
-				$rows[$family['family']] = $family['age'];
-			} elseif ($rows[$family['family']] > $family['age']) {
-				$rows[$family['family']] = $family['age'];
-			}
-		}
-		if ($age_dir === 'DESC') {
-			arsort($rows);
-		} else {
-			asort($rows);
-		}
-		$top10 = array();
-		$i     = 0;
-		foreach ($rows as $fam => $age) {
-			$family = Family::getInstance($fam, $this->tree);
-			if ($type === 'name') {
-				return $family->formatList('span', false, $family->getFullName());
-			}
-			if ((int) ($age / 365.25) > 0) {
-				$age = (int) ($age / 365.25) . 'y';
-			} elseif ((int) ($age / 30.4375) > 0) {
-				$age = (int) ($age / 30.4375) . 'm';
-			} else {
-				$age = $age . 'd';
-			}
-			$age = FunctionsDate::getAgeAtEvent($age);
-			if ($type === 'age') {
-				return $age;
-			}
-			$husb = $family->getHusband();
-			$wife = $family->getWife();
-			if ($husb && $wife && ($husb->getAllDeathDates() && $wife->getAllDeathDates() || !$husb->isDead() || !$wife->isDead())) {
-				if ($family->canShow()) {
-					if ($type === 'list') {
-						$top10[] = "<li><a href=\"" . $family->getHtmlUrl() . "\">" . $family->getFullName() . "</a> (" . $age . ")" . "</li>";
-					} else {
-						$top10[] = "<a href=\"" . $family->getHtmlUrl() . "\">" . $family->getFullName() . "</a> (" . $age . ")";
-					}
-				}
-				if (++$i === $total) {
-					break;
-				}
-			}
-		}
-		if ($type === 'list') {
-			$top10 = implode('', $top10);
-		} else {
-			$top10 = implode('; ', $top10);
-		}
-		if (I18N::direction() === 'rtl') {
-			$top10 = str_replace(array('[', ']', '(', ')', '+'), array('&rlm;[', '&rlm;]', '&rlm;(', '&rlm;)', '&rlm;+'), $top10);
-		}
-		if ($type === 'list') {
-			return '<ul>' . $top10 . '</ul>';
-		}
-
-		return $top10;
-	}
-
-	/**
-	 * Find the ages between spouses.
-	 *
-	 * @param string   $type
-	 * @param string   $age_dir
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	private function ageBetweenSpousesQuery($type = 'list', $age_dir = 'DESC', $params = array()) {
-		if (isset($params[0])) {
-			$total = (int) $params[0];
-		} else {
-			$total = 10;
-		}
-		if ($age_dir === 'DESC') {
-			$sql =
-				"SELECT f_id AS xref, MIN(wife.d_julianday2-husb.d_julianday1) AS age" .
-				" FROM `##families`" .
-				" JOIN `##dates` AS wife ON wife.d_gid = f_wife AND wife.d_file = f_file" .
-				" JOIN `##dates` AS husb ON husb.d_gid = f_husb AND husb.d_file = f_file" .
-				" WHERE f_file = :tree_id" .
-				" AND husb.d_fact = 'BIRT'" .
-				" AND wife.d_fact = 'BIRT'" .
-				" AND wife.d_julianday2 >= husb.d_julianday1 AND husb.d_julianday1 <> 0" .
-				" GROUP BY xref" .
-				" ORDER BY age DESC" .
-				" LIMIT :limit";
-		} else {
-			$sql =
-				"SELECT f_id AS xref, MIN(husb.d_julianday2-wife.d_julianday1) AS age" .
-				" FROM `##families`" .
-				" JOIN `##dates` AS wife ON wife.d_gid = f_wife AND wife.d_file = f_file" .
-				" JOIN `##dates` AS husb ON husb.d_gid = f_husb AND husb.d_file = f_file" .
-				" WHERE f_file = :tree_id" .
-				" AND husb.d_fact = 'BIRT'" .
-				" AND wife.d_fact = 'BIRT'" .
-				" AND husb.d_julianday2 >= wife.d_julianday1 AND wife.d_julianday1 <> 0" .
-				" GROUP BY xref" .
-				" ORDER BY age DESC" .
-				" LIMIT :limit";
-		}
-		$rows = Database::prepare(
-			$sql
-		)->execute(array(
-			'tree_id' => $this->tree->getTreeId(),
-			'limit'   => $total,
-		))->fetchAll();
-
-		$top10 = array();
-		foreach ($rows as $fam) {
-			$family = Family::getInstance($fam->xref, $this->tree);
-			if ($fam->age < 0) {
-				break;
-			}
-			$age = $fam->age;
-			if ((int) ($age / 365.25) > 0) {
-				$age = (int) ($age / 365.25) . 'y';
-			} elseif ((int) ($age / 30.4375) > 0) {
-				$age = (int) ($age / 30.4375) . 'm';
-			} else {
-				$age = $age . 'd';
-			}
-			$age = FunctionsDate::getAgeAtEvent($age);
-			if ($family->canShow()) {
-				if ($type === 'list') {
-					$top10[] = '<li><a href="' . $family->getHtmlUrl() . '">' . $family->getFullName() . '</a> (' . $age . ')' . "</li>";
-				} else {
-					$top10[] = '<a href="' . $family->getHtmlUrl() . '">' . $family->getFullName() . '</a> (' . $age . ')';
-				}
-			}
-		}
-		if ($type === 'list') {
-			$top10 = implode('', $top10);
-			if ($top10) {
-				$top10 = '<ul>' . $top10 . '</ul>';
-			}
-		} else {
-			$top10 = implode(' ', $top10);
-		}
-
-		return $top10;
-	}
-
-	/**
-	 * General query on parents.
-	 *
-	 * @param string $type
-	 * @param string $age_dir
-	 * @param string $sex
-	 * @param bool   $show_years
-	 *
-	 * @return string
-	 */
-	private function parentsQuery($type = 'full', $age_dir = 'ASC', $sex = 'F', $show_years = false) {
-		if ($sex == 'F') {
-			$sex_field = 'WIFE';
-		} else {
-			$sex_field = 'HUSB';
-		}
-		if ($age_dir != 'ASC') {
-			$age_dir = 'DESC';
-		}
-		$rows = $this->runSql(
-			" SELECT" .
-			" parentfamily.l_to AS id," .
-			" childbirth.d_julianday2-birth.d_julianday1 AS age" .
-			" FROM `##link` AS parentfamily" .
-			" JOIN `##link` AS childfamily ON childfamily.l_file = {$this->tree->getTreeId()}" .
-			" JOIN `##dates` AS birth ON birth.d_file = {$this->tree->getTreeId()}" .
-			" JOIN `##dates` AS childbirth ON childbirth.d_file = {$this->tree->getTreeId()}" .
-			" WHERE" .
-			" birth.d_gid = parentfamily.l_to AND" .
-			" childfamily.l_to = childbirth.d_gid AND" .
-			" childfamily.l_type = 'CHIL' AND" .
-			" parentfamily.l_type = '{$sex_field}' AND" .
-			" childfamily.l_from = parentfamily.l_from AND" .
-			" parentfamily.l_file = {$this->tree->getTreeId()} AND" .
-			" birth.d_fact = 'BIRT' AND" .
-			" childbirth.d_fact = 'BIRT' AND" .
-			" birth.d_julianday1 <> 0 AND" .
-			" childbirth.d_julianday2 > birth.d_julianday1" .
-			" ORDER BY age {$age_dir} LIMIT 1"
-		);
-		if (!isset($rows[0])) {
-			return '';
-		}
-		$row = $rows[0];
-		if (isset($row['id'])) {
-			$person = Individual::getInstance($row['id'], $this->tree);
-		}
-		switch ($type) {
-		default:
-		case 'full':
-			if ($person->canShow()) {
-				$result = $person->formatList('span', false, $person->getFullName());
-			} else {
-				$result = I18N::translate('This information is private and cannot be shown.');
-			}
-			break;
-		case 'name':
-			$result = '<a href="' . $person->getHtmlUrl() . '">' . $person->getFullName() . '</a>';
-			break;
-		case 'age':
-			$age = $row['age'];
-			if ($show_years) {
-				if ((int) ($age / 365.25) > 0) {
-					$age = (int) ($age / 365.25) . 'y';
-				} elseif ((int) ($age / 30.4375) > 0) {
-					$age = (int) ($age / 30.4375) . 'm';
-				} else {
-					$age = $age . 'd';
-				}
-				$result = FunctionsDate::getAgeAtEvent($age);
-			} else {
-				$result = (int) ($age / 365.25);
-			}
-			break;
-		}
-
-		return $result;
-	}
-
-	/**
-	 * General query on marriages.
-	 *
-	 * @param bool     $simple
-	 * @param bool     $first
-	 * @param int      $year1
-	 * @param int      $year2
-	 * @param string[] $params
-	 *
-	 * @return string|array
-	 */
-	public function statsMarrQuery($simple = true, $first = false, $year1 = -1, $year2 = -1, $params = array()) {
-		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
-		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
-		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
-		$WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
-
-		if ($simple) {
-			$sql =
-				"SELECT FLOOR(d_year/100+1) AS century, COUNT(*) AS total" .
-				" FROM `##dates`" .
-				" WHERE d_file={$this->tree->getTreeId()} AND d_year<>0 AND d_fact='MARR' AND d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')";
-			if ($year1 >= 0 && $year2 >= 0) {
-				$sql .= " AND d_year BETWEEN '{$year1}' AND '{$year2}'";
-			}
-			$sql .= " GROUP BY century ORDER BY century";
-		} elseif ($first) {
-			$years = '';
-			if ($year1 >= 0 && $year2 >= 0) {
-				$years = " married.d_year BETWEEN '{$year1}' AND '{$year2}' AND";
-			}
-			$sql =
-				" SELECT fam.f_id AS fams, fam.f_husb, fam.f_wife, married.d_julianday2 AS age, married.d_month AS month, indi.i_id AS indi" .
-				" FROM `##families` AS fam" .
-				" LEFT JOIN `##dates` AS married ON married.d_file = {$this->tree->getTreeId()}" .
-				" LEFT JOIN `##individuals` AS indi ON indi.i_file = {$this->tree->getTreeId()}" .
-				" WHERE" .
-				" married.d_gid = fam.f_id AND" .
-				" fam.f_file = {$this->tree->getTreeId()} AND" .
-				" married.d_fact = 'MARR' AND" .
-				" married.d_julianday2 <> 0 AND" .
-				$years .
-				" (indi.i_id = fam.f_husb OR indi.i_id = fam.f_wife)" .
-				" ORDER BY fams, indi, age ASC";
-		} else {
-			$sql =
-				"SELECT d_month, COUNT(*) AS total" .
-				" FROM `##dates`" .
-				" WHERE d_file={$this->tree->getTreeId()} AND d_fact='MARR'";
-			if ($year1 >= 0 && $year2 >= 0) {
-				$sql .= " AND d_year BETWEEN '{$year1}' AND '{$year2}'";
-			}
-			$sql .= " GROUP BY d_month";
-		}
-		$rows = $this->runSql($sql);
-		if (!isset($rows)) {
-			return '';
-		}
-		if ($simple) {
-			if (isset($params[0]) && $params[0] != '') {
-				$size = strtolower($params[0]);
-			} else {
-				$size = $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y;
-			}
-			if (isset($params[1]) && $params[1] != '') {
-				$color_from = strtolower($params[1]);
-			} else {
-				$color_from = $WT_STATS_CHART_COLOR1;
-			}
-			if (isset($params[2]) && $params[2] != '') {
-				$color_to = strtolower($params[2]);
-			} else {
-				$color_to = $WT_STATS_CHART_COLOR2;
-			}
-			$sizes = explode('x', $size);
-			$tot   = 0;
-			foreach ($rows as $values) {
-				$tot += (int) $values['total'];
-			}
-			// Beware divide by zero
-			if ($tot === 0) {
-				return '';
-			}
-			$centuries = '';
-			$counts    = array();
-			foreach ($rows as $values) {
-				$counts[] = round(100 * $values['total'] / $tot, 0);
-				$centuries .= $this->centuryName($values['century']) . ' - ' . I18N::number($values['total']) . '|';
-			}
-			$chd = $this->arrayToExtendedEncoding($counts);
-			$chl = substr($centuries, 0, -1);
-
-			return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_from},{$color_to}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Marriages by century') . "\" title=\"" . I18N::translate('Marriages by century') . "\" />";
-		}
-
-		return $rows;
-	}
-
-	/**
-	 * General query on divorces.
-	 *
-	 * @param bool     $simple
-	 * @param bool     $first
-	 * @param int      $year1
-	 * @param int      $year2
-	 * @param string[] $params
-	 *
-	 * @return string|array
-	 */
-	private function statsDivQuery($simple = true, $first = false, $year1 = -1, $year2 = -1, $params = array()) {
-		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
-		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
-		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
-		$WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
-
-		if ($simple) {
-			$sql =
-				"SELECT FLOOR(d_year/100+1) AS century, COUNT(*) AS total" .
-				" FROM `##dates`" .
-				" WHERE d_file={$this->tree->getTreeId()} AND d_year<>0 AND d_fact = 'DIV' AND d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')";
-			if ($year1 >= 0 && $year2 >= 0) {
-				$sql .= " AND d_year BETWEEN '{$year1}' AND '{$year2}'";
-			}
-			$sql .= " GROUP BY century ORDER BY century";
-		} elseif ($first) {
-			$years = '';
-			if ($year1 >= 0 && $year2 >= 0) {
-				$years = " divorced.d_year BETWEEN '{$year1}' AND '{$year2}' AND";
-			}
-			$sql =
-				" SELECT fam.f_id AS fams, fam.f_husb, fam.f_wife, divorced.d_julianday2 AS age, divorced.d_month AS month, indi.i_id AS indi" .
-				" FROM `##families` AS fam" .
-				" LEFT JOIN `##dates` AS divorced ON divorced.d_file = {$this->tree->getTreeId()}" .
-				" LEFT JOIN `##individuals` AS indi ON indi.i_file = {$this->tree->getTreeId()}" .
-				" WHERE" .
-				" divorced.d_gid = fam.f_id AND" .
-				" fam.f_file = {$this->tree->getTreeId()} AND" .
-				" divorced.d_fact = 'DIV' AND" .
-				" divorced.d_julianday2 <> 0 AND" .
-				$years .
-				" (indi.i_id = fam.f_husb OR indi.i_id = fam.f_wife)" .
-				" ORDER BY fams, indi, age ASC";
-		} else {
-			$sql =
-				"SELECT d_month, COUNT(*) AS total FROM `##dates` " .
-				"WHERE d_file={$this->tree->getTreeId()} AND d_fact = 'DIV'";
-			if ($year1 >= 0 && $year2 >= 0) {
-				$sql .= " AND d_year BETWEEN '{$year1}' AND '{$year2}'";
-			}
-			$sql .= " GROUP BY d_month";
-		}
-		$rows = $this->runSql($sql);
-		if (!isset($rows)) {
-			return '';
-		}
-		if ($simple) {
-			if (isset($params[0]) && $params[0] != '') {
-				$size = strtolower($params[0]);
-			} else {
-				$size = $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y;
-			}
-			if (isset($params[1]) && $params[1] != '') {
-				$color_from = strtolower($params[1]);
-			} else {
-				$color_from = $WT_STATS_CHART_COLOR1;
-			}
-			if (isset($params[2]) && $params[2] != '') {
-				$color_to = strtolower($params[2]);
-			} else {
-				$color_to = $WT_STATS_CHART_COLOR2;
-			}
-			$sizes = explode('x', $size);
-			$tot   = 0;
-			foreach ($rows as $values) {
-				$tot += (int) $values['total'];
-			}
-			// Beware divide by zero
-			if ($tot === 0) {
-				return '';
-			}
-			$centuries = '';
-			$counts    = array();
-			foreach ($rows as $values) {
-				$counts[] = round(100 * $values['total'] / $tot, 0);
-				$centuries .= $this->centuryName($values['century']) . ' - ' . I18N::number($values['total']) . '|';
-			}
-			$chd = $this->arrayToExtendedEncoding($counts);
-			$chl = substr($centuries, 0, -1);
-
-			return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_from},{$color_to}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Divorces by century') . "\" title=\"" . I18N::translate('Divorces by century') . "\" />";
-		}
-
-		return $rows;
-	}
-
-	/**
-	 * Find the earliest marriage.
-	 *
-	 * @return string
-	 */
-	public function firstMarriage() {
-		return $this->mortalityQuery('full', 'ASC', 'MARR');
-	}
-
-	/**
-	 * Find the year of the earliest marriage.
-	 *
-	 * @return string
-	 */
-	public function firstMarriageYear() {
-		return $this->mortalityQuery('year', 'ASC', 'MARR');
-	}
-
-	/**
-	 * Find the names of spouses of the earliest marriage.
-	 *
-	 * @return string
-	 */
-	public function firstMarriageName() {
-		return $this->mortalityQuery('name', 'ASC', 'MARR');
-	}
-
-	/**
-	 * Find the place of the earliest marriage.
-	 *
-	 * @return string
-	 */
-	public function firstMarriagePlace() {
-		return $this->mortalityQuery('place', 'ASC', 'MARR');
-	}
-
-	/**
-	 * Find the latest marriage.
-	 *
-	 * @return string
-	 */
-	public function lastMarriage() {
-		return $this->mortalityQuery('full', 'DESC', 'MARR');
-	}
-
-	/**
-	 * Find the year of the latest marriage.
-	 *
-	 * @return string
-	 */
-	public function lastMarriageYear() {
-		return $this->mortalityQuery('year', 'DESC', 'MARR');
-	}
-
-	/**
-	 * Find the names of spouses of the latest marriage.
-	 *
-	 * @return string
-	 */
-	public function lastMarriageName() {
-		return $this->mortalityQuery('name', 'DESC', 'MARR');
-	}
-
-	/**
-	 * Find the location of the latest marriage.
-	 *
-	 * @return string
-	 */
-	public function lastMarriagePlace() {
-		return $this->mortalityQuery('place', 'DESC', 'MARR');
-	}
-
-	/**
-	 * General query on marriages.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function statsMarr($params = array()) {
-		return $this->statsMarrQuery(true, false, -1, -1, $params);
-	}
-
-	/**
-	 * Find the earliest divorce.
-	 *
-	 * @return string
-	 */
-	public function firstDivorce() {
-		return $this->mortalityQuery('full', 'ASC', 'DIV');
-	}
-
-	/**
-	 * Find the year of the earliest divorce.
-	 *
-	 * @return string
-	 */
-	public function firstDivorceYear() {
-		return $this->mortalityQuery('year', 'ASC', 'DIV');
-	}
-
-	/**
-	 * Find the names of individuals in the earliest divorce.
-	 *
-	 * @return string
-	 */
-	public function firstDivorceName() {
-		return $this->mortalityQuery('name', 'ASC', 'DIV');
-	}
-
-	/**
-	 * Find the location of the earliest divorce.
-	 *
-	 * @return string
-	 */
-	public function firstDivorcePlace() {
-		return $this->mortalityQuery('place', 'ASC', 'DIV');
-	}
-
-	/**
-	 * Find the latest divorce.
-	 *
-	 * @return string
-	 */
-	public function lastDivorce() {
-		return $this->mortalityQuery('full', 'DESC', 'DIV');
-	}
-
-	/**
-	 * Find the year of the latest divorce.
-	 *
-	 * @return string
-	 */
-	public function lastDivorceYear() {
-		return $this->mortalityQuery('year', 'DESC', 'DIV');
-	}
-
-	/**
-	 * Find the names of the individuals in the latest divorce.
-	 *
-	 * @return string
-	 */
-	public function lastDivorceName() {
-		return $this->mortalityQuery('name', 'DESC', 'DIV');
-	}
-
-	/**
-	 * Find the location of the latest divorce.
-	 *
-	 * @return string
-	 */
-	public function lastDivorcePlace() {
-		return $this->mortalityQuery('place', 'DESC', 'DIV');
-	}
-
-	/**
-	 * General divorce query.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function statsDiv($params = array()) {
-		return $this->statsDivQuery(true, false, -1, -1, $params);
-	}
-
-	/**
-	 * General query on ages at marriage.
-	 *
-	 * @param bool     $simple
-	 * @param string   $sex
-	 * @param int      $year1
-	 * @param int      $year2
-	 * @param string[] $params
-	 *
-	 * @return array|string
-	 */
-	public function statsMarrAgeQuery($simple = true, $sex = 'M', $year1 = -1, $year2 = -1, $params = array()) {
-		if ($simple) {
-			if (isset($params[0]) && $params[0] != '') {
-				$size = strtolower($params[0]);
-			} else {
-				$size = '200x250';
-			}
-			$sizes = explode('x', $size);
-			$rows  = $this->runSql(
-				"SELECT " .
-				" ROUND(AVG(married.d_julianday2-birth.d_julianday1-182.5)/365.25,1) AS age, " .
-				" FLOOR(married.d_year/100+1) AS century, " .
-				" 'M' AS sex " .
-				"FROM `##dates` AS married " .
-				"JOIN `##families` AS fam ON (married.d_gid=fam.f_id AND married.d_file=fam.f_file) " .
-				"JOIN `##dates` AS birth ON (birth.d_gid=fam.f_husb AND birth.d_file=fam.f_file) " .
-				"WHERE " .
-				" '{$sex}' IN ('M', 'BOTH') AND " .
-				" married.d_file={$this->tree->getTreeId()} AND married.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND married.d_fact='MARR' AND " .
-				" birth.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND birth.d_fact='BIRT' AND " .
-				" married.d_julianday1>birth.d_julianday1 AND birth.d_julianday1<>0 " .
-				"GROUP BY century, sex " .
-				"UNION ALL " .
-				"SELECT " .
-				" ROUND(AVG(married.d_julianday2-birth.d_julianday1-182.5)/365.25,1) AS age, " .
-				" FLOOR(married.d_year/100+1) AS century, " .
-				" 'F' AS sex " .
-				"FROM `##dates` AS married " .
-				"JOIN `##families` AS fam ON (married.d_gid=fam.f_id AND married.d_file=fam.f_file) " .
-				"JOIN `##dates` AS birth ON (birth.d_gid=fam.f_wife AND birth.d_file=fam.f_file) " .
-				"WHERE " .
-				" '{$sex}' IN ('F', 'BOTH') AND " .
-				" married.d_file={$this->tree->getTreeId()} AND married.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND married.d_fact='MARR' AND " .
-				" birth.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND birth.d_fact='BIRT' AND " .
-				" married.d_julianday1>birth.d_julianday1 AND birth.d_julianday1<>0 " .
-				" GROUP BY century, sex ORDER BY century"
-			);
-			if (empty($rows)) {
-				return '';
-			}
-			$max = 0;
-			foreach ($rows as $values) {
-				if ($max < $values['age']) {
-					$max = $values['age'];
-				}
-			}
-			$chxl    = '0:|';
-			$chmm    = '';
-			$chmf    = '';
-			$i       = 0;
-			$countsm = '';
-			$countsf = '';
-			$countsa = '';
-			$out     = array();
-			foreach ($rows as $values) {
-				$out[$values['century']][$values['sex']] = $values['age'];
-			}
-			foreach ($out as $century => $values) {
-				if ($sizes[0] < 1000) {
-					$sizes[0] += 50;
-				}
-				$chxl .= $this->centuryName($century) . '|';
-				$average = 0;
-				if (isset($values['F'])) {
-					if ($max <= 50) {
-						$value = $values['F'] * 2;
-					} else {
-						$value = $values['F'];
-					}
-					$countsf .= $value . ',';
-					$average = $value;
-					$chmf .= 't' . $values['F'] . ',000000,1,' . $i . ',11,1|';
-				} else {
-					$countsf .= '0,';
-					$chmf .= 't0,000000,1,' . $i . ',11,1|';
-				}
-				if (isset($values['M'])) {
-					if ($max <= 50) {
-						$value = $values['M'] * 2;
-					} else {
-						$value = $values['M'];
-					}
-					$countsm .= $value . ',';
-					if ($average == 0) {
-						$countsa .= $value . ',';
-					} else {
-						$countsa .= (($value + $average) / 2) . ',';
-					}
-					$chmm .= 't' . $values['M'] . ',000000,0,' . $i . ',11,1|';
-				} else {
-					$countsm .= '0,';
-					if ($average == 0) {
-						$countsa .= '0,';
-					} else {
-						$countsa .= $value . ',';
-					}
-					$chmm .= 't0,000000,0,' . $i . ',11,1|';
-				}
-				$i++;
-			}
-			$countsm = substr($countsm, 0, -1);
-			$countsf = substr($countsf, 0, -1);
-			$countsa = substr($countsa, 0, -1);
-			$chmf    = substr($chmf, 0, -1);
-			$chd     = 't2:' . $countsm . '|' . $countsf . '|' . $countsa;
-			if ($max <= 50) {
-				$chxl .= '1:||' . I18N::translate('century') . '|2:|0|10|20|30|40|50|3:||' . I18N::translate('Age') . '|';
-			} else {
-				$chxl .= '1:||' . I18N::translate('century') . '|2:|0|10|20|30|40|50|60|70|80|90|100|3:||' . I18N::translate('Age') . '|';
-			}
-			if (count($rows) > 4 || mb_strlen(I18N::translate('Average age in century of marriage')) < 30) {
-				$chtt = I18N::translate('Average age in century of marriage');
-			} else {
-				$offset  = 0;
-				$counter = array();
-				while ($offset = strpos(I18N::translate('Average age in century of marriage'), ' ', $offset + 1)) {
-					$counter[] = $offset;
-				}
-				$half = (int) (count($counter) / 2);
-				$chtt = substr_replace(I18N::translate('Average age in century of marriage'), '|', $counter[$half], 1);
-			}
-
-			return "<img src=\"" . "https://chart.googleapis.com/chart?cht=bvg&amp;chs={$sizes[0]}x{$sizes[1]}&amp;chm=D,FF0000,2,0,3,1|{$chmm}{$chmf}&amp;chf=bg,s,ffffff00|c,s,ffffff00&amp;chtt=" . rawurlencode($chtt) . "&amp;chd={$chd}&amp;chco=0000FF,FFA0CB,FF0000&amp;chbh=20,3&amp;chxt=x,x,y,y&amp;chxl=" . rawurlencode($chxl) . "&amp;chdl=" . rawurlencode(I18N::translate('Males') . "|" . I18N::translate('Females') . "|" . I18N::translate('Average age')) . "\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Average age in century of marriage') . "\" title=\"" . I18N::translate('Average age in century of marriage') . "\" />";
-		} else {
-			if ($year1 >= 0 && $year2 >= 0) {
-				$years = " married.d_year BETWEEN {$year1} AND {$year2} AND ";
-			} else {
-				$years = '';
-			}
-			$rows = $this->runSql(
-				"SELECT " .
-				" fam.f_id, " .
-				" birth.d_gid, " .
-				" married.d_julianday2-birth.d_julianday1 AS age " .
-				"FROM `##dates` AS married " .
-				"JOIN `##families` AS fam ON (married.d_gid=fam.f_id AND married.d_file=fam.f_file) " .
-				"JOIN `##dates` AS birth ON (birth.d_gid=fam.f_husb AND birth.d_file=fam.f_file) " .
-				"WHERE " .
-				" '{$sex}' IN ('M', 'BOTH') AND {$years} " .
-				" married.d_file={$this->tree->getTreeId()} AND married.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND married.d_fact='MARR' AND " .
-				" birth.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND birth.d_fact='BIRT' AND " .
-				" married.d_julianday1>birth.d_julianday1 AND birth.d_julianday1<>0 " .
-				"UNION ALL " .
-				"SELECT " .
-				" fam.f_id, " .
-				" birth.d_gid, " .
-				" married.d_julianday2-birth.d_julianday1 AS age " .
-				"FROM `##dates` AS married " .
-				"JOIN `##families` AS fam ON (married.d_gid=fam.f_id AND married.d_file=fam.f_file) " .
-				"JOIN `##dates` AS birth ON (birth.d_gid=fam.f_wife AND birth.d_file=fam.f_file) " .
-				"WHERE " .
-				" '{$sex}' IN ('F', 'BOTH') AND {$years} " .
-				" married.d_file={$this->tree->getTreeId()} AND married.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND married.d_fact='MARR' AND " .
-				" birth.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND birth.d_fact='BIRT' AND " .
-				" married.d_julianday1>birth.d_julianday1 AND birth.d_julianday1<>0 "
-			);
-
-			return $rows;
-		}
-	}
-
-	/**
-	 * Find the youngest wife.
-	 *
-	 * @return string
-	 */
-	public function youngestMarriageFemale() {
-		return $this->marriageQuery('full', 'ASC', 'F', false);
-	}
-
-	/**
-	 * Find the name of the youngest wife.
-	 *
-	 * @return string
-	 */
-	public function youngestMarriageFemaleName() {
-		return $this->marriageQuery('name', 'ASC', 'F', false);
-	}
-
-	/**
-	 * Find the age of the youngest wife.
-	 *
-	 * @param bool $show_years
-	 *
-	 * @return string
-	 */
-	public function youngestMarriageFemaleAge($show_years = false) {
-		return $this->marriageQuery('age', 'ASC', 'F', $show_years);
-	}
-
-	/**
-	 * Find the oldest wife.
-	 *
-	 * @return string
-	 */
-	public function oldestMarriageFemale() {
-		return $this->marriageQuery('full', 'DESC', 'F', false);
-	}
-
-	/**
-	 * Find the name of the oldest wife.
-	 *
-	 * @return string
-	 */
-	public function oldestMarriageFemaleName() {
-		return $this->marriageQuery('name', 'DESC', 'F', false);
-	}
-
-	/**
-	 * Find the age of the oldest wife.
-	 *
-	 * @param bool $show_years
-	 *
-	 * @return string
-	 */
-	public function oldestMarriageFemaleAge($show_years = false) {
-		return $this->marriageQuery('age', 'DESC', 'F', $show_years);
-	}
-
-	/**
-	 * Find the youngest husband.
-	 *
-	 * @return string
-	 */
-	public function youngestMarriageMale() {
-		return $this->marriageQuery('full', 'ASC', 'M', false);
-	}
-
-	/**
-	 * Find the name of the youngest husband.
-	 *
-	 * @return string
-	 */
-	public function youngestMarriageMaleName() {
-		return $this->marriageQuery('name', 'ASC', 'M', false);
-	}
-
-	/**
-	 * Find the age of the youngest husband.
-	 *
-	 * @param bool $show_years
-	 *
-	 * @return string
-	 */
-	public function youngestMarriageMaleAge($show_years = false) {
-		return $this->marriageQuery('age', 'ASC', 'M', $show_years);
-	}
-
-	/**
-	 * Find the oldest husband.
-	 *
-	 * @return string
-	 */
-	public function oldestMarriageMale() {
-		return $this->marriageQuery('full', 'DESC', 'M', false);
-	}
-
-	/**
-	 * Find the name of the oldest husband.
-	 *
-	 * @return string
-	 */
-	public function oldestMarriageMaleName() {
-		return $this->marriageQuery('name', 'DESC', 'M', false);
-	}
-
-	/**
-	 * Find the age of the oldest husband.
-	 *
-	 * @param bool $show_years
-	 *
-	 * @return string
-	 */
-	public function oldestMarriageMaleAge($show_years = false) {
-		return $this->marriageQuery('age', 'DESC', 'M', $show_years);
-	}
-
-	/**
-	 * General query on marriage ages.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function statsMarrAge($params = array()) {
-		return $this->statsMarrAgeQuery(true, 'BOTH', -1, -1, $params);
-	}
-
-	/**
-	 * Find the age between husband and wife.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function ageBetweenSpousesMF($params = array()) {
-		return $this->ageBetweenSpousesQuery('nolist', 'DESC', $params);
-	}
-
-	/**
-	 * Find the age between husband and wife.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function ageBetweenSpousesMFList($params = array()) {
-		return $this->ageBetweenSpousesQuery('list', 'DESC', $params);
-	}
-
-	/**
-	 * Find the age between wife and husband..
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function ageBetweenSpousesFM($params = array()) {
-		return $this->ageBetweenSpousesQuery('nolist', 'ASC', $params);
-	}
-
-	/**
-	 * Find the age between wife and husband..
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function ageBetweenSpousesFMList($params = array()) {
-		return $this->ageBetweenSpousesQuery('list', 'ASC', $params);
-	}
-
-	/**
-	 * General query on marriage ages.
-	 *
-	 * @return string
-	 */
-	public function topAgeOfMarriageFamily() {
-		return $this->ageOfMarriageQuery('name', 'DESC', array('1'));
-	}
-
-	/**
-	 * General query on marriage ages.
-	 *
-	 * @return string
-	 */
-	public function topAgeOfMarriage() {
-		return $this->ageOfMarriageQuery('age', 'DESC', array('1'));
-	}
-
-	/**
-	 * General query on marriage ages.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topAgeOfMarriageFamilies($params = array()) {
-		return $this->ageOfMarriageQuery('nolist', 'DESC', $params);
-	}
-
-	/**
-	 * General query on marriage ages.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topAgeOfMarriageFamiliesList($params = array()) {
-		return $this->ageOfMarriageQuery('list', 'DESC', $params);
-	}
-
-	/**
-	 * General query on marriage ages.
-	 *
-	 * @return string
-	 */
-	public function minAgeOfMarriageFamily() {
-		return $this->ageOfMarriageQuery('name', 'ASC', array('1'));
-	}
-
-	/**
-	 * General query on marriage ages.
-	 *
-	 * @return string
-	 */
-	public function minAgeOfMarriage() {
-		return $this->ageOfMarriageQuery('age', 'ASC', array('1'));
-	}
-
-	/**
-	 * General query on marriage ages.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function minAgeOfMarriageFamilies($params = array()) {
-		return $this->ageOfMarriageQuery('nolist', 'ASC', $params);
-	}
-
-	/**
-	 * General query on marriage ages.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function minAgeOfMarriageFamiliesList($params = array()) {
-		return $this->ageOfMarriageQuery('list', 'ASC', $params);
-	}
-
-	/**
-	 * Find the youngest mother
-	 *
-	 * @return string
-	 */
-	public function youngestMother() {
-		return $this->parentsQuery('full', 'ASC', 'F');
-	}
-
-	/**
-	 * Find the name of the youngest mother.
-	 *
-	 * @return string
-	 */
-	public function youngestMotherName() {
-		return $this->parentsQuery('name', 'ASC', 'F');
-	}
-
-	/**
-	 * Find the age of the youngest mother.
-	 *
-	 * @param bool $show_years
-	 *
-	 * @return string
-	 */
-	public function youngestMotherAge($show_years = false) {
-		return $this->parentsQuery('age', 'ASC', 'F', $show_years);
-	}
-
-	/**
-	 * Find the oldest mother.
-	 *
-	 * @return string
-	 */
-	public function oldestMother() {
-		return $this->parentsQuery('full', 'DESC', 'F');
-	}
-
-	/**
-	 * Find the name of the oldest mother.
-	 *
-	 * @return string
-	 */
-	public function oldestMotherName() {
-		return $this->parentsQuery('name', 'DESC', 'F');
-	}
-
-	/**
-	 * Find the age of the oldest mother.
-	 *
-	 * @param bool $show_years
-	 *
-	 * @return string
-	 */
-	public function oldestMotherAge($show_years = false) {
-		return $this->parentsQuery('age', 'DESC', 'F', $show_years);
-	}
-
-	/**
-	 * Find the youngest father.
-	 *
-	 * @return string
-	 */
-	public function youngestFather() {
-		return $this->parentsQuery('full', 'ASC', 'M');
-	}
-
-	/**
-	 * Find the name of the youngest father.
-	 *
-	 * @return string
-	 */
-	public function youngestFatherName() {
-		return $this->parentsQuery('name', 'ASC', 'M');
-	}
-
-	/**
-	 * Find the age of the youngest father.
-	 *
-	 * @param bool $show_years
-	 *
-	 * @return string
-	 */
-	public function youngestFatherAge($show_years = false) {
-		return $this->parentsQuery('age', 'ASC', 'M', $show_years);
-	}
-
-	/**
-	 * Find the oldest father.
-	 *
-	 * @return string
-	 */
-	public function oldestFather() {
-		return $this->parentsQuery('full', 'DESC', 'M');
-	}
-
-	/**
-	 * Find the name of the oldest father.
-	 *
-	 * @return string
-	 */
-	public function oldestFatherName() {
-		return $this->parentsQuery('name', 'DESC', 'M');
-	}
-
-	/**
-	 * Find the age of the oldest father.
-	 *
-	 * @param bool $show_years
-	 *
-	 * @return string
-	 */
-	public function oldestFatherAge($show_years = false) {
-		return $this->parentsQuery('age', 'DESC', 'M', $show_years);
-	}
-
-	/**
-	 * Number of husbands.
-	 *
-	 * @return string
-	 */
-	public function totalMarriedMales() {
-		$n = Database::prepare("SELECT COUNT(DISTINCT f_husb) FROM `##families` WHERE f_file=? AND f_gedcom LIKE '%\\n1 MARR%'")
-			->execute(array($this->tree->getTreeId()))
-			->fetchOne();
-
-		return I18N::number($n);
-	}
-
-	/**
-	 * Number of wives.
-	 *
-	 * @return string
-	 */
-	public function totalMarriedFemales() {
-		$n = Database::prepare("SELECT COUNT(DISTINCT f_wife) FROM `##families` WHERE f_file=? AND f_gedcom LIKE '%\\n1 MARR%'")
-			->execute(array($this->tree->getTreeId()))
-			->fetchOne();
-
-		return I18N::number($n);
-	}
-
-	/**
-	 * General query on family.
-	 *
-	 * @param string $type
-	 *
-	 * @return string
-	 */
-	private function familyQuery($type = 'full') {
-		$rows = $this->runSql(
-			" SELECT f_numchil AS tot, f_id AS id" .
-			" FROM `##families`" .
-			" WHERE" .
-			" f_file={$this->tree->getTreeId()}" .
-			" AND f_numchil = (" .
-			"  SELECT max( f_numchil )" .
-			"  FROM `##families`" .
-			"  WHERE f_file ={$this->tree->getTreeId()}" .
-			" )" .
-			" LIMIT 1"
-		);
-		if (!isset($rows[0])) {
-			return '';
-		}
-		$row    = $rows[0];
-		$family = Family::getInstance($row['id'], $this->tree);
-		switch ($type) {
-		default:
-		case 'full':
-			if ($family->canShow()) {
-				$result = $family->formatList('span', false, $family->getFullName());
-			} else {
-				$result = I18N::translate('This information is private and cannot be shown.');
-			}
-			break;
-		case 'size':
-			$result = I18N::number($row['tot']);
-			break;
-		case 'name':
-			$result = "<a href=\"" . $family->getHtmlUrl() . "\">" . $family->getFullName() . '</a>';
-			break;
-		}
-
-		return $result;
-	}
-
-	/**
-	 * General query on families.
-	 *
-	 * @param string   $type
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	private function topTenFamilyQuery($type = 'list', $params = array()) {
-		if (isset($params[0])) {
-			$total = (int) $params[0];
-		} else {
-			$total = 10;
-		}
-		$rows = $this->runSql(
-			"SELECT f_numchil AS tot, f_id AS id" .
-			" FROM `##families`" .
-			" WHERE" .
-			" f_file={$this->tree->getTreeId()}" .
-			" ORDER BY tot DESC" .
-			" LIMIT " . $total
-		);
-		if (!isset($rows[0])) {
-			return '';
-		}
-		if (count($rows) < $total) {
-			$total = count($rows);
-		}
-		$top10 = array();
-		for ($c = 0; $c < $total; $c++) {
-			$family = Family::getInstance($rows[$c]['id'], $this->tree);
-			if ($family->canShow()) {
-				if ($type === 'list') {
-					$top10[] =
-						'<li><a href="' . $family->getHtmlUrl() . '">' . $family->getFullName() . '</a> - ' .
-						I18N::plural('%s child', '%s children', $rows[$c]['tot'], I18N::number($rows[$c]['tot']));
-				} else {
-					$top10[] =
-						'<a href="' . $family->getHtmlUrl() . '">' . $family->getFullName() . '</a> - ' .
-						I18N::plural('%s child', '%s children', $rows[$c]['tot'], I18N::number($rows[$c]['tot']));
-				}
-			}
-		}
-		if ($type === 'list') {
-			$top10 = implode('', $top10);
-		} else {
-			$top10 = implode('; ', $top10);
-		}
-		if (I18N::direction() === 'rtl') {
-			$top10 = str_replace(array('[', ']', '(', ')', '+'), array('&rlm;[', '&rlm;]', '&rlm;(', '&rlm;)', '&rlm;+'), $top10);
-		}
-		if ($type === 'list') {
-			return '<ul>' . $top10 . '</ul>';
-		}
-
-		return $top10;
-	}
-
-	/**
-	 * Find the ages between siblings.
-	 *
-	 * @param string   $type
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	private function ageBetweenSiblingsQuery($type = 'list', $params = array()) {
-		if (isset($params[0])) {
-			$total = (int) $params[0];
-		} else {
-			$total = 10;
-		}
-		if (isset($params[1])) {
-			$one = $params[1];
-		} else {
-			$one = false;
-		} // each family only once if true
-		$rows = $this->runSql(
-			" SELECT DISTINCT" .
-			" link1.l_from AS family," .
-			" link1.l_to AS ch1," .
-			" link2.l_to AS ch2," .
-			" child1.d_julianday2-child2.d_julianday2 AS age" .
-			" FROM `##link` AS link1" .
-			" LEFT JOIN `##dates` AS child1 ON child1.d_file = {$this->tree->getTreeId()}" .
-			" LEFT JOIN `##dates` AS child2 ON child2.d_file = {$this->tree->getTreeId()}" .
-			" LEFT JOIN `##link` AS link2 ON link2.l_file = {$this->tree->getTreeId()}" .
-			" WHERE" .
-			" link1.l_file = {$this->tree->getTreeId()} AND" .
-			" link1.l_from = link2.l_from AND" .
-			" link1.l_type = 'CHIL' AND" .
-			" child1.d_gid = link1.l_to AND" .
-			" child1.d_fact = 'BIRT' AND" .
-			" link2.l_type = 'CHIL' AND" .
-			" child2.d_gid = link2.l_to AND" .
-			" child2.d_fact = 'BIRT' AND" .
-			" child1.d_julianday2 > child2.d_julianday2 AND" .
-			" child2.d_julianday2 <> 0 AND" .
-			" child1.d_gid <> child2.d_gid" .
-			" ORDER BY age DESC" .
-			" LIMIT " . $total
-		);
-		if (!isset($rows[0])) {
-			return '';
-		}
-		$top10 = array();
-		$dist  = array();
-		foreach ($rows as $fam) {
-			$family = Family::getInstance($fam['family'], $this->tree);
-			$child1 = Individual::getInstance($fam['ch1'], $this->tree);
-			$child2 = Individual::getInstance($fam['ch2'], $this->tree);
-			if ($type == 'name') {
-				if ($child1->canShow() && $child2->canShow()) {
-					$return = '<a href="' . $child2->getHtmlUrl() . '">' . $child2->getFullName() . '</a> ';
-					$return .= I18N::translate('and') . ' ';
-					$return .= '<a href="' . $child1->getHtmlUrl() . '">' . $child1->getFullName() . '</a>';
-					$return .= ' <a href="' . $family->getHtmlUrl() . '">[' . I18N::translate('View this family') . ']</a>';
-				} else {
-					$return = I18N::translate('This information is private and cannot be shown.');
-				}
-
-				return $return;
-			}
-			$age = $fam['age'];
-			if ((int) ($age / 365.25) > 0) {
-				$age = (int) ($age / 365.25) . 'y';
-			} elseif ((int) ($age / 30.4375) > 0) {
-				$age = (int) ($age / 30.4375) . 'm';
-			} else {
-				$age = $age . 'd';
-			}
-			$age = FunctionsDate::getAgeAtEvent($age);
-			if ($type == 'age') {
-				return $age;
-			}
-			if ($type == 'list') {
-				if ($one && !in_array($fam['family'], $dist)) {
-					if ($child1->canShow() && $child2->canShow()) {
-						$return = "<li>";
-						$return .= "<a href=\"" . $child2->getHtmlUrl() . "\">" . $child2->getFullName() . "</a> ";
-						$return .= I18N::translate('and') . " ";
-						$return .= "<a href=\"" . $child1->getHtmlUrl() . "\">" . $child1->getFullName() . "</a>";
-						$return .= " (" . $age . ")";
-						$return .= " <a href=\"" . $family->getHtmlUrl() . "\">[" . I18N::translate('View this family') . "]</a>";
-						$return .= '</li>';
-						$top10[] = $return;
-						$dist[]  = $fam['family'];
-					}
-				} elseif (!$one && $child1->canShow() && $child2->canShow()) {
-					$return = "<li>";
-					$return .= "<a href=\"" . $child2->getHtmlUrl() . "\">" . $child2->getFullName() . "</a> ";
-					$return .= I18N::translate('and') . " ";
-					$return .= "<a href=\"" . $child1->getHtmlUrl() . "\">" . $child1->getFullName() . "</a>";
-					$return .= " (" . $age . ")";
-					$return .= " <a href=\"" . $family->getHtmlUrl() . "\">[" . I18N::translate('View this family') . "]</a>";
-					$return .= '</li>';
-					$top10[] = $return;
-				}
-			} else {
-				if ($child1->canShow() && $child2->canShow()) {
-					$return = $child2->formatList('span', false, $child2->getFullName());
-					$return .= "<br>" . I18N::translate('and') . "<br>";
-					$return .= $child1->formatList('span', false, $child1->getFullName());
-					$return .= "<br><a href=\"" . $family->getHtmlUrl() . "\">[" . I18N::translate('View this family') . "]</a>";
-
-					return $return;
-				} else {
-					return I18N::translate('This information is private and cannot be shown.');
-				}
-			}
-		}
-		if ($type === 'list') {
-			$top10 = implode('', $top10);
-		}
-		if (I18N::direction() === 'rtl') {
-			$top10 = str_replace(array('[', ']', '(', ')', '+'), array('&rlm;[', '&rlm;]', '&rlm;(', '&rlm;)', '&rlm;+'), $top10);
-		}
-		if ($type === 'list') {
-			return '<ul>' . $top10 . '</ul>';
-		}
-
-		return $top10;
-	}
-
-	/**
-	 * Find the month in the year of the birth of the first child.
-	 *
-	 * @param bool     $simple
-	 * @param bool     $sex
-	 * @param int      $year1
-	 * @param int      $year2
-	 * @param string[] $params
-	 *
-	 * @return string|string[][]
-	 */
-	public function monthFirstChildQuery($simple = true, $sex = false, $year1 = -1, $year2 = -1, $params = array()) {
-		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
-		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
-		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
-		$WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
-
-		if ($year1 >= 0 && $year2 >= 0) {
-			$sql_years = " AND (d_year BETWEEN '{$year1}' AND '{$year2}')";
-		} else {
-			$sql_years = '';
-		}
-		if ($sex) {
-			$sql_sex1 = ', i_sex';
-			$sql_sex2 = " JOIN `##individuals` AS child ON child1.d_file = i_file AND child1.d_gid = child.i_id ";
-		} else {
-			$sql_sex1 = '';
-			$sql_sex2 = '';
-		}
-		$sql =
-			"SELECT d_month{$sql_sex1}, COUNT(*) AS total " .
-			"FROM (" .
-			" SELECT family{$sql_sex1}, MIN(date) AS d_date, d_month" .
-			" FROM (" .
-			"  SELECT" .
-			"  link1.l_from AS family," .
-			"  link1.l_to AS child," .
-			"  child1.d_julianday2 AS date," .
-			"  child1.d_month as d_month" .
-			$sql_sex1 .
-			"  FROM `##link` AS link1" .
-			"  LEFT JOIN `##dates` AS child1 ON child1.d_file = {$this->tree->getTreeId()}" .
-			$sql_sex2 .
-			"  WHERE" .
-			"  link1.l_file = {$this->tree->getTreeId()} AND" .
-			"  link1.l_type = 'CHIL' AND" .
-			"  child1.d_gid = link1.l_to AND" .
-			"  child1.d_fact = 'BIRT' AND" .
-			"  child1.d_month IN ('JAN', 'FEB', 'MAR', 'APR', 'MAY', 'JUN', 'JUL', 'AUG', 'SEP', 'OCT', 'NOV', 'DEC')" .
-			$sql_years .
-			"  ORDER BY date" .
-			" ) AS children" .
-			" GROUP BY family, d_month{$sql_sex1}" .
-			") AS first_child " .
-			"GROUP BY d_month";
-		if ($sex) {
-			$sql .= ', i_sex';
-		}
-		$rows = $this->runSql($sql);
-		if ($simple) {
-			if (isset($params[0]) && $params[0] != '') {
-				$size = strtolower($params[0]);
-			} else {
-				$size = $WT_STATS_S_CHART_X . 'x' . $WT_STATS_S_CHART_Y;
-			}
-			if (isset($params[1]) && $params[1] != '') {
-				$color_from = strtolower($params[1]);
-			} else {
-				$color_from = $WT_STATS_CHART_COLOR1;
-			}
-			if (isset($params[2]) && $params[2] != '') {
-				$color_to = strtolower($params[2]);
-			} else {
-				$color_to = $WT_STATS_CHART_COLOR2;
-			}
-			$sizes = explode('x', $size);
-			$tot   = 0;
-			foreach ($rows as $values) {
-				$tot += $values['total'];
-			}
-			// Beware divide by zero
-			if ($tot == 0) {
-				return '';
-			}
-			$text   = '';
-			$counts = array();
-			foreach ($rows as $values) {
-				$counts[] = round(100 * $values['total'] / $tot, 0);
-				switch ($values['d_month']) {
-				default:
-				case 'JAN':
-					$values['d_month'] = 1;
-					break;
-				case 'FEB':
-					$values['d_month'] = 2;
-					break;
-				case 'MAR':
-					$values['d_month'] = 3;
-					break;
-				case 'APR':
-					$values['d_month'] = 4;
-					break;
-				case 'MAY':
-					$values['d_month'] = 5;
-					break;
-				case 'JUN':
-					$values['d_month'] = 6;
-					break;
-				case 'JUL':
-					$values['d_month'] = 7;
-					break;
-				case 'AUG':
-					$values['d_month'] = 8;
-					break;
-				case 'SEP':
-					$values['d_month'] = 9;
-					break;
-				case 'OCT':
-					$values['d_month'] = 10;
-					break;
-				case 'NOV':
-					$values['d_month'] = 11;
-					break;
-				case 'DEC':
-					$values['d_month'] = 12;
-					break;
-				}
-				$text .= I18N::translate(ucfirst(strtolower(($values['d_month'])))) . ' - ' . $values['total'] . '|';
-			}
-			$chd = $this->arrayToExtendedEncoding($counts);
-			$chl = substr($text, 0, -1);
-
-			return '<img src="https://chart.googleapis.com/chart?cht=p3&amp;chd=e:' . $chd . '&amp;chs=' . $size . '&amp;chco=' . $color_from . ',' . $color_to . '&amp;chf=bg,s,ffffff00&amp;chl=' . $chl . '" width="' . $sizes[0] . '" height="' . $sizes[1] . '" alt="' . I18N::translate('Month of birth of first child in a relation') . '" title="' . I18N::translate('Month of birth of first child in a relation') . '" />';
-		}
-
-		return $rows;
-	}
-
-	/**
-	 * Find the family with the most children.
-	 *
-	 * @return string
-	 */
-	public function largestFamily() {
-		return $this->familyQuery('full');
-	}
-
-	/**
-	 * Find the number of children in the largest family.
-	 *
-	 * @return string
-	 */
-	public function largestFamilySize() {
-		return $this->familyQuery('size');
-	}
-
-	/**
-	 * Find the family with the most children.
-	 *
-	 * @return string
-	 */
-	public function largestFamilyName() {
-		return $this->familyQuery('name');
-	}
-
-	/**
-	 * The the families with the most children.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topTenLargestFamily($params = array()) {
-		return $this->topTenFamilyQuery('nolist', $params);
-	}
-
-	/**
-	 * Find the families with the most children.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topTenLargestFamilyList($params = array()) {
-		return $this->topTenFamilyQuery('list', $params);
-	}
-
-	/**
-	 * Create a chart of the largest families.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function chartLargestFamilies($params = array()) {
-		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
-		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
-		$WT_STATS_L_CHART_X    = Theme::theme()->parameter('stats-large-chart-x');
-		$WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
-
-		if (isset($params[0]) && $params[0] != '') {
-			$size = strtolower($params[0]);
-		} else {
-			$size = $WT_STATS_L_CHART_X . 'x' . $WT_STATS_S_CHART_Y;
-		}
-		if (isset($params[1]) && $params[1] != '') {
-			$color_from = strtolower($params[1]);
-		} else {
-			$color_from = $WT_STATS_CHART_COLOR1;
-		}
-		if (isset($params[2]) && $params[2] != '') {
-			$color_to = strtolower($params[2]);
-		} else {
-			$color_to = $WT_STATS_CHART_COLOR2;
-		}
-		if (isset($params[3]) && $params[3] != '') {
-			$total = strtolower($params[3]);
-		} else {
-			$total = 10;
-		}
-		$sizes = explode('x', $size);
-		$total = (int) $total;
-		$rows  = $this->runSql(
-			" SELECT f_numchil AS tot, f_id AS id" .
-			" FROM `##families`" .
-			" WHERE f_file={$this->tree->getTreeId()}" .
-			" ORDER BY tot DESC" .
-			" LIMIT " . $total
-		);
-		if (!isset($rows[0])) {
-			return '';
-		}
-		$tot = 0;
-		foreach ($rows as $row) {
-			$tot += (int) $row['tot'];
-		}
-		$chd = '';
-		$chl = array();
-		foreach ($rows as $row) {
-			$family = Family::getInstance($row['id'], $this->tree);
-			if ($family->canShow()) {
-				if ($tot == 0) {
-					$per = 0;
-				} else {
-					$per = round(100 * $row['tot'] / $tot, 0);
-				}
-				$chd .= $this->arrayToExtendedEncoding(array($per));
-				$chl[] = htmlspecialchars_decode(strip_tags($family->getFullName())) . ' - ' . I18N::number($row['tot']);
-			}
-		}
-		$chl = rawurlencode(implode('|', $chl));
-
-		return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_from},{$color_to}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Largest families') . "\" title=\"" . I18N::translate('Largest families') . "\" />";
-	}
-
-	/**
-	 * Count the total children.
-	 *
-	 * @return string
-	 */
-	public function totalChildren() {
-		$rows = $this->runSql("SELECT SUM(f_numchil) AS tot FROM `##families` WHERE f_file={$this->tree->getTreeId()}");
-
-		return I18N::number($rows[0]['tot']);
-	}
-
-	/**
-	 * Find the average number of children in families.
-	 *
-	 * @return string
-	 */
-	public function averageChildren() {
-		$rows = $this->runSql("SELECT AVG(f_numchil) AS tot FROM `##families` WHERE f_file={$this->tree->getTreeId()}");
-
-		return I18N::number($rows[0]['tot'], 2);
-	}
-
-	/**
-	 * General query on familes/children.
-	 *
-	 * @param bool     $simple
-	 * @param string   $sex
-	 * @param int      $year1
-	 * @param int      $year2
-	 * @param string[] $params
-	 *
-	 * @return string|string[][]
-	 */
-	public function statsChildrenQuery($simple = true, $sex = 'BOTH', $year1 = -1, $year2 = -1, $params = array()) {
-		if ($simple) {
-			if (isset($params[0]) && $params[0] != '') {
-				$size = strtolower($params[0]);
-			} else {
-				$size = '220x200';
-			}
-			$sizes = explode('x', $size);
-			$max   = 0;
-			$rows  = $this->runSql(
-				" SELECT ROUND(AVG(f_numchil),2) AS num, FLOOR(d_year/100+1) AS century" .
-				" FROM  `##families`" .
-				" JOIN  `##dates` ON (d_file = f_file AND d_gid=f_id)" .
-				" WHERE f_file = {$this->tree->getTreeId()}" .
-				" AND   d_julianday1<>0" .
-				" AND   d_fact = 'MARR'" .
-				" AND   d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')" .
-				" GROUP BY century" .
-				" ORDER BY century");
-			if (empty($rows)) {
-				return '';
-			}
-			foreach ($rows as $values) {
-				if ($max < $values['num']) {
-					$max = $values['num'];
-				}
-			}
-			$chm    = "";
-			$chxl   = "0:|";
-			$i      = 0;
-			$counts = array();
-			foreach ($rows as $values) {
-				if ($sizes[0] < 980) {
-					$sizes[0] += 38;
-				}
-				$chxl .= $this->centuryName($values['century']) . "|";
-				if ($max <= 5) {
-					$counts[] = round($values['num'] * 819.2 - 1, 1);
-				} elseif ($max <= 10) {
-					$counts[] = round($values['num'] * 409.6, 1);
-				} else {
-					$counts[] = round($values['num'] * 204.8, 1);
-				}
-				$chm .= 't' . $values['num'] . ',000000,0,' . $i . ',11,1|';
-				$i++;
-			}
-			$chd = $this->arrayToExtendedEncoding($counts);
-			$chm = substr($chm, 0, -1);
-			if ($max <= 5) {
-				$chxl .= "1:||" . I18N::translate('century') . "|2:|0|1|2|3|4|5|3:||" . I18N::translate('Number of children') . "|";
-			} elseif ($max <= 10) {
-				$chxl .= "1:||" . I18N::translate('century') . "|2:|0|1|2|3|4|5|6|7|8|9|10|3:||" . I18N::translate('Number of children') . "|";
-			} else {
-				$chxl .= "1:||" . I18N::translate('century') . "|2:|0|1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|3:||" . I18N::translate('Number of children') . "|";
-			}
-
-			return "<img src=\"https://chart.googleapis.com/chart?cht=bvg&amp;chs={$sizes[0]}x{$sizes[1]}&amp;chf=bg,s,ffffff00|c,s,ffffff00&amp;chm=D,FF0000,0,0,3,1|{$chm}&amp;chd=e:{$chd}&amp;chco=0000FF&amp;chbh=30,3&amp;chxt=x,x,y,y&amp;chxl=" . rawurlencode($chxl) . "\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Average number of children per family') . "\" title=\"" . I18N::translate('Average number of children per family') . "\" />";
-		} else {
-			if ($sex == 'M') {
-				$sql =
-					"SELECT num, COUNT(*) AS total FROM " .
-					"(SELECT count(i_sex) AS num FROM `##link` " .
-					"LEFT OUTER JOIN `##individuals` " .
-					"ON l_from=i_id AND l_file=i_file AND i_sex='M' AND l_type='FAMC' " .
-					"JOIN `##families` ON f_file=l_file AND f_id=l_to WHERE f_file={$this->tree->getTreeId()} GROUP BY l_to" .
-					") boys" .
-					" GROUP BY num" .
-					" ORDER BY num";
-			} elseif ($sex == 'F') {
-				$sql =
-					"SELECT num, COUNT(*) AS total FROM " .
-					"(SELECT count(i_sex) AS num FROM `##link` " .
-					"LEFT OUTER JOIN `##individuals` " .
-					"ON l_from=i_id AND l_file=i_file AND i_sex='F' AND l_type='FAMC' " .
-					"JOIN `##families` ON f_file=l_file AND f_id=l_to WHERE f_file={$this->tree->getTreeId()} GROUP BY l_to" .
-					") girls" .
-					" GROUP BY num" .
-					" ORDER BY num";
-			} else {
-				$sql = "SELECT f_numchil, COUNT(*) AS total FROM `##families` ";
-				if ($year1 >= 0 && $year2 >= 0) {
-					$sql .=
-						"AS fam LEFT JOIN `##dates` AS married ON married.d_file = {$this->tree->getTreeId()}"
-						. " WHERE"
-						. " married.d_gid = fam.f_id AND"
-						. " fam.f_file = {$this->tree->getTreeId()} AND"
-						. " married.d_fact = 'MARR' AND"
-						. " married.d_year BETWEEN '{$year1}' AND '{$year2}'";
-				} else {
-					$sql .= "WHERE f_file={$this->tree->getTreeId()}";
-				}
-				$sql .= " GROUP BY f_numchil";
-			}
-			$rows = $this->runSql($sql);
-
-			return $rows;
-		}
-	}
-
-	/**
-	 * Genearl query on families/children.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function statsChildren($params = array()) {
-		return $this->statsChildrenQuery(true, 'BOTH', -1, -1, $params);
-	}
-
-	/**
-	 * Find the names of siblings with the widest age gap.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topAgeBetweenSiblingsName($params = array()) {
-		return $this->ageBetweenSiblingsQuery('name', $params);
-	}
-
-	/**
-	 * Find the widest age gap between siblings.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topAgeBetweenSiblings($params = array()) {
-		return $this->ageBetweenSiblingsQuery('age', $params);
-	}
-
-	/**
-	 * Find the name of siblings with the widest age gap.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topAgeBetweenSiblingsFullName($params = array()) {
-		return $this->ageBetweenSiblingsQuery('nolist', $params);
-	}
-
-	/**
-	 * Find the siblings with the widest age gaps.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topAgeBetweenSiblingsList($params = array()) {
-		return $this->ageBetweenSiblingsQuery('list', $params);
-	}
-
-	/**
-	 * Find the families with no children.
-	 *
-	 * @return string
-	 */
-	private function noChildrenFamiliesQuery() {
-		$rows = $this->runSql(
-			" SELECT COUNT(*) AS tot" .
-			" FROM  `##families`" .
-			" WHERE f_numchil = 0 AND f_file = {$this->tree->getTreeId()}");
-
-		return $rows[0]['tot'];
-	}
-
-	/**
-	 * Find the families with no children.
-	 *
-	 * @return string
-	 */
-	public function noChildrenFamilies() {
-		return I18N::number($this->noChildrenFamiliesQuery());
-	}
-
-	/**
-	 * Find the families with no children.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function noChildrenFamiliesList($params = array()) {
-		if (isset($params[0]) && $params[0] != '') {
-			$type = strtolower($params[0]);
-		} else {
-			$type = 'list';
-		}
-		$rows = $this->runSql(
-			" SELECT f_id AS family" .
-			" FROM `##families` AS fam" .
-			" WHERE f_numchil = 0 AND fam.f_file = {$this->tree->getTreeId()}");
-		if (!isset($rows[0])) {
-			return '';
-		}
-		$top10 = array();
-		foreach ($rows as $row) {
-			$family = Family::getInstance($row['family'], $this->tree);
-			if ($family->canShow()) {
-				if ($type == 'list') {
-					$top10[] = "<li><a href=\"" . $family->getHtmlUrl() . "\">" . $family->getFullName() . "</a></li>";
-				} else {
-					$top10[] = "<a href=\"" . $family->getHtmlUrl() . "\">" . $family->getFullName() . "</a>";
-				}
-			}
-		}
-		if ($type == 'list') {
-			$top10 = implode('', $top10);
-		} else {
-			$top10 = implode('; ', $top10);
-		}
-		if (I18N::direction() === 'rtl') {
-			$top10 = str_replace(array('[', ']', '(', ')', '+'), array('&rlm;[', '&rlm;]', '&rlm;(', '&rlm;)', '&rlm;+'), $top10);
-		}
-		if ($type === 'list') {
-			return '<ul>' . $top10 . '</ul>';
-		}
-
-		return $top10;
-	}
-
-	/**
-	 * Create a chart of children with no families.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function chartNoChildrenFamilies($params = array()) {
-		if (isset($params[0]) && $params[0] != '') {
-			$size = strtolower($params[0]);
-		} else {
-			$size = '220x200';
-		}
-		if (isset($params[1]) && $params[1] != '') {
-			$year1 = $params[1];
-		} else {
-			$year1 = -1;
-		}
-		if (isset($params[2]) && $params[2] != '') {
-			$year2 = $params[2];
-		} else {
-			$year2 = -1;
-		}
-		$sizes = explode('x', $size);
-		if ($year1 >= 0 && $year2 >= 0) {
-			$years = " married.d_year BETWEEN '{$year1}' AND '{$year2}' AND";
-		} else {
-			$years = "";
-		}
-		$max  = 0;
-		$tot  = 0;
-		$rows = $this->runSql(
-			"SELECT" .
-			" COUNT(*) AS count," .
-			" FLOOR(married.d_year/100+1) AS century" .
-			" FROM" .
-			" `##families` AS fam" .
-			" JOIN" .
-			" `##dates` AS married ON (married.d_file = fam.f_file AND married.d_gid = fam.f_id)" .
-			" WHERE" .
-			" f_numchil = 0 AND" .
-			" fam.f_file = {$this->tree->getTreeId()} AND" .
-			$years .
-			" married.d_fact = 'MARR' AND" .
-			" married.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')" .
-			" GROUP BY century ORDER BY century"
-		);
-		if (empty($rows)) {
-			return '';
-		}
-		foreach ($rows as $values) {
-			if ($max < $values['count']) {
-				$max = $values['count'];
-			}
-			$tot += (int) $values['count'];
-		}
-		$unknown = $this->noChildrenFamiliesQuery() - $tot;
-		if ($unknown > $max) {
-			$max = $unknown;
-		}
-		$chm    = "";
-		$chxl   = "0:|";
-		$i      = 0;
-		$counts = array();
-		foreach ($rows as $values) {
-			if ($sizes[0] < 980) {
-				$sizes[0] += 38;
-			}
-			$chxl .= $this->centuryName($values['century']) . "|";
-			$counts[] = round(4095 * $values['count'] / ($max + 1));
-			$chm .= 't' . $values['count'] . ',000000,0,' . $i . ',11,1|';
-			$i++;
-		}
-		$counts[] = round(4095 * $unknown / ($max + 1));
-		$chd      = $this->arrayToExtendedEncoding($counts);
-		$chm .= 't' . $unknown . ',000000,0,' . $i . ',11,1';
-		$chxl .= I18N::translateContext('unknown century', 'Unknown') . "|1:||" . I18N::translate('century') . "|2:|0|";
-		$step = $max + 1;
-		for ($d = (int) ($max + 1); $d > 0; $d--) {
-			if (($max + 1) < ($d * 10 + 1) && fmod(($max + 1), $d) == 0) {
-				$step = $d;
-			}
-		}
-		if ($step == (int) ($max + 1)) {
-			for ($d = (int) ($max); $d > 0; $d--) {
-				if ($max < ($d * 10 + 1) && fmod($max, $d) == 0) {
-					$step = $d;
-				}
-			}
-		}
-		for ($n = $step; $n <= ($max + 1); $n += $step) {
-			$chxl .= $n . "|";
-		}
-		$chxl .= "3:||" . I18N::translate('Total families') . "|";
-
-		return "<img src=\"https://chart.googleapis.com/chart?cht=bvg&amp;chs={$sizes[0]}x{$sizes[1]}&amp;chf=bg,s,ffffff00|c,s,ffffff00&amp;chm=D,FF0000,0,0:" . ($i - 1) . ",3,1|{$chm}&amp;chd=e:{$chd}&amp;chco=0000FF,ffffff00&amp;chbh=30,3&amp;chxt=x,x,y,y&amp;chxl=" . rawurlencode($chxl) . "\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Number of families without children') . "\" title=\"" . I18N::translate('Number of families without children') . "\" />";
-	}
-
-	/**
-	 * Find the couple with the most grandchildren.
-	 *
-	 * @param string   $type
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	private function topTenGrandFamilyQuery($type = 'list', $params = array()) {
-		if (isset($params[0])) {
-			$total = (int) $params[0];
-		} else {
-			$total = 10;
-		}
-		$rows = $this->runSql(
-			"SELECT COUNT(*) AS tot, f_id AS id" .
-			" FROM `##families`" .
-			" JOIN `##link` AS children ON children.l_file = {$this->tree->getTreeId()}" .
-			" JOIN `##link` AS mchildren ON mchildren.l_file = {$this->tree->getTreeId()}" .
-			" JOIN `##link` AS gchildren ON gchildren.l_file = {$this->tree->getTreeId()}" .
-			" WHERE" .
-			" f_file={$this->tree->getTreeId()} AND" .
-			" children.l_from=f_id AND" .
-			" children.l_type='CHIL' AND" .
-			" children.l_to=mchildren.l_from AND" .
-			" mchildren.l_type='FAMS' AND" .
-			" mchildren.l_to=gchildren.l_from AND" .
-			" gchildren.l_type='CHIL'" .
-			" GROUP BY id" .
-			" ORDER BY tot DESC" .
-			" LIMIT " . $total
-		);
-		if (!isset($rows[0])) {
-			return '';
-		}
-		$top10 = array();
-		foreach ($rows as $row) {
-			$family = Family::getInstance($row['id'], $this->tree);
-			if ($family->canShow()) {
-				if ($type === 'list') {
-					$top10[] =
-						'<li><a href="' . $family->getHtmlUrl() . '">' . $family->getFullName() . '</a> - ' .
-						I18N::plural('%s grandchild', '%s grandchildren', $row['tot'], I18N::number($row['tot']));
-				} else {
-					$top10[] =
-						'<a href="' . $family->getHtmlUrl() . '">' . $family->getFullName() . '</a> - ' .
-						I18N::plural('%s grandchild', '%s grandchildren', $row['tot'], I18N::number($row['tot']));
-				}
-			}
-		}
-		if ($type === 'list') {
-			$top10 = implode('', $top10);
-		} else {
-			$top10 = implode('; ', $top10);
-		}
-		if (I18N::direction() === 'rtl') {
-			$top10 = str_replace(array('[', ']', '(', ')', '+'), array('&rlm;[', '&rlm;]', '&rlm;(', '&rlm;)', '&rlm;+'), $top10);
-		}
-		if ($type === 'list') {
-			return '<ul>' . $top10 . '</ul>';
-		}
-
-		return $top10;
-	}
-
-	/**
-	 * Find the couple with the most grandchildren.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topTenLargestGrandFamily($params = array()) {
-		return $this->topTenGrandFamilyQuery('nolist', $params);
-	}
-
-	/**
-	 * Find the couple with the most grandchildren.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function topTenLargestGrandFamilyList($params = array()) {
-		return $this->topTenGrandFamilyQuery('list', $params);
-	}
-
-	/**
-	 * Find common surnames.
-	 *
-	 * @param string   $type
-	 * @param bool     $show_tot
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	private function commonSurnamesQuery($type = 'list', $show_tot = false, $params = array()) {
-		$threshold          = empty($params[0]) ? 10 : (int) $params[0];
-		$number_of_surnames = empty($params[1]) ? 10 : (int) $params[1];
-		$sorting            = empty($params[2]) ? 'alpha' : $params[2];
-
-		$surname_list = FunctionsDb::getTopSurnames($this->tree->getTreeId(), $threshold, $number_of_surnames);
-		if (empty($surname_list)) {
-			return '';
-		}
-
-		switch ($sorting) {
-		default:
-		case 'alpha':
-			uksort($surname_list, '\Fisharebest\Webtrees\I18N::strcasecmp');
-			break;
-		case 'count':
-			asort($surname_list);
-			break;
-		case 'rcount':
-			arsort($surname_list);
-			break;
-		}
-
-		// Note that we count/display SPFX SURN, but sort/group under just SURN
-		$surnames = array();
-		foreach (array_keys($surname_list) as $surname) {
-			$surnames = array_merge($surnames, QueryName::surnames($this->tree, $surname, '', false, false));
-		}
-
-		return FunctionsPrintLists::surnameList($surnames, ($type == 'list' ? 1 : 2), $show_tot, 'indilist.php', $this->tree);
-	}
-
-	/**
-	 * Find common surnames.
-	 *
-	 * @return string
-	 */
-	public function getCommonSurname() {
-		$surnames = array_keys(FunctionsDb::getTopSurnames($this->tree->getTreeId(), 1, 1));
-
-		return array_shift($surnames);
-	}
-
-	/**
-	 * Find common surnames.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonSurnames($params = array('', '', 'alpha')) {
-		return $this->commonSurnamesQuery('nolist', false, $params);
-	}
-
-	/**
-	 * Find common surnames.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonSurnamesTotals($params = array('', '', 'rcount')) {
-		return $this->commonSurnamesQuery('nolist', true, $params);
-	}
-
-	/**
-	 * Find common surnames.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonSurnamesList($params = array('', '', 'alpha')) {
-		return $this->commonSurnamesQuery('list', false, $params);
-	}
-
-	/**
-	 * Find common surnames.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonSurnamesListTotals($params = array('', '', 'rcount')) {
-		return $this->commonSurnamesQuery('list', true, $params);
-	}
-
-	/**
-	 * Create a chart of common surnames.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function chartCommonSurnames($params = array()) {
-		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
-		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
-		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
-		$WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
-
-		$size               = empty($params[0]) ? $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y : strtolower($params[0]);
-		$color_from         = empty($params[1]) ? $WT_STATS_CHART_COLOR1 : strtolower($params[1]);
-		$color_to           = empty($params[2]) ? $WT_STATS_CHART_COLOR2 : strtolower($params[2]);
-		$number_of_surnames = empty($params[3]) ? 10 : (int) $params[3];
-
-		$sizes    = explode('x', $size);
-		$tot_indi = $this->totalIndividualsQuery();
-		$surnames = FunctionsDb::getTopSurnames($this->tree->getTreeId(), 0, $number_of_surnames);
-		if (empty($surnames)) {
-			return '';
-		}
-		$SURNAME_TRADITION = $this->tree->getPreference('SURNAME_TRADITION');
-		$all_surnames      = array();
-		$tot               = 0;
-		foreach ($surnames as $surname => $num) {
-			$all_surnames = array_merge($all_surnames, QueryName::surnames($this->tree, I18N::strtoupper($surname), '', false, false));
-			$tot += $num;
-		}
-		$chd = '';
-		$chl = array();
-		foreach ($all_surnames as $surns) {
-			$count_per = 0;
-			$max_name  = 0;
-			$top_name  = '';
-			foreach ($surns as $spfxsurn => $indis) {
-				$per = count($indis);
-				$count_per += $per;
-				// select most common surname from all variants
-				if ($per > $max_name) {
-					$max_name = $per;
-					$top_name = $spfxsurn;
-				}
-			}
-			switch ($SURNAME_TRADITION) {
-			case 'polish':
-				// most common surname should be in male variant (Kowalski, not Kowalska)
-				$top_name = preg_replace(array('/ska$/', '/cka$/', '/dzka$/', '/żka$/'), array('ski', 'cki', 'dzki', 'żki'), $top_name);
-			}
-			$per = round(100 * $count_per / $tot_indi, 0);
-			$chd .= $this->arrayToExtendedEncoding(array($per));
-			$chl[] = $top_name . ' - ' . I18N::number($count_per);
-
-		}
-		$per = round(100 * ($tot_indi - $tot) / $tot_indi, 0);
-		$chd .= $this->arrayToExtendedEncoding(array($per));
-		$chl[] = I18N::translate('Other') . ' - ' . I18N::number($tot_indi - $tot);
-
-		$chart_title = implode(I18N::$list_separator, $chl);
-		$chl         = implode('|', $chl);
-
-		return '<img src="https://chart.googleapis.com/chart?cht=p3&amp;chd=e:' . $chd . '&amp;chs=' . $size . '&amp;chco=' . $color_from . ',' . $color_to . '&amp;chf=bg,s,ffffff00&amp;chl=' . rawurlencode($chl) . '" width="' . $sizes[0] . '" height="' . $sizes[1] . '" alt="' . $chart_title . '" title="' . $chart_title . '" />';
-	}
-
-	/**
-	 * Find common given names.
-	 *
-	 * @param string   $sex
-	 * @param string   $type
-	 * @param bool     $show_tot
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	private function commonGivenQuery($sex = 'B', $type = 'list', $show_tot = false, $params = array()) {
-		if (isset($params[0]) && $params[0] != '' && $params[0] >= 0) {
-			$threshold = (int) $params[0];
-		} else {
-			$threshold = 1;
-		}
-		if (isset($params[1]) && $params[1] != '' && $params[1] >= 0) {
-			$maxtoshow = (int) $params[1];
-		} else {
-			$maxtoshow = 10;
-		}
-
-		switch ($sex) {
-		case 'M':
-			$sex_sql = "i_sex='M'";
-			break;
-		case 'F':
-			$sex_sql = "i_sex='F'";
-			break;
-		case 'U':
-			$sex_sql = "i_sex='U'";
-			break;
-		case 'B':
-		default:
-			$sex_sql = "i_sex<>'U'";
-			break;
-		}
-		$ged_id = $this->tree->getTreeId();
-
-		$rows = Database::prepare("SELECT n_givn, COUNT(*) AS num FROM `##name` JOIN `##individuals` ON (n_id=i_id AND n_file=i_file) WHERE n_file={$ged_id} AND n_type<>'_MARNM' AND n_givn NOT IN ('@P.N.', '') AND LENGTH(n_givn)>1 AND {$sex_sql} GROUP BY n_id, n_givn")
-			->fetchAll();
-		$nameList = array();
-		foreach ($rows as $row) {
-			// Split “John Thomas” into “John” and “Thomas” and count against both totals
-			foreach (explode(' ', $row->n_givn) as $given) {
-				// Exclude initials and particles.
-				if (!preg_match('/^([A-Z]|[a-z]{1,3})$/', $given)) {
-					if (array_key_exists($given, $nameList)) {
-						$nameList[$given] += $row->num;
-					} else {
-						$nameList[$given] = $row->num;
-					}
-				}
-			}
-		}
-		arsort($nameList, SORT_NUMERIC);
-		$nameList = array_slice($nameList, 0, $maxtoshow);
-
-		if (count($nameList) == 0) {
-			return '';
-		}
-		if ($type == 'chart') {
-			return $nameList;
-		}
-		$common = array();
-		foreach ($nameList as $given => $total) {
-			if ($maxtoshow !== -1) {
-				if ($maxtoshow-- <= 0) {
-					break;
-				}
-			}
-			if ($total < $threshold) {
-				break;
-			}
-			if ($show_tot) {
-				$tot = ' (' . I18N::number($total) . ')';
-			} else {
-				$tot = '';
-			}
-			switch ($type) {
-			case 'table':
-				$common[] = '<tr><td>' . $given . '</td><td>' . I18N::number($total) . '</td><td>' . $total . '</td></tr>';
-				break;
-			case 'list':
-				$common[] = '<li><span dir="auto">' . $given . '</span>' . $tot . '</li>';
-				break;
-			case 'nolist':
-				$common[] = '<span dir="auto">' . $given . '</span>' . $tot;
-				break;
-			}
-		}
-		if ($common) {
-			switch ($type) {
-			case 'table':
-				global $controller;
-				$table_id = Uuid::uuid4(); // lists requires a unique ID in case there are multiple lists per page
-				$controller
-					->addExternalJavascript(WT_JQUERY_DATATABLES_JS_URL)
-					->addInlineJavascript('
+        for ($i = 0; $i < $c; $i++) {
+            $full_tag = $tags[$i];
+            // Added for new parameter support
+            $params = explode(':', $tags[$i]);
+            if (count($params) > 1) {
+                $tags[$i] = array_shift($params);
+            } else {
+                $params = array();
+            }
+
+            // Generate the replacement value for the tag
+            if (method_exists($this, $tags[$i])) {
+                $new_tags[]   = "#{$full_tag}#";
+                $new_values[] = call_user_func_array(array($this, $tags[$i]), array($params));
+            }
+        }
+
+        return array($new_tags, $new_values);
+    }
+
+    /**
+     * Embed tags in text
+     *
+     * @param string $text
+     *
+     * @return string
+     */
+    public function embedTags($text) {
+        if (strpos($text, '#') !== false) {
+            list($new_tags, $new_values) = $this->getTags($text);
+            $text                        = str_replace($new_tags, $new_values, $text);
+        }
+
+        return $text;
+    }
+
+    /**
+     * Get the name used for GEDCOM files and URLs.
+     *
+     * @return string
+     */
+    public function gedcomFilename() {
+        return $this->tree->getName();
+    }
+
+    /**
+     * Get the internal ID number of the tree.
+     *
+     * @return int
+     */
+    public function gedcomId() {
+        return $this->tree->getTreeId();
+    }
+
+    /**
+     * Get the descriptive title of the tree.
+     *
+     * @return string
+     */
+    public function gedcomTitle() {
+        return $this->tree->getTitleHtml();
+    }
+
+    /**
+     * Get information from the GEDCOM's HEAD record.
+     *
+     * @return string[]
+     */
+    private function gedcomHead() {
+        $title   = '';
+        $version = '';
+        $source  = '';
+
+        $head = GedcomRecord::getInstance('HEAD', $this->tree);
+        $sour = $head->getFirstFact('SOUR');
+        if ($sour) {
+            $source  = $sour->getValue();
+            $title   = $sour->getAttribute('NAME');
+            $version = $sour->getAttribute('VERS');
+        }
+
+        return array($title, $version, $source);
+    }
+
+    /**
+     * Get the software originally used to create the GEDCOM file.
+     *
+     * @return string
+     */
+    public function gedcomCreatedSoftware() {
+        $head = $this->gedcomHead();
+
+        return $head[0];
+    }
+
+    /**
+     * Get the version of software which created the GEDCOM file.
+     *
+     * @return string
+     */
+    public function gedcomCreatedVersion() {
+        $head = $this->gedcomHead();
+        // fix broken version string in Family Tree Maker
+        if (strstr($head[1], 'Family Tree Maker ')) {
+            $p       = strpos($head[1], '(') + 1;
+            $p2      = strpos($head[1], ')');
+            $head[1] = substr($head[1], $p, ($p2 - $p));
+        }
+        // Fix EasyTree version
+        if ($head[2] == 'EasyTree') {
+            $head[1] = substr($head[1], 1);
+        }
+
+        return $head[1];
+    }
+
+    /**
+     * Get the date the GEDCOM file was created.
+     *
+     * @return string
+     */
+    public function gedcomDate() {
+        $head = GedcomRecord::getInstance('HEAD', $this->tree);
+        $fact = $head->getFirstFact('DATE');
+        if ($fact) {
+            $date = new Date($fact->getValue());
+
+            return $date->display();
+        }
+
+        return '';
+    }
+
+    /**
+     * When was this tree last updated?
+     *
+     * @return string
+     */
+    public function gedcomUpdated() {
+        $row = Database::prepare(
+            "SELECT d_year, d_month, d_day FROM `##dates` WHERE d_julianday1 = (SELECT MAX(d_julianday1) FROM `##dates` WHERE d_file =? AND d_fact='CHAN') LIMIT 1"
+        )->execute(array($this->tree->getTreeId()))->fetchOneRow();
+        if ($row) {
+            $date = new Date("{$row->d_day} {$row->d_month} {$row->d_year}");
+
+            return $date->display();
+        } else {
+            return $this->gedcomDate();
+        }
+    }
+
+    /**
+     * What is the significant individual from this tree?
+     *
+     * @return string
+     */
+    public function gedcomRootId() {
+        return $this->tree->getPreference('PEDIGREE_ROOT_ID');
+    }
+
+    /**
+     * Convert totals into percentages.
+     *
+     * @param string $total
+     * @param string $type
+     *
+     * @return string
+     */
+    private function getPercentage($total, $type) {
+        switch ($type) {
+        case 'individual':
+            $type = $this->totalIndividualsQuery();
+            break;
+        case 'family':
+            $type = $this->totalFamiliesQuery();
+            break;
+        case 'source':
+            $type = $this->totalSourcesQuery();
+            break;
+        case 'note':
+            $type = $this->totalNotesQuery();
+            break;
+        case 'all':
+        default:
+            $type = $this->totalIndividualsQuery() + $this->totalFamiliesQuery() + $this->totalSourcesQuery();
+            break;
+        }
+        if ($type == 0) {
+            return I18N::percentage(0, 1);
+        } else {
+            return I18N::percentage($total / $type, 1);
+        }
+    }
+
+    /**
+     * How many GEDCOM records exist in the tree.
+     *
+     * @return string
+     */
+    public function totalRecords() {
+        return I18N::number($this->totalIndividualsQuery() + $this->totalFamiliesQuery() + $this->totalSourcesQuery());
+    }
+
+    /**
+     * How many individuals exist in the tree.
+     *
+     * @return int
+     */
+    private function totalIndividualsQuery() {
+        return (int) Database::prepare(
+            "SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id"
+        )->execute(array(
+            'tree_id' => $this->tree->getTreeId(),
+        ))->fetchOne();
+    }
+
+    /**
+     * How many individuals exist in the tree.
+     *
+     * @return string
+     */
+    public function totalIndividuals() {
+        return I18N::number($this->totalIndividualsQuery());
+    }
+
+    /**
+     * How many individuals have one or more sources.
+     *
+     * @return int
+     */
+    private function totalIndisWithSourcesQuery() {
+        return (int) Database::prepare(
+            "SELECT COUNT(DISTINCT i_id)" .
+            " FROM `##individuals` JOIN `##link` ON i_id = l_from AND i_file = l_file" .
+            " WHERE l_file = :tree_id AND l_type = 'SOUR'"
+        )->execute(array(
+            'tree_id' => $this->tree->getTreeId(),
+        ))->fetchOne();
+    }
+
+    /**
+     * How many individuals have one or more sources.
+     *
+     * @return string
+     */
+    public function totalIndisWithSources() {
+        return I18N::number($this->totalIndisWithSourcesQuery());
+    }
+
+    /**
+     * Create a chart showing individuals with/without sources.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function chartIndisWithSources($params = array()) {
+        $WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
+        $WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
+        $WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
+        $WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
+
+        if (isset($params[0]) && $params[0] != '') {
+            $size = strtolower($params[0]);
+        } else {
+            $size = $WT_STATS_S_CHART_X . 'x' . $WT_STATS_S_CHART_Y;
+        }
+        if (isset($params[1]) && $params[1] != '') {
+            $color_from = strtolower($params[1]);
+        } else {
+            $color_from = $WT_STATS_CHART_COLOR1;
+        }
+        if (isset($params[2]) && $params[2] != '') {
+            $color_to = strtolower($params[2]);
+        } else {
+            $color_to = $WT_STATS_CHART_COLOR2;
+        }
+        $sizes    = explode('x', $size);
+        $tot_indi = $this->totalIndividualsQuery();
+        if ($tot_indi == 0) {
+            return '';
+        } else {
+            $tot_sindi_per = round($this->totalIndisWithSourcesQuery() / $tot_indi, 3);
+            $chd           = $this->arrayToExtendedEncoding(array(100 - 100 * $tot_sindi_per, 100 * $tot_sindi_per));
+            $chl           = I18N::translate('Without sources') . ' - ' . I18N::percentage(1 - $tot_sindi_per, 1) . '|' .
+                I18N::translate('With sources') . ' - ' . I18N::percentage($tot_sindi_per, 1);
+            $chart_title = I18N::translate('Individuals with sources');
+
+            return '<img src="https://chart.googleapis.com/chart?cht=p3&amp;chd=e:' . $chd . '&amp;chs=' . $size . '&amp;chco=' . $color_from . ',' . $color_to . '&amp;chf=bg,s,ffffff00&amp;chl=' . rawurlencode($chl) . '" width="' . $sizes[0] . '" height="' . $sizes[1] . '" alt="' . $chart_title . '" title="' . $chart_title . '">';
+        }
+    }
+
+    /**
+     * Show the total individuals as a percentage.
+     *
+     * @return string
+     */
+    public function totalIndividualsPercentage() {
+        return $this->getPercentage($this->totalIndividualsQuery(), 'all');
+    }
+
+    /**
+     * Count the total families.
+     *
+     * @return int
+     */
+    private function totalFamiliesQuery() {
+        return (int) Database::prepare(
+            "SELECT COUNT(*) FROM `##families` WHERE f_file = :tree_id"
+        )->execute(array(
+            'tree_id' => $this->tree->getTreeId(),
+        ))->fetchOne();
+    }
+
+    /**
+     * Count the total families.
+     *
+     * @return string
+     */
+    public function totalFamilies() {
+        return I18N::number($this->totalFamiliesQuery());
+    }
+
+    /**
+     * Count the families with source records.
+     *
+     * @return int
+     */
+    private function totalFamsWithSourcesQuery() {
+        return (int) Database::prepare(
+            "SELECT COUNT(DISTINCT f_id)" .
+            " FROM `##families` JOIN `##link` ON f_id = l_from AND f_file = l_file" .
+            " WHERE l_file = :tree_id AND l_type = 'SOUR'"
+        )->execute(array(
+            'tree_id' => $this->tree->getTreeId(),
+        ))->fetchOne();
+    }
+
+    /**
+     * Count the families with with source records.
+     *
+     * @return string
+     */
+    public function totalFamsWithSources() {
+        return I18N::number($this->totalFamsWithSourcesQuery());
+    }
+
+    /**
+     * Create a chart of individuals with/without sources.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function chartFamsWithSources($params = array()) {
+        $WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
+        $WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
+        $WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
+        $WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
+
+        if (isset($params[0]) && $params[0] != '') {
+            $size = strtolower($params[0]);
+        } else {
+            $size = $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y;
+        }
+        if (isset($params[1]) && $params[1] != '') {
+            $color_from = strtolower($params[1]);
+        } else {
+            $color_from = $WT_STATS_CHART_COLOR1;
+        }
+        if (isset($params[2]) && $params[2] != '') {
+            $color_to = strtolower($params[2]);
+        } else {
+            $color_to = $WT_STATS_CHART_COLOR2;
+        }
+        $sizes   = explode('x', $size);
+        $tot_fam = $this->totalFamiliesQuery();
+        if ($tot_fam == 0) {
+            return '';
+        } else {
+            $tot_sfam_per = round($this->totalFamsWithSourcesQuery() / $tot_fam, 3);
+            $chd          = $this->arrayToExtendedEncoding(array(100 - 100 * $tot_sfam_per, 100 * $tot_sfam_per));
+            $chl          = I18N::translate('Without sources') . ' - ' . I18N::percentage(1 - $tot_sfam_per, 1) . '|' .
+                I18N::translate('With sources') . ' - ' . I18N::percentage($tot_sfam_per, 1);
+            $chart_title = I18N::translate('Families with sources');
+
+            return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&chs={$size}&amp;chco={$color_from},{$color_to}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . $chart_title . "\" title=\"" . $chart_title . "\" />";
+        }
+    }
+
+    /**
+     * Show the total families as a percentage.
+     *
+     * @return string
+     */
+    public function totalFamiliesPercentage() {
+        return $this->getPercentage($this->totalFamiliesQuery(), 'all');
+    }
+
+    /**
+     * Count the total number of sources.
+     *
+     * @return int
+     */
+    private function totalSourcesQuery() {
+        return (int) Database::prepare(
+            "SELECT COUNT(*) FROM `##sources` WHERE s_file = :tree_id"
+        )->execute(array(
+            'tree_id' => $this->tree->getTreeId(),
+        ))->fetchOne();
+    }
+
+    /**
+     * Count the total number of sources.
+     *
+     * @return string
+     */
+    public function totalSources() {
+        return I18N::number($this->totalSourcesQuery());
+    }
+
+    /**
+     * Show the number of sources as a percentage.
+     *
+     * @return string
+     */
+    public function totalSourcesPercentage() {
+        return $this->getPercentage($this->totalSourcesQuery(), 'all');
+    }
+
+    /**
+     * Count the number of notes.
+     *
+     * @return int
+     */
+    private function totalNotesQuery() {
+        return (int) Database::prepare(
+            "SELECT COUNT(*) FROM `##other` WHERE o_type='NOTE' AND o_file = :tree_id"
+        )->execute(array(
+            'tree_id' => $this->tree->getTreeId(),
+        ))->fetchOne();
+    }
+
+    /**
+     * Count the number of notes.
+     *
+     * @return string
+     */
+    public function totalNotes() {
+        return I18N::number($this->totalNotesQuery());
+    }
+
+    /**
+     * Show the number of notes as a percentage.
+     *
+     * @return string
+     */
+    public function totalNotesPercentage() {
+        return $this->getPercentage($this->totalNotesQuery(), 'all');
+    }
+
+    /**
+     * Count the number of repositories.
+     *
+     * @return int
+     */
+    private function totalRepositoriesQuery() {
+        return (int) Database::prepare(
+            "SELECT COUNT(*) FROM `##other` WHERE o_type='REPO' AND o_file = :tree_id"
+        )->execute(array(
+            'tree_id' => $this->tree->getTreeId(),
+        ))->fetchOne();
+    }
+
+    /**
+     * Count the number of repositories
+     *
+     * @return string
+     */
+    public function totalRepositories() {
+        return I18N::number($this->totalRepositoriesQuery());
+    }
+
+    /**
+     * Show the total number of repositories as a percentage.
+     *
+     * @return string
+     */
+    public function totalRepositoriesPercentage() {
+        return $this->getPercentage($this->totalRepositoriesQuery(), 'all');
+    }
+
+    /**
+     * Count the surnames.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function totalSurnames($params = array()) {
+        if ($params) {
+            $opt      = 'IN (' . implode(',', array_fill(0, count($params), '?')) . ')';
+            $distinct = '';
+        } else {
+            $opt      = "IS NOT NULL";
+            $distinct = 'DISTINCT';
+        }
+        $params[] = $this->tree->getTreeId();
+        $total =
+            Database::prepare(
+                "SELECT COUNT({$distinct} n_surn COLLATE '" . I18N::collation() . "')" .
+                " FROM `##name`" .
+                " WHERE n_surn COLLATE '" . I18N::collation() . "' {$opt} AND n_file=?"
+            )->execute(
+                $params
+            )->fetchOne();
+
+        return I18N::number($total);
+    }
+
+    /**
+     * Count the number of distinct given names, or count the number of
+     * occurrences of a specific name or names.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function totalGivennames($params = array()) {
+        if ($params) {
+            $qs       = implode(',', array_fill(0, count($params), '?'));
+            $params[] = $this->tree->getTreeId();
+            $total    =
+                Database::prepare("SELECT COUNT( n_givn) FROM `##name` WHERE n_givn IN ({$qs}) AND n_file=?")
+                    ->execute($params)
+                    ->fetchOne();
+        } else {
+            $total =
+                Database::prepare("SELECT COUNT(DISTINCT n_givn) FROM `##name` WHERE n_givn IS NOT NULL AND n_file=?")
+                    ->execute(array($this->tree->getTreeId()))
+                    ->fetchOne();
+        }
+
+        return I18N::number($total);
+    }
+
+    /**
+     * Count the number of events (with dates).
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function totalEvents($params = array()) {
+        $sql  = "SELECT COUNT(*) AS tot FROM `##dates` WHERE d_file=?";
+        $vars = array($this->tree->getTreeId());
+
+        $no_types = array('HEAD', 'CHAN');
+        if ($params) {
+            $types = array();
+            foreach ($params as $type) {
+                if (substr($type, 0, 1) == '!') {
+                    $no_types[] = substr($type, 1);
+                } else {
+                    $types[] = $type;
+                }
+            }
+            if ($types) {
+                $sql .= ' AND d_fact IN (' . implode(', ', array_fill(0, count($types), '?')) . ')';
+                $vars = array_merge($vars, $types);
+            }
+        }
+        $sql .= ' AND d_fact NOT IN (' . implode(', ', array_fill(0, count($no_types), '?')) . ')';
+        $vars = array_merge($vars, $no_types);
+
+        return I18N::number(Database::prepare($sql)->execute($vars)->fetchOne());
+    }
+
+    /**
+     * Count the number of births.
+     *
+     * @return string
+     */
+    public function totalEventsBirth() {
+        return $this->totalEvents(explode('|', WT_EVENTS_BIRT));
+    }
+
+    /**
+     * Count the number of births.
+     *
+     * @return string
+     */
+    public function totalBirths() {
+        return $this->totalEvents(array('BIRT'));
+    }
+
+    /**
+     * Count the number of deaths.
+     *
+     * @return string
+     */
+    public function totalEventsDeath() {
+        return $this->totalEvents(explode('|', WT_EVENTS_DEAT));
+    }
+
+    /**
+     * Count the number of deaths.
+     *
+     * @return string
+     */
+    public function totalDeaths() {
+        return $this->totalEvents(array('DEAT'));
+    }
+
+    /**
+     * Count the number of marriages.
+     *
+     * @return string
+     */
+    public function totalEventsMarriage() {
+        return $this->totalEvents(explode('|', WT_EVENTS_MARR));
+    }
+
+    /**
+     * Count the number of marriages.
+     *
+     * @return string
+     */
+    public function totalMarriages() {
+        return $this->totalEvents(array('MARR'));
+    }
+
+    /**
+     * Count the number of divorces.
+     *
+     * @return string
+     */
+    public function totalEventsDivorce() {
+        return $this->totalEvents(explode('|', WT_EVENTS_DIV));
+    }
+
+    /**
+     * Count the number of divorces.
+     *
+     * @return string
+     */
+    public function totalDivorces() {
+        return $this->totalEvents(array('DIV'));
+    }
+
+    /**
+     * Count the number of other events.
+     *
+     * @return string
+     */
+    public function totalEventsOther() {
+        $facts    = array_merge(explode('|', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT));
+        $no_facts = array();
+        foreach ($facts as $fact) {
+            $fact       = '!' . str_replace('\'', '', $fact);
+            $no_facts[] = $fact;
+        }
+
+        return $this->totalEvents($no_facts);
+    }
+
+    /**
+     * Count the number of males.
+     *
+     * @return int
+     */
+    private function totalSexMalesQuery() {
+        return (int) Database::prepare(
+            "SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id AND i_sex = 'M'"
+        )->execute(array(
+            'tree_id' => $this->tree->getTreeId(),
+        ))->fetchOne();
+    }
+
+    /**
+     * Count the number of males.
+     *
+     * @return string
+     */
+    public function totalSexMales() {
+        return I18N::number($this->totalSexMalesQuery());
+    }
+
+    /**
+     * Count the number of males
+     *
+     * @return string
+     */
+    public function totalSexMalesPercentage() {
+        return $this->getPercentage($this->totalSexMalesQuery(), 'individual');
+    }
+
+    /**
+     * Count the number of females.
+     *
+     * @return int
+     */
+    private function totalSexFemalesQuery() {
+        return (int) Database::prepare(
+            "SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id AND i_sex = 'F'"
+        )->execute(array(
+            'tree_id' => $this->tree->getTreeId(),
+        ))->fetchOne();
+    }
+
+    /**
+     * Count the number of females.
+     *
+     * @return string
+     */
+    public function totalSexFemales() {
+        return I18N::number($this->totalSexFemalesQuery());
+    }
+
+    /**
+     * Count the number of females.
+     *
+     * @return string
+     */
+    public function totalSexFemalesPercentage() {
+        return $this->getPercentage($this->totalSexFemalesQuery(), 'individual');
+    }
+
+    /**
+     * Count the number of individuals with unknown sex.
+     *
+     * @return int
+     */
+    private function totalSexUnknownQuery() {
+        return (int) Database::prepare(
+            "SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id AND i_sex = 'U'"
+        )->execute(array(
+            'tree_id' => $this->tree->getTreeId(),
+        ))->fetchOne();
+    }
+
+    /**
+     * Count the number of individuals with unknown sex.
+     *
+     * @return string
+     */
+    public function totalSexUnknown() {
+        return I18N::number($this->totalSexUnknownQuery());
+    }
+
+    /**
+     * Count the number of individuals with unknown sex.
+     *
+     * @return string
+     */
+    public function totalSexUnknownPercentage() {
+        return $this->getPercentage($this->totalSexUnknownQuery(), 'individual');
+    }
+
+    /**
+     * Generate a chart showing sex distribution.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function chartSex($params = array()) {
+        $WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
+        $WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
+
+        if (isset($params[0]) && $params[0] != '') {
+            $size = strtolower($params[0]);
+        } else {
+            $size = $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y;
+        }
+        if (isset($params[1]) && $params[1] != '') {
+            $color_female = strtolower($params[1]);
+        } else {
+            $color_female = 'ffd1dc';
+        }
+        if (isset($params[2]) && $params[2] != '') {
+            $color_male = strtolower($params[2]);
+        } else {
+            $color_male = '84beff';
+        }
+        if (isset($params[3]) && $params[3] != '') {
+            $color_unknown = strtolower($params[3]);
+        } else {
+            $color_unknown = '777777';
+        }
+        $sizes = explode('x', $size);
+        // Raw data - for calculation
+        $tot_f = $this->totalSexFemalesQuery();
+        $tot_m = $this->totalSexMalesQuery();
+        $tot_u = $this->totalSexUnknownQuery();
+        $tot   = $tot_f + $tot_m + $tot_u;
+        // I18N data - for display
+        $per_f = $this->totalSexFemalesPercentage();
+        $per_m = $this->totalSexMalesPercentage();
+        $per_u = $this->totalSexUnknownPercentage();
+        if ($tot == 0) {
+            return '';
+        } elseif ($tot_u > 0) {
+            $chd = $this->arrayToExtendedEncoding(array(4095 * $tot_u / $tot, 4095 * $tot_f / $tot, 4095 * $tot_m / $tot));
+            $chl =
+                I18N::translateContext('unknown people', 'Unknown') . ' - ' . $per_u . '|' .
+                I18N::translate('Females') . ' - ' . $per_f . '|' .
+                I18N::translate('Males') . ' - ' . $per_m;
+            $chart_title =
+                I18N::translate('Males') . ' - ' . $per_m . I18N::$list_separator .
+                I18N::translate('Females') . ' - ' . $per_f . I18N::$list_separator .
+                I18N::translateContext('unknown people', 'Unknown') . ' - ' . $per_u;
+
+            return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_unknown},{$color_female},{$color_male}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . $chart_title . "\" title=\"" . $chart_title . "\" />";
+        } else {
+            $chd = $this->arrayToExtendedEncoding(array(4095 * $tot_f / $tot, 4095 * $tot_m / $tot));
+            $chl =
+                I18N::translate('Females') . ' - ' . $per_f . '|' .
+                I18N::translate('Males') . ' - ' . $per_m;
+            $chart_title = I18N::translate('Males') . ' - ' . $per_m . I18N::$list_separator .
+                I18N::translate('Females') . ' - ' . $per_f;
+
+            return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_female},{$color_male}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . $chart_title . "\" title=\"" . $chart_title . "\" />";
+        }
+    }
+
+    /**
+     * Count the number of living individuals.
+     *
+     * The totalLiving/totalDeceased queries assume that every dead person will
+     * have a DEAT record. It will not include individuals who were born more
+     * than MAX_ALIVE_AGE years ago, and who have no DEAT record.
+     * A good reason to run the “Add missing DEAT records” batch-update!
+     *
+     * @return int
+     */
+    private function totalLivingQuery() {
+        return (int) Database::prepare(
+            "SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id AND i_gedcom NOT REGEXP '\\n1 (" . WT_EVENTS_DEAT . ")'"
+        )->execute(array(
+            'tree_id' => $this->tree->getTreeId(),
+        ))->fetchOne();
+    }
+
+    /**
+     * Count the number of living individuals.
+     *
+     * @return string
+     */
+    public function totalLiving() {
+        return I18N::number($this->totalLivingQuery());
+    }
+
+    /**
+     * Count the number of living individuals.
+     *
+     * @return string
+     */
+    public function totalLivingPercentage() {
+        return $this->getPercentage($this->totalLivingQuery(), 'individual');
+    }
+
+    /**
+     * Count the number of dead individuals.
+     *
+     * @return int
+     */
+    private function totalDeceasedQuery() {
+        return (int) Database::prepare(
+            "SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id AND i_gedcom REGEXP '\\n1 (" . WT_EVENTS_DEAT . ")'"
+        )->execute(array(
+            'tree_id' => $this->tree->getTreeId(),
+        ))->fetchOne();
+    }
+
+    /**
+     * Count the number of dead individuals.
+     *
+     * @return string
+     */
+    public function totalDeceased() {
+        return I18N::number($this->totalDeceasedQuery());
+    }
+
+    /**
+     * Count the number of dead individuals.
+     *
+     * @return string
+     */
+    public function totalDeceasedPercentage() {
+        return $this->getPercentage($this->totalDeceasedQuery(), 'individual');
+    }
+
+    /**
+     * Create a chart showing mortality.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function chartMortality($params = array()) {
+        $WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
+        $WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
+
+        if (isset($params[0]) && $params[0] != '') {
+            $size = strtolower($params[0]);
+        } else {
+            $size = $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y;
+        }
+        if (isset($params[1]) && $params[1] != '') {
+            $color_living = strtolower($params[1]);
+        } else {
+            $color_living = 'ffffff';
+        }
+        if (isset($params[2]) && $params[2] != '') {
+            $color_dead = strtolower($params[2]);
+        } else {
+            $color_dead = 'cccccc';
+        }
+        $sizes = explode('x', $size);
+        // Raw data - for calculation
+        $tot_l = $this->totalLivingQuery();
+        $tot_d = $this->totalDeceasedQuery();
+        $tot   = $tot_l + $tot_d;
+        // I18N data - for display
+        $per_l = $this->totalLivingPercentage();
+        $per_d = $this->totalDeceasedPercentage();
+        if ($tot == 0) {
+            return '';
+        } else {
+            $chd = $this->arrayToExtendedEncoding(array(4095 * $tot_l / $tot, 4095 * $tot_d / $tot));
+            $chl =
+                I18N::translate('Living') . ' - ' . $per_l . '|' .
+                I18N::translate('Dead') . ' - ' . $per_d . '|';
+            $chart_title = I18N::translate('Living') . ' - ' . $per_l . I18N::$list_separator .
+                I18N::translate('Dead') . ' - ' . $per_d;
+
+            return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_living},{$color_dead}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . $chart_title . "\" title=\"" . $chart_title . "\" />";
+        }
+    }
+
+    /**
+     * Count the number of users.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function totalUsers($params = array()) {
+        if (isset($params[0])) {
+            $total = count(User::all()) + (int) $params[0];
+        } else {
+            $total = count(User::all());
+        }
+
+        return I18N::number($total);
+    }
+
+    /**
+     * Count the number of administrators.
+     *
+     * @return string
+     */
+    public function totalAdmins() {
+        return I18N::number(count(User::allAdmins()));
+    }
+
+    /**
+     * Count the number of administrators.
+     *
+     * @return string
+     */
+    public function totalNonAdmins() {
+        return I18N::number(count(User::all()) - count(User::allAdmins()));
+    }
+
+    /**
+     * Count the number of media records with a given type.
+     *
+     * @param string $type
+     *
+     * @return int
+     */
+    private function totalMediaType($type = 'all') {
+        if (!in_array($type, $this->_media_types) && $type != 'all' && $type != 'unknown') {
+            return 0;
+        }
+        $sql  = "SELECT COUNT(*) AS tot FROM `##media` WHERE m_file=?";
+        $vars = array($this->tree->getTreeId());
+
+        if ($type != 'all') {
+            if ($type == 'unknown') {
+                // There has to be a better way then this :(
+                foreach ($this->_media_types as $t) {
+                    $sql .= " AND (m_gedcom NOT LIKE ? AND m_gedcom NOT LIKE ?)";
+                    $vars[] = "%3 TYPE {$t}%";
+                    $vars[] = "%1 _TYPE {$t}%";
+                }
+            } else {
+                $sql .= " AND (m_gedcom LIKE ? OR m_gedcom LIKE ?)";
+                $vars[] = "%3 TYPE {$type}%";
+                $vars[] = "%1 _TYPE {$type}%";
+            }
+        }
+
+        return (int) Database::prepare($sql)->execute($vars)->fetchOne();
+    }
+
+    /**
+     * Count the number of media records.
+     *
+     * @return string
+     */
+    public function totalMedia() {
+        return I18N::number($this->totalMediaType('all'));
+    }
+
+    /**
+     * Count the number of media records with type "audio".
+     *
+     * @return string
+     */
+    public function totalMediaAudio() {
+        return I18N::number($this->totalMediaType('audio'));
+    }
+
+    /**
+     * Count the number of media records with type "book".
+     *
+     * @return string
+     */
+    public function totalMediaBook() {
+        return I18N::number($this->totalMediaType('book'));
+    }
+
+    /**
+     * Count the number of media records with type "card".
+     *
+     * @return string
+     */
+    public function totalMediaCard() {
+        return I18N::number($this->totalMediaType('card'));
+    }
+
+    /**
+     * Count the number of media records with type "certificate".
+     *
+     * @return string
+     */
+    public function totalMediaCertificate() {
+        return I18N::number($this->totalMediaType('certificate'));
+    }
+
+    /**
+     * Count the number of media records with type "coat of arms".
+     *
+     * @return string
+     */
+    public function totalMediaCoatOfArms() {
+        return I18N::number($this->totalMediaType('coat'));
+    }
+
+    /**
+     * Count the number of media records with type "document".
+     *
+     * @return string
+     */
+    public function totalMediaDocument() {
+        return I18N::number($this->totalMediaType('document'));
+    }
+
+    /**
+     * Count the number of media records with type "electronic".
+     *
+     * @return string
+     */
+    public function totalMediaElectronic() {
+        return I18N::number($this->totalMediaType('electronic'));
+    }
+
+    /**
+     * Count the number of media records with type "magazine".
+     *
+     * @return string
+     */
+    public function totalMediaMagazine() {
+        return I18N::number($this->totalMediaType('magazine'));
+    }
+
+    /**
+     * Count the number of media records with type "manuscript".
+     *
+     * @return string
+     */
+    public function totalMediaManuscript() {
+        return I18N::number($this->totalMediaType('manuscript'));
+    }
+
+    /**
+     * Count the number of media records with type "map".
+     *
+     * @return string
+     */
+    public function totalMediaMap() {
+        return I18N::number($this->totalMediaType('map'));
+    }
+
+    /**
+     * Count the number of media records with type "microfiche".
+     *
+     * @return string
+     */
+    public function totalMediaFiche() {
+        return I18N::number($this->totalMediaType('fiche'));
+    }
+
+    /**
+     * Count the number of media records with type "microfilm".
+     *
+     * @return string
+     */
+    public function totalMediaFilm() {
+        return I18N::number($this->totalMediaType('film'));
+    }
+
+    /**
+     * Count the number of media records with type "newspaper".
+     *
+     * @return string
+     */
+    public function totalMediaNewspaper() {
+        return I18N::number($this->totalMediaType('newspaper'));
+    }
+
+    /**
+     * Count the number of media records with type "painting".
+     *
+     * @return string
+     */
+    public function totalMediaPainting() {
+        return I18N::number($this->totalMediaType('painting'));
+    }
+
+    /**
+     * Count the number of media records with type "photograph".
+     *
+     * @return string
+     */
+    public function totalMediaPhoto() {
+        return I18N::number($this->totalMediaType('photo'));
+    }
+
+    /**
+     * Count the number of media records with type "tombstone".
+     *
+     * @return string
+     */
+    public function totalMediaTombstone() {
+        return I18N::number($this->totalMediaType('tombstone'));
+    }
+
+    /**
+     * Count the number of media records with type "video".
+     *
+     * @return string
+     */
+    public function totalMediaVideo() {
+        return I18N::number($this->totalMediaType('video'));
+    }
+
+    /**
+     * Count the number of media records with type "other".
+     *
+     * @return string
+     */
+    public function totalMediaOther() {
+        return I18N::number($this->totalMediaType('other'));
+    }
+
+    /**
+     * Count the number of media records with type "unknown".
+     *
+     * @return string
+     */
+    public function totalMediaUnknown() {
+        return I18N::number($this->totalMediaType('unknown'));
+    }
+
+    /**
+     * Create a chart of media types.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function chartMedia($params = array()) {
+        $WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
+        $WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
+        $WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
+        $WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
+
+        if (isset($params[0]) && $params[0] != '') {
+            $size = strtolower($params[0]);
+        } else {
+            $size = $WT_STATS_S_CHART_X . 'x' . $WT_STATS_S_CHART_Y;
+        }
+        if (isset($params[1]) && $params[1] != '') {
+            $color_from = strtolower($params[1]);
+        } else {
+            $color_from = $WT_STATS_CHART_COLOR1;
+        }
+        if (isset($params[2]) && $params[2] != '') {
+            $color_to = strtolower($params[2]);
+        } else {
+            $color_to = $WT_STATS_CHART_COLOR2;
+        }
+        $sizes = explode('x', $size);
+        $tot   = $this->totalMediaType('all');
+        // Beware divide by zero
+        if ($tot == 0) {
+            return I18N::translate('None');
+        }
+        // Build a table listing only the media types actually present in the GEDCOM
+        $mediaCounts = array();
+        $mediaTypes  = "";
+        $chart_title = "";
+        $c           = 0;
+        $max         = 0;
+        $media       = array();
+        foreach ($this->_media_types as $type) {
+            $count = $this->totalMediaType($type);
+            if ($count > 0) {
+                $media[$type] = $count;
+                if ($count > $max) {
+                    $max = $count;
+                }
+                $c += $count;
+            }
+        }
+        $count = $this->totalMediaType('unknown');
+        if ($count > 0) {
+            $media['unknown'] = $tot - $c;
+            if ($tot - $c > $max) {
+                $max = $count;
+            }
+        }
+        if (($max / $tot) > 0.6 && count($media) > 10) {
+            arsort($media);
+            $media = array_slice($media, 0, 10);
+            $c     = $tot;
+            foreach ($media as $cm) {
+                $c -= $cm;
+            }
+            if (isset($media['other'])) {
+                $media['other'] += $c;
+            } else {
+                $media['other'] = $c;
+            }
+        }
+        asort($media);
+        foreach ($media as $type => $count) {
+            $mediaCounts[] = round(100 * $count / $tot, 0);
+            $mediaTypes .= GedcomTag::getFileFormTypeValue($type) . ' - ' . I18N::number($count) . '|';
+            $chart_title .= GedcomTag::getFileFormTypeValue($type) . ' (' . $count . '), ';
+        }
+        $chart_title = substr($chart_title, 0, -2);
+        $chd         = $this->arrayToExtendedEncoding($mediaCounts);
+        $chl         = substr($mediaTypes, 0, -1);
+
+        return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_from},{$color_to}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . $chart_title . "\" title=\"" . $chart_title . "\" />";
+    }
+
+    /**
+     * Birth and Death
+     *
+     * @param string $type
+     * @param string $life_dir
+     * @param string $birth_death
+     *
+     * @return string
+     */
+    private function mortalityQuery($type = 'full', $life_dir = 'ASC', $birth_death = 'BIRT') {
+        if ($birth_death == 'MARR') {
+            $query_field = "'MARR'";
+        } elseif ($birth_death == 'DIV') {
+            $query_field = "'DIV'";
+        } elseif ($birth_death == 'BIRT') {
+            $query_field = "'BIRT'";
+        } else {
+            $query_field = "'DEAT'";
+        }
+        if ($life_dir == 'ASC') {
+            $dmod = 'MIN';
+        } else {
+            $dmod = 'MAX';
+        }
+        $rows = $this->runSql(
+            "SELECT d_year, d_type, d_fact, d_gid" .
+            " FROM `##dates`" .
+            " WHERE d_file={$this->tree->getTreeId()} AND d_fact IN ({$query_field}) AND d_julianday1=(" .
+            " SELECT {$dmod}( d_julianday1 )" .
+            " FROM `##dates`" .
+            " WHERE d_file={$this->tree->getTreeId()} AND d_fact IN ({$query_field}) AND d_julianday1<>0 )" .
+            " LIMIT 1"
+        );
+        if (!isset($rows[0])) {
+            return '';
+        }
+        $row    = $rows[0];
+        $record = GedcomRecord::getInstance($row['d_gid'], $this->tree);
+        switch ($type) {
+        default:
+        case 'full':
+            if ($record->canShow()) {
+                $result = $record->formatList('span', false, $record->getFullName());
+            } else {
+                $result = I18N::translate('This information is private and cannot be shown.');
+            }
+            break;
+        case 'year':
+            $date   = new Date($row['d_type'] . ' ' . $row['d_year']);
+            $result = $date->display();
+            break;
+        case 'name':
+            $result = "<a href=\"" . $record->getHtmlUrl() . "\">" . $record->getFullName() . "</a>";
+            break;
+        case 'place':
+            $fact = GedcomRecord::getInstance($row['d_gid'], $this->tree)->getFirstFact($row['d_fact']);
+            if ($fact) {
+                $result = FunctionsPrint::formatFactPlace($fact, true, true, true);
+            } else {
+                $result = I18N::translate('Private');
+            }
+            break;
+        }
+
+        return $result;
+    }
+
+    /**
+     * Places
+     *
+     * @param string $what
+     * @param string $fact
+     * @param int    $parent
+     * @param bool   $country
+     *
+     * @return int[]|string[][]
+     */
+    public function statsPlaces($what = 'ALL', $fact = '', $parent = 0, $country = false) {
+        if ($fact) {
+            if ($what == 'INDI') {
+                $rows = Database::prepare(
+                    "SELECT i_gedcom AS ged FROM `##individuals` WHERE i_file = :tree_id AND i_gedcom LIKE '%\n2 PLAC %'"
+                )->execute(array(
+                    'tree_id' => $this->tree->getTreeId(),
+                ))->fetchAll();
+            } elseif ($what == 'FAM') {
+                $rows = Database::prepare(
+                    "SELECT f_gedcom AS ged FROM `##families` WHERE f_file = :tree_id AND f_gedcom LIKE '%\n2 PLAC %'"
+                )->execute(array(
+                    'tree_id' => $this->tree->getTreeId(),
+                ))->fetchAll();
+            }
+            $placelist = array();
+            foreach ($rows as $row) {
+                if (preg_match('/\n1 ' . $fact . '(?:\n[2-9].*)*\n2 PLAC (.+)/', $row->ged, $match)) {
+                    if ($country) {
+                        $tmp   = explode(Place::GEDCOM_SEPARATOR, $match[1]);
+                        $place = end($tmp);
+                    } else {
+                        $place = $match[1];
+                    }
+                    if (!isset($placelist[$place])) {
+                        $placelist[$place] = 1;
+                    } else {
+                        $placelist[$place]++;
+                    }
+                }
+            }
+
+            return $placelist;
+        } elseif ($parent > 0) {
+            // used by placehierarchy googlemap module
+            if ($what == 'INDI') {
+                $join = " JOIN `##individuals` ON pl_file = i_file AND pl_gid = i_id";
+            } elseif ($what == 'FAM') {
+                $join = " JOIN `##families` ON pl_file = f_file AND pl_gid = f_id";
+            } else {
+                $join = "";
+            }
+            $rows = $this->runSql(
+                " SELECT" .
+                " p_place AS place," .
+                " COUNT(*) AS tot" .
+                " FROM" .
+                " `##places`" .
+                " JOIN `##placelinks` ON pl_file=p_file AND p_id=pl_p_id" .
+                $join .
+                " WHERE" .
+                " p_id={$parent} AND" .
+                " p_file={$this->tree->getTreeId()}" .
+                " GROUP BY place"
+            );
+
+            return $rows;
+        } else {
+            if ($what == 'INDI') {
+                $join = " JOIN `##individuals` ON pl_file = i_file AND pl_gid = i_id";
+            } elseif ($what == 'FAM') {
+                $join = " JOIN `##families` ON pl_file = f_file AND pl_gid = f_id";
+            } else {
+                $join = "";
+            }
+            $rows = $this->runSql(
+                " SELECT" .
+                " p_place AS country," .
+                " COUNT(*) AS tot" .
+                " FROM" .
+                " `##places`" .
+                " JOIN `##placelinks` ON pl_file=p_file AND p_id=pl_p_id" .
+                $join .
+                " WHERE" .
+                " p_file={$this->tree->getTreeId()}" .
+                " AND p_parent_id='0'" .
+                " GROUP BY country ORDER BY tot DESC, country ASC"
+            );
+
+            return $rows;
+        }
+    }
+
+    /**
+     * Count total places.
+     *
+     * @return int
+     */
+    private function totalPlacesQuery() {
+        return
+            (int) Database::prepare("SELECT COUNT(*) FROM `##places` WHERE p_file=?")
+                ->execute(array($this->tree->getTreeId()))
+                ->fetchOne();
+    }
+
+    /**
+     * Count total places.
+     *
+     * @return string
+     */
+    public function totalPlaces() {
+        return I18N::number($this->totalPlacesQuery());
+    }
+
+    /**
+     * Create a chart showing where events occurred.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function chartDistribution($params = array()) {
+        $WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
+        $WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
+        $WT_STATS_CHART_COLOR3 = Theme::theme()->parameter('distribution-chart-low-values');
+        $WT_STATS_MAP_X        = Theme::theme()->parameter('distribution-chart-x');
+        $WT_STATS_MAP_Y        = Theme::theme()->parameter('distribution-chart-y');
+
+        if (isset($params[0])) {
+            $chart_shows = $params[0];
+        } else {
+            $chart_shows = 'world';
+        }
+        if (isset($params[1])) {
+            $chart_type = $params[1];
+        } else {
+            $chart_type = '';
+        }
+        if (isset($params[2])) {
+            $surname = $params[2];
+        } else {
+            $surname = '';
+        }
+
+        if ($this->totalPlacesQuery() == 0) {
+            return '';
+        }
+        // Get the country names for each language
+        $country_to_iso3166 = array();
+        foreach (I18N::activeLocales() as $locale) {
+            I18N::init($locale->languageTag());
+            $countries = $this->getAllCountries();
+            foreach ($this->iso3166() as $three => $two) {
+                $country_to_iso3166[$three]             = $two;
+                $country_to_iso3166[$countries[$three]] = $two;
+            }
+        }
+        I18N::init(WT_LOCALE);
+        switch ($chart_type) {
+        case 'surname_distribution_chart':
+            if ($surname == "") {
+                $surname = $this->getCommonSurname();
+            }
+            $chart_title = I18N::translate('Surname distribution chart') . ': ' . $surname;
+            // Count how many people are events in each country
+            $surn_countries = array();
+            $indis          = QueryName::individuals($this->tree, I18N::strtoupper($surname), '', '', false, false);
+            foreach ($indis as $person) {
+                if (preg_match_all('/^2 PLAC (?:.*, *)*(.*)/m', $person->getGedcom(), $matches)) {
+                    // webtrees uses 3 letter country codes and localised country names, but google uses 2 letter codes.
+                    foreach ($matches[1] as $country) {
+                        if (array_key_exists($country, $country_to_iso3166)) {
+                            if (array_key_exists($country_to_iso3166[$country], $surn_countries)) {
+                                $surn_countries[$country_to_iso3166[$country]]++;
+                            } else {
+                                $surn_countries[$country_to_iso3166[$country]] = 1;
+                            }
+                        }
+                    }
+                }
+            };
+            break;
+        case 'birth_distribution_chart':
+            $chart_title = I18N::translate('Birth by country');
+            // Count how many people were born in each country
+            $surn_countries = array();
+            $b_countries    = $this->statsPlaces('INDI', 'BIRT', 0, true);
+            foreach ($b_countries as $place => $count) {
+                $country = $place;
+                if (array_key_exists($country, $country_to_iso3166)) {
+                    if (!isset($surn_countries[$country_to_iso3166[$country]])) {
+                        $surn_countries[$country_to_iso3166[$country]] = $count;
+                    } else {
+                        $surn_countries[$country_to_iso3166[$country]] += $count;
+                    }
+                }
+            }
+            break;
+        case 'death_distribution_chart':
+            $chart_title = I18N::translate('Death by country');
+            // Count how many people were death in each country
+            $surn_countries = array();
+            $d_countries    = $this->statsPlaces('INDI', 'DEAT', 0, true);
+            foreach ($d_countries as $place => $count) {
+                $country = $place;
+                if (array_key_exists($country, $country_to_iso3166)) {
+                    if (!isset($surn_countries[$country_to_iso3166[$country]])) {
+                        $surn_countries[$country_to_iso3166[$country]] = $count;
+                    } else {
+                        $surn_countries[$country_to_iso3166[$country]] += $count;
+                    }
+                }
+            }
+            break;
+        case 'marriage_distribution_chart':
+            $chart_title = I18N::translate('Marriage by country');
+            // Count how many families got marriage in each country
+            $surn_countries = array();
+            $m_countries    = $this->statsPlaces('FAM');
+            // webtrees uses 3 letter country codes and localised country names, but google uses 2 letter codes.
+            foreach ($m_countries as $place) {
+                $country = $place['country'];
+                if (array_key_exists($country, $country_to_iso3166)) {
+                    if (!isset($surn_countries[$country_to_iso3166[$country]])) {
+                        $surn_countries[$country_to_iso3166[$country]] = $place['tot'];
+                    } else {
+                        $surn_countries[$country_to_iso3166[$country]] += $place['tot'];
+                    }
+                }
+            }
+            break;
+        case 'indi_distribution_chart':
+        default:
+            $chart_title = I18N::translate('Individual distribution chart');
+            // Count how many people have events in each country
+            $surn_countries = array();
+            $a_countries    = $this->statsPlaces('INDI');
+            // webtrees uses 3 letter country codes and localised country names, but google uses 2 letter codes.
+            foreach ($a_countries as $place) {
+                $country = $place['country'];
+                if (array_key_exists($country, $country_to_iso3166)) {
+                    if (!isset($surn_countries[$country_to_iso3166[$country]])) {
+                        $surn_countries[$country_to_iso3166[$country]] = $place['tot'];
+                    } else {
+                        $surn_countries[$country_to_iso3166[$country]] += $place['tot'];
+                    }
+                }
+            }
+            break;
+        }
+        $chart_url = "https://chart.googleapis.com/chart?cht=t&amp;chtm=" . $chart_shows;
+        $chart_url .= "&amp;chco=" . $WT_STATS_CHART_COLOR1 . "," . $WT_STATS_CHART_COLOR3 . "," . $WT_STATS_CHART_COLOR2; // country colours
+        $chart_url .= "&amp;chf=bg,s,ECF5FF"; // sea colour
+        $chart_url .= "&amp;chs=" . $WT_STATS_MAP_X . "x" . $WT_STATS_MAP_Y;
+        $chart_url .= "&amp;chld=" . implode('', array_keys($surn_countries)) . "&amp;chd=s:";
+        foreach ($surn_countries as $count) {
+            $chart_url .= substr(WT_GOOGLE_CHART_ENCODING, (int) ($count / max($surn_countries) * 61), 1);
+        }
+        $chart = '<div id="google_charts" class="center">';
+        $chart .= '<p>' . $chart_title . '</p>';
+        $chart .= '<div><img src="' . $chart_url . '" alt="' . $chart_title . '" title="' . $chart_title . '" class="gchart" /><br>';
+        $chart .= '<table class="center"><tr>';
+        $chart .= '<td bgcolor="#' . $WT_STATS_CHART_COLOR2 . '" width="12"></td><td>' . I18N::translate('Highest population') . '</td>';
+        $chart .= '<td bgcolor="#' . $WT_STATS_CHART_COLOR3 . '" width="12"></td><td>' . I18N::translate('Lowest population') . '</td>';
+        $chart .= '<td bgcolor="#' . $WT_STATS_CHART_COLOR1 . '" width="12"></td><td>' . I18N::translate('Nobody at all') . '</td>';
+        $chart .= '</tr></table></div></div>';
+
+        return $chart;
+    }
+
+    /**
+     * A list of common countries.
+     *
+     * @return string
+     */
+    public function commonCountriesList() {
+        $countries = $this->statsPlaces();
+        if (empty($countries)) {
+            return '';
+        }
+        $top10 = array();
+        $i     = 1;
+        // Get the country names for each language
+        $country_names = array();
+        foreach (I18N::activeLocales() as $locale) {
+            I18N::init($locale->languageTag());
+            $all_countries = $this->getAllCountries();
+            foreach ($all_countries as $country_code => $country_name) {
+                $country_names[$country_name] = $country_code;
+            }
+        }
+        I18N::init(WT_LOCALE);
+        $all_db_countries = array();
+        foreach ($countries as $place) {
+            $country = trim($place['country']);
+            if (array_key_exists($country, $country_names)) {
+                if (!isset($all_db_countries[$country_names[$country]][$country])) {
+                    $all_db_countries[$country_names[$country]][$country] = (int) $place['tot'];
+                } else {
+                    $all_db_countries[$country_names[$country]][$country] += (int) $place['tot'];
+                }
+            }
+        }
+        // get all the user’s countries names
+        $all_countries = $this->getAllCountries();
+        foreach ($all_db_countries as $country_code => $country) {
+            $top10[] = '<li>';
+            foreach ($country as $country_name => $tot) {
+                $tmp   = new Place($country_name, $this->tree);
+                $place = '<a href="' . $tmp->getURL() . '" class="list_item">' . $all_countries[$country_code] . '</a>';
+                $top10[] .= $place . ' - ' . I18N::number($tot);
+            }
+            $top10[] .= '</li>';
+            if ($i++ == 10) {
+                break;
+            }
+        }
+        $top10 = implode('', $top10);
+
+        return '<ul>' . $top10 . '</ul>';
+    }
+
+    /**
+     * A list of common birth places.
+     *
+     * @return string
+     */
+    public function commonBirthPlacesList() {
+        $places = $this->statsPlaces('INDI', 'BIRT');
+        $top10  = array();
+        $i      = 1;
+        arsort($places);
+        foreach ($places as $place => $count) {
+            $tmp     = new Place($place, $this->tree);
+            $place   = '<a href="' . $tmp->getURL() . '" class="list_item">' . $tmp->getFullName() . '</a>';
+            $top10[] = '<li>' . $place . ' - ' . I18N::number($count) . '</li>';
+            if ($i++ == 10) {
+                break;
+            }
+        }
+        $top10 = implode('', $top10);
+
+        return '<ul>' . $top10 . '</ul>';
+    }
+
+    /**
+     * A list of common death places.
+     *
+     * @return string
+     */
+    public function commonDeathPlacesList() {
+        $places = $this->statsPlaces('INDI', 'DEAT');
+        $top10  = array();
+        $i      = 1;
+        arsort($places);
+        foreach ($places as $place => $count) {
+            $tmp     = new Place($place, $this->tree);
+            $place   = '<a href="' . $tmp->getURL() . '" class="list_item">' . $tmp->getFullName() . '</a>';
+            $top10[] = '<li>' . $place . ' - ' . I18N::number($count) . '</li>';
+            if ($i++ == 10) {
+                break;
+            }
+        }
+        $top10 = implode('', $top10);
+
+        return '<ul>' . $top10 . '</ul>';
+    }
+
+    /**
+     * A list of common marriage places.
+     *
+     * @return string
+     */
+    public function commonMarriagePlacesList() {
+        $places = $this->statsPlaces('FAM', 'MARR');
+        $top10  = array();
+        $i      = 1;
+        arsort($places);
+        foreach ($places as $place => $count) {
+            $tmp     = new Place($place, $this->tree);
+            $place   = '<a href="' . $tmp->getURL() . '" class="list_item">' . $tmp->getFullName() . '</a>';
+            $top10[] = '<li>' . $place . ' - ' . I18N::number($count) . '</li>';
+            if ($i++ == 10) {
+                break;
+            }
+        }
+        $top10 = implode('', $top10);
+
+        return '<ul>' . $top10 . '</ul>';
+    }
+
+    /**
+     * Create a chart of birth places.
+     *
+     * @param bool     $simple
+     * @param bool     $sex
+     * @param int      $year1
+     * @param int      $year2
+     * @param string[] $params
+     *
+     * @return array|string
+     */
+    public function statsBirthQuery($simple = true, $sex = false, $year1 = -1, $year2 = -1, $params = array()) {
+        $WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
+        $WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
+        $WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
+        $WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
+
+        if ($simple) {
+            $sql =
+                "SELECT FLOOR(d_year/100+1) AS century, COUNT(*) AS total FROM `##dates` " .
+                "WHERE " .
+                "d_file={$this->tree->getTreeId()} AND " .
+                "d_year<>0 AND " .
+                "d_fact='BIRT' AND " .
+                "d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')";
+        } elseif ($sex) {
+            $sql =
+                "SELECT d_month, i_sex, COUNT(*) AS total FROM `##dates` " .
+                "JOIN `##individuals` ON d_file = i_file AND d_gid = i_id " .
+                "WHERE " .
+                "d_file={$this->tree->getTreeId()} AND " .
+                "d_fact='BIRT' AND " .
+                "d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')";
+        } else {
+            $sql =
+                "SELECT d_month, COUNT(*) AS total FROM `##dates` " .
+                "WHERE " .
+                "d_file={$this->tree->getTreeId()} AND " .
+                "d_fact='BIRT' AND " .
+                "d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')";
+        }
+        if ($year1 >= 0 && $year2 >= 0) {
+            $sql .= " AND d_year BETWEEN '{$year1}' AND '{$year2}'";
+        }
+        if ($simple) {
+            $sql .= " GROUP BY century ORDER BY century";
+        } else {
+            $sql .= " GROUP BY d_month";
+            if ($sex) {
+                $sql .= ", i_sex";
+            }
+        }
+        $rows = $this->runSql($sql);
+        if ($simple) {
+            if (isset($params[0]) && $params[0] != '') {
+                $size = strtolower($params[0]);
+            } else {
+                $size = $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y;
+            }
+            if (isset($params[1]) && $params[1] != '') {
+                $color_from = strtolower($params[1]);
+            } else {
+                $color_from = $WT_STATS_CHART_COLOR1;
+            }
+            if (isset($params[2]) && $params[2] != '') {
+                $color_to = strtolower($params[2]);
+            } else {
+                $color_to = $WT_STATS_CHART_COLOR2;
+            }
+            $sizes = explode('x', $size);
+            $tot   = 0;
+            foreach ($rows as $values) {
+                $tot += $values['total'];
+            }
+            // Beware divide by zero
+            if ($tot == 0) {
+                return '';
+            }
+            $centuries = "";
+            $counts    = array();
+            foreach ($rows as $values) {
+                $counts[] = round(100 * $values['total'] / $tot, 0);
+                $centuries .= $this->centuryName($values['century']) . ' - ' . I18N::number($values['total']) . '|';
+            }
+            $chd = $this->arrayToExtendedEncoding($counts);
+            $chl = rawurlencode(substr($centuries, 0, -1));
+
+            return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_from},{$color_to}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Births by century') . "\" title=\"" . I18N::translate('Births by century') . "\" />";
+        } else {
+            return $rows;
+        }
+    }
+
+    /**
+     * Create a chart of death places.
+     *
+     * @param bool     $simple
+     * @param bool     $sex
+     * @param int      $year1
+     * @param int      $year2
+     * @param string[] $params
+     *
+     * @return array|string
+     */
+    public function statsDeathQuery($simple = true, $sex = false, $year1 = -1, $year2 = -1, $params = array()) {
+        $WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
+        $WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
+        $WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
+        $WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
+
+        if ($simple) {
+            $sql =
+                "SELECT FLOOR(d_year/100+1) AS century, COUNT(*) AS total FROM `##dates` " .
+                "WHERE " .
+                "d_file={$this->tree->getTreeId()} AND " .
+                'd_year<>0 AND ' .
+                "d_fact='DEAT' AND " .
+                "d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')";
+        } elseif ($sex) {
+            $sql =
+                "SELECT d_month, i_sex, COUNT(*) AS total FROM `##dates` " .
+                "JOIN `##individuals` ON d_file = i_file AND d_gid = i_id " .
+                "WHERE " .
+                "d_file={$this->tree->getTreeId()} AND " .
+                "d_fact='DEAT' AND " .
+                "d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')";
+        } else {
+            $sql =
+                "SELECT d_month, COUNT(*) AS total FROM `##dates` " .
+                "WHERE " .
+                "d_file={$this->tree->getTreeId()} AND " .
+                "d_fact='DEAT' AND " .
+                "d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')";
+        }
+        if ($year1 >= 0 && $year2 >= 0) {
+            $sql .= " AND d_year BETWEEN '{$year1}' AND '{$year2}'";
+        }
+        if ($simple) {
+            $sql .= " GROUP BY century ORDER BY century";
+        } else {
+            $sql .= " GROUP BY d_month";
+            if ($sex) {
+                $sql .= ", i_sex";
+            }
+        }
+        $rows = $this->runSql($sql);
+        if ($simple) {
+            if (isset($params[0]) && $params[0] != '') {
+                $size = strtolower($params[0]);
+            } else {
+                $size = $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y;
+            }
+            if (isset($params[1]) && $params[1] != '') {
+                $color_from = strtolower($params[1]);
+            } else {
+                $color_from = $WT_STATS_CHART_COLOR1;
+            }
+            if (isset($params[2]) && $params[2] != '') {
+                $color_to = strtolower($params[2]);
+            } else {
+                $color_to = $WT_STATS_CHART_COLOR2;
+            }
+            $sizes = explode('x', $size);
+            $tot   = 0;
+            foreach ($rows as $values) {
+                $tot += $values['total'];
+            }
+            // Beware divide by zero
+            if ($tot == 0) {
+                return '';
+            }
+            $centuries = "";
+            $counts    = array();
+            foreach ($rows as $values) {
+                $counts[] = round(100 * $values['total'] / $tot, 0);
+                $centuries .= $this->centuryName($values['century']) . ' - ' . I18N::number($values['total']) . '|';
+            }
+            $chd = $this->arrayToExtendedEncoding($counts);
+            $chl = rawurlencode(substr($centuries, 0, -1));
+
+            return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_from},{$color_to}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Deaths by century') . "\" title=\"" . I18N::translate('Deaths by century') . "\" />";
+        }
+
+        return $rows;
+    }
+
+    /**
+     * Find the earliest birth.
+     *
+     * @return string
+     */
+    public function firstBirth() {
+        return $this->mortalityQuery('full', 'ASC', 'BIRT');
+    }
+
+    /**
+     * Find the earliest birth year.
+     *
+     * @return string
+     */
+    public function firstBirthYear() {
+        return $this->mortalityQuery('year', 'ASC', 'BIRT');
+    }
+
+    /**
+     * Find the name of the earliest birth.
+     *
+     * @return string
+     */
+    public function firstBirthName() {
+        return $this->mortalityQuery('name', 'ASC', 'BIRT');
+    }
+
+    /**
+     * Find the earliest birth place.
+     *
+     * @return string
+     */
+    public function firstBirthPlace() {
+        return $this->mortalityQuery('place', 'ASC', 'BIRT');
+    }
+
+    /**
+     * Find the latest birth.
+     *
+     * @return string
+     */
+    public function lastBirth() {
+        return $this->mortalityQuery('full', 'DESC', 'BIRT');
+    }
+
+    /**
+     * Find the latest birth year.
+     *
+     * @return string
+     */
+    public function lastBirthYear() {
+        return $this->mortalityQuery('year', 'DESC', 'BIRT');
+    }
+
+    /**
+     * Find the latest birth name.
+     *
+     * @return string
+     */
+    public function lastBirthName() {
+        return $this->mortalityQuery('name', 'DESC', 'BIRT');
+    }
+
+    /**
+     * Find the latest birth place.
+     *
+     * @return string
+     */
+    public function lastBirthPlace() {
+        return $this->mortalityQuery('place', 'DESC', 'BIRT');
+    }
+
+    /**
+     * General query on births.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function statsBirth($params = array()) {
+        return $this->statsBirthQuery(true, false, -1, -1, $params);
+    }
+
+    /**
+     * Find the earliest death.
+     *
+     * @return string
+     */
+    public function firstDeath() {
+        return $this->mortalityQuery('full', 'ASC', 'DEAT');
+    }
+
+    /**
+     * Find the earliest death year.
+     *
+     * @return string
+     */
+    public function firstDeathYear() {
+        return $this->mortalityQuery('year', 'ASC', 'DEAT');
+    }
+
+    /**
+     * Find the earliest death name.
+     *
+     * @return string
+     */
+    public function firstDeathName() {
+        return $this->mortalityQuery('name', 'ASC', 'DEAT');
+    }
+
+    /**
+     * Find the earliest death place.
+     *
+     * @return string
+     */
+    public function firstDeathPlace() {
+        return $this->mortalityQuery('place', 'ASC', 'DEAT');
+    }
+
+    /**
+     * Find the latest death.
+     *
+     * @return string
+     */
+    public function lastDeath() {
+        return $this->mortalityQuery('full', 'DESC', 'DEAT');
+    }
+
+    /**
+     * Find the latest death year.
+     *
+     * @return string
+     */
+    public function lastDeathYear() {
+        return $this->mortalityQuery('year', 'DESC', 'DEAT');
+    }
+
+    /**
+     * Find the latest death name.
+     *
+     * @return string
+     */
+    public function lastDeathName() {
+        return $this->mortalityQuery('name', 'DESC', 'DEAT');
+    }
+
+    /**
+     * Find the place of the latest death.
+     *
+     * @return string
+     */
+    public function lastDeathPlace() {
+        return $this->mortalityQuery('place', 'DESC', 'DEAT');
+    }
+
+    /**
+     * General query on deaths.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function statsDeath($params = array()) {
+        return $this->statsDeathQuery(true, false, -1, -1, $params);
+    }
+
+    /**
+     * Lifespan
+     *
+     * @param string $type
+     * @param string $sex
+     *
+     * @return string
+     */
+    private function longlifeQuery($type = 'full', $sex = 'F') {
+        $sex_search = ' 1=1';
+        if ($sex == 'F') {
+            $sex_search = " i_sex='F'";
+        } elseif ($sex == 'M') {
+            $sex_search = " i_sex='M'";
+        }
+
+        $rows = $this->runSql(
+            " SELECT" .
+            " death.d_gid AS id," .
+            " death.d_julianday2-birth.d_julianday1 AS age" .
+            " FROM" .
+            " `##dates` AS death," .
+            " `##dates` AS birth," .
+            " `##individuals` AS indi" .
+            " WHERE" .
+            " indi.i_id=birth.d_gid AND" .
+            " birth.d_gid=death.d_gid AND" .
+            " death.d_file={$this->tree->getTreeId()} AND" .
+            " birth.d_file=death.d_file AND" .
+            " birth.d_file=indi.i_file AND" .
+            " birth.d_fact='BIRT' AND" .
+            " death.d_fact='DEAT' AND" .
+            " birth.d_julianday1<>0 AND" .
+            " death.d_julianday1>birth.d_julianday2 AND" .
+            $sex_search .
+            " ORDER BY" .
+            " age DESC LIMIT 1"
+        );
+        if (!isset($rows[0])) {
+            return '';
+        }
+        $row    = $rows[0];
+        $person = Individual::getInstance($row['id'], $this->tree);
+        switch ($type) {
+        default:
+        case 'full':
+            if ($person->canShowName()) {
+                $result = $person->formatList('span', false, $person->getFullName());
+            } else {
+                $result = I18N::translate('This information is private and cannot be shown.');
+            }
+            break;
+        case 'age':
+            $result = I18N::number((int) ($row['age'] / 365.25));
+            break;
+        case 'name':
+            $result = "<a href=\"" . $person->getHtmlUrl() . "\">" . $person->getFullName() . "</a>";
+            break;
+        }
+
+        return $result;
+    }
+
+    /**
+     * Find the oldest individuals.
+     *
+     * @param string   $type
+     * @param string   $sex
+     * @param string[] $params
+     *
+     * @return string
+     */
+    private function topTenOldestQuery($type = 'list', $sex = 'BOTH', $params = array()) {
+        if ($sex === 'F') {
+            $sex_search = " AND i_sex='F' ";
+        } elseif ($sex === 'M') {
+            $sex_search = " AND i_sex='M' ";
+        } else {
+            $sex_search = '';
+        }
+        if (isset($params[0])) {
+            $total = (int) $params[0];
+        } else {
+            $total = 10;
+        }
+        $rows = $this->runSql(
+            "SELECT " .
+            " MAX(death.d_julianday2-birth.d_julianday1) AS age, " .
+            " death.d_gid AS deathdate " .
+            "FROM " .
+            " `##dates` AS death, " .
+            " `##dates` AS birth, " .
+            " `##individuals` AS indi " .
+            "WHERE " .
+            " indi.i_id=birth.d_gid AND " .
+            " birth.d_gid=death.d_gid AND " .
+            " death.d_file={$this->tree->getTreeId()} AND " .
+            " birth.d_file=death.d_file AND " .
+            " birth.d_file=indi.i_file AND " .
+            " birth.d_fact='BIRT' AND " .
+            " death.d_fact='DEAT' AND " .
+            " birth.d_julianday1<>0 AND " .
+            " death.d_julianday1>birth.d_julianday2 " .
+            $sex_search .
+            "GROUP BY deathdate " .
+            "ORDER BY age DESC " .
+            "LIMIT " . $total
+        );
+        if (!isset($rows[0])) {
+            return '';
+        }
+        $top10 = array();
+        foreach ($rows as $row) {
+            $person = Individual::getInstance($row['deathdate'], $this->tree);
+            $age    = $row['age'];
+            if ((int) ($age / 365.25) > 0) {
+                $age = (int) ($age / 365.25) . 'y';
+            } elseif ((int) ($age / 30.4375) > 0) {
+                $age = (int) ($age / 30.4375) . 'm';
+            } else {
+                $age = $age . 'd';
+            }
+            $age = FunctionsDate::getAgeAtEvent($age);
+            if ($person->canShow()) {
+                if ($type == 'list') {
+                    $top10[] = "<li><a href=\"" . $person->getHtmlUrl() . "\">" . $person->getFullName() . "</a> (" . $age . ")" . "</li>";
+                } else {
+                    $top10[] = "<a href=\"" . $person->getHtmlUrl() . "\">" . $person->getFullName() . "</a> (" . $age . ")";
+                }
+            }
+        }
+        if ($type == 'list') {
+            $top10 = implode('', $top10);
+        } else {
+            $top10 = implode(' ', $top10);
+        }
+        if (I18N::direction() === 'rtl') {
+            $top10 = str_replace(array('[', ']', '(', ')', '+'), array('&rlm;[', '&rlm;]', '&rlm;(', '&rlm;)', '&rlm;+'), $top10);
+        }
+        if ($type == 'list') {
+            return '<ul>' . $top10 . '</ul>';
+        }
+
+        return $top10;
+    }
+
+    /**
+     * Find the oldest living individuals.
+     *
+     * @param string   $type
+     * @param string   $sex
+     * @param string[] $params
+     *
+     * @return string
+     */
+    private function topTenOldestAliveQuery($type = 'list', $sex = 'BOTH', $params = array()) {
+        if (!Auth::isMember($this->tree)) {
+            return I18N::translate('This information is private and cannot be shown.');
+        }
+        if ($sex == 'F') {
+            $sex_search = " AND i_sex='F'";
+        } elseif ($sex == 'M') {
+            $sex_search = " AND i_sex='M'";
+        } else {
+            $sex_search = '';
+        }
+        if (isset($params[0])) {
+            $total = (int) $params[0];
+        } else {
+            $total = 10;
+        }
+        $rows = $this->runSql(
+            "SELECT" .
+            " birth.d_gid AS id," .
+            " MIN(birth.d_julianday1) AS age" .
+            " FROM" .
+            " `##dates` AS birth," .
+            " `##individuals` AS indi" .
+            " WHERE" .
+            " indi.i_id=birth.d_gid AND" .
+            " indi.i_gedcom NOT REGEXP '\\n1 (" . WT_EVENTS_DEAT . ")' AND" .
+            " birth.d_file={$this->tree->getTreeId()} AND" .
+            " birth.d_fact='BIRT' AND" .
+            " birth.d_file=indi.i_file AND" .
+            " birth.d_julianday1<>0" .
+            $sex_search .
+            " GROUP BY id" .
+            " ORDER BY age" .
+            " ASC LIMIT " . $total
+        );
+        $top10 = array();
+        foreach ($rows as $row) {
+            $person = Individual::getInstance($row['id'], $this->tree);
+            $age    = (WT_CLIENT_JD - $row['age']);
+            if ((int) ($age / 365.25) > 0) {
+                $age = (int) ($age / 365.25) . 'y';
+            } elseif ((int) ($age / 30.4375) > 0) {
+                $age = (int) ($age / 30.4375) . 'm';
+            } else {
+                $age = $age . 'd';
+            }
+            $age = FunctionsDate::getAgeAtEvent($age);
+            if ($type === 'list') {
+                $top10[] = "<li><a href=\"" . $person->getHtmlUrl() . "\">" . $person->getFullName() . "</a> (" . $age . ")" . "</li>";
+            } else {
+                $top10[] = "<a href=\"" . $person->getHtmlUrl() . "\">" . $person->getFullName() . "</a> (" . $age . ")";
+            }
+        }
+        if ($type === 'list') {
+            $top10 = implode('', $top10);
+        } else {
+            $top10 = implode('; ', $top10);
+        }
+        if (I18N::direction() === 'rtl') {
+            $top10 = str_replace(array('[', ']', '(', ')', '+'), array('&rlm;[', '&rlm;]', '&rlm;(', '&rlm;)', '&rlm;+'), $top10);
+        }
+        if ($type === 'list') {
+            return '<ul>' . $top10 . '</ul>';
+        }
+
+        return $top10;
+    }
+
+    /**
+     * Find the average lifespan.
+     *
+     * @param string $sex
+     * @param bool   $show_years
+     *
+     * @return string
+     */
+    private function averageLifespanQuery($sex = 'BOTH', $show_years = false) {
+        if ($sex === 'F') {
+            $sex_search = " AND i_sex='F' ";
+        } elseif ($sex === 'M') {
+            $sex_search = " AND i_sex='M' ";
+        } else {
+            $sex_search = '';
+        }
+        $rows = $this->runSql(
+            "SELECT " .
+            " AVG(death.d_julianday2-birth.d_julianday1) AS age " .
+            "FROM " .
+            " `##dates` AS death, " .
+            " `##dates` AS birth, " .
+            " `##individuals` AS indi " .
+            "WHERE " .
+            " indi.i_id=birth.d_gid AND " .
+            " birth.d_gid=death.d_gid AND " .
+            " death.d_file=" . $this->tree->getTreeId() . " AND " .
+            " birth.d_file=death.d_file AND " .
+            " birth.d_file=indi.i_file AND " .
+            " birth.d_fact='BIRT' AND " .
+            " death.d_fact='DEAT' AND " .
+            " birth.d_julianday1<>0 AND " .
+            " death.d_julianday1>birth.d_julianday2 " .
+            $sex_search
+        );
+        if (!isset($rows[0])) {
+            return '';
+        }
+        $row = $rows[0];
+        $age = $row['age'];
+        if ($show_years) {
+            if ((int) ($age / 365.25) > 0) {
+                $age = (int) ($age / 365.25) . 'y';
+            } elseif ((int) ($age / 30.4375) > 0) {
+                $age = (int) ($age / 30.4375) . 'm';
+            } elseif (!empty($age)) {
+                $age = $age . 'd';
+            }
+
+            return FunctionsDate::getAgeAtEvent($age);
+        } else {
+            return I18N::number($age / 365.25);
+        }
+    }
+
+    /**
+     * General query on ages.
+     *
+     * @param bool     $simple
+     * @param string   $related
+     * @param string   $sex
+     * @param int      $year1
+     * @param int      $year2
+     * @param string[] $params
+     *
+     * @return array|string
+     */
+    public function statsAgeQuery($simple = true, $related = 'BIRT', $sex = 'BOTH', $year1 = -1, $year2 = -1, $params = array()) {
+        if ($simple) {
+            if (isset($params[0]) && $params[0] != '') {
+                $size = strtolower($params[0]);
+            } else {
+                $size = '230x250';
+            }
+            $sizes = explode('x', $size);
+            $rows  = $this->runSql(
+                "SELECT" .
+                " ROUND(AVG(death.d_julianday2-birth.d_julianday1)/365.25,1) AS age," .
+                " FLOOR(death.d_year/100+1) AS century," .
+                " i_sex AS sex" .
+                " FROM" .
+                " `##dates` AS death," .
+                " `##dates` AS birth," .
+                " `##individuals` AS indi" .
+                " WHERE" .
+                " indi.i_id=birth.d_gid AND" .
+                " birth.d_gid=death.d_gid AND" .
+                " death.d_file={$this->tree->getTreeId()} AND" .
+                " birth.d_file=death.d_file AND" .
+                " birth.d_file=indi.i_file AND" .
+                " birth.d_fact='BIRT' AND" .
+                " death.d_fact='DEAT' AND" .
+                " birth.d_julianday1<>0 AND" .
+                " birth.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND" .
+                " death.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND" .
+                " death.d_julianday1>birth.d_julianday2" .
+                " GROUP BY century, sex ORDER BY century, sex");
+            if (empty($rows)) {
+                return '';
+            }
+            $chxl    = '0:|';
+            $countsm = '';
+            $countsf = '';
+            $countsa = '';
+            $out     = array();
+            foreach ($rows as $values) {
+                $out[$values['century']][$values['sex']] = $values['age'];
+            }
+            foreach ($out as $century => $values) {
+                if ($sizes[0] < 980) {
+                    $sizes[0] += 50;
+                }
+                $chxl .= $this->centuryName($century) . '|';
+                $average = 0;
+                if (isset($values['F'])) {
+                    $countsf .= $values['F'] . ',';
+                    $average = $values['F'];
+                } else {
+                    $countsf .= '0,';
+                }
+                if (isset($values['M'])) {
+                    $countsm .= $values['M'] . ',';
+                    if ($average == 0) {
+                        $countsa .= $values['M'] . ',';
+                    } else {
+                        $countsa .= (($values['M'] + $average) / 2) . ',';
+                    }
+                } else {
+                    $countsm .= '0,';
+                    if ($average == 0) {
+                        $countsa .= '0,';
+                    } else {
+                        $countsa .= $values['F'] . ',';
+                    }
+                }
+            }
+            $countsm = substr($countsm, 0, -1);
+            $countsf = substr($countsf, 0, -1);
+            $countsa = substr($countsa, 0, -1);
+            $chd     = 't2:' . $countsm . '|' . $countsf . '|' . $countsa;
+            $decades = '';
+            for ($i = 0; $i <= 100; $i += 10) {
+                $decades .= '|' . I18N::number($i);
+            }
+            $chxl .= '1:||' . I18N::translate('century') . '|2:' . $decades . '|3:||' . I18N::translate('Age') . '|';
+            $title = I18N::translate('Average age related to death century');
+            if (count($rows) > 6 || mb_strlen($title) < 30) {
+                $chtt = $title;
+            } else {
+                $offset  = 0;
+                $counter = array();
+                while ($offset = strpos($title, ' ', $offset + 1)) {
+                    $counter[] = $offset;
+                }
+                $half = (int) (count($counter) / 2);
+                $chtt = substr_replace($title, '|', $counter[$half], 1);
+            }
+
+            return '<img src="' . "https://chart.googleapis.com/chart?cht=bvg&amp;chs={$sizes[0]}x{$sizes[1]}&amp;chm=D,FF0000,2,0,3,1|N*f1*,000000,0,-1,11,1|N*f1*,000000,1,-1,11,1&amp;chf=bg,s,ffffff00|c,s,ffffff00&amp;chtt=" . rawurlencode($chtt) . "&amp;chd={$chd}&amp;chco=0000FF,FFA0CB,FF0000&amp;chbh=20,3&amp;chxt=x,x,y,y&amp;chxl=" . rawurlencode($chxl) . "&amp;chdl=" . rawurlencode(I18N::translate('Males') . '|' . I18N::translate('Females') . '|' . I18N::translate('Average age at death')) . "\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Average age related to death century') . "\" title=\"" . I18N::translate('Average age related to death century') . "\" />";
+        } else {
+            $sex_search = '';
+            $years      = '';
+            if ($sex == 'F') {
+                $sex_search = " AND i_sex='F'";
+            } elseif ($sex == 'M') {
+                $sex_search = " AND i_sex='M'";
+            }
+            if ($year1 >= 0 && $year2 >= 0) {
+                if ($related == 'BIRT') {
+                    $years = " AND birth.d_year BETWEEN '{$year1}' AND '{$year2}'";
+                } elseif ($related == 'DEAT') {
+                    $years = " AND death.d_year BETWEEN '{$year1}' AND '{$year2}'";
+                }
+            }
+            $rows = $this->runSql(
+                "SELECT" .
+                " death.d_julianday2-birth.d_julianday1 AS age" .
+                " FROM" .
+                " `##dates` AS death," .
+                " `##dates` AS birth," .
+                " `##individuals` AS indi" .
+                " WHERE" .
+                " indi.i_id=birth.d_gid AND" .
+                " birth.d_gid=death.d_gid AND" .
+                " death.d_file={$this->tree->getTreeId()} AND" .
+                " birth.d_file=death.d_file AND" .
+                " birth.d_file=indi.i_file AND" .
+                " birth.d_fact='BIRT' AND" .
+                " death.d_fact='DEAT' AND" .
+                " birth.d_julianday1<>0 AND" .
+                " birth.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND" .
+                " death.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND" .
+                " death.d_julianday1>birth.d_julianday2" .
+                $years .
+                $sex_search .
+                " ORDER BY age DESC");
+
+            return $rows;
+        }
+    }
+
+    /**
+     * General query on ages.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function statsAge($params = array()) {
+        return $this->statsAgeQuery(true, 'BIRT', 'BOTH', -1, -1, $params);
+    }
+
+    /**
+     * Find the lognest lived individual.
+     *
+     * @return string
+     */
+    public function longestLife() {
+        return $this->longlifeQuery('full', 'BOTH');
+    }
+
+    /**
+     * Find the age of the longest lived individual.
+     *
+     * @return string
+     */
+    public function longestLifeAge() {
+        return $this->longlifeQuery('age', 'BOTH');
+    }
+
+    /**
+     * Find the name of the longest lived individual.
+     *
+     * @return string
+     */
+    public function longestLifeName() {
+        return $this->longlifeQuery('name', 'BOTH');
+    }
+
+    /**
+     * Find the oldest individuals.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topTenOldest($params = array()) {
+        return $this->topTenOldestQuery('nolist', 'BOTH', $params);
+    }
+
+    /**
+     * Find the oldest living individuals.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topTenOldestList($params = array()) {
+        return $this->topTenOldestQuery('list', 'BOTH', $params);
+    }
+
+    /**
+     * Find the oldest living individuals.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topTenOldestAlive($params = array()) {
+        return $this->topTenOldestAliveQuery('nolist', 'BOTH', $params);
+    }
+
+    /**
+     * Find the oldest living individuals.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topTenOldestListAlive($params = array()) {
+        return $this->topTenOldestAliveQuery('list', 'BOTH', $params);
+    }
+
+    /**
+     * Find the average lifespan.
+     *
+     * @param bool $show_years
+     *
+     * @return string
+     */
+    public function averageLifespan($show_years = false) {
+        return $this->averageLifespanQuery('BOTH', $show_years);
+    }
+
+    /**
+     * Find the longest lived female.
+     *
+     * @return string
+     */
+    public function longestLifeFemale() {
+        return $this->longlifeQuery('full', 'F');
+    }
+
+    /**
+     * Find the age of the longest lived female.
+     *
+     * @return string
+     */
+    public function longestLifeFemaleAge() {
+        return $this->longlifeQuery('age', 'F');
+    }
+
+    /**
+     * Find the name of the longest lived female.
+     *
+     * @return string
+     */
+    public function longestLifeFemaleName() {
+        return $this->longlifeQuery('name', 'F');
+    }
+
+    /**
+     * Find the oldest females.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topTenOldestFemale($params = array()) {
+        return $this->topTenOldestQuery('nolist', 'F', $params);
+    }
+
+    /**
+     * Find the oldest living females.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topTenOldestFemaleList($params = array()) {
+        return $this->topTenOldestQuery('list', 'F', $params);
+    }
+
+    /**
+     * Find the oldest living females.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topTenOldestFemaleAlive($params = array()) {
+        return $this->topTenOldestAliveQuery('nolist', 'F', $params);
+    }
+
+    /**
+     * Find the oldest living females.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topTenOldestFemaleListAlive($params = array()) {
+        return $this->topTenOldestAliveQuery('list', 'F', $params);
+    }
+
+    /**
+     * Find the average lifespan of females.
+     *
+     * @param bool $show_years
+     *
+     * @return string
+     */
+    public function averageLifespanFemale($show_years = false) {
+        return $this->averageLifespanQuery('F', $show_years);
+    }
+
+    /**
+     * Find the longest lived male.
+     *
+     * @return string
+     */
+    public function longestLifeMale() {
+        return $this->longlifeQuery('full', 'M');
+    }
+
+    /**
+     * Find the age of the longest lived male.
+     *
+     * @return string
+     */
+    public function longestLifeMaleAge() {
+        return $this->longlifeQuery('age', 'M');
+    }
+
+    /**
+     * Find the name of the longest lived male.
+     *
+     * @return string
+     */
+    public function longestLifeMaleName() {
+        return $this->longlifeQuery('name', 'M');
+    }
+
+    /**
+     * Find the longest lived males.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topTenOldestMale($params = array()) {
+        return $this->topTenOldestQuery('nolist', 'M', $params);
+    }
+
+    /**
+     * Find the longest lived males.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topTenOldestMaleList($params = array()) {
+        return $this->topTenOldestQuery('list', 'M', $params);
+    }
+
+    /**
+     * Find the longest lived living males.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topTenOldestMaleAlive($params = array()) {
+        return $this->topTenOldestAliveQuery('nolist', 'M', $params);
+    }
+
+    /**
+     * Find the longest lived living males.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topTenOldestMaleListAlive($params = array()) {
+        return $this->topTenOldestAliveQuery('list', 'M', $params);
+    }
+
+    /**
+     * Find the average male lifespan.
+     *
+     * @param bool $show_years
+     *
+     * @return string
+     */
+    public function averageLifespanMale($show_years = false) {
+        return $this->averageLifespanQuery('M', $show_years);
+    }
+
+    /**
+     * Events
+     *
+     * @param string $type
+     * @param string $direction
+     * @param string $facts
+     *
+     * @return string
+     */
+    private function eventQuery($type, $direction, $facts) {
+        $eventTypes = array(
+            'BIRT' => I18N::translate('birth'),
+            'DEAT' => I18N::translate('death'),
+            'MARR' => I18N::translate('marriage'),
+            'ADOP' => I18N::translate('adoption'),
+            'BURI' => I18N::translate('burial'),
+            'CENS' => I18N::translate('census added'),
+        );
+
+        $fact_query = "IN ('" . str_replace('|', "','", $facts) . "')";
+
+        if ($direction != 'ASC') {
+            $direction = 'DESC';
+        }
+        $rows = $this->runSql(''
+            . ' SELECT'
+            . ' d_gid AS id,'
+            . ' d_year AS year,'
+            . ' d_fact AS fact,'
+            . ' d_type AS type'
+            . ' FROM'
+            . " `##dates`"
+            . ' WHERE'
+            . " d_file={$this->tree->getTreeId()} AND"
+            . " d_gid<>'HEAD' AND"
+            . " d_fact {$fact_query} AND"
+            . ' d_julianday1<>0'
+            . ' ORDER BY'
+            . " d_julianday1 {$direction}, d_type LIMIT 1"
+        );
+        if (!isset($rows[0])) {
+            return '';
+        }
+        $row    = $rows[0];
+        $record = GedcomRecord::getInstance($row['id'], $this->tree);
+        switch ($type) {
+        default:
+        case 'full':
+            if ($record->canShow()) {
+                $result = $record->formatList('span', false, $record->getFullName());
+            } else {
+                $result = I18N::translate('This information is private and cannot be shown.');
+            }
+            break;
+        case 'year':
+            $date   = new Date($row['type'] . ' ' . $row['year']);
+            $result = $date->display();
+            break;
+        case 'type':
+            if (isset($eventTypes[$row['fact']])) {
+                $result = $eventTypes[$row['fact']];
+            } else {
+                $result = GedcomTag::getLabel($row['fact']);
+            }
+            break;
+        case 'name':
+            $result = "<a href=\"" . $record->getHtmlUrl() . "\">" . $record->getFullName() . "</a>";
+            break;
+        case 'place':
+            $fact = $record->getFirstFact($row['fact']);
+            if ($fact) {
+                $result = FunctionsPrint::formatFactPlace($fact, true, true, true);
+            } else {
+                $result = I18N::translate('Private');
+            }
+            break;
+        }
+
+        return $result;
+    }
+
+    /**
+     * Find the earliest event.
+     *
+     * @return string
+     */
+    public function firstEvent() {
+        return $this->eventQuery('full', 'ASC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
+    }
+
+    /**
+     * Find the year of the earliest event.
+     *
+     * @return string
+     */
+    public function firstEventYear() {
+        return $this->eventQuery('year', 'ASC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
+    }
+
+    /**
+     * Find the type of the earliest event.
+     *
+     * @return string
+     */
+    public function firstEventType() {
+        return $this->eventQuery('type', 'ASC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
+    }
+
+    /**
+     * Find the name of the individual with the earliest event.
+     *
+     * @return string
+     */
+    public function firstEventName() {
+        return $this->eventQuery('name', 'ASC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
+    }
+
+    /**
+     * Find the location of the earliest event.
+     *
+     * @return string
+     */
+    public function firstEventPlace() {
+        return $this->eventQuery('place', 'ASC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
+    }
+
+    /**
+     * Find the latest event.
+     *
+     * @return string
+     */
+    public function lastEvent() {
+        return $this->eventQuery('full', 'DESC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
+    }
+
+    /**
+     * Find the year of the latest event.
+     *
+     * @return string
+     */
+    public function lastEventYear() {
+        return $this->eventQuery('year', 'DESC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
+    }
+
+    /**
+     * Find the type of the latest event.
+     *
+     * @return string
+     */
+    public function lastEventType() {
+        return $this->eventQuery('type', 'DESC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
+    }
+
+    /**
+     * Find the name of the individual with the latest event.
+     *
+     * @return string
+     */
+    public function lastEventName() {
+        return $this->eventQuery('name', 'DESC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
+    }
+
+    /**
+     * FInd the location of the latest event.
+     *
+     * @return string
+     */
+    public function lastEventPlace() {
+        return $this->eventQuery('place', 'DESC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
+    }
+
+    /**
+     * Query the database for marriage tags.
+     *
+     * @param string $type
+     * @param string $age_dir
+     * @param string $sex
+     * @param bool   $show_years
+     *
+     * @return string
+     */
+    private function marriageQuery($type = 'full', $age_dir = 'ASC', $sex = 'F', $show_years = false) {
+        if ($sex == 'F') {
+            $sex_field = 'f_wife';
+        } else {
+            $sex_field = 'f_husb';
+        }
+        if ($age_dir != 'ASC') {
+            $age_dir = 'DESC';
+        }
+        $rows = $this->runSql(
+            " SELECT fam.f_id AS famid, fam.{$sex_field}, married.d_julianday2-birth.d_julianday1 AS age, indi.i_id AS i_id" .
+            " FROM `##families` AS fam" .
+            " LEFT JOIN `##dates` AS birth ON birth.d_file = {$this->tree->getTreeId()}" .
+            " LEFT JOIN `##dates` AS married ON married.d_file = {$this->tree->getTreeId()}" .
+            " LEFT JOIN `##individuals` AS indi ON indi.i_file = {$this->tree->getTreeId()}" .
+            " WHERE" .
+            " birth.d_gid = indi.i_id AND" .
+            " married.d_gid = fam.f_id AND" .
+            " indi.i_id = fam.{$sex_field} AND" .
+            " fam.f_file = {$this->tree->getTreeId()} AND" .
+            " birth.d_fact = 'BIRT' AND" .
+            " married.d_fact = 'MARR' AND" .
+            " birth.d_julianday1 <> 0 AND" .
+            " married.d_julianday2 > birth.d_julianday1 AND" .
+            " i_sex='{$sex}'" .
+            " ORDER BY" .
+            " married.d_julianday2-birth.d_julianday1 {$age_dir} LIMIT 1"
+        );
+        if (!isset($rows[0])) {
+            return '';
+        }
+        $row = $rows[0];
+        if (isset($row['famid'])) {
+            $family = Family::getInstance($row['famid'], $this->tree);
+        }
+        if (isset($row['i_id'])) {
+            $person = Individual::getInstance($row['i_id'], $this->tree);
+        }
+        switch ($type) {
+        default:
+        case 'full':
+            if ($family->canShow()) {
+                $result = $family->formatList('span', false, $person->getFullName());
+            } else {
+                $result = I18N::translate('This information is private and cannot be shown.');
+            }
+            break;
+        case 'name':
+            $result = '<a href="' . $family->getHtmlUrl() . '">' . $person->getFullName() . '</a>';
+            break;
+        case 'age':
+            $age = $row['age'];
+            if ($show_years) {
+                if ((int) ($age / 365.25) > 0) {
+                    $age = (int) ($age / 365.25) . 'y';
+                } elseif ((int) ($age / 30.4375) > 0) {
+                    $age = (int) ($age / 30.4375) . 'm';
+                } else {
+                    $age = $age . 'd';
+                }
+                $result = FunctionsDate::getAgeAtEvent($age);
+            } else {
+                $result = I18N::number((int) ($age / 365.25));
+            }
+            break;
+        }
+
+        return $result;
+    }
+
+    /**
+     * General query on age at marriage.
+     *
+     * @param string   $type
+     * @param string   $age_dir
+     * @param string[] $params
+     *
+     * @return string
+     */
+    private function ageOfMarriageQuery($type = 'list', $age_dir = 'ASC', $params = array()) {
+        if (isset($params[0])) {
+            $total = (int) $params[0];
+        } else {
+            $total = 10;
+        }
+        if ($age_dir != 'ASC') {
+            $age_dir = 'DESC';
+        }
+        $hrows = $this->runSql(
+            " SELECT DISTINCT fam.f_id AS family, MIN(husbdeath.d_julianday2-married.d_julianday1) AS age" .
+            " FROM `##families` AS fam" .
+            " LEFT JOIN `##dates` AS married ON married.d_file = {$this->tree->getTreeId()}" .
+            " LEFT JOIN `##dates` AS husbdeath ON husbdeath.d_file = {$this->tree->getTreeId()}" .
+            " WHERE" .
+            " fam.f_file = {$this->tree->getTreeId()} AND" .
+            " husbdeath.d_gid = fam.f_husb AND" .
+            " husbdeath.d_fact = 'DEAT' AND" .
+            " married.d_gid = fam.f_id AND" .
+            " married.d_fact = 'MARR' AND" .
+            " married.d_julianday1 < husbdeath.d_julianday2 AND" .
+            " married.d_julianday1 <> 0" .
+            " GROUP BY family" .
+            " ORDER BY age {$age_dir}");
+        $wrows = $this->runSql(
+            " SELECT DISTINCT fam.f_id AS family, MIN(wifedeath.d_julianday2-married.d_julianday1) AS age" .
+            " FROM `##families` AS fam" .
+            " LEFT JOIN `##dates` AS married ON married.d_file = {$this->tree->getTreeId()}" .
+            " LEFT JOIN `##dates` AS wifedeath ON wifedeath.d_file = {$this->tree->getTreeId()}" .
+            " WHERE" .
+            " fam.f_file = {$this->tree->getTreeId()} AND" .
+            " wifedeath.d_gid = fam.f_wife AND" .
+            " wifedeath.d_fact = 'DEAT' AND" .
+            " married.d_gid = fam.f_id AND" .
+            " married.d_fact = 'MARR' AND" .
+            " married.d_julianday1 < wifedeath.d_julianday2 AND" .
+            " married.d_julianday1 <> 0" .
+            " GROUP BY family" .
+            " ORDER BY age {$age_dir}");
+        $drows = $this->runSql(
+            " SELECT DISTINCT fam.f_id AS family, MIN(divorced.d_julianday2-married.d_julianday1) AS age" .
+            " FROM `##families` AS fam" .
+            " LEFT JOIN `##dates` AS married ON married.d_file = {$this->tree->getTreeId()}" .
+            " LEFT JOIN `##dates` AS divorced ON divorced.d_file = {$this->tree->getTreeId()}" .
+            " WHERE" .
+            " fam.f_file = {$this->tree->getTreeId()} AND" .
+            " married.d_gid = fam.f_id AND" .
+            " married.d_fact = 'MARR' AND" .
+            " divorced.d_gid = fam.f_id AND" .
+            " divorced.d_fact IN ('DIV', 'ANUL', '_SEPR', '_DETS') AND" .
+            " married.d_julianday1 < divorced.d_julianday2 AND" .
+            " married.d_julianday1 <> 0" .
+            " GROUP BY family" .
+            " ORDER BY age {$age_dir}");
+        if (!isset($hrows) && !isset($wrows) && !isset($drows)) {
+            return '';
+        }
+        $rows = array();
+        foreach ($drows as $family) {
+            $rows[$family['family']] = $family['age'];
+        }
+        foreach ($hrows as $family) {
+            if (!isset($rows[$family['family']])) {
+                $rows[$family['family']] = $family['age'];
+            }
+        }
+        foreach ($wrows as $family) {
+            if (!isset($rows[$family['family']])) {
+                $rows[$family['family']] = $family['age'];
+            } elseif ($rows[$family['family']] > $family['age']) {
+                $rows[$family['family']] = $family['age'];
+            }
+        }
+        if ($age_dir === 'DESC') {
+            arsort($rows);
+        } else {
+            asort($rows);
+        }
+        $top10 = array();
+        $i     = 0;
+        foreach ($rows as $fam => $age) {
+            $family = Family::getInstance($fam, $this->tree);
+            if ($type === 'name') {
+                return $family->formatList('span', false, $family->getFullName());
+            }
+            if ((int) ($age / 365.25) > 0) {
+                $age = (int) ($age / 365.25) . 'y';
+            } elseif ((int) ($age / 30.4375) > 0) {
+                $age = (int) ($age / 30.4375) . 'm';
+            } else {
+                $age = $age . 'd';
+            }
+            $age = FunctionsDate::getAgeAtEvent($age);
+            if ($type === 'age') {
+                return $age;
+            }
+            $husb = $family->getHusband();
+            $wife = $family->getWife();
+            if ($husb && $wife && ($husb->getAllDeathDates() && $wife->getAllDeathDates() || !$husb->isDead() || !$wife->isDead())) {
+                if ($family->canShow()) {
+                    if ($type === 'list') {
+                        $top10[] = "<li><a href=\"" . $family->getHtmlUrl() . "\">" . $family->getFullName() . "</a> (" . $age . ")" . "</li>";
+                    } else {
+                        $top10[] = "<a href=\"" . $family->getHtmlUrl() . "\">" . $family->getFullName() . "</a> (" . $age . ")";
+                    }
+                }
+                if (++$i === $total) {
+                    break;
+                }
+            }
+        }
+        if ($type === 'list') {
+            $top10 = implode('', $top10);
+        } else {
+            $top10 = implode('; ', $top10);
+        }
+        if (I18N::direction() === 'rtl') {
+            $top10 = str_replace(array('[', ']', '(', ')', '+'), array('&rlm;[', '&rlm;]', '&rlm;(', '&rlm;)', '&rlm;+'), $top10);
+        }
+        if ($type === 'list') {
+            return '<ul>' . $top10 . '</ul>';
+        }
+
+        return $top10;
+    }
+
+    /**
+     * Find the ages between spouses.
+     *
+     * @param string   $type
+     * @param string   $age_dir
+     * @param string[] $params
+     *
+     * @return string
+     */
+    private function ageBetweenSpousesQuery($type = 'list', $age_dir = 'DESC', $params = array()) {
+        if (isset($params[0])) {
+            $total = (int) $params[0];
+        } else {
+            $total = 10;
+        }
+        if ($age_dir === 'DESC') {
+            $sql =
+                "SELECT f_id AS xref, MIN(wife.d_julianday2-husb.d_julianday1) AS age" .
+                " FROM `##families`" .
+                " JOIN `##dates` AS wife ON wife.d_gid = f_wife AND wife.d_file = f_file" .
+                " JOIN `##dates` AS husb ON husb.d_gid = f_husb AND husb.d_file = f_file" .
+                " WHERE f_file = :tree_id" .
+                " AND husb.d_fact = 'BIRT'" .
+                " AND wife.d_fact = 'BIRT'" .
+                " AND wife.d_julianday2 >= husb.d_julianday1 AND husb.d_julianday1 <> 0" .
+                " GROUP BY xref" .
+                " ORDER BY age DESC" .
+                " LIMIT :limit";
+        } else {
+            $sql =
+                "SELECT f_id AS xref, MIN(husb.d_julianday2-wife.d_julianday1) AS age" .
+                " FROM `##families`" .
+                " JOIN `##dates` AS wife ON wife.d_gid = f_wife AND wife.d_file = f_file" .
+                " JOIN `##dates` AS husb ON husb.d_gid = f_husb AND husb.d_file = f_file" .
+                " WHERE f_file = :tree_id" .
+                " AND husb.d_fact = 'BIRT'" .
+                " AND wife.d_fact = 'BIRT'" .
+                " AND husb.d_julianday2 >= wife.d_julianday1 AND wife.d_julianday1 <> 0" .
+                " GROUP BY xref" .
+                " ORDER BY age DESC" .
+                " LIMIT :limit";
+        }
+        $rows = Database::prepare(
+            $sql
+        )->execute(array(
+            'tree_id' => $this->tree->getTreeId(),
+            'limit'   => $total,
+        ))->fetchAll();
+
+        $top10 = array();
+        foreach ($rows as $fam) {
+            $family = Family::getInstance($fam->xref, $this->tree);
+            if ($fam->age < 0) {
+                break;
+            }
+            $age = $fam->age;
+            if ((int) ($age / 365.25) > 0) {
+                $age = (int) ($age / 365.25) . 'y';
+            } elseif ((int) ($age / 30.4375) > 0) {
+                $age = (int) ($age / 30.4375) . 'm';
+            } else {
+                $age = $age . 'd';
+            }
+            $age = FunctionsDate::getAgeAtEvent($age);
+            if ($family->canShow()) {
+                if ($type === 'list') {
+                    $top10[] = '<li><a href="' . $family->getHtmlUrl() . '">' . $family->getFullName() . '</a> (' . $age . ')' . "</li>";
+                } else {
+                    $top10[] = '<a href="' . $family->getHtmlUrl() . '">' . $family->getFullName() . '</a> (' . $age . ')';
+                }
+            }
+        }
+        if ($type === 'list') {
+            $top10 = implode('', $top10);
+            if ($top10) {
+                $top10 = '<ul>' . $top10 . '</ul>';
+            }
+        } else {
+            $top10 = implode(' ', $top10);
+        }
+
+        return $top10;
+    }
+
+    /**
+     * General query on parents.
+     *
+     * @param string $type
+     * @param string $age_dir
+     * @param string $sex
+     * @param bool   $show_years
+     *
+     * @return string
+     */
+    private function parentsQuery($type = 'full', $age_dir = 'ASC', $sex = 'F', $show_years = false) {
+        if ($sex == 'F') {
+            $sex_field = 'WIFE';
+        } else {
+            $sex_field = 'HUSB';
+        }
+        if ($age_dir != 'ASC') {
+            $age_dir = 'DESC';
+        }
+        $rows = $this->runSql(
+            " SELECT" .
+            " parentfamily.l_to AS id," .
+            " childbirth.d_julianday2-birth.d_julianday1 AS age" .
+            " FROM `##link` AS parentfamily" .
+            " JOIN `##link` AS childfamily ON childfamily.l_file = {$this->tree->getTreeId()}" .
+            " JOIN `##dates` AS birth ON birth.d_file = {$this->tree->getTreeId()}" .
+            " JOIN `##dates` AS childbirth ON childbirth.d_file = {$this->tree->getTreeId()}" .
+            " WHERE" .
+            " birth.d_gid = parentfamily.l_to AND" .
+            " childfamily.l_to = childbirth.d_gid AND" .
+            " childfamily.l_type = 'CHIL' AND" .
+            " parentfamily.l_type = '{$sex_field}' AND" .
+            " childfamily.l_from = parentfamily.l_from AND" .
+            " parentfamily.l_file = {$this->tree->getTreeId()} AND" .
+            " birth.d_fact = 'BIRT' AND" .
+            " childbirth.d_fact = 'BIRT' AND" .
+            " birth.d_julianday1 <> 0 AND" .
+            " childbirth.d_julianday2 > birth.d_julianday1" .
+            " ORDER BY age {$age_dir} LIMIT 1"
+        );
+        if (!isset($rows[0])) {
+            return '';
+        }
+        $row = $rows[0];
+        if (isset($row['id'])) {
+            $person = Individual::getInstance($row['id'], $this->tree);
+        }
+        switch ($type) {
+        default:
+        case 'full':
+            if ($person->canShow()) {
+                $result = $person->formatList('span', false, $person->getFullName());
+            } else {
+                $result = I18N::translate('This information is private and cannot be shown.');
+            }
+            break;
+        case 'name':
+            $result = '<a href="' . $person->getHtmlUrl() . '">' . $person->getFullName() . '</a>';
+            break;
+        case 'age':
+            $age = $row['age'];
+            if ($show_years) {
+                if ((int) ($age / 365.25) > 0) {
+                    $age = (int) ($age / 365.25) . 'y';
+                } elseif ((int) ($age / 30.4375) > 0) {
+                    $age = (int) ($age / 30.4375) . 'm';
+                } else {
+                    $age = $age . 'd';
+                }
+                $result = FunctionsDate::getAgeAtEvent($age);
+            } else {
+                $result = (int) ($age / 365.25);
+            }
+            break;
+        }
+
+        return $result;
+    }
+
+    /**
+     * General query on marriages.
+     *
+     * @param bool     $simple
+     * @param bool     $first
+     * @param int      $year1
+     * @param int      $year2
+     * @param string[] $params
+     *
+     * @return string|array
+     */
+    public function statsMarrQuery($simple = true, $first = false, $year1 = -1, $year2 = -1, $params = array()) {
+        $WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
+        $WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
+        $WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
+        $WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
+
+        if ($simple) {
+            $sql =
+                "SELECT FLOOR(d_year/100+1) AS century, COUNT(*) AS total" .
+                " FROM `##dates`" .
+                " WHERE d_file={$this->tree->getTreeId()} AND d_year<>0 AND d_fact='MARR' AND d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')";
+            if ($year1 >= 0 && $year2 >= 0) {
+                $sql .= " AND d_year BETWEEN '{$year1}' AND '{$year2}'";
+            }
+            $sql .= " GROUP BY century ORDER BY century";
+        } elseif ($first) {
+            $years = '';
+            if ($year1 >= 0 && $year2 >= 0) {
+                $years = " married.d_year BETWEEN '{$year1}' AND '{$year2}' AND";
+            }
+            $sql =
+                " SELECT fam.f_id AS fams, fam.f_husb, fam.f_wife, married.d_julianday2 AS age, married.d_month AS month, indi.i_id AS indi" .
+                " FROM `##families` AS fam" .
+                " LEFT JOIN `##dates` AS married ON married.d_file = {$this->tree->getTreeId()}" .
+                " LEFT JOIN `##individuals` AS indi ON indi.i_file = {$this->tree->getTreeId()}" .
+                " WHERE" .
+                " married.d_gid = fam.f_id AND" .
+                " fam.f_file = {$this->tree->getTreeId()} AND" .
+                " married.d_fact = 'MARR' AND" .
+                " married.d_julianday2 <> 0 AND" .
+                $years .
+                " (indi.i_id = fam.f_husb OR indi.i_id = fam.f_wife)" .
+                " ORDER BY fams, indi, age ASC";
+        } else {
+            $sql =
+                "SELECT d_month, COUNT(*) AS total" .
+                " FROM `##dates`" .
+                " WHERE d_file={$this->tree->getTreeId()} AND d_fact='MARR'";
+            if ($year1 >= 0 && $year2 >= 0) {
+                $sql .= " AND d_year BETWEEN '{$year1}' AND '{$year2}'";
+            }
+            $sql .= " GROUP BY d_month";
+        }
+        $rows = $this->runSql($sql);
+        if (!isset($rows)) {
+            return '';
+        }
+        if ($simple) {
+            if (isset($params[0]) && $params[0] != '') {
+                $size = strtolower($params[0]);
+            } else {
+                $size = $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y;
+            }
+            if (isset($params[1]) && $params[1] != '') {
+                $color_from = strtolower($params[1]);
+            } else {
+                $color_from = $WT_STATS_CHART_COLOR1;
+            }
+            if (isset($params[2]) && $params[2] != '') {
+                $color_to = strtolower($params[2]);
+            } else {
+                $color_to = $WT_STATS_CHART_COLOR2;
+            }
+            $sizes = explode('x', $size);
+            $tot   = 0;
+            foreach ($rows as $values) {
+                $tot += (int) $values['total'];
+            }
+            // Beware divide by zero
+            if ($tot === 0) {
+                return '';
+            }
+            $centuries = '';
+            $counts    = array();
+            foreach ($rows as $values) {
+                $counts[] = round(100 * $values['total'] / $tot, 0);
+                $centuries .= $this->centuryName($values['century']) . ' - ' . I18N::number($values['total']) . '|';
+            }
+            $chd = $this->arrayToExtendedEncoding($counts);
+            $chl = substr($centuries, 0, -1);
+
+            return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_from},{$color_to}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Marriages by century') . "\" title=\"" . I18N::translate('Marriages by century') . "\" />";
+        }
+
+        return $rows;
+    }
+
+    /**
+     * General query on divorces.
+     *
+     * @param bool     $simple
+     * @param bool     $first
+     * @param int      $year1
+     * @param int      $year2
+     * @param string[] $params
+     *
+     * @return string|array
+     */
+    private function statsDivQuery($simple = true, $first = false, $year1 = -1, $year2 = -1, $params = array()) {
+        $WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
+        $WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
+        $WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
+        $WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
+
+        if ($simple) {
+            $sql =
+                "SELECT FLOOR(d_year/100+1) AS century, COUNT(*) AS total" .
+                " FROM `##dates`" .
+                " WHERE d_file={$this->tree->getTreeId()} AND d_year<>0 AND d_fact = 'DIV' AND d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')";
+            if ($year1 >= 0 && $year2 >= 0) {
+                $sql .= " AND d_year BETWEEN '{$year1}' AND '{$year2}'";
+            }
+            $sql .= " GROUP BY century ORDER BY century";
+        } elseif ($first) {
+            $years = '';
+            if ($year1 >= 0 && $year2 >= 0) {
+                $years = " divorced.d_year BETWEEN '{$year1}' AND '{$year2}' AND";
+            }
+            $sql =
+                " SELECT fam.f_id AS fams, fam.f_husb, fam.f_wife, divorced.d_julianday2 AS age, divorced.d_month AS month, indi.i_id AS indi" .
+                " FROM `##families` AS fam" .
+                " LEFT JOIN `##dates` AS divorced ON divorced.d_file = {$this->tree->getTreeId()}" .
+                " LEFT JOIN `##individuals` AS indi ON indi.i_file = {$this->tree->getTreeId()}" .
+                " WHERE" .
+                " divorced.d_gid = fam.f_id AND" .
+                " fam.f_file = {$this->tree->getTreeId()} AND" .
+                " divorced.d_fact = 'DIV' AND" .
+                " divorced.d_julianday2 <> 0 AND" .
+                $years .
+                " (indi.i_id = fam.f_husb OR indi.i_id = fam.f_wife)" .
+                " ORDER BY fams, indi, age ASC";
+        } else {
+            $sql =
+                "SELECT d_month, COUNT(*) AS total FROM `##dates` " .
+                "WHERE d_file={$this->tree->getTreeId()} AND d_fact = 'DIV'";
+            if ($year1 >= 0 && $year2 >= 0) {
+                $sql .= " AND d_year BETWEEN '{$year1}' AND '{$year2}'";
+            }
+            $sql .= " GROUP BY d_month";
+        }
+        $rows = $this->runSql($sql);
+        if (!isset($rows)) {
+            return '';
+        }
+        if ($simple) {
+            if (isset($params[0]) && $params[0] != '') {
+                $size = strtolower($params[0]);
+            } else {
+                $size = $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y;
+            }
+            if (isset($params[1]) && $params[1] != '') {
+                $color_from = strtolower($params[1]);
+            } else {
+                $color_from = $WT_STATS_CHART_COLOR1;
+            }
+            if (isset($params[2]) && $params[2] != '') {
+                $color_to = strtolower($params[2]);
+            } else {
+                $color_to = $WT_STATS_CHART_COLOR2;
+            }
+            $sizes = explode('x', $size);
+            $tot   = 0;
+            foreach ($rows as $values) {
+                $tot += (int) $values['total'];
+            }
+            // Beware divide by zero
+            if ($tot === 0) {
+                return '';
+            }
+            $centuries = '';
+            $counts    = array();
+            foreach ($rows as $values) {
+                $counts[] = round(100 * $values['total'] / $tot, 0);
+                $centuries .= $this->centuryName($values['century']) . ' - ' . I18N::number($values['total']) . '|';
+            }
+            $chd = $this->arrayToExtendedEncoding($counts);
+            $chl = substr($centuries, 0, -1);
+
+            return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_from},{$color_to}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Divorces by century') . "\" title=\"" . I18N::translate('Divorces by century') . "\" />";
+        }
+
+        return $rows;
+    }
+
+    /**
+     * Find the earliest marriage.
+     *
+     * @return string
+     */
+    public function firstMarriage() {
+        return $this->mortalityQuery('full', 'ASC', 'MARR');
+    }
+
+    /**
+     * Find the year of the earliest marriage.
+     *
+     * @return string
+     */
+    public function firstMarriageYear() {
+        return $this->mortalityQuery('year', 'ASC', 'MARR');
+    }
+
+    /**
+     * Find the names of spouses of the earliest marriage.
+     *
+     * @return string
+     */
+    public function firstMarriageName() {
+        return $this->mortalityQuery('name', 'ASC', 'MARR');
+    }
+
+    /**
+     * Find the place of the earliest marriage.
+     *
+     * @return string
+     */
+    public function firstMarriagePlace() {
+        return $this->mortalityQuery('place', 'ASC', 'MARR');
+    }
+
+    /**
+     * Find the latest marriage.
+     *
+     * @return string
+     */
+    public function lastMarriage() {
+        return $this->mortalityQuery('full', 'DESC', 'MARR');
+    }
+
+    /**
+     * Find the year of the latest marriage.
+     *
+     * @return string
+     */
+    public function lastMarriageYear() {
+        return $this->mortalityQuery('year', 'DESC', 'MARR');
+    }
+
+    /**
+     * Find the names of spouses of the latest marriage.
+     *
+     * @return string
+     */
+    public function lastMarriageName() {
+        return $this->mortalityQuery('name', 'DESC', 'MARR');
+    }
+
+    /**
+     * Find the location of the latest marriage.
+     *
+     * @return string
+     */
+    public function lastMarriagePlace() {
+        return $this->mortalityQuery('place', 'DESC', 'MARR');
+    }
+
+    /**
+     * General query on marriages.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function statsMarr($params = array()) {
+        return $this->statsMarrQuery(true, false, -1, -1, $params);
+    }
+
+    /**
+     * Find the earliest divorce.
+     *
+     * @return string
+     */
+    public function firstDivorce() {
+        return $this->mortalityQuery('full', 'ASC', 'DIV');
+    }
+
+    /**
+     * Find the year of the earliest divorce.
+     *
+     * @return string
+     */
+    public function firstDivorceYear() {
+        return $this->mortalityQuery('year', 'ASC', 'DIV');
+    }
+
+    /**
+     * Find the names of individuals in the earliest divorce.
+     *
+     * @return string
+     */
+    public function firstDivorceName() {
+        return $this->mortalityQuery('name', 'ASC', 'DIV');
+    }
+
+    /**
+     * Find the location of the earliest divorce.
+     *
+     * @return string
+     */
+    public function firstDivorcePlace() {
+        return $this->mortalityQuery('place', 'ASC', 'DIV');
+    }
+
+    /**
+     * Find the latest divorce.
+     *
+     * @return string
+     */
+    public function lastDivorce() {
+        return $this->mortalityQuery('full', 'DESC', 'DIV');
+    }
+
+    /**
+     * Find the year of the latest divorce.
+     *
+     * @return string
+     */
+    public function lastDivorceYear() {
+        return $this->mortalityQuery('year', 'DESC', 'DIV');
+    }
+
+    /**
+     * Find the names of the individuals in the latest divorce.
+     *
+     * @return string
+     */
+    public function lastDivorceName() {
+        return $this->mortalityQuery('name', 'DESC', 'DIV');
+    }
+
+    /**
+     * Find the location of the latest divorce.
+     *
+     * @return string
+     */
+    public function lastDivorcePlace() {
+        return $this->mortalityQuery('place', 'DESC', 'DIV');
+    }
+
+    /**
+     * General divorce query.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function statsDiv($params = array()) {
+        return $this->statsDivQuery(true, false, -1, -1, $params);
+    }
+
+    /**
+     * General query on ages at marriage.
+     *
+     * @param bool     $simple
+     * @param string   $sex
+     * @param int      $year1
+     * @param int      $year2
+     * @param string[] $params
+     *
+     * @return array|string
+     */
+    public function statsMarrAgeQuery($simple = true, $sex = 'M', $year1 = -1, $year2 = -1, $params = array()) {
+        if ($simple) {
+            if (isset($params[0]) && $params[0] != '') {
+                $size = strtolower($params[0]);
+            } else {
+                $size = '200x250';
+            }
+            $sizes = explode('x', $size);
+            $rows  = $this->runSql(
+                "SELECT " .
+                " ROUND(AVG(married.d_julianday2-birth.d_julianday1-182.5)/365.25,1) AS age, " .
+                " FLOOR(married.d_year/100+1) AS century, " .
+                " 'M' AS sex " .
+                "FROM `##dates` AS married " .
+                "JOIN `##families` AS fam ON (married.d_gid=fam.f_id AND married.d_file=fam.f_file) " .
+                "JOIN `##dates` AS birth ON (birth.d_gid=fam.f_husb AND birth.d_file=fam.f_file) " .
+                "WHERE " .
+                " '{$sex}' IN ('M', 'BOTH') AND " .
+                " married.d_file={$this->tree->getTreeId()} AND married.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND married.d_fact='MARR' AND " .
+                " birth.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND birth.d_fact='BIRT' AND " .
+                " married.d_julianday1>birth.d_julianday1 AND birth.d_julianday1<>0 " .
+                "GROUP BY century, sex " .
+                "UNION ALL " .
+                "SELECT " .
+                " ROUND(AVG(married.d_julianday2-birth.d_julianday1-182.5)/365.25,1) AS age, " .
+                " FLOOR(married.d_year/100+1) AS century, " .
+                " 'F' AS sex " .
+                "FROM `##dates` AS married " .
+                "JOIN `##families` AS fam ON (married.d_gid=fam.f_id AND married.d_file=fam.f_file) " .
+                "JOIN `##dates` AS birth ON (birth.d_gid=fam.f_wife AND birth.d_file=fam.f_file) " .
+                "WHERE " .
+                " '{$sex}' IN ('F', 'BOTH') AND " .
+                " married.d_file={$this->tree->getTreeId()} AND married.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND married.d_fact='MARR' AND " .
+                " birth.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND birth.d_fact='BIRT' AND " .
+                " married.d_julianday1>birth.d_julianday1 AND birth.d_julianday1<>0 " .
+                " GROUP BY century, sex ORDER BY century"
+            );
+            if (empty($rows)) {
+                return '';
+            }
+            $max = 0;
+            foreach ($rows as $values) {
+                if ($max < $values['age']) {
+                    $max = $values['age'];
+                }
+            }
+            $chxl    = '0:|';
+            $chmm    = '';
+            $chmf    = '';
+            $i       = 0;
+            $countsm = '';
+            $countsf = '';
+            $countsa = '';
+            $out     = array();
+            foreach ($rows as $values) {
+                $out[$values['century']][$values['sex']] = $values['age'];
+            }
+            foreach ($out as $century => $values) {
+                if ($sizes[0] < 1000) {
+                    $sizes[0] += 50;
+                }
+                $chxl .= $this->centuryName($century) . '|';
+                $average = 0;
+                if (isset($values['F'])) {
+                    if ($max <= 50) {
+                        $value = $values['F'] * 2;
+                    } else {
+                        $value = $values['F'];
+                    }
+                    $countsf .= $value . ',';
+                    $average = $value;
+                    $chmf .= 't' . $values['F'] . ',000000,1,' . $i . ',11,1|';
+                } else {
+                    $countsf .= '0,';
+                    $chmf .= 't0,000000,1,' . $i . ',11,1|';
+                }
+                if (isset($values['M'])) {
+                    if ($max <= 50) {
+                        $value = $values['M'] * 2;
+                    } else {
+                        $value = $values['M'];
+                    }
+                    $countsm .= $value . ',';
+                    if ($average == 0) {
+                        $countsa .= $value . ',';
+                    } else {
+                        $countsa .= (($value + $average) / 2) . ',';
+                    }
+                    $chmm .= 't' . $values['M'] . ',000000,0,' . $i . ',11,1|';
+                } else {
+                    $countsm .= '0,';
+                    if ($average == 0) {
+                        $countsa .= '0,';
+                    } else {
+                        $countsa .= $value . ',';
+                    }
+                    $chmm .= 't0,000000,0,' . $i . ',11,1|';
+                }
+                $i++;
+            }
+            $countsm = substr($countsm, 0, -1);
+            $countsf = substr($countsf, 0, -1);
+            $countsa = substr($countsa, 0, -1);
+            $chmf    = substr($chmf, 0, -1);
+            $chd     = 't2:' . $countsm . '|' . $countsf . '|' . $countsa;
+            if ($max <= 50) {
+                $chxl .= '1:||' . I18N::translate('century') . '|2:|0|10|20|30|40|50|3:||' . I18N::translate('Age') . '|';
+            } else {
+                $chxl .= '1:||' . I18N::translate('century') . '|2:|0|10|20|30|40|50|60|70|80|90|100|3:||' . I18N::translate('Age') . '|';
+            }
+            if (count($rows) > 4 || mb_strlen(I18N::translate('Average age in century of marriage')) < 30) {
+                $chtt = I18N::translate('Average age in century of marriage');
+            } else {
+                $offset  = 0;
+                $counter = array();
+                while ($offset = strpos(I18N::translate('Average age in century of marriage'), ' ', $offset + 1)) {
+                    $counter[] = $offset;
+                }
+                $half = (int) (count($counter) / 2);
+                $chtt = substr_replace(I18N::translate('Average age in century of marriage'), '|', $counter[$half], 1);
+            }
+
+            return "<img src=\"" . "https://chart.googleapis.com/chart?cht=bvg&amp;chs={$sizes[0]}x{$sizes[1]}&amp;chm=D,FF0000,2,0,3,1|{$chmm}{$chmf}&amp;chf=bg,s,ffffff00|c,s,ffffff00&amp;chtt=" . rawurlencode($chtt) . "&amp;chd={$chd}&amp;chco=0000FF,FFA0CB,FF0000&amp;chbh=20,3&amp;chxt=x,x,y,y&amp;chxl=" . rawurlencode($chxl) . "&amp;chdl=" . rawurlencode(I18N::translate('Males') . "|" . I18N::translate('Females') . "|" . I18N::translate('Average age')) . "\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Average age in century of marriage') . "\" title=\"" . I18N::translate('Average age in century of marriage') . "\" />";
+        } else {
+            if ($year1 >= 0 && $year2 >= 0) {
+                $years = " married.d_year BETWEEN {$year1} AND {$year2} AND ";
+            } else {
+                $years = '';
+            }
+            $rows = $this->runSql(
+                "SELECT " .
+                " fam.f_id, " .
+                " birth.d_gid, " .
+                " married.d_julianday2-birth.d_julianday1 AS age " .
+                "FROM `##dates` AS married " .
+                "JOIN `##families` AS fam ON (married.d_gid=fam.f_id AND married.d_file=fam.f_file) " .
+                "JOIN `##dates` AS birth ON (birth.d_gid=fam.f_husb AND birth.d_file=fam.f_file) " .
+                "WHERE " .
+                " '{$sex}' IN ('M', 'BOTH') AND {$years} " .
+                " married.d_file={$this->tree->getTreeId()} AND married.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND married.d_fact='MARR' AND " .
+                " birth.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND birth.d_fact='BIRT' AND " .
+                " married.d_julianday1>birth.d_julianday1 AND birth.d_julianday1<>0 " .
+                "UNION ALL " .
+                "SELECT " .
+                " fam.f_id, " .
+                " birth.d_gid, " .
+                " married.d_julianday2-birth.d_julianday1 AS age " .
+                "FROM `##dates` AS married " .
+                "JOIN `##families` AS fam ON (married.d_gid=fam.f_id AND married.d_file=fam.f_file) " .
+                "JOIN `##dates` AS birth ON (birth.d_gid=fam.f_wife AND birth.d_file=fam.f_file) " .
+                "WHERE " .
+                " '{$sex}' IN ('F', 'BOTH') AND {$years} " .
+                " married.d_file={$this->tree->getTreeId()} AND married.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND married.d_fact='MARR' AND " .
+                " birth.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@') AND birth.d_fact='BIRT' AND " .
+                " married.d_julianday1>birth.d_julianday1 AND birth.d_julianday1<>0 "
+            );
+
+            return $rows;
+        }
+    }
+
+    /**
+     * Find the youngest wife.
+     *
+     * @return string
+     */
+    public function youngestMarriageFemale() {
+        return $this->marriageQuery('full', 'ASC', 'F', false);
+    }
+
+    /**
+     * Find the name of the youngest wife.
+     *
+     * @return string
+     */
+    public function youngestMarriageFemaleName() {
+        return $this->marriageQuery('name', 'ASC', 'F', false);
+    }
+
+    /**
+     * Find the age of the youngest wife.
+     *
+     * @param bool $show_years
+     *
+     * @return string
+     */
+    public function youngestMarriageFemaleAge($show_years = false) {
+        return $this->marriageQuery('age', 'ASC', 'F', $show_years);
+    }
+
+    /**
+     * Find the oldest wife.
+     *
+     * @return string
+     */
+    public function oldestMarriageFemale() {
+        return $this->marriageQuery('full', 'DESC', 'F', false);
+    }
+
+    /**
+     * Find the name of the oldest wife.
+     *
+     * @return string
+     */
+    public function oldestMarriageFemaleName() {
+        return $this->marriageQuery('name', 'DESC', 'F', false);
+    }
+
+    /**
+     * Find the age of the oldest wife.
+     *
+     * @param bool $show_years
+     *
+     * @return string
+     */
+    public function oldestMarriageFemaleAge($show_years = false) {
+        return $this->marriageQuery('age', 'DESC', 'F', $show_years);
+    }
+
+    /**
+     * Find the youngest husband.
+     *
+     * @return string
+     */
+    public function youngestMarriageMale() {
+        return $this->marriageQuery('full', 'ASC', 'M', false);
+    }
+
+    /**
+     * Find the name of the youngest husband.
+     *
+     * @return string
+     */
+    public function youngestMarriageMaleName() {
+        return $this->marriageQuery('name', 'ASC', 'M', false);
+    }
+
+    /**
+     * Find the age of the youngest husband.
+     *
+     * @param bool $show_years
+     *
+     * @return string
+     */
+    public function youngestMarriageMaleAge($show_years = false) {
+        return $this->marriageQuery('age', 'ASC', 'M', $show_years);
+    }
+
+    /**
+     * Find the oldest husband.
+     *
+     * @return string
+     */
+    public function oldestMarriageMale() {
+        return $this->marriageQuery('full', 'DESC', 'M', false);
+    }
+
+    /**
+     * Find the name of the oldest husband.
+     *
+     * @return string
+     */
+    public function oldestMarriageMaleName() {
+        return $this->marriageQuery('name', 'DESC', 'M', false);
+    }
+
+    /**
+     * Find the age of the oldest husband.
+     *
+     * @param bool $show_years
+     *
+     * @return string
+     */
+    public function oldestMarriageMaleAge($show_years = false) {
+        return $this->marriageQuery('age', 'DESC', 'M', $show_years);
+    }
+
+    /**
+     * General query on marriage ages.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function statsMarrAge($params = array()) {
+        return $this->statsMarrAgeQuery(true, 'BOTH', -1, -1, $params);
+    }
+
+    /**
+     * Find the age between husband and wife.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function ageBetweenSpousesMF($params = array()) {
+        return $this->ageBetweenSpousesQuery('nolist', 'DESC', $params);
+    }
+
+    /**
+     * Find the age between husband and wife.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function ageBetweenSpousesMFList($params = array()) {
+        return $this->ageBetweenSpousesQuery('list', 'DESC', $params);
+    }
+
+    /**
+     * Find the age between wife and husband..
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function ageBetweenSpousesFM($params = array()) {
+        return $this->ageBetweenSpousesQuery('nolist', 'ASC', $params);
+    }
+
+    /**
+     * Find the age between wife and husband..
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function ageBetweenSpousesFMList($params = array()) {
+        return $this->ageBetweenSpousesQuery('list', 'ASC', $params);
+    }
+
+    /**
+     * General query on marriage ages.
+     *
+     * @return string
+     */
+    public function topAgeOfMarriageFamily() {
+        return $this->ageOfMarriageQuery('name', 'DESC', array('1'));
+    }
+
+    /**
+     * General query on marriage ages.
+     *
+     * @return string
+     */
+    public function topAgeOfMarriage() {
+        return $this->ageOfMarriageQuery('age', 'DESC', array('1'));
+    }
+
+    /**
+     * General query on marriage ages.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topAgeOfMarriageFamilies($params = array()) {
+        return $this->ageOfMarriageQuery('nolist', 'DESC', $params);
+    }
+
+    /**
+     * General query on marriage ages.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topAgeOfMarriageFamiliesList($params = array()) {
+        return $this->ageOfMarriageQuery('list', 'DESC', $params);
+    }
+
+    /**
+     * General query on marriage ages.
+     *
+     * @return string
+     */
+    public function minAgeOfMarriageFamily() {
+        return $this->ageOfMarriageQuery('name', 'ASC', array('1'));
+    }
+
+    /**
+     * General query on marriage ages.
+     *
+     * @return string
+     */
+    public function minAgeOfMarriage() {
+        return $this->ageOfMarriageQuery('age', 'ASC', array('1'));
+    }
+
+    /**
+     * General query on marriage ages.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function minAgeOfMarriageFamilies($params = array()) {
+        return $this->ageOfMarriageQuery('nolist', 'ASC', $params);
+    }
+
+    /**
+     * General query on marriage ages.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function minAgeOfMarriageFamiliesList($params = array()) {
+        return $this->ageOfMarriageQuery('list', 'ASC', $params);
+    }
+
+    /**
+     * Find the youngest mother
+     *
+     * @return string
+     */
+    public function youngestMother() {
+        return $this->parentsQuery('full', 'ASC', 'F');
+    }
+
+    /**
+     * Find the name of the youngest mother.
+     *
+     * @return string
+     */
+    public function youngestMotherName() {
+        return $this->parentsQuery('name', 'ASC', 'F');
+    }
+
+    /**
+     * Find the age of the youngest mother.
+     *
+     * @param bool $show_years
+     *
+     * @return string
+     */
+    public function youngestMotherAge($show_years = false) {
+        return $this->parentsQuery('age', 'ASC', 'F', $show_years);
+    }
+
+    /**
+     * Find the oldest mother.
+     *
+     * @return string
+     */
+    public function oldestMother() {
+        return $this->parentsQuery('full', 'DESC', 'F');
+    }
+
+    /**
+     * Find the name of the oldest mother.
+     *
+     * @return string
+     */
+    public function oldestMotherName() {
+        return $this->parentsQuery('name', 'DESC', 'F');
+    }
+
+    /**
+     * Find the age of the oldest mother.
+     *
+     * @param bool $show_years
+     *
+     * @return string
+     */
+    public function oldestMotherAge($show_years = false) {
+        return $this->parentsQuery('age', 'DESC', 'F', $show_years);
+    }
+
+    /**
+     * Find the youngest father.
+     *
+     * @return string
+     */
+    public function youngestFather() {
+        return $this->parentsQuery('full', 'ASC', 'M');
+    }
+
+    /**
+     * Find the name of the youngest father.
+     *
+     * @return string
+     */
+    public function youngestFatherName() {
+        return $this->parentsQuery('name', 'ASC', 'M');
+    }
+
+    /**
+     * Find the age of the youngest father.
+     *
+     * @param bool $show_years
+     *
+     * @return string
+     */
+    public function youngestFatherAge($show_years = false) {
+        return $this->parentsQuery('age', 'ASC', 'M', $show_years);
+    }
+
+    /**
+     * Find the oldest father.
+     *
+     * @return string
+     */
+    public function oldestFather() {
+        return $this->parentsQuery('full', 'DESC', 'M');
+    }
+
+    /**
+     * Find the name of the oldest father.
+     *
+     * @return string
+     */
+    public function oldestFatherName() {
+        return $this->parentsQuery('name', 'DESC', 'M');
+    }
+
+    /**
+     * Find the age of the oldest father.
+     *
+     * @param bool $show_years
+     *
+     * @return string
+     */
+    public function oldestFatherAge($show_years = false) {
+        return $this->parentsQuery('age', 'DESC', 'M', $show_years);
+    }
+
+    /**
+     * Number of husbands.
+     *
+     * @return string
+     */
+    public function totalMarriedMales() {
+        $n = Database::prepare("SELECT COUNT(DISTINCT f_husb) FROM `##families` WHERE f_file=? AND f_gedcom LIKE '%\\n1 MARR%'")
+            ->execute(array($this->tree->getTreeId()))
+            ->fetchOne();
+
+        return I18N::number($n);
+    }
+
+    /**
+     * Number of wives.
+     *
+     * @return string
+     */
+    public function totalMarriedFemales() {
+        $n = Database::prepare("SELECT COUNT(DISTINCT f_wife) FROM `##families` WHERE f_file=? AND f_gedcom LIKE '%\\n1 MARR%'")
+            ->execute(array($this->tree->getTreeId()))
+            ->fetchOne();
+
+        return I18N::number($n);
+    }
+
+    /**
+     * General query on family.
+     *
+     * @param string $type
+     *
+     * @return string
+     */
+    private function familyQuery($type = 'full') {
+        $rows = $this->runSql(
+            " SELECT f_numchil AS tot, f_id AS id" .
+            " FROM `##families`" .
+            " WHERE" .
+            " f_file={$this->tree->getTreeId()}" .
+            " AND f_numchil = (" .
+            "  SELECT max( f_numchil )" .
+            "  FROM `##families`" .
+            "  WHERE f_file ={$this->tree->getTreeId()}" .
+            " )" .
+            " LIMIT 1"
+        );
+        if (!isset($rows[0])) {
+            return '';
+        }
+        $row    = $rows[0];
+        $family = Family::getInstance($row['id'], $this->tree);
+        switch ($type) {
+        default:
+        case 'full':
+            if ($family->canShow()) {
+                $result = $family->formatList('span', false, $family->getFullName());
+            } else {
+                $result = I18N::translate('This information is private and cannot be shown.');
+            }
+            break;
+        case 'size':
+            $result = I18N::number($row['tot']);
+            break;
+        case 'name':
+            $result = "<a href=\"" . $family->getHtmlUrl() . "\">" . $family->getFullName() . '</a>';
+            break;
+        }
+
+        return $result;
+    }
+
+    /**
+     * General query on families.
+     *
+     * @param string   $type
+     * @param string[] $params
+     *
+     * @return string
+     */
+    private function topTenFamilyQuery($type = 'list', $params = array()) {
+        if (isset($params[0])) {
+            $total = (int) $params[0];
+        } else {
+            $total = 10;
+        }
+        $rows = $this->runSql(
+            "SELECT f_numchil AS tot, f_id AS id" .
+            " FROM `##families`" .
+            " WHERE" .
+            " f_file={$this->tree->getTreeId()}" .
+            " ORDER BY tot DESC" .
+            " LIMIT " . $total
+        );
+        if (!isset($rows[0])) {
+            return '';
+        }
+        if (count($rows) < $total) {
+            $total = count($rows);
+        }
+        $top10 = array();
+        for ($c = 0; $c < $total; $c++) {
+            $family = Family::getInstance($rows[$c]['id'], $this->tree);
+            if ($family->canShow()) {
+                if ($type === 'list') {
+                    $top10[] =
+                        '<li><a href="' . $family->getHtmlUrl() . '">' . $family->getFullName() . '</a> - ' .
+                        I18N::plural('%s child', '%s children', $rows[$c]['tot'], I18N::number($rows[$c]['tot']));
+                } else {
+                    $top10[] =
+                        '<a href="' . $family->getHtmlUrl() . '">' . $family->getFullName() . '</a> - ' .
+                        I18N::plural('%s child', '%s children', $rows[$c]['tot'], I18N::number($rows[$c]['tot']));
+                }
+            }
+        }
+        if ($type === 'list') {
+            $top10 = implode('', $top10);
+        } else {
+            $top10 = implode('; ', $top10);
+        }
+        if (I18N::direction() === 'rtl') {
+            $top10 = str_replace(array('[', ']', '(', ')', '+'), array('&rlm;[', '&rlm;]', '&rlm;(', '&rlm;)', '&rlm;+'), $top10);
+        }
+        if ($type === 'list') {
+            return '<ul>' . $top10 . '</ul>';
+        }
+
+        return $top10;
+    }
+
+    /**
+     * Find the ages between siblings.
+     *
+     * @param string   $type
+     * @param string[] $params
+     *
+     * @return string
+     */
+    private function ageBetweenSiblingsQuery($type = 'list', $params = array()) {
+        if (isset($params[0])) {
+            $total = (int) $params[0];
+        } else {
+            $total = 10;
+        }
+        if (isset($params[1])) {
+            $one = $params[1];
+        } else {
+            $one = false;
+        } // each family only once if true
+        $rows = $this->runSql(
+            " SELECT DISTINCT" .
+            " link1.l_from AS family," .
+            " link1.l_to AS ch1," .
+            " link2.l_to AS ch2," .
+            " child1.d_julianday2-child2.d_julianday2 AS age" .
+            " FROM `##link` AS link1" .
+            " LEFT JOIN `##dates` AS child1 ON child1.d_file = {$this->tree->getTreeId()}" .
+            " LEFT JOIN `##dates` AS child2 ON child2.d_file = {$this->tree->getTreeId()}" .
+            " LEFT JOIN `##link` AS link2 ON link2.l_file = {$this->tree->getTreeId()}" .
+            " WHERE" .
+            " link1.l_file = {$this->tree->getTreeId()} AND" .
+            " link1.l_from = link2.l_from AND" .
+            " link1.l_type = 'CHIL' AND" .
+            " child1.d_gid = link1.l_to AND" .
+            " child1.d_fact = 'BIRT' AND" .
+            " link2.l_type = 'CHIL' AND" .
+            " child2.d_gid = link2.l_to AND" .
+            " child2.d_fact = 'BIRT' AND" .
+            " child1.d_julianday2 > child2.d_julianday2 AND" .
+            " child2.d_julianday2 <> 0 AND" .
+            " child1.d_gid <> child2.d_gid" .
+            " ORDER BY age DESC" .
+            " LIMIT " . $total
+        );
+        if (!isset($rows[0])) {
+            return '';
+        }
+        $top10 = array();
+        $dist  = array();
+        foreach ($rows as $fam) {
+            $family = Family::getInstance($fam['family'], $this->tree);
+            $child1 = Individual::getInstance($fam['ch1'], $this->tree);
+            $child2 = Individual::getInstance($fam['ch2'], $this->tree);
+            if ($type == 'name') {
+                if ($child1->canShow() && $child2->canShow()) {
+                    $return = '<a href="' . $child2->getHtmlUrl() . '">' . $child2->getFullName() . '</a> ';
+                    $return .= I18N::translate('and') . ' ';
+                    $return .= '<a href="' . $child1->getHtmlUrl() . '">' . $child1->getFullName() . '</a>';
+                    $return .= ' <a href="' . $family->getHtmlUrl() . '">[' . I18N::translate('View this family') . ']</a>';
+                } else {
+                    $return = I18N::translate('This information is private and cannot be shown.');
+                }
+
+                return $return;
+            }
+            $age = $fam['age'];
+            if ((int) ($age / 365.25) > 0) {
+                $age = (int) ($age / 365.25) . 'y';
+            } elseif ((int) ($age / 30.4375) > 0) {
+                $age = (int) ($age / 30.4375) . 'm';
+            } else {
+                $age = $age . 'd';
+            }
+            $age = FunctionsDate::getAgeAtEvent($age);
+            if ($type == 'age') {
+                return $age;
+            }
+            if ($type == 'list') {
+                if ($one && !in_array($fam['family'], $dist)) {
+                    if ($child1->canShow() && $child2->canShow()) {
+                        $return = "<li>";
+                        $return .= "<a href=\"" . $child2->getHtmlUrl() . "\">" . $child2->getFullName() . "</a> ";
+                        $return .= I18N::translate('and') . " ";
+                        $return .= "<a href=\"" . $child1->getHtmlUrl() . "\">" . $child1->getFullName() . "</a>";
+                        $return .= " (" . $age . ")";
+                        $return .= " <a href=\"" . $family->getHtmlUrl() . "\">[" . I18N::translate('View this family') . "]</a>";
+                        $return .= '</li>';
+                        $top10[] = $return;
+                        $dist[]  = $fam['family'];
+                    }
+                } elseif (!$one && $child1->canShow() && $child2->canShow()) {
+                    $return = "<li>";
+                    $return .= "<a href=\"" . $child2->getHtmlUrl() . "\">" . $child2->getFullName() . "</a> ";
+                    $return .= I18N::translate('and') . " ";
+                    $return .= "<a href=\"" . $child1->getHtmlUrl() . "\">" . $child1->getFullName() . "</a>";
+                    $return .= " (" . $age . ")";
+                    $return .= " <a href=\"" . $family->getHtmlUrl() . "\">[" . I18N::translate('View this family') . "]</a>";
+                    $return .= '</li>';
+                    $top10[] = $return;
+                }
+            } else {
+                if ($child1->canShow() && $child2->canShow()) {
+                    $return = $child2->formatList('span', false, $child2->getFullName());
+                    $return .= "<br>" . I18N::translate('and') . "<br>";
+                    $return .= $child1->formatList('span', false, $child1->getFullName());
+                    $return .= "<br><a href=\"" . $family->getHtmlUrl() . "\">[" . I18N::translate('View this family') . "]</a>";
+
+                    return $return;
+                } else {
+                    return I18N::translate('This information is private and cannot be shown.');
+                }
+            }
+        }
+        if ($type === 'list') {
+            $top10 = implode('', $top10);
+        }
+        if (I18N::direction() === 'rtl') {
+            $top10 = str_replace(array('[', ']', '(', ')', '+'), array('&rlm;[', '&rlm;]', '&rlm;(', '&rlm;)', '&rlm;+'), $top10);
+        }
+        if ($type === 'list') {
+            return '<ul>' . $top10 . '</ul>';
+        }
+
+        return $top10;
+    }
+
+    /**
+     * Find the month in the year of the birth of the first child.
+     *
+     * @param bool     $simple
+     * @param bool     $sex
+     * @param int      $year1
+     * @param int      $year2
+     * @param string[] $params
+     *
+     * @return string|string[][]
+     */
+    public function monthFirstChildQuery($simple = true, $sex = false, $year1 = -1, $year2 = -1, $params = array()) {
+        $WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
+        $WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
+        $WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
+        $WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
+
+        if ($year1 >= 0 && $year2 >= 0) {
+            $sql_years = " AND (d_year BETWEEN '{$year1}' AND '{$year2}')";
+        } else {
+            $sql_years = '';
+        }
+        if ($sex) {
+            $sql_sex1 = ', i_sex';
+            $sql_sex2 = " JOIN `##individuals` AS child ON child1.d_file = i_file AND child1.d_gid = child.i_id ";
+        } else {
+            $sql_sex1 = '';
+            $sql_sex2 = '';
+        }
+        $sql =
+            "SELECT d_month{$sql_sex1}, COUNT(*) AS total " .
+            "FROM (" .
+            " SELECT family{$sql_sex1}, MIN(date) AS d_date, d_month" .
+            " FROM (" .
+            "  SELECT" .
+            "  link1.l_from AS family," .
+            "  link1.l_to AS child," .
+            "  child1.d_julianday2 AS date," .
+            "  child1.d_month as d_month" .
+            $sql_sex1 .
+            "  FROM `##link` AS link1" .
+            "  LEFT JOIN `##dates` AS child1 ON child1.d_file = {$this->tree->getTreeId()}" .
+            $sql_sex2 .
+            "  WHERE" .
+            "  link1.l_file = {$this->tree->getTreeId()} AND" .
+            "  link1.l_type = 'CHIL' AND" .
+            "  child1.d_gid = link1.l_to AND" .
+            "  child1.d_fact = 'BIRT' AND" .
+            "  child1.d_month IN ('JAN', 'FEB', 'MAR', 'APR', 'MAY', 'JUN', 'JUL', 'AUG', 'SEP', 'OCT', 'NOV', 'DEC')" .
+            $sql_years .
+            "  ORDER BY date" .
+            " ) AS children" .
+            " GROUP BY family, d_month{$sql_sex1}" .
+            ") AS first_child " .
+            "GROUP BY d_month";
+        if ($sex) {
+            $sql .= ', i_sex';
+        }
+        $rows = $this->runSql($sql);
+        if ($simple) {
+            if (isset($params[0]) && $params[0] != '') {
+                $size = strtolower($params[0]);
+            } else {
+                $size = $WT_STATS_S_CHART_X . 'x' . $WT_STATS_S_CHART_Y;
+            }
+            if (isset($params[1]) && $params[1] != '') {
+                $color_from = strtolower($params[1]);
+            } else {
+                $color_from = $WT_STATS_CHART_COLOR1;
+            }
+            if (isset($params[2]) && $params[2] != '') {
+                $color_to = strtolower($params[2]);
+            } else {
+                $color_to = $WT_STATS_CHART_COLOR2;
+            }
+            $sizes = explode('x', $size);
+            $tot   = 0;
+            foreach ($rows as $values) {
+                $tot += $values['total'];
+            }
+            // Beware divide by zero
+            if ($tot == 0) {
+                return '';
+            }
+            $text   = '';
+            $counts = array();
+            foreach ($rows as $values) {
+                $counts[] = round(100 * $values['total'] / $tot, 0);
+                switch ($values['d_month']) {
+                default:
+                case 'JAN':
+                    $values['d_month'] = 1;
+                    break;
+                case 'FEB':
+                    $values['d_month'] = 2;
+                    break;
+                case 'MAR':
+                    $values['d_month'] = 3;
+                    break;
+                case 'APR':
+                    $values['d_month'] = 4;
+                    break;
+                case 'MAY':
+                    $values['d_month'] = 5;
+                    break;
+                case 'JUN':
+                    $values['d_month'] = 6;
+                    break;
+                case 'JUL':
+                    $values['d_month'] = 7;
+                    break;
+                case 'AUG':
+                    $values['d_month'] = 8;
+                    break;
+                case 'SEP':
+                    $values['d_month'] = 9;
+                    break;
+                case 'OCT':
+                    $values['d_month'] = 10;
+                    break;
+                case 'NOV':
+                    $values['d_month'] = 11;
+                    break;
+                case 'DEC':
+                    $values['d_month'] = 12;
+                    break;
+                }
+                $text .= I18N::translate(ucfirst(strtolower(($values['d_month'])))) . ' - ' . $values['total'] . '|';
+            }
+            $chd = $this->arrayToExtendedEncoding($counts);
+            $chl = substr($text, 0, -1);
+
+            return '<img src="https://chart.googleapis.com/chart?cht=p3&amp;chd=e:' . $chd . '&amp;chs=' . $size . '&amp;chco=' . $color_from . ',' . $color_to . '&amp;chf=bg,s,ffffff00&amp;chl=' . $chl . '" width="' . $sizes[0] . '" height="' . $sizes[1] . '" alt="' . I18N::translate('Month of birth of first child in a relation') . '" title="' . I18N::translate('Month of birth of first child in a relation') . '" />';
+        }
+
+        return $rows;
+    }
+
+    /**
+     * Find the family with the most children.
+     *
+     * @return string
+     */
+    public function largestFamily() {
+        return $this->familyQuery('full');
+    }
+
+    /**
+     * Find the number of children in the largest family.
+     *
+     * @return string
+     */
+    public function largestFamilySize() {
+        return $this->familyQuery('size');
+    }
+
+    /**
+     * Find the family with the most children.
+     *
+     * @return string
+     */
+    public function largestFamilyName() {
+        return $this->familyQuery('name');
+    }
+
+    /**
+     * The the families with the most children.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topTenLargestFamily($params = array()) {
+        return $this->topTenFamilyQuery('nolist', $params);
+    }
+
+    /**
+     * Find the families with the most children.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topTenLargestFamilyList($params = array()) {
+        return $this->topTenFamilyQuery('list', $params);
+    }
+
+    /**
+     * Create a chart of the largest families.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function chartLargestFamilies($params = array()) {
+        $WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
+        $WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
+        $WT_STATS_L_CHART_X    = Theme::theme()->parameter('stats-large-chart-x');
+        $WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
+
+        if (isset($params[0]) && $params[0] != '') {
+            $size = strtolower($params[0]);
+        } else {
+            $size = $WT_STATS_L_CHART_X . 'x' . $WT_STATS_S_CHART_Y;
+        }
+        if (isset($params[1]) && $params[1] != '') {
+            $color_from = strtolower($params[1]);
+        } else {
+            $color_from = $WT_STATS_CHART_COLOR1;
+        }
+        if (isset($params[2]) && $params[2] != '') {
+            $color_to = strtolower($params[2]);
+        } else {
+            $color_to = $WT_STATS_CHART_COLOR2;
+        }
+        if (isset($params[3]) && $params[3] != '') {
+            $total = strtolower($params[3]);
+        } else {
+            $total = 10;
+        }
+        $sizes = explode('x', $size);
+        $total = (int) $total;
+        $rows  = $this->runSql(
+            " SELECT f_numchil AS tot, f_id AS id" .
+            " FROM `##families`" .
+            " WHERE f_file={$this->tree->getTreeId()}" .
+            " ORDER BY tot DESC" .
+            " LIMIT " . $total
+        );
+        if (!isset($rows[0])) {
+            return '';
+        }
+        $tot = 0;
+        foreach ($rows as $row) {
+            $tot += (int) $row['tot'];
+        }
+        $chd = '';
+        $chl = array();
+        foreach ($rows as $row) {
+            $family = Family::getInstance($row['id'], $this->tree);
+            if ($family->canShow()) {
+                if ($tot == 0) {
+                    $per = 0;
+                } else {
+                    $per = round(100 * $row['tot'] / $tot, 0);
+                }
+                $chd .= $this->arrayToExtendedEncoding(array($per));
+                $chl[] = htmlspecialchars_decode(strip_tags($family->getFullName())) . ' - ' . I18N::number($row['tot']);
+            }
+        }
+        $chl = rawurlencode(implode('|', $chl));
+
+        return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_from},{$color_to}&amp;chf=bg,s,ffffff00&amp;chl={$chl}\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Largest families') . "\" title=\"" . I18N::translate('Largest families') . "\" />";
+    }
+
+    /**
+     * Count the total children.
+     *
+     * @return string
+     */
+    public function totalChildren() {
+        $rows = $this->runSql("SELECT SUM(f_numchil) AS tot FROM `##families` WHERE f_file={$this->tree->getTreeId()}");
+
+        return I18N::number($rows[0]['tot']);
+    }
+
+    /**
+     * Find the average number of children in families.
+     *
+     * @return string
+     */
+    public function averageChildren() {
+        $rows = $this->runSql("SELECT AVG(f_numchil) AS tot FROM `##families` WHERE f_file={$this->tree->getTreeId()}");
+
+        return I18N::number($rows[0]['tot'], 2);
+    }
+
+    /**
+     * General query on familes/children.
+     *
+     * @param bool     $simple
+     * @param string   $sex
+     * @param int      $year1
+     * @param int      $year2
+     * @param string[] $params
+     *
+     * @return string|string[][]
+     */
+    public function statsChildrenQuery($simple = true, $sex = 'BOTH', $year1 = -1, $year2 = -1, $params = array()) {
+        if ($simple) {
+            if (isset($params[0]) && $params[0] != '') {
+                $size = strtolower($params[0]);
+            } else {
+                $size = '220x200';
+            }
+            $sizes = explode('x', $size);
+            $max   = 0;
+            $rows  = $this->runSql(
+                " SELECT ROUND(AVG(f_numchil),2) AS num, FLOOR(d_year/100+1) AS century" .
+                " FROM  `##families`" .
+                " JOIN  `##dates` ON (d_file = f_file AND d_gid=f_id)" .
+                " WHERE f_file = {$this->tree->getTreeId()}" .
+                " AND   d_julianday1<>0" .
+                " AND   d_fact = 'MARR'" .
+                " AND   d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')" .
+                " GROUP BY century" .
+                " ORDER BY century");
+            if (empty($rows)) {
+                return '';
+            }
+            foreach ($rows as $values) {
+                if ($max < $values['num']) {
+                    $max = $values['num'];
+                }
+            }
+            $chm    = "";
+            $chxl   = "0:|";
+            $i      = 0;
+            $counts = array();
+            foreach ($rows as $values) {
+                if ($sizes[0] < 980) {
+                    $sizes[0] += 38;
+                }
+                $chxl .= $this->centuryName($values['century']) . "|";
+                if ($max <= 5) {
+                    $counts[] = round($values['num'] * 819.2 - 1, 1);
+                } elseif ($max <= 10) {
+                    $counts[] = round($values['num'] * 409.6, 1);
+                } else {
+                    $counts[] = round($values['num'] * 204.8, 1);
+                }
+                $chm .= 't' . $values['num'] . ',000000,0,' . $i . ',11,1|';
+                $i++;
+            }
+            $chd = $this->arrayToExtendedEncoding($counts);
+            $chm = substr($chm, 0, -1);
+            if ($max <= 5) {
+                $chxl .= "1:||" . I18N::translate('century') . "|2:|0|1|2|3|4|5|3:||" . I18N::translate('Number of children') . "|";
+            } elseif ($max <= 10) {
+                $chxl .= "1:||" . I18N::translate('century') . "|2:|0|1|2|3|4|5|6|7|8|9|10|3:||" . I18N::translate('Number of children') . "|";
+            } else {
+                $chxl .= "1:||" . I18N::translate('century') . "|2:|0|1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|3:||" . I18N::translate('Number of children') . "|";
+            }
+
+            return "<img src=\"https://chart.googleapis.com/chart?cht=bvg&amp;chs={$sizes[0]}x{$sizes[1]}&amp;chf=bg,s,ffffff00|c,s,ffffff00&amp;chm=D,FF0000,0,0,3,1|{$chm}&amp;chd=e:{$chd}&amp;chco=0000FF&amp;chbh=30,3&amp;chxt=x,x,y,y&amp;chxl=" . rawurlencode($chxl) . "\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Average number of children per family') . "\" title=\"" . I18N::translate('Average number of children per family') . "\" />";
+        } else {
+            if ($sex == 'M') {
+                $sql =
+                    "SELECT num, COUNT(*) AS total FROM " .
+                    "(SELECT count(i_sex) AS num FROM `##link` " .
+                    "LEFT OUTER JOIN `##individuals` " .
+                    "ON l_from=i_id AND l_file=i_file AND i_sex='M' AND l_type='FAMC' " .
+                    "JOIN `##families` ON f_file=l_file AND f_id=l_to WHERE f_file={$this->tree->getTreeId()} GROUP BY l_to" .
+                    ") boys" .
+                    " GROUP BY num" .
+                    " ORDER BY num";
+            } elseif ($sex == 'F') {
+                $sql =
+                    "SELECT num, COUNT(*) AS total FROM " .
+                    "(SELECT count(i_sex) AS num FROM `##link` " .
+                    "LEFT OUTER JOIN `##individuals` " .
+                    "ON l_from=i_id AND l_file=i_file AND i_sex='F' AND l_type='FAMC' " .
+                    "JOIN `##families` ON f_file=l_file AND f_id=l_to WHERE f_file={$this->tree->getTreeId()} GROUP BY l_to" .
+                    ") girls" .
+                    " GROUP BY num" .
+                    " ORDER BY num";
+            } else {
+                $sql = "SELECT f_numchil, COUNT(*) AS total FROM `##families` ";
+                if ($year1 >= 0 && $year2 >= 0) {
+                    $sql .=
+                        "AS fam LEFT JOIN `##dates` AS married ON married.d_file = {$this->tree->getTreeId()}"
+                        . " WHERE"
+                        . " married.d_gid = fam.f_id AND"
+                        . " fam.f_file = {$this->tree->getTreeId()} AND"
+                        . " married.d_fact = 'MARR' AND"
+                        . " married.d_year BETWEEN '{$year1}' AND '{$year2}'";
+                } else {
+                    $sql .= "WHERE f_file={$this->tree->getTreeId()}";
+                }
+                $sql .= " GROUP BY f_numchil";
+            }
+            $rows = $this->runSql($sql);
+
+            return $rows;
+        }
+    }
+
+    /**
+     * Genearl query on families/children.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function statsChildren($params = array()) {
+        return $this->statsChildrenQuery(true, 'BOTH', -1, -1, $params);
+    }
+
+    /**
+     * Find the names of siblings with the widest age gap.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topAgeBetweenSiblingsName($params = array()) {
+        return $this->ageBetweenSiblingsQuery('name', $params);
+    }
+
+    /**
+     * Find the widest age gap between siblings.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topAgeBetweenSiblings($params = array()) {
+        return $this->ageBetweenSiblingsQuery('age', $params);
+    }
+
+    /**
+     * Find the name of siblings with the widest age gap.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topAgeBetweenSiblingsFullName($params = array()) {
+        return $this->ageBetweenSiblingsQuery('nolist', $params);
+    }
+
+    /**
+     * Find the siblings with the widest age gaps.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topAgeBetweenSiblingsList($params = array()) {
+        return $this->ageBetweenSiblingsQuery('list', $params);
+    }
+
+    /**
+     * Find the families with no children.
+     *
+     * @return string
+     */
+    private function noChildrenFamiliesQuery() {
+        $rows = $this->runSql(
+            " SELECT COUNT(*) AS tot" .
+            " FROM  `##families`" .
+            " WHERE f_numchil = 0 AND f_file = {$this->tree->getTreeId()}");
+
+        return $rows[0]['tot'];
+    }
+
+    /**
+     * Find the families with no children.
+     *
+     * @return string
+     */
+    public function noChildrenFamilies() {
+        return I18N::number($this->noChildrenFamiliesQuery());
+    }
+
+    /**
+     * Find the families with no children.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function noChildrenFamiliesList($params = array()) {
+        if (isset($params[0]) && $params[0] != '') {
+            $type = strtolower($params[0]);
+        } else {
+            $type = 'list';
+        }
+        $rows = $this->runSql(
+            " SELECT f_id AS family" .
+            " FROM `##families` AS fam" .
+            " WHERE f_numchil = 0 AND fam.f_file = {$this->tree->getTreeId()}");
+        if (!isset($rows[0])) {
+            return '';
+        }
+        $top10 = array();
+        foreach ($rows as $row) {
+            $family = Family::getInstance($row['family'], $this->tree);
+            if ($family->canShow()) {
+                if ($type == 'list') {
+                    $top10[] = "<li><a href=\"" . $family->getHtmlUrl() . "\">" . $family->getFullName() . "</a></li>";
+                } else {
+                    $top10[] = "<a href=\"" . $family->getHtmlUrl() . "\">" . $family->getFullName() . "</a>";
+                }
+            }
+        }
+        if ($type == 'list') {
+            $top10 = implode('', $top10);
+        } else {
+            $top10 = implode('; ', $top10);
+        }
+        if (I18N::direction() === 'rtl') {
+            $top10 = str_replace(array('[', ']', '(', ')', '+'), array('&rlm;[', '&rlm;]', '&rlm;(', '&rlm;)', '&rlm;+'), $top10);
+        }
+        if ($type === 'list') {
+            return '<ul>' . $top10 . '</ul>';
+        }
+
+        return $top10;
+    }
+
+    /**
+     * Create a chart of children with no families.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function chartNoChildrenFamilies($params = array()) {
+        if (isset($params[0]) && $params[0] != '') {
+            $size = strtolower($params[0]);
+        } else {
+            $size = '220x200';
+        }
+        if (isset($params[1]) && $params[1] != '') {
+            $year1 = $params[1];
+        } else {
+            $year1 = -1;
+        }
+        if (isset($params[2]) && $params[2] != '') {
+            $year2 = $params[2];
+        } else {
+            $year2 = -1;
+        }
+        $sizes = explode('x', $size);
+        if ($year1 >= 0 && $year2 >= 0) {
+            $years = " married.d_year BETWEEN '{$year1}' AND '{$year2}' AND";
+        } else {
+            $years = "";
+        }
+        $max  = 0;
+        $tot  = 0;
+        $rows = $this->runSql(
+            "SELECT" .
+            " COUNT(*) AS count," .
+            " FLOOR(married.d_year/100+1) AS century" .
+            " FROM" .
+            " `##families` AS fam" .
+            " JOIN" .
+            " `##dates` AS married ON (married.d_file = fam.f_file AND married.d_gid = fam.f_id)" .
+            " WHERE" .
+            " f_numchil = 0 AND" .
+            " fam.f_file = {$this->tree->getTreeId()} AND" .
+            $years .
+            " married.d_fact = 'MARR' AND" .
+            " married.d_type IN ('@#DGREGORIAN@', '@#DJULIAN@')" .
+            " GROUP BY century ORDER BY century"
+        );
+        if (empty($rows)) {
+            return '';
+        }
+        foreach ($rows as $values) {
+            if ($max < $values['count']) {
+                $max = $values['count'];
+            }
+            $tot += (int) $values['count'];
+        }
+        $unknown = $this->noChildrenFamiliesQuery() - $tot;
+        if ($unknown > $max) {
+            $max = $unknown;
+        }
+        $chm    = "";
+        $chxl   = "0:|";
+        $i      = 0;
+        $counts = array();
+        foreach ($rows as $values) {
+            if ($sizes[0] < 980) {
+                $sizes[0] += 38;
+            }
+            $chxl .= $this->centuryName($values['century']) . "|";
+            $counts[] = round(4095 * $values['count'] / ($max + 1));
+            $chm .= 't' . $values['count'] . ',000000,0,' . $i . ',11,1|';
+            $i++;
+        }
+        $counts[] = round(4095 * $unknown / ($max + 1));
+        $chd      = $this->arrayToExtendedEncoding($counts);
+        $chm .= 't' . $unknown . ',000000,0,' . $i . ',11,1';
+        $chxl .= I18N::translateContext('unknown century', 'Unknown') . "|1:||" . I18N::translate('century') . "|2:|0|";
+        $step = $max + 1;
+        for ($d = (int) ($max + 1); $d > 0; $d--) {
+            if (($max + 1) < ($d * 10 + 1) && fmod(($max + 1), $d) == 0) {
+                $step = $d;
+            }
+        }
+        if ($step == (int) ($max + 1)) {
+            for ($d = (int) ($max); $d > 0; $d--) {
+                if ($max < ($d * 10 + 1) && fmod($max, $d) == 0) {
+                    $step = $d;
+                }
+            }
+        }
+        for ($n = $step; $n <= ($max + 1); $n += $step) {
+            $chxl .= $n . "|";
+        }
+        $chxl .= "3:||" . I18N::translate('Total families') . "|";
+
+        return "<img src=\"https://chart.googleapis.com/chart?cht=bvg&amp;chs={$sizes[0]}x{$sizes[1]}&amp;chf=bg,s,ffffff00|c,s,ffffff00&amp;chm=D,FF0000,0,0:" . ($i - 1) . ",3,1|{$chm}&amp;chd=e:{$chd}&amp;chco=0000FF,ffffff00&amp;chbh=30,3&amp;chxt=x,x,y,y&amp;chxl=" . rawurlencode($chxl) . "\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . I18N::translate('Number of families without children') . "\" title=\"" . I18N::translate('Number of families without children') . "\" />";
+    }
+
+    /**
+     * Find the couple with the most grandchildren.
+     *
+     * @param string   $type
+     * @param string[] $params
+     *
+     * @return string
+     */
+    private function topTenGrandFamilyQuery($type = 'list', $params = array()) {
+        if (isset($params[0])) {
+            $total = (int) $params[0];
+        } else {
+            $total = 10;
+        }
+        $rows = $this->runSql(
+            "SELECT COUNT(*) AS tot, f_id AS id" .
+            " FROM `##families`" .
+            " JOIN `##link` AS children ON children.l_file = {$this->tree->getTreeId()}" .
+            " JOIN `##link` AS mchildren ON mchildren.l_file = {$this->tree->getTreeId()}" .
+            " JOIN `##link` AS gchildren ON gchildren.l_file = {$this->tree->getTreeId()}" .
+            " WHERE" .
+            " f_file={$this->tree->getTreeId()} AND" .
+            " children.l_from=f_id AND" .
+            " children.l_type='CHIL' AND" .
+            " children.l_to=mchildren.l_from AND" .
+            " mchildren.l_type='FAMS' AND" .
+            " mchildren.l_to=gchildren.l_from AND" .
+            " gchildren.l_type='CHIL'" .
+            " GROUP BY id" .
+            " ORDER BY tot DESC" .
+            " LIMIT " . $total
+        );
+        if (!isset($rows[0])) {
+            return '';
+        }
+        $top10 = array();
+        foreach ($rows as $row) {
+            $family = Family::getInstance($row['id'], $this->tree);
+            if ($family->canShow()) {
+                if ($type === 'list') {
+                    $top10[] =
+                        '<li><a href="' . $family->getHtmlUrl() . '">' . $family->getFullName() . '</a> - ' .
+                        I18N::plural('%s grandchild', '%s grandchildren', $row['tot'], I18N::number($row['tot']));
+                } else {
+                    $top10[] =
+                        '<a href="' . $family->getHtmlUrl() . '">' . $family->getFullName() . '</a> - ' .
+                        I18N::plural('%s grandchild', '%s grandchildren', $row['tot'], I18N::number($row['tot']));
+                }
+            }
+        }
+        if ($type === 'list') {
+            $top10 = implode('', $top10);
+        } else {
+            $top10 = implode('; ', $top10);
+        }
+        if (I18N::direction() === 'rtl') {
+            $top10 = str_replace(array('[', ']', '(', ')', '+'), array('&rlm;[', '&rlm;]', '&rlm;(', '&rlm;)', '&rlm;+'), $top10);
+        }
+        if ($type === 'list') {
+            return '<ul>' . $top10 . '</ul>';
+        }
+
+        return $top10;
+    }
+
+    /**
+     * Find the couple with the most grandchildren.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topTenLargestGrandFamily($params = array()) {
+        return $this->topTenGrandFamilyQuery('nolist', $params);
+    }
+
+    /**
+     * Find the couple with the most grandchildren.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function topTenLargestGrandFamilyList($params = array()) {
+        return $this->topTenGrandFamilyQuery('list', $params);
+    }
+
+    /**
+     * Find common surnames.
+     *
+     * @param string   $type
+     * @param bool     $show_tot
+     * @param string[] $params
+     *
+     * @return string
+     */
+    private function commonSurnamesQuery($type = 'list', $show_tot = false, $params = array()) {
+        $threshold          = empty($params[0]) ? 10 : (int) $params[0];
+        $number_of_surnames = empty($params[1]) ? 10 : (int) $params[1];
+        $sorting            = empty($params[2]) ? 'alpha' : $params[2];
+
+        $surname_list = FunctionsDb::getTopSurnames($this->tree->getTreeId(), $threshold, $number_of_surnames);
+        if (empty($surname_list)) {
+            return '';
+        }
+
+        switch ($sorting) {
+        default:
+        case 'alpha':
+            uksort($surname_list, '\Fisharebest\Webtrees\I18N::strcasecmp');
+            break;
+        case 'count':
+            asort($surname_list);
+            break;
+        case 'rcount':
+            arsort($surname_list);
+            break;
+        }
+
+        // Note that we count/display SPFX SURN, but sort/group under just SURN
+        $surnames = array();
+        foreach (array_keys($surname_list) as $surname) {
+            $surnames = array_merge($surnames, QueryName::surnames($this->tree, $surname, '', false, false));
+        }
+
+        return FunctionsPrintLists::surnameList($surnames, ($type == 'list' ? 1 : 2), $show_tot, 'indilist.php', $this->tree);
+    }
+
+    /**
+     * Find common surnames.
+     *
+     * @return string
+     */
+    public function getCommonSurname() {
+        $surnames = array_keys(FunctionsDb::getTopSurnames($this->tree->getTreeId(), 1, 1));
+
+        return array_shift($surnames);
+    }
+
+    /**
+     * Find common surnames.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonSurnames($params = array('', '', 'alpha')) {
+        return $this->commonSurnamesQuery('nolist', false, $params);
+    }
+
+    /**
+     * Find common surnames.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonSurnamesTotals($params = array('', '', 'rcount')) {
+        return $this->commonSurnamesQuery('nolist', true, $params);
+    }
+
+    /**
+     * Find common surnames.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonSurnamesList($params = array('', '', 'alpha')) {
+        return $this->commonSurnamesQuery('list', false, $params);
+    }
+
+    /**
+     * Find common surnames.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonSurnamesListTotals($params = array('', '', 'rcount')) {
+        return $this->commonSurnamesQuery('list', true, $params);
+    }
+
+    /**
+     * Create a chart of common surnames.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function chartCommonSurnames($params = array()) {
+        $WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
+        $WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
+        $WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
+        $WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
+
+        $size               = empty($params[0]) ? $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y : strtolower($params[0]);
+        $color_from         = empty($params[1]) ? $WT_STATS_CHART_COLOR1 : strtolower($params[1]);
+        $color_to           = empty($params[2]) ? $WT_STATS_CHART_COLOR2 : strtolower($params[2]);
+        $number_of_surnames = empty($params[3]) ? 10 : (int) $params[3];
+
+        $sizes    = explode('x', $size);
+        $tot_indi = $this->totalIndividualsQuery();
+        $surnames = FunctionsDb::getTopSurnames($this->tree->getTreeId(), 0, $number_of_surnames);
+        if (empty($surnames)) {
+            return '';
+        }
+        $SURNAME_TRADITION = $this->tree->getPreference('SURNAME_TRADITION');
+        $all_surnames      = array();
+        $tot               = 0;
+        foreach ($surnames as $surname => $num) {
+            $all_surnames = array_merge($all_surnames, QueryName::surnames($this->tree, I18N::strtoupper($surname), '', false, false));
+            $tot += $num;
+        }
+        $chd = '';
+        $chl = array();
+        foreach ($all_surnames as $surns) {
+            $count_per = 0;
+            $max_name  = 0;
+            $top_name  = '';
+            foreach ($surns as $spfxsurn => $indis) {
+                $per = count($indis);
+                $count_per += $per;
+                // select most common surname from all variants
+                if ($per > $max_name) {
+                    $max_name = $per;
+                    $top_name = $spfxsurn;
+                }
+            }
+            switch ($SURNAME_TRADITION) {
+            case 'polish':
+                // most common surname should be in male variant (Kowalski, not Kowalska)
+                $top_name = preg_replace(array('/ska$/', '/cka$/', '/dzka$/', '/żka$/'), array('ski', 'cki', 'dzki', 'żki'), $top_name);
+            }
+            $per = round(100 * $count_per / $tot_indi, 0);
+            $chd .= $this->arrayToExtendedEncoding(array($per));
+            $chl[] = $top_name . ' - ' . I18N::number($count_per);
+
+        }
+        $per = round(100 * ($tot_indi - $tot) / $tot_indi, 0);
+        $chd .= $this->arrayToExtendedEncoding(array($per));
+        $chl[] = I18N::translate('Other') . ' - ' . I18N::number($tot_indi - $tot);
+
+        $chart_title = implode(I18N::$list_separator, $chl);
+        $chl         = implode('|', $chl);
+
+        return '<img src="https://chart.googleapis.com/chart?cht=p3&amp;chd=e:' . $chd . '&amp;chs=' . $size . '&amp;chco=' . $color_from . ',' . $color_to . '&amp;chf=bg,s,ffffff00&amp;chl=' . rawurlencode($chl) . '" width="' . $sizes[0] . '" height="' . $sizes[1] . '" alt="' . $chart_title . '" title="' . $chart_title . '" />';
+    }
+
+    /**
+     * Find common given names.
+     *
+     * @param string   $sex
+     * @param string   $type
+     * @param bool     $show_tot
+     * @param string[] $params
+     *
+     * @return string
+     */
+    private function commonGivenQuery($sex = 'B', $type = 'list', $show_tot = false, $params = array()) {
+        if (isset($params[0]) && $params[0] != '' && $params[0] >= 0) {
+            $threshold = (int) $params[0];
+        } else {
+            $threshold = 1;
+        }
+        if (isset($params[1]) && $params[1] != '' && $params[1] >= 0) {
+            $maxtoshow = (int) $params[1];
+        } else {
+            $maxtoshow = 10;
+        }
+
+        switch ($sex) {
+        case 'M':
+            $sex_sql = "i_sex='M'";
+            break;
+        case 'F':
+            $sex_sql = "i_sex='F'";
+            break;
+        case 'U':
+            $sex_sql = "i_sex='U'";
+            break;
+        case 'B':
+        default:
+            $sex_sql = "i_sex<>'U'";
+            break;
+        }
+        $ged_id = $this->tree->getTreeId();
+
+        $rows = Database::prepare("SELECT n_givn, COUNT(*) AS num FROM `##name` JOIN `##individuals` ON (n_id=i_id AND n_file=i_file) WHERE n_file={$ged_id} AND n_type<>'_MARNM' AND n_givn NOT IN ('@P.N.', '') AND LENGTH(n_givn)>1 AND {$sex_sql} GROUP BY n_id, n_givn")
+            ->fetchAll();
+        $nameList = array();
+        foreach ($rows as $row) {
+            // Split “John Thomas” into “John” and “Thomas” and count against both totals
+            foreach (explode(' ', $row->n_givn) as $given) {
+                // Exclude initials and particles.
+                if (!preg_match('/^([A-Z]|[a-z]{1,3})$/', $given)) {
+                    if (array_key_exists($given, $nameList)) {
+                        $nameList[$given] += $row->num;
+                    } else {
+                        $nameList[$given] = $row->num;
+                    }
+                }
+            }
+        }
+        arsort($nameList, SORT_NUMERIC);
+        $nameList = array_slice($nameList, 0, $maxtoshow);
+
+        if (count($nameList) == 0) {
+            return '';
+        }
+        if ($type == 'chart') {
+            return $nameList;
+        }
+        $common = array();
+        foreach ($nameList as $given => $total) {
+            if ($maxtoshow !== -1) {
+                if ($maxtoshow-- <= 0) {
+                    break;
+                }
+            }
+            if ($total < $threshold) {
+                break;
+            }
+            if ($show_tot) {
+                $tot = ' (' . I18N::number($total) . ')';
+            } else {
+                $tot = '';
+            }
+            switch ($type) {
+            case 'table':
+                $common[] = '<tr><td>' . $given . '</td><td>' . I18N::number($total) . '</td><td>' . $total . '</td></tr>';
+                break;
+            case 'list':
+                $common[] = '<li><span dir="auto">' . $given . '</span>' . $tot . '</li>';
+                break;
+            case 'nolist':
+                $common[] = '<span dir="auto">' . $given . '</span>' . $tot;
+                break;
+            }
+        }
+        if ($common) {
+            switch ($type) {
+            case 'table':
+                global $controller;
+                $table_id = Uuid::uuid4(); // lists requires a unique ID in case there are multiple lists per page
+                $controller
+                    ->addExternalJavascript(WT_JQUERY_DATATABLES_JS_URL)
+                    ->addInlineJavascript('
 					jQuery("#' . $table_id . '").dataTable({
 						dom: \'t\',
 						autoWidth: false,
@@ -5574,1417 +5574,1417 @@ 
 					});
 					jQuery("#' . $table_id . '").css("visibility", "visible");
 				');
-				$lookup = array('M' => I18N::translate('Male'), 'F' => I18N::translate('Female'), 'U' => I18N::translateContext('unknown gender', 'Unknown'), 'B' => I18N::translate('All'));
-
-				return '<table id="' . $table_id . '" class="givn-list"><thead><tr><th class="ui-state-default" colspan="3">' . $lookup[$sex] . '</th></tr><tr><th>' . I18N::translate('Name') . '</th><th>' . I18N::translate('Count') . '</th><th>COUNT</th></tr></thead><tbody>' . implode('', $common) . '</tbody></table>';
-			case 'list':
-				return '<ul>' . implode('', $common) . '</ul>';
-			case 'nolist':
-				return implode(I18N::$list_separator, $common);
-			default:
-				return '';
-			}
-		} else {
-			return '';
-		}
-	}
-
-	/**
-	 * Find common give names.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGiven($params = array(1, 10, 'alpha')) {
-		return $this->commonGivenQuery('B', 'nolist', false, $params);
-	}
-
-	/**
-	 * Find common give names.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenTotals($params = array(1, 10, 'rcount')) {
-		return $this->commonGivenQuery('B', 'nolist', true, $params);
-	}
-
-	/**
-	 * Find common give names.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenList($params = array(1, 10, 'alpha')) {
-		return $this->commonGivenQuery('B', 'list', false, $params);
-	}
-
-	/**
-	 * Find common give names.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenListTotals($params = array(1, 10, 'rcount')) {
-		return $this->commonGivenQuery('B', 'list', true, $params);
-	}
-
-	/**
-	 * Find common give names.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenTable($params = array(1, 10, 'rcount')) {
-		return $this->commonGivenQuery('B', 'table', false, $params);
-	}
-
-	/**
-	 * Find common give names of females.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenFemale($params = array(1, 10, 'alpha')) {
-		return $this->commonGivenQuery('F', 'nolist', false, $params);
-	}
-
-	/**
-	 * Find common give names of females.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenFemaleTotals($params = array(1, 10, 'rcount')) {
-		return $this->commonGivenQuery('F', 'nolist', true, $params);
-	}
-
-	/**
-	 * Find common give names of females.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenFemaleList($params = array(1, 10, 'alpha')) {
-		return $this->commonGivenQuery('F', 'list', false, $params);
-	}
-
-	/**
-	 * Find common give names of females.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenFemaleListTotals($params = array(1, 10, 'rcount')) {
-		return $this->commonGivenQuery('F', 'list', true, $params);
-	}
-
-	/**
-	 * Find common give names of females.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenFemaleTable($params = array(1, 10, 'rcount')) {
-		return $this->commonGivenQuery('F', 'table', false, $params);
-	}
-
-	/**
-	 * Find common give names of males.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenMale($params = array(1, 10, 'alpha')) {
-		return $this->commonGivenQuery('M', 'nolist', false, $params);
-	}
-
-	/**
-	 * Find common give names of males.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenMaleTotals($params = array(1, 10, 'rcount')) {
-		return $this->commonGivenQuery('M', 'nolist', true, $params);
-	}
-
-	/**
-	 * Find common give names of males.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenMaleList($params = array(1, 10, 'alpha')) {
-		return $this->commonGivenQuery('M', 'list', false, $params);
-	}
-
-	/**
-	 * Find common give names of males.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenMaleListTotals($params = array(1, 10, 'rcount')) {
-		return $this->commonGivenQuery('M', 'list', true, $params);
-	}
-
-	/**
-	 * Find common give names of males.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenMaleTable($params = array(1, 10, 'rcount')) {
-		return $this->commonGivenQuery('M', 'table', false, $params);
-	}
-
-	/**
-	 * Find common give names of unknown sexes.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenUnknown($params = array(1, 10, 'alpha')) {
-		return $this->commonGivenQuery('U', 'nolist', false, $params);
-	}
-
-	/**
-	 * Find common give names of unknown sexes.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenUnknownTotals($params = array(1, 10, 'rcount')) {
-		return $this->commonGivenQuery('U', 'nolist', true, $params);
-	}
-
-	/**
-	 * Find common give names of unknown sexes.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenUnknownList($params = array(1, 10, 'alpha')) {
-		return $this->commonGivenQuery('U', 'list', false, $params);
-	}
-
-	/**
-	 * Find common give names of unknown sexes.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenUnknownListTotals($params = array(1, 10, 'rcount')) {
-		return $this->commonGivenQuery('U', 'list', true, $params);
-	}
-
-	/**
-	 * Find common give names of unknown sexes.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function commonGivenUnknownTable($params = array(1, 10, 'rcount')) {
-		return $this->commonGivenQuery('U', 'table', false, $params);
-	}
-
-	/**
-	 * Create a chart of common given names.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function chartCommonGiven($params = array()) {
-		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
-		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
-		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
-		$WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
-
-		if (isset($params[0]) && $params[0] != '') {
-			$size = strtolower($params[0]);
-		} else {
-			$size = $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y;
-		}
-		if (isset($params[1]) && $params[1] != '') {
-			$color_from = strtolower($params[1]);
-		} else {
-			$color_from = $WT_STATS_CHART_COLOR1;
-		}
-		if (isset($params[2]) && $params[2] != '') {
-			$color_to = strtolower($params[2]);
-		} else {
-			$color_to = $WT_STATS_CHART_COLOR2;
-		}
-		if (isset($params[4]) && $params[4] != '') {
-			$maxtoshow = strtolower($params[4]);
-		} else {
-			$maxtoshow = 7;
-		}
-		$sizes    = explode('x', $size);
-		$tot_indi = $this->totalIndividualsQuery();
-		$given    = $this->commonGivenQuery('B', 'chart');
-		if (!is_array($given)) {
-			return '';
-		}
-		$given = array_slice($given, 0, $maxtoshow);
-		if (count($given) <= 0) {
-			return '';
-		}
-		$tot = 0;
-		foreach ($given as $count) {
-			$tot += $count;
-		}
-		$chd = '';
-		$chl = array();
-		foreach ($given as $givn => $count) {
-			if ($tot == 0) {
-				$per = 0;
-			} else {
-				$per = round(100 * $count / $tot_indi, 0);
-			}
-			$chd .= $this->arrayToExtendedEncoding(array($per));
-			$chl[] = $givn . ' - ' . I18N::number($count);
-		}
-		$per = round(100 * ($tot_indi - $tot) / $tot_indi, 0);
-		$chd .= $this->arrayToExtendedEncoding(array($per));
-		$chl[] = I18N::translate('Other') . ' - ' . I18N::number($tot_indi - $tot);
-
-		$chart_title = implode(I18N::$list_separator, $chl);
-		$chl         = implode('|', $chl);
-
-		return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_from},{$color_to}&amp;chf=bg,s,ffffff00&amp;chl=" . rawurlencode($chl) . "\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . $chart_title . "\" title=\"" . $chart_title . "\" />";
-	}
-
-	/**
-	 * Who is currently logged in?
-	 *
-	 * @param string $type
-	 *
-	 * @return string
-	 */
-	private function usersLoggedInQuery($type = 'nolist') {
-		$content = '';
-		// List active users
-		$NumAnonymous = 0;
-		$loggedusers  = array();
-		foreach (User::allLoggedIn() as $user) {
-			if (Auth::isAdmin() || $user->getPreference('visibleonline')) {
-				$loggedusers[] = $user;
-			} else {
-				$NumAnonymous++;
-			}
-		}
-		$LoginUsers = count($loggedusers);
-		if ($LoginUsers == 0 && $NumAnonymous == 0) {
-			return I18N::translate('No signed-in and no anonymous users');
-		}
-		if ($NumAnonymous > 0) {
-			$content .= '<b>' . I18N::plural('%s anonymous signed-in user', '%s anonymous signed-in users', $NumAnonymous, I18N::number($NumAnonymous)) . '</b>';
-		}
-		if ($LoginUsers > 0) {
-			if ($NumAnonymous) {
-				if ($type == 'list') {
-					$content .= "<br><br>";
-				} else {
-					$content .= " " . I18N::translate('and') . " ";
-				}
-			}
-			$content .= '<b>' . I18N::plural('%s signed-in user', '%s signed-in users', $LoginUsers, I18N::number($LoginUsers)) . '</b>';
-			if ($type == 'list') {
-				$content .= '<ul>';
-			} else {
-				$content .= ': ';
-			}
-		}
-		if (Auth::check()) {
-			foreach ($loggedusers as $user) {
-				if ($type == 'list') {
-					$content .= '<li>' . Filter::escapeHtml($user->getRealName()) . ' - ' . Filter::escapeHtml($user->getUserName());
-				} else {
-					$content .= Filter::escapeHtml($user->getRealName()) . ' - ' . Filter::escapeHtml($user->getUserName());
-				}
-				if (Auth::id() != $user->getUserId() && $user->getPreference('contactmethod') != 'none') {
-					if ($type == 'list') {
-						$content .= '<br><a class="icon-email" href="#" onclick="return message(\'' . $user->getUserId() . '\', \'\', \'' . Filter::escapeJs(Functions::getQueryUrl()) . '\');" title="' . I18N::translate('Send a message') . '"></a>';
-					} else {
-						$content .= ' <a class="icon-email" href="#" onclick="return message(\'' . $user->getUserId() . '\', \'\', \'' . Filter::escapeJs(Functions::getQueryUrl()) . '\');" title="' . I18N::translate('Send a message') . '"></a>';
-					}
-				}
-				if ($type == 'list') {
-					$content .= '</li>';
-				}
-			}
-		}
-		if ($type == 'list') {
-			$content .= '</ul>';
-		}
-
-		return $content;
-	}
-
-	/**
-	 * NUmber of users who are currently logged in?
-	 *
-	 * @param string $type
-	 *
-	 * @return int
-	 */
-	private function usersLoggedInTotalQuery($type = 'all') {
-		$anon    = 0;
-		$visible = 0;
-		foreach (User::allLoggedIn() as $user) {
-			if (Auth::isAdmin() || $user->getPreference('visibleonline')) {
-				$visible++;
-			} else {
-				$anon++;
-			}
-		}
-		if ($type == 'anon') {
-			return $anon;
-		} elseif ($type == 'visible') {
-			return $visible;
-		} else {
-			return $visible + $anon;
-		}
-	}
-
-	/**
-	 * Who is currently logged in?
-	 *
-	 * @return string
-	 */
-	public function usersLoggedIn() {
-		return $this->usersLoggedInQuery('nolist');
-	}
-
-	/**
-	 * Who is currently logged in?
-	 *
-	 * @return string
-	 */
-	public function usersLoggedInList() {
-		return $this->usersLoggedInQuery('list');
-	}
-
-	/**
-	 * Who is currently logged in?
-	 *
-	 * @return int
-	 */
-	public function usersLoggedInTotal() {
-		return $this->usersLoggedInTotalQuery('all');
-	}
-
-	/**
-	 * Which visitors are currently logged in?
-	 *
-	 * @return int
-	 */
-	public function usersLoggedInTotalAnon() {
-		return $this->usersLoggedInTotalQuery('anon');
-	}
-
-	/**
-	 * Which visitors are currently logged in?
-	 *
-	 * @return int
-	 */
-	public function usersLoggedInTotalVisible() {
-		return $this->usersLoggedInTotalQuery('visible');
-	}
-
-	/**
-	 * Get the current user's ID.
-	 *
-	 * @return null|string
-	 */
-	public function userId() {
-		return Auth::id();
-	}
-
-	/**
-	 * Get the current user's username.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function userName($params = array()) {
-		if (Auth::check()) {
-			return Filter::escapeHtml(Auth::user()->getUserName());
-		} elseif (isset($params[0]) && $params[0] != '') {
-			// if #username:visitor# was specified, then "visitor" will be returned when the user is not logged in
-			return Filter::escapeHtml($params[0]);
-		} else {
-			return '';
-		}
-	}
-
-	/**
-	 * Get the current user's full name.
-	 *
-	 * @return string
-	 */
-	public function userFullName() {
-		return Auth::check() ? Auth::user()->getRealNameHtml() : '';
-	}
-
-	/**
-	 * Get the newest registered user.
-	 *
-	 * @param string   $type
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	private function getLatestUserData($type = 'userid', $params = array()) {
-		static $user_id = null;
-
-		if ($user_id === null) {
-			$user = User::findLatestToRegister();
-		} else {
-			$user = User::find($user_id);
-		}
-
-		switch ($type) {
-		default:
-		case 'userid':
-			return $user->getUserId();
-		case 'username':
-			return Filter::escapeHtml($user->getUserName());
-		case 'fullname':
-			return $user->getRealNameHtml();
-		case 'regdate':
-			if (is_array($params) && isset($params[0]) && $params[0] != '') {
-				$datestamp = $params[0];
-			} else {
-				$datestamp = I18N::dateFormat();
-			}
-
-			return FunctionsDate::timestampToGedcomDate($user->getPreference('reg_timestamp'))->display(false, $datestamp);
-		case 'regtime':
-			if (is_array($params) && isset($params[0]) && $params[0] != '') {
-				$datestamp = $params[0];
-			} else {
-				$datestamp = str_replace('%', '', I18N::timeFormat());
-			}
-
-			return date($datestamp, $user->getPreference('reg_timestamp'));
-		case 'loggedin':
-			if (is_array($params) && isset($params[0]) && $params[0] != '') {
-				$yes = $params[0];
-			} else {
-				$yes = I18N::translate('yes');
-			}
-			if (is_array($params) && isset($params[1]) && $params[1] != '') {
-				$no = $params[1];
-			} else {
-				$no = I18N::translate('no');
-			}
-
-			return Database::prepare("SELECT 1 FROM `##session` WHERE user_id=? LIMIT 1")->execute(array($user->getUserId()))->fetchOne() ? $yes : $no;
-		}
-	}
-
-	/**
-	 * Get the newest registered user's ID.
-	 *
-	 * @return string
-	 */
-	public function latestUserId() {
-		return $this->getLatestUserData('userid');
-	}
-
-	/**
-	 * Get the newest registered user's username.
-	 *
-	 * @return string
-	 */
-	public function latestUserName() {
-		return $this->getLatestUserData('username');
-	}
-
-	/**
-	 * Get the newest registered user's real name.
-	 *
-	 * @return string
-	 */
-	public function latestUserFullName() {
-		return $this->getLatestUserData('fullname');
-	}
-
-	/**
-	 * Get the date of the newest user registration.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function latestUserRegDate($params = array()) {
-		return $this->getLatestUserData('regdate', $params);
-	}
-
-	/**
-	 * Find the timestamp of the latest user to register.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function latestUserRegTime($params = array()) {
-		return $this->getLatestUserData('regtime', $params);
-	}
-
-	/**
-	 * Find the most recent user to log in.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function latestUserLoggedin($params = array()) {
-		return $this->getLatestUserData('loggedin', $params);
-	}
-
-	/**
-	 * Create a link to contact the webmaster.
-	 *
-	 * @return string
-	 */
-	public function contactWebmaster() {
-		$user_id = $this->tree->getPreference('WEBMASTER_USER_ID');
-		$user    = User::find($user_id);
-		if ($user) {
-			return Theme::theme()->contactLink($user);
-		} else {
-			return $user_id;
-		}
-	}
-
-	/**
-	 * Create a link to contact the genealogy contact.
-	 *
-	 * @return string
-	 */
-	public function contactGedcom() {
-		$user_id = $this->tree->getPreference('CONTACT_USER_ID');
-		$user    = User::find($user_id);
-		if ($user) {
-			return Theme::theme()->contactLink($user);
-		} else {
-			return $user_id;
-		}
-	}
-
-	/**
-	 * What is the current date on the server?
-	 *
-	 * @return string
-	 */
-	public function serverDate() {
-		return FunctionsDate::timestampToGedcomDate(WT_TIMESTAMP)->display();
-	}
-
-	/**
-	 * What is the current time on the server (in 12 hour clock)?
-	 *
-	 * @return string
-	 */
-	public function serverTime() {
-		return date('g:i a');
-	}
-
-	/**
-	 * What is the current time on the server (in 24 hour clock)?
-	 *
-	 * @return string
-	 */
-	public function serverTime24() {
-		return date('G:i');
-	}
-
-	/**
-	 * What is the timezone of the server.
-	 *
-	 * @return string
-	 */
-	public function serverTimezone() {
-		return date('T');
-	}
-
-	/**
-	 * What is the client's date.
-	 *
-	 * @return string
-	 */
-	public function browserDate() {
-		return FunctionsDate::timestampToGedcomDate(WT_TIMESTAMP + WT_TIMESTAMP_OFFSET)->display();
-	}
-
-	/**
-	 * What is the client's timestamp.
-	 *
-	 * @return string
-	 */
-	public function browserTime() {
-		return date(str_replace('%', '', I18N::timeFormat()), WT_TIMESTAMP + WT_TIMESTAMP_OFFSET);
-	}
-
-	/**
-	 * What is the browser's tiemzone.
-	 *
-	 * @return string
-	 */
-	public function browserTimezone() {
-		return date('T', WT_TIMESTAMP + WT_TIMESTAMP_OFFSET);
-	}
-
-	/**
-	 * What is the current version of webtrees.
-	 *
-	 * @return string
-	 */
-	public function webtreesVersion() {
-		return WT_VERSION;
-	}
-
-	/**
-	 * These functions provide access to hitcounter for use in the HTML block.
-	 *
-	 * @param string   $page_name
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	private function hitCountQuery($page_name, $params) {
-		if (is_array($params) && isset($params[0]) && $params[0] != '') {
-			$page_parameter = $params[0];
-		} else {
-			$page_parameter = '';
-		}
-
-		if ($page_name === null) {
-			// index.php?ctype=gedcom
-			$page_name      = 'index.php';
-			$page_parameter = 'gedcom:' . ($page_parameter ? Tree::findByName($page_parameter)->getTreeId() : $this->tree->getTreeId());
-		} elseif ($page_name == 'index.php') {
-			// index.php?ctype=user
-			$user           = User::findByIdentifier($page_parameter);
-			$page_parameter = 'user:' . ($user ? $user->getUserId() : Auth::id());
-		} else {
-			// indi/fam/sour/etc.
-		}
-
-		return '<span class="odometer">' . I18N::digits(HitCounter::getCount($this->tree, $page_name, $page_parameter)) . '</span>';
-	}
-
-	/**
-	 * How many times has a page been viewed.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function hitCount($params = array()) {
-		return $this->hitCountQuery(null, $params);
-	}
-
-	/**
-	 * How many times has a page been viewed.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function hitCountUser($params = array()) {
-		return $this->hitCountQuery('index.php', $params);
-	}
-
-	/**
-	 * How many times has a page been viewed.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function hitCountIndi($params = array()) {
-		return $this->hitCountQuery('individual.php', $params);
-	}
-
-	/**
-	 * How many times has a page been viewed.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function hitCountFam($params = array()) {
-		return $this->hitCountQuery('family.php', $params);
-	}
-
-	/**
-	 * How many times has a page been viewed.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function hitCountSour($params = array()) {
-		return $this->hitCountQuery('source.php', $params);
-	}
-
-	/**
-	 * How many times has a page been viewed.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function hitCountRepo($params = array()) {
-		return $this->hitCountQuery('repo.php', $params);
-	}
-
-	/**
-	 * How many times has a page been viewed.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function hitCountNote($params = array()) {
-		return $this->hitCountQuery('note.php', $params);
-	}
-
-	/**
-	 * How many times has a page been viewed.
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function hitCountObje($params = array()) {
-		return $this->hitCountQuery('mediaviewer.php', $params);
-	}
-
-	/**
-	 * Convert numbers to Google's custom encoding.
-	 *
-	 * @link http://bendodson.com/news/google-extended-encoding-made-easy
-	 *
-	 * @param int[] $a
-	 *
-	 * @return string
-	 */
-	private function arrayToExtendedEncoding($a) {
-		$xencoding = WT_GOOGLE_CHART_ENCODING;
-
-		$encoding = '';
-		foreach ($a as $value) {
-			if ($value < 0) {
-				$value = 0;
-			}
-			$first  = (int) ($value / 64);
-			$second = $value % 64;
-			$encoding .= $xencoding[(int) $first] . $xencoding[(int) $second];
-		}
-
-		return $encoding;
-	}
-
-	/**
-	 * Callback function to compare totals.
-	 *
-	 * @param array $a
-	 * @param array $b
-	 *
-	 * @return int
-	 */
-	private function nameTotalSort($a, $b) {
-		return $a['match'] - $b['match'];
-	}
-
-	/**
-	 * Callback function to compare totals.
-	 *
-	 * @param array $a
-	 * @param array $b
-	 *
-	 * @return int
-	 */
-	private function nameTotalReverseSort($a, $b) {
-		return $b['match'] - $a['match'];
-	}
-
-	/**
-	 * Run an SQL query and cache the result.
-	 *
-	 * @param string $sql
-	 *
-	 * @return string[][]
-	 */
-	private function runSql($sql) {
-		static $cache = array();
-
-		$id = md5($sql);
-		if (isset($cache[$id])) {
-			return $cache[$id];
-		}
-		$rows       = Database::prepare($sql)->fetchAll(PDO::FETCH_ASSOC);
-		$cache[$id] = $rows;
-
-		return $rows;
-	}
-
-	/**
-	 * Find the favorites for the tree.
-	 *
-	 * @return string
-	 */
-	public function gedcomFavorites() {
-		if (Module::getModuleByName('gedcom_favorites')) {
-			$block = new FamilyTreeFavoritesModule(WT_MODULES_DIR . 'gedcom_favorites');
-
-			return $block->getBlock(0, false);
-		} else {
-			return '';
-		}
-	}
-
-	/**
-	 * Find the favorites for the user.
-	 *
-	 * @return string
-	 */
-	public function userFavorites() {
-		if (Auth::check() && Module::getModuleByName('user_favorites')) {
-			$block = new UserFavoritesModule(WT_MODULES_DIR . 'gedcom_favorites');
-
-			return $block->getBlock(0, false);
-		} else {
-			return '';
-		}
-	}
-
-	/**
-	 * Find the number of favorites for the tree.
-	 *
-	 * @return int
-	 */
-	public function totalGedcomFavorites() {
-		if (Module::getModuleByName('gedcom_favorites')) {
-			return count(FamilyTreeFavoritesModule::getFavorites($this->tree->getTreeId()));
-		} else {
-			return 0;
-		}
-	}
-
-	/**
-	 * Find the number of favorites for the user.
-	 *
-	 * @return int
-	 */
-	public function totalUserFavorites() {
-		if (Module::getModuleByName('user_favorites')) {
-			return count(UserFavoritesModule::getFavorites(Auth::id()));
-		} else {
-			return 0;
-		}
-	}
-
-	/**
-	 * Create any of the other blocks.
-	 *
-	 * Use as #callBlock:block_name#
-	 *
-	 * @param string[] $params
-	 *
-	 * @return string
-	 */
-	public function callBlock($params = array()) {
-		global $ctype;
-
-		if (isset($params[0]) && $params[0] != '') {
-			$block = $params[0];
-		} else {
-			return '';
-		}
-		$all_blocks = array();
-		foreach (Module::getActiveBlocks($this->tree) as $name => $active_block) {
-			if ($ctype == 'user' && $active_block->isUserBlock() || $ctype == 'gedcom' && $active_block->isGedcomBlock()) {
-				$all_blocks[$name] = $active_block;
-			}
-		}
-		if (!array_key_exists($block, $all_blocks) || $block == 'html') {
-			return '';
-		}
-		// Build the config array
-		array_shift($params);
-		$cfg = array();
-		foreach ($params as $config) {
-			$bits = explode('=', $config);
-			if (count($bits) < 2) {
-				continue;
-			}
-			$v       = array_shift($bits);
-			$cfg[$v] = implode('=', $bits);
-		}
-		$block    = $all_blocks[$block];
-		$block_id = Filter::getInteger('block_id');
-		$content  = $block->getBlock($block_id, false, $cfg);
-
-		return $content;
-	}
-
-	/**
-	 * How many messages in the user's inbox.
-	 *
-	 * @return string
-	 */
-	public function totalUserMessages() {
-		$total = (int) Database::prepare("SELECT COUNT(*) FROM `##message` WHERE user_id = ?")
-			->execute(array(Auth::id()))
-			->fetchOne();
-
-		return I18N::number($total);
-	}
-
-	/**
-	 * How many blog entries exist for this user.
-	 *
-	 * @return string
-	 */
-	public function totalUserJournal() {
-		try {
-			$number = (int) Database::prepare("SELECT COUNT(*) FROM `##news` WHERE user_id = ?")
-				->execute(array(Auth::id()))
-				->fetchOne();
-		} catch (PDOException $ex) {
-			// The module may not be installed, so the table may not exist.
-			$number = 0;
-		}
-
-		return I18N::number($number);
-	}
-
-	/**
-	 * How many news items exist for this tree.
-	 *
-	 * @return string
-	 */
-	public function totalGedcomNews() {
-		try {
-			$number = (int) Database::prepare("SELECT COUNT(*) FROM `##news` WHERE gedcom_id = ?")
-				->execute(array($this->tree->getTreeId()))
-				->fetchOne();
-		} catch (PDOException $ex) {
-			// The module may not be installed, so the table may not exist.
-			$number = 0;
-		}
-
-		return I18N::number($number);
-	}
-
-	/**
-	 * ISO3166 3 letter codes, with their 2 letter equivalent.
-	 * NOTE: this is not 1:1. ENG/SCO/WAL/NIR => GB
-	 * NOTE: this also includes champman codes and others. Should it?
-	 *
-	 * @return string[]
-	 */
-	public function iso3166() {
-		return array(
-			'ABW' => 'AW', 'AFG' => 'AF', 'AGO' => 'AO', 'AIA' => 'AI', 'ALA' => 'AX', 'ALB' => 'AL',
-			'AND' => 'AD', 'ARE' => 'AE', 'ARG' => 'AR', 'ARM' => 'AM', 'ASM' => 'AS',
-			'ATA' => 'AQ', 'ATF' => 'TF', 'ATG' => 'AG', 'AUS' => 'AU', 'AUT' => 'AT', 'AZE' => 'AZ',
-			'BDI' => 'BI', 'BEL' => 'BE', 'BEN' => 'BJ', 'BFA' => 'BF', 'BGD' => 'BD', 'BGR' => 'BG',
-			'BHR' => 'BH', 'BHS' => 'BS', 'BIH' => 'BA', 'BLR' => 'BY', 'BLZ' => 'BZ', 'BMU' => 'BM',
-			'BOL' => 'BO', 'BRA' => 'BR', 'BRB' => 'BB', 'BRN' => 'BN', 'BTN' => 'BT', 'BVT' => 'BV',
-			'BWA' => 'BW', 'CAF' => 'CF', 'CAN' => 'CA', 'CCK' => 'CC', 'CHE' => 'CH', 'CHL' => 'CL',
-			'CHN' => 'CN', 'CIV' => 'CI', 'CMR' => 'CM', 'COD' => 'CD', 'COG' => 'CG',
-			'COK' => 'CK', 'COL' => 'CO', 'COM' => 'KM', 'CPV' => 'CV', 'CRI' => 'CR', 'CUB' => 'CU',
-			'CXR' => 'CX', 'CYM' => 'KY', 'CYP' => 'CY', 'CZE' => 'CZ', 'DEU' => 'DE', 'DJI' => 'DJ',
-			'DMA' => 'DM', 'DNK' => 'DK', 'DOM' => 'DO', 'DZA' => 'DZ', 'ECU' => 'EC', 'EGY' => 'EG',
-			'ENG' => 'GB', 'ERI' => 'ER', 'ESH' => 'EH', 'ESP' => 'ES', 'EST' => 'EE', 'ETH' => 'ET',
-			'FIN' => 'FI', 'FJI' => 'FJ', 'FLK' => 'FK', 'FRA' => 'FR', 'FRO' => 'FO', 'FSM' => 'FM',
-			'GAB' => 'GA', 'GBR' => 'GB', 'GEO' => 'GE', 'GHA' => 'GH', 'GIB' => 'GI', 'GIN' => 'GN',
-			'GLP' => 'GP', 'GMB' => 'GM', 'GNB' => 'GW', 'GNQ' => 'GQ', 'GRC' => 'GR', 'GRD' => 'GD',
-			'GRL' => 'GL', 'GTM' => 'GT', 'GUF' => 'GF', 'GUM' => 'GU', 'GUY' => 'GY', 'HKG' => 'HK',
-			'HMD' => 'HM', 'HND' => 'HN', 'HRV' => 'HR', 'HTI' => 'HT', 'HUN' => 'HU', 'IDN' => 'ID',
-			'IND' => 'IN', 'IOT' => 'IO', 'IRL' => 'IE', 'IRN' => 'IR', 'IRQ' => 'IQ', 'ISL' => 'IS',
-			'ISR' => 'IL', 'ITA' => 'IT', 'JAM' => 'JM', 'JOR' => 'JO', 'JPN' => 'JA', 'KAZ' => 'KZ',
-			'KEN' => 'KE', 'KGZ' => 'KG', 'KHM' => 'KH', 'KIR' => 'KI', 'KNA' => 'KN', 'KOR' => 'KO',
-			'KWT' => 'KW', 'LAO' => 'LA', 'LBN' => 'LB', 'LBR' => 'LR', 'LBY' => 'LY', 'LCA' => 'LC',
-			'LIE' => 'LI', 'LKA' => 'LK', 'LSO' => 'LS', 'LTU' => 'LT', 'LUX' => 'LU', 'LVA' => 'LV',
-			'MAC' => 'MO', 'MAR' => 'MA', 'MCO' => 'MC', 'MDA' => 'MD', 'MDG' => 'MG', 'MDV' => 'MV',
-			'MEX' => 'MX', 'MHL' => 'MH', 'MKD' => 'MK', 'MLI' => 'ML', 'MLT' => 'MT', 'MMR' => 'MM',
-			'MNG' => 'MN', 'MNP' => 'MP', 'MNT' => 'ME', 'MOZ' => 'MZ', 'MRT' => 'MR', 'MSR' => 'MS',
-			'MTQ' => 'MQ', 'MUS' => 'MU', 'MWI' => 'MW', 'MYS' => 'MY', 'MYT' => 'YT', 'NAM' => 'NA',
-			'NCL' => 'NC', 'NER' => 'NE', 'NFK' => 'NF', 'NGA' => 'NG', 'NIC' => 'NI', 'NIR' => 'GB',
-			'NIU' => 'NU', 'NLD' => 'NL', 'NOR' => 'NO', 'NPL' => 'NP', 'NRU' => 'NR', 'NZL' => 'NZ',
-			'OMN' => 'OM', 'PAK' => 'PK', 'PAN' => 'PA', 'PCN' => 'PN', 'PER' => 'PE', 'PHL' => 'PH',
-			'PLW' => 'PW', 'PNG' => 'PG', 'POL' => 'PL', 'PRI' => 'PR', 'PRK' => 'KP', 'PRT' => 'PO',
-			'PRY' => 'PY', 'PSE' => 'PS', 'PYF' => 'PF', 'QAT' => 'QA', 'REU' => 'RE', 'ROM' => 'RO',
-			'RUS' => 'RU', 'RWA' => 'RW', 'SAU' => 'SA', 'SCT' => 'GB', 'SDN' => 'SD', 'SEN' => 'SN',
-			'SER' => 'RS', 'SGP' => 'SG', 'SGS' => 'GS', 'SHN' => 'SH', 'SJM' => 'SJ',
-			'SLB' => 'SB', 'SLE' => 'SL', 'SLV' => 'SV', 'SMR' => 'SM', 'SOM' => 'SO', 'SPM' => 'PM',
-			'STP' => 'ST', 'SUR' => 'SR', 'SVK' => 'SK', 'SVN' => 'SI', 'SWE' => 'SE',
-			'SWZ' => 'SZ', 'SYC' => 'SC', 'SYR' => 'SY', 'TCA' => 'TC', 'TCD' => 'TD', 'TGO' => 'TG',
-			'THA' => 'TH', 'TJK' => 'TJ', 'TKL' => 'TK', 'TKM' => 'TM', 'TLS' => 'TL', 'TON' => 'TO',
-			'TTO' => 'TT', 'TUN' => 'TN', 'TUR' => 'TR', 'TUV' => 'TV', 'TWN' => 'TW', 'TZA' => 'TZ',
-			'UGA' => 'UG', 'UKR' => 'UA', 'UMI' => 'UM', 'URY' => 'UY', 'USA' => 'US', 'UZB' => 'UZ',
-			'VAT' => 'VA', 'VCT' => 'VC', 'VEN' => 'VE', 'VGB' => 'VG', 'VIR' => 'VI', 'VNM' => 'VN',
-			'VUT' => 'VU', 'WLF' => 'WF', 'WLS' => 'GB', 'WSM' => 'WS', 'YEM' => 'YE', 'ZAF' => 'ZA',
-			'ZMB' => 'ZM', 'ZWE' => 'ZW',
-		);
-	}
-
-	/**
-	 * Country codes and names
-	 *
-	 * @return string[]
-	 */
-	public function getAllCountries() {
-		return array(
-			'???' => /* I18N: Name of a country or state */ I18N::translate('Unknown'),
-			'ABW' => /* I18N: Name of a country or state */ I18N::translate('Aruba'),
-			'AFG' => /* I18N: Name of a country or state */ I18N::translate('Afghanistan'),
-			'AGO' => /* I18N: Name of a country or state */ I18N::translate('Angola'),
-			'AIA' => /* I18N: Name of a country or state */ I18N::translate('Anguilla'),
-			'ALA' => /* I18N: Name of a country or state */ I18N::translate('Aland Islands'),
-			'ALB' => /* I18N: Name of a country or state */ I18N::translate('Albania'),
-			'AND' => /* I18N: Name of a country or state */ I18N::translate('Andorra'),
-			'ARE' => /* I18N: Name of a country or state */ I18N::translate('United Arab Emirates'),
-			'ARG' => /* I18N: Name of a country or state */ I18N::translate('Argentina'),
-			'ARM' => /* I18N: Name of a country or state */ I18N::translate('Armenia'),
-			'ASM' => /* I18N: Name of a country or state */ I18N::translate('American Samoa'),
-			'ATA' => /* I18N: Name of a country or state */ I18N::translate('Antarctica'),
-			'ATF' => /* I18N: Name of a country or state */ I18N::translate('French Southern Territories'),
-			'ATG' => /* I18N: Name of a country or state */ I18N::translate('Antigua and Barbuda'),
-			'AUS' => /* I18N: Name of a country or state */ I18N::translate('Australia'),
-			'AUT' => /* I18N: Name of a country or state */ I18N::translate('Austria'),
-			'AZE' => /* I18N: Name of a country or state */ I18N::translate('Azerbaijan'),
-			'AZR' => /* I18N: Name of a country or state */ I18N::translate('Azores'),
-			'BDI' => /* I18N: Name of a country or state */ I18N::translate('Burundi'),
-			'BEL' => /* I18N: Name of a country or state */ I18N::translate('Belgium'),
-			'BEN' => /* I18N: Name of a country or state */ I18N::translate('Benin'),
-			// BES => Bonaire, Sint Eustatius and Saba
-			'BFA' => /* I18N: Name of a country or state */ I18N::translate('Burkina Faso'),
-			'BGD' => /* I18N: Name of a country or state */ I18N::translate('Bangladesh'),
-			'BGR' => /* I18N: Name of a country or state */ I18N::translate('Bulgaria'),
-			'BHR' => /* I18N: Name of a country or state */ I18N::translate('Bahrain'),
-			'BHS' => /* I18N: Name of a country or state */ I18N::translate('Bahamas'),
-			'BIH' => /* I18N: Name of a country or state */ I18N::translate('Bosnia and Herzegovina'),
-			// BLM => Saint Barthélemy
-			'BLR' => /* I18N: Name of a country or state */ I18N::translate('Belarus'),
-			'BLZ' => /* I18N: Name of a country or state */ I18N::translate('Belize'),
-			'BMU' => /* I18N: Name of a country or state */ I18N::translate('Bermuda'),
-			'BOL' => /* I18N: Name of a country or state */ I18N::translate('Bolivia'),
-			'BRA' => /* I18N: Name of a country or state */ I18N::translate('Brazil'),
-			'BRB' => /* I18N: Name of a country or state */ I18N::translate('Barbados'),
-			'BRN' => /* I18N: Name of a country or state */ I18N::translate('Brunei Darussalam'),
-			'BTN' => /* I18N: Name of a country or state */ I18N::translate('Bhutan'),
-			'BVT' => /* I18N: Name of a country or state */ I18N::translate('Bouvet Island'),
-			'BWA' => /* I18N: Name of a country or state */ I18N::translate('Botswana'),
-			'CAF' => /* I18N: Name of a country or state */ I18N::translate('Central African Republic'),
-			'CAN' => /* I18N: Name of a country or state */ I18N::translate('Canada'),
-			'CCK' => /* I18N: Name of a country or state */ I18N::translate('Cocos (Keeling) Islands'),
-			'CHE' => /* I18N: Name of a country or state */ I18N::translate('Switzerland'),
-			'CHL' => /* I18N: Name of a country or state */ I18N::translate('Chile'),
-			'CHN' => /* I18N: Name of a country or state */ I18N::translate('China'),
-			'CIV' => /* I18N: Name of a country or state */ I18N::translate('Cote d’Ivoire'),
-			'CMR' => /* I18N: Name of a country or state */ I18N::translate('Cameroon'),
-			'COD' => /* I18N: Name of a country or state */ I18N::translate('Democratic Republic of the Congo'),
-			'COG' => /* I18N: Name of a country or state */ I18N::translate('Republic of the Congo'),
-			'COK' => /* I18N: Name of a country or state */ I18N::translate('Cook Islands'),
-			'COL' => /* I18N: Name of a country or state */ I18N::translate('Colombia'),
-			'COM' => /* I18N: Name of a country or state */ I18N::translate('Comoros'),
-			'CPV' => /* I18N: Name of a country or state */ I18N::translate('Cape Verde'),
-			'CRI' => /* I18N: Name of a country or state */ I18N::translate('Costa Rica'),
-			'CUB' => /* I18N: Name of a country or state */ I18N::translate('Cuba'),
-			// CUW => Curaçao
-			'CXR' => /* I18N: Name of a country or state */ I18N::translate('Christmas Island'),
-			'CYM' => /* I18N: Name of a country or state */ I18N::translate('Cayman Islands'),
-			'CYP' => /* I18N: Name of a country or state */ I18N::translate('Cyprus'),
-			'CZE' => /* I18N: Name of a country or state */ I18N::translate('Czech Republic'),
-			'DEU' => /* I18N: Name of a country or state */ I18N::translate('Germany'),
-			'DJI' => /* I18N: Name of a country or state */ I18N::translate('Djibouti'),
-			'DMA' => /* I18N: Name of a country or state */ I18N::translate('Dominica'),
-			'DNK' => /* I18N: Name of a country or state */ I18N::translate('Denmark'),
-			'DOM' => /* I18N: Name of a country or state */ I18N::translate('Dominican Republic'),
-			'DZA' => /* I18N: Name of a country or state */ I18N::translate('Algeria'),
-			'ECU' => /* I18N: Name of a country or state */ I18N::translate('Ecuador'),
-			'EGY' => /* I18N: Name of a country or state */ I18N::translate('Egypt'),
-			'ENG' => /* I18N: Name of a country or state */ I18N::translate('England'),
-			'ERI' => /* I18N: Name of a country or state */ I18N::translate('Eritrea'),
-			'ESH' => /* I18N: Name of a country or state */ I18N::translate('Western Sahara'),
-			'ESP' => /* I18N: Name of a country or state */ I18N::translate('Spain'),
-			'EST' => /* I18N: Name of a country or state */ I18N::translate('Estonia'),
-			'ETH' => /* I18N: Name of a country or state */ I18N::translate('Ethiopia'),
-			'FIN' => /* I18N: Name of a country or state */ I18N::translate('Finland'),
-			'FJI' => /* I18N: Name of a country or state */ I18N::translate('Fiji'),
-			'FLD' => /* I18N: Name of a country or state */ I18N::translate('Flanders'),
-			'FLK' => /* I18N: Name of a country or state */ I18N::translate('Falkland Islands'),
-			'FRA' => /* I18N: Name of a country or state */ I18N::translate('France'),
-			'FRO' => /* I18N: Name of a country or state */ I18N::translate('Faroe Islands'),
-			'FSM' => /* I18N: Name of a country or state */ I18N::translate('Micronesia'),
-			'GAB' => /* I18N: Name of a country or state */ I18N::translate('Gabon'),
-			'GBR' => /* I18N: Name of a country or state */ I18N::translate('United Kingdom'),
-			'GEO' => /* I18N: Name of a country or state */ I18N::translate('Georgia'),
-			'GGY' => /* I18N: Name of a country or state */ I18N::translate('Guernsey'),
-			'GHA' => /* I18N: Name of a country or state */ I18N::translate('Ghana'),
-			'GIB' => /* I18N: Name of a country or state */ I18N::translate('Gibraltar'),
-			'GIN' => /* I18N: Name of a country or state */ I18N::translate('Guinea'),
-			'GLP' => /* I18N: Name of a country or state */ I18N::translate('Guadeloupe'),
-			'GMB' => /* I18N: Name of a country or state */ I18N::translate('Gambia'),
-			'GNB' => /* I18N: Name of a country or state */ I18N::translate('Guinea-Bissau'),
-			'GNQ' => /* I18N: Name of a country or state */ I18N::translate('Equatorial Guinea'),
-			'GRC' => /* I18N: Name of a country or state */ I18N::translate('Greece'),
-			'GRD' => /* I18N: Name of a country or state */ I18N::translate('Grenada'),
-			'GRL' => /* I18N: Name of a country or state */ I18N::translate('Greenland'),
-			'GTM' => /* I18N: Name of a country or state */ I18N::translate('Guatemala'),
-			'GUF' => /* I18N: Name of a country or state */ I18N::translate('French Guiana'),
-			'GUM' => /* I18N: Name of a country or state */ I18N::translate('Guam'),
-			'GUY' => /* I18N: Name of a country or state */ I18N::translate('Guyana'),
-			'HKG' => /* I18N: Name of a country or state */ I18N::translate('Hong Kong'),
-			'HMD' => /* I18N: Name of a country or state */ I18N::translate('Heard Island and McDonald Islands'),
-			'HND' => /* I18N: Name of a country or state */ I18N::translate('Honduras'),
-			'HRV' => /* I18N: Name of a country or state */ I18N::translate('Croatia'),
-			'HTI' => /* I18N: Name of a country or state */ I18N::translate('Haiti'),
-			'HUN' => /* I18N: Name of a country or state */ I18N::translate('Hungary'),
-			'IDN' => /* I18N: Name of a country or state */ I18N::translate('Indonesia'),
-			'IND' => /* I18N: Name of a country or state */ I18N::translate('India'),
-			'IOM' => /* I18N: Name of a country or state */ I18N::translate('Isle of Man'),
-			'IOT' => /* I18N: Name of a country or state */ I18N::translate('British Indian Ocean Territory'),
-			'IRL' => /* I18N: Name of a country or state */ I18N::translate('Ireland'),
-			'IRN' => /* I18N: Name of a country or state */ I18N::translate('Iran'),
-			'IRQ' => /* I18N: Name of a country or state */ I18N::translate('Iraq'),
-			'ISL' => /* I18N: Name of a country or state */ I18N::translate('Iceland'),
-			'ISR' => /* I18N: Name of a country or state */ I18N::translate('Israel'),
-			'ITA' => /* I18N: Name of a country or state */ I18N::translate('Italy'),
-			'JAM' => /* I18N: Name of a country or state */ I18N::translate('Jamaica'),
-			//'JEY' => Jersey
-			'JOR' => /* I18N: Name of a country or state */ I18N::translate('Jordan'),
-			'JPN' => /* I18N: Name of a country or state */ I18N::translate('Japan'),
-			'KAZ' => /* I18N: Name of a country or state */ I18N::translate('Kazakhstan'),
-			'KEN' => /* I18N: Name of a country or state */ I18N::translate('Kenya'),
-			'KGZ' => /* I18N: Name of a country or state */ I18N::translate('Kyrgyzstan'),
-			'KHM' => /* I18N: Name of a country or state */ I18N::translate('Cambodia'),
-			'KIR' => /* I18N: Name of a country or state */ I18N::translate('Kiribati'),
-			'KNA' => /* I18N: Name of a country or state */ I18N::translate('Saint Kitts and Nevis'),
-			'KOR' => /* I18N: Name of a country or state */ I18N::translate('Korea'),
-			'KWT' => /* I18N: Name of a country or state */ I18N::translate('Kuwait'),
-			'LAO' => /* I18N: Name of a country or state */ I18N::translate('Laos'),
-			'LBN' => /* I18N: Name of a country or state */ I18N::translate('Lebanon'),
-			'LBR' => /* I18N: Name of a country or state */ I18N::translate('Liberia'),
-			'LBY' => /* I18N: Name of a country or state */ I18N::translate('Libya'),
-			'LCA' => /* I18N: Name of a country or state */ I18N::translate('Saint Lucia'),
-			'LIE' => /* I18N: Name of a country or state */ I18N::translate('Liechtenstein'),
-			'LKA' => /* I18N: Name of a country or state */ I18N::translate('Sri Lanka'),
-			'LSO' => /* I18N: Name of a country or state */ I18N::translate('Lesotho'),
-			'LTU' => /* I18N: Name of a country or state */ I18N::translate('Lithuania'),
-			'LUX' => /* I18N: Name of a country or state */ I18N::translate('Luxembourg'),
-			'LVA' => /* I18N: Name of a country or state */ I18N::translate('Latvia'),
-			'MAC' => /* I18N: Name of a country or state */ I18N::translate('Macau'),
-			// MAF => Saint Martin
-			'MAR' => /* I18N: Name of a country or state */ I18N::translate('Morocco'),
-			'MCO' => /* I18N: Name of a country or state */ I18N::translate('Monaco'),
-			'MDA' => /* I18N: Name of a country or state */ I18N::translate('Moldova'),
-			'MDG' => /* I18N: Name of a country or state */ I18N::translate('Madagascar'),
-			'MDV' => /* I18N: Name of a country or state */ I18N::translate('Maldives'),
-			'MEX' => /* I18N: Name of a country or state */ I18N::translate('Mexico'),
-			'MHL' => /* I18N: Name of a country or state */ I18N::translate('Marshall Islands'),
-			'MKD' => /* I18N: Name of a country or state */ I18N::translate('Macedonia'),
-			'MLI' => /* I18N: Name of a country or state */ I18N::translate('Mali'),
-			'MLT' => /* I18N: Name of a country or state */ I18N::translate('Malta'),
-			'MMR' => /* I18N: Name of a country or state */ I18N::translate('Myanmar'),
-			'MNG' => /* I18N: Name of a country or state */ I18N::translate('Mongolia'),
-			'MNP' => /* I18N: Name of a country or state */ I18N::translate('Northern Mariana Islands'),
-			'MNT' => /* I18N: Name of a country or state */ I18N::translate('Montenegro'),
-			'MOZ' => /* I18N: Name of a country or state */ I18N::translate('Mozambique'),
-			'MRT' => /* I18N: Name of a country or state */ I18N::translate('Mauritania'),
-			'MSR' => /* I18N: Name of a country or state */ I18N::translate('Montserrat'),
-			'MTQ' => /* I18N: Name of a country or state */ I18N::translate('Martinique'),
-			'MUS' => /* I18N: Name of a country or state */ I18N::translate('Mauritius'),
-			'MWI' => /* I18N: Name of a country or state */ I18N::translate('Malawi'),
-			'MYS' => /* I18N: Name of a country or state */ I18N::translate('Malaysia'),
-			'MYT' => /* I18N: Name of a country or state */ I18N::translate('Mayotte'),
-			'NAM' => /* I18N: Name of a country or state */ I18N::translate('Namibia'),
-			'NCL' => /* I18N: Name of a country or state */ I18N::translate('New Caledonia'),
-			'NER' => /* I18N: Name of a country or state */ I18N::translate('Niger'),
-			'NFK' => /* I18N: Name of a country or state */ I18N::translate('Norfolk Island'),
-			'NGA' => /* I18N: Name of a country or state */ I18N::translate('Nigeria'),
-			'NIC' => /* I18N: Name of a country or state */ I18N::translate('Nicaragua'),
-			'NIR' => /* I18N: Name of a country or state */ I18N::translate('Northern Ireland'),
-			'NIU' => /* I18N: Name of a country or state */ I18N::translate('Niue'),
-			'NLD' => /* I18N: Name of a country or state */ I18N::translate('Netherlands'),
-			'NOR' => /* I18N: Name of a country or state */ I18N::translate('Norway'),
-			'NPL' => /* I18N: Name of a country or state */ I18N::translate('Nepal'),
-			'NRU' => /* I18N: Name of a country or state */ I18N::translate('Nauru'),
-			'NZL' => /* I18N: Name of a country or state */ I18N::translate('New Zealand'),
-			'OMN' => /* I18N: Name of a country or state */ I18N::translate('Oman'),
-			'PAK' => /* I18N: Name of a country or state */ I18N::translate('Pakistan'),
-			'PAN' => /* I18N: Name of a country or state */ I18N::translate('Panama'),
-			'PCN' => /* I18N: Name of a country or state */ I18N::translate('Pitcairn'),
-			'PER' => /* I18N: Name of a country or state */ I18N::translate('Peru'),
-			'PHL' => /* I18N: Name of a country or state */ I18N::translate('Philippines'),
-			'PLW' => /* I18N: Name of a country or state */ I18N::translate('Palau'),
-			'PNG' => /* I18N: Name of a country or state */ I18N::translate('Papua New Guinea'),
-			'POL' => /* I18N: Name of a country or state */ I18N::translate('Poland'),
-			'PRI' => /* I18N: Name of a country or state */ I18N::translate('Puerto Rico'),
-			'PRK' => /* I18N: Name of a country or state */ I18N::translate('North Korea'),
-			'PRT' => /* I18N: Name of a country or state */ I18N::translate('Portugal'),
-			'PRY' => /* I18N: Name of a country or state */ I18N::translate('Paraguay'),
-			'PSE' => /* I18N: Name of a country or state */ I18N::translate('Occupied Palestinian Territory'),
-			'PYF' => /* I18N: Name of a country or state */ I18N::translate('French Polynesia'),
-			'QAT' => /* I18N: Name of a country or state */ I18N::translate('Qatar'),
-			'REU' => /* I18N: Name of a country or state */ I18N::translate('Reunion'),
-			'ROM' => /* I18N: Name of a country or state */ I18N::translate('Romania'),
-			'RUS' => /* I18N: Name of a country or state */ I18N::translate('Russia'),
-			'RWA' => /* I18N: Name of a country or state */ I18N::translate('Rwanda'),
-			'SAU' => /* I18N: Name of a country or state */ I18N::translate('Saudi Arabia'),
-			'SCT' => /* I18N: Name of a country or state */ I18N::translate('Scotland'),
-			'SDN' => /* I18N: Name of a country or state */ I18N::translate('Sudan'),
-			'SEA' => /* I18N: Name of a country or state */ I18N::translate('At sea'),
-			'SEN' => /* I18N: Name of a country or state */ I18N::translate('Senegal'),
-			'SER' => /* I18N: Name of a country or state */ I18N::translate('Serbia'),
-			'SGP' => /* I18N: Name of a country or state */ I18N::translate('Singapore'),
-			'SGS' => /* I18N: Name of a country or state */ I18N::translate('South Georgia and the South Sandwich Islands'),
-			'SHN' => /* I18N: Name of a country or state */ I18N::translate('Saint Helena'),
-			'SJM' => /* I18N: Name of a country or state */ I18N::translate('Svalbard and Jan Mayen'),
-			'SLB' => /* I18N: Name of a country or state */ I18N::translate('Solomon Islands'),
-			'SLE' => /* I18N: Name of a country or state */ I18N::translate('Sierra Leone'),
-			'SLV' => /* I18N: Name of a country or state */ I18N::translate('El Salvador'),
-			'SMR' => /* I18N: Name of a country or state */ I18N::translate('San Marino'),
-			'SOM' => /* I18N: Name of a country or state */ I18N::translate('Somalia'),
-			'SPM' => /* I18N: Name of a country or state */ I18N::translate('Saint Pierre and Miquelon'),
-			'SSD' => /* I18N: Name of a country or state */ I18N::translate('South Sudan'),
-			'STP' => /* I18N: Name of a country or state */ I18N::translate('Sao Tome and Principe'),
-			'SUR' => /* I18N: Name of a country or state */ I18N::translate('Suriname'),
-			'SVK' => /* I18N: Name of a country or state */ I18N::translate('Slovakia'),
-			'SVN' => /* I18N: Name of a country or state */ I18N::translate('Slovenia'),
-			'SWE' => /* I18N: Name of a country or state */ I18N::translate('Sweden'),
-			'SWZ' => /* I18N: Name of a country or state */ I18N::translate('Swaziland'),
-			// SXM => Sint Maarten
-			'SYC' => /* I18N: Name of a country or state */ I18N::translate('Seychelles'),
-			'SYR' => /* I18N: Name of a country or state */ I18N::translate('Syria'),
-			'TCA' => /* I18N: Name of a country or state */ I18N::translate('Turks and Caicos Islands'),
-			'TCD' => /* I18N: Name of a country or state */ I18N::translate('Chad'),
-			'TGO' => /* I18N: Name of a country or state */ I18N::translate('Togo'),
-			'THA' => /* I18N: Name of a country or state */ I18N::translate('Thailand'),
-			'TJK' => /* I18N: Name of a country or state */ I18N::translate('Tajikistan'),
-			'TKL' => /* I18N: Name of a country or state */ I18N::translate('Tokelau'),
-			'TKM' => /* I18N: Name of a country or state */ I18N::translate('Turkmenistan'),
-			'TLS' => /* I18N: Name of a country or state */ I18N::translate('Timor-Leste'),
-			'TON' => /* I18N: Name of a country or state */ I18N::translate('Tonga'),
-			'TTO' => /* I18N: Name of a country or state */ I18N::translate('Trinidad and Tobago'),
-			'TUN' => /* I18N: Name of a country or state */ I18N::translate('Tunisia'),
-			'TUR' => /* I18N: Name of a country or state */ I18N::translate('Turkey'),
-			'TUV' => /* I18N: Name of a country or state */ I18N::translate('Tuvalu'),
-			'TWN' => /* I18N: Name of a country or state */ I18N::translate('Taiwan'),
-			'TZA' => /* I18N: Name of a country or state */ I18N::translate('Tanzania'),
-			'UGA' => /* I18N: Name of a country or state */ I18N::translate('Uganda'),
-			'UKR' => /* I18N: Name of a country or state */ I18N::translate('Ukraine'),
-			'UMI' => /* I18N: Name of a country or state */ I18N::translate('US Minor Outlying Islands'),
-			'URY' => /* I18N: Name of a country or state */ I18N::translate('Uruguay'),
-			'USA' => /* I18N: Name of a country or state */ I18N::translate('United States'),
-			'UZB' => /* I18N: Name of a country or state */ I18N::translate('Uzbekistan'),
-			'VAT' => /* I18N: Name of a country or state */ I18N::translate('Vatican City'),
-			'VCT' => /* I18N: Name of a country or state */ I18N::translate('Saint Vincent and the Grenadines'),
-			'VEN' => /* I18N: Name of a country or state */ I18N::translate('Venezuela'),
-			'VGB' => /* I18N: Name of a country or state */ I18N::translate('British Virgin Islands'),
-			'VIR' => /* I18N: Name of a country or state */ I18N::translate('US Virgin Islands'),
-			'VNM' => /* I18N: Name of a country or state */ I18N::translate('Vietnam'),
-			'VUT' => /* I18N: Name of a country or state */ I18N::translate('Vanuatu'),
-			'WLF' => /* I18N: Name of a country or state */ I18N::translate('Wallis and Futuna'),
-			'WLS' => /* I18N: Name of a country or state */ I18N::translate('Wales'),
-			'WSM' => /* I18N: Name of a country or state */ I18N::translate('Samoa'),
-			'YEM' => /* I18N: Name of a country or state */ I18N::translate('Yemen'),
-			'ZAF' => /* I18N: Name of a country or state */ I18N::translate('South Africa'),
-			'ZMB' => /* I18N: Name of a country or state */ I18N::translate('Zambia'),
-			'ZWE' => /* I18N: Name of a country or state */ I18N::translate('Zimbabwe'),
-		);
-	}
-
-	/**
-	 * Century name, English => 21st, Polish => XXI, etc.
-	 *
-	 * @param int $century
-	 *
-	 * @return string
-	 */
-	private function centuryName($century) {
-		if ($century < 0) {
-			return str_replace(-$century, self::centuryName(-$century), /* I18N: BCE=Before the Common Era, for Julian years < 0. See http://en.wikipedia.org/wiki/Common_Era */
-				I18N::translate('%s BCE', I18N::number(-$century)));
-		}
-		// The current chart engine (Google charts) can't handle <sup></sup> markup
-		switch ($century) {
-		case 21:
-			return strip_tags(I18N::translateContext('CENTURY', '21st'));
-		case 20:
-			return strip_tags(I18N::translateContext('CENTURY', '20th'));
-		case 19:
-			return strip_tags(I18N::translateContext('CENTURY', '19th'));
-		case 18:
-			return strip_tags(I18N::translateContext('CENTURY', '18th'));
-		case 17:
-			return strip_tags(I18N::translateContext('CENTURY', '17th'));
-		case 16:
-			return strip_tags(I18N::translateContext('CENTURY', '16th'));
-		case 15:
-			return strip_tags(I18N::translateContext('CENTURY', '15th'));
-		case 14:
-			return strip_tags(I18N::translateContext('CENTURY', '14th'));
-		case 13:
-			return strip_tags(I18N::translateContext('CENTURY', '13th'));
-		case 12:
-			return strip_tags(I18N::translateContext('CENTURY', '12th'));
-		case 11:
-			return strip_tags(I18N::translateContext('CENTURY', '11th'));
-		case 10:
-			return strip_tags(I18N::translateContext('CENTURY', '10th'));
-		case  9:
-			return strip_tags(I18N::translateContext('CENTURY', '9th'));
-		case  8:
-			return strip_tags(I18N::translateContext('CENTURY', '8th'));
-		case  7:
-			return strip_tags(I18N::translateContext('CENTURY', '7th'));
-		case  6:
-			return strip_tags(I18N::translateContext('CENTURY', '6th'));
-		case  5:
-			return strip_tags(I18N::translateContext('CENTURY', '5th'));
-		case  4:
-			return strip_tags(I18N::translateContext('CENTURY', '4th'));
-		case  3:
-			return strip_tags(I18N::translateContext('CENTURY', '3rd'));
-		case  2:
-			return strip_tags(I18N::translateContext('CENTURY', '2nd'));
-		case  1:
-			return strip_tags(I18N::translateContext('CENTURY', '1st'));
-		default:
-			return ($century - 1) . '01-' . $century . '00';
-		}
-	}
+                $lookup = array('M' => I18N::translate('Male'), 'F' => I18N::translate('Female'), 'U' => I18N::translateContext('unknown gender', 'Unknown'), 'B' => I18N::translate('All'));
+
+                return '<table id="' . $table_id . '" class="givn-list"><thead><tr><th class="ui-state-default" colspan="3">' . $lookup[$sex] . '</th></tr><tr><th>' . I18N::translate('Name') . '</th><th>' . I18N::translate('Count') . '</th><th>COUNT</th></tr></thead><tbody>' . implode('', $common) . '</tbody></table>';
+            case 'list':
+                return '<ul>' . implode('', $common) . '</ul>';
+            case 'nolist':
+                return implode(I18N::$list_separator, $common);
+            default:
+                return '';
+            }
+        } else {
+            return '';
+        }
+    }
+
+    /**
+     * Find common give names.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGiven($params = array(1, 10, 'alpha')) {
+        return $this->commonGivenQuery('B', 'nolist', false, $params);
+    }
+
+    /**
+     * Find common give names.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenTotals($params = array(1, 10, 'rcount')) {
+        return $this->commonGivenQuery('B', 'nolist', true, $params);
+    }
+
+    /**
+     * Find common give names.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenList($params = array(1, 10, 'alpha')) {
+        return $this->commonGivenQuery('B', 'list', false, $params);
+    }
+
+    /**
+     * Find common give names.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenListTotals($params = array(1, 10, 'rcount')) {
+        return $this->commonGivenQuery('B', 'list', true, $params);
+    }
+
+    /**
+     * Find common give names.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenTable($params = array(1, 10, 'rcount')) {
+        return $this->commonGivenQuery('B', 'table', false, $params);
+    }
+
+    /**
+     * Find common give names of females.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenFemale($params = array(1, 10, 'alpha')) {
+        return $this->commonGivenQuery('F', 'nolist', false, $params);
+    }
+
+    /**
+     * Find common give names of females.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenFemaleTotals($params = array(1, 10, 'rcount')) {
+        return $this->commonGivenQuery('F', 'nolist', true, $params);
+    }
+
+    /**
+     * Find common give names of females.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenFemaleList($params = array(1, 10, 'alpha')) {
+        return $this->commonGivenQuery('F', 'list', false, $params);
+    }
+
+    /**
+     * Find common give names of females.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenFemaleListTotals($params = array(1, 10, 'rcount')) {
+        return $this->commonGivenQuery('F', 'list', true, $params);
+    }
+
+    /**
+     * Find common give names of females.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenFemaleTable($params = array(1, 10, 'rcount')) {
+        return $this->commonGivenQuery('F', 'table', false, $params);
+    }
+
+    /**
+     * Find common give names of males.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenMale($params = array(1, 10, 'alpha')) {
+        return $this->commonGivenQuery('M', 'nolist', false, $params);
+    }
+
+    /**
+     * Find common give names of males.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenMaleTotals($params = array(1, 10, 'rcount')) {
+        return $this->commonGivenQuery('M', 'nolist', true, $params);
+    }
+
+    /**
+     * Find common give names of males.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenMaleList($params = array(1, 10, 'alpha')) {
+        return $this->commonGivenQuery('M', 'list', false, $params);
+    }
+
+    /**
+     * Find common give names of males.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenMaleListTotals($params = array(1, 10, 'rcount')) {
+        return $this->commonGivenQuery('M', 'list', true, $params);
+    }
+
+    /**
+     * Find common give names of males.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenMaleTable($params = array(1, 10, 'rcount')) {
+        return $this->commonGivenQuery('M', 'table', false, $params);
+    }
+
+    /**
+     * Find common give names of unknown sexes.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenUnknown($params = array(1, 10, 'alpha')) {
+        return $this->commonGivenQuery('U', 'nolist', false, $params);
+    }
+
+    /**
+     * Find common give names of unknown sexes.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenUnknownTotals($params = array(1, 10, 'rcount')) {
+        return $this->commonGivenQuery('U', 'nolist', true, $params);
+    }
+
+    /**
+     * Find common give names of unknown sexes.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenUnknownList($params = array(1, 10, 'alpha')) {
+        return $this->commonGivenQuery('U', 'list', false, $params);
+    }
+
+    /**
+     * Find common give names of unknown sexes.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenUnknownListTotals($params = array(1, 10, 'rcount')) {
+        return $this->commonGivenQuery('U', 'list', true, $params);
+    }
+
+    /**
+     * Find common give names of unknown sexes.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function commonGivenUnknownTable($params = array(1, 10, 'rcount')) {
+        return $this->commonGivenQuery('U', 'table', false, $params);
+    }
+
+    /**
+     * Create a chart of common given names.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function chartCommonGiven($params = array()) {
+        $WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
+        $WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
+        $WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
+        $WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
+
+        if (isset($params[0]) && $params[0] != '') {
+            $size = strtolower($params[0]);
+        } else {
+            $size = $WT_STATS_S_CHART_X . "x" . $WT_STATS_S_CHART_Y;
+        }
+        if (isset($params[1]) && $params[1] != '') {
+            $color_from = strtolower($params[1]);
+        } else {
+            $color_from = $WT_STATS_CHART_COLOR1;
+        }
+        if (isset($params[2]) && $params[2] != '') {
+            $color_to = strtolower($params[2]);
+        } else {
+            $color_to = $WT_STATS_CHART_COLOR2;
+        }
+        if (isset($params[4]) && $params[4] != '') {
+            $maxtoshow = strtolower($params[4]);
+        } else {
+            $maxtoshow = 7;
+        }
+        $sizes    = explode('x', $size);
+        $tot_indi = $this->totalIndividualsQuery();
+        $given    = $this->commonGivenQuery('B', 'chart');
+        if (!is_array($given)) {
+            return '';
+        }
+        $given = array_slice($given, 0, $maxtoshow);
+        if (count($given) <= 0) {
+            return '';
+        }
+        $tot = 0;
+        foreach ($given as $count) {
+            $tot += $count;
+        }
+        $chd = '';
+        $chl = array();
+        foreach ($given as $givn => $count) {
+            if ($tot == 0) {
+                $per = 0;
+            } else {
+                $per = round(100 * $count / $tot_indi, 0);
+            }
+            $chd .= $this->arrayToExtendedEncoding(array($per));
+            $chl[] = $givn . ' - ' . I18N::number($count);
+        }
+        $per = round(100 * ($tot_indi - $tot) / $tot_indi, 0);
+        $chd .= $this->arrayToExtendedEncoding(array($per));
+        $chl[] = I18N::translate('Other') . ' - ' . I18N::number($tot_indi - $tot);
+
+        $chart_title = implode(I18N::$list_separator, $chl);
+        $chl         = implode('|', $chl);
+
+        return "<img src=\"https://chart.googleapis.com/chart?cht=p3&amp;chd=e:{$chd}&amp;chs={$size}&amp;chco={$color_from},{$color_to}&amp;chf=bg,s,ffffff00&amp;chl=" . rawurlencode($chl) . "\" width=\"{$sizes[0]}\" height=\"{$sizes[1]}\" alt=\"" . $chart_title . "\" title=\"" . $chart_title . "\" />";
+    }
+
+    /**
+     * Who is currently logged in?
+     *
+     * @param string $type
+     *
+     * @return string
+     */
+    private function usersLoggedInQuery($type = 'nolist') {
+        $content = '';
+        // List active users
+        $NumAnonymous = 0;
+        $loggedusers  = array();
+        foreach (User::allLoggedIn() as $user) {
+            if (Auth::isAdmin() || $user->getPreference('visibleonline')) {
+                $loggedusers[] = $user;
+            } else {
+                $NumAnonymous++;
+            }
+        }
+        $LoginUsers = count($loggedusers);
+        if ($LoginUsers == 0 && $NumAnonymous == 0) {
+            return I18N::translate('No signed-in and no anonymous users');
+        }
+        if ($NumAnonymous > 0) {
+            $content .= '<b>' . I18N::plural('%s anonymous signed-in user', '%s anonymous signed-in users', $NumAnonymous, I18N::number($NumAnonymous)) . '</b>';
+        }
+        if ($LoginUsers > 0) {
+            if ($NumAnonymous) {
+                if ($type == 'list') {
+                    $content .= "<br><br>";
+                } else {
+                    $content .= " " . I18N::translate('and') . " ";
+                }
+            }
+            $content .= '<b>' . I18N::plural('%s signed-in user', '%s signed-in users', $LoginUsers, I18N::number($LoginUsers)) . '</b>';
+            if ($type == 'list') {
+                $content .= '<ul>';
+            } else {
+                $content .= ': ';
+            }
+        }
+        if (Auth::check()) {
+            foreach ($loggedusers as $user) {
+                if ($type == 'list') {
+                    $content .= '<li>' . Filter::escapeHtml($user->getRealName()) . ' - ' . Filter::escapeHtml($user->getUserName());
+                } else {
+                    $content .= Filter::escapeHtml($user->getRealName()) . ' - ' . Filter::escapeHtml($user->getUserName());
+                }
+                if (Auth::id() != $user->getUserId() && $user->getPreference('contactmethod') != 'none') {
+                    if ($type == 'list') {
+                        $content .= '<br><a class="icon-email" href="#" onclick="return message(\'' . $user->getUserId() . '\', \'\', \'' . Filter::escapeJs(Functions::getQueryUrl()) . '\');" title="' . I18N::translate('Send a message') . '"></a>';
+                    } else {
+                        $content .= ' <a class="icon-email" href="#" onclick="return message(\'' . $user->getUserId() . '\', \'\', \'' . Filter::escapeJs(Functions::getQueryUrl()) . '\');" title="' . I18N::translate('Send a message') . '"></a>';
+                    }
+                }
+                if ($type == 'list') {
+                    $content .= '</li>';
+                }
+            }
+        }
+        if ($type == 'list') {
+            $content .= '</ul>';
+        }
+
+        return $content;
+    }
+
+    /**
+     * NUmber of users who are currently logged in?
+     *
+     * @param string $type
+     *
+     * @return int
+     */
+    private function usersLoggedInTotalQuery($type = 'all') {
+        $anon    = 0;
+        $visible = 0;
+        foreach (User::allLoggedIn() as $user) {
+            if (Auth::isAdmin() || $user->getPreference('visibleonline')) {
+                $visible++;
+            } else {
+                $anon++;
+            }
+        }
+        if ($type == 'anon') {
+            return $anon;
+        } elseif ($type == 'visible') {
+            return $visible;
+        } else {
+            return $visible + $anon;
+        }
+    }
+
+    /**
+     * Who is currently logged in?
+     *
+     * @return string
+     */
+    public function usersLoggedIn() {
+        return $this->usersLoggedInQuery('nolist');
+    }
+
+    /**
+     * Who is currently logged in?
+     *
+     * @return string
+     */
+    public function usersLoggedInList() {
+        return $this->usersLoggedInQuery('list');
+    }
+
+    /**
+     * Who is currently logged in?
+     *
+     * @return int
+     */
+    public function usersLoggedInTotal() {
+        return $this->usersLoggedInTotalQuery('all');
+    }
+
+    /**
+     * Which visitors are currently logged in?
+     *
+     * @return int
+     */
+    public function usersLoggedInTotalAnon() {
+        return $this->usersLoggedInTotalQuery('anon');
+    }
+
+    /**
+     * Which visitors are currently logged in?
+     *
+     * @return int
+     */
+    public function usersLoggedInTotalVisible() {
+        return $this->usersLoggedInTotalQuery('visible');
+    }
+
+    /**
+     * Get the current user's ID.
+     *
+     * @return null|string
+     */
+    public function userId() {
+        return Auth::id();
+    }
+
+    /**
+     * Get the current user's username.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function userName($params = array()) {
+        if (Auth::check()) {
+            return Filter::escapeHtml(Auth::user()->getUserName());
+        } elseif (isset($params[0]) && $params[0] != '') {
+            // if #username:visitor# was specified, then "visitor" will be returned when the user is not logged in
+            return Filter::escapeHtml($params[0]);
+        } else {
+            return '';
+        }
+    }
+
+    /**
+     * Get the current user's full name.
+     *
+     * @return string
+     */
+    public function userFullName() {
+        return Auth::check() ? Auth::user()->getRealNameHtml() : '';
+    }
+
+    /**
+     * Get the newest registered user.
+     *
+     * @param string   $type
+     * @param string[] $params
+     *
+     * @return string
+     */
+    private function getLatestUserData($type = 'userid', $params = array()) {
+        static $user_id = null;
+
+        if ($user_id === null) {
+            $user = User::findLatestToRegister();
+        } else {
+            $user = User::find($user_id);
+        }
+
+        switch ($type) {
+        default:
+        case 'userid':
+            return $user->getUserId();
+        case 'username':
+            return Filter::escapeHtml($user->getUserName());
+        case 'fullname':
+            return $user->getRealNameHtml();
+        case 'regdate':
+            if (is_array($params) && isset($params[0]) && $params[0] != '') {
+                $datestamp = $params[0];
+            } else {
+                $datestamp = I18N::dateFormat();
+            }
+
+            return FunctionsDate::timestampToGedcomDate($user->getPreference('reg_timestamp'))->display(false, $datestamp);
+        case 'regtime':
+            if (is_array($params) && isset($params[0]) && $params[0] != '') {
+                $datestamp = $params[0];
+            } else {
+                $datestamp = str_replace('%', '', I18N::timeFormat());
+            }
+
+            return date($datestamp, $user->getPreference('reg_timestamp'));
+        case 'loggedin':
+            if (is_array($params) && isset($params[0]) && $params[0] != '') {
+                $yes = $params[0];
+            } else {
+                $yes = I18N::translate('yes');
+            }
+            if (is_array($params) && isset($params[1]) && $params[1] != '') {
+                $no = $params[1];
+            } else {
+                $no = I18N::translate('no');
+            }
+
+            return Database::prepare("SELECT 1 FROM `##session` WHERE user_id=? LIMIT 1")->execute(array($user->getUserId()))->fetchOne() ? $yes : $no;
+        }
+    }
+
+    /**
+     * Get the newest registered user's ID.
+     *
+     * @return string
+     */
+    public function latestUserId() {
+        return $this->getLatestUserData('userid');
+    }
+
+    /**
+     * Get the newest registered user's username.
+     *
+     * @return string
+     */
+    public function latestUserName() {
+        return $this->getLatestUserData('username');
+    }
+
+    /**
+     * Get the newest registered user's real name.
+     *
+     * @return string
+     */
+    public function latestUserFullName() {
+        return $this->getLatestUserData('fullname');
+    }
+
+    /**
+     * Get the date of the newest user registration.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function latestUserRegDate($params = array()) {
+        return $this->getLatestUserData('regdate', $params);
+    }
+
+    /**
+     * Find the timestamp of the latest user to register.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function latestUserRegTime($params = array()) {
+        return $this->getLatestUserData('regtime', $params);
+    }
+
+    /**
+     * Find the most recent user to log in.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function latestUserLoggedin($params = array()) {
+        return $this->getLatestUserData('loggedin', $params);
+    }
+
+    /**
+     * Create a link to contact the webmaster.
+     *
+     * @return string
+     */
+    public function contactWebmaster() {
+        $user_id = $this->tree->getPreference('WEBMASTER_USER_ID');
+        $user    = User::find($user_id);
+        if ($user) {
+            return Theme::theme()->contactLink($user);
+        } else {
+            return $user_id;
+        }
+    }
+
+    /**
+     * Create a link to contact the genealogy contact.
+     *
+     * @return string
+     */
+    public function contactGedcom() {
+        $user_id = $this->tree->getPreference('CONTACT_USER_ID');
+        $user    = User::find($user_id);
+        if ($user) {
+            return Theme::theme()->contactLink($user);
+        } else {
+            return $user_id;
+        }
+    }
+
+    /**
+     * What is the current date on the server?
+     *
+     * @return string
+     */
+    public function serverDate() {
+        return FunctionsDate::timestampToGedcomDate(WT_TIMESTAMP)->display();
+    }
+
+    /**
+     * What is the current time on the server (in 12 hour clock)?
+     *
+     * @return string
+     */
+    public function serverTime() {
+        return date('g:i a');
+    }
+
+    /**
+     * What is the current time on the server (in 24 hour clock)?
+     *
+     * @return string
+     */
+    public function serverTime24() {
+        return date('G:i');
+    }
+
+    /**
+     * What is the timezone of the server.
+     *
+     * @return string
+     */
+    public function serverTimezone() {
+        return date('T');
+    }
+
+    /**
+     * What is the client's date.
+     *
+     * @return string
+     */
+    public function browserDate() {
+        return FunctionsDate::timestampToGedcomDate(WT_TIMESTAMP + WT_TIMESTAMP_OFFSET)->display();
+    }
+
+    /**
+     * What is the client's timestamp.
+     *
+     * @return string
+     */
+    public function browserTime() {
+        return date(str_replace('%', '', I18N::timeFormat()), WT_TIMESTAMP + WT_TIMESTAMP_OFFSET);
+    }
+
+    /**
+     * What is the browser's tiemzone.
+     *
+     * @return string
+     */
+    public function browserTimezone() {
+        return date('T', WT_TIMESTAMP + WT_TIMESTAMP_OFFSET);
+    }
+
+    /**
+     * What is the current version of webtrees.
+     *
+     * @return string
+     */
+    public function webtreesVersion() {
+        return WT_VERSION;
+    }
+
+    /**
+     * These functions provide access to hitcounter for use in the HTML block.
+     *
+     * @param string   $page_name
+     * @param string[] $params
+     *
+     * @return string
+     */
+    private function hitCountQuery($page_name, $params) {
+        if (is_array($params) && isset($params[0]) && $params[0] != '') {
+            $page_parameter = $params[0];
+        } else {
+            $page_parameter = '';
+        }
+
+        if ($page_name === null) {
+            // index.php?ctype=gedcom
+            $page_name      = 'index.php';
+            $page_parameter = 'gedcom:' . ($page_parameter ? Tree::findByName($page_parameter)->getTreeId() : $this->tree->getTreeId());
+        } elseif ($page_name == 'index.php') {
+            // index.php?ctype=user
+            $user           = User::findByIdentifier($page_parameter);
+            $page_parameter = 'user:' . ($user ? $user->getUserId() : Auth::id());
+        } else {
+            // indi/fam/sour/etc.
+        }
+
+        return '<span class="odometer">' . I18N::digits(HitCounter::getCount($this->tree, $page_name, $page_parameter)) . '</span>';
+    }
+
+    /**
+     * How many times has a page been viewed.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function hitCount($params = array()) {
+        return $this->hitCountQuery(null, $params);
+    }
+
+    /**
+     * How many times has a page been viewed.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function hitCountUser($params = array()) {
+        return $this->hitCountQuery('index.php', $params);
+    }
+
+    /**
+     * How many times has a page been viewed.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function hitCountIndi($params = array()) {
+        return $this->hitCountQuery('individual.php', $params);
+    }
+
+    /**
+     * How many times has a page been viewed.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function hitCountFam($params = array()) {
+        return $this->hitCountQuery('family.php', $params);
+    }
+
+    /**
+     * How many times has a page been viewed.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function hitCountSour($params = array()) {
+        return $this->hitCountQuery('source.php', $params);
+    }
+
+    /**
+     * How many times has a page been viewed.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function hitCountRepo($params = array()) {
+        return $this->hitCountQuery('repo.php', $params);
+    }
+
+    /**
+     * How many times has a page been viewed.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function hitCountNote($params = array()) {
+        return $this->hitCountQuery('note.php', $params);
+    }
+
+    /**
+     * How many times has a page been viewed.
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function hitCountObje($params = array()) {
+        return $this->hitCountQuery('mediaviewer.php', $params);
+    }
+
+    /**
+     * Convert numbers to Google's custom encoding.
+     *
+     * @link http://bendodson.com/news/google-extended-encoding-made-easy
+     *
+     * @param int[] $a
+     *
+     * @return string
+     */
+    private function arrayToExtendedEncoding($a) {
+        $xencoding = WT_GOOGLE_CHART_ENCODING;
+
+        $encoding = '';
+        foreach ($a as $value) {
+            if ($value < 0) {
+                $value = 0;
+            }
+            $first  = (int) ($value / 64);
+            $second = $value % 64;
+            $encoding .= $xencoding[(int) $first] . $xencoding[(int) $second];
+        }
+
+        return $encoding;
+    }
+
+    /**
+     * Callback function to compare totals.
+     *
+     * @param array $a
+     * @param array $b
+     *
+     * @return int
+     */
+    private function nameTotalSort($a, $b) {
+        return $a['match'] - $b['match'];
+    }
+
+    /**
+     * Callback function to compare totals.
+     *
+     * @param array $a
+     * @param array $b
+     *
+     * @return int
+     */
+    private function nameTotalReverseSort($a, $b) {
+        return $b['match'] - $a['match'];
+    }
+
+    /**
+     * Run an SQL query and cache the result.
+     *
+     * @param string $sql
+     *
+     * @return string[][]
+     */
+    private function runSql($sql) {
+        static $cache = array();
+
+        $id = md5($sql);
+        if (isset($cache[$id])) {
+            return $cache[$id];
+        }
+        $rows       = Database::prepare($sql)->fetchAll(PDO::FETCH_ASSOC);
+        $cache[$id] = $rows;
+
+        return $rows;
+    }
+
+    /**
+     * Find the favorites for the tree.
+     *
+     * @return string
+     */
+    public function gedcomFavorites() {
+        if (Module::getModuleByName('gedcom_favorites')) {
+            $block = new FamilyTreeFavoritesModule(WT_MODULES_DIR . 'gedcom_favorites');
+
+            return $block->getBlock(0, false);
+        } else {
+            return '';
+        }
+    }
+
+    /**
+     * Find the favorites for the user.
+     *
+     * @return string
+     */
+    public function userFavorites() {
+        if (Auth::check() && Module::getModuleByName('user_favorites')) {
+            $block = new UserFavoritesModule(WT_MODULES_DIR . 'gedcom_favorites');
+
+            return $block->getBlock(0, false);
+        } else {
+            return '';
+        }
+    }
+
+    /**
+     * Find the number of favorites for the tree.
+     *
+     * @return int
+     */
+    public function totalGedcomFavorites() {
+        if (Module::getModuleByName('gedcom_favorites')) {
+            return count(FamilyTreeFavoritesModule::getFavorites($this->tree->getTreeId()));
+        } else {
+            return 0;
+        }
+    }
+
+    /**
+     * Find the number of favorites for the user.
+     *
+     * @return int
+     */
+    public function totalUserFavorites() {
+        if (Module::getModuleByName('user_favorites')) {
+            return count(UserFavoritesModule::getFavorites(Auth::id()));
+        } else {
+            return 0;
+        }
+    }
+
+    /**
+     * Create any of the other blocks.
+     *
+     * Use as #callBlock:block_name#
+     *
+     * @param string[] $params
+     *
+     * @return string
+     */
+    public function callBlock($params = array()) {
+        global $ctype;
+
+        if (isset($params[0]) && $params[0] != '') {
+            $block = $params[0];
+        } else {
+            return '';
+        }
+        $all_blocks = array();
+        foreach (Module::getActiveBlocks($this->tree) as $name => $active_block) {
+            if ($ctype == 'user' && $active_block->isUserBlock() || $ctype == 'gedcom' && $active_block->isGedcomBlock()) {
+                $all_blocks[$name] = $active_block;
+            }
+        }
+        if (!array_key_exists($block, $all_blocks) || $block == 'html') {
+            return '';
+        }
+        // Build the config array
+        array_shift($params);
+        $cfg = array();
+        foreach ($params as $config) {
+            $bits = explode('=', $config);
+            if (count($bits) < 2) {
+                continue;
+            }
+            $v       = array_shift($bits);
+            $cfg[$v] = implode('=', $bits);
+        }
+        $block    = $all_blocks[$block];
+        $block_id = Filter::getInteger('block_id');
+        $content  = $block->getBlock($block_id, false, $cfg);
+
+        return $content;
+    }
+
+    /**
+     * How many messages in the user's inbox.
+     *
+     * @return string
+     */
+    public function totalUserMessages() {
+        $total = (int) Database::prepare("SELECT COUNT(*) FROM `##message` WHERE user_id = ?")
+            ->execute(array(Auth::id()))
+            ->fetchOne();
+
+        return I18N::number($total);
+    }
+
+    /**
+     * How many blog entries exist for this user.
+     *
+     * @return string
+     */
+    public function totalUserJournal() {
+        try {
+            $number = (int) Database::prepare("SELECT COUNT(*) FROM `##news` WHERE user_id = ?")
+                ->execute(array(Auth::id()))
+                ->fetchOne();
+        } catch (PDOException $ex) {
+            // The module may not be installed, so the table may not exist.
+            $number = 0;
+        }
+
+        return I18N::number($number);
+    }
+
+    /**
+     * How many news items exist for this tree.
+     *
+     * @return string
+     */
+    public function totalGedcomNews() {
+        try {
+            $number = (int) Database::prepare("SELECT COUNT(*) FROM `##news` WHERE gedcom_id = ?")
+                ->execute(array($this->tree->getTreeId()))
+                ->fetchOne();
+        } catch (PDOException $ex) {
+            // The module may not be installed, so the table may not exist.
+            $number = 0;
+        }
+
+        return I18N::number($number);
+    }
+
+    /**
+     * ISO3166 3 letter codes, with their 2 letter equivalent.
+     * NOTE: this is not 1:1. ENG/SCO/WAL/NIR => GB
+     * NOTE: this also includes champman codes and others. Should it?
+     *
+     * @return string[]
+     */
+    public function iso3166() {
+        return array(
+            'ABW' => 'AW', 'AFG' => 'AF', 'AGO' => 'AO', 'AIA' => 'AI', 'ALA' => 'AX', 'ALB' => 'AL',
+            'AND' => 'AD', 'ARE' => 'AE', 'ARG' => 'AR', 'ARM' => 'AM', 'ASM' => 'AS',
+            'ATA' => 'AQ', 'ATF' => 'TF', 'ATG' => 'AG', 'AUS' => 'AU', 'AUT' => 'AT', 'AZE' => 'AZ',
+            'BDI' => 'BI', 'BEL' => 'BE', 'BEN' => 'BJ', 'BFA' => 'BF', 'BGD' => 'BD', 'BGR' => 'BG',
+            'BHR' => 'BH', 'BHS' => 'BS', 'BIH' => 'BA', 'BLR' => 'BY', 'BLZ' => 'BZ', 'BMU' => 'BM',
+            'BOL' => 'BO', 'BRA' => 'BR', 'BRB' => 'BB', 'BRN' => 'BN', 'BTN' => 'BT', 'BVT' => 'BV',
+            'BWA' => 'BW', 'CAF' => 'CF', 'CAN' => 'CA', 'CCK' => 'CC', 'CHE' => 'CH', 'CHL' => 'CL',
+            'CHN' => 'CN', 'CIV' => 'CI', 'CMR' => 'CM', 'COD' => 'CD', 'COG' => 'CG',
+            'COK' => 'CK', 'COL' => 'CO', 'COM' => 'KM', 'CPV' => 'CV', 'CRI' => 'CR', 'CUB' => 'CU',
+            'CXR' => 'CX', 'CYM' => 'KY', 'CYP' => 'CY', 'CZE' => 'CZ', 'DEU' => 'DE', 'DJI' => 'DJ',
+            'DMA' => 'DM', 'DNK' => 'DK', 'DOM' => 'DO', 'DZA' => 'DZ', 'ECU' => 'EC', 'EGY' => 'EG',
+            'ENG' => 'GB', 'ERI' => 'ER', 'ESH' => 'EH', 'ESP' => 'ES', 'EST' => 'EE', 'ETH' => 'ET',
+            'FIN' => 'FI', 'FJI' => 'FJ', 'FLK' => 'FK', 'FRA' => 'FR', 'FRO' => 'FO', 'FSM' => 'FM',
+            'GAB' => 'GA', 'GBR' => 'GB', 'GEO' => 'GE', 'GHA' => 'GH', 'GIB' => 'GI', 'GIN' => 'GN',
+            'GLP' => 'GP', 'GMB' => 'GM', 'GNB' => 'GW', 'GNQ' => 'GQ', 'GRC' => 'GR', 'GRD' => 'GD',
+            'GRL' => 'GL', 'GTM' => 'GT', 'GUF' => 'GF', 'GUM' => 'GU', 'GUY' => 'GY', 'HKG' => 'HK',
+            'HMD' => 'HM', 'HND' => 'HN', 'HRV' => 'HR', 'HTI' => 'HT', 'HUN' => 'HU', 'IDN' => 'ID',
+            'IND' => 'IN', 'IOT' => 'IO', 'IRL' => 'IE', 'IRN' => 'IR', 'IRQ' => 'IQ', 'ISL' => 'IS',
+            'ISR' => 'IL', 'ITA' => 'IT', 'JAM' => 'JM', 'JOR' => 'JO', 'JPN' => 'JA', 'KAZ' => 'KZ',
+            'KEN' => 'KE', 'KGZ' => 'KG', 'KHM' => 'KH', 'KIR' => 'KI', 'KNA' => 'KN', 'KOR' => 'KO',
+            'KWT' => 'KW', 'LAO' => 'LA', 'LBN' => 'LB', 'LBR' => 'LR', 'LBY' => 'LY', 'LCA' => 'LC',
+            'LIE' => 'LI', 'LKA' => 'LK', 'LSO' => 'LS', 'LTU' => 'LT', 'LUX' => 'LU', 'LVA' => 'LV',
+            'MAC' => 'MO', 'MAR' => 'MA', 'MCO' => 'MC', 'MDA' => 'MD', 'MDG' => 'MG', 'MDV' => 'MV',
+            'MEX' => 'MX', 'MHL' => 'MH', 'MKD' => 'MK', 'MLI' => 'ML', 'MLT' => 'MT', 'MMR' => 'MM',
+            'MNG' => 'MN', 'MNP' => 'MP', 'MNT' => 'ME', 'MOZ' => 'MZ', 'MRT' => 'MR', 'MSR' => 'MS',
+            'MTQ' => 'MQ', 'MUS' => 'MU', 'MWI' => 'MW', 'MYS' => 'MY', 'MYT' => 'YT', 'NAM' => 'NA',
+            'NCL' => 'NC', 'NER' => 'NE', 'NFK' => 'NF', 'NGA' => 'NG', 'NIC' => 'NI', 'NIR' => 'GB',
+            'NIU' => 'NU', 'NLD' => 'NL', 'NOR' => 'NO', 'NPL' => 'NP', 'NRU' => 'NR', 'NZL' => 'NZ',
+            'OMN' => 'OM', 'PAK' => 'PK', 'PAN' => 'PA', 'PCN' => 'PN', 'PER' => 'PE', 'PHL' => 'PH',
+            'PLW' => 'PW', 'PNG' => 'PG', 'POL' => 'PL', 'PRI' => 'PR', 'PRK' => 'KP', 'PRT' => 'PO',
+            'PRY' => 'PY', 'PSE' => 'PS', 'PYF' => 'PF', 'QAT' => 'QA', 'REU' => 'RE', 'ROM' => 'RO',
+            'RUS' => 'RU', 'RWA' => 'RW', 'SAU' => 'SA', 'SCT' => 'GB', 'SDN' => 'SD', 'SEN' => 'SN',
+            'SER' => 'RS', 'SGP' => 'SG', 'SGS' => 'GS', 'SHN' => 'SH', 'SJM' => 'SJ',
+            'SLB' => 'SB', 'SLE' => 'SL', 'SLV' => 'SV', 'SMR' => 'SM', 'SOM' => 'SO', 'SPM' => 'PM',
+            'STP' => 'ST', 'SUR' => 'SR', 'SVK' => 'SK', 'SVN' => 'SI', 'SWE' => 'SE',
+            'SWZ' => 'SZ', 'SYC' => 'SC', 'SYR' => 'SY', 'TCA' => 'TC', 'TCD' => 'TD', 'TGO' => 'TG',
+            'THA' => 'TH', 'TJK' => 'TJ', 'TKL' => 'TK', 'TKM' => 'TM', 'TLS' => 'TL', 'TON' => 'TO',
+            'TTO' => 'TT', 'TUN' => 'TN', 'TUR' => 'TR', 'TUV' => 'TV', 'TWN' => 'TW', 'TZA' => 'TZ',
+            'UGA' => 'UG', 'UKR' => 'UA', 'UMI' => 'UM', 'URY' => 'UY', 'USA' => 'US', 'UZB' => 'UZ',
+            'VAT' => 'VA', 'VCT' => 'VC', 'VEN' => 'VE', 'VGB' => 'VG', 'VIR' => 'VI', 'VNM' => 'VN',
+            'VUT' => 'VU', 'WLF' => 'WF', 'WLS' => 'GB', 'WSM' => 'WS', 'YEM' => 'YE', 'ZAF' => 'ZA',
+            'ZMB' => 'ZM', 'ZWE' => 'ZW',
+        );
+    }
+
+    /**
+     * Country codes and names
+     *
+     * @return string[]
+     */
+    public function getAllCountries() {
+        return array(
+            '???' => /* I18N: Name of a country or state */ I18N::translate('Unknown'),
+            'ABW' => /* I18N: Name of a country or state */ I18N::translate('Aruba'),
+            'AFG' => /* I18N: Name of a country or state */ I18N::translate('Afghanistan'),
+            'AGO' => /* I18N: Name of a country or state */ I18N::translate('Angola'),
+            'AIA' => /* I18N: Name of a country or state */ I18N::translate('Anguilla'),
+            'ALA' => /* I18N: Name of a country or state */ I18N::translate('Aland Islands'),
+            'ALB' => /* I18N: Name of a country or state */ I18N::translate('Albania'),
+            'AND' => /* I18N: Name of a country or state */ I18N::translate('Andorra'),
+            'ARE' => /* I18N: Name of a country or state */ I18N::translate('United Arab Emirates'),
+            'ARG' => /* I18N: Name of a country or state */ I18N::translate('Argentina'),
+            'ARM' => /* I18N: Name of a country or state */ I18N::translate('Armenia'),
+            'ASM' => /* I18N: Name of a country or state */ I18N::translate('American Samoa'),
+            'ATA' => /* I18N: Name of a country or state */ I18N::translate('Antarctica'),
+            'ATF' => /* I18N: Name of a country or state */ I18N::translate('French Southern Territories'),
+            'ATG' => /* I18N: Name of a country or state */ I18N::translate('Antigua and Barbuda'),
+            'AUS' => /* I18N: Name of a country or state */ I18N::translate('Australia'),
+            'AUT' => /* I18N: Name of a country or state */ I18N::translate('Austria'),
+            'AZE' => /* I18N: Name of a country or state */ I18N::translate('Azerbaijan'),
+            'AZR' => /* I18N: Name of a country or state */ I18N::translate('Azores'),
+            'BDI' => /* I18N: Name of a country or state */ I18N::translate('Burundi'),
+            'BEL' => /* I18N: Name of a country or state */ I18N::translate('Belgium'),
+            'BEN' => /* I18N: Name of a country or state */ I18N::translate('Benin'),
+            // BES => Bonaire, Sint Eustatius and Saba
+            'BFA' => /* I18N: Name of a country or state */ I18N::translate('Burkina Faso'),
+            'BGD' => /* I18N: Name of a country or state */ I18N::translate('Bangladesh'),
+            'BGR' => /* I18N: Name of a country or state */ I18N::translate('Bulgaria'),
+            'BHR' => /* I18N: Name of a country or state */ I18N::translate('Bahrain'),
+            'BHS' => /* I18N: Name of a country or state */ I18N::translate('Bahamas'),
+            'BIH' => /* I18N: Name of a country or state */ I18N::translate('Bosnia and Herzegovina'),
+            // BLM => Saint Barthélemy
+            'BLR' => /* I18N: Name of a country or state */ I18N::translate('Belarus'),
+            'BLZ' => /* I18N: Name of a country or state */ I18N::translate('Belize'),
+            'BMU' => /* I18N: Name of a country or state */ I18N::translate('Bermuda'),
+            'BOL' => /* I18N: Name of a country or state */ I18N::translate('Bolivia'),
+            'BRA' => /* I18N: Name of a country or state */ I18N::translate('Brazil'),
+            'BRB' => /* I18N: Name of a country or state */ I18N::translate('Barbados'),
+            'BRN' => /* I18N: Name of a country or state */ I18N::translate('Brunei Darussalam'),
+            'BTN' => /* I18N: Name of a country or state */ I18N::translate('Bhutan'),
+            'BVT' => /* I18N: Name of a country or state */ I18N::translate('Bouvet Island'),
+            'BWA' => /* I18N: Name of a country or state */ I18N::translate('Botswana'),
+            'CAF' => /* I18N: Name of a country or state */ I18N::translate('Central African Republic'),
+            'CAN' => /* I18N: Name of a country or state */ I18N::translate('Canada'),
+            'CCK' => /* I18N: Name of a country or state */ I18N::translate('Cocos (Keeling) Islands'),
+            'CHE' => /* I18N: Name of a country or state */ I18N::translate('Switzerland'),
+            'CHL' => /* I18N: Name of a country or state */ I18N::translate('Chile'),
+            'CHN' => /* I18N: Name of a country or state */ I18N::translate('China'),
+            'CIV' => /* I18N: Name of a country or state */ I18N::translate('Cote d’Ivoire'),
+            'CMR' => /* I18N: Name of a country or state */ I18N::translate('Cameroon'),
+            'COD' => /* I18N: Name of a country or state */ I18N::translate('Democratic Republic of the Congo'),
+            'COG' => /* I18N: Name of a country or state */ I18N::translate('Republic of the Congo'),
+            'COK' => /* I18N: Name of a country or state */ I18N::translate('Cook Islands'),
+            'COL' => /* I18N: Name of a country or state */ I18N::translate('Colombia'),
+            'COM' => /* I18N: Name of a country or state */ I18N::translate('Comoros'),
+            'CPV' => /* I18N: Name of a country or state */ I18N::translate('Cape Verde'),
+            'CRI' => /* I18N: Name of a country or state */ I18N::translate('Costa Rica'),
+            'CUB' => /* I18N: Name of a country or state */ I18N::translate('Cuba'),
+            // CUW => Curaçao
+            'CXR' => /* I18N: Name of a country or state */ I18N::translate('Christmas Island'),
+            'CYM' => /* I18N: Name of a country or state */ I18N::translate('Cayman Islands'),
+            'CYP' => /* I18N: Name of a country or state */ I18N::translate('Cyprus'),
+            'CZE' => /* I18N: Name of a country or state */ I18N::translate('Czech Republic'),
+            'DEU' => /* I18N: Name of a country or state */ I18N::translate('Germany'),
+            'DJI' => /* I18N: Name of a country or state */ I18N::translate('Djibouti'),
+            'DMA' => /* I18N: Name of a country or state */ I18N::translate('Dominica'),
+            'DNK' => /* I18N: Name of a country or state */ I18N::translate('Denmark'),
+            'DOM' => /* I18N: Name of a country or state */ I18N::translate('Dominican Republic'),
+            'DZA' => /* I18N: Name of a country or state */ I18N::translate('Algeria'),
+            'ECU' => /* I18N: Name of a country or state */ I18N::translate('Ecuador'),
+            'EGY' => /* I18N: Name of a country or state */ I18N::translate('Egypt'),
+            'ENG' => /* I18N: Name of a country or state */ I18N::translate('England'),
+            'ERI' => /* I18N: Name of a country or state */ I18N::translate('Eritrea'),
+            'ESH' => /* I18N: Name of a country or state */ I18N::translate('Western Sahara'),
+            'ESP' => /* I18N: Name of a country or state */ I18N::translate('Spain'),
+            'EST' => /* I18N: Name of a country or state */ I18N::translate('Estonia'),
+            'ETH' => /* I18N: Name of a country or state */ I18N::translate('Ethiopia'),
+            'FIN' => /* I18N: Name of a country or state */ I18N::translate('Finland'),
+            'FJI' => /* I18N: Name of a country or state */ I18N::translate('Fiji'),
+            'FLD' => /* I18N: Name of a country or state */ I18N::translate('Flanders'),
+            'FLK' => /* I18N: Name of a country or state */ I18N::translate('Falkland Islands'),
+            'FRA' => /* I18N: Name of a country or state */ I18N::translate('France'),
+            'FRO' => /* I18N: Name of a country or state */ I18N::translate('Faroe Islands'),
+            'FSM' => /* I18N: Name of a country or state */ I18N::translate('Micronesia'),
+            'GAB' => /* I18N: Name of a country or state */ I18N::translate('Gabon'),
+            'GBR' => /* I18N: Name of a country or state */ I18N::translate('United Kingdom'),
+            'GEO' => /* I18N: Name of a country or state */ I18N::translate('Georgia'),
+            'GGY' => /* I18N: Name of a country or state */ I18N::translate('Guernsey'),
+            'GHA' => /* I18N: Name of a country or state */ I18N::translate('Ghana'),
+            'GIB' => /* I18N: Name of a country or state */ I18N::translate('Gibraltar'),
+            'GIN' => /* I18N: Name of a country or state */ I18N::translate('Guinea'),
+            'GLP' => /* I18N: Name of a country or state */ I18N::translate('Guadeloupe'),
+            'GMB' => /* I18N: Name of a country or state */ I18N::translate('Gambia'),
+            'GNB' => /* I18N: Name of a country or state */ I18N::translate('Guinea-Bissau'),
+            'GNQ' => /* I18N: Name of a country or state */ I18N::translate('Equatorial Guinea'),
+            'GRC' => /* I18N: Name of a country or state */ I18N::translate('Greece'),
+            'GRD' => /* I18N: Name of a country or state */ I18N::translate('Grenada'),
+            'GRL' => /* I18N: Name of a country or state */ I18N::translate('Greenland'),
+            'GTM' => /* I18N: Name of a country or state */ I18N::translate('Guatemala'),
+            'GUF' => /* I18N: Name of a country or state */ I18N::translate('French Guiana'),
+            'GUM' => /* I18N: Name of a country or state */ I18N::translate('Guam'),
+            'GUY' => /* I18N: Name of a country or state */ I18N::translate('Guyana'),
+            'HKG' => /* I18N: Name of a country or state */ I18N::translate('Hong Kong'),
+            'HMD' => /* I18N: Name of a country or state */ I18N::translate('Heard Island and McDonald Islands'),
+            'HND' => /* I18N: Name of a country or state */ I18N::translate('Honduras'),
+            'HRV' => /* I18N: Name of a country or state */ I18N::translate('Croatia'),
+            'HTI' => /* I18N: Name of a country or state */ I18N::translate('Haiti'),
+            'HUN' => /* I18N: Name of a country or state */ I18N::translate('Hungary'),
+            'IDN' => /* I18N: Name of a country or state */ I18N::translate('Indonesia'),
+            'IND' => /* I18N: Name of a country or state */ I18N::translate('India'),
+            'IOM' => /* I18N: Name of a country or state */ I18N::translate('Isle of Man'),
+            'IOT' => /* I18N: Name of a country or state */ I18N::translate('British Indian Ocean Territory'),
+            'IRL' => /* I18N: Name of a country or state */ I18N::translate('Ireland'),
+            'IRN' => /* I18N: Name of a country or state */ I18N::translate('Iran'),
+            'IRQ' => /* I18N: Name of a country or state */ I18N::translate('Iraq'),
+            'ISL' => /* I18N: Name of a country or state */ I18N::translate('Iceland'),
+            'ISR' => /* I18N: Name of a country or state */ I18N::translate('Israel'),
+            'ITA' => /* I18N: Name of a country or state */ I18N::translate('Italy'),
+            'JAM' => /* I18N: Name of a country or state */ I18N::translate('Jamaica'),
+            //'JEY' => Jersey
+            'JOR' => /* I18N: Name of a country or state */ I18N::translate('Jordan'),
+            'JPN' => /* I18N: Name of a country or state */ I18N::translate('Japan'),
+            'KAZ' => /* I18N: Name of a country or state */ I18N::translate('Kazakhstan'),
+            'KEN' => /* I18N: Name of a country or state */ I18N::translate('Kenya'),
+            'KGZ' => /* I18N: Name of a country or state */ I18N::translate('Kyrgyzstan'),
+            'KHM' => /* I18N: Name of a country or state */ I18N::translate('Cambodia'),
+            'KIR' => /* I18N: Name of a country or state */ I18N::translate('Kiribati'),
+            'KNA' => /* I18N: Name of a country or state */ I18N::translate('Saint Kitts and Nevis'),
+            'KOR' => /* I18N: Name of a country or state */ I18N::translate('Korea'),
+            'KWT' => /* I18N: Name of a country or state */ I18N::translate('Kuwait'),
+            'LAO' => /* I18N: Name of a country or state */ I18N::translate('Laos'),
+            'LBN' => /* I18N: Name of a country or state */ I18N::translate('Lebanon'),
+            'LBR' => /* I18N: Name of a country or state */ I18N::translate('Liberia'),
+            'LBY' => /* I18N: Name of a country or state */ I18N::translate('Libya'),
+            'LCA' => /* I18N: Name of a country or state */ I18N::translate('Saint Lucia'),
+            'LIE' => /* I18N: Name of a country or state */ I18N::translate('Liechtenstein'),
+            'LKA' => /* I18N: Name of a country or state */ I18N::translate('Sri Lanka'),
+            'LSO' => /* I18N: Name of a country or state */ I18N::translate('Lesotho'),
+            'LTU' => /* I18N: Name of a country or state */ I18N::translate('Lithuania'),
+            'LUX' => /* I18N: Name of a country or state */ I18N::translate('Luxembourg'),
+            'LVA' => /* I18N: Name of a country or state */ I18N::translate('Latvia'),
+            'MAC' => /* I18N: Name of a country or state */ I18N::translate('Macau'),
+            // MAF => Saint Martin
+            'MAR' => /* I18N: Name of a country or state */ I18N::translate('Morocco'),
+            'MCO' => /* I18N: Name of a country or state */ I18N::translate('Monaco'),
+            'MDA' => /* I18N: Name of a country or state */ I18N::translate('Moldova'),
+            'MDG' => /* I18N: Name of a country or state */ I18N::translate('Madagascar'),
+            'MDV' => /* I18N: Name of a country or state */ I18N::translate('Maldives'),
+            'MEX' => /* I18N: Name of a country or state */ I18N::translate('Mexico'),
+            'MHL' => /* I18N: Name of a country or state */ I18N::translate('Marshall Islands'),
+            'MKD' => /* I18N: Name of a country or state */ I18N::translate('Macedonia'),
+            'MLI' => /* I18N: Name of a country or state */ I18N::translate('Mali'),
+            'MLT' => /* I18N: Name of a country or state */ I18N::translate('Malta'),
+            'MMR' => /* I18N: Name of a country or state */ I18N::translate('Myanmar'),
+            'MNG' => /* I18N: Name of a country or state */ I18N::translate('Mongolia'),
+            'MNP' => /* I18N: Name of a country or state */ I18N::translate('Northern Mariana Islands'),
+            'MNT' => /* I18N: Name of a country or state */ I18N::translate('Montenegro'),
+            'MOZ' => /* I18N: Name of a country or state */ I18N::translate('Mozambique'),
+            'MRT' => /* I18N: Name of a country or state */ I18N::translate('Mauritania'),
+            'MSR' => /* I18N: Name of a country or state */ I18N::translate('Montserrat'),
+            'MTQ' => /* I18N: Name of a country or state */ I18N::translate('Martinique'),
+            'MUS' => /* I18N: Name of a country or state */ I18N::translate('Mauritius'),
+            'MWI' => /* I18N: Name of a country or state */ I18N::translate('Malawi'),
+            'MYS' => /* I18N: Name of a country or state */ I18N::translate('Malaysia'),
+            'MYT' => /* I18N: Name of a country or state */ I18N::translate('Mayotte'),
+            'NAM' => /* I18N: Name of a country or state */ I18N::translate('Namibia'),
+            'NCL' => /* I18N: Name of a country or state */ I18N::translate('New Caledonia'),
+            'NER' => /* I18N: Name of a country or state */ I18N::translate('Niger'),
+            'NFK' => /* I18N: Name of a country or state */ I18N::translate('Norfolk Island'),
+            'NGA' => /* I18N: Name of a country or state */ I18N::translate('Nigeria'),
+            'NIC' => /* I18N: Name of a country or state */ I18N::translate('Nicaragua'),
+            'NIR' => /* I18N: Name of a country or state */ I18N::translate('Northern Ireland'),
+            'NIU' => /* I18N: Name of a country or state */ I18N::translate('Niue'),
+            'NLD' => /* I18N: Name of a country or state */ I18N::translate('Netherlands'),
+            'NOR' => /* I18N: Name of a country or state */ I18N::translate('Norway'),
+            'NPL' => /* I18N: Name of a country or state */ I18N::translate('Nepal'),
+            'NRU' => /* I18N: Name of a country or state */ I18N::translate('Nauru'),
+            'NZL' => /* I18N: Name of a country or state */ I18N::translate('New Zealand'),
+            'OMN' => /* I18N: Name of a country or state */ I18N::translate('Oman'),
+            'PAK' => /* I18N: Name of a country or state */ I18N::translate('Pakistan'),
+            'PAN' => /* I18N: Name of a country or state */ I18N::translate('Panama'),
+            'PCN' => /* I18N: Name of a country or state */ I18N::translate('Pitcairn'),
+            'PER' => /* I18N: Name of a country or state */ I18N::translate('Peru'),
+            'PHL' => /* I18N: Name of a country or state */ I18N::translate('Philippines'),
+            'PLW' => /* I18N: Name of a country or state */ I18N::translate('Palau'),
+            'PNG' => /* I18N: Name of a country or state */ I18N::translate('Papua New Guinea'),
+            'POL' => /* I18N: Name of a country or state */ I18N::translate('Poland'),
+            'PRI' => /* I18N: Name of a country or state */ I18N::translate('Puerto Rico'),
+            'PRK' => /* I18N: Name of a country or state */ I18N::translate('North Korea'),
+            'PRT' => /* I18N: Name of a country or state */ I18N::translate('Portugal'),
+            'PRY' => /* I18N: Name of a country or state */ I18N::translate('Paraguay'),
+            'PSE' => /* I18N: Name of a country or state */ I18N::translate('Occupied Palestinian Territory'),
+            'PYF' => /* I18N: Name of a country or state */ I18N::translate('French Polynesia'),
+            'QAT' => /* I18N: Name of a country or state */ I18N::translate('Qatar'),
+            'REU' => /* I18N: Name of a country or state */ I18N::translate('Reunion'),
+            'ROM' => /* I18N: Name of a country or state */ I18N::translate('Romania'),
+            'RUS' => /* I18N: Name of a country or state */ I18N::translate('Russia'),
+            'RWA' => /* I18N: Name of a country or state */ I18N::translate('Rwanda'),
+            'SAU' => /* I18N: Name of a country or state */ I18N::translate('Saudi Arabia'),
+            'SCT' => /* I18N: Name of a country or state */ I18N::translate('Scotland'),
+            'SDN' => /* I18N: Name of a country or state */ I18N::translate('Sudan'),
+            'SEA' => /* I18N: Name of a country or state */ I18N::translate('At sea'),
+            'SEN' => /* I18N: Name of a country or state */ I18N::translate('Senegal'),
+            'SER' => /* I18N: Name of a country or state */ I18N::translate('Serbia'),
+            'SGP' => /* I18N: Name of a country or state */ I18N::translate('Singapore'),
+            'SGS' => /* I18N: Name of a country or state */ I18N::translate('South Georgia and the South Sandwich Islands'),
+            'SHN' => /* I18N: Name of a country or state */ I18N::translate('Saint Helena'),
+            'SJM' => /* I18N: Name of a country or state */ I18N::translate('Svalbard and Jan Mayen'),
+            'SLB' => /* I18N: Name of a country or state */ I18N::translate('Solomon Islands'),
+            'SLE' => /* I18N: Name of a country or state */ I18N::translate('Sierra Leone'),
+            'SLV' => /* I18N: Name of a country or state */ I18N::translate('El Salvador'),
+            'SMR' => /* I18N: Name of a country or state */ I18N::translate('San Marino'),
+            'SOM' => /* I18N: Name of a country or state */ I18N::translate('Somalia'),
+            'SPM' => /* I18N: Name of a country or state */ I18N::translate('Saint Pierre and Miquelon'),
+            'SSD' => /* I18N: Name of a country or state */ I18N::translate('South Sudan'),
+            'STP' => /* I18N: Name of a country or state */ I18N::translate('Sao Tome and Principe'),
+            'SUR' => /* I18N: Name of a country or state */ I18N::translate('Suriname'),
+            'SVK' => /* I18N: Name of a country or state */ I18N::translate('Slovakia'),
+            'SVN' => /* I18N: Name of a country or state */ I18N::translate('Slovenia'),
+            'SWE' => /* I18N: Name of a country or state */ I18N::translate('Sweden'),
+            'SWZ' => /* I18N: Name of a country or state */ I18N::translate('Swaziland'),
+            // SXM => Sint Maarten
+            'SYC' => /* I18N: Name of a country or state */ I18N::translate('Seychelles'),
+            'SYR' => /* I18N: Name of a country or state */ I18N::translate('Syria'),
+            'TCA' => /* I18N: Name of a country or state */ I18N::translate('Turks and Caicos Islands'),
+            'TCD' => /* I18N: Name of a country or state */ I18N::translate('Chad'),
+            'TGO' => /* I18N: Name of a country or state */ I18N::translate('Togo'),
+            'THA' => /* I18N: Name of a country or state */ I18N::translate('Thailand'),
+            'TJK' => /* I18N: Name of a country or state */ I18N::translate('Tajikistan'),
+            'TKL' => /* I18N: Name of a country or state */ I18N::translate('Tokelau'),
+            'TKM' => /* I18N: Name of a country or state */ I18N::translate('Turkmenistan'),
+            'TLS' => /* I18N: Name of a country or state */ I18N::translate('Timor-Leste'),
+            'TON' => /* I18N: Name of a country or state */ I18N::translate('Tonga'),
+            'TTO' => /* I18N: Name of a country or state */ I18N::translate('Trinidad and Tobago'),
+            'TUN' => /* I18N: Name of a country or state */ I18N::translate('Tunisia'),
+            'TUR' => /* I18N: Name of a country or state */ I18N::translate('Turkey'),
+            'TUV' => /* I18N: Name of a country or state */ I18N::translate('Tuvalu'),
+            'TWN' => /* I18N: Name of a country or state */ I18N::translate('Taiwan'),
+            'TZA' => /* I18N: Name of a country or state */ I18N::translate('Tanzania'),
+            'UGA' => /* I18N: Name of a country or state */ I18N::translate('Uganda'),
+            'UKR' => /* I18N: Name of a country or state */ I18N::translate('Ukraine'),
+            'UMI' => /* I18N: Name of a country or state */ I18N::translate('US Minor Outlying Islands'),
+            'URY' => /* I18N: Name of a country or state */ I18N::translate('Uruguay'),
+            'USA' => /* I18N: Name of a country or state */ I18N::translate('United States'),
+            'UZB' => /* I18N: Name of a country or state */ I18N::translate('Uzbekistan'),
+            'VAT' => /* I18N: Name of a country or state */ I18N::translate('Vatican City'),
+            'VCT' => /* I18N: Name of a country or state */ I18N::translate('Saint Vincent and the Grenadines'),
+            'VEN' => /* I18N: Name of a country or state */ I18N::translate('Venezuela'),
+            'VGB' => /* I18N: Name of a country or state */ I18N::translate('British Virgin Islands'),
+            'VIR' => /* I18N: Name of a country or state */ I18N::translate('US Virgin Islands'),
+            'VNM' => /* I18N: Name of a country or state */ I18N::translate('Vietnam'),
+            'VUT' => /* I18N: Name of a country or state */ I18N::translate('Vanuatu'),
+            'WLF' => /* I18N: Name of a country or state */ I18N::translate('Wallis and Futuna'),
+            'WLS' => /* I18N: Name of a country or state */ I18N::translate('Wales'),
+            'WSM' => /* I18N: Name of a country or state */ I18N::translate('Samoa'),
+            'YEM' => /* I18N: Name of a country or state */ I18N::translate('Yemen'),
+            'ZAF' => /* I18N: Name of a country or state */ I18N::translate('South Africa'),
+            'ZMB' => /* I18N: Name of a country or state */ I18N::translate('Zambia'),
+            'ZWE' => /* I18N: Name of a country or state */ I18N::translate('Zimbabwe'),
+        );
+    }
+
+    /**
+     * Century name, English => 21st, Polish => XXI, etc.
+     *
+     * @param int $century
+     *
+     * @return string
+     */
+    private function centuryName($century) {
+        if ($century < 0) {
+            return str_replace(-$century, self::centuryName(-$century), /* I18N: BCE=Before the Common Era, for Julian years < 0. See http://en.wikipedia.org/wiki/Common_Era */
+                I18N::translate('%s BCE', I18N::number(-$century)));
+        }
+        // The current chart engine (Google charts) can't handle <sup></sup> markup
+        switch ($century) {
+        case 21:
+            return strip_tags(I18N::translateContext('CENTURY', '21st'));
+        case 20:
+            return strip_tags(I18N::translateContext('CENTURY', '20th'));
+        case 19:
+            return strip_tags(I18N::translateContext('CENTURY', '19th'));
+        case 18:
+            return strip_tags(I18N::translateContext('CENTURY', '18th'));
+        case 17:
+            return strip_tags(I18N::translateContext('CENTURY', '17th'));
+        case 16:
+            return strip_tags(I18N::translateContext('CENTURY', '16th'));
+        case 15:
+            return strip_tags(I18N::translateContext('CENTURY', '15th'));
+        case 14:
+            return strip_tags(I18N::translateContext('CENTURY', '14th'));
+        case 13:
+            return strip_tags(I18N::translateContext('CENTURY', '13th'));
+        case 12:
+            return strip_tags(I18N::translateContext('CENTURY', '12th'));
+        case 11:
+            return strip_tags(I18N::translateContext('CENTURY', '11th'));
+        case 10:
+            return strip_tags(I18N::translateContext('CENTURY', '10th'));
+        case  9:
+            return strip_tags(I18N::translateContext('CENTURY', '9th'));
+        case  8:
+            return strip_tags(I18N::translateContext('CENTURY', '8th'));
+        case  7:
+            return strip_tags(I18N::translateContext('CENTURY', '7th'));
+        case  6:
+            return strip_tags(I18N::translateContext('CENTURY', '6th'));
+        case  5:
+            return strip_tags(I18N::translateContext('CENTURY', '5th'));
+        case  4:
+            return strip_tags(I18N::translateContext('CENTURY', '4th'));
+        case  3:
+            return strip_tags(I18N::translateContext('CENTURY', '3rd'));
+        case  2:
+            return strip_tags(I18N::translateContext('CENTURY', '2nd'));
+        case  1:
+            return strip_tags(I18N::translateContext('CENTURY', '1st'));
+        default:
+            return ($century - 1) . '01-' . $century . '00';
+        }
+    }
 }

Switch Indentation +406 added lines, -406 removed lines

@@ -303,22 +303,22 @@ 
 	 */
 	private function getPercentage($total, $type) {
 		switch ($type) {
-		case 'individual':
-			$type = $this->totalIndividualsQuery();
-			break;
-		case 'family':
-			$type = $this->totalFamiliesQuery();
-			break;
-		case 'source':
-			$type = $this->totalSourcesQuery();
-			break;
-		case 'note':
-			$type = $this->totalNotesQuery();
-			break;
-		case 'all':
-		default:
-			$type = $this->totalIndividualsQuery() + $this->totalFamiliesQuery() + $this->totalSourcesQuery();
-			break;
+		    case 'individual':
+			    $type = $this->totalIndividualsQuery();
+			    break;
+		    case 'family':
+			    $type = $this->totalFamiliesQuery();
+			    break;
+		    case 'source':
+			    $type = $this->totalSourcesQuery();
+			    break;
+		    case 'note':
+			    $type = $this->totalNotesQuery();
+			    break;
+		    case 'all':
+		    default:
+			    $type = $this->totalIndividualsQuery() + $this->totalFamiliesQuery() + $this->totalSourcesQuery();
+			    break;
 		}
 		if ($type == 0) {
 			return I18N::percentage(0, 1);
@@ -1444,29 +1444,29 @@ 
 		$row    = $rows[0];
 		$record = GedcomRecord::getInstance($row['d_gid'], $this->tree);
 		switch ($type) {
-		default:
-		case 'full':
-			if ($record->canShow()) {
-				$result = $record->formatList('span', false, $record->getFullName());
-			} else {
-				$result = I18N::translate('This information is private and cannot be shown.');
-			}
-			break;
-		case 'year':
-			$date   = new Date($row['d_type'] . ' ' . $row['d_year']);
-			$result = $date->display();
-			break;
-		case 'name':
-			$result = "<a href=\"" . $record->getHtmlUrl() . "\">" . $record->getFullName() . "</a>";
-			break;
-		case 'place':
-			$fact = GedcomRecord::getInstance($row['d_gid'], $this->tree)->getFirstFact($row['d_fact']);
-			if ($fact) {
-				$result = FunctionsPrint::formatFactPlace($fact, true, true, true);
-			} else {
-				$result = I18N::translate('Private');
-			}
-			break;
+		    default:
+		    case 'full':
+			    if ($record->canShow()) {
+				    $result = $record->formatList('span', false, $record->getFullName());
+			    } else {
+				    $result = I18N::translate('This information is private and cannot be shown.');
+			    }
+			    break;
+		    case 'year':
+			    $date   = new Date($row['d_type'] . ' ' . $row['d_year']);
+			    $result = $date->display();
+			    break;
+		    case 'name':
+			    $result = "<a href=\"" . $record->getHtmlUrl() . "\">" . $record->getFullName() . "</a>";
+			    break;
+		    case 'place':
+			    $fact = GedcomRecord::getInstance($row['d_gid'], $this->tree)->getFirstFact($row['d_fact']);
+			    if ($fact) {
+				    $result = FunctionsPrint::formatFactPlace($fact, true, true, true);
+			    } else {
+				    $result = I18N::translate('Private');
+			    }
+			    break;
 		}
 
 		return $result;
@@ -1631,96 +1631,96 @@ 
 		}
 		I18N::init(WT_LOCALE);
 		switch ($chart_type) {
-		case 'surname_distribution_chart':
-			if ($surname == "") {
-				$surname = $this->getCommonSurname();
-			}
-			$chart_title = I18N::translate('Surname distribution chart') . ': ' . $surname;
-			// Count how many people are events in each country
-			$surn_countries = array();
-			$indis          = QueryName::individuals($this->tree, I18N::strtoupper($surname), '', '', false, false);
-			foreach ($indis as $person) {
-				if (preg_match_all('/^2 PLAC (?:.*, *)*(.*)/m', $person->getGedcom(), $matches)) {
-					// webtrees uses 3 letter country codes and localised country names, but google uses 2 letter codes.
-					foreach ($matches[1] as $country) {
-						if (array_key_exists($country, $country_to_iso3166)) {
-							if (array_key_exists($country_to_iso3166[$country], $surn_countries)) {
-								$surn_countries[$country_to_iso3166[$country]]++;
-							} else {
-								$surn_countries[$country_to_iso3166[$country]] = 1;
-							}
-						}
-					}
-				}
-			};
-			break;
-		case 'birth_distribution_chart':
-			$chart_title = I18N::translate('Birth by country');
-			// Count how many people were born in each country
-			$surn_countries = array();
-			$b_countries    = $this->statsPlaces('INDI', 'BIRT', 0, true);
-			foreach ($b_countries as $place => $count) {
-				$country = $place;
-				if (array_key_exists($country, $country_to_iso3166)) {
-					if (!isset($surn_countries[$country_to_iso3166[$country]])) {
-						$surn_countries[$country_to_iso3166[$country]] = $count;
-					} else {
-						$surn_countries[$country_to_iso3166[$country]] += $count;
-					}
-				}
-			}
-			break;
-		case 'death_distribution_chart':
-			$chart_title = I18N::translate('Death by country');
-			// Count how many people were death in each country
-			$surn_countries = array();
-			$d_countries    = $this->statsPlaces('INDI', 'DEAT', 0, true);
-			foreach ($d_countries as $place => $count) {
-				$country = $place;
-				if (array_key_exists($country, $country_to_iso3166)) {
-					if (!isset($surn_countries[$country_to_iso3166[$country]])) {
-						$surn_countries[$country_to_iso3166[$country]] = $count;
-					} else {
-						$surn_countries[$country_to_iso3166[$country]] += $count;
-					}
-				}
-			}
-			break;
-		case 'marriage_distribution_chart':
-			$chart_title = I18N::translate('Marriage by country');
-			// Count how many families got marriage in each country
-			$surn_countries = array();
-			$m_countries    = $this->statsPlaces('FAM');
-			// webtrees uses 3 letter country codes and localised country names, but google uses 2 letter codes.
-			foreach ($m_countries as $place) {
-				$country = $place['country'];
-				if (array_key_exists($country, $country_to_iso3166)) {
-					if (!isset($surn_countries[$country_to_iso3166[$country]])) {
-						$surn_countries[$country_to_iso3166[$country]] = $place['tot'];
-					} else {
-						$surn_countries[$country_to_iso3166[$country]] += $place['tot'];
-					}
-				}
-			}
-			break;
-		case 'indi_distribution_chart':
-		default:
-			$chart_title = I18N::translate('Individual distribution chart');
-			// Count how many people have events in each country
-			$surn_countries = array();
-			$a_countries    = $this->statsPlaces('INDI');
-			// webtrees uses 3 letter country codes and localised country names, but google uses 2 letter codes.
-			foreach ($a_countries as $place) {
-				$country = $place['country'];
-				if (array_key_exists($country, $country_to_iso3166)) {
-					if (!isset($surn_countries[$country_to_iso3166[$country]])) {
-						$surn_countries[$country_to_iso3166[$country]] = $place['tot'];
-					} else {
-						$surn_countries[$country_to_iso3166[$country]] += $place['tot'];
-					}
-				}
-			}
-			break;
+		    case 'surname_distribution_chart':
+			    if ($surname == "") {
+				    $surname = $this->getCommonSurname();
+			    }
+			    $chart_title = I18N::translate('Surname distribution chart') . ': ' . $surname;
+			    // Count how many people are events in each country
+			    $surn_countries = array();
+			    $indis          = QueryName::individuals($this->tree, I18N::strtoupper($surname), '', '', false, false);
+			    foreach ($indis as $person) {
+				    if (preg_match_all('/^2 PLAC (?:.*, *)*(.*)/m', $person->getGedcom(), $matches)) {
+					    // webtrees uses 3 letter country codes and localised country names, but google uses 2 letter codes.
+					    foreach ($matches[1] as $country) {
+						    if (array_key_exists($country, $country_to_iso3166)) {
+							    if (array_key_exists($country_to_iso3166[$country], $surn_countries)) {
+								    $surn_countries[$country_to_iso3166[$country]]++;
+							    } else {
+								    $surn_countries[$country_to_iso3166[$country]] = 1;
+							    }
+						    }
+					    }
+				    }
+			    };
+			    break;
+		    case 'birth_distribution_chart':
+			    $chart_title = I18N::translate('Birth by country');
+			    // Count how many people were born in each country
+			    $surn_countries = array();
+			    $b_countries    = $this->statsPlaces('INDI', 'BIRT', 0, true);
+			    foreach ($b_countries as $place => $count) {
+				    $country = $place;
+				    if (array_key_exists($country, $country_to_iso3166)) {
+					    if (!isset($surn_countries[$country_to_iso3166[$country]])) {
+						    $surn_countries[$country_to_iso3166[$country]] = $count;
+					    } else {
+						    $surn_countries[$country_to_iso3166[$country]] += $count;
+					    }
+				    }
+			    }
+			    break;
+		    case 'death_distribution_chart':
+			    $chart_title = I18N::translate('Death by country');
+			    // Count how many people were death in each country
+			    $surn_countries = array();
+			    $d_countries    = $this->statsPlaces('INDI', 'DEAT', 0, true);
+			    foreach ($d_countries as $place => $count) {
+				    $country = $place;
+				    if (array_key_exists($country, $country_to_iso3166)) {
+					    if (!isset($surn_countries[$country_to_iso3166[$country]])) {
+						    $surn_countries[$country_to_iso3166[$country]] = $count;
+					    } else {
+						    $surn_countries[$country_to_iso3166[$country]] += $count;
+					    }
+				    }
+			    }
+			    break;
+		    case 'marriage_distribution_chart':
+			    $chart_title = I18N::translate('Marriage by country');
+			    // Count how many families got marriage in each country
+			    $surn_countries = array();
+			    $m_countries    = $this->statsPlaces('FAM');
+			    // webtrees uses 3 letter country codes and localised country names, but google uses 2 letter codes.
+			    foreach ($m_countries as $place) {
+				    $country = $place['country'];
+				    if (array_key_exists($country, $country_to_iso3166)) {
+					    if (!isset($surn_countries[$country_to_iso3166[$country]])) {
+						    $surn_countries[$country_to_iso3166[$country]] = $place['tot'];
+					    } else {
+						    $surn_countries[$country_to_iso3166[$country]] += $place['tot'];
+					    }
+				    }
+			    }
+			    break;
+		    case 'indi_distribution_chart':
+		    default:
+			    $chart_title = I18N::translate('Individual distribution chart');
+			    // Count how many people have events in each country
+			    $surn_countries = array();
+			    $a_countries    = $this->statsPlaces('INDI');
+			    // webtrees uses 3 letter country codes and localised country names, but google uses 2 letter codes.
+			    foreach ($a_countries as $place) {
+				    $country = $place['country'];
+				    if (array_key_exists($country, $country_to_iso3166)) {
+					    if (!isset($surn_countries[$country_to_iso3166[$country]])) {
+						    $surn_countries[$country_to_iso3166[$country]] = $place['tot'];
+					    } else {
+						    $surn_countries[$country_to_iso3166[$country]] += $place['tot'];
+					    }
+				    }
+			    }
+			    break;
 		}
 		$chart_url = "https://chart.googleapis.com/chart?cht=t&amp;chtm=" . $chart_shows;
 		$chart_url .= "&amp;chco=" . $WT_STATS_CHART_COLOR1 . "," . $WT_STATS_CHART_COLOR3 . "," . $WT_STATS_CHART_COLOR2; // country colours
@@ -2259,20 +2259,20 @@ 
 		$row    = $rows[0];
 		$person = Individual::getInstance($row['id'], $this->tree);
 		switch ($type) {
-		default:
-		case 'full':
-			if ($person->canShowName()) {
-				$result = $person->formatList('span', false, $person->getFullName());
-			} else {
-				$result = I18N::translate('This information is private and cannot be shown.');
-			}
-			break;
-		case 'age':
-			$result = I18N::number((int) ($row['age'] / 365.25));
-			break;
-		case 'name':
-			$result = "<a href=\"" . $person->getHtmlUrl() . "\">" . $person->getFullName() . "</a>";
-			break;
+		    default:
+		    case 'full':
+			    if ($person->canShowName()) {
+				    $result = $person->formatList('span', false, $person->getFullName());
+			    } else {
+				    $result = I18N::translate('This information is private and cannot be shown.');
+			    }
+			    break;
+		    case 'age':
+			    $result = I18N::number((int) ($row['age'] / 365.25));
+			    break;
+		    case 'name':
+			    $result = "<a href=\"" . $person->getHtmlUrl() . "\">" . $person->getFullName() . "</a>";
+			    break;
 		}
 
 		return $result;
@@ -2942,36 +2942,36 @@ 
 		$row    = $rows[0];
 		$record = GedcomRecord::getInstance($row['id'], $this->tree);
 		switch ($type) {
-		default:
-		case 'full':
-			if ($record->canShow()) {
-				$result = $record->formatList('span', false, $record->getFullName());
-			} else {
-				$result = I18N::translate('This information is private and cannot be shown.');
-			}
-			break;
-		case 'year':
-			$date   = new Date($row['type'] . ' ' . $row['year']);
-			$result = $date->display();
-			break;
-		case 'type':
-			if (isset($eventTypes[$row['fact']])) {
-				$result = $eventTypes[$row['fact']];
-			} else {
-				$result = GedcomTag::getLabel($row['fact']);
-			}
-			break;
-		case 'name':
-			$result = "<a href=\"" . $record->getHtmlUrl() . "\">" . $record->getFullName() . "</a>";
-			break;
-		case 'place':
-			$fact = $record->getFirstFact($row['fact']);
-			if ($fact) {
-				$result = FunctionsPrint::formatFactPlace($fact, true, true, true);
-			} else {
-				$result = I18N::translate('Private');
-			}
-			break;
+		    default:
+		    case 'full':
+			    if ($record->canShow()) {
+				    $result = $record->formatList('span', false, $record->getFullName());
+			    } else {
+				    $result = I18N::translate('This information is private and cannot be shown.');
+			    }
+			    break;
+		    case 'year':
+			    $date   = new Date($row['type'] . ' ' . $row['year']);
+			    $result = $date->display();
+			    break;
+		    case 'type':
+			    if (isset($eventTypes[$row['fact']])) {
+				    $result = $eventTypes[$row['fact']];
+			    } else {
+				    $result = GedcomTag::getLabel($row['fact']);
+			    }
+			    break;
+		    case 'name':
+			    $result = "<a href=\"" . $record->getHtmlUrl() . "\">" . $record->getFullName() . "</a>";
+			    break;
+		    case 'place':
+			    $fact = $record->getFirstFact($row['fact']);
+			    if ($fact) {
+				    $result = FunctionsPrint::formatFactPlace($fact, true, true, true);
+			    } else {
+				    $result = I18N::translate('Private');
+			    }
+			    break;
 		}
 
 		return $result;
@@ -3116,32 +3116,32 @@ 
 			$person = Individual::getInstance($row['i_id'], $this->tree);
 		}
 		switch ($type) {
-		default:
-		case 'full':
-			if ($family->canShow()) {
-				$result = $family->formatList('span', false, $person->getFullName());
-			} else {
-				$result = I18N::translate('This information is private and cannot be shown.');
-			}
-			break;
-		case 'name':
-			$result = '<a href="' . $family->getHtmlUrl() . '">' . $person->getFullName() . '</a>';
-			break;
-		case 'age':
-			$age = $row['age'];
-			if ($show_years) {
-				if ((int) ($age / 365.25) > 0) {
-					$age = (int) ($age / 365.25) . 'y';
-				} elseif ((int) ($age / 30.4375) > 0) {
-					$age = (int) ($age / 30.4375) . 'm';
-				} else {
-					$age = $age . 'd';
-				}
-				$result = FunctionsDate::getAgeAtEvent($age);
-			} else {
-				$result = I18N::number((int) ($age / 365.25));
-			}
-			break;
+		    default:
+		    case 'full':
+			    if ($family->canShow()) {
+				    $result = $family->formatList('span', false, $person->getFullName());
+			    } else {
+				    $result = I18N::translate('This information is private and cannot be shown.');
+			    }
+			    break;
+		    case 'name':
+			    $result = '<a href="' . $family->getHtmlUrl() . '">' . $person->getFullName() . '</a>';
+			    break;
+		    case 'age':
+			    $age = $row['age'];
+			    if ($show_years) {
+				    if ((int) ($age / 365.25) > 0) {
+					    $age = (int) ($age / 365.25) . 'y';
+				    } elseif ((int) ($age / 30.4375) > 0) {
+					    $age = (int) ($age / 30.4375) . 'm';
+				    } else {
+					    $age = $age . 'd';
+				    }
+				    $result = FunctionsDate::getAgeAtEvent($age);
+			    } else {
+				    $result = I18N::number((int) ($age / 365.25));
+			    }
+			    break;
 		}
 
 		return $result;
@@ -3414,32 +3414,32 @@ 
 			$person = Individual::getInstance($row['id'], $this->tree);
 		}
 		switch ($type) {
-		default:
-		case 'full':
-			if ($person->canShow()) {
-				$result = $person->formatList('span', false, $person->getFullName());
-			} else {
-				$result = I18N::translate('This information is private and cannot be shown.');
-			}
-			break;
-		case 'name':
-			$result = '<a href="' . $person->getHtmlUrl() . '">' . $person->getFullName() . '</a>';
-			break;
-		case 'age':
-			$age = $row['age'];
-			if ($show_years) {
-				if ((int) ($age / 365.25) > 0) {
-					$age = (int) ($age / 365.25) . 'y';
-				} elseif ((int) ($age / 30.4375) > 0) {
-					$age = (int) ($age / 30.4375) . 'm';
-				} else {
-					$age = $age . 'd';
-				}
-				$result = FunctionsDate::getAgeAtEvent($age);
-			} else {
-				$result = (int) ($age / 365.25);
-			}
-			break;
+		    default:
+		    case 'full':
+			    if ($person->canShow()) {
+				    $result = $person->formatList('span', false, $person->getFullName());
+			    } else {
+				    $result = I18N::translate('This information is private and cannot be shown.');
+			    }
+			    break;
+		    case 'name':
+			    $result = '<a href="' . $person->getHtmlUrl() . '">' . $person->getFullName() . '</a>';
+			    break;
+		    case 'age':
+			    $age = $row['age'];
+			    if ($show_years) {
+				    if ((int) ($age / 365.25) > 0) {
+					    $age = (int) ($age / 365.25) . 'y';
+				    } elseif ((int) ($age / 30.4375) > 0) {
+					    $age = (int) ($age / 30.4375) . 'm';
+				    } else {
+					    $age = $age . 'd';
+				    }
+				    $result = FunctionsDate::getAgeAtEvent($age);
+			    } else {
+				    $result = (int) ($age / 365.25);
+			    }
+			    break;
 		}
 
 		return $result;
@@ -4397,20 +4397,20 @@ 
 		$row    = $rows[0];
 		$family = Family::getInstance($row['id'], $this->tree);
 		switch ($type) {
-		default:
-		case 'full':
-			if ($family->canShow()) {
-				$result = $family->formatList('span', false, $family->getFullName());
-			} else {
-				$result = I18N::translate('This information is private and cannot be shown.');
-			}
-			break;
-		case 'size':
-			$result = I18N::number($row['tot']);
-			break;
-		case 'name':
-			$result = "<a href=\"" . $family->getHtmlUrl() . "\">" . $family->getFullName() . '</a>';
-			break;
+		    default:
+		    case 'full':
+			    if ($family->canShow()) {
+				    $result = $family->formatList('span', false, $family->getFullName());
+			    } else {
+				    $result = I18N::translate('This information is private and cannot be shown.');
+			    }
+			    break;
+		    case 'size':
+			    $result = I18N::number($row['tot']);
+			    break;
+		    case 'name':
+			    $result = "<a href=\"" . $family->getHtmlUrl() . "\">" . $family->getFullName() . '</a>';
+			    break;
 		}
 
 		return $result;
@@ -4689,43 +4689,43 @@ 
 			foreach ($rows as $values) {
 				$counts[] = round(100 * $values['total'] / $tot, 0);
 				switch ($values['d_month']) {
-				default:
-				case 'JAN':
-					$values['d_month'] = 1;
-					break;
-				case 'FEB':
-					$values['d_month'] = 2;
-					break;
-				case 'MAR':
-					$values['d_month'] = 3;
-					break;
-				case 'APR':
-					$values['d_month'] = 4;
-					break;
-				case 'MAY':
-					$values['d_month'] = 5;
-					break;
-				case 'JUN':
-					$values['d_month'] = 6;
-					break;
-				case 'JUL':
-					$values['d_month'] = 7;
-					break;
-				case 'AUG':
-					$values['d_month'] = 8;
-					break;
-				case 'SEP':
-					$values['d_month'] = 9;
-					break;
-				case 'OCT':
-					$values['d_month'] = 10;
-					break;
-				case 'NOV':
-					$values['d_month'] = 11;
-					break;
-				case 'DEC':
-					$values['d_month'] = 12;
-					break;
+				    default:
+				    case 'JAN':
+					    $values['d_month'] = 1;
+					    break;
+				    case 'FEB':
+					    $values['d_month'] = 2;
+					    break;
+				    case 'MAR':
+					    $values['d_month'] = 3;
+					    break;
+				    case 'APR':
+					    $values['d_month'] = 4;
+					    break;
+				    case 'MAY':
+					    $values['d_month'] = 5;
+					    break;
+				    case 'JUN':
+					    $values['d_month'] = 6;
+					    break;
+				    case 'JUL':
+					    $values['d_month'] = 7;
+					    break;
+				    case 'AUG':
+					    $values['d_month'] = 8;
+					    break;
+				    case 'SEP':
+					    $values['d_month'] = 9;
+					    break;
+				    case 'OCT':
+					    $values['d_month'] = 10;
+					    break;
+				    case 'NOV':
+					    $values['d_month'] = 11;
+					    break;
+				    case 'DEC':
+					    $values['d_month'] = 12;
+					    break;
 				}
 				$text .= I18N::translate(ucfirst(strtolower(($values['d_month'])))) . ' - ' . $values['total'] . '|';
 			}
@@ -5316,16 +5316,16 @@ 
 		}
 
 		switch ($sorting) {
-		default:
-		case 'alpha':
-			uksort($surname_list, '\Fisharebest\Webtrees\I18N::strcasecmp');
-			break;
-		case 'count':
-			asort($surname_list);
-			break;
-		case 'rcount':
-			arsort($surname_list);
-			break;
+		    default:
+		    case 'alpha':
+			    uksort($surname_list, '\Fisharebest\Webtrees\I18N::strcasecmp');
+			    break;
+		    case 'count':
+			    asort($surname_list);
+			    break;
+		    case 'rcount':
+			    arsort($surname_list);
+			    break;
 		}
 
 		// Note that we count/display SPFX SURN, but sort/group under just SURN
@@ -5439,9 +5439,9 @@ 
 				}
 			}
 			switch ($SURNAME_TRADITION) {
-			case 'polish':
-				// most common surname should be in male variant (Kowalski, not Kowalska)
-				$top_name = preg_replace(array('/ska$/', '/cka$/', '/dzka$/', '/żka$/'), array('ski', 'cki', 'dzki', 'żki'), $top_name);
+			    case 'polish':
+				    // most common surname should be in male variant (Kowalski, not Kowalska)
+				    $top_name = preg_replace(array('/ska$/', '/cka$/', '/dzka$/', '/żka$/'), array('ski', 'cki', 'dzki', 'żki'), $top_name);
 			}
 			$per = round(100 * $count_per / $tot_indi, 0);
 			$chd .= $this->arrayToExtendedEncoding(array($per));
@@ -5481,19 +5481,19 @@ 
 		}
 
 		switch ($sex) {
-		case 'M':
-			$sex_sql = "i_sex='M'";
-			break;
-		case 'F':
-			$sex_sql = "i_sex='F'";
-			break;
-		case 'U':
-			$sex_sql = "i_sex='U'";
-			break;
-		case 'B':
-		default:
-			$sex_sql = "i_sex<>'U'";
-			break;
+		    case 'M':
+			    $sex_sql = "i_sex='M'";
+			    break;
+		    case 'F':
+			    $sex_sql = "i_sex='F'";
+			    break;
+		    case 'U':
+			    $sex_sql = "i_sex='U'";
+			    break;
+		    case 'B':
+		    default:
+			    $sex_sql = "i_sex<>'U'";
+			    break;
 		}
 		$ged_id = $this->tree->getTreeId();
 
@@ -5538,25 +5538,25 @@ 
 				$tot = '';
 			}
 			switch ($type) {
-			case 'table':
-				$common[] = '<tr><td>' . $given . '</td><td>' . I18N::number($total) . '</td><td>' . $total . '</td></tr>';
-				break;
-			case 'list':
-				$common[] = '<li><span dir="auto">' . $given . '</span>' . $tot . '</li>';
-				break;
-			case 'nolist':
-				$common[] = '<span dir="auto">' . $given . '</span>' . $tot;
-				break;
+			    case 'table':
+				    $common[] = '<tr><td>' . $given . '</td><td>' . I18N::number($total) . '</td><td>' . $total . '</td></tr>';
+				    break;
+			    case 'list':
+				    $common[] = '<li><span dir="auto">' . $given . '</span>' . $tot . '</li>';
+				    break;
+			    case 'nolist':
+				    $common[] = '<span dir="auto">' . $given . '</span>' . $tot;
+				    break;
 			}
 		}
 		if ($common) {
 			switch ($type) {
-			case 'table':
-				global $controller;
-				$table_id = Uuid::uuid4(); // lists requires a unique ID in case there are multiple lists per page
-				$controller
-					->addExternalJavascript(WT_JQUERY_DATATABLES_JS_URL)
-					->addInlineJavascript('
+			    case 'table':
+				    global $controller;
+				    $table_id = Uuid::uuid4(); // lists requires a unique ID in case there are multiple lists per page
+				    $controller
+					    ->addExternalJavascript(WT_JQUERY_DATATABLES_JS_URL)
+					    ->addInlineJavascript('
 					jQuery("#' . $table_id . '").dataTable({
 						dom: \'t\',
 						autoWidth: false,
@@ -5574,15 +5574,15 @@ 
 					});
 					jQuery("#' . $table_id . '").css("visibility", "visible");
 				');
-				$lookup = array('M' => I18N::translate('Male'), 'F' => I18N::translate('Female'), 'U' => I18N::translateContext('unknown gender', 'Unknown'), 'B' => I18N::translate('All'));
-
-				return '<table id="' . $table_id . '" class="givn-list"><thead><tr><th class="ui-state-default" colspan="3">' . $lookup[$sex] . '</th></tr><tr><th>' . I18N::translate('Name') . '</th><th>' . I18N::translate('Count') . '</th><th>COUNT</th></tr></thead><tbody>' . implode('', $common) . '</tbody></table>';
-			case 'list':
-				return '<ul>' . implode('', $common) . '</ul>';
-			case 'nolist':
-				return implode(I18N::$list_separator, $common);
-			default:
-				return '';
+				    $lookup = array('M' => I18N::translate('Male'), 'F' => I18N::translate('Female'), 'U' => I18N::translateContext('unknown gender', 'Unknown'), 'B' => I18N::translate('All'));
+
+				    return '<table id="' . $table_id . '" class="givn-list"><thead><tr><th class="ui-state-default" colspan="3">' . $lookup[$sex] . '</th></tr><tr><th>' . I18N::translate('Name') . '</th><th>' . I18N::translate('Count') . '</th><th>COUNT</th></tr></thead><tbody>' . implode('', $common) . '</tbody></table>';
+			    case 'list':
+				    return '<ul>' . implode('', $common) . '</ul>';
+			    case 'nolist':
+				    return implode(I18N::$list_separator, $common);
+			    default:
+				    return '';
 			}
 		} else {
 			return '';
@@ -6069,42 +6069,42 @@ 
 		}
 
 		switch ($type) {
-		default:
-		case 'userid':
-			return $user->getUserId();
-		case 'username':
-			return Filter::escapeHtml($user->getUserName());
-		case 'fullname':
-			return $user->getRealNameHtml();
-		case 'regdate':
-			if (is_array($params) && isset($params[0]) && $params[0] != '') {
-				$datestamp = $params[0];
-			} else {
-				$datestamp = I18N::dateFormat();
-			}
-
-			return FunctionsDate::timestampToGedcomDate($user->getPreference('reg_timestamp'))->display(false, $datestamp);
-		case 'regtime':
-			if (is_array($params) && isset($params[0]) && $params[0] != '') {
-				$datestamp = $params[0];
-			} else {
-				$datestamp = str_replace('%', '', I18N::timeFormat());
-			}
-
-			return date($datestamp, $user->getPreference('reg_timestamp'));
-		case 'loggedin':
-			if (is_array($params) && isset($params[0]) && $params[0] != '') {
-				$yes = $params[0];
-			} else {
-				$yes = I18N::translate('yes');
-			}
-			if (is_array($params) && isset($params[1]) && $params[1] != '') {
-				$no = $params[1];
-			} else {
-				$no = I18N::translate('no');
-			}
-
-			return Database::prepare("SELECT 1 FROM `##session` WHERE user_id=? LIMIT 1")->execute(array($user->getUserId()))->fetchOne() ? $yes : $no;
+		    default:
+		    case 'userid':
+			    return $user->getUserId();
+		    case 'username':
+			    return Filter::escapeHtml($user->getUserName());
+		    case 'fullname':
+			    return $user->getRealNameHtml();
+		    case 'regdate':
+			    if (is_array($params) && isset($params[0]) && $params[0] != '') {
+				    $datestamp = $params[0];
+			    } else {
+				    $datestamp = I18N::dateFormat();
+			    }
+
+			    return FunctionsDate::timestampToGedcomDate($user->getPreference('reg_timestamp'))->display(false, $datestamp);
+		    case 'regtime':
+			    if (is_array($params) && isset($params[0]) && $params[0] != '') {
+				    $datestamp = $params[0];
+			    } else {
+				    $datestamp = str_replace('%', '', I18N::timeFormat());
+			    }
+
+			    return date($datestamp, $user->getPreference('reg_timestamp'));
+		    case 'loggedin':
+			    if (is_array($params) && isset($params[0]) && $params[0] != '') {
+				    $yes = $params[0];
+			    } else {
+				    $yes = I18N::translate('yes');
+			    }
+			    if (is_array($params) && isset($params[1]) && $params[1] != '') {
+				    $no = $params[1];
+			    } else {
+				    $no = I18N::translate('no');
+			    }
+
+			    return Database::prepare("SELECT 1 FROM `##session` WHERE user_id=? LIMIT 1")->execute(array($user->getUserId()))->fetchOne() ? $yes : $no;
 		}
 	}
 
@@ -6941,50 +6941,50 @@ 
 		}
 		// The current chart engine (Google charts) can't handle <sup></sup> markup
 		switch ($century) {
-		case 21:
-			return strip_tags(I18N::translateContext('CENTURY', '21st'));
-		case 20:
-			return strip_tags(I18N::translateContext('CENTURY', '20th'));
-		case 19:
-			return strip_tags(I18N::translateContext('CENTURY', '19th'));
-		case 18:
-			return strip_tags(I18N::translateContext('CENTURY', '18th'));
-		case 17:
-			return strip_tags(I18N::translateContext('CENTURY', '17th'));
-		case 16:
-			return strip_tags(I18N::translateContext('CENTURY', '16th'));
-		case 15:
-			return strip_tags(I18N::translateContext('CENTURY', '15th'));
-		case 14:
-			return strip_tags(I18N::translateContext('CENTURY', '14th'));
-		case 13:
-			return strip_tags(I18N::translateContext('CENTURY', '13th'));
-		case 12:
-			return strip_tags(I18N::translateContext('CENTURY', '12th'));
-		case 11:
-			return strip_tags(I18N::translateContext('CENTURY', '11th'));
-		case 10:
-			return strip_tags(I18N::translateContext('CENTURY', '10th'));
-		case  9:
-			return strip_tags(I18N::translateContext('CENTURY', '9th'));
-		case  8:
-			return strip_tags(I18N::translateContext('CENTURY', '8th'));
-		case  7:
-			return strip_tags(I18N::translateContext('CENTURY', '7th'));
-		case  6:
-			return strip_tags(I18N::translateContext('CENTURY', '6th'));
-		case  5:
-			return strip_tags(I18N::translateContext('CENTURY', '5th'));
-		case  4:
-			return strip_tags(I18N::translateContext('CENTURY', '4th'));
-		case  3:
-			return strip_tags(I18N::translateContext('CENTURY', '3rd'));
-		case  2:
-			return strip_tags(I18N::translateContext('CENTURY', '2nd'));
-		case  1:
-			return strip_tags(I18N::translateContext('CENTURY', '1st'));
-		default:
-			return ($century - 1) . '01-' . $century . '00';
+		    case 21:
+			    return strip_tags(I18N::translateContext('CENTURY', '21st'));
+		    case 20:
+			    return strip_tags(I18N::translateContext('CENTURY', '20th'));
+		    case 19:
+			    return strip_tags(I18N::translateContext('CENTURY', '19th'));
+		    case 18:
+			    return strip_tags(I18N::translateContext('CENTURY', '18th'));
+		    case 17:
+			    return strip_tags(I18N::translateContext('CENTURY', '17th'));
+		    case 16:
+			    return strip_tags(I18N::translateContext('CENTURY', '16th'));
+		    case 15:
+			    return strip_tags(I18N::translateContext('CENTURY', '15th'));
+		    case 14:
+			    return strip_tags(I18N::translateContext('CENTURY', '14th'));
+		    case 13:
+			    return strip_tags(I18N::translateContext('CENTURY', '13th'));
+		    case 12:
+			    return strip_tags(I18N::translateContext('CENTURY', '12th'));
+		    case 11:
+			    return strip_tags(I18N::translateContext('CENTURY', '11th'));
+		    case 10:
+			    return strip_tags(I18N::translateContext('CENTURY', '10th'));
+		    case  9:
+			    return strip_tags(I18N::translateContext('CENTURY', '9th'));
+		    case  8:
+			    return strip_tags(I18N::translateContext('CENTURY', '8th'));
+		    case  7:
+			    return strip_tags(I18N::translateContext('CENTURY', '7th'));
+		    case  6:
+			    return strip_tags(I18N::translateContext('CENTURY', '6th'));
+		    case  5:
+			    return strip_tags(I18N::translateContext('CENTURY', '5th'));
+		    case  4:
+			    return strip_tags(I18N::translateContext('CENTURY', '4th'));
+		    case  3:
+			    return strip_tags(I18N::translateContext('CENTURY', '3rd'));
+		    case  2:
+			    return strip_tags(I18N::translateContext('CENTURY', '2nd'));
+		    case  1:
+			    return strip_tags(I18N::translateContext('CENTURY', '1st'));
+		    default:
+			    return ($century - 1) . '01-' . $century . '00';
 		}
 	}
 }

Braces +662 added lines, -331 removed lines

@@ -33,7 +33,8 @@ 
  * These are primarily used for embedded keywords on HTML blocks, but
  * are also used elsewhere in the code.
  */
-class Stats {
+class Stats
+{
 	/** @var Tree Generate statistics for a specified tree. */
 	private $tree;
 
@@ -50,7 +51,8 @@ 
 	 *
 	 * @param Tree $tree Generate statistics for this tree
 	 */
-	public function __construct(Tree $tree) {
+	public function __construct(Tree $tree)
+	{
 		$this->tree = $tree;
 	}
 
@@ -59,7 +61,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getAllTagsTable() {
+	public function getAllTagsTable()
+	{
 		$examples = array();
 		foreach (get_class_methods($this) as $method) {
 			$reflection = new \ReflectionMethod($this, $method);
@@ -97,7 +100,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getAllTagsText() {
+	public function getAllTagsText()
+	{
 		$examples = array();
 		foreach (get_class_methods($this) as $method) {
 			$reflection = new \ReflectionMethod($this, $method);
@@ -117,7 +121,8 @@ 
 	 *
 	 * @return string[][]
 	 */
-	private function getTags($text) {
+	private function getTags($text)
+	{
 		static $funcs;
 
 		// Retrive all class methods
@@ -160,7 +165,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function embedTags($text) {
+	public function embedTags($text)
+	{
 		if (strpos($text, '#') !== false) {
 			list($new_tags, $new_values) = $this->getTags($text);
 			$text                        = str_replace($new_tags, $new_values, $text);
@@ -174,7 +180,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function gedcomFilename() {
+	public function gedcomFilename()
+	{
 		return $this->tree->getName();
 	}
 
@@ -183,7 +190,8 @@ 
 	 *
 	 * @return int
 	 */
-	public function gedcomId() {
+	public function gedcomId()
+	{
 		return $this->tree->getTreeId();
 	}
 
@@ -192,7 +200,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function gedcomTitle() {
+	public function gedcomTitle()
+	{
 		return $this->tree->getTitleHtml();
 	}
 
@@ -201,7 +210,8 @@ 
 	 *
 	 * @return string[]
 	 */
-	private function gedcomHead() {
+	private function gedcomHead()
+	{
 		$title   = '';
 		$version = '';
 		$source  = '';
@@ -222,7 +232,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function gedcomCreatedSoftware() {
+	public function gedcomCreatedSoftware()
+	{
 		$head = $this->gedcomHead();
 
 		return $head[0];
@@ -233,7 +244,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function gedcomCreatedVersion() {
+	public function gedcomCreatedVersion()
+	{
 		$head = $this->gedcomHead();
 		// fix broken version string in Family Tree Maker
 		if (strstr($head[1], 'Family Tree Maker ')) {
@@ -254,7 +266,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function gedcomDate() {
+	public function gedcomDate()
+	{
 		$head = GedcomRecord::getInstance('HEAD', $this->tree);
 		$fact = $head->getFirstFact('DATE');
 		if ($fact) {
@@ -271,7 +284,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function gedcomUpdated() {
+	public function gedcomUpdated()
+	{
 		$row = Database::prepare(
 			"SELECT d_year, d_month, d_day FROM `##dates` WHERE d_julianday1 = (SELECT MAX(d_julianday1) FROM `##dates` WHERE d_file =? AND d_fact='CHAN') LIMIT 1"
 		)->execute(array($this->tree->getTreeId()))->fetchOneRow();
@@ -289,7 +303,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function gedcomRootId() {
+	public function gedcomRootId()
+	{
 		return $this->tree->getPreference('PEDIGREE_ROOT_ID');
 	}
 
@@ -301,7 +316,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function getPercentage($total, $type) {
+	private function getPercentage($total, $type)
+	{
 		switch ($type) {
 		case 'individual':
 			$type = $this->totalIndividualsQuery();
@@ -332,7 +348,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalRecords() {
+	public function totalRecords()
+	{
 		return I18N::number($this->totalIndividualsQuery() + $this->totalFamiliesQuery() + $this->totalSourcesQuery());
 	}
 
@@ -341,7 +358,8 @@ 
 	 *
 	 * @return int
 	 */
-	private function totalIndividualsQuery() {
+	private function totalIndividualsQuery()
+	{
 		return (int) Database::prepare(
 			"SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id"
 		)->execute(array(
@@ -354,7 +372,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalIndividuals() {
+	public function totalIndividuals()
+	{
 		return I18N::number($this->totalIndividualsQuery());
 	}
 
@@ -363,7 +382,8 @@ 
 	 *
 	 * @return int
 	 */
-	private function totalIndisWithSourcesQuery() {
+	private function totalIndisWithSourcesQuery()
+	{
 		return (int) Database::prepare(
 			"SELECT COUNT(DISTINCT i_id)" .
 			" FROM `##individuals` JOIN `##link` ON i_id = l_from AND i_file = l_file" .
@@ -378,7 +398,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalIndisWithSources() {
+	public function totalIndisWithSources()
+	{
 		return I18N::number($this->totalIndisWithSourcesQuery());
 	}
 
@@ -389,7 +410,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function chartIndisWithSources($params = array()) {
+	public function chartIndisWithSources($params = array())
+	{
 		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
 		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
 		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
@@ -430,7 +452,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalIndividualsPercentage() {
+	public function totalIndividualsPercentage()
+	{
 		return $this->getPercentage($this->totalIndividualsQuery(), 'all');
 	}
 
@@ -439,7 +462,8 @@ 
 	 *
 	 * @return int
 	 */
-	private function totalFamiliesQuery() {
+	private function totalFamiliesQuery()
+	{
 		return (int) Database::prepare(
 			"SELECT COUNT(*) FROM `##families` WHERE f_file = :tree_id"
 		)->execute(array(
@@ -452,7 +476,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalFamilies() {
+	public function totalFamilies()
+	{
 		return I18N::number($this->totalFamiliesQuery());
 	}
 
@@ -461,7 +486,8 @@ 
 	 *
 	 * @return int
 	 */
-	private function totalFamsWithSourcesQuery() {
+	private function totalFamsWithSourcesQuery()
+	{
 		return (int) Database::prepare(
 			"SELECT COUNT(DISTINCT f_id)" .
 			" FROM `##families` JOIN `##link` ON f_id = l_from AND f_file = l_file" .
@@ -476,7 +502,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalFamsWithSources() {
+	public function totalFamsWithSources()
+	{
 		return I18N::number($this->totalFamsWithSourcesQuery());
 	}
 
@@ -487,7 +514,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function chartFamsWithSources($params = array()) {
+	public function chartFamsWithSources($params = array())
+	{
 		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
 		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
 		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
@@ -528,7 +556,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalFamiliesPercentage() {
+	public function totalFamiliesPercentage()
+	{
 		return $this->getPercentage($this->totalFamiliesQuery(), 'all');
 	}
 
@@ -537,7 +566,8 @@ 
 	 *
 	 * @return int
 	 */
-	private function totalSourcesQuery() {
+	private function totalSourcesQuery()
+	{
 		return (int) Database::prepare(
 			"SELECT COUNT(*) FROM `##sources` WHERE s_file = :tree_id"
 		)->execute(array(
@@ -550,7 +580,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalSources() {
+	public function totalSources()
+	{
 		return I18N::number($this->totalSourcesQuery());
 	}
 
@@ -559,7 +590,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalSourcesPercentage() {
+	public function totalSourcesPercentage()
+	{
 		return $this->getPercentage($this->totalSourcesQuery(), 'all');
 	}
 
@@ -568,7 +600,8 @@ 
 	 *
 	 * @return int
 	 */
-	private function totalNotesQuery() {
+	private function totalNotesQuery()
+	{
 		return (int) Database::prepare(
 			"SELECT COUNT(*) FROM `##other` WHERE o_type='NOTE' AND o_file = :tree_id"
 		)->execute(array(
@@ -581,7 +614,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalNotes() {
+	public function totalNotes()
+	{
 		return I18N::number($this->totalNotesQuery());
 	}
 
@@ -590,7 +624,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalNotesPercentage() {
+	public function totalNotesPercentage()
+	{
 		return $this->getPercentage($this->totalNotesQuery(), 'all');
 	}
 
@@ -599,7 +634,8 @@ 
 	 *
 	 * @return int
 	 */
-	private function totalRepositoriesQuery() {
+	private function totalRepositoriesQuery()
+	{
 		return (int) Database::prepare(
 			"SELECT COUNT(*) FROM `##other` WHERE o_type='REPO' AND o_file = :tree_id"
 		)->execute(array(
@@ -612,7 +648,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalRepositories() {
+	public function totalRepositories()
+	{
 		return I18N::number($this->totalRepositoriesQuery());
 	}
 
@@ -621,7 +658,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalRepositoriesPercentage() {
+	public function totalRepositoriesPercentage()
+	{
 		return $this->getPercentage($this->totalRepositoriesQuery(), 'all');
 	}
 
@@ -632,7 +670,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalSurnames($params = array()) {
+	public function totalSurnames($params = array())
+	{
 		if ($params) {
 			$opt      = 'IN (' . implode(',', array_fill(0, count($params), '?')) . ')';
 			$distinct = '';
@@ -661,7 +700,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalGivennames($params = array()) {
+	public function totalGivennames($params = array())
+	{
 		if ($params) {
 			$qs       = implode(',', array_fill(0, count($params), '?'));
 			$params[] = $this->tree->getTreeId();
@@ -686,7 +726,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalEvents($params = array()) {
+	public function totalEvents($params = array())
+	{
 		$sql  = "SELECT COUNT(*) AS tot FROM `##dates` WHERE d_file=?";
 		$vars = array($this->tree->getTreeId());
 
@@ -716,7 +757,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalEventsBirth() {
+	public function totalEventsBirth()
+	{
 		return $this->totalEvents(explode('|', WT_EVENTS_BIRT));
 	}
 
@@ -725,7 +767,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalBirths() {
+	public function totalBirths()
+	{
 		return $this->totalEvents(array('BIRT'));
 	}
 
@@ -734,7 +777,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalEventsDeath() {
+	public function totalEventsDeath()
+	{
 		return $this->totalEvents(explode('|', WT_EVENTS_DEAT));
 	}
 
@@ -743,7 +787,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalDeaths() {
+	public function totalDeaths()
+	{
 		return $this->totalEvents(array('DEAT'));
 	}
 
@@ -752,7 +797,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalEventsMarriage() {
+	public function totalEventsMarriage()
+	{
 		return $this->totalEvents(explode('|', WT_EVENTS_MARR));
 	}
 
@@ -761,7 +807,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMarriages() {
+	public function totalMarriages()
+	{
 		return $this->totalEvents(array('MARR'));
 	}
 
@@ -770,7 +817,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalEventsDivorce() {
+	public function totalEventsDivorce()
+	{
 		return $this->totalEvents(explode('|', WT_EVENTS_DIV));
 	}
 
@@ -779,7 +827,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalDivorces() {
+	public function totalDivorces()
+	{
 		return $this->totalEvents(array('DIV'));
 	}
 
@@ -788,7 +837,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalEventsOther() {
+	public function totalEventsOther()
+	{
 		$facts    = array_merge(explode('|', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT));
 		$no_facts = array();
 		foreach ($facts as $fact) {
@@ -804,7 +854,8 @@ 
 	 *
 	 * @return int
 	 */
-	private function totalSexMalesQuery() {
+	private function totalSexMalesQuery()
+	{
 		return (int) Database::prepare(
 			"SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id AND i_sex = 'M'"
 		)->execute(array(
@@ -817,7 +868,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalSexMales() {
+	public function totalSexMales()
+	{
 		return I18N::number($this->totalSexMalesQuery());
 	}
 
@@ -826,7 +878,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalSexMalesPercentage() {
+	public function totalSexMalesPercentage()
+	{
 		return $this->getPercentage($this->totalSexMalesQuery(), 'individual');
 	}
 
@@ -835,7 +888,8 @@ 
 	 *
 	 * @return int
 	 */
-	private function totalSexFemalesQuery() {
+	private function totalSexFemalesQuery()
+	{
 		return (int) Database::prepare(
 			"SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id AND i_sex = 'F'"
 		)->execute(array(
@@ -848,7 +902,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalSexFemales() {
+	public function totalSexFemales()
+	{
 		return I18N::number($this->totalSexFemalesQuery());
 	}
 
@@ -857,7 +912,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalSexFemalesPercentage() {
+	public function totalSexFemalesPercentage()
+	{
 		return $this->getPercentage($this->totalSexFemalesQuery(), 'individual');
 	}
 
@@ -866,7 +922,8 @@ 
 	 *
 	 * @return int
 	 */
-	private function totalSexUnknownQuery() {
+	private function totalSexUnknownQuery()
+	{
 		return (int) Database::prepare(
 			"SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id AND i_sex = 'U'"
 		)->execute(array(
@@ -879,7 +936,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalSexUnknown() {
+	public function totalSexUnknown()
+	{
 		return I18N::number($this->totalSexUnknownQuery());
 	}
 
@@ -888,7 +946,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalSexUnknownPercentage() {
+	public function totalSexUnknownPercentage()
+	{
 		return $this->getPercentage($this->totalSexUnknownQuery(), 'individual');
 	}
 
@@ -899,7 +958,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function chartSex($params = array()) {
+	public function chartSex($params = array())
+	{
 		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
 		$WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
 
@@ -969,7 +1029,8 @@ 
 	 *
 	 * @return int
 	 */
-	private function totalLivingQuery() {
+	private function totalLivingQuery()
+	{
 		return (int) Database::prepare(
 			"SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id AND i_gedcom NOT REGEXP '\\n1 (" . WT_EVENTS_DEAT . ")'"
 		)->execute(array(
@@ -982,7 +1043,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalLiving() {
+	public function totalLiving()
+	{
 		return I18N::number($this->totalLivingQuery());
 	}
 
@@ -991,7 +1053,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalLivingPercentage() {
+	public function totalLivingPercentage()
+	{
 		return $this->getPercentage($this->totalLivingQuery(), 'individual');
 	}
 
@@ -1000,7 +1063,8 @@ 
 	 *
 	 * @return int
 	 */
-	private function totalDeceasedQuery() {
+	private function totalDeceasedQuery()
+	{
 		return (int) Database::prepare(
 			"SELECT COUNT(*) FROM `##individuals` WHERE i_file = :tree_id AND i_gedcom REGEXP '\\n1 (" . WT_EVENTS_DEAT . ")'"
 		)->execute(array(
@@ -1013,7 +1077,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalDeceased() {
+	public function totalDeceased()
+	{
 		return I18N::number($this->totalDeceasedQuery());
 	}
 
@@ -1022,7 +1087,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalDeceasedPercentage() {
+	public function totalDeceasedPercentage()
+	{
 		return $this->getPercentage($this->totalDeceasedQuery(), 'individual');
 	}
 
@@ -1033,7 +1099,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function chartMortality($params = array()) {
+	public function chartMortality($params = array())
+	{
 		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
 		$WT_STATS_S_CHART_Y    = Theme::theme()->parameter('stats-small-chart-y');
 
@@ -1081,7 +1148,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalUsers($params = array()) {
+	public function totalUsers($params = array())
+	{
 		if (isset($params[0])) {
 			$total = count(User::all()) + (int) $params[0];
 		} else {
@@ -1096,7 +1164,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalAdmins() {
+	public function totalAdmins()
+	{
 		return I18N::number(count(User::allAdmins()));
 	}
 
@@ -1105,7 +1174,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalNonAdmins() {
+	public function totalNonAdmins()
+	{
 		return I18N::number(count(User::all()) - count(User::allAdmins()));
 	}
 
@@ -1116,7 +1186,8 @@ 
 	 *
 	 * @return int
 	 */
-	private function totalMediaType($type = 'all') {
+	private function totalMediaType($type = 'all')
+	{
 		if (!in_array($type, $this->_media_types) && $type != 'all' && $type != 'unknown') {
 			return 0;
 		}
@@ -1146,7 +1217,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMedia() {
+	public function totalMedia()
+	{
 		return I18N::number($this->totalMediaType('all'));
 	}
 
@@ -1155,7 +1227,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaAudio() {
+	public function totalMediaAudio()
+	{
 		return I18N::number($this->totalMediaType('audio'));
 	}
 
@@ -1164,7 +1237,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaBook() {
+	public function totalMediaBook()
+	{
 		return I18N::number($this->totalMediaType('book'));
 	}
 
@@ -1173,7 +1247,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaCard() {
+	public function totalMediaCard()
+	{
 		return I18N::number($this->totalMediaType('card'));
 	}
 
@@ -1182,7 +1257,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaCertificate() {
+	public function totalMediaCertificate()
+	{
 		return I18N::number($this->totalMediaType('certificate'));
 	}
 
@@ -1191,7 +1267,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaCoatOfArms() {
+	public function totalMediaCoatOfArms()
+	{
 		return I18N::number($this->totalMediaType('coat'));
 	}
 
@@ -1200,7 +1277,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaDocument() {
+	public function totalMediaDocument()
+	{
 		return I18N::number($this->totalMediaType('document'));
 	}
 
@@ -1209,7 +1287,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaElectronic() {
+	public function totalMediaElectronic()
+	{
 		return I18N::number($this->totalMediaType('electronic'));
 	}
 
@@ -1218,7 +1297,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaMagazine() {
+	public function totalMediaMagazine()
+	{
 		return I18N::number($this->totalMediaType('magazine'));
 	}
 
@@ -1227,7 +1307,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaManuscript() {
+	public function totalMediaManuscript()
+	{
 		return I18N::number($this->totalMediaType('manuscript'));
 	}
 
@@ -1236,7 +1317,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaMap() {
+	public function totalMediaMap()
+	{
 		return I18N::number($this->totalMediaType('map'));
 	}
 
@@ -1245,7 +1327,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaFiche() {
+	public function totalMediaFiche()
+	{
 		return I18N::number($this->totalMediaType('fiche'));
 	}
 
@@ -1254,7 +1337,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaFilm() {
+	public function totalMediaFilm()
+	{
 		return I18N::number($this->totalMediaType('film'));
 	}
 
@@ -1263,7 +1347,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaNewspaper() {
+	public function totalMediaNewspaper()
+	{
 		return I18N::number($this->totalMediaType('newspaper'));
 	}
 
@@ -1272,7 +1357,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaPainting() {
+	public function totalMediaPainting()
+	{
 		return I18N::number($this->totalMediaType('painting'));
 	}
 
@@ -1281,7 +1367,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaPhoto() {
+	public function totalMediaPhoto()
+	{
 		return I18N::number($this->totalMediaType('photo'));
 	}
 
@@ -1290,7 +1377,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaTombstone() {
+	public function totalMediaTombstone()
+	{
 		return I18N::number($this->totalMediaType('tombstone'));
 	}
 
@@ -1299,7 +1387,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaVideo() {
+	public function totalMediaVideo()
+	{
 		return I18N::number($this->totalMediaType('video'));
 	}
 
@@ -1308,7 +1397,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaOther() {
+	public function totalMediaOther()
+	{
 		return I18N::number($this->totalMediaType('other'));
 	}
 
@@ -1317,7 +1407,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMediaUnknown() {
+	public function totalMediaUnknown()
+	{
 		return I18N::number($this->totalMediaType('unknown'));
 	}
 
@@ -1328,7 +1419,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function chartMedia($params = array()) {
+	public function chartMedia($params = array())
+	{
 		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
 		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
 		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
@@ -1414,7 +1506,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function mortalityQuery($type = 'full', $life_dir = 'ASC', $birth_death = 'BIRT') {
+	private function mortalityQuery($type = 'full', $life_dir = 'ASC', $birth_death = 'BIRT')
+	{
 		if ($birth_death == 'MARR') {
 			$query_field = "'MARR'";
 		} elseif ($birth_death == 'DIV') {
@@ -1482,7 +1575,8 @@ 
 	 *
 	 * @return int[]|string[][]
 	 */
-	public function statsPlaces($what = 'ALL', $fact = '', $parent = 0, $country = false) {
+	public function statsPlaces($what = 'ALL', $fact = '', $parent = 0, $country = false)
+	{
 		if ($fact) {
 			if ($what == 'INDI') {
 				$rows = Database::prepare(
@@ -1570,7 +1664,8 @@ 
 	 *
 	 * @return int
 	 */
-	private function totalPlacesQuery() {
+	private function totalPlacesQuery()
+	{
 		return
 			(int) Database::prepare("SELECT COUNT(*) FROM `##places` WHERE p_file=?")
 				->execute(array($this->tree->getTreeId()))
@@ -1582,7 +1677,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalPlaces() {
+	public function totalPlaces()
+	{
 		return I18N::number($this->totalPlacesQuery());
 	}
 
@@ -1593,7 +1689,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function chartDistribution($params = array()) {
+	public function chartDistribution($params = array())
+	{
 		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
 		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
 		$WT_STATS_CHART_COLOR3 = Theme::theme()->parameter('distribution-chart-low-values');
@@ -1747,7 +1844,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonCountriesList() {
+	public function commonCountriesList()
+	{
 		$countries = $this->statsPlaces();
 		if (empty($countries)) {
 			return '';
@@ -1799,7 +1897,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonBirthPlacesList() {
+	public function commonBirthPlacesList()
+	{
 		$places = $this->statsPlaces('INDI', 'BIRT');
 		$top10  = array();
 		$i      = 1;
@@ -1822,7 +1921,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonDeathPlacesList() {
+	public function commonDeathPlacesList()
+	{
 		$places = $this->statsPlaces('INDI', 'DEAT');
 		$top10  = array();
 		$i      = 1;
@@ -1845,7 +1945,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonMarriagePlacesList() {
+	public function commonMarriagePlacesList()
+	{
 		$places = $this->statsPlaces('FAM', 'MARR');
 		$top10  = array();
 		$i      = 1;
@@ -1874,7 +1975,8 @@ 
 	 *
 	 * @return array|string
 	 */
-	public function statsBirthQuery($simple = true, $sex = false, $year1 = -1, $year2 = -1, $params = array()) {
+	public function statsBirthQuery($simple = true, $sex = false, $year1 = -1, $year2 = -1, $params = array())
+	{
 		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
 		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
 		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
@@ -1967,7 +2069,8 @@ 
 	 *
 	 * @return array|string
 	 */
-	public function statsDeathQuery($simple = true, $sex = false, $year1 = -1, $year2 = -1, $params = array()) {
+	public function statsDeathQuery($simple = true, $sex = false, $year1 = -1, $year2 = -1, $params = array())
+	{
 		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
 		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
 		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
@@ -2054,7 +2157,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstBirth() {
+	public function firstBirth()
+	{
 		return $this->mortalityQuery('full', 'ASC', 'BIRT');
 	}
 
@@ -2063,7 +2167,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstBirthYear() {
+	public function firstBirthYear()
+	{
 		return $this->mortalityQuery('year', 'ASC', 'BIRT');
 	}
 
@@ -2072,7 +2177,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstBirthName() {
+	public function firstBirthName()
+	{
 		return $this->mortalityQuery('name', 'ASC', 'BIRT');
 	}
 
@@ -2081,7 +2187,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstBirthPlace() {
+	public function firstBirthPlace()
+	{
 		return $this->mortalityQuery('place', 'ASC', 'BIRT');
 	}
 
@@ -2090,7 +2197,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastBirth() {
+	public function lastBirth()
+	{
 		return $this->mortalityQuery('full', 'DESC', 'BIRT');
 	}
 
@@ -2099,7 +2207,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastBirthYear() {
+	public function lastBirthYear()
+	{
 		return $this->mortalityQuery('year', 'DESC', 'BIRT');
 	}
 
@@ -2108,7 +2217,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastBirthName() {
+	public function lastBirthName()
+	{
 		return $this->mortalityQuery('name', 'DESC', 'BIRT');
 	}
 
@@ -2117,7 +2227,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastBirthPlace() {
+	public function lastBirthPlace()
+	{
 		return $this->mortalityQuery('place', 'DESC', 'BIRT');
 	}
 
@@ -2128,7 +2239,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function statsBirth($params = array()) {
+	public function statsBirth($params = array())
+	{
 		return $this->statsBirthQuery(true, false, -1, -1, $params);
 	}
 
@@ -2137,7 +2249,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstDeath() {
+	public function firstDeath()
+	{
 		return $this->mortalityQuery('full', 'ASC', 'DEAT');
 	}
 
@@ -2146,7 +2259,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstDeathYear() {
+	public function firstDeathYear()
+	{
 		return $this->mortalityQuery('year', 'ASC', 'DEAT');
 	}
 
@@ -2155,7 +2269,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstDeathName() {
+	public function firstDeathName()
+	{
 		return $this->mortalityQuery('name', 'ASC', 'DEAT');
 	}
 
@@ -2164,7 +2279,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstDeathPlace() {
+	public function firstDeathPlace()
+	{
 		return $this->mortalityQuery('place', 'ASC', 'DEAT');
 	}
 
@@ -2173,7 +2289,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastDeath() {
+	public function lastDeath()
+	{
 		return $this->mortalityQuery('full', 'DESC', 'DEAT');
 	}
 
@@ -2182,7 +2299,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastDeathYear() {
+	public function lastDeathYear()
+	{
 		return $this->mortalityQuery('year', 'DESC', 'DEAT');
 	}
 
@@ -2191,7 +2309,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastDeathName() {
+	public function lastDeathName()
+	{
 		return $this->mortalityQuery('name', 'DESC', 'DEAT');
 	}
 
@@ -2200,7 +2319,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastDeathPlace() {
+	public function lastDeathPlace()
+	{
 		return $this->mortalityQuery('place', 'DESC', 'DEAT');
 	}
 
@@ -2211,7 +2331,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function statsDeath($params = array()) {
+	public function statsDeath($params = array())
+	{
 		return $this->statsDeathQuery(true, false, -1, -1, $params);
 	}
 
@@ -2223,7 +2344,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function longlifeQuery($type = 'full', $sex = 'F') {
+	private function longlifeQuery($type = 'full', $sex = 'F')
+	{
 		$sex_search = ' 1=1';
 		if ($sex == 'F') {
 			$sex_search = " i_sex='F'";
@@ -2287,7 +2409,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function topTenOldestQuery($type = 'list', $sex = 'BOTH', $params = array()) {
+	private function topTenOldestQuery($type = 'list', $sex = 'BOTH', $params = array())
+	{
 		if ($sex === 'F') {
 			$sex_search = " AND i_sex='F' ";
 		} elseif ($sex === 'M') {
@@ -2370,7 +2493,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function topTenOldestAliveQuery($type = 'list', $sex = 'BOTH', $params = array()) {
+	private function topTenOldestAliveQuery($type = 'list', $sex = 'BOTH', $params = array())
+	{
 		if (!Auth::isMember($this->tree)) {
 			return I18N::translate('This information is private and cannot be shown.');
 		}
@@ -2446,7 +2570,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function averageLifespanQuery($sex = 'BOTH', $show_years = false) {
+	private function averageLifespanQuery($sex = 'BOTH', $show_years = false)
+	{
 		if ($sex === 'F') {
 			$sex_search = " AND i_sex='F' ";
 		} elseif ($sex === 'M') {
@@ -2505,7 +2630,8 @@ 
 	 *
 	 * @return array|string
 	 */
-	public function statsAgeQuery($simple = true, $related = 'BIRT', $sex = 'BOTH', $year1 = -1, $year2 = -1, $params = array()) {
+	public function statsAgeQuery($simple = true, $related = 'BIRT', $sex = 'BOTH', $year1 = -1, $year2 = -1, $params = array())
+	{
 		if ($simple) {
 			if (isset($params[0]) && $params[0] != '') {
 				$size = strtolower($params[0]);
@@ -2646,7 +2772,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function statsAge($params = array()) {
+	public function statsAge($params = array())
+	{
 		return $this->statsAgeQuery(true, 'BIRT', 'BOTH', -1, -1, $params);
 	}
 
@@ -2655,7 +2782,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function longestLife() {
+	public function longestLife()
+	{
 		return $this->longlifeQuery('full', 'BOTH');
 	}
 
@@ -2664,7 +2792,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function longestLifeAge() {
+	public function longestLifeAge()
+	{
 		return $this->longlifeQuery('age', 'BOTH');
 	}
 
@@ -2673,7 +2802,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function longestLifeName() {
+	public function longestLifeName()
+	{
 		return $this->longlifeQuery('name', 'BOTH');
 	}
 
@@ -2684,7 +2814,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topTenOldest($params = array()) {
+	public function topTenOldest($params = array())
+	{
 		return $this->topTenOldestQuery('nolist', 'BOTH', $params);
 	}
 
@@ -2695,7 +2826,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topTenOldestList($params = array()) {
+	public function topTenOldestList($params = array())
+	{
 		return $this->topTenOldestQuery('list', 'BOTH', $params);
 	}
 
@@ -2706,7 +2838,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topTenOldestAlive($params = array()) {
+	public function topTenOldestAlive($params = array())
+	{
 		return $this->topTenOldestAliveQuery('nolist', 'BOTH', $params);
 	}
 
@@ -2717,7 +2850,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topTenOldestListAlive($params = array()) {
+	public function topTenOldestListAlive($params = array())
+	{
 		return $this->topTenOldestAliveQuery('list', 'BOTH', $params);
 	}
 
@@ -2728,7 +2862,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function averageLifespan($show_years = false) {
+	public function averageLifespan($show_years = false)
+	{
 		return $this->averageLifespanQuery('BOTH', $show_years);
 	}
 
@@ -2737,7 +2872,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function longestLifeFemale() {
+	public function longestLifeFemale()
+	{
 		return $this->longlifeQuery('full', 'F');
 	}
 
@@ -2746,7 +2882,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function longestLifeFemaleAge() {
+	public function longestLifeFemaleAge()
+	{
 		return $this->longlifeQuery('age', 'F');
 	}
 
@@ -2755,7 +2892,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function longestLifeFemaleName() {
+	public function longestLifeFemaleName()
+	{
 		return $this->longlifeQuery('name', 'F');
 	}
 
@@ -2766,7 +2904,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topTenOldestFemale($params = array()) {
+	public function topTenOldestFemale($params = array())
+	{
 		return $this->topTenOldestQuery('nolist', 'F', $params);
 	}
 
@@ -2777,7 +2916,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topTenOldestFemaleList($params = array()) {
+	public function topTenOldestFemaleList($params = array())
+	{
 		return $this->topTenOldestQuery('list', 'F', $params);
 	}
 
@@ -2788,7 +2928,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topTenOldestFemaleAlive($params = array()) {
+	public function topTenOldestFemaleAlive($params = array())
+	{
 		return $this->topTenOldestAliveQuery('nolist', 'F', $params);
 	}
 
@@ -2799,7 +2940,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topTenOldestFemaleListAlive($params = array()) {
+	public function topTenOldestFemaleListAlive($params = array())
+	{
 		return $this->topTenOldestAliveQuery('list', 'F', $params);
 	}
 
@@ -2810,7 +2952,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function averageLifespanFemale($show_years = false) {
+	public function averageLifespanFemale($show_years = false)
+	{
 		return $this->averageLifespanQuery('F', $show_years);
 	}
 
@@ -2819,7 +2962,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function longestLifeMale() {
+	public function longestLifeMale()
+	{
 		return $this->longlifeQuery('full', 'M');
 	}
 
@@ -2828,7 +2972,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function longestLifeMaleAge() {
+	public function longestLifeMaleAge()
+	{
 		return $this->longlifeQuery('age', 'M');
 	}
 
@@ -2837,7 +2982,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function longestLifeMaleName() {
+	public function longestLifeMaleName()
+	{
 		return $this->longlifeQuery('name', 'M');
 	}
 
@@ -2848,7 +2994,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topTenOldestMale($params = array()) {
+	public function topTenOldestMale($params = array())
+	{
 		return $this->topTenOldestQuery('nolist', 'M', $params);
 	}
 
@@ -2859,7 +3006,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topTenOldestMaleList($params = array()) {
+	public function topTenOldestMaleList($params = array())
+	{
 		return $this->topTenOldestQuery('list', 'M', $params);
 	}
 
@@ -2870,7 +3018,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topTenOldestMaleAlive($params = array()) {
+	public function topTenOldestMaleAlive($params = array())
+	{
 		return $this->topTenOldestAliveQuery('nolist', 'M', $params);
 	}
 
@@ -2881,7 +3030,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topTenOldestMaleListAlive($params = array()) {
+	public function topTenOldestMaleListAlive($params = array())
+	{
 		return $this->topTenOldestAliveQuery('list', 'M', $params);
 	}
 
@@ -2892,7 +3042,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function averageLifespanMale($show_years = false) {
+	public function averageLifespanMale($show_years = false)
+	{
 		return $this->averageLifespanQuery('M', $show_years);
 	}
 
@@ -2905,7 +3056,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function eventQuery($type, $direction, $facts) {
+	private function eventQuery($type, $direction, $facts)
+	{
 		$eventTypes = array(
 			'BIRT' => I18N::translate('birth'),
 			'DEAT' => I18N::translate('death'),
@@ -2982,7 +3134,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstEvent() {
+	public function firstEvent()
+	{
 		return $this->eventQuery('full', 'ASC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
 	}
 
@@ -2991,7 +3144,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstEventYear() {
+	public function firstEventYear()
+	{
 		return $this->eventQuery('year', 'ASC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
 	}
 
@@ -3000,7 +3154,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstEventType() {
+	public function firstEventType()
+	{
 		return $this->eventQuery('type', 'ASC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
 	}
 
@@ -3009,7 +3164,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstEventName() {
+	public function firstEventName()
+	{
 		return $this->eventQuery('name', 'ASC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
 	}
 
@@ -3018,7 +3174,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstEventPlace() {
+	public function firstEventPlace()
+	{
 		return $this->eventQuery('place', 'ASC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
 	}
 
@@ -3027,7 +3184,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastEvent() {
+	public function lastEvent()
+	{
 		return $this->eventQuery('full', 'DESC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
 	}
 
@@ -3036,7 +3194,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastEventYear() {
+	public function lastEventYear()
+	{
 		return $this->eventQuery('year', 'DESC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
 	}
 
@@ -3045,7 +3204,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastEventType() {
+	public function lastEventType()
+	{
 		return $this->eventQuery('type', 'DESC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
 	}
 
@@ -3054,7 +3214,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastEventName() {
+	public function lastEventName()
+	{
 		return $this->eventQuery('name', 'DESC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
 	}
 
@@ -3063,7 +3224,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastEventPlace() {
+	public function lastEventPlace()
+	{
 		return $this->eventQuery('place', 'DESC', WT_EVENTS_BIRT . '|' . WT_EVENTS_MARR . '|' . WT_EVENTS_DIV . '|' . WT_EVENTS_DEAT);
 	}
 
@@ -3077,7 +3239,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function marriageQuery($type = 'full', $age_dir = 'ASC', $sex = 'F', $show_years = false) {
+	private function marriageQuery($type = 'full', $age_dir = 'ASC', $sex = 'F', $show_years = false)
+	{
 		if ($sex == 'F') {
 			$sex_field = 'f_wife';
 		} else {
@@ -3156,7 +3319,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function ageOfMarriageQuery($type = 'list', $age_dir = 'ASC', $params = array()) {
+	private function ageOfMarriageQuery($type = 'list', $age_dir = 'ASC', $params = array())
+	{
 		if (isset($params[0])) {
 			$total = (int) $params[0];
 		} else {
@@ -3291,7 +3455,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function ageBetweenSpousesQuery($type = 'list', $age_dir = 'DESC', $params = array()) {
+	private function ageBetweenSpousesQuery($type = 'list', $age_dir = 'DESC', $params = array())
+	{
 		if (isset($params[0])) {
 			$total = (int) $params[0];
 		} else {
@@ -3376,7 +3541,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function parentsQuery($type = 'full', $age_dir = 'ASC', $sex = 'F', $show_years = false) {
+	private function parentsQuery($type = 'full', $age_dir = 'ASC', $sex = 'F', $show_years = false)
+	{
 		if ($sex == 'F') {
 			$sex_field = 'WIFE';
 		} else {
@@ -3456,7 +3622,8 @@ 
 	 *
 	 * @return string|array
 	 */
-	public function statsMarrQuery($simple = true, $first = false, $year1 = -1, $year2 = -1, $params = array()) {
+	public function statsMarrQuery($simple = true, $first = false, $year1 = -1, $year2 = -1, $params = array())
+	{
 		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
 		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
 		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
@@ -3554,7 +3721,8 @@ 
 	 *
 	 * @return string|array
 	 */
-	private function statsDivQuery($simple = true, $first = false, $year1 = -1, $year2 = -1, $params = array()) {
+	private function statsDivQuery($simple = true, $first = false, $year1 = -1, $year2 = -1, $params = array())
+	{
 		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
 		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
 		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
@@ -3645,7 +3813,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstMarriage() {
+	public function firstMarriage()
+	{
 		return $this->mortalityQuery('full', 'ASC', 'MARR');
 	}
 
@@ -3654,7 +3823,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstMarriageYear() {
+	public function firstMarriageYear()
+	{
 		return $this->mortalityQuery('year', 'ASC', 'MARR');
 	}
 
@@ -3663,7 +3833,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstMarriageName() {
+	public function firstMarriageName()
+	{
 		return $this->mortalityQuery('name', 'ASC', 'MARR');
 	}
 
@@ -3672,7 +3843,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstMarriagePlace() {
+	public function firstMarriagePlace()
+	{
 		return $this->mortalityQuery('place', 'ASC', 'MARR');
 	}
 
@@ -3681,7 +3853,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastMarriage() {
+	public function lastMarriage()
+	{
 		return $this->mortalityQuery('full', 'DESC', 'MARR');
 	}
 
@@ -3690,7 +3863,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastMarriageYear() {
+	public function lastMarriageYear()
+	{
 		return $this->mortalityQuery('year', 'DESC', 'MARR');
 	}
 
@@ -3699,7 +3873,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastMarriageName() {
+	public function lastMarriageName()
+	{
 		return $this->mortalityQuery('name', 'DESC', 'MARR');
 	}
 
@@ -3708,7 +3883,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastMarriagePlace() {
+	public function lastMarriagePlace()
+	{
 		return $this->mortalityQuery('place', 'DESC', 'MARR');
 	}
 
@@ -3719,7 +3895,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function statsMarr($params = array()) {
+	public function statsMarr($params = array())
+	{
 		return $this->statsMarrQuery(true, false, -1, -1, $params);
 	}
 
@@ -3728,7 +3905,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstDivorce() {
+	public function firstDivorce()
+	{
 		return $this->mortalityQuery('full', 'ASC', 'DIV');
 	}
 
@@ -3737,7 +3915,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstDivorceYear() {
+	public function firstDivorceYear()
+	{
 		return $this->mortalityQuery('year', 'ASC', 'DIV');
 	}
 
@@ -3746,7 +3925,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstDivorceName() {
+	public function firstDivorceName()
+	{
 		return $this->mortalityQuery('name', 'ASC', 'DIV');
 	}
 
@@ -3755,7 +3935,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function firstDivorcePlace() {
+	public function firstDivorcePlace()
+	{
 		return $this->mortalityQuery('place', 'ASC', 'DIV');
 	}
 
@@ -3764,7 +3945,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastDivorce() {
+	public function lastDivorce()
+	{
 		return $this->mortalityQuery('full', 'DESC', 'DIV');
 	}
 
@@ -3773,7 +3955,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastDivorceYear() {
+	public function lastDivorceYear()
+	{
 		return $this->mortalityQuery('year', 'DESC', 'DIV');
 	}
 
@@ -3782,7 +3965,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastDivorceName() {
+	public function lastDivorceName()
+	{
 		return $this->mortalityQuery('name', 'DESC', 'DIV');
 	}
 
@@ -3791,7 +3975,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function lastDivorcePlace() {
+	public function lastDivorcePlace()
+	{
 		return $this->mortalityQuery('place', 'DESC', 'DIV');
 	}
 
@@ -3802,7 +3987,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function statsDiv($params = array()) {
+	public function statsDiv($params = array())
+	{
 		return $this->statsDivQuery(true, false, -1, -1, $params);
 	}
 
@@ -3817,7 +4003,8 @@ 
 	 *
 	 * @return array|string
 	 */
-	public function statsMarrAgeQuery($simple = true, $sex = 'M', $year1 = -1, $year2 = -1, $params = array()) {
+	public function statsMarrAgeQuery($simple = true, $sex = 'M', $year1 = -1, $year2 = -1, $params = array())
+	{
 		if ($simple) {
 			if (isset($params[0]) && $params[0] != '') {
 				$size = strtolower($params[0]);
@@ -3983,7 +4170,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function youngestMarriageFemale() {
+	public function youngestMarriageFemale()
+	{
 		return $this->marriageQuery('full', 'ASC', 'F', false);
 	}
 
@@ -3992,7 +4180,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function youngestMarriageFemaleName() {
+	public function youngestMarriageFemaleName()
+	{
 		return $this->marriageQuery('name', 'ASC', 'F', false);
 	}
 
@@ -4003,7 +4192,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function youngestMarriageFemaleAge($show_years = false) {
+	public function youngestMarriageFemaleAge($show_years = false)
+	{
 		return $this->marriageQuery('age', 'ASC', 'F', $show_years);
 	}
 
@@ -4012,7 +4202,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function oldestMarriageFemale() {
+	public function oldestMarriageFemale()
+	{
 		return $this->marriageQuery('full', 'DESC', 'F', false);
 	}
 
@@ -4021,7 +4212,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function oldestMarriageFemaleName() {
+	public function oldestMarriageFemaleName()
+	{
 		return $this->marriageQuery('name', 'DESC', 'F', false);
 	}
 
@@ -4032,7 +4224,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function oldestMarriageFemaleAge($show_years = false) {
+	public function oldestMarriageFemaleAge($show_years = false)
+	{
 		return $this->marriageQuery('age', 'DESC', 'F', $show_years);
 	}
 
@@ -4041,7 +4234,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function youngestMarriageMale() {
+	public function youngestMarriageMale()
+	{
 		return $this->marriageQuery('full', 'ASC', 'M', false);
 	}
 
@@ -4050,7 +4244,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function youngestMarriageMaleName() {
+	public function youngestMarriageMaleName()
+	{
 		return $this->marriageQuery('name', 'ASC', 'M', false);
 	}
 
@@ -4061,7 +4256,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function youngestMarriageMaleAge($show_years = false) {
+	public function youngestMarriageMaleAge($show_years = false)
+	{
 		return $this->marriageQuery('age', 'ASC', 'M', $show_years);
 	}
 
@@ -4070,7 +4266,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function oldestMarriageMale() {
+	public function oldestMarriageMale()
+	{
 		return $this->marriageQuery('full', 'DESC', 'M', false);
 	}
 
@@ -4079,7 +4276,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function oldestMarriageMaleName() {
+	public function oldestMarriageMaleName()
+	{
 		return $this->marriageQuery('name', 'DESC', 'M', false);
 	}
 
@@ -4090,7 +4288,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function oldestMarriageMaleAge($show_years = false) {
+	public function oldestMarriageMaleAge($show_years = false)
+	{
 		return $this->marriageQuery('age', 'DESC', 'M', $show_years);
 	}
 
@@ -4101,7 +4300,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function statsMarrAge($params = array()) {
+	public function statsMarrAge($params = array())
+	{
 		return $this->statsMarrAgeQuery(true, 'BOTH', -1, -1, $params);
 	}
 
@@ -4112,7 +4312,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function ageBetweenSpousesMF($params = array()) {
+	public function ageBetweenSpousesMF($params = array())
+	{
 		return $this->ageBetweenSpousesQuery('nolist', 'DESC', $params);
 	}
 
@@ -4123,7 +4324,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function ageBetweenSpousesMFList($params = array()) {
+	public function ageBetweenSpousesMFList($params = array())
+	{
 		return $this->ageBetweenSpousesQuery('list', 'DESC', $params);
 	}
 
@@ -4134,7 +4336,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function ageBetweenSpousesFM($params = array()) {
+	public function ageBetweenSpousesFM($params = array())
+	{
 		return $this->ageBetweenSpousesQuery('nolist', 'ASC', $params);
 	}
 
@@ -4145,7 +4348,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function ageBetweenSpousesFMList($params = array()) {
+	public function ageBetweenSpousesFMList($params = array())
+	{
 		return $this->ageBetweenSpousesQuery('list', 'ASC', $params);
 	}
 
@@ -4154,7 +4358,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topAgeOfMarriageFamily() {
+	public function topAgeOfMarriageFamily()
+	{
 		return $this->ageOfMarriageQuery('name', 'DESC', array('1'));
 	}
 
@@ -4163,7 +4368,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topAgeOfMarriage() {
+	public function topAgeOfMarriage()
+	{
 		return $this->ageOfMarriageQuery('age', 'DESC', array('1'));
 	}
 
@@ -4174,7 +4380,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topAgeOfMarriageFamilies($params = array()) {
+	public function topAgeOfMarriageFamilies($params = array())
+	{
 		return $this->ageOfMarriageQuery('nolist', 'DESC', $params);
 	}
 
@@ -4185,7 +4392,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topAgeOfMarriageFamiliesList($params = array()) {
+	public function topAgeOfMarriageFamiliesList($params = array())
+	{
 		return $this->ageOfMarriageQuery('list', 'DESC', $params);
 	}
 
@@ -4194,7 +4402,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function minAgeOfMarriageFamily() {
+	public function minAgeOfMarriageFamily()
+	{
 		return $this->ageOfMarriageQuery('name', 'ASC', array('1'));
 	}
 
@@ -4203,7 +4412,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function minAgeOfMarriage() {
+	public function minAgeOfMarriage()
+	{
 		return $this->ageOfMarriageQuery('age', 'ASC', array('1'));
 	}
 
@@ -4214,7 +4424,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function minAgeOfMarriageFamilies($params = array()) {
+	public function minAgeOfMarriageFamilies($params = array())
+	{
 		return $this->ageOfMarriageQuery('nolist', 'ASC', $params);
 	}
 
@@ -4225,7 +4436,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function minAgeOfMarriageFamiliesList($params = array()) {
+	public function minAgeOfMarriageFamiliesList($params = array())
+	{
 		return $this->ageOfMarriageQuery('list', 'ASC', $params);
 	}
 
@@ -4234,7 +4446,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function youngestMother() {
+	public function youngestMother()
+	{
 		return $this->parentsQuery('full', 'ASC', 'F');
 	}
 
@@ -4243,7 +4456,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function youngestMotherName() {
+	public function youngestMotherName()
+	{
 		return $this->parentsQuery('name', 'ASC', 'F');
 	}
 
@@ -4254,7 +4468,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function youngestMotherAge($show_years = false) {
+	public function youngestMotherAge($show_years = false)
+	{
 		return $this->parentsQuery('age', 'ASC', 'F', $show_years);
 	}
 
@@ -4263,7 +4478,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function oldestMother() {
+	public function oldestMother()
+	{
 		return $this->parentsQuery('full', 'DESC', 'F');
 	}
 
@@ -4272,7 +4488,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function oldestMotherName() {
+	public function oldestMotherName()
+	{
 		return $this->parentsQuery('name', 'DESC', 'F');
 	}
 
@@ -4283,7 +4500,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function oldestMotherAge($show_years = false) {
+	public function oldestMotherAge($show_years = false)
+	{
 		return $this->parentsQuery('age', 'DESC', 'F', $show_years);
 	}
 
@@ -4292,7 +4510,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function youngestFather() {
+	public function youngestFather()
+	{
 		return $this->parentsQuery('full', 'ASC', 'M');
 	}
 
@@ -4301,7 +4520,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function youngestFatherName() {
+	public function youngestFatherName()
+	{
 		return $this->parentsQuery('name', 'ASC', 'M');
 	}
 
@@ -4312,7 +4532,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function youngestFatherAge($show_years = false) {
+	public function youngestFatherAge($show_years = false)
+	{
 		return $this->parentsQuery('age', 'ASC', 'M', $show_years);
 	}
 
@@ -4321,7 +4542,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function oldestFather() {
+	public function oldestFather()
+	{
 		return $this->parentsQuery('full', 'DESC', 'M');
 	}
 
@@ -4330,7 +4552,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function oldestFatherName() {
+	public function oldestFatherName()
+	{
 		return $this->parentsQuery('name', 'DESC', 'M');
 	}
 
@@ -4341,7 +4564,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function oldestFatherAge($show_years = false) {
+	public function oldestFatherAge($show_years = false)
+	{
 		return $this->parentsQuery('age', 'DESC', 'M', $show_years);
 	}
 
@@ -4350,7 +4574,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMarriedMales() {
+	public function totalMarriedMales()
+	{
 		$n = Database::prepare("SELECT COUNT(DISTINCT f_husb) FROM `##families` WHERE f_file=? AND f_gedcom LIKE '%\\n1 MARR%'")
 			->execute(array($this->tree->getTreeId()))
 			->fetchOne();
@@ -4363,7 +4588,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalMarriedFemales() {
+	public function totalMarriedFemales()
+	{
 		$n = Database::prepare("SELECT COUNT(DISTINCT f_wife) FROM `##families` WHERE f_file=? AND f_gedcom LIKE '%\\n1 MARR%'")
 			->execute(array($this->tree->getTreeId()))
 			->fetchOne();
@@ -4378,7 +4604,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function familyQuery($type = 'full') {
+	private function familyQuery($type = 'full')
+	{
 		$rows = $this->runSql(
 			" SELECT f_numchil AS tot, f_id AS id" .
 			" FROM `##families`" .
@@ -4424,7 +4651,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function topTenFamilyQuery($type = 'list', $params = array()) {
+	private function topTenFamilyQuery($type = 'list', $params = array())
+	{
 		if (isset($params[0])) {
 			$total = (int) $params[0];
 		} else {
@@ -4482,7 +4710,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function ageBetweenSiblingsQuery($type = 'list', $params = array()) {
+	private function ageBetweenSiblingsQuery($type = 'list', $params = array())
+	{
 		if (isset($params[0])) {
 			$total = (int) $params[0];
 		} else {
@@ -4611,7 +4840,8 @@ 
 	 *
 	 * @return string|string[][]
 	 */
-	public function monthFirstChildQuery($simple = true, $sex = false, $year1 = -1, $year2 = -1, $params = array()) {
+	public function monthFirstChildQuery($simple = true, $sex = false, $year1 = -1, $year2 = -1, $params = array())
+	{
 		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
 		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
 		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
@@ -4743,7 +4973,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function largestFamily() {
+	public function largestFamily()
+	{
 		return $this->familyQuery('full');
 	}
 
@@ -4752,7 +4983,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function largestFamilySize() {
+	public function largestFamilySize()
+	{
 		return $this->familyQuery('size');
 	}
 
@@ -4761,7 +4993,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function largestFamilyName() {
+	public function largestFamilyName()
+	{
 		return $this->familyQuery('name');
 	}
 
@@ -4772,7 +5005,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topTenLargestFamily($params = array()) {
+	public function topTenLargestFamily($params = array())
+	{
 		return $this->topTenFamilyQuery('nolist', $params);
 	}
 
@@ -4783,7 +5017,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topTenLargestFamilyList($params = array()) {
+	public function topTenLargestFamilyList($params = array())
+	{
 		return $this->topTenFamilyQuery('list', $params);
 	}
 
@@ -4794,7 +5029,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function chartLargestFamilies($params = array()) {
+	public function chartLargestFamilies($params = array())
+	{
 		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
 		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
 		$WT_STATS_L_CHART_X    = Theme::theme()->parameter('stats-large-chart-x');
@@ -4860,7 +5096,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalChildren() {
+	public function totalChildren()
+	{
 		$rows = $this->runSql("SELECT SUM(f_numchil) AS tot FROM `##families` WHERE f_file={$this->tree->getTreeId()}");
 
 		return I18N::number($rows[0]['tot']);
@@ -4871,7 +5108,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function averageChildren() {
+	public function averageChildren()
+	{
 		$rows = $this->runSql("SELECT AVG(f_numchil) AS tot FROM `##families` WHERE f_file={$this->tree->getTreeId()}");
 
 		return I18N::number($rows[0]['tot'], 2);
@@ -4888,7 +5126,8 @@ 
 	 *
 	 * @return string|string[][]
 	 */
-	public function statsChildrenQuery($simple = true, $sex = 'BOTH', $year1 = -1, $year2 = -1, $params = array()) {
+	public function statsChildrenQuery($simple = true, $sex = 'BOTH', $year1 = -1, $year2 = -1, $params = array())
+	{
 		if ($simple) {
 			if (isset($params[0]) && $params[0] != '') {
 				$size = strtolower($params[0]);
@@ -4994,7 +5233,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function statsChildren($params = array()) {
+	public function statsChildren($params = array())
+	{
 		return $this->statsChildrenQuery(true, 'BOTH', -1, -1, $params);
 	}
 
@@ -5005,7 +5245,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topAgeBetweenSiblingsName($params = array()) {
+	public function topAgeBetweenSiblingsName($params = array())
+	{
 		return $this->ageBetweenSiblingsQuery('name', $params);
 	}
 
@@ -5016,7 +5257,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topAgeBetweenSiblings($params = array()) {
+	public function topAgeBetweenSiblings($params = array())
+	{
 		return $this->ageBetweenSiblingsQuery('age', $params);
 	}
 
@@ -5027,7 +5269,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topAgeBetweenSiblingsFullName($params = array()) {
+	public function topAgeBetweenSiblingsFullName($params = array())
+	{
 		return $this->ageBetweenSiblingsQuery('nolist', $params);
 	}
 
@@ -5038,7 +5281,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topAgeBetweenSiblingsList($params = array()) {
+	public function topAgeBetweenSiblingsList($params = array())
+	{
 		return $this->ageBetweenSiblingsQuery('list', $params);
 	}
 
@@ -5047,7 +5291,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function noChildrenFamiliesQuery() {
+	private function noChildrenFamiliesQuery()
+	{
 		$rows = $this->runSql(
 			" SELECT COUNT(*) AS tot" .
 			" FROM  `##families`" .
@@ -5061,7 +5306,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function noChildrenFamilies() {
+	public function noChildrenFamilies()
+	{
 		return I18N::number($this->noChildrenFamiliesQuery());
 	}
 
@@ -5072,7 +5318,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function noChildrenFamiliesList($params = array()) {
+	public function noChildrenFamiliesList($params = array())
+	{
 		if (isset($params[0]) && $params[0] != '') {
 			$type = strtolower($params[0]);
 		} else {
@@ -5118,7 +5365,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function chartNoChildrenFamilies($params = array()) {
+	public function chartNoChildrenFamilies($params = array())
+	{
 		if (isset($params[0]) && $params[0] != '') {
 			$size = strtolower($params[0]);
 		} else {
@@ -5217,7 +5465,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function topTenGrandFamilyQuery($type = 'list', $params = array()) {
+	private function topTenGrandFamilyQuery($type = 'list', $params = array())
+	{
 		if (isset($params[0])) {
 			$total = (int) $params[0];
 		} else {
@@ -5281,7 +5530,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topTenLargestGrandFamily($params = array()) {
+	public function topTenLargestGrandFamily($params = array())
+	{
 		return $this->topTenGrandFamilyQuery('nolist', $params);
 	}
 
@@ -5292,7 +5542,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function topTenLargestGrandFamilyList($params = array()) {
+	public function topTenLargestGrandFamilyList($params = array())
+	{
 		return $this->topTenGrandFamilyQuery('list', $params);
 	}
 
@@ -5305,7 +5556,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function commonSurnamesQuery($type = 'list', $show_tot = false, $params = array()) {
+	private function commonSurnamesQuery($type = 'list', $show_tot = false, $params = array())
+	{
 		$threshold          = empty($params[0]) ? 10 : (int) $params[0];
 		$number_of_surnames = empty($params[1]) ? 10 : (int) $params[1];
 		$sorting            = empty($params[2]) ? 'alpha' : $params[2];
@@ -5342,7 +5594,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getCommonSurname() {
+	public function getCommonSurname()
+	{
 		$surnames = array_keys(FunctionsDb::getTopSurnames($this->tree->getTreeId(), 1, 1));
 
 		return array_shift($surnames);
@@ -5355,7 +5608,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonSurnames($params = array('', '', 'alpha')) {
+	public function commonSurnames($params = array('', '', 'alpha'))
+	{
 		return $this->commonSurnamesQuery('nolist', false, $params);
 	}
 
@@ -5366,7 +5620,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonSurnamesTotals($params = array('', '', 'rcount')) {
+	public function commonSurnamesTotals($params = array('', '', 'rcount'))
+	{
 		return $this->commonSurnamesQuery('nolist', true, $params);
 	}
 
@@ -5377,7 +5632,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonSurnamesList($params = array('', '', 'alpha')) {
+	public function commonSurnamesList($params = array('', '', 'alpha'))
+	{
 		return $this->commonSurnamesQuery('list', false, $params);
 	}
 
@@ -5388,7 +5644,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonSurnamesListTotals($params = array('', '', 'rcount')) {
+	public function commonSurnamesListTotals($params = array('', '', 'rcount'))
+	{
 		return $this->commonSurnamesQuery('list', true, $params);
 	}
 
@@ -5399,7 +5656,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function chartCommonSurnames($params = array()) {
+	public function chartCommonSurnames($params = array())
+	{
 		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
 		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
 		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
@@ -5468,7 +5726,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function commonGivenQuery($sex = 'B', $type = 'list', $show_tot = false, $params = array()) {
+	private function commonGivenQuery($sex = 'B', $type = 'list', $show_tot = false, $params = array())
+	{
 		if (isset($params[0]) && $params[0] != '' && $params[0] >= 0) {
 			$threshold = (int) $params[0];
 		} else {
@@ -5596,7 +5855,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGiven($params = array(1, 10, 'alpha')) {
+	public function commonGiven($params = array(1, 10, 'alpha'))
+	{
 		return $this->commonGivenQuery('B', 'nolist', false, $params);
 	}
 
@@ -5607,7 +5867,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenTotals($params = array(1, 10, 'rcount')) {
+	public function commonGivenTotals($params = array(1, 10, 'rcount'))
+	{
 		return $this->commonGivenQuery('B', 'nolist', true, $params);
 	}
 
@@ -5618,7 +5879,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenList($params = array(1, 10, 'alpha')) {
+	public function commonGivenList($params = array(1, 10, 'alpha'))
+	{
 		return $this->commonGivenQuery('B', 'list', false, $params);
 	}
 
@@ -5629,7 +5891,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenListTotals($params = array(1, 10, 'rcount')) {
+	public function commonGivenListTotals($params = array(1, 10, 'rcount'))
+	{
 		return $this->commonGivenQuery('B', 'list', true, $params);
 	}
 
@@ -5640,7 +5903,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenTable($params = array(1, 10, 'rcount')) {
+	public function commonGivenTable($params = array(1, 10, 'rcount'))
+	{
 		return $this->commonGivenQuery('B', 'table', false, $params);
 	}
 
@@ -5651,7 +5915,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenFemale($params = array(1, 10, 'alpha')) {
+	public function commonGivenFemale($params = array(1, 10, 'alpha'))
+	{
 		return $this->commonGivenQuery('F', 'nolist', false, $params);
 	}
 
@@ -5662,7 +5927,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenFemaleTotals($params = array(1, 10, 'rcount')) {
+	public function commonGivenFemaleTotals($params = array(1, 10, 'rcount'))
+	{
 		return $this->commonGivenQuery('F', 'nolist', true, $params);
 	}
 
@@ -5673,7 +5939,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenFemaleList($params = array(1, 10, 'alpha')) {
+	public function commonGivenFemaleList($params = array(1, 10, 'alpha'))
+	{
 		return $this->commonGivenQuery('F', 'list', false, $params);
 	}
 
@@ -5684,7 +5951,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenFemaleListTotals($params = array(1, 10, 'rcount')) {
+	public function commonGivenFemaleListTotals($params = array(1, 10, 'rcount'))
+	{
 		return $this->commonGivenQuery('F', 'list', true, $params);
 	}
 
@@ -5695,7 +5963,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenFemaleTable($params = array(1, 10, 'rcount')) {
+	public function commonGivenFemaleTable($params = array(1, 10, 'rcount'))
+	{
 		return $this->commonGivenQuery('F', 'table', false, $params);
 	}
 
@@ -5706,7 +5975,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenMale($params = array(1, 10, 'alpha')) {
+	public function commonGivenMale($params = array(1, 10, 'alpha'))
+	{
 		return $this->commonGivenQuery('M', 'nolist', false, $params);
 	}
 
@@ -5717,7 +5987,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenMaleTotals($params = array(1, 10, 'rcount')) {
+	public function commonGivenMaleTotals($params = array(1, 10, 'rcount'))
+	{
 		return $this->commonGivenQuery('M', 'nolist', true, $params);
 	}
 
@@ -5728,7 +5999,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenMaleList($params = array(1, 10, 'alpha')) {
+	public function commonGivenMaleList($params = array(1, 10, 'alpha'))
+	{
 		return $this->commonGivenQuery('M', 'list', false, $params);
 	}
 
@@ -5739,7 +6011,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenMaleListTotals($params = array(1, 10, 'rcount')) {
+	public function commonGivenMaleListTotals($params = array(1, 10, 'rcount'))
+	{
 		return $this->commonGivenQuery('M', 'list', true, $params);
 	}
 
@@ -5750,7 +6023,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenMaleTable($params = array(1, 10, 'rcount')) {
+	public function commonGivenMaleTable($params = array(1, 10, 'rcount'))
+	{
 		return $this->commonGivenQuery('M', 'table', false, $params);
 	}
 
@@ -5761,7 +6035,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenUnknown($params = array(1, 10, 'alpha')) {
+	public function commonGivenUnknown($params = array(1, 10, 'alpha'))
+	{
 		return $this->commonGivenQuery('U', 'nolist', false, $params);
 	}
 
@@ -5772,7 +6047,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenUnknownTotals($params = array(1, 10, 'rcount')) {
+	public function commonGivenUnknownTotals($params = array(1, 10, 'rcount'))
+	{
 		return $this->commonGivenQuery('U', 'nolist', true, $params);
 	}
 
@@ -5783,7 +6059,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenUnknownList($params = array(1, 10, 'alpha')) {
+	public function commonGivenUnknownList($params = array(1, 10, 'alpha'))
+	{
 		return $this->commonGivenQuery('U', 'list', false, $params);
 	}
 
@@ -5794,7 +6071,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenUnknownListTotals($params = array(1, 10, 'rcount')) {
+	public function commonGivenUnknownListTotals($params = array(1, 10, 'rcount'))
+	{
 		return $this->commonGivenQuery('U', 'list', true, $params);
 	}
 
@@ -5805,7 +6083,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function commonGivenUnknownTable($params = array(1, 10, 'rcount')) {
+	public function commonGivenUnknownTable($params = array(1, 10, 'rcount'))
+	{
 		return $this->commonGivenQuery('U', 'table', false, $params);
 	}
 
@@ -5816,7 +6095,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function chartCommonGiven($params = array()) {
+	public function chartCommonGiven($params = array())
+	{
 		$WT_STATS_CHART_COLOR1 = Theme::theme()->parameter('distribution-chart-no-values');
 		$WT_STATS_CHART_COLOR2 = Theme::theme()->parameter('distribution-chart-high-values');
 		$WT_STATS_S_CHART_X    = Theme::theme()->parameter('stats-small-chart-x');
@@ -5884,7 +6164,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function usersLoggedInQuery($type = 'nolist') {
+	private function usersLoggedInQuery($type = 'nolist')
+	{
 		$content = '';
 		// List active users
 		$NumAnonymous = 0;
@@ -5951,7 +6232,8 @@ 
 	 *
 	 * @return int
 	 */
-	private function usersLoggedInTotalQuery($type = 'all') {
+	private function usersLoggedInTotalQuery($type = 'all')
+	{
 		$anon    = 0;
 		$visible = 0;
 		foreach (User::allLoggedIn() as $user) {
@@ -5975,7 +6257,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function usersLoggedIn() {
+	public function usersLoggedIn()
+	{
 		return $this->usersLoggedInQuery('nolist');
 	}
 
@@ -5984,7 +6267,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function usersLoggedInList() {
+	public function usersLoggedInList()
+	{
 		return $this->usersLoggedInQuery('list');
 	}
 
@@ -5993,7 +6277,8 @@ 
 	 *
 	 * @return int
 	 */
-	public function usersLoggedInTotal() {
+	public function usersLoggedInTotal()
+	{
 		return $this->usersLoggedInTotalQuery('all');
 	}
 
@@ -6002,7 +6287,8 @@ 
 	 *
 	 * @return int
 	 */
-	public function usersLoggedInTotalAnon() {
+	public function usersLoggedInTotalAnon()
+	{
 		return $this->usersLoggedInTotalQuery('anon');
 	}
 
@@ -6011,7 +6297,8 @@ 
 	 *
 	 * @return int
 	 */
-	public function usersLoggedInTotalVisible() {
+	public function usersLoggedInTotalVisible()
+	{
 		return $this->usersLoggedInTotalQuery('visible');
 	}
 
@@ -6020,7 +6307,8 @@ 
 	 *
 	 * @return null|string
 	 */
-	public function userId() {
+	public function userId()
+	{
 		return Auth::id();
 	}
 
@@ -6031,7 +6319,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function userName($params = array()) {
+	public function userName($params = array())
+	{
 		if (Auth::check()) {
 			return Filter::escapeHtml(Auth::user()->getUserName());
 		} elseif (isset($params[0]) && $params[0] != '') {
@@ -6047,7 +6336,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function userFullName() {
+	public function userFullName()
+	{
 		return Auth::check() ? Auth::user()->getRealNameHtml() : '';
 	}
 
@@ -6059,7 +6349,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function getLatestUserData($type = 'userid', $params = array()) {
+	private function getLatestUserData($type = 'userid', $params = array())
+	{
 		static $user_id = null;
 
 		if ($user_id === null) {
@@ -6113,7 +6404,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function latestUserId() {
+	public function latestUserId()
+	{
 		return $this->getLatestUserData('userid');
 	}
 
@@ -6122,7 +6414,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function latestUserName() {
+	public function latestUserName()
+	{
 		return $this->getLatestUserData('username');
 	}
 
@@ -6131,7 +6424,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function latestUserFullName() {
+	public function latestUserFullName()
+	{
 		return $this->getLatestUserData('fullname');
 	}
 
@@ -6142,7 +6436,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function latestUserRegDate($params = array()) {
+	public function latestUserRegDate($params = array())
+	{
 		return $this->getLatestUserData('regdate', $params);
 	}
 
@@ -6153,7 +6448,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function latestUserRegTime($params = array()) {
+	public function latestUserRegTime($params = array())
+	{
 		return $this->getLatestUserData('regtime', $params);
 	}
 
@@ -6164,7 +6460,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function latestUserLoggedin($params = array()) {
+	public function latestUserLoggedin($params = array())
+	{
 		return $this->getLatestUserData('loggedin', $params);
 	}
 
@@ -6173,7 +6470,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function contactWebmaster() {
+	public function contactWebmaster()
+	{
 		$user_id = $this->tree->getPreference('WEBMASTER_USER_ID');
 		$user    = User::find($user_id);
 		if ($user) {
@@ -6188,7 +6486,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function contactGedcom() {
+	public function contactGedcom()
+	{
 		$user_id = $this->tree->getPreference('CONTACT_USER_ID');
 		$user    = User::find($user_id);
 		if ($user) {
@@ -6203,7 +6502,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function serverDate() {
+	public function serverDate()
+	{
 		return FunctionsDate::timestampToGedcomDate(WT_TIMESTAMP)->display();
 	}
 
@@ -6212,7 +6512,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function serverTime() {
+	public function serverTime()
+	{
 		return date('g:i a');
 	}
 
@@ -6221,7 +6522,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function serverTime24() {
+	public function serverTime24()
+	{
 		return date('G:i');
 	}
 
@@ -6230,7 +6532,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function serverTimezone() {
+	public function serverTimezone()
+	{
 		return date('T');
 	}
 
@@ -6239,7 +6542,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function browserDate() {
+	public function browserDate()
+	{
 		return FunctionsDate::timestampToGedcomDate(WT_TIMESTAMP + WT_TIMESTAMP_OFFSET)->display();
 	}
 
@@ -6248,7 +6552,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function browserTime() {
+	public function browserTime()
+	{
 		return date(str_replace('%', '', I18N::timeFormat()), WT_TIMESTAMP + WT_TIMESTAMP_OFFSET);
 	}
 
@@ -6257,7 +6562,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function browserTimezone() {
+	public function browserTimezone()
+	{
 		return date('T', WT_TIMESTAMP + WT_TIMESTAMP_OFFSET);
 	}
 
@@ -6266,7 +6572,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function webtreesVersion() {
+	public function webtreesVersion()
+	{
 		return WT_VERSION;
 	}
 
@@ -6278,7 +6585,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function hitCountQuery($page_name, $params) {
+	private function hitCountQuery($page_name, $params)
+	{
 		if (is_array($params) && isset($params[0]) && $params[0] != '') {
 			$page_parameter = $params[0];
 		} else {
@@ -6307,7 +6615,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function hitCount($params = array()) {
+	public function hitCount($params = array())
+	{
 		return $this->hitCountQuery(null, $params);
 	}
 
@@ -6318,7 +6627,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function hitCountUser($params = array()) {
+	public function hitCountUser($params = array())
+	{
 		return $this->hitCountQuery('index.php', $params);
 	}
 
@@ -6329,7 +6639,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function hitCountIndi($params = array()) {
+	public function hitCountIndi($params = array())
+	{
 		return $this->hitCountQuery('individual.php', $params);
 	}
 
@@ -6340,7 +6651,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function hitCountFam($params = array()) {
+	public function hitCountFam($params = array())
+	{
 		return $this->hitCountQuery('family.php', $params);
 	}
 
@@ -6351,7 +6663,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function hitCountSour($params = array()) {
+	public function hitCountSour($params = array())
+	{
 		return $this->hitCountQuery('source.php', $params);
 	}
 
@@ -6362,7 +6675,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function hitCountRepo($params = array()) {
+	public function hitCountRepo($params = array())
+	{
 		return $this->hitCountQuery('repo.php', $params);
 	}
 
@@ -6373,7 +6687,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function hitCountNote($params = array()) {
+	public function hitCountNote($params = array())
+	{
 		return $this->hitCountQuery('note.php', $params);
 	}
 
@@ -6384,7 +6699,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function hitCountObje($params = array()) {
+	public function hitCountObje($params = array())
+	{
 		return $this->hitCountQuery('mediaviewer.php', $params);
 	}
 
@@ -6397,7 +6713,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function arrayToExtendedEncoding($a) {
+	private function arrayToExtendedEncoding($a)
+	{
 		$xencoding = WT_GOOGLE_CHART_ENCODING;
 
 		$encoding = '';
@@ -6421,7 +6738,8 @@ 
 	 *
 	 * @return int
 	 */
-	private function nameTotalSort($a, $b) {
+	private function nameTotalSort($a, $b)
+	{
 		return $a['match'] - $b['match'];
 	}
 
@@ -6433,7 +6751,8 @@ 
 	 *
 	 * @return int
 	 */
-	private function nameTotalReverseSort($a, $b) {
+	private function nameTotalReverseSort($a, $b)
+	{
 		return $b['match'] - $a['match'];
 	}
 
@@ -6444,7 +6763,8 @@ 
 	 *
 	 * @return string[][]
 	 */
-	private function runSql($sql) {
+	private function runSql($sql)
+	{
 		static $cache = array();
 
 		$id = md5($sql);
@@ -6462,7 +6782,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function gedcomFavorites() {
+	public function gedcomFavorites()
+	{
 		if (Module::getModuleByName('gedcom_favorites')) {
 			$block = new FamilyTreeFavoritesModule(WT_MODULES_DIR . 'gedcom_favorites');
 
@@ -6477,7 +6798,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function userFavorites() {
+	public function userFavorites()
+	{
 		if (Auth::check() && Module::getModuleByName('user_favorites')) {
 			$block = new UserFavoritesModule(WT_MODULES_DIR . 'gedcom_favorites');
 
@@ -6492,7 +6814,8 @@ 
 	 *
 	 * @return int
 	 */
-	public function totalGedcomFavorites() {
+	public function totalGedcomFavorites()
+	{
 		if (Module::getModuleByName('gedcom_favorites')) {
 			return count(FamilyTreeFavoritesModule::getFavorites($this->tree->getTreeId()));
 		} else {
@@ -6505,7 +6828,8 @@ 
 	 *
 	 * @return int
 	 */
-	public function totalUserFavorites() {
+	public function totalUserFavorites()
+	{
 		if (Module::getModuleByName('user_favorites')) {
 			return count(UserFavoritesModule::getFavorites(Auth::id()));
 		} else {
@@ -6522,7 +6846,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function callBlock($params = array()) {
+	public function callBlock($params = array())
+	{
 		global $ctype;
 
 		if (isset($params[0]) && $params[0] != '') {
@@ -6562,7 +6887,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalUserMessages() {
+	public function totalUserMessages()
+	{
 		$total = (int) Database::prepare("SELECT COUNT(*) FROM `##message` WHERE user_id = ?")
 			->execute(array(Auth::id()))
 			->fetchOne();
@@ -6575,7 +6901,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalUserJournal() {
+	public function totalUserJournal()
+	{
 		try {
 			$number = (int) Database::prepare("SELECT COUNT(*) FROM `##news` WHERE user_id = ?")
 				->execute(array(Auth::id()))
@@ -6593,7 +6920,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function totalGedcomNews() {
+	public function totalGedcomNews()
+	{
 		try {
 			$number = (int) Database::prepare("SELECT COUNT(*) FROM `##news` WHERE gedcom_id = ?")
 				->execute(array($this->tree->getTreeId()))
@@ -6613,7 +6941,8 @@ 
 	 *
 	 * @return string[]
 	 */
-	public function iso3166() {
+	public function iso3166()
+	{
 		return array(
 			'ABW' => 'AW', 'AFG' => 'AF', 'AGO' => 'AO', 'AIA' => 'AI', 'ALA' => 'AX', 'ALB' => 'AL',
 			'AND' => 'AD', 'ARE' => 'AE', 'ARG' => 'AR', 'ARM' => 'AM', 'ASM' => 'AS',
@@ -6665,7 +6994,8 @@ 
 	 *
 	 * @return string[]
 	 */
-	public function getAllCountries() {
+	public function getAllCountries()
+	{
 		return array(
 			'???' => /* I18N: Name of a country or state */ I18N::translate('Unknown'),
 			'ABW' => /* I18N: Name of a country or state */ I18N::translate('Aruba'),
@@ -6934,7 +7264,8 @@ 
 	 *
 	 * @return string
 	 */
-	private function centuryName($century) {
+	private function centuryName($century)
+	{
 		if ($century < 0) {
 			return str_replace(-$century, self::centuryName(-$century), /* I18N: BCE=Before the Common Era, for Julian years < 0. See http://en.wikipedia.org/wiki/Common_Era */
 				I18N::translate('%s BCE', I18N::number(-$century)));

app/Mail.php

Indentation +72 added lines, -72 removed lines

@@ -29,80 +29,80 @@ 
  * Send mail messages.
  */
 class Mail {
-	const EOL = "<br>\r\n"; // End-of-line that works for both TEXT and HTML messages
+    const EOL = "<br>\r\n"; // End-of-line that works for both TEXT and HTML messages
 
-	/**
-	 * Send an external email message
-	 * Caution! gmail may rewrite the "From" header unless you have added the address to your account.
-	 *
-	 * @param Tree   $tree
-	 * @param string $to_email
-	 * @param string $to_name
-	 * @param string $replyto_email
-	 * @param string $replyto_name
-	 * @param string $subject
-	 * @param string $message
-	 *
-	 * @return bool
-	 */
-	public static function send(Tree $tree, $to_email, $to_name, $replyto_email, $replyto_name, $subject, $message) {
-		try {
-			// Swiftmailer uses the PHP default tmp directory.  On some servers, this
-			// is outside the open_basedir list.  Therefore we must set one explicitly.
-			File::mkdir(WT_DATA_DIR . 'tmp');
+    /**
+     * Send an external email message
+     * Caution! gmail may rewrite the "From" header unless you have added the address to your account.
+     *
+     * @param Tree   $tree
+     * @param string $to_email
+     * @param string $to_name
+     * @param string $replyto_email
+     * @param string $replyto_name
+     * @param string $subject
+     * @param string $message
+     *
+     * @return bool
+     */
+    public static function send(Tree $tree, $to_email, $to_name, $replyto_email, $replyto_name, $subject, $message) {
+        try {
+            // Swiftmailer uses the PHP default tmp directory.  On some servers, this
+            // is outside the open_basedir list.  Therefore we must set one explicitly.
+            File::mkdir(WT_DATA_DIR . 'tmp');
 
-			Swift_Preferences::getInstance()->setTempDir(WT_DATA_DIR . 'tmp');
+            Swift_Preferences::getInstance()->setTempDir(WT_DATA_DIR . 'tmp');
 
-			$mail = Swift_Message::newInstance()
-				->setSubject($subject)
-				->setFrom(Site::getPreference('SMTP_FROM_NAME'), $tree->getPreference('title'))
-				->setTo($to_email, $to_name)
-				->setReplyTo($replyto_email, $replyto_name)
-				->setBody($message, 'text/html')
-				->addPart(Filter::unescapeHtml($message), 'text/plain');
+            $mail = Swift_Message::newInstance()
+                ->setSubject($subject)
+                ->setFrom(Site::getPreference('SMTP_FROM_NAME'), $tree->getPreference('title'))
+                ->setTo($to_email, $to_name)
+                ->setReplyTo($replyto_email, $replyto_name)
+                ->setBody($message, 'text/html')
+                ->addPart(Filter::unescapeHtml($message), 'text/plain');
 
-			Swift_Mailer::newInstance(self::transport())->send($mail);
-		} catch (Exception $ex) {
-			Log::addErrorLog('Mail: ' . $ex->getMessage());
+            Swift_Mailer::newInstance(self::transport())->send($mail);
+        } catch (Exception $ex) {
+            Log::addErrorLog('Mail: ' . $ex->getMessage());
 
-			return false;
-		}
+            return false;
+        }
 
-		return true;
-	}
+        return true;
+    }
 
-	/**
-	 * Send an automated system message (such as a password reminder) from a tree to a user.
-	 *
-	 * @param Tree   $tree
-	 * @param User   $user
-	 * @param string $subject
-	 * @param string $message
-	 *
-	 * @return bool
-	 */
-	public static function systemMessage(Tree $tree, User $user, $subject, $message) {
-		return self::send(
-			$tree,
-			$user->getEmail(), $user->getRealName(),
-			Site::getPreference('SMTP_FROM_NAME'), $tree->getPreference('title'),
-			$subject,
-			$message
-		);
-	}
+    /**
+     * Send an automated system message (such as a password reminder) from a tree to a user.
+     *
+     * @param Tree   $tree
+     * @param User   $user
+     * @param string $subject
+     * @param string $message
+     *
+     * @return bool
+     */
+    public static function systemMessage(Tree $tree, User $user, $subject, $message) {
+        return self::send(
+            $tree,
+            $user->getEmail(), $user->getRealName(),
+            Site::getPreference('SMTP_FROM_NAME'), $tree->getPreference('title'),
+            $subject,
+            $message
+        );
+    }
 
-	/**
-	 * Create a transport mechanism for sending mail
-	 *
-	 * @return Swift_Transport
-	 */
-	public static function transport() {
-		switch (Site::getPreference('SMTP_ACTIVE')) {
-		case 'internal':
-			return Swift_MailTransport::newInstance();
-		case 'sendmail':
-			return Swift_SendmailTransport::newInstance();
-		case 'external':
+    /**
+     * Create a transport mechanism for sending mail
+     *
+     * @return Swift_Transport
+     */
+    public static function transport() {
+        switch (Site::getPreference('SMTP_ACTIVE')) {
+        case 'internal':
+            return Swift_MailTransport::newInstance();
+        case 'sendmail':
+            return Swift_SendmailTransport::newInstance();
+        case 'external':
             $transport = Swift_SmtpTransport::newInstance()
                 ->setHost(Site::getPreference('SMTP_HOST'))
                 ->setPort(Site::getPreference('SMTP_PORT'))
@@ -118,10 +118,10 @@ 
                 $transport->setEncryption(Site::getPreference('SMTP_SSL'));
             }
 
-			return $transport;
-		default:
-			// For testing
-			return Swift_NullTransport::newInstance();
-		}
-	}
+            return $transport;
+        default:
+            // For testing
+            return Swift_NullTransport::newInstance();
+        }
+    }
 }

Switch Indentation +21 added lines, -21 removed lines

@@ -98,30 +98,30 @@
 	 */
 	public static function transport() {
 		switch (Site::getPreference('SMTP_ACTIVE')) {
-		case 'internal':
-			return Swift_MailTransport::newInstance();
-		case 'sendmail':
-			return Swift_SendmailTransport::newInstance();
-		case 'external':
-            $transport = Swift_SmtpTransport::newInstance()
-                ->setHost(Site::getPreference('SMTP_HOST'))
-                ->setPort(Site::getPreference('SMTP_PORT'))
-                ->setLocalDomain(Site::getPreference('SMTP_HELO'));
+		    case 'internal':
+			    return Swift_MailTransport::newInstance();
+		    case 'sendmail':
+			    return Swift_SendmailTransport::newInstance();
+		    case 'external':
+                $transport = Swift_SmtpTransport::newInstance()
+                    ->setHost(Site::getPreference('SMTP_HOST'))
+                    ->setPort(Site::getPreference('SMTP_PORT'))
+                    ->setLocalDomain(Site::getPreference('SMTP_HELO'));
 
-            if (Site::getPreference('SMTP_AUTH')) {
-                $transport
-                    ->setUsername(Site::getPreference('SMTP_AUTH_USER'))
-                    ->setPassword(Site::getPreference('SMTP_AUTH_PASS'));
-            }
+                if (Site::getPreference('SMTP_AUTH')) {
+                    $transport
+                        ->setUsername(Site::getPreference('SMTP_AUTH_USER'))
+                        ->setPassword(Site::getPreference('SMTP_AUTH_PASS'));
+                }
 
-            if (Site::getPreference('SMTP_SSL') !== 'none') {
-                $transport->setEncryption(Site::getPreference('SMTP_SSL'));
-            }
+                if (Site::getPreference('SMTP_SSL') !== 'none') {
+                    $transport->setEncryption(Site::getPreference('SMTP_SSL'));
+                }
 
-			return $transport;
-		default:
-			// For testing
-			return Swift_NullTransport::newInstance();
+			    return $transport;
+		    default:
+			    // For testing
+			    return Swift_NullTransport::newInstance();
 		}
 	}
 }

Braces +8 added lines, -4 removed lines

@@ -28,7 +28,8 @@ 
 /**
  * Send mail messages.
  */
-class Mail {
+class Mail
+{
 	const EOL = "<br>\r\n"; // End-of-line that works for both TEXT and HTML messages
 
 	/**
@@ -45,7 +46,8 @@ 
 	 *
 	 * @return bool
 	 */
-	public static function send(Tree $tree, $to_email, $to_name, $replyto_email, $replyto_name, $subject, $message) {
+	public static function send(Tree $tree, $to_email, $to_name, $replyto_email, $replyto_name, $subject, $message)
+	{
 		try {
 			// Swiftmailer uses the PHP default tmp directory.  On some servers, this
 			// is outside the open_basedir list.  Therefore we must set one explicitly.
@@ -81,7 +83,8 @@ 
 	 *
 	 * @return bool
 	 */
-	public static function systemMessage(Tree $tree, User $user, $subject, $message) {
+	public static function systemMessage(Tree $tree, User $user, $subject, $message)
+	{
 		return self::send(
 			$tree,
 			$user->getEmail(), $user->getRealName(),
@@ -96,7 +99,8 @@ 
 	 *
 	 * @return Swift_Transport
 	 */
-	public static function transport() {
+	public static function transport()
+	{
 		switch (Site::getPreference('SMTP_ACTIVE')) {
 		case 'internal':
 			return Swift_MailTransport::newInstance();

app/Soundex.php

Indentation +759 added lines, -759 removed lines

@@ -19,782 +19,782 @@
  * Phonetic matching of strings.
  */
 class Soundex {
-	/**
-	 * Which algorithms are supported.
-	 *
-	 * @return string[]
-	 */
-	public static function getAlgorithms() {
-		return array(
-			'std' => /* I18N: http://en.wikipedia.org/wiki/Soundex */ I18N::translate('Russell'),
-			'dm'  => /* I18N: http://en.wikipedia.org/wiki/Daitch–Mokotoff_Soundex */ I18N::translate('Daitch-Mokotoff'),
-		);
-	}
+    /**
+     * Which algorithms are supported.
+     *
+     * @return string[]
+     */
+    public static function getAlgorithms() {
+        return array(
+            'std' => /* I18N: http://en.wikipedia.org/wiki/Soundex */ I18N::translate('Russell'),
+            'dm'  => /* I18N: http://en.wikipedia.org/wiki/Daitch–Mokotoff_Soundex */ I18N::translate('Daitch-Mokotoff'),
+        );
+    }
 
-	/**
-	 * Is there a match between two soundex codes?
-	 *
-	 * @param string $soundex1
-	 * @param string $soundex2
-	 *
-	 * @return bool
-	 */
-	public static function compare($soundex1, $soundex2) {
-		if ($soundex1 && $soundex2) {
-			foreach (explode(':', $soundex1) as $code) {
-				if (strpos($soundex2, $code) !== false) {
-					return true;
-				}
-			}
-		}
+    /**
+     * Is there a match between two soundex codes?
+     *
+     * @param string $soundex1
+     * @param string $soundex2
+     *
+     * @return bool
+     */
+    public static function compare($soundex1, $soundex2) {
+        if ($soundex1 && $soundex2) {
+            foreach (explode(':', $soundex1) as $code) {
+                if (strpos($soundex2, $code) !== false) {
+                    return true;
+                }
+            }
+        }
 
-		return false;
-	}
+        return false;
+    }
 
-	/**
-	 * Generate Russell soundex codes for a given text.
-	 *
-	 * @param $text
-	 *
-	 * @return null|string
-	 */
-	public static function russell($text) {
-		$words         = preg_split('/\s/', $text, -1, PREG_SPLIT_NO_EMPTY);
-		$soundex_array = array();
-		foreach ($words as $word) {
-			$soundex = soundex($word);
-			// Only return codes from recognisable sounds
-			if ($soundex !== '0000') {
-				$soundex_array[] = $soundex;
-			}
-		}
-		// Combine words, e.g. “New York” as “Newyork”
-		if (count($words) > 1) {
-			$soundex_array[] = soundex(strtr($text, ' ', ''));
-		}
-		// A varchar(255) column can only hold 51 4-character codes (plus 50 delimiters)
-		$soundex_array = array_slice(array_unique($soundex_array), 0, 51);
+    /**
+     * Generate Russell soundex codes for a given text.
+     *
+     * @param $text
+     *
+     * @return null|string
+     */
+    public static function russell($text) {
+        $words         = preg_split('/\s/', $text, -1, PREG_SPLIT_NO_EMPTY);
+        $soundex_array = array();
+        foreach ($words as $word) {
+            $soundex = soundex($word);
+            // Only return codes from recognisable sounds
+            if ($soundex !== '0000') {
+                $soundex_array[] = $soundex;
+            }
+        }
+        // Combine words, e.g. “New York” as “Newyork”
+        if (count($words) > 1) {
+            $soundex_array[] = soundex(strtr($text, ' ', ''));
+        }
+        // A varchar(255) column can only hold 51 4-character codes (plus 50 delimiters)
+        $soundex_array = array_slice(array_unique($soundex_array), 0, 51);
 
-		if ($soundex_array) {
-			return implode(':', $soundex_array);
-		} else {
-			return '';
-		}
-	}
+        if ($soundex_array) {
+            return implode(':', $soundex_array);
+        } else {
+            return '';
+        }
+    }
 
-	/**
-	 * Generate Daitch–Mokotoff soundex codes for a given text.
-	 *
-	 * @param $text
-	 *
-	 * @return null|string
-	 */
-	public static function daitchMokotoff($text) {
-		$words         = preg_split('/\s/', $text, -1, PREG_SPLIT_NO_EMPTY);
-		$soundex_array = array();
-		foreach ($words as $word) {
-			$soundex_array = array_merge($soundex_array, self::daitchMokotoffWord($word));
-		}
-		// Combine words, e.g. “New York” as “Newyork”
-		if (count($words) > 1) {
-			$soundex_array = array_merge($soundex_array, self::daitchMokotoffWord(strtr($text, ' ', '')));
-		}
-		// A varchar(255) column can only hold 36 6-character codes (plus 35 delimiters)
-		$soundex_array = array_slice(array_unique($soundex_array), 0, 36);
+    /**
+     * Generate Daitch–Mokotoff soundex codes for a given text.
+     *
+     * @param $text
+     *
+     * @return null|string
+     */
+    public static function daitchMokotoff($text) {
+        $words         = preg_split('/\s/', $text, -1, PREG_SPLIT_NO_EMPTY);
+        $soundex_array = array();
+        foreach ($words as $word) {
+            $soundex_array = array_merge($soundex_array, self::daitchMokotoffWord($word));
+        }
+        // Combine words, e.g. “New York” as “Newyork”
+        if (count($words) > 1) {
+            $soundex_array = array_merge($soundex_array, self::daitchMokotoffWord(strtr($text, ' ', '')));
+        }
+        // A varchar(255) column can only hold 36 6-character codes (plus 35 delimiters)
+        $soundex_array = array_slice(array_unique($soundex_array), 0, 36);
 
-		if ($soundex_array) {
-			return implode(':', $soundex_array);
-		} else {
-			return '';
-		}
-	}
+        if ($soundex_array) {
+            return implode(':', $soundex_array);
+        } else {
+            return '';
+        }
+    }
 
-	// Determine the Daitch–Mokotoff Soundex code for a word
-	// Original implementation by Gerry Kroll, and analysis by Meliza Amity
+    // Determine the Daitch–Mokotoff Soundex code for a word
+    // Original implementation by Gerry Kroll, and analysis by Meliza Amity
 
-	// Max. table key length (in ASCII bytes -- NOT in UTF-8 characters!)
-	const MAXCHAR = 7;
+    // Max. table key length (in ASCII bytes -- NOT in UTF-8 characters!)
+    const MAXCHAR = 7;
 
-	/**
-	 * Name transformation arrays.
-	 * Used to transform the Name string to simplify the "sounds like" table.
-	 * This is especially useful in Hebrew.
-	 *
-	 * Each array entry defines the "from" and "to" arguments of an preg($from, $to, $text)
-	 * function call to achieve the desired transformations.
-	 *
-	 * Note about the use of "\x01":
-	 * This code, which can’t legitimately occur in the kind of text we're dealing with,
-	 * is used as a place-holder so that conditional string replacements can be done.
-	 *
-	 * @var string[][]
-	 */
-	private static $transformNameTable = array(
-		// Force Yiddish ligatures to be treated as separate letters
-		array('װ', 'וו'),
-		array('ײ', 'יי'),
-		array('ױ', 'וי'),
-		array('בו', 'בע'),
-		array('פו', 'פע'),
-		array('ומ', 'עמ'),
-		array('ום', 'עם'),
-		array('ונ', 'ענ'),
-		array('ון', 'ען'),
-		array('וו', 'ב'),
-		array("\x01", ''),
-		array('ייה$', "\x01ה"),
-		array('ייע$', "\x01ע"),
-		array('יי', 'ע'),
-		array("\x01", 'יי'),
-	);
+    /**
+     * Name transformation arrays.
+     * Used to transform the Name string to simplify the "sounds like" table.
+     * This is especially useful in Hebrew.
+     *
+     * Each array entry defines the "from" and "to" arguments of an preg($from, $to, $text)
+     * function call to achieve the desired transformations.
+     *
+     * Note about the use of "\x01":
+     * This code, which can’t legitimately occur in the kind of text we're dealing with,
+     * is used as a place-holder so that conditional string replacements can be done.
+     *
+     * @var string[][]
+     */
+    private static $transformNameTable = array(
+        // Force Yiddish ligatures to be treated as separate letters
+        array('װ', 'וו'),
+        array('ײ', 'יי'),
+        array('ױ', 'וי'),
+        array('בו', 'בע'),
+        array('פו', 'פע'),
+        array('ומ', 'עמ'),
+        array('ום', 'עם'),
+        array('ונ', 'ענ'),
+        array('ון', 'ען'),
+        array('וו', 'ב'),
+        array("\x01", ''),
+        array('ייה$', "\x01ה"),
+        array('ייע$', "\x01ע"),
+        array('יי', 'ע'),
+        array("\x01", 'יי'),
+    );
 
-	/**
-	 * The DM sound coding table is organized this way:
-	 * key: a variable-length string that corresponds to the UTF-8 character sequence
-	 * represented by the table entry. Currently, that string can be up to 7
-	 * bytes long. This maximum length is defined by the value of global variable
-	 * $maxchar.
-	 *
-	 * value: an array as follows:
-	 * [0]:  zero if not a vowel
-	 * [1]:  sound value when this string is at the beginning of the word
-	 * [2]:  sound value when this string is followed by a vowel
-	 * [3]:  sound value for other cases
-	 * [1],[2],[3] can be repeated several times to create branches in the code
-	 * an empty sound value means "ignore in this state"
-	 *
-	 * @var string[][]
-	 */
-	private static $dmsounds = array(
-		'A'       => array('1', '0', '', ''),
-		'À'       => array('1', '0', '', ''),
-		'Á'       => array('1', '0', '', ''),
-		'Â'       => array('1', '0', '', ''),
-		'Ã'       => array('1', '0', '', ''),
-		'Ä'       => array('1', '0', '1', '', '0', '', ''),
-		'Å'       => array('1', '0', '', ''),
-		'Ă'       => array('1', '0', '', ''),
-		'Ą'       => array('1', '', '', '', '', '', '6'),
-		'Ạ'       => array('1', '0', '', ''),
-		'Ả'       => array('1', '0', '', ''),
-		'Ấ'       => array('1', '0', '', ''),
-		'Ầ'       => array('1', '0', '', ''),
-		'Ẩ'       => array('1', '0', '', ''),
-		'Ẫ'       => array('1', '0', '', ''),
-		'Ậ'       => array('1', '0', '', ''),
-		'Ắ'       => array('1', '0', '', ''),
-		'Ằ'       => array('1', '0', '', ''),
-		'Ẳ'       => array('1', '0', '', ''),
-		'Ẵ'       => array('1', '0', '', ''),
-		'Ặ'       => array('1', '0', '', ''),
-		'AE'      => array('1', '0', '1', ''),
-		'Æ'       => array('1', '0', '1', ''),
-		'AI'      => array('1', '0', '1', ''),
-		'AJ'      => array('1', '0', '1', ''),
-		'AU'      => array('1', '0', '7', ''),
-		'AV'      => array('1', '0', '7', '', '7', '7', '7'),
-		'ÄU'      => array('1', '0', '1', ''),
-		'AY'      => array('1', '0', '1', ''),
-		'B'       => array('0', '7', '7', '7'),
-		'C'       => array('0', '5', '5', '5', '34', '4', '4'),
-		'Ć'       => array('0', '4', '4', '4'),
-		'Č'       => array('0', '4', '4', '4'),
-		'Ç'       => array('0', '4', '4', '4'),
-		'CH'      => array('0', '5', '5', '5', '34', '4', '4'),
-		'CHS'     => array('0', '5', '54', '54'),
-		'CK'      => array('0', '5', '5', '5', '45', '45', '45'),
-		'CCS'     => array('0', '4', '4', '4'),
-		'CS'      => array('0', '4', '4', '4'),
-		'CSZ'     => array('0', '4', '4', '4'),
-		'CZ'      => array('0', '4', '4', '4'),
-		'CZS'     => array('0', '4', '4', '4'),
-		'D'       => array('0', '3', '3', '3'),
-		'Ď'       => array('0', '3', '3', '3'),
-		'Đ'       => array('0', '3', '3', '3'),
-		'DRS'     => array('0', '4', '4', '4'),
-		'DRZ'     => array('0', '4', '4', '4'),
-		'DS'      => array('0', '4', '4', '4'),
-		'DSH'     => array('0', '4', '4', '4'),
-		'DSZ'     => array('0', '4', '4', '4'),
-		'DT'      => array('0', '3', '3', '3'),
-		'DDZ'     => array('0', '4', '4', '4'),
-		'DDZS'    => array('0', '4', '4', '4'),
-		'DZ'      => array('0', '4', '4', '4'),
-		'DŹ'      => array('0', '4', '4', '4'),
-		'DŻ'      => array('0', '4', '4', '4'),
-		'DZH'     => array('0', '4', '4', '4'),
-		'DZS'     => array('0', '4', '4', '4'),
-		'E'       => array('1', '0', '', ''),
-		'È'       => array('1', '0', '', ''),
-		'É'       => array('1', '0', '', ''),
-		'Ê'       => array('1', '0', '', ''),
-		'Ë'       => array('1', '0', '', ''),
-		'Ĕ'       => array('1', '0', '', ''),
-		'Ė'       => array('1', '0', '', ''),
-		'Ę'       => array('1', '', '', '6', '', '', ''),
-		'Ẹ'       => array('1', '0', '', ''),
-		'Ẻ'       => array('1', '0', '', ''),
-		'Ẽ'       => array('1', '0', '', ''),
-		'Ế'       => array('1', '0', '', ''),
-		'Ề'       => array('1', '0', '', ''),
-		'Ể'       => array('1', '0', '', ''),
-		'Ễ'       => array('1', '0', '', ''),
-		'Ệ'       => array('1', '0', '', ''),
-		'EAU'     => array('1', '0', '', ''),
-		'EI'      => array('1', '0', '1', ''),
-		'EJ'      => array('1', '0', '1', ''),
-		'EU'      => array('1', '1', '1', ''),
-		'EY'      => array('1', '0', '1', ''),
-		'F'       => array('0', '7', '7', '7'),
-		'FB'      => array('0', '7', '7', '7'),
-		'G'       => array('0', '5', '5', '5', '34', '4', '4'),
-		'Ğ'       => array('0', '', '', ''),
-		'GGY'     => array('0', '5', '5', '5'),
-		'GY'      => array('0', '5', '5', '5'),
-		'H'       => array('0', '5', '5', '', '5', '5', '5'),
-		'I'       => array('1', '0', '', ''),
-		'Ì'       => array('1', '0', '', ''),
-		'Í'       => array('1', '0', '', ''),
-		'Î'       => array('1', '0', '', ''),
-		'Ï'       => array('1', '0', '', ''),
-		'Ĩ'       => array('1', '0', '', ''),
-		'Į'       => array('1', '0', '', ''),
-		'İ'       => array('1', '0', '', ''),
-		'Ỉ'       => array('1', '0', '', ''),
-		'Ị'       => array('1', '0', '', ''),
-		'IA'      => array('1', '1', '', ''),
-		'IE'      => array('1', '1', '', ''),
-		'IO'      => array('1', '1', '', ''),
-		'IU'      => array('1', '1', '', ''),
-		'J'       => array('0', '1', '', '', '4', '4', '4', '5', '5', ''),
-		'K'       => array('0', '5', '5', '5'),
-		'KH'      => array('0', '5', '5', '5'),
-		'KS'      => array('0', '5', '54', '54'),
-		'L'       => array('0', '8', '8', '8'),
-		'Ľ'       => array('0', '8', '8', '8'),
-		'Ĺ'       => array('0', '8', '8', '8'),
-		'Ł'       => array('0', '7', '7', '7', '8', '8', '8'),
-		'LL'      => array('0', '8', '8', '8', '58', '8', '8', '1', '8', '8'),
-		'LLY'     => array('0', '8', '8', '8', '1', '8', '8'),
-		'LY'      => array('0', '8', '8', '8', '1', '8', '8'),
-		'M'       => array('0', '6', '6', '6'),
-		'MĔ'      => array('0', '66', '66', '66'),
-		'MN'      => array('0', '66', '66', '66'),
-		'N'       => array('0', '6', '6', '6'),
-		'Ń'       => array('0', '6', '6', '6'),
-		'Ň'       => array('0', '6', '6', '6'),
-		'Ñ'       => array('0', '6', '6', '6'),
-		'NM'      => array('0', '66', '66', '66'),
-		'O'       => array('1', '0', '', ''),
-		'Ò'       => array('1', '0', '', ''),
-		'Ó'       => array('1', '0', '', ''),
-		'Ô'       => array('1', '0', '', ''),
-		'Õ'       => array('1', '0', '', ''),
-		'Ö'       => array('1', '0', '', ''),
-		'Ø'       => array('1', '0', '', ''),
-		'Ő'       => array('1', '0', '', ''),
-		'Œ'       => array('1', '0', '', ''),
-		'Ơ'       => array('1', '0', '', ''),
-		'Ọ'       => array('1', '0', '', ''),
-		'Ỏ'       => array('1', '0', '', ''),
-		'Ố'       => array('1', '0', '', ''),
-		'Ồ'       => array('1', '0', '', ''),
-		'Ổ'       => array('1', '0', '', ''),
-		'Ỗ'       => array('1', '0', '', ''),
-		'Ộ'       => array('1', '0', '', ''),
-		'Ớ'       => array('1', '0', '', ''),
-		'Ờ'       => array('1', '0', '', ''),
-		'Ở'       => array('1', '0', '', ''),
-		'Ỡ'       => array('1', '0', '', ''),
-		'Ợ'       => array('1', '0', '', ''),
-		'OE'      => array('1', '0', '', ''),
-		'OI'      => array('1', '0', '1', ''),
-		'OJ'      => array('1', '0', '1', ''),
-		'OU'      => array('1', '0', '', ''),
-		'OY'      => array('1', '0', '1', ''),
-		'P'       => array('0', '7', '7', '7'),
-		'PF'      => array('0', '7', '7', '7'),
-		'PH'      => array('0', '7', '7', '7'),
-		'Q'       => array('0', '5', '5', '5'),
-		'R'       => array('0', '9', '9', '9'),
-		'Ř'       => array('0', '4', '4', '4'),
-		'RS'      => array('0', '4', '4', '4', '94', '94', '94'),
-		'RZ'      => array('0', '4', '4', '4', '94', '94', '94'),
-		'S'       => array('0', '4', '4', '4'),
-		'Ś'       => array('0', '4', '4', '4'),
-		'Š'       => array('0', '4', '4', '4'),
-		'Ş'       => array('0', '4', '4', '4'),
-		'SC'      => array('0', '2', '4', '4'),
-		'ŠČ'      => array('0', '2', '4', '4'),
-		'SCH'     => array('0', '4', '4', '4'),
-		'SCHD'    => array('0', '2', '43', '43'),
-		'SCHT'    => array('0', '2', '43', '43'),
-		'SCHTCH'  => array('0', '2', '4', '4'),
-		'SCHTSCH' => array('0', '2', '4', '4'),
-		'SCHTSH'  => array('0', '2', '4', '4'),
-		'SD'      => array('0', '2', '43', '43'),
-		'SH'      => array('0', '4', '4', '4'),
-		'SHCH'    => array('0', '2', '4', '4'),
-		'SHD'     => array('0', '2', '43', '43'),
-		'SHT'     => array('0', '2', '43', '43'),
-		'SHTCH'   => array('0', '2', '4', '4'),
-		'SHTSH'   => array('0', '2', '4', '4'),
-		'ß'       => array('0', '', '4', '4'),
-		'ST'      => array('0', '2', '43', '43'),
-		'STCH'    => array('0', '2', '4', '4'),
-		'STRS'    => array('0', '2', '4', '4'),
-		'STRZ'    => array('0', '2', '4', '4'),
-		'STSCH'   => array('0', '2', '4', '4'),
-		'STSH'    => array('0', '2', '4', '4'),
-		'SSZ'     => array('0', '4', '4', '4'),
-		'SZ'      => array('0', '4', '4', '4'),
-		'SZCS'    => array('0', '2', '4', '4'),
-		'SZCZ'    => array('0', '2', '4', '4'),
-		'SZD'     => array('0', '2', '43', '43'),
-		'SZT'     => array('0', '2', '43', '43'),
-		'T'       => array('0', '3', '3', '3'),
-		'Ť'       => array('0', '3', '3', '3'),
-		'Ţ'       => array('0', '3', '3', '3', '4', '4', '4'),
-		'TC'      => array('0', '4', '4', '4'),
-		'TCH'     => array('0', '4', '4', '4'),
-		'TH'      => array('0', '3', '3', '3'),
-		'TRS'     => array('0', '4', '4', '4'),
-		'TRZ'     => array('0', '4', '4', '4'),
-		'TS'      => array('0', '4', '4', '4'),
-		'TSCH'    => array('0', '4', '4', '4'),
-		'TSH'     => array('0', '4', '4', '4'),
-		'TSZ'     => array('0', '4', '4', '4'),
-		'TTCH'    => array('0', '4', '4', '4'),
-		'TTS'     => array('0', '4', '4', '4'),
-		'TTSCH'   => array('0', '4', '4', '4'),
-		'TTSZ'    => array('0', '4', '4', '4'),
-		'TTZ'     => array('0', '4', '4', '4'),
-		'TZ'      => array('0', '4', '4', '4'),
-		'TZS'     => array('0', '4', '4', '4'),
-		'U'       => array('1', '0', '', ''),
-		'Ù'       => array('1', '0', '', ''),
-		'Ú'       => array('1', '0', '', ''),
-		'Û'       => array('1', '0', '', ''),
-		'Ü'       => array('1', '0', '', ''),
-		'Ũ'       => array('1', '0', '', ''),
-		'Ū'       => array('1', '0', '', ''),
-		'Ů'       => array('1', '0', '', ''),
-		'Ű'       => array('1', '0', '', ''),
-		'Ų'       => array('1', '0', '', ''),
-		'Ư'       => array('1', '0', '', ''),
-		'Ụ'       => array('1', '0', '', ''),
-		'Ủ'       => array('1', '0', '', ''),
-		'Ứ'       => array('1', '0', '', ''),
-		'Ừ'       => array('1', '0', '', ''),
-		'Ử'       => array('1', '0', '', ''),
-		'Ữ'       => array('1', '0', '', ''),
-		'Ự'       => array('1', '0', '', ''),
-		'UE'      => array('1', '0', '', ''),
-		'UI'      => array('1', '0', '1', ''),
-		'UJ'      => array('1', '0', '1', ''),
-		'UY'      => array('1', '0', '1', ''),
-		'UW'      => array('1', '0', '1', '', '0', '7', '7'),
-		'V'       => array('0', '7', '7', '7'),
-		'W'       => array('0', '7', '7', '7'),
-		'X'       => array('0', '5', '54', '54'),
-		'Y'       => array('1', '1', '', ''),
-		'Ý'       => array('1', '1', '', ''),
-		'Ỳ'       => array('1', '1', '', ''),
-		'Ỵ'       => array('1', '1', '', ''),
-		'Ỷ'       => array('1', '1', '', ''),
-		'Ỹ'       => array('1', '1', '', ''),
-		'Z'       => array('0', '4', '4', '4'),
-		'Ź'       => array('0', '4', '4', '4'),
-		'Ż'       => array('0', '4', '4', '4'),
-		'Ž'       => array('0', '4', '4', '4'),
-		'ZD'      => array('0', '2', '43', '43'),
-		'ZDZ'     => array('0', '2', '4', '4'),
-		'ZDZH'    => array('0', '2', '4', '4'),
-		'ZH'      => array('0', '4', '4', '4'),
-		'ZHD'     => array('0', '2', '43', '43'),
-		'ZHDZH'   => array('0', '2', '4', '4'),
-		'ZS'      => array('0', '4', '4', '4'),
-		'ZSCH'    => array('0', '4', '4', '4'),
-		'ZSH'     => array('0', '4', '4', '4'),
-		'ZZS'     => array('0', '4', '4', '4'),
-		// Cyrillic alphabet
-		'А'   => array('1', '0', '', ''),
-		'Б'   => array('0', '7', '7', '7'),
-		'В'   => array('0', '7', '7', '7'),
-		'Г'   => array('0', '5', '5', '5'),
-		'Д'   => array('0', '3', '3', '3'),
-		'ДЗ'  => array('0', '4', '4', '4'),
-		'Е'   => array('1', '0', '', ''),
-		'Ё'   => array('1', '0', '', ''),
-		'Ж'   => array('0', '4', '4', '4'),
-		'З'   => array('0', '4', '4', '4'),
-		'И'   => array('1', '0', '', ''),
-		'Й'   => array('1', '1', '', '', '4', '4', '4'),
-		'К'   => array('0', '5', '5', '5'),
-		'Л'   => array('0', '8', '8', '8'),
-		'М'   => array('0', '6', '6', '6'),
-		'Н'   => array('0', '6', '6', '6'),
-		'О'   => array('1', '0', '', ''),
-		'П'   => array('0', '7', '7', '7'),
-		'Р'   => array('0', '9', '9', '9'),
-		'РЖ'  => array('0', '4', '4', '4'),
-		'С'   => array('0', '4', '4', '4'),
-		'Т'   => array('0', '3', '3', '3'),
-		'У'   => array('1', '0', '', ''),
-		'Ф'   => array('0', '7', '7', '7'),
-		'Х'   => array('0', '5', '5', '5'),
-		'Ц'   => array('0', '4', '4', '4'),
-		'Ч'   => array('0', '4', '4', '4'),
-		'Ш'   => array('0', '4', '4', '4'),
-		'Щ'   => array('0', '2', '4', '4'),
-		'Ъ'   => array('0', '', '', ''),
-		'Ы'   => array('0', '1', '', ''),
-		'Ь'   => array('0', '', '', ''),
-		'Э'   => array('1', '0', '', ''),
-		'Ю'   => array('0', '1', '', ''),
-		'Я'   => array('0', '1', '', ''),
-		// Greek alphabet
-		'Α'   => array('1', '0', '', ''),
-		'Ά'   => array('1', '0', '', ''),
-		'ΑΙ'  => array('1', '0', '1', ''),
-		'ΑΥ'  => array('1', '0', '1', ''),
-		'Β'   => array('0', '7', '7', '7'),
-		'Γ'   => array('0', '5', '5', '5'),
-		'Δ'   => array('0', '3', '3', '3'),
-		'Ε'   => array('1', '0', '', ''),
-		'Έ'   => array('1', '0', '', ''),
-		'ΕΙ'  => array('1', '0', '1', ''),
-		'ΕΥ'  => array('1', '1', '1', ''),
-		'Ζ'   => array('0', '4', '4', '4'),
-		'Η'   => array('1', '0', '', ''),
-		'Ή'   => array('1', '0', '', ''),
-		'Θ'   => array('0', '3', '3', '3'),
-		'Ι'   => array('1', '0', '', ''),
-		'Ί'   => array('1', '0', '', ''),
-		'Ϊ'   => array('1', '0', '', ''),
-		'ΐ'   => array('1', '0', '', ''),
-		'Κ'   => array('0', '5', '5', '5'),
-		'Λ'   => array('0', '8', '8', '8'),
-		'Μ'   => array('0', '6', '6', '6'),
-		'ΜΠ'  => array('0', '7', '7', '7'),
-		'Ν'   => array('0', '6', '6', '6'),
-		'ΝΤ'  => array('0', '3', '3', '3'),
-		'Ξ'   => array('0', '5', '54', '54'),
-		'Ο'   => array('1', '0', '', ''),
-		'Ό'   => array('1', '0', '', ''),
-		'ΟΙ'  => array('1', '0', '1', ''),
-		'ΟΥ'  => array('1', '0', '1', ''),
-		'Π'   => array('0', '7', '7', '7'),
-		'Ρ'   => array('0', '9', '9', '9'),
-		'Σ'   => array('0', '4', '4', '4'),
-		'ς'   => array('0', '', '', '4'),
-		'Τ'   => array('0', '3', '3', '3'),
-		'ΤΖ'  => array('0', '4', '4', '4'),
-		'ΤΣ'  => array('0', '4', '4', '4'),
-		'Υ'   => array('1', '1', '', ''),
-		'Ύ'   => array('1', '1', '', ''),
-		'Ϋ'   => array('1', '1', '', ''),
-		'ΰ'   => array('1', '1', '', ''),
-		'ΥΚ'  => array('1', '5', '5', '5'),
-		'ΥΥ'  => array('1', '65', '65', '65'),
-		'Φ'   => array('0', '7', '7', '7'),
-		'Χ'   => array('0', '5', '5', '5'),
-		'Ψ'   => array('0', '7', '7', '7'),
-		'Ω'   => array('1', '0', '', ''),
-		'Ώ'   => array('1', '0', '', ''),
-		// Hebrew alphabet
-		'א'     => array('1', '0', '', ''),
-		'או'    => array('1', '0', '7', ''),
-		'אג'    => array('1', '4', '4', '4', '5', '5', '5', '34', '34', '34'),
-		'בב'    => array('0', '7', '7', '7', '77', '77', '77'),
-		'ב'     => array('0', '7', '7', '7'),
-		'גג'    => array('0', '4', '4', '4', '5', '5', '5', '45', '45', '45', '55', '55', '55', '54', '54', '54'),
-		'גד'    => array('0', '43', '43', '43', '53', '53', '53'),
-		'גה'    => array('0', '45', '45', '45', '55', '55', '55'),
-		'גז'    => array('0', '44', '44', '44', '45', '45', '45'),
-		'גח'    => array('0', '45', '45', '45', '55', '55', '55'),
-		'גכ'    => array('0', '45', '45', '45', '55', '55', '55'),
-		'גך'    => array('0', '45', '45', '45', '55', '55', '55'),
-		'גצ'    => array('0', '44', '44', '44', '45', '45', '45'),
-		'גץ'    => array('0', '44', '44', '44', '45', '45', '45'),
-		'גק'    => array('0', '45', '45', '45', '54', '54', '54'),
-		'גש'    => array('0', '44', '44', '44', '54', '54', '54'),
-		'גת'    => array('0', '43', '43', '43', '53', '53', '53'),
-		'ג'     => array('0', '4', '4', '4', '5', '5', '5'),
-		'דז'    => array('0', '4', '4', '4'),
-		'דד'    => array('0', '3', '3', '3', '33', '33', '33'),
-		'דט'    => array('0', '33', '33', '33'),
-		'דש'    => array('0', '4', '4', '4'),
-		'דצ'    => array('0', '4', '4', '4'),
-		'דץ'    => array('0', '4', '4', '4'),
-		'ד'     => array('0', '3', '3', '3'),
-		'הג'    => array('0', '54', '54', '54', '55', '55', '55'),
-		'הכ'    => array('0', '55', '55', '55'),
-		'הח'    => array('0', '55', '55', '55'),
-		'הק'    => array('0', '55', '55', '55', '5', '5', '5'),
-		'הה'    => array('0', '5', '5', '', '55', '55', ''),
-		'ה'     => array('0', '5', '5', ''),
-		'וי'    => array('1', '', '', '', '7', '7', '7'),
-		'ו'     => array('1', '7', '7', '7', '7', '', ''),
-		'וו'    => array('1', '7', '7', '7', '7', '', ''),
-		'וופ'   => array('1', '7', '7', '7', '77', '77', '77'),
-		'זש'    => array('0', '4', '4', '4', '44', '44', '44'),
-		'זדז'   => array('0', '2', '4', '4'),
-		'ז'     => array('0', '4', '4', '4'),
-		'זג'    => array('0', '44', '44', '44', '45', '45', '45'),
-		'זז'    => array('0', '4', '4', '4', '44', '44', '44'),
-		'זס'    => array('0', '44', '44', '44'),
-		'זצ'    => array('0', '44', '44', '44'),
-		'זץ'    => array('0', '44', '44', '44'),
-		'חג'    => array('0', '54', '54', '54', '53', '53', '53'),
-		'חח'    => array('0', '5', '5', '5', '55', '55', '55'),
-		'חק'    => array('0', '55', '55', '55', '5', '5', '5'),
-		'חכ'    => array('0', '45', '45', '45', '55', '55', '55'),
-		'חס'    => array('0', '5', '54', '54'),
-		'חש'    => array('0', '5', '54', '54'),
-		'ח'     => array('0', '5', '5', '5'),
-		'טש'    => array('0', '4', '4', '4'),
-		'טד'    => array('0', '33', '33', '33'),
-		'טי'    => array('0', '3', '3', '3', '4', '4', '4', '3', '3', '34'),
-		'טת'    => array('0', '33', '33', '33'),
-		'טט'    => array('0', '3', '3', '3', '33', '33', '33'),
-		'ט'     => array('0', '3', '3', '3'),
-		'י'     => array('1', '1', '', ''),
-		'יא'    => array('1', '1', '', '', '1', '1', '1'),
-		'כג'    => array('0', '55', '55', '55', '54', '54', '54'),
-		'כש'    => array('0', '5', '54', '54'),
-		'כס'    => array('0', '5', '54', '54'),
-		'ככ'    => array('0', '5', '5', '5', '55', '55', '55'),
-		'כך'    => array('0', '5', '5', '5', '55', '55', '55'),
-		'כ'     => array('0', '5', '5', '5'),
-		'כח'    => array('0', '55', '55', '55', '5', '5', '5'),
-		'ך'     => array('0', '', '5', '5'),
-		'ל'     => array('0', '8', '8', '8'),
-		'לל'    => array('0', '88', '88', '88', '8', '8', '8'),
-		'מנ'    => array('0', '66', '66', '66'),
-		'מן'    => array('0', '66', '66', '66'),
-		'ממ'    => array('0', '6', '6', '6', '66', '66', '66'),
-		'מם'    => array('0', '6', '6', '6', '66', '66', '66'),
-		'מ'     => array('0', '6', '6', '6'),
-		'ם'     => array('0', '', '6', '6'),
-		'נמ'    => array('0', '66', '66', '66'),
-		'נם'    => array('0', '66', '66', '66'),
-		'ננ'    => array('0', '6', '6', '6', '66', '66', '66'),
-		'נן'    => array('0', '6', '6', '6', '66', '66', '66'),
-		'נ'     => array('0', '6', '6', '6'),
-		'ן'     => array('0', '', '6', '6'),
-		'סתש'   => array('0', '2', '4', '4'),
-		'סתז'   => array('0', '2', '4', '4'),
-		'סטז'   => array('0', '2', '4', '4'),
-		'סטש'   => array('0', '2', '4', '4'),
-		'סצד'   => array('0', '2', '4', '4'),
-		'סט'    => array('0', '2', '4', '4', '43', '43', '43'),
-		'סת'    => array('0', '2', '4', '4', '43', '43', '43'),
-		'סג'    => array('0', '44', '44', '44', '4', '4', '4'),
-		'סס'    => array('0', '4', '4', '4', '44', '44', '44'),
-		'סצ'    => array('0', '44', '44', '44'),
-		'סץ'    => array('0', '44', '44', '44'),
-		'סז'    => array('0', '44', '44', '44'),
-		'סש'    => array('0', '44', '44', '44'),
-		'ס'     => array('0', '4', '4', '4'),
-		'ע'     => array('1', '0', '', ''),
-		'פב'    => array('0', '7', '7', '7', '77', '77', '77'),
-		'פוו'   => array('0', '7', '7', '7', '77', '77', '77'),
-		'פפ'    => array('0', '7', '7', '7', '77', '77', '77'),
-		'פף'    => array('0', '7', '7', '7', '77', '77', '77'),
-		'פ'     => array('0', '7', '7', '7'),
-		'ף'     => array('0', '', '7', '7'),
-		'צג'    => array('0', '44', '44', '44', '45', '45', '45'),
-		'צז'    => array('0', '44', '44', '44'),
-		'צס'    => array('0', '44', '44', '44'),
-		'צצ'    => array('0', '4', '4', '4', '5', '5', '5', '44', '44', '44', '54', '54', '54', '45', '45', '45'),
-		'צץ'    => array('0', '4', '4', '4', '5', '5', '5', '44', '44', '44', '54', '54', '54'),
-		'צש'    => array('0', '44', '44', '44', '4', '4', '4', '5', '5', '5'),
-		'צ'     => array('0', '4', '4', '4', '5', '5', '5'),
-		'ץ'     => array('0', '', '4', '4'),
-		'קה'    => array('0', '55', '55', '5'),
-		'קס'    => array('0', '5', '54', '54'),
-		'קש'    => array('0', '5', '54', '54'),
-		'קק'    => array('0', '5', '5', '5', '55', '55', '55'),
-		'קח'    => array('0', '55', '55', '55'),
-		'קכ'    => array('0', '55', '55', '55'),
-		'קך'    => array('0', '55', '55', '55'),
-		'קג'    => array('0', '55', '55', '55', '54', '54', '54'),
-		'ק'     => array('0', '5', '5', '5'),
-		'רר'    => array('0', '99', '99', '99', '9', '9', '9'),
-		'ר'     => array('0', '9', '9', '9'),
-		'שטז'   => array('0', '2', '4', '4'),
-		'שתש'   => array('0', '2', '4', '4'),
-		'שתז'   => array('0', '2', '4', '4'),
-		'שטש'   => array('0', '2', '4', '4'),
-		'שד'    => array('0', '2', '43', '43'),
-		'שז'    => array('0', '44', '44', '44'),
-		'שס'    => array('0', '44', '44', '44'),
-		'שת'    => array('0', '2', '43', '43'),
-		'שג'    => array('0', '4', '4', '4', '44', '44', '44', '4', '43', '43'),
-		'שט'    => array('0', '2', '43', '43', '44', '44', '44'),
-		'שצ'    => array('0', '44', '44', '44', '45', '45', '45'),
-		'שץ'    => array('0', '44', '', '44', '45', '', '45'),
-		'שש'    => array('0', '4', '4', '4', '44', '44', '44'),
-		'ש'     => array('0', '4', '4', '4'),
-		'תג'    => array('0', '34', '34', '34'),
-		'תז'    => array('0', '34', '34', '34'),
-		'תש'    => array('0', '4', '4', '4'),
-		'תת'    => array('0', '3', '3', '3', '4', '4', '4', '33', '33', '33', '44', '44', '44', '34', '34', '34', '43', '43', '43'),
-		'ת'     => array('0', '3', '3', '3', '4', '4', '4'),
-		// Arabic alphabet
-		'ا'   => array('1', '0', '', ''),
-		'ب'   => array('0', '7', '7', '7'),
-		'ت'   => array('0', '3', '3', '3'),
-		'ث'   => array('0', '3', '3', '3'),
-		'ج'   => array('0', '4', '4', '4'),
-		'ح'   => array('0', '5', '5', '5'),
-		'خ'   => array('0', '5', '5', '5'),
-		'د'   => array('0', '3', '3', '3'),
-		'ذ'   => array('0', '3', '3', '3'),
-		'ر'   => array('0', '9', '9', '9'),
-		'ز'   => array('0', '4', '4', '4'),
-		'س'   => array('0', '4', '4', '4'),
-		'ش'   => array('0', '4', '4', '4'),
-		'ص'   => array('0', '4', '4', '4'),
-		'ض'   => array('0', '3', '3', '3'),
-		'ط'   => array('0', '3', '3', '3'),
-		'ظ'   => array('0', '4', '4', '4'),
-		'ع'   => array('1', '0', '', ''),
-		'غ'   => array('0', '0', '', ''),
-		'ف'   => array('0', '7', '7', '7'),
-		'ق'   => array('0', '5', '5', '5'),
-		'ك'   => array('0', '5', '5', '5'),
-		'ل'   => array('0', '8', '8', '8'),
-		'لا'  => array('0', '8', '8', '8'),
-		'م'   => array('0', '6', '6', '6'),
-		'ن'   => array('0', '6', '6', '6'),
-		'هن'  => array('0', '66', '66', '66'),
-		'ه'   => array('0', '5', '5', ''),
-		'و'   => array('1', '', '', '', '7', '', ''),
-		'ي'   => array('0', '1', '', ''),
-		'آ'   => array('0', '1', '', ''),
-		'ة'   => array('0', '', '', '3'),
-		'ی'   => array('0', '1', '', ''),
-		'ى'   => array('1', '1', '', ''),
-	);
+    /**
+     * The DM sound coding table is organized this way:
+     * key: a variable-length string that corresponds to the UTF-8 character sequence
+     * represented by the table entry. Currently, that string can be up to 7
+     * bytes long. This maximum length is defined by the value of global variable
+     * $maxchar.
+     *
+     * value: an array as follows:
+     * [0]:  zero if not a vowel
+     * [1]:  sound value when this string is at the beginning of the word
+     * [2]:  sound value when this string is followed by a vowel
+     * [3]:  sound value for other cases
+     * [1],[2],[3] can be repeated several times to create branches in the code
+     * an empty sound value means "ignore in this state"
+     *
+     * @var string[][]
+     */
+    private static $dmsounds = array(
+        'A'       => array('1', '0', '', ''),
+        'À'       => array('1', '0', '', ''),
+        'Á'       => array('1', '0', '', ''),
+        'Â'       => array('1', '0', '', ''),
+        'Ã'       => array('1', '0', '', ''),
+        'Ä'       => array('1', '0', '1', '', '0', '', ''),
+        'Å'       => array('1', '0', '', ''),
+        'Ă'       => array('1', '0', '', ''),
+        'Ą'       => array('1', '', '', '', '', '', '6'),
+        'Ạ'       => array('1', '0', '', ''),
+        'Ả'       => array('1', '0', '', ''),
+        'Ấ'       => array('1', '0', '', ''),
+        'Ầ'       => array('1', '0', '', ''),
+        'Ẩ'       => array('1', '0', '', ''),
+        'Ẫ'       => array('1', '0', '', ''),
+        'Ậ'       => array('1', '0', '', ''),
+        'Ắ'       => array('1', '0', '', ''),
+        'Ằ'       => array('1', '0', '', ''),
+        'Ẳ'       => array('1', '0', '', ''),
+        'Ẵ'       => array('1', '0', '', ''),
+        'Ặ'       => array('1', '0', '', ''),
+        'AE'      => array('1', '0', '1', ''),
+        'Æ'       => array('1', '0', '1', ''),
+        'AI'      => array('1', '0', '1', ''),
+        'AJ'      => array('1', '0', '1', ''),
+        'AU'      => array('1', '0', '7', ''),
+        'AV'      => array('1', '0', '7', '', '7', '7', '7'),
+        'ÄU'      => array('1', '0', '1', ''),
+        'AY'      => array('1', '0', '1', ''),
+        'B'       => array('0', '7', '7', '7'),
+        'C'       => array('0', '5', '5', '5', '34', '4', '4'),
+        'Ć'       => array('0', '4', '4', '4'),
+        'Č'       => array('0', '4', '4', '4'),
+        'Ç'       => array('0', '4', '4', '4'),
+        'CH'      => array('0', '5', '5', '5', '34', '4', '4'),
+        'CHS'     => array('0', '5', '54', '54'),
+        'CK'      => array('0', '5', '5', '5', '45', '45', '45'),
+        'CCS'     => array('0', '4', '4', '4'),
+        'CS'      => array('0', '4', '4', '4'),
+        'CSZ'     => array('0', '4', '4', '4'),
+        'CZ'      => array('0', '4', '4', '4'),
+        'CZS'     => array('0', '4', '4', '4'),
+        'D'       => array('0', '3', '3', '3'),
+        'Ď'       => array('0', '3', '3', '3'),
+        'Đ'       => array('0', '3', '3', '3'),
+        'DRS'     => array('0', '4', '4', '4'),
+        'DRZ'     => array('0', '4', '4', '4'),
+        'DS'      => array('0', '4', '4', '4'),
+        'DSH'     => array('0', '4', '4', '4'),
+        'DSZ'     => array('0', '4', '4', '4'),
+        'DT'      => array('0', '3', '3', '3'),
+        'DDZ'     => array('0', '4', '4', '4'),
+        'DDZS'    => array('0', '4', '4', '4'),
+        'DZ'      => array('0', '4', '4', '4'),
+        'DŹ'      => array('0', '4', '4', '4'),
+        'DŻ'      => array('0', '4', '4', '4'),
+        'DZH'     => array('0', '4', '4', '4'),
+        'DZS'     => array('0', '4', '4', '4'),
+        'E'       => array('1', '0', '', ''),
+        'È'       => array('1', '0', '', ''),
+        'É'       => array('1', '0', '', ''),
+        'Ê'       => array('1', '0', '', ''),
+        'Ë'       => array('1', '0', '', ''),
+        'Ĕ'       => array('1', '0', '', ''),
+        'Ė'       => array('1', '0', '', ''),
+        'Ę'       => array('1', '', '', '6', '', '', ''),
+        'Ẹ'       => array('1', '0', '', ''),
+        'Ẻ'       => array('1', '0', '', ''),
+        'Ẽ'       => array('1', '0', '', ''),
+        'Ế'       => array('1', '0', '', ''),
+        'Ề'       => array('1', '0', '', ''),
+        'Ể'       => array('1', '0', '', ''),
+        'Ễ'       => array('1', '0', '', ''),
+        'Ệ'       => array('1', '0', '', ''),
+        'EAU'     => array('1', '0', '', ''),
+        'EI'      => array('1', '0', '1', ''),
+        'EJ'      => array('1', '0', '1', ''),
+        'EU'      => array('1', '1', '1', ''),
+        'EY'      => array('1', '0', '1', ''),
+        'F'       => array('0', '7', '7', '7'),
+        'FB'      => array('0', '7', '7', '7'),
+        'G'       => array('0', '5', '5', '5', '34', '4', '4'),
+        'Ğ'       => array('0', '', '', ''),
+        'GGY'     => array('0', '5', '5', '5'),
+        'GY'      => array('0', '5', '5', '5'),
+        'H'       => array('0', '5', '5', '', '5', '5', '5'),
+        'I'       => array('1', '0', '', ''),
+        'Ì'       => array('1', '0', '', ''),
+        'Í'       => array('1', '0', '', ''),
+        'Î'       => array('1', '0', '', ''),
+        'Ï'       => array('1', '0', '', ''),
+        'Ĩ'       => array('1', '0', '', ''),
+        'Į'       => array('1', '0', '', ''),
+        'İ'       => array('1', '0', '', ''),
+        'Ỉ'       => array('1', '0', '', ''),
+        'Ị'       => array('1', '0', '', ''),
+        'IA'      => array('1', '1', '', ''),
+        'IE'      => array('1', '1', '', ''),
+        'IO'      => array('1', '1', '', ''),
+        'IU'      => array('1', '1', '', ''),
+        'J'       => array('0', '1', '', '', '4', '4', '4', '5', '5', ''),
+        'K'       => array('0', '5', '5', '5'),
+        'KH'      => array('0', '5', '5', '5'),
+        'KS'      => array('0', '5', '54', '54'),
+        'L'       => array('0', '8', '8', '8'),
+        'Ľ'       => array('0', '8', '8', '8'),
+        'Ĺ'       => array('0', '8', '8', '8'),
+        'Ł'       => array('0', '7', '7', '7', '8', '8', '8'),
+        'LL'      => array('0', '8', '8', '8', '58', '8', '8', '1', '8', '8'),
+        'LLY'     => array('0', '8', '8', '8', '1', '8', '8'),
+        'LY'      => array('0', '8', '8', '8', '1', '8', '8'),
+        'M'       => array('0', '6', '6', '6'),
+        'MĔ'      => array('0', '66', '66', '66'),
+        'MN'      => array('0', '66', '66', '66'),
+        'N'       => array('0', '6', '6', '6'),
+        'Ń'       => array('0', '6', '6', '6'),
+        'Ň'       => array('0', '6', '6', '6'),
+        'Ñ'       => array('0', '6', '6', '6'),
+        'NM'      => array('0', '66', '66', '66'),
+        'O'       => array('1', '0', '', ''),
+        'Ò'       => array('1', '0', '', ''),
+        'Ó'       => array('1', '0', '', ''),
+        'Ô'       => array('1', '0', '', ''),
+        'Õ'       => array('1', '0', '', ''),
+        'Ö'       => array('1', '0', '', ''),
+        'Ø'       => array('1', '0', '', ''),
+        'Ő'       => array('1', '0', '', ''),
+        'Œ'       => array('1', '0', '', ''),
+        'Ơ'       => array('1', '0', '', ''),
+        'Ọ'       => array('1', '0', '', ''),
+        'Ỏ'       => array('1', '0', '', ''),
+        'Ố'       => array('1', '0', '', ''),
+        'Ồ'       => array('1', '0', '', ''),
+        'Ổ'       => array('1', '0', '', ''),
+        'Ỗ'       => array('1', '0', '', ''),
+        'Ộ'       => array('1', '0', '', ''),
+        'Ớ'       => array('1', '0', '', ''),
+        'Ờ'       => array('1', '0', '', ''),
+        'Ở'       => array('1', '0', '', ''),
+        'Ỡ'       => array('1', '0', '', ''),
+        'Ợ'       => array('1', '0', '', ''),
+        'OE'      => array('1', '0', '', ''),
+        'OI'      => array('1', '0', '1', ''),
+        'OJ'      => array('1', '0', '1', ''),
+        'OU'      => array('1', '0', '', ''),
+        'OY'      => array('1', '0', '1', ''),
+        'P'       => array('0', '7', '7', '7'),
+        'PF'      => array('0', '7', '7', '7'),
+        'PH'      => array('0', '7', '7', '7'),
+        'Q'       => array('0', '5', '5', '5'),
+        'R'       => array('0', '9', '9', '9'),
+        'Ř'       => array('0', '4', '4', '4'),
+        'RS'      => array('0', '4', '4', '4', '94', '94', '94'),
+        'RZ'      => array('0', '4', '4', '4', '94', '94', '94'),
+        'S'       => array('0', '4', '4', '4'),
+        'Ś'       => array('0', '4', '4', '4'),
+        'Š'       => array('0', '4', '4', '4'),
+        'Ş'       => array('0', '4', '4', '4'),
+        'SC'      => array('0', '2', '4', '4'),
+        'ŠČ'      => array('0', '2', '4', '4'),
+        'SCH'     => array('0', '4', '4', '4'),
+        'SCHD'    => array('0', '2', '43', '43'),
+        'SCHT'    => array('0', '2', '43', '43'),
+        'SCHTCH'  => array('0', '2', '4', '4'),
+        'SCHTSCH' => array('0', '2', '4', '4'),
+        'SCHTSH'  => array('0', '2', '4', '4'),
+        'SD'      => array('0', '2', '43', '43'),
+        'SH'      => array('0', '4', '4', '4'),
+        'SHCH'    => array('0', '2', '4', '4'),
+        'SHD'     => array('0', '2', '43', '43'),
+        'SHT'     => array('0', '2', '43', '43'),
+        'SHTCH'   => array('0', '2', '4', '4'),
+        'SHTSH'   => array('0', '2', '4', '4'),
+        'ß'       => array('0', '', '4', '4'),
+        'ST'      => array('0', '2', '43', '43'),
+        'STCH'    => array('0', '2', '4', '4'),
+        'STRS'    => array('0', '2', '4', '4'),
+        'STRZ'    => array('0', '2', '4', '4'),
+        'STSCH'   => array('0', '2', '4', '4'),
+        'STSH'    => array('0', '2', '4', '4'),
+        'SSZ'     => array('0', '4', '4', '4'),
+        'SZ'      => array('0', '4', '4', '4'),
+        'SZCS'    => array('0', '2', '4', '4'),
+        'SZCZ'    => array('0', '2', '4', '4'),
+        'SZD'     => array('0', '2', '43', '43'),
+        'SZT'     => array('0', '2', '43', '43'),
+        'T'       => array('0', '3', '3', '3'),
+        'Ť'       => array('0', '3', '3', '3'),
+        'Ţ'       => array('0', '3', '3', '3', '4', '4', '4'),
+        'TC'      => array('0', '4', '4', '4'),
+        'TCH'     => array('0', '4', '4', '4'),
+        'TH'      => array('0', '3', '3', '3'),
+        'TRS'     => array('0', '4', '4', '4'),
+        'TRZ'     => array('0', '4', '4', '4'),
+        'TS'      => array('0', '4', '4', '4'),
+        'TSCH'    => array('0', '4', '4', '4'),
+        'TSH'     => array('0', '4', '4', '4'),
+        'TSZ'     => array('0', '4', '4', '4'),
+        'TTCH'    => array('0', '4', '4', '4'),
+        'TTS'     => array('0', '4', '4', '4'),
+        'TTSCH'   => array('0', '4', '4', '4'),
+        'TTSZ'    => array('0', '4', '4', '4'),
+        'TTZ'     => array('0', '4', '4', '4'),
+        'TZ'      => array('0', '4', '4', '4'),
+        'TZS'     => array('0', '4', '4', '4'),
+        'U'       => array('1', '0', '', ''),
+        'Ù'       => array('1', '0', '', ''),
+        'Ú'       => array('1', '0', '', ''),
+        'Û'       => array('1', '0', '', ''),
+        'Ü'       => array('1', '0', '', ''),
+        'Ũ'       => array('1', '0', '', ''),
+        'Ū'       => array('1', '0', '', ''),
+        'Ů'       => array('1', '0', '', ''),
+        'Ű'       => array('1', '0', '', ''),
+        'Ų'       => array('1', '0', '', ''),
+        'Ư'       => array('1', '0', '', ''),
+        'Ụ'       => array('1', '0', '', ''),
+        'Ủ'       => array('1', '0', '', ''),
+        'Ứ'       => array('1', '0', '', ''),
+        'Ừ'       => array('1', '0', '', ''),
+        'Ử'       => array('1', '0', '', ''),
+        'Ữ'       => array('1', '0', '', ''),
+        'Ự'       => array('1', '0', '', ''),
+        'UE'      => array('1', '0', '', ''),
+        'UI'      => array('1', '0', '1', ''),
+        'UJ'      => array('1', '0', '1', ''),
+        'UY'      => array('1', '0', '1', ''),
+        'UW'      => array('1', '0', '1', '', '0', '7', '7'),
+        'V'       => array('0', '7', '7', '7'),
+        'W'       => array('0', '7', '7', '7'),
+        'X'       => array('0', '5', '54', '54'),
+        'Y'       => array('1', '1', '', ''),
+        'Ý'       => array('1', '1', '', ''),
+        'Ỳ'       => array('1', '1', '', ''),
+        'Ỵ'       => array('1', '1', '', ''),
+        'Ỷ'       => array('1', '1', '', ''),
+        'Ỹ'       => array('1', '1', '', ''),
+        'Z'       => array('0', '4', '4', '4'),
+        'Ź'       => array('0', '4', '4', '4'),
+        'Ż'       => array('0', '4', '4', '4'),
+        'Ž'       => array('0', '4', '4', '4'),
+        'ZD'      => array('0', '2', '43', '43'),
+        'ZDZ'     => array('0', '2', '4', '4'),
+        'ZDZH'    => array('0', '2', '4', '4'),
+        'ZH'      => array('0', '4', '4', '4'),
+        'ZHD'     => array('0', '2', '43', '43'),
+        'ZHDZH'   => array('0', '2', '4', '4'),
+        'ZS'      => array('0', '4', '4', '4'),
+        'ZSCH'    => array('0', '4', '4', '4'),
+        'ZSH'     => array('0', '4', '4', '4'),
+        'ZZS'     => array('0', '4', '4', '4'),
+        // Cyrillic alphabet
+        'А'   => array('1', '0', '', ''),
+        'Б'   => array('0', '7', '7', '7'),
+        'В'   => array('0', '7', '7', '7'),
+        'Г'   => array('0', '5', '5', '5'),
+        'Д'   => array('0', '3', '3', '3'),
+        'ДЗ'  => array('0', '4', '4', '4'),
+        'Е'   => array('1', '0', '', ''),
+        'Ё'   => array('1', '0', '', ''),
+        'Ж'   => array('0', '4', '4', '4'),
+        'З'   => array('0', '4', '4', '4'),
+        'И'   => array('1', '0', '', ''),
+        'Й'   => array('1', '1', '', '', '4', '4', '4'),
+        'К'   => array('0', '5', '5', '5'),
+        'Л'   => array('0', '8', '8', '8'),
+        'М'   => array('0', '6', '6', '6'),
+        'Н'   => array('0', '6', '6', '6'),
+        'О'   => array('1', '0', '', ''),
+        'П'   => array('0', '7', '7', '7'),
+        'Р'   => array('0', '9', '9', '9'),
+        'РЖ'  => array('0', '4', '4', '4'),
+        'С'   => array('0', '4', '4', '4'),
+        'Т'   => array('0', '3', '3', '3'),
+        'У'   => array('1', '0', '', ''),
+        'Ф'   => array('0', '7', '7', '7'),
+        'Х'   => array('0', '5', '5', '5'),
+        'Ц'   => array('0', '4', '4', '4'),
+        'Ч'   => array('0', '4', '4', '4'),
+        'Ш'   => array('0', '4', '4', '4'),
+        'Щ'   => array('0', '2', '4', '4'),
+        'Ъ'   => array('0', '', '', ''),
+        'Ы'   => array('0', '1', '', ''),
+        'Ь'   => array('0', '', '', ''),
+        'Э'   => array('1', '0', '', ''),
+        'Ю'   => array('0', '1', '', ''),
+        'Я'   => array('0', '1', '', ''),
+        // Greek alphabet
+        'Α'   => array('1', '0', '', ''),
+        'Ά'   => array('1', '0', '', ''),
+        'ΑΙ'  => array('1', '0', '1', ''),
+        'ΑΥ'  => array('1', '0', '1', ''),
+        'Β'   => array('0', '7', '7', '7'),
+        'Γ'   => array('0', '5', '5', '5'),
+        'Δ'   => array('0', '3', '3', '3'),
+        'Ε'   => array('1', '0', '', ''),
+        'Έ'   => array('1', '0', '', ''),
+        'ΕΙ'  => array('1', '0', '1', ''),
+        'ΕΥ'  => array('1', '1', '1', ''),
+        'Ζ'   => array('0', '4', '4', '4'),
+        'Η'   => array('1', '0', '', ''),
+        'Ή'   => array('1', '0', '', ''),
+        'Θ'   => array('0', '3', '3', '3'),
+        'Ι'   => array('1', '0', '', ''),
+        'Ί'   => array('1', '0', '', ''),
+        'Ϊ'   => array('1', '0', '', ''),
+        'ΐ'   => array('1', '0', '', ''),
+        'Κ'   => array('0', '5', '5', '5'),
+        'Λ'   => array('0', '8', '8', '8'),
+        'Μ'   => array('0', '6', '6', '6'),
+        'ΜΠ'  => array('0', '7', '7', '7'),
+        'Ν'   => array('0', '6', '6', '6'),
+        'ΝΤ'  => array('0', '3', '3', '3'),
+        'Ξ'   => array('0', '5', '54', '54'),
+        'Ο'   => array('1', '0', '', ''),
+        'Ό'   => array('1', '0', '', ''),
+        'ΟΙ'  => array('1', '0', '1', ''),
+        'ΟΥ'  => array('1', '0', '1', ''),
+        'Π'   => array('0', '7', '7', '7'),
+        'Ρ'   => array('0', '9', '9', '9'),
+        'Σ'   => array('0', '4', '4', '4'),
+        'ς'   => array('0', '', '', '4'),
+        'Τ'   => array('0', '3', '3', '3'),
+        'ΤΖ'  => array('0', '4', '4', '4'),
+        'ΤΣ'  => array('0', '4', '4', '4'),
+        'Υ'   => array('1', '1', '', ''),
+        'Ύ'   => array('1', '1', '', ''),
+        'Ϋ'   => array('1', '1', '', ''),
+        'ΰ'   => array('1', '1', '', ''),
+        'ΥΚ'  => array('1', '5', '5', '5'),
+        'ΥΥ'  => array('1', '65', '65', '65'),
+        'Φ'   => array('0', '7', '7', '7'),
+        'Χ'   => array('0', '5', '5', '5'),
+        'Ψ'   => array('0', '7', '7', '7'),
+        'Ω'   => array('1', '0', '', ''),
+        'Ώ'   => array('1', '0', '', ''),
+        // Hebrew alphabet
+        'א'     => array('1', '0', '', ''),
+        'או'    => array('1', '0', '7', ''),
+        'אג'    => array('1', '4', '4', '4', '5', '5', '5', '34', '34', '34'),
+        'בב'    => array('0', '7', '7', '7', '77', '77', '77'),
+        'ב'     => array('0', '7', '7', '7'),
+        'גג'    => array('0', '4', '4', '4', '5', '5', '5', '45', '45', '45', '55', '55', '55', '54', '54', '54'),
+        'גד'    => array('0', '43', '43', '43', '53', '53', '53'),
+        'גה'    => array('0', '45', '45', '45', '55', '55', '55'),
+        'גז'    => array('0', '44', '44', '44', '45', '45', '45'),
+        'גח'    => array('0', '45', '45', '45', '55', '55', '55'),
+        'גכ'    => array('0', '45', '45', '45', '55', '55', '55'),
+        'גך'    => array('0', '45', '45', '45', '55', '55', '55'),
+        'גצ'    => array('0', '44', '44', '44', '45', '45', '45'),
+        'גץ'    => array('0', '44', '44', '44', '45', '45', '45'),
+        'גק'    => array('0', '45', '45', '45', '54', '54', '54'),
+        'גש'    => array('0', '44', '44', '44', '54', '54', '54'),
+        'גת'    => array('0', '43', '43', '43', '53', '53', '53'),
+        'ג'     => array('0', '4', '4', '4', '5', '5', '5'),
+        'דז'    => array('0', '4', '4', '4'),
+        'דד'    => array('0', '3', '3', '3', '33', '33', '33'),
+        'דט'    => array('0', '33', '33', '33'),
+        'דש'    => array('0', '4', '4', '4'),
+        'דצ'    => array('0', '4', '4', '4'),
+        'דץ'    => array('0', '4', '4', '4'),
+        'ד'     => array('0', '3', '3', '3'),
+        'הג'    => array('0', '54', '54', '54', '55', '55', '55'),
+        'הכ'    => array('0', '55', '55', '55'),
+        'הח'    => array('0', '55', '55', '55'),
+        'הק'    => array('0', '55', '55', '55', '5', '5', '5'),
+        'הה'    => array('0', '5', '5', '', '55', '55', ''),
+        'ה'     => array('0', '5', '5', ''),
+        'וי'    => array('1', '', '', '', '7', '7', '7'),
+        'ו'     => array('1', '7', '7', '7', '7', '', ''),
+        'וו'    => array('1', '7', '7', '7', '7', '', ''),
+        'וופ'   => array('1', '7', '7', '7', '77', '77', '77'),
+        'זש'    => array('0', '4', '4', '4', '44', '44', '44'),
+        'זדז'   => array('0', '2', '4', '4'),
+        'ז'     => array('0', '4', '4', '4'),
+        'זג'    => array('0', '44', '44', '44', '45', '45', '45'),
+        'זז'    => array('0', '4', '4', '4', '44', '44', '44'),
+        'זס'    => array('0', '44', '44', '44'),
+        'זצ'    => array('0', '44', '44', '44'),
+        'זץ'    => array('0', '44', '44', '44'),
+        'חג'    => array('0', '54', '54', '54', '53', '53', '53'),
+        'חח'    => array('0', '5', '5', '5', '55', '55', '55'),
+        'חק'    => array('0', '55', '55', '55', '5', '5', '5'),
+        'חכ'    => array('0', '45', '45', '45', '55', '55', '55'),
+        'חס'    => array('0', '5', '54', '54'),
+        'חש'    => array('0', '5', '54', '54'),
+        'ח'     => array('0', '5', '5', '5'),
+        'טש'    => array('0', '4', '4', '4'),
+        'טד'    => array('0', '33', '33', '33'),
+        'טי'    => array('0', '3', '3', '3', '4', '4', '4', '3', '3', '34'),
+        'טת'    => array('0', '33', '33', '33'),
+        'טט'    => array('0', '3', '3', '3', '33', '33', '33'),
+        'ט'     => array('0', '3', '3', '3'),
+        'י'     => array('1', '1', '', ''),
+        'יא'    => array('1', '1', '', '', '1', '1', '1'),
+        'כג'    => array('0', '55', '55', '55', '54', '54', '54'),
+        'כש'    => array('0', '5', '54', '54'),
+        'כס'    => array('0', '5', '54', '54'),
+        'ככ'    => array('0', '5', '5', '5', '55', '55', '55'),
+        'כך'    => array('0', '5', '5', '5', '55', '55', '55'),
+        'כ'     => array('0', '5', '5', '5'),
+        'כח'    => array('0', '55', '55', '55', '5', '5', '5'),
+        'ך'     => array('0', '', '5', '5'),
+        'ל'     => array('0', '8', '8', '8'),
+        'לל'    => array('0', '88', '88', '88', '8', '8', '8'),
+        'מנ'    => array('0', '66', '66', '66'),
+        'מן'    => array('0', '66', '66', '66'),
+        'ממ'    => array('0', '6', '6', '6', '66', '66', '66'),
+        'מם'    => array('0', '6', '6', '6', '66', '66', '66'),
+        'מ'     => array('0', '6', '6', '6'),
+        'ם'     => array('0', '', '6', '6'),
+        'נמ'    => array('0', '66', '66', '66'),
+        'נם'    => array('0', '66', '66', '66'),
+        'ננ'    => array('0', '6', '6', '6', '66', '66', '66'),
+        'נן'    => array('0', '6', '6', '6', '66', '66', '66'),
+        'נ'     => array('0', '6', '6', '6'),
+        'ן'     => array('0', '', '6', '6'),
+        'סתש'   => array('0', '2', '4', '4'),
+        'סתז'   => array('0', '2', '4', '4'),
+        'סטז'   => array('0', '2', '4', '4'),
+        'סטש'   => array('0', '2', '4', '4'),
+        'סצד'   => array('0', '2', '4', '4'),
+        'סט'    => array('0', '2', '4', '4', '43', '43', '43'),
+        'סת'    => array('0', '2', '4', '4', '43', '43', '43'),
+        'סג'    => array('0', '44', '44', '44', '4', '4', '4'),
+        'סס'    => array('0', '4', '4', '4', '44', '44', '44'),
+        'סצ'    => array('0', '44', '44', '44'),
+        'סץ'    => array('0', '44', '44', '44'),
+        'סז'    => array('0', '44', '44', '44'),
+        'סש'    => array('0', '44', '44', '44'),
+        'ס'     => array('0', '4', '4', '4'),
+        'ע'     => array('1', '0', '', ''),
+        'פב'    => array('0', '7', '7', '7', '77', '77', '77'),
+        'פוו'   => array('0', '7', '7', '7', '77', '77', '77'),
+        'פפ'    => array('0', '7', '7', '7', '77', '77', '77'),
+        'פף'    => array('0', '7', '7', '7', '77', '77', '77'),
+        'פ'     => array('0', '7', '7', '7'),
+        'ף'     => array('0', '', '7', '7'),
+        'צג'    => array('0', '44', '44', '44', '45', '45', '45'),
+        'צז'    => array('0', '44', '44', '44'),
+        'צס'    => array('0', '44', '44', '44'),
+        'צצ'    => array('0', '4', '4', '4', '5', '5', '5', '44', '44', '44', '54', '54', '54', '45', '45', '45'),
+        'צץ'    => array('0', '4', '4', '4', '5', '5', '5', '44', '44', '44', '54', '54', '54'),
+        'צש'    => array('0', '44', '44', '44', '4', '4', '4', '5', '5', '5'),
+        'צ'     => array('0', '4', '4', '4', '5', '5', '5'),
+        'ץ'     => array('0', '', '4', '4'),
+        'קה'    => array('0', '55', '55', '5'),
+        'קס'    => array('0', '5', '54', '54'),
+        'קש'    => array('0', '5', '54', '54'),
+        'קק'    => array('0', '5', '5', '5', '55', '55', '55'),
+        'קח'    => array('0', '55', '55', '55'),
+        'קכ'    => array('0', '55', '55', '55'),
+        'קך'    => array('0', '55', '55', '55'),
+        'קג'    => array('0', '55', '55', '55', '54', '54', '54'),
+        'ק'     => array('0', '5', '5', '5'),
+        'רר'    => array('0', '99', '99', '99', '9', '9', '9'),
+        'ר'     => array('0', '9', '9', '9'),
+        'שטז'   => array('0', '2', '4', '4'),
+        'שתש'   => array('0', '2', '4', '4'),
+        'שתז'   => array('0', '2', '4', '4'),
+        'שטש'   => array('0', '2', '4', '4'),
+        'שד'    => array('0', '2', '43', '43'),
+        'שז'    => array('0', '44', '44', '44'),
+        'שס'    => array('0', '44', '44', '44'),
+        'שת'    => array('0', '2', '43', '43'),
+        'שג'    => array('0', '4', '4', '4', '44', '44', '44', '4', '43', '43'),
+        'שט'    => array('0', '2', '43', '43', '44', '44', '44'),
+        'שצ'    => array('0', '44', '44', '44', '45', '45', '45'),
+        'שץ'    => array('0', '44', '', '44', '45', '', '45'),
+        'שש'    => array('0', '4', '4', '4', '44', '44', '44'),
+        'ש'     => array('0', '4', '4', '4'),
+        'תג'    => array('0', '34', '34', '34'),
+        'תז'    => array('0', '34', '34', '34'),
+        'תש'    => array('0', '4', '4', '4'),
+        'תת'    => array('0', '3', '3', '3', '4', '4', '4', '33', '33', '33', '44', '44', '44', '34', '34', '34', '43', '43', '43'),
+        'ת'     => array('0', '3', '3', '3', '4', '4', '4'),
+        // Arabic alphabet
+        'ا'   => array('1', '0', '', ''),
+        'ب'   => array('0', '7', '7', '7'),
+        'ت'   => array('0', '3', '3', '3'),
+        'ث'   => array('0', '3', '3', '3'),
+        'ج'   => array('0', '4', '4', '4'),
+        'ح'   => array('0', '5', '5', '5'),
+        'خ'   => array('0', '5', '5', '5'),
+        'د'   => array('0', '3', '3', '3'),
+        'ذ'   => array('0', '3', '3', '3'),
+        'ر'   => array('0', '9', '9', '9'),
+        'ز'   => array('0', '4', '4', '4'),
+        'س'   => array('0', '4', '4', '4'),
+        'ش'   => array('0', '4', '4', '4'),
+        'ص'   => array('0', '4', '4', '4'),
+        'ض'   => array('0', '3', '3', '3'),
+        'ط'   => array('0', '3', '3', '3'),
+        'ظ'   => array('0', '4', '4', '4'),
+        'ع'   => array('1', '0', '', ''),
+        'غ'   => array('0', '0', '', ''),
+        'ف'   => array('0', '7', '7', '7'),
+        'ق'   => array('0', '5', '5', '5'),
+        'ك'   => array('0', '5', '5', '5'),
+        'ل'   => array('0', '8', '8', '8'),
+        'لا'  => array('0', '8', '8', '8'),
+        'م'   => array('0', '6', '6', '6'),
+        'ن'   => array('0', '6', '6', '6'),
+        'هن'  => array('0', '66', '66', '66'),
+        'ه'   => array('0', '5', '5', ''),
+        'و'   => array('1', '', '', '', '7', '', ''),
+        'ي'   => array('0', '1', '', ''),
+        'آ'   => array('0', '1', '', ''),
+        'ة'   => array('0', '', '', '3'),
+        'ی'   => array('0', '1', '', ''),
+        'ى'   => array('1', '1', '', ''),
+    );
 
-	/**
-	 * Calculate the Daitch-Mokotoff soundex for a word.
-	 *
-	 * @param string $name
-	 *
-	 * @return string[] List of possible DM codes for the word.
-	 */
-	private static function daitchMokotoffWord($name) {
-		// Apply special transformation rules to the input string
-		$name = I18N::strtoupper($name);
-		foreach (self::$transformNameTable as $transformRule) {
-			$name = str_replace($transformRule[0], $transformRule[1], $name);
-		}
+    /**
+     * Calculate the Daitch-Mokotoff soundex for a word.
+     *
+     * @param string $name
+     *
+     * @return string[] List of possible DM codes for the word.
+     */
+    private static function daitchMokotoffWord($name) {
+        // Apply special transformation rules to the input string
+        $name = I18N::strtoupper($name);
+        foreach (self::$transformNameTable as $transformRule) {
+            $name = str_replace($transformRule[0], $transformRule[1], $name);
+        }
 
-		// Initialize
-		$name_script = I18N::textScript($name);
-		$noVowels    = ($name_script == 'Hebr' || $name_script == 'Arab');
+        // Initialize
+        $name_script = I18N::textScript($name);
+        $noVowels    = ($name_script == 'Hebr' || $name_script == 'Arab');
 
-		$lastPos         = strlen($name) - 1;
-		$currPos         = 0;
-		$state           = 1; // 1: start of input string, 2: before vowel, 3: other
-		$result          = array(); // accumulate complete 6-digit D-M codes here
-		$partialResult   = array(); // accumulate incomplete D-M codes here
-		$partialResult[] = array('!'); // initialize 1st partial result  ('!' stops "duplicate sound" check)
+        $lastPos         = strlen($name) - 1;
+        $currPos         = 0;
+        $state           = 1; // 1: start of input string, 2: before vowel, 3: other
+        $result          = array(); // accumulate complete 6-digit D-M codes here
+        $partialResult   = array(); // accumulate incomplete D-M codes here
+        $partialResult[] = array('!'); // initialize 1st partial result  ('!' stops "duplicate sound" check)
 
-		// Loop through the input string.
-		// Stop when the string is exhausted or when no more partial results remain
-		while (count($partialResult) !== 0 && $currPos <= $lastPos) {
-			// Find the DM coding table entry for the chunk at the current position
-			$thisEntry = substr($name, $currPos, self::MAXCHAR); // Get maximum length chunk
-			while ($thisEntry != '') {
-				if (isset(self::$dmsounds[$thisEntry])) {
-					break;
-				}
-				$thisEntry = substr($thisEntry, 0, -1); // Not in table: try a shorter chunk
-			}
-			if ($thisEntry === '') {
-				$currPos++; // Not in table: advance pointer to next byte
-				continue; // and try again
-			}
+        // Loop through the input string.
+        // Stop when the string is exhausted or when no more partial results remain
+        while (count($partialResult) !== 0 && $currPos <= $lastPos) {
+            // Find the DM coding table entry for the chunk at the current position
+            $thisEntry = substr($name, $currPos, self::MAXCHAR); // Get maximum length chunk
+            while ($thisEntry != '') {
+                if (isset(self::$dmsounds[$thisEntry])) {
+                    break;
+                }
+                $thisEntry = substr($thisEntry, 0, -1); // Not in table: try a shorter chunk
+            }
+            if ($thisEntry === '') {
+                $currPos++; // Not in table: advance pointer to next byte
+                continue; // and try again
+            }
 
-			$soundTableEntry = self::$dmsounds[$thisEntry];
-			$workingResult   = $partialResult;
-			$partialResult   = array();
-			$currPos += strlen($thisEntry);
+            $soundTableEntry = self::$dmsounds[$thisEntry];
+            $workingResult   = $partialResult;
+            $partialResult   = array();
+            $currPos += strlen($thisEntry);
 
-			// Not at beginning of input string
-			if ($state != 1) {
-				if ($currPos <= $lastPos) {
-					// Determine whether the next chunk is a vowel
-					$nextEntry = substr($name, $currPos, self::MAXCHAR); // Get maximum length chunk
-					while ($nextEntry != '') {
-						if (isset(self::$dmsounds[$nextEntry])) {
-							break;
-						}
-						$nextEntry = substr($nextEntry, 0, -1); // Not in table: try a shorter chunk
-					}
-				} else {
-					$nextEntry = '';
-				}
-				if ($nextEntry != '' && self::$dmsounds[$nextEntry][0] != '0') {
-					$state = 2;
-				} else {
-					// Next chunk is a vowel
-					$state = 3;
-				}
-			}
+            // Not at beginning of input string
+            if ($state != 1) {
+                if ($currPos <= $lastPos) {
+                    // Determine whether the next chunk is a vowel
+                    $nextEntry = substr($name, $currPos, self::MAXCHAR); // Get maximum length chunk
+                    while ($nextEntry != '') {
+                        if (isset(self::$dmsounds[$nextEntry])) {
+                            break;
+                        }
+                        $nextEntry = substr($nextEntry, 0, -1); // Not in table: try a shorter chunk
+                    }
+                } else {
+                    $nextEntry = '';
+                }
+                if ($nextEntry != '' && self::$dmsounds[$nextEntry][0] != '0') {
+                    $state = 2;
+                } else {
+                    // Next chunk is a vowel
+                    $state = 3;
+                }
+            }
 
-			while ($state < count($soundTableEntry)) {
-				// empty means 'ignore this sound in this state'
-				if ($soundTableEntry[$state] == '') {
-					foreach ($workingResult as $workingEntry) {
-						$tempEntry = $workingEntry;
-						$tempEntry[count($tempEntry) - 1] .= '!'; // Prevent false 'doubles'
-						$partialResult[] = $tempEntry;
-					}
-				} else {
-					foreach ($workingResult as $workingEntry) {
-						if ($soundTableEntry[$state] !== $workingEntry[count($workingEntry) - 1]) {
-							// Incoming sound isn't a duplicate of the previous sound
-							$workingEntry[] = $soundTableEntry[$state];
-						} else {
-							// Incoming sound is a duplicate of the previous sound
-							// For Hebrew and Arabic, we need to create a pair of D-M sound codes,
-							// one of the pair with only a single occurrence of the duplicate sound,
-							// the other with both occurrences
-							if ($noVowels) {
-								$workingEntry[] = $soundTableEntry[$state];
-							}
-						}
-						if (count($workingEntry) < 7) {
-							$partialResult[] = $workingEntry;
-						} else {
-							// This is the 6th code in the sequence
-							// We're looking for 7 entries because the first is '!' and doesn't count
-							$tempResult = str_replace('!', '', implode('', $workingEntry));
-							// Only return codes from recognisable sounds
-							if ($tempResult) {
-								$result[] = substr($tempResult . '000000', 0, 6);
-							}
-						}
-					}
-				}
-				$state = $state + 3; // Advance to next triplet while keeping the same basic state
-			}
-		}
+            while ($state < count($soundTableEntry)) {
+                // empty means 'ignore this sound in this state'
+                if ($soundTableEntry[$state] == '') {
+                    foreach ($workingResult as $workingEntry) {
+                        $tempEntry = $workingEntry;
+                        $tempEntry[count($tempEntry) - 1] .= '!'; // Prevent false 'doubles'
+                        $partialResult[] = $tempEntry;
+                    }
+                } else {
+                    foreach ($workingResult as $workingEntry) {
+                        if ($soundTableEntry[$state] !== $workingEntry[count($workingEntry) - 1]) {
+                            // Incoming sound isn't a duplicate of the previous sound
+                            $workingEntry[] = $soundTableEntry[$state];
+                        } else {
+                            // Incoming sound is a duplicate of the previous sound
+                            // For Hebrew and Arabic, we need to create a pair of D-M sound codes,
+                            // one of the pair with only a single occurrence of the duplicate sound,
+                            // the other with both occurrences
+                            if ($noVowels) {
+                                $workingEntry[] = $soundTableEntry[$state];
+                            }
+                        }
+                        if (count($workingEntry) < 7) {
+                            $partialResult[] = $workingEntry;
+                        } else {
+                            // This is the 6th code in the sequence
+                            // We're looking for 7 entries because the first is '!' and doesn't count
+                            $tempResult = str_replace('!', '', implode('', $workingEntry));
+                            // Only return codes from recognisable sounds
+                            if ($tempResult) {
+                                $result[] = substr($tempResult . '000000', 0, 6);
+                            }
+                        }
+                    }
+                }
+                $state = $state + 3; // Advance to next triplet while keeping the same basic state
+            }
+        }
 
-		// Zero-fill and copy all remaining partial results
-		foreach ($partialResult as $workingEntry) {
-			$tempResult = str_replace('!', '', implode('', $workingEntry));
-			// Only return codes from recognisable sounds
-			if ($tempResult) {
-				$result[] = substr($tempResult . '000000', 0, 6);
-			}
-		}
+        // Zero-fill and copy all remaining partial results
+        foreach ($partialResult as $workingEntry) {
+            $tempResult = str_replace('!', '', implode('', $workingEntry));
+            // Only return codes from recognisable sounds
+            if ($tempResult) {
+                $result[] = substr($tempResult . '000000', 0, 6);
+            }
+        }
 
-		return $result;
-	}
+        return $result;
+    }
 }

Braces +12 added lines, -6 removed lines

@@ -18,13 +18,15 @@ 
 /**
  * Phonetic matching of strings.
  */
-class Soundex {
+class Soundex
+{
 	/**
 	 * Which algorithms are supported.
 	 *
 	 * @return string[]
 	 */
-	public static function getAlgorithms() {
+	public static function getAlgorithms()
+	{
 		return array(
 			'std' => /* I18N: http://en.wikipedia.org/wiki/Soundex */ I18N::translate('Russell'),
 			'dm'  => /* I18N: http://en.wikipedia.org/wiki/Daitch–Mokotoff_Soundex */ I18N::translate('Daitch-Mokotoff'),
@@ -39,7 +41,8 @@ 
 	 *
 	 * @return bool
 	 */
-	public static function compare($soundex1, $soundex2) {
+	public static function compare($soundex1, $soundex2)
+	{
 		if ($soundex1 && $soundex2) {
 			foreach (explode(':', $soundex1) as $code) {
 				if (strpos($soundex2, $code) !== false) {
@@ -58,7 +61,8 @@ 
 	 *
 	 * @return null|string
 	 */
-	public static function russell($text) {
+	public static function russell($text)
+	{
 		$words         = preg_split('/\s/', $text, -1, PREG_SPLIT_NO_EMPTY);
 		$soundex_array = array();
 		foreach ($words as $word) {
@@ -89,7 +93,8 @@ 
 	 *
 	 * @return null|string
 	 */
-	public static function daitchMokotoff($text) {
+	public static function daitchMokotoff($text)
+	{
 		$words         = preg_split('/\s/', $text, -1, PREG_SPLIT_NO_EMPTY);
 		$soundex_array = array();
 		foreach ($words as $word) {
@@ -686,7 +691,8 @@ 
 	 *
 	 * @return string[] List of possible DM codes for the word.
 	 */
-	private static function daitchMokotoffWord($name) {
+	private static function daitchMokotoffWord($name)
+	{
 		// Apply special transformation rules to the input string
 		$name = I18N::strtoupper($name);
 		foreach (self::$transformNameTable as $transformRule) {

app/Report/ReportParserSetup.php

Indentation +110 added lines, -110 removed lines

@@ -22,125 +22,125 @@
  * Class ReportParserSetup - parse a report.xml file and extract the setup options.
  */
 class ReportParserSetup extends ReportParserBase {
-	/** @var array An array of report options/parameters */
-	private $data = array();
+    /** @var array An array of report options/parameters */
+    private $data = array();
 
-	/** @var string[] An array of input attributes */
-	private $input;
+    /** @var string[] An array of input attributes */
+    private $input;
 
-	/**
-	 * Return the parsed data.
-	 *
-	 * @return array
-	 */
-	public function reportProperties() {
-		return $this->data;
-	}
+    /**
+     * Return the parsed data.
+     *
+     * @return array
+     */
+    public function reportProperties() {
+        return $this->data;
+    }
 
-	/**
-	 * Process <Report>
-	 *
-	 * @param string[] $attrs
-	 */
-	protected function reportStartHandler($attrs) {
-		$access = Auth::PRIV_PRIVATE;
-		if (isset($attrs['access'])) {
-			if (isset($$attrs["access"])) {
-				$access = $$attrs["access"];
-			}
-		}
-		$this->data['access'] = $access;
+    /**
+     * Process <Report>
+     *
+     * @param string[] $attrs
+     */
+    protected function reportStartHandler($attrs) {
+        $access = Auth::PRIV_PRIVATE;
+        if (isset($attrs['access'])) {
+            if (isset($$attrs["access"])) {
+                $access = $$attrs["access"];
+            }
+        }
+        $this->data['access'] = $access;
 
-		if (isset($attrs['icon'])) {
-			$this->data['icon'] = $attrs['icon'];
-		} else {
-			$this->data['icon'] = '';
-		}
-	}
+        if (isset($attrs['icon'])) {
+            $this->data['icon'] = $attrs['icon'];
+        } else {
+            $this->data['icon'] = '';
+        }
+    }
 
-	/**
-	 * Process <var var="">
-	 *
-	 * @param string[] $attrs
-	 */
-	protected function varStartHandler($attrs) {
-		if (preg_match('/^I18N::number\((.+)\)$/', $attrs['var'], $match)) {
-			$this->text .= I18N::number($match[1]);
-		} elseif (preg_match('/^I18N::translate\(\'(.+)\'\)$/', $attrs['var'], $match)) {
-			$this->text .= I18N::translate($match[1]);
-		} elseif (preg_match('/^I18N::translateContext\(\'(.+)\', *\'(.+)\'\)$/', $attrs['var'], $match)) {
-			$this->text .= I18N::translateContext($match[1], $match[2]);
-		} else {
-			$this->text .= $attrs['var'];
-		}
-	}
+    /**
+     * Process <var var="">
+     *
+     * @param string[] $attrs
+     */
+    protected function varStartHandler($attrs) {
+        if (preg_match('/^I18N::number\((.+)\)$/', $attrs['var'], $match)) {
+            $this->text .= I18N::number($match[1]);
+        } elseif (preg_match('/^I18N::translate\(\'(.+)\'\)$/', $attrs['var'], $match)) {
+            $this->text .= I18N::translate($match[1]);
+        } elseif (preg_match('/^I18N::translateContext\(\'(.+)\', *\'(.+)\'\)$/', $attrs['var'], $match)) {
+            $this->text .= I18N::translateContext($match[1], $match[2]);
+        } else {
+            $this->text .= $attrs['var'];
+        }
+    }
 
-	/**
-	 * Process <Title>
-	 */
-	protected function titleStartHandler() {
-		$this->text = '';
-	}
+    /**
+     * Process <Title>
+     */
+    protected function titleStartHandler() {
+        $this->text = '';
+    }
 
-	/**
-	 * Process </Title>
-	 */
-	protected function titleEndHandler() {
-		$this->data['title'] = $this->text;
-		$this->text          = '';
-	}
+    /**
+     * Process </Title>
+     */
+    protected function titleEndHandler() {
+        $this->data['title'] = $this->text;
+        $this->text          = '';
+    }
 
-	/**
-	 * Process </Description>
-	 */
-	protected function descriptionEndHandler() {
-		$this->data['description'] = $this->text;
-		$this->text                = '';
-	}
+    /**
+     * Process </Description>
+     */
+    protected function descriptionEndHandler() {
+        $this->data['description'] = $this->text;
+        $this->text                = '';
+    }
 
-	/**
-	 * Process <Input>
-	 *
-	 * @param string[] $attrs
-	 */
-	protected function inputStartHandler($attrs) {
-		$this->text  = '';
-		$this->input = array(
-			'name'    => isset($attrs['name']) ? $attrs['name'] : '',
-			'type'    => isset($attrs['type']) ? $attrs['type'] : '',
-			'lookup'  => isset($attrs['lookup']) ? $attrs['lookup'] : '',
-			'options' => isset($attrs['options']) ? $attrs['options'] : '',
-			'default' => '',
-			'value'   => '',
-		);
+    /**
+     * Process <Input>
+     *
+     * @param string[] $attrs
+     */
+    protected function inputStartHandler($attrs) {
+        $this->text  = '';
+        $this->input = array(
+            'name'    => isset($attrs['name']) ? $attrs['name'] : '',
+            'type'    => isset($attrs['type']) ? $attrs['type'] : '',
+            'lookup'  => isset($attrs['lookup']) ? $attrs['lookup'] : '',
+            'options' => isset($attrs['options']) ? $attrs['options'] : '',
+            'default' => '',
+            'value'   => '',
+        );
 
-		if (isset($attrs['default'])) {
-			if ($attrs['default'] === 'NOW') {
-				$this->input['default'] = date('d M Y');
-			} else {
-				$match = array();
-				if (preg_match('/NOW\s*([+\-])\s*(\d+)/', $attrs['default'], $match) > 0) {
-					$plus = 1;
-					if ($match[1] === '-') {
-						$plus = -1;
-					}
-					$this->input['default'] = date('d M Y', WT_TIMESTAMP + $plus * 60 * 60 * 24 * $match[2]);
-				} else {
-					$this->input['default'] = $attrs['default'];
-				}
-			}
-		}
-	}
+        if (isset($attrs['default'])) {
+            if ($attrs['default'] === 'NOW') {
+                $this->input['default'] = date('d M Y');
+            } else {
+                $match = array();
+                if (preg_match('/NOW\s*([+\-])\s*(\d+)/', $attrs['default'], $match) > 0) {
+                    $plus = 1;
+                    if ($match[1] === '-') {
+                        $plus = -1;
+                    }
+                    $this->input['default'] = date('d M Y', WT_TIMESTAMP + $plus * 60 * 60 * 24 * $match[2]);
+                } else {
+                    $this->input['default'] = $attrs['default'];
+                }
+            }
+        }
+    }
 
-	/**
-	 * Process </Input>
-	 */
-	protected function inputEndHandler() {
-		$this->input['value'] = $this->text;
-		if (!isset($this->data['inputs'])) {
-			$this->data['inputs'] = array();
-		}
-		$this->data['inputs'][] = $this->input;
-		$this->text             = '';
-	}
+    /**
+     * Process </Input>
+     */
+    protected function inputEndHandler() {
+        $this->input['value'] = $this->text;
+        if (!isset($this->data['inputs'])) {
+            $this->data['inputs'] = array();
+        }
+        $this->data['inputs'][] = $this->input;
+        $this->text             = '';
+    }
 }

Braces +18 added lines, -9 removed lines

@@ -21,7 +21,8 @@ 
 /**
  * Class ReportParserSetup - parse a report.xml file and extract the setup options.
  */
-class ReportParserSetup extends ReportParserBase {
+class ReportParserSetup extends ReportParserBase
+{
 	/** @var array An array of report options/parameters */
 	private $data = array();
 
@@ -33,7 +34,8 @@ 
 	 *
 	 * @return array
 	 */
-	public function reportProperties() {
+	public function reportProperties()
+	{
 		return $this->data;
 	}
 
@@ -42,7 +44,8 @@ 
 	 *
 	 * @param string[] $attrs
 	 */
-	protected function reportStartHandler($attrs) {
+	protected function reportStartHandler($attrs)
+	{
 		$access = Auth::PRIV_PRIVATE;
 		if (isset($attrs['access'])) {
 			if (isset($$attrs["access"])) {
@@ -63,7 +66,8 @@ 
 	 *
 	 * @param string[] $attrs
 	 */
-	protected function varStartHandler($attrs) {
+	protected function varStartHandler($attrs)
+	{
 		if (preg_match('/^I18N::number\((.+)\)$/', $attrs['var'], $match)) {
 			$this->text .= I18N::number($match[1]);
 		} elseif (preg_match('/^I18N::translate\(\'(.+)\'\)$/', $attrs['var'], $match)) {
@@ -78,14 +82,16 @@ 
 	/**
 	 * Process <Title>
 	 */
-	protected function titleStartHandler() {
+	protected function titleStartHandler()
+	{
 		$this->text = '';
 	}
 
 	/**
 	 * Process </Title>
 	 */
-	protected function titleEndHandler() {
+	protected function titleEndHandler()
+	{
 		$this->data['title'] = $this->text;
 		$this->text          = '';
 	}
@@ -93,7 +99,8 @@ 
 	/**
 	 * Process </Description>
 	 */
-	protected function descriptionEndHandler() {
+	protected function descriptionEndHandler()
+	{
 		$this->data['description'] = $this->text;
 		$this->text                = '';
 	}
@@ -103,7 +110,8 @@ 
 	 *
 	 * @param string[] $attrs
 	 */
-	protected function inputStartHandler($attrs) {
+	protected function inputStartHandler($attrs)
+	{
 		$this->text  = '';
 		$this->input = array(
 			'name'    => isset($attrs['name']) ? $attrs['name'] : '',
@@ -135,7 +143,8 @@ 
 	/**
 	 * Process </Input>
 	 */
-	protected function inputEndHandler() {
+	protected function inputEndHandler()
+	{
 		$this->input['value'] = $this->text;
 		if (!isset($this->data['inputs'])) {
 			$this->data['inputs'] = array();

app/Report/ReportHtmlLine.php

Indentation +31 added lines, -31 removed lines

@@ -19,35 +19,35 @@
  * Class ReportHtmlLine
  */
 class ReportHtmlLine extends ReportBaseLine {
-	/**
-	 * HTML line renderer
-	 *
-	 * @param ReportHtml $renderer
-	 */
-	public function render($renderer) {
-		if ($this->x1 == '.') {
-			$this->x1 = $renderer->getX();
-		}
-		if ($this->y1 == '.') {
-			$this->y1 = $renderer->getY();
-		}
-		if ($this->x2 == '.') {
-			$this->x2 = $renderer->getRemainingWidth();
-		}
-		if ($this->y2 == '.') {
-			$this->y2 = $renderer->getY();
-		}
-		// Vertical line
-		if ($this->x1 == $this->x2) {
-			echo "<div style=\"position:absolute;overflow:hidden;border-", $renderer->alignRTL, ":solid black 1pt;", $renderer->alignRTL, ":", $this->x1, "pt;top:", $this->y1 + 1, "pt;width:1pt;height:", $this->y2 - $this->y1, "pt;\"> </div>\n";
-		}
-		// Horizontal line
-		if ($this->y1 == $this->y2) {
-			echo "<div style=\"position:absolute;overflow:hidden;border-top:solid black 1pt;", $renderer->alignRTL, ":", $this->x1, "pt;top:", $this->y1 + 1, "pt;width:", $this->x2 - $this->x1, "pt;height:1pt;\"> </div>\n";
-		}
-		// Keep max Y updated
-		// One or the other will be higher... lasy mans way...
-		$renderer->addMaxY($this->y1);
-		$renderer->addMaxY($this->y2);
-	}
+    /**
+     * HTML line renderer
+     *
+     * @param ReportHtml $renderer
+     */
+    public function render($renderer) {
+        if ($this->x1 == '.') {
+            $this->x1 = $renderer->getX();
+        }
+        if ($this->y1 == '.') {
+            $this->y1 = $renderer->getY();
+        }
+        if ($this->x2 == '.') {
+            $this->x2 = $renderer->getRemainingWidth();
+        }
+        if ($this->y2 == '.') {
+            $this->y2 = $renderer->getY();
+        }
+        // Vertical line
+        if ($this->x1 == $this->x2) {
+            echo "<div style=\"position:absolute;overflow:hidden;border-", $renderer->alignRTL, ":solid black 1pt;", $renderer->alignRTL, ":", $this->x1, "pt;top:", $this->y1 + 1, "pt;width:1pt;height:", $this->y2 - $this->y1, "pt;\"> </div>\n";
+        }
+        // Horizontal line
+        if ($this->y1 == $this->y2) {
+            echo "<div style=\"position:absolute;overflow:hidden;border-top:solid black 1pt;", $renderer->alignRTL, ":", $this->x1, "pt;top:", $this->y1 + 1, "pt;width:", $this->x2 - $this->x1, "pt;height:1pt;\"> </div>\n";
+        }
+        // Keep max Y updated
+        // One or the other will be higher... lasy mans way...
+        $renderer->addMaxY($this->y1);
+        $renderer->addMaxY($this->y2);
+    }
 }

Braces +4 added lines, -2 removed lines

@@ -18,13 +18,15 @@
 /**
  * Class ReportHtmlLine
  */
-class ReportHtmlLine extends ReportBaseLine {
+class ReportHtmlLine extends ReportBaseLine
+{
 	/**
 	 * HTML line renderer
 	 *
 	 * @param ReportHtml $renderer
 	 */
-	public function render($renderer) {
+	public function render($renderer)
+	{
 		if ($this->x1 == '.') {
 			$this->x1 = $renderer->getX();
 		}

app/Report/ReportPdfHtml.php

Indentation +34 added lines, -34 removed lines

@@ -19,39 +19,39 @@
  * Class ReportPdfHtml
  */
 class ReportPdfHtml extends ReportBaseHtml {
-	/**
-	 * Render the output.
-	 *
-	 * @param      $renderer
-	 * @param bool $sub
-	 *
-	 * @return int|string
-	 */
-	public function render($renderer, $sub = false) {
-		if (!empty($this->attrs['style'])) {
-			$renderer->setCurrentStyle($this->attrs['style']);
-		}
-		if (!empty($this->attrs['width'])) {
-			$this->attrs['width'] *= 3.9;
-		}
+    /**
+     * Render the output.
+     *
+     * @param      $renderer
+     * @param bool $sub
+     *
+     * @return int|string
+     */
+    public function render($renderer, $sub = false) {
+        if (!empty($this->attrs['style'])) {
+            $renderer->setCurrentStyle($this->attrs['style']);
+        }
+        if (!empty($this->attrs['width'])) {
+            $this->attrs['width'] *= 3.9;
+        }
 
-		$this->text = $this->getStart() . $this->text;
-		foreach ($this->elements as $element) {
-			if (is_string($element) && $element == "footnotetexts") {
-				$renderer->Footnotes();
-			} elseif (is_string($element) && $element == "addpage") {
-				$renderer->newPage();
-			} elseif ($element instanceof ReportBaseHtml) {
-				$element->render($renderer, true);
-			} else {
-				$element->render($renderer);
-			}
-		}
-		$this->text .= $this->getEnd();
-		if ($sub) {
-			return $this->text;
-		}
-		$renderer->writeHTML($this->text); //prints 2 empty cells in the Expanded Relatives report
-		return 0;
-	}
+        $this->text = $this->getStart() . $this->text;
+        foreach ($this->elements as $element) {
+            if (is_string($element) && $element == "footnotetexts") {
+                $renderer->Footnotes();
+            } elseif (is_string($element) && $element == "addpage") {
+                $renderer->newPage();
+            } elseif ($element instanceof ReportBaseHtml) {
+                $element->render($renderer, true);
+            } else {
+                $element->render($renderer);
+            }
+        }
+        $this->text .= $this->getEnd();
+        if ($sub) {
+            return $this->text;
+        }
+        $renderer->writeHTML($this->text); //prints 2 empty cells in the Expanded Relatives report
+        return 0;
+    }
 }

Braces +4 added lines, -2 removed lines

@@ -18,7 +18,8 @@ 
 /**
  * Class ReportPdfHtml
  */
-class ReportPdfHtml extends ReportBaseHtml {
+class ReportPdfHtml extends ReportBaseHtml
+{
 	/**
 	 * Render the output.
 	 *
@@ -27,7 +28,8 @@ 
 	 *
 	 * @return int|string
 	 */
-	public function render($renderer, $sub = false) {
+	public function render($renderer, $sub = false)
+	{
 		if (!empty($this->attrs['style'])) {
 			$renderer->setCurrentStyle($this->attrs['style']);
 		}

app/Report/ReportBaseLine.php

Indentation +59 added lines, -59 removed lines

@@ -19,67 +19,67 @@
  * Class ReportBaseLine
  */
 class ReportBaseLine extends ReportBaseElement {
-	/**
-	 * Start horizontal position, current position (default)
-	 *
-	 * @var mixed
-	 */
-	public $x1 = ".";
-	/**
-	 * Start vertical position, current position (default)
-	 *
-	 * @var mixed
-	 */
-	public $y1 = ".";
-	/**
-	 * End horizontal position, maximum width (default)
-	 *
-	 * @var mixed
-	 */
-	public $x2 = ".";
-	/**
-	 * End vertical position
-	 *
-	 * @var mixed
-	 */
-	public $y2 = ".";
+    /**
+     * Start horizontal position, current position (default)
+     *
+     * @var mixed
+     */
+    public $x1 = ".";
+    /**
+     * Start vertical position, current position (default)
+     *
+     * @var mixed
+     */
+    public $y1 = ".";
+    /**
+     * End horizontal position, maximum width (default)
+     *
+     * @var mixed
+     */
+    public $x2 = ".";
+    /**
+     * End vertical position
+     *
+     * @var mixed
+     */
+    public $y2 = ".";
 
-	/**
-	 * Create a line class - Base
-	 *
-	 * @param mixed $x1
-	 * @param mixed $y1
-	 * @param mixed $x2
-	 * @param mixed $y2
-	 */
-	public function __construct($x1, $y1, $x2, $y2) {
-		$this->x1 = $x1;
-		$this->y1 = $y1;
-		$this->x2 = $x2;
-		$this->y2 = $y2;
+    /**
+     * Create a line class - Base
+     *
+     * @param mixed $x1
+     * @param mixed $y1
+     * @param mixed $x2
+     * @param mixed $y2
+     */
+    public function __construct($x1, $y1, $x2, $y2) {
+        $this->x1 = $x1;
+        $this->y1 = $y1;
+        $this->x2 = $x2;
+        $this->y2 = $y2;
 
-		return 0;
-	}
+        return 0;
+    }
 
-	/**
-	 * Get the height of the line.
-	 *
-	 * @param $renderer
-	 *
-	 * @return number
-	 */
-	public function getHeight($renderer) {
-		return abs($this->y2 - $this->y1);
-	}
+    /**
+     * Get the height of the line.
+     *
+     * @param $renderer
+     *
+     * @return number
+     */
+    public function getHeight($renderer) {
+        return abs($this->y2 - $this->y1);
+    }
 
-	/**
-	 * Get the width of the line.
-	 *
-	 * @param $renderer
-	 *
-	 * @return number
-	 */
-	public function getWidth($renderer) {
-		return abs($this->x2 - $this->x1);
-	}
+    /**
+     * Get the width of the line.
+     *
+     * @param $renderer
+     *
+     * @return number
+     */
+    public function getWidth($renderer) {
+        return abs($this->x2 - $this->x1);
+    }
 }

Braces +8 added lines, -4 removed lines

@@ -18,7 +18,8 @@ 
 /**
  * Class ReportBaseLine
  */
-class ReportBaseLine extends ReportBaseElement {
+class ReportBaseLine extends ReportBaseElement
+{
 	/**
 	 * Start horizontal position, current position (default)
 	 *
@@ -52,7 +53,8 @@ 
 	 * @param mixed $x2
 	 * @param mixed $y2
 	 */
-	public function __construct($x1, $y1, $x2, $y2) {
+	public function __construct($x1, $y1, $x2, $y2)
+	{
 		$this->x1 = $x1;
 		$this->y1 = $y1;
 		$this->x2 = $x2;
@@ -68,7 +70,8 @@ 
 	 *
 	 * @return number
 	 */
-	public function getHeight($renderer) {
+	public function getHeight($renderer)
+	{
 		return abs($this->y2 - $this->y1);
 	}
 
@@ -79,7 +82,8 @@ 
 	 *
 	 * @return number
 	 */
-	public function getWidth($renderer) {
+	public function getWidth($renderer)
+	{
 		return abs($this->x2 - $this->x1);
 	}
 }

app/Report/ReportBaseText.php

Indentation +62 added lines, -62 removed lines

@@ -19,71 +19,71 @@
  * Class ReportBaseText
  */
 class ReportBaseText extends ReportBaseElement {
-	/**
-	 * Text color in HTML code
-	 *
-	 * @var string
-	 */
-	public $color;
-	/**
-	 * Style name
-	 *
-	 * @var string
-	 */
-	public $styleName;
-	/**
-	 * Remaining width of a cel
-	 *
-	 * @var int User unit (points)
-	 */
-	public $wrapWidthRemaining;
-	/**
-	 * Original width of a cell
-	 *
-	 * @var int User unit (points)
-	 */
-	public $wrapWidthCell;
+    /**
+     * Text color in HTML code
+     *
+     * @var string
+     */
+    public $color;
+    /**
+     * Style name
+     *
+     * @var string
+     */
+    public $styleName;
+    /**
+     * Remaining width of a cel
+     *
+     * @var int User unit (points)
+     */
+    public $wrapWidthRemaining;
+    /**
+     * Original width of a cell
+     *
+     * @var int User unit (points)
+     */
+    public $wrapWidthCell;
 
-	/**
-	 * Create a Text class - Base
-	 *
-	 * @param string $style The name of the text style
-	 * @param string $color HTML color code
-	 */
-	public function __construct($style, $color) {
-		$this->text               = '';
-		$this->color              = $color;
-		$this->wrapWidthRemaining = 0;
-		$this->styleName          = $style;
+    /**
+     * Create a Text class - Base
+     *
+     * @param string $style The name of the text style
+     * @param string $color HTML color code
+     */
+    public function __construct($style, $color) {
+        $this->text               = '';
+        $this->color              = $color;
+        $this->wrapWidthRemaining = 0;
+        $this->styleName          = $style;
 
-		return 0;
-	}
+        return 0;
+    }
 
-	/**
-	 * Set the width for word-wrapping.
-	 *
-	 * @param $wrapwidth
-	 * @param $cellwidth
-	 *
-	 * @return mixed
-	 */
-	public function setWrapWidth($wrapwidth, $cellwidth) {
-		$this->wrapWidthCell = $cellwidth;
-		if (strpos($this->text, "\n") !== false) {
-			$this->wrapWidthRemaining = $cellwidth;
-		} else {
-			$this->wrapWidthRemaining = $wrapwidth;
-		}
+    /**
+     * Set the width for word-wrapping.
+     *
+     * @param $wrapwidth
+     * @param $cellwidth
+     *
+     * @return mixed
+     */
+    public function setWrapWidth($wrapwidth, $cellwidth) {
+        $this->wrapWidthCell = $cellwidth;
+        if (strpos($this->text, "\n") !== false) {
+            $this->wrapWidthRemaining = $cellwidth;
+        } else {
+            $this->wrapWidthRemaining = $wrapwidth;
+        }
 
-		return $this->wrapWidthRemaining;
-	}
+        return $this->wrapWidthRemaining;
+    }
 
-	/**
-	 * Get the style name.
-	 *
-	 * @return string
-	 */
-	public function getStyleName() {
-		return $this->styleName;
-	}
+    /**
+     * Get the style name.
+     *
+     * @return string
+     */
+    public function getStyleName() {
+        return $this->styleName;
+    }
 }

Braces +8 added lines, -4 removed lines

@@ -18,7 +18,8 @@ 
 /**
  * Class ReportBaseText
  */
-class ReportBaseText extends ReportBaseElement {
+class ReportBaseText extends ReportBaseElement
+{
 	/**
 	 * Text color in HTML code
 	 *
@@ -50,7 +51,8 @@ 
 	 * @param string $style The name of the text style
 	 * @param string $color HTML color code
 	 */
-	public function __construct($style, $color) {
+	public function __construct($style, $color)
+	{
 		$this->text               = '';
 		$this->color              = $color;
 		$this->wrapWidthRemaining = 0;
@@ -67,7 +69,8 @@ 
 	 *
 	 * @return mixed
 	 */
-	public function setWrapWidth($wrapwidth, $cellwidth) {
+	public function setWrapWidth($wrapwidth, $cellwidth)
+	{
 		$this->wrapWidthCell = $cellwidth;
 		if (strpos($this->text, "\n") !== false) {
 			$this->wrapWidthRemaining = $cellwidth;
@@ -83,7 +86,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getStyleName() {
+	public function getStyleName()
+	{
 		return $this->styleName;
 	}
 }