464 lines
14 KiB
PHP
464 lines
14 KiB
PHP
|
<?php
|
||
|
|
||
|
class directw
|
||
|
{
|
||
|
|
||
|
var $mpdf = null;
|
||
|
|
||
|
public function __construct(mPDF $mpdf)
|
||
|
{
|
||
|
$this->mpdf = $mpdf;
|
||
|
}
|
||
|
|
||
|
function Write($h, $txt, $currentx = 0, $link = '', $directionality = 'ltr', $align = '')
|
||
|
{
|
||
|
if (!$align) {
|
||
|
if ($directionality == 'rtl') {
|
||
|
$align = 'R';
|
||
|
} else {
|
||
|
$align = 'L';
|
||
|
}
|
||
|
}
|
||
|
if ($h == 0) {
|
||
|
$this->mpdf->SetLineHeight();
|
||
|
$h = $this->mpdf->lineheight;
|
||
|
}
|
||
|
//Output text in flowing mode
|
||
|
$w = $this->mpdf->w - $this->mpdf->rMargin - $this->mpdf->x;
|
||
|
|
||
|
$wmax = ($w - ($this->mpdf->cMarginL + $this->mpdf->cMarginR));
|
||
|
$s = str_replace("\r", '', $txt);
|
||
|
if ($this->mpdf->usingCoreFont) {
|
||
|
$nb = strlen($s);
|
||
|
} else {
|
||
|
$nb = mb_strlen($s, $this->mpdf->mb_enc);
|
||
|
// handle single space character
|
||
|
if (($nb == 1) && $s == " ") {
|
||
|
$this->mpdf->x += $this->mpdf->GetStringWidth($s);
|
||
|
return;
|
||
|
}
|
||
|
}
|
||
|
$sep = -1;
|
||
|
$i = 0;
|
||
|
$j = 0;
|
||
|
$l = 0;
|
||
|
$nl = 1;
|
||
|
if (!$this->mpdf->usingCoreFont) {
|
||
|
if (preg_match("/([" . $this->mpdf->pregRTLchars . "])/u", $txt)) {
|
||
|
$this->mpdf->biDirectional = true;
|
||
|
} // *RTL*
|
||
|
while ($i < $nb) {
|
||
|
//Get next character
|
||
|
$c = mb_substr($s, $i, 1, $this->mpdf->mb_enc);
|
||
|
if ($c == "\n") {
|
||
|
// WORD SPACING
|
||
|
$this->mpdf->ResetSpacing();
|
||
|
//Explicit line break
|
||
|
$tmp = rtrim(mb_substr($s, $j, $i - $j, $this->mpdf->mb_enc));
|
||
|
$this->mpdf->Cell($w, $h, $tmp, 0, 2, $align, $fill, $link);
|
||
|
$i++;
|
||
|
$sep = -1;
|
||
|
$j = $i;
|
||
|
$l = 0;
|
||
|
if ($nl == 1) {
|
||
|
if ($currentx != 0)
|
||
|
$this->mpdf->x = $currentx;
|
||
|
else
|
||
|
$this->mpdf->x = $this->mpdf->lMargin;
|
||
|
$w = $this->mpdf->w - $this->mpdf->rMargin - $this->mpdf->x;
|
||
|
$wmax = ($w - ($this->mpdf->cMarginL + $this->mpdf->cMarginR));
|
||
|
}
|
||
|
$nl++;
|
||
|
continue;
|
||
|
}
|
||
|
if ($c == " ") {
|
||
|
$sep = $i;
|
||
|
}
|
||
|
$l += $this->mpdf->GetCharWidthNonCore($c); // mPDF 5.3.04
|
||
|
if ($l > $wmax) {
|
||
|
//Automatic line break (word wrapping)
|
||
|
if ($sep == -1) {
|
||
|
// WORD SPACING
|
||
|
$this->mpdf->ResetSpacing();
|
||
|
if ($this->mpdf->x > $this->mpdf->lMargin) {
|
||
|
//Move to next line
|
||
|
if ($currentx != 0)
|
||
|
$this->mpdf->x = $currentx;
|
||
|
else
|
||
|
$this->mpdf->x = $this->mpdf->lMargin;
|
||
|
$this->mpdf->y+=$h;
|
||
|
$w = $this->mpdf->w - $this->mpdf->rMargin - $this->mpdf->x;
|
||
|
$wmax = ($w - ($this->mpdf->cMarginL + $this->mpdf->cMarginR));
|
||
|
$i++;
|
||
|
$nl++;
|
||
|
continue;
|
||
|
}
|
||
|
if ($i == $j) {
|
||
|
$i++;
|
||
|
}
|
||
|
$tmp = rtrim(mb_substr($s, $j, $i - $j, $this->mpdf->mb_enc));
|
||
|
$this->mpdf->Cell($w, $h, $tmp, 0, 2, $align, $fill, $link);
|
||
|
} else {
|
||
|
$tmp = rtrim(mb_substr($s, $j, $sep - $j, $this->mpdf->mb_enc));
|
||
|
|
||
|
if ($align == 'J') {
|
||
|
//////////////////////////////////////////
|
||
|
// JUSTIFY J using Unicode fonts (Word spacing doesn't work)
|
||
|
// WORD SPACING
|
||
|
// Change NON_BREAKING SPACE to spaces so they are 'spaced' properly
|
||
|
$tmp = str_replace(chr(194) . chr(160), chr(32), $tmp);
|
||
|
$len_ligne = $this->mpdf->GetStringWidth($tmp);
|
||
|
$nb_carac = mb_strlen($tmp, $this->mpdf->mb_enc);
|
||
|
$nb_spaces = mb_substr_count($tmp, ' ', $this->mpdf->mb_enc);
|
||
|
$inclCursive = false;
|
||
|
if (isset($this->mpdf->CurrentFont['useOTL']) && $this->mpdf->CurrentFont['useOTL']) {
|
||
|
if (preg_match("/([" . $this->mpdf->pregCURSchars . "])/u", $tmp)) {
|
||
|
$inclCursive = true;
|
||
|
}
|
||
|
}
|
||
|
list($charspacing, $ws) = $this->mpdf->GetJspacing($nb_carac, $nb_spaces, ((($w - 2) - $len_ligne) * _MPDFK), $inclCursive);
|
||
|
$this->mpdf->SetSpacing($charspacing, $ws);
|
||
|
//////////////////////////////////////////
|
||
|
}
|
||
|
$this->mpdf->Cell($w, $h, $tmp, 0, 2, $align, $fill, $link);
|
||
|
$i = $sep + 1;
|
||
|
}
|
||
|
$sep = -1;
|
||
|
$j = $i;
|
||
|
$l = 0;
|
||
|
if ($nl == 1) {
|
||
|
if ($currentx != 0)
|
||
|
$this->mpdf->x = $currentx;
|
||
|
else
|
||
|
$this->mpdf->x = $this->mpdf->lMargin;
|
||
|
$w = $this->mpdf->w - $this->mpdf->rMargin - $this->mpdf->x;
|
||
|
$wmax = ($w - ($this->mpdf->cMarginL + $this->mpdf->cMarginR));
|
||
|
}
|
||
|
$nl++;
|
||
|
}
|
||
|
else {
|
||
|
$i++;
|
||
|
}
|
||
|
}
|
||
|
//Last chunk
|
||
|
// WORD SPACING
|
||
|
$this->mpdf->ResetSpacing();
|
||
|
} else {
|
||
|
while ($i < $nb) {
|
||
|
//Get next character
|
||
|
$c = $s[$i];
|
||
|
if ($c == "\n") {
|
||
|
//Explicit line break
|
||
|
// WORD SPACING
|
||
|
$this->mpdf->ResetSpacing();
|
||
|
$this->mpdf->Cell($w, $h, substr($s, $j, $i - $j), 0, 2, $align, $fill, $link);
|
||
|
$i++;
|
||
|
$sep = -1;
|
||
|
$j = $i;
|
||
|
$l = 0;
|
||
|
if ($nl == 1) {
|
||
|
if ($currentx != 0)
|
||
|
$this->mpdf->x = $currentx;
|
||
|
else
|
||
|
$this->mpdf->x = $this->mpdf->lMargin;
|
||
|
$w = $this->mpdf->w - $this->mpdf->rMargin - $this->mpdf->x;
|
||
|
$wmax = $w - ($this->mpdf->cMarginL + $this->mpdf->cMarginR);
|
||
|
}
|
||
|
$nl++;
|
||
|
continue;
|
||
|
}
|
||
|
if ($c == " ") {
|
||
|
$sep = $i;
|
||
|
}
|
||
|
$l += $this->mpdf->GetCharWidthCore($c); // mPDF 5.3.04
|
||
|
if ($l > $wmax) {
|
||
|
//Automatic line break (word wrapping)
|
||
|
if ($sep == -1) {
|
||
|
// WORD SPACING
|
||
|
$this->mpdf->ResetSpacing();
|
||
|
if ($this->mpdf->x > $this->mpdf->lMargin) {
|
||
|
//Move to next line
|
||
|
if ($currentx != 0)
|
||
|
$this->mpdf->x = $currentx;
|
||
|
else
|
||
|
$this->mpdf->x = $this->mpdf->lMargin;
|
||
|
$this->mpdf->y+=$h;
|
||
|
$w = $this->mpdf->w - $this->mpdf->rMargin - $this->mpdf->x;
|
||
|
$wmax = $w - ($this->mpdf->cMarginL + $this->mpdf->cMarginR);
|
||
|
$i++;
|
||
|
$nl++;
|
||
|
continue;
|
||
|
}
|
||
|
if ($i == $j) {
|
||
|
$i++;
|
||
|
}
|
||
|
$this->mpdf->Cell($w, $h, substr($s, $j, $i - $j), 0, 2, $align, $fill, $link);
|
||
|
} else {
|
||
|
$tmp = substr($s, $j, $sep - $j);
|
||
|
if ($align == 'J') {
|
||
|
//////////////////////////////////////////
|
||
|
// JUSTIFY J using Unicode fonts
|
||
|
// WORD SPACING is not fully supported for complex scripts
|
||
|
// Change NON_BREAKING SPACE to spaces so they are 'spaced' properly
|
||
|
$tmp = str_replace(chr(160), chr(32), $tmp);
|
||
|
$len_ligne = $this->mpdf->GetStringWidth($tmp);
|
||
|
$nb_carac = strlen($tmp);
|
||
|
$nb_spaces = substr_count($tmp, ' ');
|
||
|
list($charspacing, $ws) = $this->mpdf->GetJspacing($nb_carac, $nb_spaces, ((($w - 2) - $len_ligne) * _MPDFK), $false);
|
||
|
$this->mpdf->SetSpacing($charspacing, $ws);
|
||
|
//////////////////////////////////////////
|
||
|
}
|
||
|
$this->mpdf->Cell($w, $h, $tmp, 0, 2, $align, $fill, $link);
|
||
|
$i = $sep + 1;
|
||
|
}
|
||
|
$sep = -1;
|
||
|
$j = $i;
|
||
|
$l = 0;
|
||
|
if ($nl == 1) {
|
||
|
if ($currentx != 0)
|
||
|
$this->mpdf->x = $currentx;
|
||
|
else
|
||
|
$this->mpdf->x = $this->mpdf->lMargin;
|
||
|
$w = $this->mpdf->w - $this->mpdf->rMargin - $this->mpdf->x;
|
||
|
$wmax = $w - ($this->mpdf->cMarginL + $this->mpdf->cMarginR);
|
||
|
}
|
||
|
$nl++;
|
||
|
}
|
||
|
else {
|
||
|
$i++;
|
||
|
}
|
||
|
}
|
||
|
// WORD SPACING
|
||
|
$this->mpdf->ResetSpacing();
|
||
|
}
|
||
|
//Last chunk
|
||
|
if ($i != $j) {
|
||
|
if ($currentx != 0)
|
||
|
$this->mpdf->x = $currentx;
|
||
|
else
|
||
|
$this->mpdf->x = $this->mpdf->lMargin;
|
||
|
if ($this->mpdf->usingCoreFont) {
|
||
|
$tmp = substr($s, $j, $i - $j);
|
||
|
} else {
|
||
|
$tmp = mb_substr($s, $j, $i - $j, $this->mpdf->mb_enc);
|
||
|
}
|
||
|
$this->mpdf->Cell($w, $h, $tmp, 0, 0, $align, $fill, $link);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
function CircularText($x, $y, $r, $text, $align = 'top', $fontfamily = '', $fontsizePt = 0, $fontstyle = '', $kerning = 120, $fontwidth = 100, $divider = '')
|
||
|
{
|
||
|
if ($fontfamily || $fontstyle || $fontsizePt)
|
||
|
$this->mpdf->SetFont($fontfamily, $fontstyle, $fontsizePt);
|
||
|
$kerning/=100;
|
||
|
$fontwidth/=100;
|
||
|
if ($kerning == 0)
|
||
|
$this->mpdf->Error('Please use values unequal to zero for kerning (CircularText)');
|
||
|
if ($fontwidth == 0)
|
||
|
$this->mpdf->Error('Please use values unequal to zero for font width (CircularText)');
|
||
|
$text = str_replace("\r", '', $text);
|
||
|
//circumference
|
||
|
$u = ($r * 2) * M_PI;
|
||
|
$checking = true;
|
||
|
$autoset = false;
|
||
|
while ($checking) {
|
||
|
$t = 0;
|
||
|
$w = array();
|
||
|
if ($this->mpdf->usingCoreFont) {
|
||
|
$nb = strlen($text);
|
||
|
for ($i = 0; $i < $nb; $i++) {
|
||
|
$w[$i] = $this->mpdf->GetStringWidth($text[$i]);
|
||
|
$w[$i]*=$kerning * $fontwidth;
|
||
|
$t+=$w[$i];
|
||
|
}
|
||
|
} else {
|
||
|
$nb = mb_strlen($text, $this->mpdf->mb_enc);
|
||
|
$lastchar = '';
|
||
|
$unicode = $this->mpdf->UTF8StringToArray($text);
|
||
|
for ($i = 0; $i < $nb; $i++) {
|
||
|
$c = mb_substr($text, $i, 1, $this->mpdf->mb_enc);
|
||
|
$w[$i] = $this->mpdf->GetStringWidth($c);
|
||
|
$w[$i]*=$kerning * $fontwidth;
|
||
|
$char = $unicode[$i];
|
||
|
if ($this->mpdf->useKerning && $lastchar) {
|
||
|
if (isset($this->mpdf->CurrentFont['kerninfo'][$lastchar][$char])) {
|
||
|
$tk = $this->mpdf->CurrentFont['kerninfo'][$lastchar][$char] * ($this->mpdf->FontSize / 1000) * $kerning * $fontwidth;
|
||
|
$w[$i] += $tk / 2;
|
||
|
$w[$i - 1] += $tk / 2;
|
||
|
$t+=$tk;
|
||
|
}
|
||
|
}
|
||
|
$lastchar = $char;
|
||
|
$t+=$w[$i];
|
||
|
}
|
||
|
}
|
||
|
if ($fontsizePt >= 0 || $autoset) {
|
||
|
$checking = false;
|
||
|
} else {
|
||
|
$t+=$this->mpdf->GetStringWidth(' ');
|
||
|
if ($divider)
|
||
|
$t+=$this->mpdf->GetStringWidth(' ');
|
||
|
if ($fontsizePt == -2)
|
||
|
$fontsizePt = $this->mpdf->FontSizePt * 0.5 * $u / $t;
|
||
|
else
|
||
|
$fontsizePt = $this->mpdf->FontSizePt * $u / $t;
|
||
|
$this->mpdf->SetFontSize($fontsizePt);
|
||
|
$autoset = true;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
//total width of string in degrees
|
||
|
$d = ($t / $u) * 360;
|
||
|
|
||
|
$this->mpdf->StartTransform();
|
||
|
// rotate matrix for the first letter to center the text
|
||
|
// (half of total degrees)
|
||
|
if ($align == 'top') {
|
||
|
$this->mpdf->transformRotate(-$d / 2, $x, $y);
|
||
|
} else {
|
||
|
$this->mpdf->transformRotate($d / 2, $x, $y);
|
||
|
}
|
||
|
//run through the string
|
||
|
for ($i = 0; $i < $nb; $i++) {
|
||
|
if ($align == 'top') {
|
||
|
//rotate matrix half of the width of current letter + half of the width of preceding letter
|
||
|
if ($i == 0) {
|
||
|
$this->mpdf->transformRotate((($w[$i] / 2) / $u) * 360, $x, $y);
|
||
|
} else {
|
||
|
$this->mpdf->transformRotate((($w[$i] / 2 + $w[$i - 1] / 2) / $u) * 360, $x, $y);
|
||
|
}
|
||
|
if ($fontwidth != 1) {
|
||
|
$this->mpdf->StartTransform();
|
||
|
$this->mpdf->transformScale($fontwidth * 100, 100, $x, $y);
|
||
|
}
|
||
|
$this->mpdf->SetXY($x - $w[$i] / 2, $y - $r);
|
||
|
} else {
|
||
|
//rotate matrix half of the width of current letter + half of the width of preceding letter
|
||
|
if ($i == 0) {
|
||
|
$this->mpdf->transformRotate(-(($w[$i] / 2) / $u) * 360, $x, $y);
|
||
|
} else {
|
||
|
$this->mpdf->transformRotate(-(($w[$i] / 2 + $w[$i - 1] / 2) / $u) * 360, $x, $y);
|
||
|
}
|
||
|
if ($fontwidth != 1) {
|
||
|
$this->mpdf->StartTransform();
|
||
|
$this->mpdf->transformScale($fontwidth * 100, 100, $x, $y);
|
||
|
}
|
||
|
$this->mpdf->SetXY($x - $w[$i] / 2, $y + $r - ($this->mpdf->FontSize));
|
||
|
}
|
||
|
if ($this->mpdf->usingCoreFont) {
|
||
|
$c = $text[$i];
|
||
|
} else {
|
||
|
$c = mb_substr($text, $i, 1, $this->mpdf->mb_enc);
|
||
|
}
|
||
|
$this->mpdf->Cell(($w[$i]), $this->mpdf->FontSize, $c, 0, 0, 'C'); // mPDF 5.3.53
|
||
|
if ($fontwidth != 1) {
|
||
|
$this->mpdf->StopTransform();
|
||
|
}
|
||
|
}
|
||
|
$this->mpdf->StopTransform();
|
||
|
|
||
|
// mPDF 5.5.23
|
||
|
if ($align == 'top' && $divider != '') {
|
||
|
$wc = $this->mpdf->GetStringWidth($divider);
|
||
|
$wc*=$kerning * $fontwidth;
|
||
|
|
||
|
$this->mpdf->StartTransform();
|
||
|
$this->mpdf->transformRotate(90, $x, $y);
|
||
|
$this->mpdf->SetXY($x - $wc / 2, $y - $r);
|
||
|
$this->mpdf->Cell(($wc), $this->mpdf->FontSize, $divider, 0, 0, 'C');
|
||
|
$this->mpdf->StopTransform();
|
||
|
|
||
|
$this->mpdf->StartTransform();
|
||
|
$this->mpdf->transformRotate(-90, $x, $y);
|
||
|
$this->mpdf->SetXY($x - $wc / 2, $y - $r);
|
||
|
$this->mpdf->Cell(($wc), $this->mpdf->FontSize, $divider, 0, 0, 'C');
|
||
|
$this->mpdf->StopTransform();
|
||
|
}
|
||
|
}
|
||
|
|
||
|
function Shaded_box($text, $font = '', $fontstyle = 'B', $szfont = '', $width = '70%', $style = 'DF', $radius = 2.5, $fill = '#FFFFFF', $color = '#000000', $pad = 2)
|
||
|
{
|
||
|
// F (shading - no line),S (line, no shading),DF (both)
|
||
|
if (!$font) {
|
||
|
$font = $this->mpdf->default_font;
|
||
|
}
|
||
|
if (!$szfont) {
|
||
|
$szfont = ($this->mpdf->default_font_size * 1.8);
|
||
|
}
|
||
|
|
||
|
$text = ' ' . $text . ' ';
|
||
|
$this->mpdf->SetFont($font, $fontstyle, $szfont, false);
|
||
|
|
||
|
$text = $this->mpdf->purify_utf8_text($text);
|
||
|
if ($this->mpdf->text_input_as_HTML) {
|
||
|
$text = $this->mpdf->all_entities_to_utf8($text);
|
||
|
}
|
||
|
if ($this->mpdf->usingCoreFont) {
|
||
|
$text = mb_convert_encoding($text, $this->mpdf->mb_enc, 'UTF-8');
|
||
|
}
|
||
|
|
||
|
|
||
|
// DIRECTIONALITY
|
||
|
if (preg_match("/([" . $this->mpdf->pregRTLchars . "])/u", $text)) {
|
||
|
$this->mpdf->biDirectional = true;
|
||
|
} // *RTL*
|
||
|
|
||
|
$textvar = 0;
|
||
|
$save_OTLtags = $this->mpdf->OTLtags;
|
||
|
$this->mpdf->OTLtags = array();
|
||
|
if ($this->mpdf->useKerning) {
|
||
|
if ($this->mpdf->CurrentFont['haskernGPOS']) {
|
||
|
$this->mpdf->OTLtags['Plus'] .= ' kern';
|
||
|
} else {
|
||
|
$textvar = ($textvar | FC_KERNING);
|
||
|
}
|
||
|
}
|
||
|
// Use OTL OpenType Table Layout - GSUB & GPOS
|
||
|
if (isset($this->mpdf->CurrentFont['useOTL']) && $this->mpdf->CurrentFont['useOTL']) {
|
||
|
$text = $this->mpdf->otl->applyOTL($text, $this->mpdf->CurrentFont['useOTL']);
|
||
|
$OTLdata = $this->mpdf->otl->OTLdata;
|
||
|
}
|
||
|
$this->mpdf->OTLtags = $save_OTLtags;
|
||
|
|
||
|
$this->mpdf->magic_reverse_dir($text, $this->mpdf->directionality, $OTLdata);
|
||
|
|
||
|
if (!$width) {
|
||
|
$width = $this->mpdf->pgwidth;
|
||
|
} else {
|
||
|
$width = $this->mpdf->ConvertSize($width, $this->mpdf->pgwidth);
|
||
|
}
|
||
|
$midpt = $this->mpdf->lMargin + ($this->mpdf->pgwidth / 2);
|
||
|
$r1 = $midpt - ($width / 2); //($this->mpdf->w / 2) - 40;
|
||
|
$r2 = $r1 + $width; //$r1 + 80;
|
||
|
$y1 = $this->mpdf->y;
|
||
|
|
||
|
|
||
|
$mid = ($r1 + $r2 ) / 2;
|
||
|
$loop = 0;
|
||
|
|
||
|
while ($loop == 0) {
|
||
|
$this->mpdf->SetFont($font, $fontstyle, $szfont, false);
|
||
|
$sz = $this->mpdf->GetStringWidth($text, true, $OTLdata, $textvar);
|
||
|
if (($r1 + $sz) > $r2)
|
||
|
$szfont --;
|
||
|
else
|
||
|
$loop ++;
|
||
|
}
|
||
|
$this->mpdf->SetFont($font, $fontstyle, $szfont, true, true);
|
||
|
|
||
|
$y2 = $this->mpdf->FontSize + ($pad * 2);
|
||
|
|
||
|
$this->mpdf->SetLineWidth(0.1);
|
||
|
$fc = $this->mpdf->ConvertColor($fill);
|
||
|
$tc = $this->mpdf->ConvertColor($color);
|
||
|
$this->mpdf->SetFColor($fc);
|
||
|
$this->mpdf->SetTColor($tc);
|
||
|
$this->mpdf->RoundedRect($r1, $y1, ($r2 - $r1), $y2, $radius, $style);
|
||
|
$this->mpdf->SetX($r1);
|
||
|
$this->mpdf->Cell($r2 - $r1, $y2, $text, 0, 1, "C", 0, '', 0, 0, 0, 'M', 0, false, $OTLdata, $textvar);
|
||
|
$this->mpdf->SetY($y1 + $y2 + 2); // +2 = mm margin below shaded box
|
||
|
$this->mpdf->Reset();
|
||
|
}
|
||
|
|
||
|
}
|