<?php
namespace Mpdf\Writer;
use Mpdf\Strict;
use Mpdf\Mpdf;
final class BackgroundWriter
{
use Strict;
/**
* @var \Mpdf\Mpdf
*/
private $mpdf;
/**
* @var \Mpdf\Writer\BaseWriter
*/
private $writer;
public function __construct(Mpdf $mpdf, BaseWriter $writer)
{
$this->mpdf = $mpdf;
$this->writer = $writer;
}
public function writePatterns() // _putpatterns
{
$patternCount = count($this->mpdf->patterns);
for ($i = 1; $i <= $patternCount; $i++) {
$x = $this->mpdf->patterns[$i]['x'];
$y = $this->mpdf->patterns[$i]['y'];
$w = $this->mpdf->patterns[$i]['w'];
$h = $this->mpdf->patterns[$i]['h'];
$pgh = $this->mpdf->patterns[$i]['pgh'];
$orig_w = $this->mpdf->patterns[$i]['orig_w'];
$orig_h = $this->mpdf->patterns[$i]['orig_h'];
$image_id = $this->mpdf->patterns[$i]['image_id'];
$itype = $this->mpdf->patterns[$i]['itype'];
if (isset($this->mpdf->patterns[$i]['bpa'])) {
$bpa = $this->mpdf->patterns[$i]['bpa'];
} else {
$bpa = []; // background positioning area
}
if ($this->mpdf->patterns[$i]['x_repeat']) {
$x_repeat = true;
} else {
$x_repeat = false;
}
if ($this->mpdf->patterns[$i]['y_repeat']) {
$y_repeat = true;
} else {
$y_repeat = false;
}
$x_pos = $this->mpdf->patterns[$i]['x_pos'];
if (false !== strpos($x_pos, '%')) {
$x_pos = (float) $x_pos;
$x_pos /= 100;
if (isset($bpa['w']) && $bpa['w']) {
$x_pos = ($bpa['w'] * $x_pos) - ($orig_w / Mpdf::SCALE * $x_pos);
} else {
$x_pos = ($w * $x_pos) - ($orig_w / Mpdf::SCALE * $x_pos);
}
}
$y_pos = $this->mpdf->patterns[$i]['y_pos'];
if (false !== strpos($y_pos, '%')) {
$y_pos = (float) $y_pos;
$y_pos /= 100;
if (isset($bpa['h']) && $bpa['h']) {
$y_pos = ($bpa['h'] * $y_pos) - ($orig_h / Mpdf::SCALE * $y_pos);
} else {
$y_pos = ($h * $y_pos) - ($orig_h / Mpdf::SCALE * $y_pos);
}
}
if (isset($bpa['x']) && $bpa['x']) {
$adj_x = ($x_pos + $bpa['x']) * Mpdf::SCALE;
} else {
$adj_x = ($x_pos + $x) * Mpdf::SCALE;
}
if (isset($bpa['y']) && $bpa['y']) {
$adj_y = (($pgh - $y_pos - $bpa['y']) * Mpdf::SCALE) - $orig_h;
} else {
$adj_y = (($pgh - $y_pos - $y) * Mpdf::SCALE) - $orig_h;
}
$img_obj = false;
if ($itype === 'svg' || $itype === 'wmf') {
foreach ($this->mpdf->formobjects as $fo) {
if ($fo['i'] == $image_id) {
$img_obj = $fo['n'];
$fo_w = $fo['w'];
$fo_h = -$fo['h'];
$wmf_x = $fo['x'];
$wmf_y = $fo['y'];
break;
}
}
} else {
foreach ($this->mpdf->images as $img) {
if ($img['i'] == $image_id) {
$img_obj = $img['n'];
break;
}
}
}
if (!$img_obj) {
throw new \Mpdf\MpdfException('Problem: Image object not found for background pattern ' . $img['i']);
}
$this->writer->object();
$this->writer->write('<</ProcSet [/PDF /Text /ImageB /ImageC /ImageI]');
if ($itype === 'svg' || $itype === 'wmf') {
$this->writer->write('/XObject <</FO' . $image_id . ' ' . $img_obj . ' 0 R >>');
// ******* ADD ANY ExtGStates, Shading AND Fonts needed for the FormObject
// Set in classes/svg array['fo'] = true
// Required that _putshaders comes before _putpatterns in _putresources
// This adds any resources associated with any FormObject to every Formobject - overkill but works!
if (count($this->mpdf->extgstates)) {
$this->writer->write('/ExtGState <<');
foreach ($this->mpdf->extgstates as $k => $extgstate) {
if (isset($extgstate['fo']) && $extgstate['fo']) {
if (isset($extgstate['trans'])) {
$this->writer->write('/' . $extgstate['trans'] . ' ' . $extgstate['n'] . ' 0 R');
} else {
$this->writer->write('/GS' . $k . ' ' . $extgstate['n'] . ' 0 R');
}
}
}
$this->writer->write('>>');
}
/* -- BACKGROUNDS -- */
if (isset($this->mpdf->gradients) && ( count($this->mpdf->gradients) > 0)) {
$this->writer->write('/Shading <<');
foreach ($this->mpdf->gradients as $id => $grad) {
if (isset($grad['fo']) && $grad['fo']) {
$this->writer->write('/Sh' . $id . ' ' . $grad['id'] . ' 0 R');
}
}
$this->writer->write('>>');
}
/* -- END BACKGROUNDS -- */
$this->writer->write('/Font <<');
foreach ($this->mpdf->fonts as $font) {
if (!$font['used'] && $font['type'] === 'TTF') {
continue;
}
if (isset($font['fo']) && $font['fo']) {
if ($font['type'] === 'TTF' && ($font['sip'] || $font['smp'])) {
foreach ($font['n'] as $k => $fid) {
$this->writer->write('/F' . $font['subsetfontids'][$k] . ' ' . $font['n'][$k] . ' 0 R');
}
} else {
$this->writer->write('/F' . $font['i'] . ' ' . $font['n'] . ' 0 R');
}
}
}
$this->writer->write('>>');
} else {
$this->writer->write('/XObject <</I' . $image_id . ' ' . $img_obj . ' 0 R >>');
}
$this->writer->write('>>');
$this->writer->write('endobj');
$this->writer->object();
$this->mpdf->patterns[$i]['n'] = $this->mpdf->n;
$this->writer->write('<< /Type /Pattern /PatternType 1 /PaintType 1 /TilingType 2');
$this->writer->write('/Resources ' . ($this->mpdf->n - 1) . ' 0 R');
$this->writer->write(sprintf('/BBox [0 0 %.3F %.3F]', $orig_w, $orig_h));
if ($x_repeat) {
$this->writer->write(sprintf('/XStep %.3F', $orig_w));
} else {
$this->writer->write(sprintf('/XStep %d', 99999));
}
if ($y_repeat) {
$this->writer->write(sprintf('/YStep %.3F', $orig_h));
} else {
$this->writer->write(sprintf('/YStep %d', 99999));
}
if ($itype === 'svg' || $itype === 'wmf') {
$this->writer->write(sprintf('/Matrix [1 0 0 -1 %.3F %.3F]', $adj_x, $adj_y + $orig_h));
$s = sprintf('q %.3F 0 0 %.3F %.3F %.3F cm /FO%d Do Q', $orig_w / $fo_w, -$orig_h / $fo_h, -($orig_w / $fo_w) * $wmf_x, ($orig_w / $fo_w) * $wmf_y, $image_id);
} else {
$this->writer->write(sprintf('/Matrix [1 0 0 1 %.3F %.3F]', $adj_x, $adj_y));
$s = sprintf('q %.3F 0 0 %.3F 0 0 cm /I%d Do Q', $orig_w, $orig_h, $image_id);
}
if ($this->mpdf->compress) {
$this->writer->write('/Filter /FlateDecode');
$s = gzcompress($s);
}
$this->writer->write('/Length ' . strlen($s) . '>>');
$this->writer->stream($s);
$this->writer->write('endobj');
}
}
public function writeShaders() // _putshaders
{
$maxid = count($this->mpdf->gradients); // index for transparency gradients
foreach ($this->mpdf->gradients as $id => $grad) {
if (empty($grad['is_mask']) && ($grad['type'] == 2 || $grad['type'] == 3)) {
$this->writer->object();
$this->writer->write('<<');
$this->writer->write('/FunctionType 3');
$this->writer->write('/Domain [0 1]');
$fn = [];
$bd = [];
$en = [];
for ($i = 0; $i < (count($grad['stops']) - 1); $i++) {
$fn[] = ($this->mpdf->n + 1 + $i) . ' 0 R';
$en[] = '0 1';
if ($i > 0) {
$bd[] = sprintf('%.3F', $grad['stops'][$i]['offset']);
}
}
$this->writer->write('/Functions [' . implode(' ', $fn) . ']');
$this->writer->write('/Bounds [' . implode(' ', $bd) . ']');
$this->writer->write('/Encode [' . implode(' ', $en) . ']');
$this->writer->write('>>');
$this->writer->write('endobj');
$f1 = $this->mpdf->n;
for ($i = 0; $i < (count($grad['stops']) - 1); $i++) {
$this->writer->object();
$this->writer->write('<<');
$this->writer->write('/FunctionType 2');
$this->writer->write('/Domain [0 1]');
$this->writer->write('/C0 [' . $grad['stops'][$i]['col'] . ']');
$this->writer->write('/C1 [' . $grad['stops'][$i + 1]['col'] . ']');
$this->writer->write('/N 1');
$this->writer->write('>>');
$this->writer->write('endobj');
}
}
if ($grad['type'] == 2 || $grad['type'] == 3) {
if (isset($grad['trans']) && $grad['trans']) {
$this->writer->object();
$this->writer->write('<<');
$this->writer->write('/FunctionType 3');
$this->writer->write('/Domain [0 1]');
$fn = [];
$bd = [];
$en = [];
for ($i = 0; $i < (count($grad['stops']) - 1); $i++) {
$fn[] = ($this->mpdf->n + 1 + $i) . ' 0 R';
$en[] = '0 1';
if ($i > 0) {
$bd[] = sprintf('%.3F', $grad['stops'][$i]['offset']);
}
}
$this->writer->write('/Functions [' . implode(' ', $fn) . ']');
$this->writer->write('/Bounds [' . implode(' ', $bd) . ']');
$this->writer->write('/Encode [' . implode(' ', $en) . ']');
$this->writer->write('>>');
$this->writer->write('endobj');
$f2 = $this->mpdf->n;
for ($i = 0; $i < (count($grad['stops']) - 1); $i++) {
$this->writer->object();
$this->writer->write('<<');
$this->writer->write('/FunctionType 2');
$this->writer->write('/Domain [0 1]');
$this->writer->write(sprintf('/C0 [%.3F]', $grad['stops'][$i]['opacity']));
$this->writer->write(sprintf('/C1 [%.3F]', $grad['stops'][$i + 1]['opacity']));
$this->writer->write('/N 1');
$this->writer->write('>>');
$this->writer->write('endobj');
}
}
}
if (empty($grad['is_mask'])) {
$this->writer->object();
$this->writer->write('<<');
$this->writer->write('/ShadingType ' . $grad['type']);
if (isset($grad['colorspace'])) {
$this->writer->write('/ColorSpace /Device' . $grad['colorspace']); // Can use CMYK if all C0 and C1 above have 4 values
} else {
$this->writer->write('/ColorSpace /DeviceRGB');
}
if ($grad['type'] == 2) {
$this->writer->write(sprintf('/Coords [%.3F %.3F %.3F %.3F]', $grad['coords'][0], $grad['coords'][1], $grad['coords'][2], $grad['coords'][3]));
$this->writer->write('/Function ' . $f1 . ' 0 R');
$this->writer->write('/Extend [' . $grad['extend'][0] . ' ' . $grad['extend'][1] . '] ');
$this->writer->write('>>');
} elseif ($grad['type'] == 3) {
// x0, y0, r0, x1, y1, r1
// at this this time radius of inner circle is 0
$ir = 0;
if (isset($grad['coords'][5]) && $grad['coords'][5]) {
$ir = $grad['coords'][5];
}
$this->writer->write(sprintf('/Coords [%.3F %.3F %.3F %.3F %.3F %.3F]', $grad['coords'][0], $grad['coords'][1], $ir, $grad['coords'][2], $grad['coords'][3], $grad['coords'][4]));
$this->writer->write('/Function ' . $f1 . ' 0 R');
$this->writer->write('/Extend [' . $grad['extend'][0] . ' ' . $grad['extend'][1] . '] ');
$this->writer->write('>>');
} elseif ($grad['type'] == 6) {
$this->writer->write('/BitsPerCoordinate 16');
$this->writer->write('/BitsPerComponent 8');
if ($grad['colorspace'] === 'CMYK') {
$this->writer->write('/Decode[0 1 0 1 0 1 0 1 0 1 0 1]');
} elseif ($grad['colorspace'] === 'Gray') {
$this->writer->write('/Decode[0 1 0 1 0 1]');
} else {
$this->writer->write('/Decode[0 1 0 1 0 1 0 1 0 1]');
}
$this->writer->write('/BitsPerFlag 8');
$this->writer->write('/Length ' . strlen($grad['stream']));
$this->writer->write('>>');
$this->writer->stream($grad['stream']);
}
$this->writer->write('endobj');
}
$this->mpdf->gradients[$id]['id'] = $this->mpdf->n;
// set pattern object
$this->writer->object();
$out = '<< /Type /Pattern /PatternType 2';
$out .= ' /Shading ' . $this->mpdf->gradients[$id]['id'] . ' 0 R';
$out .= ' >>';
$out .= "\n" . 'endobj';
$this->writer->write($out);
$this->mpdf->gradients[$id]['pattern'] = $this->mpdf->n;
if (isset($grad['trans']) && $grad['trans']) {
// luminosity pattern
$transid = $id + $maxid;
$this->writer->object();
$this->writer->write('<<');
$this->writer->write('/ShadingType ' . $grad['type']);
$this->writer->write('/ColorSpace /DeviceGray');
if ($grad['type'] == 2) {
$this->writer->write(sprintf('/Coords [%.3F %.3F %.3F %.3F]', $grad['coords'][0], $grad['coords'][1], $grad['coords'][2], $grad['coords'][3]));
$this->writer->write('/Function ' . $f2 . ' 0 R');
$this->writer->write('/Extend [' . $grad['extend'][0] . ' ' . $grad['extend'][1] . '] ');
$this->writer->write('>>');
} elseif ($grad['type'] == 3) {
// x0, y0, r0, x1, y1, r1
// at this this time radius of inner circle is 0
$ir = 0;
if (isset($grad['coords'][5]) && $grad['coords'][5]) {
$ir = $grad['coords'][5];
}
$this->writer->write(sprintf('/Coords [%.3F %.3F %.3F %.3F %.3F %.3F]', $grad['coords'][0], $grad['coords'][1], $ir, $grad['coords'][2], $grad['coords'][3], $grad['coords'][4]));
$this->writer->write('/Function ' . $f2 . ' 0 R');
$this->writer->write('/Extend [' . $grad['extend'][0] . ' ' . $grad['extend'][1] . '] ');
$this->writer->write('>>');
} elseif ($grad['type'] == 6) {
$this->writer->write('/BitsPerCoordinate 16');
$this->writer->write('/BitsPerComponent 8');
$this->writer->write('/Decode[0 1 0 1 0 1]');
$this->writer->write('/BitsPerFlag 8');
$this->writer->write('/Length ' . strlen($grad['stream_trans']));
$this->writer->write('>>');
$this->writer->stream($grad['stream_trans']);
}
$this->writer->write('endobj');
$this->mpdf->gradients[$transid]['id'] = $this->mpdf->n;
$this->writer->object();
$this->writer->write('<< /Type /Pattern /PatternType 2');
$this->writer->write('/Shading ' . $this->mpdf->gradients[$transid]['id'] . ' 0 R');
$this->writer->write('>>');
$this->writer->write('endobj');
$this->mpdf->gradients[$transid]['pattern'] = $this->mpdf->n;
$this->writer->object();
// Need to extend size of viewing box in case of transformations
$str = 'q /a0 gs /Pattern cs /p' . $transid . ' scn -' . ($this->mpdf->wPt / 2) . ' -' . ($this->mpdf->hPt / 2) . ' ' . (2 * $this->mpdf->wPt) . ' ' . (2 * $this->mpdf->hPt) . ' re f Q';
$filter = ($this->mpdf->compress) ? '/Filter /FlateDecode ' : '';
$p = ($this->mpdf->compress) ? gzcompress($str) : $str;
$this->writer->write('<< /Type /XObject /Subtype /Form /FormType 1 ' . $filter);
$this->writer->write('/Length ' . strlen($p));
$this->writer->write('/BBox [-' . ($this->mpdf->wPt / 2) . ' -' . ($this->mpdf->hPt / 2) . ' ' . (2 * $this->mpdf->wPt) . ' ' . (2 * $this->mpdf->hPt) . ']');
$this->writer->write('/Group << /Type /Group /S /Transparency /CS /DeviceGray >>');
$this->writer->write('/Resources <<');
$this->writer->write('/ExtGState << /a0 << /ca 1 /CA 1 >> >>');
$this->writer->write('/Pattern << /p' . $transid . ' ' . $this->mpdf->gradients[$transid]['pattern'] . ' 0 R >>');
$this->writer->write('>>');
$this->writer->write('>>');
$this->writer->stream($p);
$this->writer->write('endobj');
$this->writer->object();
$this->writer->write('<< /Type /Mask /S /Luminosity /G ' . ($this->mpdf->n - 1) . ' 0 R >>' . "\n" . 'endobj');
$this->writer->object();
$this->writer->write('<< /Type /ExtGState /SMask ' . ($this->mpdf->n - 1) . ' 0 R /AIS false >>' . "\n" . 'endobj');
if (isset($grad['fo']) && $grad['fo']) {
$this->mpdf->extgstates[] = ['n' => $this->mpdf->n, 'trans' => 'TGS' . $id, 'fo' => true];
} else {
$this->mpdf->extgstates[] = ['n' => $this->mpdf->n, 'trans' => 'TGS' . $id];
}
}
}
}
}
|