Files
decauthy/vendor/tecnickcom/tc-lib-unicode/src/Bidi.php
T
2026-10-08 23:10:11 +00:00

420 lines
12 KiB
PHP

<?php
declare(strict_types=1);
/**
* Bidi.php
*
* @since 2011-05-23
* @category Library
* @package Unicode
* @author Nicola Asuni <info@tecnick.com>
* @copyright 2011-2026 Nicola Asuni - Tecnick.com LTD
* @license https://www.gnu.org/copyleft/lesser.html GNU-LGPL v3 (see LICENSE)
* @link https://github.com/tecnickcom/tc-lib-unicode
*
* This file is part of tc-lib-unicode software library.
*/
namespace Com\Tecnick\Unicode;
use Com\Tecnick\Unicode\Bidi\Shaping;
use Com\Tecnick\Unicode\Bidi\StepI;
use Com\Tecnick\Unicode\Bidi\StepL;
use Com\Tecnick\Unicode\Bidi\StepN;
use Com\Tecnick\Unicode\Bidi\StepP;
use Com\Tecnick\Unicode\Bidi\StepW;
use Com\Tecnick\Unicode\Bidi\StepX;
use Com\Tecnick\Unicode\Bidi\StepXten;
use Com\Tecnick\Unicode\Data\Constant as UniConstant;
use Com\Tecnick\Unicode\Data\Type as UniType;
use Com\Tecnick\Unicode\Exception as UnicodeException;
/**
* Com\Tecnick\Unicode\Bidi
*
* @since 2015-07-13
* @category Library
* @package Unicode
* @author Nicola Asuni <info@tecnick.com>
* @copyright 2011-2026 Nicola Asuni - Tecnick.com LTD
* @license https://www.gnu.org/copyleft/lesser.html GNU-LGPL v3 (see LICENSE)
* @link https://github.com/tecnickcom/tc-lib-unicode
*/
class Bidi
{
/**
* The input contains strong right-to-left characters (bidi class R, AL or AN)
*/
public const CONTAINS_RTL = 1;
/**
* The input contains Arabic characters (bidi class AL or AN)
*/
public const CONTAINS_ARABIC = 2;
/**
* The input contains explicit formatting characters
* (LRE, RLE, PDF, LRO, RLO, LRI, RLI, FSI, PDI)
*/
public const CONTAINS_FORMATTING = 4;
/**
* String to process
*/
protected string $str = '';
/**
* Array of UTF-8 chars
*
* @var array<string>
*/
protected array $chrarr = [];
/**
* Array of UTF-8 codepoints
*
* @var array<int>
*/
protected array $ordarr = [];
/**
* Processed string (null until it is built)
*/
protected ?string $bidistr = null;
/**
* Array of processed UTF-8 chars (null until it is built)
*
* @var ?array<string>
*/
protected ?array $bidichrarr = null;
/**
* Array of processed UTF-8 codepoints
*
* @var array<int>
*/
protected array $bidiordarr = [];
/**
* If 'R' forces RTL, if 'L' forces LTR
*/
protected string $forcedir = '';
/**
* If true enable shaping
*/
protected bool $shaping = true;
/**
* Content flags of the input, as a combination of the CONTAINS_* constants
*/
protected int $content = 0;
/**
* Convert object
*/
protected Convert $conv;
/**
* Reverse the RTL substrings using the Bidirectional Algorithm
* http://unicode.org/reports/tr9/
*
* @param ?string $str String to convert (if null it will be generated from $chrarr or $ordarr)
* @param ?array<string> $chrarr Array of UTF-8 chars (if empty it will be generated from $str or $ordarr)
* @param ?array<int> $ordarr Array of UTF-8 codepoints (if empty it will be generated from $str or $chrarr)
* @param string|TextDirection $forcedir If 'R' forces RTL, if 'L' forces LTR ('' auto), or a TextDirection case
* @param bool $shaping If true enable the shaping algorithm
*
* @throws UnicodeException
*/
public function __construct(
?string $str = null,
?array $chrarr = null,
?array $ordarr = null,
string|TextDirection $forcedir = '',
bool $shaping = true,
) {
if ($str === null && ($chrarr === null || $chrarr === []) && ($ordarr === null || $ordarr === [])) {
throw new UnicodeException('empty input');
}
$this->conv = new Convert();
$this->setInput($str, $chrarr, $ordarr, $forcedir);
$this->scanInput();
// The explicit formatting characters are removed by X9, so an input that contains
// them is processed even when it holds no right-to-left character.
if (!$this->isRtlMode() && !$this->hasFormatting()) {
$this->bidistr = $this->str;
$this->bidichrarr = $this->chrarr;
$this->bidiordarr = $this->ordarr;
return;
}
$this->shaping = $shaping && $this->isArabic();
$this->process();
}
/**
* Set Input data
*
* @param ?string $str String to convert (if null it will be generated from $chrarr or $ordarr)
* @param ?array<string> $chrarr Array of UTF-8 chars (if empty it will be generated from $str or $ordarr)
* @param ?array<int> $ordarr Array of UTF-8 codepoints (if empty it will be generated from $str or $chrarr)
* @param string|TextDirection $forcedir If 'R' forces RTL, if 'L' forces LTR ('' auto), or a TextDirection case
*
* @throws UnicodeException
* @SuppressWarnings("PHPMD.CyclomaticComplexity")
*/
protected function setInput(
?string $str = null,
?array $chrarr = null,
?array $ordarr = null,
string|TextDirection $forcedir = '',
): void {
if ($str === null) {
$str = '';
if (($chrarr === null || $chrarr === []) && ($ordarr !== null && $ordarr !== [])) {
$chrarr = $this->conv->ordArrToChrArr($ordarr);
}
if ($chrarr !== null && $chrarr !== []) {
$str = \implode('', $chrarr);
}
}
if ($chrarr === null || $chrarr === []) {
$chrarr = $this->conv->strToChrArr($str);
}
if ($ordarr === null || $ordarr === []) {
$ordarr = $this->conv->chrArrToOrdArr($chrarr);
}
if (\count($chrarr) !== \count($ordarr)) {
throw new UnicodeException('the input forms contain a different number of characters');
}
$this->str = $str;
$this->chrarr = $chrarr;
$this->ordarr = $ordarr;
$this->forcedir = TextDirection::fromLoose($forcedir)->value;
}
/**
* Classify the input once into the content flags used to decide whether the
* bidirectional algorithm and the shaping have to run.
*/
protected function scanInput(): void
{
foreach ($this->ordarr as $ord) {
if (
$ord >= UniConstant::LRE && $ord <= UniConstant::RLO
|| $ord >= UniConstant::LRI && $ord <= UniConstant::PDI
) {
$this->content |= self::CONTAINS_FORMATTING;
continue;
}
$type = UniType::getType($ord);
if ($type === 'AL' || $type === 'AN') {
$this->content |= self::CONTAINS_ARABIC | self::CONTAINS_RTL;
continue;
}
if ($type === 'R') {
$this->content |= self::CONTAINS_RTL;
}
}
}
/**
* Returns the processed array of UTF-8 codepoints
*
* @return array<int>
*/
public function getOrdArray(): array
{
return $this->bidiordarr;
}
/**
* Returns the processed array of UTF-8 chars
*
* @return array<string>
*
* @throws UnicodeException
*/
public function getChrArray(): array
{
if ($this->bidichrarr === null) {
$this->bidichrarr = $this->conv->ordArrToChrArr($this->bidiordarr);
}
return $this->bidichrarr;
}
/**
* Returns the number of characters in the processed string
*
* @throws UnicodeException
*/
public function getNumChars(): int
{
return \count($this->getChrArray());
}
/**
* Returns the processed string
*
* @throws UnicodeException
*/
public function getString(): string
{
if ($this->bidistr === null) {
$this->bidistr = \implode('', $this->getChrArray());
}
return $this->bidistr;
}
/**
* Returns an array with processed chars as keys
*
* @return array<int, true>
*/
public function getCharKeys(): array
{
return \array_fill_keys($this->bidiordarr, true);
}
/**
* P1. Split the text into separate paragraphs.
* A paragraph separator is kept with the previous paragraph.
*
* @return array<int, array<int, int>>
*/
protected function getParagraphs(): array
{
$paragraph = [
0 => [],
];
$pdx = 0; // paragraphs index
foreach ($this->ordarr as $ord) {
$paragraph[$pdx][] = $ord;
if (UniType::getType($ord) === 'B') {
++$pdx;
$paragraph[$pdx] = [];
}
}
return $paragraph;
}
/**
* Process the string
*
* @SuppressWarnings("PHPMD.CyclomaticComplexity")
*/
protected function process(): void
{
// split the text into separate paragraphs.
$paragraph = $this->getParagraphs();
// Within each paragraph, apply all the other rules of this algorithm.
foreach ($paragraph as $par) {
// A trailing paragraph separator produces an empty final paragraph; it contributes
// nothing and would otherwise run through the full Step* pipeline for no result.
if ($par === []) {
continue;
}
$pel = $this->getPel($par);
$stepx = new StepX($par, $pel);
$stepx10 = new StepXten($stepx->getChrData(), $pel);
$ilrs = $stepx10->getIsolatedLevelRunSequences();
$chardata = [];
$maxlevel = 0;
foreach ($ilrs as $ilr) {
$stepw = new StepW($ilr);
$stepn = new StepN($stepw->getSequence());
$stepi = new StepI($stepn->getSequence());
$ilr = $stepi->getSequence();
if ($this->shaping) {
$shaping = new Shaping($ilr, $par);
$ilr = $shaping->getSequence();
}
\array_push($chardata, ...$ilr['item']);
if ($ilr['maxlevel'] > $maxlevel) {
$maxlevel = $ilr['maxlevel'];
}
}
$stepl = new StepL($chardata, $pel, $maxlevel);
$chardata = $stepl->getChrData();
foreach ($chardata as $chardatum) {
$this->bidiordarr[] = $chardatum['char'];
}
// add back the paragraph separators ($par is non-empty, so end() returns a codepoint)
$lastchar = \end($par);
if ($lastchar < 0) {
continue;
}
if (UniType::getType($lastchar) !== 'B') {
continue;
}
$this->bidiordarr[] = $lastchar;
}
}
/**
* Get the paragraph embedding level
*
* @param array<int> $par Paragraph
*/
protected function getPel(array $par): int
{
if ($this->forcedir === 'R') {
return 1;
}
if ($this->forcedir === 'L') {
return 0;
}
$stepp = new StepP($par);
return $stepp->getPel();
}
/**
* Check if the input contains Arabic characters
*/
protected function isArabic(): bool
{
return ($this->content & self::CONTAINS_ARABIC) !== 0;
}
/**
* Check if the input contains explicit formatting characters
*/
protected function hasFormatting(): bool
{
return ($this->content & self::CONTAINS_FORMATTING) !== 0;
}
/**
* Check if the input contains right-to-left characters to process
*/
protected function isRtlMode(): bool
{
return $this->forcedir === 'R' || ($this->content & self::CONTAINS_RTL) !== 0;
}
}