xref: /webtrees/app/Elements/XrefSource.php (revision d11be7027e34e3121be11cc025421873364403f9)
1c2ed51d1SGreg Roach<?php
2c2ed51d1SGreg Roach
3c2ed51d1SGreg Roach/**
4c2ed51d1SGreg Roach * webtrees: online genealogy
5*d11be702SGreg Roach * Copyright (C) 2023 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
22b315f3e1SGreg Roachuse Fisharebest\Webtrees\Gedcom;
23c2ed51d1SGreg Roachuse Fisharebest\Webtrees\Http\RequestHandlers\CreateSourceModal;
24c2ed51d1SGreg Roachuse Fisharebest\Webtrees\I18N;
25c2ed51d1SGreg Roachuse Fisharebest\Webtrees\Registry;
26c2ed51d1SGreg Roachuse Fisharebest\Webtrees\Tree;
27c2ed51d1SGreg Roach
28c2ed51d1SGreg Roachuse function e;
29c2ed51d1SGreg Roachuse function route;
30e2741c18SGreg Roachuse function str_ends_with;
31e2741c18SGreg Roachuse function str_starts_with;
32c2ed51d1SGreg Roachuse function trim;
33c2ed51d1SGreg Roachuse function view;
34c2ed51d1SGreg Roach
35c2ed51d1SGreg Roach/**
36c2ed51d1SGreg Roach * XREF:SOUR := {Size=1:22}
37c2ed51d1SGreg Roach * A pointer to, or a cross-reference identifier of, a SOURce record.
38c2ed51d1SGreg Roach */
39c2ed51d1SGreg Roachclass XrefSource extends AbstractXrefElement
40c2ed51d1SGreg Roach{
41c2ed51d1SGreg Roach    protected const SUBTAGS = [
42c2ed51d1SGreg Roach        'PAGE' => '0:1',
43c2ed51d1SGreg Roach        'EVEN' => '0:1',
44c2ed51d1SGreg Roach        'DATA' => '0:1',
45c2ed51d1SGreg Roach        'OBJE' => '0:M',
46c2ed51d1SGreg Roach        'NOTE' => '0:M',
47c2ed51d1SGreg Roach        'QUAY' => '0:1',
48c2ed51d1SGreg Roach    ];
49c2ed51d1SGreg Roach
50c2ed51d1SGreg Roach    /**
51c2ed51d1SGreg Roach     * An edit control for this data.
52c2ed51d1SGreg Roach     *
53c2ed51d1SGreg Roach     * @param string $id
54c2ed51d1SGreg Roach     * @param string $name
55c2ed51d1SGreg Roach     * @param string $value
56c2ed51d1SGreg Roach     * @param Tree   $tree
57c2ed51d1SGreg Roach     *
58c2ed51d1SGreg Roach     * @return string
59c2ed51d1SGreg Roach     */
60c2ed51d1SGreg Roach    public function edit(string $id, string $name, string $value, Tree $tree): string
61c2ed51d1SGreg Roach    {
62b315f3e1SGreg Roach        // Other applications create sources with text, rather than XREFs
63b315f3e1SGreg Roach        if ($value === '' || preg_match('/^@' . Gedcom::REGEX_XREF . '@$/', $value)) {
64c2ed51d1SGreg Roach            $select = view('components/select-source', [
65c2ed51d1SGreg Roach                'id'     => $id,
66c2ed51d1SGreg Roach                'name'   => $name,
67c2ed51d1SGreg Roach                'source' => Registry::sourceFactory()->make(trim($value, '@'), $tree),
68c2ed51d1SGreg Roach                'tree'   => $tree,
69c2ed51d1SGreg Roach                'at'     => '@',
70c2ed51d1SGreg Roach            ]);
71c2ed51d1SGreg Roach
72c2ed51d1SGreg Roach            return
73c2ed51d1SGreg Roach                '<div class="input-group">' .
74d4786c66SGreg Roach                '<button class="btn btn-secondary" type="button" data-bs-toggle="modal" data-bs-backdrop="static" data-bs-target="#wt-ajax-modal" data-wt-href="' . e(route(CreateSourceModal::class, ['tree' => $tree->name()])) . '" data-wt-select-id="' . $id . '" title="' . I18N::translate('Create a source') . '">' .
75c2ed51d1SGreg Roach                view('icons/add') .
76c2ed51d1SGreg Roach                '</button>' .
77c2ed51d1SGreg Roach                $select .
78c2ed51d1SGreg Roach                '</div>';
79c2ed51d1SGreg Roach        }
80c2ed51d1SGreg Roach
81b315f3e1SGreg Roach        return $this->editTextArea($id, $name, $value);
82b315f3e1SGreg Roach    }
83b315f3e1SGreg Roach
84c2ed51d1SGreg Roach    /**
85c2ed51d1SGreg Roach     * Display the value of this type of element.
86c2ed51d1SGreg Roach     *
87c2ed51d1SGreg Roach     * @param string $value
88c2ed51d1SGreg Roach     * @param Tree   $tree
89c2ed51d1SGreg Roach     *
90c2ed51d1SGreg Roach     * @return string
91c2ed51d1SGreg Roach     */
92c2ed51d1SGreg Roach    public function value(string $value, Tree $tree): string
93c2ed51d1SGreg Roach    {
94e2741c18SGreg Roach        if (str_starts_with($value, '@') && str_ends_with($value, '@')) {
95c2ed51d1SGreg Roach            return $this->valueXrefLink($value, $tree, Registry::sourceFactory());
96c2ed51d1SGreg Roach        }
97e2741c18SGreg Roach
98e2741c18SGreg Roach        // Inline sources are deprecated - but used by some historic events
99e2741c18SGreg Roach        return $this->valueFormatted($value, $tree);
100e2741c18SGreg Roach    }
101c2ed51d1SGreg Roach}
102