xref: /webtrees/app/Elements/AgeAtEvent.php (revision 92a78a2f1d314ef404e1445d7916cbee426ce636)
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