xref: /webtrees/app/Elements/EventsRecorded.php (revision 3d2c98d1066d5e178a3d1ceb3bdc58b7ba8ee926)
1c2ed51d1SGreg Roach<?php
2c2ed51d1SGreg Roach
3c2ed51d1SGreg Roach/**
4c2ed51d1SGreg Roach * webtrees: online genealogy
5c2ed51d1SGreg Roach * Copyright (C) 2021 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
22c2ed51d1SGreg Roachuse Fisharebest\Webtrees\I18N;
23c2ed51d1SGreg Roachuse Fisharebest\Webtrees\Registry;
24c2ed51d1SGreg Roachuse Fisharebest\Webtrees\Tree;
25c2ed51d1SGreg Roachuse Illuminate\Support\Collection;
26c2ed51d1SGreg Roachuse Ramsey\Uuid\Uuid;
27c2ed51d1SGreg Roach
28c2ed51d1SGreg Roachuse function array_map;
29c2ed51d1SGreg Roachuse function explode;
30c2ed51d1SGreg Roachuse function implode;
31*3d2c98d1SGreg Roachuse function strpos;
32c2ed51d1SGreg Roachuse function strtoupper;
33*3d2c98d1SGreg Roachuse function trim;
34c2ed51d1SGreg Roachuse function view;
35c2ed51d1SGreg Roach
36c2ed51d1SGreg Roach/**
37c2ed51d1SGreg Roach * EVENTS_RECORDED := {Size=1:90}
38c2ed51d1SGreg Roach * [<EVENT_ATTRIBUTE_TYPE> | <EVENTS_RECORDED>, <EVENT_ATTRIBUTE_TYPE>]
39c2ed51d1SGreg Roach * An enumeration of the different kinds of events that were recorded in a
40c2ed51d1SGreg Roach * particular source. Each enumeration is separated by a comma. Such as a
41c2ed51d1SGreg Roach * parish register of births, deaths, and marriages would be BIRT, DEAT, MARR.
42c2ed51d1SGreg Roach */
43c2ed51d1SGreg Roachclass EventsRecorded extends AbstractElement
44c2ed51d1SGreg Roach{
45c2ed51d1SGreg Roach    protected const SUBTAGS = [
46c2ed51d1SGreg Roach        'DATE' => '0:1',
47c2ed51d1SGreg Roach        'PLAC' => '0:1',
48c2ed51d1SGreg Roach    ];
49c2ed51d1SGreg Roach
50c2ed51d1SGreg Roach    protected const EVENTS_RECORDED = [
51c2ed51d1SGreg Roach        'INDI:ADOP',
52c2ed51d1SGreg Roach        'INDI:BAPM',
53c2ed51d1SGreg Roach        'INDI:BARM',
54c2ed51d1SGreg Roach        'INDI:BASM',
55c2ed51d1SGreg Roach        'INDI:BIRT',
56c2ed51d1SGreg Roach        'INDI:BLES',
57c2ed51d1SGreg Roach        'INDI:BURI',
58c2ed51d1SGreg Roach        'INDI:CAST',
59c2ed51d1SGreg Roach        'INDI:CHR',
60c2ed51d1SGreg Roach        'INDI:CENS',
61c2ed51d1SGreg Roach        'INDI:CHRA',
62c2ed51d1SGreg Roach        'INDI:CONF',
63c2ed51d1SGreg Roach        'INDI:CREM',
64c2ed51d1SGreg Roach        'INDI:DEAT',
65c2ed51d1SGreg Roach        'INDI:DSCR',
66c2ed51d1SGreg Roach        'INDI:EDUC',
67c2ed51d1SGreg Roach        'INDI:EMIG',
68c2ed51d1SGreg Roach        'INDI:FCOM',
69c2ed51d1SGreg Roach        'INDI:GRAD',
70c2ed51d1SGreg Roach        'INDI:IDNO',
71c2ed51d1SGreg Roach        'INDI:IMMI',
72c2ed51d1SGreg Roach        'INDI:NATI',
73c2ed51d1SGreg Roach        'INDI:NATU',
74c2ed51d1SGreg Roach        'INDI:NCHI',
75c2ed51d1SGreg Roach        'INDI:NMR',
76c2ed51d1SGreg Roach        'INDI:OCCU',
77c2ed51d1SGreg Roach        'INDI:ORDN',
78c2ed51d1SGreg Roach        'INDI:PROB',
79c2ed51d1SGreg Roach        'INDI:PROP',
80c2ed51d1SGreg Roach        'INDI:RELI',
81c2ed51d1SGreg Roach        'INDI:RESI',
82c2ed51d1SGreg Roach        'INDI:RETI',
83c2ed51d1SGreg Roach        'INDI:SSN',
84c2ed51d1SGreg Roach        'INDI:TITL',
85c2ed51d1SGreg Roach        'INDI:WILL',
86c2ed51d1SGreg Roach        'FAM:ANUL',
87c2ed51d1SGreg Roach        'FAM:DIV',
88c2ed51d1SGreg Roach        'FAM:DIVF',
89c2ed51d1SGreg Roach        'FAM:ENGA',
90c2ed51d1SGreg Roach        'FAM:MARB',
91c2ed51d1SGreg Roach        'FAM:MARC',
92c2ed51d1SGreg Roach        'FAM:MARL',
93c2ed51d1SGreg Roach        'FAM:MARS',
94c2ed51d1SGreg Roach        'FAM:MARR',
95c2ed51d1SGreg Roach    ];
96c2ed51d1SGreg Roach
97c2ed51d1SGreg Roach    /**
98c2ed51d1SGreg Roach     * Convert a value to a canonical form.
99c2ed51d1SGreg Roach     *
100c2ed51d1SGreg Roach     * @param string $value
101c2ed51d1SGreg Roach     *
102c2ed51d1SGreg Roach     * @return string
103c2ed51d1SGreg Roach     */
104c2ed51d1SGreg Roach    public function canonical(string $value): string
105c2ed51d1SGreg Roach    {
106*3d2c98d1SGreg Roach        $value = strtoupper(strtr(parent::canonical($value), [' ' => ',']));
107*3d2c98d1SGreg Roach
108*3d2c98d1SGreg Roach        while (strpos($value, ',,') !== false) {
109*3d2c98d1SGreg Roach            $value = strtr($value, [',,' => ',']);
110*3d2c98d1SGreg Roach        }
111*3d2c98d1SGreg Roach
112*3d2c98d1SGreg Roach        return trim($value, ',');
113c2ed51d1SGreg Roach    }
114c2ed51d1SGreg Roach
115c2ed51d1SGreg Roach    /**
116c2ed51d1SGreg Roach     * An edit control for this data.
117c2ed51d1SGreg Roach     *
118c2ed51d1SGreg Roach     * @param string $id
119c2ed51d1SGreg Roach     * @param string $name
120c2ed51d1SGreg Roach     * @param string $value
121c2ed51d1SGreg Roach     * @param Tree   $tree
122c2ed51d1SGreg Roach     *
123c2ed51d1SGreg Roach     * @return string
124c2ed51d1SGreg Roach     */
125c2ed51d1SGreg Roach    public function edit(string $id, string $name, string $value, Tree $tree): string
126c2ed51d1SGreg Roach    {
127c2ed51d1SGreg Roach        $factory = Registry::elementFactory();
128c2ed51d1SGreg Roach
129c2ed51d1SGreg Roach        $options = Collection::make(self::EVENTS_RECORDED)
130c2ed51d1SGreg Roach            ->mapWithKeys(static function (string $tag) use ($factory): array {
131c2ed51d1SGreg Roach                return [explode(':', $tag)[1] => $factory->make($tag)->label()];
132c2ed51d1SGreg Roach            })
133c2ed51d1SGreg Roach            ->sort()
134c2ed51d1SGreg Roach            ->all();
135c2ed51d1SGreg Roach
136c2ed51d1SGreg Roach        $id2 = Uuid::uuid4()->toString();
137c2ed51d1SGreg Roach
138c2ed51d1SGreg Roach        // Our form element name contains "[]", and multiple selections would create multiple values.
139c2ed51d1SGreg Roach        $hidden = '<input type="hidden" id="' . e($id) . '" name="' . e($name) . '" value="' . e($value) . '">';
140c2ed51d1SGreg Roach        // Combine them into a single value.
141c2ed51d1SGreg Roach        // The change event doesn't seem to fire for select2 controls, so use form.submit instead.
142c2ed51d1SGreg Roach        $js = 'document.getElementById("' . $id2 . '").form.addEventListener("submit", function () { document.getElementById("' . $id . '").value = Array.from(document.getElementById("' . $id2 . '").selectedOptions).map(x => x.value).join(","); });';
143c2ed51d1SGreg Roach
144c2ed51d1SGreg Roach        return view('components/select', [
145c2ed51d1SGreg Roach            'class'    => 'select2',
146c2ed51d1SGreg Roach            'name'     => '',
147c2ed51d1SGreg Roach            'id'       => $id2,
148c2ed51d1SGreg Roach            'options'  => $options,
149c2ed51d1SGreg Roach            'selected' => explode(',', strtr($value, [' ' => ''])),
150c2ed51d1SGreg Roach        ]) . $hidden . '<script>' . $js . '</script>';
151c2ed51d1SGreg Roach    }
152c2ed51d1SGreg Roach
153c2ed51d1SGreg Roach    /**
154c2ed51d1SGreg Roach     * Display the value of this type of element.
155c2ed51d1SGreg Roach     *
156c2ed51d1SGreg Roach     * @param string $value
157c2ed51d1SGreg Roach     * @param Tree   $tree
158c2ed51d1SGreg Roach     *
159c2ed51d1SGreg Roach     * @return string
160c2ed51d1SGreg Roach     */
161c2ed51d1SGreg Roach    public function value(string $value, Tree $tree): string
162c2ed51d1SGreg Roach    {
163c2ed51d1SGreg Roach        $tags = explode(',', $this->canonical($value));
164c2ed51d1SGreg Roach
165c2ed51d1SGreg Roach        $events = array_map(static function (string $tag): string {
166c2ed51d1SGreg Roach            foreach (['INDI', 'FAM'] as $record_type) {
167c2ed51d1SGreg Roach                $element = Registry::elementFactory()->make($record_type . ':' . $tag);
168c2ed51d1SGreg Roach
169c2ed51d1SGreg Roach                if (!$element instanceof UnknownElement) {
170c2ed51d1SGreg Roach                    return $element->label();
171c2ed51d1SGreg Roach                }
172c2ed51d1SGreg Roach            }
173c2ed51d1SGreg Roach
174*3d2c98d1SGreg Roach            return e($tag);
175c2ed51d1SGreg Roach        }, $tags);
176c2ed51d1SGreg Roach
177c2ed51d1SGreg Roach        return implode(I18N::$list_separator, $events);
178c2ed51d1SGreg Roach    }
179c2ed51d1SGreg Roach}
180