oont-contents/plugins/mailpoet/vendor-prefixed/symfony/polyfill-iconv/Iconv.php
2025-02-08 15:10:23 +01:00

506 lines
16 KiB
PHP

<?php
namespace MailPoetVendor\Symfony\Polyfill\Iconv;
if (!defined('ABSPATH')) exit;
final class Iconv
{
public const ERROR_ILLEGAL_CHARACTER = 'iconv(): Detected an illegal character in input string';
public const ERROR_WRONG_CHARSET = 'iconv(): Wrong charset, conversion from `%s\' to `%s\' is not allowed';
public static $inputEncoding = 'utf-8';
public static $outputEncoding = 'utf-8';
public static $internalEncoding = 'utf-8';
private static $alias = ['utf8' => 'utf-8', 'ascii' => 'us-ascii', 'tis-620' => 'iso-8859-11', 'cp1250' => 'windows-1250', 'cp1251' => 'windows-1251', 'cp1252' => 'windows-1252', 'cp1253' => 'windows-1253', 'cp1254' => 'windows-1254', 'cp1255' => 'windows-1255', 'cp1256' => 'windows-1256', 'cp1257' => 'windows-1257', 'cp1258' => 'windows-1258', 'shift-jis' => 'cp932', 'shift_jis' => 'cp932', 'latin1' => 'iso-8859-1', 'latin2' => 'iso-8859-2', 'latin3' => 'iso-8859-3', 'latin4' => 'iso-8859-4', 'latin5' => 'iso-8859-9', 'latin6' => 'iso-8859-10', 'latin7' => 'iso-8859-13', 'latin8' => 'iso-8859-14', 'latin9' => 'iso-8859-15', 'latin10' => 'iso-8859-16', 'iso8859-1' => 'iso-8859-1', 'iso8859-2' => 'iso-8859-2', 'iso8859-3' => 'iso-8859-3', 'iso8859-4' => 'iso-8859-4', 'iso8859-5' => 'iso-8859-5', 'iso8859-6' => 'iso-8859-6', 'iso8859-7' => 'iso-8859-7', 'iso8859-8' => 'iso-8859-8', 'iso8859-9' => 'iso-8859-9', 'iso8859-10' => 'iso-8859-10', 'iso8859-11' => 'iso-8859-11', 'iso8859-12' => 'iso-8859-12', 'iso8859-13' => 'iso-8859-13', 'iso8859-14' => 'iso-8859-14', 'iso8859-15' => 'iso-8859-15', 'iso8859-16' => 'iso-8859-16', 'iso_8859-1' => 'iso-8859-1', 'iso_8859-2' => 'iso-8859-2', 'iso_8859-3' => 'iso-8859-3', 'iso_8859-4' => 'iso-8859-4', 'iso_8859-5' => 'iso-8859-5', 'iso_8859-6' => 'iso-8859-6', 'iso_8859-7' => 'iso-8859-7', 'iso_8859-8' => 'iso-8859-8', 'iso_8859-9' => 'iso-8859-9', 'iso_8859-10' => 'iso-8859-10', 'iso_8859-11' => 'iso-8859-11', 'iso_8859-12' => 'iso-8859-12', 'iso_8859-13' => 'iso-8859-13', 'iso_8859-14' => 'iso-8859-14', 'iso_8859-15' => 'iso-8859-15', 'iso_8859-16' => 'iso-8859-16', 'iso88591' => 'iso-8859-1', 'iso88592' => 'iso-8859-2', 'iso88593' => 'iso-8859-3', 'iso88594' => 'iso-8859-4', 'iso88595' => 'iso-8859-5', 'iso88596' => 'iso-8859-6', 'iso88597' => 'iso-8859-7', 'iso88598' => 'iso-8859-8', 'iso88599' => 'iso-8859-9', 'iso885910' => 'iso-8859-10', 'iso885911' => 'iso-8859-11', 'iso885912' => 'iso-8859-12', 'iso885913' => 'iso-8859-13', 'iso885914' => 'iso-8859-14', 'iso885915' => 'iso-8859-15', 'iso885916' => 'iso-8859-16'];
private static $translitMap = [];
private static $convertMap = [];
private static $errorHandler;
private static $lastError;
private static $ulenMask = ["\xc0" => 2, "\xd0" => 2, "\xe0" => 3, "\xf0" => 4];
private static $isValidUtf8;
public static function iconv($inCharset, $outCharset, $str)
{
$str = (string) $str;
if ('' === $str) {
return '';
}
// Prepare for //IGNORE and //TRANSLIT
$translit = $ignore = '';
$outCharset = \strtolower($outCharset);
$inCharset = \strtolower($inCharset);
if ('' === $outCharset) {
$outCharset = 'iso-8859-1';
}
if ('' === $inCharset) {
$inCharset = 'iso-8859-1';
}
do {
$loop = \false;
if ('//translit' === \substr($outCharset, -10)) {
$loop = $translit = \true;
$outCharset = \substr($outCharset, 0, -10);
}
if ('//ignore' === \substr($outCharset, -8)) {
$loop = $ignore = \true;
$outCharset = \substr($outCharset, 0, -8);
}
} while ($loop);
do {
$loop = \false;
if ('//translit' === \substr($inCharset, -10)) {
$loop = \true;
$inCharset = \substr($inCharset, 0, -10);
}
if ('//ignore' === \substr($inCharset, -8)) {
$loop = \true;
$inCharset = \substr($inCharset, 0, -8);
}
} while ($loop);
if (isset(self::$alias[$inCharset])) {
$inCharset = self::$alias[$inCharset];
}
if (isset(self::$alias[$outCharset])) {
$outCharset = self::$alias[$outCharset];
}
// Load charset maps
if ('utf-8' !== $inCharset && !self::loadMap('from.', $inCharset, $inMap) || 'utf-8' !== $outCharset && !self::loadMap('to.', $outCharset, $outMap)) {
\trigger_error(\sprintf(self::ERROR_WRONG_CHARSET, $inCharset, $outCharset));
return \false;
}
if ('utf-8' !== $inCharset) {
// Convert input to UTF-8
$result = '';
if (self::mapToUtf8($result, $inMap, $str, $ignore)) {
$str = $result;
} else {
$str = \false;
}
self::$isValidUtf8 = \true;
} else {
self::$isValidUtf8 = \preg_match('//u', $str);
if (!self::$isValidUtf8 && !$ignore) {
\trigger_error(self::ERROR_ILLEGAL_CHARACTER);
return \false;
}
if ('utf-8' === $outCharset) {
// UTF-8 validation
$str = self::utf8ToUtf8($str, $ignore);
}
}
if ('utf-8' !== $outCharset && \false !== $str) {
// Convert output to UTF-8
$result = '';
if (self::mapFromUtf8($result, $outMap, $str, $ignore, $translit)) {
return $result;
}
return \false;
}
return $str;
}
public static function iconv_mime_decode_headers($str, $mode = 0, $charset = null)
{
if (null === $charset) {
$charset = self::$internalEncoding;
}
if (\false !== \strpos($str, "\r")) {
$str = \strtr(\str_replace("\r\n", "\n", $str), "\r", "\n");
}
$str = \explode("\n\n", $str, 2);
$headers = [];
$str = \preg_split('/\\n(?![ \\t])/', $str[0]);
foreach ($str as $str) {
$str = self::iconv_mime_decode($str, $mode, $charset);
if (\false === $str) {
return \false;
}
$str = \explode(':', $str, 2);
if (2 === \count($str)) {
if (isset($headers[$str[0]])) {
if (!\is_array($headers[$str[0]])) {
$headers[$str[0]] = [$headers[$str[0]]];
}
$headers[$str[0]][] = \ltrim($str[1]);
} else {
$headers[$str[0]] = \ltrim($str[1]);
}
}
}
return $headers;
}
public static function iconv_mime_decode($str, $mode = 0, $charset = null)
{
if (null === $charset) {
$charset = self::$internalEncoding;
}
if (\ICONV_MIME_DECODE_CONTINUE_ON_ERROR & $mode) {
$charset .= '//IGNORE';
}
if (\false !== \strpos($str, "\r")) {
$str = \strtr(\str_replace("\r\n", "\n", $str), "\r", "\n");
}
$str = \preg_split('/\\n(?![ \\t])/', \rtrim($str), 2);
$str = \preg_replace('/[ \\t]*\\n[ \\t]+/', ' ', \rtrim($str[0]));
$str = \preg_split('/=\\?([^?]+)\\?([bqBQ])\\?(.*?)\\?=/', $str, -1, \PREG_SPLIT_DELIM_CAPTURE);
$result = self::iconv('utf-8', $charset, $str[0]);
if (\false === $result) {
return \false;
}
$i = 1;
$len = \count($str);
while ($i < $len) {
$c = \strtolower($str[$i]);
if (\ICONV_MIME_DECODE_CONTINUE_ON_ERROR & $mode && 'utf-8' !== $c && !isset(self::$alias[$c]) && !self::loadMap('from.', $c, $d)) {
$d = \false;
} elseif ('B' === \strtoupper($str[$i + 1])) {
$d = \base64_decode($str[$i + 2]);
} else {
$d = \rawurldecode(\strtr(\str_replace('%', '%25', $str[$i + 2]), '=_', '% '));
}
if (\false !== $d) {
if ('' !== $d) {
if ('' === ($d = self::iconv($c, $charset, $d))) {
$str[$i + 3] = \substr($str[$i + 3], 1);
} else {
$result .= $d;
}
}
$d = self::iconv('utf-8', $charset, $str[$i + 3]);
if ('' !== \trim($d)) {
$result .= $d;
}
} elseif (\ICONV_MIME_DECODE_CONTINUE_ON_ERROR & $mode) {
$result .= "=?{$str[$i]}?{$str[$i + 1]}?{$str[$i + 2]}?={$str[$i + 3]}";
} else {
$result = \false;
break;
}
$i += 4;
}
return $result;
}
public static function iconv_get_encoding($type = 'all')
{
switch ($type) {
case 'input_encoding':
return self::$inputEncoding;
case 'output_encoding':
return self::$outputEncoding;
case 'internal_encoding':
return self::$internalEncoding;
}
return ['input_encoding' => self::$inputEncoding, 'output_encoding' => self::$outputEncoding, 'internal_encoding' => self::$internalEncoding];
}
public static function iconv_set_encoding($type, $charset)
{
switch ($type) {
case 'input_encoding':
self::$inputEncoding = $charset;
break;
case 'output_encoding':
self::$outputEncoding = $charset;
break;
case 'internal_encoding':
self::$internalEncoding = $charset;
break;
default:
return \false;
}
return \true;
}
public static function iconv_mime_encode($fieldName, $fieldValue, $pref = null)
{
if (!\is_array($pref)) {
$pref = [];
}
$pref += ['scheme' => 'B', 'input-charset' => self::$internalEncoding, 'output-charset' => self::$internalEncoding, 'line-length' => 76, 'line-break-chars' => "\r\n"];
if (\preg_match('/[\\x80-\\xFF]/', $fieldName)) {
$fieldName = '';
}
$scheme = \strtoupper(\substr($pref['scheme'], 0, 1));
$in = \strtolower($pref['input-charset']);
$out = \strtolower($pref['output-charset']);
if ('utf-8' !== $in && \false === ($fieldValue = self::iconv($in, 'utf-8', $fieldValue))) {
return \false;
}
\preg_match_all('/./us', $fieldValue, $chars);
$chars = $chars[0] ?? [];
$lineBreak = (int) $pref['line-length'];
$lineStart = "=?{$pref['output-charset']}?{$scheme}?";
$lineLength = \strlen($fieldName) + 2 + \strlen($lineStart) + 2;
$lineOffset = \strlen($lineStart) + 3;
$lineData = '';
$fieldValue = [];
$Q = 'Q' === $scheme;
foreach ($chars as $c) {
if ('utf-8' !== $out && \false === ($c = self::iconv('utf-8', $out, $c))) {
return \false;
}
$o = $Q ? $c = \preg_replace_callback('/[=_\\?\\x00-\\x1F\\x80-\\xFF]/', [__CLASS__, 'qpByteCallback'], $c) : \base64_encode($lineData . $c);
if (isset($o[$lineBreak - $lineLength])) {
if (!$Q) {
$lineData = \base64_encode($lineData);
}
$fieldValue[] = $lineStart . $lineData . '?=';
$lineLength = $lineOffset;
$lineData = '';
}
$lineData .= $c;
$Q && ($lineLength += \strlen($c));
}
if ('' !== $lineData) {
if (!$Q) {
$lineData = \base64_encode($lineData);
}
$fieldValue[] = $lineStart . $lineData . '?=';
}
return $fieldName . ': ' . \implode($pref['line-break-chars'] . ' ', $fieldValue);
}
public static function iconv_strlen($s, $encoding = null)
{
static $hasXml = null;
if (null === $hasXml) {
$hasXml = \extension_loaded('xml');
}
if ($hasXml) {
return self::strlen1($s, $encoding);
}
return self::strlen2($s, $encoding);
}
public static function strlen1($s, $encoding = null)
{
if (null === $encoding) {
$encoding = self::$internalEncoding;
}
if (0 !== \stripos($encoding, 'utf-8') && \false === ($s = self::iconv($encoding, 'utf-8', $s))) {
return \false;
}
return \strlen(\utf8_decode($s));
}
public static function strlen2($s, $encoding = null)
{
if (null === $encoding) {
$encoding = self::$internalEncoding;
}
if (0 !== \stripos($encoding, 'utf-8') && \false === ($s = self::iconv($encoding, 'utf-8', $s))) {
return \false;
}
$ulenMask = self::$ulenMask;
$i = 0;
$j = 0;
$len = \strlen($s);
while ($i < $len) {
$u = $s[$i] & "\xf0";
$i += $ulenMask[$u] ?? 1;
++$j;
}
return $j;
}
public static function iconv_strpos($haystack, $needle, $offset = 0, $encoding = null)
{
if (null === $encoding) {
$encoding = self::$internalEncoding;
}
if (0 !== \stripos($encoding, 'utf-8')) {
if (\false === ($haystack = self::iconv($encoding, 'utf-8', $haystack))) {
return \false;
}
if (\false === ($needle = self::iconv($encoding, 'utf-8', $needle))) {
return \false;
}
}
if ($offset = (int) $offset) {
$haystack = self::iconv_substr($haystack, $offset, 2147483647, 'utf-8');
}
$pos = \strpos($haystack, $needle);
return \false === $pos ? \false : $offset + ($pos ? self::iconv_strlen(\substr($haystack, 0, $pos), 'utf-8') : 0);
}
public static function iconv_strrpos($haystack, $needle, $encoding = null)
{
if (null === $encoding) {
$encoding = self::$internalEncoding;
}
if (0 !== \stripos($encoding, 'utf-8')) {
if (\false === ($haystack = self::iconv($encoding, 'utf-8', $haystack))) {
return \false;
}
if (\false === ($needle = self::iconv($encoding, 'utf-8', $needle))) {
return \false;
}
}
$pos = isset($needle[0]) ? \strrpos($haystack, $needle) : \false;
return \false === $pos ? \false : self::iconv_strlen($pos ? \substr($haystack, 0, $pos) : $haystack, 'utf-8');
}
public static function iconv_substr($s, $start, $length = 2147483647, $encoding = null)
{
if (null === $encoding) {
$encoding = self::$internalEncoding;
}
if (0 !== \stripos($encoding, 'utf-8')) {
$encoding = null;
} elseif (\false === ($s = self::iconv($encoding, 'utf-8', $s))) {
return \false;
}
$s = (string) $s;
$slen = self::iconv_strlen($s, 'utf-8');
$start = (int) $start;
if (0 > $start) {
$start += $slen;
}
if (0 > $start) {
if (\PHP_VERSION_ID < 80000) {
return \false;
}
$start = 0;
}
if ($start >= $slen) {
return \PHP_VERSION_ID >= 80000 ? '' : \false;
}
$rx = $slen - $start;
if (0 > $length) {
$length += $rx;
}
if (0 === $length) {
return '';
}
if (0 > $length) {
return \PHP_VERSION_ID >= 80000 ? '' : \false;
}
if ($length > $rx) {
$length = $rx;
}
$rx = '/^' . ($start ? self::pregOffset($start) : '') . '(' . self::pregOffset($length) . ')/u';
$s = \preg_match($rx, $s, $s) ? $s[1] : '';
if (null === $encoding) {
return $s;
}
return self::iconv('utf-8', $encoding, $s);
}
private static function loadMap($type, $charset, &$map)
{
if (!isset(self::$convertMap[$type . $charset])) {
if (\false === ($map = self::getData($type . $charset))) {
if ('to.' === $type && self::loadMap('from.', $charset, $map)) {
$map = \array_flip($map);
} else {
return \false;
}
}
self::$convertMap[$type . $charset] = $map;
} else {
$map = self::$convertMap[$type . $charset];
}
return \true;
}
private static function utf8ToUtf8($str, $ignore)
{
$ulenMask = self::$ulenMask;
$valid = self::$isValidUtf8;
$u = $str;
$i = $j = 0;
$len = \strlen($str);
while ($i < $len) {
if ($str[$i] < "\x80") {
$u[$j++] = $str[$i++];
} else {
$ulen = $str[$i] & "\xf0";
$ulen = $ulenMask[$ulen] ?? 1;
$uchr = \substr($str, $i, $ulen);
if (1 === $ulen || !($valid || \preg_match('/^.$/us', $uchr))) {
if ($ignore) {
++$i;
continue;
}
\trigger_error(self::ERROR_ILLEGAL_CHARACTER);
return \false;
}
$i += $ulen;
$u[$j++] = $uchr[0];
isset($uchr[1]) && 0 !== ($u[$j++] = $uchr[1]) && isset($uchr[2]) && 0 !== ($u[$j++] = $uchr[2]) && isset($uchr[3]) && 0 !== ($u[$j++] = $uchr[3]);
}
}
return \substr($u, 0, $j);
}
private static function mapToUtf8(&$result, array $map, $str, $ignore)
{
$len = \strlen($str);
for ($i = 0; $i < $len; ++$i) {
if (isset($str[$i + 1], $map[$str[$i] . $str[$i + 1]])) {
$result .= $map[$str[$i] . $str[++$i]];
} elseif (isset($map[$str[$i]])) {
$result .= $map[$str[$i]];
} elseif (!$ignore) {
\trigger_error(self::ERROR_ILLEGAL_CHARACTER);
return \false;
}
}
return \true;
}
private static function mapFromUtf8(&$result, array $map, $str, $ignore, $translit)
{
$ulenMask = self::$ulenMask;
$valid = self::$isValidUtf8;
if ($translit && !self::$translitMap) {
self::$translitMap = self::getData('translit');
}
$i = 0;
$len = \strlen($str);
while ($i < $len) {
if ($str[$i] < "\x80") {
$uchr = $str[$i++];
} else {
$ulen = $str[$i] & "\xf0";
$ulen = $ulenMask[$ulen] ?? 1;
$uchr = \substr($str, $i, $ulen);
if ($ignore && (1 === $ulen || !($valid || \preg_match('/^.$/us', $uchr)))) {
++$i;
continue;
}
$i += $ulen;
}
if (isset($map[$uchr])) {
$result .= $map[$uchr];
} elseif ($translit) {
if (isset(self::$translitMap[$uchr])) {
$uchr = self::$translitMap[$uchr];
} elseif ($uchr >= "À") {
$uchr = \MailPoetVendor\Normalizer::normalize($uchr, \MailPoetVendor\Normalizer::NFD);
if ($uchr[0] < "\x80") {
$uchr = $uchr[0];
} elseif ($ignore) {
continue;
} else {
return \false;
}
} elseif ($ignore) {
continue;
} else {
return \false;
}
$str = $uchr . \substr($str, $i);
$len = \strlen($str);
$i = 0;
} elseif (!$ignore) {
return \false;
}
}
return \true;
}
private static function qpByteCallback(array $m)
{
return '=' . \strtoupper(\dechex(\ord($m[0])));
}
private static function pregOffset($offset)
{
$rx = [];
$offset = (int) $offset;
while ($offset > 65535) {
$rx[] = '.{65535}';
$offset -= 65535;
}
return \implode('', $rx) . '.{' . $offset . '}';
}
private static function getData($file)
{
if (\file_exists($file = __DIR__ . '/Resources/charset/' . $file . '.php')) {
return require $file;
}
return \false;
}
}