d5f773158e
* FIX tcpdi_parser::Error() respects K_TCPDF_THROW_EXCEPTION_ERROR tcpdi_parser::Error() called die() unconditionally, producing white pages on PDF import failures (corrupted background, missing template) and killing batch generation on the first bad PDF. TCPDF already supports exception mode via K_TCPDF_THROW_EXCEPTION_ERROR, and Dolibarr already exposes TCPDF_THROW_ERRORS_INSTEAD_OF_DIE to control it (core/lib/pdf.lib.php). TCPDI, derived from TCPDF, never honored it. Changes: - tcpdi_parser::Error(): throw \Exception when K_TCPDF_THROW_EXCEPTION_ERROR is defined and true, otherwise die() as before. - commonGenerateDocument(): wrap write_file() calls in try/catch to catch exceptions from TCPDI (and any other throwable), set \$resultwritefile = -1 and preserve the exception message in \$this->error. - commonGenerateDocument(): guard error-path assignment so an already set \$this->error (from the catch block) is not overwritten by an empty \$obj->error. 100% backward compatible: without the constant set, behavior is unchanged. Assisted by Claude, maybe it needs a human verification ;) Signed-off-by: nikube <n.zaoui@outlook.com> * FIX Enable TCPDF/TCPDI exception mode by default Now that tcpdi_parser::Error() honors K_TCPDF_THROW_EXCEPTION_ERROR and commonGenerateDocument() catches write_file() exceptions, flip the default of TCPDF_THROW_ERRORS_INSTEAD_OF_DIE from 0 to 1. Rationale: die() in a PDF library has no legitimate production use case. It produces white pages on web requests (user gets no message, no way to recover) and kills batch PDF generation on the first bad PDF. Exceptions can be caught, logged, and surfaced as normal Dolibarr error banners. Users who need the legacy die() behavior can opt out by setting TCPDF_THROW_ERRORS_INSTEAD_OF_DIE = 0. Assisted by Claude, maybe it needs a human verification ;) Signed-off-by: nikube <n.zaoui@outlook.com> --------- Signed-off-by: nikube <n.zaoui@outlook.com>
1456 lines
52 KiB
PHP
1456 lines
52 KiB
PHP
<?php
|
|
//============================================================+
|
|
// File name : tcpdi_parser.php
|
|
// Version : 1.1
|
|
// Begin : 2013-09-25
|
|
// Last Update : 2016-05-03
|
|
// Author : Paul Nicholls - https://github.com/pauln
|
|
// License : GNU-LGPL v3 (https://www.gnu.org/copyleft/lesser.html)
|
|
//
|
|
// Based on : tcpdf_parser.php
|
|
// Version : 1.0.003
|
|
// Begin : 2011-05-23
|
|
// Last Update : 2013-03-17
|
|
// Author : Nicola Asuni - Tecnick.com LTD - www.tecnick.com - info@tecnick.com
|
|
// License : GNU-LGPL v3 (https://www.gnu.org/copyleft/lesser.html)
|
|
// -------------------------------------------------------------------
|
|
// Copyright (C) 2011-2013 Nicola Asuni - Tecnick.com LTD
|
|
//
|
|
// This file is for use with the TCPDF software library.
|
|
//
|
|
// tcpdi_parser is free software: you can redistribute it and/or modify it
|
|
// under the terms of the GNU Lesser General Public License as
|
|
// published by the Free Software Foundation, either version 3 of the
|
|
// License, or (at your option) any later version.
|
|
//
|
|
// tcpdi_parser is distributed in the hope that it will be useful, but
|
|
// WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
|
// See the GNU Lesser General Public License for more details.
|
|
//
|
|
// You should have received a copy of the License
|
|
// along with tcpdi_parser. If not, see
|
|
// <http://www.tecnick.com/pagefiles/tcpdf/LICENSE.TXT>.
|
|
//
|
|
// See LICENSE file for more information.
|
|
// -------------------------------------------------------------------
|
|
//
|
|
// Description : This is a PHP class for parsing PDF documents.
|
|
//
|
|
//============================================================+
|
|
|
|
/**
|
|
* @file
|
|
* This is a PHP class for parsing PDF documents.<br>
|
|
* @author Paul Nicholls
|
|
* @author Nicola Asuni
|
|
* @version 1.1
|
|
*/
|
|
|
|
// include class for decoding filters
|
|
if (defined('TCPDF_PATH')) require_once(constant('TCPDF_PATH').'/include/tcpdf_filters.php');
|
|
else require_once(dirname(__FILE__).'/../tecnickcom/tcpdf/include/tcpdf_filters.php');
|
|
|
|
if (!defined ('PDF_TYPE_NULL'))
|
|
define ('PDF_TYPE_NULL', 0);
|
|
if (!defined ('PDF_TYPE_NUMERIC'))
|
|
define ('PDF_TYPE_NUMERIC', 1);
|
|
if (!defined ('PDF_TYPE_TOKEN'))
|
|
define ('PDF_TYPE_TOKEN', 2);
|
|
if (!defined ('PDF_TYPE_HEX'))
|
|
define ('PDF_TYPE_HEX', 3);
|
|
if (!defined ('PDF_TYPE_STRING'))
|
|
define ('PDF_TYPE_STRING', 4);
|
|
if (!defined ('PDF_TYPE_DICTIONARY'))
|
|
define ('PDF_TYPE_DICTIONARY', 5);
|
|
if (!defined ('PDF_TYPE_ARRAY'))
|
|
define ('PDF_TYPE_ARRAY', 6);
|
|
if (!defined ('PDF_TYPE_OBJDEC'))
|
|
define ('PDF_TYPE_OBJDEC', 7);
|
|
if (!defined ('PDF_TYPE_OBJREF'))
|
|
define ('PDF_TYPE_OBJREF', 8);
|
|
if (!defined ('PDF_TYPE_OBJECT'))
|
|
define ('PDF_TYPE_OBJECT', 9);
|
|
if (!defined ('PDF_TYPE_STREAM'))
|
|
define ('PDF_TYPE_STREAM', 10);
|
|
if (!defined ('PDF_TYPE_BOOLEAN'))
|
|
define ('PDF_TYPE_BOOLEAN', 11);
|
|
if (!defined ('PDF_TYPE_REAL'))
|
|
define ('PDF_TYPE_REAL', 12);
|
|
|
|
/**
|
|
* @class tcpdi_parser
|
|
* This is a PHP class for parsing PDF documents.<br>
|
|
* Based on TCPDF_PARSER, part of the TCPDF project by Nicola Asuni.
|
|
* @brief This is a PHP class for parsing PDF documents..
|
|
* @version 1.1
|
|
* @author Paul Nicholls - github.com/pauln
|
|
* @author Nicola Asuni - info@tecnick.com
|
|
*/
|
|
class tcpdi_parser {
|
|
/**
|
|
* Unique parser ID
|
|
* @public
|
|
*/
|
|
public $uniqueid = '';
|
|
|
|
/**
|
|
* Raw content of the PDF document.
|
|
* @private
|
|
*/
|
|
private $pdfdata = '';
|
|
|
|
/**
|
|
* XREF data.
|
|
* @protected
|
|
*/
|
|
protected $xref = array();
|
|
|
|
/**
|
|
* Object streams.
|
|
* @protected
|
|
*/
|
|
protected $objstreams = array();
|
|
|
|
/**
|
|
* Objects in objstreams.
|
|
* @protected
|
|
*/
|
|
protected $objstreamobjs = array();
|
|
|
|
/**
|
|
* List of seen XREF data locations.
|
|
* @protected
|
|
*/
|
|
protected $xref_seen_offsets = array();
|
|
|
|
/**
|
|
* Array of PDF objects.
|
|
* @protected
|
|
*/
|
|
protected $objects = array();
|
|
|
|
/**
|
|
* Array of object offsets.
|
|
* @private
|
|
*/
|
|
private $objoffsets = array();
|
|
|
|
/**
|
|
* Class object for decoding filters.
|
|
* @private
|
|
*/
|
|
private $FilterDecoders;
|
|
|
|
/**
|
|
* Pages
|
|
*
|
|
* @private array
|
|
*/
|
|
private $pages;
|
|
|
|
/**
|
|
* Page count
|
|
* @private integer
|
|
*/
|
|
private $page_count;
|
|
|
|
/**
|
|
* actual page number
|
|
* @private integer
|
|
*/
|
|
private $pageno;
|
|
|
|
/**
|
|
* PDF version of the loaded document
|
|
* @private string
|
|
*/
|
|
private $pdfVersion;
|
|
|
|
/**
|
|
* Available BoxTypes
|
|
*
|
|
* @public array
|
|
*/
|
|
public $availableBoxes = array('/MediaBox', '/CropBox', '/BleedBox', '/TrimBox', '/ArtBox');
|
|
|
|
// -----------------------------------------------------------------------------
|
|
|
|
/**
|
|
* Parse a PDF document an return an array of objects.
|
|
* @param $data (string) PDF data to parse.
|
|
* @public
|
|
* @since 1.0.000 (2011-05-24)
|
|
*/
|
|
public function __construct($data, $uniqueid) {
|
|
if (empty($data)) {
|
|
$this->Error('Empty PDF data.');
|
|
}
|
|
$this->uniqueid = $uniqueid;
|
|
$this->pdfdata = $data;
|
|
// get length
|
|
$pdflen = strlen($this->pdfdata);
|
|
// initialize class for decoding filters
|
|
$this->FilterDecoders = new TCPDF_FILTERS();
|
|
// get xref and trailer data
|
|
$this->xref = $this->getXrefData();
|
|
$this->findObjectOffsets();
|
|
// parse all document objects
|
|
$this->objects = array();
|
|
/*foreach ($this->xref['xref'] as $obj => $offset) {
|
|
if (!isset($this->objects[$obj]) AND ($offset > 0)) {
|
|
// decode only objects with positive offset
|
|
//$this->objects[$obj] = $this->getIndirectObject($obj, $offset, true);
|
|
}
|
|
}*/
|
|
$this->getPDFVersion();
|
|
$this->readPages();
|
|
}
|
|
|
|
/**
|
|
* Clean up when done, to free memory etc
|
|
*/
|
|
public function cleanUp() {
|
|
unset($this->pdfdata);
|
|
$this->pdfdata = '';
|
|
unset($this->objstreams);
|
|
$this->objstreams = array();
|
|
unset($this->objects);
|
|
$this->objects = array();
|
|
unset($this->objstreamobjs);
|
|
$this->objstreamobjs = array();
|
|
unset($this->xref);
|
|
$this->xref = array();
|
|
unset($this->objoffsets);
|
|
$this->objoffsets = array();
|
|
unset($this->pages);
|
|
$this->pages = array();
|
|
}
|
|
|
|
/**
|
|
* Return an array of parsed PDF document objects.
|
|
* @return (array) Array of parsed PDF document objects.
|
|
* @public
|
|
* @since 1.0.000 (2011-06-26)
|
|
*/
|
|
public function getParsedData() {
|
|
return array($this->xref, $this->objects, $this->pages);
|
|
}
|
|
|
|
/**
|
|
* Get PDF-Version
|
|
*
|
|
* And reset the PDF Version used in FPDI if needed
|
|
* @public
|
|
*/
|
|
public function getPDFVersion() {
|
|
preg_match('/\d\.\d/', substr($this->pdfdata, 0, 16), $m);
|
|
if (isset($m[0]))
|
|
$this->pdfVersion = $m[0];
|
|
return $this->pdfVersion;
|
|
}
|
|
|
|
/**
|
|
* Read all /Page(es)
|
|
*
|
|
*/
|
|
function readPages() {
|
|
$params = $this->getObjectVal($this->xref['trailer'][1]['/Root']);
|
|
$objref = null;
|
|
foreach ($params[1][1] as $k=>$v) {
|
|
if ($k == '/Pages') {
|
|
$objref = $v;
|
|
break;
|
|
}
|
|
}
|
|
if ($objref == null || $objref[0] !== PDF_TYPE_OBJREF) {
|
|
// Offset not found.
|
|
return;
|
|
}
|
|
|
|
$dict = $this->getObjectVal($objref);
|
|
if ($dict[0] == PDF_TYPE_OBJECT && $dict[1][0] == PDF_TYPE_DICTIONARY) {
|
|
// Dict wrapped in an object
|
|
$dict = $dict[1];
|
|
}
|
|
|
|
if ($dict[0] !== PDF_TYPE_DICTIONARY) {
|
|
return;
|
|
}
|
|
|
|
$this->pages = array();
|
|
if (isset($dict[1]['/Kids'])) {
|
|
$v = $dict[1]['/Kids'];
|
|
if ($v[0] == PDF_TYPE_ARRAY) {
|
|
foreach ($v[1] as $ref) {
|
|
$page = $this->getObjectVal($ref);
|
|
$this->readPage($page);
|
|
}
|
|
}
|
|
}
|
|
|
|
$this->page_count = count($this->pages);
|
|
}
|
|
|
|
/**
|
|
* Read a single /Page element, recursing through /Kids if necessary
|
|
*
|
|
*/
|
|
private function readPage($page) {
|
|
if (isset($page[1][1]['/Kids'])) {
|
|
// Nested pages!
|
|
foreach ($page[1][1]['/Kids'][1] as $subref) {
|
|
$subpage = $this->getObjectVal($subref);
|
|
$this->readPage($subpage);
|
|
}
|
|
} else {
|
|
$this->pages[] = $page;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Get pagecount from sourcefile
|
|
*
|
|
* @return int
|
|
*/
|
|
function getPageCount() {
|
|
return $this->page_count;
|
|
}
|
|
|
|
/**
|
|
* Get Cross-Reference (xref) table and trailer data from PDF document data.
|
|
* @param $offset (int) xref offset (if know).
|
|
* @param $xref (array) previous xref array (if any).
|
|
* @return Array containing xref and trailer data.
|
|
* @protected
|
|
* @since 1.0.000 (2011-05-24)
|
|
*/
|
|
protected function getXrefData($offset=0, $xref=array()) {
|
|
if ($offset == 0) {
|
|
// find last startxref
|
|
if (preg_match('/.*[\r\n]startxref[\s\r\n]+([0-9]+)[\s\r\n]+%%EOF/is', $this->pdfdata, $matches) == 0) {
|
|
$this->Error('Unable to find startxref');
|
|
}
|
|
$startxref = $matches[1];
|
|
} else {
|
|
if (preg_match('/([0-9]+[\s][0-9]+[\s]obj)/i', $this->pdfdata, $matches, PREG_OFFSET_CAPTURE, $offset)) {
|
|
// Cross-Reference Stream object
|
|
$startxref = $offset;
|
|
} elseif (preg_match('/[\r\n]startxref[\s\r\n]+([0-9]+)[\s\r\n]+%%EOF/i', $this->pdfdata, $matches, PREG_OFFSET_CAPTURE, $offset)) {
|
|
// startxref found
|
|
$startxref = $matches[1][0];
|
|
} else {
|
|
$this->Error('Unable to find startxref');
|
|
}
|
|
}
|
|
unset($matches);
|
|
|
|
// DOMPDF gets the startxref wrong, giving us the linebreak before the xref starts.
|
|
$startxref += strspn($this->pdfdata, "\r\n", $startxref);
|
|
|
|
// check xref position
|
|
if (strpos($this->pdfdata, 'xref', $startxref) == $startxref) {
|
|
// Cross-Reference
|
|
$xref = $this->decodeXref($startxref, $xref);
|
|
} else {
|
|
// Cross-Reference Stream
|
|
$xref = $this->decodeXrefStream($startxref, $xref);
|
|
}
|
|
if (empty($xref)) {
|
|
$this->Error('Unable to find xref');
|
|
}
|
|
|
|
return $xref;
|
|
}
|
|
|
|
/**
|
|
* Decode the Cross-Reference section
|
|
* @param $startxref (int) Offset at which the xref section starts.
|
|
* @param $xref (array) Previous xref array (if any).
|
|
* @return Array containing xref and trailer data.
|
|
* @protected
|
|
* @since 1.0.000 (2011-06-20)
|
|
*/
|
|
protected function decodeXref($startxref, $xref=array()) {
|
|
$this->xref_seen_offsets[] = $startxref;
|
|
if (!isset($xref['xref_location'])) {
|
|
$xref['xref_location'] = $startxref;
|
|
$xref['max_object'] = 0;
|
|
}
|
|
// extract xref data (object indexes and offsets)
|
|
$xoffset = $startxref + 5;
|
|
// initialize object number
|
|
$obj_num = 0;
|
|
$offset = $xoffset;
|
|
while (preg_match('/^([0-9]+)[\s]([0-9]+)[\s]?([nf]?)/im', $this->pdfdata, $matches, PREG_OFFSET_CAPTURE, $offset) > 0) {
|
|
$offset = (strlen($matches[0][0]) + $matches[0][1]);
|
|
if ($matches[3][0] == 'n') {
|
|
// create unique object index: [object number]_[generation number]
|
|
$gen_num = intval($matches[2][0]);
|
|
$index = $obj_num.'_'.$gen_num;
|
|
// check if object already exist
|
|
if (!isset($xref['xref'][$obj_num][$gen_num])) {
|
|
// store object offset position
|
|
$xref['xref'][$obj_num][$gen_num] = intval($matches[1][0]);
|
|
}
|
|
++$obj_num;
|
|
$offset += 2;
|
|
} elseif ($matches[3][0] == 'f') {
|
|
++$obj_num;
|
|
$offset += 2;
|
|
} else {
|
|
// object number (index)
|
|
$obj_num = intval($matches[1][0]);
|
|
}
|
|
}
|
|
unset($matches);
|
|
$xref['max_object'] = max($xref['max_object'], $obj_num);
|
|
// get trailer data
|
|
if (preg_match('/trailer[\s]*<<(.*)>>[\s\r\n]+(?:[%].*[\r\n]+)*startxref[\s\r\n]+/isU', $this->pdfdata, $matches, PREG_OFFSET_CAPTURE, $xoffset) > 0) {
|
|
$trailer_data = $matches[1][0];
|
|
if (!isset($xref['trailer']) OR empty($xref['trailer'])) {
|
|
// get only the last updated version
|
|
$xref['trailer'] = array();
|
|
$xref['trailer'][0] = PDF_TYPE_DICTIONARY;
|
|
$xref['trailer'][1] = array();
|
|
// parse trailer_data
|
|
if (preg_match('/Size[\s]+([0-9]+)/i', $trailer_data, $matches) > 0) {
|
|
$xref['trailer'][1]['/Size'] = array(PDF_TYPE_NUMERIC, intval($matches[1]));
|
|
}
|
|
if (preg_match('/Root[\s]+([0-9]+)[\s]+([0-9]+)[\s]+R/i', $trailer_data, $matches) > 0) {
|
|
$xref['trailer'][1]['/Root'] = array(PDF_TYPE_OBJREF, intval($matches[1]), intval($matches[2]));
|
|
}
|
|
if (preg_match('/Encrypt[\s]+([0-9]+)[\s]+([0-9]+)[\s]+R/i', $trailer_data, $matches) > 0) {
|
|
$xref['trailer'][1]['/Encrypt'] = array(PDF_TYPE_OBJREF, intval($matches[1]), intval($matches[2]));
|
|
}
|
|
if (preg_match('/Info[\s]+([0-9]+)[\s]+([0-9]+)[\s]+R/i', $trailer_data, $matches) > 0) {
|
|
$xref['trailer'][1]['/Info'] = array(PDF_TYPE_OBJREF, intval($matches[1]), intval($matches[2]));
|
|
}
|
|
if (preg_match('/ID[\s]*[\[][\s]*[<]([^>]*)[>][\s]*[<]([^>]*)[>]/i', $trailer_data, $matches) > 0) {
|
|
$xref['trailer'][1]['/ID'] = array(PDF_TYPE_ARRAY, array());
|
|
$xref['trailer'][1]['/ID'][1][0] = array(PDF_TYPE_HEX, $matches[1]);
|
|
$xref['trailer'][1]['/ID'][1][1] = array(PDF_TYPE_HEX, $matches[2]);
|
|
}
|
|
}
|
|
if (preg_match('/Prev[\s]+([0-9]+)/i', $trailer_data, $matches) > 0) {
|
|
// get previous xref
|
|
$prevoffset = intval($matches[1]);
|
|
if (!in_array($prevoffset, $this->xref_seen_offsets)) {
|
|
$this->xref_seen_offsets[] = $prevoffset;
|
|
$xref = $this->getXrefData($prevoffset, $xref);
|
|
}
|
|
}
|
|
unset($matches);
|
|
} else {
|
|
$this->Error('Unable to find trailer');
|
|
}
|
|
return $xref;
|
|
}
|
|
|
|
/**
|
|
* Decode the Cross-Reference Stream section
|
|
* @param $startxref (int) Offset at which the xref section starts.
|
|
* @param $xref (array) Previous xref array (if any).
|
|
* @return Array containing xref and trailer data.
|
|
* @protected
|
|
* @since 1.0.003 (2013-03-16)
|
|
*/
|
|
protected function decodeXrefStream($startxref, $xref=array()) {
|
|
// try to read Cross-Reference Stream
|
|
list($xrefobj, $unused) = $this->getRawObject($startxref);
|
|
$xrefcrs = $this->getIndirectObject($xrefobj[1], $startxref, true);
|
|
if (!isset($xref['xref_location'])) {
|
|
$xref['xref_location'] = $startxref;
|
|
$xref['max_object'] = 0;
|
|
}
|
|
if (!isset($xref['xref'])) {
|
|
$xref['xref'] = array();
|
|
}
|
|
if (!isset($xref['trailer']) OR empty($xref['trailer'])) {
|
|
// get only the last updated version
|
|
$xref['trailer'] = array();
|
|
$xref['trailer'][0] = PDF_TYPE_DICTIONARY;
|
|
$xref['trailer'][1] = array();
|
|
$filltrailer = true;
|
|
} else {
|
|
$filltrailer = false;
|
|
}
|
|
$valid_crs = false;
|
|
$sarr = $xrefcrs[0][1];
|
|
$keys = array_keys($sarr);
|
|
$columns = 1; // Default as per PDF 32000-1:2008.
|
|
$predictor = 1; // Default as per PDF 32000-1:2008.
|
|
foreach ($keys as $k=>$key) {
|
|
$v = $sarr[$key];
|
|
if (($key == '/Type') AND ($v[0] == PDF_TYPE_TOKEN AND ($v[1] == 'XRef'))) {
|
|
$valid_crs = true;
|
|
} elseif (($key == '/Index') AND ($v[0] == PDF_TYPE_ARRAY AND count($v[1]) >= 2)) {
|
|
// first object number in the subsection
|
|
$index_first = intval($v[1][0][1]);
|
|
// number of entries in the subsection
|
|
$index_entries = intval($v[1][1][1]);
|
|
} elseif (($key == '/Prev') AND ($v[0] == PDF_TYPE_NUMERIC)) {
|
|
// get previous xref offset
|
|
$prevxref = intval($v[1]);
|
|
} elseif (($key == '/W') AND ($v[0] == PDF_TYPE_ARRAY)) {
|
|
// number of bytes (in the decoded stream) of the corresponding field
|
|
$wb = array();
|
|
$wb[0] = intval($v[1][0][1]);
|
|
$wb[1] = intval($v[1][1][1]);
|
|
$wb[2] = intval($v[1][2][1]);
|
|
} elseif (($key == '/DecodeParms') AND ($v[0] == PDF_TYPE_DICTIONARY)) {
|
|
$decpar = $v[1];
|
|
foreach ($decpar as $kdc => $vdc) {
|
|
if (($kdc == '/Columns') AND ($vdc[0] == PDF_TYPE_NUMERIC)) {
|
|
$columns = intval($vdc[1]);
|
|
} elseif (($kdc == '/Predictor') AND ($vdc[0] == PDF_TYPE_NUMERIC)) {
|
|
$predictor = intval($vdc[1]);
|
|
}
|
|
}
|
|
} elseif ($filltrailer) {
|
|
switch($key) {
|
|
case '/Size':
|
|
case '/Root':
|
|
case '/Info':
|
|
case '/ID':
|
|
$xref['trailer'][1][$key] = $v;
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
// decode data
|
|
$obj_num = 0;
|
|
if ($valid_crs AND isset($xrefcrs[1][3][0])) {
|
|
// number of bytes in a row
|
|
$rowlen = ($columns + 1);
|
|
// convert the stream into an array of integers
|
|
$sdata = unpack('C*', $xrefcrs[1][3][0]);
|
|
// split the rows
|
|
$sdata = array_chunk($sdata, $rowlen);
|
|
// initialize decoded array
|
|
$ddata = array();
|
|
// initialize first row with zeros
|
|
$prev_row = array_fill (0, $rowlen, 0);
|
|
// for each row apply PNG unpredictor
|
|
foreach ($sdata as $k => $row) {
|
|
// initialize new row
|
|
$ddata[$k] = array();
|
|
// get PNG predictor value
|
|
if (empty($predictor)) {
|
|
$predictor = (10 + $row[0]);
|
|
}
|
|
// for each byte on the row
|
|
for ($i=1; $i<=$columns; ++$i) {
|
|
if (!isset($row[$i])) {
|
|
// No more data in this row - we're done here.
|
|
break;
|
|
}
|
|
// new index
|
|
$j = ($i - 1);
|
|
$row_up = $prev_row[$j];
|
|
if ($i == 1) {
|
|
$row_left = 0;
|
|
$row_upleft = 0;
|
|
} else {
|
|
$row_left = $row[($i - 1)];
|
|
$row_upleft = $prev_row[($j - 1)];
|
|
}
|
|
switch ($predictor) {
|
|
case 1: // No prediction (equivalent to PNG None)
|
|
case 10: { // PNG prediction (on encoding, PNG None on all rows)
|
|
$ddata[$k][$j] = $row[$i];
|
|
break;
|
|
}
|
|
case 11: { // PNG prediction (on encoding, PNG Sub on all rows)
|
|
$ddata[$k][$j] = (($row[$i] + $row_left) & 0xff);
|
|
break;
|
|
}
|
|
case 12: { // PNG prediction (on encoding, PNG Up on all rows)
|
|
$ddata[$k][$j] = (($row[$i] + $row_up) & 0xff);
|
|
break;
|
|
}
|
|
case 13: { // PNG prediction (on encoding, PNG Average on all rows)
|
|
$ddata[$k][$j] = (($row[$i] + (($row_left + $row_up) / 2)) & 0xff);
|
|
break;
|
|
}
|
|
case 14: { // PNG prediction (on encoding, PNG Paeth on all rows)
|
|
// initial estimate
|
|
$p = ($row_left + $row_up - $row_upleft);
|
|
// distances
|
|
$pa = abs($p - $row_left);
|
|
$pb = abs($p - $row_up);
|
|
$pc = abs($p - $row_upleft);
|
|
$pmin = min($pa, $pb, $pc);
|
|
// return minumum distance
|
|
switch ($pmin) {
|
|
case $pa: {
|
|
$ddata[$k][$j] = (($row[$i] + $row_left) & 0xff);
|
|
break;
|
|
}
|
|
case $pb: {
|
|
$ddata[$k][$j] = (($row[$i] + $row_up) & 0xff);
|
|
break;
|
|
}
|
|
case $pc: {
|
|
$ddata[$k][$j] = (($row[$i] + $row_upleft) & 0xff);
|
|
break;
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
default: { // PNG prediction (on encoding, PNG optimum)
|
|
$this->Error("Unknown PNG predictor $predictor");
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
$prev_row = $ddata[$k];
|
|
} // end for each row
|
|
// complete decoding
|
|
unset($sdata);
|
|
$sdata = array();
|
|
// for every row
|
|
foreach ($ddata as $k => $row) {
|
|
// initialize new row
|
|
$sdata[$k] = array(0, 0, 0);
|
|
if ($wb[0] == 0) {
|
|
// default type field
|
|
$sdata[$k][0] = 1;
|
|
}
|
|
$i = 0; // count bytes on the row
|
|
// for every column
|
|
for ($c = 0; $c < 3; ++$c) {
|
|
// for every byte on the column
|
|
for ($b = 0; $b < $wb[$c]; ++$b) {
|
|
if (isset($row[$i])) {
|
|
$sdata[$k][$c] += ($row[$i] << (($wb[$c] - 1 - $b) * 8));
|
|
}
|
|
++$i;
|
|
}
|
|
}
|
|
}
|
|
unset($ddata);
|
|
// fill xref
|
|
if (isset($index_first)) {
|
|
$obj_num = $index_first;
|
|
} else {
|
|
$obj_num = 0;
|
|
}
|
|
foreach ($sdata as $k => $row) {
|
|
switch ($row[0]) {
|
|
case 0: { // (f) linked list of free objects
|
|
++$obj_num;
|
|
break;
|
|
}
|
|
case 1: { // (n) objects that are in use but are not compressed
|
|
// create unique object index: [object number]_[generation number]
|
|
$index = $obj_num.'_'.$row[2];
|
|
// check if object already exist
|
|
if (!isset($xref['xref'][$obj_num][$row[2]])) {
|
|
// store object offset position
|
|
$xref['xref'][$obj_num][$row[2]] = $row[1];
|
|
}
|
|
++$obj_num;
|
|
break;
|
|
}
|
|
case 2: { // compressed objects
|
|
// $row[1] = object number of the object stream in which this object is stored
|
|
// $row[2] = index of this object within the object stream
|
|
/*$index = $row[1].'_0_'.$row[2];
|
|
$xref['xref'][$row[1]][0][$row[2]] = -1;*/
|
|
break;
|
|
}
|
|
default: { // null objects
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
} // end decoding data
|
|
$xref['max_object'] = max($xref['max_object'], $obj_num);
|
|
if (isset($prevxref)) {
|
|
// get previous xref
|
|
$xref = $this->getXrefData($prevxref, $xref);
|
|
}
|
|
return $xref;
|
|
}
|
|
|
|
/**
|
|
* Get raw stream data
|
|
* @param $offset (int) Stream offset.
|
|
* @param $length (int) Stream length.
|
|
* @return string Steam content
|
|
* @protected
|
|
*/
|
|
protected function getRawStream($offset, $length) {
|
|
$offset += strspn($this->pdfdata, "\x00\x09\x0a\x0c\x0d\x20", $offset);
|
|
$offset += 6; // "stream"
|
|
$offset += strspn($this->pdfdata, "\x20", $offset);
|
|
$offset += strspn($this->pdfdata, "\r\n", $offset);
|
|
|
|
$obj = array();
|
|
$obj[] = PDF_TYPE_STREAM;
|
|
$obj[] = substr($this->pdfdata, $offset, $length);
|
|
|
|
return array($obj, $offset+$length);
|
|
}
|
|
|
|
/**
|
|
* Get object type, raw value and offset to next object
|
|
* @param $offset (int) Object offset.
|
|
* @return array containing object type, raw value and offset to next object
|
|
* @protected
|
|
* @since 1.0.000 (2011-06-20)
|
|
*/
|
|
protected function getRawObject($offset=0, $data=null) {
|
|
if ($data == null) {
|
|
$data =& $this->pdfdata;
|
|
}
|
|
$objtype = ''; // object type to be returned
|
|
$objval = ''; // object value to be returned
|
|
// skip initial white space chars: \x00 null (NUL), \x09 horizontal tab (HT), \x0A line feed (LF), \x0C form feed (FF), \x0D carriage return (CR), \x20 space (SP)
|
|
while (strspn($data[$offset], "\x00\x09\x0a\x0c\x0d\x20") == 1) {
|
|
$offset++;
|
|
}
|
|
// get first char
|
|
$char = $data[$offset];
|
|
// get object type
|
|
switch ($char) {
|
|
case '%': { // \x25 PERCENT SIGN
|
|
// skip comment and search for next token
|
|
$next = strcspn($data, "\r\n", $offset);
|
|
if ($next > 0) {
|
|
$offset += $next;
|
|
list($obj, $unused) = $this->getRawObject($offset, $data);
|
|
return $obj;
|
|
}
|
|
break;
|
|
}
|
|
case '/': { // \x2F SOLIDUS
|
|
// name object
|
|
$objtype = PDF_TYPE_TOKEN;
|
|
++$offset;
|
|
$length = strcspn($data, "\x00\x09\x0a\x0c\x0d\x20\x28\x29\x3c\x3e\x5b\x5d\x7b\x7d\x2f\x25", $offset);
|
|
$objval = substr($data, $offset, $length);
|
|
$offset += $length;
|
|
break;
|
|
}
|
|
case '(': // \x28 LEFT PARENTHESIS
|
|
case ')': { // \x29 RIGHT PARENTHESIS
|
|
// literal string object
|
|
$objtype = PDF_TYPE_STRING;
|
|
++$offset;
|
|
$strpos = $offset;
|
|
if ($char == '(') {
|
|
$open_bracket = 1;
|
|
while ($open_bracket > 0) {
|
|
if (!isset($data[$strpos])) {
|
|
break;
|
|
}
|
|
$ch = $data[$strpos];
|
|
switch ($ch) {
|
|
case '\\': { // REVERSE SOLIDUS (5Ch) (Backslash)
|
|
// skip next character
|
|
++$strpos;
|
|
break;
|
|
}
|
|
case '(': { // LEFT PARENHESIS (28h)
|
|
++$open_bracket;
|
|
break;
|
|
}
|
|
case ')': { // RIGHT PARENTHESIS (29h)
|
|
--$open_bracket;
|
|
break;
|
|
}
|
|
}
|
|
++$strpos;
|
|
}
|
|
$objval = substr($data, $offset, ($strpos - $offset - 1));
|
|
$offset = $strpos;
|
|
}
|
|
break;
|
|
}
|
|
case '[': // \x5B LEFT SQUARE BRACKET
|
|
case ']': { // \x5D RIGHT SQUARE BRACKET
|
|
// array object
|
|
$objtype = PDF_TYPE_ARRAY;
|
|
++$offset;
|
|
if ($char == '[') {
|
|
// get array content
|
|
$objval = array();
|
|
do {
|
|
// get element
|
|
list($element, $offset) = $this->getRawObject($offset, $data);
|
|
$objval[] = $element;
|
|
} while ($element[0] !== ']');
|
|
// remove closing delimiter
|
|
array_pop($objval);
|
|
} else {
|
|
$objtype = ']';
|
|
}
|
|
break;
|
|
}
|
|
case '<': // \x3C LESS-THAN SIGN
|
|
case '>': { // \x3E GREATER-THAN SIGN
|
|
if (isset($data[($offset + 1)]) AND ($data[($offset + 1)] == $char)) {
|
|
// dictionary object
|
|
$objtype = PDF_TYPE_DICTIONARY;
|
|
if ($char == '<') {
|
|
list ($objval, $offset) = $this->getDictValue($offset, $data);
|
|
} else {
|
|
$objtype = '>>';
|
|
$offset += 2;
|
|
}
|
|
} else {
|
|
// hexadecimal string object
|
|
$objtype = PDF_TYPE_HEX;
|
|
++$offset;
|
|
// The "Panose" entry in the FontDescriptor Style dict seems to have hex bytes separated by spaces.
|
|
if (($char == '<') AND (preg_match('/^([0-9A-Fa-f ]+)[>]/iU', substr($data, $offset), $matches) == 1)) {
|
|
$objval = $matches[1];
|
|
$offset += strlen($matches[0]);
|
|
unset($matches);
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
default: {
|
|
$frag = $data[$offset] . @$data[$offset+1] . @$data[$offset+2] . @$data[$offset+3];
|
|
switch ($frag) {
|
|
case 'endo':
|
|
// indirect object
|
|
$objtype = 'endobj';
|
|
$offset += 6;
|
|
break;
|
|
case 'stre':
|
|
// Streams should always be indirect objects, and thus processed by getRawStream().
|
|
// If we get here, treat it as a null object as something has gone wrong.
|
|
case 'null':
|
|
// null object
|
|
$objtype = PDF_TYPE_NULL;
|
|
$offset += 4;
|
|
$objval = 'null';
|
|
break;
|
|
case 'true':
|
|
// boolean true object
|
|
$objtype = PDF_TYPE_BOOLEAN;
|
|
$offset += 4;
|
|
$objval = true;
|
|
break;
|
|
case 'fals':
|
|
// boolean false object
|
|
$objtype = PDF_TYPE_BOOLEAN;
|
|
$offset += 5;
|
|
$objval = false;
|
|
break;
|
|
case 'ends':
|
|
// end stream object
|
|
$objtype = 'endstream';
|
|
$offset += 9;
|
|
break;
|
|
default:
|
|
if (preg_match('/^([0-9]+)[\s]+([0-9]+)[\s]+([Robj]{1,3})/i', substr($data, $offset, 33), $matches) == 1) {
|
|
if ($matches[3] == 'R') {
|
|
// indirect object reference
|
|
$objtype = PDF_TYPE_OBJREF;
|
|
$offset += strlen($matches[0]);
|
|
$objval = array(intval($matches[1]), intval($matches[2]));
|
|
} elseif ($matches[3] == 'obj') {
|
|
// object start
|
|
$objtype = PDF_TYPE_OBJECT;
|
|
$objval = intval($matches[1]).'_'.intval($matches[2]);
|
|
$offset += strlen ($matches[0]);
|
|
}
|
|
} elseif (($numlen = strspn($data, '+-.0123456789', $offset)) > 0) {
|
|
// numeric object
|
|
$objval = substr($data, $offset, $numlen);
|
|
$objtype = (intval($objval) != $objval) ? PDF_TYPE_REAL : PDF_TYPE_NUMERIC;
|
|
$offset += $numlen;
|
|
}
|
|
unset($matches);
|
|
break;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
$obj = array();
|
|
$obj[] = $objtype;
|
|
if ($objtype == PDF_TYPE_OBJREF && is_array($objval)) {
|
|
foreach ($objval as $val) {
|
|
$obj[] = $val;
|
|
}
|
|
} else {
|
|
$obj[] = $objval;
|
|
}
|
|
return array($obj, $offset);
|
|
}
|
|
private function getDictValue($offset, &$data) {
|
|
$objval = array();
|
|
|
|
// Extract dict from data.
|
|
$i=1;
|
|
$dict = '';
|
|
$offset += 2;
|
|
do {
|
|
if ($data[$offset] == '>' && $data[$offset+1] == '>') {
|
|
$i--;
|
|
$dict .= '>>';
|
|
$offset += 2;
|
|
} else if ($data[$offset] == '<' && $data[$offset+1] == '<') {
|
|
$i++;
|
|
$dict .= '<<';
|
|
$offset += 2;
|
|
} else {
|
|
$dict .= $data[$offset];
|
|
$offset++;
|
|
}
|
|
} while ($i>0);
|
|
|
|
// Now that we have just the dict, parse it.
|
|
$dictoffset = 0;
|
|
do {
|
|
// Get dict element.
|
|
list($key, $eloffset) = $this->getRawObject($dictoffset, $dict);
|
|
if ($key[0] == '>>') {
|
|
break;
|
|
}
|
|
list($element, $dictoffset) = $this->getRawObject($eloffset, $dict);
|
|
$objval['/'.$key[1]] = $element;
|
|
unset($key);
|
|
unset($element);
|
|
} while (true);
|
|
|
|
return array($objval, $offset);
|
|
}
|
|
|
|
/**
|
|
* Get content of indirect object.
|
|
* @param $obj_ref (string) Object number and generation number separated by underscore character.
|
|
* @param $offset (int) Object offset.
|
|
* @param $decoding (boolean) If true decode streams.
|
|
* @return array containing object data.
|
|
* @protected
|
|
* @since 1.0.000 (2011-05-24)
|
|
*/
|
|
protected function getIndirectObject($obj_ref, $offset=0, $decoding=true) {
|
|
$obj = explode('_', $obj_ref);
|
|
if (($obj === false) OR (count($obj) != 2)) {
|
|
$this->Error('Invalid object reference: '.$obj);
|
|
return;
|
|
}
|
|
$objref = $obj[0].' '.$obj[1].' obj';
|
|
|
|
if (strpos($this->pdfdata, $objref, $offset) != $offset) {
|
|
// an indirect reference to an undefined object shall be considered a reference to the null object
|
|
return array('null', 'null', $offset);
|
|
}
|
|
// starting position of object content
|
|
$offset += strlen($objref);
|
|
// get array of object content
|
|
$objdata = array();
|
|
$i = 0; // object main index
|
|
do {
|
|
if (($i > 0) AND (isset($objdata[($i - 1)][0])) AND ($objdata[($i - 1)][0] == PDF_TYPE_DICTIONARY) AND array_key_exists('/Length', $objdata[($i - 1)][1])) {
|
|
// Stream - get using /Length in stream's dict
|
|
$lengthobj = $objdata[($i-1)][1]['/Length'];
|
|
if ($lengthobj[0] === PDF_TYPE_OBJREF) {
|
|
$lengthobj = $this->getObjectVal($lengthobj);
|
|
if ($lengthobj[0] === PDF_TYPE_OBJECT) {
|
|
$lengthobj = $lengthobj[1];
|
|
}
|
|
}
|
|
$streamlength = $lengthobj[1];
|
|
list($element, $offset) = $this->getRawStream($offset, $streamlength);
|
|
} else {
|
|
// get element
|
|
list($element, $offset) = $this->getRawObject($offset);
|
|
}
|
|
// decode stream using stream's dictionary information
|
|
if ($decoding AND ($element[0] == PDF_TYPE_STREAM) AND (isset($objdata[($i - 1)][0])) AND ($objdata[($i - 1)][0] == PDF_TYPE_DICTIONARY)) {
|
|
$element[3] = $this->decodeStream($objdata[($i - 1)][1], $element[1]);
|
|
}
|
|
$objdata[$i] = $element;
|
|
++$i;
|
|
} while ($element[0] != 'endobj');
|
|
// remove closing delimiter
|
|
array_pop($objdata);
|
|
// return raw object content
|
|
return $objdata;
|
|
}
|
|
|
|
/**
|
|
* Get the content of object, resolving indect object reference if necessary.
|
|
* @param $obj (string) Object value.
|
|
* @return array containing object data.
|
|
* @public
|
|
* @since 1.0.000 (2011-06-26)
|
|
*/
|
|
public function getObjectVal($obj) {
|
|
if ($obj[0] == PDF_TYPE_OBJREF) {
|
|
if (strpos($obj[1], '_') !== false) {
|
|
$key = explode('_', $obj[1]);
|
|
} else {
|
|
$key = array($obj[1], $obj[2]);
|
|
}
|
|
|
|
$ret = array(0=>PDF_TYPE_OBJECT, 'obj'=>$key[0], 'gen'=>$key[1]);
|
|
|
|
// reference to indirect object
|
|
$object = null;
|
|
if (isset($this->objects[$key[0]][$key[1]])) {
|
|
// this object has been already parsed
|
|
$object = $this->objects[$key[0]][$key[1]];
|
|
} elseif (($offset = $this->findObjectOffset($key)) !== false) {
|
|
// parse new object
|
|
$this->objects[$key[0]][$key[1]] = $this->getIndirectObject($key[0].'_'.$key[1], $offset, false);
|
|
$object = $this->objects[$key[0]][$key[1]];
|
|
} elseif (($key[1] == 0) && isset($this->objstreamobjs[$key[0]])) {
|
|
// Object is in an object stream
|
|
$streaminfo = $this->objstreamobjs[$key[0]];
|
|
$objs = $streaminfo[0];
|
|
if (!isset($this->objstreams[$objs[0]][$objs[1]])) {
|
|
// Fetch and decode object stream
|
|
$offset = $this->findObjectOffset($objs);;
|
|
$objstream = $this->getObjectVal(array(PDF_TYPE_OBJREF, $objs[0], $objs[1]));
|
|
$decoded = $this->decodeStream($objstream[1][1], $objstream[2][1]);
|
|
$this->objstreams[$objs[0]][$objs[1]] = $decoded[0]; // Store just the data, in case we need more from this objstream
|
|
// Free memory
|
|
unset($objstream);
|
|
unset($decoded);
|
|
}
|
|
$this->objects[$key[0]][$key[1]] = $this->getRawObject($streaminfo[1], $this->objstreams[$objs[0]][$objs[1]]);
|
|
$object = $this->objects[$key[0]][$key[1]];
|
|
}
|
|
if (!is_null($object)) {
|
|
$ret[1] = $object[0];
|
|
if (isset($object[1][0]) && $object[1][0] == PDF_TYPE_STREAM) {
|
|
$ret[0] = PDF_TYPE_STREAM;
|
|
$ret[2] = $object[1];
|
|
}
|
|
return $ret;
|
|
}
|
|
}
|
|
return $obj;
|
|
}
|
|
|
|
/**
|
|
* Extract object stream to find out what it contains.
|
|
*
|
|
*/
|
|
function extractObjectStream($key) {
|
|
$objref = array(PDF_TYPE_OBJREF, $key[0], $key[1]);
|
|
$obj = $this->getObjectVal($objref);
|
|
if ($obj[0] !== PDF_TYPE_STREAM || !isset($obj[1][1]['/First'][1])) {
|
|
// Not a valid object stream dictionary - skip it.
|
|
return;
|
|
}
|
|
$stream = $this->decodeStream($obj[1][1], $obj[2][1]);// Decode object stream, as we need the first bit
|
|
$first = intval($obj[1][1]['/First'][1]);
|
|
$ints = preg_split('/\s/', substr($stream[0], 0, $first)); // Get list of object / offset pairs
|
|
for ($j=1; $j<count($ints); $j++) {
|
|
if (($j % 2) == 1) {
|
|
$this->objstreamobjs[$ints[$j-1]] = array($key, $ints[$j]+$first);
|
|
}
|
|
}
|
|
|
|
// Free memory - we may not need this at all.
|
|
unset($obj);
|
|
unset($stream);
|
|
}
|
|
|
|
/**
|
|
* Find all object offsets. Saves having to scour the file multiple times.
|
|
* @private
|
|
*/
|
|
private function findObjectOffsets() {
|
|
$this->objoffsets = array();
|
|
if (preg_match_all('/(*ANYCRLF)^[\s]*([0-9]+)[\s]+([0-9]+)[\s]+obj/im', $this->pdfdata, $matches, PREG_OFFSET_CAPTURE) >= 1) {
|
|
$i = 0;
|
|
$laststreamend = 0;
|
|
foreach($matches[0] as $match) {
|
|
$offset = $match[1] + strspn($match[0], "\x00\x09\x0a\x0c\x0d\x20");
|
|
if ($offset < $laststreamend) {
|
|
// Contained within another stream, skip it.
|
|
continue;
|
|
}
|
|
$this->objoffsets[trim($match[0])] = $offset;
|
|
$dictoffset = $match[1] + strlen($match[0]);
|
|
$dictfrag = substr($this->pdfdata, $dictoffset, 256);
|
|
if (preg_match('|^\s+<<[^>]+/Length\s+(\d+)|', $dictfrag, $lengthmatch, PREG_OFFSET_CAPTURE) == 1) {
|
|
$laststreamend += intval($lengthmatch[1][0]);
|
|
}
|
|
if (preg_match('|^\s+<<[^>]+/ObjStm|', $dictfrag, $objstm) == 1) {
|
|
$this->extractObjectStream(array($matches[1][$i][0], $matches[2][$i][0]));
|
|
}
|
|
$i++;
|
|
}
|
|
}
|
|
unset($lengthmatch);
|
|
unset($dictfrag);
|
|
unset($matches);
|
|
}
|
|
|
|
/**
|
|
* Get offset of an object. Checks xref first, then offsets found by scouring the file.
|
|
* @param $key (array) Object key to find (obj, gen).
|
|
* @return int Offset of the object in $this->pdfdata.
|
|
* @private
|
|
*/
|
|
private function findObjectOffset($key) {
|
|
$objref = $key[0].' '.$key[1].' obj';
|
|
if (isset($this->xref['xref'][$key[0]][$key[1]])) {
|
|
$offset = $this->xref['xref'][$key[0]][$key[1]];
|
|
if (strpos($this->pdfdata, $objref, $offset) === $offset) {
|
|
// Offset is in xref table and matches actual position in file
|
|
//echo "Offset in XREF is correct, returning<br>";
|
|
return $this->xref['xref'][$key[0]][$key[1]];
|
|
}
|
|
}
|
|
if (array_key_exists($objref, $this->objoffsets)) {
|
|
//echo "Offset found in internal reftable<br>";
|
|
return $this->objoffsets[$objref];
|
|
}
|
|
return false;
|
|
}
|
|
|
|
/**
|
|
* Decode the specified stream.
|
|
* @param $sdic (array) Stream's dictionary array.
|
|
* @param $stream (string) Stream to decode.
|
|
* @return array containing decoded stream data and remaining filters.
|
|
* @protected
|
|
* @since 1.0.000 (2011-06-22)
|
|
*/
|
|
protected function decodeStream($sdic, $stream) {
|
|
// get stream lenght and filters
|
|
$slength = strlen($stream);
|
|
if ($slength <= 0) {
|
|
return array('', array());
|
|
}
|
|
$filters = array();
|
|
foreach ($sdic as $k => $v) {
|
|
if ($v[0] == PDF_TYPE_TOKEN) {
|
|
if (($k == '/Length') AND ($v[0] == PDF_TYPE_NUMERIC)) {
|
|
// get declared stream lenght
|
|
$declength = intval($v[1]);
|
|
if ($declength < $slength) {
|
|
$stream = substr($stream, 0, $declength);
|
|
$slength = $declength;
|
|
}
|
|
} elseif ($k == '/Filter') {
|
|
if ($v[0] == PDF_TYPE_TOKEN) {
|
|
// single filter
|
|
$filters[] = $v[1];
|
|
} elseif ($v[0] == PDF_TYPE_ARRAY) {
|
|
// array of filters
|
|
foreach ($v[1] as $flt) {
|
|
if ($flt[0] == PDF_TYPE_TOKEN) {
|
|
$filters[] = $flt[1];
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
// decode the stream
|
|
$remaining_filters = array();
|
|
foreach ($filters as $filter) {
|
|
if (in_array($filter, $this->FilterDecoders->getAvailableFilters())) {
|
|
$stream = $this->FilterDecoders->decodeFilter($filter, $stream);
|
|
} else {
|
|
// add missing filter to array
|
|
$remaining_filters[] = $filter;
|
|
}
|
|
}
|
|
return array($stream, $remaining_filters);
|
|
}
|
|
|
|
|
|
/**
|
|
* Set pageno
|
|
*
|
|
* @param int $pageno Pagenumber to use
|
|
*/
|
|
public function setPageno($pageno) {
|
|
$pageno = ((int) $pageno) - 1;
|
|
|
|
if ($pageno < 0 || $pageno >= $this->getPageCount()) {
|
|
$this->error("Pagenumber is wrong! (Requested $pageno, max ".$this->getPageCount().")");
|
|
}
|
|
|
|
$this->pageno = $pageno;
|
|
}
|
|
|
|
/**
|
|
* Get page-resources from current page
|
|
*
|
|
* @return array
|
|
*/
|
|
public function getPageResources() {
|
|
return $this->_getPageResources($this->pages[$this->pageno]);
|
|
}
|
|
|
|
/**
|
|
* Get page-resources from /Page
|
|
*
|
|
* @param array $obj Array of pdf-data
|
|
*/
|
|
private function _getPageResources ($obj) { // $obj = /Page
|
|
$obj = $this->getObjectVal($obj);
|
|
|
|
// If the current object has a resources
|
|
// dictionary associated with it, we use
|
|
// it. Otherwise, we move back to its
|
|
// parent object.
|
|
if (isset ($obj[1][1]['/Resources'])) {
|
|
$res = $obj[1][1]['/Resources'];
|
|
if ($res[0] == PDF_TYPE_OBJECT)
|
|
return $res[1];
|
|
return $res;
|
|
} else {
|
|
if (!isset ($obj[1][1]['/Parent'])) {
|
|
return false;
|
|
} else {
|
|
$res = $this->_getPageResources($obj[1][1]['/Parent']);
|
|
if ($res[0] == PDF_TYPE_OBJECT)
|
|
return $res[1];
|
|
return $res;
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Get annotations from current page
|
|
*
|
|
* @return array
|
|
*/
|
|
public function getPageAnnotations() {
|
|
return $this->_getPageAnnotations($this->pages[$this->pageno]);
|
|
}
|
|
|
|
/**
|
|
* Get annotations from /Page
|
|
*
|
|
* @param array $obj Array of pdf-data
|
|
*/
|
|
private function _getPageAnnotations ($obj) { // $obj = /Page
|
|
$obj = $this->getObjectVal($obj);
|
|
|
|
// If the current object has an annotations
|
|
// dictionary associated with it, we use
|
|
// it. Otherwise, we move back to its
|
|
// parent object.
|
|
if (isset ($obj[1][1]['/Annots'])) {
|
|
$annots = $obj[1][1]['/Annots'];
|
|
} else {
|
|
if (!isset ($obj[1][1]['/Parent'])) {
|
|
return false;
|
|
} else {
|
|
$annots = $this->_getPageAnnotations($obj[1][1]['/Parent']);
|
|
}
|
|
}
|
|
|
|
if ($annots[0] == PDF_TYPE_OBJREF)
|
|
return $this->getObjectVal($annots);
|
|
return $annots;
|
|
}
|
|
|
|
|
|
/**
|
|
* Get content of current page
|
|
*
|
|
* If more /Contents is an array, the streams are concated
|
|
*
|
|
* @return string
|
|
*/
|
|
public function getContent() {
|
|
$buffer = '';
|
|
|
|
if (isset($this->pages[$this->pageno][1][1]['/Contents'])) {
|
|
$contents = $this->_getPageContent($this->pages[$this->pageno][1][1]['/Contents']);
|
|
foreach($contents AS $tmp_content) {
|
|
$buffer .= $this->_rebuildContentStream($tmp_content) . ' ';
|
|
}
|
|
}
|
|
|
|
return $buffer;
|
|
}
|
|
|
|
|
|
/**
|
|
* Resolve all content-objects
|
|
*
|
|
* @param array $content_ref
|
|
* @return array
|
|
*/
|
|
private function _getPageContent($content_ref) {
|
|
$contents = array();
|
|
|
|
if ($content_ref[0] == PDF_TYPE_OBJREF) {
|
|
$content = $this->getObjectVal($content_ref);
|
|
if ($content[1][0] == PDF_TYPE_ARRAY) {
|
|
$contents = $this->_getPageContent($content[1]);
|
|
} else {
|
|
$contents[] = $content;
|
|
}
|
|
} elseif ($content_ref[0] == PDF_TYPE_ARRAY) {
|
|
foreach ($content_ref[1] AS $tmp_content_ref) {
|
|
$contents = array_merge($contents,$this->_getPageContent($tmp_content_ref));
|
|
}
|
|
}
|
|
|
|
return $contents;
|
|
}
|
|
|
|
|
|
/**
|
|
* Rebuild content-streams
|
|
*
|
|
* @param array $obj
|
|
* @return string
|
|
*/
|
|
private function _rebuildContentStream($obj) {
|
|
$filters = array();
|
|
|
|
if (isset($obj[1][1]['/Filter'])) {
|
|
$_filter = $obj[1][1]['/Filter'];
|
|
|
|
if ($_filter[0] == PDF_TYPE_OBJREF) {
|
|
$tmpFilter = $this->getObjectVal($_filter);
|
|
$_filter = $tmpFilter[1];
|
|
}
|
|
|
|
if ($_filter[0] == PDF_TYPE_TOKEN) {
|
|
$filters[] = $_filter;
|
|
} elseif ($_filter[0] == PDF_TYPE_ARRAY) {
|
|
$filters = $_filter[1];
|
|
}
|
|
}
|
|
|
|
$stream = $obj[2][1];
|
|
|
|
foreach ($filters AS $_filter) {
|
|
$stream = $this->FilterDecoders->decodeFilter($_filter[1], $stream);
|
|
}
|
|
|
|
return $stream;
|
|
}
|
|
|
|
|
|
/**
|
|
* Get a Box from a page
|
|
* Arrayformat is same as used by fpdf_tpl
|
|
*
|
|
* @param array $page a /Page
|
|
* @param string $box_index Type of Box @see $availableBoxes
|
|
* @param float Scale factor from user space units to points
|
|
* @return array
|
|
*/
|
|
public function getPageBox($page, $box_index, $k) {
|
|
$page = $this->getObjectVal($page);
|
|
$box = null;
|
|
if (isset($page[1][1][$box_index]))
|
|
$box =& $page[1][1][$box_index];
|
|
|
|
if (!is_null($box) && $box[0] == PDF_TYPE_OBJREF) {
|
|
$tmp_box = $this->getObjectVal($box);
|
|
$box = $tmp_box[1];
|
|
}
|
|
|
|
if (!is_null($box) && $box[0] == PDF_TYPE_ARRAY) {
|
|
$b =& $box[1];
|
|
return array('x' => $b[0][1] / $k,
|
|
'y' => $b[1][1] / $k,
|
|
'w' => abs($b[0][1] - $b[2][1]) / $k,
|
|
'h' => abs($b[1][1] - $b[3][1]) / $k,
|
|
'llx' => min($b[0][1], $b[2][1]) / $k,
|
|
'lly' => min($b[1][1], $b[3][1]) / $k,
|
|
'urx' => max($b[0][1], $b[2][1]) / $k,
|
|
'ury' => max($b[1][1], $b[3][1]) / $k,
|
|
);
|
|
} elseif (!isset ($page[1][1]['/Parent'])) {
|
|
return false;
|
|
} else {
|
|
return $this->getPageBox($this->getObjectVal($page[1][1]['/Parent']), $box_index, $k);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Get all page boxes by page no
|
|
*
|
|
* @param int The page number
|
|
* @param float Scale factor from user space units to points
|
|
* @return array
|
|
*/
|
|
public function getPageBoxes($pageno, $k) {
|
|
return $this->_getPageBoxes($this->pages[$pageno - 1], $k);
|
|
}
|
|
|
|
/**
|
|
* Get all boxes from /Page
|
|
*
|
|
* @param array a /Page
|
|
* @return array
|
|
*/
|
|
private function _getPageBoxes($page, $k) {
|
|
$boxes = array();
|
|
|
|
foreach($this->availableBoxes AS $box) {
|
|
if ($_box = $this->getPageBox($page, $box, $k)) {
|
|
$boxes[$box] = $_box;
|
|
}
|
|
}
|
|
|
|
return $boxes;
|
|
}
|
|
|
|
/**
|
|
* Get the page rotation by pageno
|
|
*
|
|
* @param integer $pageno
|
|
* @return array
|
|
*/
|
|
public function getPageRotation($pageno) {
|
|
return $this->_getPageRotation($this->pages[$pageno - 1]);
|
|
}
|
|
|
|
private function _getPageRotation($obj) { // $obj = /Page
|
|
$obj = $this->getObjectVal($obj);
|
|
if (isset ($obj[1][1]['/Rotate'])) {
|
|
$res = $this->getObjectVal($obj[1][1]['/Rotate']);
|
|
if (isset($res[0]) && $res[0] == PDF_TYPE_OBJECT)
|
|
return $res[1];
|
|
return $res;
|
|
} else {
|
|
if (!isset ($obj[1][1]['/Parent'])) {
|
|
return false;
|
|
} else {
|
|
$res = $this->_getPageRotation($obj[1][1]['/Parent']);
|
|
if (isset($res[0]) && $res[0] == PDF_TYPE_OBJECT)
|
|
return $res[1];
|
|
return $res;
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* This method is automatically called in case of fatal error; it simply outputs the message and halts the execution.
|
|
* @param $msg (string) The error message
|
|
* @public
|
|
* @since 1.0.000 (2011-05-23)
|
|
*/
|
|
public function Error($msg) {
|
|
// Respect K_TCPDF_THROW_EXCEPTION_ERROR like TCPDF does
|
|
if (defined('K_TCPDF_THROW_EXCEPTION_ERROR') && K_TCPDF_THROW_EXCEPTION_ERROR) {
|
|
throw new \Exception("TCPDI_PARSER ERROR [{$this->uniqueid}]: ".$msg);
|
|
}
|
|
// Default: exit program and print error
|
|
die("<strong>TCPDI_PARSER ERROR [{$this->uniqueid}]: </strong>".$msg);
|
|
}
|
|
|
|
} // END OF TCPDF_PARSER CLASS
|
|
|
|
//============================================================+
|
|
// END OF FILE
|
|
//============================================================+
|