<?php

/**
 * CodeIgniter
 *
 * An open source application development framework for PHP
 *
 * This content is released under the MIT License (MIT)
 *
 * Copyright (c) 2014 - 2016, British Columbia Institute of Technology
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to deal
 * in the Software without restriction, including without limitation the rights
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 * copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 * THE SOFTWARE.
 *
 * @package    CodeIgniter
 * @author     CodeIgniter Dev Team
 * @copyright  Copyright (c) 2014 - 2016, British Columbia Institute of Technology (http://bcit.ca/)
 * @license    http://opensource.org/licenses/MIT    MIT License
 * @link       http://codeigniter.com
 * @since      Version 3.0.0
 * @filesource
 */

// --------------------------------------------------------------------

/**
 * CodeIgniter Inflector Helpers
 *
 * @package		CodeIgniter
 * @subpackage	Helpers
 * @category	Helpers
 * @author		CodeIgniter Dev Team
 * @link		http://codeigniter.com/user_guide/helpers/inflector_helper.html
 */

if ( ! function_exists('singular'))
{

	/**
	 * Singular
	 *
	 * Takes a plural word and makes it singular
	 *
	 * @param	string	$string	Input string
	 * @return	string
	 */
	function singular(string $string): string
	{
		$result = strval($string);

		if ( ! is_countable($result))
		{
			return $result;
		}

		//Arranged in order.
		$singularRules = 
		[
			'/(matr)ices$/'		    => '\1ix',
			'/(vert|ind)ices$/'	    => '\1ex',
			'/^(ox)en/'		        => '\1',
			'/(alias)es$/'		    => '\1',
			'/([octop|vir])i$/'	    => '\1us',
			'/(cris|ax|test)es$/'	=> '\1is',
			'/(shoe)s$/'		    => '\1',
			'/(o)es$/'		        => '\1',
			'/(bus|campus)es$/'	    => '\1',
			'/([m|l])ice$/'		    => '\1ouse',
			'/(x|ch|ss|sh)es$/'	    => '\1',
			'/(m)ovies$/'		    => '\1\2ovie',
			'/(s)eries$/'		    => '\1\2eries',
			'/([^aeiouy]|qu)ies$/'	=> '\1y',
			'/([lr])ves$/'		    => '\1f',
			'/(tive)s$/'		    => '\1',
			'/(hive)s$/'		    => '\1',
			'/([^f])ves$/'		    => '\1fe',
			'/(^analy)ses$/'	    => '\1sis',
			'/((a)naly|(b)a|(d)iagno|(p)arenthe|(p)rogno|(s)ynop|(t)he)ses$/' => '\1\2sis',
			'/([ti])a$/'		    => '\1um',
			'/(p)eople$/'		    => '\1\2erson',
			'/(m)en$/'		        => '\1an',
			'/(s)tatuses$/'		    => '\1\2tatus',
			'/(c)hildren$/'		    => '\1\2hild',
			'/(n)ews$/'		        => '\1\2ews',
			'/([^us])s$/'		    => '\1'
		];

		foreach ($singularRules as $rule => $replacement)
		{
			if (preg_match($rule, $result))
			{
				$result = preg_replace($rule, $replacement, $result);
				break;
			}
		}

		return $result;
	}

}

//--------------------------------------------------------------------

if ( ! function_exists('plural'))
{

	/**
	 * Plural
	 *
	 * Takes a singular word and makes it plural
	 *
	 * @param	string	$string	Input string
	 * @return	string
	 */
	function plural(string $string): string
	{
		$result = strval($string);

		if ( ! is_countable($result))
		{
			return $result;
		}

		$pluralRules = 
		[
			'/^(ox)$/'                 => '\1\2en',     // ox
			'/([m|l])ouse$/'           => '\1ice',      // mouse, louse
			'/(matr|vert|ind)ix|ex$/'  => '\1ices',     // matrix, vertex, index
			'/(x|ch|ss|sh)$/'          => '\1es',       // search, switch, fix, box, process, address
			'/([^aeiouy]|qu)y$/'       => '\1ies',      // query, ability, agency
			'/(hive)$/'                => '\1s',        // archive, hive
			'/(?:([^f])fe|([lr])f)$/'  => '\1\2ves',    // half, safe, wife
			'/sis$/'                   => 'ses',        // basis, diagnosis
			'/([ti])um$/'              => '\1a',        // datum, medium
			'/(p)erson$/'              => '\1eople',    // person, salesperson
			'/(m)an$/'                 => '\1en',       // man, woman, spokesman
			'/(c)hild$/'               => '\1hildren',  // child
			'/(buffal|tomat)o$/'       => '\1\2oes',    // buffalo, tomato
			'/(bu|campu)s$/'           => '\1\2ses',    // bus, campus
			'/(alias|status|virus)$/'  => '\1es',       // alias
			'/(octop)us$/'             => '\1i',        // octopus
			'/(ax|cris|test)is$/'      => '\1es',       // axis, crisis
			'/s$/'                     => 's',          // no change (compatibility)
			'/$/'                      => 's',
		];

		foreach ($pluralRules as $rule => $replacement)
		{
			if (preg_match($rule, $result))
			{
				$result = preg_replace($rule, $replacement, $result);
				break;
			}
		}

		return $result;
	}

}

