xref: /webtrees/app/Elements/PafUid.php (revision 77babba26e9541d5c919a041a4469273cc32a1de)
1<?php
2
3/**
4 * webtrees: online genealogy
5 * Copyright (C) 2022 webtrees development team
6 * This program is free software: you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation, either version 3 of the License, or
9 * (at your option) any later version.
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program. If not, see <https://www.gnu.org/licenses/>.
16 */
17
18declare(strict_types=1);
19
20namespace Fisharebest\Webtrees\Elements;
21
22use Fisharebest\Webtrees\Tree;
23use Ramsey\Uuid\Exception\RandomSourceException;
24use Ramsey\Uuid\Uuid;
25
26use function dechex;
27use function hexdec;
28use function strtoupper;
29use function strtr;
30use function substr;
31
32/**
33 * _UID fields, as created by PAF and other applications
34 */
35class PafUid extends AbstractElement
36{
37    protected const MAXIMUM_LENGTH = 34;
38
39    /**
40     * Create a default value for this element.
41     *
42     * @param Tree $tree
43     *
44     * @return string
45     */
46    public function default(Tree $tree): string
47    {
48        if ($tree->getPreference('GENERATE_UIDS') !== '1') {
49            return '';
50        }
51
52        try {
53            $uid = strtr(Uuid::uuid4()->toString(), ['-' => '']);
54        } catch (RandomSourceException $ex) {
55            // uuid4() can fail if there is insufficient entropy in the system.
56            return '';
57        }
58
59        $checksum_a = 0; // a sum of the bytes
60        $checksum_b = 0; // a sum of the incremental values of $checksum_a
61
62        // Compute checksums
63        for ($i = 0; $i < 32; $i += 2) {
64            $checksum_a += hexdec(substr($uid, $i, 2));
65            $checksum_b += $checksum_a & 0xff;
66        }
67
68        $uid .= substr('0' . dechex($checksum_a), -2);
69        $uid .= substr('0' . dechex($checksum_b), -2);
70
71        return strtoupper($uid);
72    }
73}
74