<?php
/**
 * UTF8::str_pad
 * @param $str
 * @param $final_str_length
 * @param string $pad_str
 * @param int $pad_type
 * @return mixed|string
 * @throws ValueError| UTF8_Exception
 * @package    KO7
 *
 * @copyright  (c) 2007-2016  Kohana Team
 * @copyright  (c) since 2016 Koseven Team
 * @copyright  (c) 2005 Harry Fuecks
 * @license    http://www.gnu.org/licenses/old-licenses/lgpl-2.1.txt
 *
 */
function _str_pad($str, $final_str_length, $pad_str = ' ', $pad_type = STR_PAD_RIGHT)
{
	//(PHP 8 >= PHP 8.3.0)
	// mb_str_pad — Pad a multibyte string to a certain length with another multibyte string
	if ( version_compare(PHP_VERSION, '8.3.0', '>=') ) {
		try {
			$res = mb_str_pad($str, $final_str_length, $pad_str, $pad_type);
			return $res;
		} catch  (Exception $e) {
			throw new UTF8_Exception(
				"UTF8::str_pad: Unknown padding type (:pad_type)",
				[':pad_type' => $pad_type]);
		}
	} else {
		if (UTF8::is_ascii($str) and UTF8::is_ascii($pad_str))
			return str_pad($str, $final_str_length, $pad_str, $pad_type);

		$str_length = UTF8::strlen($str);

		if ($final_str_length <= 0 or $final_str_length <= $str_length)
			return $str;

		$pad_str_length = UTF8::strlen($pad_str);
		$pad_length = $final_str_length - $str_length;

		if ($pad_type == STR_PAD_RIGHT) {
			$repeat = ceil($pad_length / $pad_str_length);
			return UTF8::substr($str . str_repeat($pad_str, $repeat), 0, $final_str_length);
		}

		if ($pad_type == STR_PAD_LEFT) {
			$repeat = ceil($pad_length / $pad_str_length);
			return UTF8::substr(str_repeat($pad_str, $repeat), 0, floor($pad_length)) . $str;
		}

		if ($pad_type == STR_PAD_BOTH) {
			$pad_length /= 2;
			$pad_length_left = floor($pad_length);
			$pad_length_right = ceil($pad_length);
			$repeat_left = ceil($pad_length_left / $pad_str_length);
			$repeat_right = ceil($pad_length_right / $pad_str_length);

			$pad_left = UTF8::substr(str_repeat($pad_str, $repeat_left), 0, $pad_length_left);
			$pad_right = UTF8::substr(str_repeat($pad_str, $repeat_right), 0, $pad_length_right);
			return $pad_left . $str . $pad_right;
		}

		throw new UTF8_Exception("UTF8::str_pad: Unknown padding type (:pad_type)", [
			':pad_type' => $pad_type,
		]);
	}
}