//--------------------------------------------------------------------

if ( ! function_exists('camelize'))
{

	/**
	 * Camelize
	 *
	 * Takes multiple words separated by spaces or 
	 * underscores and camelizes them
	 *
	 * @param	string	$string	Input string
	 * @return	string
	 */
	function camelize(string $string): string
	{
		return ucwords(preg_replace('/[\s_]+/', ' ', $string));
	}

}
//--------------------------------------------------------------------

if ( ! function_exists('underscore'))
{

	/**
	 * Underscore
	 *
	 * Takes multiple words separated by spaces and underscores them
	 *
	 * @param	string	$string	Input string
	 * @return	string
	 */
	function underscore(string $string): string
	{
		$replacement = trim($string);
		
		return preg_replace('/[\s]+/', '_', $replacement);
	}

}

//--------------------------------------------------------------------

if ( ! function_exists('humanize'))
{
	
	/**
	 * Humanize
	 *
	 * Takes multiple words separated by the separator, 
	 * camelizes and changes them to spaces
	 *
	 * @param	string	$string		Input string
	 * @param 	string	$separator	Input separator
	 * @return	string
	 */
	function humanize(string $string, string $separator = '_'): string
	{
		$replacement = trim($string);
		$upperCased  = ucwords
		(
			preg_replace('/['.$separator.']+/', ' ', $replacement)
		);
		
		return $upperCased;
	}

}

// ------------------------------------------------------------------------

if ( ! function_exists('is_countable'))
{
	
	/**
	 * Checks if the given word has a plural version.
	 *
	 * @param	string	$word	Word to check
	 * @return	bool
	 */
	function is_countable($word): bool
	{
		$uncountables = in_array
		(
			strtolower($word),
			[
				'advice',
				'bravery',
				'butter',
				'clarity',
				'coal',
				'courage',
				'cowardice',
				'curiosity',
				'education',
				'equipment', 
				'evidence',
				'fish', 
				'fun',
				'furniture',
				'help',
				'homework',
				'honesty',
				'information', 
				'insurance',
				'jewelry',
				'knowledge',
				'livestock',
				'love',
				'luck',
				'marketing',
				'meta',
				'money',
				'mud',
				'news',
				'rice', 
				'satisfaction',
				'scenery',
				'series', 
				'silence',
				'species', 
				'spelling',
				'sugar',
				'water',
				'weather',
				'wisdom',
				'work'
			]
		);
		
		return !$uncountables;
	}

}

// ------------------------------------------------------------------------

if ( ! function_exists('dasherize'))
{
	
	/**
	 * Replaces underscores with dashes in the string.
	 *
	 * @param	string	$string	Input string
	 * @return	string
	 */
	function dasherize(string $string): string
	{
		return str_replace('_', '-', $string);
	}

}

// ------------------------------------------------------------------------

if ( ! function_exists('ordinal'))
{
	
	/**
	 * Returns the suffix that should be added to a 
	 * number to denote the position in an ordered 
	 * sequence such as 1st, 2nd, 3rd, 4th.
	 *
	 * @param	int	$integer	The integer to determine
	 * the suffix
	 * @return	string
	 */
	function ordinal(int $integer): string
	{
		$suffixes = 
		[
			'th',
			'st',
			'nd',
			'rd',
			'th',
			'th',
			'th',
			'th',
			'th',
			'th'
		];

    	return $integer % 100 >= 11 && $integer % 100 <= 13 
    		? 'th'
    		: $suffixes[$integer % 10];
	}

}

// ------------------------------------------------------------------------

if ( ! function_exists('ordinalize'))
{
	
	/**
	 * Turns a number into an ordinal string used 
	 * to denote the position in an ordered sequence 
	 * such as 1st, 2nd, 3rd, 4th.
	 *
	 * @param	int	$integer	The integer to ordinalize
	 * @return	string
	 */
	function ordinalize(int $integer): string
	{
		return $integer . ordinal($integer);
	}

}