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\Factories; 21 22use Fisharebest\Webtrees\Contracts\SlugFactoryInterface; 23use Fisharebest\Webtrees\GedcomRecord; 24use Transliterator; 25 26use function extension_loaded; 27use function preg_replace; 28use function strip_tags; 29use function trim; 30 31/** 32 * Make a slug to be used in the URL of a GedcomRecord. 33 */ 34class SlugFactory implements SlugFactoryInterface 35{ 36 private ?Transliterator $transliterator = null; 37 38 public function __construct() 39 { 40 if (extension_loaded('intl')) { 41 $ids = Transliterator::listIDs(); 42 43 if (in_array('Any-Latin', $ids, true) && in_array('Latin-ASCII', $ids, true)) { 44 $this->transliterator = Transliterator::create('Any-Latin;Latin-ASCII'); 45 } 46 } 47 } 48 49 /** 50 * @param GedcomRecord $record 51 * 52 * @return string 53 */ 54 public function make(GedcomRecord $record): string 55 { 56 $slug = strip_tags($record->fullName()); 57 58 if ($this->transliterator instanceof Transliterator) { 59 $slug = $this->transliterator->transliterate($slug); 60 61 if ($slug === false) { 62 return ''; 63 } 64 } 65 66 $slug = preg_replace('/[^A-Za-z0-9]+/', '-', $slug); 67 68 return trim($slug, '-'); 69 } 70} 71