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
|
<?php
declare(strict_types=1);
use Fisharebest\Webtrees\Elements\AbstractXrefElement;
use Fisharebest\Webtrees\Elements\XrefSource;
use Fisharebest\Webtrees\Gedcom;
use Fisharebest\Webtrees\GedcomRecord;
use Fisharebest\Webtrees\I18N;
use Fisharebest\Webtrees\Registry;
use Fisharebest\Webtrees\Source;
use Fisharebest\Webtrees\Tree;
/**
* @var string $gedcom
* @var string $parent e.g. "INDI:BIRT:DATE"
* @var Tree $tree
*/
$hierarchy = explode(':', $parent);
// Merge CONT records onto their parent line.
$gedcom = preg_replace('/\n\d CONT ?/', "\r", $gedcom);
preg_match_all('/^(\d+) (\w+) ?(.*)/m', $gedcom, $matches);
[, $levels, $tags, $values] = $matches;
$levels = array_map(static fn (string $x): int => (int) $x, $levels);
$keys = array_keys($levels);
$elements = [];
$private_level = PHP_INT_MAX;
foreach ($keys as $key) {
$hierarchy[$levels[$key]] = $tags[$key];
$full_tag = implode(':', array_slice($hierarchy, 0, 1 + $levels[$key]));
$elements[$key] = Registry::elementFactory()->make($full_tag);
if ($elements[$key] instanceof AbstractXrefElement && preg_match('/^@(' . Gedcom::REGEX_XREF . ')@$/', $values[$key], $match) === 1) {
$record = Registry::gedcomRecordFactory()->make($match[1], $tree);
if ($record instanceof GedcomRecord && !$record->canShow()) {
$private_level = min($private_level, $levels[$key]);
}
}
if ($levels[$key] >= $private_level) {
$values[$key] = '';
} else {
$private_level = PHP_INT_MAX;
}
}
?>
<?php if ($elements[0] instanceof XrefSource && preg_match('/^@(' . Gedcom::REGEX_XREF . ')@$/', $values[0], $match) === 1) : ?>
<?php $source = Registry::sourceFactory()->make($match[1], $tree) ?>
<?php if ($source instanceof Source) : ?>
<?php $id = Registry::idFactory()->id() ?>
<?php $expanded = $tree->getPreference('EXPAND_SOURCES') === '1' ?>
<div>
<button type="button" class="btn btn-text p-0" href="#<?= e($id) ?>" data-bs-toggle="collapse" aria-controls="<?= e($id) ?>" aria-expanded="<?= $expanded ? 'true' : 'false' ?>">
<?= view('icons/expand') ?>
<?= view('icons/collapse') ?>
</button>
<?php $label = '<span class="label">' . I18N::translate('Source') . '</span>' ?>
<?php $value = '<span class="field" dir="auto"><a href="' . e($source->url()) . '">' . $source->fullName() . '</a></span>' ?>
<?= I18N::translate('%1$s: %2$s', $label, $value) ?>
</div>
<div id="<?= e($id) ?>" class="ps-4 collapse <?= $expanded ? 'show' : '' ?>">
<?php array_shift($keys) ?>
<?php foreach ($keys as $key) : ?>
<?php if ($values[$key] !== '') : ?>
<?= $elements[$key]->labelValue(strtr($values[$key], ["\r" => "\n"]), $tree) ?>
<?php endif ?>
<?php endforeach ?>
</div>
<?php endif ?>
<?php else : ?>
<?php foreach ($keys as $key) : ?>
<?php if ($values[$key] !== '') : ?>
<?= $elements[$key]->labelValue(strtr($values[$key], ["\r" => "\n"]), $tree) ?>
<?php endif ?>
<?php endforeach ?>
<?php endif ?>
|
