1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
|
<?php
/**
* webtrees: online genealogy
* Copyright (C) 2018 webtrees development team
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*/
namespace Fisharebest\Webtrees;
/**
* A GEDCOM source (SOUR) object.
*/
class Source extends GedcomRecord
{
const RECORD_TYPE = 'SOUR';
const ROUTE_NAME = 'source';
/**
* Get an instance of a source object. For single records,
* we just receive the XREF. For bulk records (such as lists
* and search results) we can receive the GEDCOM data as well.
*
* @param string $xref
* @param Tree $tree
* @param string|null $gedcom
*
* @throws \Exception
*
* @return Source|null
*/
public static function getInstance(string $xref, Tree $tree, string $gedcom = null)
{
$record = parent::getInstance($xref, $tree, $gedcom);
if ($record instanceof Source) {
return $record;
}
return null;
}
/**
* Each object type may have its own special rules, and re-implement this function.
*
* @param int $access_level
*
* @return bool
*/
protected function canShowByType(int $access_level): bool
{
// Hide sources if they are attached to private repositories ...
preg_match_all('/\n1 REPO @(.+)@/', $this->gedcom, $matches);
foreach ($matches[1] as $match) {
$repo = Repository::getInstance($match, $this->tree);
if ($repo && !$repo->canShow($access_level)) {
return false;
}
}
// ... otherwise apply default behaviour
return parent::canShowByType($access_level);
}
/**
* Generate a private version of this record
*
* @param int $access_level
*
* @return string
*/
protected function createPrivateGedcomRecord(int $access_level): string
{
return '0 @' . $this->xref . "@ SOUR\n1 TITL " . I18N::translate('Private');
}
/**
* Fetch data from the database
*
* @param string $xref
* @param int $tree_id
*
* @return null|string
*/
protected static function fetchGedcomRecord(string $xref, int $tree_id)
{
return Database::prepare(
"SELECT s_gedcom FROM `##sources` WHERE s_id = :xref AND s_file = :tree_id"
)->execute([
'xref' => $xref,
'tree_id' => $tree_id,
])->fetchOne();
}
/**
* Extract names from the GEDCOM record.
*
* @return void
*/
public function extractNames()
{
parent::extractNamesFromFacts(1, 'TITL', $this->getFacts('TITL'));
}
}
|
