StringLib.php

<?php
 
namespace Bitrix\Bizproc\Calc\Libs;
 
use Bitrix\Main;
use Bitrix\Bizproc\Calc\Arguments;
use Bitrix\Main\Localization\Loc;
 
class StringLib extends BaseLib
{
    public function getFunctions(): array
    {
        return [
            'numberformat' => [
                'args' => true,
                'func' => 'callNumberFormat',
                'description' => Loc::getMessage('BIZPROC_CALC_FUNCTION_NUMBER_FORMAT_DESCRIPTION'),
            ],
            'substr' => [
                'args' => true,
                'func' => 'callSubstr',
                'description' => Loc::getMessage('BIZPROC_CALC_FUNCTION_SUBSTR_DESCRIPTION'),
            ],
            'strpos' => [
                'args' => true,
                'func' => 'callStrpos',
                'description' => Loc::getMessage('BIZPROC_CALC_FUNCTION_STRPOS_DESCRIPTION'),
            ],
            'strlen' => [
                'args' => true,
                'func' => 'callStrlen',
                'description' => Loc::getMessage('BIZPROC_CALC_FUNCTION_STRLEN_DESCRIPTION'),
            ],
            'randstring' => [
                'args' => true,
                'func' => 'callRandString',
                'description' => Loc::getMessage('BIZPROC_CALC_FUNCTION_RANDSTRING_DESCRIPTION'),
            ],
            'strtolower' => [
                'args' => true,
                'func' => 'callStrtolower',
                'description' => Loc::getMessage('BIZPROC_CALC_FUNCTION_STRTOLOWER_DESCRIPTION'),
            ],
            'strtoupper' => [
                'args' => true,
                'func' => 'callStrtoupper',
                'description' => Loc::getMessage('BIZPROC_CALC_FUNCTION_STRTOUPPER_DESCRIPTION'),
            ],
            'ucwords' => [
                'args' => true,
                'func' => 'callUcwords',
                'description' => Loc::getMessage('BIZPROC_CALC_FUNCTION_UCWORDS_DESCRIPTION'),
            ],
            'ucfirst' => [
                'args' => true,
                'func' => 'callUcfirst',
                'description' => Loc::getMessage('BIZPROC_CALC_FUNCTION_UCFIRST_DESCRIPTION'),
            ],
            'trim' => [
                'args' => true,
                'func' => 'callTrim',
                'description' => Loc::getMessage('BIZPROC_CALC_FUNCTION_TRIM_DESCRIPTION'),
            ],
            'urlencode' => [
                'args' => true,
                'func' => 'callUrlencode',
                'description' => Loc::getMessage('BIZPROC_CALC_FUNCTION_URLENCODE_DESCRIPTION'),
            ],
        ];
    }
 
    public function callNumberFormat(Arguments $args)
    {
        $number = (float)$args->getFirstSingle();
        $decimals = (int)($args->getSecond() ?: 0);
        $decPoint = $args->getThird();
 
        if (!is_scalar($decPoint))
        {
            $decPoint = '.';
        }
        $decPoint = (string)$decPoint;
 
        $thousandsSeparator = $args->getArg(3);
        if (!is_scalar($thousandsSeparator))
        {
            $thousandsSeparator = ',';
        }
        $thousandsSeparator = (string)$thousandsSeparator;
 
        return number_format($number, $decimals, $decPoint, $thousandsSeparator);
    }
 
    public function callRandString(Arguments $args)
    {
        $len = (int)$args->getFirstSingle();
 
        return Main\Security\Random::getString($len, true);
    }
 
    public function callSubstr(Arguments $args)
    {
        $str = $args->getFirstSingle();
        $pos = (int)$args->getSecond();
        $len = (int)$args->getThird();
 
        if (is_array($str))
        {
            return null;
        }
 
        if (!$str)
        {
            return '';
        }
 
        if ($len)
        {
            return mb_substr($str, $pos, $len);
        }
 
        return mb_substr($str, $pos);
    }
 
    public function callStrpos(Arguments $args)
    {
        $haystack = $args->getFirstSingle();
        $needle = $args->getSecondSingle();
 
        if (empty($haystack) || is_array($haystack) || is_array($needle))
        {
            return false;
        }
        $haystack = (string)$haystack;
        $needle = (string)$needle;
 
        $maxOffset = mb_strlen($haystack);
        $minOffset = -1 * $maxOffset;
 
        $offset = max($minOffset, min($maxOffset, (int)$args->getThird()));
 
        return mb_strpos($haystack, $needle, $offset);
    }
 
    public function callStrlen(Arguments $args)
    {
        $str = $args->getFirstSingle();
 
        if (!is_scalar($str))
        {
            return null;
        }
 
        $str = (string)$str;
 
        return mb_strlen($str);
    }
 
    public function callUrlencode(Arguments $args)
    {
        $str = $args->getFirstSingle();
 
        if (!is_scalar($str))
        {
            if (is_array($str) && count($str) === 1)
            {
                $str = \CBPHelper::stringify($str);
            }
            else
            {
                return null;
            }
        }
 
        $str = (string)$str;
 
        return urlencode($str);
    }
 
    public function callStrtolower(Arguments $args)
    {
        $str = $args->getFirstSingle();
 
        if (!is_scalar($str))
        {
            return null;
        }
 
        return mb_strtolower((string)$str);
    }
 
    public function callStrtoupper(Arguments $args)
    {
        $str = $args->getFirstSingle();
 
        if (!is_scalar($str))
        {
            return null;
        }
 
        return mb_strtoupper((string)$str);
    }
 
    public function callUcwords(Arguments $args)
    {
        $str = $args->getFirstSingle();
 
        if (!is_scalar($str))
        {
            return null;
        }
 
        return mb_convert_case((string)$str, MB_CASE_TITLE);
    }
 
    public function callUcfirst(Arguments $args)
    {
        $str = $args->getFirstSingle();
 
        if (!is_scalar($str))
        {
            return null;
        }
 
        return $this->mbUcFirst((string)$str);
    }
 
    private function mbUcFirst($str)
    {
        $len = mb_strlen($str);
        $firstChar = mb_substr($str, 0, 1);
        $otherChars = mb_substr($str, 1, $len - 1);
 
        return mb_strtoupper($firstChar) . $otherChars;
    }
 
    public function callTrim(Arguments $args)
    {
        $array = $args->getFlatArray();
 
        $result = [];
        foreach ($array as $str)
        {
            if (is_scalar($str) || (is_object($str) && method_exists($str, '__toString')))
            {
                $result[] = trim((string)$str);
            }
        }
 
        return count($result) > 1 ? $result : ($result[0] ?? '');
    }
}