508 lines
		
	
	
	
		
			15 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
			
		
		
	
	
			508 lines
		
	
	
	
		
			15 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
| <?php
 | |
| 
 | |
| /*
 | |
|  * This file is part of the Symfony package.
 | |
|  *
 | |
|  * (c) Fabien Potencier <fabien@symfony.com>
 | |
|  *
 | |
|  * For the full copyright and license information, please view the LICENSE
 | |
|  * file that was distributed with this source code.
 | |
|  */
 | |
| 
 | |
| namespace Symfony\Component\String\Inflector;
 | |
| 
 | |
| final class EnglishInflector implements InflectorInterface
 | |
| {
 | |
|     /**
 | |
|      * Map English plural to singular suffixes.
 | |
|      *
 | |
|      * @see http://english-zone.com/spelling/plurals.html
 | |
|      */
 | |
|     private const PLURAL_MAP = [
 | |
|         // First entry: plural suffix, reversed
 | |
|         // Second entry: length of plural suffix
 | |
|         // Third entry: Whether the suffix may succeed a vocal
 | |
|         // Fourth entry: Whether the suffix may succeed a consonant
 | |
|         // Fifth entry: singular suffix, normal
 | |
| 
 | |
|         // bacteria (bacterium), criteria (criterion), phenomena (phenomenon)
 | |
|         ['a', 1, true, true, ['on', 'um']],
 | |
| 
 | |
|         // nebulae (nebula)
 | |
|         ['ea', 2, true, true, 'a'],
 | |
| 
 | |
|         // services (service)
 | |
|         ['secivres', 8, true, true, 'service'],
 | |
| 
 | |
|         // mice (mouse), lice (louse)
 | |
|         ['eci', 3, false, true, 'ouse'],
 | |
| 
 | |
|         // geese (goose)
 | |
|         ['esee', 4, false, true, 'oose'],
 | |
| 
 | |
|         // fungi (fungus), alumni (alumnus), syllabi (syllabus), radii (radius)
 | |
|         ['i', 1, true, true, 'us'],
 | |
| 
 | |
|         // men (man), women (woman)
 | |
|         ['nem', 3, true, true, 'man'],
 | |
| 
 | |
|         // children (child)
 | |
|         ['nerdlihc', 8, true, true, 'child'],
 | |
| 
 | |
|         // oxen (ox)
 | |
|         ['nexo', 4, false, false, 'ox'],
 | |
| 
 | |
|         // indices (index), appendices (appendix), prices (price)
 | |
|         ['seci', 4, false, true, ['ex', 'ix', 'ice']],
 | |
| 
 | |
|         // selfies (selfie)
 | |
|         ['seifles', 7, true, true, 'selfie'],
 | |
| 
 | |
|         // movies (movie)
 | |
|         ['seivom', 6, true, true, 'movie'],
 | |
| 
 | |
|         // conspectuses (conspectus), prospectuses (prospectus)
 | |
|         ['sesutcep', 8, true, true, 'pectus'],
 | |
| 
 | |
|         // feet (foot)
 | |
|         ['teef', 4, true, true, 'foot'],
 | |
| 
 | |
|         // geese (goose)
 | |
|         ['eseeg', 5, true, true, 'goose'],
 | |
| 
 | |
|         // teeth (tooth)
 | |
|         ['hteet', 5, true, true, 'tooth'],
 | |
| 
 | |
|         // news (news)
 | |
|         ['swen', 4, true, true, 'news'],
 | |
| 
 | |
|         // series (series)
 | |
|         ['seires', 6, true, true, 'series'],
 | |
| 
 | |
|         // babies (baby)
 | |
|         ['sei', 3, false, true, 'y'],
 | |
| 
 | |
|         // accesses (access), addresses (address), kisses (kiss)
 | |
|         ['sess', 4, true, false, 'ss'],
 | |
| 
 | |
|         // analyses (analysis), ellipses (ellipsis), fungi (fungus),
 | |
|         // neuroses (neurosis), theses (thesis), emphases (emphasis),
 | |
|         // oases (oasis), crises (crisis), houses (house), bases (base),
 | |
|         // atlases (atlas)
 | |
|         ['ses', 3, true, true, ['s', 'se', 'sis']],
 | |
| 
 | |
|         // objectives (objective), alternative (alternatives)
 | |
|         ['sevit', 5, true, true, 'tive'],
 | |
| 
 | |
|         // drives (drive)
 | |
|         ['sevird', 6, false, true, 'drive'],
 | |
| 
 | |
|         // lives (life), wives (wife)
 | |
|         ['sevi', 4, false, true, 'ife'],
 | |
| 
 | |
|         // moves (move)
 | |
|         ['sevom', 5, true, true, 'move'],
 | |
| 
 | |
|         // hooves (hoof), dwarves (dwarf), elves (elf), leaves (leaf), caves (cave), staves (staff)
 | |
|         ['sev', 3, true, true, ['f', 've', 'ff']],
 | |
| 
 | |
|         // axes (axis), axes (ax), axes (axe)
 | |
|         ['sexa', 4, false, false, ['ax', 'axe', 'axis']],
 | |
| 
 | |
|         // indexes (index), matrixes (matrix)
 | |
|         ['sex', 3, true, false, 'x'],
 | |
| 
 | |
|         // quizzes (quiz)
 | |
|         ['sezz', 4, true, false, 'z'],
 | |
| 
 | |
|         // bureaus (bureau)
 | |
|         ['suae', 4, false, true, 'eau'],
 | |
| 
 | |
|         // fees (fee), trees (tree), employees (employee)
 | |
|         ['see', 3, true, true, 'ee'],
 | |
| 
 | |
|         // edges (edge)
 | |
|         ['segd', 4, true, true, 'dge'],
 | |
| 
 | |
|         // roses (rose), garages (garage), cassettes (cassette),
 | |
|         // waltzes (waltz), heroes (hero), bushes (bush), arches (arch),
 | |
|         // shoes (shoe)
 | |
|         ['se', 2, true, true, ['', 'e']],
 | |
| 
 | |
|         // tags (tag)
 | |
|         ['s', 1, true, true, ''],
 | |
| 
 | |
|         // chateaux (chateau)
 | |
|         ['xuae', 4, false, true, 'eau'],
 | |
| 
 | |
|         // people (person)
 | |
|         ['elpoep', 6, true, true, 'person'],
 | |
|     ];
 | |
| 
 | |
|     /**
 | |
|      * Map English singular to plural suffixes.
 | |
|      *
 | |
|      * @see http://english-zone.com/spelling/plurals.html
 | |
|      */
 | |
|     private const SINGULAR_MAP = [
 | |
|         // First entry: singular suffix, reversed
 | |
|         // Second entry: length of singular suffix
 | |
|         // Third entry: Whether the suffix may succeed a vocal
 | |
|         // Fourth entry: Whether the suffix may succeed a consonant
 | |
|         // Fifth entry: plural suffix, normal
 | |
| 
 | |
|         // criterion (criteria)
 | |
|         ['airetirc', 8, false, false, 'criterion'],
 | |
| 
 | |
|         // nebulae (nebula)
 | |
|         ['aluben', 6, false, false, 'nebulae'],
 | |
| 
 | |
|         // children (child)
 | |
|         ['dlihc', 5, true, true, 'children'],
 | |
| 
 | |
|         // prices (price)
 | |
|         ['eci', 3, false, true, 'ices'],
 | |
| 
 | |
|         // services (service)
 | |
|         ['ecivres', 7, true, true, 'services'],
 | |
| 
 | |
|         // lives (life), wives (wife)
 | |
|         ['efi', 3, false, true, 'ives'],
 | |
| 
 | |
|         // selfies (selfie)
 | |
|         ['eifles', 6, true, true, 'selfies'],
 | |
| 
 | |
|         // movies (movie)
 | |
|         ['eivom', 5, true, true, 'movies'],
 | |
| 
 | |
|         // lice (louse)
 | |
|         ['esuol', 5, false, true, 'lice'],
 | |
| 
 | |
|         // mice (mouse)
 | |
|         ['esuom', 5, false, true, 'mice'],
 | |
| 
 | |
|         // geese (goose)
 | |
|         ['esoo', 4, false, true, 'eese'],
 | |
| 
 | |
|         // houses (house), bases (base)
 | |
|         ['es', 2, true, true, 'ses'],
 | |
| 
 | |
|         // geese (goose)
 | |
|         ['esoog', 5, true, true, 'geese'],
 | |
| 
 | |
|         // caves (cave)
 | |
|         ['ev', 2, true, true, 'ves'],
 | |
| 
 | |
|         // drives (drive)
 | |
|         ['evird', 5, false, true, 'drives'],
 | |
| 
 | |
|         // objectives (objective), alternative (alternatives)
 | |
|         ['evit', 4, true, true, 'tives'],
 | |
| 
 | |
|         // moves (move)
 | |
|         ['evom', 4, true, true, 'moves'],
 | |
| 
 | |
|         // staves (staff)
 | |
|         ['ffats', 5, true, true, 'staves'],
 | |
| 
 | |
|         // hooves (hoof), dwarves (dwarf), elves (elf), leaves (leaf)
 | |
|         ['ff', 2, true, true, 'ffs'],
 | |
| 
 | |
|         // hooves (hoof), dwarves (dwarf), elves (elf), leaves (leaf)
 | |
|         ['f', 1, true, true, ['fs', 'ves']],
 | |
| 
 | |
|         // arches (arch)
 | |
|         ['hc', 2, true, true, 'ches'],
 | |
| 
 | |
|         // bushes (bush)
 | |
|         ['hs', 2, true, true, 'shes'],
 | |
| 
 | |
|         // teeth (tooth)
 | |
|         ['htoot', 5, true, true, 'teeth'],
 | |
| 
 | |
|         // bacteria (bacterium), criteria (criterion), phenomena (phenomenon)
 | |
|         ['mu', 2, true, true, 'a'],
 | |
| 
 | |
|         // men (man), women (woman)
 | |
|         ['nam', 3, true, true, 'men'],
 | |
| 
 | |
|         // people (person)
 | |
|         ['nosrep', 6, true, true, ['persons', 'people']],
 | |
| 
 | |
|         // bacteria (bacterium), criteria (criterion), phenomena (phenomenon)
 | |
|         ['noi', 3, true, true, 'ions'],
 | |
| 
 | |
|         // coupon (coupons)
 | |
|         ['nop', 3, true, true, 'pons'],
 | |
| 
 | |
|         // seasons (season), treasons (treason), poisons (poison), lessons (lesson)
 | |
|         ['nos', 3, true, true, 'sons'],
 | |
| 
 | |
|         // bacteria (bacterium), criteria (criterion), phenomena (phenomenon)
 | |
|         ['no', 2, true, true, 'a'],
 | |
| 
 | |
|         // echoes (echo)
 | |
|         ['ohce', 4, true, true, 'echoes'],
 | |
| 
 | |
|         // heroes (hero)
 | |
|         ['oreh', 4, true, true, 'heroes'],
 | |
| 
 | |
|         // atlases (atlas)
 | |
|         ['salta', 5, true, true, 'atlases'],
 | |
| 
 | |
|         // irises (iris)
 | |
|         ['siri', 4, true, true, 'irises'],
 | |
| 
 | |
|         // analyses (analysis), ellipses (ellipsis), neuroses (neurosis)
 | |
|         // theses (thesis), emphases (emphasis), oases (oasis),
 | |
|         // crises (crisis)
 | |
|         ['sis', 3, true, true, 'ses'],
 | |
| 
 | |
|         // accesses (access), addresses (address), kisses (kiss)
 | |
|         ['ss', 2, true, false, 'sses'],
 | |
| 
 | |
|         // syllabi (syllabus)
 | |
|         ['suballys', 8, true, true, 'syllabi'],
 | |
| 
 | |
|         // buses (bus)
 | |
|         ['sub', 3, true, true, 'buses'],
 | |
| 
 | |
|         // circuses (circus)
 | |
|         ['suc', 3, true, true, 'cuses'],
 | |
| 
 | |
|         // conspectuses (conspectus), prospectuses (prospectus)
 | |
|         ['sutcep', 6, true, true, 'pectuses'],
 | |
| 
 | |
|         // fungi (fungus), alumni (alumnus), syllabi (syllabus), radii (radius)
 | |
|         ['su', 2, true, true, 'i'],
 | |
| 
 | |
|         // news (news)
 | |
|         ['swen', 4, true, true, 'news'],
 | |
| 
 | |
|         // feet (foot)
 | |
|         ['toof', 4, true, true, 'feet'],
 | |
| 
 | |
|         // chateaux (chateau), bureaus (bureau)
 | |
|         ['uae', 3, false, true, ['eaus', 'eaux']],
 | |
| 
 | |
|         // oxen (ox)
 | |
|         ['xo', 2, false, false, 'oxen'],
 | |
| 
 | |
|         // hoaxes (hoax)
 | |
|         ['xaoh', 4, true, false, 'hoaxes'],
 | |
| 
 | |
|         // indices (index)
 | |
|         ['xedni', 5, false, true, ['indicies', 'indexes']],
 | |
| 
 | |
|         // boxes (box)
 | |
|         ['xo', 2, false, true, 'oxes'],
 | |
| 
 | |
|         // indexes (index), matrixes (matrix)
 | |
|         ['x', 1, true, false, ['cies', 'xes']],
 | |
| 
 | |
|         // appendices (appendix)
 | |
|         ['xi', 2, false, true, 'ices'],
 | |
| 
 | |
|         // babies (baby)
 | |
|         ['y', 1, false, true, 'ies'],
 | |
| 
 | |
|         // quizzes (quiz)
 | |
|         ['ziuq', 4, true, false, 'quizzes'],
 | |
| 
 | |
|         // waltzes (waltz)
 | |
|         ['z', 1, true, true, 'zes'],
 | |
|     ];
 | |
| 
 | |
|     /**
 | |
|      * A list of words which should not be inflected, reversed.
 | |
|      */
 | |
|     private const UNINFLECTED = [
 | |
|         '',
 | |
| 
 | |
|         // data
 | |
|         'atad',
 | |
| 
 | |
|         // deer
 | |
|         'reed',
 | |
| 
 | |
|         // feedback
 | |
|         'kcabdeef',
 | |
| 
 | |
|         // fish
 | |
|         'hsif',
 | |
| 
 | |
|         // info
 | |
|         'ofni',
 | |
| 
 | |
|         // moose
 | |
|         'esoom',
 | |
| 
 | |
|         // series
 | |
|         'seires',
 | |
| 
 | |
|         // sheep
 | |
|         'peehs',
 | |
| 
 | |
|         // species
 | |
|         'seiceps',
 | |
|     ];
 | |
| 
 | |
|     /**
 | |
|      * {@inheritdoc}
 | |
|      */
 | |
|     public function singularize(string $plural): array
 | |
|     {
 | |
|         $pluralRev = strrev($plural);
 | |
|         $lowerPluralRev = strtolower($pluralRev);
 | |
|         $pluralLength = \strlen($lowerPluralRev);
 | |
| 
 | |
|         // Check if the word is one which is not inflected, return early if so
 | |
|         if (\in_array($lowerPluralRev, self::UNINFLECTED, true)) {
 | |
|             return [$plural];
 | |
|         }
 | |
| 
 | |
|         // The outer loop iterates over the entries of the plural table
 | |
|         // The inner loop $j iterates over the characters of the plural suffix
 | |
|         // in the plural table to compare them with the characters of the actual
 | |
|         // given plural suffix
 | |
|         foreach (self::PLURAL_MAP as $map) {
 | |
|             $suffix = $map[0];
 | |
|             $suffixLength = $map[1];
 | |
|             $j = 0;
 | |
| 
 | |
|             // Compare characters in the plural table and of the suffix of the
 | |
|             // given plural one by one
 | |
|             while ($suffix[$j] === $lowerPluralRev[$j]) {
 | |
|                 // Let $j point to the next character
 | |
|                 ++$j;
 | |
| 
 | |
|                 // Successfully compared the last character
 | |
|                 // Add an entry with the singular suffix to the singular array
 | |
|                 if ($j === $suffixLength) {
 | |
|                     // Is there any character preceding the suffix in the plural string?
 | |
|                     if ($j < $pluralLength) {
 | |
|                         $nextIsVocal = false !== strpos('aeiou', $lowerPluralRev[$j]);
 | |
| 
 | |
|                         if (!$map[2] && $nextIsVocal) {
 | |
|                             // suffix may not succeed a vocal but next char is one
 | |
|                             break;
 | |
|                         }
 | |
| 
 | |
|                         if (!$map[3] && !$nextIsVocal) {
 | |
|                             // suffix may not succeed a consonant but next char is one
 | |
|                             break;
 | |
|                         }
 | |
|                     }
 | |
| 
 | |
|                     $newBase = substr($plural, 0, $pluralLength - $suffixLength);
 | |
|                     $newSuffix = $map[4];
 | |
| 
 | |
|                     // Check whether the first character in the plural suffix
 | |
|                     // is uppercased. If yes, uppercase the first character in
 | |
|                     // the singular suffix too
 | |
|                     $firstUpper = ctype_upper($pluralRev[$j - 1]);
 | |
| 
 | |
|                     if (\is_array($newSuffix)) {
 | |
|                         $singulars = [];
 | |
| 
 | |
|                         foreach ($newSuffix as $newSuffixEntry) {
 | |
|                             $singulars[] = $newBase.($firstUpper ? ucfirst($newSuffixEntry) : $newSuffixEntry);
 | |
|                         }
 | |
| 
 | |
|                         return $singulars;
 | |
|                     }
 | |
| 
 | |
|                     return [$newBase.($firstUpper ? ucfirst($newSuffix) : $newSuffix)];
 | |
|                 }
 | |
| 
 | |
|                 // Suffix is longer than word
 | |
|                 if ($j === $pluralLength) {
 | |
|                     break;
 | |
|                 }
 | |
|             }
 | |
|         }
 | |
| 
 | |
|         // Assume that plural and singular is identical
 | |
|         return [$plural];
 | |
|     }
 | |
| 
 | |
|     /**
 | |
|      * {@inheritdoc}
 | |
|      */
 | |
|     public function pluralize(string $singular): array
 | |
|     {
 | |
|         $singularRev = strrev($singular);
 | |
|         $lowerSingularRev = strtolower($singularRev);
 | |
|         $singularLength = \strlen($lowerSingularRev);
 | |
| 
 | |
|         // Check if the word is one which is not inflected, return early if so
 | |
|         if (\in_array($lowerSingularRev, self::UNINFLECTED, true)) {
 | |
|             return [$singular];
 | |
|         }
 | |
| 
 | |
|         // The outer loop iterates over the entries of the singular table
 | |
|         // The inner loop $j iterates over the characters of the singular suffix
 | |
|         // in the singular table to compare them with the characters of the actual
 | |
|         // given singular suffix
 | |
|         foreach (self::SINGULAR_MAP as $map) {
 | |
|             $suffix = $map[0];
 | |
|             $suffixLength = $map[1];
 | |
|             $j = 0;
 | |
| 
 | |
|             // Compare characters in the singular table and of the suffix of the
 | |
|             // given plural one by one
 | |
| 
 | |
|             while ($suffix[$j] === $lowerSingularRev[$j]) {
 | |
|                 // Let $j point to the next character
 | |
|                 ++$j;
 | |
| 
 | |
|                 // Successfully compared the last character
 | |
|                 // Add an entry with the plural suffix to the plural array
 | |
|                 if ($j === $suffixLength) {
 | |
|                     // Is there any character preceding the suffix in the plural string?
 | |
|                     if ($j < $singularLength) {
 | |
|                         $nextIsVocal = false !== strpos('aeiou', $lowerSingularRev[$j]);
 | |
| 
 | |
|                         if (!$map[2] && $nextIsVocal) {
 | |
|                             // suffix may not succeed a vocal but next char is one
 | |
|                             break;
 | |
|                         }
 | |
| 
 | |
|                         if (!$map[3] && !$nextIsVocal) {
 | |
|                             // suffix may not succeed a consonant but next char is one
 | |
|                             break;
 | |
|                         }
 | |
|                     }
 | |
| 
 | |
|                     $newBase = substr($singular, 0, $singularLength - $suffixLength);
 | |
|                     $newSuffix = $map[4];
 | |
| 
 | |
|                     // Check whether the first character in the singular suffix
 | |
|                     // is uppercased. If yes, uppercase the first character in
 | |
|                     // the singular suffix too
 | |
|                     $firstUpper = ctype_upper($singularRev[$j - 1]);
 | |
| 
 | |
|                     if (\is_array($newSuffix)) {
 | |
|                         $plurals = [];
 | |
| 
 | |
|                         foreach ($newSuffix as $newSuffixEntry) {
 | |
|                             $plurals[] = $newBase.($firstUpper ? ucfirst($newSuffixEntry) : $newSuffixEntry);
 | |
|                         }
 | |
| 
 | |
|                         return $plurals;
 | |
|                     }
 | |
| 
 | |
|                     return [$newBase.($firstUpper ? ucfirst($newSuffix) : $newSuffix)];
 | |
|                 }
 | |
| 
 | |
|                 // Suffix is longer than word
 | |
|                 if ($j === $singularLength) {
 | |
|                     break;
 | |
|                 }
 | |
|             }
 | |
|         }
 | |
| 
 | |
|         // Assume that plural is singular with a trailing `s`
 | |
|         return [$singular.'s'];
 | |
|     }
 | |
| }
 |