xref: /webtrees/app/Source.php (revision a7a24840b43d2ed5c53b60c55f1f09e1cc2f01f9)
1a25f0a04SGreg Roach<?php
2a25f0a04SGreg Roach/**
3a25f0a04SGreg Roach * webtrees: online genealogy
48fcd0d32SGreg Roach * Copyright (C) 2019 webtrees development team
5a25f0a04SGreg Roach * This program is free software: you can redistribute it and/or modify
6a25f0a04SGreg Roach * it under the terms of the GNU General Public License as published by
7a25f0a04SGreg Roach * the Free Software Foundation, either version 3 of the License, or
8a25f0a04SGreg Roach * (at your option) any later version.
9a25f0a04SGreg Roach * This program is distributed in the hope that it will be useful,
10a25f0a04SGreg Roach * but WITHOUT ANY WARRANTY; without even the implied warranty of
11a25f0a04SGreg Roach * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12a25f0a04SGreg Roach * GNU General Public License for more details.
13a25f0a04SGreg Roach * You should have received a copy of the GNU General Public License
14a25f0a04SGreg Roach * along with this program. If not, see <http://www.gnu.org/licenses/>.
15a25f0a04SGreg Roach */
16e7f56f2aSGreg Roachdeclare(strict_types=1);
17e7f56f2aSGreg Roach
1876692c8bSGreg Roachnamespace Fisharebest\Webtrees;
19a25f0a04SGreg Roach
20886b77daSGreg Roachuse Closure;
212e5b4452SGreg Roachuse Illuminate\Database\Capsule\Manager as DB;
22886b77daSGreg Roachuse stdClass;
232e5b4452SGreg Roach
24a25f0a04SGreg Roach/**
2576692c8bSGreg Roach * A GEDCOM source (SOUR) object.
26a25f0a04SGreg Roach */
27c1010edaSGreg Roachclass Source extends GedcomRecord
28c1010edaSGreg Roach{
2916d6367aSGreg Roach    public const RECORD_TYPE = 'SOUR';
3016d6367aSGreg Roach
3116d6367aSGreg Roach    protected const ROUTE_NAME  = 'source';
32a25f0a04SGreg Roach
3376692c8bSGreg Roach    /**
34886b77daSGreg Roach     * A closure which will create a record from a database row.
35886b77daSGreg Roach     *
36886b77daSGreg Roach     * @return Closure
37886b77daSGreg Roach     */
38c0804649SGreg Roach    public static function rowMapper(): Closure
39886b77daSGreg Roach    {
40c0804649SGreg Roach        return function (stdClass $row): Source {
41*a7a24840SGreg Roach            return Source::getInstance($row->s_id, Tree::findById((int) $row->s_file), $row->s_gedcom);
42886b77daSGreg Roach        };
43886b77daSGreg Roach    }
44886b77daSGreg Roach
45886b77daSGreg Roach    /**
46e71ef9d2SGreg Roach     * Get an instance of a source object. For single records,
47e71ef9d2SGreg Roach     * we just receive the XREF. For bulk records (such as lists
48e71ef9d2SGreg Roach     * and search results) we can receive the GEDCOM data as well.
49e71ef9d2SGreg Roach     *
50e71ef9d2SGreg Roach     * @param string      $xref
51e71ef9d2SGreg Roach     * @param Tree        $tree
52e71ef9d2SGreg Roach     * @param string|null $gedcom
53e71ef9d2SGreg Roach     *
54e71ef9d2SGreg Roach     * @throws \Exception
55e71ef9d2SGreg Roach     *
56e71ef9d2SGreg Roach     * @return Source|null
57e71ef9d2SGreg Roach     */
5876f666f4SGreg Roach    public static function getInstance(string $xref, Tree $tree, string $gedcom = null)
59c1010edaSGreg Roach    {
60e71ef9d2SGreg Roach        $record = parent::getInstance($xref, $tree, $gedcom);
61e71ef9d2SGreg Roach
62e71ef9d2SGreg Roach        if ($record instanceof Source) {
63e71ef9d2SGreg Roach            return $record;
64e71ef9d2SGreg Roach        }
65b2ce94c6SRico Sonntag
66b2ce94c6SRico Sonntag        return null;
67e71ef9d2SGreg Roach    }
68e71ef9d2SGreg Roach
69e71ef9d2SGreg Roach    /**
7076692c8bSGreg Roach     * Each object type may have its own special rules, and re-implement this function.
7176692c8bSGreg Roach     *
7276692c8bSGreg Roach     * @param int $access_level
7376692c8bSGreg Roach     *
7476692c8bSGreg Roach     * @return bool
7576692c8bSGreg Roach     */
7635584196SGreg Roach    protected function canShowByType(int $access_level): bool
77c1010edaSGreg Roach    {
78a25f0a04SGreg Roach        // Hide sources if they are attached to private repositories ...
79a25f0a04SGreg Roach        preg_match_all('/\n1 REPO @(.+)@/', $this->gedcom, $matches);
80a25f0a04SGreg Roach        foreach ($matches[1] as $match) {
8124ec66ceSGreg Roach            $repo = Repository::getInstance($match, $this->tree);
82a25f0a04SGreg Roach            if ($repo && !$repo->canShow($access_level)) {
83a25f0a04SGreg Roach                return false;
84a25f0a04SGreg Roach            }
85a25f0a04SGreg Roach        }
86a25f0a04SGreg Roach
87a25f0a04SGreg Roach        // ... otherwise apply default behaviour
88a25f0a04SGreg Roach        return parent::canShowByType($access_level);
89a25f0a04SGreg Roach    }
90a25f0a04SGreg Roach
9176692c8bSGreg Roach    /**
9276692c8bSGreg Roach     * Generate a private version of this record
9376692c8bSGreg Roach     *
9476692c8bSGreg Roach     * @param int $access_level
9576692c8bSGreg Roach     *
9676692c8bSGreg Roach     * @return string
9776692c8bSGreg Roach     */
983c90ed31SGreg Roach    protected function createPrivateGedcomRecord(int $access_level): string
99c1010edaSGreg Roach    {
100a25f0a04SGreg Roach        return '0 @' . $this->xref . "@ SOUR\n1 TITL " . I18N::translate('Private');
101a25f0a04SGreg Roach    }
102a25f0a04SGreg Roach
10376692c8bSGreg Roach    /**
10476692c8bSGreg Roach     * Fetch data from the database
10576692c8bSGreg Roach     *
10676692c8bSGreg Roach     * @param string $xref
10776692c8bSGreg Roach     * @param int    $tree_id
10876692c8bSGreg Roach     *
10976692c8bSGreg Roach     * @return null|string
11076692c8bSGreg Roach     */
11176f666f4SGreg Roach    protected static function fetchGedcomRecord(string $xref, int $tree_id)
112c1010edaSGreg Roach    {
1132e5b4452SGreg Roach        return DB::table('sources')
1142e5b4452SGreg Roach            ->where('s_id', '=', $xref)
1152e5b4452SGreg Roach            ->where('s_file', '=', $tree_id)
1162e5b4452SGreg Roach            ->value('s_gedcom');
117a25f0a04SGreg Roach    }
118a25f0a04SGreg Roach
11976692c8bSGreg Roach    /**
12076692c8bSGreg Roach     * Extract names from the GEDCOM record.
121c7ff4153SGreg Roach     *
122c7ff4153SGreg Roach     * @return void
12376692c8bSGreg Roach     */
124c1010edaSGreg Roach    public function extractNames()
125c1010edaSGreg Roach    {
1268d0ebef0SGreg Roach        parent::extractNamesFromFacts(1, 'TITL', $this->facts(['TITL']));
127a25f0a04SGreg Roach    }
128a25f0a04SGreg Roach}
129