2689 lines
85 KiB
PHP
2689 lines
85 KiB
PHP
|
<?php
|
|||
|
|
/*******************************************************************************
|
|||
|
|
* Software: FPDF *
|
|||
|
|
* Version: 1.53 *
|
|||
|
|
* Date: 2004-12-31 *
|
|||
|
|
* Author: Olivier PLATHEY *
|
|||
|
|
* License: Freeware *
|
|||
|
|
* *
|
|||
|
|
* You may use, modify and redistribute this software as you wish. *
|
|||
|
|
*******************************************************************************/
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Heavily patched to adapt to the HTML2PS/HTML2PDF script requirements by
|
|||
|
|
* Konstantin Bournayev (bkon@bkon.ru)
|
|||
|
|
*/
|
|||
|
|
|
|||
|
|
if (!class_exists('FPDF')) {
|
|||
|
|
define('FPDF_VERSION','1.53');
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* FPDF state flags
|
|||
|
|
*/
|
|||
|
|
define('FPDF_STATE_UNINITIALIZED', 0);
|
|||
|
|
define('FPDF_STATE_DOCUMENT_STARTED', 1);
|
|||
|
|
define('FPDF_STATE_PAGE_STARTED', 2);
|
|||
|
|
define('FPDF_STATE_COMPLETED', 3);
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* See PDF Reference 1.6 p.664 for explanation of flags specific to submit form action
|
|||
|
|
*/
|
|||
|
|
define('PDF_SUBMIT_FORM_HTML', 1 << 2); // 1 - HTML, 0 - FDF
|
|||
|
|
define('PDF_SUBMIT_FORM_COORDINATES', 1 << 4);
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* See PDF Reference 1.6 p.656 for explanation of flags specific to choice fields
|
|||
|
|
*/
|
|||
|
|
define('PDF_FIELD_CHOICE_COMBO', 1 << 17);
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* See PDF Reference 1.6 p.573 for explanation of flag specific to annotations
|
|||
|
|
*/
|
|||
|
|
define('PDF_ANNOTATION_INVISIBLE', 1 << 0);
|
|||
|
|
define('PDF_ANNOTATION_HIDDEN', 1 << 1);
|
|||
|
|
define('PDF_ANNOTATION_PRINTABLE', 1 << 2);
|
|||
|
|
define('PDF_ANNOTATION_NOZOOM', 1 << 3);
|
|||
|
|
define('PDF_ANNOTATION_NOROTATE', 1 << 4);
|
|||
|
|
define('PDF_ANNOTATION_NOVIEW', 1 << 5);
|
|||
|
|
define('PDF_ANNOTATION_READONLY', 1 << 6);
|
|||
|
|
define('PDF_ANNOTATION_LOCKED', 1 << 7);
|
|||
|
|
define('PDF_ANNOTATION_TOGGLENOVIEW', 1 << 8);
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* See PDF Reference 1.6 p.653 for explanation of flags specific to text fields
|
|||
|
|
*/
|
|||
|
|
define('PDF_FIELD_TEXT_MULTILINE',1 << 12);
|
|||
|
|
define('PDF_FIELD_TEXT_PASSWORD', 1 << 13);
|
|||
|
|
define('PDF_FIELD_TEXT_FILE', 1 << 20);
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* See PDF Reference 1.6 p.663 for examplanation of flags specific to for submit actions
|
|||
|
|
*/
|
|||
|
|
define("PDF_FORM_SUBMIT_EXCLUDE", 1 << 0);
|
|||
|
|
define("PDF_FORM_SUBMIT_NOVALUE", 1 << 1);
|
|||
|
|
define("PDF_FORM_SUBMIT_EFORMAT", 1 << 2);
|
|||
|
|
define("PDF_FORM_SUBMIT_GET", 1 << 3);
|
|||
|
|
|
|||
|
|
class PDFIndirectObject {
|
|||
|
|
var $object_id;
|
|||
|
|
var $generation_id;
|
|||
|
|
|
|||
|
|
function get_object_id() {
|
|||
|
|
return $this->object_id;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function get_generation_id() {
|
|||
|
|
return $this->generation_id;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Outputs the PDF indirect object to PDF file.
|
|||
|
|
*
|
|||
|
|
* To pervent infinite loop on circular references, this method checks
|
|||
|
|
* if current object have been already written to the file.
|
|||
|
|
*
|
|||
|
|
* Note that, in general, nested objects should be written to PDF file
|
|||
|
|
* here too; this task is accomplished by calling _out_nested method,
|
|||
|
|
* which should be overridden by children classes.
|
|||
|
|
*
|
|||
|
|
* @param FPDF $handler PDF file wrapper (FPDF object)
|
|||
|
|
*
|
|||
|
|
* @final
|
|||
|
|
*
|
|||
|
|
* @see FPDF::is_object_written
|
|||
|
|
* @see PDFIndirectObject::_out_nested
|
|||
|
|
*/
|
|||
|
|
function out(&$handler) {
|
|||
|
|
if (!$handler->is_object_written($this->get_object_id())) {
|
|||
|
|
$handler->offsets[$this->get_object_id()] = strlen($handler->buffer);
|
|||
|
|
$handler->_out($handler->_indirect_object($this));
|
|||
|
|
|
|||
|
|
$this->_out_nested($handler);
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Writes all nested objects to the PDF file. Should be overridden by
|
|||
|
|
* PDFIndirectObject descendants.
|
|||
|
|
*
|
|||
|
|
* @param FPDF $handler PDF file wrapper (FPDF object)
|
|||
|
|
*
|
|||
|
|
* @see PDFIndirectObject::out
|
|||
|
|
*/
|
|||
|
|
function _out_nested(&$handler) {
|
|||
|
|
return true;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function PDFIndirectObject(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id) {
|
|||
|
|
$this->object_id = $object_id;
|
|||
|
|
$this->generation_id = $generation_id;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function pdf(&$handler) {
|
|||
|
|
return $handler->_dictionary($this->_dict($handler));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _dict() {
|
|||
|
|
return array();
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
class PDFCMap extends PDFIndirectObject {
|
|||
|
|
var $_content;
|
|||
|
|
|
|||
|
|
function PDFCMap($mapping, &$handler, $object_id, $generation_id) {
|
|||
|
|
$this->PDFIndirectObject($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id);
|
|||
|
|
|
|||
|
|
$num_chars = count($mapping);
|
|||
|
|
|
|||
|
|
$chars = "";
|
|||
|
|
foreach ($mapping as $code => $utf) {
|
|||
|
|
$chars .= sprintf("<%02X> <%04X> \n", $code, $utf);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$this->_content = <<<EOF
|
|||
|
|
/CIDInit /ProcSet findresource begin
|
|||
|
|
12 dict begin
|
|||
|
|
begincmap
|
|||
|
|
CIDSystemInfo
|
|||
|
|
<< /Registry (Adobe)
|
|||
|
|
/Ordering (UCS) /Supplement 0 >> def
|
|||
|
|
/CMapName /Adobe-Identity-UCS def
|
|||
|
|
/CMapType 2 def
|
|||
|
|
1 begincodespacerange
|
|||
|
|
<0000> <FFFF>
|
|||
|
|
endcodespacerange
|
|||
|
|
${num_chars} beginbfchar
|
|||
|
|
${chars}
|
|||
|
|
endbfchar
|
|||
|
|
endcmap CMapName currentdict /CMap defineresource pop end end
|
|||
|
|
EOF
|
|||
|
|
;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function pdf(&$handler) {
|
|||
|
|
$dict_content = array(
|
|||
|
|
'Length' => strlen($this->_content)
|
|||
|
|
);
|
|||
|
|
|
|||
|
|
$content = $handler->_dictionary($dict_content);
|
|||
|
|
$content .= "\n";
|
|||
|
|
$content .= $handler->_stream($this->_content);
|
|||
|
|
|
|||
|
|
return $content;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
class PDFPage extends PDFIndirectObject {
|
|||
|
|
var $annotations;
|
|||
|
|
|
|||
|
|
function PDFPage(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id) {
|
|||
|
|
$this->PDFIndirectObject($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function add_annotation(&$annotation) {
|
|||
|
|
$this->annotations[] =& $annotation;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _annotations(&$handler) {
|
|||
|
|
return $handler->_reference_array($this->annotations);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
class PDFAppearanceStream extends PDFIndirectObject {
|
|||
|
|
var $_content;
|
|||
|
|
|
|||
|
|
function PDFAppearanceStream(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$content) {
|
|||
|
|
$this->PDFIndirectObject($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id);
|
|||
|
|
|
|||
|
|
$this->_content = $content;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function pdf(&$handler) {
|
|||
|
|
$dict_content = array(
|
|||
|
|
'Type' => "/XObject",
|
|||
|
|
'Subtype' => "/Form",
|
|||
|
|
'FormType' => "1",
|
|||
|
|
'BBox' => "[0 0 100 100]",
|
|||
|
|
'Matrix' => "[1 0 0 1 0 0]",
|
|||
|
|
'Resources'=> "2 0 R",
|
|||
|
|
'Length' => strlen($this->_content)
|
|||
|
|
);
|
|||
|
|
|
|||
|
|
$content = $handler->_dictionary($dict_content);
|
|||
|
|
$content .= "\n";
|
|||
|
|
$content .= $handler->_stream($this->_content);
|
|||
|
|
|
|||
|
|
return $content;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
class PDFAnnotation extends PDFIndirectObject {
|
|||
|
|
function PDFAnnotation(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id) {
|
|||
|
|
$this->PDFIndirectObject($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _dict(&$handler) {
|
|||
|
|
return array_merge(parent::_dict($handler),
|
|||
|
|
array("Type" => $handler->_name("Annot")));
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
class PDFRect {
|
|||
|
|
var $x;
|
|||
|
|
var $y;
|
|||
|
|
var $w;
|
|||
|
|
var $h;
|
|||
|
|
|
|||
|
|
function PDFRect($x,$y,$w,$h) {
|
|||
|
|
$this->x = $x;
|
|||
|
|
$this->y = $y;
|
|||
|
|
$this->w = $w;
|
|||
|
|
$this->h = $h;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function left(&$handler) {
|
|||
|
|
return $handler->x_coord($this->x);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function right(&$handler) {
|
|||
|
|
return $handler->x_coord($this->x+$this->w);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function top(&$handler) {
|
|||
|
|
return $handler->y_coord($this->y);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function bottom(&$handler) {
|
|||
|
|
return $handler->y_coord($this->y+$this->h);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function pdf(&$handler) {
|
|||
|
|
return $handler->_array(sprintf("%.2f %.2f %.2f %.2f",
|
|||
|
|
$this->left($handler),
|
|||
|
|
$this->top($handler),
|
|||
|
|
$this->right($handler),
|
|||
|
|
$this->bottom($handler)));
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
class PDFAnnotationExternalLink extends PDFAnnotation {
|
|||
|
|
var $rect;
|
|||
|
|
var $link;
|
|||
|
|
|
|||
|
|
function PDFAnnotationExternalLink(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$link) {
|
|||
|
|
$this->PDFAnnotation($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id);
|
|||
|
|
|
|||
|
|
$this->rect = $rect;
|
|||
|
|
$this->link = $link;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _dict(&$handler) {
|
|||
|
|
return array_merge(parent::_dict($handler),
|
|||
|
|
array(
|
|||
|
|
'Subtype' => "/Link",
|
|||
|
|
'Rect' => $this->rect->pdf($handler),
|
|||
|
|
'Border' => "[0 0 0]",
|
|||
|
|
'A' => "<</S /URI /URI ".$handler->_textstring($this->link).">>"
|
|||
|
|
));
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
class PDFAnnotationInternalLink extends PDFAnnotation {
|
|||
|
|
var $rect;
|
|||
|
|
var $link;
|
|||
|
|
|
|||
|
|
function PDFAnnotationInternalLink(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$link) {
|
|||
|
|
$this->PDFAnnotation($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id);
|
|||
|
|
|
|||
|
|
$this->rect = $rect;
|
|||
|
|
$this->link = $link;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function pdf(&$handler) {
|
|||
|
|
if ($handler->DefOrientation=='P') {
|
|||
|
|
$wPt=$handler->fwPt;
|
|||
|
|
$hPt=$handler->fhPt;
|
|||
|
|
} else {
|
|||
|
|
$wPt=$handler->fhPt;
|
|||
|
|
$hPt=$handler->fwPt;
|
|||
|
|
};
|
|||
|
|
$l = $handler->links[$this->link];
|
|||
|
|
$h = $hPt;
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Sometimes hyperlinks may refer to pages NOT present in PDF document
|
|||
|
|
* Example: a very long frame content; it it trimmed to one page, as
|
|||
|
|
* framesets newer take more than one frame. A link targe which should be rendered
|
|||
|
|
* on third page without frames will be never rendered at all.
|
|||
|
|
*
|
|||
|
|
* In this case we should disable link at all to prevent error from appearing
|
|||
|
|
*/
|
|||
|
|
|
|||
|
|
if (!isset($handler->_pages[$l[0]-1])) {
|
|||
|
|
return "";
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$content = $handler->_dictionary(array(
|
|||
|
|
'Type' => "/Annot",
|
|||
|
|
'Subtype' => "/Link",
|
|||
|
|
'Rect' => $this->rect->pdf($handler),
|
|||
|
|
'Border' => "[0 0 0]",
|
|||
|
|
'Dest' => sprintf("[%s /XYZ 0 %.2f null]",
|
|||
|
|
$handler->_reference($handler->_pages[$l[0]-1]),
|
|||
|
|
$h-$l[1]*$handler->k)
|
|||
|
|
));
|
|||
|
|
return $content;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
class PDFAnnotationWidget extends PDFAnnotation {
|
|||
|
|
var $_rect;
|
|||
|
|
|
|||
|
|
function PDFAnnotationWidget(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect) {
|
|||
|
|
$this->PDFAnnotation($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id);
|
|||
|
|
|
|||
|
|
$this->_rect = $rect;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _dict(&$handler) {
|
|||
|
|
return array_merge(parent::_dict($handler),
|
|||
|
|
array("Subtype" => $handler->_name("Widget"),
|
|||
|
|
'Rect' => $this->_rect->pdf($handler)));
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Generic PDF Form
|
|||
|
|
*/
|
|||
|
|
class PDFFieldGroup extends PDFIndirectObject {
|
|||
|
|
var $_kids;
|
|||
|
|
var $_group_name;
|
|||
|
|
|
|||
|
|
function PDFFieldGroup(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$group_name) {
|
|||
|
|
$this->PDFIndirectObject($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id);
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Generate default group name, if needed
|
|||
|
|
*/
|
|||
|
|
if (is_null($group_name) || $group_name == "") {
|
|||
|
|
$group_name = sprintf("FieldGroup%d", $this->get_object_id());
|
|||
|
|
};
|
|||
|
|
$this->_group_name = $group_name;
|
|||
|
|
|
|||
|
|
$this->_kids = array();
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _check_field_name($field) {
|
|||
|
|
/**
|
|||
|
|
* Check if field name is empty
|
|||
|
|
*/
|
|||
|
|
if (trim($field->get_field_name()) == "") {
|
|||
|
|
error_log(sprintf("Found form field with empty name"));
|
|||
|
|
return false;
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Check if field name is unique inside this form! If we will not do it,
|
|||
|
|
* some widgets may become inactive (ignored by PDF Reader)
|
|||
|
|
*/
|
|||
|
|
foreach ($this->_kids as $kid) {
|
|||
|
|
if ($kid->get_field_name() == $field->get_field_name()) {
|
|||
|
|
error_log(sprintf("Interactive form '%s' already contains field named '%s'",
|
|||
|
|
$this->_group_name,
|
|||
|
|
$kid->get_field_name()));
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
return true;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function add_field(&$field) {
|
|||
|
|
if (!$this->_check_field_name($field)) {
|
|||
|
|
/**
|
|||
|
|
* Field name is not unique; replace it with automatically-generated one
|
|||
|
|
*/
|
|||
|
|
$field->set_field_name(sprintf("%s_FieldObject%d",
|
|||
|
|
$field->get_field_name(),
|
|||
|
|
$field->get_object_id()));
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$this->_kids[] =& $field;
|
|||
|
|
$field->set_parent($this);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _dict(&$handler) {
|
|||
|
|
return array_merge(parent::_dict($handler),
|
|||
|
|
array("Kids" => $handler->_reference_array($this->_kids),
|
|||
|
|
"T" => $handler->_textstring($this->_group_name)));
|
|||
|
|
return $content;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _out_nested(&$handler) {
|
|||
|
|
parent::_out_nested($handler);
|
|||
|
|
|
|||
|
|
foreach ($this->_kids as $field) {
|
|||
|
|
$field->out($handler);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Generic superclass for all PDF interactive field widgets
|
|||
|
|
*/
|
|||
|
|
class PDFField extends PDFAnnotationWidget {
|
|||
|
|
/**
|
|||
|
|
* @var string Partial field name (see PDF Specification 1.6 p.638 for explanation on "partial" and
|
|||
|
|
* "fully qualified" field names
|
|||
|
|
* @access private
|
|||
|
|
*/
|
|||
|
|
var $_field_name;
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* @var PDFFieldGroup REference to a containing form object
|
|||
|
|
* @access private
|
|||
|
|
*/
|
|||
|
|
var $_parent;
|
|||
|
|
|
|||
|
|
function PDFField(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$field_name) {
|
|||
|
|
$this->PDFAnnotationWidget($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect);
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Generate default field name, if needed
|
|||
|
|
* @TODO: validate field_name contents
|
|||
|
|
*/
|
|||
|
|
if (is_null($field_name) || $field_name == "") {
|
|||
|
|
$field_name = sprintf("FieldObject%d", $this->get_object_id());
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$this->_field_name = $field_name;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function get_field_name() {
|
|||
|
|
if ($this->_field_name) {
|
|||
|
|
return $this->_field_name;
|
|||
|
|
} else {
|
|||
|
|
return sprintf("FormObject%d", $this->get_object_id());
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _dict(&$handler) {
|
|||
|
|
return array_merge(parent::_dict($handler),
|
|||
|
|
array("Parent" => $handler->_reference($this->_parent),
|
|||
|
|
"T" => $handler->_textstring($this->get_field_name()),
|
|||
|
|
'F' => PDF_ANNOTATION_PRINTABLE));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function pdf(&$handler) {
|
|||
|
|
return $handler->_dictionary($this->_dict($handler));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function set_field_name($value) {
|
|||
|
|
$this->_field_name = $value;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function set_parent(&$form) {
|
|||
|
|
$this->_parent =& $form;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function get_parent() {
|
|||
|
|
return $this->_parent;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Checkbox interactive form widget
|
|||
|
|
*/
|
|||
|
|
class PDFFieldCheckBox extends PDFField {
|
|||
|
|
var $_value;
|
|||
|
|
var $_appearance_on;
|
|||
|
|
var $_appearance_off;
|
|||
|
|
var $_checked;
|
|||
|
|
|
|||
|
|
function PDFFieldCheckBox(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$field_name,
|
|||
|
|
$value,
|
|||
|
|
$checked) {
|
|||
|
|
$this->PDFField($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$field_name);
|
|||
|
|
|
|||
|
|
$this->_value = $value;
|
|||
|
|
$this->_checked = $checked;
|
|||
|
|
|
|||
|
|
$this->_appearance_on = new PDFAppearanceStream($handler,
|
|||
|
|
$handler->_generate_new_object_number(),
|
|||
|
|
$generation_id,
|
|||
|
|
"Q 0 0 1 rg BT /F1 10 Tf 0 0 Td (8) Tj ET q");
|
|||
|
|
|
|||
|
|
$this->_appearance_off = new PDFAppearanceStream($handler,
|
|||
|
|
$handler->_generate_new_object_number(),
|
|||
|
|
$generation_id,
|
|||
|
|
"Q 0 0 1 rg BT /F1 10 Tf 0 0 Td (8) Tj ET q");
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _dict(&$handler) {
|
|||
|
|
return array_merge(parent::_dict($handler),
|
|||
|
|
array(
|
|||
|
|
'FT' => '/Btn',
|
|||
|
|
'Ff' => sprintf("%d", 0),
|
|||
|
|
'TU' => "<FEFF>",
|
|||
|
|
'MK' => "<< /CA (3) >>",
|
|||
|
|
'DV' => $this->_checked ? $handler->_name($this->_value) : "/Off",
|
|||
|
|
'V' => $this->_checked ? $handler->_name($this->_value) : "/Off",
|
|||
|
|
'AP' => sprintf("<< /N << /%s %s /Off %s >> >>",
|
|||
|
|
$this->_value,
|
|||
|
|
$handler->_reference($this->_appearance_on),
|
|||
|
|
$handler->_reference($this->_appearance_off))
|
|||
|
|
)
|
|||
|
|
);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _out_nested(&$handler) {
|
|||
|
|
parent::_out_nested($handler);
|
|||
|
|
|
|||
|
|
$this->_appearance_on->out($handler);
|
|||
|
|
$this->_appearance_off->out($handler);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
class PDFFieldPushButton extends PDFField {
|
|||
|
|
var $_appearance;
|
|||
|
|
var $fontindex;
|
|||
|
|
var $fontsize;
|
|||
|
|
|
|||
|
|
function _out_nested(&$handler) {
|
|||
|
|
parent::_out_nested($handler);
|
|||
|
|
|
|||
|
|
$this->_appearance->out($handler);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function PDFFieldPushButton(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$fontindex,
|
|||
|
|
$fontsize) {
|
|||
|
|
$this->PDFField($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
null);
|
|||
|
|
$this->fontindex = $fontindex;
|
|||
|
|
$this->fontsize = $fontsize;
|
|||
|
|
|
|||
|
|
$this->_appearance = new PDFAppearanceStream($handler,
|
|||
|
|
$handler->_generate_new_object_number(),
|
|||
|
|
$generation_id,
|
|||
|
|
"Q 0 0 1 rg BT /F1 10 Tf 0 0 Td (8) Tj ET q");
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _action(&$handler) {
|
|||
|
|
return "<< >>";
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _dict(&$handler) {
|
|||
|
|
return array_merge(parent::_dict($handler),
|
|||
|
|
array(
|
|||
|
|
'FT' => '/Btn',
|
|||
|
|
'Ff' => sprintf("%d", 1 << 16),
|
|||
|
|
'TU' => "<FEFF>",
|
|||
|
|
'DR' => "2 0 R",
|
|||
|
|
'DA' => sprintf("(0 0 0 rg /F%d %.2f Tf)",
|
|||
|
|
$this->fontindex,
|
|||
|
|
$this->fontsize),
|
|||
|
|
'AP' => "<< /N ".$handler->_reference($this->_appearance)." >>",
|
|||
|
|
'AA' => $this->_action($handler)
|
|||
|
|
));
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
class PDFFieldPushButtonImage extends PDFFieldPushButton {
|
|||
|
|
var $_link;
|
|||
|
|
|
|||
|
|
function PDFFieldPushButtonImage(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$fontindex,
|
|||
|
|
$fontsize,
|
|||
|
|
$field_name,
|
|||
|
|
$value,
|
|||
|
|
$link) {
|
|||
|
|
$this->PDFFieldPushButton($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$fontindex,
|
|||
|
|
$fontsize);
|
|||
|
|
|
|||
|
|
$this->_link = $link;
|
|||
|
|
$this->set_field_name($field_name);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _action(&$handler) {
|
|||
|
|
$action = $handler->_dictionary(array(
|
|||
|
|
'S' => "/SubmitForm",
|
|||
|
|
'F' => $handler->_textstring($this->_link),
|
|||
|
|
'Fields'=> $handler->_reference_array(array($this->get_parent())),
|
|||
|
|
'Flags' => PDF_SUBMIT_FORM_HTML | PDF_SUBMIT_FORM_COORDINATES
|
|||
|
|
)
|
|||
|
|
);
|
|||
|
|
return $handler->_dictionary(array('U' => $action));
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
class PDFFieldPushButtonSubmit extends PDFFieldPushButton {
|
|||
|
|
var $_link;
|
|||
|
|
var $_caption;
|
|||
|
|
|
|||
|
|
function PDFFieldPushButtonSubmit(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$fontindex,
|
|||
|
|
$fontsize,
|
|||
|
|
$field_name,
|
|||
|
|
$value,
|
|||
|
|
$link) {
|
|||
|
|
$this->PDFFieldPushButton($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$fontindex,
|
|||
|
|
$fontsize);
|
|||
|
|
|
|||
|
|
$this->_link = $link;
|
|||
|
|
$this->_caption = $value;
|
|||
|
|
$this->set_field_name($field_name);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _action(&$handler) {
|
|||
|
|
$action = $handler->_dictionary(array(
|
|||
|
|
'S' => "/SubmitForm",
|
|||
|
|
'F' => $handler->_textstring($this->_link),
|
|||
|
|
'Fields'=> $handler->_reference_array(array($this->get_parent())),
|
|||
|
|
'Flags' => PDF_SUBMIT_FORM_HTML
|
|||
|
|
)
|
|||
|
|
);
|
|||
|
|
return $handler->_dictionary(array('U' => $action));
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
class PDFFieldPushButtonReset extends PDFFieldPushButton {
|
|||
|
|
function PDFFieldPushButtonReset(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$fontindex,
|
|||
|
|
$fontsize) {
|
|||
|
|
$this->PDFFieldPushButton($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$fontindex,
|
|||
|
|
$fontsize);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _action(&$handler) {
|
|||
|
|
$action = $handler->_dictionary(array('S' => "/ResetForm"));
|
|||
|
|
return $handler->_dictionary(array('U' => $action));
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Radio button inside the group.
|
|||
|
|
*
|
|||
|
|
* Note that radio button is not a field itself; only a group of radio buttons
|
|||
|
|
* should have name.
|
|||
|
|
*/
|
|||
|
|
class PDFFieldRadio extends PDFAnnotationWidget {
|
|||
|
|
/**
|
|||
|
|
* @var PDFFieldRadioGroup reference to a radio button group
|
|||
|
|
* @access private
|
|||
|
|
*/
|
|||
|
|
var $_parent;
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* @var String value of this radio button
|
|||
|
|
* @access private
|
|||
|
|
*/
|
|||
|
|
var $_value;
|
|||
|
|
|
|||
|
|
var $_appearance_on;
|
|||
|
|
var $_appearance_off;
|
|||
|
|
|
|||
|
|
function PDFFieldRadio(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$value) {
|
|||
|
|
$this->PDFAnnotationWidget($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect);
|
|||
|
|
|
|||
|
|
$this->_value = $value;
|
|||
|
|
|
|||
|
|
$this->_appearance_on = new PDFAppearanceStream($handler,
|
|||
|
|
$handler->_generate_new_object_number(),
|
|||
|
|
$generation_id,
|
|||
|
|
"Q 0 0 1 rg BT /F1 10 Tf 0 0 Td (8) Tj ET q");
|
|||
|
|
|
|||
|
|
$this->_appearance_off = new PDFAppearanceStream($handler,
|
|||
|
|
$handler->_generate_new_object_number(),
|
|||
|
|
$generation_id,
|
|||
|
|
"Q 0 0 1 rg BT /F1 10 Tf 0 0 Td (8) Tj ET q");
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _dict(&$handler) {
|
|||
|
|
return array_merge(parent::_dict($handler),
|
|||
|
|
array(
|
|||
|
|
'MK' => "<< /CA (l) >>",
|
|||
|
|
'Parent' => $handler->_reference($this->_parent),
|
|||
|
|
'AP' => sprintf("<< /N << /%s %s /Off %s >> >>",
|
|||
|
|
$this->_value,
|
|||
|
|
$handler->_reference($this->_appearance_on),
|
|||
|
|
$handler->_reference($this->_appearance_off))
|
|||
|
|
));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _out_nested(&$handler) {
|
|||
|
|
parent::_out_nested($handler);
|
|||
|
|
|
|||
|
|
$this->_appearance_on->out($handler);
|
|||
|
|
$this->_appearance_off->out($handler);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Set a reference to the radio button group containing this group
|
|||
|
|
*
|
|||
|
|
* @param PDFFieldRadioGroup $parent reference to a group object
|
|||
|
|
*/
|
|||
|
|
function set_parent(&$parent) {
|
|||
|
|
$this->_parent =& $parent;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Create new group of radio buttons
|
|||
|
|
*/
|
|||
|
|
class PDFFieldRadioGroup extends PDFFieldGroup {
|
|||
|
|
var $_parent;
|
|||
|
|
var $_checked;
|
|||
|
|
|
|||
|
|
function _dict($handler) {
|
|||
|
|
return array_merge(parent::_dict($handler),
|
|||
|
|
array(
|
|||
|
|
'DV' => $this->_checked ? $handler->_name($this->_checked) : "/Off",
|
|||
|
|
'V' => $this->_checked ? $handler->_name($this->_checked) : "/Off",
|
|||
|
|
"FT" => $handler->_name('Btn'),
|
|||
|
|
"Ff" => sprintf("%d", 1 << 15),
|
|||
|
|
"Parent" => $handler->_reference($this->_parent)
|
|||
|
|
));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _check_field_name($field) {
|
|||
|
|
/**
|
|||
|
|
* As radio buttons always have same field name, no checking should be made here
|
|||
|
|
*/
|
|||
|
|
|
|||
|
|
return true;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function PDFFieldRadioGroup(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$group_name) {
|
|||
|
|
$this->PDFFieldGroup($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$group_name);
|
|||
|
|
|
|||
|
|
$this->_checked = null;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* @return String name of the radio group
|
|||
|
|
*/
|
|||
|
|
function get_field_name() {
|
|||
|
|
return $this->_group_name;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function set_checked($value) {
|
|||
|
|
$this->_checked = $value;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function set_parent(&$parent) {
|
|||
|
|
$this->_parent =& $parent;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
class PDFFieldSelect extends PDFField {
|
|||
|
|
var $_options;
|
|||
|
|
var $_value;
|
|||
|
|
|
|||
|
|
function _dict(&$handler) {
|
|||
|
|
$options = array();
|
|||
|
|
foreach ($this->_options as $arr) {
|
|||
|
|
$options[] = $handler->_array(sprintf("%s %s",
|
|||
|
|
$handler->_textstring($arr[0]),
|
|||
|
|
$handler->_textstring($arr[1])));
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$options_str = $handler->_array(implode(" ",$options));
|
|||
|
|
|
|||
|
|
return array_merge(parent::_dict($handler),
|
|||
|
|
array('FT' => '/Ch',
|
|||
|
|
'Ff' => PDF_FIELD_CHOICE_COMBO,
|
|||
|
|
'V' => $handler->_textstring($this->_value), // Current value
|
|||
|
|
'DV' => $handler->_textstring($this->_value), // Default value
|
|||
|
|
'DR' => "2 0 R",
|
|||
|
|
'Opt' => $options_str));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function PDFFieldSelect(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$field_name,
|
|||
|
|
$value,
|
|||
|
|
$options) {
|
|||
|
|
$this->PDFField($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$field_name);
|
|||
|
|
|
|||
|
|
$this->_options = $options;
|
|||
|
|
$this->_value = $value;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Interactive text input
|
|||
|
|
*/
|
|||
|
|
class PDFFieldText extends PDFField {
|
|||
|
|
var $fontindex;
|
|||
|
|
var $fontsize;
|
|||
|
|
|
|||
|
|
var $_appearance;
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* @var String contains the default value of this text field
|
|||
|
|
* @access private
|
|||
|
|
*/
|
|||
|
|
var $_value;
|
|||
|
|
|
|||
|
|
function _dict(&$handler) {
|
|||
|
|
return array_merge(parent::_dict($handler),
|
|||
|
|
array(
|
|||
|
|
'FT' => '/Tx',
|
|||
|
|
'V' => $handler->_textstring($this->_value), // Current value
|
|||
|
|
'DV' => $handler->_textstring($this->_value), // Default value
|
|||
|
|
'DR' => "2 0 R",
|
|||
|
|
// @TODO fix font references
|
|||
|
|
'DA' => sprintf("(0 0 0 rg /FF%d %.2f Tf)",
|
|||
|
|
$this->fontindex,
|
|||
|
|
$this->fontsize),
|
|||
|
|
// 'AP' => $handler->_dictionary(array("N" => $handler->_reference($this->_appearance))),
|
|||
|
|
));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _out_nested(&$handler) {
|
|||
|
|
// $this->_appearance->out($handler);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function PDFFieldText(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$field_name,
|
|||
|
|
$value,
|
|||
|
|
$fontindex,
|
|||
|
|
$fontsize) {
|
|||
|
|
$this->PDFField($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$field_name);
|
|||
|
|
|
|||
|
|
$this->fontindex = $fontindex;
|
|||
|
|
$this->fontsize = $fontsize;
|
|||
|
|
$this->_value = $value;
|
|||
|
|
|
|||
|
|
// $this->_appearance = new PDFAppearanceStream($handler,
|
|||
|
|
// $handler->_generate_new_object_number(),
|
|||
|
|
// $generation_id,
|
|||
|
|
// "/Tx BMC EMC");
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
class PDFFieldMultilineText extends PDFFieldText {
|
|||
|
|
function _dict(&$handler) {
|
|||
|
|
return array_merge(parent::_dict($handler),
|
|||
|
|
array('Ff' => PDF_FIELD_TEXT_MULTILINE));
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* "Password" text input field
|
|||
|
|
*/
|
|||
|
|
class PDFFieldPassword extends PDFFieldText {
|
|||
|
|
function PDFFieldPassword(&$handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$field_name,
|
|||
|
|
$value,
|
|||
|
|
$fontindex,
|
|||
|
|
$fontsize) {
|
|||
|
|
$this->PDFFieldText($handler,
|
|||
|
|
$object_id,
|
|||
|
|
$generation_id,
|
|||
|
|
$rect,
|
|||
|
|
$field_name,
|
|||
|
|
$value,
|
|||
|
|
$fontindex,
|
|||
|
|
$fontsize);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _dict(&$handler) {
|
|||
|
|
return array_merge(parent::_dict($handler),
|
|||
|
|
array('Ff' => PDF_FIELD_TEXT_PASSWORD));
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
class FPDF {
|
|||
|
|
//Private properties
|
|||
|
|
|
|||
|
|
var $page; //current page number
|
|||
|
|
var $n; //current object number
|
|||
|
|
var $offsets; //array of object offsets
|
|||
|
|
var $buffer; //buffer holding in-memory PDF
|
|||
|
|
var $pages; //array containing pages
|
|||
|
|
var $state; //current document state
|
|||
|
|
var $compress; //compression flag
|
|||
|
|
var $DefOrientation; //default orientation
|
|||
|
|
var $k; //scale factor (number of points in user unit)
|
|||
|
|
var $fwPt,$fhPt; //dimensions of page format in points
|
|||
|
|
var $fw,$fh; //dimensions of page format in user unit
|
|||
|
|
var $wPt,$hPt; //current dimensions of page in points
|
|||
|
|
var $w,$h; //current dimensions of page in user unit
|
|||
|
|
var $x,$y; //current position in user unit for cell positioning
|
|||
|
|
var $lasth; //height of last cell printed
|
|||
|
|
var $LineWidth; //line width in user unit
|
|||
|
|
var $fonts; //array of used fonts
|
|||
|
|
var $FontFiles; //array of font files
|
|||
|
|
|
|||
|
|
var $diffs; //array of encoding differences
|
|||
|
|
var $cmaps; // List of ToUnicode
|
|||
|
|
|
|||
|
|
var $images; //array of used images
|
|||
|
|
// var $PageLinks; //array of links in pages
|
|||
|
|
var $links; //array of internal links
|
|||
|
|
var $FontFamily; //current font family
|
|||
|
|
|
|||
|
|
var $underline; //underlining flag
|
|||
|
|
var $overline;
|
|||
|
|
var $strikeout;
|
|||
|
|
|
|||
|
|
var $CurrentFont; //current font info
|
|||
|
|
var $FontSizePt; //current font size in points
|
|||
|
|
var $FontSize; //current font size in user unit
|
|||
|
|
var $DrawColor; //commands for drawing color
|
|||
|
|
var $FillColor; //commands for filling color
|
|||
|
|
var $TextColor; //commands for text color
|
|||
|
|
|
|||
|
|
var $ColorFlag; //indicates whether fill and text colors are different
|
|||
|
|
|
|||
|
|
var $ws; //word spacing
|
|||
|
|
var $ZoomMode; //zoom display mode
|
|||
|
|
var $LayoutMode; //layout display mode
|
|||
|
|
var $title; //title
|
|||
|
|
var $subject; //subject
|
|||
|
|
var $author; //author
|
|||
|
|
var $keywords; //keywords
|
|||
|
|
var $creator; //creator
|
|||
|
|
var $PDFVersion; //PDF version number
|
|||
|
|
|
|||
|
|
var $_forms;
|
|||
|
|
var $_form_radios;
|
|||
|
|
var $_pages;
|
|||
|
|
|
|||
|
|
function moveto($x, $y) {
|
|||
|
|
$this->_out(sprintf("%.2f %.2f m",
|
|||
|
|
$this->x_coord($x),
|
|||
|
|
$this->y_coord($y)));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function lineto($x, $y) {
|
|||
|
|
$this->_out(sprintf("%.2f %.2f l",
|
|||
|
|
$this->x_coord($x),
|
|||
|
|
$this->y_coord($y)));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function closepath() {
|
|||
|
|
$this->_out("h");
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function stroke() {
|
|||
|
|
$this->_out("S");
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function is_object_written($id) {
|
|||
|
|
return isset($this->offsets[$id]);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function x_coord($x) {
|
|||
|
|
return $x * $this->k;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function y_coord($y) {
|
|||
|
|
return ($this->h - $y)*$this->k;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
// PDF specs:
|
|||
|
|
// 3.2.9 Indirect Objects
|
|||
|
|
// Any object in a PDF file may be labeled as an indirect object. This gives the object
|
|||
|
|
// a unique object identifier by which other objects can refer to it (for example, as an
|
|||
|
|
// element of an array or as the value of a dictionary entry). The object identifier
|
|||
|
|
// consists of two parts:
|
|||
|
|
// * A positive integer object number. Indirect objects are often numbered sequentially
|
|||
|
|
// within a PDF file, but this is not required; object numbers may be
|
|||
|
|
// assigned in any arbitrary order.
|
|||
|
|
// * A non-negative integer generation number. In a newly created file, all indirect
|
|||
|
|
// objects have generation numbers of 0. Nonzero generation numbers may be introduced
|
|||
|
|
// when the file is later updated; see Sections 3.4.3, BCross-Reference
|
|||
|
|
// Table,B and 3.4.5, BIncremental Updates.B
|
|||
|
|
// Together, the combination of an object number and a generation number uniquely
|
|||
|
|
// identifies an indirect object. The object retains the same object number and
|
|||
|
|
// generation number throughout its existence, even if its value is modified.
|
|||
|
|
//
|
|||
|
|
function _indirect_object($object) {
|
|||
|
|
$object_number = $object->get_object_id();
|
|||
|
|
$generation_number = $object->get_generation_id();
|
|||
|
|
$object_string = $object->pdf($this);
|
|||
|
|
|
|||
|
|
$this->offsets[$object_number] = strlen($this->buffer);
|
|||
|
|
|
|||
|
|
return "$object_number $generation_number obj\n${object_string}\nendobj";
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _stream($content) {
|
|||
|
|
return "stream\n".$content."\nendstream";
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* @TODO check name for validity
|
|||
|
|
*/
|
|||
|
|
function _name($name) {
|
|||
|
|
return sprintf("/%s", $name);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _dictionary($dict) {
|
|||
|
|
$content = "";
|
|||
|
|
foreach ($dict as $key => $value) {
|
|||
|
|
$content .= "/$key $value\n";
|
|||
|
|
};
|
|||
|
|
return "<<\n".$content."\n>>";
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _array($array_str) {
|
|||
|
|
return "[$array_str]";
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _reference(&$object) {
|
|||
|
|
$object_id = $object->get_object_id();
|
|||
|
|
$generation_id = $object->get_generation_id();
|
|||
|
|
return "$object_id $generation_id R";
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _reference_array($object_array) {
|
|||
|
|
$array_str = "";
|
|||
|
|
for ($i=0; $i<count($object_array); $i++) {
|
|||
|
|
$array_str .= $this->_reference($object_array[$i])." ";
|
|||
|
|
};
|
|||
|
|
return $this->_array($array_str);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _generate_new_object_number() {
|
|||
|
|
$this->n++;
|
|||
|
|
return $this->n;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function add_form($name) {
|
|||
|
|
$form = new PDFFieldGroup($this,
|
|||
|
|
$this->_generate_new_object_number(), // Object identifier
|
|||
|
|
0,
|
|||
|
|
$name);
|
|||
|
|
$this->_forms[] =& $form;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function add_field_select($x, $y, $w, $h, $name, $value, $options) {
|
|||
|
|
$field =& new PDFFieldSelect($this,
|
|||
|
|
$this->_generate_new_object_number(), // Object identifier
|
|||
|
|
0, // Generation
|
|||
|
|
new PDFRect($x, $y, $w, $h), // Annotation rectangle
|
|||
|
|
$name, // Field name
|
|||
|
|
$value,
|
|||
|
|
$options);
|
|||
|
|
|
|||
|
|
$current_form =& $this->current_form();
|
|||
|
|
$current_form->add_field($field);
|
|||
|
|
|
|||
|
|
$this->_pages[count($this->_pages)-1]->add_annotation($field);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Create new checkbox field object
|
|||
|
|
*
|
|||
|
|
* @param $x Integer Left coordinate of the widget bounding bog
|
|||
|
|
* @param $y Integer Upper coordinate of the widget bounding bog
|
|||
|
|
* @param $w Integer Widget width
|
|||
|
|
* @param $h Integer Widget height
|
|||
|
|
* @param $name String name of the field to be created
|
|||
|
|
* @param $value String value to be posted for this checkbox
|
|||
|
|
*
|
|||
|
|
* @TODO check if fully qualified field name will be unique in PDF file
|
|||
|
|
*/
|
|||
|
|
function add_field_checkbox($x, $y, $w, $h, $name, $value, $checked) {
|
|||
|
|
$field =& new PDFFieldCheckBox($this,
|
|||
|
|
$this->_generate_new_object_number(), // Object identifier
|
|||
|
|
0, // Generation
|
|||
|
|
new PDFRect($x, $y, $w, $h), // Annotation rectangle
|
|||
|
|
$name, // Field name
|
|||
|
|
$value, $checked); // Checkbox "on" value
|
|||
|
|
|
|||
|
|
$current_form =& $this->current_form();
|
|||
|
|
$current_form->add_field($field);
|
|||
|
|
|
|||
|
|
$this->_pages[count($this->_pages)-1]->add_annotation($field);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function ¤t_form() {
|
|||
|
|
if (count($this->_forms) == 0) {
|
|||
|
|
/**
|
|||
|
|
* Handle invalid HTML; if we've met an input control outside the form,
|
|||
|
|
* generate a new form with random name
|
|||
|
|
*/
|
|||
|
|
|
|||
|
|
$id = $this->_generate_new_object_number();
|
|||
|
|
$name = sprintf("AnonymousFormObject_%u", $id);
|
|||
|
|
|
|||
|
|
error_log(sprintf("Anonymous form generated with name %s; check your HTML for validity",
|
|||
|
|
$name));
|
|||
|
|
|
|||
|
|
$form = new PDFFieldGroup($this,
|
|||
|
|
$id, // Object identifier
|
|||
|
|
0,
|
|||
|
|
$name);
|
|||
|
|
$this->_forms[] =& $form;
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
return $this->_forms[count($this->_forms)-1];
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function add_field_radio($x, $y, $w, $h, $group_name, $value, $checked) {
|
|||
|
|
if (isset($this->_form_radios[$group_name])) {
|
|||
|
|
$field =& $this->_form_radios[$group_name];
|
|||
|
|
} else {
|
|||
|
|
$field =& new PDFFieldRadioGroup($this,
|
|||
|
|
$this->_generate_new_object_number(),
|
|||
|
|
0,
|
|||
|
|
$group_name);
|
|||
|
|
|
|||
|
|
$current_form =& $this->current_form();
|
|||
|
|
$current_form->add_field($field);
|
|||
|
|
|
|||
|
|
$this->_form_radios[$group_name] =& $field;
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$radio =& new PDFFieldRadio($this,
|
|||
|
|
$this->_generate_new_object_number(),
|
|||
|
|
0,
|
|||
|
|
new PDFRect($x, $y, $w, $h),
|
|||
|
|
$value);
|
|||
|
|
$field->add_field($radio);
|
|||
|
|
if ($checked) { $field->set_checked($value); };
|
|||
|
|
|
|||
|
|
$this->_pages[count($this->_pages)-1]->add_annotation($radio);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Create a new interactive text form
|
|||
|
|
*
|
|||
|
|
* @param $x Left coordinate of the widget bounding box
|
|||
|
|
* @param $y Top coordinate of the widget bounding box
|
|||
|
|
* @param $w Widget width
|
|||
|
|
* @param $h Widget height
|
|||
|
|
* @param $value Default widget value
|
|||
|
|
* @param $field_name Field name
|
|||
|
|
*
|
|||
|
|
* @return Field number
|
|||
|
|
*/
|
|||
|
|
function add_field_text($x, $y, $w, $h, $value, $field_name) {
|
|||
|
|
$field =& new PDFFieldText($this,
|
|||
|
|
$this->_generate_new_object_number(),
|
|||
|
|
0,
|
|||
|
|
new PDFRect($x, $y, $w, $h),
|
|||
|
|
$field_name,
|
|||
|
|
$value,
|
|||
|
|
$this->CurrentFont['i'],
|
|||
|
|
$this->FontSizePt);
|
|||
|
|
|
|||
|
|
$current_form =& $this->current_form();
|
|||
|
|
$current_form->add_field($field);
|
|||
|
|
|
|||
|
|
$this->_pages[count($this->_pages)-1]->add_annotation($field);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function add_field_multiline_text($x, $y, $w, $h, $value, $field_name) {
|
|||
|
|
$field =& new PDFFieldMultilineText($this,
|
|||
|
|
$this->_generate_new_object_number(),
|
|||
|
|
0,
|
|||
|
|
new PDFRect($x, $y, $w, $h),
|
|||
|
|
$field_name,
|
|||
|
|
$value,
|
|||
|
|
$this->CurrentFont['i'],
|
|||
|
|
$this->FontSizePt);
|
|||
|
|
|
|||
|
|
$current_form =& $this->current_form();
|
|||
|
|
$current_form->add_field($field);
|
|||
|
|
|
|||
|
|
$this->_pages[count($this->_pages)-1]->add_annotation($field);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Create a new interactive password input field
|
|||
|
|
*
|
|||
|
|
* @param $x Left coordinate of the widget bounding box
|
|||
|
|
* @param $y Top coordinate of the widget bounding box
|
|||
|
|
* @param $w Widget width
|
|||
|
|
* @param $h Widget height
|
|||
|
|
* @param $value Default widget value
|
|||
|
|
* @param $field_name Field name
|
|||
|
|
*
|
|||
|
|
* @return Field number
|
|||
|
|
*/
|
|||
|
|
function add_field_password($x, $y, $w, $h, $value, $field_name) {
|
|||
|
|
$field =& new PDFFieldPassword($this,
|
|||
|
|
$this->_generate_new_object_number(),
|
|||
|
|
0,
|
|||
|
|
new PDFRect($x, $y, $w, $h),
|
|||
|
|
$field_name,
|
|||
|
|
$value,
|
|||
|
|
$this->CurrentFont['i'],
|
|||
|
|
$this->FontSizePt);
|
|||
|
|
|
|||
|
|
$current_form =& $this->current_form();
|
|||
|
|
$current_form->add_field($field);
|
|||
|
|
|
|||
|
|
$this->_pages[count($this->_pages)-1]->add_annotation($field);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function add_field_pushbuttonimage($x, $y, $w, $h, $field_name, $value, $actionURL) {
|
|||
|
|
$field =& new PDFFieldPushButtonImage($this,
|
|||
|
|
$this->_generate_new_object_number(),
|
|||
|
|
0,
|
|||
|
|
new PDFRect($x, $y, $w, $h),
|
|||
|
|
$this->CurrentFont['i'],
|
|||
|
|
$this->FontSizePt,
|
|||
|
|
$field_name,
|
|||
|
|
$value,
|
|||
|
|
$actionURL);
|
|||
|
|
|
|||
|
|
$current_form =& $this->current_form();
|
|||
|
|
$current_form->add_field($field);
|
|||
|
|
|
|||
|
|
$this->_pages[count($this->_pages)-1]->add_annotation($field);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function add_field_pushbuttonsubmit($x, $y, $w, $h, $field_name, $value, $actionURL) {
|
|||
|
|
$field =& new PDFFieldPushButtonSubmit($this,
|
|||
|
|
$this->_generate_new_object_number(),
|
|||
|
|
0,
|
|||
|
|
new PDFRect($x, $y, $w, $h),
|
|||
|
|
$this->CurrentFont['i'],
|
|||
|
|
$this->FontSizePt,
|
|||
|
|
$field_name,
|
|||
|
|
$value,
|
|||
|
|
$actionURL);
|
|||
|
|
|
|||
|
|
$current_form =& $this->current_form();
|
|||
|
|
$current_form->add_field($field);
|
|||
|
|
|
|||
|
|
$this->_pages[count($this->_pages)-1]->add_annotation($field);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function add_field_pushbuttonreset($x, $y, $w, $h) {
|
|||
|
|
$field =& new PDFFieldPushButtonReset($this,
|
|||
|
|
$this->_generate_new_object_number(),
|
|||
|
|
0,
|
|||
|
|
new PDFRect($x, $y, $w, $h),
|
|||
|
|
null,
|
|||
|
|
$this->CurrentFont['i'],
|
|||
|
|
$this->FontSizePt);
|
|||
|
|
|
|||
|
|
$current_form =& $this->current_form();
|
|||
|
|
$current_form->add_field($field);
|
|||
|
|
|
|||
|
|
$this->_pages[count($this->_pages)-1]->add_annotation($field);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function add_field_pushbutton($x, $y, $w, $h) {
|
|||
|
|
$field =& new PDFFieldPushButton($this,
|
|||
|
|
$this->_generate_new_object_number(),
|
|||
|
|
0,
|
|||
|
|
new PDFRect($x, $y, $w, $h),
|
|||
|
|
null,
|
|||
|
|
$this->CurrentFont['i'],
|
|||
|
|
$this->FontSizePt);
|
|||
|
|
|
|||
|
|
$current_form =& $this->current_form();
|
|||
|
|
$current_form->add_field($field);
|
|||
|
|
|
|||
|
|
$this->_pages[count($this->_pages)-1]->add_annotation($field);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
function SetDash($x, $y) {
|
|||
|
|
$x = (int)$x;
|
|||
|
|
$y = (int)$y;
|
|||
|
|
$this->_out(sprintf("[%d %d] 0 d", $x*2, $y*2));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _GetFontBBox() {
|
|||
|
|
return preg_split("/[\[\]\s]+/", $this->CurrentFont['desc']['FontBBox']);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _dounderline($x,$y,$txt) {
|
|||
|
|
//Underline text
|
|||
|
|
$up=$this->CurrentFont['up'];
|
|||
|
|
$ut=$this->CurrentFont['ut'];
|
|||
|
|
$w=$this->GetStringWidth($txt)+$this->ws*substr_count($txt,' ');
|
|||
|
|
|
|||
|
|
$content = sprintf('%.2f %.2f %.2f %.2f re f',
|
|||
|
|
$x*$this->k,
|
|||
|
|
($this->h-($y-$up/1000*$this->FontSize))*$this->k,
|
|||
|
|
$w*$this->k,
|
|||
|
|
-$ut/1000*$this->FontSizePt);
|
|||
|
|
|
|||
|
|
return $content;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _dooverline($x,$y,$txt) {
|
|||
|
|
$bbox = $this->_GetFontBBox();
|
|||
|
|
$up = round($bbox[3] * 0.8);
|
|||
|
|
|
|||
|
|
$ut=$this->CurrentFont['ut'];
|
|||
|
|
|
|||
|
|
$w=$this->GetStringWidth($txt)+$this->ws*substr_count($txt,' ');
|
|||
|
|
return sprintf('%.2f %.2f %.2f %.2f re f',
|
|||
|
|
$x*$this->k,
|
|||
|
|
($this->h-($y-$up/1000*$this->FontSize))*$this->k,
|
|||
|
|
$w*$this->k,
|
|||
|
|
-$ut/1000*$this->FontSizePt);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _dostrikeout($x,$y,$txt) {
|
|||
|
|
$bbox = $this->_GetFontBBox();
|
|||
|
|
$up = round($bbox[3] * 0.25);
|
|||
|
|
|
|||
|
|
$ut=$this->CurrentFont['ut'];
|
|||
|
|
$w=$this->GetStringWidth($txt)+$this->ws*substr_count($txt,' ');
|
|||
|
|
return sprintf('%.2f %.2f %.2f %.2f re f',
|
|||
|
|
$x*$this->k,
|
|||
|
|
($this->h-($y-$up/1000*$this->FontSize))*$this->k,
|
|||
|
|
$w*$this->k,
|
|||
|
|
-$ut/1000*$this->FontSizePt);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function SetDecoration($underline, $overline, $strikeout) {
|
|||
|
|
$this->underline = $underline;
|
|||
|
|
$this->overline = $overline;
|
|||
|
|
$this->strikeout = $strikeout;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function ClipPath($path) {
|
|||
|
|
if (count($path) < 3) {
|
|||
|
|
die("Attempt to clip on the path containing less than three points");
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$this->MakePath($path);
|
|||
|
|
$this->Clip();
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function Clip() {
|
|||
|
|
$this->_out("W n");
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
// TODO: more graceful custom encoding processing
|
|||
|
|
function _LoadFont($fontkey, $family, $encoding) {
|
|||
|
|
if (!isset($this->fonts[$fontkey])) {
|
|||
|
|
global $g_font_resolver_pdf;
|
|||
|
|
$file = $g_font_resolver_pdf->ttf_mappings[$family];
|
|||
|
|
|
|||
|
|
$embed = $g_font_resolver_pdf->embed[$family];
|
|||
|
|
|
|||
|
|
// Remove the '.ttf' suffix
|
|||
|
|
$file = substr($file, 0, strlen($file) - 4);
|
|||
|
|
|
|||
|
|
// Generate (if required) PHP font description files
|
|||
|
|
if (!file_exists($this->_getfontpath().$fontkey.'.php') || $encoding == 'custom') {
|
|||
|
|
// As MakeFont squeaks a lot, we'll need to capture and discard its output
|
|||
|
|
MakeFont(TTF_FONTS_REPOSITORY.$file.'.ttf',
|
|||
|
|
TTF_FONTS_REPOSITORY.$file.'.afm',
|
|||
|
|
$this->_getfontpath(),
|
|||
|
|
$fontkey.'.php',
|
|||
|
|
$encoding);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$this->AddFont($fontkey, $family, $encoding, $fontkey.'.php', $embed);
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _MakeFontKey($family, $encoding) {
|
|||
|
|
return $family.'-'.$encoding;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function GetFontAscender($name, $encoding) {
|
|||
|
|
$fontkey = $this->_MakeFontKey($name, $encoding);
|
|||
|
|
$this->_LoadFont($fontkey, $name, $encoding, '');
|
|||
|
|
return $this->fonts[$fontkey]['desc']['Ascent'] / 1000;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function GetFontDescender($name, $encoding) {
|
|||
|
|
$fontkey = $this->_MakeFontKey($name, $encoding);
|
|||
|
|
$this->_LoadFont($fontkey, $name, $encoding, '');
|
|||
|
|
return -$this->fonts[$fontkey]['desc']['Descent'] / 1000;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
// Note that FPDF do some caching, which can conflict with "save/restore" pairs
|
|||
|
|
function Save() {
|
|||
|
|
$this->_out("q");
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function Restore() {
|
|||
|
|
$this->_out("Q");
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function Translate($dx, $dy) {
|
|||
|
|
$this->_out(sprintf("1 0 0 1 %.2f %.2f cm", $dx, $dy));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function Rotate($alpha) {
|
|||
|
|
$this->_out(sprintf("%.2f %.2f %.2f %.2f 0 0 cm",
|
|||
|
|
cos($alpha/180*pi()),
|
|||
|
|
sin($alpha/180*pi()),
|
|||
|
|
-sin($alpha/180*pi()),
|
|||
|
|
cos($alpha/180*pi())
|
|||
|
|
));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function SetTextRendering($mode) {
|
|||
|
|
$this->_out(sprintf("%d Tr", $mode));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function MakePath($path) {
|
|||
|
|
$this->_out(sprintf("%.2f %.2f m", $path[0]['x'], $path[0]['y']));
|
|||
|
|
|
|||
|
|
for ($i=1; $i<count($path); $i++) {
|
|||
|
|
$this->_out(sprintf("%.2f %.2f l", $path[$i]['x'], $path[$i]['y']));
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function FillPath($path) {
|
|||
|
|
if (count($path) < 3) {
|
|||
|
|
die("Attempt to fill path containing less than three points");
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$this->_out($this->FillColor);
|
|||
|
|
$this->MakePath($path);
|
|||
|
|
$this->Fill();
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function Fill() {
|
|||
|
|
$this->_out("f");
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Thanks G. Adam Stanislav for information about approximation circle using bezier curves
|
|||
|
|
* http://www.whizkidtech.redprince.net/bezier/circle/
|
|||
|
|
*/
|
|||
|
|
function Circle($x, $y, $r) {
|
|||
|
|
$kappa = (sqrt(2) - 1) / 3 * 4;
|
|||
|
|
$l = $kappa * $r;
|
|||
|
|
|
|||
|
|
$this->_out(sprintf("%.2f %.f2 m", $x + $r, $y));
|
|||
|
|
$this->_out(sprintf("%.2f %.f2 %.2f %.2f %.2f %.2f c",
|
|||
|
|
$x + $r, $y + $l,
|
|||
|
|
$x + $l, $y + $r,
|
|||
|
|
$x, $y + $r));
|
|||
|
|
$this->_out(sprintf("%.2f %.f2 %.2f %.2f %.2f %.2f c",
|
|||
|
|
$x - $l, $y + $r,
|
|||
|
|
$x - $r, $y + $l,
|
|||
|
|
$x - $r, $y));
|
|||
|
|
$this->_out(sprintf("%.2f %.f2 %.2f %.2f %.2f %.2f c",
|
|||
|
|
$x - $r, $y - $l,
|
|||
|
|
$x - $l, $y - $r,
|
|||
|
|
$x, $y - $r));
|
|||
|
|
$this->_out(sprintf("%.2f %.f2 %.2f %.2f %.2f %.2f c",
|
|||
|
|
$x + $l, $y - $r,
|
|||
|
|
$x + $r, $y - $l,
|
|||
|
|
$x + $r, $y));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/*******************************************************************************
|
|||
|
|
* *
|
|||
|
|
* Public methods *
|
|||
|
|
* *
|
|||
|
|
*******************************************************************************/
|
|||
|
|
function FPDF($orientation='P',$unit='mm',$format='A4') {
|
|||
|
|
$this->_forms = array();
|
|||
|
|
$this->_form_radios = array();
|
|||
|
|
$this->_pages = array();
|
|||
|
|
|
|||
|
|
//Some checks
|
|||
|
|
$this->_dochecks();
|
|||
|
|
|
|||
|
|
//Initialization of properties
|
|||
|
|
$this->page=0;
|
|||
|
|
|
|||
|
|
$this->n=2;
|
|||
|
|
|
|||
|
|
$this->buffer='';
|
|||
|
|
$this->pages=array();
|
|||
|
|
$this->state = FPDF_STATE_UNINITIALIZED;
|
|||
|
|
$this->fonts=array();
|
|||
|
|
$this->FontFiles=array();
|
|||
|
|
$this->diffs = array();
|
|||
|
|
$this->images = array();
|
|||
|
|
$this->links = array();
|
|||
|
|
$this->lasth=0;
|
|||
|
|
$this->FontFamily='';
|
|||
|
|
$this->FontSizePt=12;
|
|||
|
|
|
|||
|
|
$this->underline = false;
|
|||
|
|
$this->overline = false;
|
|||
|
|
$this->strikeout = false;
|
|||
|
|
|
|||
|
|
$this->DrawColor='0 G';
|
|||
|
|
$this->FillColor='0 g';
|
|||
|
|
$this->TextColor='0 g';
|
|||
|
|
$this->ColorFlag=false;
|
|||
|
|
$this->ws=0;
|
|||
|
|
|
|||
|
|
//Scale factor
|
|||
|
|
switch ($unit) {
|
|||
|
|
case 'pt':
|
|||
|
|
$this->k = 1; break;
|
|||
|
|
case 'mm':
|
|||
|
|
$this->k = 72/25.4; break;
|
|||
|
|
case 'cm':
|
|||
|
|
$this->k = 72/2.54; break;
|
|||
|
|
case 'in':
|
|||
|
|
$this->k = 72;
|
|||
|
|
default:
|
|||
|
|
$this->Error('Incorrect unit: '.$unit);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
//Page format
|
|||
|
|
if (is_string($format)) {
|
|||
|
|
$format=strtolower($format);
|
|||
|
|
|
|||
|
|
switch ($format) {
|
|||
|
|
case 'a3':
|
|||
|
|
$format=array(841.89,1190.55); break;
|
|||
|
|
case 'a4':
|
|||
|
|
$format=array(595.28,841.89); break;
|
|||
|
|
case 'a5':
|
|||
|
|
$format=array(420.94,595.28); break;
|
|||
|
|
case 'letter':
|
|||
|
|
$format=array(612,792); break;
|
|||
|
|
case 'legal':
|
|||
|
|
$format=array(612,1008); break;
|
|||
|
|
default:
|
|||
|
|
$this->Error('Unknown page format: '.$format);
|
|||
|
|
};
|
|||
|
|
$this->fwPt=$format[0];
|
|||
|
|
$this->fhPt=$format[1];
|
|||
|
|
} else {
|
|||
|
|
$this->fwPt=$format[0]*$this->k;
|
|||
|
|
$this->fhPt=$format[1]*$this->k;
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$this->fw=$this->fwPt/$this->k;
|
|||
|
|
$this->fh=$this->fhPt/$this->k;
|
|||
|
|
|
|||
|
|
//Page orientation
|
|||
|
|
$orientation=strtolower($orientation);
|
|||
|
|
if ($orientation=='p' || $orientation=='portrait') {
|
|||
|
|
$this->DefOrientation='P';
|
|||
|
|
$this->wPt=$this->fwPt;
|
|||
|
|
$this->hPt=$this->fhPt;
|
|||
|
|
} elseif($orientation=='l' || $orientation=='landscape') {
|
|||
|
|
$this->DefOrientation='L';
|
|||
|
|
$this->wPt=$this->fhPt;
|
|||
|
|
$this->hPt=$this->fwPt;
|
|||
|
|
} else {
|
|||
|
|
$this->Error('Incorrect orientation: '.$orientation);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$this->w=$this->wPt/$this->k;
|
|||
|
|
$this->h=$this->hPt/$this->k;
|
|||
|
|
//Line width (0.2 mm)
|
|||
|
|
$this->LineWidth=.567/$this->k;
|
|||
|
|
|
|||
|
|
//Full width display mode
|
|||
|
|
$this->SetDisplayMode('fullwidth');
|
|||
|
|
|
|||
|
|
//Enable compression
|
|||
|
|
$this->SetCompression(true);
|
|||
|
|
|
|||
|
|
//Set default PDF version number
|
|||
|
|
$this->PDFVersion='1.3';
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function SetDisplayMode($zoom,$layout='continuous') {
|
|||
|
|
//Set display mode in viewer
|
|||
|
|
if($zoom=='fullpage' || $zoom=='fullwidth' || $zoom=='real' || $zoom=='default' || !is_string($zoom))
|
|||
|
|
$this->ZoomMode=$zoom;
|
|||
|
|
else
|
|||
|
|
$this->Error('Incorrect zoom display mode: '.$zoom);
|
|||
|
|
if($layout=='single' || $layout=='continuous' || $layout=='two' || $layout=='default')
|
|||
|
|
$this->LayoutMode=$layout;
|
|||
|
|
else
|
|||
|
|
$this->Error('Incorrect layout display mode: '.$layout);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* @param $compress Boolean indicates whether compression is enabled
|
|||
|
|
*/
|
|||
|
|
function SetCompression($compress) {
|
|||
|
|
if (function_exists('gzcompress')) {
|
|||
|
|
$this->compress=$compress;
|
|||
|
|
} else {
|
|||
|
|
$this->compress=false;
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function SetTitle($title) {
|
|||
|
|
//Title of document
|
|||
|
|
$this->title=$title;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function SetSubject($subject) {
|
|||
|
|
//Subject of document
|
|||
|
|
$this->subject=$subject;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function SetAuthor($author) {
|
|||
|
|
//Author of document
|
|||
|
|
$this->author=$author;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function SetKeywords($keywords) {
|
|||
|
|
//Keywords of document
|
|||
|
|
$this->keywords=$keywords;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function SetCreator($creator) {
|
|||
|
|
//Creator of document
|
|||
|
|
$this->creator=$creator;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function Error($msg) {
|
|||
|
|
//Fatal error
|
|||
|
|
die('<B>FPDF error: </B>'.$msg);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function Open() {
|
|||
|
|
//Begin document
|
|||
|
|
$this->state = FPDF_STATE_DOCUMENT_STARTED;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function Close() {
|
|||
|
|
//Terminate document
|
|||
|
|
if ($this->state == FPDF_STATE_COMPLETED) {
|
|||
|
|
return;
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
if ($this->page==0) {
|
|||
|
|
$this->AddPage();
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
//Close page
|
|||
|
|
$this->_endpage();
|
|||
|
|
//Close document
|
|||
|
|
$this->_enddoc();
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function AddPage() {
|
|||
|
|
$this->_pages[] =& new PDFPage($this, $this->_generate_new_object_number(), 0);
|
|||
|
|
|
|||
|
|
//Start a new page
|
|||
|
|
if ($this->state == FPDF_STATE_UNINITIALIZED) {
|
|||
|
|
$this->Open();
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$family=$this->FontFamily;
|
|||
|
|
|
|||
|
|
$size=$this->FontSizePt;
|
|||
|
|
$lw=$this->LineWidth;
|
|||
|
|
$dc=$this->DrawColor;
|
|||
|
|
$fc=$this->FillColor;
|
|||
|
|
$tc=$this->TextColor;
|
|||
|
|
$cf=$this->ColorFlag;
|
|||
|
|
if ($this->page>0) {
|
|||
|
|
//Close page
|
|||
|
|
$this->_endpage();
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
//Start new page
|
|||
|
|
$this->_beginpage();
|
|||
|
|
//Set line cap style to square
|
|||
|
|
$this->_out('2 J');
|
|||
|
|
//Set line width
|
|||
|
|
$this->LineWidth=$lw;
|
|||
|
|
$this->_out(sprintf('%.2f w',$lw*$this->k));
|
|||
|
|
|
|||
|
|
//Set colors
|
|||
|
|
$this->DrawColor=$dc;
|
|||
|
|
if ($dc!='0 G') {
|
|||
|
|
$this->_out($dc);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$this->FillColor=$fc;
|
|||
|
|
if ($fc!='0 g') {
|
|||
|
|
$this->_out($fc);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$this->TextColor=$tc;
|
|||
|
|
$this->ColorFlag=$cf;
|
|||
|
|
|
|||
|
|
//Restore line width
|
|||
|
|
if ($this->LineWidth!=$lw) {
|
|||
|
|
$this->LineWidth=$lw;
|
|||
|
|
$this->_out(sprintf('%.2f w',$lw*$this->k));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
//Restore colors
|
|||
|
|
if ($this->DrawColor!=$dc) {
|
|||
|
|
$this->DrawColor=$dc;
|
|||
|
|
$this->_out($dc);
|
|||
|
|
}
|
|||
|
|
if ($this->FillColor!=$fc) {
|
|||
|
|
$this->FillColor=$fc;
|
|||
|
|
$this->_out($fc);
|
|||
|
|
}
|
|||
|
|
$this->TextColor=$tc;
|
|||
|
|
$this->ColorFlag=$cf;
|
|||
|
|
|
|||
|
|
if (!is_null($this->CurrentFont)) {
|
|||
|
|
$this->_out(sprintf('BT /F%d %.2f Tf ET',$this->CurrentFont['i'],$this->FontSizePt));
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function SetDrawColor($r,$g=-1,$b=-1) {
|
|||
|
|
// Set color for all stroking operations
|
|||
|
|
if (($r==0 && $g==0 && $b==0) || $g==-1) {
|
|||
|
|
$new_color = sprintf('%.3f G',$r/255);
|
|||
|
|
} else {
|
|||
|
|
$new_color = sprintf('%.3f %.3f %.3f RG',$r/255,$g/255,$b/255);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
if ($this->page > 0 /*&& $this->DrawColor != $new_color*/) {
|
|||
|
|
$this->DrawColor = $new_color;
|
|||
|
|
$this->_out($this->DrawColor);
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function SetFillColor($r,$g=-1,$b=-1) {
|
|||
|
|
// Set color for all filling operations
|
|||
|
|
if (($r==0 && $g==0 && $b==0) || $g==-1) {
|
|||
|
|
$new_color = sprintf('%.3f g',$r/255);
|
|||
|
|
} else {
|
|||
|
|
$new_color = sprintf('%.3f %.3f %.3f rg',$r/255,$g/255,$b/255);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
if ($this->page>0 /*&& $this->FillColor != $new_color*/) {
|
|||
|
|
$this->FillColor = $new_color;
|
|||
|
|
$this->ColorFlag = ($this->FillColor!=$this->TextColor);
|
|||
|
|
$this->_out($this->FillColor);
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function SetTextColor($r,$g=-1,$b=-1) {
|
|||
|
|
//Set color for text
|
|||
|
|
if (($r==0 && $g==0 && $b==0) || $g==-1) {
|
|||
|
|
$this->TextColor=sprintf('%.3f g',$r/255);
|
|||
|
|
} else {
|
|||
|
|
$this->TextColor=sprintf('%.3f %.3f %.3f rg',$r/255,$g/255,$b/255);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$this->ColorFlag=($this->FillColor!=$this->TextColor);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function GetStringWidth($s) {
|
|||
|
|
//Get width of a string in the current font
|
|||
|
|
$s=(string)$s;
|
|||
|
|
$cw = &$this->CurrentFont['cw'];
|
|||
|
|
$w=0;
|
|||
|
|
|
|||
|
|
$l=strlen($s);
|
|||
|
|
for ($i=0; $i<$l; $i++) {
|
|||
|
|
$w+=$cw[$s{$i}];
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
return $w*$this->FontSize/1000;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Set line width
|
|||
|
|
*/
|
|||
|
|
function SetLineWidth($width) {
|
|||
|
|
$this->LineWidth = $width;
|
|||
|
|
if ($this->page > 0) {
|
|||
|
|
$this->_out(sprintf('%.2f w',$width*$this->k));
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Draw a line
|
|||
|
|
*/
|
|||
|
|
function Line($x1,$y1,$x2,$y2) {
|
|||
|
|
$this->_out(sprintf('%.2f %.2f m %.2f %.2f l S',$x1*$this->k,($this->h-$y1)*$this->k,$x2*$this->k,($this->h-$y2)*$this->k));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Add a TrueType or Type1 font
|
|||
|
|
*/
|
|||
|
|
function AddFont($fontkey, $family, $encoding, $file, $bEmbed) {
|
|||
|
|
if(isset($this->fonts[$fontkey])) {
|
|||
|
|
$this->Error('Font already added: '.$family);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$filepath = $this->_getfontpath().$file;
|
|||
|
|
include($filepath);
|
|||
|
|
|
|||
|
|
// After we've executed 'include' the $file variable
|
|||
|
|
// have been overwritten by $file declared in font definition file; if we do not want
|
|||
|
|
// to embed the font in the PDF file, we should set to empty string
|
|||
|
|
if (!$bEmbed) { $file = ''; };
|
|||
|
|
|
|||
|
|
if(!isset($name)) {
|
|||
|
|
$this->Error("Could not include font definition file: $filepath");
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$i=count($this->fonts)+1;
|
|||
|
|
$this->fonts[$fontkey]=array('i' =>$i,
|
|||
|
|
'type' =>$type,
|
|||
|
|
'name' =>$name,
|
|||
|
|
'desc' =>$desc,
|
|||
|
|
'up' =>$up,
|
|||
|
|
'ut' =>$ut,
|
|||
|
|
'cw' =>$cw,
|
|||
|
|
'enc' =>$enc,
|
|||
|
|
'file' =>$file);
|
|||
|
|
|
|||
|
|
if ($diff) {
|
|||
|
|
//Search existing encodings
|
|||
|
|
$d=0;
|
|||
|
|
$nb=count($this->diffs);
|
|||
|
|
for ($i=1; $i<=$nb; $i++) {
|
|||
|
|
if ($this->diffs[$i] == $diff) {
|
|||
|
|
$d=$i;
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
if ($d==0) {
|
|||
|
|
$d=$nb+1;
|
|||
|
|
$this->diffs[$d] = $diff;
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* TODO
|
|||
|
|
* Add CMAP for this font
|
|||
|
|
*/
|
|||
|
|
$this->cmaps[$d] = new PDFCMap($cmap,
|
|||
|
|
$handler,
|
|||
|
|
$this->_generate_new_object_number(),
|
|||
|
|
0);
|
|||
|
|
}
|
|||
|
|
$this->fonts[$fontkey]['diff']=$d;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if ($file) {
|
|||
|
|
if ($type=='TrueType') {
|
|||
|
|
$this->FontFiles[$file]=array('length1'=>$originalsize);
|
|||
|
|
} else {
|
|||
|
|
$this->FontFiles[$file]=array('length1'=>$size1,'length2'=>$size2);
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Select a font; size given in points
|
|||
|
|
*/
|
|||
|
|
function SetFont($family, $encoding, $size) {
|
|||
|
|
global $fpdf_charwidths;
|
|||
|
|
|
|||
|
|
$fontkey = $this->_MakeFontKey($family, $encoding);
|
|||
|
|
$this->_LoadFont($fontkey, $family, $encoding);
|
|||
|
|
|
|||
|
|
if ($this->page > 0) {
|
|||
|
|
//Select it
|
|||
|
|
$this->FontFamily = $family;
|
|||
|
|
$this->FontSizePt = $size;
|
|||
|
|
$this->FontSize = $size/$this->k;
|
|||
|
|
|
|||
|
|
$this->CurrentFont = &$this->fonts[$fontkey];
|
|||
|
|
$this->_out(sprintf('BT /F%d %.2f Tf ET',$this->CurrentFont['i'],$this->FontSizePt));
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Create a new internal link
|
|||
|
|
*/
|
|||
|
|
function AddLink() {
|
|||
|
|
$n=count($this->links)+1;
|
|||
|
|
$this->links[$n]=array(0,0);
|
|||
|
|
return $n;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Set destination of internal link
|
|||
|
|
*/
|
|||
|
|
function SetLink($link,$y,$page) {
|
|||
|
|
$this->links[$link]=array($page,$y);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Add an external hyperlink on the page (an rectangular area). It is not bound to any other PDF element,
|
|||
|
|
* like text. It is the task of layout engine to draw the appropriate text inside this area.
|
|||
|
|
*
|
|||
|
|
* @param Float $x X-coordinate of the upper-left corner of the link area
|
|||
|
|
* @param Float $y Y-coordinate of the upper-left corner of the link area
|
|||
|
|
* @param Float $w link area width
|
|||
|
|
* @param Float $h link area height
|
|||
|
|
* @param String $link Link URL
|
|||
|
|
*/
|
|||
|
|
function add_link_external($x, $y, $w, $h, $link) {
|
|||
|
|
$link = new PDFAnnotationExternalLink($this,
|
|||
|
|
$this->_generate_new_object_number(),
|
|||
|
|
0,
|
|||
|
|
new PDFRect($x, $y, $w, $h),
|
|||
|
|
$link);
|
|||
|
|
$this->_pages[count($this->_pages)-1]->add_annotation($link);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Add an internal hyperlink on the page (an rectangular area). It is not bound to any other PDF element,
|
|||
|
|
* like text. It is the task of layout engine to draw the appropriate text inside this area.
|
|||
|
|
*
|
|||
|
|
* @param Float $x X-coordinate of the upper-left corner of the link area
|
|||
|
|
* @param Float $y Y-coordinate of the upper-left corner of the link area
|
|||
|
|
* @param Float $w link area width
|
|||
|
|
* @param Float $h link area height
|
|||
|
|
* @param Integer $link Internal Link identifier
|
|||
|
|
*/
|
|||
|
|
function add_link_internal($x, $y, $w, $h, $link) {
|
|||
|
|
$link = new PDFAnnotationInternalLink($this,
|
|||
|
|
$this->_generate_new_object_number(),
|
|||
|
|
0,
|
|||
|
|
new PDFRect($x, $y, $w, $h),
|
|||
|
|
$link);
|
|||
|
|
$this->_pages[count($this->_pages)-1]->add_annotation($link);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function Text($x, $y, $txt) {
|
|||
|
|
//Output a string
|
|||
|
|
$s = sprintf('BT %.2f %.2f Td (%s) Tj ET',$x*$this->k,($this->h-$y)*$this->k,$this->_escape($txt));
|
|||
|
|
|
|||
|
|
if ($this->underline && $txt!='') {
|
|||
|
|
$s.=' '.$this->_dounderline($x,$y,$txt);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if ($this->overline && $txt!='') {
|
|||
|
|
$s.=' '.$this->_dooverline($x,$y,$txt);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if ($this->strikeout && $txt!='') {
|
|||
|
|
$s.=' '.$this->_dostrikeout($x,$y,$txt);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if ($this->ColorFlag) {
|
|||
|
|
$s='q '.$this->TextColor.' '.$s.' Q';
|
|||
|
|
};
|
|||
|
|
$this->_out($s);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Accepts PNG images only
|
|||
|
|
*/
|
|||
|
|
function Image($file, $x, $y, $w, $h) {
|
|||
|
|
// Put an image on the page
|
|||
|
|
if (!isset($this->images[$file])) {
|
|||
|
|
$mqr=get_magic_quotes_runtime();
|
|||
|
|
set_magic_quotes_runtime(0);
|
|||
|
|
$info=$this->_parsepng($file);
|
|||
|
|
set_magic_quotes_runtime($mqr);
|
|||
|
|
|
|||
|
|
$info['i']=count($this->images)+1;
|
|||
|
|
$this->images[$file]=$info;
|
|||
|
|
} else {
|
|||
|
|
$info=$this->images[$file];
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$this->_out(sprintf('q %.2f 0 0 %.2f %.2f %.2f cm /I%d Do Q',
|
|||
|
|
$w*$this->k,
|
|||
|
|
$h*$this->k,
|
|||
|
|
$x*$this->k,
|
|||
|
|
($this->h-($y+$h))*$this->k,
|
|||
|
|
$info['i']));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* @param $name String file to save generated PDF in
|
|||
|
|
*/
|
|||
|
|
function Output($name) {
|
|||
|
|
//Finish document if necessary
|
|||
|
|
if ($this->state != FPDF_STATE_COMPLETED) {
|
|||
|
|
$this->Close();
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$f=fopen($name,'wb');
|
|||
|
|
if (!$f) {
|
|||
|
|
$this->Error('Unable to create output file: '.$name);
|
|||
|
|
};
|
|||
|
|
fwrite($f,$this->buffer,strlen($this->buffer));
|
|||
|
|
fclose($f);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/********************************************************************************
|
|||
|
|
* *
|
|||
|
|
* Protected methods *
|
|||
|
|
* *
|
|||
|
|
*******************************************************************************/
|
|||
|
|
function _dochecks() {
|
|||
|
|
// Check for locale-related bug
|
|||
|
|
if (1.1==1) {
|
|||
|
|
$this->Error('Don\'t alter the locale before including class file');
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
// Check for decimal separator
|
|||
|
|
if (sprintf('%.1f',1.0)!='1.0') {
|
|||
|
|
setlocale(LC_NUMERIC,'C');
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _getfontpath() {
|
|||
|
|
return CACHE_DIR;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _putpages() {
|
|||
|
|
$nb=$this->page;
|
|||
|
|
|
|||
|
|
if ($this->DefOrientation=='P') {
|
|||
|
|
$wPt=$this->fwPt;
|
|||
|
|
$hPt=$this->fhPt;
|
|||
|
|
} else {
|
|||
|
|
$wPt=$this->fhPt;
|
|||
|
|
$hPt=$this->fwPt;
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$filter=($this->compress) ? '/Filter /FlateDecode ' : '';
|
|||
|
|
|
|||
|
|
$pages_start_obj_number = $this->n+1;
|
|||
|
|
|
|||
|
|
for ($n=1; $n<=$nb; $n++) {
|
|||
|
|
//Page
|
|||
|
|
|
|||
|
|
$page = $this->_pages[$n-1];
|
|||
|
|
$this->offsets[$page->get_object_id()] = strlen($this->buffer);
|
|||
|
|
$this->_out(sprintf("%u %u obj",$page->object_id, $page->generation_id));
|
|||
|
|
|
|||
|
|
$this->_out('<</Type /Page');
|
|||
|
|
$this->_out('/Parent 1 0 R');
|
|||
|
|
$this->_out("/Annots ".$this->_pages[$n-1]->_annotations($this));
|
|||
|
|
$this->_out('/Resources 2 0 R');
|
|||
|
|
|
|||
|
|
$this->_out('/Contents '.($this->n+1).' 0 R>>');
|
|||
|
|
$this->_out('endobj');
|
|||
|
|
//Page content
|
|||
|
|
$p=($this->compress) ? gzcompress($this->pages[$n]) : $this->pages[$n];
|
|||
|
|
$this->_newobj();
|
|||
|
|
$this->_out('<<'.$filter.'/Length '.strlen($p).'>>');
|
|||
|
|
$this->_putstream($p);
|
|||
|
|
$this->_out('endobj');
|
|||
|
|
|
|||
|
|
// Output annotation object for this page
|
|||
|
|
$annotations = $this->_pages[$n-1]->annotations;
|
|||
|
|
$size = count($annotations);
|
|||
|
|
|
|||
|
|
for ($j=0; $j<$size; $j++) {
|
|||
|
|
$annotations[$j]->out($this);
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
//Pages root
|
|||
|
|
$this->offsets[1] = strlen($this->buffer);
|
|||
|
|
$this->_out('1 0 obj');
|
|||
|
|
$this->_out('<</Type /Pages');
|
|||
|
|
|
|||
|
|
$this->_out('/Kids '.$this->_reference_array($this->_pages));
|
|||
|
|
|
|||
|
|
$this->_out('/Count '.$nb);
|
|||
|
|
$this->_out(sprintf('/MediaBox [0 0 %.2f %.2f]',$wPt,$hPt));
|
|||
|
|
$this->_out('>>');
|
|||
|
|
$this->_out('endobj');
|
|||
|
|
|
|||
|
|
return $pages_start_obj_number;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _putfonts() {
|
|||
|
|
$nf=$this->n;
|
|||
|
|
|
|||
|
|
$num_diffs = count($this->diffs);
|
|||
|
|
for ($i=1; $i<=$num_diffs; $i++) {
|
|||
|
|
$diff = $this->diffs[$i];
|
|||
|
|
$cmap = $this->cmaps[$i];
|
|||
|
|
|
|||
|
|
//Encodings
|
|||
|
|
$this->_newobj();
|
|||
|
|
$this->_out($this->_dictionary(array("Type" => "/Encoding",
|
|||
|
|
"BaseEncoding" => "/WinAnsiEncoding",
|
|||
|
|
"Differences" => $this->_array($diff))));
|
|||
|
|
$this->_out('endobj');
|
|||
|
|
|
|||
|
|
$cmap->out($this);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$mqr=get_magic_quotes_runtime();
|
|||
|
|
set_magic_quotes_runtime(0);
|
|||
|
|
foreach ($this->FontFiles as $file=>$info) {
|
|||
|
|
//Font file embedding
|
|||
|
|
$this->_newobj();
|
|||
|
|
$this->FontFiles[$file]['n'] = $this->n;
|
|||
|
|
$font='';
|
|||
|
|
$f=fopen($this->_getfontpath().$file,'rb',1);
|
|||
|
|
if (!$f) {
|
|||
|
|
$this->Error('Font file not found');
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
while (!feof($f)) { $font.=fread($f,8192); };
|
|||
|
|
|
|||
|
|
fclose($f);
|
|||
|
|
$compressed=(substr($file,-2)=='.z');
|
|||
|
|
if (!$compressed && isset($info['length2'])) {
|
|||
|
|
$header=(ord($font{0})==128);
|
|||
|
|
if($header) {
|
|||
|
|
//Strip first binary header
|
|||
|
|
$font=substr($font,6);
|
|||
|
|
}
|
|||
|
|
if($header && ord($font{$info['length1']})==128) {
|
|||
|
|
//Strip second binary header
|
|||
|
|
$font=substr($font,0,$info['length1']).substr($font,$info['length1']+6);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
$this->_out('<</Length '.strlen($font));
|
|||
|
|
|
|||
|
|
if ($compressed) {
|
|||
|
|
$this->_out('/Filter /FlateDecode');
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$this->_out('/Length1 '.$info['length1']);
|
|||
|
|
if(isset($info['length2'])) {
|
|||
|
|
$this->_out('/Length2 '.$info['length2'].' /Length3 0');
|
|||
|
|
};
|
|||
|
|
$this->_out('>>');
|
|||
|
|
$this->_putstream($font);
|
|||
|
|
$this->_out('endobj');
|
|||
|
|
}
|
|||
|
|
set_magic_quotes_runtime($mqr);
|
|||
|
|
|
|||
|
|
foreach ($this->fonts as $k=>$font) {
|
|||
|
|
//Font objects
|
|||
|
|
$this->fonts[$k]['n'] = $this->n+1;
|
|||
|
|
$type=$font['type'];
|
|||
|
|
$name=$font['name'];
|
|||
|
|
|
|||
|
|
if ($type=='Type1' || $type=='TrueType') {
|
|||
|
|
//Additional Type1 or TrueType font
|
|||
|
|
$this->_newobj();
|
|||
|
|
$this->_out('<</Type /Font');
|
|||
|
|
$this->_out('/BaseFont /'.$name);
|
|||
|
|
$this->_out('/Subtype /'.$type);
|
|||
|
|
$this->_out('/FirstChar 32 /LastChar 255');
|
|||
|
|
$this->_out('/Widths '.($this->n+1).' 0 R');
|
|||
|
|
$this->_out('/FontDescriptor '.($this->n+2).' 0 R');
|
|||
|
|
if ($font['enc']) {
|
|||
|
|
if(isset($font['diff'])) {
|
|||
|
|
$this->_out('/Encoding '.($nf+$font['diff']).' 0 R');
|
|||
|
|
$this->_out('/ToUnicode '.($this->_reference($this->cmaps[$font['diff']])));
|
|||
|
|
} else {
|
|||
|
|
$this->_out('/Encoding /WinAnsiEncoding');
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
$this->_out('>>');
|
|||
|
|
$this->_out('endobj');
|
|||
|
|
|
|||
|
|
//Widths
|
|||
|
|
$this->_newobj();
|
|||
|
|
$cw = &$font['cw'];
|
|||
|
|
$s='[';
|
|||
|
|
for ($i=32;$i<=255;$i++) {
|
|||
|
|
$s.=$cw[chr($i)].' ';
|
|||
|
|
};
|
|||
|
|
$this->_out($s.']');
|
|||
|
|
$this->_out('endobj');
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Font descriptor
|
|||
|
|
*/
|
|||
|
|
$this->_newobj();
|
|||
|
|
$fontDescriptor = array('Type' => '/FontDescriptor',
|
|||
|
|
'FontName' => '/'.$name,
|
|||
|
|
'Flags' => $font['desc']['Flags'],
|
|||
|
|
'FontBBox' => $font['desc']['FontBBox'],
|
|||
|
|
'ItalicAngle' => $font['desc']['ItalicAngle'],
|
|||
|
|
'Ascent' => $font['desc']['Ascent'],
|
|||
|
|
'Descent' => $font['desc']['Descent'],
|
|||
|
|
'CapHeight' => $font['desc']['CapHeight'],
|
|||
|
|
'StemV' => $font['desc']['StemV']
|
|||
|
|
);
|
|||
|
|
if ($font['file'] != "") {
|
|||
|
|
$fontDescriptor['FontFile'.($type=='Type1' ? '' : '2')] =
|
|||
|
|
$this->FontFiles[$font['file']]['n'].' 0 R';
|
|||
|
|
};
|
|||
|
|
$this->_out($this->_dictionary($fontDescriptor));
|
|||
|
|
$this->_out('endobj');
|
|||
|
|
|
|||
|
|
} else {
|
|||
|
|
//Allow for additional types
|
|||
|
|
$mtd='_put'.strtolower($type);
|
|||
|
|
if(!method_exists($this,$mtd))
|
|||
|
|
$this->Error('Unsupported font type: '.$type);
|
|||
|
|
$this->$mtd($font);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _putimages() {
|
|||
|
|
$filter=($this->compress) ? '/Filter /FlateDecode ' : '';
|
|||
|
|
reset($this->images);
|
|||
|
|
while (list($file,$info) = each($this->images)) {
|
|||
|
|
$this->_newobj();
|
|||
|
|
$this->images[$file]['n']=$this->n;
|
|||
|
|
$this->_out('<</Type /XObject');
|
|||
|
|
$this->_out('/Subtype /Image');
|
|||
|
|
$this->_out('/Width '.$info['w']);
|
|||
|
|
$this->_out('/Height '.$info['h']);
|
|||
|
|
if ($info['cs']=='Indexed') {
|
|||
|
|
$this->_out('/ColorSpace [/Indexed /DeviceRGB '.(strlen($info['pal'])/3-1).' '.($this->n+1).' 0 R]');
|
|||
|
|
} else {
|
|||
|
|
$this->_out('/ColorSpace /'.$info['cs']);
|
|||
|
|
if($info['cs']=='DeviceCMYK') {
|
|||
|
|
$this->_out('/Decode [1 0 1 0 1 0 1 0]');
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
$this->_out('/BitsPerComponent '.$info['bpc']);
|
|||
|
|
if (isset($info['f'])) {
|
|||
|
|
$this->_out('/Filter /'.$info['f']);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
if(isset($info['parms'])) {
|
|||
|
|
$this->_out($info['parms']);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
if(isset($info['trns']) && is_array($info['trns'])) {
|
|||
|
|
$trns='';
|
|||
|
|
for ($i=0;$i<count($info['trns']);$i++) {
|
|||
|
|
$trns.=$info['trns'][$i].' '.$info['trns'][$i].' ';
|
|||
|
|
};
|
|||
|
|
$this->_out('/Mask ['.$trns.']');
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$this->_out('/Length '.strlen($info['data']).'>>');
|
|||
|
|
$this->_putstream($info['data']);
|
|||
|
|
unset($this->images[$file]['data']);
|
|||
|
|
$this->_out('endobj');
|
|||
|
|
|
|||
|
|
// Palette
|
|||
|
|
if ($info['cs']=='Indexed') {
|
|||
|
|
$this->_newobj();
|
|||
|
|
$pal=($this->compress) ? gzcompress($info['pal']) : $info['pal'];
|
|||
|
|
$this->_out('<<'.$filter.'/Length '.strlen($pal).'>>');
|
|||
|
|
$this->_putstream($pal);
|
|||
|
|
$this->_out('endobj');
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _putxobjectdict() {
|
|||
|
|
foreach ($this->images as $image) {
|
|||
|
|
$this->_out('/I'.$image['i'].' '.$image['n'].' 0 R');
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _putresourcedict() {
|
|||
|
|
$this->_out('/ProcSet [/PDF /Text /ImageB /ImageC /ImageI]');
|
|||
|
|
$this->_out('/Font <<');
|
|||
|
|
foreach ($this->fonts as $font) {
|
|||
|
|
$this->_out('/F'.$font['i'].' '.$font['n'].' 0 R');
|
|||
|
|
};
|
|||
|
|
$this->_out('>>');
|
|||
|
|
$this->_out('/XObject <<');
|
|||
|
|
$this->_putxobjectdict();
|
|||
|
|
$this->_out('>>');
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _putresources() {
|
|||
|
|
$this->_putfonts();
|
|||
|
|
$this->_putimages();
|
|||
|
|
|
|||
|
|
//Resource dictionary
|
|||
|
|
$this->offsets[2]=strlen($this->buffer);
|
|||
|
|
$this->_out('2 0 obj');
|
|||
|
|
$this->_out('<<');
|
|||
|
|
$this->_putresourcedict();
|
|||
|
|
$this->_out('>>');
|
|||
|
|
$this->_out('endobj');
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _putinfo() {
|
|||
|
|
$this->_out('/Producer '.$this->_textstring('FPDF '.FPDF_VERSION));
|
|||
|
|
|
|||
|
|
if (!empty($this->title)) {
|
|||
|
|
$this->_out('/Title '.$this->_textstring($this->title));
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
if (!empty($this->subject)) {
|
|||
|
|
$this->_out('/Subject '.$this->_textstring($this->subject));
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
if (!empty($this->author)) {
|
|||
|
|
$this->_out('/Author '.$this->_textstring($this->author));
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
if (!empty($this->keywords)) {
|
|||
|
|
$this->_out('/Keywords '.$this->_textstring($this->keywords));
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
if (!empty($this->creator)) {
|
|||
|
|
$this->_out('/Creator '.$this->_textstring($this->creator));
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$this->_out('/CreationDate '.$this->_textstring('D:'.date('YmdHis')));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
// Generate the document catalog entry of PDF file
|
|||
|
|
function _putcatalog($pages_start_obj_number) {
|
|||
|
|
$this->_out('/Type /Catalog');
|
|||
|
|
|
|||
|
|
$this->_out('/Pages 1 0 R');
|
|||
|
|
if ($this->ZoomMode=='fullpage') {
|
|||
|
|
$this->_out("/OpenAction [$pages_start_obj_number 0 R /Fit]");
|
|||
|
|
} elseif ($this->ZoomMode=='fullwidth') {
|
|||
|
|
$this->_out("/OpenAction [$pages_start_obj_number 0 R /FitH null]");
|
|||
|
|
} elseif ($this->ZoomMode=='real') {
|
|||
|
|
$this->_out("/OpenAction [$pages_start_obj_number 0 R /XYZ null null 1]");
|
|||
|
|
} elseif (!is_string($this->ZoomMode)) {
|
|||
|
|
$this->_out("/OpenAction [$pages_start_obj_number 0 R /XYZ null null ".($this->ZoomMode/100).']');
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
if ($this->LayoutMode=='single') {
|
|||
|
|
$this->_out('/PageLayout /SinglePage');
|
|||
|
|
} elseif ($this->LayoutMode=='continuous') {
|
|||
|
|
$this->_out('/PageLayout /OneColumn');
|
|||
|
|
} elseif ($this->LayoutMode=='two') {
|
|||
|
|
$this->_out('/PageLayout /TwoColumnLeft');
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
if (count($this->_forms) > 0) {
|
|||
|
|
$this->_out('/AcroForm <<');
|
|||
|
|
$this->_out('/Fields '.$this->_reference_array($this->_forms));
|
|||
|
|
$this->_out('/DR 2 0 R');
|
|||
|
|
$this->_out('/NeedAppearances true');
|
|||
|
|
$this->_out('>>');
|
|||
|
|
};
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _putheader() {
|
|||
|
|
$this->_out('%PDF-'.$this->PDFVersion);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _puttrailer() {
|
|||
|
|
$this->_out('/Size '.($this->n+1));
|
|||
|
|
$this->_out('/Root '.$this->n.' 0 R');
|
|||
|
|
$this->_out('/Info '.($this->n-1).' 0 R');
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _enddoc() {
|
|||
|
|
$this->_putheader();
|
|||
|
|
$pages_start_obj_number = $this->_putpages();
|
|||
|
|
|
|||
|
|
$this->_putresources();
|
|||
|
|
|
|||
|
|
//Info
|
|||
|
|
$this->_newobj();
|
|||
|
|
$this->_out('<<');
|
|||
|
|
$this->_putinfo();
|
|||
|
|
$this->_out('>>');
|
|||
|
|
$this->_out('endobj');
|
|||
|
|
|
|||
|
|
// Form fields
|
|||
|
|
for ($i=0; $i<count($this->_forms); $i++) {
|
|||
|
|
$form =& $this->_forms[$i];
|
|||
|
|
|
|||
|
|
$form->out($this);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
//Catalog
|
|||
|
|
$this->_newobj();
|
|||
|
|
$this->_out('<<');
|
|||
|
|
$this->_putcatalog($pages_start_obj_number);
|
|||
|
|
$this->_out('>>');
|
|||
|
|
$this->_out('endobj');
|
|||
|
|
|
|||
|
|
//Cross-ref
|
|||
|
|
$o=strlen($this->buffer);
|
|||
|
|
$this->_out('xref');
|
|||
|
|
$this->_out('0 '.($this->n+1));
|
|||
|
|
$this->_out('0000000000 65535 f ');
|
|||
|
|
|
|||
|
|
for ($i=1; $i<=$this->n; $i++) {
|
|||
|
|
$this->_out(sprintf('%010d 00000 n ',$this->offsets[$i]));
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
//Trailer
|
|||
|
|
$this->_out('trailer');
|
|||
|
|
$this->_out('<<');
|
|||
|
|
$this->_puttrailer();
|
|||
|
|
$this->_out('>>');
|
|||
|
|
$this->_out('startxref');
|
|||
|
|
$this->_out($o);
|
|||
|
|
$this->_out('%%EOF');
|
|||
|
|
$this->state = FPDF_STATE_COMPLETED;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _beginpage() {
|
|||
|
|
$this->page++;
|
|||
|
|
$this->pages[$this->page]='';
|
|||
|
|
$this->state = FPDF_STATE_PAGE_STARTED;
|
|||
|
|
$this->FontFamily='';
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* End of page contents
|
|||
|
|
*/
|
|||
|
|
function _endpage() {
|
|||
|
|
$this->state = FPDF_STATE_DOCUMENT_STARTED;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Start a new indirect object
|
|||
|
|
*/
|
|||
|
|
function _newobj() {
|
|||
|
|
$num = $this->_generate_new_object_number();
|
|||
|
|
$this->offsets[$num]=strlen($this->buffer);
|
|||
|
|
$this->_out($num.' 0 obj');
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _parsepng($file) {
|
|||
|
|
//Extract info from a PNG file
|
|||
|
|
$f=fopen($file,'rb');
|
|||
|
|
if (!$f) {
|
|||
|
|
$this->Error('Can\'t open image file: '.$file);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
//Check signature
|
|||
|
|
if (fread($f,8)!=chr(137).'PNG'.chr(13).chr(10).chr(26).chr(10)) {
|
|||
|
|
$this->Error('Not a PNG file: '.$file);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
//Read header chunk
|
|||
|
|
fread($f,4);
|
|||
|
|
if (fread($f,4)!='IHDR') {
|
|||
|
|
$this->Error('Incorrect PNG file: '.$file);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$w=$this->_freadint($f);
|
|||
|
|
$h=$this->_freadint($f);
|
|||
|
|
$bpc=ord(fread($f,1));
|
|||
|
|
|
|||
|
|
if ($bpc>8) {
|
|||
|
|
$this->Error('16-bit depth not supported: '.$file);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
$ct=ord(fread($f,1));
|
|||
|
|
if ($ct==0) {
|
|||
|
|
$colspace='DeviceGray';
|
|||
|
|
} elseif($ct==2) {
|
|||
|
|
$colspace='DeviceRGB';
|
|||
|
|
} elseif($ct==3) {
|
|||
|
|
$colspace='Indexed';
|
|||
|
|
} else {
|
|||
|
|
$this->Error('Alpha channel not supported: '.$file);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
if (ord(fread($f,1))!=0) {
|
|||
|
|
$this->Error('Unknown compression method: '.$file);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
if (ord(fread($f,1))!=0) {
|
|||
|
|
$this->Error('Unknown filter method: '.$file);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
if (ord(fread($f,1))!=0) {
|
|||
|
|
$this->Error('Interlacing not supported: '.$file);
|
|||
|
|
};
|
|||
|
|
|
|||
|
|
fread($f,4);
|
|||
|
|
$parms='/DecodeParms <</Predictor 15 /Colors '.($ct==2 ? 3 : 1).' /BitsPerComponent '.$bpc.' /Columns '.$w.'>>';
|
|||
|
|
|
|||
|
|
//Scan chunks looking for palette, transparency and image data
|
|||
|
|
$pal='';
|
|||
|
|
$trns='';
|
|||
|
|
$data='';
|
|||
|
|
do {
|
|||
|
|
$n=$this->_freadint($f);
|
|||
|
|
$type=fread($f,4);
|
|||
|
|
if ($type=='PLTE') {
|
|||
|
|
//Read palette
|
|||
|
|
$pal=fread($f,$n);
|
|||
|
|
fread($f,4);
|
|||
|
|
} elseif($type=='tRNS') {
|
|||
|
|
//Read transparency info
|
|||
|
|
$t=fread($f,$n);
|
|||
|
|
if ($ct==0) {
|
|||
|
|
$trns=array(ord(substr($t,1,1)));
|
|||
|
|
} elseif($ct==2) {
|
|||
|
|
$trns=array(ord(substr($t,1,1)),ord(substr($t,3,1)),ord(substr($t,5,1)));
|
|||
|
|
} else {
|
|||
|
|
$pos=strpos($t,chr(0));
|
|||
|
|
if ($pos!==false) {
|
|||
|
|
$trns=array($pos);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
fread($f,4);
|
|||
|
|
} elseif ($type=='IDAT') {
|
|||
|
|
//Read image data block
|
|||
|
|
$data.=fread($f,$n);
|
|||
|
|
fread($f,4);
|
|||
|
|
} elseif ($type=='IEND') {
|
|||
|
|
break;
|
|||
|
|
} else {
|
|||
|
|
fread($f,$n+4);
|
|||
|
|
};
|
|||
|
|
} while($n);
|
|||
|
|
|
|||
|
|
if ($colspace=='Indexed' && empty($pal)) {
|
|||
|
|
$this->Error('Missing palette in '.$file);
|
|||
|
|
};
|
|||
|
|
fclose($f);
|
|||
|
|
return array('w' => $w,
|
|||
|
|
'h' => $h,
|
|||
|
|
'cs' => $colspace,
|
|||
|
|
'bpc' => $bpc,
|
|||
|
|
'f' => 'FlateDecode',
|
|||
|
|
'parms' => $parms,
|
|||
|
|
'pal' => $pal,
|
|||
|
|
'trns' => $trns,
|
|||
|
|
'data' => $data);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Read a 4-byte integer from file
|
|||
|
|
*/
|
|||
|
|
function _freadint($f) {
|
|||
|
|
$a=unpack('Ni',fread($f,4));
|
|||
|
|
return $a['i'];
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Format a text string
|
|||
|
|
*/
|
|||
|
|
function _textstring($s) {
|
|||
|
|
return '('.$this->_escape($s).')';
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Add \ before \, ( and )
|
|||
|
|
*/
|
|||
|
|
function _escape($s) {
|
|||
|
|
return str_replace(')','\\)',str_replace('(','\\(',str_replace('\\','\\\\',$s)));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
function _putstream($s) {
|
|||
|
|
$this->_out('stream');
|
|||
|
|
$this->_out($s);
|
|||
|
|
$this->_out('endstream');
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Add a line to the document
|
|||
|
|
*/
|
|||
|
|
function _out($s) {
|
|||
|
|
if ($this->state == FPDF_STATE_PAGE_STARTED) {
|
|||
|
|
$this->pages[$this->page].=$s."\n";
|
|||
|
|
} else {
|
|||
|
|
$this->buffer.=$s."\n";
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
?>
|