1323788f4SGreg Roach<?php 2323788f4SGreg Roach/** 3323788f4SGreg Roach * webtrees: online genealogy 41062a142SGreg Roach * Copyright (C) 2018 webtrees development team 5323788f4SGreg Roach * This program is free software: you can redistribute it and/or modify 6323788f4SGreg Roach * it under the terms of the GNU General Public License as published by 7323788f4SGreg Roach * the Free Software Foundation, either version 3 of the License, or 8323788f4SGreg Roach * (at your option) any later version. 9323788f4SGreg Roach * This program is distributed in the hope that it will be useful, 10323788f4SGreg Roach * but WITHOUT ANY WARRANTY; without even the implied warranty of 11323788f4SGreg Roach * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 12323788f4SGreg Roach * GNU General Public License for more details. 13323788f4SGreg Roach * You should have received a copy of the GNU General Public License 14323788f4SGreg Roach * along with this program. If not, see <http://www.gnu.org/licenses/>. 15323788f4SGreg Roach */ 16323788f4SGreg Roachnamespace Fisharebest\Webtrees\SurnameTradition; 17323788f4SGreg Roach 18323788f4SGreg Roach/** 19323788f4SGreg Roach * Children take their father’s surname. 20323788f4SGreg Roach */ 21*c1010edaSGreg Roachclass PatrilinealSurnameTradition extends DefaultSurnameTradition implements SurnameTraditionInterface 22*c1010edaSGreg Roach{ 23323788f4SGreg Roach /** 24323788f4SGreg Roach * What names are given to a new child 25323788f4SGreg Roach * 26323788f4SGreg Roach * @param string $father_name A GEDCOM NAME 27323788f4SGreg Roach * @param string $mother_name A GEDCOM NAME 28323788f4SGreg Roach * @param string $child_sex M, F or U 29323788f4SGreg Roach * 30323788f4SGreg Roach * @return string[] Associative array of GEDCOM name parts (SURN, _MARNM, etc.) 31323788f4SGreg Roach */ 32*c1010edaSGreg Roach public function newChildNames($father_name, $mother_name, $child_sex) 33*c1010edaSGreg Roach { 34323788f4SGreg Roach if (preg_match(self::REGEX_SPFX_SURN, $father_name, $match)) { 3513abd6f3SGreg Roach return array_filter([ 36323788f4SGreg Roach 'NAME' => $match['NAME'], 37323788f4SGreg Roach 'SPFX' => $match['SPFX'], 38323788f4SGreg Roach 'SURN' => $match['SURN'], 3913abd6f3SGreg Roach ]); 40323788f4SGreg Roach } else { 4113abd6f3SGreg Roach return [ 42323788f4SGreg Roach 'NAME' => '//', 4313abd6f3SGreg Roach ]; 44323788f4SGreg Roach } 45323788f4SGreg Roach } 46323788f4SGreg Roach 47323788f4SGreg Roach /** 48323788f4SGreg Roach * What names are given to a new parent 49323788f4SGreg Roach * 50323788f4SGreg Roach * @param string $child_name A GEDCOM NAME 51323788f4SGreg Roach * @param string $parent_sex M, F or U 52323788f4SGreg Roach * 53323788f4SGreg Roach * @return string[] Associative array of GEDCOM name parts (SURN, _MARNM, etc.) 54323788f4SGreg Roach */ 55*c1010edaSGreg Roach public function newParentNames($child_name, $parent_sex) 56*c1010edaSGreg Roach { 57323788f4SGreg Roach if ($parent_sex === 'M' && preg_match(self::REGEX_SPFX_SURN, $child_name, $match)) { 5813abd6f3SGreg Roach return array_filter([ 59323788f4SGreg Roach 'NAME' => $match['NAME'], 60323788f4SGreg Roach 'SPFX' => $match['SPFX'], 61323788f4SGreg Roach 'SURN' => $match['SURN'], 6213abd6f3SGreg Roach ]); 63323788f4SGreg Roach } else { 6413abd6f3SGreg Roach return [ 65323788f4SGreg Roach 'NAME' => '//', 6613abd6f3SGreg Roach ]; 67323788f4SGreg Roach } 68323788f4SGreg Roach } 69323788f4SGreg Roach 70323788f4SGreg Roach /** 71323788f4SGreg Roach * @param string $name A name 72323788f4SGreg Roach * @param string[] $inflections A list of inflections 73323788f4SGreg Roach * 74323788f4SGreg Roach * @return string An inflected name 75323788f4SGreg Roach */ 76*c1010edaSGreg Roach protected function inflect($name, $inflections) 77*c1010edaSGreg Roach { 78323788f4SGreg Roach foreach ($inflections as $from => $to) { 79323788f4SGreg Roach $name = preg_replace('~' . $from . '~u', $to, $name); 80323788f4SGreg Roach } 81323788f4SGreg Roach 82323788f4SGreg Roach return $name; 83323788f4SGreg Roach } 84323788f4SGreg Roach} 85