xref: /webtrees/app/Source.php (revision 8fcd0d32e56ee262912bbdb593202cfd1cbc1615)
1a25f0a04SGreg Roach<?php
2a25f0a04SGreg Roach/**
3a25f0a04SGreg Roach * webtrees: online genealogy
4*8fcd0d32SGreg 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
202e5b4452SGreg Roachuse Illuminate\Database\Capsule\Manager as DB;
212e5b4452SGreg Roach
22a25f0a04SGreg Roach/**
2376692c8bSGreg Roach * A GEDCOM source (SOUR) object.
24a25f0a04SGreg Roach */
25c1010edaSGreg Roachclass Source extends GedcomRecord
26c1010edaSGreg Roach{
27a25f0a04SGreg Roach    const RECORD_TYPE = 'SOUR';
28225e381fSGreg Roach    const ROUTE_NAME  = 'source';
29a25f0a04SGreg Roach
3076692c8bSGreg Roach    /**
31e71ef9d2SGreg Roach     * Get an instance of a source object. For single records,
32e71ef9d2SGreg Roach     * we just receive the XREF. For bulk records (such as lists
33e71ef9d2SGreg Roach     * and search results) we can receive the GEDCOM data as well.
34e71ef9d2SGreg Roach     *
35e71ef9d2SGreg Roach     * @param string      $xref
36e71ef9d2SGreg Roach     * @param Tree        $tree
37e71ef9d2SGreg Roach     * @param string|null $gedcom
38e71ef9d2SGreg Roach     *
39e71ef9d2SGreg Roach     * @throws \Exception
40e71ef9d2SGreg Roach     *
41e71ef9d2SGreg Roach     * @return Source|null
42e71ef9d2SGreg Roach     */
4376f666f4SGreg Roach    public static function getInstance(string $xref, Tree $tree, string $gedcom = null)
44c1010edaSGreg Roach    {
45e71ef9d2SGreg Roach        $record = parent::getInstance($xref, $tree, $gedcom);
46e71ef9d2SGreg Roach
47e71ef9d2SGreg Roach        if ($record instanceof Source) {
48e71ef9d2SGreg Roach            return $record;
49e71ef9d2SGreg Roach        }
50b2ce94c6SRico Sonntag
51b2ce94c6SRico Sonntag        return null;
52e71ef9d2SGreg Roach    }
53e71ef9d2SGreg Roach
54e71ef9d2SGreg Roach    /**
5576692c8bSGreg Roach     * Each object type may have its own special rules, and re-implement this function.
5676692c8bSGreg Roach     *
5776692c8bSGreg Roach     * @param int $access_level
5876692c8bSGreg Roach     *
5976692c8bSGreg Roach     * @return bool
6076692c8bSGreg Roach     */
6135584196SGreg Roach    protected function canShowByType(int $access_level): bool
62c1010edaSGreg Roach    {
63a25f0a04SGreg Roach        // Hide sources if they are attached to private repositories ...
64a25f0a04SGreg Roach        preg_match_all('/\n1 REPO @(.+)@/', $this->gedcom, $matches);
65a25f0a04SGreg Roach        foreach ($matches[1] as $match) {
6624ec66ceSGreg Roach            $repo = Repository::getInstance($match, $this->tree);
67a25f0a04SGreg Roach            if ($repo && !$repo->canShow($access_level)) {
68a25f0a04SGreg Roach                return false;
69a25f0a04SGreg Roach            }
70a25f0a04SGreg Roach        }
71a25f0a04SGreg Roach
72a25f0a04SGreg Roach        // ... otherwise apply default behaviour
73a25f0a04SGreg Roach        return parent::canShowByType($access_level);
74a25f0a04SGreg Roach    }
75a25f0a04SGreg Roach
7676692c8bSGreg Roach    /**
7776692c8bSGreg Roach     * Generate a private version of this record
7876692c8bSGreg Roach     *
7976692c8bSGreg Roach     * @param int $access_level
8076692c8bSGreg Roach     *
8176692c8bSGreg Roach     * @return string
8276692c8bSGreg Roach     */
833c90ed31SGreg Roach    protected function createPrivateGedcomRecord(int $access_level): string
84c1010edaSGreg Roach    {
85a25f0a04SGreg Roach        return '0 @' . $this->xref . "@ SOUR\n1 TITL " . I18N::translate('Private');
86a25f0a04SGreg Roach    }
87a25f0a04SGreg Roach
8876692c8bSGreg Roach    /**
8976692c8bSGreg Roach     * Fetch data from the database
9076692c8bSGreg Roach     *
9176692c8bSGreg Roach     * @param string $xref
9276692c8bSGreg Roach     * @param int    $tree_id
9376692c8bSGreg Roach     *
9476692c8bSGreg Roach     * @return null|string
9576692c8bSGreg Roach     */
9676f666f4SGreg Roach    protected static function fetchGedcomRecord(string $xref, int $tree_id)
97c1010edaSGreg Roach    {
982e5b4452SGreg Roach        return DB::table('sources')
992e5b4452SGreg Roach            ->where('s_id', '=', $xref)
1002e5b4452SGreg Roach            ->where('s_file', '=', $tree_id)
1012e5b4452SGreg Roach            ->value('s_gedcom');
102a25f0a04SGreg Roach    }
103a25f0a04SGreg Roach
10476692c8bSGreg Roach    /**
10576692c8bSGreg Roach     * Extract names from the GEDCOM record.
106c7ff4153SGreg Roach     *
107c7ff4153SGreg Roach     * @return void
10876692c8bSGreg Roach     */
109c1010edaSGreg Roach    public function extractNames()
110c1010edaSGreg Roach    {
1118d0ebef0SGreg Roach        parent::extractNamesFromFacts(1, 'TITL', $this->facts(['TITL']));
112a25f0a04SGreg Roach    }
113a25f0a04SGreg Roach}
114