1c2ed51d1SGreg Roach<?php 2c2ed51d1SGreg Roach 3c2ed51d1SGreg Roach/** 4c2ed51d1SGreg Roach * webtrees: online genealogy 55bfc6897SGreg Roach * Copyright (C) 2022 webtrees development team 6c2ed51d1SGreg Roach * This program is free software: you can redistribute it and/or modify 7c2ed51d1SGreg Roach * it under the terms of the GNU General Public License as published by 8c2ed51d1SGreg Roach * the Free Software Foundation, either version 3 of the License, or 9c2ed51d1SGreg Roach * (at your option) any later version. 10c2ed51d1SGreg Roach * This program is distributed in the hope that it will be useful, 11c2ed51d1SGreg Roach * but WITHOUT ANY WARRANTY; without even the implied warranty of 12c2ed51d1SGreg Roach * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13c2ed51d1SGreg Roach * GNU General Public License for more details. 14c2ed51d1SGreg Roach * You should have received a copy of the GNU General Public License 15c2ed51d1SGreg Roach * along with this program. If not, see <https://www.gnu.org/licenses/>. 16c2ed51d1SGreg Roach */ 17c2ed51d1SGreg Roach 18c2ed51d1SGreg Roachdeclare(strict_types=1); 19c2ed51d1SGreg Roach 20c2ed51d1SGreg Roachnamespace Fisharebest\Webtrees\Elements; 21c2ed51d1SGreg Roach 228c381371SGreg Roachuse Fisharebest\Webtrees\I18N; 238c381371SGreg Roachuse Fisharebest\Webtrees\Tree; 248c381371SGreg Roach 258c381371SGreg Roachuse function preg_replace_callback_array; 26c2ed51d1SGreg Roachuse function strtolower; 27c2ed51d1SGreg Roachuse function strtoupper; 28c2ed51d1SGreg Roach 29c2ed51d1SGreg Roach/** 30c2ed51d1SGreg Roach * AGE_AT_EVENT := {Size=1:12} 31c2ed51d1SGreg Roach * [ < | > | <NULL>] 32c2ed51d1SGreg Roach * [ YYy MMm DDDd | YYy | MMm | DDDd | 33c2ed51d1SGreg Roach * YYy MMm | YYy DDDd | MMm DDDd | 34c2ed51d1SGreg Roach * CHILD | INFANT | STILLBORN ] 35c2ed51d1SGreg Roach * ] 36c2ed51d1SGreg Roach * Where: 37c2ed51d1SGreg Roach * > = greater than indicated age 38c2ed51d1SGreg Roach * < = less than indicated age 39c2ed51d1SGreg Roach * y = a label indicating years 40c2ed51d1SGreg Roach * m = a label indicating months 41c2ed51d1SGreg Roach * d = a label indicating days 42c2ed51d1SGreg Roach * YY = number of full years 43c2ed51d1SGreg Roach * MM = number of months 44c2ed51d1SGreg Roach * DDD = number of days 45c2ed51d1SGreg Roach * CHILD = age < 8 years 46c2ed51d1SGreg Roach * INFANT = age <1year 47c2ed51d1SGreg Roach * STILLBORN = died just prior, at, or near birth, 0 years 48c2ed51d1SGreg Roach */ 49c2ed51d1SGreg Roachclass AgeAtEvent extends AbstractElement 50c2ed51d1SGreg Roach{ 51ae0043b7SGreg Roach protected const MAXIMUM_LENGTH = 12; 52c2ed51d1SGreg Roach 53d7cf6b67SGreg Roach protected const KEYWORDS = ['CHILD', 'INFANT', 'STILLBORN']; 54d7cf6b67SGreg Roach 55*92a78a2fSGreg Roach /** 56*92a78a2fSGreg Roach * Convert a value to a canonical form. 57*92a78a2fSGreg Roach * 58*92a78a2fSGreg Roach * @param string $value 59*92a78a2fSGreg Roach * 60*92a78a2fSGreg Roach * @return string 61*92a78a2fSGreg Roach */ 62c2ed51d1SGreg Roach public function canonical(string $value): string 63c2ed51d1SGreg Roach { 64c2ed51d1SGreg Roach $value = parent::canonical($value); 65c2ed51d1SGreg Roach $upper = strtoupper($value); 66c2ed51d1SGreg Roach 67d7cf6b67SGreg Roach if (in_array($upper, static::KEYWORDS, true)) { 683d2c98d1SGreg Roach return $upper; 69c2ed51d1SGreg Roach } 70c2ed51d1SGreg Roach 713d2c98d1SGreg Roach return strtolower($value); 72c2ed51d1SGreg Roach } 738c381371SGreg Roach 748c381371SGreg Roach /** 758c381371SGreg Roach * Display the value of this type of element. 768c381371SGreg Roach * 778c381371SGreg Roach * @param string $value 788c381371SGreg Roach * @param Tree $tree 798c381371SGreg Roach * 808c381371SGreg Roach * @return string 818c381371SGreg Roach */ 828c381371SGreg Roach public function value(string $value, Tree $tree): string 838c381371SGreg Roach { 848c381371SGreg Roach $canonical = $this->canonical($value); 858c381371SGreg Roach 86d7cf6b67SGreg Roach switch ($canonical) { 87d7cf6b67SGreg Roach case 'CHILD': 88d7cf6b67SGreg Roach return I18N::translate('Child'); 89d7cf6b67SGreg Roach 90d7cf6b67SGreg Roach case 'INFANT': 91d7cf6b67SGreg Roach return I18N::translate('Infant'); 92d7cf6b67SGreg Roach 93d7cf6b67SGreg Roach case 'STILLBORN': 94d7cf6b67SGreg Roach return I18N::translate('Stillborn'); 95d7cf6b67SGreg Roach } 96d7cf6b67SGreg Roach 978c381371SGreg Roach return preg_replace_callback_array([ 98dd71ff6bSGreg Roach '/\b(\d+)y\b/' => fn (array $match) => I18N::plural('%s year', '%s years', (int) $match[1], I18N::number((float) $match[1])), 99dd71ff6bSGreg Roach '/\b(\d+)m\b/' => fn (array $match) => I18N::plural('%s month', '%s months', (int) $match[1], I18N::number((float) $match[1])), 100dd71ff6bSGreg Roach '/\b(\d+)w\b/' => fn (array $match) => I18N::plural('%s week', '%s weeks', (int) $match[1], I18N::number((float) $match[1])), 101dd71ff6bSGreg Roach '/\b(\d+)d\b/' => fn (array $match) => I18N::plural('%s day', '%s days', (int) $match[1], I18N::number((float) $match[1])), 1028c381371SGreg Roach ], e($canonical)); 1038c381371SGreg Roach } 104c2ed51d1SGreg Roach} 105