.
*/
declare(strict_types=1);
namespace Fisharebest\Webtrees\Report;
use Fisharebest\Webtrees\Reports\RightToLeftSupport;
use function count;
use function explode;
use function hexdec;
use function preg_match;
use function str_replace;
use function substr_count;
/**
* Class ReportPdfText
*/
class ReportPdfText extends ReportBaseText
{
/**
* PDF Text renderer
*
* @param PdfRenderer $renderer
*
* @return void
*/
public function render($renderer): void
{
// Set up the style
if ($renderer->getCurrentStyle() !== $this->styleName) {
$renderer->setCurrentStyle($this->styleName);
}
$temptext = str_replace('#PAGENUM#', (string) $renderer->tcpdf->PageNo(), $this->text);
// underline «title» part of Source item
$temptext = str_replace([
'«',
'»',
], [
'',
'',
], $temptext);
// Paint the text color or they might use inherited colors by the previous function
$match = [];
if (preg_match('/#?(..)(..)(..)/', $this->color, $match)) {
$r = hexdec($match[1]);
$g = hexdec($match[2]);
$b = hexdec($match[3]);
$renderer->tcpdf->SetTextColor($r, $g, $b);
} else {
$renderer->tcpdf->SetTextColor(0, 0, 0);
}
$temptext = RightToLeftSupport::spanLtrRtl($temptext);
$temptext = str_replace(
[
'
',
'
',
'> ',
' <',
],
[
'
',
'
',
'> ',
' <',
],
$temptext
);
$renderer->tcpdf->writeHTML(
$temptext,
false,
false,
true,
false,
''
); //change height - line break etc. - the form is mirror on rtl pages
// Reset the text color to black or it will be inherited
$renderer->tcpdf->SetTextColor(0, 0, 0);
}
/**
* Returns the height in points of the text element
* The height is already calculated in getWidth()
*
* @param PdfRenderer $renderer
*
* @return float
*/
public function getHeight($renderer): float
{
return 0;
}
/**
* Splits the text into lines if necessary to fit into a giving cell
*
* @param PdfRenderer $renderer
*
* @return array{0:float,1:int,2:float}
*/
public function getWidth($renderer): array
{
// Setup the style name, a font must be selected to calculate the width
if ($renderer->getCurrentStyle() !== $this->styleName) {
$renderer->setCurrentStyle($this->styleName);
}
// Check for the largest font size in the box
$fsize = $renderer->getCurrentStyleHeight();
if ($fsize > $renderer->largestFontHeight) {
$renderer->largestFontHeight = $fsize;
}
// Get the line width for the text in points
$lw = $renderer->tcpdf->GetStringWidth($this->text);
// Line Feed counter - Number of lines in the text
$lfct = substr_count($this->text, "\n") + 1;
// If there is still remaining wrap width...
$wrapWidthRemaining = $this->wrapWidthRemaining;
if ($wrapWidthRemaining > 0) {
// Check with line counter too!
if ($lw >= $wrapWidthRemaining || $lfct > 1) {
$newtext = '';
$lines = explode("\n", $this->text);
// Go throught the text line by line
foreach ($lines as $line) {
// Line width in points + a little margin
$lw = $renderer->tcpdf->GetStringWidth($line);
// If the line has to be wraped
if ($lw > $wrapWidthRemaining) {
$words = explode(' ', $line);
$addspace = count($words);
$lw = 0;
foreach ($words as $word) {
$addspace--;
$lw += $renderer->tcpdf->GetStringWidth($word . ' ');
if ($lw <= $wrapWidthRemaining) {
$newtext .= $word;
if ($addspace !== 0) {
$newtext .= ' ';
}
} else {
$lw = $renderer->tcpdf->GetStringWidth($word . ' ');
$newtext .= "\n$word";
if ($addspace !== 0) {
$newtext .= ' ';
}
// Reset the wrap width to the cell width
$wrapWidthRemaining = $this->wrapWidthCell;
}
}
} else {
$newtext .= $line;
}
// Check the Line Feed counter
if ($lfct > 1) {
// Add a new line as long as it’s not the last line
$newtext .= "\n";
// Reset the line width
$lw = 0;
// Reset the wrap width to the cell width
$wrapWidthRemaining = $this->wrapWidthCell;
}
$lfct--;
}
$this->text = $newtext;
$lfct = substr_count($this->text, "\n");
return [
$lw,
1,
$lfct,
];
}
}
$l = 0;
$lfct = substr_count($this->text, "\n");
if ($lfct > 0) {
$l = 2;
}
return [
$lw,
$l,
$lfct,
];
}
}