wiki.techinc.nl/languages/classes/LanguageEn.php
C. Scott Ananian 2e7018e22c LanguageConverter tweaks to Pig Latin converter
Add apostrophe to the set of valid word characters for the en-x-piglatin
converter, so that "don't" and "can't" are properly converted to Pig
Latin (eg, to "on'tday" and "an'tcay").

Add an optional `s` before `qu` so that "squish" is properly converted
to "ishsquay".

Change-Id: Ibc5cf2c007a42d9447688b857aa75f9a3d8ae152
2018-04-01 23:50:58 -04:00

87 lines
2.6 KiB
PHP

<?php
/**
* English specific code.
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License along
* with this program; if not, write to the Free Software Foundation, Inc.,
* 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
* http://www.gnu.org/copyleft/gpl.html
*
* @file
*/
/**
* @ingroup Language
*/
class EnConverter extends LanguageConverter {
/**
* Dummy methods required by base class.
*/
function loadDefaultTables() {
$this->mTables = [
'en' => new ReplacementArray(),
'en-x-piglatin' => new ReplacementArray(),
];
}
/**
* Translates text into Pig Latin. This allows developers to test the language variants
* functionality and user interface without having to switch wiki language away from default.
*
* @param string $text
* @param string $toVariant
* @return string
*/
function translate( $text, $toVariant ) {
if ( $toVariant === 'en-x-piglatin' ) {
// Only process words composed of standard English alphabet, leave the rest unchanged.
// This skips some English words like 'naïve' or 'résumé', but we can live with that.
// Ignore single letters and words which aren't lowercase or uppercase-first.
return preg_replace_callback( '/[A-Za-z][a-z\']+/', function ( $matches ) {
$word = $matches[0];
if ( preg_match( '/^[aeiou]/i', $word ) ) {
return $word . 'way';
} else {
return preg_replace_callback( '/^(s?qu|[^aeiou][^aeiouy]*)(.*)$/i', function ( $m ) {
$ucfirst = strtoupper( $m[1][0] ) === $m[1][0];
if ( $ucfirst ) {
return ucfirst( $m[2] ) . lcfirst( $m[1] ) . 'ay';
} else {
return $m[2] . $m[1] . 'ay';
}
}, $word );
}
}, $text );
} else {
return $text;
}
}
}
/**
* English
*
* @ingroup Language
*/
class LanguageEn extends Language {
function __construct() {
global $wgUsePigLatinVariant, $wgHooks;
parent::__construct();
if ( $wgUsePigLatinVariant ) {
$this->mConverter = new EnConverter( $this, 'en', [ 'en', 'en-x-piglatin' ] );
$wgHooks['PageContentSaveComplete'][] = $this->mConverter;
}
}
}