<?php

//============================================================+
// File name   : tcpdf.php
// Version     : 5.9.203
// Begin       : 2002-08-03
// Last Update : 2013-01-22
// Author      : Nicola Asuni - Tecnick.com LTD - Manor Coach House, Church Hill, Aldershot, Hants, GU12 4RQ, UK - www.tecnick.com - info@tecnick.com
// License     : http://www.tecnick.com/pagefiles/tcpdf/LICENSE.TXT GNU-LGPLv3
// -------------------------------------------------------------------
// Copyright (C) 2002-2013 Nicola Asuni - Tecnick.com LTD
//
// This file is part of TCPDF software library.
//
// TCPDF 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.
//
// TCPDF 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 TCPDF. If not, see
// <http://www.tecnick.com/pagefiles/tcpdf/LICENSE.TXT>.
//
// See LICENSE.TXT file for more information.
// -------------------------------------------------------------------
//
// Description :
//   This is a PHP class for generating PDF documents without requiring external extensions.
//
// NOTE:
//   This class was originally derived in 2002 from the Public
//   Domain FPDF class by Olivier Plathey (http://www.fpdf.org),
//   but now is almost entirely rewritten and contains thousands of
//   new lines of code and hundreds new features.
//
// Main features:
//  * no external libraries are required for the basic functions;
//  * all standard page formats, custom page formats, custom margins and units of measure;
//  * UTF-8 Unicode and Right-To-Left languages;
//  * TrueTypeUnicode, TrueType, Type1 and CID-0 fonts;
//  * font subsetting;
//  * methods to publish some XHTML + CSS code, Javascript and Forms;
//  * images, graphic (geometric figures) and transformation methods;
//  * supports JPEG, PNG and SVG images natively, all images supported by GD (GD, GD2, GD2PART, GIF, JPEG, PNG, BMP, XBM, XPM) and all images supported via ImagMagick (http://www.imagemagick.org/www/formats.html)
//  * 1D and 2D barcodes: CODE 39, ANSI MH10.8M-1983, USD-3, 3 of 9, CODE 93, USS-93, Standard 2 of 5, Interleaved 2 of 5, CODE 128 A/B/C, 2 and 5 Digits UPC-Based Extention, EAN 8, EAN 13, UPC-A, UPC-E, MSI, POSTNET, PLANET, RMS4CC (Royal Mail 4-state Customer Code), CBC (Customer Bar Code), KIX (Klant index - Customer index), Intelligent Mail Barcode, Onecode, USPS-B-3200, CODABAR, CODE 11, PHARMACODE, PHARMACODE TWO-TRACKS, Datamatrix, QR-Code, PDF417;
//  * JPEG and PNG ICC profiles, Grayscale, RGB, CMYK, Spot Colors and Transparencies;
//  * automatic page header and footer management;
//  * document encryption up to 256 bit and digital signature certifications;
//  * transactions to UNDO commands;
//  * PDF annotations, including links, text and file attachments;
//  * text rendering modes (fill, stroke and clipping);
//  * multiple columns mode;
//  * no-write page regions;
//  * bookmarks, named destinations and table of content;
//  * text hyphenation;
//  * text stretching and spacing (tracking);
//  * automatic page break, line break and text alignments including justification;
//  * automatic page numbering and page groups;
//  * move and delete pages;
//  * page compression (requires php-zlib extension);
//  * XOBject Templates;
//  * Layers and object visibility.
//	* PDF/A-1b support.
//
// -----------------------------------------------------------
// THANKS TO:
//
// Olivier Plathey (http://www.fpdf.org) for original FPDF.
// Efthimios Mavrogeorgiadis (emavro@yahoo.com) for suggestions on RTL language support.
// Klemen Vodopivec (http://www.fpdf.de/downloads/addons/37/) for Encryption algorithm.
// Warren Sherliker (wsherliker@gmail.com) for better image handling.
// dullus for text Justification.
// Bob Vincent (pillarsdotnet@users.sourceforge.net) for <li> value attribute.
// Patrick Benny for text stretch suggestion on Cell().
// Johannes G�ntert for JavaScript support.
// Denis Van Nuffelen for Dynamic Form.
// Jacek Czekaj for multibyte justification
// Anthony Ferrara for the reintroduction of legacy image methods.
// Sourceforge user 1707880 (hucste) for line-trough mode.
// Larry Stanbery for page groups.
// Martin Hall-May for transparency.
// Aaron C. Spike for Polycurve method.
// Mohamad Ali Golkar, Saleh AlMatrafe, Charles Abbott for Arabic and Persian support.
// Moritz Wagner and Andreas Wurmser for graphic functions.
// Andrew Whitehead for core fonts support.
// Esteban Jo�l Mar�n for OpenType font conversion.
// Teus Hagen for several suggestions and fixes.
// Yukihiro Nakadaira for CID-0 CJK fonts fixes.
// Kosmas Papachristos for some CSS improvements.
// Marcel Partap for some fixes.
// Won Kyu Park for several suggestions, fixes and patches.
// Dominik Dzienia for QR-code support.
// Laurent Minguet for some suggestions.
// Christian Deligant for some suggestions and fixes.
// Travis Harris for crop mark suggestion.
// Aleksey Kuznetsov for some suggestions and text shadows.
// Jim Hanlon for several suggestions and patches.
// Anyone else that has reported a bug or sent a suggestion.
//============================================================+

/**
 * @file
 * This is a PHP class for generating PDF documents without requiring external extensions.<br>
 * TCPDF project (http://www.tcpdf.org) was originally derived in 2002 from the Public Domain FPDF class by Olivier Plathey (http://www.fpdf.org), but now is almost entirely rewritten.<br>
 * <h3>TCPDF main features are:</h3>
 * <ul>
 * <li>no external libraries are required for the basic functions;</li>
 * <li>all standard page formats, custom page formats, custom margins and units of measure;</li>
 * <li>UTF-8 Unicode and Right-To-Left languages;</li>
 * <li>TrueTypeUnicode, TrueType, Type1 and CID-0 fonts;</li>
 * <li>font subsetting;</li>
 * <li>methods to publish some XHTML + CSS code, Javascript and Forms;</li>
 * <li>images, graphic (geometric figures) and transformation methods;
 * <li>supports JPEG, PNG and SVG images natively, all images supported by GD (GD, GD2, GD2PART, GIF, JPEG, PNG, BMP, XBM, XPM) and all images supported via ImagMagick (http://www.imagemagick.org/www/formats.html)</li>
 * <li>1D and 2D barcodes: CODE 39, ANSI MH10.8M-1983, USD-3, 3 of 9, CODE 93, USS-93, Standard 2 of 5, Interleaved 2 of 5, CODE 128 A/B/C, 2 and 5 Digits UPC-Based Extention, EAN 8, EAN 13, UPC-A, UPC-E, MSI, POSTNET, PLANET, RMS4CC (Royal Mail 4-state Customer Code), CBC (Customer Bar Code), KIX (Klant index - Customer index), Intelligent Mail Barcode, Onecode, USPS-B-3200, CODABAR, CODE 11, PHARMACODE, PHARMACODE TWO-TRACKS, Datamatrix, QR-Code, PDF417;</li>
 * <li>JPEG and PNG ICC profiles, Grayscale, RGB, CMYK, Spot Colors and Transparencies;</li>
 * <li>automatic page header and footer management;</li>
 * <li>document encryption up to 256 bit and digital signature certifications;</li>
 * <li>transactions to UNDO commands;</li>
 * <li>PDF annotations, including links, text and file attachments;</li>
 * <li>text rendering modes (fill, stroke and clipping);</li>
 * <li>multiple columns mode;</li>
 * <li>no-write page regions;</li>
 * <li>bookmarks, named destinations and table of content;</li>
 * <li>text hyphenation;</li>
 * <li>text stretching and spacing (tracking);</li>
 * <li>automatic page break, line break and text alignments including justification;</li>
 * <li>automatic page numbering and page groups;</li>
 * <li>move and delete pages;</li>
 * <li>page compression (requires php-zlib extension);</li>
 * <li>XOBject Templates;</li>
 * <li>Layers and object visibility;</li>
 * <li>PDF/A-1b support.</li>
 * </ul>
 * Tools to encode your unicode fonts are on fonts/utils directory.</p>
 * @package com.tecnick.tcpdf
 * @author Nicola Asuni
 * @version 5.9.203
 */
// Main configuration file. Define the K_TCPDF_EXTERNAL_CONFIG constant to skip this file.
require_once(dirname(__FILE__) . '/config/tcpdf_config.php');

/**
 * @class TCPDF
 * PHP class for generating PDF documents without requiring external extensions.
 * TCPDF project (http://www.tcpdf.org) has been originally derived in 2002 from the Public Domain FPDF class by Olivier Plathey (http://www.fpdf.org), but now is almost entirely rewritten.<br>
 * @package com.tecnick.tcpdf
 * @brief PHP class for generating PDF documents without requiring external extensions.
 * @version 5.9.203
 * @author Nicola Asuni - info@tecnick.com
 */
class TCPDF {
    // private properties

    /**
     * Current TCPDF version.
     * @private
     */
    private $tcpdf_version = '5.9.203';

    // Protected properties

    /**
     * Current page number.
     * @protected
     */
    protected $page;

    /**
     * Current object number.
     * @protected
     */
    protected $n;

    /**
     * Array of object offsets.
     * @protected
     */
    protected $offsets = array();

    /**
     * Array of object IDs for each page.
     * @protected
     */
    protected $pageobjects = array();

    /**
     * Buffer holding in-memory PDF.
     * @protected
     */
    protected $buffer;

    /**
     * Array containing pages.
     * @protected
     */
    protected $pages = array();

    /**
     * Current document state.
     * @protected
     */
    protected $state;

    /**
     * Compression flag.
     * @protected
     */
    protected $compress;

    /**
     * Current page orientation (P = Portrait, L = Landscape).
     * @protected
     */
    protected $CurOrientation;

    /**
     * Page dimensions.
     * @protected
     */
    protected $pagedim = array();

    /**
     * Scale factor (number of points in user unit).
     * @protected
     */
    protected $k;

    /**
     * Width of page format in points.
     * @protected
     */
    protected $fwPt;

    /**
     * Height of page format in points.
     * @protected
     */
    protected $fhPt;

    /**
     * Current width of page in points.
     * @protected
     */
    protected $wPt;

    /**
     * Current height of page in points.
     * @protected
     */
    protected $hPt;

    /**
     * Current width of page in user unit.
     * @protected
     */
    protected $w;

    /**
     * Current height of page in user unit.
     * @protected
     */
    protected $h;

    /**
     * Left margin.
     * @protected
     */
    protected $lMargin;

    /**
     * Right margin.
     * @protected
     */
    protected $rMargin;

    /**
     * Cell left margin (used by regions).
     * @protected
     */
    protected $clMargin;

    /**
     * Cell right margin (used by regions).
     * @protected
     */
    protected $crMargin;

    /**
     * Top margin.
     * @protected
     */
    protected $tMargin;

    /**
     * Page break margin.
     * @protected
     */
    protected $bMargin;

    /**
     * Array of cell internal paddings ('T' => top, 'R' => right, 'B' => bottom, 'L' => left).
     * @since 5.9.000 (2010-10-03)
     * @protected
     */
    protected $cell_padding = array('T' => 0, 'R' => 0, 'B' => 0, 'L' => 0);

    /**
     * Array of cell margins ('T' => top, 'R' => right, 'B' => bottom, 'L' => left).
     * @since 5.9.000 (2010-10-04)
     * @protected
     */
    protected $cell_margin = array('T' => 0, 'R' => 0, 'B' => 0, 'L' => 0);

    /**
     * Current horizontal position in user unit for cell positioning.
     * @protected
     */
    protected $x;

    /**
     * Current vertical position in user unit for cell positioning.
     * @protected
     */
    protected $y;

    /**
     * Height of last cell printed.
     * @protected
     */
    protected $lasth;

    /**
     * Line width in user unit.
     * @protected
     */
    protected $LineWidth;

    /**
     * Array of standard font names.
     * @protected
     */
    protected $CoreFonts;

    /**
     * Array of used fonts.
     * @protected
     */
    protected $fonts = array();

    /**
     * Array of font files.
     * @protected
     */
    protected $FontFiles = array();

    /**
     * Array of encoding differences.
     * @protected
     */
    protected $diffs = array();

    /**
     * Array of used images.
     * @protected
     */
    protected $images = array();

    /**
     * Array of cached files.
     * @protected
     */
    protected $cached_files = array();

    /**
     * Array of Annotations in pages.
     * @protected
     */
    protected $PageAnnots = array();

    /**
     * Array of internal links.
     * @protected
     */
    protected $links = array();

    /**
     * Current font family.
     * @protected
     */
    protected $FontFamily;

    /**
     * Current font style.
     * @protected
     */
    protected $FontStyle;

    /**
     * Current font ascent (distance between font top and baseline).
     * @protected
     * @since 2.8.000 (2007-03-29)
     */
    protected $FontAscent;

    /**
     * Current font descent (distance between font bottom and baseline).
     * @protected
     * @since 2.8.000 (2007-03-29)
     */
    protected $FontDescent;

    /**
     * Underlining flag.
     * @protected
     */
    protected $underline;

    /**
     * Overlining flag.
     * @protected
     */
    protected $overline;

    /**
     * Current font info.
     * @protected
     */
    protected $CurrentFont;

    /**
     * Current font size in points.
     * @protected
     */
    protected $FontSizePt;

    /**
     * Current font size in user unit.
     * @protected
     */
    protected $FontSize;

    /**
     * Commands for drawing color.
     * @protected
     */
    protected $DrawColor;

    /**
     * Commands for filling color.
     * @protected
     */
    protected $FillColor;

    /**
     * Commands for text color.
     * @protected
     */
    protected $TextColor;

    /**
     * Indicates whether fill and text colors are different.
     * @protected
     */
    protected $ColorFlag;

    /**
     * Automatic page breaking.
     * @protected
     */
    protected $AutoPageBreak;

    /**
     * Threshold used to trigger page breaks.
     * @protected
     */
    protected $PageBreakTrigger;

    /**
     * Flag set when processing page header.
     * @protected
     */
    protected $InHeader = false;

    /**
     * Flag set when processing page footer.
     * @protected
     */
    protected $InFooter = false;

    /**
     * Zoom display mode.
     * @protected
     */
    protected $ZoomMode;

    /**
     * Layout display mode.
     * @protected
     */
    protected $LayoutMode;

    /**
     * If true set the document information dictionary in Unicode.
     * @protected
     */
    protected $docinfounicode = true;

    /**
     * Document title.
     * @protected
     */
    protected $title = '';

    /**
     * Document subject.
     * @protected
     */
    protected $subject = '';

    /**
     * Document author.
     * @protected
     */
    protected $author = '';

    /**
     * Document keywords.
     * @protected
     */
    protected $keywords = '';

    /**
     * Document creator.
     * @protected
     */
    protected $creator = '';

    /**
     * Starting page number.
     * @protected
     */
    protected $starting_page_number = 1;

    /**
     * String alias for total number of pages.
     * @protected
     */
    protected $alias_tot_pages = '{:ptp:}';

    /**
     * String alias for page number.
     * @protected
     */
    protected $alias_num_page = '{:pnp:}';

    /**
     * String alias for total number of pages in a single group.
     * @protected
     */
    protected $alias_group_tot_pages = '{:ptg:}';

    /**
     * String alias for group page number.
     * @protected
     */
    protected $alias_group_num_page = '{:png:}';

    /**
     * String alias for right shift compensation used to correctly align page numbers on the right.
     * @protected
     */
    protected $alias_right_shift = '{rsc:';

    /**
     * The right-bottom (or left-bottom for RTL) corner X coordinate of last inserted image.
     * @since 2002-07-31
     * @author Nicola Asuni
     * @protected
     */
    protected $img_rb_x;

    /**
     * The right-bottom corner Y coordinate of last inserted image.
     * @since 2002-07-31
     * @author Nicola Asuni
     * @protected
     */
    protected $img_rb_y;

    /**
     * Adjusting factor to convert pixels to user units.
     * @since 2004-06-14
     * @author Nicola Asuni
     * @protected
     */
    protected $imgscale = 1;

    /**
     * Boolean flag set to true when the input text is unicode (require unicode fonts).
     * @since 2005-01-02
     * @author Nicola Asuni
     * @protected
     */
    protected $isunicode = false;

    /**
     * Object containing unicode data.
     * @since 5.9.004 (2010-10-18)
     * @author Nicola Asuni
     * @protected
     */
    protected $unicode;

    /**
     * Object containing font encoding maps.
     * @since 5.9.123 (2011-10-01)
     * @author Nicola Asuni
     * @protected
     */
    protected $encmaps;

    /**
     * PDF version.
     * @since 1.5.3
     * @protected
     */
    protected $PDFVersion = '1.7';

    /**
     * ID of the stored default header template (-1 = not set).
     * @protected
     */
    protected $header_xobjid = -1;

    /**
     * If true reset the Header Xobject template at each page
     * @protected
     */
    protected $header_xobj_autoreset = false;

    /**
     * Minimum distance between header and top page margin.
     * @protected
     */
    protected $header_margin;

    /**
     * Minimum distance between footer and bottom page margin.
     * @protected
     */
    protected $footer_margin;

    /**
     * Original left margin value.
     * @protected
     * @since 1.53.0.TC013
     */
    protected $original_lMargin;

    /**
     * Original right margin value.
     * @protected
     * @since 1.53.0.TC013
     */
    protected $original_rMargin;

    /**
     * Default font used on page header.
     * @protected
     */
    protected $header_font;

    /**
     * Default font used on page footer.
     * @protected
     */
    protected $footer_font;

    /**
     * Language templates.
     * @protected
     */
    protected $l;

    /**
     * Barcode to print on page footer (only if set).
     * @protected
     */
    protected $barcode = false;

    /**
     * Boolean flag to print/hide page header.
     * @protected
     */
    protected $print_header = true;

    /**
     * Boolean flag to print/hide page footer.
     * @protected
     */
    protected $print_footer = true;

    /**
     * Header image logo.
     * @protected
     */
    protected $header_logo = '';

    /**
     * Width of header image logo in user units.
     * @protected
     */
    protected $header_logo_width = 30;

    /**
     * Title to be printed on default page header.
     * @protected
     */
    protected $header_title = '';

    /**
     * String to pring on page header after title.
     * @protected
     */
    protected $header_string = '';

    /**
     * Color for header text (RGB array).
     * @since 5.9.174 (2012-07-25)
     * @protected
     */
    protected $header_text_color = array(0, 0, 0);

    /**
     * Color for header line (RGB array).
     * @since 5.9.174 (2012-07-25)
     * @protected
     */
    protected $header_line_color = array(0, 0, 0);

    /**
     * Color for footer text (RGB array).
     * @since 5.9.174 (2012-07-25)
     * @protected
     */
    protected $footer_text_color = array(0, 0, 0);

    /**
     * Color for footer line (RGB array).
     * @since 5.9.174 (2012-07-25)
     * @protected
     */
    protected $footer_line_color = array(0, 0, 0);

    /**
     * Text shadow data array.
     * @since 5.9.174 (2012-07-25)
     * @protected
     */
    protected $txtshadow = array('enabled' => false, 'depth_w' => 0, 'depth_h' => 0, 'color' => false, 'opacity' => 1, 'blend_mode' => 'Normal');

    /**
     * Default number of columns for html table.
     * @protected
     */
    protected $default_table_columns = 4;

    // variables for html parser

    /**
     * HTML PARSER: array to store current link and rendering styles.
     * @protected
     */
    protected $HREF = array();

    /**
     * List of available fonts on filesystem.
     * @protected
     */
    protected $fontlist = array();

    /**
     * Current foreground color.
     * @protected
     */
    protected $fgcolor;

    /**
     * HTML PARSER: array of boolean values, true in case of ordered list (OL), false otherwise.
     * @protected
     */
    protected $listordered = array();

    /**
     * HTML PARSER: array count list items on nested lists.
     * @protected
     */
    protected $listcount = array();

    /**
     * HTML PARSER: current list nesting level.
     * @protected
     */
    protected $listnum = 0;

    /**
     * HTML PARSER: indent amount for lists.
     * @protected
     */
    protected $listindent = 0;

    /**
     * HTML PARSER: current list indententation level.
     * @protected
     */
    protected $listindentlevel = 0;

    /**
     * Current background color.
     * @protected
     */
    protected $bgcolor;

    /**
     * Temporary font size in points.
     * @protected
     */
    protected $tempfontsize = 10;

    /**
     * Spacer string for LI tags.
     * @protected
     */
    protected $lispacer = '';

    /**
     * Default encoding.
     * @protected
     * @since 1.53.0.TC010
     */
    protected $encoding = 'UTF-8';

    /**
     * PHP internal encoding.
     * @protected
     * @since 1.53.0.TC016
     */
    protected $internal_encoding;

    /**
     * Boolean flag to indicate if the document language is Right-To-Left.
     * @protected
     * @since 2.0.000
     */
    protected $rtl = false;

    /**
     * Boolean flag used to force RTL or LTR string direction.
     * @protected
     * @since 2.0.000
     */
    protected $tmprtl = false;

    // --- Variables used for document encryption:

    /**
     * IBoolean flag indicating whether document is protected.
     * @protected
     * @since 2.0.000 (2008-01-02)
     */
    protected $encrypted;

    /**
     * Array containing encryption settings.
     * @protected
     * @since 5.0.005 (2010-05-11)
     */
    protected $encryptdata = array();

    /**
     * Last RC4 key encrypted (cached for optimisation).
     * @protected
     * @since 2.0.000 (2008-01-02)
     */
    protected $last_enc_key;

    /**
     * Last RC4 computed key.
     * @protected
     * @since 2.0.000 (2008-01-02)
     */
    protected $last_enc_key_c;

    /**
     * Encryption padding string.
     * @protected
     */
    protected $enc_padding = "\x28\xBF\x4E\x5E\x4E\x75\x8A\x41\x64\x00\x4E\x56\xFF\xFA\x01\x08\x2E\x2E\x00\xB6\xD0\x68\x3E\x80\x2F\x0C\xA9\xFE\x64\x53\x69\x7A";

    /**
     * File ID (used on document trailer).
     * @protected
     * @since 5.0.005 (2010-05-12)
     */
    protected $file_id;

    // --- bookmark ---

    /**
     * Outlines for bookmark.
     * @protected
     * @since 2.1.002 (2008-02-12)
     */
    protected $outlines = array();

    /**
     * Outline root for bookmark.
     * @protected
     * @since 2.1.002 (2008-02-12)
     */
    protected $OutlineRoot;

    // --- javascript and form ---

    /**
     * Javascript code.
     * @protected
     * @since 2.1.002 (2008-02-12)
     */
    protected $javascript = '';

    /**
     * Javascript counter.
     * @protected
     * @since 2.1.002 (2008-02-12)
     */
    protected $n_js;

    /**
     * line trough state
     * @protected
     * @since 2.8.000 (2008-03-19)
     */
    protected $linethrough;

    /**
     * Array with additional document-wide usage rights for the document.
     * @protected
     * @since 5.8.014 (2010-08-23)
     */
    protected $ur = array();

    /**
     * DPI (Dot Per Inch) Document Resolution (do not change).
     * @protected
     * @since 3.0.000 (2008-03-27)
     */
    protected $dpi = 72;

    /**
     * Array of page numbers were a new page group was started (the page numbers are the keys of the array).
     * @protected
     * @since 3.0.000 (2008-03-27)
     */
    protected $newpagegroup = array();

    /**
     * Array that contains the number of pages in each page group.
     * @protected
     * @since 3.0.000 (2008-03-27)
     */
    protected $pagegroups = array();

    /**
     * Current page group number.
     * @protected
     * @since 3.0.000 (2008-03-27)
     */
    protected $currpagegroup = 0;

    /**
     * Array of transparency objects and parameters.
     * @protected
     * @since 3.0.000 (2008-03-27)
     */
    protected $extgstates;

    /**
     * Set the default JPEG compression quality (1-100).
     * @protected
     * @since 3.0.000 (2008-03-27)
     */
    protected $jpeg_quality;

    /**
     * Default cell height ratio.
     * @protected
     * @since 3.0.014 (2008-05-23)
     */
    protected $cell_height_ratio = K_CELL_HEIGHT_RATIO;

    /**
     * PDF viewer preferences.
     * @protected
     * @since 3.1.000 (2008-06-09)
     */
    protected $viewer_preferences;

    /**
     * A name object specifying how the document should be displayed when opened.
     * @protected
     * @since 3.1.000 (2008-06-09)
     */
    protected $PageMode;

    /**
     * Array for storing gradient information.
     * @protected
     * @since 3.1.000 (2008-06-09)
     */
    protected $gradients = array();

    /**
     * Array used to store positions inside the pages buffer (keys are the page numbers).
     * @protected
     * @since 3.2.000 (2008-06-26)
     */
    protected $intmrk = array();

    /**
     * Array used to store positions inside the pages buffer (keys are the page numbers).
     * @protected
     * @since 5.7.000 (2010-08-03)
     */
    protected $bordermrk = array();

    /**
     * Array used to store page positions to track empty pages (keys are the page numbers).
     * @protected
     * @since 5.8.007 (2010-08-18)
     */
    protected $emptypagemrk = array();

    /**
     * Array used to store content positions inside the pages buffer (keys are the page numbers).
     * @protected
     * @since 4.6.021 (2009-07-20)
     */
    protected $cntmrk = array();

    /**
     * Array used to store footer positions of each page.
     * @protected
     * @since 3.2.000 (2008-07-01)
     */
    protected $footerpos = array();

    /**
     * Array used to store footer length of each page.
     * @protected
     * @since 4.0.014 (2008-07-29)
     */
    protected $footerlen = array();

    /**
     * Boolean flag to indicate if a new line is created.
     * @protected
     * @since 3.2.000 (2008-07-01)
     */
    protected $newline = true;

    /**
     * End position of the latest inserted line.
     * @protected
     * @since 3.2.000 (2008-07-01)
     */
    protected $endlinex = 0;

    /**
     * PDF string for width value of the last line.
     * @protected
     * @since 4.0.006 (2008-07-16)
     */
    protected $linestyleWidth = '';

    /**
     * PDF string for CAP value of the last line.
     * @protected
     * @since 4.0.006 (2008-07-16)
     */
    protected $linestyleCap = '0 J';

    /**
     * PDF string for join value of the last line.
     * @protected
     * @since 4.0.006 (2008-07-16)
     */
    protected $linestyleJoin = '0 j';

    /**
     * PDF string for dash value of the last line.
     * @protected
     * @since 4.0.006 (2008-07-16)
     */
    protected $linestyleDash = '[] 0 d';

    /**
     * Boolean flag to indicate if marked-content sequence is open.
     * @protected
     * @since 4.0.013 (2008-07-28)
     */
    protected $openMarkedContent = false;

    /**
     * Count the latest inserted vertical spaces on HTML.
     * @protected
     * @since 4.0.021 (2008-08-24)
     */
    protected $htmlvspace = 0;

    /**
     * Array of Spot colors.
     * @protected
     * @since 4.0.024 (2008-09-12)
     */
    protected $spot_colors = array();

    /**
     * Symbol used for HTML unordered list items.
     * @protected
     * @since 4.0.028 (2008-09-26)
     */
    protected $lisymbol = '';

    /**
     * String used to mark the beginning and end of EPS image blocks.
     * @protected
     * @since 4.1.000 (2008-10-18)
     */
    protected $epsmarker = 'x#!#EPS#!#x';

    /**
     * Array of transformation matrix.
     * @protected
     * @since 4.2.000 (2008-10-29)
     */
    protected $transfmatrix = array();

    /**
     * Current key for transformation matrix.
     * @protected
     * @since 4.8.005 (2009-09-17)
     */
    protected $transfmatrix_key = 0;

    /**
     * Booklet mode for double-sided pages.
     * @protected
     * @since 4.2.000 (2008-10-29)
     */
    protected $booklet = false;

    /**
     * Epsilon value used for float calculations.
     * @protected
     * @since 4.2.000 (2008-10-29)
     */
    protected $feps = 0.005;

    /**
     * Array used for custom vertical spaces for HTML tags.
     * @protected
     * @since 4.2.001 (2008-10-30)
     */
    protected $tagvspaces = array();

    /**
     * HTML PARSER: custom indent amount for lists. Negative value means disabled.
     * @protected
     * @since 4.2.007 (2008-11-12)
     */
    protected $customlistindent = -1;

    /**
     * Boolean flag to indicate if the border of the cell sides that cross the page should be removed.
     * @protected
     * @since 4.2.010 (2008-11-14)
     */
    protected $opencell = true;

    /**
     * Array of files to embedd.
     * @protected
     * @since 4.4.000 (2008-12-07)
     */
    protected $embeddedfiles = array();

    /**
     * Boolean flag to indicate if we are inside a PRE tag.
     * @protected
     * @since 4.4.001 (2008-12-08)
     */
    protected $premode = false;

    /**
     * Array used to store positions of graphics transformation blocks inside the page buffer.
     * keys are the page numbers
     * @protected
     * @since 4.4.002 (2008-12-09)
     */
    protected $transfmrk = array();

    /**
     * Default color for html links.
     * @protected
     * @since 4.4.003 (2008-12-09)
     */
    protected $htmlLinkColorArray = array(0, 0, 255);

    /**
     * Default font style to add to html links.
     * @protected
     * @since 4.4.003 (2008-12-09)
     */
    protected $htmlLinkFontStyle = 'U';

    /**
     * Counts the number of pages.
     * @protected
     * @since 4.5.000 (2008-12-31)
     */
    protected $numpages = 0;

    /**
     * Array containing page lengths in bytes.
     * @protected
     * @since 4.5.000 (2008-12-31)
     */
    protected $pagelen = array();

    /**
     * Counts the number of pages.
     * @protected
     * @since 4.5.000 (2008-12-31)
     */
    protected $numimages = 0;

    /**
     * Store the image keys.
     * @protected
     * @since 4.5.000 (2008-12-31)
     */
    protected $imagekeys = array();

    /**
     * Length of the buffer in bytes.
     * @protected
     * @since 4.5.000 (2008-12-31)
     */
    protected $bufferlen = 0;

    /**
     * If true enables disk caching.
     * @protected
     * @since 4.5.000 (2008-12-31)
     */
    protected $diskcache = false;

    /**
     * Counts the number of fonts.
     * @protected
     * @since 4.5.000 (2009-01-02)
     */
    protected $numfonts = 0;

    /**
     * Store the font keys.
     * @protected
     * @since 4.5.000 (2009-01-02)
     */
    protected $fontkeys = array();

    /**
     * Store the font object IDs.
     * @protected
     * @since 4.8.001 (2009-09-09)
     */
    protected $font_obj_ids = array();

    /**
     * Store the fage status (true when opened, false when closed).
     * @protected
     * @since 4.5.000 (2009-01-02)
     */
    protected $pageopen = array();

    /**
     * Default monospace font.
     * @protected
     * @since 4.5.025 (2009-03-10)
     */
    protected $default_monospaced_font = 'courier';

    /**
     * Cloned copy of the current class object.
     * @protected
     * @since 4.5.029 (2009-03-19)
     */
    protected $objcopy;

    /**
     * Array used to store the lengths of cache files.
     * @protected
     * @since 4.5.029 (2009-03-19)
     */
    protected $cache_file_length = array();

    /**
     * Table header content to be repeated on each new page.
     * @protected
     * @since 4.5.030 (2009-03-20)
     */
    protected $thead = '';

    /**
     * Margins used for table header.
     * @protected
     * @since 4.5.030 (2009-03-20)
     */
    protected $theadMargins = array();

    /**
     * Cache array for UTF8StringToArray() method.
     * @protected
     * @since 4.5.037 (2009-04-07)
     */
    protected $cache_UTF8StringToArray = array();

    /**
     * Maximum size of cache array used for UTF8StringToArray() method.
     * @protected
     * @since 4.5.037 (2009-04-07)
     */
    protected $cache_maxsize_UTF8StringToArray = 8;

    /**
     * Current size of cache array used for UTF8StringToArray() method.
     * @protected
     * @since 4.5.037 (2009-04-07)
     */
    protected $cache_size_UTF8StringToArray = 0;

    /**
     * Boolean flag to enable document digital signature.
     * @protected
     * @since 4.6.005 (2009-04-24)
     */
    protected $sign = false;

    /**
     * Digital signature data.
     * @protected
     * @since 4.6.005 (2009-04-24)
     */
    protected $signature_data = array();

    /**
     * Digital signature max length.
     * @protected
     * @since 4.6.005 (2009-04-24)
     */
    protected $signature_max_length = 11742;

    /**
     * Data for digital signature appearance.
     * @protected
     * @since 5.3.011 (2010-06-16)
     */
    protected $signature_appearance = array('page' => 1, 'rect' => '0 0 0 0');

    /**
     * Array of empty digital signature appearances.
     * @protected
     * @since 5.9.101 (2011-07-06)
     */
    protected $empty_signature_appearance = array();

    /**
     * Regular expression used to find blank characters (required for word-wrapping).
     * @protected
     * @since 4.6.006 (2009-04-28)
     */
    protected $re_spaces = '/[^\S\xa0]/';

    /**
     * Array of $re_spaces parts.
     * @protected
     * @since 5.5.011 (2010-07-09)
     */
    protected $re_space = array('p' => '[^\S\xa0]', 'm' => '');

    /**
     * Digital signature object ID.
     * @protected
     * @since 4.6.022 (2009-06-23)
     */
    protected $sig_obj_id = 0;

    /**
     * ByteRange placemark used during digital signature process.
     * @protected
     * @since 4.6.028 (2009-08-25)
     */
    protected $byterange_string = '/ByteRange[0 ********** ********** **********]';

    /**
     * Placemark used during digital signature process.
     * @protected
     * @since 4.6.028 (2009-08-25)
     */
    protected $sig_annot_ref = '***SIGANNREF*** 0 R';

    /**
     * ID of page objects.
     * @protected
     * @since 4.7.000 (2009-08-29)
     */
    protected $page_obj_id = array();

    /**
     * List of form annotations IDs.
     * @protected
     * @since 4.8.000 (2009-09-07)
     */
    protected $form_obj_id = array();

    /**
     * Deafult Javascript field properties. Possible values are described on official Javascript for Acrobat API reference. Annotation options can be directly specified using the 'aopt' entry.
     * @protected
     * @since 4.8.000 (2009-09-07)
     */
    protected $default_form_prop = array('lineWidth' => 1, 'borderStyle' => 'solid', 'fillColor' => array(255, 255, 255), 'strokeColor' => array(128, 128, 128));

    /**
     * Javascript objects array.
     * @protected
     * @since 4.8.000 (2009-09-07)
     */
    protected $js_objects = array();

    /**
     * Current form action (used during XHTML rendering).
     * @protected
     * @since 4.8.000 (2009-09-07)
     */
    protected $form_action = '';

    /**
     * Current form encryption type (used during XHTML rendering).
     * @protected
     * @since 4.8.000 (2009-09-07)
     */
    protected $form_enctype = 'application/x-www-form-urlencoded';

    /**
     * Current method to submit forms.
     * @protected
     * @since 4.8.000 (2009-09-07)
     */
    protected $form_mode = 'post';

    /**
     * List of fonts used on form fields (fontname => fontkey).
     * @protected
     * @since 4.8.001 (2009-09-09)
     */
    protected $annotation_fonts = array();

    /**
     * List of radio buttons parent objects.
     * @protected
     * @since 4.8.001 (2009-09-09)
     */
    protected $radiobutton_groups = array();

    /**
     * List of radio group objects IDs.
     * @protected
     * @since 4.8.001 (2009-09-09)
     */
    protected $radio_groups = array();

    /**
     * Text indentation value (used for text-indent CSS attribute).
     * @protected
     * @since 4.8.006 (2009-09-23)
     */
    protected $textindent = 0;

    /**
     * Store page number when startTransaction() is called.
     * @protected
     * @since 4.8.006 (2009-09-23)
     */
    protected $start_transaction_page = 0;

    /**
     * Store Y position when startTransaction() is called.
     * @protected
     * @since 4.9.001 (2010-03-28)
     */
    protected $start_transaction_y = 0;

    /**
     * True when we are printing the thead section on a new page.
     * @protected
     * @since 4.8.027 (2010-01-25)
     */
    protected $inthead = false;

    /**
     * Array of column measures (width, space, starting Y position).
     * @protected
     * @since 4.9.001 (2010-03-28)
     */
    protected $columns = array();

    /**
     * Number of colums.
     * @protected
     * @since 4.9.001 (2010-03-28)
     */
    protected $num_columns = 1;

    /**
     * Current column number.
     * @protected
     * @since 4.9.001 (2010-03-28)
     */
    protected $current_column = 0;

    /**
     * Starting page for columns.
     * @protected
     * @since 4.9.001 (2010-03-28)
     */
    protected $column_start_page = 0;

    /**
     * Maximum page and column selected.
     * @protected
     * @since 5.8.000 (2010-08-11)
     */
    protected $maxselcol = array('page' => 0, 'column' => 0);

    /**
     * Array of: X difference between table cell x start and starting page margin, cellspacing, cellpadding.
     * @protected
     * @since 5.8.000 (2010-08-11)
     */
    protected $colxshift = array('x' => 0, 's' => array('H' => 0, 'V' => 0), 'p' => array('L' => 0, 'T' => 0, 'R' => 0, 'B' => 0));

    /**
     * Text rendering mode: 0 = Fill text; 1 = Stroke text; 2 = Fill, then stroke text; 3 = Neither fill nor stroke text (invisible); 4 = Fill text and add to path for clipping; 5 = Stroke text and add to path for clipping; 6 = Fill, then stroke text and add to path for clipping; 7 = Add text to path for clipping.
     * @protected
     * @since 4.9.008 (2010-04-03)
     */
    protected $textrendermode = 0;

    /**
     * Text stroke width in doc units.
     * @protected
     * @since 4.9.008 (2010-04-03)
     */
    protected $textstrokewidth = 0;

    /**
     * Current stroke color.
     * @protected
     * @since 4.9.008 (2010-04-03)
     */
    protected $strokecolor;

    /**
     * Default unit of measure for document.
     * @protected
     * @since 5.0.000 (2010-04-22)
     */
    protected $pdfunit = 'mm';

    /**
     * Boolean flag true when we are on TOC (Table Of Content) page.
     * @protected
     */
    protected $tocpage = false;

    /**
     * Boolean flag: if true convert vector images (SVG, EPS) to raster image using GD or ImageMagick library.
     * @protected
     * @since 5.0.000 (2010-04-26)
     */
    protected $rasterize_vector_images = false;

    /**
     * Boolean flag: if true enables font subsetting by default.
     * @protected
     * @since 5.3.002 (2010-06-07)
     */
    protected $font_subsetting = true;

    /**
     * Array of default graphic settings.
     * @protected
     * @since 5.5.008 (2010-07-02)
     */
    protected $default_graphic_vars = array();

    /**
     * Array of XObjects.
     * @protected
     * @since 5.8.014 (2010-08-23)
     */
    protected $xobjects = array();

    /**
     * Boolean value true when we are inside an XObject.
     * @protected
     * @since 5.8.017 (2010-08-24)
     */
    protected $inxobj = false;

    /**
     * Current XObject ID.
     * @protected
     * @since 5.8.017 (2010-08-24)
     */
    protected $xobjid = '';

    /**
     * Percentage of character stretching.
     * @protected
     * @since 5.9.000 (2010-09-29)
     */
    protected $font_stretching = 100;

    /**
     * Increases or decreases the space between characters in a text by the specified amount (tracking).
     * @protected
     * @since 5.9.000 (2010-09-29)
     */
    protected $font_spacing = 0;

    /**
     * Array of no-write regions.
     * ('page' => page number or empy for current page, 'xt' => X top, 'yt' => Y top, 'xb' => X bottom, 'yb' => Y bottom, 'side' => page side 'L' = left or 'R' = right)
     * @protected
     * @since 5.9.003 (2010-10-14)
     */
    protected $page_regions = array();

    /**
     * Boolean value true when page region check is active.
     * @protected
     */
    protected $check_page_regions = true;

    /**
     * Array containing HTML color names and values.
     * @protected
     * @since 5.9.004 (2010-10-18)
     */
    protected $webcolor = array();

    /**
     * Array containing spot color names and values.
     * @protected
     * @since 5.9.012 (2010-11-11)
     */
    protected $spotcolor = array();

    /**
     * Array of PDF layers data.
     * @protected
     * @since 5.9.102 (2011-07-13)
     */
    protected $pdflayers = array();

    /**
     * A dictionary of names and corresponding destinations (Dests key on document Catalog).
     * @protected
     * @since 5.9.097 (2011-06-23)
     */
    protected $dests = array();

    /**
     * Object ID for Named Destinations
     * @protected
     * @since 5.9.097 (2011-06-23)
     */
    protected $n_dests;

    /**
     * Directory used for the last SVG image.
     * @protected
     * @since 5.0.000 (2010-05-05)
     */
    protected $svgdir = '';

    /**
     *  Deafult unit of measure for SVG.
     * @protected
     * @since 5.0.000 (2010-05-02)
     */
    protected $svgunit = 'px';

    /**
     * Array of SVG gradients.
     * @protected
     * @since 5.0.000 (2010-05-02)
     */
    protected $svggradients = array();

    /**
     * ID of last SVG gradient.
     * @protected
     * @since 5.0.000 (2010-05-02)
     */
    protected $svggradientid = 0;

    /**
     * Boolean value true when in SVG defs group.
     * @protected
     * @since 5.0.000 (2010-05-02)
     */
    protected $svgdefsmode = false;

    /**
     * Array of SVG defs.
     * @protected
     * @since 5.0.000 (2010-05-02)
     */
    protected $svgdefs = array();

    /**
     * Boolean value true when in SVG clipPath tag.
     * @protected
     * @since 5.0.000 (2010-04-26)
     */
    protected $svgclipmode = false;

    /**
     * Array of SVG clipPath commands.
     * @protected
     * @since 5.0.000 (2010-05-02)
     */
    protected $svgclippaths = array();

    /**
     * Array of SVG clipPath tranformation matrix.
     * @protected
     * @since 5.8.022 (2010-08-31)
     */
    protected $svgcliptm = array();

    /**
     * ID of last SVG clipPath.
     * @protected
     * @since 5.0.000 (2010-05-02)
     */
    protected $svgclipid = 0;

    /**
     * SVG text.
     * @protected
     * @since 5.0.000 (2010-05-02)
     */
    protected $svgtext = '';

    /**
     * SVG text properties.
     * @protected
     * @since 5.8.013 (2010-08-23)
     */
    protected $svgtextmode = array();

    /**
     * Array of hinheritable SVG properties.
     * @protected
     * @since 5.0.000 (2010-05-02)
     */
    protected $svginheritprop = array('clip-rule', 'color', 'color-interpolation', 'color-interpolation-filters', 'color-profile', 'color-rendering', 'cursor', 'direction', 'fill', 'fill-opacity', 'fill-rule', 'font', 'font-family', 'font-size', 'font-size-adjust', 'font-stretch', 'font-style', 'font-variant', 'font-weight', 'glyph-orientation-horizontal', 'glyph-orientation-vertical', 'image-rendering', 'kerning', 'letter-spacing', 'marker', 'marker-end', 'marker-mid', 'marker-start', 'pointer-events', 'shape-rendering', 'stroke', 'stroke-dasharray', 'stroke-dashoffset', 'stroke-linecap', 'stroke-linejoin', 'stroke-miterlimit', 'stroke-opacity', 'stroke-width', 'text-anchor', 'text-rendering', 'visibility', 'word-spacing', 'writing-mode');

    /**
     * Array of SVG properties.
     * @protected
     * @since 5.0.000 (2010-05-02)
     */
    protected $svgstyles = array(array(
            'alignment-baseline' => 'auto',
            'baseline-shift' => 'baseline',
            'clip' => 'auto',
            'clip-path' => 'none',
            'clip-rule' => 'nonzero',
            'color' => 'black',
            'color-interpolation' => 'sRGB',
            'color-interpolation-filters' => 'linearRGB',
            'color-profile' => 'auto',
            'color-rendering' => 'auto',
            'cursor' => 'auto',
            'direction' => 'ltr',
            'display' => 'inline',
            'dominant-baseline' => 'auto',
            'enable-background' => 'accumulate',
            'fill' => 'black',
            'fill-opacity' => 1,
            'fill-rule' => 'nonzero',
            'filter' => 'none',
            'flood-color' => 'black',
            'flood-opacity' => 1,
            'font' => '',
            'font-family' => 'helvetica',
            'font-size' => 'medium',
            'font-size-adjust' => 'none',
            'font-stretch' => 'normal',
            'font-style' => 'normal',
            'font-variant' => 'normal',
            'font-weight' => 'normal',
            'glyph-orientation-horizontal' => '0deg',
            'glyph-orientation-vertical' => 'auto',
            'image-rendering' => 'auto',
            'kerning' => 'auto',
            'letter-spacing' => 'normal',
            'lighting-color' => 'white',
            'marker' => '',
            'marker-end' => 'none',
            'marker-mid' => 'none',
            'marker-start' => 'none',
            'mask' => 'none',
            'opacity' => 1,
            'overflow' => 'auto',
            'pointer-events' => 'visiblePainted',
            'shape-rendering' => 'auto',
            'stop-color' => 'black',
            'stop-opacity' => 1,
            'stroke' => 'none',
            'stroke-dasharray' => 'none',
            'stroke-dashoffset' => 0,
            'stroke-linecap' => 'butt',
            'stroke-linejoin' => 'miter',
            'stroke-miterlimit' => 4,
            'stroke-opacity' => 1,
            'stroke-width' => 1,
            'text-anchor' => 'start',
            'text-decoration' => 'none',
            'text-rendering' => 'auto',
            'unicode-bidi' => 'normal',
            'visibility' => 'visible',
            'word-spacing' => 'normal',
            'writing-mode' => 'lr-tb',
            'text-color' => 'black',
            'transfmatrix' => array(1, 0, 0, 1, 0, 0)
            ));

    /**
     * If true force sRGB color profile for all document.
     * @protected
     * @since 5.9.121 (2011-09-28)
     */
    protected $force_srgb = false;

    /**
     * If true set the document to PDF/A mode.
     * @protected
     * @since 5.9.121 (2011-09-27)
     */
    protected $pdfa_mode = false;

    /**
     * Document creation date-time
     * @protected
     * @since 5.9.152 (2012-03-22)
     */
    protected $doc_creation_timestamp;

    /**
     * Document modification date-time
     * @protected
     * @since 5.9.152 (2012-03-22)
     */
    protected $doc_modification_timestamp;

    /**
     * Custom XMP data.
     * @protected
     * @since 5.9.128 (2011-10-06)
     */
    protected $custom_xmp = '';

    /**
     * Overprint mode array.
     * (Check the "Entries in a Graphics State Parameter Dictionary" on PDF 32000-1:2008).
     * @protected
     * @since 5.9.152 (2012-03-23)
     */
    protected $overprint = array('OP' => false, 'op' => false, 'OPM' => 0);

    /**
     * Alpha mode array.
     * (Check the "Entries in a Graphics State Parameter Dictionary" on PDF 32000-1:2008).
     * @protected
     * @since 5.9.152 (2012-03-23)
     */
    protected $alpha = array('CA' => 1, 'ca' => 1, 'BM' => '/Normal', 'AIS' => false);

    /**
     * Define the page boundaries boxes to be set on document.
     * @protected
     * @since 5.9.152 (2012-03-23)
     */
    protected $page_boxes = array('MediaBox', 'CropBox', 'BleedBox', 'TrimBox', 'ArtBox');

    /**
     * Set the document producer metadata.
     * @protected
     * @since 5.9.152 (2012-03-23)
     */
    protected $pdfproducer;

    /**
     * If true print TCPDF meta link.
     * @protected
     * @since 5.9.152 (2012-03-23)
     */
    protected $tcpdflink = true;

    /**
     * Cache array for computed GD gamma values.
     * @protected
     * @since 5.9.1632 (2012-06-05)
     */
    protected $gdgammacache = array();

    //------------------------------------------------------------
    // METHODS
    //------------------------------------------------------------

    /**
     * This is the class constructor.
     * It allows to set up the page format, the orientation and the measure unit used in all the methods (except for the font sizes).
     * @param $orientation (string) page orientation. Possible values are (case insensitive):<ul><li>P or Portrait (default)</li><li>L or Landscape</li><li>'' (empty string) for automatic orientation</li></ul>
     * @param $unit (string) User measure unit. Possible values are:<ul><li>pt: point</li><li>mm: millimeter (default)</li><li>cm: centimeter</li><li>in: inch</li></ul><br />A point equals 1/72 of inch, that is to say about 0.35 mm (an inch being 2.54 cm). This is a very common unit in typography; font sizes are expressed in that unit.
     * @param $format (mixed) The format used for pages. It can be either: one of the string values specified at getPageSizeFromFormat() or an array of parameters specified at setPageFormat().
     * @param $unicode (boolean) TRUE means that the input text is unicode (default = true)
     * @param $encoding (string) Charset encoding; default is UTF-8.
     * @param $diskcache (boolean) If TRUE reduce the RAM memory usage by caching temporary data on filesystem (slower).
     * @param $pdfa (boolean) If TRUE set the document to PDF/A mode.
     * @public
     * @see getPageSizeFromFormat(), setPageFormat()
     */
    public function __construct($orientation = 'P', $unit = 'mm', $format = 'A4', $unicode = true, $encoding = 'UTF-8', $diskcache = false, $pdfa = false) {
        /* Set internal character encoding to ASCII */
        if (function_exists('mb_internal_encoding') AND mb_internal_encoding()) {
            $this->internal_encoding = mb_internal_encoding();
            mb_internal_encoding('ASCII');
        }
        // get array of HTML colors
        require(dirname(__FILE__) . '/htmlcolors.php');
        $this->webcolor = $webcolor;
        // get array of custom spot colors
        if (file_exists(dirname(__FILE__) . '/spotcolors.php')) {
            require(dirname(__FILE__) . '/spotcolors.php');
            $this->spotcolor = $spotcolor;
        } else {
            $this->spotcolor = array();
        }
        require_once(dirname(__FILE__) . '/unicode_data.php');
        $this->unicode = new TCPDF_UNICODE_DATA();
        require_once(dirname(__FILE__) . '/encodings_maps.php');
        $this->encmaps = new TCPDF_ENCODING_MAPS();
        $this->font_obj_ids = array();
        $this->page_obj_id = array();
        $this->form_obj_id = array();
        // set pdf/a mode
        $this->pdfa_mode = $pdfa;
        $this->force_srgb = false;
        // set disk caching
        $this->diskcache = $diskcache ? true : false;
        // set language direction
        $this->rtl = false;
        $this->tmprtl = false;
        // some checks
        $this->_dochecks();
        // initialization of properties
        $this->isunicode = $unicode;
        $this->page = 0;
        $this->transfmrk[0] = array();
        $this->pagedim = array();
        $this->n = 2;
        $this->buffer = '';
        $this->pages = array();
        $this->state = 0;
        $this->fonts = array();
        $this->FontFiles = array();
        $this->diffs = array();
        $this->images = array();
        $this->links = array();
        $this->gradients = array();
        $this->InFooter = false;
        $this->lasth = 0;
        $this->FontFamily = defined('PDF_FONT_NAME_MAIN') ? PDF_FONT_NAME_MAIN : 'helvetica';
        $this->FontStyle = '';
        $this->FontSizePt = 12;
        $this->underline = false;
        $this->overline = false;
        $this->linethrough = false;
        $this->DrawColor = '0 G';
        $this->FillColor = '0 g';
        $this->TextColor = '0 g';
        $this->ColorFlag = false;
        $this->pdflayers = array();
        // encryption values
        $this->encrypted = false;
        $this->last_enc_key = '';
        // standard Unicode fonts
        $this->CoreFonts = array(
            'courier' => 'Courier',
            'courierB' => 'Courier-Bold',
            'courierI' => 'Courier-Oblique',
            'courierBI' => 'Courier-BoldOblique',
            'helvetica' => 'Helvetica',
            'helveticaB' => 'Helvetica-Bold',
            'helveticaI' => 'Helvetica-Oblique',
            'helveticaBI' => 'Helvetica-BoldOblique',
            'times' => 'Times-Roman',
            'timesB' => 'Times-Bold',
            'timesI' => 'Times-Italic',
            'timesBI' => 'Times-BoldItalic',
            'symbol' => 'Symbol',
            'zapfdingbats' => 'ZapfDingbats'
        );
        // set scale factor
        $this->setPageUnit($unit);
        // set page format and orientation
        $this->setPageFormat($format, $orientation);
        // page margins (1 cm)
        $margin = 28.35 / $this->k;
        $this->SetMargins($margin, $margin);
        $this->clMargin = $this->lMargin;
        $this->crMargin = $this->rMargin;
        // internal cell padding
        $cpadding = $margin / 10;
        $this->setCellPaddings($cpadding, 0, $cpadding, 0);
        // cell margins
        $this->setCellMargins(0, 0, 0, 0);
        // line width (0.2 mm)
        $this->LineWidth = 0.57 / $this->k;
        $this->linestyleWidth = sprintf('%F w', ($this->LineWidth * $this->k));
        $this->linestyleCap = '0 J';
        $this->linestyleJoin = '0 j';
        $this->linestyleDash = '[] 0 d';
        // automatic page break
        $this->SetAutoPageBreak(true, (2 * $margin));
        // full width display mode
        $this->SetDisplayMode('fullwidth');
        // compression
        $this->SetCompression();
        // set default PDF version number
        $this->setPDFVersion();
        $this->pdfproducer = "\x54\x43\x50\x44\x46\x20" . $this->tcpdf_version . "\x20\x28\x68\x74\x74\x70\x3a\x2f\x2f\x77\x77\x77\x2e\x74\x63\x70\x64\x66\x2e\x6f\x72\x67\x29";
        $this->tcpdflink = true;
        $this->encoding = $encoding;
        $this->HREF = array();
        $this->getFontsList();
        $this->fgcolor = array('R' => 0, 'G' => 0, 'B' => 0);
        $this->strokecolor = array('R' => 0, 'G' => 0, 'B' => 0);
        $this->bgcolor = array('R' => 255, 'G' => 255, 'B' => 255);
        $this->extgstates = array();
        $this->setTextShadow();
        // user's rights
        $this->sign = false;
        $this->ur['enabled'] = false;
        $this->ur['document'] = '/FullSave';
        $this->ur['annots'] = '/Create/Delete/Modify/Copy/Import/Export';
        $this->ur['form'] = '/Add/Delete/FillIn/Import/Export/SubmitStandalone/SpawnTemplate';
        $this->ur['signature'] = '/Modify';
        $this->ur['ef'] = '/Create/Delete/Modify/Import';
        $this->ur['formex'] = '';
        $this->signature_appearance = array('page' => 1, 'rect' => '0 0 0 0');
        $this->empty_signature_appearance = array();
        // set default JPEG quality
        $this->jpeg_quality = 75;
        // initialize some settings
        $this->utf8Bidi(array(''), '');
        // set default font
        $this->SetFont($this->FontFamily, $this->FontStyle, $this->FontSizePt);
        // check if PCRE Unicode support is enabled
        if ($this->isunicode AND (@preg_match('/\pL/u', 'a') == 1)) {
            // PCRE unicode support is turned ON
            // \p{Z} or \p{Separator}: any kind of Unicode whitespace or invisible separator.
            // \p{Lo} or \p{Other_Letter}: a Unicode letter or ideograph that does not have lowercase and uppercase variants.
            // \p{Lo} is needed because Chinese characters are packed next to each other without spaces in between.
            //$this->setSpacesRE('/[^\S\P{Z}\P{Lo}\xa0]/u');
            $this->setSpacesRE('/[^\S\P{Z}\xa0]/u');
        } else {
            // PCRE unicode support is turned OFF
            $this->setSpacesRE('/[^\S\xa0]/');
        }
        $this->default_form_prop = array('lineWidth' => 1, 'borderStyle' => 'solid', 'fillColor' => array(255, 255, 255), 'strokeColor' => array(128, 128, 128));
        // set file ID for trailer
        $serformat = (is_array($format) ? serialize($format) : $format);
        $this->file_id = md5($this->getRandomSeed('TCPDF' . $orientation . $unit . $serformat . $encoding));
        // set document creation and modification timestamp
        $this->doc_creation_timestamp = time();
        $this->doc_modification_timestamp = $this->doc_creation_timestamp;
        // get default graphic vars
        $this->default_graphic_vars = $this->getGraphicVars();
        $this->header_xobj_autoreset = false;
        $this->custom_xmp = '';
    }

    /**
     * Default destructor.
     * @public
     * @since 1.53.0.TC016
     */
    public function __destruct() {
        // restore internal encoding
        if (isset($this->internal_encoding) AND !empty($this->internal_encoding)) {
            mb_internal_encoding($this->internal_encoding);
        }
        // unset all class variables
        $this->_destroy(true);
    }

    /**
     * Return the current TCPDF version.
     * @return TCPDF version string
     * @public
     * @since 5.9.012 (2010-11-10)
     */
    public function getTCPDFVersion() {
        return $this->tcpdf_version;
    }

    /**
     * Set the units of measure for the document.
     * @param $unit (string) User measure unit. Possible values are:<ul><li>pt: point</li><li>mm: millimeter (default)</li><li>cm: centimeter</li><li>in: inch</li></ul><br />A point equals 1/72 of inch, that is to say about 0.35 mm (an inch being 2.54 cm). This is a very common unit in typography; font sizes are expressed in that unit.
     * @public
     * @since 3.0.015 (2008-06-06)
     */
    public function setPageUnit($unit) {
        $unit = strtolower($unit);
        //Set scale factor
        switch ($unit) {
            // points
            case 'px':
            case 'pt': {
                    $this->k = 1;
                    break;
                }
            // millimeters
            case 'mm': {
                    $this->k = $this->dpi / 25.4;
                    break;
                }
            // centimeters
            case 'cm': {
                    $this->k = $this->dpi / 2.54;
                    break;
                }
            // inches
            case 'in': {
                    $this->k = $this->dpi;
                    break;
                }
            // unsupported unit
            default : {
                    $this->Error('Incorrect unit: ' . $unit);
                    break;
                }
        }
        $this->pdfunit = $unit;
        if (isset($this->CurOrientation)) {
            $this->setPageOrientation($this->CurOrientation);
        }
    }

    /**
     * Get page dimensions from format name.
     * @param $format (mixed) The format name. It can be: <ul>
     * <li><b>ISO 216 A Series + 2 SIS 014711 extensions</b></li>
     * <li>A0 (841x1189 mm ; 33.11x46.81 in)</li>
     * <li>A1 (594x841 mm ; 23.39x33.11 in)</li>
     * <li>A2 (420x594 mm ; 16.54x23.39 in)</li>
     * <li>A3 (297x420 mm ; 11.69x16.54 in)</li>
     * <li>A4 (210x297 mm ; 8.27x11.69 in)</li>
     * <li>A5 (148x210 mm ; 5.83x8.27 in)</li>
     * <li>A6 (105x148 mm ; 4.13x5.83 in)</li>
     * <li>A7 (74x105 mm ; 2.91x4.13 in)</li>
     * <li>A8 (52x74 mm ; 2.05x2.91 in)</li>
     * <li>A9 (37x52 mm ; 1.46x2.05 in)</li>
     * <li>A10 (26x37 mm ; 1.02x1.46 in)</li>
     * <li>A11 (18x26 mm ; 0.71x1.02 in)</li>
     * <li>A12 (13x18 mm ; 0.51x0.71 in)</li>
     * <li><b>ISO 216 B Series + 2 SIS 014711 extensions</b></li>
     * <li>B0 (1000x1414 mm ; 39.37x55.67 in)</li>
     * <li>B1 (707x1000 mm ; 27.83x39.37 in)</li>
     * <li>B2 (500x707 mm ; 19.69x27.83 in)</li>
     * <li>B3 (353x500 mm ; 13.90x19.69 in)</li>
     * <li>B4 (250x353 mm ; 9.84x13.90 in)</li>
     * <li>B5 (176x250 mm ; 6.93x9.84 in)</li>
     * <li>B6 (125x176 mm ; 4.92x6.93 in)</li>
     * <li>B7 (88x125 mm ; 3.46x4.92 in)</li>
     * <li>B8 (62x88 mm ; 2.44x3.46 in)</li>
     * <li>B9 (44x62 mm ; 1.73x2.44 in)</li>
     * <li>B10 (31x44 mm ; 1.22x1.73 in)</li>
     * <li>B11 (22x31 mm ; 0.87x1.22 in)</li>
     * <li>B12 (15x22 mm ; 0.59x0.87 in)</li>
     * <li><b>ISO 216 C Series + 2 SIS 014711 extensions + 2 EXTENSION</b></li>
     * <li>C0 (917x1297 mm ; 36.10x51.06 in)</li>
     * <li>C1 (648x917 mm ; 25.51x36.10 in)</li>
     * <li>C2 (458x648 mm ; 18.03x25.51 in)</li>
     * <li>C3 (324x458 mm ; 12.76x18.03 in)</li>
     * <li>C4 (229x324 mm ; 9.02x12.76 in)</li>
     * <li>C5 (162x229 mm ; 6.38x9.02 in)</li>
     * <li>C6 (114x162 mm ; 4.49x6.38 in)</li>
     * <li>C7 (81x114 mm ; 3.19x4.49 in)</li>
     * <li>C8 (57x81 mm ; 2.24x3.19 in)</li>
     * <li>C9 (40x57 mm ; 1.57x2.24 in)</li>
     * <li>C10 (28x40 mm ; 1.10x1.57 in)</li>
     * <li>C11 (20x28 mm ; 0.79x1.10 in)</li>
     * <li>C12 (14x20 mm ; 0.55x0.79 in)</li>
     * <li>C76 (81x162 mm ; 3.19x6.38 in)</li>
     * <li>DL (110x220 mm ; 4.33x8.66 in)</li>
     * <li><b>SIS 014711 E Series</b></li>
     * <li>E0 (879x1241 mm ; 34.61x48.86 in)</li>
     * <li>E1 (620x879 mm ; 24.41x34.61 in)</li>
     * <li>E2 (440x620 mm ; 17.32x24.41 in)</li>
     * <li>E3 (310x440 mm ; 12.20x17.32 in)</li>
     * <li>E4 (220x310 mm ; 8.66x12.20 in)</li>
     * <li>E5 (155x220 mm ; 6.10x8.66 in)</li>
     * <li>E6 (110x155 mm ; 4.33x6.10 in)</li>
     * <li>E7 (78x110 mm ; 3.07x4.33 in)</li>
     * <li>E8 (55x78 mm ; 2.17x3.07 in)</li>
     * <li>E9 (39x55 mm ; 1.54x2.17 in)</li>
     * <li>E10 (27x39 mm ; 1.06x1.54 in)</li>
     * <li>E11 (19x27 mm ; 0.75x1.06 in)</li>
     * <li>E12 (13x19 mm ; 0.51x0.75 in)</li>
     * <li><b>SIS 014711 G Series</b></li>
     * <li>G0 (958x1354 mm ; 37.72x53.31 in)</li>
     * <li>G1 (677x958 mm ; 26.65x37.72 in)</li>
     * <li>G2 (479x677 mm ; 18.86x26.65 in)</li>
     * <li>G3 (338x479 mm ; 13.31x18.86 in)</li>
     * <li>G4 (239x338 mm ; 9.41x13.31 in)</li>
     * <li>G5 (169x239 mm ; 6.65x9.41 in)</li>
     * <li>G6 (119x169 mm ; 4.69x6.65 in)</li>
     * <li>G7 (84x119 mm ; 3.31x4.69 in)</li>
     * <li>G8 (59x84 mm ; 2.32x3.31 in)</li>
     * <li>G9 (42x59 mm ; 1.65x2.32 in)</li>
     * <li>G10 (29x42 mm ; 1.14x1.65 in)</li>
     * <li>G11 (21x29 mm ; 0.83x1.14 in)</li>
     * <li>G12 (14x21 mm ; 0.55x0.83 in)</li>
     * <li><b>ISO Press</b></li>
     * <li>RA0 (860x1220 mm ; 33.86x48.03 in)</li>
     * <li>RA1 (610x860 mm ; 24.02x33.86 in)</li>
     * <li>RA2 (430x610 mm ; 16.93x24.02 in)</li>
     * <li>RA3 (305x430 mm ; 12.01x16.93 in)</li>
     * <li>RA4 (215x305 mm ; 8.46x12.01 in)</li>
     * <li>SRA0 (900x1280 mm ; 35.43x50.39 in)</li>
     * <li>SRA1 (640x900 mm ; 25.20x35.43 in)</li>
     * <li>SRA2 (450x640 mm ; 17.72x25.20 in)</li>
     * <li>SRA3 (320x450 mm ; 12.60x17.72 in)</li>
     * <li>SRA4 (225x320 mm ; 8.86x12.60 in)</li>
     * <li><b>German DIN 476</b></li>
     * <li>4A0 (1682x2378 mm ; 66.22x93.62 in)</li>
     * <li>2A0 (1189x1682 mm ; 46.81x66.22 in)</li>
     * <li><b>Variations on the ISO Standard</b></li>
     * <li>A2_EXTRA (445x619 mm ; 17.52x24.37 in)</li>
     * <li>A3+ (329x483 mm ; 12.95x19.02 in)</li>
     * <li>A3_EXTRA (322x445 mm ; 12.68x17.52 in)</li>
     * <li>A3_SUPER (305x508 mm ; 12.01x20.00 in)</li>
     * <li>SUPER_A3 (305x487 mm ; 12.01x19.17 in)</li>
     * <li>A4_EXTRA (235x322 mm ; 9.25x12.68 in)</li>
     * <li>A4_SUPER (229x322 mm ; 9.02x12.68 in)</li>
     * <li>SUPER_A4 (227x356 mm ; 8.94x14.02 in)</li>
     * <li>A4_LONG (210x348 mm ; 8.27x13.70 in)</li>
     * <li>F4 (210x330 mm ; 8.27x12.99 in)</li>
     * <li>SO_B5_EXTRA (202x276 mm ; 7.95x10.87 in)</li>
     * <li>A5_EXTRA (173x235 mm ; 6.81x9.25 in)</li>
     * <li><b>ANSI Series</b></li>
     * <li>ANSI_E (864x1118 mm ; 34.00x44.00 in)</li>
     * <li>ANSI_D (559x864 mm ; 22.00x34.00 in)</li>
     * <li>ANSI_C (432x559 mm ; 17.00x22.00 in)</li>
     * <li>ANSI_B (279x432 mm ; 11.00x17.00 in)</li>
     * <li>ANSI_A (216x279 mm ; 8.50x11.00 in)</li>
     * <li><b>Traditional 'Loose' North American Paper Sizes</b></li>
     * <li>LEDGER, USLEDGER (432x279 mm ; 17.00x11.00 in)</li>
     * <li>TABLOID, USTABLOID, BIBLE, ORGANIZERK (279x432 mm ; 11.00x17.00 in)</li>
     * <li>LETTER, USLETTER, ORGANIZERM (216x279 mm ; 8.50x11.00 in)</li>
     * <li>LEGAL, USLEGAL (216x356 mm ; 8.50x14.00 in)</li>
     * <li>GLETTER, GOVERNMENTLETTER (203x267 mm ; 8.00x10.50 in)</li>
     * <li>JLEGAL, JUNIORLEGAL (203x127 mm ; 8.00x5.00 in)</li>
     * <li><b>Other North American Paper Sizes</b></li>
     * <li>QUADDEMY (889x1143 mm ; 35.00x45.00 in)</li>
     * <li>SUPER_B (330x483 mm ; 13.00x19.00 in)</li>
     * <li>QUARTO (229x279 mm ; 9.00x11.00 in)</li>
     * <li>FOLIO, GOVERNMENTLEGAL (216x330 mm ; 8.50x13.00 in)</li>
     * <li>EXECUTIVE, MONARCH (184x267 mm ; 7.25x10.50 in)</li>
     * <li>MEMO, STATEMENT, ORGANIZERL (140x216 mm ; 5.50x8.50 in)</li>
     * <li>FOOLSCAP (210x330 mm ; 8.27x13.00 in)</li>
     * <li>COMPACT (108x171 mm ; 4.25x6.75 in)</li>
     * <li>ORGANIZERJ (70x127 mm ; 2.75x5.00 in)</li>
     * <li><b>Canadian standard CAN 2-9.60M</b></li>
     * <li>P1 (560x860 mm ; 22.05x33.86 in)</li>
     * <li>P2 (430x560 mm ; 16.93x22.05 in)</li>
     * <li>P3 (280x430 mm ; 11.02x16.93 in)</li>
     * <li>P4 (215x280 mm ; 8.46x11.02 in)</li>
     * <li>P5 (140x215 mm ; 5.51x8.46 in)</li>
     * <li>P6 (107x140 mm ; 4.21x5.51 in)</li>
     * <li><b>North American Architectural Sizes</b></li>
     * <li>ARCH_E (914x1219 mm ; 36.00x48.00 in)</li>
     * <li>ARCH_E1 (762x1067 mm ; 30.00x42.00 in)</li>
     * <li>ARCH_D (610x914 mm ; 24.00x36.00 in)</li>
     * <li>ARCH_C, BROADSHEET (457x610 mm ; 18.00x24.00 in)</li>
     * <li>ARCH_B (305x457 mm ; 12.00x18.00 in)</li>
     * <li>ARCH_A (229x305 mm ; 9.00x12.00 in)</li>
     * <li><b>Announcement Envelopes</b></li>
     * <li>ANNENV_A2 (111x146 mm ; 4.37x5.75 in)</li>
     * <li>ANNENV_A6 (121x165 mm ; 4.75x6.50 in)</li>
     * <li>ANNENV_A7 (133x184 mm ; 5.25x7.25 in)</li>
     * <li>ANNENV_A8 (140x206 mm ; 5.50x8.12 in)</li>
     * <li>ANNENV_A10 (159x244 mm ; 6.25x9.62 in)</li>
     * <li>ANNENV_SLIM (98x225 mm ; 3.87x8.87 in)</li>
     * <li><b>Commercial Envelopes</b></li>
     * <li>COMMENV_N6_1/4 (89x152 mm ; 3.50x6.00 in)</li>
     * <li>COMMENV_N6_3/4 (92x165 mm ; 3.62x6.50 in)</li>
     * <li>COMMENV_N8 (98x191 mm ; 3.87x7.50 in)</li>
     * <li>COMMENV_N9 (98x225 mm ; 3.87x8.87 in)</li>
     * <li>COMMENV_N10 (105x241 mm ; 4.12x9.50 in)</li>
     * <li>COMMENV_N11 (114x263 mm ; 4.50x10.37 in)</li>
     * <li>COMMENV_N12 (121x279 mm ; 4.75x11.00 in)</li>
     * <li>COMMENV_N14 (127x292 mm ; 5.00x11.50 in)</li>
     * <li><b>Catalogue Envelopes</b></li>
     * <li>CATENV_N1 (152x229 mm ; 6.00x9.00 in)</li>
     * <li>CATENV_N1_3/4 (165x241 mm ; 6.50x9.50 in)</li>
     * <li>CATENV_N2 (165x254 mm ; 6.50x10.00 in)</li>
     * <li>CATENV_N3 (178x254 mm ; 7.00x10.00 in)</li>
     * <li>CATENV_N6 (191x267 mm ; 7.50x10.50 in)</li>
     * <li>CATENV_N7 (203x279 mm ; 8.00x11.00 in)</li>
     * <li>CATENV_N8 (210x286 mm ; 8.25x11.25 in)</li>
     * <li>CATENV_N9_1/2 (216x267 mm ; 8.50x10.50 in)</li>
     * <li>CATENV_N9_3/4 (222x286 mm ; 8.75x11.25 in)</li>
     * <li>CATENV_N10_1/2 (229x305 mm ; 9.00x12.00 in)</li>
     * <li>CATENV_N12_1/2 (241x318 mm ; 9.50x12.50 in)</li>
     * <li>CATENV_N13_1/2 (254x330 mm ; 10.00x13.00 in)</li>
     * <li>CATENV_N14_1/4 (286x311 mm ; 11.25x12.25 in)</li>
     * <li>CATENV_N14_1/2 (292x368 mm ; 11.50x14.50 in)</li>
     * <li><b>Japanese (JIS P 0138-61) Standard B-Series</b></li>
     * <li>JIS_B0 (1030x1456 mm ; 40.55x57.32 in)</li>
     * <li>JIS_B1 (728x1030 mm ; 28.66x40.55 in)</li>
     * <li>JIS_B2 (515x728 mm ; 20.28x28.66 in)</li>
     * <li>JIS_B3 (364x515 mm ; 14.33x20.28 in)</li>
     * <li>JIS_B4 (257x364 mm ; 10.12x14.33 in)</li>
     * <li>JIS_B5 (182x257 mm ; 7.17x10.12 in)</li>
     * <li>JIS_B6 (128x182 mm ; 5.04x7.17 in)</li>
     * <li>JIS_B7 (91x128 mm ; 3.58x5.04 in)</li>
     * <li>JIS_B8 (64x91 mm ; 2.52x3.58 in)</li>
     * <li>JIS_B9 (45x64 mm ; 1.77x2.52 in)</li>
     * <li>JIS_B10 (32x45 mm ; 1.26x1.77 in)</li>
     * <li>JIS_B11 (22x32 mm ; 0.87x1.26 in)</li>
     * <li>JIS_B12 (16x22 mm ; 0.63x0.87 in)</li>
     * <li><b>PA Series</b></li>
     * <li>PA0 (840x1120 mm ; 33.07x44.09 in)</li>
     * <li>PA1 (560x840 mm ; 22.05x33.07 in)</li>
     * <li>PA2 (420x560 mm ; 16.54x22.05 in)</li>
     * <li>PA3 (280x420 mm ; 11.02x16.54 in)</li>
     * <li>PA4 (210x280 mm ; 8.27x11.02 in)</li>
     * <li>PA5 (140x210 mm ; 5.51x8.27 in)</li>
     * <li>PA6 (105x140 mm ; 4.13x5.51 in)</li>
     * <li>PA7 (70x105 mm ; 2.76x4.13 in)</li>
     * <li>PA8 (52x70 mm ; 2.05x2.76 in)</li>
     * <li>PA9 (35x52 mm ; 1.38x2.05 in)</li>
     * <li>PA10 (26x35 mm ; 1.02x1.38 in)</li>
     * <li><b>Standard Photographic Print Sizes</b></li>
     * <li>PASSPORT_PHOTO (35x45 mm ; 1.38x1.77 in)</li>
     * <li>E (82x120 mm ; 3.25x4.72 in)</li>
     * <li>3R, L (89x127 mm ; 3.50x5.00 in)</li>
     * <li>4R, KG (102x152 mm ; 4.02x5.98 in)</li>
     * <li>4D (120x152 mm ; 4.72x5.98 in)</li>
     * <li>5R, 2L (127x178 mm ; 5.00x7.01 in)</li>
     * <li>6R, 8P (152x203 mm ; 5.98x7.99 in)</li>
     * <li>8R, 6P (203x254 mm ; 7.99x10.00 in)</li>
     * <li>S8R, 6PW (203x305 mm ; 7.99x12.01 in)</li>
     * <li>10R, 4P (254x305 mm ; 10.00x12.01 in)</li>
     * <li>S10R, 4PW (254x381 mm ; 10.00x15.00 in)</li>
     * <li>11R (279x356 mm ; 10.98x14.02 in)</li>
     * <li>S11R (279x432 mm ; 10.98x17.01 in)</li>
     * <li>12R (305x381 mm ; 12.01x15.00 in)</li>
     * <li>S12R (305x456 mm ; 12.01x17.95 in)</li>
     * <li><b>Common Newspaper Sizes</b></li>
     * <li>NEWSPAPER_BROADSHEET (750x600 mm ; 29.53x23.62 in)</li>
     * <li>NEWSPAPER_BERLINER (470x315 mm ; 18.50x12.40 in)</li>
     * <li>NEWSPAPER_COMPACT, NEWSPAPER_TABLOID (430x280 mm ; 16.93x11.02 in)</li>
     * <li><b>Business Cards</b></li>
     * <li>CREDIT_CARD, BUSINESS_CARD, BUSINESS_CARD_ISO7810 (54x86 mm ; 2.13x3.37 in)</li>
     * <li>BUSINESS_CARD_ISO216 (52x74 mm ; 2.05x2.91 in)</li>
     * <li>BUSINESS_CARD_IT, BUSINESS_CARD_UK, BUSINESS_CARD_FR, BUSINESS_CARD_DE, BUSINESS_CARD_ES (55x85 mm ; 2.17x3.35 in)</li>
     * <li>BUSINESS_CARD_US, BUSINESS_CARD_CA (51x89 mm ; 2.01x3.50 in)</li>
     * <li>BUSINESS_CARD_JP (55x91 mm ; 2.17x3.58 in)</li>
     * <li>BUSINESS_CARD_HK (54x90 mm ; 2.13x3.54 in)</li>
     * <li>BUSINESS_CARD_AU, BUSINESS_CARD_DK, BUSINESS_CARD_SE (55x90 mm ; 2.17x3.54 in)</li>
     * <li>BUSINESS_CARD_RU, BUSINESS_CARD_CZ, BUSINESS_CARD_FI, BUSINESS_CARD_HU, BUSINESS_CARD_IL (50x90 mm ; 1.97x3.54 in)</li>
     * <li><b>Billboards</b></li>
     * <li>4SHEET (1016x1524 mm ; 40.00x60.00 in)</li>
     * <li>6SHEET (1200x1800 mm ; 47.24x70.87 in)</li>
     * <li>12SHEET (3048x1524 mm ; 120.00x60.00 in)</li>
     * <li>16SHEET (2032x3048 mm ; 80.00x120.00 in)</li>
     * <li>32SHEET (4064x3048 mm ; 160.00x120.00 in)</li>
     * <li>48SHEET (6096x3048 mm ; 240.00x120.00 in)</li>
     * <li>64SHEET (8128x3048 mm ; 320.00x120.00 in)</li>
     * <li>96SHEET (12192x3048 mm ; 480.00x120.00 in)</li>
     * <li><b>Old Imperial English (some are still used in USA)</b></li>
     * <li>EN_EMPEROR (1219x1829 mm ; 48.00x72.00 in)</li>
     * <li>EN_ANTIQUARIAN (787x1346 mm ; 31.00x53.00 in)</li>
     * <li>EN_GRAND_EAGLE (730x1067 mm ; 28.75x42.00 in)</li>
     * <li>EN_DOUBLE_ELEPHANT (679x1016 mm ; 26.75x40.00 in)</li>
     * <li>EN_ATLAS (660x864 mm ; 26.00x34.00 in)</li>
     * <li>EN_COLOMBIER (597x876 mm ; 23.50x34.50 in)</li>
     * <li>EN_ELEPHANT (584x711 mm ; 23.00x28.00 in)</li>
     * <li>EN_DOUBLE_DEMY (572x902 mm ; 22.50x35.50 in)</li>
     * <li>EN_IMPERIAL (559x762 mm ; 22.00x30.00 in)</li>
     * <li>EN_PRINCESS (546x711 mm ; 21.50x28.00 in)</li>
     * <li>EN_CARTRIDGE (533x660 mm ; 21.00x26.00 in)</li>
     * <li>EN_DOUBLE_LARGE_POST (533x838 mm ; 21.00x33.00 in)</li>
     * <li>EN_ROYAL (508x635 mm ; 20.00x25.00 in)</li>
     * <li>EN_SHEET, EN_HALF_POST (495x597 mm ; 19.50x23.50 in)</li>
     * <li>EN_SUPER_ROYAL (483x686 mm ; 19.00x27.00 in)</li>
     * <li>EN_DOUBLE_POST (483x775 mm ; 19.00x30.50 in)</li>
     * <li>EN_MEDIUM (445x584 mm ; 17.50x23.00 in)</li>
     * <li>EN_DEMY (445x572 mm ; 17.50x22.50 in)</li>
     * <li>EN_LARGE_POST (419x533 mm ; 16.50x21.00 in)</li>
     * <li>EN_COPY_DRAUGHT (406x508 mm ; 16.00x20.00 in)</li>
     * <li>EN_POST (394x489 mm ; 15.50x19.25 in)</li>
     * <li>EN_CROWN (381x508 mm ; 15.00x20.00 in)</li>
     * <li>EN_PINCHED_POST (375x470 mm ; 14.75x18.50 in)</li>
     * <li>EN_BRIEF (343x406 mm ; 13.50x16.00 in)</li>
     * <li>EN_FOOLSCAP (343x432 mm ; 13.50x17.00 in)</li>
     * <li>EN_SMALL_FOOLSCAP (337x419 mm ; 13.25x16.50 in)</li>
     * <li>EN_POTT (318x381 mm ; 12.50x15.00 in)</li>
     * <li><b>Old Imperial Belgian</b></li>
     * <li>BE_GRAND_AIGLE (700x1040 mm ; 27.56x40.94 in)</li>
     * <li>BE_COLOMBIER (620x850 mm ; 24.41x33.46 in)</li>
     * <li>BE_DOUBLE_CARRE (620x920 mm ; 24.41x36.22 in)</li>
     * <li>BE_ELEPHANT (616x770 mm ; 24.25x30.31 in)</li>
     * <li>BE_PETIT_AIGLE (600x840 mm ; 23.62x33.07 in)</li>
     * <li>BE_GRAND_JESUS (550x730 mm ; 21.65x28.74 in)</li>
     * <li>BE_JESUS (540x730 mm ; 21.26x28.74 in)</li>
     * <li>BE_RAISIN (500x650 mm ; 19.69x25.59 in)</li>
     * <li>BE_GRAND_MEDIAN (460x605 mm ; 18.11x23.82 in)</li>
     * <li>BE_DOUBLE_POSTE (435x565 mm ; 17.13x22.24 in)</li>
     * <li>BE_COQUILLE (430x560 mm ; 16.93x22.05 in)</li>
     * <li>BE_PETIT_MEDIAN (415x530 mm ; 16.34x20.87 in)</li>
     * <li>BE_RUCHE (360x460 mm ; 14.17x18.11 in)</li>
     * <li>BE_PROPATRIA (345x430 mm ; 13.58x16.93 in)</li>
     * <li>BE_LYS (317x397 mm ; 12.48x15.63 in)</li>
     * <li>BE_POT (307x384 mm ; 12.09x15.12 in)</li>
     * <li>BE_ROSETTE (270x347 mm ; 10.63x13.66 in)</li>
     * <li><b>Old Imperial French</b></li>
     * <li>FR_UNIVERS (1000x1300 mm ; 39.37x51.18 in)</li>
     * <li>FR_DOUBLE_COLOMBIER (900x1260 mm ; 35.43x49.61 in)</li>
     * <li>FR_GRANDE_MONDE (900x1260 mm ; 35.43x49.61 in)</li>
     * <li>FR_DOUBLE_SOLEIL (800x1200 mm ; 31.50x47.24 in)</li>
     * <li>FR_DOUBLE_JESUS (760x1120 mm ; 29.92x44.09 in)</li>
     * <li>FR_GRAND_AIGLE (750x1060 mm ; 29.53x41.73 in)</li>
     * <li>FR_PETIT_AIGLE (700x940 mm ; 27.56x37.01 in)</li>
     * <li>FR_DOUBLE_RAISIN (650x1000 mm ; 25.59x39.37 in)</li>
     * <li>FR_JOURNAL (650x940 mm ; 25.59x37.01 in)</li>
     * <li>FR_COLOMBIER_AFFICHE (630x900 mm ; 24.80x35.43 in)</li>
     * <li>FR_DOUBLE_CAVALIER (620x920 mm ; 24.41x36.22 in)</li>
     * <li>FR_CLOCHE (600x800 mm ; 23.62x31.50 in)</li>
     * <li>FR_SOLEIL (600x800 mm ; 23.62x31.50 in)</li>
     * <li>FR_DOUBLE_CARRE (560x900 mm ; 22.05x35.43 in)</li>
     * <li>FR_DOUBLE_COQUILLE (560x880 mm ; 22.05x34.65 in)</li>
     * <li>FR_JESUS (560x760 mm ; 22.05x29.92 in)</li>
     * <li>FR_RAISIN (500x650 mm ; 19.69x25.59 in)</li>
     * <li>FR_CAVALIER (460x620 mm ; 18.11x24.41 in)</li>
     * <li>FR_DOUBLE_COURONNE (460x720 mm ; 18.11x28.35 in)</li>
     * <li>FR_CARRE (450x560 mm ; 17.72x22.05 in)</li>
     * <li>FR_COQUILLE (440x560 mm ; 17.32x22.05 in)</li>
     * <li>FR_DOUBLE_TELLIERE (440x680 mm ; 17.32x26.77 in)</li>
     * <li>FR_DOUBLE_CLOCHE (400x600 mm ; 15.75x23.62 in)</li>
     * <li>FR_DOUBLE_POT (400x620 mm ; 15.75x24.41 in)</li>
     * <li>FR_ECU (400x520 mm ; 15.75x20.47 in)</li>
     * <li>FR_COURONNE (360x460 mm ; 14.17x18.11 in)</li>
     * <li>FR_TELLIERE (340x440 mm ; 13.39x17.32 in)</li>
     * <li>FR_POT (310x400 mm ; 12.20x15.75 in)</li>
     * </ul>
     * @return array containing page width and height in points
     * @public
     * @since 5.0.010 (2010-05-17)
     */
    public function getPageSizeFromFormat($format) {
        // Paper cordinates are calculated in this way: (inches * 72) where (1 inch = 25.4 mm)
        switch (strtoupper($format)) {
            // ISO 216 A Series + 2 SIS 014711 extensions
            case 'A0' : {
                    $pf = array(2383.937, 3370.394);
                    break;
                }
            case 'A1' : {
                    $pf = array(1683.780, 2383.937);
                    break;
                }
            case 'A2' : {
                    $pf = array(1190.551, 1683.780);
                    break;
                }
            case 'A3' : {
                    $pf = array(841.890, 1190.551);
                    break;
                }
            case 'A4' : {
                    $pf = array(595.276, 841.890);
                    break;
                }
            case 'A5' : {
                    $pf = array(419.528, 595.276);
                    break;
                }
            case 'A6' : {
                    $pf = array(297.638, 419.528);
                    break;
                }
            case 'A7' : {
                    $pf = array(209.764, 297.638);
                    break;
                }
            case 'A8' : {
                    $pf = array(147.402, 209.764);
                    break;
                }
            case 'A9' : {
                    $pf = array(104.882, 147.402);
                    break;
                }
            case 'A10': {
                    $pf = array(73.701, 104.882);
                    break;
                }
            case 'A11': {
                    $pf = array(51.024, 73.701);
                    break;
                }
            case 'A12': {
                    $pf = array(36.850, 51.024);
                    break;
                }
            // ISO 216 B Series + 2 SIS 014711 extensions
            case 'B0' : {
                    $pf = array(2834.646, 4008.189);
                    break;
                }
            case 'B1' : {
                    $pf = array(2004.094, 2834.646);
                    break;
                }
            case 'B2' : {
                    $pf = array(1417.323, 2004.094);
                    break;
                }
            case 'B3' : {
                    $pf = array(1000.630, 1417.323);
                    break;
                }
            case 'B4' : {
                    $pf = array(708.661, 1000.630);
                    break;
                }
            case 'B5' : {
                    $pf = array(498.898, 708.661);
                    break;
                }
            case 'B6' : {
                    $pf = array(354.331, 498.898);
                    break;
                }
            case 'B7' : {
                    $pf = array(249.449, 354.331);
                    break;
                }
            case 'B8' : {
                    $pf = array(175.748, 249.449);
                    break;
                }
            case 'B9' : {
                    $pf = array(124.724, 175.748);
                    break;
                }
            case 'B10': {
                    $pf = array(87.874, 124.724);
                    break;
                }
            case 'B11': {
                    $pf = array(62.362, 87.874);
                    break;
                }
            case 'B12': {
                    $pf = array(42.520, 62.362);
                    break;
                }
            // ISO 216 C Series + 2 SIS 014711 extensions + 2 EXTENSION
            case 'C0' : {
                    $pf = array(2599.370, 3676.535);
                    break;
                }
            case 'C1' : {
                    $pf = array(1836.850, 2599.370);
                    break;
                }
            case 'C2' : {
                    $pf = array(1298.268, 1836.850);
                    break;
                }
            case 'C3' : {
                    $pf = array(918.425, 1298.268);
                    break;
                }
            case 'C4' : {
                    $pf = array(649.134, 918.425);
                    break;
                }
            case 'C5' : {
                    $pf = array(459.213, 649.134);
                    break;
                }
            case 'C6' : {
                    $pf = array(323.150, 459.213);
                    break;
                }
            case 'C7' : {
                    $pf = array(229.606, 323.150);
                    break;
                }
            case 'C8' : {
                    $pf = array(161.575, 229.606);
                    break;
                }
            case 'C9' : {
                    $pf = array(113.386, 161.575);
                    break;
                }
            case 'C10': {
                    $pf = array(79.370, 113.386);
                    break;
                }
            case 'C11': {
                    $pf = array(56.693, 79.370);
                    break;
                }
            case 'C12': {
                    $pf = array(39.685, 56.693);
                    break;
                }
            case 'C76': {
                    $pf = array(229.606, 459.213);
                    break;
                }
            case 'DL' : {
                    $pf = array(311.811, 623.622);
                    break;
                }
            // SIS 014711 E Series
            case 'E0' : {
                    $pf = array(2491.654, 3517.795);
                    break;
                }
            case 'E1' : {
                    $pf = array(1757.480, 2491.654);
                    break;
                }
            case 'E2' : {
                    $pf = array(1247.244, 1757.480);
                    break;
                }
            case 'E3' : {
                    $pf = array(878.740, 1247.244);
                    break;
                }
            case 'E4' : {
                    $pf = array(623.622, 878.740);
                    break;
                }
            case 'E5' : {
                    $pf = array(439.370, 623.622);
                    break;
                }
            case 'E6' : {
                    $pf = array(311.811, 439.370);
                    break;
                }
            case 'E7' : {
                    $pf = array(221.102, 311.811);
                    break;
                }
            case 'E8' : {
                    $pf = array(155.906, 221.102);
                    break;
                }
            case 'E9' : {
                    $pf = array(110.551, 155.906);
                    break;
                }
            case 'E10': {
                    $pf = array(76.535, 110.551);
                    break;
                }
            case 'E11': {
                    $pf = array(53.858, 76.535);
                    break;
                }
            case 'E12': {
                    $pf = array(36.850, 53.858);
                    break;
                }
            // SIS 014711 G Series
            case 'G0' : {
                    $pf = array(2715.591, 3838.110);
                    break;
                }
            case 'G1' : {
                    $pf = array(1919.055, 2715.591);
                    break;
                }
            case 'G2' : {
                    $pf = array(1357.795, 1919.055);
                    break;
                }
            case 'G3' : {
                    $pf = array(958.110, 1357.795);
                    break;
                }
            case 'G4' : {
                    $pf = array(677.480, 958.110);
                    break;
                }
            case 'G5' : {
                    $pf = array(479.055, 677.480);
                    break;
                }
            case 'G6' : {
                    $pf = array(337.323, 479.055);
                    break;
                }
            case 'G7' : {
                    $pf = array(238.110, 337.323);
                    break;
                }
            case 'G8' : {
                    $pf = array(167.244, 238.110);
                    break;
                }
            case 'G9' : {
                    $pf = array(119.055, 167.244);
                    break;
                }
            case 'G10': {
                    $pf = array(82.205, 119.055);
                    break;
                }
            case 'G11': {
                    $pf = array(59.528, 82.205);
                    break;
                }
            case 'G12': {
                    $pf = array(39.685, 59.528);
                    break;
                }
            // ISO Press
            case 'RA0': {
                    $pf = array(2437.795, 3458.268);
                    break;
                }
            case 'RA1': {
                    $pf = array(1729.134, 2437.795);
                    break;
                }
            case 'RA2': {
                    $pf = array(1218.898, 1729.134);
                    break;
                }
            case 'RA3': {
                    $pf = array(864.567, 1218.898);
                    break;
                }
            case 'RA4': {
                    $pf = array(609.449, 864.567);
                    break;
                }
            case 'SRA0': {
                    $pf = array(2551.181, 3628.346);
                    break;
                }
            case 'SRA1': {
                    $pf = array(1814.173, 2551.181);
                    break;
                }
            case 'SRA2': {
                    $pf = array(1275.591, 1814.173);
                    break;
                }
            case 'SRA3': {
                    $pf = array(907.087, 1275.591);
                    break;
                }
            case 'SRA4': {
                    $pf = array(637.795, 907.087);
                    break;
                }
            // German  DIN 476
            case '4A0': {
                    $pf = array(4767.874, 6740.787);
                    break;
                }
            case '2A0': {
                    $pf = array(3370.394, 4767.874);
                    break;
                }
            // Variations on the ISO Standard
            case 'A2_EXTRA' : {
                    $pf = array(1261.417, 1754.646);
                    break;
                }
            case 'A3+' : {
                    $pf = array(932.598, 1369.134);
                    break;
                }
            case 'A3_EXTRA' : {
                    $pf = array(912.756, 1261.417);
                    break;
                }
            case 'A3_SUPER' : {
                    $pf = array(864.567, 1440.000);
                    break;
                }
            case 'SUPER_A3' : {
                    $pf = array(864.567, 1380.472);
                    break;
                }
            case 'A4_EXTRA' : {
                    $pf = array(666.142, 912.756);
                    break;
                }
            case 'A4_SUPER' : {
                    $pf = array(649.134, 912.756);
                    break;
                }
            case 'SUPER_A4' : {
                    $pf = array(643.465, 1009.134);
                    break;
                }
            case 'A4_LONG' : {
                    $pf = array(595.276, 986.457);
                    break;
                }
            case 'F4' : {
                    $pf = array(595.276, 935.433);
                    break;
                }
            case 'SO_B5_EXTRA': {
                    $pf = array(572.598, 782.362);
                    break;
                }
            case 'A5_EXTRA' : {
                    $pf = array(490.394, 666.142);
                    break;
                }
            // ANSI Series
            case 'ANSI_E': {
                    $pf = array(2448.000, 3168.000);
                    break;
                }
            case 'ANSI_D': {
                    $pf = array(1584.000, 2448.000);
                    break;
                }
            case 'ANSI_C': {
                    $pf = array(1224.000, 1584.000);
                    break;
                }
            case 'ANSI_B': {
                    $pf = array(792.000, 1224.000);
                    break;
                }
            case 'ANSI_A': {
                    $pf = array(612.000, 792.000);
                    break;
                }
            // Traditional 'Loose' North American Paper Sizes
            case 'USLEDGER':
            case 'LEDGER' : {
                    $pf = array(1224.000, 792.000);
                    break;
                }
            case 'ORGANIZERK':
            case 'BIBLE':
            case 'USTABLOID':
            case 'TABLOID': {
                    $pf = array(792.000, 1224.000);
                    break;
                }
            case 'ORGANIZERM':
            case 'USLETTER':
            case 'LETTER' : {
                    $pf = array(612.000, 792.000);
                    break;
                }
            case 'USLEGAL':
            case 'LEGAL' : {
                    $pf = array(612.000, 1008.000);
                    break;
                }
            case 'GOVERNMENTLETTER':
            case 'GLETTER': {
                    $pf = array(576.000, 756.000);
                    break;
                }
            case 'JUNIORLEGAL':
            case 'JLEGAL' : {
                    $pf = array(576.000, 360.000);
                    break;
                }
            // Other North American Paper Sizes
            case 'QUADDEMY': {
                    $pf = array(2520.000, 3240.000);
                    break;
                }
            case 'SUPER_B': {
                    $pf = array(936.000, 1368.000);
                    break;
                }
            case 'QUARTO': {
                    $pf = array(648.000, 792.000);
                    break;
                }
            case 'GOVERNMENTLEGAL':
            case 'FOLIO': {
                    $pf = array(612.000, 936.000);
                    break;
                }
            case 'MONARCH':
            case 'EXECUTIVE': {
                    $pf = array(522.000, 756.000);
                    break;
                }
            case 'ORGANIZERL':
            case 'STATEMENT':
            case 'MEMO': {
                    $pf = array(396.000, 612.000);
                    break;
                }
            case 'FOOLSCAP': {
                    $pf = array(595.440, 936.000);
                    break;
                }
            case 'COMPACT': {
                    $pf = array(306.000, 486.000);
                    break;
                }
            case 'ORGANIZERJ': {
                    $pf = array(198.000, 360.000);
                    break;
                }
            // Canadian standard CAN 2-9.60M
            case 'P1': {
                    $pf = array(1587.402, 2437.795);
                    break;
                }
            case 'P2': {
                    $pf = array(1218.898, 1587.402);
                    break;
                }
            case 'P3': {
                    $pf = array(793.701, 1218.898);
                    break;
                }
            case 'P4': {
                    $pf = array(609.449, 793.701);
                    break;
                }
            case 'P5': {
                    $pf = array(396.850, 609.449);
                    break;
                }
            case 'P6': {
                    $pf = array(303.307, 396.850);
                    break;
                }
            // North American Architectural Sizes
            case 'ARCH_E' : {
                    $pf = array(2592.000, 3456.000);
                    break;
                }
            case 'ARCH_E1': {
                    $pf = array(2160.000, 3024.000);
                    break;
                }
            case 'ARCH_D' : {
                    $pf = array(1728.000, 2592.000);
                    break;
                }
            case 'BROADSHEET':
            case 'ARCH_C' : {
                    $pf = array(1296.000, 1728.000);
                    break;
                }
            case 'ARCH_B' : {
                    $pf = array(864.000, 1296.000);
                    break;
                }
            case 'ARCH_A' : {
                    $pf = array(648.000, 864.000);
                    break;
                }
            // --- North American Envelope Sizes ---
            //   - Announcement Envelopes
            case 'ANNENV_A2' : {
                    $pf = array(314.640, 414.000);
                    break;
                }
            case 'ANNENV_A6' : {
                    $pf = array(342.000, 468.000);
                    break;
                }
            case 'ANNENV_A7' : {
                    $pf = array(378.000, 522.000);
                    break;
                }
            case 'ANNENV_A8' : {
                    $pf = array(396.000, 584.640);
                    break;
                }
            case 'ANNENV_A10' : {
                    $pf = array(450.000, 692.640);
                    break;
                }
            case 'ANNENV_SLIM': {
                    $pf = array(278.640, 638.640);
                    break;
                }
            //   - Commercial Envelopes
            case 'COMMENV_N6_1/4': {
                    $pf = array(252.000, 432.000);
                    break;
                }
            case 'COMMENV_N6_3/4': {
                    $pf = array(260.640, 468.000);
                    break;
                }
            case 'COMMENV_N8' : {
                    $pf = array(278.640, 540.000);
                    break;
                }
            case 'COMMENV_N9' : {
                    $pf = array(278.640, 638.640);
                    break;
                }
            case 'COMMENV_N10' : {
                    $pf = array(296.640, 684.000);
                    break;
                }
            case 'COMMENV_N11' : {
                    $pf = array(324.000, 746.640);
                    break;
                }
            case 'COMMENV_N12' : {
                    $pf = array(342.000, 792.000);
                    break;
                }
            case 'COMMENV_N14' : {
                    $pf = array(360.000, 828.000);
                    break;
                }
            //   - Catalogue Envelopes
            case 'CATENV_N1' : {
                    $pf = array(432.000, 648.000);
                    break;
                }
            case 'CATENV_N1_3/4' : {
                    $pf = array(468.000, 684.000);
                    break;
                }
            case 'CATENV_N2' : {
                    $pf = array(468.000, 720.000);
                    break;
                }
            case 'CATENV_N3' : {
                    $pf = array(504.000, 720.000);
                    break;
                }
            case 'CATENV_N6' : {
                    $pf = array(540.000, 756.000);
                    break;
                }
            case 'CATENV_N7' : {
                    $pf = array(576.000, 792.000);
                    break;
                }
            case 'CATENV_N8' : {
                    $pf = array(594.000, 810.000);
                    break;
                }
            case 'CATENV_N9_1/2' : {
                    $pf = array(612.000, 756.000);
                    break;
                }
            case 'CATENV_N9_3/4' : {
                    $pf = array(630.000, 810.000);
                    break;
                }
            case 'CATENV_N10_1/2': {
                    $pf = array(648.000, 864.000);
                    break;
                }
            case 'CATENV_N12_1/2': {
                    $pf = array(684.000, 900.000);
                    break;
                }
            case 'CATENV_N13_1/2': {
                    $pf = array(720.000, 936.000);
                    break;
                }
            case 'CATENV_N14_1/4': {
                    $pf = array(810.000, 882.000);
                    break;
                }
            case 'CATENV_N14_1/2': {
                    $pf = array(828.000, 1044.000);
                    break;
                }
            // Japanese (JIS P 0138-61) Standard B-Series
            case 'JIS_B0' : {
                    $pf = array(2919.685, 4127.244);
                    break;
                }
            case 'JIS_B1' : {
                    $pf = array(2063.622, 2919.685);
                    break;
                }
            case 'JIS_B2' : {
                    $pf = array(1459.843, 2063.622);
                    break;
                }
            case 'JIS_B3' : {
                    $pf = array(1031.811, 1459.843);
                    break;
                }
            case 'JIS_B4' : {
                    $pf = array(728.504, 1031.811);
                    break;
                }
            case 'JIS_B5' : {
                    $pf = array(515.906, 728.504);
                    break;
                }
            case 'JIS_B6' : {
                    $pf = array(362.835, 515.906);
                    break;
                }
            case 'JIS_B7' : {
                    $pf = array(257.953, 362.835);
                    break;
                }
            case 'JIS_B8' : {
                    $pf = array(181.417, 257.953);
                    break;
                }
            case 'JIS_B9' : {
                    $pf = array(127.559, 181.417);
                    break;
                }
            case 'JIS_B10': {
                    $pf = array(90.709, 127.559);
                    break;
                }
            case 'JIS_B11': {
                    $pf = array(62.362, 90.709);
                    break;
                }
            case 'JIS_B12': {
                    $pf = array(45.354, 62.362);
                    break;
                }
            // PA Series
            case 'PA0' : {
                    $pf = array(2381.102, 3174.803,);
                    break;
                }
            case 'PA1' : {
                    $pf = array(1587.402, 2381.102);
                    break;
                }
            case 'PA2' : {
                    $pf = array(1190.551, 1587.402);
                    break;
                }
            case 'PA3' : {
                    $pf = array(793.701, 1190.551);
                    break;
                }
            case 'PA4' : {
                    $pf = array(595.276, 793.701);
                    break;
                }
            case 'PA5' : {
                    $pf = array(396.850, 595.276);
                    break;
                }
            case 'PA6' : {
                    $pf = array(297.638, 396.850);
                    break;
                }
            case 'PA7' : {
                    $pf = array(198.425, 297.638);
                    break;
                }
            case 'PA8' : {
                    $pf = array(147.402, 198.425);
                    break;
                }
            case 'PA9' : {
                    $pf = array(99.213, 147.402);
                    break;
                }
            case 'PA10': {
                    $pf = array(73.701, 99.213);
                    break;
                }
            // Standard Photographic Print Sizes
            case 'PASSPORT_PHOTO': {
                    $pf = array(99.213, 127.559);
                    break;
                }
            case 'E' : {
                    $pf = array(233.858, 340.157);
                    break;
                }
            case 'L':
            case '3R' : {
                    $pf = array(252.283, 360.000);
                    break;
                }
            case 'KG':
            case '4R' : {
                    $pf = array(289.134, 430.866);
                    break;
                }
            case '4D' : {
                    $pf = array(340.157, 430.866);
                    break;
                }
            case '2L':
            case '5R' : {
                    $pf = array(360.000, 504.567);
                    break;
                }
            case '8P':
            case '6R' : {
                    $pf = array(430.866, 575.433);
                    break;
                }
            case '6P':
            case '8R' : {
                    $pf = array(575.433, 720.000);
                    break;
                }
            case '6PW':
            case 'S8R' : {
                    $pf = array(575.433, 864.567);
                    break;
                }
            case '4P':
            case '10R' : {
                    $pf = array(720.000, 864.567);
                    break;
                }
            case '4PW':
            case 'S10R': {
                    $pf = array(720.000, 1080.000);
                    break;
                }
            case '11R' : {
                    $pf = array(790.866, 1009.134);
                    break;
                }
            case 'S11R': {
                    $pf = array(790.866, 1224.567);
                    break;
                }
            case '12R' : {
                    $pf = array(864.567, 1080.000);
                    break;
                }
            case 'S12R': {
                    $pf = array(864.567, 1292.598);
                    break;
                }
            // Common Newspaper Sizes
            case 'NEWSPAPER_BROADSHEET': {
                    $pf = array(2125.984, 1700.787);
                    break;
                }
            case 'NEWSPAPER_BERLINER' : {
                    $pf = array(1332.283, 892.913);
                    break;
                }
            case 'NEWSPAPER_TABLOID':
            case 'NEWSPAPER_COMPACT' : {
                    $pf = array(1218.898, 793.701);
                    break;
                }
            // Business Cards
            case 'CREDIT_CARD':
            case 'BUSINESS_CARD':
            case 'BUSINESS_CARD_ISO7810': {
                    $pf = array(153.014, 242.646);
                    break;
                }
            case 'BUSINESS_CARD_ISO216' : {
                    $pf = array(147.402, 209.764);
                    break;
                }
            case 'BUSINESS_CARD_IT':
            case 'BUSINESS_CARD_UK':
            case 'BUSINESS_CARD_FR':
            case 'BUSINESS_CARD_DE':
            case 'BUSINESS_CARD_ES' : {
                    $pf = array(155.906, 240.945);
                    break;
                }
            case 'BUSINESS_CARD_CA':
            case 'BUSINESS_CARD_US' : {
                    $pf = array(144.567, 252.283);
                    break;
                }
            case 'BUSINESS_CARD_JP' : {
                    $pf = array(155.906, 257.953);
                    break;
                }
            case 'BUSINESS_CARD_HK' : {
                    $pf = array(153.071, 255.118);
                    break;
                }
            case 'BUSINESS_CARD_AU':
            case 'BUSINESS_CARD_DK':
            case 'BUSINESS_CARD_SE' : {
                    $pf = array(155.906, 255.118);
                    break;
                }
            case 'BUSINESS_CARD_RU':
            case 'BUSINESS_CARD_CZ':
            case 'BUSINESS_CARD_FI':
            case 'BUSINESS_CARD_HU':
            case 'BUSINESS_CARD_IL' : {
                    $pf = array(141.732, 255.118);
                    break;
                }
            // Billboards
            case '4SHEET' : {
                    $pf = array(2880.000, 4320.000);
                    break;
                }
            case '6SHEET' : {
                    $pf = array(3401.575, 5102.362);
                    break;
                }
            case '12SHEET': {
                    $pf = array(8640.000, 4320.000);
                    break;
                }
            case '16SHEET': {
                    $pf = array(5760.000, 8640.000);
                    break;
                }
            case '32SHEET': {
                    $pf = array(11520.000, 8640.000);
                    break;
                }
            case '48SHEET': {
                    $pf = array(17280.000, 8640.000);
                    break;
                }
            case '64SHEET': {
                    $pf = array(23040.000, 8640.000);
                    break;
                }
            case '96SHEET': {
                    $pf = array(34560.000, 8640.000);
                    break;
                }
            // Old European Sizes
            //   - Old Imperial English Sizes
            case 'EN_EMPEROR' : {
                    $pf = array(3456.000, 5184.000);
                    break;
                }
            case 'EN_ANTIQUARIAN' : {
                    $pf = array(2232.000, 3816.000);
                    break;
                }
            case 'EN_GRAND_EAGLE' : {
                    $pf = array(2070.000, 3024.000);
                    break;
                }
            case 'EN_DOUBLE_ELEPHANT' : {
                    $pf = array(1926.000, 2880.000);
                    break;
                }
            case 'EN_ATLAS' : {
                    $pf = array(1872.000, 2448.000);
                    break;
                }
            case 'EN_COLOMBIER' : {
                    $pf = array(1692.000, 2484.000);
                    break;
                }
            case 'EN_ELEPHANT' : {
                    $pf = array(1656.000, 2016.000);
                    break;
                }
            case 'EN_DOUBLE_DEMY' : {
                    $pf = array(1620.000, 2556.000);
                    break;
                }
            case 'EN_IMPERIAL' : {
                    $pf = array(1584.000, 2160.000);
                    break;
                }
            case 'EN_PRINCESS' : {
                    $pf = array(1548.000, 2016.000);
                    break;
                }
            case 'EN_CARTRIDGE' : {
                    $pf = array(1512.000, 1872.000);
                    break;
                }
            case 'EN_DOUBLE_LARGE_POST': {
                    $pf = array(1512.000, 2376.000);
                    break;
                }
            case 'EN_ROYAL' : {
                    $pf = array(1440.000, 1800.000);
                    break;
                }
            case 'EN_SHEET':
            case 'EN_HALF_POST' : {
                    $pf = array(1404.000, 1692.000);
                    break;
                }
            case 'EN_SUPER_ROYAL' : {
                    $pf = array(1368.000, 1944.000);
                    break;
                }
            case 'EN_DOUBLE_POST' : {
                    $pf = array(1368.000, 2196.000);
                    break;
                }
            case 'EN_MEDIUM' : {
                    $pf = array(1260.000, 1656.000);
                    break;
                }
            case 'EN_DEMY' : {
                    $pf = array(1260.000, 1620.000);
                    break;
                }
            case 'EN_LARGE_POST' : {
                    $pf = array(1188.000, 1512.000);
                    break;
                }
            case 'EN_COPY_DRAUGHT' : {
                    $pf = array(1152.000, 1440.000);
                    break;
                }
            case 'EN_POST' : {
                    $pf = array(1116.000, 1386.000);
                    break;
                }
            case 'EN_CROWN' : {
                    $pf = array(1080.000, 1440.000);
                    break;
                }
            case 'EN_PINCHED_POST' : {
                    $pf = array(1062.000, 1332.000);
                    break;
                }
            case 'EN_BRIEF' : {
                    $pf = array(972.000, 1152.000);
                    break;
                }
            case 'EN_FOOLSCAP' : {
                    $pf = array(972.000, 1224.000);
                    break;
                }
            case 'EN_SMALL_FOOLSCAP' : {
                    $pf = array(954.000, 1188.000);
                    break;
                }
            case 'EN_POTT' : {
                    $pf = array(900.000, 1080.000);
                    break;
                }
            //   - Old Imperial Belgian Sizes
            case 'BE_GRAND_AIGLE' : {
                    $pf = array(1984.252, 2948.031);
                    break;
                }
            case 'BE_COLOMBIER' : {
                    $pf = array(1757.480, 2409.449);
                    break;
                }
            case 'BE_DOUBLE_CARRE': {
                    $pf = array(1757.480, 2607.874);
                    break;
                }
            case 'BE_ELEPHANT' : {
                    $pf = array(1746.142, 2182.677);
                    break;
                }
            case 'BE_PETIT_AIGLE' : {
                    $pf = array(1700.787, 2381.102);
                    break;
                }
            case 'BE_GRAND_JESUS' : {
                    $pf = array(1559.055, 2069.291);
                    break;
                }
            case 'BE_JESUS' : {
                    $pf = array(1530.709, 2069.291);
                    break;
                }
            case 'BE_RAISIN' : {
                    $pf = array(1417.323, 1842.520);
                    break;
                }
            case 'BE_GRAND_MEDIAN': {
                    $pf = array(1303.937, 1714.961);
                    break;
                }
            case 'BE_DOUBLE_POSTE': {
                    $pf = array(1233.071, 1601.575);
                    break;
                }
            case 'BE_COQUILLE' : {
                    $pf = array(1218.898, 1587.402);
                    break;
                }
            case 'BE_PETIT_MEDIAN': {
                    $pf = array(1176.378, 1502.362);
                    break;
                }
            case 'BE_RUCHE' : {
                    $pf = array(1020.472, 1303.937);
                    break;
                }
            case 'BE_PROPATRIA' : {
                    $pf = array(977.953, 1218.898);
                    break;
                }
            case 'BE_LYS' : {
                    $pf = array(898.583, 1125.354);
                    break;
                }
            case 'BE_POT' : {
                    $pf = array(870.236, 1088.504);
                    break;
                }
            case 'BE_ROSETTE' : {
                    $pf = array(765.354, 983.622);
                    break;
                }
            //   - Old Imperial French Sizes
            case 'FR_UNIVERS' : {
                    $pf = array(2834.646, 3685.039);
                    break;
                }
            case 'FR_DOUBLE_COLOMBIER' : {
                    $pf = array(2551.181, 3571.654);
                    break;
                }
            case 'FR_GRANDE_MONDE' : {
                    $pf = array(2551.181, 3571.654);
                    break;
                }
            case 'FR_DOUBLE_SOLEIL' : {
                    $pf = array(2267.717, 3401.575);
                    break;
                }
            case 'FR_DOUBLE_JESUS' : {
                    $pf = array(2154.331, 3174.803);
                    break;
                }
            case 'FR_GRAND_AIGLE' : {
                    $pf = array(2125.984, 3004.724);
                    break;
                }
            case 'FR_PETIT_AIGLE' : {
                    $pf = array(1984.252, 2664.567);
                    break;
                }
            case 'FR_DOUBLE_RAISIN' : {
                    $pf = array(1842.520, 2834.646);
                    break;
                }
            case 'FR_JOURNAL' : {
                    $pf = array(1842.520, 2664.567);
                    break;
                }
            case 'FR_COLOMBIER_AFFICHE': {
                    $pf = array(1785.827, 2551.181);
                    break;
                }
            case 'FR_DOUBLE_CAVALIER' : {
                    $pf = array(1757.480, 2607.874);
                    break;
                }
            case 'FR_CLOCHE' : {
                    $pf = array(1700.787, 2267.717);
                    break;
                }
            case 'FR_SOLEIL' : {
                    $pf = array(1700.787, 2267.717);
                    break;
                }
            case 'FR_DOUBLE_CARRE' : {
                    $pf = array(1587.402, 2551.181);
                    break;
                }
            case 'FR_DOUBLE_COQUILLE' : {
                    $pf = array(1587.402, 2494.488);
                    break;
                }
            case 'FR_JESUS' : {
                    $pf = array(1587.402, 2154.331);
                    break;
                }
            case 'FR_RAISIN' : {
                    $pf = array(1417.323, 1842.520);
                    break;
                }
            case 'FR_CAVALIER' : {
                    $pf = array(1303.937, 1757.480);
                    break;
                }
            case 'FR_DOUBLE_COURONNE' : {
                    $pf = array(1303.937, 2040.945);
                    break;
                }
            case 'FR_CARRE' : {
                    $pf = array(1275.591, 1587.402);
                    break;
                }
            case 'FR_COQUILLE' : {
                    $pf = array(1247.244, 1587.402);
                    break;
                }
            case 'FR_DOUBLE_TELLIERE' : {
                    $pf = array(1247.244, 1927.559);
                    break;
                }
            case 'FR_DOUBLE_CLOCHE' : {
                    $pf = array(1133.858, 1700.787);
                    break;
                }
            case 'FR_DOUBLE_POT' : {
                    $pf = array(1133.858, 1757.480);
                    break;
                }
            case 'FR_ECU' : {
                    $pf = array(1133.858, 1474.016);
                    break;
                }
            case 'FR_COURONNE' : {
                    $pf = array(1020.472, 1303.937);
                    break;
                }
            case 'FR_TELLIERE' : {
                    $pf = array(963.780, 1247.244);
                    break;
                }
            case 'FR_POT' : {
                    $pf = array(878.740, 1133.858);
                    break;
                }
            // DEFAULT ISO A4
            default: {
                    $pf = array(595.276, 841.890);
                    break;
                }
        }
        return $pf;
    }

    /**
     * Change the format of the current page
     * @param $format (mixed) The format used for pages. It can be either: one of the string values specified at getPageSizeFromFormat() documentation or an array of two numners (width, height) or an array containing the following measures and options:<ul>
     * <li>['format'] = page format name (one of the above);</li>
     * <li>['Rotate'] : The number of degrees by which the page shall be rotated clockwise when displayed or printed. The value shall be a multiple of 90.</li>
     * <li>['PZ'] : The page's preferred zoom (magnification) factor.</li>
     * <li>['MediaBox'] : the boundaries of the physical medium on which the page shall be displayed or printed:</li>
     * <li>['MediaBox']['llx'] : lower-left x coordinate in points</li>
     * <li>['MediaBox']['lly'] : lower-left y coordinate in points</li>
     * <li>['MediaBox']['urx'] : upper-right x coordinate in points</li>
     * <li>['MediaBox']['ury'] : upper-right y coordinate in points</li>
     * <li>['CropBox'] : the visible region of default user space:</li>
     * <li>['CropBox']['llx'] : lower-left x coordinate in points</li>
     * <li>['CropBox']['lly'] : lower-left y coordinate in points</li>
     * <li>['CropBox']['urx'] : upper-right x coordinate in points</li>
     * <li>['CropBox']['ury'] : upper-right y coordinate in points</li>
     * <li>['BleedBox'] : the region to which the contents of the page shall be clipped when output in a production environment:</li>
     * <li>['BleedBox']['llx'] : lower-left x coordinate in points</li>
     * <li>['BleedBox']['lly'] : lower-left y coordinate in points</li>
     * <li>['BleedBox']['urx'] : upper-right x coordinate in points</li>
     * <li>['BleedBox']['ury'] : upper-right y coordinate in points</li>
     * <li>['TrimBox'] : the intended dimensions of the finished page after trimming:</li>
     * <li>['TrimBox']['llx'] : lower-left x coordinate in points</li>
     * <li>['TrimBox']['lly'] : lower-left y coordinate in points</li>
     * <li>['TrimBox']['urx'] : upper-right x coordinate in points</li>
     * <li>['TrimBox']['ury'] : upper-right y coordinate in points</li>
     * <li>['ArtBox'] : the extent of the page's meaningful content:</li>
     * <li>['ArtBox']['llx'] : lower-left x coordinate in points</li>
     * <li>['ArtBox']['lly'] : lower-left y coordinate in points</li>
     * <li>['ArtBox']['urx'] : upper-right x coordinate in points</li>
     * <li>['ArtBox']['ury'] : upper-right y coordinate in points</li>
     * <li>['BoxColorInfo'] :specify the colours and other visual characteristics that should be used in displaying guidelines on the screen for each of the possible page boundaries other than the MediaBox:</li>
     * <li>['BoxColorInfo'][BOXTYPE]['C'] : an array of three numbers in the range 0-255, representing the components in the DeviceRGB colour space.</li>
     * <li>['BoxColorInfo'][BOXTYPE]['W'] : the guideline width in default user units</li>
     * <li>['BoxColorInfo'][BOXTYPE]['S'] : the guideline style: S = Solid; D = Dashed</li>
     * <li>['BoxColorInfo'][BOXTYPE]['D'] : dash array defining a pattern of dashes and gaps to be used in drawing dashed guidelines</li>
     * <li>['trans'] : the style and duration of the visual transition to use when moving from another page to the given page during a presentation</li>
     * <li>['trans']['Dur'] : The page's display duration (also called its advance timing): the maximum length of time, in seconds, that the page shall be displayed during presentations before the viewer application shall automatically advance to the next page.</li>
     * <li>['trans']['S'] : transition style : Split, Blinds, Box, Wipe, Dissolve, Glitter, R, Fly, Push, Cover, Uncover, Fade</li>
     * <li>['trans']['D'] : The duration of the transition effect, in seconds.</li>
     * <li>['trans']['Dm'] : (Split and Blinds transition styles only) The dimension in which the specified transition effect shall occur: H = Horizontal, V = Vertical. Default value: H.</li>
     * <li>['trans']['M'] : (Split, Box and Fly transition styles only) The direction of motion for the specified transition effect: I = Inward from the edges of the page, O = Outward from the center of the pageDefault value: I.</li>
     * <li>['trans']['Di'] : (Wipe, Glitter, Fly, Cover, Uncover and Push transition styles only) The direction in which the specified transition effect shall moves, expressed in degrees counterclockwise starting from a left-to-right direction. If the value is a number, it shall be one of: 0 = Left to right, 90 = Bottom to top (Wipe only), 180 = Right to left (Wipe only), 270 = Top to bottom, 315 = Top-left to bottom-right (Glitter only). If the value is a name, it shall be None, which is relevant only for the Fly transition when the value of SS is not 1.0. Default value: 0.</li>
     * <li>['trans']['SS'] : (Fly transition style only) The starting or ending scale at which the changes shall be drawn. If M specifies an inward transition, the scale of the changes drawn shall progress from SS to 1.0 over the course of the transition. If M specifies an outward transition, the scale of the changes drawn shall progress from 1.0 to SS over the course of the transition. Default: 1.0.</li>
     * <li>['trans']['B'] : (Fly transition style only) If true, the area that shall be flown in is rectangular and opaque. Default: false.</li>
     * </ul>
     * @param $orientation (string) page orientation. Possible values are (case insensitive):<ul>
     * <li>P or Portrait (default)</li>
     * <li>L or Landscape</li>
     * <li>'' (empty string) for automatic orientation</li>
     * </ul>
     * @protected
     * @since 3.0.015 (2008-06-06)
     * @see getPageSizeFromFormat()
     */
    protected function setPageFormat($format, $orientation = 'P') {
        if (!empty($format) AND isset($this->pagedim[$this->page])) {
            // remove inherited values
            unset($this->pagedim[$this->page]);
        }
        if (is_string($format)) {
            // get page measures from format name
            $pf = $this->getPageSizeFromFormat($format);
            $this->fwPt = $pf[0];
            $this->fhPt = $pf[1];
        } else {
            // the boundaries of the physical medium on which the page shall be displayed or printed
            if (isset($format['MediaBox'])) {
                $this->setPageBoxes($this->page, 'MediaBox', $format['MediaBox']['llx'], $format['MediaBox']['lly'], $format['MediaBox']['urx'], $format['MediaBox']['ury'], false);
                $this->fwPt = (($format['MediaBox']['urx'] - $format['MediaBox']['llx']) * $this->k);
                $this->fhPt = (($format['MediaBox']['ury'] - $format['MediaBox']['lly']) * $this->k);
            } else {
                if (isset($format[0]) AND is_numeric($format[0]) AND isset($format[1]) AND is_numeric($format[1])) {
                    $pf = array(($format[0] * $this->k), ($format[1] * $this->k));
                } else {
                    if (!isset($format['format'])) {
                        // default value
                        $format['format'] = 'A4';
                    }
                    $pf = $this->getPageSizeFromFormat($format['format']);
                }
                $this->fwPt = $pf[0];
                $this->fhPt = $pf[1];
                $this->setPageBoxes($this->page, 'MediaBox', 0, 0, $this->fwPt, $this->fhPt, true);
            }
            // the visible region of default user space
            if (isset($format['CropBox'])) {
                $this->setPageBoxes($this->page, 'CropBox', $format['CropBox']['llx'], $format['CropBox']['lly'], $format['CropBox']['urx'], $format['CropBox']['ury'], false);
            }
            // the region to which the contents of the page shall be clipped when output in a production environment
            if (isset($format['BleedBox'])) {
                $this->setPageBoxes($this->page, 'BleedBox', $format['BleedBox']['llx'], $format['BleedBox']['lly'], $format['BleedBox']['urx'], $format['BleedBox']['ury'], false);
            }
            // the intended dimensions of the finished page after trimming
            if (isset($format['TrimBox'])) {
                $this->setPageBoxes($this->page, 'TrimBox', $format['TrimBox']['llx'], $format['TrimBox']['lly'], $format['TrimBox']['urx'], $format['TrimBox']['ury'], false);
            }
            // the page's meaningful content (including potential white space)
            if (isset($format['ArtBox'])) {
                $this->setPageBoxes($this->page, 'ArtBox', $format['ArtBox']['llx'], $format['ArtBox']['lly'], $format['ArtBox']['urx'], $format['ArtBox']['ury'], false);
            }
            // specify the colours and other visual characteristics that should be used in displaying guidelines on the screen for the various page boundaries
            if (isset($format['BoxColorInfo'])) {
                $this->pagedim[$this->page]['BoxColorInfo'] = $format['BoxColorInfo'];
            }
            if (isset($format['Rotate']) AND (($format['Rotate'] % 90) == 0)) {
                // The number of degrees by which the page shall be rotated clockwise when displayed or printed. The value shall be a multiple of 90.
                $this->pagedim[$this->page]['Rotate'] = intval($format['Rotate']);
            }
            if (isset($format['PZ'])) {
                // The page's preferred zoom (magnification) factor
                $this->pagedim[$this->page]['PZ'] = floatval($format['PZ']);
            }
            if (isset($format['trans'])) {
                // The style and duration of the visual transition to use when moving from another page to the given page during a presentation
                if (isset($format['trans']['Dur'])) {
                    // The page's display duration
                    $this->pagedim[$this->page]['trans']['Dur'] = floatval($format['trans']['Dur']);
                }
                $stansition_styles = array('Split', 'Blinds', 'Box', 'Wipe', 'Dissolve', 'Glitter', 'R', 'Fly', 'Push', 'Cover', 'Uncover', 'Fade');
                if (isset($format['trans']['S']) AND in_array($format['trans']['S'], $stansition_styles)) {
                    // The transition style that shall be used when moving to this page from another during a presentation
                    $this->pagedim[$this->page]['trans']['S'] = $format['trans']['S'];
                    $valid_effect = array('Split', 'Blinds');
                    $valid_vals = array('H', 'V');
                    if (isset($format['trans']['Dm']) AND in_array($format['trans']['S'], $valid_effect) AND in_array($format['trans']['Dm'], $valid_vals)) {
                        $this->pagedim[$this->page]['trans']['Dm'] = $format['trans']['Dm'];
                    }
                    $valid_effect = array('Split', 'Box', 'Fly');
                    $valid_vals = array('I', 'O');
                    if (isset($format['trans']['M']) AND in_array($format['trans']['S'], $valid_effect) AND in_array($format['trans']['M'], $valid_vals)) {
                        $this->pagedim[$this->page]['trans']['M'] = $format['trans']['M'];
                    }
                    $valid_effect = array('Wipe', 'Glitter', 'Fly', 'Cover', 'Uncover', 'Push');
                    if (isset($format['trans']['Di']) AND in_array($format['trans']['S'], $valid_effect)) {
                        if (((($format['trans']['Di'] == 90) OR ($format['trans']['Di'] == 180)) AND ($format['trans']['S'] == 'Wipe'))
                                OR (($format['trans']['Di'] == 315) AND ($format['trans']['S'] == 'Glitter'))
                                OR (($format['trans']['Di'] == 0) OR ($format['trans']['Di'] == 270))) {
                            $this->pagedim[$this->page]['trans']['Di'] = intval($format['trans']['Di']);
                        }
                    }
                    if (isset($format['trans']['SS']) AND ($format['trans']['S'] == 'Fly')) {
                        $this->pagedim[$this->page]['trans']['SS'] = floatval($format['trans']['SS']);
                    }
                    if (isset($format['trans']['B']) AND ($format['trans']['B'] === true) AND ($format['trans']['S'] == 'Fly')) {
                        $this->pagedim[$this->page]['trans']['B'] = 'true';
                    }
                } else {
                    $this->pagedim[$this->page]['trans']['S'] = 'R';
                }
                if (isset($format['trans']['D'])) {
                    // The duration of the transition effect, in seconds
                    $this->pagedim[$this->page]['trans']['D'] = floatval($format['trans']['D']);
                } else {
                    $this->pagedim[$this->page]['trans']['D'] = 1;
                }
            }
        }
        $this->setPageOrientation($orientation);
    }

    /**
     * Set page boundaries.
     * @param $page (int) page number
     * @param $type (string) valid values are: <ul><li>'MediaBox' : the boundaries of the physical medium on which the page shall be displayed or printed;</li><li>'CropBox' : the visible region of default user space;</li><li>'BleedBox' : the region to which the contents of the page shall be clipped when output in a production environment;</li><li>'TrimBox' : the intended dimensions of the finished page after trimming;</li><li>'ArtBox' : the page's meaningful content (including potential white space).</li></ul>
     * @param $llx (float) lower-left x coordinate in user units
     * @param $lly (float) lower-left y coordinate in user units
     * @param $urx (float) upper-right x coordinate in user units
     * @param $ury (float) upper-right y coordinate in user units
     * @param $points (boolean) if true uses user units as unit of measure, otherwise uses PDF points
     * @public
     * @since 5.0.010 (2010-05-17)
     */
    public function setPageBoxes($page, $type, $llx, $lly, $urx, $ury, $points = false) {
        if (!isset($this->pagedim[$page])) {
            // initialize array
            $this->pagedim[$page] = array();
        }
        $pageboxes = array('MediaBox', 'CropBox', 'BleedBox', 'TrimBox', 'ArtBox');
        if (!in_array($type, $pageboxes)) {
            return;
        }
        if ($points) {
            $k = 1;
        } else {
            $k = $this->k;
        }
        $this->pagedim[$page][$type]['llx'] = ($llx * $k);
        $this->pagedim[$page][$type]['lly'] = ($lly * $k);
        $this->pagedim[$page][$type]['urx'] = ($urx * $k);
        $this->pagedim[$page][$type]['ury'] = ($ury * $k);
    }

    /**
     * Swap X and Y coordinates of page boxes (change page boxes orientation).
     * @param $page (int) page number
     * @protected
     * @since 5.0.010 (2010-05-17)
     */
    protected function swapPageBoxCoordinates($page) {
        $pageboxes = array('MediaBox', 'CropBox', 'BleedBox', 'TrimBox', 'ArtBox');
        foreach ($pageboxes as $type) {
            // swap X and Y coordinates
            if (isset($this->pagedim[$page][$type])) {
                $tmp = $this->pagedim[$page][$type]['llx'];
                $this->pagedim[$page][$type]['llx'] = $this->pagedim[$page][$type]['lly'];
                $this->pagedim[$page][$type]['lly'] = $tmp;
                $tmp = $this->pagedim[$page][$type]['urx'];
                $this->pagedim[$page][$type]['urx'] = $this->pagedim[$page][$type]['ury'];
                $this->pagedim[$page][$type]['ury'] = $tmp;
            }
        }
    }

    /**
     * Set page orientation.
     * @param $orientation (string) page orientation. Possible values are (case insensitive):<ul><li>P or Portrait (default)</li><li>L or Landscape</li><li>'' (empty string) for automatic orientation</li></ul>
     * @param $autopagebreak (boolean) Boolean indicating if auto-page-break mode should be on or off.
     * @param $bottommargin (float) bottom margin of the page.
     * @public
     * @since 3.0.015 (2008-06-06)
     */
    public function setPageOrientation($orientation, $autopagebreak = '', $bottommargin = '') {
        if (!isset($this->pagedim[$this->page]['MediaBox'])) {
            // the boundaries of the physical medium on which the page shall be displayed or printed
            $this->setPageBoxes($this->page, 'MediaBox', 0, 0, $this->fwPt, $this->fhPt, true);
        }
        if (!isset($this->pagedim[$this->page]['CropBox'])) {
            // the visible region of default user space
            $this->setPageBoxes($this->page, 'CropBox', $this->pagedim[$this->page]['MediaBox']['llx'], $this->pagedim[$this->page]['MediaBox']['lly'], $this->pagedim[$this->page]['MediaBox']['urx'], $this->pagedim[$this->page]['MediaBox']['ury'], true);
        }
        if (!isset($this->pagedim[$this->page]['BleedBox'])) {
            // the region to which the contents of the page shall be clipped when output in a production environment
            $this->setPageBoxes($this->page, 'BleedBox', $this->pagedim[$this->page]['CropBox']['llx'], $this->pagedim[$this->page]['CropBox']['lly'], $this->pagedim[$this->page]['CropBox']['urx'], $this->pagedim[$this->page]['CropBox']['ury'], true);
        }
        if (!isset($this->pagedim[$this->page]['TrimBox'])) {
            // the intended dimensions of the finished page after trimming
            $this->setPageBoxes($this->page, 'TrimBox', $this->pagedim[$this->page]['CropBox']['llx'], $this->pagedim[$this->page]['CropBox']['lly'], $this->pagedim[$this->page]['CropBox']['urx'], $this->pagedim[$this->page]['CropBox']['ury'], true);
        }
        if (!isset($this->pagedim[$this->page]['ArtBox'])) {
            // the page's meaningful content (including potential white space)
            $this->setPageBoxes($this->page, 'ArtBox', $this->pagedim[$this->page]['CropBox']['llx'], $this->pagedim[$this->page]['CropBox']['lly'], $this->pagedim[$this->page]['CropBox']['urx'], $this->pagedim[$this->page]['CropBox']['ury'], true);
        }
        if (!isset($this->pagedim[$this->page]['Rotate'])) {
            // The number of degrees by which the page shall be rotated clockwise when displayed or printed. The value shall be a multiple of 90.
            $this->pagedim[$this->page]['Rotate'] = 0;
        }
        if (!isset($this->pagedim[$this->page]['PZ'])) {
            // The page's preferred zoom (magnification) factor
            $this->pagedim[$this->page]['PZ'] = 1;
        }
        if ($this->fwPt > $this->fhPt) {
            // landscape
            $default_orientation = 'L';
        } else {
            // portrait
            $default_orientation = 'P';
        }
        $valid_orientations = array('P', 'L');
        if (empty($orientation)) {
            $orientation = $default_orientation;
        } else {
            $orientation = strtoupper($orientation{0});
        }
        if (in_array($orientation, $valid_orientations) AND ($orientation != $default_orientation)) {
            $this->CurOrientation = $orientation;
            $this->wPt = $this->fhPt;
            $this->hPt = $this->fwPt;
        } else {
            $this->CurOrientation = $default_orientation;
            $this->wPt = $this->fwPt;
            $this->hPt = $this->fhPt;
        }
        if ((abs($this->pagedim[$this->page]['MediaBox']['urx'] - $this->hPt) < $this->feps) AND (abs($this->pagedim[$this->page]['MediaBox']['ury'] - $this->wPt) < $this->feps)) {
            // swap X and Y coordinates (change page orientation)
            $this->swapPageBoxCoordinates($this->page);
        }
        $this->w = ($this->wPt / $this->k);
        $this->h = ($this->hPt / $this->k);
        if ($this->empty_string($autopagebreak)) {
            if (isset($this->AutoPageBreak)) {
                $autopagebreak = $this->AutoPageBreak;
            } else {
                $autopagebreak = true;
            }
        }
        if ($this->empty_string($bottommargin)) {
            if (isset($this->bMargin)) {
                $bottommargin = $this->bMargin;
            } else {
                // default value = 2 cm
                $bottommargin = 2 * 28.35 / $this->k;
            }
        }
        $this->SetAutoPageBreak($autopagebreak, $bottommargin);
        // store page dimensions
        $this->pagedim[$this->page]['w'] = $this->wPt;
        $this->pagedim[$this->page]['h'] = $this->hPt;
        $this->pagedim[$this->page]['wk'] = $this->w;
        $this->pagedim[$this->page]['hk'] = $this->h;
        $this->pagedim[$this->page]['tm'] = $this->tMargin;
        $this->pagedim[$this->page]['bm'] = $bottommargin;
        $this->pagedim[$this->page]['lm'] = $this->lMargin;
        $this->pagedim[$this->page]['rm'] = $this->rMargin;
        $this->pagedim[$this->page]['pb'] = $autopagebreak;
        $this->pagedim[$this->page]['or'] = $this->CurOrientation;
        $this->pagedim[$this->page]['olm'] = $this->original_lMargin;
        $this->pagedim[$this->page]['orm'] = $this->original_rMargin;
    }

    /**
     * Set regular expression to detect withespaces or word separators.
     * The pattern delimiter must be the forward-slash character "/".
     * Some example patterns are:
     * <pre>
     * Non-Unicode or missing PCRE unicode support: "/[^\S\xa0]/"
     * Unicode and PCRE unicode support: "/[^\S\P{Z}\xa0]/u"
     * Unicode and PCRE unicode support in Chinese mode: "/[^\S\P{Z}\P{Lo}\xa0]/u"
     * if PCRE unicode support is turned ON ("\P" is the negate class of "\p"):
     * "\p{Z}" or "\p{Separator}": any kind of Unicode whitespace or invisible separator.
     * "\p{Lo}" or "\p{Other_Letter}": a Unicode letter or ideograph that does not have lowercase and uppercase variants.
     * "\p{Lo}" is needed for Chinese characters because are packed next to each other without spaces in between.
     * </pre>
     * @param $re (string) regular expression (leave empty for default).
     * @public
     * @since 4.6.016 (2009-06-15)
     */
    public function setSpacesRE($re = '/[^\S\xa0]/') {
        $this->re_spaces = $re;
        $re_parts = explode('/', $re);
        // get pattern parts
        $this->re_space = array();
        if (isset($re_parts[1]) AND !empty($re_parts[1])) {
            $this->re_space['p'] = $re_parts[1];
        } else {
            $this->re_space['p'] = '[\s]';
        }
        // set pattern modifiers
        if (isset($re_parts[2]) AND !empty($re_parts[2])) {
            $this->re_space['m'] = $re_parts[2];
        } else {
            $this->re_space['m'] = '';
        }
    }

    /**
     * Enable or disable Right-To-Left language mode
     * @param $enable (Boolean) if true enable Right-To-Left language mode.
     * @param $resetx (Boolean) if true reset the X position on direction change.
     * @public
     * @since 2.0.000 (2008-01-03)
     */
    public function setRTL($enable, $resetx = true) {
        $enable = $enable ? true : false;
        $resetx = ($resetx AND ($enable != $this->rtl));
        $this->rtl = $enable;
        $this->tmprtl = false;
        if ($resetx) {
            $this->Ln(0);
        }
    }

    /**
     * Return the RTL status
     * @return boolean
     * @public
     * @since 4.0.012 (2008-07-24)
     */
    public function getRTL() {
        return $this->rtl;
    }

    /**
     * Force temporary RTL language direction
     * @param $mode (mixed) can be false, 'L' for LTR or 'R' for RTL
     * @public
     * @since 2.1.000 (2008-01-09)
     */
    public function setTempRTL($mode) {
        $newmode = false;
        switch (strtoupper($mode)) {
            case 'LTR':
            case 'L': {
                    if ($this->rtl) {
                        $newmode = 'L';
                    }
                    break;
                }
            case 'RTL':
            case 'R': {
                    if (!$this->rtl) {
                        $newmode = 'R';
                    }
                    break;
                }
            case false:
            default: {
                    $newmode = false;
                    break;
                }
        }
        $this->tmprtl = $newmode;
    }

    /**
     * Return the current temporary RTL status
     * @return boolean
     * @public
     * @since 4.8.014 (2009-11-04)
     */
    public function isRTLTextDir() {
        return ($this->rtl OR ($this->tmprtl == 'R'));
    }

    /**
     * Set the last cell height.
     * @param $h (float) cell height.
     * @author Nicola Asuni
     * @public
     * @since 1.53.0.TC034
     */
    public function setLastH($h) {
        $this->lasth = $h;
    }

    /**
     * Reset the last cell height.
     * @public
     * @since 5.9.000 (2010-10-03)
     */
    public function resetLastH() {
        $this->lasth = ($this->FontSize * $this->cell_height_ratio) + $this->cell_padding['T'] + $this->cell_padding['B'];
    }

    /**
     * Get the last cell height.
     * @return last cell height
     * @public
     * @since 4.0.017 (2008-08-05)
     */
    public function getLastH() {
        return $this->lasth;
    }

    /**
     * Set the adjusting factor to convert pixels to user units.
     * @param $scale (float) adjusting factor to convert pixels to user units.
     * @author Nicola Asuni
     * @public
     * @since 1.5.2
     */
    public function setImageScale($scale) {
        $this->imgscale = $scale;
    }

    /**
     * Returns the adjusting factor to convert pixels to user units.
     * @return float adjusting factor to convert pixels to user units.
     * @author Nicola Asuni
     * @public
     * @since 1.5.2
     */
    public function getImageScale() {
        return $this->imgscale;
    }

    /**
     * Returns an array of page dimensions:
     * <ul><li>$this->pagedim[$this->page]['w'] = page width in points</li><li>$this->pagedim[$this->page]['h'] = height in points</li><li>$this->pagedim[$this->page]['wk'] = page width in user units</li><li>$this->pagedim[$this->page]['hk'] = page height in user units</li><li>$this->pagedim[$this->page]['tm'] = top margin</li><li>$this->pagedim[$this->page]['bm'] = bottom margin</li><li>$this->pagedim[$this->page]['lm'] = left margin</li><li>$this->pagedim[$this->page]['rm'] = right margin</li><li>$this->pagedim[$this->page]['pb'] = auto page break</li><li>$this->pagedim[$this->page]['or'] = page orientation</li><li>$this->pagedim[$this->page]['olm'] = original left margin</li><li>$this->pagedim[$this->page]['orm'] = original right margin</li><li>$this->pagedim[$this->page]['Rotate'] = The number of degrees by which the page shall be rotated clockwise when displayed or printed. The value shall be a multiple of 90.</li><li>$this->pagedim[$this->page]['PZ'] = The page's preferred zoom (magnification) factor.</li><li>$this->pagedim[$this->page]['trans'] : the style and duration of the visual transition to use when moving from another page to the given page during a presentation<ul><li>$this->pagedim[$this->page]['trans']['Dur'] = The page's display duration (also called its advance timing): the maximum length of time, in seconds, that the page shall be displayed during presentations before the viewer application shall automatically advance to the next page.</li><li>$this->pagedim[$this->page]['trans']['S'] = transition style : Split, Blinds, Box, Wipe, Dissolve, Glitter, R, Fly, Push, Cover, Uncover, Fade</li><li>$this->pagedim[$this->page]['trans']['D'] = The duration of the transition effect, in seconds.</li><li>$this->pagedim[$this->page]['trans']['Dm'] = (Split and Blinds transition styles only) The dimension in which the specified transition effect shall occur: H = Horizontal, V = Vertical. Default value: H.</li><li>$this->pagedim[$this->page]['trans']['M'] = (Split, Box and Fly transition styles only) The direction of motion for the specified transition effect: I = Inward from the edges of the page, O = Outward from the center of the pageDefault value: I.</li><li>$this->pagedim[$this->page]['trans']['Di'] = (Wipe, Glitter, Fly, Cover, Uncover and Push transition styles only) The direction in which the specified transition effect shall moves, expressed in degrees counterclockwise starting from a left-to-right direction. If the value is a number, it shall be one of: 0 = Left to right, 90 = Bottom to top (Wipe only), 180 = Right to left (Wipe only), 270 = Top to bottom, 315 = Top-left to bottom-right (Glitter only). If the value is a name, it shall be None, which is relevant only for the Fly transition when the value of SS is not 1.0. Default value: 0.</li><li>$this->pagedim[$this->page]['trans']['SS'] = (Fly transition style only) The starting or ending scale at which the changes shall be drawn. If M specifies an inward transition, the scale of the changes drawn shall progress from SS to 1.0 over the course of the transition. If M specifies an outward transition, the scale of the changes drawn shall progress from 1.0 to SS over the course of the transition. Default: 1.0. </li><li>$this->pagedim[$this->page]['trans']['B'] = (Fly transition style only) If true, the area that shall be flown in is rectangular and opaque. Default: false.</li></ul></li><li>$this->pagedim[$this->page]['MediaBox'] : the boundaries of the physical medium on which the page shall be displayed or printed<ul><li>$this->pagedim[$this->page]['MediaBox']['llx'] = lower-left x coordinate in points</li><li>$this->pagedim[$this->page]['MediaBox']['lly'] = lower-left y coordinate in points</li><li>$this->pagedim[$this->page]['MediaBox']['urx'] = upper-right x coordinate in points</li><li>$this->pagedim[$this->page]['MediaBox']['ury'] = upper-right y coordinate in points</li></ul></li><li>$this->pagedim[$this->page]['CropBox'] : the visible region of default user space<ul><li>$this->pagedim[$this->page]['CropBox']['llx'] = lower-left x coordinate in points</li><li>$this->pagedim[$this->page]['CropBox']['lly'] = lower-left y coordinate in points</li><li>$this->pagedim[$this->page]['CropBox']['urx'] = upper-right x coordinate in points</li><li>$this->pagedim[$this->page]['CropBox']['ury'] = upper-right y coordinate in points</li></ul></li><li>$this->pagedim[$this->page]['BleedBox'] : the region to which the contents of the page shall be clipped when output in a production environment<ul><li>$this->pagedim[$this->page]['BleedBox']['llx'] = lower-left x coordinate in points</li><li>$this->pagedim[$this->page]['BleedBox']['lly'] = lower-left y coordinate in points</li><li>$this->pagedim[$this->page]['BleedBox']['urx'] = upper-right x coordinate in points</li><li>$this->pagedim[$this->page]['BleedBox']['ury'] = upper-right y coordinate in points</li></ul></li><li>$this->pagedim[$this->page]['TrimBox'] : the intended dimensions of the finished page after trimming<ul><li>$this->pagedim[$this->page]['TrimBox']['llx'] = lower-left x coordinate in points</li><li>$this->pagedim[$this->page]['TrimBox']['lly'] = lower-left y coordinate in points</li><li>$this->pagedim[$this->page]['TrimBox']['urx'] = upper-right x coordinate in points</li><li>$this->pagedim[$this->page]['TrimBox']['ury'] = upper-right y coordinate in points</li></ul></li><li>$this->pagedim[$this->page]['ArtBox'] : the extent of the page's meaningful content<ul><li>$this->pagedim[$this->page]['ArtBox']['llx'] = lower-left x coordinate in points</li><li>$this->pagedim[$this->page]['ArtBox']['lly'] = lower-left y coordinate in points</li><li>$this->pagedim[$this->page]['ArtBox']['urx'] = upper-right x coordinate in points</li><li>$this->pagedim[$this->page]['ArtBox']['ury'] = upper-right y coordinate in points</li></ul></li></ul>
     * @param $pagenum (int) page number (empty = current page)
     * @return array of page dimensions.
     * @author Nicola Asuni
     * @public
     * @since 4.5.027 (2009-03-16)
     */
    public function getPageDimensions($pagenum = '') {
        if (empty($pagenum)) {
            $pagenum = $this->page;
        }
        return $this->pagedim[$pagenum];
    }

    /**
     * Returns the page width in units.
     * @param $pagenum (int) page number (empty = current page)
     * @return int page width.
     * @author Nicola Asuni
     * @public
     * @since 1.5.2
     * @see getPageDimensions()
     */
    public function getPageWidth($pagenum = '') {
        if (empty($pagenum)) {
            return $this->w;
        }
        return $this->pagedim[$pagenum]['w'];
    }

    /**
     * Returns the page height in units.
     * @param $pagenum (int) page number (empty = current page)
     * @return int page height.
     * @author Nicola Asuni
     * @public
     * @since 1.5.2
     * @see getPageDimensions()
     */
    public function getPageHeight($pagenum = '') {
        if (empty($pagenum)) {
            return $this->h;
        }
        return $this->pagedim[$pagenum]['h'];
    }

    /**
     * Returns the page break margin.
     * @param $pagenum (int) page number (empty = current page)
     * @return int page break margin.
     * @author Nicola Asuni
     * @public
     * @since 1.5.2
     * @see getPageDimensions()
     */
    public function getBreakMargin($pagenum = '') {
        if (empty($pagenum)) {
            return $this->bMargin;
        }
        return $this->pagedim[$pagenum]['bm'];
    }

    /**
     * Returns the scale factor (number of points in user unit).
     * @return int scale factor.
     * @author Nicola Asuni
     * @public
     * @since 1.5.2
     */
    public function getScaleFactor() {
        return $this->k;
    }

    /**
     * Defines the left, top and right margins.
     * @param $left (float) Left margin.
     * @param $top (float) Top margin.
     * @param $right (float) Right margin. Default value is the left one.
     * @param $keepmargins (boolean) if true overwrites the default page margins
     * @public
     * @since 1.0
     * @see SetLeftMargin(), SetTopMargin(), SetRightMargin(), SetAutoPageBreak()
     */
    public function SetMargins($left, $top, $right = -1, $keepmargins = false) {
        //Set left, top and right margins
        $this->lMargin = $left;
        $this->tMargin = $top;
        if ($right == -1) {
            $right = $left;
        }
        $this->rMargin = $right;
        if ($keepmargins) {
            // overwrite original values
            $this->original_lMargin = $this->lMargin;
            $this->original_rMargin = $this->rMargin;
        }
    }

    /**
     * Defines the left margin. The method can be called before creating the first page. If the current abscissa gets out of page, it is brought back to the margin.
     * @param $margin (float) The margin.
     * @public
     * @since 1.4
     * @see SetTopMargin(), SetRightMargin(), SetAutoPageBreak(), SetMargins()
     */
    public function SetLeftMargin($margin) {
        //Set left margin
        $this->lMargin = $margin;
        if (($this->page > 0) AND ($this->x < $margin)) {
            $this->x = $margin;
        }
    }

    /**
     * Defines the top margin. The method can be called before creating the first page.
     * @param $margin (float) The margin.
     * @public
     * @since 1.5
     * @see SetLeftMargin(), SetRightMargin(), SetAutoPageBreak(), SetMargins()
     */
    public function SetTopMargin($margin) {
        //Set top margin
        $this->tMargin = $margin;
        if (($this->page > 0) AND ($this->y < $margin)) {
            $this->y = $margin;
        }
    }

    /**
     * Defines the right margin. The method can be called before creating the first page.
     * @param $margin (float) The margin.
     * @public
     * @since 1.5
     * @see SetLeftMargin(), SetTopMargin(), SetAutoPageBreak(), SetMargins()
     */
    public function SetRightMargin($margin) {
        $this->rMargin = $margin;
        if (($this->page > 0) AND ($this->x > ($this->w - $margin))) {
            $this->x = $this->w - $margin;
        }
    }

    /**
     * Set the same internal Cell padding for top, right, bottom, left-
     * @param $pad (float) internal padding.
     * @public
     * @since 2.1.000 (2008-01-09)
     * @see getCellPaddings(), setCellPaddings()
     */
    public function SetCellPadding($pad) {
        if ($pad >= 0) {
            $this->cell_padding['L'] = $pad;
            $this->cell_padding['T'] = $pad;
            $this->cell_padding['R'] = $pad;
            $this->cell_padding['B'] = $pad;
        }
    }

    /**
     * Set the internal Cell paddings.
     * @param $left (float) left padding
     * @param $top (float) top padding
     * @param $right (float) right padding
     * @param $bottom (float) bottom padding
     * @public
     * @since 5.9.000 (2010-10-03)
     * @see getCellPaddings(), SetCellPadding()
     */
    public function setCellPaddings($left = '', $top = '', $right = '', $bottom = '') {
        if (($left !== '') AND ($left >= 0)) {
            $this->cell_padding['L'] = $left;
        }
        if (($top !== '') AND ($top >= 0)) {
            $this->cell_padding['T'] = $top;
        }
        if (($right !== '') AND ($right >= 0)) {
            $this->cell_padding['R'] = $right;
        }
        if (($bottom !== '') AND ($bottom >= 0)) {
            $this->cell_padding['B'] = $bottom;
        }
    }

    /**
     * Get the internal Cell padding array.
     * @return array of padding values
     * @public
     * @since 5.9.000 (2010-10-03)
     * @see setCellPaddings(), SetCellPadding()
     */
    public function getCellPaddings() {
        return $this->cell_padding;
    }

    /**
     * Set the internal Cell margins.
     * @param $left (float) left margin
     * @param $top (float) top margin
     * @param $right (float) right margin
     * @param $bottom (float) bottom margin
     * @public
     * @since 5.9.000 (2010-10-03)
     * @see getCellMargins()
     */
    public function setCellMargins($left = '', $top = '', $right = '', $bottom = '') {
        if (($left !== '') AND ($left >= 0)) {
            $this->cell_margin['L'] = $left;
        }
        if (($top !== '') AND ($top >= 0)) {
            $this->cell_margin['T'] = $top;
        }
        if (($right !== '') AND ($right >= 0)) {
            $this->cell_margin['R'] = $right;
        }
        if (($bottom !== '') AND ($bottom >= 0)) {
            $this->cell_margin['B'] = $bottom;
        }
    }

    /**
     * Get the internal Cell margin array.
     * @return array of margin values
     * @public
     * @since 5.9.000 (2010-10-03)
     * @see setCellMargins()
     */
    public function getCellMargins() {
        return $this->cell_margin;
    }

    /**
     * Adjust the internal Cell padding array to take account of the line width.
     * @param $brd (mixed) Indicates if borders must be drawn around the cell. The value can be a number:<ul><li>0: no border (default)</li><li>1: frame</li></ul> or a string containing some or all of the following characters (in any order):<ul><li>L: left</li><li>T: top</li><li>R: right</li><li>B: bottom</li></ul> or an array of line styles for each border group - for example: array('LTRB' => array('width' => 2, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(0, 0, 0)))
     * @return array of adjustments
     * @public
     * @since 5.9.000 (2010-10-03)
     */
    protected function adjustCellPadding($brd = 0) {
        if (empty($brd)) {
            return;
        }
        if (is_string($brd)) {
            // convert string to array
            $slen = strlen($brd);
            $newbrd = array();
            for ($i = 0; $i < $slen; ++$i) {
                $newbrd[$brd[$i]] = true;
            }
            $brd = $newbrd;
        } elseif (($brd === 1) OR ($brd === true) OR (is_numeric($brd) AND (intval($brd) > 0))) {
            $brd = array('LRTB' => true);
        }
        if (!is_array($brd)) {
            return;
        }
        // store current cell padding
        $cp = $this->cell_padding;
        // select border mode
        if (isset($brd['mode'])) {
            $mode = $brd['mode'];
            unset($brd['mode']);
        } else {
            $mode = 'normal';
        }
        // process borders
        foreach ($brd as $border => $style) {
            $line_width = $this->LineWidth;
            if (is_array($style) AND isset($style['width'])) {
                // get border width
                $line_width = $style['width'];
            }
            $adj = 0; // line width inside the cell
            switch ($mode) {
                case 'ext': {
                        $adj = 0;
                        break;
                    }
                case 'int': {
                        $adj = $line_width;
                        break;
                    }
                case 'normal':
                default: {
                        $adj = ($line_width / 2);
                        break;
                    }
            }
            // correct internal cell padding if required to avoid overlap between text and lines
            if ((strpos($border, 'T') !== false) AND ($this->cell_padding['T'] < $adj)) {
                $this->cell_padding['T'] = $adj;
            }
            if ((strpos($border, 'R') !== false) AND ($this->cell_padding['R'] < $adj)) {
                $this->cell_padding['R'] = $adj;
            }
            if ((strpos($border, 'B') !== false) AND ($this->cell_padding['B'] < $adj)) {
                $this->cell_padding['B'] = $adj;
            }
            if ((strpos($border, 'L') !== false) AND ($this->cell_padding['L'] < $adj)) {
                $this->cell_padding['L'] = $adj;
            }
        }
        return array('T' => ($this->cell_padding['T'] - $cp['T']), 'R' => ($this->cell_padding['R'] - $cp['R']), 'B' => ($this->cell_padding['B'] - $cp['B']), 'L' => ($this->cell_padding['L'] - $cp['L']));
    }

    /**
     * Enables or disables the automatic page breaking mode. When enabling, the second parameter is the distance from the bottom of the page that defines the triggering limit. By default, the mode is on and the margin is 2 cm.
     * @param $auto (boolean) Boolean indicating if mode should be on or off.
     * @param $margin (float) Distance from the bottom of the page.
     * @public
     * @since 1.0
     * @see Cell(), MultiCell(), AcceptPageBreak()
     */
    public function SetAutoPageBreak($auto, $margin = 0) {
        $this->AutoPageBreak = $auto ? true : false;
        $this->bMargin = $margin;
        $this->PageBreakTrigger = $this->h - $margin;
    }

    /**
     * Return the auto-page-break mode (true or false).
     * @return boolean auto-page-break mode
     * @public
     * @since 5.9.088
     */
    public function getAutoPageBreak() {
        return $this->AutoPageBreak;
    }

    /**
     * Defines the way the document is to be displayed by the viewer.
     * @param $zoom (mixed) The zoom to use. It can be one of the following string values or a number indicating the zooming factor to use. <ul><li>fullpage: displays the entire page on screen </li><li>fullwidth: uses maximum width of window</li><li>real: uses real size (equivalent to 100% zoom)</li><li>default: uses viewer default mode</li></ul>
     * @param $layout (string) The page layout. Possible values are:<ul><li>SinglePage Display one page at a time</li><li>OneColumn Display the pages in one column</li><li>TwoColumnLeft Display the pages in two columns, with odd-numbered pages on the left</li><li>TwoColumnRight Display the pages in two columns, with odd-numbered pages on the right</li><li>TwoPageLeft (PDF 1.5) Display the pages two at a time, with odd-numbered pages on the left</li><li>TwoPageRight (PDF 1.5) Display the pages two at a time, with odd-numbered pages on the right</li></ul>
     * @param $mode (string) A name object specifying how the document should be displayed when opened:<ul><li>UseNone Neither document outline nor thumbnail images visible</li><li>UseOutlines Document outline visible</li><li>UseThumbs Thumbnail images visible</li><li>FullScreen Full-screen mode, with no menu bar, window controls, or any other window visible</li><li>UseOC (PDF 1.5) Optional content group panel visible</li><li>UseAttachments (PDF 1.6) Attachments panel visible</li></ul>
     * @public
     * @since 1.2
     */
    public function SetDisplayMode($zoom, $layout = 'SinglePage', $mode = 'UseNone') {
        if (($zoom == 'fullpage') OR ($zoom == 'fullwidth') OR ($zoom == 'real') OR ($zoom == 'default') OR (!is_string($zoom))) {
            $this->ZoomMode = $zoom;
        } else {
            $this->Error('Incorrect zoom display mode: ' . $zoom);
        }
        switch ($layout) {
            case 'default':
            case 'single':
            case 'SinglePage': {
                    $this->LayoutMode = 'SinglePage';
                    break;
                }
            case 'continuous':
            case 'OneColumn': {
                    $this->LayoutMode = 'OneColumn';
                    break;
                }
            case 'two':
            case 'TwoColumnLeft': {
                    $this->LayoutMode = 'TwoColumnLeft';
                    break;
                }
            case 'TwoColumnRight': {
                    $this->LayoutMode = 'TwoColumnRight';
                    break;
                }
            case 'TwoPageLeft': {
                    $this->LayoutMode = 'TwoPageLeft';
                    break;
                }
            case 'TwoPageRight': {
                    $this->LayoutMode = 'TwoPageRight';
                    break;
                }
            default: {
                    $this->LayoutMode = 'SinglePage';
                }
        }
        switch ($mode) {
            case 'UseNone': {
                    $this->PageMode = 'UseNone';
                    break;
                }
            case 'UseOutlines': {
                    $this->PageMode = 'UseOutlines';
                    break;
                }
            case 'UseThumbs': {
                    $this->PageMode = 'UseThumbs';
                    break;
                }
            case 'FullScreen': {
                    $this->PageMode = 'FullScreen';
                    break;
                }
            case 'UseOC': {
                    $this->PageMode = 'UseOC';
                    break;
                }
            case '': {
                    $this->PageMode = 'UseAttachments';
                    break;
                }
            default: {
                    $this->PageMode = 'UseNone';
                }
        }
    }

    /**
     * Activates or deactivates page compression. When activated, the internal representation of each page is compressed, which leads to a compression ratio of about 2 for the resulting document. Compression is on by default.
     * Note: the Zlib extension is required for this feature. If not present, compression will be turned off.
     * @param $compress (boolean) Boolean indicating if compression must be enabled.
     * @public
     * @since 1.4
     */
    public function SetCompression($compress = true) {
        if (function_exists('gzcompress')) {
            $this->compress = $compress ? true : false;
        } else {
            $this->compress = false;
        }
    }

    /**
     * Set flag to force sRGB_IEC61966-2.1 black scaled ICC color profile for the whole document.
     * @param $mode (boolean) If true force sRGB output intent.
     * @public
     * @since 5.9.121 (2011-09-28)
     */
    public function setSRGBmode($mode = false) {
        $this->force_srgb = $mode ? true : false;
    }

    /**
     * Turn on/off Unicode mode for document information dictionary (meta tags).
     * This has effect only when unicode mode is set to false.
     * @param $unicode (boolean) if true set the meta information in Unicode
     * @since 5.9.027 (2010-12-01)
     * @public
     */
    public function SetDocInfoUnicode($unicode = true) {
        $this->docinfounicode = $unicode ? true : false;
    }

    /**
     * Defines the title of the document.
     * @param $title (string) The title.
     * @public
     * @since 1.2
     * @see SetAuthor(), SetCreator(), SetKeywords(), SetSubject()
     */
    public function SetTitle($title) {
        $this->title = $title;
    }

    /**
     * Defines the subject of the document.
     * @param $subject (string) The subject.
     * @public
     * @since 1.2
     * @see SetAuthor(), SetCreator(), SetKeywords(), SetTitle()
     */
    public function SetSubject($subject) {
        $this->subject = $subject;
    }

    /**
     * Defines the author of the document.
     * @param $author (string) The name of the author.
     * @public
     * @since 1.2
     * @see SetCreator(), SetKeywords(), SetSubject(), SetTitle()
     */
    public function SetAuthor($author) {
        $this->author = $author;
    }

    /**
     * Associates keywords with the document, generally in the form 'keyword1 keyword2 ...'.
     * @param $keywords (string) The list of keywords.
     * @public
     * @since 1.2
     * @see SetAuthor(), SetCreator(), SetSubject(), SetTitle()
     */
    public function SetKeywords($keywords) {
        $this->keywords = $keywords;
    }

    /**
     * Defines the creator of the document. This is typically the name of the application that generates the PDF.
     * @param $creator (string) The name of the creator.
     * @public
     * @since 1.2
     * @see SetAuthor(), SetKeywords(), SetSubject(), SetTitle()
     */
    public function SetCreator($creator) {
        $this->creator = $creator;
    }

    /**
     * This method is automatically called in case of fatal error; it simply outputs the message and halts the execution. An inherited class may override it to customize the error handling but should always halt the script, or the resulting document would probably be invalid.
     * 2004-06-11 :: Nicola Asuni : changed bold tag with strong
     * @param $msg (string) The error message
     * @public
     * @since 1.0
     */
    public function Error($msg) {
        // unset all class variables
        $this->_destroy(true);
        // exit program and print error
        die('<strong>TCPDF ERROR: </strong>' . $msg);
    }

    /**
     * This method begins the generation of the PDF document.
     * It is not necessary to call it explicitly because AddPage() does it automatically.
     * Note: no page is created by this method
     * @public
     * @since 1.0
     * @see AddPage(), Close()
     */
    public function Open() {
        $this->state = 1;
    }

    /**
     * Terminates the PDF document.
     * It is not necessary to call this method explicitly because Output() does it automatically.
     * If the document contains no page, AddPage() is called to prevent from getting an invalid document.
     * @public
     * @since 1.0
     * @see Open(), Output()
     */
    public function Close() {
        if ($this->state == 3) {
            return;
        }
        if ($this->page == 0) {
            $this->AddPage();
        }
        $this->endLayer();
        if ($this->tcpdflink) {
            // save current graphic settings
            $gvars = $this->getGraphicVars();
            $this->setEqualColumns();
            $this->lastpage(true);
            $this->SetAutoPageBreak(false);
            $this->x = 0;
            $this->y = $this->h - (1 / $this->k);
            $this->lMargin = 0;
            $this->_out('q');
            $font = defined('PDF_FONT_NAME_MAIN') ? PDF_FONT_NAME_MAIN : 'helvetica';
            $this->SetFont($font, '', 1);
            $this->setTextRenderingMode(0, false, false);
            $msg = "\x50\x6f\x77\x65\x72\x65\x64\x20\x62\x79\x20\x54\x43\x50\x44\x46\x20\x28\x77\x77\x77\x2e\x74\x63\x70\x64\x66\x2e\x6f\x72\x67\x29";
            $lnk = "\x68\x74\x74\x70\x3a\x2f\x2f\x77\x77\x77\x2e\x74\x63\x70\x64\x66\x2e\x6f\x72\x67";
            $this->Cell(0, 0, $msg, 0, 0, 'L', 0, $lnk, 0, false, 'D', 'B');
            $this->_out('Q');
            // restore graphic settings
            $this->setGraphicVars($gvars);
        }
        // close page
        $this->endPage();
        // close document
        $this->_enddoc();
        // unset all class variables (except critical ones)
        $this->_destroy(false);
    }

    /**
     * Move pointer at the specified document page and update page dimensions.
     * @param $pnum (int) page number (1 ... numpages)
     * @param $resetmargins (boolean) if true reset left, right, top margins and Y position.
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see getPage(), lastpage(), getNumPages()
     */
    public function setPage($pnum, $resetmargins = false) {
        if (($pnum == $this->page) AND ($this->state == 2)) {
            return;
        }
        if (($pnum > 0) AND ($pnum <= $this->numpages)) {
            $this->state = 2;
            // save current graphic settings
            //$gvars = $this->getGraphicVars();
            $oldpage = $this->page;
            $this->page = $pnum;
            $this->wPt = $this->pagedim[$this->page]['w'];
            $this->hPt = $this->pagedim[$this->page]['h'];
            $this->w = $this->pagedim[$this->page]['wk'];
            $this->h = $this->pagedim[$this->page]['hk'];
            $this->tMargin = $this->pagedim[$this->page]['tm'];
            $this->bMargin = $this->pagedim[$this->page]['bm'];
            $this->original_lMargin = $this->pagedim[$this->page]['olm'];
            $this->original_rMargin = $this->pagedim[$this->page]['orm'];
            $this->AutoPageBreak = $this->pagedim[$this->page]['pb'];
            $this->CurOrientation = $this->pagedim[$this->page]['or'];
            $this->SetAutoPageBreak($this->AutoPageBreak, $this->bMargin);
            // restore graphic settings
            //$this->setGraphicVars($gvars);
            if ($resetmargins) {
                $this->lMargin = $this->pagedim[$this->page]['olm'];
                $this->rMargin = $this->pagedim[$this->page]['orm'];
                $this->SetY($this->tMargin);
            } else {
                // account for booklet mode
                if ($this->pagedim[$this->page]['olm'] != $this->pagedim[$oldpage]['olm']) {
                    $deltam = $this->pagedim[$this->page]['olm'] - $this->pagedim[$this->page]['orm'];
                    $this->lMargin += $deltam;
                    $this->rMargin -= $deltam;
                }
            }
        } else {
            $this->Error('Wrong page number on setPage() function: ' . $pnum);
        }
    }

    /**
     * Reset pointer to the last document page.
     * @param $resetmargins (boolean) if true reset left, right, top margins and Y position.
     * @public
     * @since 2.0.000 (2008-01-04)
     * @see setPage(), getPage(), getNumPages()
     */
    public function lastPage($resetmargins = false) {
        $this->setPage($this->getNumPages(), $resetmargins);
    }

    /**
     * Get current document page number.
     * @return int page number
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see setPage(), lastpage(), getNumPages()
     */
    public function getPage() {
        return $this->page;
    }

    /**
     * Get the total number of insered pages.
     * @return int number of pages
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see setPage(), getPage(), lastpage()
     */
    public function getNumPages() {
        return $this->numpages;
    }

    /**
     * Adds a new TOC (Table Of Content) page to the document.
     * @param $orientation (string) page orientation.
     * @param $format (mixed) The format used for pages. It can be either: one of the string values specified at getPageSizeFromFormat() or an array of parameters specified at setPageFormat().
     * @param $keepmargins (boolean) if true overwrites the default page margins with the current margins
     * @public
     * @since 5.0.001 (2010-05-06)
     * @see AddPage(), startPage(), endPage(), endTOCPage()
     */
    public function addTOCPage($orientation = '', $format = '', $keepmargins = false) {
        $this->AddPage($orientation, $format, $keepmargins, true);
    }

    /**
     * Terminate the current TOC (Table Of Content) page
     * @public
     * @since 5.0.001 (2010-05-06)
     * @see AddPage(), startPage(), endPage(), addTOCPage()
     */
    public function endTOCPage() {
        $this->endPage(true);
    }

    /**
     * Adds a new page to the document. If a page is already present, the Footer() method is called first to output the footer (if enabled). Then the page is added, the current position set to the top-left corner according to the left and top margins (or top-right if in RTL mode), and Header() is called to display the header (if enabled).
     * The origin of the coordinate system is at the top-left corner (or top-right for RTL) and increasing ordinates go downwards.
     * @param $orientation (string) page orientation. Possible values are (case insensitive):<ul><li>P or PORTRAIT (default)</li><li>L or LANDSCAPE</li></ul>
     * @param $format (mixed) The format used for pages. It can be either: one of the string values specified at getPageSizeFromFormat() or an array of parameters specified at setPageFormat().
     * @param $keepmargins (boolean) if true overwrites the default page margins with the current margins
     * @param $tocpage (boolean) if true set the tocpage state to true (the added page will be used to display Table Of Content).
     * @public
     * @since 1.0
     * @see startPage(), endPage(), addTOCPage(), endTOCPage(), getPageSizeFromFormat(), setPageFormat()
     */
    public function AddPage($orientation = '', $format = '', $keepmargins = false, $tocpage = false) {
        if ($this->inxobj) {
            // we are inside an XObject template
            return;
        }
        if (!isset($this->original_lMargin) OR $keepmargins) {
            $this->original_lMargin = $this->lMargin;
        }
        if (!isset($this->original_rMargin) OR $keepmargins) {
            $this->original_rMargin = $this->rMargin;
        }
        // terminate previous page
        $this->endPage();
        // start new page
        $this->startPage($orientation, $format, $tocpage);
    }

    /**
     * Terminate the current page
     * @param $tocpage (boolean) if true set the tocpage state to false (end the page used to display Table Of Content).
     * @public
     * @since 4.2.010 (2008-11-14)
     * @see AddPage(), startPage(), addTOCPage(), endTOCPage()
     */
    public function endPage($tocpage = false) {
        // check if page is already closed
        if (($this->page == 0) OR ($this->numpages > $this->page) OR (!$this->pageopen[$this->page])) {
            return;
        }
        // print page footer
        $this->setFooter();
        // close page
        $this->_endpage();
        // mark page as closed
        $this->pageopen[$this->page] = false;
        if ($tocpage) {
            $this->tocpage = false;
        }
    }

    /**
     * Starts a new page to the document. The page must be closed using the endPage() function.
     * The origin of the coordinate system is at the top-left corner and increasing ordinates go downwards.
     * @param $orientation (string) page orientation. Possible values are (case insensitive):<ul><li>P or PORTRAIT (default)</li><li>L or LANDSCAPE</li></ul>
     * @param $format (mixed) The format used for pages. It can be either: one of the string values specified at getPageSizeFromFormat() or an array of parameters specified at setPageFormat().
     * @param $tocpage (boolean) if true the page is designated to contain the Table-Of-Content.
     * @since 4.2.010 (2008-11-14)
     * @see AddPage(), endPage(), addTOCPage(), endTOCPage(), getPageSizeFromFormat(), setPageFormat()
     * @public
     */
    public function startPage($orientation = '', $format = '', $tocpage = false) {
        if ($tocpage) {
            $this->tocpage = true;
        }
        // move page numbers of documents to be attached
        if ($this->tocpage) {
            // move reference to unexistent pages (used for page attachments)
            // adjust outlines
            $tmpoutlines = $this->outlines;
            foreach ($tmpoutlines as $key => $outline) {
                if ($outline['p'] > $this->numpages) {
                    $this->outlines[$key]['p'] = ($outline['p'] + 1);
                }
            }
            // adjust dests
            $tmpdests = $this->dests;
            foreach ($tmpdests as $key => $dest) {
                if ($dest['p'] > $this->numpages) {
                    $this->dests[$key]['p'] = ($dest['p'] + 1);
                }
            }
            // adjust links
            $tmplinks = $this->links;
            foreach ($tmplinks as $key => $link) {
                if ($link[0] > $this->numpages) {
                    $this->links[$key][0] = ($link[0] + 1);
                }
            }
        }
        if ($this->numpages > $this->page) {
            // this page has been already added
            $this->setPage($this->page + 1);
            $this->SetY($this->tMargin);
            return;
        }
        // start a new page
        if ($this->state == 0) {
            $this->Open();
        }
        ++$this->numpages;
        $this->swapMargins($this->booklet);
        // save current graphic settings
        $gvars = $this->getGraphicVars();
        // start new page
        $this->_beginpage($orientation, $format);
        // mark page as open
        $this->pageopen[$this->page] = true;
        // restore graphic settings
        $this->setGraphicVars($gvars);
        // mark this point
        $this->setPageMark();
        // print page header
        $this->setHeader();
        // restore graphic settings
        $this->setGraphicVars($gvars);
        // mark this point
        $this->setPageMark();
        // print table header (if any)
        $this->setTableHeader();
        // set mark for empty page check
        $this->emptypagemrk[$this->page] = $this->pagelen[$this->page];
    }

    /**
     * Set start-writing mark on current page stream used to put borders and fills.
     * Borders and fills are always created after content and inserted on the position marked by this method.
     * This function must be called after calling Image() function for a background image.
     * Background images must be always inserted before calling Multicell() or WriteHTMLCell() or WriteHTML() functions.
     * @public
     * @since 4.0.016 (2008-07-30)
     */
    public function setPageMark() {
        $this->intmrk[$this->page] = $this->pagelen[$this->page];
        $this->bordermrk[$this->page] = $this->intmrk[$this->page];
        $this->setContentMark();
    }

    /**
     * Set start-writing mark on selected page.
     * Borders and fills are always created after content and inserted on the position marked by this method.
     * @param $page (int) page number (default is the current page)
     * @protected
     * @since 4.6.021 (2009-07-20)
     */
    protected function setContentMark($page = 0) {
        if ($page <= 0) {
            $page = $this->page;
        }
        if (isset($this->footerlen[$page])) {
            $this->cntmrk[$page] = $this->pagelen[$page] - $this->footerlen[$page];
        } else {
            $this->cntmrk[$page] = $this->pagelen[$page];
        }
    }

    /**
     * Set header data.
     * @param $ln (string) header image logo
     * @param $lw (string) header image logo width in mm
     * @param $ht (string) string to print as title on document header
     * @param $hs (string) string to print on document header
     * @param $tc (array) RGB array color for text.
     * @param $lc (array) RGB array color for line.
     * @public
     */
    public function setHeaderData($ln = '', $lw = 0, $ht = '', $hs = '', $tc = array(0, 0, 0), $lc = array(0, 0, 0)) {
        $this->header_logo = $ln;
        $this->header_logo_width = $lw;
        $this->header_title = $ht;
        $this->header_string = $hs;
        $this->header_text_color = $tc;
        $this->header_line_color = $lc;
    }

    /**
     * Set footer data.
     * @param $tc (array) RGB array color for text.
     * @param $lc (array) RGB array color for line.
     * @public
     */
    public function setFooterData($tc = array(0, 0, 0), $lc = array(0, 0, 0)) {
        $this->footer_text_color = $tc;
        $this->footer_line_color = $lc;
    }

    /**
     * Returns header data:
     * <ul><li>$ret['logo'] = logo image</li><li>$ret['logo_width'] = width of the image logo in user units</li><li>$ret['title'] = header title</li><li>$ret['string'] = header description string</li></ul>
     * @return array()
     * @public
     * @since 4.0.012 (2008-07-24)
     */
    public function getHeaderData() {
        $ret = array();
        $ret['logo'] = $this->header_logo;
        $ret['logo_width'] = $this->header_logo_width;
        $ret['title'] = $this->header_title;
        $ret['string'] = $this->header_string;
        $ret['text_color'] = $this->header_text_color;
        $ret['line_color'] = $this->header_line_color;
        return $ret;
    }

    /**
     * Set header margin.
     * (minimum distance between header and top page margin)
     * @param $hm (int) distance in user units
     * @public
     */
    public function setHeaderMargin($hm = 10) {
        $this->header_margin = $hm;
    }

    /**
     * Returns header margin in user units.
     * @return float
     * @since 4.0.012 (2008-07-24)
     * @public
     */
    public function getHeaderMargin() {
        return $this->header_margin;
    }

    /**
     * Set footer margin.
     * (minimum distance between footer and bottom page margin)
     * @param $fm (int) distance in user units
     * @public
     */
    public function setFooterMargin($fm = 10) {
        $this->footer_margin = $fm;
    }

    /**
     * Returns footer margin in user units.
     * @return float
     * @since 4.0.012 (2008-07-24)
     * @public
     */
    public function getFooterMargin() {
        return $this->footer_margin;
    }

    /**
     * Set a flag to print page header.
     * @param $val (boolean) set to true to print the page header (default), false otherwise.
     * @public
     */
    public function setPrintHeader($val = true) {
        $this->print_header = $val ? true : false;
    }

    /**
     * Set a flag to print page footer.
     * @param $val (boolean) set to true to print the page footer (default), false otherwise.
     * @public
     */
    public function setPrintFooter($val = true) {
        $this->print_footer = $val ? true : false;
    }

    /**
     * Return the right-bottom (or left-bottom for RTL) corner X coordinate of last inserted image
     * @return float
     * @public
     */
    public function getImageRBX() {
        return $this->img_rb_x;
    }

    /**
     * Return the right-bottom (or left-bottom for RTL) corner Y coordinate of last inserted image
     * @return float
     * @public
     */
    public function getImageRBY() {
        return $this->img_rb_y;
    }

    /**
     * Reset the xobject template used by Header() method.
     * @public
     */
    public function resetHeaderTemplate() {
        $this->header_xobjid = -1;
    }

    /**
     * Set a flag to automatically reset the xobject template used by Header() method at each page.
     * @param $val (boolean) set to true to reset Header xobject template at each page, false otherwise.
     * @public
     */
    public function setHeaderTemplateAutoreset($val = true) {
        $this->header_xobj_autoreset = $val ? true : false;
    }

    /**
     * This method is used to render the page header.
     * It is automatically called by AddPage() and could be overwritten in your own inherited class.
     * @public
     */
    public function Header() {
        if ($this->header_xobjid < 0) {
            // start a new XObject Template
            $this->header_xobjid = $this->startTemplate($this->w, $this->tMargin);
            $headerfont = $this->getHeaderFont();
            $headerdata = $this->getHeaderData();
            $this->y = $this->header_margin;
            if ($this->rtl) {
                $this->x = $this->w - $this->original_rMargin;
            } else {
                $this->x = $this->original_lMargin;
            }
            if (($headerdata['logo']) AND ($headerdata['logo'] != K_BLANK_IMAGE)) {
                $imgtype = $this->getImageFileType(K_PATH_IMAGES . $headerdata['logo']);
                if (($imgtype == 'eps') OR ($imgtype == 'ai')) {
                    $this->ImageEps(K_PATH_IMAGES . $headerdata['logo'], '', '', $headerdata['logo_width']);
                } elseif ($imgtype == 'svg') {
                    $this->ImageSVG(K_PATH_IMAGES . $headerdata['logo'], '', '', $headerdata['logo_width']);
                } else {
                    $this->Image(K_PATH_IMAGES . $headerdata['logo'], '', '', $headerdata['logo_width']);
                }
                $imgy = $this->getImageRBY();
            } else {
                $imgy = $this->y;
            }
            $cell_height = round(($this->cell_height_ratio * $headerfont[2]) / $this->k, 2);
            // set starting margin for text data cell
            if ($this->getRTL()) {
                $header_x = $this->original_rMargin + ($headerdata['logo_width'] * 1.1);
            } else {
                $header_x = $this->original_lMargin + ($headerdata['logo_width'] * 1.1);
            }
            $cw = $this->w - $this->original_lMargin - $this->original_rMargin - ($headerdata['logo_width'] * 1.1);
            $this->SetTextColorArray($this->header_text_color);
            // header title
            $this->SetFont($headerfont[0], 'B', $headerfont[2] + 1);
            $this->SetX($header_x);
            $this->Cell($cw, $cell_height, $headerdata['title'], 0, 1, '', 0, '', 0);
            // header string
            $this->SetFont($headerfont[0], $headerfont[1], $headerfont[2]);
            $this->SetX($header_x);
            $this->MultiCell($cw, $cell_height, $headerdata['string'], 0, '', 0, 1, '', '', true, 0, false, true, 0, 'T', false);
            // print an ending header line
            $this->SetLineStyle(array('width' => 0.85 / $this->k, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => $headerdata['line_color']));
            $this->SetY((2.835 / $this->k) + max($imgy, $this->y));
            if ($this->rtl) {
                $this->SetX($this->original_rMargin);
            } else {
                $this->SetX($this->original_lMargin);
            }
            $this->Cell(($this->w - $this->original_lMargin - $this->original_rMargin), 0, '', 'T', 0, 'C');
            $this->endTemplate();
        }
        // print header template
        $x = 0;
        $dx = 0;
        if (!$this->header_xobj_autoreset AND $this->booklet AND (($this->page % 2) == 0)) {
            // adjust margins for booklet mode
            $dx = ($this->original_lMargin - $this->original_rMargin);
        }
        if ($this->rtl) {
            $x = $this->w + $dx;
        } else {
            $x = 0 + $dx;
        }
        $this->printTemplate($this->header_xobjid, $x, 0, 0, 0, '', '', false);
        if ($this->header_xobj_autoreset) {
            // reset header xobject template at each page
            $this->header_xobjid = -1;
        }
    }

    /**
     * This method is used to render the page footer.
     * It is automatically called by AddPage() and could be overwritten in your own inherited class.
     * @public
     */
    public function Footer() {
        $cur_y = $this->y;
        $this->SetTextColorArray($this->footer_text_color);
        //set style for cell border
        $line_width = (0.85 / $this->k);
        $this->SetLineStyle(array('width' => $line_width, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => $this->footer_line_color));
        //print document barcode
        $barcode = $this->getBarcode();
        if (!empty($barcode)) {
            $this->Ln($line_width);
            $barcode_width = round(($this->w - $this->original_lMargin - $this->original_rMargin) / 3);
            $style = array(
                'position' => $this->rtl ? 'R' : 'L',
                'align' => $this->rtl ? 'R' : 'L',
                'stretch' => false,
                'fitwidth' => true,
                'cellfitalign' => '',
                'border' => false,
                'padding' => 0,
                'fgcolor' => array(0, 0, 0),
                'bgcolor' => false,
                'text' => false
            );
            $this->write1DBarcode($barcode, 'C128', '', $cur_y + $line_width, '', (($this->footer_margin / 3) - $line_width), 0.3, $style, '');
        }
        $w_page = isset($this->l['w_page']) ? $this->l['w_page'] . ' ' : '';
        if (empty($this->pagegroups)) {
            $pagenumtxt = $w_page . $this->getAliasNumPage() . ' / ' . $this->getAliasNbPages();
        } else {
            $pagenumtxt = $w_page . $this->getPageNumGroupAlias() . ' / ' . $this->getPageGroupAlias();
        }
        $this->SetY($cur_y);
        //Print page number
        if ($this->getRTL()) {
            $this->SetX($this->original_rMargin);
            $this->Cell(0, 0, $pagenumtxt, 'T', 0, 'L');
        } else {
            $this->SetX($this->original_lMargin);
            $this->Cell(0, 0, $this->getAliasRightShift() . $pagenumtxt, 'T', 0, 'R');
        }
    }

    /**
     * This method is used to render the page header.
     * @protected
     * @since 4.0.012 (2008-07-24)
     */
    protected function setHeader() {
        if (!$this->print_header OR ($this->state != 2)) {
            return;
        }
        $this->InHeader = true;
        $this->setGraphicVars($this->default_graphic_vars);
        $temp_thead = $this->thead;
        $temp_theadMargins = $this->theadMargins;
        $lasth = $this->lasth;
        $this->_out('q');
        $this->rMargin = $this->original_rMargin;
        $this->lMargin = $this->original_lMargin;
        $this->SetCellPadding(0);
        //set current position
        if ($this->rtl) {
            $this->SetXY($this->original_rMargin, $this->header_margin);
        } else {
            $this->SetXY($this->original_lMargin, $this->header_margin);
        }
        $this->SetFont($this->header_font[0], $this->header_font[1], $this->header_font[2]);
        $this->Header();
        //restore position
        if ($this->rtl) {
            $this->SetXY($this->original_rMargin, $this->tMargin);
        } else {
            $this->SetXY($this->original_lMargin, $this->tMargin);
        }
        $this->_out('Q');
        $this->lasth = $lasth;
        $this->thead = $temp_thead;
        $this->theadMargins = $temp_theadMargins;
        $this->newline = false;
        $this->InHeader = false;
    }

    /**
     * This method is used to render the page footer.
     * @protected
     * @since 4.0.012 (2008-07-24)
     */
    protected function setFooter() {
        if ($this->state != 2) {
            return;
        }
        $this->InFooter = true;
        // save current graphic settings
        $gvars = $this->getGraphicVars();
        // mark this point
        $this->footerpos[$this->page] = $this->pagelen[$this->page];
        $this->_out("\n");
        if ($this->print_footer) {
            $this->setGraphicVars($this->default_graphic_vars);
            $this->current_column = 0;
            $this->num_columns = 1;
            $temp_thead = $this->thead;
            $temp_theadMargins = $this->theadMargins;
            $lasth = $this->lasth;
            $this->_out('q');
            $this->rMargin = $this->original_rMargin;
            $this->lMargin = $this->original_lMargin;
            $this->SetCellPadding(0);
            //set current position
            $footer_y = $this->h - $this->footer_margin;
            if ($this->rtl) {
                $this->SetXY($this->original_rMargin, $footer_y);
            } else {
                $this->SetXY($this->original_lMargin, $footer_y);
            }
            $this->SetFont($this->footer_font[0], $this->footer_font[1], $this->footer_font[2]);
            $this->Footer();
            //restore position
            if ($this->rtl) {
                $this->SetXY($this->original_rMargin, $this->tMargin);
            } else {
                $this->SetXY($this->original_lMargin, $this->tMargin);
            }
            $this->_out('Q');
            $this->lasth = $lasth;
            $this->thead = $temp_thead;
            $this->theadMargins = $temp_theadMargins;
        }
        // restore graphic settings
        $this->setGraphicVars($gvars);
        $this->current_column = $gvars['current_column'];
        $this->num_columns = $gvars['num_columns'];
        // calculate footer length
        $this->footerlen[$this->page] = $this->pagelen[$this->page] - $this->footerpos[$this->page] + 1;
        $this->InFooter = false;
    }

    /**
     * Check if we are on the page body (excluding page header and footer).
     * @return true if we are not in page header nor in page footer, false otherwise.
     * @protected
     * @since 5.9.091 (2011-06-15)
     */
    protected function inPageBody() {
        return (($this->InHeader === false) AND ($this->InFooter === false));
    }

    /**
     * This method is used to render the table header on new page (if any).
     * @protected
     * @since 4.5.030 (2009-03-25)
     */
    protected function setTableHeader() {
        if ($this->num_columns > 1) {
            // multi column mode
            return;
        }
        if (isset($this->theadMargins['top'])) {
            // restore the original top-margin
            $this->tMargin = $this->theadMargins['top'];
            $this->pagedim[$this->page]['tm'] = $this->tMargin;
            $this->y = $this->tMargin;
        }
        if (!$this->empty_string($this->thead) AND (!$this->inthead)) {
            // set margins
            $prev_lMargin = $this->lMargin;
            $prev_rMargin = $this->rMargin;
            $prev_cell_padding = $this->cell_padding;
            $this->lMargin = $this->theadMargins['lmargin'] + ($this->pagedim[$this->page]['olm'] - $this->pagedim[$this->theadMargins['page']]['olm']);
            $this->rMargin = $this->theadMargins['rmargin'] + ($this->pagedim[$this->page]['orm'] - $this->pagedim[$this->theadMargins['page']]['orm']);
            $this->cell_padding = $this->theadMargins['cell_padding'];
            if ($this->rtl) {
                $this->x = $this->w - $this->rMargin;
            } else {
                $this->x = $this->lMargin;
            }
            // account for special "cell" mode
            if ($this->theadMargins['cell']) {
                if ($this->rtl) {
                    $this->x -= $this->cell_padding['R'];
                } else {
                    $this->x += $this->cell_padding['L'];
                }
            }
            // print table header
            $this->writeHTML($this->thead, false, false, false, false, '');
            // set new top margin to skip the table headers
            if (!isset($this->theadMargins['top'])) {
                $this->theadMargins['top'] = $this->tMargin;
            }
            // store end of header position
            if (!isset($this->columns[0]['th'])) {
                $this->columns[0]['th'] = array();
            }
            $this->columns[0]['th']['\'' . $this->page . '\''] = $this->y;
            $this->tMargin = $this->y;
            $this->pagedim[$this->page]['tm'] = $this->tMargin;
            $this->lasth = 0;
            $this->lMargin = $prev_lMargin;
            $this->rMargin = $prev_rMargin;
            $this->cell_padding = $prev_cell_padding;
        }
    }

    /**
     * Returns the current page number.
     * @return int page number
     * @public
     * @since 1.0
     * @see getAliasNbPages()
     */
    public function PageNo() {
        return $this->page;
    }

    /**
     * Defines a new spot color.
     * It can be expressed in RGB components or gray scale.
     * The method can be called before the first page is created and the value is retained from page to page.
     * @param $name (string) Full name of the spot color.
     * @param $c (float) Cyan color for CMYK. Value between 0 and 100.
     * @param $m (float) Magenta color for CMYK. Value between 0 and 100.
     * @param $y (float) Yellow color for CMYK. Value between 0 and 100.
     * @param $k (float) Key (Black) color for CMYK. Value between 0 and 100.
     * @public
     * @since 4.0.024 (2008-09-12)
     * @see SetDrawSpotColor(), SetFillSpotColor(), SetTextSpotColor()
     */
    public function AddSpotColor($name, $c, $m, $y, $k) {
        if (!isset($this->spot_colors[$name])) {
            $i = (1 + count($this->spot_colors));
            $this->spot_colors[$name] = array('C' => $c, 'M' => $m, 'Y' => $y, 'K' => $k, 'name' => $name, 'i' => $i);
        }
    }

    /**
     * Return the Spot color array.
     * @param $name (string) Name of the spot color.
     * @return (array) Spot color array or false if not defined.
     * @public
     * @since 5.9.125 (2011-10-03)
     */
    public function getSpotColor($name) {
        if (isset($this->spot_colors[$name])) {
            return $this->spot_colors[$name];
        }
        $color = preg_replace('/[\s]*/', '', $name); // remove extra spaces
        $color = strtolower($color);
        if (isset($this->spotcolor[$color])) {
            $this->AddSpotColor($this->spotcolor[$color][4], $this->spotcolor[$color][0], $this->spotcolor[$color][1], $this->spotcolor[$color][2], $this->spotcolor[$color][3]);
            return $this->spot_colors[$this->spotcolor[$color][4]];
        }
        return false;
    }

    /**
     * Set the spot color for the specified type ('draw', 'fill', 'text').
     * @param $type (string) Type of object affected by this color: ('draw', 'fill', 'text').
     * @param $name (string) Name of the spot color.
     * @param $tint (float) Intensity of the color (from 0 to 100 ; 100 = full intensity by default).
     * @return (string) PDF color command.
     * @public
     * @since 5.9.125 (2011-10-03)
     */
    public function setSpotColor($type, $name, $tint = 100) {
        $spotcolor = $this->getSpotColor($name);
        if ($spotcolor === false) {
            $this->Error('Undefined spot color: ' . $name . ', you must add it on the spotcolors.php file.');
        }
        $tint = (max(0, min(100, $tint)) / 100);
        $pdfcolor = sprintf('/CS%d ', $this->spot_colors[$name]['i']);
        switch ($type) {
            case 'draw': {
                    $pdfcolor .= sprintf('CS %F SCN', $tint);
                    $this->DrawColor = $pdfcolor;
                    $this->strokecolor = $spotcolor;
                    break;
                }
            case 'fill': {
                    $pdfcolor .= sprintf('cs %F scn', $tint);
                    $this->FillColor = $pdfcolor;
                    $this->bgcolor = $spotcolor;
                    break;
                }
            case 'text': {
                    $pdfcolor .= sprintf('cs %F scn', $tint);
                    $this->TextColor = $pdfcolor;
                    $this->fgcolor = $spotcolor;
                    break;
                }
        }
        $this->ColorFlag = ($this->FillColor != $this->TextColor);
        if ($this->state == 2) {
            $this->_out($pdfcolor);
        }
        if ($this->inxobj) {
            // we are inside an XObject template
            $this->xobjects[$this->xobjid]['spot_colors'][$name] = $this->spot_colors[$name];
        }
        return $pdfcolor;
    }

    /**
     * Defines the spot color used for all drawing operations (lines, rectangles and cell borders).
     * @param $name (string) Name of the spot color.
     * @param $tint (float) Intensity of the color (from 0 to 100 ; 100 = full intensity by default).
     * @public
     * @since 4.0.024 (2008-09-12)
     * @see AddSpotColor(), SetFillSpotColor(), SetTextSpotColor()
     */
    public function SetDrawSpotColor($name, $tint = 100) {
        $this->setSpotColor('draw', $name, $tint);
    }

    /**
     * Defines the spot color used for all filling operations (filled rectangles and cell backgrounds).
     * @param $name (string) Name of the spot color.
     * @param $tint (float) Intensity of the color (from 0 to 100 ; 100 = full intensity by default).
     * @public
     * @since 4.0.024 (2008-09-12)
     * @see AddSpotColor(), SetDrawSpotColor(), SetTextSpotColor()
     */
    public function SetFillSpotColor($name, $tint = 100) {
        $this->setSpotColor('fill', $name, $tint);
    }

    /**
     * Defines the spot color used for text.
     * @param $name (string) Name of the spot color.
     * @param $tint (int) Intensity of the color (from 0 to 100 ; 100 = full intensity by default).
     * @public
     * @since 4.0.024 (2008-09-12)
     * @see AddSpotColor(), SetDrawSpotColor(), SetFillSpotColor()
     */
    public function SetTextSpotColor($name, $tint = 100) {
        $this->setSpotColor('text', $name, $tint);
    }

    /**
     * Set the color array for the specified type ('draw', 'fill', 'text').
     * It can be expressed in RGB, CMYK or GRAY SCALE components.
     * The method can be called before the first page is created and the value is retained from page to page.
     * @param $type (string) Type of object affected by this color: ('draw', 'fill', 'text').
     * @param $color (array) Array of colors (1=gray, 3=RGB, 4=CMYK or 5=spotcolor=CMYK+name values).
     * @param $ret (boolean) If true do not send the PDF command.
     * @return (string) The PDF command or empty string.
     * @public
     * @since 3.1.000 (2008-06-11)
     */
    public function setColorArray($type, $color, $ret = false) {
        if (is_array($color)) {
            $color = array_values($color);
            // component: grey, RGB red or CMYK cyan
            $c = isset($color[0]) ? $color[0] : -1;
            // component: RGB green or CMYK magenta
            $m = isset($color[1]) ? $color[1] : -1;
            // component: RGB blue or CMYK yellow
            $y = isset($color[2]) ? $color[2] : -1;
            // component: CMYK black
            $k = isset($color[3]) ? $color[3] : -1;
            // color name
            $name = isset($color[4]) ? $color[4] : '';
            if ($c >= 0) {
                return $this->setColor($type, $c, $m, $y, $k, $ret, $name);
            }
        }
        return '';
    }

    /**
     * Defines the color used for all drawing operations (lines, rectangles and cell borders).
     * It can be expressed in RGB, CMYK or GRAY SCALE components.
     * The method can be called before the first page is created and the value is retained from page to page.
     * @param $color (array) Array of colors (1, 3 or 4 values).
     * @param $ret (boolean) If true do not send the PDF command.
     * @return string the PDF command
     * @public
     * @since 3.1.000 (2008-06-11)
     * @see SetDrawColor()
     */
    public function SetDrawColorArray($color, $ret = false) {
        return $this->setColorArray('draw', $color, $ret);
    }

    /**
     * Defines the color used for all filling operations (filled rectangles and cell backgrounds).
     * It can be expressed in RGB, CMYK or GRAY SCALE components.
     * The method can be called before the first page is created and the value is retained from page to page.
     * @param $color (array) Array of colors (1, 3 or 4 values).
     * @param $ret (boolean) If true do not send the PDF command.
     * @public
     * @since 3.1.000 (2008-6-11)
     * @see SetFillColor()
     */
    public function SetFillColorArray($color, $ret = false) {
        return $this->setColorArray('fill', $color, $ret);
    }

    /**
     * Defines the color used for text. It can be expressed in RGB components or gray scale.
     * The method can be called before the first page is created and the value is retained from page to page.
     * @param $color (array) Array of colors (1, 3 or 4 values).
     * @param $ret (boolean) If true do not send the PDF command.
     * @public
     * @since 3.1.000 (2008-6-11)
     * @see SetFillColor()
     */
    public function SetTextColorArray($color, $ret = false) {
        return $this->setColorArray('text', $color, $ret);
    }

    /**
     * Defines the color used by the specified type ('draw', 'fill', 'text').
     * @param $type (string) Type of object affected by this color: ('draw', 'fill', 'text').
     * @param $col1 (float) GRAY level for single color, or Red color for RGB (0-255), or CYAN color for CMYK (0-100).
     * @param $col2 (float) GREEN color for RGB (0-255), or MAGENTA color for CMYK (0-100).
     * @param $col3 (float) BLUE color for RGB (0-255), or YELLOW color for CMYK (0-100).
     * @param $col4 (float) KEY (BLACK) color for CMYK (0-100).
     * @param $ret (boolean) If true do not send the command.
     * @param $name (string) spot color name (if any)
     * @return (string) The PDF command or empty string.
     * @public
     * @since 5.9.125 (2011-10-03)
     */
    public function setColor($type, $col1 = 0, $col2 = -1, $col3 = -1, $col4 = -1, $ret = false, $name = '') {
        // set default values
        if (!is_numeric($col1)) {
            $col1 = 0;
        }
        if (!is_numeric($col2)) {
            $col2 = -1;
        }
        if (!is_numeric($col3)) {
            $col3 = -1;
        }
        if (!is_numeric($col4)) {
            $col4 = -1;
        }
        // set color by case
        $suffix = '';
        if (($col2 == -1) AND ($col3 == -1) AND ($col4 == -1)) {
            // Grey scale
            $col1 = max(0, min(255, $col1));
            $intcolor = array('G' => $col1);
            $pdfcolor = sprintf('%F ', ($col1 / 255));
            $suffix = 'g';
        } elseif ($col4 == -1) {
            // RGB
            $col1 = max(0, min(255, $col1));
            $col2 = max(0, min(255, $col2));
            $col3 = max(0, min(255, $col3));
            $intcolor = array('R' => $col1, 'G' => $col2, 'B' => $col3);
            $pdfcolor = sprintf('%F %F %F ', ($col1 / 255), ($col2 / 255), ($col3 / 255));
            $suffix = 'rg';
        } else {
            $col1 = max(0, min(100, $col1));
            $col2 = max(0, min(100, $col2));
            $col3 = max(0, min(100, $col3));
            $col4 = max(0, min(100, $col4));
            if (empty($name)) {
                // CMYK
                $intcolor = array('C' => $col1, 'M' => $col2, 'Y' => $col3, 'K' => $col4);
                $pdfcolor = sprintf('%F %F %F %F ', ($col1 / 100), ($col2 / 100), ($col3 / 100), ($col4 / 100));
                $suffix = 'k';
            } else {
                // SPOT COLOR
                $intcolor = array('C' => $col1, 'M' => $col2, 'Y' => $col3, 'K' => $col4, 'name' => $name);
                $this->AddSpotColor($name, $col1, $col2, $col3, $col4);
                $pdfcolor = $this->setSpotColor($type, $name, 100);
            }
        }
        switch ($type) {
            case 'draw': {
                    $pdfcolor .= strtoupper($suffix);
                    $this->DrawColor = $pdfcolor;
                    $this->strokecolor = $intcolor;
                    break;
                }
            case 'fill': {
                    $pdfcolor .= $suffix;
                    $this->FillColor = $pdfcolor;
                    $this->bgcolor = $intcolor;
                    break;
                }
            case 'text': {
                    $pdfcolor .= $suffix;
                    $this->TextColor = $pdfcolor;
                    $this->fgcolor = $intcolor;
                    break;
                }
        }
        $this->ColorFlag = ($this->FillColor != $this->TextColor);
        if (($type != 'text') AND ($this->state == 2)) {
            if (!$ret) {
                $this->_out($pdfcolor);
            }
            return $pdfcolor;
        }
        return '';
    }

    /**
     * Convert a color array into a string representation.
     * @param $c (array) Array of colors.
     * @return (string) The color array representation.
     * @protected
     * @since 5.9.137 (2011-12-01)
     */
    protected function getColorStringFromArray($c) {
        $c = array_values($c);
        $color = '[';
        switch (count($c)) {
            case 4: {
                    // CMYK
                    $color .= sprintf('%F %F %F %F', (max(0, min(100, floatval($c[0]))) / 100), (max(0, min(100, floatval($c[1]))) / 100), (max(0, min(100, floatval($c[2]))) / 100), (max(0, min(100, floatval($c[3]))) / 100));
                    break;
                }
            case 3: {
                    // RGB
                    $color .= sprintf('%F %F %F', (max(0, min(255, floatval($c[0]))) / 255), (max(0, min(255, floatval($c[1]))) / 255), (max(0, min(255, floatval($c[2]))) / 255));
                    break;
                }
            case 1: {
                    // grayscale
                    $color .= sprintf('%F', (max(0, min(255, floatval($c[0]))) / 255));
                    break;
                }
        }
        $color .= ']';
        return $color;
    }

    /**
     * Defines the color used for all drawing operations (lines, rectangles and cell borders). It can be expressed in RGB components or gray scale. The method can be called before the first page is created and the value is retained from page to page.
     * @param $col1 (float) GRAY level for single color, or Red color for RGB (0-255), or CYAN color for CMYK (0-100).
     * @param $col2 (float) GREEN color for RGB (0-255), or MAGENTA color for CMYK (0-100).
     * @param $col3 (float) BLUE color for RGB (0-255), or YELLOW color for CMYK (0-100).
     * @param $col4 (float) KEY (BLACK) color for CMYK (0-100).
     * @param $ret (boolean) If true do not send the command.
     * @param $name (string) spot color name (if any)
     * @return string the PDF command
     * @public
     * @since 1.3
     * @see SetDrawColorArray(), SetFillColor(), SetTextColor(), Line(), Rect(), Cell(), MultiCell()
     */
    public function SetDrawColor($col1 = 0, $col2 = -1, $col3 = -1, $col4 = -1, $ret = false, $name = '') {
        return $this->setColor('draw', $col1, $col2, $col3, $col4, $ret, $name);
    }

    /**
     * Defines the color used for all filling operations (filled rectangles and cell backgrounds). It can be expressed in RGB components or gray scale. The method can be called before the first page is created and the value is retained from page to page.
     * @param $col1 (float) GRAY level for single color, or Red color for RGB (0-255), or CYAN color for CMYK (0-100).
     * @param $col2 (float) GREEN color for RGB (0-255), or MAGENTA color for CMYK (0-100).
     * @param $col3 (float) BLUE color for RGB (0-255), or YELLOW color for CMYK (0-100).
     * @param $col4 (float) KEY (BLACK) color for CMYK (0-100).
     * @param $ret (boolean) If true do not send the command.
     * @param $name (string) Spot color name (if any).
     * @return (string) The PDF command.
     * @public
     * @since 1.3
     * @see SetFillColorArray(), SetDrawColor(), SetTextColor(), Rect(), Cell(), MultiCell()
     */
    public function SetFillColor($col1 = 0, $col2 = -1, $col3 = -1, $col4 = -1, $ret = false, $name = '') {
        return $this->setColor('fill', $col1, $col2, $col3, $col4, $ret, $name);
    }

    /**
     * Defines the color used for text. It can be expressed in RGB components or gray scale. The method can be called before the first page is created and the value is retained from page to page.
     * @param $col1 (float) GRAY level for single color, or Red color for RGB (0-255), or CYAN color for CMYK (0-100).
     * @param $col2 (float) GREEN color for RGB (0-255), or MAGENTA color for CMYK (0-100).
     * @param $col3 (float) BLUE color for RGB (0-255), or YELLOW color for CMYK (0-100).
     * @param $col4 (float) KEY (BLACK) color for CMYK (0-100).
     * @param $ret (boolean) If true do not send the command.
     * @param $name (string) Spot color name (if any).
     * @return (string) Empty string.
     * @public
     * @since 1.3
     * @see SetTextColorArray(), SetDrawColor(), SetFillColor(), Text(), Cell(), MultiCell()
     */
    public function SetTextColor($col1 = 0, $col2 = -1, $col3 = -1, $col4 = -1, $ret = false, $name = '') {
        return $this->setColor('text', $col1, $col2, $col3, $col4, $ret, $name);
    }

    /**
     * Returns the length of a string in user unit. A font must be selected.<br>
     * @param $s (string) The string whose length is to be computed
     * @param $fontname (string) Family font. It can be either a name defined by AddFont() or one of the standard families. It is also possible to pass an empty string, in that case, the current family is retained.
     * @param $fontstyle (string) Font style. Possible values are (case insensitive):<ul><li>empty string: regular</li><li>B: bold</li><li>I: italic</li><li>U: underline</li><li>D: line-trough</li><li>O: overline</li></ul> or any combination. The default value is regular.
     * @param $fontsize (float) Font size in points. The default value is the current size.
     * @param $getarray (boolean) if true returns an array of characters widths, if false returns the total length.
     * @return mixed int total string length or array of characted widths
     * @author Nicola Asuni
     * @public
     * @since 1.2
     */
    public function GetStringWidth($s, $fontname = '', $fontstyle = '', $fontsize = 0, $getarray = false) {
        return $this->GetArrStringWidth($this->utf8Bidi($this->UTF8StringToArray($s), $s, $this->tmprtl), $fontname, $fontstyle, $fontsize, $getarray);
    }

    /**
     * Returns the string length of an array of chars in user unit or an array of characters widths. A font must be selected.<br>
     * @param $sa (string) The array of chars whose total length is to be computed
     * @param $fontname (string) Family font. It can be either a name defined by AddFont() or one of the standard families. It is also possible to pass an empty string, in that case, the current family is retained.
     * @param $fontstyle (string) Font style. Possible values are (case insensitive):<ul><li>empty string: regular</li><li>B: bold</li><li>I: italic</li><li>U: underline</li><li>D: line trough</li><li>O: overline</li></ul> or any combination. The default value is regular.
     * @param $fontsize (float) Font size in points. The default value is the current size.
     * @param $getarray (boolean) if true returns an array of characters widths, if false returns the total length.
     * @return mixed int total string length or array of characted widths
     * @author Nicola Asuni
     * @public
     * @since 2.4.000 (2008-03-06)
     */
    public function GetArrStringWidth($sa, $fontname = '', $fontstyle = '', $fontsize = 0, $getarray = false) {
        // store current values
        if (!$this->empty_string($fontname)) {
            $prev_FontFamily = $this->FontFamily;
            $prev_FontStyle = $this->FontStyle;
            $prev_FontSizePt = $this->FontSizePt;
            $this->SetFont($fontname, $fontstyle, $fontsize, '', 'default', false);
        }
        // convert UTF-8 array to Latin1 if required
        $sa = $this->UTF8ArrToLatin1($sa);
        $w = 0; // total width
        $wa = array(); // array of characters widths
        foreach ($sa as $ck => $char) {
            // character width
            $cw = $this->GetCharWidth($char, isset($sa[($ck + 1)]));
            $wa[] = $cw;
            $w += $cw;
        }
        // restore previous values
        if (!$this->empty_string($fontname)) {
            $this->SetFont($prev_FontFamily, $prev_FontStyle, $prev_FontSizePt, '', 'default', false);
        }
        if ($getarray) {
            return $wa;
        }
        return $w;
    }

    /**
     * Returns the length of the char in user unit for the current font considering current stretching and spacing (tracking).
     * @param $char (int) The char code whose length is to be returned
     * @param $notlast (boolean) If false ignore the font-spacing.
     * @return float char width
     * @author Nicola Asuni
     * @public
     * @since 2.4.000 (2008-03-06)
     */
    public function GetCharWidth($char, $notlast = true) {
        // get raw width
        $chw = $this->getRawCharWidth($char);
        if (($this->font_spacing < 0) OR (($this->font_spacing > 0) AND $notlast)) {
            // increase/decrease font spacing
            $chw += $this->font_spacing;
        }
        if ($this->font_stretching != 100) {
            // fixed stretching mode
            $chw *= ($this->font_stretching / 100);
        }
        return $chw;
    }

    /**
     * Returns the length of the char in user unit for the current font.
     * @param $char (int) The char code whose length is to be returned
     * @return float char width
     * @author Nicola Asuni
     * @public
     * @since 5.9.000 (2010-09-28)
     */
    public function getRawCharWidth($char) {
        if ($char == 173) {
            // SHY character will not be printed
            return (0);
        }
        if (isset($this->CurrentFont['cw'][$char])) {
            $w = $this->CurrentFont['cw'][$char];
        } elseif (isset($this->CurrentFont['dw'])) {
            // default width
            $w = $this->CurrentFont['dw'];
        } elseif (isset($this->CurrentFont['cw'][32])) {
            // default width
            $w = $this->CurrentFont['cw'][32];
        } else {
            $w = 600;
        }
        return $this->getAbsFontMeasure($w);
    }

    /**
     * Returns the numbero of characters in a string.
     * @param $s (string) The input string.
     * @return int number of characters
     * @public
     * @since 2.0.0001 (2008-01-07)
     */
    public function GetNumChars($s) {
        if ($this->isUnicodeFont()) {
            return count($this->UTF8StringToArray($s));
        }
        return strlen($s);
    }

    /**
     * Fill the list of available fonts ($this->fontlist).
     * @protected
     * @since 4.0.013 (2008-07-28)
     */
    protected function getFontsList() {
        $fontsdir = opendir($this->_getfontpath());
        while (($file = readdir($fontsdir)) !== false) {
            if (substr($file, -4) == '.php') {
                array_push($this->fontlist, strtolower(basename($file, '.php')));
            }
        }
        closedir($fontsdir);
    }

    /**
     * Imports a TrueType, Type1, core, or CID0 font and makes it available.
     * It is necessary to generate a font definition file first (read /fonts/utils/README.TXT).
     * The definition file (and the font file itself when embedding) must be present either in the current directory or in the one indicated by K_PATH_FONTS if the constant is defined. If it could not be found, the error "Could not include font definition file" is generated.
     * @param $family (string) Font family. The name can be chosen arbitrarily. If it is a standard family name, it will override the corresponding font.
     * @param $style (string) Font style. Possible values are (case insensitive):<ul><li>empty string: regular (default)</li><li>B: bold</li><li>I: italic</li><li>BI or IB: bold italic</li></ul>
     * @param $fontfile (string) The font definition file. By default, the name is built from the family and style, in lower case with no spaces.
     * @return array containing the font data, or false in case of error.
     * @param $subset (mixed) if true embedd only a subset of the font (stores only the information related to the used characters); if false embedd full font; if 'default' uses the default value set using setFontSubsetting(). This option is valid only for TrueTypeUnicode fonts. If you want to enable users to change the document, set this parameter to false. If you subset the font, the person who receives your PDF would need to have your same font in order to make changes to your PDF. The file size of the PDF would also be smaller because you are embedding only part of a font.
     * @public
     * @since 1.5
     * @see SetFont(), setFontSubsetting()
     */
    public function AddFont($family, $style = '', $fontfile = '', $subset = 'default') {
        if ($subset === 'default') {
            $subset = $this->font_subsetting;
        }
        if ($this->pdfa_mode) {
            $subset = false;
        }
        if ($this->empty_string($family)) {
            if (!$this->empty_string($this->FontFamily)) {
                $family = $this->FontFamily;
            } else {
                $this->Error('Empty font family');
            }
        }
        // move embedded styles on $style
        if (substr($family, -1) == 'I') {
            $style .= 'I';
            $family = substr($family, 0, -1);
        }
        if (substr($family, -1) == 'B') {
            $style .= 'B';
            $family = substr($family, 0, -1);
        }
        // normalize family name
        $family = strtolower($family);
        if ((!$this->isunicode) AND ($family == 'arial')) {
            $family = 'helvetica';
        }
        if (($family == 'symbol') OR ($family == 'zapfdingbats')) {
            $style = '';
        }
        if ($this->pdfa_mode AND (isset($this->CoreFonts[$family]))) {
            // all fonts must be embedded
            $family = 'pdfa' . $family;
        }
        $tempstyle = strtoupper($style);
        $style = '';
        // underline
        if (strpos($tempstyle, 'U') !== false) {
            $this->underline = true;
        } else {
            $this->underline = false;
        }
        // line-through (deleted)
        if (strpos($tempstyle, 'D') !== false) {
            $this->linethrough = true;
        } else {
            $this->linethrough = false;
        }
        // overline
        if (strpos($tempstyle, 'O') !== false) {
            $this->overline = true;
        } else {
            $this->overline = false;
        }
        // bold
        if (strpos($tempstyle, 'B') !== false) {
            $style .= 'B';
        }
        // oblique
        if (strpos($tempstyle, 'I') !== false) {
            $style .= 'I';
        }
        $bistyle = $style;
        $fontkey = $family . $style;
        $font_style = $style . ($this->underline ? 'U' : '') . ($this->linethrough ? 'D' : '') . ($this->overline ? 'O' : '');
        $fontdata = array('fontkey' => $fontkey, 'family' => $family, 'style' => $font_style);
        // check if the font has been already added
        $fb = $this->getFontBuffer($fontkey);
        if ($fb !== false) {
            if ($this->inxobj) {
                // we are inside an XObject template
                $this->xobjects[$this->xobjid]['fonts'][$fontkey] = $fb['i'];
            }
            return $fontdata;
        }
        if (isset($type)) {
            unset($type);
        }
        if (isset($cw)) {
            unset($cw);
        }
        // get specified font directory (if any)
        $fontdir = false;
        if (!$this->empty_string($fontfile)) {
            $fontdir = dirname($fontfile);
            if ($this->empty_string($fontdir) OR ($fontdir == '.')) {
                $fontdir = '';
            } else {
                $fontdir .= '/';
            }
        }
        $missing_style = false; // true when the font style variation is missing
        // search and include font file
        if ($this->empty_string($fontfile) OR (!file_exists($fontfile))) {
            // build a standard filenames for specified font
            $tmp_fontfile = str_replace(' ', '', $family) . strtolower($style) . '.php';
            // search files on various directories
            if (($fontdir !== false) AND file_exists($fontdir . $tmp_fontfile)) {
                $fontfile = $fontdir . $tmp_fontfile;
            } elseif (file_exists($this->_getfontpath() . $tmp_fontfile)) {
                $fontfile = $this->_getfontpath() . $tmp_fontfile;
            } elseif (file_exists($tmp_fontfile)) {
                $fontfile = $tmp_fontfile;
            } elseif (!$this->empty_string($style)) {
                $missing_style = true;
                // try to remove the style part
                $tmp_fontfile = str_replace(' ', '', $family) . '.php';
                if (($fontdir !== false) AND file_exists($fontdir . $tmp_fontfile)) {
                    $fontfile = $fontdir . $tmp_fontfile;
                } elseif (file_exists($this->_getfontpath() . $tmp_fontfile)) {
                    $fontfile = $this->_getfontpath() . $tmp_fontfile;
                } else {
                    $fontfile = $tmp_fontfile;
                }
            }
        }
        // include font file
        if (file_exists($fontfile)) {
            include($fontfile);
        } else {
            $this->Error('Could not include font definition file: ' . $family . '');
        }
        // check font parameters
        if ((!isset($type)) OR (!isset($cw))) {
            $this->Error('The font definition file has a bad format: ' . $fontfile . '');
        }
        // SET default parameters
        if (!isset($file) OR $this->empty_string($file)) {
            $file = '';
        }
        if (!isset($enc) OR $this->empty_string($enc)) {
            $enc = '';
        }
        if (!isset($cidinfo) OR $this->empty_string($cidinfo)) {
            $cidinfo = array('Registry' => 'Adobe', 'Ordering' => 'Identity', 'Supplement' => 0);
            $cidinfo['uni2cid'] = array();
        }
        if (!isset($ctg) OR $this->empty_string($ctg)) {
            $ctg = '';
        }
        if (!isset($desc) OR $this->empty_string($desc)) {
            $desc = array();
        }
        if (!isset($up) OR $this->empty_string($up)) {
            $up = -100;
        }
        if (!isset($ut) OR $this->empty_string($ut)) {
            $ut = 50;
        }
        if (!isset($cw) OR $this->empty_string($cw)) {
            $cw = array();
        }
        if (!isset($dw) OR $this->empty_string($dw)) {
            // set default width
            if (isset($desc['MissingWidth']) AND ($desc['MissingWidth'] > 0)) {
                $dw = $desc['MissingWidth'];
            } elseif (isset($cw[32])) {
                $dw = $cw[32];
            } else {
                $dw = 600;
            }
        }
        ++$this->numfonts;
        if ($type == 'core') {
            $name = $this->CoreFonts[$fontkey];
            $subset = false;
        } elseif (($type == 'TrueType') OR ($type == 'Type1')) {
            $subset = false;
        } elseif ($type == 'TrueTypeUnicode') {
            $enc = 'Identity-H';
        } elseif ($type == 'cidfont0') {
            if ($this->pdfa_mode) {
                $this->Error('All fonts must be embedded in PDF/A mode!');
            }
        } else {
            $this->Error('Unknow font type: ' . $type . '');
        }
        // set name if unset
        if (!isset($name) OR empty($name)) {
            $name = $fontkey;
        }
        // create artificial font style variations if missing (only works with non-embedded fonts)
        if (($type != 'core') AND $missing_style) {
            // style variations
            $styles = array('' => '', 'B' => ',Bold', 'I' => ',Italic', 'BI' => ',BoldItalic');
            $name .= $styles[$bistyle];
            // artificial bold
            if (strpos($bistyle, 'B') !== false) {
                if (isset($desc['StemV'])) {
                    // from normal to bold
                    $desc['StemV'] = round($desc['StemV'] * 1.75);
                } else {
                    // bold
                    $desc['StemV'] = 123;
                }
            }
            // artificial italic
            if (strpos($bistyle, 'I') !== false) {
                if (isset($desc['ItalicAngle'])) {
                    $desc['ItalicAngle'] -= 11;
                } else {
                    $desc['ItalicAngle'] = -11;
                }
                if (isset($desc['Flags'])) {
                    $desc['Flags'] |= 64; //bit 7
                } else {
                    $desc['Flags'] = 64;
                }
            }
        }
        // check if the array of characters bounding boxes is defined
        if (!isset($cbbox)) {
            $cbbox = array();
        }
        // initialize subsetchars
        $subsetchars = array_fill(0, 255, true);
        $this->setFontBuffer($fontkey, array('fontkey' => $fontkey, 'i' => $this->numfonts, 'type' => $type, 'name' => $name, 'desc' => $desc, 'up' => $up, 'ut' => $ut, 'cw' => $cw, 'cbbox' => $cbbox, 'dw' => $dw, 'enc' => $enc, 'cidinfo' => $cidinfo, 'file' => $file, 'ctg' => $ctg, 'subset' => $subset, 'subsetchars' => $subsetchars));
        if ($this->inxobj) {
            // we are inside an XObject template
            $this->xobjects[$this->xobjid]['fonts'][$fontkey] = $this->numfonts;
        }
        if (isset($diff) AND (!empty($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;
            }
            $this->setFontSubBuffer($fontkey, 'diff', $d);
        }
        if (!$this->empty_string($file)) {
            if (!isset($this->FontFiles[$file])) {
                if ((strcasecmp($type, 'TrueType') == 0) OR (strcasecmp($type, 'TrueTypeUnicode') == 0)) {
                    $this->FontFiles[$file] = array('length1' => $originalsize, 'fontdir' => $fontdir, 'subset' => $subset, 'fontkeys' => array($fontkey));
                } elseif ($type != 'core') {
                    $this->FontFiles[$file] = array('length1' => $size1, 'length2' => $size2, 'fontdir' => $fontdir, 'subset' => $subset, 'fontkeys' => array($fontkey));
                }
            } else {
                // update fontkeys that are sharing this font file
                $this->FontFiles[$file]['subset'] = ($this->FontFiles[$file]['subset'] AND $subset);
                if (!in_array($fontkey, $this->FontFiles[$file]['fontkeys'])) {
                    $this->FontFiles[$file]['fontkeys'][] = $fontkey;
                }
            }
        }
        return $fontdata;
    }

    /**
     * Sets the font used to print character strings.
     * The font can be either a standard one or a font added via the AddFont() method. Standard fonts use Windows encoding cp1252 (Western Europe).
     * The method can be called before the first page is created and the font is retained from page to page.
     * If you just wish to change the current font size, it is simpler to call SetFontSize().
     * Note: for the standard fonts, the font metric files must be accessible. There are three possibilities for this:<ul><li>They are in the current directory (the one where the running script lies)</li><li>They are in one of the directories defined by the include_path parameter</li><li>They are in the directory defined by the K_PATH_FONTS constant</li></ul><br />
     * @param $family (string) Family font. It can be either a name defined by AddFont() or one of the standard Type1 families (case insensitive):<ul><li>times (Times-Roman)</li><li>timesb (Times-Bold)</li><li>timesi (Times-Italic)</li><li>timesbi (Times-BoldItalic)</li><li>helvetica (Helvetica)</li><li>helveticab (Helvetica-Bold)</li><li>helveticai (Helvetica-Oblique)</li><li>helveticabi (Helvetica-BoldOblique)</li><li>courier (Courier)</li><li>courierb (Courier-Bold)</li><li>courieri (Courier-Oblique)</li><li>courierbi (Courier-BoldOblique)</li><li>symbol (Symbol)</li><li>zapfdingbats (ZapfDingbats)</li></ul> It is also possible to pass an empty string. In that case, the current family is retained.
     * @param $style (string) Font style. Possible values are (case insensitive):<ul><li>empty string: regular</li><li>B: bold</li><li>I: italic</li><li>U: underline</li><li>D: line trough</li><li>O: overline</li></ul> or any combination. The default value is regular. Bold and italic styles do not apply to Symbol and ZapfDingbats basic fonts or other fonts when not defined.
     * @param $size (float) Font size in points. The default value is the current size. If no size has been specified since the beginning of the document, the value taken is 12
     * @param $fontfile (string) The font definition file. By default, the name is built from the family and style, in lower case with no spaces.
     * @param $subset (mixed) if true embedd only a subset of the font (stores only the information related to the used characters); if false embedd full font; if 'default' uses the default value set using setFontSubsetting(). This option is valid only for TrueTypeUnicode fonts. If you want to enable users to change the document, set this parameter to false. If you subset the font, the person who receives your PDF would need to have your same font in order to make changes to your PDF. The file size of the PDF would also be smaller because you are embedding only part of a font.
     * @param $out (boolean) if true output the font size command, otherwise only set the font properties.
     * @author Nicola Asuni
     * @public
     * @since 1.0
     * @see AddFont(), SetFontSize()
     */
    public function SetFont($family, $style = '', $size = null, $fontfile = '', $subset = 'default', $out = true) {
        //Select a font; size given in points
        if ($size === null) {
            $size = $this->FontSizePt;
        }
        if ($size < 0) {
            $size = 0;
        }
        // try to add font (if not already added)
        $fontdata = $this->AddFont($family, $style, $fontfile, $subset);
        $this->FontFamily = $fontdata['family'];
        $this->FontStyle = $fontdata['style'];
        $this->CurrentFont = $this->getFontBuffer($fontdata['fontkey']);
        $this->SetFontSize($size, $out);
    }

    /**
     * Defines the size of the current font.
     * @param $size (float) The font size in points.
     * @param $out (boolean) if true output the font size command, otherwise only set the font properties.
     * @public
     * @since 1.0
     * @see SetFont()
     */
    public function SetFontSize($size, $out = true) {
        // font size in points
        $this->FontSizePt = $size;
        // font size in user units
        $this->FontSize = $size / $this->k;
        // calculate some font metrics
        if (isset($this->CurrentFont['desc']['FontBBox'])) {
            $bbox = explode(' ', substr($this->CurrentFont['desc']['FontBBox'], 1, -1));
            $font_height = ((intval($bbox[3]) - intval($bbox[1])) * $size / 1000);
        } else {
            $font_height = $size * 1.219;
        }
        if (isset($this->CurrentFont['desc']['Ascent']) AND ($this->CurrentFont['desc']['Ascent'] > 0)) {
            $font_ascent = ($this->CurrentFont['desc']['Ascent'] * $size / 1000);
        }
        if (isset($this->CurrentFont['desc']['Descent']) AND ($this->CurrentFont['desc']['Descent'] <= 0)) {
            $font_descent = (- $this->CurrentFont['desc']['Descent'] * $size / 1000);
        }
        if (!isset($font_ascent) AND !isset($font_descent)) {
            // core font
            $font_ascent = 0.76 * $font_height;
            $font_descent = $font_height - $font_ascent;
        } elseif (!isset($font_descent)) {
            $font_descent = $font_height - $font_ascent;
        } elseif (!isset($font_ascent)) {
            $font_ascent = $font_height - $font_descent;
        }
        $this->FontAscent = ($font_ascent / $this->k);
        $this->FontDescent = ($font_descent / $this->k);
        if ($out AND ($this->page > 0) AND (isset($this->CurrentFont['i'])) AND ($this->state == 2)) {
            $this->_out(sprintf('BT /F%d %F Tf ET', $this->CurrentFont['i'], $this->FontSizePt));
        }
    }

    /**
     * Returns the bounding box of the current font in user units.
     * @return array
     * @public
     * @since 5.9.152 (2012-03-23)
     */
    public function getFontBBox() {
        $fbbox = array();
        if (isset($this->CurrentFont['desc']['FontBBox'])) {
            $tmpbbox = explode(' ', substr($this->CurrentFont['desc']['FontBBox'], 1, -1));
            $fbbox = array_map(array($this, 'getAbsFontMeasure'), $tmpbbox);
        } else {
            // Find max width
            if (isset($this->CurrentFont['desc']['MaxWidth'])) {
                $maxw = $this->getAbsFontMeasure(intval($this->CurrentFont['desc']['MaxWidth']));
            } else {
                $maxw = 0;
                if (isset($this->CurrentFont['desc']['MissingWidth'])) {
                    $maxw = max($maxw, $this->CurrentFont['desc']['MissingWidth']);
                }
                if (isset($this->CurrentFont['desc']['AvgWidth'])) {
                    $maxw = max($maxw, $this->CurrentFont['desc']['AvgWidth']);
                }
                if (isset($this->CurrentFont['dw'])) {
                    $maxw = max($maxw, $this->CurrentFont['dw']);
                }
                foreach ($this->CurrentFont['cw'] as $char => $w) {
                    $maxw = max($maxw, $w);
                }
                if ($maxw == 0) {
                    $maxw = 600;
                }
                $maxw = $this->getAbsFontMeasure($maxw);
            }
            $fbbox = array(0, -$this->FontDescent, $maxw, $this->FontAscent);
        }
        return $fbbox;
    }

    /**
     * Convert a relative font measure into absolute value.
     * @param $s (int) Font measure.
     * @return float Absolute measure.
     * @since 5.9.186 (2012-09-13)
     */
    public function getAbsFontMeasure($s) {
        return ($s * $this->FontSize / 1000);
    }

    /**
     * Returns the glyph bounding box of the specified character in the current font in user units.
     * @param $char (int) Input character code.
     * @return mixed array(xMin, yMin, xMax, yMax) or FALSE if not defined.
     * @since 5.9.186 (2012-09-13)
     */
    public function getCharBBox($char) {
        if (isset($this->CurrentFont['cbbox'][$char])) {
            return array_map(array($this, 'getAbsFontMeasure'), $this->CurrentFont['cbbox'][intval($char)]);
        }
        return false;
    }

    /**
     * Return the font descent value
     * @param $font (string) font name
     * @param $style (string) font style
     * @param $size (float) The size (in points)
     * @return int font descent
     * @public
     * @author Nicola Asuni
     * @since 4.9.003 (2010-03-30)
     */
    public function getFontDescent($font, $style = '', $size = 0) {
        $fontdata = $this->AddFont($font, $style);
        $fontinfo = $this->getFontBuffer($fontdata['fontkey']);
        if (isset($fontinfo['desc']['Descent']) AND ($fontinfo['desc']['Descent'] <= 0)) {
            $descent = (- $fontinfo['desc']['Descent'] * $size / 1000);
        } else {
            $descent = (1.219 * 0.24 * $size);
        }
        return ($descent / $this->k);
    }

    /**
     * Return the font ascent value.
     * @param $font (string) font name
     * @param $style (string) font style
     * @param $size (float) The size (in points)
     * @return int font ascent
     * @public
     * @author Nicola Asuni
     * @since 4.9.003 (2010-03-30)
     */
    public function getFontAscent($font, $style = '', $size = 0) {
        $fontdata = $this->AddFont($font, $style);
        $fontinfo = $this->getFontBuffer($fontdata['fontkey']);
        if (isset($fontinfo['desc']['Ascent']) AND ($fontinfo['desc']['Ascent'] > 0)) {
            $ascent = ($fontinfo['desc']['Ascent'] * $size / 1000);
        } else {
            $ascent = 1.219 * 0.76 * $size;
        }
        return ($ascent / $this->k);
    }

    /**
     * Return true in the character is present in the specified font.
     * @param $char (mixed) Character to check (integer value or string)
     * @param $font (string) Font name (family name).
     * @param $style (string) Font style.
     * @return (boolean) true if the char is defined, false otherwise.
     * @public
     * @since 5.9.153 (2012-03-28)
     */
    public function isCharDefined($char, $font = '', $style = '') {
        if (is_string($char)) {
            // get character code
            $char = $this->UTF8StringToArray($char);
            $char = $char[0];
        }
        if ($this->empty_string($font)) {
            if ($this->empty_string($style)) {
                return (isset($this->CurrentFont['cw'][intval($char)]));
            }
            $font = $this->FontFamily;
        }
        $fontdata = $this->AddFont($font, $style);
        $fontinfo = $this->getFontBuffer($fontdata['fontkey']);
        return (isset($fontinfo['cw'][intval($char)]));
    }

    /**
     * Replace missing font characters on selected font with specified substitutions.
     * @param $text (string) Text to process.
     * @param $font (string) Font name (family name).
     * @param $style (string) Font style.
     * @param $subs (array) Array of possible character substitutions. The key is the character to check (integer value) and the value is a single intege value or an array of possible substitutes.
     * @return (string) Processed text.
     * @public
     * @since 5.9.153 (2012-03-28)
     */
    public function replaceMissingChars($text, $font = '', $style = '', $subs = array()) {
        if (empty($subs)) {
            return $text;
        }
        if ($this->empty_string($font)) {
            $font = $this->FontFamily;
        }
        $fontdata = $this->AddFont($font, $style);
        $fontinfo = $this->getFontBuffer($fontdata['fontkey']);
        $uniarr = $this->UTF8StringToArray($text);
        foreach ($uniarr as $k => $chr) {
            if (!isset($fontinfo['cw'][$chr])) {
                // this character is missing on the selected font
                if (isset($subs[$chr])) {
                    // we have available substitutions
                    if (is_array($subs[$chr])) {
                        foreach ($subs[$chr] as $s) {
                            if (isset($fontinfo['cw'][$s])) {
                                $uniarr[$k] = $s;
                                break;
                            }
                        }
                    } elseif (isset($fontinfo['cw'][$subs[$chr]])) {
                        $uniarr[$k] = $subs[$chr];
                    }
                }
            }
        }
        return $this->UniArrSubString($this->UTF8ArrayToUniArray($uniarr));
    }

    /**
     * Defines the default monospaced font.
     * @param $font (string) Font name.
     * @public
     * @since 4.5.025
     */
    public function SetDefaultMonospacedFont($font) {
        $this->default_monospaced_font = $font;
    }

    /**
     * Creates a new internal link and returns its identifier. An internal link is a clickable area which directs to another place within the document.<br />
     * The identifier can then be passed to Cell(), Write(), Image() or Link(). The destination is defined with SetLink().
     * @public
     * @since 1.5
     * @see Cell(), Write(), Image(), Link(), SetLink()
     */
    public function AddLink() {
        //Create a new internal link
        $n = count($this->links) + 1;
        $this->links[$n] = array(0, 0);
        return $n;
    }

    /**
     * Defines the page and position a link points to.
     * @param $link (int) The link identifier returned by AddLink()
     * @param $y (float) Ordinate of target position; -1 indicates the current position. The default value is 0 (top of page)
     * @param $page (int) Number of target page; -1 indicates the current page. This is the default value
     * @public
     * @since 1.5
     * @see AddLink()
     */
    public function SetLink($link, $y = 0, $page = -1) {
        if ($y == -1) {
            $y = $this->y;
        }
        if ($page == -1) {
            $page = $this->page;
        }
        $this->links[$link] = array($page, $y);
    }

    /**
     * Puts a link on a rectangular area of the page.
     * Text or image links are generally put via Cell(), Write() or Image(), but this method can be useful for instance to define a clickable area inside an image.
     * @param $x (float) Abscissa of the upper-left corner of the rectangle
     * @param $y (float) Ordinate of the upper-left corner of the rectangle
     * @param $w (float) Width of the rectangle
     * @param $h (float) Height of the rectangle
     * @param $link (mixed) URL or identifier returned by AddLink()
     * @param $spaces (int) number of spaces on the text to link
     * @public
     * @since 1.5
     * @see AddLink(), Annotation(), Cell(), Write(), Image()
     */
    public function Link($x, $y, $w, $h, $link, $spaces = 0) {
        $this->Annotation($x, $y, $w, $h, $link, array('Subtype' => 'Link'), $spaces);
    }

    /**
     * Puts a markup annotation on a rectangular area of the page.
     * !!!!THE ANNOTATION SUPPORT IS NOT YET FULLY IMPLEMENTED !!!!
     * @param $x (float) Abscissa of the upper-left corner of the rectangle
     * @param $y (float) Ordinate of the upper-left corner of the rectangle
     * @param $w (float) Width of the rectangle
     * @param $h (float) Height of the rectangle
     * @param $text (string) annotation text or alternate content
     * @param $opt (array) array of options (see section 8.4 of PDF reference 1.7).
     * @param $spaces (int) number of spaces on the text to link
     * @public
     * @since 4.0.018 (2008-08-06)
     */
    public function Annotation($x, $y, $w, $h, $text, $opt = array('Subtype' => 'Text'), $spaces = 0) {
        if ($this->inxobj) {
            // store parameters for later use on template
            $this->xobjects[$this->xobjid]['annotations'][] = array('x' => $x, 'y' => $y, 'w' => $w, 'h' => $h, 'text' => $text, 'opt' => $opt, 'spaces' => $spaces);
            return;
        }
        if ($x === '') {
            $x = $this->x;
        }
        if ($y === '') {
            $y = $this->y;
        }
        // check page for no-write regions and adapt page margins if necessary
        list($x, $y) = $this->checkPageRegions($h, $x, $y);
        // recalculate coordinates to account for graphic transformations
        if (isset($this->transfmatrix) AND !empty($this->transfmatrix)) {
            for ($i = $this->transfmatrix_key; $i > 0; --$i) {
                $maxid = count($this->transfmatrix[$i]) - 1;
                for ($j = $maxid; $j >= 0; --$j) {
                    $ctm = $this->transfmatrix[$i][$j];
                    if (isset($ctm['a'])) {
                        $x = $x * $this->k;
                        $y = ($this->h - $y) * $this->k;
                        $w = $w * $this->k;
                        $h = $h * $this->k;
                        // top left
                        $xt = $x;
                        $yt = $y;
                        $x1 = ($ctm['a'] * $xt) + ($ctm['c'] * $yt) + $ctm['e'];
                        $y1 = ($ctm['b'] * $xt) + ($ctm['d'] * $yt) + $ctm['f'];
                        // top right
                        $xt = $x + $w;
                        $yt = $y;
                        $x2 = ($ctm['a'] * $xt) + ($ctm['c'] * $yt) + $ctm['e'];
                        $y2 = ($ctm['b'] * $xt) + ($ctm['d'] * $yt) + $ctm['f'];
                        // bottom left
                        $xt = $x;
                        $yt = $y - $h;
                        $x3 = ($ctm['a'] * $xt) + ($ctm['c'] * $yt) + $ctm['e'];
                        $y3 = ($ctm['b'] * $xt) + ($ctm['d'] * $yt) + $ctm['f'];
                        // bottom right
                        $xt = $x + $w;
                        $yt = $y - $h;
                        $x4 = ($ctm['a'] * $xt) + ($ctm['c'] * $yt) + $ctm['e'];
                        $y4 = ($ctm['b'] * $xt) + ($ctm['d'] * $yt) + $ctm['f'];
                        // new coordinates (rectangle area)
                        $x = min($x1, $x2, $x3, $x4);
                        $y = max($y1, $y2, $y3, $y4);
                        $w = (max($x1, $x2, $x3, $x4) - $x) / $this->k;
                        $h = ($y - min($y1, $y2, $y3, $y4)) / $this->k;
                        $x = $x / $this->k;
                        $y = $this->h - ($y / $this->k);
                    }
                }
            }
        }
        if ($this->page <= 0) {
            $page = 1;
        } else {
            $page = $this->page;
        }
        if (!isset($this->PageAnnots[$page])) {
            $this->PageAnnots[$page] = array();
        }
        ++$this->n;
        $this->PageAnnots[$page][] = array('n' => $this->n, 'x' => $x, 'y' => $y, 'w' => $w, 'h' => $h, 'txt' => $text, 'opt' => $opt, 'numspaces' => $spaces);
        if (!$this->pdfa_mode) {
            if ((($opt['Subtype'] == 'FileAttachment') OR ($opt['Subtype'] == 'Sound')) AND (!$this->empty_string($opt['FS'])) AND file_exists($opt['FS']) AND (!isset($this->embeddedfiles[basename($opt['FS'])]))) {
                ++$this->n;
                $this->embeddedfiles[basename($opt['FS'])] = array('n' => $this->n, 'file' => $opt['FS']);
            }
        }
        // Add widgets annotation's icons
        if (isset($opt['mk']['i']) AND file_exists($opt['mk']['i'])) {
            $this->Image($opt['mk']['i'], '', '', 10, 10, '', '', '', false, 300, '', false, false, 0, false, true);
        }
        if (isset($opt['mk']['ri']) AND file_exists($opt['mk']['ri'])) {
            $this->Image($opt['mk']['ri'], '', '', 0, 0, '', '', '', false, 300, '', false, false, 0, false, true);
        }
        if (isset($opt['mk']['ix']) AND file_exists($opt['mk']['ix'])) {
            $this->Image($opt['mk']['ix'], '', '', 0, 0, '', '', '', false, 300, '', false, false, 0, false, true);
        }
    }

    /**
     * Embedd the attached files.
     * @since 4.4.000 (2008-12-07)
     * @protected
     * @see Annotation()
     */
    protected function _putEmbeddedFiles() {
        if ($this->pdfa_mode) {
            // embedded files are not allowed in PDF/A mode
            return;
        }
        reset($this->embeddedfiles);
        foreach ($this->embeddedfiles as $filename => $filedata) {
            $data = file_get_contents($filedata['file']);
            $filter = '';
            if ($this->compress) {
                $data = gzcompress($data);
                $filter = ' /Filter /FlateDecode';
            }
            $stream = $this->_getrawstream($data, $filedata['n']);
            $out = $this->_getobj($filedata['n']) . "\n";
            $out .= '<< /Type /EmbeddedFile' . $filter . ' /Length ' . strlen($stream) . ' >>';
            $out .= ' stream' . "\n" . $stream . "\n" . 'endstream';
            $out .= "\n" . 'endobj';
            $this->_out($out);
        }
    }

    /**
     * Prints a text cell at the specified position.
     * This method allows to place a string precisely on the page.
     * @param $x (float) Abscissa of the cell origin
     * @param $y (float) Ordinate of the cell origin
     * @param $txt (string) String to print
     * @param $fstroke (int) outline size in user units (false = disable)
     * @param $fclip (boolean) if true activate clipping mode (you must call StartTransform() before this function and StopTransform() to stop the clipping tranformation).
     * @param $ffill (boolean) if true fills the text
     * @param $border (mixed) Indicates if borders must be drawn around the cell. The value can be a number:<ul><li>0: no border (default)</li><li>1: frame</li></ul> or a string containing some or all of the following characters (in any order):<ul><li>L: left</li><li>T: top</li><li>R: right</li><li>B: bottom</li></ul> or an array of line styles for each border group - for example: array('LTRB' => array('width' => 2, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(0, 0, 0)))
     * @param $ln (int) Indicates where the current position should go after the call. Possible values are:<ul><li>0: to the right (or left for RTL languages)</li><li>1: to the beginning of the next line</li><li>2: below</li></ul>Putting 1 is equivalent to putting 0 and calling Ln() just after. Default value: 0.
     * @param $align (string) Allows to center or align the text. Possible values are:<ul><li>L or empty string: left align (default value)</li><li>C: center</li><li>R: right align</li><li>J: justify</li></ul>
     * @param $fill (boolean) Indicates if the cell background must be painted (true) or transparent (false).
     * @param $link (mixed) URL or identifier returned by AddLink().
     * @param $stretch (int) font stretch mode: <ul><li>0 = disabled</li><li>1 = horizontal scaling only if text is larger than cell width</li><li>2 = forced horizontal scaling to fit cell width</li><li>3 = character spacing only if text is larger than cell width</li><li>4 = forced character spacing to fit cell width</li></ul> General font stretching and scaling values will be preserved when possible.
     * @param $ignore_min_height (boolean) if true ignore automatic minimum height value.
     * @param $calign (string) cell vertical alignment relative to the specified Y value. Possible values are:<ul><li>T : cell top</li><li>A : font top</li><li>L : font baseline</li><li>D : font bottom</li><li>B : cell bottom</li></ul>
     * @param $valign (string) text vertical alignment inside the cell. Possible values are:<ul><li>T : top</li><li>C : center</li><li>B : bottom</li></ul>
     * @param $rtloff (boolean) if true uses the page top-left corner as origin of axis for $x and $y initial position.
     * @public
     * @since 1.0
     * @see Cell(), Write(), MultiCell(), WriteHTML(), WriteHTMLCell()
     */
    public function Text($x, $y, $txt, $fstroke = false, $fclip = false, $ffill = true, $border = 0, $ln = 0, $align = '', $fill = false, $link = '', $stretch = 0, $ignore_min_height = false, $calign = 'T', $valign = 'M', $rtloff = false) {
        $textrendermode = $this->textrendermode;
        $textstrokewidth = $this->textstrokewidth;
        $this->setTextRenderingMode($fstroke, $ffill, $fclip);
        $this->SetXY($x, $y, $rtloff);
        $this->Cell(0, 0, $txt, $border, $ln, $align, $fill, $link, $stretch, $ignore_min_height, $calign, $valign);
        // restore previous rendering mode
        $this->textrendermode = $textrendermode;
        $this->textstrokewidth = $textstrokewidth;
    }

    /**
     * Whenever a page break condition is met, the method is called, and the break is issued or not depending on the returned value.
     * The default implementation returns a value according to the mode selected by SetAutoPageBreak().<br />
     * This method is called automatically and should not be called directly by the application.
     * @return boolean
     * @public
     * @since 1.4
     * @see SetAutoPageBreak()
     */
    public function AcceptPageBreak() {
        if ($this->num_columns > 1) {
            // multi column mode
            if ($this->current_column < ($this->num_columns - 1)) {
                // go to next column
                $this->selectColumn($this->current_column + 1);
            } elseif ($this->AutoPageBreak) {
                // add a new page
                $this->AddPage();
                // set first column
                $this->selectColumn(0);
            }
            // avoid page breaking from checkPageBreak()
            return false;
        }
        return $this->AutoPageBreak;
    }

    /**
     * Add page if needed.
     * @param $h (float) Cell height. Default value: 0.
     * @param $y (mixed) starting y position, leave empty for current position.
     * @param $addpage (boolean) if true add a page, otherwise only return the true/false state
     * @return boolean true in case of page break, false otherwise.
     * @since 3.2.000 (2008-07-01)
     * @protected
     */
    protected function checkPageBreak($h = 0, $y = '', $addpage = true) {
        if ($this->empty_string($y)) {
            $y = $this->y;
        }
        $current_page = $this->page;
        if ((($y + $h) > $this->PageBreakTrigger) AND ($this->inPageBody()) AND ($this->AcceptPageBreak())) {
            if ($addpage) {
                //Automatic page break
                $x = $this->x;
                $this->AddPage($this->CurOrientation);
                $this->y = $this->tMargin;
                $oldpage = $this->page - 1;
                if ($this->rtl) {
                    if ($this->pagedim[$this->page]['orm'] != $this->pagedim[$oldpage]['orm']) {
                        $this->x = $x - ($this->pagedim[$this->page]['orm'] - $this->pagedim[$oldpage]['orm']);
                    } else {
                        $this->x = $x;
                    }
                } else {
                    if ($this->pagedim[$this->page]['olm'] != $this->pagedim[$oldpage]['olm']) {
                        $this->x = $x + ($this->pagedim[$this->page]['olm'] - $this->pagedim[$oldpage]['olm']);
                    } else {
                        $this->x = $x;
                    }
                }
            }
            return true;
        }
        if ($current_page != $this->page) {
            // account for columns mode
            return true;
        }
        return false;
    }

    /**
     * Removes SHY characters from text.
     * Unicode Data:<ul>
     * <li>Name : SOFT HYPHEN, commonly abbreviated as SHY</li>
     * <li>HTML Entity (decimal): "&amp;#173;"</li>
     * <li>HTML Entity (hex): "&amp;#xad;"</li>
     * <li>HTML Entity (named): "&amp;shy;"</li>
     * <li>How to type in Microsoft Windows: [Alt +00AD] or [Alt 0173]</li>
     * <li>UTF-8 (hex): 0xC2 0xAD (c2ad)</li>
     * <li>UTF-8 character: chr(194).chr(173)</li>
     * </ul>
     * @param $txt (string) input string
     * @return string without SHY characters.
     * @public
     * @since (4.5.019) 2009-02-28
     */
    public function removeSHY($txt = '') {
        $txt = preg_replace('/([\\xc2]{1}[\\xad]{1})/', '', $txt);
        if (!$this->isunicode) {
            $txt = preg_replace('/([\\xad]{1})/', '', $txt);
        }
        return $txt;
    }

    /**
     * Prints a cell (rectangular area) with optional borders, background color and character string. The upper-left corner of the cell corresponds to the current position. The text can be aligned or centered. After the call, the current position moves to the right or to the next line. It is possible to put a link on the text.<br />
     * If automatic page breaking is enabled and the cell goes beyond the limit, a page break is done before outputting.
     * @param $w (float) Cell width. If 0, the cell extends up to the right margin.
     * @param $h (float) Cell height. Default value: 0.
     * @param $txt (string) String to print. Default value: empty string.
     * @param $border (mixed) Indicates if borders must be drawn around the cell. The value can be a number:<ul><li>0: no border (default)</li><li>1: frame</li></ul> or a string containing some or all of the following characters (in any order):<ul><li>L: left</li><li>T: top</li><li>R: right</li><li>B: bottom</li></ul> or an array of line styles for each border group - for example: array('LTRB' => array('width' => 2, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(0, 0, 0)))
     * @param $ln (int) Indicates where the current position should go after the call. Possible values are:<ul><li>0: to the right (or left for RTL languages)</li><li>1: to the beginning of the next line</li><li>2: below</li></ul> Putting 1 is equivalent to putting 0 and calling Ln() just after. Default value: 0.
     * @param $align (string) Allows to center or align the text. Possible values are:<ul><li>L or empty string: left align (default value)</li><li>C: center</li><li>R: right align</li><li>J: justify</li></ul>
     * @param $fill (boolean) Indicates if the cell background must be painted (true) or transparent (false).
     * @param $link (mixed) URL or identifier returned by AddLink().
     * @param $stretch (int) font stretch mode: <ul><li>0 = disabled</li><li>1 = horizontal scaling only if text is larger than cell width</li><li>2 = forced horizontal scaling to fit cell width</li><li>3 = character spacing only if text is larger than cell width</li><li>4 = forced character spacing to fit cell width</li></ul> General font stretching and scaling values will be preserved when possible.
     * @param $ignore_min_height (boolean) if true ignore automatic minimum height value.
     * @param $calign (string) cell vertical alignment relative to the specified Y value. Possible values are:<ul><li>T : cell top</li><li>C : center</li><li>B : cell bottom</li><li>A : font top</li><li>L : font baseline</li><li>D : font bottom</li></ul>
     * @param $valign (string) text vertical alignment inside the cell. Possible values are:<ul><li>T : top</li><li>C : center</li><li>B : bottom</li></ul>
     * @public
     * @since 1.0
     * @see SetFont(), SetDrawColor(), SetFillColor(), SetTextColor(), SetLineWidth(), AddLink(), Ln(), MultiCell(), Write(), SetAutoPageBreak()
     */
    public function Cell($w, $h = 0, $txt = '', $border = 0, $ln = 0, $align = '', $fill = false, $link = '', $stretch = 0, $ignore_min_height = false, $calign = 'T', $valign = 'M') {
        $prev_cell_margin = $this->cell_margin;
        $prev_cell_padding = $this->cell_padding;
        $this->adjustCellPadding($border);
        if (!$ignore_min_height) {
            $min_cell_height = ($this->FontSize * $this->cell_height_ratio) + $this->cell_padding['T'] + $this->cell_padding['B'];
            if ($h < $min_cell_height) {
                $h = $min_cell_height;
            }
        }
        $this->checkPageBreak($h + $this->cell_margin['T'] + $this->cell_margin['B']);
        // apply text shadow if enabled
        if ($this->txtshadow['enabled']) {
            // save data
            $x = $this->x;
            $y = $this->y;
            $bc = $this->bgcolor;
            $fc = $this->fgcolor;
            $sc = $this->strokecolor;
            $alpha = $this->alpha;
            // print shadow
            $this->x += $this->txtshadow['depth_w'];
            $this->y += $this->txtshadow['depth_h'];
            $this->SetFillColorArray($this->txtshadow['color']);
            $this->SetTextColorArray($this->txtshadow['color']);
            $this->SetDrawColorArray($this->txtshadow['color']);
            if ($this->txtshadow['opacity'] != $alpha['CA']) {
                $this->setAlpha($this->txtshadow['opacity'], $this->txtshadow['blend_mode']);
            }
            if ($this->state == 2) {
                $this->_out($this->getCellCode($w, $h, $txt, $border, $ln, $align, $fill, $link, $stretch, true, $calign, $valign));
            }
            //restore data
            $this->x = $x;
            $this->y = $y;
            $this->SetFillColorArray($bc);
            $this->SetTextColorArray($fc);
            $this->SetDrawColorArray($sc);
            if ($this->txtshadow['opacity'] != $alpha['CA']) {
                $this->setAlpha($alpha['CA'], $alpha['BM'], $alpha['ca'], $alpha['AIS']);
            }
        }
        if ($this->state == 2) {
            $this->_out($this->getCellCode($w, $h, $txt, $border, $ln, $align, $fill, $link, $stretch, true, $calign, $valign));
        }
        $this->cell_padding = $prev_cell_padding;
        $this->cell_margin = $prev_cell_margin;
    }

    /**
     * Returns the PDF string code to print a cell (rectangular area) with optional borders, background color and character string. The upper-left corner of the cell corresponds to the current position. The text can be aligned or centered. After the call, the current position moves to the right or to the next line. It is possible to put a link on the text.<br />
     * If automatic page breaking is enabled and the cell goes beyond the limit, a page break is done before outputting.
     * @param $w (float) Cell width. If 0, the cell extends up to the right margin.
     * @param $h (float) Cell height. Default value: 0.
     * @param $txt (string) String to print. Default value: empty string.
     * @param $border (mixed) Indicates if borders must be drawn around the cell. The value can be a number:<ul><li>0: no border (default)</li><li>1: frame</li></ul> or a string containing some or all of the following characters (in any order):<ul><li>L: left</li><li>T: top</li><li>R: right</li><li>B: bottom</li></ul> or an array of line styles for each border group - for example: array('LTRB' => array('width' => 2, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(0, 0, 0)))
     * @param $ln (int) Indicates where the current position should go after the call. Possible values are:<ul><li>0: to the right (or left for RTL languages)</li><li>1: to the beginning of the next line</li><li>2: below</li></ul>Putting 1 is equivalent to putting 0 and calling Ln() just after. Default value: 0.
     * @param $align (string) Allows to center or align the text. Possible values are:<ul><li>L or empty string: left align (default value)</li><li>C: center</li><li>R: right align</li><li>J: justify</li></ul>
     * @param $fill (boolean) Indicates if the cell background must be painted (true) or transparent (false).
     * @param $link (mixed) URL or identifier returned by AddLink().
     * @param $stretch (int) font stretch mode: <ul><li>0 = disabled</li><li>1 = horizontal scaling only if text is larger than cell width</li><li>2 = forced horizontal scaling to fit cell width</li><li>3 = character spacing only if text is larger than cell width</li><li>4 = forced character spacing to fit cell width</li></ul> General font stretching and scaling values will be preserved when possible.
     * @param $ignore_min_height (boolean) if true ignore automatic minimum height value.
     * @param $calign (string) cell vertical alignment relative to the specified Y value. Possible values are:<ul><li>T : cell top</li><li>C : center</li><li>B : cell bottom</li><li>A : font top</li><li>L : font baseline</li><li>D : font bottom</li></ul>
     * @param $valign (string) text vertical alignment inside the cell. Possible values are:<ul><li>T : top</li><li>M : middle</li><li>B : bottom</li></ul>
     * @return string containing cell code
     * @protected
     * @since 1.0
     * @see Cell()
     */
    protected function getCellCode($w, $h = 0, $txt = '', $border = 0, $ln = 0, $align = '', $fill = false, $link = '', $stretch = 0, $ignore_min_height = false, $calign = 'T', $valign = 'M') {
        // replace 'NO-BREAK SPACE' (U+00A0) character with a simple space
        $txt = str_replace($this->unichr(160), ' ', $txt);
        $prev_cell_margin = $this->cell_margin;
        $prev_cell_padding = $this->cell_padding;
        $txt = $this->removeSHY($txt);
        $rs = ''; //string to be returned
        $this->adjustCellPadding($border);
        if (!$ignore_min_height) {
            $min_cell_height = ($this->FontSize * $this->cell_height_ratio) + $this->cell_padding['T'] + $this->cell_padding['B'];
            if ($h < $min_cell_height) {
                $h = $min_cell_height;
            }
        }
        $k = $this->k;
        // check page for no-write regions and adapt page margins if necessary
        list($this->x, $this->y) = $this->checkPageRegions($h, $this->x, $this->y);
        if ($this->rtl) {
            $x = $this->x - $this->cell_margin['R'];
        } else {
            $x = $this->x + $this->cell_margin['L'];
        }
        $y = $this->y + $this->cell_margin['T'];
        $prev_font_stretching = $this->font_stretching;
        $prev_font_spacing = $this->font_spacing;
        // cell vertical alignment
        switch ($calign) {
            case 'A': {
                    // font top
                    switch ($valign) {
                        case 'T': {
                                // top
                                $y -= $this->cell_padding['T'];
                                break;
                            }
                        case 'B': {
                                // bottom
                                $y -= ($h - $this->cell_padding['B'] - $this->FontAscent - $this->FontDescent);
                                break;
                            }
                        default:
                        case 'C':
                        case 'M': {
                                // center
                                $y -= (($h - $this->FontAscent - $this->FontDescent) / 2);
                                break;
                            }
                    }
                    break;
                }
            case 'L': {
                    // font baseline
                    switch ($valign) {
                        case 'T': {
                                // top
                                $y -= ($this->cell_padding['T'] + $this->FontAscent);
                                break;
                            }
                        case 'B': {
                                // bottom
                                $y -= ($h - $this->cell_padding['B'] - $this->FontDescent);
                                break;
                            }
                        default:
                        case 'C':
                        case 'M': {
                                // center
                                $y -= (($h + $this->FontAscent - $this->FontDescent) / 2);
                                break;
                            }
                    }
                    break;
                }
            case 'D': {
                    // font bottom
                    switch ($valign) {
                        case 'T': {
                                // top
                                $y -= ($this->cell_padding['T'] + $this->FontAscent + $this->FontDescent);
                                break;
                            }
                        case 'B': {
                                // bottom
                                $y -= ($h - $this->cell_padding['B']);
                                break;
                            }
                        default:
                        case 'C':
                        case 'M': {
                                // center
                                $y -= (($h + $this->FontAscent + $this->FontDescent) / 2);
                                break;
                            }
                    }
                    break;
                }
            case 'B': {
                    // cell bottom
                    $y -= $h;
                    break;
                }
            case 'C':
            case 'M': {
                    // cell center
                    $y -= ($h / 2);
                    break;
                }
            default:
            case 'T': {
                    // cell top
                    break;
                }
        }
        // text vertical alignment
        switch ($valign) {
            case 'T': {
                    // top
                    $yt = $y + $this->cell_padding['T'];
                    break;
                }
            case 'B': {
                    // bottom
                    $yt = $y + $h - $this->cell_padding['B'] - $this->FontAscent - $this->FontDescent;
                    break;
                }
            default:
            case 'C':
            case 'M': {
                    // center
                    $yt = $y + (($h - $this->FontAscent - $this->FontDescent) / 2);
                    break;
                }
        }
        $basefonty = $yt + $this->FontAscent;
        if ($this->empty_string($w) OR ($w <= 0)) {
            if ($this->rtl) {
                $w = $x - $this->lMargin;
            } else {
                $w = $this->w - $this->rMargin - $x;
            }
        }
        $s = '';
        // fill and borders
        if (is_string($border) AND (strlen($border) == 4)) {
            // full border
            $border = 1;
        }
        if ($fill OR ($border == 1)) {
            if ($fill) {
                $op = ($border == 1) ? 'B' : 'f';
            } else {
                $op = 'S';
            }
            if ($this->rtl) {
                $xk = (($x - $w) * $k);
            } else {
                $xk = ($x * $k);
            }
            $s .= sprintf('%F %F %F %F re %s ', $xk, (($this->h - $y) * $k), ($w * $k), (-$h * $k), $op);
        }
        // draw borders
        $s .= $this->getCellBorder($x, $y, $w, $h, $border);
        if ($txt != '') {
            $txt2 = $txt;
            if ($this->isunicode) {
                if (($this->CurrentFont['type'] == 'core') OR ($this->CurrentFont['type'] == 'TrueType') OR ($this->CurrentFont['type'] == 'Type1')) {
                    $txt2 = $this->UTF8ToLatin1($txt2);
                } else {
                    $unicode = $this->UTF8StringToArray($txt); // array of UTF-8 unicode values
                    $unicode = $this->utf8Bidi($unicode, '', $this->tmprtl);
                    // replace thai chars (if any)
                    if (defined('K_THAI_TOPCHARS') AND (K_THAI_TOPCHARS == true)) {
                        // number of chars
                        $numchars = count($unicode);
                        // po pla, for far, for fan
                        $longtail = array(0x0e1b, 0x0e1d, 0x0e1f);
                        // do chada, to patak
                        $lowtail = array(0x0e0e, 0x0e0f);
                        // mai hun arkad, sara i, sara ii, sara ue, sara uee
                        $upvowel = array(0x0e31, 0x0e34, 0x0e35, 0x0e36, 0x0e37);
                        // mai ek, mai tho, mai tri, mai chattawa, karan
                        $tonemark = array(0x0e48, 0x0e49, 0x0e4a, 0x0e4b, 0x0e4c);
                        // sara u, sara uu, pinthu
                        $lowvowel = array(0x0e38, 0x0e39, 0x0e3a);
                        $output = array();
                        for ($i = 0; $i < $numchars; $i++) {
                            if (($unicode[$i] >= 0x0e00) && ($unicode[$i] <= 0x0e5b)) {
                                $ch0 = $unicode[$i];
                                $ch1 = ($i > 0) ? $unicode[($i - 1)] : 0;
                                $ch2 = ($i > 1) ? $unicode[($i - 2)] : 0;
                                $chn = ($i < ($numchars - 1)) ? $unicode[($i + 1)] : 0;
                                if (in_array($ch0, $tonemark)) {
                                    if ($chn == 0x0e33) {
                                        // sara um
                                        if (in_array($ch1, $longtail)) {
                                            // tonemark at upper left
                                            $output[] = $this->replaceChar($ch0, (0xf713 + $ch0 - 0x0e48));
                                        } else {
                                            // tonemark at upper right (normal position)
                                            $output[] = $ch0;
                                        }
                                    } elseif (in_array($ch1, $longtail) OR (in_array($ch2, $longtail) AND in_array($ch1, $lowvowel))) {
                                        // tonemark at lower left
                                        $output[] = $this->replaceChar($ch0, (0xf705 + $ch0 - 0x0e48));
                                    } elseif (in_array($ch1, $upvowel)) {
                                        if (in_array($ch2, $longtail)) {
                                            // tonemark at upper left
                                            $output[] = $this->replaceChar($ch0, (0xf713 + $ch0 - 0x0e48));
                                        } else {
                                            // tonemark at upper right (normal position)
                                            $output[] = $ch0;
                                        }
                                    } else {
                                        // tonemark at lower right
                                        $output[] = $this->replaceChar($ch0, (0xf70a + $ch0 - 0x0e48));
                                    }
                                } elseif (($ch0 == 0x0e33) AND (in_array($ch1, $longtail) OR (in_array($ch2, $longtail) AND in_array($ch1, $tonemark)))) {
                                    // add lower left nikhahit and sara aa
                                    if ($this->isCharDefined(0xf711) AND $this->isCharDefined(0x0e32)) {
                                        $output[] = 0xf711;
                                        $this->CurrentFont['subsetchars'][0xf711] = true;
                                        $output[] = 0x0e32;
                                        $this->CurrentFont['subsetchars'][0x0e32] = true;
                                    } else {
                                        $output[] = $ch0;
                                    }
                                } elseif (in_array($ch1, $longtail)) {
                                    if ($ch0 == 0x0e31) {
                                        // lower left mai hun arkad
                                        $output[] = $this->replaceChar($ch0, 0xf710);
                                    } elseif (in_array($ch0, $upvowel)) {
                                        // lower left
                                        $output[] = $this->replaceChar($ch0, (0xf701 + $ch0 - 0x0e34));
                                    } elseif ($ch0 == 0x0e47) {
                                        // lower left mai tai koo
                                        $output[] = $this->replaceChar($ch0, 0xf712);
                                    } else {
                                        // normal character
                                        $output[] = $ch0;
                                    }
                                } elseif (in_array($ch1, $lowtail) AND in_array($ch0, $lowvowel)) {
                                    // lower vowel
                                    $output[] = $this->replaceChar($ch0, (0xf718 + $ch0 - 0x0e38));
                                } elseif (($ch0 == 0x0e0d) AND in_array($chn, $lowvowel)) {
                                    // yo ying without lower part
                                    $output[] = $this->replaceChar($ch0, 0xf70f);
                                } elseif (($ch0 == 0x0e10) AND in_array($chn, $lowvowel)) {
                                    // tho santan without lower part
                                    $output[] = $this->replaceChar($ch0, 0xf700);
                                } else {
                                    $output[] = $ch0;
                                }
                            } else {
                                // non-thai character
                                $output[] = $unicode[$i];
                            }
                        }
                        $unicode = $output;
                        // update font subsetchars
                        $this->setFontSubBuffer($this->CurrentFont['fontkey'], 'subsetchars', $this->CurrentFont['subsetchars']);
                    } // end of K_THAI_TOPCHARS
                    $txt2 = $this->arrUTF8ToUTF16BE($unicode, false);
                }
            }
            $txt2 = $this->_escape($txt2);
            // get current text width (considering general font stretching and spacing)
            $txwidth = $this->GetStringWidth($txt);
            $width = $txwidth;
            // check for stretch mode
            if ($stretch > 0) {
                // calculate ratio between cell width and text width
                if ($width <= 0) {
                    $ratio = 1;
                } else {
                    $ratio = (($w - $this->cell_padding['L'] - $this->cell_padding['R']) / $width);
                }
                // check if stretching is required
                if (($ratio < 1) OR (($ratio > 1) AND (($stretch % 2) == 0))) {
                    // the text will be stretched to fit cell width
                    if ($stretch > 2) {
                        // set new character spacing
                        $this->font_spacing += ($w - $this->cell_padding['L'] - $this->cell_padding['R'] - $width) / (max(($this->GetNumChars($txt) - 1), 1) * ($this->font_stretching / 100));
                    } else {
                        // set new horizontal stretching
                        $this->font_stretching *= $ratio;
                    }
                    // recalculate text width (the text fills the entire cell)
                    $width = $w - $this->cell_padding['L'] - $this->cell_padding['R'];
                    // reset alignment
                    $align = '';
                }
            }
            if ($this->font_stretching != 100) {
                // apply font stretching
                $rs .= sprintf('BT %F Tz ET ', $this->font_stretching);
            }
            if ($this->font_spacing != 0) {
                // increase/decrease font spacing
                $rs .= sprintf('BT %F Tc ET ', ($this->font_spacing * $this->k));
            }
            if ($this->ColorFlag AND ($this->textrendermode < 4)) {
                $s .= 'q ' . $this->TextColor . ' ';
            }
            // rendering mode
            $s .= sprintf('BT %d Tr %F w ET ', $this->textrendermode, ($this->textstrokewidth * $this->k));
            // count number of spaces
            $ns = substr_count($txt, chr(32));
            // Justification
            $spacewidth = 0;
            if (($align == 'J') AND ($ns > 0)) {
                if ($this->isUnicodeFont()) {
                    // get string width without spaces
                    $width = $this->GetStringWidth(str_replace(' ', '', $txt));
                    // calculate average space width
                    $spacewidth = -1000 * ($w - $width - $this->cell_padding['L'] - $this->cell_padding['R']) / ($ns ? $ns : 1) / $this->FontSize;
                    if ($this->font_stretching != 100) {
                        // word spacing is affected by stretching
                        $spacewidth /= ($this->font_stretching / 100);
                    }
                    // set word position to be used with TJ operator
                    $txt2 = str_replace(chr(0) . chr(32), ') ' . sprintf('%F', $spacewidth) . ' (', $txt2);
                    $unicode_justification = true;
                } else {
                    // get string width
                    $width = $txwidth;
                    // new space width
                    $spacewidth = (($w - $width - $this->cell_padding['L'] - $this->cell_padding['R']) / ($ns ? $ns : 1)) * $this->k;
                    if ($this->font_stretching != 100) {
                        // word spacing (Tw) is affected by stretching
                        $spacewidth /= ($this->font_stretching / 100);
                    }
                    // set word spacing
                    $rs .= sprintf('BT %F Tw ET ', $spacewidth);
                }
                $width = $w - $this->cell_padding['L'] - $this->cell_padding['R'];
            }
            // replace carriage return characters
            $txt2 = str_replace("\r", ' ', $txt2);
            switch ($align) {
                case 'C': {
                        $dx = ($w - $width) / 2;
                        break;
                    }
                case 'R': {
                        if ($this->rtl) {
                            $dx = $this->cell_padding['R'];
                        } else {
                            $dx = $w - $width - $this->cell_padding['R'];
                        }
                        break;
                    }
                case 'L': {
                        if ($this->rtl) {
                            $dx = $w - $width - $this->cell_padding['L'];
                        } else {
                            $dx = $this->cell_padding['L'];
                        }
                        break;
                    }
                case 'J':
                default: {
                        if ($this->rtl) {
                            $dx = $this->cell_padding['R'];
                        } else {
                            $dx = $this->cell_padding['L'];
                        }
                        break;
                    }
            }
            if ($this->rtl) {
                $xdx = $x - $dx - $width;
            } else {
                $xdx = $x + $dx;
            }
            $xdk = $xdx * $k;
            // print text
            $s .= sprintf('BT %F %F Td [(%s)] TJ ET', $xdk, (($this->h - $basefonty) * $k), $txt2);
            if (isset($uniblock)) {
                // print overlapping characters as separate string
                $xshift = 0; // horizontal shift
                $ty = (($this->h - $basefonty + (0.2 * $this->FontSize)) * $k);
                $spw = (($w - $txwidth - $this->cell_padding['L'] - $this->cell_padding['R']) / ($ns ? $ns : 1));
                foreach ($uniblock as $uk => $uniarr) {
                    if (($uk % 2) == 0) {
                        // x space to skip
                        if ($spacewidth != 0) {
                            // justification shift
                            $xshift += (count(array_keys($uniarr, 32)) * $spw);
                        }
                        $xshift += $this->GetArrStringWidth($uniarr); // + shift justification
                    } else {
                        // character to print
                        $topchr = $this->arrUTF8ToUTF16BE($uniarr, false);
                        $topchr = $this->_escape($topchr);
                        $s .= sprintf(' BT %F %F Td [(%s)] TJ ET', ($xdk + ($xshift * $k)), $ty, $topchr);
                    }
                }
            }
            if ($this->underline) {
                $s .= ' ' . $this->_dounderlinew($xdx, $basefonty, $width);
            }
            if ($this->linethrough) {
                $s .= ' ' . $this->_dolinethroughw($xdx, $basefonty, $width);
            }
            if ($this->overline) {
                $s .= ' ' . $this->_dooverlinew($xdx, $basefonty, $width);
            }
            if ($this->ColorFlag AND ($this->textrendermode < 4)) {
                $s .= ' Q';
            }
            if ($link) {
                $this->Link($xdx, $yt, $width, ($this->FontAscent + $this->FontDescent), $link, $ns);
            }
        }
        // output cell
        if ($s) {
            // output cell
            $rs .= $s;
            if ($this->font_spacing != 0) {
                // reset font spacing mode
                $rs .= ' BT 0 Tc ET';
            }
            if ($this->font_stretching != 100) {
                // reset font stretching mode
                $rs .= ' BT 100 Tz ET';
            }
        }
        // reset word spacing
        if (!$this->isUnicodeFont() AND ($align == 'J')) {
            $rs .= ' BT 0 Tw ET';
        }
        // reset stretching and spacing
        $this->font_stretching = $prev_font_stretching;
        $this->font_spacing = $prev_font_spacing;
        $this->lasth = $h;
        if ($ln > 0) {
            //Go to the beginning of the next line
            $this->y = $y + $h + $this->cell_margin['B'];
            if ($ln == 1) {
                if ($this->rtl) {
                    $this->x = $this->w - $this->rMargin;
                } else {
                    $this->x = $this->lMargin;
                }
            }
        } else {
            // go left or right by case
            if ($this->rtl) {
                $this->x = $x - $w - $this->cell_margin['L'];
            } else {
                $this->x = $x + $w + $this->cell_margin['R'];
            }
        }
        $gstyles = '' . $this->linestyleWidth . ' ' . $this->linestyleCap . ' ' . $this->linestyleJoin . ' ' . $this->linestyleDash . ' ' . $this->DrawColor . ' ' . $this->FillColor . "\n";
        $rs = $gstyles . $rs;
        $this->cell_padding = $prev_cell_padding;
        $this->cell_margin = $prev_cell_margin;
        return $rs;
    }

    /**
     * Replace a char if is defined on the current font.
     * @param $oldchar (int) Integer code (unicode) of the character to replace.
     * @param $newchar (int) Integer code (unicode) of the new character.
     * @return int the replaced char or the old char in case the new char i not defined
     * @protected
     * @since 5.9.167 (2012-06-22)
     */
    protected function replaceChar($oldchar, $newchar) {
        if ($this->isCharDefined($newchar)) {
            // add the new char on the subset list
            $this->CurrentFont['subsetchars'][$newchar] = true;
            // return the new character
            return $newchar;
        }
        // return the old char
        return $oldchar;
    }

    /**
     * Returns the code to draw the cell border
     * @param $x (float) X coordinate.
     * @param $y (float) Y coordinate.
     * @param $w (float) Cell width.
     * @param $h (float) Cell height.
     * @param $brd (mixed) Indicates if borders must be drawn around the cell. The value can be a number:<ul><li>0: no border (default)</li><li>1: frame</li></ul> or a string containing some or all of the following characters (in any order):<ul><li>L: left</li><li>T: top</li><li>R: right</li><li>B: bottom</li></ul> or an array of line styles for each border group - for example: array('LTRB' => array('width' => 2, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(0, 0, 0)))
     * @return string containing cell border code
     * @protected
     * @see SetLineStyle()
     * @since 5.7.000 (2010-08-02)
     */
    protected function getCellBorder($x, $y, $w, $h, $brd) {
        $s = ''; // string to be returned
        if (empty($brd)) {
            return $s;
        }
        if ($brd == 1) {
            $brd = array('LRTB' => true);
        }
        // calculate coordinates for border
        $k = $this->k;
        if ($this->rtl) {
            $xeL = ($x - $w) * $k;
            $xeR = $x * $k;
        } else {
            $xeL = $x * $k;
            $xeR = ($x + $w) * $k;
        }
        $yeL = (($this->h - ($y + $h)) * $k);
        $yeT = (($this->h - $y) * $k);
        $xeT = $xeL;
        $xeB = $xeR;
        $yeR = $yeT;
        $yeB = $yeL;
        if (is_string($brd)) {
            // convert string to array
            $slen = strlen($brd);
            $newbrd = array();
            for ($i = 0; $i < $slen; ++$i) {
                $newbrd[$brd[$i]] = array('cap' => 'square', 'join' => 'miter');
            }
            $brd = $newbrd;
        }
        if (isset($brd['mode'])) {
            $mode = $brd['mode'];
            unset($brd['mode']);
        } else {
            $mode = 'normal';
        }
        foreach ($brd as $border => $style) {
            if (is_array($style) AND !empty($style)) {
                // apply border style
                $prev_style = $this->linestyleWidth . ' ' . $this->linestyleCap . ' ' . $this->linestyleJoin . ' ' . $this->linestyleDash . ' ' . $this->DrawColor . ' ';
                $s .= $this->SetLineStyle($style, true) . "\n";
            }
            switch ($mode) {
                case 'ext': {
                        $off = (($this->LineWidth / 2) * $k);
                        $xL = $xeL - $off;
                        $xR = $xeR + $off;
                        $yT = $yeT + $off;
                        $yL = $yeL - $off;
                        $xT = $xL;
                        $xB = $xR;
                        $yR = $yT;
                        $yB = $yL;
                        $w += $this->LineWidth;
                        $h += $this->LineWidth;
                        break;
                    }
                case 'int': {
                        $off = ($this->LineWidth / 2) * $k;
                        $xL = $xeL + $off;
                        $xR = $xeR - $off;
                        $yT = $yeT - $off;
                        $yL = $yeL + $off;
                        $xT = $xL;
                        $xB = $xR;
                        $yR = $yT;
                        $yB = $yL;
                        $w -= $this->LineWidth;
                        $h -= $this->LineWidth;
                        break;
                    }
                case 'normal':
                default: {
                        $xL = $xeL;
                        $xT = $xeT;
                        $xB = $xeB;
                        $xR = $xeR;
                        $yL = $yeL;
                        $yT = $yeT;
                        $yB = $yeB;
                        $yR = $yeR;
                        break;
                    }
            }
            // draw borders by case
            if (strlen($border) == 4) {
                $s .= sprintf('%F %F %F %F re S ', $xT, $yT, ($w * $k), (-$h * $k));
            } elseif (strlen($border) == 3) {
                if (strpos($border, 'B') === false) { // LTR
                    $s .= sprintf('%F %F m ', $xL, $yL);
                    $s .= sprintf('%F %F l ', $xT, $yT);
                    $s .= sprintf('%F %F l ', $xR, $yR);
                    $s .= sprintf('%F %F l ', $xB, $yB);
                    $s .= 'S ';
                } elseif (strpos($border, 'L') === false) { // TRB
                    $s .= sprintf('%F %F m ', $xT, $yT);
                    $s .= sprintf('%F %F l ', $xR, $yR);
                    $s .= sprintf('%F %F l ', $xB, $yB);
                    $s .= sprintf('%F %F l ', $xL, $yL);
                    $s .= 'S ';
                } elseif (strpos($border, 'T') === false) { // RBL
                    $s .= sprintf('%F %F m ', $xR, $yR);
                    $s .= sprintf('%F %F l ', $xB, $yB);
                    $s .= sprintf('%F %F l ', $xL, $yL);
                    $s .= sprintf('%F %F l ', $xT, $yT);
                    $s .= 'S ';
                } elseif (strpos($border, 'R') === false) { // BLT
                    $s .= sprintf('%F %F m ', $xB, $yB);
                    $s .= sprintf('%F %F l ', $xL, $yL);
                    $s .= sprintf('%F %F l ', $xT, $yT);
                    $s .= sprintf('%F %F l ', $xR, $yR);
                    $s .= 'S ';
                }
            } elseif (strlen($border) == 2) {
                if ((strpos($border, 'L') !== false) AND (strpos($border, 'T') !== false)) { // LT
                    $s .= sprintf('%F %F m ', $xL, $yL);
                    $s .= sprintf('%F %F l ', $xT, $yT);
                    $s .= sprintf('%F %F l ', $xR, $yR);
                    $s .= 'S ';
                } elseif ((strpos($border, 'T') !== false) AND (strpos($border, 'R') !== false)) { // TR
                    $s .= sprintf('%F %F m ', $xT, $yT);
                    $s .= sprintf('%F %F l ', $xR, $yR);
                    $s .= sprintf('%F %F l ', $xB, $yB);
                    $s .= 'S ';
                } elseif ((strpos($border, 'R') !== false) AND (strpos($border, 'B') !== false)) { // RB
                    $s .= sprintf('%F %F m ', $xR, $yR);
                    $s .= sprintf('%F %F l ', $xB, $yB);
                    $s .= sprintf('%F %F l ', $xL, $yL);
                    $s .= 'S ';
                } elseif ((strpos($border, 'B') !== false) AND (strpos($border, 'L') !== false)) { // BL
                    $s .= sprintf('%F %F m ', $xB, $yB);
                    $s .= sprintf('%F %F l ', $xL, $yL);
                    $s .= sprintf('%F %F l ', $xT, $yT);
                    $s .= 'S ';
                } elseif ((strpos($border, 'L') !== false) AND (strpos($border, 'R') !== false)) { // LR
                    $s .= sprintf('%F %F m ', $xL, $yL);
                    $s .= sprintf('%F %F l ', $xT, $yT);
                    $s .= 'S ';
                    $s .= sprintf('%F %F m ', $xR, $yR);
                    $s .= sprintf('%F %F l ', $xB, $yB);
                    $s .= 'S ';
                } elseif ((strpos($border, 'T') !== false) AND (strpos($border, 'B') !== false)) { // TB
                    $s .= sprintf('%F %F m ', $xT, $yT);
                    $s .= sprintf('%F %F l ', $xR, $yR);
                    $s .= 'S ';
                    $s .= sprintf('%F %F m ', $xB, $yB);
                    $s .= sprintf('%F %F l ', $xL, $yL);
                    $s .= 'S ';
                }
            } else { // strlen($border) == 1
                if (strpos($border, 'L') !== false) { // L
                    $s .= sprintf('%F %F m ', $xL, $yL);
                    $s .= sprintf('%F %F l ', $xT, $yT);
                    $s .= 'S ';
                } elseif (strpos($border, 'T') !== false) { // T
                    $s .= sprintf('%F %F m ', $xT, $yT);
                    $s .= sprintf('%F %F l ', $xR, $yR);
                    $s .= 'S ';
                } elseif (strpos($border, 'R') !== false) { // R
                    $s .= sprintf('%F %F m ', $xR, $yR);
                    $s .= sprintf('%F %F l ', $xB, $yB);
                    $s .= 'S ';
                } elseif (strpos($border, 'B') !== false) { // B
                    $s .= sprintf('%F %F m ', $xB, $yB);
                    $s .= sprintf('%F %F l ', $xL, $yL);
                    $s .= 'S ';
                }
            }
            if (is_array($style) AND !empty($style)) {
                // reset border style to previous value
                $s .= "\n" . $this->linestyleWidth . ' ' . $this->linestyleCap . ' ' . $this->linestyleJoin . ' ' . $this->linestyleDash . ' ' . $this->DrawColor . "\n";
            }
        }
        return $s;
    }

    /**
     * This method allows printing text with line breaks.
     * They can be automatic (as soon as the text reaches the right border of the cell) or explicit (via the \n character). As many cells as necessary are output, one below the other.<br />
     * Text can be aligned, centered or justified. The cell block can be framed and the background painted.
     * @param $w (float) Width of cells. If 0, they extend up to the right margin of the page.
     * @param $h (float) Cell minimum height. The cell extends automatically if needed.
     * @param $txt (string) String to print
     * @param $border (mixed) Indicates if borders must be drawn around the cell. The value can be a number:<ul><li>0: no border (default)</li><li>1: frame</li></ul> or a string containing some or all of the following characters (in any order):<ul><li>L: left</li><li>T: top</li><li>R: right</li><li>B: bottom</li></ul> or an array of line styles for each border group - for example: array('LTRB' => array('width' => 2, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(0, 0, 0)))
     * @param $align (string) Allows to center or align the text. Possible values are:<ul><li>L or empty string: left align</li><li>C: center</li><li>R: right align</li><li>J: justification (default value when $ishtml=false)</li></ul>
     * @param $fill (boolean) Indicates if the cell background must be painted (true) or transparent (false).
     * @param $ln (int) Indicates where the current position should go after the call. Possible values are:<ul><li>0: to the right</li><li>1: to the beginning of the next line [DEFAULT]</li><li>2: below</li></ul>
     * @param $x (float) x position in user units
     * @param $y (float) y position in user units
     * @param $reseth (boolean) if true reset the last cell height (default true).
     * @param $stretch (int) font stretch mode: <ul><li>0 = disabled</li><li>1 = horizontal scaling only if text is larger than cell width</li><li>2 = forced horizontal scaling to fit cell width</li><li>3 = character spacing only if text is larger than cell width</li><li>4 = forced character spacing to fit cell width</li></ul> General font stretching and scaling values will be preserved when possible.
     * @param $ishtml (boolean) INTERNAL USE ONLY -- set to true if $txt is HTML content (default = false). Never set this parameter to true, use instead writeHTMLCell() or writeHTML() methods.
     * @param $autopadding (boolean) if true, uses internal padding and automatically adjust it to account for line width.
     * @param $maxh (float) maximum height. It should be >= $h and less then remaining space to the bottom of the page, or 0 for disable this feature. This feature works only when $ishtml=false.
     * @param $valign (string) Vertical alignment of text (requires $maxh = $h > 0). Possible values are:<ul><li>T: TOP</li><li>M: middle</li><li>B: bottom</li></ul>. This feature works only when $ishtml=false and the cell must fit in a single page.
     * @param $fitcell (boolean) if true attempt to fit all the text within the cell by reducing the font size (do not work in HTML mode).
     * @return int Return the number of cells or 1 for html mode.
     * @public
     * @since 1.3
     * @see SetFont(), SetDrawColor(), SetFillColor(), SetTextColor(), SetLineWidth(), Cell(), Write(), SetAutoPageBreak()
     */
    public function MultiCell($w, $h, $txt, $border = 0, $align = 'J', $fill = false, $ln = 1, $x = '', $y = '', $reseth = true, $stretch = 0, $ishtml = false, $autopadding = true, $maxh = 0, $valign = 'T', $fitcell = false) {
        $prev_cell_margin = $this->cell_margin;
        $prev_cell_padding = $this->cell_padding;
        // adjust internal padding
        $this->adjustCellPadding($border);
        $mc_padding = $this->cell_padding;
        $mc_margin = $this->cell_margin;
        $this->cell_padding['T'] = 0;
        $this->cell_padding['B'] = 0;
        $this->setCellMargins(0, 0, 0, 0);
        if ($this->empty_string($this->lasth) OR $reseth) {
            // reset row height
            $this->resetLastH();
        }
        if (!$this->empty_string($y)) {
            $this->SetY($y);
        } else {
            $y = $this->GetY();
        }
        $resth = 0;
        if (($h > 0) AND $this->inPageBody() AND (($y + $h + $mc_margin['T'] + $mc_margin['B']) > $this->PageBreakTrigger)) {
            // spit cell in more pages/columns
            $newh = ($this->PageBreakTrigger - $y);
            $resth = ($h - $newh); // cell to be printed on the next page/column
            $h = $newh;
        }
        // get current page number
        $startpage = $this->page;
        // get current column
        $startcolumn = $this->current_column;
        if (!$this->empty_string($x)) {
            $this->SetX($x);
        } else {
            $x = $this->GetX();
        }
        // check page for no-write regions and adapt page margins if necessary
        list($x, $y) = $this->checkPageRegions(0, $x, $y);
        // apply margins
        $oy = $y + $mc_margin['T'];
        if ($this->rtl) {
            $ox = ($this->w - $x - $mc_margin['R']);
        } else {
            $ox = ($x + $mc_margin['L']);
        }
        $this->x = $ox;
        $this->y = $oy;
        // set width
        if ($this->empty_string($w) OR ($w <= 0)) {
            if ($this->rtl) {
                $w = ($this->x - $this->lMargin - $mc_margin['L']);
            } else {
                $w = ($this->w - $this->x - $this->rMargin - $mc_margin['R']);
            }
        }
        // store original margin values
        $lMargin = $this->lMargin;
        $rMargin = $this->rMargin;
        if ($this->rtl) {
            $this->rMargin = ($this->w - $this->x);
            $this->lMargin = ($this->x - $w);
        } else {
            $this->lMargin = ($this->x);
            $this->rMargin = ($this->w - $this->x - $w);
        }
        $this->clMargin = $this->lMargin;
        $this->crMargin = $this->rMargin;
        if ($autopadding) {
            // add top padding
            $this->y += $mc_padding['T'];
        }
        if ($ishtml) { // ******* Write HTML text
            $this->writeHTML($txt, true, false, $reseth, true, $align);
            $nl = 1;
        } else { // ******* Write simple text
            $prev_FontSizePt = $this->FontSizePt;
            // vertical alignment
            if ($maxh > 0) {
                // get text height
                $text_height = $this->getStringHeight($w, $txt, $reseth, $autopadding, $mc_padding, $border);
                if ($fitcell) {
                    // try to reduce font size to fit text on cell (use a quick search algorithm)
                    $fmin = 1;
                    $fmax = $this->FontSizePt;
                    $prev_text_height = $text_height;
                    $maxit = 100; // max number of iterations
                    while ($maxit > 0) {
                        $fmid = (($fmax + $fmin) / 2);
                        $this->SetFontSize($fmid, false);
                        $this->resetLastH();
                        $text_height = $this->getStringHeight($w, $txt, $reseth, $autopadding, $mc_padding, $border);
                        if (($text_height == $maxh) OR (($text_height < $maxh) AND ($fmin >= ($fmax - 0.01)))) {
                            break;
                        } elseif ($text_height < $maxh) {
                            $fmin = $fmid;
                        } else {
                            $fmax = $fmid;
                        }
                        --$maxit;
                    }
                    $this->SetFontSize($this->FontSizePt);
                }
                if ($text_height < $maxh) {
                    if ($valign == 'M') {
                        // text vertically centered
                        $this->y += (($maxh - $text_height) / 2);
                    } elseif ($valign == 'B') {
                        // text vertically aligned on bottom
                        $this->y += ($maxh - $text_height);
                    }
                }
            }
            $nl = $this->Write($this->lasth, $txt, '', 0, $align, true, $stretch, false, true, $maxh, 0, $mc_margin);
            if ($fitcell) {
                // restore font size
                $this->SetFontSize($prev_FontSizePt);
            }
        }
        if ($autopadding) {
            // add bottom padding
            $this->y += $mc_padding['B'];
        }
        // Get end-of-text Y position
        $currentY = $this->y;
        // get latest page number
        $endpage = $this->page;
        if ($resth > 0) {
            $skip = ($endpage - $startpage);
            $tmpresth = $resth;
            while ($tmpresth > 0) {
                if ($skip <= 0) {
                    // add a page (or trig AcceptPageBreak() for multicolumn mode)
                    $this->checkPageBreak($this->PageBreakTrigger + 1);
                }
                if ($this->num_columns > 1) {
                    $tmpresth -= ($this->h - $this->y - $this->bMargin);
                } else {
                    $tmpresth -= ($this->h - $this->tMargin - $this->bMargin);
                }
                --$skip;
            }
            $currentY = $this->y;
            $endpage = $this->page;
        }
        // get latest column
        $endcolumn = $this->current_column;
        if ($this->num_columns == 0) {
            $this->num_columns = 1;
        }
        // disable page regions check
        $check_page_regions = $this->check_page_regions;
        $this->check_page_regions = false;
        // get border modes
        $border_start = $this->getBorderMode($border, $position = 'start');
        $border_end = $this->getBorderMode($border, $position = 'end');
        $border_middle = $this->getBorderMode($border, $position = 'middle');
        // design borders around HTML cells.
        for ($page = $startpage; $page <= $endpage; ++$page) { // for each page
            $ccode = '';
            $this->setPage($page);
            if ($this->num_columns < 2) {
                // single-column mode
                $this->SetX($x);
                $this->y = $this->tMargin;
            }
            // account for margin changes
            if ($page > $startpage) {
                if (($this->rtl) AND ($this->pagedim[$page]['orm'] != $this->pagedim[$startpage]['orm'])) {
                    $this->x -= ($this->pagedim[$page]['orm'] - $this->pagedim[$startpage]['orm']);
                } elseif ((!$this->rtl) AND ($this->pagedim[$page]['olm'] != $this->pagedim[$startpage]['olm'])) {
                    $this->x += ($this->pagedim[$page]['olm'] - $this->pagedim[$startpage]['olm']);
                }
            }
            if ($startpage == $endpage) {
                // single page
                for ($column = $startcolumn; $column <= $endcolumn; ++$column) { // for each column
                    $this->selectColumn($column);
                    if ($this->rtl) {
                        $this->x -= $mc_margin['R'];
                    } else {
                        $this->x += $mc_margin['L'];
                    }
                    if ($startcolumn == $endcolumn) { // single column
                        $cborder = $border;
                        $h = max($h, ($currentY - $oy));
                        $this->y = $oy;
                    } elseif ($column == $startcolumn) { // first column
                        $cborder = $border_start;
                        $this->y = $oy;
                        $h = $this->h - $this->y - $this->bMargin;
                    } elseif ($column == $endcolumn) { // end column
                        $cborder = $border_end;
                        $h = $currentY - $this->y;
                        if ($resth > $h) {
                            $h = $resth;
                        }
                    } else { // middle column
                        $cborder = $border_middle;
                        $h = $this->h - $this->y - $this->bMargin;
                        $resth -= $h;
                    }
                    $ccode .= $this->getCellCode($w, $h, '', $cborder, 1, '', $fill, '', 0, true) . "\n";
                } // end for each column
            } elseif ($page == $startpage) { // first page
                for ($column = $startcolumn; $column < $this->num_columns; ++$column) { // for each column
                    $this->selectColumn($column);
                    if ($this->rtl) {
                        $this->x -= $mc_margin['R'];
                    } else {
                        $this->x += $mc_margin['L'];
                    }
                    if ($column == $startcolumn) { // first column
                        $cborder = $border_start;
                        $this->y = $oy;
                        $h = $this->h - $this->y - $this->bMargin;
                    } else { // middle column
                        $cborder = $border_middle;
                        $h = $this->h - $this->y - $this->bMargin;
                        $resth -= $h;
                    }
                    $ccode .= $this->getCellCode($w, $h, '', $cborder, 1, '', $fill, '', 0, true) . "\n";
                } // end for each column
            } elseif ($page == $endpage) { // last page
                for ($column = 0; $column <= $endcolumn; ++$column) { // for each column
                    $this->selectColumn($column);
                    if ($this->rtl) {
                        $this->x -= $mc_margin['R'];
                    } else {
                        $this->x += $mc_margin['L'];
                    }
                    if ($column == $endcolumn) {
                        // end column
                        $cborder = $border_end;
                        $h = $currentY - $this->y;
                        if ($resth > $h) {
                            $h = $resth;
                        }
                    } else {
                        // middle column
                        $cborder = $border_middle;
                        $h = $this->h - $this->y - $this->bMargin;
                        $resth -= $h;
                    }
                    $ccode .= $this->getCellCode($w, $h, '', $cborder, 1, '', $fill, '', 0, true) . "\n";
                } // end for each column
            } else { // middle page
                for ($column = 0; $column < $this->num_columns; ++$column) { // for each column
                    $this->selectColumn($column);
                    if ($this->rtl) {
                        $this->x -= $mc_margin['R'];
                    } else {
                        $this->x += $mc_margin['L'];
                    }
                    $cborder = $border_middle;
                    $h = $this->h - $this->y - $this->bMargin;
                    $resth -= $h;
                    $ccode .= $this->getCellCode($w, $h, '', $cborder, 1, '', $fill, '', 0, true) . "\n";
                } // end for each column
            }
            if ($cborder OR $fill) {
                $offsetlen = strlen($ccode);
                // draw border and fill
                if ($this->inxobj) {
                    // we are inside an XObject template
                    if (end($this->xobjects[$this->xobjid]['transfmrk']) !== false) {
                        $pagemarkkey = key($this->xobjects[$this->xobjid]['transfmrk']);
                        $pagemark = $this->xobjects[$this->xobjid]['transfmrk'][$pagemarkkey];
                        $this->xobjects[$this->xobjid]['transfmrk'][$pagemarkkey] += $offsetlen;
                    } else {
                        $pagemark = $this->xobjects[$this->xobjid]['intmrk'];
                        $this->xobjects[$this->xobjid]['intmrk'] += $offsetlen;
                    }
                    $pagebuff = $this->xobjects[$this->xobjid]['outdata'];
                    $pstart = substr($pagebuff, 0, $pagemark);
                    $pend = substr($pagebuff, $pagemark);
                    $this->xobjects[$this->xobjid]['outdata'] = $pstart . $ccode . $pend;
                } else {
                    if (end($this->transfmrk[$this->page]) !== false) {
                        $pagemarkkey = key($this->transfmrk[$this->page]);
                        $pagemark = $this->transfmrk[$this->page][$pagemarkkey];
                        $this->transfmrk[$this->page][$pagemarkkey] += $offsetlen;
                    } elseif ($this->InFooter) {
                        $pagemark = $this->footerpos[$this->page];
                        $this->footerpos[$this->page] += $offsetlen;
                    } else {
                        $pagemark = $this->intmrk[$this->page];
                        $this->intmrk[$this->page] += $offsetlen;
                    }
                    $pagebuff = $this->getPageBuffer($this->page);
                    $pstart = substr($pagebuff, 0, $pagemark);
                    $pend = substr($pagebuff, $pagemark);
                    $this->setPageBuffer($this->page, $pstart . $ccode . $pend);
                }
            }
        } // end for each page
        // restore page regions check
        $this->check_page_regions = $check_page_regions;
        // Get end-of-cell Y position
        $currentY = $this->GetY();
        // restore previous values
        if ($this->num_columns > 1) {
            $this->selectColumn();
        } else {
            // restore original margins
            $this->lMargin = $lMargin;
            $this->rMargin = $rMargin;
            if ($this->page > $startpage) {
                // check for margin variations between pages (i.e. booklet mode)
                $dl = ($this->pagedim[$this->page]['olm'] - $this->pagedim[$startpage]['olm']);
                $dr = ($this->pagedim[$this->page]['orm'] - $this->pagedim[$startpage]['orm']);
                if (($dl != 0) OR ($dr != 0)) {
                    $this->lMargin += $dl;
                    $this->rMargin += $dr;
                }
            }
        }
        if ($ln > 0) {
            //Go to the beginning of the next line
            $this->SetY($currentY + $mc_margin['B']);
            if ($ln == 2) {
                $this->SetX($x + $w + $mc_margin['L'] + $mc_margin['R']);
            }
        } else {
            // go left or right by case
            $this->setPage($startpage);
            $this->y = $y;
            $this->SetX($x + $w + $mc_margin['L'] + $mc_margin['R']);
        }
        $this->setContentMark();
        $this->cell_padding = $prev_cell_padding;
        $this->cell_margin = $prev_cell_margin;
        $this->clMargin = $this->lMargin;
        $this->crMargin = $this->rMargin;
        return $nl;
    }

    /**
     * Get the border mode accounting for multicell position (opens bottom side of multicell crossing pages)
     * @param $brd (mixed) Indicates if borders must be drawn around the cell block. The value can be a number:<ul><li>0: no border (default)</li><li>1: frame</li></ul>or a string containing some or all of the following characters (in any order):<ul><li>L: left</li><li>T: top</li><li>R: right</li><li>B: bottom</li></ul> or an array of line styles for each border group: array('LTRB' => array('width' => 2, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(0, 0, 0)))
     * @param $position (string) multicell position: 'start', 'middle', 'end'
     * @return border mode array
     * @protected
     * @since 4.4.002 (2008-12-09)
     */
    protected function getBorderMode($brd, $position = 'start') {
        if ((!$this->opencell) OR empty($brd)) {
            return $brd;
        }
        if ($brd == 1) {
            $brd = 'LTRB';
        }
        if (is_string($brd)) {
            // convert string to array
            $slen = strlen($brd);
            $newbrd = array();
            for ($i = 0; $i < $slen; ++$i) {
                $newbrd[$brd[$i]] = array('cap' => 'square', 'join' => 'miter');
            }
            $brd = $newbrd;
        }
        foreach ($brd as $border => $style) {
            switch ($position) {
                case 'start': {
                        if (strpos($border, 'B') !== false) {
                            // remove bottom line
                            $newkey = str_replace('B', '', $border);
                            if (strlen($newkey) > 0) {
                                $brd[$newkey] = $style;
                            }
                            unset($brd[$border]);
                        }
                        break;
                    }
                case 'middle': {
                        if (strpos($border, 'B') !== false) {
                            // remove bottom line
                            $newkey = str_replace('B', '', $border);
                            if (strlen($newkey) > 0) {
                                $brd[$newkey] = $style;
                            }
                            unset($brd[$border]);
                            $border = $newkey;
                        }
                        if (strpos($border, 'T') !== false) {
                            // remove bottom line
                            $newkey = str_replace('T', '', $border);
                            if (strlen($newkey) > 0) {
                                $brd[$newkey] = $style;
                            }
                            unset($brd[$border]);
                        }
                        break;
                    }
                case 'end': {
                        if (strpos($border, 'T') !== false) {
                            // remove bottom line
                            $newkey = str_replace('T', '', $border);
                            if (strlen($newkey) > 0) {
                                $brd[$newkey] = $style;
                            }
                            unset($brd[$border]);
                        }
                        break;
                    }
            }
        }
        return $brd;
    }

    /**
     * This method return the estimated number of lines for print a simple text string using Multicell() method.
     * @param $txt (string) String for calculating his height
     * @param $w (float) Width of cells. If 0, they extend up to the right margin of the page.
     * @param $reseth (boolean) if true reset the last cell height (default false).
     * @param $autopadding (boolean) if true, uses internal padding and automatically adjust it to account for line width (default true).
     * @param $cellpadding (float) Internal cell padding, if empty uses default cell padding.
     * @param $border (mixed) Indicates if borders must be drawn around the cell. The value can be a number:<ul><li>0: no border (default)</li><li>1: frame</li></ul> or a string containing some or all of the following characters (in any order):<ul><li>L: left</li><li>T: top</li><li>R: right</li><li>B: bottom</li></ul> or an array of line styles for each border group - for example: array('LTRB' => array('width' => 2, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(0, 0, 0)))
     * @return float Return the minimal height needed for multicell method for printing the $txt param.
     * @author Alexander Escalona Fern�ndez, Nicola Asuni
     * @public
     * @since 4.5.011
     */
    public function getNumLines($txt, $w = 0, $reseth = false, $autopadding = true, $cellpadding = '', $border = 0) {
        if ($txt === '') {
            // empty string
            return 1;
        }
        // adjust internal padding
        $prev_cell_padding = $this->cell_padding;
        $prev_lasth = $this->lasth;
        if (is_array($cellpadding)) {
            $this->cell_padding = $cellpadding;
        }
        $this->adjustCellPadding($border);
        if ($this->empty_string($w) OR ($w <= 0)) {
            if ($this->rtl) {
                $w = $this->x - $this->lMargin;
            } else {
                $w = $this->w - $this->rMargin - $this->x;
            }
        }
        $wmax = $w - $this->cell_padding['L'] - $this->cell_padding['R'];
        if ($reseth) {
            // reset row height
            $this->resetLastH();
        }
        $lines = 1;
        $sum = 0;
        $chars = $this->utf8Bidi($this->UTF8StringToArray($txt), $txt, $this->tmprtl);
        $charsWidth = $this->GetArrStringWidth($chars, '', '', 0, true);
        $length = count($chars);
        $lastSeparator = -1;
        for ($i = 0; $i < $length; ++$i) {
            $charWidth = $charsWidth[$i];
            if (preg_match($this->re_spaces, $this->unichr($chars[$i]))) {
                $lastSeparator = $i;
            }
            if ((($sum + $charWidth) > $wmax) OR ($chars[$i] == 10)) {
                ++$lines;
                if ($chars[$i] == 10) {
                    $lastSeparator = -1;
                    $sum = 0;
                } elseif ($lastSeparator != -1) {
                    $i = $lastSeparator;
                    $lastSeparator = -1;
                    $sum = 0;
                } else {
                    $sum = $charWidth;
                }
            } else {
                $sum += $charWidth;
            }
        }
        if ($chars[($length - 1)] == 10) {
            --$lines;
        }
        $this->cell_padding = $prev_cell_padding;
        $this->lasth = $prev_lasth;
        return $lines;
    }

    /**
     * This method return the estimated height needed for printing a simple text string using the Multicell() method.
     * Generally, if you want to know the exact height for a block of content you can use the following alternative technique:
     * @pre
     *  // store current object
     *  $pdf->startTransaction();
     *  // store starting values
     *  $start_y = $pdf->GetY();
     *  $start_page = $pdf->getPage();
     *  // call your printing functions with your parameters
     *  // - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
     *  $pdf->MultiCell($w=0, $h=0, $txt, $border=1, $align='L', $fill=false, $ln=1, $x='', $y='', $reseth=true, $stretch=0, $ishtml=false, $autopadding=true, $maxh=0);
     *  // - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
     *  // get the new Y
     *  $end_y = $pdf->GetY();
     *  $end_page = $pdf->getPage();
     *  // calculate height
     *  $height = 0;
     *  if ($end_page == $start_page) {
     *  	$height = $end_y - $start_y;
     *  } else {
     *  	for ($page=$start_page; $page <= $end_page; ++$page) {
     *  		$this->setPage($page);
     *  		if ($page == $start_page) {
     *  			// first page
     *  			$height = $this->h - $start_y - $this->bMargin;
     *  		} elseif ($page == $end_page) {
     *  			// last page
     *  			$height = $end_y - $this->tMargin;
     *  		} else {
     *  			$height = $this->h - $this->tMargin - $this->bMargin;
     *  		}
     *  	}
     *  }
     *  // restore previous object
     *  $pdf = $pdf->rollbackTransaction();
     *
     * @param $w (float) Width of cells. If 0, they extend up to the right margin of the page.
     * @param $txt (string) String for calculating his height
     * @param $reseth (boolean) if true reset the last cell height (default false).
     * @param $autopadding (boolean) if true, uses internal padding and automatically adjust it to account for line width (default true).
     * @param $cellpadding (float) Internal cell padding, if empty uses default cell padding.
     * @param $border (mixed) Indicates if borders must be drawn around the cell. The value can be a number:<ul><li>0: no border (default)</li><li>1: frame</li></ul> or a string containing some or all of the following characters (in any order):<ul><li>L: left</li><li>T: top</li><li>R: right</li><li>B: bottom</li></ul> or an array of line styles for each border group - for example: array('LTRB' => array('width' => 2, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(0, 0, 0)))
     * @return float Return the minimal height needed for multicell method for printing the $txt param.
     * @author Nicola Asuni, Alexander Escalona Fern�ndez
     * @public
     */
    public function getStringHeight($w, $txt, $reseth = false, $autopadding = true, $cellpadding = '', $border = 0) {
        // adjust internal padding
        $prev_cell_padding = $this->cell_padding;
        $prev_lasth = $this->lasth;
        if (is_array($cellpadding)) {
            $this->cell_padding = $cellpadding;
        }
        $this->adjustCellPadding($border);
        $lines = $this->getNumLines($txt, $w, $reseth, $autopadding, $cellpadding, $border);
        $height = $lines * ($this->FontSize * $this->cell_height_ratio);
        if ($autopadding) {
            // add top and bottom padding
            $height += ($this->cell_padding['T'] + $this->cell_padding['B']);
        }
        $this->cell_padding = $prev_cell_padding;
        $this->lasth = $prev_lasth;
        return $height;
    }

    /**
     * This method prints text from the current position.<br />
     * @param $h (float) Line height
     * @param $txt (string) String to print
     * @param $link (mixed) URL or identifier returned by AddLink()
     * @param $fill (boolean) Indicates if the cell background must be painted (true) or transparent (false).
     * @param $align (string) Allows to center or align the text. Possible values are:<ul><li>L or empty string: left align (default value)</li><li>C: center</li><li>R: right align</li><li>J: justify</li></ul>
     * @param $ln (boolean) if true set cursor at the bottom of the line, otherwise set cursor at the top of the line.
     * @param $stretch (int) font stretch mode: <ul><li>0 = disabled</li><li>1 = horizontal scaling only if text is larger than cell width</li><li>2 = forced horizontal scaling to fit cell width</li><li>3 = character spacing only if text is larger than cell width</li><li>4 = forced character spacing to fit cell width</li></ul> General font stretching and scaling values will be preserved when possible.
     * @param $firstline (boolean) if true prints only the first line and return the remaining string.
     * @param $firstblock (boolean) if true the string is the starting of a line.
     * @param $maxh (float) maximum height. The remaining unprinted text will be returned. It should be >= $h and less then remaining space to the bottom of the page, or 0 for disable this feature.
     * @param $wadj (float) first line width will be reduced by this amount (used in HTML mode).
     * @param $margin (array) margin array of the parent container
     * @return mixed Return the number of cells or the remaining string if $firstline = true.
     * @public
     * @since 1.5
     */
    public function Write($h, $txt, $link = '', $fill = false, $align = '', $ln = false, $stretch = 0, $firstline = false, $firstblock = false, $maxh = 0, $wadj = 0, $margin = '') {
        // check page for no-write regions and adapt page margins if necessary
        list($this->x, $this->y) = $this->checkPageRegions($h, $this->x, $this->y);
        if (strlen($txt) == 0) {
            // fix empty text
            $txt = ' ';
        }
        if ($margin === '') {
            // set default margins
            $margin = $this->cell_margin;
        }
        // remove carriage returns
        $s = str_replace("\r", '', $txt);
        // check if string contains arabic text
        if (preg_match($this->unicode->uni_RE_PATTERN_ARABIC, $s)) {
            $arabic = true;
        } else {
            $arabic = false;
        }
        // check if string contains RTL text
        if ($arabic OR ($this->tmprtl == 'R') OR preg_match($this->unicode->uni_RE_PATTERN_RTL, $s)) {
            $rtlmode = true;
        } else {
            $rtlmode = false;
        }
        // get a char width
        $chrwidth = $this->GetCharWidth(46); // dot character
        // get array of unicode values
        $chars = $this->UTF8StringToArray($s);
        // calculate maximum width for a single character on string
        $chrw = $this->GetArrStringWidth($chars, '', '', 0, true);
        array_walk($chrw, array($this, 'getRawCharWidth'));
        $maxchwidth = max($chrw);
        // get array of chars
        $uchars = $this->UTF8ArrayToUniArray($chars);
        // get the number of characters
        $nb = count($chars);
        // replacement for SHY character (minus symbol)
        $shy_replacement = 45;
        $shy_replacement_char = $this->unichr($shy_replacement);
        // widht for SHY replacement
        $shy_replacement_width = $this->GetCharWidth($shy_replacement);
        // max Y
        $maxy = $this->y + $maxh - $h - $this->cell_padding['T'] - $this->cell_padding['B'];
        // page width
        $pw = $w = $this->w - $this->lMargin - $this->rMargin;
        // calculate remaining line width ($w)
        if ($this->rtl) {
            $w = $this->x - $this->lMargin;
        } else {
            $w = $this->w - $this->rMargin - $this->x;
        }
        // max column width
        $wmax = ($w - $wadj);
        if (!$firstline) {
            $wmax -= ($this->cell_padding['L'] + $this->cell_padding['R']);
        }
        if ((!$firstline) AND (($chrwidth > $wmax) OR ($maxchwidth > $wmax))) {
            // the maximum width character do not fit on column
            return '';
        }
        // minimum row height
        $row_height = max($h, $this->FontSize * $this->cell_height_ratio);
        $start_page = $this->page;
        $i = 0; // character position
        $j = 0; // current starting position
        $sep = -1; // position of the last blank space
        $shy = false; // true if the last blank is a soft hypen (SHY)
        $l = 0; // current string length
        $nl = 0; //number of lines
        $linebreak = false;
        $pc = 0; // previous character
        // for each character
        while ($i < $nb) {
            if (($maxh > 0) AND ($this->y >= $maxy)) {
                break;
            }
            //Get the current character
            $c = $chars[$i];
            if ($c == 10) { // 10 = "\n" = new line
                //Explicit line break
                if ($align == 'J') {
                    if ($this->rtl) {
                        $talign = 'R';
                    } else {
                        $talign = 'L';
                    }
                } else {
                    $talign = $align;
                }
                $tmpstr = $this->UniArrSubString($uchars, $j, $i);
                if ($firstline) {
                    $startx = $this->x;
                    $tmparr = array_slice($chars, $j, ($i - $j));
                    if ($rtlmode) {
                        $tmparr = $this->utf8Bidi($tmparr, $tmpstr, $this->tmprtl);
                    }
                    $linew = $this->GetArrStringWidth($tmparr);
                    unset($tmparr);
                    if ($this->rtl) {
                        $this->endlinex = $startx - $linew;
                    } else {
                        $this->endlinex = $startx + $linew;
                    }
                    $w = $linew;
                    $tmpcellpadding = $this->cell_padding;
                    if ($maxh == 0) {
                        $this->SetCellPadding(0);
                    }
                }
                if ($firstblock AND $this->isRTLTextDir()) {
                    $tmpstr = $this->stringRightTrim($tmpstr);
                }
                // Skip newlines at the begining of a page or column
                if (!empty($tmpstr) OR ($this->y < ($this->PageBreakTrigger - $row_height))) {
                    $this->Cell($w, $h, $tmpstr, 0, 1, $talign, $fill, $link, $stretch);
                }
                unset($tmpstr);
                if ($firstline) {
                    $this->cell_padding = $tmpcellpadding;
                    return ($this->UniArrSubString($uchars, $i));
                }
                ++$nl;
                $j = $i + 1;
                $l = 0;
                $sep = -1;
                $shy = false;
                // account for margin changes
                if ((($this->y + $this->lasth) > $this->PageBreakTrigger) AND ($this->inPageBody())) {
                    $this->AcceptPageBreak();
                    if ($this->rtl) {
                        $this->x -= $margin['R'];
                    } else {
                        $this->x += $margin['L'];
                    }
                    $this->lMargin += $margin['L'];
                    $this->rMargin += $margin['R'];
                }
                $w = $this->getRemainingWidth();
                $wmax = ($w - $this->cell_padding['L'] - $this->cell_padding['R']);
            } else {
                // 160 is the non-breaking space.
                // 173 is SHY (Soft Hypen).
                // \p{Z} or \p{Separator}: any kind of Unicode whitespace or invisible separator.
                // \p{Lo} or \p{Other_Letter}: a Unicode letter or ideograph that does not have lowercase and uppercase variants.
                // \p{Lo} is needed because Chinese characters are packed next to each other without spaces in between.
                if (($c != 160)
                        AND (($c == 173)
                        OR preg_match($this->re_spaces, $this->unichr($c))
                        OR (($c == 45)
                        AND ($i < ($nb - 1))
                        AND @preg_match('/[\p{L}]/' . $this->re_space['m'], $this->unichr($pc))
                        AND @preg_match('/[\p{L}]/' . $this->re_space['m'], $this->unichr($chars[($i + 1)]))
                        )
                        )
                ) {
                    // update last blank space position
                    $sep = $i;
                    // check if is a SHY
                    if (($c == 173) OR ($c == 45)) {
                        $shy = true;
                        if ($pc == 45) {
                            $tmp_shy_replacement_width = 0;
                            $tmp_shy_replacement_char = '';
                        } else {
                            $tmp_shy_replacement_width = $shy_replacement_width;
                            $tmp_shy_replacement_char = $shy_replacement_char;
                        }
                    } else {
                        $shy = false;
                    }
                }
                // update string length
                if ($this->isUnicodeFont() AND ($arabic)) {
                    // with bidirectional algorithm some chars may be changed affecting the line length
                    // *** very slow ***
                    $l = $this->GetArrStringWidth($this->utf8Bidi(array_slice($chars, $j, ($i - $j)), '', $this->tmprtl));
                } else {
                    $l += $this->GetCharWidth($c);
                }
                if (($l > $wmax) OR (($c == 173) AND (($l + $tmp_shy_replacement_width) > $wmax))) {
                    // we have reached the end of column
                    if ($sep == -1) {
                        // check if the line was already started
                        if (($this->rtl AND ($this->x <= ($this->w - $this->rMargin - $this->cell_padding['R'] - $margin['R'] - $chrwidth)))
                                OR ((!$this->rtl) AND ($this->x >= ($this->lMargin + $this->cell_padding['L'] + $margin['L'] + $chrwidth)))) {
                            // print a void cell and go to next line
                            $this->Cell($w, $h, '', 0, 1);
                            $linebreak = true;
                            if ($firstline) {
                                return ($this->UniArrSubString($uchars, $j));
                            }
                        } else {
                            // truncate the word because do not fit on column
                            $tmpstr = $this->UniArrSubString($uchars, $j, $i);
                            if ($firstline) {
                                $startx = $this->x;
                                $tmparr = array_slice($chars, $j, ($i - $j));
                                if ($rtlmode) {
                                    $tmparr = $this->utf8Bidi($tmparr, $tmpstr, $this->tmprtl);
                                }
                                $linew = $this->GetArrStringWidth($tmparr);
                                unset($tmparr);
                                if ($this->rtl) {
                                    $this->endlinex = $startx - $linew;
                                } else {
                                    $this->endlinex = $startx + $linew;
                                }
                                $w = $linew;
                                $tmpcellpadding = $this->cell_padding;
                                if ($maxh == 0) {
                                    $this->SetCellPadding(0);
                                }
                            }
                            if ($firstblock AND $this->isRTLTextDir()) {
                                $tmpstr = $this->stringRightTrim($tmpstr);
                            }
                            $this->Cell($w, $h, $tmpstr, 0, 1, $align, $fill, $link, $stretch);
                            unset($tmpstr);
                            if ($firstline) {
                                $this->cell_padding = $tmpcellpadding;
                                return ($this->UniArrSubString($uchars, $i));
                            }
                            $j = $i;
                            --$i;
                        }
                    } else {
                        // word wrapping
                        if ($this->rtl AND (!$firstblock) AND ($sep < $i)) {
                            $endspace = 1;
                        } else {
                            $endspace = 0;
                        }
                        // check the length of the next string
                        $strrest = $this->UniArrSubString($uchars, ($sep + $endspace));
                        $nextstr = preg_split('/' . $this->re_space['p'] . '/' . $this->re_space['m'], $this->stringTrim($strrest));
                        if (isset($nextstr[0]) AND ($this->GetStringWidth($nextstr[0]) > $pw)) {
                            // truncate the word because do not fit on a full page width
                            $tmpstr = $this->UniArrSubString($uchars, $j, $i);
                            if ($firstline) {
                                $startx = $this->x;
                                $tmparr = array_slice($chars, $j, ($i - $j));
                                if ($rtlmode) {
                                    $tmparr = $this->utf8Bidi($tmparr, $tmpstr, $this->tmprtl);
                                }
                                $linew = $this->GetArrStringWidth($tmparr);
                                unset($tmparr);
                                if ($this->rtl) {
                                    $this->endlinex = ($startx - $linew);
                                } else {
                                    $this->endlinex = ($startx + $linew);
                                }
                                $w = $linew;
                                $tmpcellpadding = $this->cell_padding;
                                if ($maxh == 0) {
                                    $this->SetCellPadding(0);
                                }
                            }
                            if ($firstblock AND $this->isRTLTextDir()) {
                                $tmpstr = $this->stringRightTrim($tmpstr);
                            }
                            $this->Cell($w, $h, $tmpstr, 0, 1, $align, $fill, $link, $stretch);
                            unset($tmpstr);
                            if ($firstline) {
                                $this->cell_padding = $tmpcellpadding;
                                return ($this->UniArrSubString($uchars, $i));
                            }
                            $j = $i;
                            --$i;
                        } else {
                            // word wrapping
                            if ($shy) {
                                // add hypen (minus symbol) at the end of the line
                                $shy_width = $tmp_shy_replacement_width;
                                if ($this->rtl) {
                                    $shy_char_left = $tmp_shy_replacement_char;
                                    $shy_char_right = '';
                                } else {
                                    $shy_char_left = '';
                                    $shy_char_right = $tmp_shy_replacement_char;
                                }
                            } else {
                                $shy_width = 0;
                                $shy_char_left = '';
                                $shy_char_right = '';
                            }
                            $tmpstr = $this->UniArrSubString($uchars, $j, ($sep + $endspace));
                            if ($firstline) {
                                $startx = $this->x;
                                $tmparr = array_slice($chars, $j, (($sep + $endspace) - $j));
                                if ($rtlmode) {
                                    $tmparr = $this->utf8Bidi($tmparr, $tmpstr, $this->tmprtl);
                                }
                                $linew = $this->GetArrStringWidth($tmparr);
                                unset($tmparr);
                                if ($this->rtl) {
                                    $this->endlinex = $startx - $linew - $shy_width;
                                } else {
                                    $this->endlinex = $startx + $linew + $shy_width;
                                }
                                $w = $linew;
                                $tmpcellpadding = $this->cell_padding;
                                if ($maxh == 0) {
                                    $this->SetCellPadding(0);
                                }
                            }
                            // print the line
                            if ($firstblock AND $this->isRTLTextDir()) {
                                $tmpstr = $this->stringRightTrim($tmpstr);
                            }
                            $this->Cell($w, $h, $shy_char_left . $tmpstr . $shy_char_right, 0, 1, $align, $fill, $link, $stretch);
                            unset($tmpstr);
                            if ($firstline) {
                                if ($chars[$sep] == 45) {
                                    $endspace += 1;
                                }
                                // return the remaining text
                                $this->cell_padding = $tmpcellpadding;
                                return ($this->UniArrSubString($uchars, ($sep + $endspace)));
                            }
                            $i = $sep;
                            $sep = -1;
                            $shy = false;
                            $j = ($i + 1);
                        }
                    }
                    // account for margin changes
                    if ((($this->y + $this->lasth) > $this->PageBreakTrigger) AND ($this->inPageBody())) {
                        $this->AcceptPageBreak();
                        if ($this->rtl) {
                            $this->x -= $margin['R'];
                        } else {
                            $this->x += $margin['L'];
                        }
                        $this->lMargin += $margin['L'];
                        $this->rMargin += $margin['R'];
                    }
                    $w = $this->getRemainingWidth();
                    $wmax = $w - $this->cell_padding['L'] - $this->cell_padding['R'];
                    if ($linebreak) {
                        $linebreak = false;
                    } else {
                        ++$nl;
                        $l = 0;
                    }
                }
            }
            // save last character
            $pc = $c;
            ++$i;
        } // end while i < nb
        // print last substring (if any)
        if ($l > 0) {
            switch ($align) {
                case 'J':
                case 'C': {
                        $w = $w;
                        break;
                    }
                case 'L': {
                        if ($this->rtl) {
                            $w = $w;
                        } else {
                            $w = $l;
                        }
                        break;
                    }
                case 'R': {
                        if ($this->rtl) {
                            $w = $l;
                        } else {
                            $w = $w;
                        }
                        break;
                    }
                default: {
                        $w = $l;
                        break;
                    }
            }
            $tmpstr = $this->UniArrSubString($uchars, $j, $nb);
            if ($firstline) {
                $startx = $this->x;
                $tmparr = array_slice($chars, $j, ($nb - $j));
                if ($rtlmode) {
                    $tmparr = $this->utf8Bidi($tmparr, $tmpstr, $this->tmprtl);
                }
                $linew = $this->GetArrStringWidth($tmparr);
                unset($tmparr);
                if ($this->rtl) {
                    $this->endlinex = $startx - $linew;
                } else {
                    $this->endlinex = $startx + $linew;
                }
                $w = $linew;
                $tmpcellpadding = $this->cell_padding;
                if ($maxh == 0) {
                    $this->SetCellPadding(0);
                }
            }
            if ($firstblock AND $this->isRTLTextDir()) {
                $tmpstr = $this->stringRightTrim($tmpstr);
            }
            $this->Cell($w, $h, $tmpstr, 0, $ln, $align, $fill, $link, $stretch);
            unset($tmpstr);
            if ($firstline) {
                $this->cell_padding = $tmpcellpadding;
                return ($this->UniArrSubString($uchars, $nb));
            }
            ++$nl;
        }
        if ($firstline) {
            return '';
        }
        return $nl;
    }

    /**
     * Returns the remaining width between the current position and margins.
     * @return int Return the remaining width
     * @protected
     */
    protected function getRemainingWidth() {
        list($this->x, $this->y) = $this->checkPageRegions(0, $this->x, $this->y);
        if ($this->rtl) {
            return ($this->x - $this->lMargin);
        } else {
            return ($this->w - $this->rMargin - $this->x);
        }
    }

    /**
     * Extract a slice of the $strarr array and return it as string.
     * @param $strarr (string) The input array of characters.
     * @param $start (int) the starting element of $strarr.
     * @param $end (int) first element that will not be returned.
     * @return Return part of a string
     * @public
     */
    public function UTF8ArrSubString($strarr, $start = '', $end = '') {
        if (strlen($start) == 0) {
            $start = 0;
        }
        if (strlen($end) == 0) {
            $end = count($strarr);
        }
        $string = '';
        for ($i = $start; $i < $end; ++$i) {
            $string .= $this->unichr($strarr[$i]);
        }
        return $string;
    }

    /**
     * Extract a slice of the $uniarr array and return it as string.
     * @param $uniarr (string) The input array of characters.
     * @param $start (int) the starting element of $strarr.
     * @param $end (int) first element that will not be returned.
     * @return Return part of a string
     * @public
     * @since 4.5.037 (2009-04-07)
     */
    public function UniArrSubString($uniarr, $start = '', $end = '') {
        if (strlen($start) == 0) {
            $start = 0;
        }
        if (strlen($end) == 0) {
            $end = count($uniarr);
        }
        $string = '';
        for ($i = $start; $i < $end; ++$i) {
            $string .= $uniarr[$i];
        }
        return $string;
    }

    /**
     * Convert an array of UTF8 values to array of unicode characters
     * @param $ta (string) The input array of UTF8 values.
     * @return Return array of unicode characters
     * @public
     * @since 4.5.037 (2009-04-07)
     */
    public function UTF8ArrayToUniArray($ta) {
        return array_map(array($this, 'unichr'), $ta);
    }

    /**
     * Returns the unicode caracter specified by UTF-8 value
     * @param $c (int) UTF-8 value
     * @return Returns the specified character.
     * @author Miguel Perez, Nicola Asuni
     * @public
     * @since 2.3.000 (2008-03-05)
     */
    public function unichr($c) {
        if (!$this->isunicode) {
            return chr($c);
        } elseif ($c <= 0x7F) {
            // one byte
            return chr($c);
        } elseif ($c <= 0x7FF) {
            // two bytes
            return chr(0xC0 | $c >> 6) . chr(0x80 | $c & 0x3F);
        } elseif ($c <= 0xFFFF) {
            // three bytes
            return chr(0xE0 | $c >> 12) . chr(0x80 | $c >> 6 & 0x3F) . chr(0x80 | $c & 0x3F);
        } elseif ($c <= 0x10FFFF) {
            // four bytes
            return chr(0xF0 | $c >> 18) . chr(0x80 | $c >> 12 & 0x3F) . chr(0x80 | $c >> 6 & 0x3F) . chr(0x80 | $c & 0x3F);
        } else {
            return '';
        }
    }

    /**
     * Return the image type given the file name or array returned by getimagesize() function.
     * @param $imgfile (string) image file name
     * @param $iminfo (array) array of image information returned by getimagesize() function.
     * @return string image type
     * @since 4.8.017 (2009-11-27)
     */
    public function getImageFileType($imgfile, $iminfo = array()) {
        $type = '';
        if (isset($iminfo['mime']) AND !empty($iminfo['mime'])) {
            $mime = explode('/', $iminfo['mime']);
            if ((count($mime) > 1) AND ($mime[0] == 'image') AND (!empty($mime[1]))) {
                $type = strtolower(trim($mime[1]));
            }
        }
        if (empty($type)) {
            $fileinfo = pathinfo($imgfile);
            if (isset($fileinfo['extension']) AND (!$this->empty_string($fileinfo['extension']))) {
                $type = strtolower(trim($fileinfo['extension']));
            }
        }
        if ($type == 'jpg') {
            $type = 'jpeg';
        }
        return $type;
    }

    /**
     * Set the block dimensions accounting for page breaks and page/column fitting
     * @param $w (float) width
     * @param $h (float) height
     * @param $x (float) X coordinate
     * @param $y (float) Y coodiante
     * @param $fitonpage (boolean) if true the block is resized to not exceed page dimensions.
     * @return array($w, $h, $x, $y)
     * @protected
     * @since 5.5.009 (2010-07-05)
     */
    protected function fitBlock($w, $h, $x, $y, $fitonpage = false) {
        if ($w <= 0) {
            // set maximum width
            $w = ($this->w - $this->lMargin - $this->rMargin);
        }
        if ($h <= 0) {
            // set maximum height
            $h = ($this->PageBreakTrigger - $this->tMargin);
        }
        // resize the block to be vertically contained on a single page or single column
        if ($fitonpage OR $this->AutoPageBreak) {
            $ratio_wh = ($w / $h);
            if ($h > ($this->PageBreakTrigger - $this->tMargin)) {
                $h = $this->PageBreakTrigger - $this->tMargin;
                $w = ($h * $ratio_wh);
            }
            // resize the block to be horizontally contained on a single page or single column
            if ($fitonpage) {
                $maxw = ($this->w - $this->lMargin - $this->rMargin);
                if ($w > $maxw) {
                    $w = $maxw;
                    $h = ($w / $ratio_wh);
                }
            }
        }
        // Check whether we need a new page or new column first as this does not fit
        $prev_x = $this->x;
        $prev_y = $this->y;
        if ($this->checkPageBreak($h, $y) OR ($this->y < $prev_y)) {
            $y = $this->y;
            if ($this->rtl) {
                $x += ($prev_x - $this->x);
            } else {
                $x += ($this->x - $prev_x);
            }
            $this->newline = true;
        }
        // resize the block to be contained on the remaining available page or column space
        if ($fitonpage) {
            $ratio_wh = ($w / $h);
            if (($y + $h) > $this->PageBreakTrigger) {
                $h = $this->PageBreakTrigger - $y;
                $w = ($h * $ratio_wh);
            }
            if ((!$this->rtl) AND (($x + $w) > ($this->w - $this->rMargin))) {
                $w = $this->w - $this->rMargin - $x;
                $h = ($w / $ratio_wh);
            } elseif (($this->rtl) AND (($x - $w) < ($this->lMargin))) {
                $w = $x - $this->lMargin;
                $h = ($w / $ratio_wh);
            }
        }
        return array($w, $h, $x, $y);
    }

    /**
     * Puts an image in the page.
     * The upper-left corner must be given.
     * The dimensions can be specified in different ways:<ul>
     * <li>explicit width and height (expressed in user unit)</li>
     * <li>one explicit dimension, the other being calculated automatically in order to keep the original proportions</li>
     * <li>no explicit dimension, in which case the image is put at 72 dpi</li></ul>
     * Supported formats are JPEG and PNG images whitout GD library and all images supported by GD: GD, GD2, GD2PART, GIF, JPEG, PNG, BMP, XBM, XPM;
     * The format can be specified explicitly or inferred from the file extension.<br />
     * It is possible to put a link on the image.<br />
     * Remark: if an image is used several times, only one copy will be embedded in the file.<br />
     * @param $file (string) Name of the file containing the image or a '@' character followed by the image data string. To link an image without embedding it on the document, set an asterisk character before the URL (i.e.: '*http://www.example.com/image.jpg').
     * @param $x (float) Abscissa of the upper-left corner (LTR) or upper-right corner (RTL).
     * @param $y (float) Ordinate of the upper-left corner (LTR) or upper-right corner (RTL).
     * @param $w (float) Width of the image in the page. If not specified or equal to zero, it is automatically calculated.
     * @param $h (float) Height of the image in the page. If not specified or equal to zero, it is automatically calculated.
     * @param $type (string) Image format. Possible values are (case insensitive): JPEG and PNG (whitout GD library) and all images supported by GD: GD, GD2, GD2PART, GIF, JPEG, PNG, BMP, XBM, XPM;. If not specified, the type is inferred from the file extension.
     * @param $link (mixed) URL or identifier returned by AddLink().
     * @param $align (string) Indicates the alignment of the pointer next to image insertion relative to image height. The value can be:<ul><li>T: top-right for LTR or top-left for RTL</li><li>M: middle-right for LTR or middle-left for RTL</li><li>B: bottom-right for LTR or bottom-left for RTL</li><li>N: next line</li></ul>
     * @param $resize (mixed) If true resize (reduce) the image to fit $w and $h (requires GD or ImageMagick library); if false do not resize; if 2 force resize in all cases (upscaling and downscaling).
     * @param $dpi (int) dot-per-inch resolution used on resize
     * @param $palign (string) Allows to center or align the image on the current line. Possible values are:<ul><li>L : left align</li><li>C : center</li><li>R : right align</li><li>'' : empty string : left for LTR or right for RTL</li></ul>
     * @param $ismask (boolean) true if this image is a mask, false otherwise
     * @param $imgmask (mixed) image object returned by this function or false
     * @param $border (mixed) Indicates if borders must be drawn around the cell. The value can be a number:<ul><li>0: no border (default)</li><li>1: frame</li></ul> or a string containing some or all of the following characters (in any order):<ul><li>L: left</li><li>T: top</li><li>R: right</li><li>B: bottom</li></ul> or an array of line styles for each border group - for example: array('LTRB' => array('width' => 2, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(0, 0, 0)))
     * @param $fitbox (mixed) If not false scale image dimensions proportionally to fit within the ($w, $h) box. $fitbox can be true or a 2 characters string indicating the image alignment inside the box. The first character indicate the horizontal alignment (L = left, C = center, R = right) the second character indicate the vertical algnment (T = top, M = middle, B = bottom).
     * @param $hidden (boolean) If true do not display the image.
     * @param $fitonpage (boolean) If true the image is resized to not exceed page dimensions.
     * @param $alt (boolean) If true the image will be added as alternative and not directly printed (the ID of the image will be returned).
     * @param $altimgs (array) Array of alternate images IDs. Each alternative image must be an array with two values: an integer representing the image ID (the value returned by the Image method) and a boolean value to indicate if the image is the default for printing.
     * @return image information
     * @public
     * @since 1.1
     */
    public function Image($file, $x = '', $y = '', $w = 0, $h = 0, $type = '', $link = '', $align = '', $resize = false, $dpi = 300, $palign = '', $ismask = false, $imgmask = false, $border = 0, $fitbox = false, $hidden = false, $fitonpage = false, $alt = false, $altimgs = array()) {
        if ($this->state != 2) {
            return;
        }
        if ($x === '') {
            $x = $this->x;
        }
        if ($y === '') {
            $y = $this->y;
        }
        // check page for no-write regions and adapt page margins if necessary
        list($x, $y) = $this->checkPageRegions($h, $x, $y);
        $exurl = ''; // external streams
        // check if we are passing an image as file or string
        if ($file[0] === '@') {
            // image from string
            $imgdata = substr($file, 1);
            $file = $this->getObjFilename('img');
            $fp = fopen($file, 'w');
            fwrite($fp, $imgdata);
            fclose($fp);
            unset($imgdata);
            $imsize = @getimagesize($file);
            if ($imsize === FALSE) {
                unlink($file);
            } else {
                $this->cached_files[] = $file;
            }
        } else { // image file
            if ($file{0} === '*') {
                // image as external stream
                $file = substr($file, 1);
                $exurl = $file;
            }
            // check if is local file
            if (!@file_exists($file)) {
                // encode spaces on filename (file is probably an URL)
                $file = str_replace(' ', '%20', $file);
            }
            if (@file_exists($file)) {
                // get image dimensions
                $imsize = @getimagesize($file);
            } else {
                $imsize = false;
            }
            if ($imsize === FALSE) {
                if (function_exists('curl_init')) {
                    // try to get remote file data using cURL
                    $cs = curl_init(); // curl session
                    curl_setopt($cs, CURLOPT_URL, $file);
                    curl_setopt($cs, CURLOPT_BINARYTRANSFER, true);
                    curl_setopt($cs, CURLOPT_FAILONERROR, true);
                    curl_setopt($cs, CURLOPT_RETURNTRANSFER, true);
                    if ((ini_get('open_basedir') == '') AND (!ini_get('safe_mode'))) {
                        curl_setopt($cs, CURLOPT_FOLLOWLOCATION, true);
                    }
                    curl_setopt($cs, CURLOPT_CONNECTTIMEOUT, 5);
                    curl_setopt($cs, CURLOPT_TIMEOUT, 30);
                    curl_setopt($cs, CURLOPT_SSL_VERIFYPEER, false);
                    curl_setopt($cs, CURLOPT_SSL_VERIFYHOST, false);
                    curl_setopt($cs, CURLOPT_USERAGENT, 'TCPDF');
                    $imgdata = curl_exec($cs);
                    curl_close($cs);
                    if ($imgdata !== FALSE) {
                        // copy image to cache
                        $file = $this->getObjFilename('img');
                        $fp = fopen($file, 'w');
                        fwrite($fp, $imgdata);
                        fclose($fp);
                        unset($imgdata);
                        $imsize = @getimagesize($file);
                        if ($imsize === FALSE) {
                            unlink($file);
                        } else {
                            $this->cached_files[] = $file;
                        }
                    }
                } elseif (($w > 0) AND ($h > 0)) {
                    // get measures from specified data
                    $pw = $this->getHTMLUnitToUnits($w, 0, $this->pdfunit, true) * $this->imgscale * $this->k;
                    $ph = $this->getHTMLUnitToUnits($h, 0, $this->pdfunit, true) * $this->imgscale * $this->k;
                    $imsize = array($pw, $ph);
                }
            }
        }
        if ($imsize === FALSE) {
            if (substr($file, 0, -34) == K_PATH_CACHE . 'msk') { // mask file
                // get measures from specified data
                $pw = $this->getHTMLUnitToUnits($w, 0, $this->pdfunit, true) * $this->imgscale * $this->k;
                $ph = $this->getHTMLUnitToUnits($h, 0, $this->pdfunit, true) * $this->imgscale * $this->k;
                $imsize = array($pw, $ph);
            } else {
                $this->Error('[Image] Unable to get image: ' . $file);
            }
        }
        // file hash
        $filehash = md5($this->file_id . $file);
        // get original image width and height in pixels
        list($pixw, $pixh) = $imsize;
        // calculate image width and height on document
        if (($w <= 0) AND ($h <= 0)) {
            // convert image size to document unit
            $w = $this->pixelsToUnits($pixw);
            $h = $this->pixelsToUnits($pixh);
        } elseif ($w <= 0) {
            $w = $h * $pixw / $pixh;
        } elseif ($h <= 0) {
            $h = $w * $pixh / $pixw;
        } elseif (($fitbox !== false) AND ($w > 0) AND ($h > 0)) {
            if (strlen($fitbox) !== 2) {
                // set default alignment
                $fitbox = '--';
            }
            // scale image dimensions proportionally to fit within the ($w, $h) box
            if ((($w * $pixh) / ($h * $pixw)) < 1) {
                // store current height
                $oldh = $h;
                // calculate new height
                $h = $w * $pixh / $pixw;
                // height difference
                $hdiff = ($oldh - $h);
                // vertical alignment
                switch (strtoupper($fitbox{1})) {
                    case 'T': {
                            break;
                        }
                    case 'M': {
                            $y += ($hdiff / 2);
                            break;
                        }
                    case 'B': {
                            $y += $hdiff;
                            break;
                        }
                }
            } else {
                // store current width
                $oldw = $w;
                // calculate new width
                $w = $h * $pixw / $pixh;
                // width difference
                $wdiff = ($oldw - $w);
                // horizontal alignment
                switch (strtoupper($fitbox{0})) {
                    case 'L': {
                            if ($this->rtl) {
                                $x -= $wdiff;
                            }
                            break;
                        }
                    case 'C': {
                            if ($this->rtl) {
                                $x -= ($wdiff / 2);
                            } else {
                                $x += ($wdiff / 2);
                            }
                            break;
                        }
                    case 'R': {
                            if (!$this->rtl) {
                                $x += $wdiff;
                            }
                            break;
                        }
                }
            }
        }
        // fit the image on available space
        list($w, $h, $x, $y) = $this->fitBlock($w, $h, $x, $y, $fitonpage);
        // calculate new minimum dimensions in pixels
        $neww = round($w * $this->k * $dpi / $this->dpi);
        $newh = round($h * $this->k * $dpi / $this->dpi);
        // check if resize is necessary (resize is used only to reduce the image)
        $newsize = ($neww * $newh);
        $pixsize = ($pixw * $pixh);
        if (intval($resize) == 2) {
            $resize = true;
        } elseif ($newsize >= $pixsize) {
            $resize = false;
        }
        // check if image has been already added on document
        $newimage = true;
        if (in_array($file, $this->imagekeys)) {
            $newimage = false;
            // get existing image data
            $info = $this->getImageBuffer($file);
            if (substr($file, 0, -34) != K_PATH_CACHE . 'msk') {
                // check if the newer image is larger
                $oldsize = ($info['w'] * $info['h']);
                if ((($oldsize < $newsize) AND ($resize)) OR (($oldsize < $pixsize) AND (!$resize))) {
                    $newimage = true;
                }
            }
        } elseif (substr($file, 0, -34) != K_PATH_CACHE . 'msk') {
            // check for cached images with alpha channel
            $tempfile_plain = K_PATH_CACHE . 'mskp_' . $filehash;
            $tempfile_alpha = K_PATH_CACHE . 'mska_' . $filehash;
            if (in_array($tempfile_plain, $this->imagekeys)) {
                // get existing image data
                $info = $this->getImageBuffer($tempfile_plain);
                // check if the newer image is larger
                $oldsize = ($info['w'] * $info['h']);
                if ((($oldsize < $newsize) AND ($resize)) OR (($oldsize < $pixsize) AND (!$resize))) {
                    $newimage = true;
                } else {
                    $newimage = false;
                    // embed mask image
                    $imgmask = $this->Image($tempfile_alpha, $x, $y, $w, $h, 'PNG', '', '', $resize, $dpi, '', true, false);
                    // embed image, masked with previously embedded mask
                    return $this->Image($tempfile_plain, $x, $y, $w, $h, $type, $link, $align, $resize, $dpi, $palign, false, $imgmask);
                }
            }
        }
        if ($newimage) {
            //First use of image, get info
            $type = strtolower($type);
            if ($type == '') {
                $type = $this->getImageFileType($file, $imsize);
            } elseif ($type == 'jpg') {
                $type = 'jpeg';
            }
            $mqr = $this->get_mqr();
            $this->set_mqr(false);
            // Specific image handlers
            $mtd = '_parse' . $type;
            // GD image handler function
            $gdfunction = 'imagecreatefrom' . $type;
            $info = false;
            if ((method_exists($this, $mtd)) AND (!($resize AND (function_exists($gdfunction) OR extension_loaded('imagick'))))) {
                // TCPDF image functions
                $info = $this->$mtd($file);
                if ($info == 'pngalpha') {
                    return $this->ImagePngAlpha($file, $x, $y, $pixw, $pixh, $w, $h, 'PNG', $link, $align, $resize, $dpi, $palign, $filehash);
                }
            }
            if (!$info) {
                if (function_exists($gdfunction)) {
                    // GD library
                    $img = $gdfunction($file);
                    if ($resize) {
                        $imgr = imagecreatetruecolor($neww, $newh);
                        if (($type == 'gif') OR ($type == 'png')) {
                            $imgr = $this->_setGDImageTransparency($imgr, $img);
                        }
                        imagecopyresampled($imgr, $img, 0, 0, 0, 0, $neww, $newh, $pixw, $pixh);
                        if (($type == 'gif') OR ($type == 'png')) {
                            $info = $this->_toPNG($imgr);
                        } else {
                            $info = $this->_toJPEG($imgr);
                        }
                    } else {
                        if (($type == 'gif') OR ($type == 'png')) {
                            $info = $this->_toPNG($img);
                        } else {
                            $info = $this->_toJPEG($img);
                        }
                    }
                } elseif (extension_loaded('imagick')) {
                    // ImageMagick library
                    $img = new Imagick();
                    if ($type == 'SVG') {
                        // get SVG file content
                        $svgimg = file_get_contents($file);
                        // get width and height
                        $regs = array();
                        if (preg_match('/<svg([^\>]*)>/si', $svgimg, $regs)) {
                            $svgtag = $regs[1];
                            $tmp = array();
                            if (preg_match('/[\s]+width[\s]*=[\s]*"([^"]*)"/si', $svgtag, $tmp)) {
                                $ow = $this->getHTMLUnitToUnits($tmp[1], 1, $this->svgunit, false);
                                $owu = sprintf('%F', ($ow * $dpi / 72)) . $this->pdfunit;
                                $svgtag = preg_replace('/[\s]+width[\s]*=[\s]*"[^"]*"/si', ' width="' . $owu . '"', $svgtag, 1);
                            } else {
                                $ow = $w;
                            }
                            $tmp = array();
                            if (preg_match('/[\s]+height[\s]*=[\s]*"([^"]*)"/si', $svgtag, $tmp)) {
                                $oh = $this->getHTMLUnitToUnits($tmp[1], 1, $this->svgunit, false);
                                $ohu = sprintf('%F', ($oh * $dpi / 72)) . $this->pdfunit;
                                $svgtag = preg_replace('/[\s]+height[\s]*=[\s]*"[^"]*"/si', ' height="' . $ohu . '"', $svgtag, 1);
                            } else {
                                $oh = $h;
                            }
                            $tmp = array();
                            if (!preg_match('/[\s]+viewBox[\s]*=[\s]*"[\s]*([0-9\.]+)[\s]+([0-9\.]+)[\s]+([0-9\.]+)[\s]+([0-9\.]+)[\s]*"/si', $svgtag, $tmp)) {
                                $vbw = ($ow * $this->imgscale * $this->k);
                                $vbh = ($oh * $this->imgscale * $this->k);
                                $vbox = sprintf(' viewBox="0 0 %F %F" ', $vbw, $vbh);
                                $svgtag = $vbox . $svgtag;
                            }
                            $svgimg = preg_replace('/<svg([^\>]*)>/si', '<svg' . $svgtag . '>', $svgimg, 1);
                        }
                        $img->readImageBlob($svgimg);
                    } else {
                        $img->readImage($file);
                    }
                    if ($resize) {
                        $img->resizeImage($neww, $newh, 10, 1, false);
                    }
                    $img->setCompressionQuality($this->jpeg_quality);
                    $img->setImageFormat('jpeg');
                    $tempname = tempnam(K_PATH_CACHE, 'jpg_');
                    $img->writeImage($tempname);
                    $info = $this->_parsejpeg($tempname);
                    unlink($tempname);
                    $img->destroy();
                } else {
                    return;
                }
            }
            if ($info === false) {
                //If false, we cannot process image
                return;
            }
            $this->set_mqr($mqr);
            if ($ismask) {
                // force grayscale
                $info['cs'] = 'DeviceGray';
            }
            if ($imgmask !== false) {
                $info['masked'] = $imgmask;
            }
            if (!empty($exurl)) {
                $info['exurl'] = $exurl;
            }
            // array of alternative images
            $info['altimgs'] = $altimgs;
            // add image to document
            $info['i'] = $this->setImageBuffer($file, $info);
        }
        // set alignment
        $this->img_rb_y = $y + $h;
        // set alignment
        if ($this->rtl) {
            if ($palign == 'L') {
                $ximg = $this->lMargin;
            } elseif ($palign == 'C') {
                $ximg = ($this->w + $this->lMargin - $this->rMargin - $w) / 2;
            } elseif ($palign == 'R') {
                $ximg = $this->w - $this->rMargin - $w;
            } else {
                $ximg = $x - $w;
            }
            $this->img_rb_x = $ximg;
        } else {
            if ($palign == 'L') {
                $ximg = $this->lMargin;
            } elseif ($palign == 'C') {
                $ximg = ($this->w + $this->lMargin - $this->rMargin - $w) / 2;
            } elseif ($palign == 'R') {
                $ximg = $this->w - $this->rMargin - $w;
            } else {
                $ximg = $x;
            }
            $this->img_rb_x = $ximg + $w;
        }
        if ($ismask OR $hidden) {
            // image is not displayed
            return $info['i'];
        }
        $xkimg = $ximg * $this->k;
        if (!$alt) {
            // only non-alternative immages will be set
            $this->_out(sprintf('q %F 0 0 %F %F %F cm /I%u Do Q', ($w * $this->k), ($h * $this->k), $xkimg, (($this->h - ($y + $h)) * $this->k), $info['i']));
        }
        if (!empty($border)) {
            $bx = $this->x;
            $by = $this->y;
            $this->x = $ximg;
            if ($this->rtl) {
                $this->x += $w;
            }
            $this->y = $y;
            $this->Cell($w, $h, '', $border, 0, '', 0, '', 0, true);
            $this->x = $bx;
            $this->y = $by;
        }
        if ($link) {
            $this->Link($ximg, $y, $w, $h, $link, 0);
        }
        // set pointer to align the next text/objects
        switch ($align) {
            case 'T': {
                    $this->y = $y;
                    $this->x = $this->img_rb_x;
                    break;
                }
            case 'M': {
                    $this->y = $y + round($h / 2);
                    $this->x = $this->img_rb_x;
                    break;
                }
            case 'B': {
                    $this->y = $this->img_rb_y;
                    $this->x = $this->img_rb_x;
                    break;
                }
            case 'N': {
                    $this->SetY($this->img_rb_y);
                    break;
                }
            default: {
                    break;
                }
        }
        $this->endlinex = $this->img_rb_x;
        if ($this->inxobj) {
            // we are inside an XObject template
            $this->xobjects[$this->xobjid]['images'][] = $info['i'];
        }
        return $info['i'];
    }

    /**
     * Sets the current active configuration setting of magic_quotes_runtime (if the set_magic_quotes_runtime function exist)
     * @param $mqr (boolean) FALSE for off, TRUE for on.
     * @since 4.6.025 (2009-08-17)
     */
    public function set_mqr($mqr) {
        if (!defined('PHP_VERSION_ID')) {
            $version = PHP_VERSION;
            define('PHP_VERSION_ID', (($version{0} * 10000) + ($version{2} * 100) + $version{4}));
        }
        if (PHP_VERSION_ID < 50300) {
            @set_magic_quotes_runtime($mqr);
        }
    }

    /**
     * Gets the current active configuration setting of magic_quotes_runtime (if the get_magic_quotes_runtime function exist)
     * @return Returns 0 if magic quotes runtime is off or get_magic_quotes_runtime doesn't exist, 1 otherwise.
     * @since 4.6.025 (2009-08-17)
     */
    public function get_mqr() {
        if (!defined('PHP_VERSION_ID')) {
            $version = PHP_VERSION;
            define('PHP_VERSION_ID', (($version{0} * 10000) + ($version{2} * 100) + $version{4}));
        }
        if (PHP_VERSION_ID < 50300) {
            return @get_magic_quotes_runtime();
        }
        return 0;
    }

    /**
     * Convert the loaded image to a JPEG and then return a structure for the PDF creator.
     * This function requires GD library and write access to the directory defined on K_PATH_CACHE constant.
     * @param $image (image) Image object.
     * return image JPEG image object.
     * @protected
     */
    protected function _toJPEG($image) {
        $tempname = tempnam(K_PATH_CACHE, 'jpg_');
        imagejpeg($image, $tempname, $this->jpeg_quality);
        imagedestroy($image);
        $retvars = $this->_parsejpeg($tempname);
        // tidy up by removing temporary image
        unlink($tempname);
        return $retvars;
    }

    /**
     * Convert the loaded image to a PNG and then return a structure for the PDF creator.
     * This function requires GD library and write access to the directory defined on K_PATH_CACHE constant.
     * @param $image (image) Image object.
     * return image PNG image object.
     * @protected
     * @since 4.9.016 (2010-04-20)
     */
    protected function _toPNG($image) {
        // set temporary image file name
        $tempname = tempnam(K_PATH_CACHE, 'jpg_');
        // turn off interlaced mode
        imageinterlace($image, 0);
        // create temporary PNG image
        imagepng($image, $tempname);
        // remove image from memory
        imagedestroy($image);
        // get PNG image data
        $retvars = $this->_parsepng($tempname);
        // tidy up by removing temporary image
        unlink($tempname);
        return $retvars;
    }

    /**
     * Set the transparency for the given GD image.
     * @param $new_image (image) GD image object
     * @param $image (image) GD image object.
     * return GD image object.
     * @protected
     * @since 4.9.016 (2010-04-20)
     */
    protected function _setGDImageTransparency($new_image, $image) {
        // transparency index
        $tid = imagecolortransparent($image);
        // default transparency color
        $tcol = array('red' => 255, 'green' => 255, 'blue' => 255);
        if ($tid >= 0) {
            // get the colors for the transparency index
            $tcol = imagecolorsforindex($image, $tid);
        }
        $tid = imagecolorallocate($new_image, $tcol['red'], $tcol['green'], $tcol['blue']);
        imagefill($new_image, 0, 0, $tid);
        imagecolortransparent($new_image, $tid);
        return $new_image;
    }

    /**
     * Extract info from a JPEG file without using the GD library.
     * @param $file (string) image file to parse
     * @return array structure containing the image data
     * @protected
     */
    protected function _parsejpeg($file) {
        $a = getimagesize($file);
        if (empty($a)) {
            $this->Error('Missing or incorrect image file: ' . $file);
        }
        if ($a[2] != 2) {
            $this->Error('Not a JPEG file: ' . $file);
        }
        // bits per pixel
        $bpc = isset($a['bits']) ? intval($a['bits']) : 8;
        // number of image channels
        if (!isset($a['channels'])) {
            $channels = 3;
        } else {
            $channels = intval($a['channels']);
        }
        // default colour space
        switch ($channels) {
            case 1: {
                    $colspace = 'DeviceGray';
                    break;
                }
            case 3: {
                    $colspace = 'DeviceRGB';
                    break;
                }
            case 4: {
                    $colspace = 'DeviceCMYK';
                    break;
                }
            default: {
                    $channels = 3;
                    $colspace = 'DeviceRGB';
                    break;
                }
        }
        // get file content
        $data = file_get_contents($file);
        // check for embedded ICC profile
        $icc = array();
        $offset = 0;
        while (($pos = strpos($data, "ICC_PROFILE\0", $offset)) !== false) {
            // get ICC sequence length
            $length = ($this->_getUSHORT($data, ($pos - 2)) - 16);
            // marker sequence number
            $msn = max(1, ord($data[($pos + 12)]));
            // number of markers (total of APP2 used)
            $nom = max(1, ord($data[($pos + 13)]));
            // get sequence segment
            $icc[($msn - 1)] = substr($data, ($pos + 14), $length);
            // move forward to next sequence
            $offset = ($pos + 14 + $length);
        }
        // order and compact ICC segments
        if (count($icc) > 0) {
            ksort($icc);
            $icc = implode('', $icc);
            if ((ord($icc{36}) != 0x61) OR (ord($icc{37}) != 0x63) OR (ord($icc{38}) != 0x73) OR (ord($icc{39}) != 0x70)) {
                // invalid ICC profile
                $icc = false;
            }
        } else {
            $icc = false;
        }
        return array('w' => $a[0], 'h' => $a[1], 'ch' => $channels, 'icc' => $icc, 'cs' => $colspace, 'bpc' => $bpc, 'f' => 'DCTDecode', 'data' => $data);
    }

    /**
     * Extract info from a PNG file without using the GD library.
     * @param $file (string) image file to parse
     * @return array structure containing the image data
     * @protected
     */
    protected function _parsepng($file) {
        $f = fopen($file, 'rb');
        if ($f === false) {
            $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);
            fclose($f);
            return false;
        }
        $ct = ord(fread($f, 1));
        if ($ct == 0) {
            $colspace = 'DeviceGray';
        } elseif ($ct == 2) {
            $colspace = 'DeviceRGB';
        } elseif ($ct == 3) {
            $colspace = 'Indexed';
        } else {
            // alpha channel
            fclose($f);
            return 'pngalpha';
        }
        if (ord(fread($f, 1)) != 0) {
            //$this->Error('Unknown compression method: '.$file);
            fclose($f);
            return false;
        }
        if (ord(fread($f, 1)) != 0) {
            //$this->Error('Unknown filter method: '.$file);
            fclose($f);
            return false;
        }
        if (ord(fread($f, 1)) != 0) {
            //$this->Error('Interlacing not supported: '.$file);
            fclose($f);
            return false;
        }
        fread($f, 4);
        $channels = ($ct == 2 ? 3 : 1);
        $parms = '/DecodeParms << /Predictor 15 /Colors ' . $channels . ' /BitsPerComponent ' . $bpc . ' /Columns ' . $w . ' >>';
        //Scan chunks looking for palette, transparency and image data
        $pal = '';
        $trns = '';
        $data = '';
        $icc = false;
        do {
            $n = $this->_freadint($f);
            $type = fread($f, 4);
            if ($type == 'PLTE') {
                // read palette
                $pal = $this->rfread($f, $n);
                fread($f, 4);
            } elseif ($type == 'tRNS') {
                // read transparency info
                $t = $this->rfread($f, $n);
                if ($ct == 0) {
                    $trns = array(ord($t{1}));
                } elseif ($ct == 2) {
                    $trns = array(ord($t{1}), ord($t{3}), ord($t{5}));
                } else {
                    $pos = strpos($t, chr(0));
                    if ($pos !== false) {
                        $trns = array($pos);
                    }
                }
                fread($f, 4);
            } elseif ($type == 'IDAT') {
                // read image data block
                $data .= $this->rfread($f, $n);
                fread($f, 4);
            } elseif ($type == 'iCCP') {
                // skip profile name
                $len = 0;
                while ((ord(fread($f, 1)) > 0) AND ($len < 80)) {
                    ++$len;
                }
                // skip null separator
                fread($f, 1);
                // get compression method
                if (ord(fread($f, 1)) != 0) {
                    //$this->Error('Unknown filter method: '.$file);
                    fclose($f);
                    return false;
                }
                // read ICC Color Profile
                $icc = $this->rfread($f, ($n - $len - 2));
                // decompress profile
                $icc = gzuncompress($icc);
                fread($f, 4);
            } elseif ($type == 'IEND') {
                break;
            } else {
                $this->rfread($f, $n + 4);
            }
        } while ($n);
        if (($colspace == 'Indexed') AND (empty($pal))) {
            //$this->Error('Missing palette in '.$file);
            fclose($f);
            return false;
        }
        fclose($f);
        return array('w' => $w, 'h' => $h, 'ch' => $channels, 'icc' => $icc, 'cs' => $colspace, 'bpc' => $bpc, 'f' => 'FlateDecode', 'parms' => $parms, 'pal' => $pal, 'trns' => $trns, 'data' => $data);
    }

    /**
     * Binary-safe and URL-safe file read.
     * Reads up to length bytes from the file pointer referenced by handle. Reading stops as soon as one of the following conditions is met: length bytes have been read; EOF (end of file) is reached.
     * @param $handle (resource)
     * @param $length (int)
     * @return Returns the read string or FALSE in case of error.
     * @author Nicola Asuni
     * @protected
     * @since 4.5.027 (2009-03-16)
     */
    protected function rfread($handle, $length) {
        $data = fread($handle, $length);
        if ($data === false) {
            return false;
        }
        $rest = $length - strlen($data);
        if ($rest > 0) {
            $data .= $this->rfread($handle, $rest);
        }
        return $data;
    }

    /**
     * Extract info from a PNG image with alpha channel using the GD library.
     * @param $file (string) Name of the file containing the image.
     * @param $x (float) Abscissa of the upper-left corner.
     * @param $y (float) Ordinate of the upper-left corner.
     * @param $wpx (float) Original width of the image in pixels.
     * @param $hpx (float) original height of the image in pixels.
     * @param $w (float) Width of the image in the page. If not specified or equal to zero, it is automatically calculated.
     * @param $h (float) Height of the image in the page. If not specified or equal to zero, it is automatically calculated.
     * @param $type (string) Image format. Possible values are (case insensitive): JPEG and PNG (whitout GD library) and all images supported by GD: GD, GD2, GD2PART, GIF, JPEG, PNG, BMP, XBM, XPM;. If not specified, the type is inferred from the file extension.
     * @param $link (mixed) URL or identifier returned by AddLink().
     * @param $align (string) Indicates the alignment of the pointer next to image insertion relative to image height. The value can be:<ul><li>T: top-right for LTR or top-left for RTL</li><li>M: middle-right for LTR or middle-left for RTL</li><li>B: bottom-right for LTR or bottom-left for RTL</li><li>N: next line</li></ul>
     * @param $resize (boolean) If true resize (reduce) the image to fit $w and $h (requires GD library).
     * @param $dpi (int) dot-per-inch resolution used on resize
     * @param $palign (string) Allows to center or align the image on the current line. Possible values are:<ul><li>L : left align</li><li>C : center</li><li>R : right align</li><li>'' : empty string : left for LTR or right for RTL</li></ul>
     * @param $filehash (string) File hash used to build unique file names.
     * @author Nicola Asuni
     * @protected
     * @since 4.3.007 (2008-12-04)
     * @see Image()
     */
    protected function ImagePngAlpha($file, $x, $y, $wpx, $hpx, $w, $h, $type, $link, $align, $resize, $dpi, $palign, $filehash = '') {
        if (empty($filehash)) {
            $filehash = md5($this->file_id . $file);
        }
        // create temp image file (without alpha channel)
        $tempfile_plain = K_PATH_CACHE . 'mskp_' . $filehash;
        // create temp alpha file
        $tempfile_alpha = K_PATH_CACHE . 'mska_' . $filehash;
        if (extension_loaded('imagick')) { // ImageMagick extension
            // ImageMagick library
            $img = new Imagick();
            $img->readImage($file);
            // clone image object
            $imga = $this->objclone($img);
            // extract alpha channel
            $img->separateImageChannel(8); // 8 = (imagick::CHANNEL_ALPHA | imagick::CHANNEL_OPACITY | imagick::CHANNEL_MATTE);
            $img->negateImage(true);
            $img->setImageFormat('png');
            $img->writeImage($tempfile_alpha);
            // remove alpha channel
            $imga->separateImageChannel(39); // 39 = (imagick::CHANNEL_ALL & ~(imagick::CHANNEL_ALPHA | imagick::CHANNEL_OPACITY | imagick::CHANNEL_MATTE));
            $imga->setImageFormat('png');
            $imga->writeImage($tempfile_plain);
        } elseif (function_exists('imagecreatefrompng')) { // GD extension
            // generate images
            $img = imagecreatefrompng($file);
            $imgalpha = imagecreate($wpx, $hpx);
            // generate gray scale palette (0 -> 255)
            for ($c = 0; $c < 256; ++$c) {
                ImageColorAllocate($imgalpha, $c, $c, $c);
            }
            // extract alpha channel
            for ($xpx = 0; $xpx < $wpx; ++$xpx) {
                for ($ypx = 0; $ypx < $hpx; ++$ypx) {
                    $color = imagecolorat($img, $xpx, $ypx);
                    $alpha = $this->getGDgamma($color); // correct gamma
                    imagesetpixel($imgalpha, $xpx, $ypx, $alpha);
                }
            }
            imagepng($imgalpha, $tempfile_alpha);
            imagedestroy($imgalpha);
            // extract image without alpha channel
            $imgplain = imagecreatetruecolor($wpx, $hpx);
            imagecopy($imgplain, $img, 0, 0, 0, 0, $wpx, $hpx);
            imagepng($imgplain, $tempfile_plain);
            imagedestroy($imgplain);
        } else {
            $this->Error('TCPDF requires the Imagick or GD extension to handle PNG images with alpha channel.');
        }
        // embed mask image
        $imgmask = $this->Image($tempfile_alpha, $x, $y, $w, $h, 'PNG', '', '', $resize, $dpi, '', true, false);
        // embed image, masked with previously embedded mask
        $this->Image($tempfile_plain, $x, $y, $w, $h, $type, $link, $align, $resize, $dpi, $palign, false, $imgmask);
        // remove temp files
        unlink($tempfile_alpha);
        unlink($tempfile_plain);
    }

    /**
     * Get the GD-corrected PNG gamma value from alpha color
     * @param $c (int) alpha color
     * @protected
     * @since 4.3.007 (2008-12-04)
     */
    protected function getGDgamma($c) {
        if (!isset($this->gdgammacache["'" . $c . "'"])) {
            // shifts off the first 24 bits (where 8x3 are used for each color),
            // and returns the remaining 7 allocated bits (commonly used for alpha)
            $alpha = ($c >> 24);
            // GD alpha is only 7 bit (0 -> 127)
            $alpha = (((127 - $alpha) / 127) * 255);
            // correct gamma
            $this->gdgammacache["'" . $c . "'"] = (pow(($alpha / 255), 2.2) * 255);
            // store the latest values on cache to improve performances
            if (count($this->gdgammacache) > 8) {
                // remove one element from the cache array
                array_shift($this->gdgammacache);
            }
        }
        return $this->gdgammacache["'" . $c . "'"];
    }

    /**
     * Performs a line break.
     * The current abscissa goes back to the left margin and the ordinate increases by the amount passed in parameter.
     * @param $h (float) The height of the break. By default, the value equals the height of the last printed cell.
     * @param $cell (boolean) if true add the current left (or right o for RTL) padding to the X coordinate
     * @public
     * @since 1.0
     * @see Cell()
     */
    public function Ln($h = '', $cell = false) {
        if (($this->num_columns > 1) AND ($this->y == $this->columns[$this->current_column]['y']) AND isset($this->columns[$this->current_column]['x']) AND ($this->x == $this->columns[$this->current_column]['x'])) {
            // revove vertical space from the top of the column
            return;
        }
        if ($cell) {
            if ($this->rtl) {
                $cellpadding = $this->cell_padding['R'];
            } else {
                $cellpadding = $this->cell_padding['L'];
            }
        } else {
            $cellpadding = 0;
        }
        if ($this->rtl) {
            $this->x = $this->w - $this->rMargin - $cellpadding;
        } else {
            $this->x = $this->lMargin + $cellpadding;
        }
        if (is_string($h)) {
            $this->y += $this->lasth;
        } else {
            $this->y += $h;
        }
        $this->newline = true;
    }

    /**
     * Returns the relative X value of current position.
     * The value is relative to the left border for LTR languages and to the right border for RTL languages.
     * @return float
     * @public
     * @since 1.2
     * @see SetX(), GetY(), SetY()
     */
    public function GetX() {
        //Get x position
        if ($this->rtl) {
            return ($this->w - $this->x);
        } else {
            return $this->x;
        }
    }

    /**
     * Returns the absolute X value of current position.
     * @return float
     * @public
     * @since 1.2
     * @see SetX(), GetY(), SetY()
     */
    public function GetAbsX() {
        return $this->x;
    }

    /**
     * Returns the ordinate of the current position.
     * @return float
     * @public
     * @since 1.0
     * @see SetY(), GetX(), SetX()
     */
    public function GetY() {
        return $this->y;
    }

    /**
     * Defines the abscissa of the current position.
     * If the passed value is negative, it is relative to the right of the page (or left if language is RTL).
     * @param $x (float) The value of the abscissa in user units.
     * @param $rtloff (boolean) if true always uses the page top-left corner as origin of axis.
     * @public
     * @since 1.2
     * @see GetX(), GetY(), SetY(), SetXY()
     */
    public function SetX($x, $rtloff = false) {
        $x = floatval($x);
        if (!$rtloff AND $this->rtl) {
            if ($x >= 0) {
                $this->x = $this->w - $x;
            } else {
                $this->x = abs($x);
            }
        } else {
            if ($x >= 0) {
                $this->x = $x;
            } else {
                $this->x = $this->w + $x;
            }
        }
        if ($this->x < 0) {
            $this->x = 0;
        }
        if ($this->x > $this->w) {
            $this->x = $this->w;
        }
    }

    /**
     * Moves the current abscissa back to the left margin and sets the ordinate.
     * If the passed value is negative, it is relative to the bottom of the page.
     * @param $y (float) The value of the ordinate in user units.
     * @param $resetx (bool) if true (default) reset the X position.
     * @param $rtloff (boolean) if true always uses the page top-left corner as origin of axis.
     * @public
     * @since 1.0
     * @see GetX(), GetY(), SetY(), SetXY()
     */
    public function SetY($y, $resetx = true, $rtloff = false) {
        $y = floatval($y);
        if ($resetx) {
            //reset x
            if (!$rtloff AND $this->rtl) {
                $this->x = $this->w - $this->rMargin;
            } else {
                $this->x = $this->lMargin;
            }
        }
        if ($y >= 0) {
            $this->y = $y;
        } else {
            $this->y = $this->h + $y;
        }
        if ($this->y < 0) {
            $this->y = 0;
        }
        if ($this->y > $this->h) {
            $this->y = $this->h;
        }
    }

    /**
     * Defines the abscissa and ordinate of the current position.
     * If the passed values are negative, they are relative respectively to the right and bottom of the page.
     * @param $x (float) The value of the abscissa.
     * @param $y (float) The value of the ordinate.
     * @param $rtloff (boolean) if true always uses the page top-left corner as origin of axis.
     * @public
     * @since 1.2
     * @see SetX(), SetY()
     */
    public function SetXY($x, $y, $rtloff = false) {
        $this->SetY($y, false, $rtloff);
        $this->SetX($x, $rtloff);
    }

    /**
     * Set the absolute X coordinate of the current pointer.
     * @param $x (float) The value of the abscissa in user units.
     * @public
     * @since 5.9.186 (2012-09-13)
     * @see setAbsX(), setAbsY(), SetAbsXY()
     */
    public function SetAbsX($x) {
        $this->x = floatval($x);
    }

    /**
     * Set the absolute Y coordinate of the current pointer.
     * @param $y (float) (float) The value of the ordinate in user units.
     * @public
     * @since 5.9.186 (2012-09-13)
     * @see setAbsX(), setAbsY(), SetAbsXY()
     */
    public function SetAbsY($y) {
        $this->y = floatval($y);
    }

    /**
     * Set the absolute X and Y coordinates of the current pointer.
     * @param $x (float) The value of the abscissa in user units.
     * @param $y (float) (float) The value of the ordinate in user units.
     * @public
     * @since 5.9.186 (2012-09-13)
     * @see setAbsX(), setAbsY(), SetAbsXY()
     */
    public function SetAbsXY($x, $y) {
        $this->SetAbsX($x);
        $this->SetAbsY($y);
    }

    /**
     * Ouput input data and compress it if possible.
     * @param $data (string) Data to output.
     * @param $length (int) Data length in bytes.
     * @protected
     * @since 5.9.086
     */
    protected function sendOutputData($data, $length) {
        if (!isset($_SERVER['HTTP_ACCEPT_ENCODING']) OR empty($_SERVER['HTTP_ACCEPT_ENCODING'])) {
            // the content length may vary if the server is using compression
            header('Content-Length: ' . $length);
        }
        echo $data;
    }

    /**
     * Send the document to a given destination: string, local file or browser.
     * In the last case, the plug-in may be used (if present) or a download ("Save as" dialog box) may be forced.<br />
     * The method first calls Close() if necessary to terminate the document.
     * @param $name (string) The name of the file when saved. Note that special characters are removed and blanks characters are replaced with the underscore character.
     * @param $dest (string) Destination where to send the document. It can take one of the following values:<ul><li>I: send the file inline to the browser (default). The plug-in is used if available. The name given by name is used when one selects the "Save as" option on the link generating the PDF.</li><li>D: send to the browser and force a file download with the name given by name.</li><li>F: save to a local server file with the name given by name.</li><li>S: return the document as a string (name is ignored).</li><li>FI: equivalent to F + I option</li><li>FD: equivalent to F + D option</li><li>E: return the document as base64 mime multi-part email attachment (RFC 2045)</li></ul>
     * @public
     * @since 1.0
     * @see Close()
     */
    public function Output($name = 'doc.pdf', $dest = 'I') {
        //Output PDF to some destination
        //Finish document if necessary
        if ($this->state < 3) {
            $this->Close();
        }
        //Normalize parameters
        if (is_bool($dest)) {
            $dest = $dest ? 'D' : 'F';
        }
        $dest = strtoupper($dest);
        if ($dest{0} != 'F') {
            $name = preg_replace('/[\s]+/', '_', $name);
            $name = preg_replace('/[^a-zA-Z0-9_\.-]/', '', $name);
        }
        if ($this->sign) {
            // *** apply digital signature to the document ***
            // get the document content
            $pdfdoc = $this->getBuffer();
            // remove last newline
            $pdfdoc = substr($pdfdoc, 0, -1);
            // Remove the original buffer
            if (isset($this->diskcache) AND $this->diskcache) {
                // remove buffer file from cache
                unlink($this->buffer);
            }
            unset($this->buffer);
            // remove filler space
            $byterange_string_len = strlen($this->byterange_string);
            // define the ByteRange
            $byte_range = array();
            $byte_range[0] = 0;
            $byte_range[1] = strpos($pdfdoc, $this->byterange_string) + $byterange_string_len + 10;
            $byte_range[2] = $byte_range[1] + $this->signature_max_length + 2;
            $byte_range[3] = strlen($pdfdoc) - $byte_range[2];
            $pdfdoc = substr($pdfdoc, 0, $byte_range[1]) . substr($pdfdoc, $byte_range[2]);
            // replace the ByteRange
            $byterange = sprintf('/ByteRange[0 %u %u %u]', $byte_range[1], $byte_range[2], $byte_range[3]);
            $byterange .= str_repeat(' ', ($byterange_string_len - strlen($byterange)));
            $pdfdoc = str_replace($this->byterange_string, $byterange, $pdfdoc);
            // write the document to a temporary folder
            $tempdoc = tempnam(K_PATH_CACHE, 'tmppdf_');
            $f = fopen($tempdoc, 'wb');
            if (!$f) {
                $this->Error('Unable to create temporary file: ' . $tempdoc);
            }
            $pdfdoc_length = strlen($pdfdoc);
            fwrite($f, $pdfdoc, $pdfdoc_length);
            fclose($f);
            // get digital signature via openssl library
            $tempsign = tempnam(K_PATH_CACHE, 'tmpsig_');
            if (empty($this->signature_data['extracerts'])) {
                openssl_pkcs7_sign($tempdoc, $tempsign, $this->signature_data['signcert'], array($this->signature_data['privkey'], $this->signature_data['password']), array(), PKCS7_BINARY | PKCS7_DETACHED);
            } else {
                openssl_pkcs7_sign($tempdoc, $tempsign, $this->signature_data['signcert'], array($this->signature_data['privkey'], $this->signature_data['password']), array(), PKCS7_BINARY | PKCS7_DETACHED, $this->signature_data['extracerts']);
            }
            unlink($tempdoc);
            // read signature
            $signature = file_get_contents($tempsign);
            unlink($tempsign);
            // extract signature
            $signature = substr($signature, $pdfdoc_length);
            $signature = substr($signature, (strpos($signature, "%%EOF\n\n------") + 13));
            $tmparr = explode("\n\n", $signature);
            $signature = $tmparr[1];
            unset($tmparr);
            // decode signature
            $signature = base64_decode(trim($signature));
            // convert signature to hex
            $signature = current(unpack('H*', $signature));
            $signature = str_pad($signature, $this->signature_max_length, '0');
            // disable disk caching
            $this->diskcache = false;
            // Add signature to the document
            $this->buffer = substr($pdfdoc, 0, $byte_range[1]) . '<' . $signature . '>' . substr($pdfdoc, $byte_range[1]);
            $this->bufferlen = strlen($this->buffer);
        }
        switch ($dest) {
            case 'I': {
                    // Send PDF to the standard output
                    if (ob_get_contents()) {
                        $this->Error('Some data has already been output, can\'t send PDF file');
                    }
                    if (php_sapi_name() != 'cli') {
                        // send output to a browser
                        header('Content-Type: application/pdf');
                        if (headers_sent()) {
                            $this->Error('Some data has already been output to browser, can\'t send PDF file');
                        }
                        header('Cache-Control: private, must-revalidate, post-check=0, pre-check=0, max-age=1');
                        //header('Cache-Control: public, must-revalidate, max-age=0'); // HTTP/1.1
                        header('Pragma: public');
                        header('Expires: Sat, 26 Jul 1997 05:00:00 GMT'); // Date in the past
                        header('Last-Modified: ' . gmdate('D, d M Y H:i:s') . ' GMT');
                        header('Content-Disposition: inline; filename="' . basename($name) . '"');
                        $this->sendOutputData($this->getBuffer(), $this->bufferlen);
                    } else {
                        echo $this->getBuffer();
                    }
                    break;
                }
            case 'D': {
                    // download PDF as file
                    if (ob_get_contents()) {
                        $this->Error('Some data has already been output, can\'t send PDF file');
                    }
                    header('Content-Description: File Transfer');
                    if (headers_sent()) {
                        $this->Error('Some data has already been output to browser, can\'t send PDF file');
                    }
                    header('Cache-Control: private, must-revalidate, post-check=0, pre-check=0, max-age=1');
                    //header('Cache-Control: public, must-revalidate, max-age=0'); // HTTP/1.1
                    header('Pragma: public');
                    header('Expires: Sat, 26 Jul 1997 05:00:00 GMT'); // Date in the past
                    header('Last-Modified: ' . gmdate('D, d M Y H:i:s') . ' GMT');
                    // force download dialog
                    if (strpos(php_sapi_name(), 'cgi') === false) {
                        header('Content-Type: application/force-download');
                        header('Content-Type: application/octet-stream', false);
                        header('Content-Type: application/download', false);
                        header('Content-Type: application/pdf', false);
                    } else {
                        header('Content-Type: application/pdf');
                    }
                    // use the Content-Disposition header to supply a recommended filename
                    header('Content-Disposition: attachment; filename="' . basename($name) . '"');
                    header('Content-Transfer-Encoding: binary');
                    $this->sendOutputData($this->getBuffer(), $this->bufferlen);
                    break;
                }
            case 'F':
            case 'FI':
            case 'FD': {
                    // save PDF to a local file
                    if ($this->diskcache) {
                        copy($this->buffer, $name);
                    } else {
                        $f = fopen($name, 'wb');
                        if (!$f) {
                            $this->Error('Unable to create output file: ' . $name);
                        }
                        fwrite($f, $this->getBuffer(), $this->bufferlen);
                        fclose($f);
                    }
                    if ($dest == 'FI') {
                        // send headers to browser
                        header('Content-Type: application/pdf');
                        header('Cache-Control: private, must-revalidate, post-check=0, pre-check=0, max-age=1');
                        //header('Cache-Control: public, must-revalidate, max-age=0'); // HTTP/1.1
                        header('Pragma: public');
                        header('Expires: Sat, 26 Jul 1997 05:00:00 GMT'); // Date in the past
                        header('Last-Modified: ' . gmdate('D, d M Y H:i:s') . ' GMT');
                        header('Content-Disposition: inline; filename="' . basename($name) . '"');
                        $this->sendOutputData(file_get_contents($name), filesize($name));
                    } elseif ($dest == 'FD') {
                        // send headers to browser
                        if (ob_get_contents()) {
                            $this->Error('Some data has already been output, can\'t send PDF file');
                        }
                        header('Content-Description: File Transfer');
                        if (headers_sent()) {
                            $this->Error('Some data has already been output to browser, can\'t send PDF file');
                        }
                        header('Cache-Control: private, must-revalidate, post-check=0, pre-check=0, max-age=1');
                        header('Pragma: public');
                        header('Expires: Sat, 26 Jul 1997 05:00:00 GMT'); // Date in the past
                        header('Last-Modified: ' . gmdate('D, d M Y H:i:s') . ' GMT');
                        // force download dialog
                        if (strpos(php_sapi_name(), 'cgi') === false) {
                            header('Content-Type: application/force-download');
                            header('Content-Type: application/octet-stream', false);
                            header('Content-Type: application/download', false);
                            header('Content-Type: application/pdf', false);
                        } else {
                            header('Content-Type: application/pdf');
                        }
                        // use the Content-Disposition header to supply a recommended filename
                        header('Content-Disposition: attachment; filename="' . basename($name) . '"');
                        header('Content-Transfer-Encoding: binary');
                        $this->sendOutputData(file_get_contents($name), filesize($name));
                    }
                    break;
                }
            case 'E': {
                    // return PDF as base64 mime multi-part email attachment (RFC 2045)
                    $retval = 'Content-Type: application/pdf;' . "\r\n";
                    $retval .= ' name="' . $name . '"' . "\r\n";
                    $retval .= 'Content-Transfer-Encoding: base64' . "\r\n";
                    $retval .= 'Content-Disposition: attachment;' . "\r\n";
                    $retval .= ' filename="' . $name . '"' . "\r\n\r\n";
                    $retval .= chunk_split(base64_encode($this->getBuffer()), 76, "\r\n");
                    return $retval;
                }
            case 'S': {
                    // returns PDF as a string
                    return $this->getBuffer();
                }
            default: {
                    $this->Error('Incorrect output destination: ' . $dest);
                }
        }
        return '';
    }

    /**
     * Unset all class variables except the following critical variables.
     * @param $destroyall (boolean) if true destroys all class variables, otherwise preserves critical variables.
     * @param $preserve_objcopy (boolean) if true preserves the objcopy variable
     * @public
     * @since 4.5.016 (2009-02-24)
     */
    public function _destroy($destroyall = false, $preserve_objcopy = false) {
        if ($destroyall AND isset($this->diskcache) AND $this->diskcache AND (!$preserve_objcopy) AND (!$this->empty_string($this->buffer))) {
            // remove buffer file from cache
            unlink($this->buffer);
        }
        if ($destroyall AND isset($this->cached_files) AND !empty($this->cached_files)) {
            // remove cached files
            foreach ($this->cached_files as $cachefile) {
                if (is_file($cachefile)) {
                    unlink($cachefile);
                }
            }
            unset($this->cached_files);
        }
        foreach (array_keys(get_object_vars($this)) as $val) {
            if ($destroyall OR (
                    ($val != 'internal_encoding')
                    AND ($val != 'state')
                    AND ($val != 'bufferlen')
                    AND ($val != 'buffer')
                    AND ($val != 'diskcache')
                    AND ($val != 'cached_files')
                    AND ($val != 'sign')
                    AND ($val != 'signature_data')
                    AND ($val != 'signature_max_length')
                    AND ($val != 'byterange_string')
                    )) {
                if ((!$preserve_objcopy OR ($val != 'objcopy')) AND isset($this->$val)) {
                    unset($this->$val);
                }
            }
        }
    }

    /**
     * Check for locale-related bug
     * @protected
     */
    protected 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');
        }
    }

    /**
     * Return fonts path
     * @return string
     * @protected
     */
    protected function _getfontpath() {
        if (!defined('K_PATH_FONTS') AND is_dir(dirname(__FILE__) . '/fonts')) {
            define('K_PATH_FONTS', dirname(__FILE__) . '/fonts/');
        }
        return defined('K_PATH_FONTS') ? K_PATH_FONTS : '';
    }

    /**
     * Return an array containing variations for the basic page number alias.
     * @param $a (string) Base alias.
     * @return array of page number aliases
     * @protected
     */
    protected function getInternalPageNumberAliases($a = '') {
        $alias = array();
        // build array of Unicode + ASCII variants (the order is important)
        $alias = array('u' => array(), 'a' => array());
        $u = '{' . $a . '}';
        $alias['u'][] = $this->_escape($u);
        if ($this->isunicode) {
            $alias['u'][] = $this->_escape($this->UTF8ToLatin1($u));
            $alias['u'][] = $this->_escape($this->utf8StrRev($u, false, $this->tmprtl));
            $alias['a'][] = $this->_escape($this->UTF8ToLatin1($a));
            $alias['a'][] = $this->_escape($this->utf8StrRev($a, false, $this->tmprtl));
        }
        $alias['a'][] = $this->_escape($a);
        return $alias;
    }

    /**
     * Return an array containing all internal page aliases.
     * @return array of page number aliases
     * @protected
     */
    protected function getAllInternalPageNumberAliases() {
        $basic_alias = array($this->alias_tot_pages, $this->alias_num_page, $this->alias_group_tot_pages, $this->alias_group_num_page, $this->alias_right_shift);
        $pnalias = array();
        foreach ($basic_alias as $k => $a) {
            $pnalias[$k] = $this->getInternalPageNumberAliases($a);
        }
        return $pnalias;
    }

    /**
     * Replace page number aliases with number.
     * @param $page (string) Page content.
     * @param $replace (array) Array of replacements (array keys are replacement strings, values are alias arrays).
     * @param $diff (int) If passed, this will be set to the total char number difference between alias and replacements.
     * @return replaced page content and updated $diff parameter as array.
     * @protected
     */
    protected function replacePageNumAliases($page, $replace, $diff = 0) {
        foreach ($replace as $rep) {
            foreach ($rep[3] as $a) {
                if (strpos($page, $a) !== false) {
                    $page = str_replace($a, $rep[0], $page);
                    $diff += ($rep[2] - $rep[1]);
                }
            }
        }
        return array($page, $diff);
    }

    /**
     * Replace right shift page number aliases with spaces to correct right alignment.
     * This works perfectly only when using monospaced fonts.
     * @param $page (string) Page content.
     * @param $aliases (array) Array of page aliases.
     * @param $diff (int) initial difference to add.
     * @return replaced page content.
     * @protected
     */
    protected function replaceRightShiftPageNumAliases($page, $aliases, $diff) {
        foreach ($aliases as $type => $alias) {
            foreach ($alias as $a) {
                // find position of compensation factor
                $startnum = (strpos($a, ':') + 1);
                $a = substr($a, 0, $startnum);
                if (($pos = strpos($page, $a)) !== false) {
                    // end of alias
                    $endnum = strpos($page, '}', $pos);
                    // string to be replaced
                    $aa = substr($page, $pos, ($endnum - $pos + 1));
                    // get compensation factor
                    $ratio = substr($page, ($pos + $startnum), ($endnum - $pos - $startnum));
                    $ratio = preg_replace('/[^0-9\.]/', '', $ratio);
                    $ratio = floatval($ratio);
                    if ($type == 'u') {
                        $chrdiff = floor(($diff + 12) * $ratio);
                        $shift = str_repeat(' ', $chrdiff);
                        $shift = $this->UTF8ToUTF16BE($shift, false);
                    } else {
                        $chrdiff = floor(($diff + 11) * $ratio);
                        $shift = str_repeat(' ', $chrdiff);
                    }
                    $page = str_replace($aa, $shift, $page);
                }
            }
        }
        return $page;
    }

    /**
     * Set page boxes to be included on page descriptions.
     * @param $boxes (array) Array of page boxes to set on document: ('MediaBox', 'CropBox', 'BleedBox', 'TrimBox', 'ArtBox').
     * @protected
     */
    protected function setPageBoxTypes($boxes) {
        $validboxes = array('MediaBox', 'CropBox', 'BleedBox', 'TrimBox', 'ArtBox');
        $this->page_boxes = array();
        foreach ($boxes as $box) {
            if (in_array($box, $validboxes)) {
                $this->page_boxes[] = $box;
            }
        }
    }

    /**
     * Output pages (and replace page number aliases).
     * @protected
     */
    protected function _putpages() {
        $filter = ($this->compress) ? '/Filter /FlateDecode ' : '';
        // get internal aliases for page numbers
        $pnalias = $this->getAllInternalPageNumberAliases();
        $num_pages = $this->numpages;
        $ptpa = $this->formatPageNumber(($this->starting_page_number + $num_pages - 1));
        $ptpu = $this->UTF8ToUTF16BE($ptpa, false);
        $ptp_num_chars = $this->GetNumChars($ptpa);
        $pagegroupnum = 0;
        $groupnum = 0;
        $ptgu = 1;
        $ptga = 1;
        for ($n = 1; $n <= $num_pages; ++$n) {
            // get current page
            $temppage = $this->getPageBuffer($n);
            $pagelen = strlen($temppage);
            // set replacements for total pages number
            $pnpa = $this->formatPageNumber(($this->starting_page_number + $n - 1));
            $pnpu = $this->UTF8ToUTF16BE($pnpa, false);
            $pnp_num_chars = $this->GetNumChars($pnpa);
            $pdiff = 0; // difference used for right shift alignment of page numbers
            $gdiff = 0; // difference used for right shift alignment of page group numbers
            if (!empty($this->pagegroups)) {
                if (isset($this->newpagegroup[$n])) {
                    $pagegroupnum = 0;
                    ++$groupnum;
                    $ptga = $this->formatPageNumber($this->pagegroups[$groupnum]);
                    $ptgu = $this->UTF8ToUTF16BE($ptga, false);
                    $ptg_num_chars = $this->GetNumChars($ptga);
                }
                ++$pagegroupnum;
                $pnga = $this->formatPageNumber($pagegroupnum);
                $pngu = $this->UTF8ToUTF16BE($pnga, false);
                $png_num_chars = $this->GetNumChars($pnga);
                // replace page numbers
                $replace = array();
                $replace[] = array($ptgu, $ptg_num_chars, 9, $pnalias[2]['u']);
                $replace[] = array($ptga, $ptg_num_chars, 7, $pnalias[2]['a']);
                $replace[] = array($pngu, $png_num_chars, 9, $pnalias[3]['u']);
                $replace[] = array($pnga, $png_num_chars, 7, $pnalias[3]['a']);
                list($temppage, $gdiff) = $this->replacePageNumAliases($temppage, $replace, $gdiff);
            }
            // replace page numbers
            $replace = array();
            $replace[] = array($ptpu, $ptp_num_chars, 9, $pnalias[0]['u']);
            $replace[] = array($ptpa, $ptp_num_chars, 7, $pnalias[0]['a']);
            $replace[] = array($pnpu, $pnp_num_chars, 9, $pnalias[1]['u']);
            $replace[] = array($pnpa, $pnp_num_chars, 7, $pnalias[1]['a']);
            list($temppage, $pdiff) = $this->replacePageNumAliases($temppage, $replace, $pdiff);
            // replace right shift alias
            $temppage = $this->replaceRightShiftPageNumAliases($temppage, $pnalias[4], max($pdiff, $gdiff));
            // replace EPS marker
            $temppage = str_replace($this->epsmarker, '', $temppage);
            //Page
            $this->page_obj_id[$n] = $this->_newobj();
            $out = '<<';
            $out .= ' /Type /Page';
            $out .= ' /Parent 1 0 R';
            $out .= ' /LastModified ' . $this->_datestring(0, $this->doc_modification_timestamp);
            $out .= ' /Resources 2 0 R';
            foreach ($this->page_boxes as $box) {
                $out .= ' /' . $box;
                $out .= sprintf(' [%F %F %F %F]', $this->pagedim[$n][$box]['llx'], $this->pagedim[$n][$box]['lly'], $this->pagedim[$n][$box]['urx'], $this->pagedim[$n][$box]['ury']);
            }
            if (isset($this->pagedim[$n]['BoxColorInfo']) AND !empty($this->pagedim[$n]['BoxColorInfo'])) {
                $out .= ' /BoxColorInfo <<';
                foreach ($this->page_boxes as $box) {
                    if (isset($this->pagedim[$n]['BoxColorInfo'][$box])) {
                        $out .= ' /' . $box . ' <<';
                        if (isset($this->pagedim[$n]['BoxColorInfo'][$box]['C'])) {
                            $color = $this->pagedim[$n]['BoxColorInfo'][$box]['C'];
                            $out .= ' /C [';
                            $out .= sprintf(' %F %F %F', ($color[0] / 255), ($color[1] / 255), ($color[2] / 255));
                            $out .= ' ]';
                        }
                        if (isset($this->pagedim[$n]['BoxColorInfo'][$box]['W'])) {
                            $out .= ' /W ' . ($this->pagedim[$n]['BoxColorInfo'][$box]['W'] * $this->k);
                        }
                        if (isset($this->pagedim[$n]['BoxColorInfo'][$box]['S'])) {
                            $out .= ' /S /' . $this->pagedim[$n]['BoxColorInfo'][$box]['S'];
                        }
                        if (isset($this->pagedim[$n]['BoxColorInfo'][$box]['D'])) {
                            $dashes = $this->pagedim[$n]['BoxColorInfo'][$box]['D'];
                            $out .= ' /D [';
                            foreach ($dashes as $dash) {
                                $out .= sprintf(' %F', ($dash * $this->k));
                            }
                            $out .= ' ]';
                        }
                        $out .= ' >>';
                    }
                }
                $out .= ' >>';
            }
            $out .= ' /Contents ' . ($this->n + 1) . ' 0 R';
            $out .= ' /Rotate ' . $this->pagedim[$n]['Rotate'];
            if (!$this->pdfa_mode) {
                $out .= ' /Group << /Type /Group /S /Transparency /CS /DeviceRGB >>';
            }
            if (isset($this->pagedim[$n]['trans']) AND !empty($this->pagedim[$n]['trans'])) {
                // page transitions
                if (isset($this->pagedim[$n]['trans']['Dur'])) {
                    $out .= ' /Dur ' . $this->pagedim[$n]['trans']['Dur'];
                }
                $out .= ' /Trans <<';
                $out .= ' /Type /Trans';
                if (isset($this->pagedim[$n]['trans']['S'])) {
                    $out .= ' /S /' . $this->pagedim[$n]['trans']['S'];
                }
                if (isset($this->pagedim[$n]['trans']['D'])) {
                    $out .= ' /D ' . $this->pagedim[$n]['trans']['D'];
                }
                if (isset($this->pagedim[$n]['trans']['Dm'])) {
                    $out .= ' /Dm /' . $this->pagedim[$n]['trans']['Dm'];
                }
                if (isset($this->pagedim[$n]['trans']['M'])) {
                    $out .= ' /M /' . $this->pagedim[$n]['trans']['M'];
                }
                if (isset($this->pagedim[$n]['trans']['Di'])) {
                    $out .= ' /Di ' . $this->pagedim[$n]['trans']['Di'];
                }
                if (isset($this->pagedim[$n]['trans']['SS'])) {
                    $out .= ' /SS ' . $this->pagedim[$n]['trans']['SS'];
                }
                if (isset($this->pagedim[$n]['trans']['B'])) {
                    $out .= ' /B ' . $this->pagedim[$n]['trans']['B'];
                }
                $out .= ' >>';
            }
            $out .= $this->_getannotsrefs($n);
            $out .= ' /PZ ' . $this->pagedim[$n]['PZ'];
            $out .= ' >>';
            $out .= "\n" . 'endobj';
            $this->_out($out);
            //Page content
            $p = ($this->compress) ? gzcompress($temppage) : $temppage;
            $this->_newobj();
            $p = $this->_getrawstream($p);
            $this->_out('<<' . $filter . '/Length ' . strlen($p) . '>> stream' . "\n" . $p . "\n" . 'endstream' . "\n" . 'endobj');
            if ($this->diskcache) {
                // remove temporary files
                unlink($this->pages[$n]);
            }
        }
        //Pages root
        $out = $this->_getobj(1) . "\n";
        $out .= '<< /Type /Pages /Kids [';
        foreach ($this->page_obj_id as $page_obj) {
            $out .= ' ' . $page_obj . ' 0 R';
        }
        $out .= ' ] /Count ' . $num_pages . ' >>';
        $out .= "\n" . 'endobj';
        $this->_out($out);
    }

    /**
     * Output references to page annotations
     * @param $n (int) page number
     * @protected
     * @author Nicola Asuni
     * @since 4.7.000 (2008-08-29)
     * @deprecated
     */
    protected function _putannotsrefs($n) {
        $this->_out($this->_getannotsrefs($n));
    }

    /**
     * Get references to page annotations.
     * @param $n (int) page number
     * @return string
     * @protected
     * @author Nicola Asuni
     * @since 5.0.010 (2010-05-17)
     */
    protected function _getannotsrefs($n) {
        if (!(isset($this->PageAnnots[$n]) OR ($this->sign AND isset($this->signature_data['cert_type'])))) {
            return '';
        }
        $out = ' /Annots [';
        if (isset($this->PageAnnots[$n])) {
            foreach ($this->PageAnnots[$n] as $key => $val) {
                if (!in_array($val['n'], $this->radio_groups)) {
                    $out .= ' ' . $val['n'] . ' 0 R';
                }
            }
            // add radiobutton groups
            if (isset($this->radiobutton_groups[$n])) {
                foreach ($this->radiobutton_groups[$n] as $key => $data) {
                    if (isset($data['n'])) {
                        $out .= ' ' . $data['n'] . ' 0 R';
                    }
                }
            }
        }
        if ($this->sign AND ($n == $this->signature_appearance['page']) AND isset($this->signature_data['cert_type'])) {
            // set reference for signature object
            $out .= ' ' . $this->sig_obj_id . ' 0 R';
        }
        if (!empty($this->empty_signature_appearance)) {
            foreach ($this->empty_signature_appearance as $esa) {
                if ($esa['page'] == $n) {
                    // set reference for empty signature objects
                    $out .= ' ' . $esa['objid'] . ' 0 R';
                }
            }
        }
        $out .= ' ]';
        return $out;
    }

    /**
     * Output annotations objects for all pages.
     * !!! THIS METHOD IS NOT YET COMPLETED !!!
     * See section 12.5 of PDF 32000_2008 reference.
     * @protected
     * @author Nicola Asuni
     * @since 4.0.018 (2008-08-06)
     */
    protected function _putannotsobjs() {
        // reset object counter
        for ($n = 1; $n <= $this->numpages; ++$n) {
            if (isset($this->PageAnnots[$n])) {
                // set page annotations
                foreach ($this->PageAnnots[$n] as $key => $pl) {
                    $annot_obj_id = $this->PageAnnots[$n][$key]['n'];
                    // create annotation object for grouping radiobuttons
                    if (isset($this->radiobutton_groups[$n][$pl['txt']]) AND is_array($this->radiobutton_groups[$n][$pl['txt']])) {
                        $radio_button_obj_id = $this->radiobutton_groups[$n][$pl['txt']]['n'];
                        $annots = '<<';
                        $annots .= ' /Type /Annot';
                        $annots .= ' /Subtype /Widget';
                        $annots .= ' /Rect [0 0 0 0]';
                        if ($this->radiobutton_groups[$n][$pl['txt']]['#readonly#']) {
                            // read only
                            $annots .= ' /F 68';
                            $annots .= ' /Ff 49153';
                        } else {
                            $annots .= ' /F 4'; // default print for PDF/A
                            $annots .= ' /Ff 49152';
                        }
                        $annots .= ' /T ' . $this->_datastring($pl['txt'], $radio_button_obj_id);
                        if (isset($pl['opt']['tu']) AND is_string($pl['opt']['tu'])) {
                            $annots .= ' /TU ' . $this->_datastring($pl['opt']['tu'], $radio_button_obj_id);
                        }
                        $annots .= ' /FT /Btn';
                        $annots .= ' /Kids [';
                        $defval = '';
                        foreach ($this->radiobutton_groups[$n][$pl['txt']] as $key => $data) {
                            if (isset($data['kid'])) {
                                $annots .= ' ' . $data['kid'] . ' 0 R';
                                if ($data['def'] !== 'Off') {
                                    $defval = $data['def'];
                                }
                            }
                        }
                        $annots .= ' ]';
                        if (!empty($defval)) {
                            $annots .= ' /V /' . $defval;
                        }
                        $annots .= ' >>';
                        $this->_out($this->_getobj($radio_button_obj_id) . "\n" . $annots . "\n" . 'endobj');
                        $this->form_obj_id[] = $radio_button_obj_id;
                        // store object id to be used on Parent entry of Kids
                        $this->radiobutton_groups[$n][$pl['txt']] = $radio_button_obj_id;
                    }
                    $formfield = false;
                    $pl['opt'] = array_change_key_case($pl['opt'], CASE_LOWER);
                    $a = $pl['x'] * $this->k;
                    $b = $this->pagedim[$n]['h'] - (($pl['y'] + $pl['h']) * $this->k);
                    $c = $pl['w'] * $this->k;
                    $d = $pl['h'] * $this->k;
                    $rect = sprintf('%F %F %F %F', $a, $b, $a + $c, $b + $d);
                    // create new annotation object
                    $annots = '<</Type /Annot';
                    $annots .= ' /Subtype /' . $pl['opt']['subtype'];
                    $annots .= ' /Rect [' . $rect . ']';
                    $ft = array('Btn', 'Tx', 'Ch', 'Sig');
                    if (isset($pl['opt']['ft']) AND in_array($pl['opt']['ft'], $ft)) {
                        $annots .= ' /FT /' . $pl['opt']['ft'];
                        $formfield = true;
                    }
                    $annots .= ' /Contents ' . $this->_textstring($pl['txt'], $annot_obj_id);
                    $annots .= ' /P ' . $this->page_obj_id[$n] . ' 0 R';
                    $annots .= ' /NM ' . $this->_datastring(sprintf('%04u-%04u', $n, $key), $annot_obj_id);
                    $annots .= ' /M ' . $this->_datestring($annot_obj_id, $this->doc_modification_timestamp);
                    if (isset($pl['opt']['f'])) {
                        $fval = 0;
                        if (is_array($pl['opt']['f'])) {
                            foreach ($pl['opt']['f'] as $f) {
                                switch (strtolower($f)) {
                                    case 'invisible': {
                                            $fval += 1 << 0;
                                            break;
                                        }
                                    case 'hidden': {
                                            $fval += 1 << 1;
                                            break;
                                        }
                                    case 'print': {
                                            $fval += 1 << 2;
                                            break;
                                        }
                                    case 'nozoom': {
                                            $fval += 1 << 3;
                                            break;
                                        }
                                    case 'norotate': {
                                            $fval += 1 << 4;
                                            break;
                                        }
                                    case 'noview': {
                                            $fval += 1 << 5;
                                            break;
                                        }
                                    case 'readonly': {
                                            $fval += 1 << 6;
                                            break;
                                        }
                                    case 'locked': {
                                            $fval += 1 << 8;
                                            break;
                                        }
                                    case 'togglenoview': {
                                            $fval += 1 << 9;
                                            break;
                                        }
                                    case 'lockedcontents': {
                                            $fval += 1 << 10;
                                            break;
                                        }
                                    default: {
                                            break;
                                        }
                                }
                            }
                        } else {
                            $fval = intval($pl['opt']['f']);
                        }
                    } else {
                        $fval = 4;
                    }
                    if ($this->pdfa_mode) {
                        // force print flag for PDF/A mode
                        $fval |= 4;
                    }
                    $annots .= ' /F ' . intval($fval);
                    if (isset($pl['opt']['as']) AND is_string($pl['opt']['as'])) {
                        $annots .= ' /AS /' . $pl['opt']['as'];
                    }
                    if (isset($pl['opt']['ap'])) {
                        // appearance stream
                        $annots .= ' /AP <<';
                        if (is_array($pl['opt']['ap'])) {
                            foreach ($pl['opt']['ap'] as $apmode => $apdef) {
                                // $apmode can be: n = normal; r = rollover; d = down;
                                $annots .= ' /' . strtoupper($apmode);
                                if (is_array($apdef)) {
                                    $annots .= ' <<';
                                    foreach ($apdef as $apstate => $stream) {
                                        // reference to XObject that define the appearance for this mode-state
                                        $apsobjid = $this->_putAPXObject($c, $d, $stream);
                                        $annots .= ' /' . $apstate . ' ' . $apsobjid . ' 0 R';
                                    }
                                    $annots .= ' >>';
                                } else {
                                    // reference to XObject that define the appearance for this mode
                                    $apsobjid = $this->_putAPXObject($c, $d, $apdef);
                                    $annots .= ' ' . $apsobjid . ' 0 R';
                                }
                            }
                        } else {
                            $annots .= $pl['opt']['ap'];
                        }
                        $annots .= ' >>';
                    }
                    if (isset($pl['opt']['bs']) AND (is_array($pl['opt']['bs']))) {
                        $annots .= ' /BS <<';
                        $annots .= ' /Type /Border';
                        if (isset($pl['opt']['bs']['w'])) {
                            $annots .= ' /W ' . intval($pl['opt']['bs']['w']);
                        }
                        $bstyles = array('S', 'D', 'B', 'I', 'U');
                        if (isset($pl['opt']['bs']['s']) AND in_array($pl['opt']['bs']['s'], $bstyles)) {
                            $annots .= ' /S /' . $pl['opt']['bs']['s'];
                        }
                        if (isset($pl['opt']['bs']['d']) AND (is_array($pl['opt']['bs']['d']))) {
                            $annots .= ' /D [';
                            foreach ($pl['opt']['bs']['d'] as $cord) {
                                $annots .= ' ' . intval($cord);
                            }
                            $annots .= ']';
                        }
                        $annots .= ' >>';
                    } else {
                        $annots .= ' /Border [';
                        if (isset($pl['opt']['border']) AND (count($pl['opt']['border']) >= 3)) {
                            $annots .= intval($pl['opt']['border'][0]) . ' ';
                            $annots .= intval($pl['opt']['border'][1]) . ' ';
                            $annots .= intval($pl['opt']['border'][2]);
                            if (isset($pl['opt']['border'][3]) AND is_array($pl['opt']['border'][3])) {
                                $annots .= ' [';
                                foreach ($pl['opt']['border'][3] as $dash) {
                                    $annots .= intval($dash) . ' ';
                                }
                                $annots .= ']';
                            }
                        } else {
                            $annots .= '0 0 0';
                        }
                        $annots .= ']';
                    }
                    if (isset($pl['opt']['be']) AND (is_array($pl['opt']['be']))) {
                        $annots .= ' /BE <<';
                        $bstyles = array('S', 'C');
                        if (isset($pl['opt']['be']['s']) AND in_array($pl['opt']['be']['s'], $bstyles)) {
                            $annots .= ' /S /' . $pl['opt']['bs']['s'];
                        } else {
                            $annots .= ' /S /S';
                        }
                        if (isset($pl['opt']['be']['i']) AND ($pl['opt']['be']['i'] >= 0) AND ($pl['opt']['be']['i'] <= 2)) {
                            $annots .= ' /I ' . sprintf(' %F', $pl['opt']['be']['i']);
                        }
                        $annots .= '>>';
                    }
                    if (isset($pl['opt']['c']) AND (is_array($pl['opt']['c'])) AND !empty($pl['opt']['c'])) {
                        $annots .= ' /C ' . $this->getColorStringFromArray($pl['opt']['c']);
                    }
                    //$annots .= ' /StructParent ';
                    //$annots .= ' /OC ';
                    $markups = array('text', 'freetext', 'line', 'square', 'circle', 'polygon', 'polyline', 'highlight', 'underline', 'squiggly', 'strikeout', 'stamp', 'caret', 'ink', 'fileattachment', 'sound');
                    if (in_array(strtolower($pl['opt']['subtype']), $markups)) {
                        // this is a markup type
                        if (isset($pl['opt']['t']) AND is_string($pl['opt']['t'])) {
                            $annots .= ' /T ' . $this->_textstring($pl['opt']['t'], $annot_obj_id);
                        }
                        //$annots .= ' /Popup ';
                        if (isset($pl['opt']['ca'])) {
                            $annots .= ' /CA ' . sprintf('%F', floatval($pl['opt']['ca']));
                        }
                        if (isset($pl['opt']['rc'])) {
                            $annots .= ' /RC ' . $this->_textstring($pl['opt']['rc'], $annot_obj_id);
                        }
                        $annots .= ' /CreationDate ' . $this->_datestring($annot_obj_id, $this->doc_creation_timestamp);
                        //$annots .= ' /IRT ';
                        if (isset($pl['opt']['subj'])) {
                            $annots .= ' /Subj ' . $this->_textstring($pl['opt']['subj'], $annot_obj_id);
                        }
                        //$annots .= ' /RT ';
                        //$annots .= ' /IT ';
                        //$annots .= ' /ExData ';
                    }
                    $lineendings = array('Square', 'Circle', 'Diamond', 'OpenArrow', 'ClosedArrow', 'None', 'Butt', 'ROpenArrow', 'RClosedArrow', 'Slash');
                    // Annotation types
                    switch (strtolower($pl['opt']['subtype'])) {
                        case 'text': {
                                if (isset($pl['opt']['open'])) {
                                    $annots .= ' /Open ' . (strtolower($pl['opt']['open']) == 'true' ? 'true' : 'false');
                                }
                                $iconsapp = array('Comment', 'Help', 'Insert', 'Key', 'NewParagraph', 'Note', 'Paragraph');
                                if (isset($pl['opt']['name']) AND in_array($pl['opt']['name'], $iconsapp)) {
                                    $annots .= ' /Name /' . $pl['opt']['name'];
                                } else {
                                    $annots .= ' /Name /Note';
                                }
                                $statemodels = array('Marked', 'Review');
                                if (isset($pl['opt']['statemodel']) AND in_array($pl['opt']['statemodel'], $statemodels)) {
                                    $annots .= ' /StateModel /' . $pl['opt']['statemodel'];
                                } else {
                                    $pl['opt']['statemodel'] = 'Marked';
                                    $annots .= ' /StateModel /' . $pl['opt']['statemodel'];
                                }
                                if ($pl['opt']['statemodel'] == 'Marked') {
                                    $states = array('Accepted', 'Unmarked');
                                } else {
                                    $states = array('Accepted', 'Rejected', 'Cancelled', 'Completed', 'None');
                                }
                                if (isset($pl['opt']['state']) AND in_array($pl['opt']['state'], $states)) {
                                    $annots .= ' /State /' . $pl['opt']['state'];
                                } else {
                                    if ($pl['opt']['statemodel'] == 'Marked') {
                                        $annots .= ' /State /Unmarked';
                                    } else {
                                        $annots .= ' /State /None';
                                    }
                                }
                                break;
                            }
                        case 'link': {
                                if (is_string($pl['txt'])) {
                                    if ($pl['txt'][0] == '#') {
                                        // internal destination
                                        $annots .= ' /Dest /' . $this->encodeNameObject(substr($pl['txt'], 1));
                                    } else {
                                        // external URI link
                                        $annots .= ' /A <</S /URI /URI ' . $this->_datastring($this->unhtmlentities($pl['txt']), $annot_obj_id) . '>>';
                                    }
                                } else {
                                    // internal link
                                    if (isset($this->links[$pl['txt']])) {
                                        $l = $this->links[$pl['txt']];
                                        if (isset($this->page_obj_id[($l[0])])) {
                                            $annots .= sprintf(' /Dest [%u 0 R /XYZ 0 %F null]', $this->page_obj_id[($l[0])], ($this->pagedim[$l[0]]['h'] - ($l[1] * $this->k)));
                                        }
                                    }
                                }
                                $hmodes = array('N', 'I', 'O', 'P');
                                if (isset($pl['opt']['h']) AND in_array($pl['opt']['h'], $hmodes)) {
                                    $annots .= ' /H /' . $pl['opt']['h'];
                                } else {
                                    $annots .= ' /H /I';
                                }
                                //$annots .= ' /PA ';
                                //$annots .= ' /Quadpoints ';
                                break;
                            }
                        case 'freetext': {
                                if (isset($pl['opt']['da']) AND !empty($pl['opt']['da'])) {
                                    $annots .= ' /DA (' . $pl['opt']['da'] . ')';
                                }
                                if (isset($pl['opt']['q']) AND ($pl['opt']['q'] >= 0) AND ($pl['opt']['q'] <= 2)) {
                                    $annots .= ' /Q ' . intval($pl['opt']['q']);
                                }
                                if (isset($pl['opt']['rc'])) {
                                    $annots .= ' /RC ' . $this->_textstring($pl['opt']['rc'], $annot_obj_id);
                                }
                                if (isset($pl['opt']['ds'])) {
                                    $annots .= ' /DS ' . $this->_textstring($pl['opt']['ds'], $annot_obj_id);
                                }
                                if (isset($pl['opt']['cl']) AND is_array($pl['opt']['cl'])) {
                                    $annots .= ' /CL [';
                                    foreach ($pl['opt']['cl'] as $cl) {
                                        $annots .= sprintf('%F ', $cl * $this->k);
                                    }
                                    $annots .= ']';
                                }
                                $tfit = array('FreeText', 'FreeTextCallout', 'FreeTextTypeWriter');
                                if (isset($pl['opt']['it']) AND in_array($pl['opt']['it'], $tfit)) {
                                    $annots .= ' /IT /' . $pl['opt']['it'];
                                }
                                if (isset($pl['opt']['rd']) AND is_array($pl['opt']['rd'])) {
                                    $l = $pl['opt']['rd'][0] * $this->k;
                                    $r = $pl['opt']['rd'][1] * $this->k;
                                    $t = $pl['opt']['rd'][2] * $this->k;
                                    $b = $pl['opt']['rd'][3] * $this->k;
                                    $annots .= ' /RD [' . sprintf('%F %F %F %F', $l, $r, $t, $b) . ']';
                                }
                                if (isset($pl['opt']['le']) AND in_array($pl['opt']['le'], $lineendings)) {
                                    $annots .= ' /LE /' . $pl['opt']['le'];
                                }
                                break;
                            }
                        case 'line': {
                                break;
                            }
                        case 'square': {
                                break;
                            }
                        case 'circle': {
                                break;
                            }
                        case 'polygon': {
                                break;
                            }
                        case 'polyline': {
                                break;
                            }
                        case 'highlight': {
                                break;
                            }
                        case 'underline': {
                                break;
                            }
                        case 'squiggly': {
                                break;
                            }
                        case 'strikeout': {
                                break;
                            }
                        case 'stamp': {
                                break;
                            }
                        case 'caret': {
                                break;
                            }
                        case 'ink': {
                                break;
                            }
                        case 'popup': {
                                break;
                            }
                        case 'fileattachment': {
                                if ($this->pdfa_mode) {
                                    // embedded files are not allowed in PDF/A mode
                                    break;
                                }
                                if (!isset($pl['opt']['fs'])) {
                                    break;
                                }
                                $filename = basename($pl['opt']['fs']);
                                if (isset($this->embeddedfiles[$filename]['n'])) {
                                    $annots .= ' /FS <</Type /Filespec /F ' . $this->_datastring($filename, $annot_obj_id) . ' /EF <</F ' . $this->embeddedfiles[$filename]['n'] . ' 0 R>> >>';
                                    $iconsapp = array('Graph', 'Paperclip', 'PushPin', 'Tag');
                                    if (isset($pl['opt']['name']) AND in_array($pl['opt']['name'], $iconsapp)) {
                                        $annots .= ' /Name /' . $pl['opt']['name'];
                                    } else {
                                        $annots .= ' /Name /PushPin';
                                    }
                                }
                                break;
                            }
                        case 'sound': {
                                if (!isset($pl['opt']['fs'])) {
                                    break;
                                }
                                $filename = basename($pl['opt']['fs']);
                                if (isset($this->embeddedfiles[$filename]['n'])) {
                                    // ... TO BE COMPLETED ...
                                    // /R /C /B /E /CO /CP
                                    $annots .= ' /Sound <</Type /Filespec /F ' . $this->_datastring($filename, $annot_obj_id) . ' /EF <</F ' . $this->embeddedfiles[$filename]['n'] . ' 0 R>> >>';
                                    $iconsapp = array('Speaker', 'Mic');
                                    if (isset($pl['opt']['name']) AND in_array($pl['opt']['name'], $iconsapp)) {
                                        $annots .= ' /Name /' . $pl['opt']['name'];
                                    } else {
                                        $annots .= ' /Name /Speaker';
                                    }
                                }
                                break;
                            }
                        case 'movie': {
                                break;
                            }
                        case 'widget': {
                                $hmode = array('N', 'I', 'O', 'P', 'T');
                                if (isset($pl['opt']['h']) AND in_array($pl['opt']['h'], $hmode)) {
                                    $annots .= ' /H /' . $pl['opt']['h'];
                                }
                                if (isset($pl['opt']['mk']) AND (is_array($pl['opt']['mk'])) AND !empty($pl['opt']['mk'])) {
                                    $annots .= ' /MK <<';
                                    if (isset($pl['opt']['mk']['r'])) {
                                        $annots .= ' /R ' . $pl['opt']['mk']['r'];
                                    }
                                    if (isset($pl['opt']['mk']['bc']) AND (is_array($pl['opt']['mk']['bc']))) {
                                        $annots .= ' /BC ' . $this->getColorStringFromArray($pl['opt']['mk']['bc']);
                                    }
                                    if (isset($pl['opt']['mk']['bg']) AND (is_array($pl['opt']['mk']['bg']))) {
                                        $annots .= ' /BG ' . $this->getColorStringFromArray($pl['opt']['mk']['bg']);
                                    }
                                    if (isset($pl['opt']['mk']['ca'])) {
                                        $annots .= ' /CA ' . $pl['opt']['mk']['ca'];
                                    }
                                    if (isset($pl['opt']['mk']['rc'])) {
                                        $annots .= ' /RC ' . $pl['opt']['mk']['rc'];
                                    }
                                    if (isset($pl['opt']['mk']['ac'])) {
                                        $annots .= ' /AC ' . $pl['opt']['mk']['ac'];
                                    }
                                    if (isset($pl['opt']['mk']['i'])) {
                                        $info = $this->getImageBuffer($pl['opt']['mk']['i']);
                                        if ($info !== false) {
                                            $annots .= ' /I ' . $info['n'] . ' 0 R';
                                        }
                                    }
                                    if (isset($pl['opt']['mk']['ri'])) {
                                        $info = $this->getImageBuffer($pl['opt']['mk']['ri']);
                                        if ($info !== false) {
                                            $annots .= ' /RI ' . $info['n'] . ' 0 R';
                                        }
                                    }
                                    if (isset($pl['opt']['mk']['ix'])) {
                                        $info = $this->getImageBuffer($pl['opt']['mk']['ix']);
                                        if ($info !== false) {
                                            $annots .= ' /IX ' . $info['n'] . ' 0 R';
                                        }
                                    }
                                    if (isset($pl['opt']['mk']['if']) AND (is_array($pl['opt']['mk']['if'])) AND !empty($pl['opt']['mk']['if'])) {
                                        $annots .= ' /IF <<';
                                        $if_sw = array('A', 'B', 'S', 'N');
                                        if (isset($pl['opt']['mk']['if']['sw']) AND in_array($pl['opt']['mk']['if']['sw'], $if_sw)) {
                                            $annots .= ' /SW /' . $pl['opt']['mk']['if']['sw'];
                                        }
                                        $if_s = array('A', 'P');
                                        if (isset($pl['opt']['mk']['if']['s']) AND in_array($pl['opt']['mk']['if']['s'], $if_s)) {
                                            $annots .= ' /S /' . $pl['opt']['mk']['if']['s'];
                                        }
                                        if (isset($pl['opt']['mk']['if']['a']) AND (is_array($pl['opt']['mk']['if']['a'])) AND !empty($pl['opt']['mk']['if']['a'])) {
                                            $annots .= sprintf(' /A [%F %F]', $pl['opt']['mk']['if']['a'][0], $pl['opt']['mk']['if']['a'][1]);
                                        }
                                        if (isset($pl['opt']['mk']['if']['fb']) AND ($pl['opt']['mk']['if']['fb'])) {
                                            $annots .= ' /FB true';
                                        }
                                        $annots .= '>>';
                                    }
                                    if (isset($pl['opt']['mk']['tp']) AND ($pl['opt']['mk']['tp'] >= 0) AND ($pl['opt']['mk']['tp'] <= 6)) {
                                        $annots .= ' /TP ' . intval($pl['opt']['mk']['tp']);
                                    }
                                    $annots .= '>>';
                                } // end MK
                                // --- Entries for field dictionaries ---
                                if (isset($this->radiobutton_groups[$n][$pl['txt']])) {
                                    // set parent
                                    $annots .= ' /Parent ' . $this->radiobutton_groups[$n][$pl['txt']] . ' 0 R';
                                }
                                if (isset($pl['opt']['t']) AND is_string($pl['opt']['t'])) {
                                    $annots .= ' /T ' . $this->_datastring($pl['opt']['t'], $annot_obj_id);
                                }
                                if (isset($pl['opt']['tu']) AND is_string($pl['opt']['tu'])) {
                                    $annots .= ' /TU ' . $this->_datastring($pl['opt']['tu'], $annot_obj_id);
                                }
                                if (isset($pl['opt']['tm']) AND is_string($pl['opt']['tm'])) {
                                    $annots .= ' /TM ' . $this->_datastring($pl['opt']['tm'], $annot_obj_id);
                                }
                                if (isset($pl['opt']['ff'])) {
                                    if (is_array($pl['opt']['ff'])) {
                                        // array of bit settings
                                        $flag = 0;
                                        foreach ($pl['opt']['ff'] as $val) {
                                            $flag += 1 << ($val - 1);
                                        }
                                    } else {
                                        $flag = intval($pl['opt']['ff']);
                                    }
                                    $annots .= ' /Ff ' . $flag;
                                }
                                if (isset($pl['opt']['maxlen'])) {
                                    $annots .= ' /MaxLen ' . intval($pl['opt']['maxlen']);
                                }
                                if (isset($pl['opt']['v'])) {
                                    $annots .= ' /V';
                                    if (is_array($pl['opt']['v'])) {
                                        foreach ($pl['opt']['v'] AS $optval) {
                                            if (is_float($optval)) {
                                                $optval = sprintf('%F', $optval);
                                            }
                                            $annots .= ' ' . $optval;
                                        }
                                    } else {
                                        $annots .= ' ' . $this->_textstring($pl['opt']['v'], $annot_obj_id);
                                    }
                                }
                                if (isset($pl['opt']['dv'])) {
                                    $annots .= ' /DV';
                                    if (is_array($pl['opt']['dv'])) {
                                        foreach ($pl['opt']['dv'] AS $optval) {
                                            if (is_float($optval)) {
                                                $optval = sprintf('%F', $optval);
                                            }
                                            $annots .= ' ' . $optval;
                                        }
                                    } else {
                                        $annots .= ' ' . $this->_textstring($pl['opt']['dv'], $annot_obj_id);
                                    }
                                }
                                if (isset($pl['opt']['rv'])) {
                                    $annots .= ' /RV';
                                    if (is_array($pl['opt']['rv'])) {
                                        foreach ($pl['opt']['rv'] AS $optval) {
                                            if (is_float($optval)) {
                                                $optval = sprintf('%F', $optval);
                                            }
                                            $annots .= ' ' . $optval;
                                        }
                                    } else {
                                        $annots .= ' ' . $this->_textstring($pl['opt']['rv'], $annot_obj_id);
                                    }
                                }
                                if (isset($pl['opt']['a']) AND !empty($pl['opt']['a'])) {
                                    $annots .= ' /A << ' . $pl['opt']['a'] . ' >>';
                                }
                                if (isset($pl['opt']['aa']) AND !empty($pl['opt']['aa'])) {
                                    $annots .= ' /AA << ' . $pl['opt']['aa'] . ' >>';
                                }
                                if (isset($pl['opt']['da']) AND !empty($pl['opt']['da'])) {
                                    $annots .= ' /DA (' . $pl['opt']['da'] . ')';
                                }
                                if (isset($pl['opt']['q']) AND ($pl['opt']['q'] >= 0) AND ($pl['opt']['q'] <= 2)) {
                                    $annots .= ' /Q ' . intval($pl['opt']['q']);
                                }
                                if (isset($pl['opt']['opt']) AND (is_array($pl['opt']['opt'])) AND !empty($pl['opt']['opt'])) {
                                    $annots .= ' /Opt [';
                                    foreach ($pl['opt']['opt'] AS $copt) {
                                        if (is_array($copt)) {
                                            $annots .= ' [' . $this->_textstring($copt[0], $annot_obj_id) . ' ' . $this->_textstring($copt[1], $annot_obj_id) . ']';
                                        } else {
                                            $annots .= ' ' . $this->_textstring($copt, $annot_obj_id);
                                        }
                                    }
                                    $annots .= ']';
                                }
                                if (isset($pl['opt']['ti'])) {
                                    $annots .= ' /TI ' . intval($pl['opt']['ti']);
                                }
                                if (isset($pl['opt']['i']) AND (is_array($pl['opt']['i'])) AND !empty($pl['opt']['i'])) {
                                    $annots .= ' /I [';
                                    foreach ($pl['opt']['i'] AS $copt) {
                                        $annots .= intval($copt) . ' ';
                                    }
                                    $annots .= ']';
                                }
                                break;
                            }
                        case 'screen': {
                                break;
                            }
                        case 'printermark': {
                                break;
                            }
                        case 'trapnet': {
                                break;
                            }
                        case 'watermark': {
                                break;
                            }
                        case '3d': {
                                break;
                            }
                        default: {
                                break;
                            }
                    }
                    $annots .= '>>';
                    // create new annotation object
                    $this->_out($this->_getobj($annot_obj_id) . "\n" . $annots . "\n" . 'endobj');
                    if ($formfield AND !isset($this->radiobutton_groups[$n][$pl['txt']])) {
                        // store reference of form object
                        $this->form_obj_id[] = $annot_obj_id;
                    }
                }
            }
        } // end for each page
    }

    /**
     * Put appearance streams XObject used to define annotation's appearance states.
     * @param $w (int) annotation width
     * @param $h (int) annotation height
     * @param $stream (string) appearance stream
     * @return int object ID
     * @protected
     * @since 4.8.001 (2009-09-09)
     */
    protected function _putAPXObject($w = 0, $h = 0, $stream = '') {
        $stream = trim($stream);
        $out = $this->_getobj() . "\n";
        $this->xobjects['AX' . $this->n] = array('n' => $this->n);
        $out .= '<<';
        $out .= ' /Type /XObject';
        $out .= ' /Subtype /Form';
        $out .= ' /FormType 1';
        if ($this->compress) {
            $stream = gzcompress($stream);
            $out .= ' /Filter /FlateDecode';
        }
        $rect = sprintf('%F %F', $w, $h);
        $out .= ' /BBox [0 0 ' . $rect . ']';
        $out .= ' /Matrix [1 0 0 1 0 0]';
        $out .= ' /Resources 2 0 R';
        $stream = $this->_getrawstream($stream);
        $out .= ' /Length ' . strlen($stream);
        $out .= ' >>';
        $out .= ' stream' . "\n" . $stream . "\n" . 'endstream';
        $out .= "\n" . 'endobj';
        $this->_out($out);
        return $this->n;
    }

    /**
     * Get ULONG from string (Big Endian 32-bit unsigned integer).
     * @param $str (string) string from where to extract value
     * @param $offset (int) point from where to read the data
     * @return int 32 bit value
     * @author Nicola Asuni
     * @protected
     * @since 5.2.000 (2010-06-02)
     */
    protected function _getULONG($str, $offset) {
        $v = unpack('Ni', substr($str, $offset, 4));
        return $v['i'];
    }

    /**
     * Get USHORT from string (Big Endian 16-bit unsigned integer).
     * @param $str (string) string from where to extract value
     * @param $offset (int) point from where to read the data
     * @return int 16 bit value
     * @author Nicola Asuni
     * @protected
     * @since 5.2.000 (2010-06-02)
     */
    protected function _getUSHORT($str, $offset) {
        $v = unpack('ni', substr($str, $offset, 2));
        return $v['i'];
    }

    /**
     * Get SHORT from string (Big Endian 16-bit signed integer).
     * @param $str (string) String from where to extract value.
     * @param $offset (int) Point from where to read the data.
     * @return int 16 bit value
     * @author Nicola Asuni
     * @protected
     * @since 5.2.000 (2010-06-02)
     */
    protected function _getSHORT($str, $offset) {
        $v = unpack('si', substr($str, $offset, 2));
        return $v['i'];
    }

    /**
     * Get FWORD from string (Big Endian 16-bit signed integer).
     * @param $str (string) String from where to extract value.
     * @param $offset (int) Point from where to read the data.
     * @return int 16 bit value
     * @author Nicola Asuni
     * @protected
     * @since 5.9.123 (2011-09-30)
     */
    protected function _getFWORD($str, $offset) {
        $v = $this->_getUSHORT($str, $offset);
        if ($v > 0x7fff) {
            $v -= 0x10000;
        }
        return $v;
    }

    /**
     * Get UFWORD from string (Big Endian 16-bit unsigned integer).
     * @param $str (string) string from where to extract value
     * @param $offset (int) point from where to read the data
     * @return int 16 bit value
     * @author Nicola Asuni
     * @protected
     * @since 5.9.123 (2011-09-30)
     */
    protected function _getUFWORD($str, $offset) {
        $v = $this->_getUSHORT($str, $offset);
        return $v;
    }

    /**
     * Get FIXED from string (32-bit signed fixed-point number (16.16).
     * @param $str (string) string from where to extract value
     * @param $offset (int) point from where to read the data
     * @return int 16 bit value
     * @author Nicola Asuni
     * @protected
     * @since 5.9.123 (2011-09-30)
     */
    protected function _getFIXED($str, $offset) {
        // mantissa
        $m = $this->_getFWORD($str, $offset);
        // fraction
        $f = $this->_getUSHORT($str, ($offset + 2));
        $v = floatval('' . $m . '.' . $f . '');
        return $v;
    }

    /**
     * Get BYTE from string (8-bit unsigned integer).
     * @param $str (string) String from where to extract value.
     * @param $offset (int) Point from where to read the data.
     * @return int 8 bit value
     * @author Nicola Asuni
     * @protected
     * @since 5.2.000 (2010-06-02)
     */
    protected function _getBYTE($str, $offset) {
        $v = unpack('Ci', substr($str, $offset, 1));
        return $v['i'];
    }

    /**
     * Update the CIDToGIDMap string with a new value.
     * @param $map (string) CIDToGIDMap.
     * @param $cid (int) CID value.
     * @param $gid (int) GID value.
     * @return (string) CIDToGIDMap.
     * @author Nicola Asuni
     * @protected
     * @since 5.9.123 (2011-09-29)
     */
    protected function updateCIDtoGIDmap($map, $cid, $gid) {
        if (($cid >= 0) AND ($cid <= 0xFFFF) AND ($gid >= 0)) {
            if ($gid > 0xFFFF) {
                $gid -= 0x10000;
            }
            $map[($cid * 2)] = chr($gid >> 8);
            $map[(($cid * 2) + 1)] = chr($gid & 0xFF);
        }
        return $map;
    }

    /**
     * Convert and add the selected TrueType or Type1 font to the fonts folder (that must be writeable).
     * @param $fontfile (string) Font file (full path).
     * @param $fonttype (string) Font type. Leave empty for autodetect mode. Valid values are: TrueTypeUnicode, TrueType, Type1, CID0JP = CID-0 Japanese, CID0KR = CID-0 Korean, CID0CS = CID-0 Chinese Simplified, CID0CT = CID-0 Chinese Traditional.
     * @param $enc (string) Name of the encoding table to use. Leave empty for default mode. Omit this parameter for TrueType Unicode and symbolic fonts like Symbol or ZapfDingBats.
     * @param $flags (int) Unsigned 32-bit integer containing flags specifying various characteristics of the font (PDF32000:2008 - 9.8.2 Font Descriptor Flags): +1 for fixed font; +4 for symbol or +32 for non-symbol; +64 for italic. Fixed and Italic mode are generally autodetected so you have to set it to 32 = non-symbolic font (default) or 4 = symbolic font.
     * @param $outpath (string) Output path for generated font files (must be writeable by the web server). Leave empty for default font folder.
     * @param $platid (int) Platform ID for CMAP table to extract (when building a Unicode font for Windows this value should be 3, for Macintosh should be 1).
     * @param $encid (int) Encoding ID for CMAP table to extract (when building a Unicode font for Windows this value should be 1, for Macintosh should be 0). When Platform ID is 3, legal values for Encoding ID are: 0=Symbol, 1=Unicode, 2=ShiftJIS, 3=PRC, 4=Big5, 5=Wansung, 6=Johab, 7=Reserved, 8=Reserved, 9=Reserved, 10=UCS-4.
     * @param $addcbbox (boolean) If true includes the character bounding box information on the php font file.
     * @return (string) TCPDF font name.
     * @author Nicola Asuni
     * @public
     * @since 5.9.123 (2010-09-30)
     */
    public function addTTFfont($fontfile, $fonttype = '', $enc = '', $flags = 32, $outpath = '', $platid = 3, $encid = 1, $addcbbox = false) {
        if (!file_exists($fontfile)) {
            $this->Error('Could not find file: ' . $fontfile . '');
        }
        // font metrics
        $fmetric = array();
        // build new font name for TCPDF compatibility
        $font_path_parts = pathinfo($fontfile);
        if (!isset($font_path_parts['filename'])) {
            $font_path_parts['filename'] = substr($font_path_parts['basename'], 0, -(strlen($font_path_parts['extension']) + 1));
        }
        $font_name = strtolower($font_path_parts['filename']);
        $font_name = preg_replace('/[^a-z0-9_]/', '', $font_name);
        $search = array('bold', 'oblique', 'italic', 'regular');
        $replace = array('b', 'i', 'i', '');
        $font_name = str_replace($search, $replace, $font_name);
        if (empty($font_name)) {
            // set generic name
            $font_name = 'tcpdffont';
        }
        // set output path
        if (empty($outpath)) {
            $outpath = $this->_getfontpath();
        }
        // check if this font already exist
        if (file_exists($outpath . $font_name . '.php')) {
            // this font already exist (delete it from fonts folder to rebuild it)
            return $font_name;
        }
        $fmetric['file'] = $font_name . '.z';
        $fmetric['ctg'] = $font_name . '.ctg.z';
        // get font data
        $font = file_get_contents($fontfile);
        $fmetric['originalsize'] = strlen($font);
        // autodetect font type
        if (empty($fonttype)) {
            if ($this->_getULONG($font, 0) == 0x10000) {
                // True Type (Unicode or not)
                $fonttype = 'TrueTypeUnicode';
            } elseif (substr($font, 0, 4) == 'OTTO') {
                // Open Type (Unicode or not)
                $this->Error('Unsupported font format: OpenType with CFF data.');
            } else {
                // Type 1
                $fonttype = 'Type1';
            }
        }
        // set font type
        switch ($fonttype) {
            case 'CID0CT':
            case 'CID0CS':
            case 'CID0KR':
            case 'CID0JP': {
                    $fmetric['type'] = 'cidfont0';
                    break;
                }
            case 'Type1': {
                    $fmetric['type'] = 'Type1';
                    if (empty($enc) AND (($flags & 4) == 0)) {
                        $enc = 'cp1252';
                    }
                    break;
                }
            case 'TrueType': {
                    $fmetric['type'] = 'TrueType';
                    break;
                }
            case 'TrueTypeUnicode':
            default: {
                    $fmetric['type'] = 'TrueTypeUnicode';
                    break;
                }
        }
        // set encoding maps (if any)
        $fmetric['enc'] = preg_replace('/[^A-Za-z0-9_\-]/', '', $enc);
        $fmetric['diff'] = '';
        if (($fmetric['type'] == 'TrueType') OR ($fmetric['type'] == 'Type1')) {
            if (!empty($enc) AND ($enc != 'cp1252') AND isset($this->encmaps->encmap[$enc])) {
                // build differences from reference encoding
                $enc_ref = $this->encmaps->encmap['cp1252'];
                $enc_target = $this->encmaps->encmap[$enc];
                $last = 0;
                for ($i = 32; $i <= 255; ++$i) {
                    if ($enc_target != $enc_ref[$i]) {
                        if ($i != ($last + 1)) {
                            $fmetric['diff'] .= $i . ' ';
                        }
                        $last = $i;
                        $fmetric['diff'] .= '/' . $enc_target[$i] . ' ';
                    }
                }
            }
        }
        // parse the font by type
        if ($fmetric['type'] == 'Type1') {
            // ---------- TYPE 1 ----------
            // read first segment
            $a = unpack('Cmarker/Ctype/Vsize', substr($font, 0, 6));
            if ($a['marker'] != 128) {
                $this->Error('Font file is not a valid binary Type1');
            }
            $fmetric['size1'] = $a['size'];
            $data = substr($font, 6, $fmetric['size1']);
            // read second segment
            $a = unpack('Cmarker/Ctype/Vsize', substr($font, (6 + $fmetric['size1']), 6));
            if ($a['marker'] != 128) {
                $this->Error('Font file is not a valid binary Type1');
            }
            $fmetric['size2'] = $a['size'];
            $encrypted = substr($font, (12 + $fmetric['size1']), $fmetric['size2']);
            $data .= $encrypted;
            // store compressed font
            $fp = fopen($outpath . $fmetric['file'], 'wb');
            fwrite($fp, gzcompress($data));
            fclose($fp);
            // get font info
            $fmetric['Flags'] = $flags;
            preg_match('#/FullName[\s]*\(([^\)]*)#', $font, $matches);
            $fmetric['name'] = preg_replace('/[^a-zA-Z0-9_\-]/', '', $matches[1]);
            preg_match('#/FontBBox[\s]*{([^}]*)#', $font, $matches);
            $fmetric['bbox'] = trim($matches[1]);
            $bv = explode(' ', $fmetric['bbox']);
            $fmetric['Ascent'] = intval($bv[3]);
            $fmetric['Descent'] = intval($bv[1]);
            preg_match('#/ItalicAngle[\s]*([0-9\+\-]*)#', $font, $matches);
            $fmetric['italicAngle'] = intval($matches[1]);
            if ($fmetric['italicAngle'] != 0) {
                $fmetric['Flags'] |= 64;
            }
            preg_match('#/UnderlinePosition[\s]*([0-9\+\-]*)#', $font, $matches);
            $fmetric['underlinePosition'] = intval($matches[1]);
            preg_match('#/UnderlineThickness[\s]*([0-9\+\-]*)#', $font, $matches);
            $fmetric['underlineThickness'] = intval($matches[1]);
            preg_match('#/isFixedPitch[\s]*([^\s]*)#', $font, $matches);
            if ($matches[1] == 'true') {
                $fmetric['Flags'] |= 1;
            }
            // get internal map
            $imap = array();
            if (preg_match_all('#dup[\s]([0-9]+)[\s]*/([^\s]*)[\s]put#sU', $font, $fmap, PREG_SET_ORDER) > 0) {
                foreach ($fmap as $v) {
                    $imap[$v[2]] = $v[1];
                }
            }
            // decrypt eexec encrypted part
            $r = 55665; // eexec encryption constant
            $c1 = 52845;
            $c2 = 22719;
            $elen = strlen($encrypted);
            $eplain = '';
            for ($i = 0; $i < $elen; ++$i) {
                $chr = ord($encrypted[$i]);
                $eplain .= chr($chr ^ ($r >> 8));
                $r = ((($chr + $r) * $c1 + $c2) % 65536);
            }
            if (preg_match('#/ForceBold[\s]*([^\s]*)#', $eplain, $matches) > 0) {
                if ($matches[1] == 'true') {
                    $fmetric['Flags'] |= 0x40000;
                }
            }
            if (preg_match('#/StdVW[\s]*\[([^\]]*)#', $eplain, $matches) > 0) {
                $fmetric['StemV'] = intval($matches[1]);
            } else {
                $fmetric['StemV'] = 70;
            }
            if (preg_match('#/StdHW[\s]*\[([^\]]*)#', $eplain, $matches) > 0) {
                $fmetric['StemH'] = intval($matches[1]);
            } else {
                $fmetric['StemH'] = 30;
            }
            if (preg_match('#/BlueValues[\s]*\[([^\]]*)#', $eplain, $matches) > 0) {
                $bv = explode(' ', $matches[1]);
                if (count($bv) >= 6) {
                    $v1 = intval($bv[2]);
                    $v2 = intval($bv[4]);
                    if ($v1 <= $v2) {
                        $fmetric['XHeight'] = $v1;
                        $fmetric['CapHeight'] = $v2;
                    } else {
                        $fmetric['XHeight'] = $v2;
                        $fmetric['CapHeight'] = $v1;
                    }
                } else {
                    $fmetric['XHeight'] = 450;
                    $fmetric['CapHeight'] = 700;
                }
            } else {
                $fmetric['XHeight'] = 450;
                $fmetric['CapHeight'] = 700;
            }
            // get the number of random bytes at the beginning of charstrings
            if (preg_match('#/lenIV[\s]*([0-9]*)#', $eplain, $matches) > 0) {
                $lenIV = intval($matches[1]);
            } else {
                $lenIV = 4;
            }
            $fmetric['Leading'] = 0;
            // get charstring data
            $eplain = substr($eplain, (strpos($eplain, '/CharStrings') + 1));
            preg_match_all('#/([A-Za-z0-9\.]*)[\s][0-9]+[\s]RD[\s](.*)[\s]ND#sU', $eplain, $matches, PREG_SET_ORDER);
            if (!empty($enc) AND isset($this->encmaps->encmap[$enc])) {
                $enc_map = $this->encmaps->encmap[$enc];
            } else {
                $enc_map = false;
            }
            $fmetric['cw'] = '';
            $fmetric['MaxWidth'] = 0;
            $cwidths = array();
            foreach ($matches as $k => $v) {
                $cid = 0;
                if (isset($imap[$v[1]])) {
                    $cid = $imap[$v[1]];
                } elseif ($enc_map !== false) {
                    $cid = array_search($v[1], $enc_map);
                    if ($cid === false) {
                        $cid = 0;
                    } elseif ($cid > 1000) {
                        $cid -= 1000;
                    }
                }
                // decrypt charstring encrypted part
                $r = 4330; // charstring encryption constant
                $c1 = 52845;
                $c2 = 22719;
                $cd = $v[2];
                $clen = strlen($cd);
                $ccom = array();
                for ($i = 0; $i < $clen; ++$i) {
                    $chr = ord($cd[$i]);
                    $ccom[] = ($chr ^ ($r >> 8));
                    $r = ((($chr + $r) * $c1 + $c2) % 65536);
                }
                // decode numbers
                $cdec = array();
                $ck = 0;
                $i = $lenIV;
                while ($i < $clen) {
                    if ($ccom[$i] < 32) {
                        $cdec[$ck] = $ccom[$i];
                        if (($ck > 0) AND ($cdec[$ck] == 13)) {
                            // hsbw command: update width
                            $cwidths[$cid] = $cdec[($ck - 1)];
                        }
                        ++$i;
                    } elseif (($ccom[$i] >= 32) AND ($ccom[$i] <= 246)) {
                        $cdec[$ck] = ($ccom[$i] - 139);
                        ++$i;
                    } elseif (($ccom[$i] >= 247) AND ($ccom[$i] <= 250)) {
                        $cdec[$ck] = ((($ccom[$i] - 247) * 256) + $ccom[($i + 1)] + 108);
                        $i += 2;
                    } elseif (($ccom[$i] >= 251) AND ($ccom[$i] <= 254)) {
                        $cdec[$ck] = ((-($ccom[$i] - 251) * 256) - $ccom[($i + 1)] - 108);
                        $i += 2;
                    } elseif ($ccom[$i] == 255) {
                        $sval = chr($ccom[($i + 1)]) . chr($ccom[($i + 2)]) . chr($ccom[($i + 3)]) . chr($ccom[($i + 4)]);
                        $vsval = unpack('li', $sval);
                        $cdec[$ck] = $vsval['i'];
                        $i += 5;
                    }
                    ++$ck;
                }
            } // end for each matches
            $fmetric['MissingWidth'] = $cwidths[0];
            $fmetric['MaxWidth'] = $fmetric['MissingWidth'];
            $fmetric['AvgWidth'] = 0;
            // set chars widths
            for ($cid = 0; $cid <= 255; ++$cid) {
                if (isset($cwidths[$cid])) {
                    if ($cwidths[$cid] > $fmetric['MaxWidth']) {
                        $fmetric['MaxWidth'] = $cwidths[$cid];
                    }
                    $fmetric['AvgWidth'] += $cwidths[$cid];
                    $fmetric['cw'] .= ',' . $cid . '=>' . $cwidths[$cid];
                } else {
                    $fmetric['cw'] .= ',' . $cid . '=>' . $fmetric['MissingWidth'];
                }
            }
            $fmetric['AvgWidth'] = round($fmetric['AvgWidth'] / count($cwidths));
        } else {
            // ---------- TRUE TYPE ----------
            if ($fmetric['type'] != 'cidfont0') {
                // store compressed font
                $fp = fopen($outpath . $fmetric['file'], 'wb');
                fwrite($fp, gzcompress($font));
                fclose($fp);
            }
            $offset = 0; // offset position of the font data
            if ($this->_getULONG($font, $offset) != 0x10000) {
                // sfnt version must be 0x00010000 for TrueType version 1.0.
                return $font;
            }
            $offset += 4;
            // get number of tables
            $numTables = $this->_getUSHORT($font, $offset);
            $offset += 2;
            // skip searchRange, entrySelector and rangeShift
            $offset += 6;
            // tables array
            $table = array();
            // ---------- get tables ----------
            for ($i = 0; $i < $numTables; ++$i) {
                // get table info
                $tag = substr($font, $offset, 4);
                $offset += 4;
                $table[$tag] = array();
                $table[$tag]['checkSum'] = $this->_getULONG($font, $offset);
                $offset += 4;
                $table[$tag]['offset'] = $this->_getULONG($font, $offset);
                $offset += 4;
                $table[$tag]['length'] = $this->_getULONG($font, $offset);
                $offset += 4;
            }
            // check magicNumber
            $offset = $table['head']['offset'] + 12;
            if ($this->_getULONG($font, $offset) != 0x5F0F3CF5) {
                // magicNumber must be 0x5F0F3CF5
                return $font;
            }
            $offset += 4;
            $offset += 2; // skip flags
            // get FUnits
            $fmetric['unitsPerEm'] = $this->_getUSHORT($font, $offset);
            $offset += 2;
            // units ratio constant
            $urk = (1000 / $fmetric['unitsPerEm']);
            $offset += 16; // skip created, modified
            $xMin = round($this->_getFWORD($font, $offset) * $urk);
            $offset += 2;
            $yMin = round($this->_getFWORD($font, $offset) * $urk);
            $offset += 2;
            $xMax = round($this->_getFWORD($font, $offset) * $urk);
            $offset += 2;
            $yMax = round($this->_getFWORD($font, $offset) * $urk);
            $offset += 2;
            $fmetric['bbox'] = '' . $xMin . ' ' . $yMin . ' ' . $xMax . ' ' . $yMax . '';
            $macStyle = $this->_getUSHORT($font, $offset);
            $offset += 2;
            // PDF font flags
            $fmetric['Flags'] = $flags;
            if (($macStyle & 2) == 2) {
                // italic flag
                $fmetric['Flags'] |= 64;
            }
            // get offset mode (indexToLocFormat : 0 = short, 1 = long)
            $offset = $table['head']['offset'] + 50;
            $short_offset = ($this->_getSHORT($font, $offset) == 0);
            $offset += 2;
            // get the offsets to the locations of the glyphs in the font, relative to the beginning of the glyphData table
            $indexToLoc = array();
            $offset = $table['loca']['offset'];
            if ($short_offset) {
                // short version
                $tot_num_glyphs = ($table['loca']['length'] / 2); // numGlyphs + 1
                for ($i = 0; $i < $tot_num_glyphs; ++$i) {
                    $indexToLoc[$i] = $this->_getUSHORT($font, $offset) * 2;
                    $offset += 2;
                }
            } else {
                // long version
                $tot_num_glyphs = ($table['loca']['length'] / 4); // numGlyphs + 1
                for ($i = 0; $i < $tot_num_glyphs; ++$i) {
                    $indexToLoc[$i] = $this->_getULONG($font, $offset);
                    $offset += 4;
                }
            }
            // get glyphs indexes of chars from cmap table
            $offset = $table['cmap']['offset'] + 2;
            $numEncodingTables = $this->_getUSHORT($font, $offset);
            $offset += 2;
            $encodingTables = array();
            for ($i = 0; $i < $numEncodingTables; ++$i) {
                $encodingTables[$i]['platformID'] = $this->_getUSHORT($font, $offset);
                $offset += 2;
                $encodingTables[$i]['encodingID'] = $this->_getUSHORT($font, $offset);
                $offset += 2;
                $encodingTables[$i]['offset'] = $this->_getULONG($font, $offset);
                $offset += 4;
            }
            // ---------- get os/2 metrics ----------
            $offset = $table['OS/2']['offset'];
            $offset += 2; // skip version
            // xAvgCharWidth
            $fmetric['AvgWidth'] = round($this->_getFWORD($font, $offset) * $urk);
            $offset += 2;
            // usWeightClass
            $usWeightClass = round($this->_getUFWORD($font, $offset) * $urk);
            // estimate StemV and StemH (400 = usWeightClass for Normal - Regular font)
            $fmetric['StemV'] = round((70 * $usWeightClass) / 400);
            $fmetric['StemH'] = round((30 * $usWeightClass) / 400);
            $offset += 2;
            $offset += 2; // usWidthClass
            $fsType = $this->_getSHORT($font, $offset);
            $offset += 2;
            if ($fsType == 2) {
                $this->Error('This Font cannot be modified, embedded or exchanged in any manner without first obtaining permission of the legal owner.');
            }
            // ---------- get font name ----------
            $fmetric['name'] = '';
            $offset = $table['name']['offset'];
            $offset += 2; // skip Format selector (=0).
            // Number of NameRecords that follow n.
            $numNameRecords = $this->_getUSHORT($font, $offset);
            $offset += 2;
            // Offset to start of string storage (from start of table).
            $stringStorageOffset = $this->_getUSHORT($font, $offset);
            $offset += 2;
            for ($i = 0; $i < $numNameRecords; ++$i) {
                $offset += 6; // skip Platform ID, Platform-specific encoding ID, Language ID.
                // Name ID.
                $nameID = $this->_getUSHORT($font, $offset);
                $offset += 2;
                if ($nameID == 6) {
                    // String length (in bytes).
                    $stringLength = $this->_getUSHORT($font, $offset);
                    $offset += 2;
                    // String offset from start of storage area (in bytes).
                    $stringOffset = $this->_getUSHORT($font, $offset);
                    $offset += 2;
                    $offset = ($table['name']['offset'] + $stringStorageOffset + $stringOffset);
                    $fmetric['name'] = substr($font, $offset, $stringLength);
                    $fmetric['name'] = preg_replace('/[^a-zA-Z0-9_\-]/', '', $fmetric['name']);
                    break;
                } else {
                    $offset += 4; // skip String length, String offset
                }
            }
            if (empty($fmetric['name'])) {
                $fmetric['name'] = $font_name;
            }
            // ---------- get post data ----------
            $offset = $table['post']['offset'];
            $offset += 4; // skip Format Type
            $fmetric['italicAngle'] = $this->_getFIXED($font, $offset);
            $offset += 4;
            $fmetric['underlinePosition'] = round($this->_getFWORD($font, $offset) * $urk);
            $offset += 2;
            $fmetric['underlineThickness'] = round($this->_getFWORD($font, $offset) * $urk);
            $offset += 2;
            $isFixedPitch = ($this->_getULONG($font, $offset) == 0) ? false : true;
            $offset += 2;
            if ($isFixedPitch) {
                $fmetric['Flags'] |= 1;
            }
            // ---------- get hhea data ----------
            $offset = $table['hhea']['offset'];
            $offset += 4; // skip Table version number
            // Ascender
            $fmetric['Ascent'] = round($this->_getFWORD($font, $offset) * $urk);
            $offset += 2;
            // Descender
            $fmetric['Descent'] = round($this->_getFWORD($font, $offset) * $urk);
            $offset += 2;
            // LineGap
            $fmetric['Leading'] = round($this->_getFWORD($font, $offset) * $urk);
            $offset += 2;
            // advanceWidthMax
            $fmetric['MaxWidth'] = round($this->_getUFWORD($font, $offset) * $urk);
            $offset += 2;
            $offset += 22; // skip some values
            // get the number of hMetric entries in hmtx table
            $numberOfHMetrics = $this->_getUSHORT($font, $offset);
            // ---------- get maxp data ----------
            $offset = $table['maxp']['offset'];
            $offset += 4; // skip Table version number
            // get the the number of glyphs in the font.
            $numGlyphs = $this->_getUSHORT($font, $offset);
            // ---------- get CIDToGIDMap ----------
            $ctg = array();
            foreach ($encodingTables as $enctable) {
                // get only specified Platform ID and Encoding ID
                if (($enctable['platformID'] == $platid) AND ($enctable['encodingID'] == $encid)) {
                    $offset = $table['cmap']['offset'] + $enctable['offset'];
                    $format = $this->_getUSHORT($font, $offset);
                    $offset += 2;
                    switch ($format) {
                        case 0: { // Format 0: Byte encoding table
                                $offset += 4; // skip length and version/language
                                for ($c = 0; $c < 256; ++$c) {
                                    $g = $this->_getBYTE($font, $offset);
                                    $ctg[$c] = $g;
                                    ++$offset;
                                }
                                break;
                            }
                        case 2: { // Format 2: High-byte mapping through table
                                $offset += 4; // skip length and version/language
                                $numSubHeaders = 0;
                                for ($i = 0; $i < 256; ++$i) {
                                    // Array that maps high bytes to subHeaders: value is subHeader index * 8.
                                    $subHeaderKeys[$i] = ($this->_getUSHORT($font, $offset) / 8);
                                    $offset += 2;
                                    if ($numSubHeaders < $subHeaderKeys[$i]) {
                                        $numSubHeaders = $subHeaderKeys[$i];
                                    }
                                }
                                // the number of subHeaders is equal to the max of subHeaderKeys + 1
                                ++$numSubHeaders;
                                // read subHeader structures
                                $subHeaders = array();
                                $numGlyphIndexArray = 0;
                                for ($k = 0; $k < $numSubHeaders; ++$k) {
                                    $subHeaders[$k]['firstCode'] = $this->_getUSHORT($font, $offset);
                                    $offset += 2;
                                    $subHeaders[$k]['entryCount'] = $this->_getUSHORT($font, $offset);
                                    $offset += 2;
                                    $subHeaders[$k]['idDelta'] = $this->_getUSHORT($font, $offset);
                                    $offset += 2;
                                    $subHeaders[$k]['idRangeOffset'] = $this->_getUSHORT($font, $offset);
                                    $offset += 2;
                                    $subHeaders[$k]['idRangeOffset'] -= (2 + (($numSubHeaders - $k - 1) * 8));
                                    $subHeaders[$k]['idRangeOffset'] /= 2;
                                    $numGlyphIndexArray += $subHeaders[$k]['entryCount'];
                                }
                                for ($k = 0; $k < $numGlyphIndexArray; ++$k) {
                                    $glyphIndexArray[$k] = $this->_getUSHORT($font, $offset);
                                    $offset += 2;
                                }
                                for ($i = 0; $i < 256; ++$i) {
                                    $k = $subHeaderKeys[$i];
                                    if ($k == 0) {
                                        // one byte code
                                        $c = $i;
                                        $g = $glyphIndexArray[0];
                                        $ctg[$c] = $g;
                                    } else {
                                        // two bytes code
                                        $start_byte = $subHeaders[$k]['firstCode'];
                                        $end_byte = $start_byte + $subHeaders[$k]['entryCount'];
                                        for ($j = $start_byte; $j < $end_byte; ++$j) {
                                            // combine high and low bytes
                                            $c = (($i << 8) + $j);
                                            $idRangeOffset = ($subHeaders[$k]['idRangeOffset'] + $j - $subHeaders[$k]['firstCode']);
                                            $g = ($glyphIndexArray[$idRangeOffset] + $idDelta[$k]) % 65536;
                                            if ($g < 0) {
                                                $g = 0;
                                            }
                                            $ctg[$c] = $g;
                                        }
                                    }
                                }
                                break;
                            }
                        case 4: { // Format 4: Segment mapping to delta values
                                $length = $this->_getUSHORT($font, $offset);
                                $offset += 2;
                                $offset += 2; // skip version/language
                                $segCount = ($this->_getUSHORT($font, $offset) / 2);
                                $offset += 2;
                                $offset += 6; // skip searchRange, entrySelector, rangeShift
                                $endCount = array(); // array of end character codes for each segment
                                for ($k = 0; $k < $segCount; ++$k) {
                                    $endCount[$k] = $this->_getUSHORT($font, $offset);
                                    $offset += 2;
                                }
                                $offset += 2; // skip reservedPad
                                $startCount = array(); // array of start character codes for each segment
                                for ($k = 0; $k < $segCount; ++$k) {
                                    $startCount[$k] = $this->_getUSHORT($font, $offset);
                                    $offset += 2;
                                }
                                $idDelta = array(); // delta for all character codes in segment
                                for ($k = 0; $k < $segCount; ++$k) {
                                    $idDelta[$k] = $this->_getUSHORT($font, $offset);
                                    $offset += 2;
                                }
                                $idRangeOffset = array(); // Offsets into glyphIdArray or 0
                                for ($k = 0; $k < $segCount; ++$k) {
                                    $idRangeOffset[$k] = $this->_getUSHORT($font, $offset);
                                    $offset += 2;
                                }
                                $gidlen = ($length / 2) - 8 - (4 * $segCount);
                                $glyphIdArray = array(); // glyph index array
                                for ($k = 0; $k < $gidlen; ++$k) {
                                    $glyphIdArray[$k] = $this->_getUSHORT($font, $offset);
                                    $offset += 2;
                                }
                                for ($k = 0; $k < $segCount; ++$k) {
                                    for ($c = $startCount[$k]; $c <= $endCount[$k]; ++$c) {
                                        if ($idRangeOffset[$k] == 0) {
                                            $g = ($idDelta[$k] + $c) % 65536;
                                        } else {
                                            $gid = (($idRangeOffset[$k] / 2) + ($c - $startCount[$k]) - ($segCount - $k));
                                            $g = ($glyphIdArray[$gid] + $idDelta[$k]) % 65536;
                                        }
                                        if ($g < 0) {
                                            $g = 0;
                                        }
                                        $ctg[$c] = $g;
                                    }
                                }
                                break;
                            }
                        case 6: { // Format 6: Trimmed table mapping
                                $offset += 4; // skip length and version/language
                                $firstCode = $this->_getUSHORT($font, $offset);
                                $offset += 2;
                                $entryCount = $this->_getUSHORT($font, $offset);
                                $offset += 2;
                                for ($k = 0; $k < $entryCount; ++$k) {
                                    $c = ($k + $firstCode);
                                    $g = $this->_getUSHORT($font, $offset);
                                    $offset += 2;
                                    $ctg[$c] = $g;
                                }
                                break;
                            }
                        case 8: { // Format 8: Mixed 16-bit and 32-bit coverage
                                $offset += 10; // skip reserved, length and version/language
                                for ($k = 0; $k < 8192; ++$k) {
                                    $is32[$k] = $this->_getBYTE($font, $offset);
                                    ++$offset;
                                }
                                $nGroups = $this->_getULONG($font, $offset);
                                $offset += 4;
                                for ($i = 0; $i < $nGroups; ++$i) {
                                    $startCharCode = $this->_getULONG($font, $offset);
                                    $offset += 4;
                                    $endCharCode = $this->_getULONG($font, $offset);
                                    $offset += 4;
                                    $startGlyphID = $this->_getULONG($font, $offset);
                                    $offset += 4;
                                    for ($k = $startCharCode; $k <= $endCharCode; ++$k) {
                                        $is32idx = floor($c / 8);
                                        if ((isset($is32[$is32idx])) AND (($is32[$is32idx] & (1 << (7 - ($c % 8)))) == 0)) {
                                            $c = $k;
                                        } else {
                                            // 32 bit format
                                            // convert to decimal (http://www.unicode.org/faq//utf_bom.html#utf16-4)
                                            //LEAD_OFFSET = (0xD800 - (0x10000 >> 10)) = 55232
                                            //SURROGATE_OFFSET = (0x10000 - (0xD800 << 10) - 0xDC00) = -56613888
                                            $c = ((55232 + ($k >> 10)) << 10) + (0xDC00 + ($k & 0x3FF)) - 56613888;
                                        }
                                        $ctg[$c] = 0;
                                        ++$startGlyphID;
                                    }
                                }
                                break;
                            }
                        case 10: { // Format 10: Trimmed array
                                $offset += 10; // skip reserved, length and version/language
                                $startCharCode = $this->_getULONG($font, $offset);
                                $offset += 4;
                                $numChars = $this->_getULONG($font, $offset);
                                $offset += 4;
                                for ($k = 0; $k < $numChars; ++$k) {
                                    $c = ($k + $startCharCode);
                                    $g = $this->_getUSHORT($font, $offset);
                                    $ctg[$c] = $g;
                                    $offset += 2;
                                }
                                break;
                            }
                        case 12: { // Format 12: Segmented coverage
                                $offset += 10; // skip length and version/language
                                $nGroups = $this->_getULONG($font, $offset);
                                $offset += 4;
                                for ($k = 0; $k < $nGroups; ++$k) {
                                    $startCharCode = $this->_getULONG($font, $offset);
                                    $offset += 4;
                                    $endCharCode = $this->_getULONG($font, $offset);
                                    $offset += 4;
                                    $startGlyphCode = $this->_getULONG($font, $offset);
                                    $offset += 4;
                                    for ($c = $startCharCode; $c <= $endCharCode; ++$c) {
                                        $ctg[$c] = $startGlyphCode;
                                        ++$startGlyphCode;
                                    }
                                }
                                break;
                            }
                        case 13: { // Format 13: Many-to-one range mappings
                                // to be implemented ...
                                break;
                            }
                        case 14: { // Format 14: Unicode Variation Sequences
                                // to be implemented ...
                                break;
                            }
                    }
                }
            }
            if (!isset($ctg[0])) {
                $ctg[0] = 0;
            }
            // get xHeight (height of x)
            $offset = ($table['glyf']['offset'] + $indexToLoc[$ctg[120]] + 4);
            $yMin = $this->_getFWORD($font, $offset);
            $offset += 4;
            $yMax = $this->_getFWORD($font, $offset);
            $offset += 2;
            $fmetric['XHeight'] = round(($yMax - $yMin) * $urk);
            // get CapHeight (height of H)
            $offset = ($table['glyf']['offset'] + $indexToLoc[$ctg[72]] + 4);
            $yMin = $this->_getFWORD($font, $offset);
            $offset += 4;
            $yMax = $this->_getFWORD($font, $offset);
            $offset += 2;
            $fmetric['CapHeight'] = round(($yMax - $yMin) * $urk);
            // ceate widths array
            $cw = array();
            $offset = $table['hmtx']['offset'];
            for ($i = 0; $i < $numberOfHMetrics; ++$i) {
                $cw[$i] = round($this->_getUFWORD($font, $offset) * $urk);
                $offset += 4; // skip lsb
            }
            if ($numberOfHMetrics < $numGlyphs) {
                // fill missing widths with the last value
                $cw = array_pad($cw, $numGlyphs, $cw[($numberOfHMetrics - 1)]);
            }
            $fmetric['MissingWidth'] = $cw[0];
            $fmetric['cw'] = '';
            for ($cid = 0; $cid <= 65535; ++$cid) {
                if (isset($ctg[$cid])) {
                    if (isset($cw[$ctg[$cid]])) {
                        $fmetric['cw'] .= ',' . $cid . '=>' . $cw[$ctg[$cid]];
                    }
                    if ($addcbbox AND isset($indexToLoc[$ctg[$cid]])) {
                        $offset = ($table['glyf']['offset'] + $indexToLoc[$ctg[$cid]]);
                        $xMin = round($this->_getFWORD($font, $offset + 2)) * $urk;
                        $yMin = round($this->_getFWORD($font, $offset + 4)) * $urk;
                        $xMax = round($this->_getFWORD($font, $offset + 6)) * $urk;
                        $yMax = round($this->_getFWORD($font, $offset + 8)) * $urk;
                        $fmetric['cbbox'] .= ',' . $cid . '=>array(' . $xMin . ',' . $yMin . ',' . $xMax . ',' . $yMax . ')';
                    }
                }
            }
        } // end of true type
        if (($fmetric['type'] == 'TrueTypeUnicode') AND (count($ctg) == 256)) {
            $fmetric['type'] == 'TrueType';
        }
        // ---------- create php font file ----------
        $pfile = '<' . '?' . 'php' . "\n";
        $pfile .= '// TCPDF FONT FILE DESCRIPTION' . "\n";
        $pfile .= '$type=\'' . $fmetric['type'] . '\';' . "\n";
        $pfile .= '$name=\'' . $fmetric['name'] . '\';' . "\n";
        $pfile .= '$up=' . $fmetric['underlinePosition'] . ';' . "\n";
        $pfile .= '$ut=' . $fmetric['underlineThickness'] . ';' . "\n";
        if ($fmetric['MissingWidth'] > 0) {
            $pfile .= '$dw=' . $fmetric['MissingWidth'] . ';' . "\n";
        } else {
            $pfile .= '$dw=' . $fmetric['AvgWidth'] . ';' . "\n";
        }
        $pfile .= '$diff=\'' . $fmetric['diff'] . '\';' . "\n";
        if ($fmetric['type'] == 'Type1') {
            // Type 1
            $pfile .= '$enc=\'' . $fmetric['enc'] . '\';' . "\n";
            $pfile .= '$file=\'' . $fmetric['file'] . '\';' . "\n";
            $pfile .= '$size1=' . $fmetric['size1'] . ';' . "\n";
            $pfile .= '$size2=' . $fmetric['size2'] . ';' . "\n";
        } else {
            $pfile .= '$originalsize=' . $fmetric['originalsize'] . ';' . "\n";
            if ($fmetric['type'] == 'cidfont0') {
                // CID-0
                switch ($fonttype) {
                    case 'CID0JP': {
                            $pfile .= '// Japanese' . "\n";
                            $pfile .= '$enc=\'UniJIS-UTF16-H\';' . "\n";
                            $pfile .= '$cidinfo=array(\'Registry\'=>\'Adobe\', \'Ordering\'=>\'Japan1\',\'Supplement\'=>5);' . "\n";
                            $pfile .= 'include(dirname(__FILE__).\'/uni2cid_aj16.php\');' . "\n";
                            break;
                        }
                    case 'CID0KR': {
                            $pfile .= '// Korean' . "\n";
                            $pfile .= '$enc=\'UniKS-UTF16-H\';' . "\n";
                            $pfile .= '$cidinfo=array(\'Registry\'=>\'Adobe\', \'Ordering\'=>\'Korea1\',\'Supplement\'=>0);' . "\n";
                            $pfile .= 'include(dirname(__FILE__).\'/uni2cid_ak12.php\');' . "\n";
                            break;
                        }
                    case 'CID0CS': {
                            $pfile .= '// Chinese Simplified' . "\n";
                            $pfile .= '$enc=\'UniGB-UTF16-H\';' . "\n";
                            $pfile .= '$cidinfo=array(\'Registry\'=>\'Adobe\', \'Ordering\'=>\'GB1\',\'Supplement\'=>2);' . "\n";
                            $pfile .= 'include(dirname(__FILE__).\'/uni2cid_ag15.php\');' . "\n";
                            break;
                        }
                    case 'CID0CT':
                    default: {
                            $pfile .= '// Chinese Traditional' . "\n";
                            $pfile .= '$enc=\'UniCNS-UTF16-H\';' . "\n";
                            $pfile .= '$cidinfo=array(\'Registry\'=>\'Adobe\', \'Ordering\'=>\'CNS1\',\'Supplement\'=>0);' . "\n";
                            $pfile .= 'include(dirname(__FILE__).\'/uni2cid_aj16.php\');' . "\n";
                            break;
                        }
                }
            } else {
                // TrueType
                $pfile .= '$enc=\'' . $fmetric['enc'] . '\';' . "\n";
                $pfile .= '$file=\'' . $fmetric['file'] . '\';' . "\n";
                $pfile .= '$ctg=\'' . $fmetric['ctg'] . '\';' . "\n";
                // create CIDToGIDMap
                $cidtogidmap = str_pad('', 131072, "\x00"); // (256 * 256 * 2) = 131072
                foreach ($ctg as $cid => $gid) {
                    $cidtogidmap = $this->updateCIDtoGIDmap($cidtogidmap, $cid, $ctg[$cid]);
                }
                // store compressed CIDToGIDMap
                $fp = fopen($outpath . $fmetric['ctg'], 'wb');
                fwrite($fp, gzcompress($cidtogidmap));
                fclose($fp);
            }
        }
        $pfile .= '$desc=array(';
        $pfile .= '\'Flags\'=>' . $fmetric['Flags'] . ',';
        $pfile .= '\'FontBBox\'=>\'[' . $fmetric['bbox'] . ']\',';
        $pfile .= '\'ItalicAngle\'=>' . $fmetric['italicAngle'] . ',';
        $pfile .= '\'Ascent\'=>' . $fmetric['Ascent'] . ',';
        $pfile .= '\'Descent\'=>' . $fmetric['Descent'] . ',';
        $pfile .= '\'Leading\'=>' . $fmetric['Leading'] . ',';
        $pfile .= '\'CapHeight\'=>' . $fmetric['CapHeight'] . ',';
        $pfile .= '\'XHeight\'=>' . $fmetric['XHeight'] . ',';
        $pfile .= '\'StemV\'=>' . $fmetric['StemV'] . ',';
        $pfile .= '\'StemH\'=>' . $fmetric['StemH'] . ',';
        $pfile .= '\'AvgWidth\'=>' . $fmetric['AvgWidth'] . ',';
        $pfile .= '\'MaxWidth\'=>' . $fmetric['MaxWidth'] . ',';
        $pfile .= '\'MissingWidth\'=>' . $fmetric['MissingWidth'] . '';
        $pfile .= ');' . "\n";
        if (isset($fmetric['cbbox'])) {
            $pfile .= '$cbbox=array(' . substr($fmetric['cbbox'], 1) . ');' . "\n";
        }
        $pfile .= '$cw=array(' . substr($fmetric['cw'], 1) . ');' . "\n";
        $pfile .= '// --- EOF ---' . "\n";
        // store file
        $fp = fopen($outpath . $font_name . '.php', 'w');
        fwrite($fp, $pfile);
        fclose($fp);
        // return TCPDF font name
        return $font_name;
    }

    /**
     * Returns a subset of the TrueType font data without the unused glyphs.
     * @param $font (string) TrueType font data.
     * @param $subsetchars (array) Array of used characters (the glyphs to keep).
     * @return (string) A subset of TrueType font data without the unused glyphs.
     * @author Nicola Asuni
     * @protected
     * @since 5.2.000 (2010-06-02)
     */
    protected function _getTrueTypeFontSubset($font, $subsetchars) {
        ksort($subsetchars);
        $offset = 0; // offset position of the font data
        if ($this->_getULONG($font, $offset) != 0x10000) {
            // sfnt version must be 0x00010000 for TrueType version 1.0.
            return $font;
        }
        $offset += 4;
        // get number of tables
        $numTables = $this->_getUSHORT($font, $offset);
        $offset += 2;
        // skip searchRange, entrySelector and rangeShift
        $offset += 6;
        // tables array
        $table = array();
        // for each table
        for ($i = 0; $i < $numTables; ++$i) {
            // get table info
            $tag = substr($font, $offset, 4);
            $offset += 4;
            $table[$tag] = array();
            $table[$tag]['checkSum'] = $this->_getULONG($font, $offset);
            $offset += 4;
            $table[$tag]['offset'] = $this->_getULONG($font, $offset);
            $offset += 4;
            $table[$tag]['length'] = $this->_getULONG($font, $offset);
            $offset += 4;
        }
        // check magicNumber
        $offset = $table['head']['offset'] + 12;
        if ($this->_getULONG($font, $offset) != 0x5F0F3CF5) {
            // magicNumber must be 0x5F0F3CF5
            return $font;
        }
        $offset += 4;
        // get offset mode (indexToLocFormat : 0 = short, 1 = long)
        $offset = $table['head']['offset'] + 50;
        $short_offset = ($this->_getSHORT($font, $offset) == 0);
        $offset += 2;
        // get the offsets to the locations of the glyphs in the font, relative to the beginning of the glyphData table
        $indexToLoc = array();
        $offset = $table['loca']['offset'];
        if ($short_offset) {
            // short version
            $tot_num_glyphs = ($table['loca']['length'] / 2); // numGlyphs + 1
            for ($i = 0; $i < $tot_num_glyphs; ++$i) {
                $indexToLoc[$i] = $this->_getUSHORT($font, $offset) * 2;
                $offset += 2;
            }
        } else {
            // long version
            $tot_num_glyphs = ($table['loca']['length'] / 4); // numGlyphs + 1
            for ($i = 0; $i < $tot_num_glyphs; ++$i) {
                $indexToLoc[$i] = $this->_getULONG($font, $offset);
                $offset += 4;
            }
        }
        // get glyphs indexes of chars from cmap table
        $subsetglyphs = array(); // glyph IDs on key
        $subsetglyphs[0] = true; // character codes that do not correspond to any glyph in the font should be mapped to glyph index 0
        $offset = $table['cmap']['offset'] + 2;
        $numEncodingTables = $this->_getUSHORT($font, $offset);
        $offset += 2;
        $encodingTables = array();
        for ($i = 0; $i < $numEncodingTables; ++$i) {
            $encodingTables[$i]['platformID'] = $this->_getUSHORT($font, $offset);
            $offset += 2;
            $encodingTables[$i]['encodingID'] = $this->_getUSHORT($font, $offset);
            $offset += 2;
            $encodingTables[$i]['offset'] = $this->_getULONG($font, $offset);
            $offset += 4;
        }
        foreach ($encodingTables as $enctable) {
            // get all platforms and encodings
            $offset = $table['cmap']['offset'] + $enctable['offset'];
            $format = $this->_getUSHORT($font, $offset);
            $offset += 2;
            switch ($format) {
                case 0: { // Format 0: Byte encoding table
                        $offset += 4; // skip length and version/language
                        for ($c = 0; $c < 256; ++$c) {
                            if (isset($subsetchars[$c])) {
                                $g = $this->_getBYTE($font, $offset);
                                $subsetglyphs[$g] = true;
                            }
                            ++$offset;
                        }
                        break;
                    }
                case 2: { // Format 2: High-byte mapping through table
                        $offset += 4; // skip length and version/language
                        $numSubHeaders = 0;
                        for ($i = 0; $i < 256; ++$i) {
                            // Array that maps high bytes to subHeaders: value is subHeader index * 8.
                            $subHeaderKeys[$i] = ($this->_getUSHORT($font, $offset) / 8);
                            $offset += 2;
                            if ($numSubHeaders < $subHeaderKeys[$i]) {
                                $numSubHeaders = $subHeaderKeys[$i];
                            }
                        }
                        // the number of subHeaders is equal to the max of subHeaderKeys + 1
                        ++$numSubHeaders;
                        // read subHeader structures
                        $subHeaders = array();
                        $numGlyphIndexArray = 0;
                        for ($k = 0; $k < $numSubHeaders; ++$k) {
                            $subHeaders[$k]['firstCode'] = $this->_getUSHORT($font, $offset);
                            $offset += 2;
                            $subHeaders[$k]['entryCount'] = $this->_getUSHORT($font, $offset);
                            $offset += 2;
                            $subHeaders[$k]['idDelta'] = $this->_getUSHORT($font, $offset);
                            $offset += 2;
                            $subHeaders[$k]['idRangeOffset'] = $this->_getUSHORT($font, $offset);
                            $offset += 2;
                            $subHeaders[$k]['idRangeOffset'] -= (2 + (($numSubHeaders - $k - 1) * 8));
                            $subHeaders[$k]['idRangeOffset'] /= 2;
                            $numGlyphIndexArray += $subHeaders[$k]['entryCount'];
                        }
                        for ($k = 0; $k < $numGlyphIndexArray; ++$k) {
                            $glyphIndexArray[$k] = $this->_getUSHORT($font, $offset);
                            $offset += 2;
                        }
                        for ($i = 0; $i < 256; ++$i) {
                            $k = $subHeaderKeys[$i];
                            if ($k == 0) {
                                // one byte code
                                $c = $i;
                                if (isset($subsetchars[$c])) {
                                    $g = $glyphIndexArray[0];
                                    $subsetglyphs[$g] = true;
                                }
                            } else {
                                // two bytes code
                                $start_byte = $subHeaders[$k]['firstCode'];
                                $end_byte = $start_byte + $subHeaders[$k]['entryCount'];
                                for ($j = $start_byte; $j < $end_byte; ++$j) {
                                    // combine high and low bytes
                                    $c = (($i << 8) + $j);
                                    if (isset($subsetchars[$c])) {
                                        $idRangeOffset = ($subHeaders[$k]['idRangeOffset'] + $j - $subHeaders[$k]['firstCode']);
                                        $g = ($glyphIndexArray[$idRangeOffset] + $idDelta[$k]) % 65536;
                                        if ($g < 0) {
                                            $g = 0;
                                        }
                                        $subsetglyphs[$g] = true;
                                    }
                                }
                            }
                        }
                        break;
                    }
                case 4: { // Format 4: Segment mapping to delta values
                        $length = $this->_getUSHORT($font, $offset);
                        $offset += 2;
                        $offset += 2; // skip version/language
                        $segCount = ($this->_getUSHORT($font, $offset) / 2);
                        $offset += 2;
                        $offset += 6; // skip searchRange, entrySelector, rangeShift
                        $endCount = array(); // array of end character codes for each segment
                        for ($k = 0; $k < $segCount; ++$k) {
                            $endCount[$k] = $this->_getUSHORT($font, $offset);
                            $offset += 2;
                        }
                        $offset += 2; // skip reservedPad
                        $startCount = array(); // array of start character codes for each segment
                        for ($k = 0; $k < $segCount; ++$k) {
                            $startCount[$k] = $this->_getUSHORT($font, $offset);
                            $offset += 2;
                        }
                        $idDelta = array(); // delta for all character codes in segment
                        for ($k = 0; $k < $segCount; ++$k) {
                            $idDelta[$k] = $this->_getUSHORT($font, $offset);
                            $offset += 2;
                        }
                        $idRangeOffset = array(); // Offsets into glyphIdArray or 0
                        for ($k = 0; $k < $segCount; ++$k) {
                            $idRangeOffset[$k] = $this->_getUSHORT($font, $offset);
                            $offset += 2;
                        }
                        $gidlen = ($length / 2) - 8 - (4 * $segCount);
                        $glyphIdArray = array(); // glyph index array
                        for ($k = 0; $k < $gidlen; ++$k) {
                            $glyphIdArray[$k] = $this->_getUSHORT($font, $offset);
                            $offset += 2;
                        }
                        for ($k = 0; $k < $segCount; ++$k) {
                            for ($c = $startCount[$k]; $c <= $endCount[$k]; ++$c) {
                                if (isset($subsetchars[$c])) {
                                    if ($idRangeOffset[$k] == 0) {
                                        $g = ($idDelta[$k] + $c) % 65536;
                                    } else {
                                        $gid = (($idRangeOffset[$k] / 2) + ($c - $startCount[$k]) - ($segCount - $k));
                                        $g = ($glyphIdArray[$gid] + $idDelta[$k]) % 65536;
                                    }
                                    if ($g < 0) {
                                        $g = 0;
                                    }
                                    $subsetglyphs[$g] = true;
                                }
                            }
                        }
                        break;
                    }
                case 6: { // Format 6: Trimmed table mapping
                        $offset += 4; // skip length and version/language
                        $firstCode = $this->_getUSHORT($font, $offset);
                        $offset += 2;
                        $entryCount = $this->_getUSHORT($font, $offset);
                        $offset += 2;
                        for ($k = 0; $k < $entryCount; ++$k) {
                            $c = ($k + $firstCode);
                            if (isset($subsetchars[$c])) {
                                $g = $this->_getUSHORT($font, $offset);
                                $subsetglyphs[$g] = true;
                            }
                            $offset += 2;
                        }
                        break;
                    }
                case 8: { // Format 8: Mixed 16-bit and 32-bit coverage
                        $offset += 10; // skip reserved, length and version/language
                        for ($k = 0; $k < 8192; ++$k) {
                            $is32[$k] = $this->_getBYTE($font, $offset);
                            ++$offset;
                        }
                        $nGroups = $this->_getULONG($font, $offset);
                        $offset += 4;
                        for ($i = 0; $i < $nGroups; ++$i) {
                            $startCharCode = $this->_getULONG($font, $offset);
                            $offset += 4;
                            $endCharCode = $this->_getULONG($font, $offset);
                            $offset += 4;
                            $startGlyphID = $this->_getULONG($font, $offset);
                            $offset += 4;
                            for ($k = $startCharCode; $k <= $endCharCode; ++$k) {
                                $is32idx = floor($c / 8);
                                if ((isset($is32[$is32idx])) AND (($is32[$is32idx] & (1 << (7 - ($c % 8)))) == 0)) {
                                    $c = $k;
                                } else {
                                    // 32 bit format
                                    // convert to decimal (http://www.unicode.org/faq//utf_bom.html#utf16-4)
                                    //LEAD_OFFSET = (0xD800 - (0x10000 >> 10)) = 55232
                                    //SURROGATE_OFFSET = (0x10000 - (0xD800 << 10) - 0xDC00) = -56613888
                                    $c = ((55232 + ($k >> 10)) << 10) + (0xDC00 + ($k & 0x3FF)) - 56613888;
                                }
                                if (isset($subsetchars[$c])) {
                                    $subsetglyphs[$startGlyphID] = true;
                                }
                                ++$startGlyphID;
                            }
                        }
                        break;
                    }
                case 10: { // Format 10: Trimmed array
                        $offset += 10; // skip reserved, length and version/language
                        $startCharCode = $this->_getULONG($font, $offset);
                        $offset += 4;
                        $numChars = $this->_getULONG($font, $offset);
                        $offset += 4;
                        for ($k = 0; $k < $numChars; ++$k) {
                            $c = ($k + $startCharCode);
                            if (isset($subsetchars[$c])) {
                                $g = $this->_getUSHORT($font, $offset);
                                $subsetglyphs[$g] = true;
                            }
                            $offset += 2;
                        }
                        break;
                    }
                case 12: { // Format 12: Segmented coverage
                        $offset += 10; // skip length and version/language
                        $nGroups = $this->_getULONG($font, $offset);
                        $offset += 4;
                        for ($k = 0; $k < $nGroups; ++$k) {
                            $startCharCode = $this->_getULONG($font, $offset);
                            $offset += 4;
                            $endCharCode = $this->_getULONG($font, $offset);
                            $offset += 4;
                            $startGlyphCode = $this->_getULONG($font, $offset);
                            $offset += 4;
                            for ($c = $startCharCode; $c <= $endCharCode; ++$c) {
                                if (isset($subsetchars[$c])) {
                                    $subsetglyphs[$startGlyphCode] = true;
                                }
                                ++$startGlyphCode;
                            }
                        }
                        break;
                    }
                case 13: { // Format 13: Many-to-one range mappings
                        // to be implemented ...
                        break;
                    }
                case 14: { // Format 14: Unicode Variation Sequences
                        // to be implemented ...
                        break;
                    }
            }
        }
        // include all parts of composite glyphs
        $new_sga = $subsetglyphs;
        while (!empty($new_sga)) {
            $sga = $new_sga;
            $new_sga = array();
            foreach ($sga as $key => $val) {
                if (isset($indexToLoc[$key])) {
                    $offset = ($table['glyf']['offset'] + $indexToLoc[$key]);
                    $numberOfContours = $this->_getSHORT($font, $offset);
                    $offset += 2;
                    if ($numberOfContours < 0) { // composite glyph
                        $offset += 8; // skip xMin, yMin, xMax, yMax
                        do {
                            $flags = $this->_getUSHORT($font, $offset);
                            $offset += 2;
                            $glyphIndex = $this->_getUSHORT($font, $offset);
                            $offset += 2;
                            if (!isset($subsetglyphs[$glyphIndex])) {
                                // add missing glyphs
                                $new_sga[$glyphIndex] = true;
                            }
                            // skip some bytes by case
                            if ($flags & 1) {
                                $offset += 4;
                            } else {
                                $offset += 2;
                            }
                            if ($flags & 8) {
                                $offset += 2;
                            } elseif ($flags & 64) {
                                $offset += 4;
                            } elseif ($flags & 128) {
                                $offset += 8;
                            }
                        } while ($flags & 32);
                    }
                }
            }
            $subsetglyphs += $new_sga;
        }
        // sort glyphs by key (and remove duplicates)
        ksort($subsetglyphs);
        // build new glyf and loca tables
        $glyf = '';
        $loca = '';
        $offset = 0;
        $glyf_offset = $table['glyf']['offset'];
        for ($i = 0; $i < $tot_num_glyphs; ++$i) {
            if (isset($subsetglyphs[$i])) {
                $length = ($indexToLoc[($i + 1)] - $indexToLoc[$i]);
                $glyf .= substr($font, ($glyf_offset + $indexToLoc[$i]), $length);
            } else {
                $length = 0;
            }
            if ($short_offset) {
                $loca .= pack('n', ($offset / 2));
            } else {
                $loca .= pack('N', $offset);
            }
            $offset += $length;
        }
        // array of table names to preserve (loca and glyf tables will be added later)
        // the cmap table is not needed and shall not be present, since the mapping from character codes to glyph descriptions is provided separately
        $table_names = array('head', 'hhea', 'hmtx', 'maxp', 'cvt ', 'fpgm', 'prep'); // minimum required table names
        // get the tables to preserve
        $offset = 12;
        foreach ($table as $tag => $val) {
            if (in_array($tag, $table_names)) {
                $table[$tag]['data'] = substr($font, $table[$tag]['offset'], $table[$tag]['length']);
                if ($tag == 'head') {
                    // set the checkSumAdjustment to 0
                    $table[$tag]['data'] = substr($table[$tag]['data'], 0, 8) . "\x0\x0\x0\x0" . substr($table[$tag]['data'], 12);
                }
                $pad = 4 - ($table[$tag]['length'] % 4);
                if ($pad != 4) {
                    // the length of a table must be a multiple of four bytes
                    $table[$tag]['length'] += $pad;
                    $table[$tag]['data'] .= str_repeat("\x0", $pad);
                }
                $table[$tag]['offset'] = $offset;
                $offset += $table[$tag]['length'];
                // check sum is not changed (so keep the following line commented)
                //$table[$tag]['checkSum'] = $this->_getTTFtableChecksum($table[$tag]['data'], $table[$tag]['length']);
            } else {
                unset($table[$tag]);
            }
        }
        // add loca
        $table['loca']['data'] = $loca;
        $table['loca']['length'] = strlen($loca);
        $pad = 4 - ($table['loca']['length'] % 4);
        if ($pad != 4) {
            // the length of a table must be a multiple of four bytes
            $table['loca']['length'] += $pad;
            $table['loca']['data'] .= str_repeat("\x0", $pad);
        }
        $table['loca']['offset'] = $offset;
        $table['loca']['checkSum'] = $this->_getTTFtableChecksum($table['loca']['data'], $table['loca']['length']);
        $offset += $table['loca']['length'];
        // add glyf
        $table['glyf']['data'] = $glyf;
        $table['glyf']['length'] = strlen($glyf);
        $pad = 4 - ($table['glyf']['length'] % 4);
        if ($pad != 4) {
            // the length of a table must be a multiple of four bytes
            $table['glyf']['length'] += $pad;
            $table['glyf']['data'] .= str_repeat("\x0", $pad);
        }
        $table['glyf']['offset'] = $offset;
        $table['glyf']['checkSum'] = $this->_getTTFtableChecksum($table['glyf']['data'], $table['glyf']['length']);
        // rebuild font
        $font = '';
        $font .= pack('N', 0x10000); // sfnt version
        $numTables = count($table);
        $font .= pack('n', $numTables); // numTables
        $entrySelector = floor(log($numTables, 2));
        $searchRange = pow(2, $entrySelector) * 16;
        $rangeShift = ($numTables * 16) - $searchRange;
        $font .= pack('n', $searchRange); // searchRange
        $font .= pack('n', $entrySelector); // entrySelector
        $font .= pack('n', $rangeShift); // rangeShift
        $offset = ($numTables * 16);
        foreach ($table as $tag => $data) {
            $font .= $tag; // tag
            $font .= pack('N', $data['checkSum']); // checkSum
            $font .= pack('N', ($data['offset'] + $offset)); // offset
            $font .= pack('N', $data['length']); // length
        }
        foreach ($table as $data) {
            $font .= $data['data'];
        }
        // set checkSumAdjustment on head table
        $checkSumAdjustment = 0xB1B0AFBA - $this->_getTTFtableChecksum($font, strlen($font));
        $font = substr($font, 0, $table['head']['offset'] + 8) . pack('N', $checkSumAdjustment) . substr($font, $table['head']['offset'] + 12);
        return $font;
    }

    /**
     * Returs the checksum of a TTF table.
     * @param $table (string) table to check
     * @param $length (int) length of table in bytes
     * @return int checksum
     * @author Nicola Asuni
     * @protected
     * @since 5.2.000 (2010-06-02)
     */
    protected function _getTTFtableChecksum($table, $length) {
        $sum = 0;
        $tlen = ($length / 4);
        $offset = 0;
        for ($i = 0; $i < $tlen; ++$i) {
            $v = unpack('Ni', substr($table, $offset, 4));
            $sum += $v['i'];
            $offset += 4;
        }
        $sum = unpack('Ni', pack('N', $sum));
        return $sum['i'];
    }

    /**
     * Outputs font widths
     * @param $font (array) font data
     * @param $cidoffset (int) offset for CID values
     * @return PDF command string for font widths
     * @author Nicola Asuni
     * @protected
     * @since 4.4.000 (2008-12-07)
     */
    protected function _putfontwidths($font, $cidoffset = 0) {
        ksort($font['cw']);
        $rangeid = 0;
        $range = array();
        $prevcid = -2;
        $prevwidth = -1;
        $interval = false;
        // for each character
        foreach ($font['cw'] as $cid => $width) {
            $cid -= $cidoffset;
            if ($font['subset'] AND (!isset($font['subsetchars'][$cid]))) {
                // ignore the unused characters (font subsetting)
                continue;
            }
            if ($width != $font['dw']) {
                if ($cid == ($prevcid + 1)) {
                    // consecutive CID
                    if ($width == $prevwidth) {
                        if ($width == $range[$rangeid][0]) {
                            $range[$rangeid][] = $width;
                        } else {
                            array_pop($range[$rangeid]);
                            // new range
                            $rangeid = $prevcid;
                            $range[$rangeid] = array();
                            $range[$rangeid][] = $prevwidth;
                            $range[$rangeid][] = $width;
                        }
                        $interval = true;
                        $range[$rangeid]['interval'] = true;
                    } else {
                        if ($interval) {
                            // new range
                            $rangeid = $cid;
                            $range[$rangeid] = array();
                            $range[$rangeid][] = $width;
                        } else {
                            $range[$rangeid][] = $width;
                        }
                        $interval = false;
                    }
                } else {
                    // new range
                    $rangeid = $cid;
                    $range[$rangeid] = array();
                    $range[$rangeid][] = $width;
                    $interval = false;
                }
                $prevcid = $cid;
                $prevwidth = $width;
            }
        }
        // optimize ranges
        $prevk = -1;
        $nextk = -1;
        $prevint = false;
        foreach ($range as $k => $ws) {
            $cws = count($ws);
            if (($k == $nextk) AND (!$prevint) AND ((!isset($ws['interval'])) OR ($cws < 4))) {
                if (isset($range[$k]['interval'])) {
                    unset($range[$k]['interval']);
                }
                $range[$prevk] = array_merge($range[$prevk], $range[$k]);
                unset($range[$k]);
            } else {
                $prevk = $k;
            }
            $nextk = $k + $cws;
            if (isset($ws['interval'])) {
                if ($cws > 3) {
                    $prevint = true;
                } else {
                    $prevint = false;
                }
                if (isset($range[$k]['interval'])) {
                    unset($range[$k]['interval']);
                }
                --$nextk;
            } else {
                $prevint = false;
            }
        }
        // output data
        $w = '';
        foreach ($range as $k => $ws) {
            if (count(array_count_values($ws)) == 1) {
                // interval mode is more compact
                $w .= ' ' . $k . ' ' . ($k + count($ws) - 1) . ' ' . $ws[0];
            } else {
                // range mode
                $w .= ' ' . $k . ' [ ' . implode(' ', $ws) . ' ]';
            }
        }
        return '/W [' . $w . ' ]';
    }

    /**
     * Output fonts.
     * @author Nicola Asuni
     * @protected
     */
    protected function _putfonts() {
        $nf = $this->n;
        foreach ($this->diffs as $diff) {
            //Encodings
            $this->_newobj();
            $this->_out('<< /Type /Encoding /BaseEncoding /WinAnsiEncoding /Differences [' . $diff . '] >>' . "\n" . 'endobj');
        }
        $mqr = $this->get_mqr();
        $this->set_mqr(false);
        foreach ($this->FontFiles as $file => $info) {
            // search and get font file to embedd
            $fontdir = $info['fontdir'];
            $file = strtolower($file);
            $fontfile = '';
            // search files on various directories
            if (($fontdir !== false) AND file_exists($fontdir . $file)) {
                $fontfile = $fontdir . $file;
            } elseif (file_exists($this->_getfontpath() . $file)) {
                $fontfile = $this->_getfontpath() . $file;
            } elseif (file_exists($file)) {
                $fontfile = $file;
            }
            if (!$this->empty_string($fontfile)) {
                $font = file_get_contents($fontfile);
                $compressed = (substr($file, -2) == '.z');
                if ((!$compressed) AND (isset($info['length2']))) {
                    $header = (ord($font{0}) == 128);
                    if ($header) {
                        // strip first binary header
                        $font = substr($font, 6);
                    }
                    if ($header AND (ord($font[$info['length1']]) == 128)) {
                        // strip second binary header
                        $font = substr($font, 0, $info['length1']) . substr($font, ($info['length1'] + 6));
                    }
                } elseif ($info['subset'] AND ((!$compressed) OR ($compressed AND function_exists('gzcompress')))) {
                    if ($compressed) {
                        // uncompress font
                        $font = gzuncompress($font);
                    }
                    // merge subset characters
                    $subsetchars = array(); // used chars
                    foreach ($info['fontkeys'] as $fontkey) {
                        $fontinfo = $this->getFontBuffer($fontkey);
                        $subsetchars += $fontinfo['subsetchars'];
                    }
                    // rebuild a font subset
                    $font = $this->_getTrueTypeFontSubset($font, $subsetchars);
                    // calculate new font length
                    $info['length1'] = strlen($font);
                    if ($compressed) {
                        // recompress font
                        $font = gzcompress($font);
                    }
                }
                $this->_newobj();
                $this->FontFiles[$file]['n'] = $this->n;
                $stream = $this->_getrawstream($font);
                $out = '<< /Length ' . strlen($stream);
                if ($compressed) {
                    $out .= ' /Filter /FlateDecode';
                }
                $out .= ' /Length1 ' . $info['length1'];
                if (isset($info['length2'])) {
                    $out .= ' /Length2 ' . $info['length2'] . ' /Length3 0';
                }
                $out .= ' >>';
                $out .= ' stream' . "\n" . $stream . "\n" . 'endstream';
                $out .= "\n" . 'endobj';
                $this->_out($out);
            }
        }
        $this->set_mqr($mqr);
        foreach ($this->fontkeys as $k) {
            //Font objects
            $font = $this->getFontBuffer($k);
            $type = $font['type'];
            $name = $font['name'];
            if ($type == 'core') {
                // standard core font
                $out = $this->_getobj($this->font_obj_ids[$k]) . "\n";
                $out .= '<</Type /Font';
                $out .= ' /Subtype /Type1';
                $out .= ' /BaseFont /' . $name;
                $out .= ' /Name /F' . $font['i'];
                if ((strtolower($name) != 'symbol') AND (strtolower($name) != 'zapfdingbats')) {
                    $out .= ' /Encoding /WinAnsiEncoding';
                }
                if ($k == 'helvetica') {
                    // add default font for annotations
                    $this->annotation_fonts[$k] = $font['i'];
                }
                $out .= ' >>';
                $out .= "\n" . 'endobj';
                $this->_out($out);
            } elseif (($type == 'Type1') OR ($type == 'TrueType')) {
                // additional Type1 or TrueType font
                $out = $this->_getobj($this->font_obj_ids[$k]) . "\n";
                $out .= '<</Type /Font';
                $out .= ' /Subtype /' . $type;
                $out .= ' /BaseFont /' . $name;
                $out .= ' /Name /F' . $font['i'];
                $out .= ' /FirstChar 32 /LastChar 255';
                $out .= ' /Widths ' . ($this->n + 1) . ' 0 R';
                $out .= ' /FontDescriptor ' . ($this->n + 2) . ' 0 R';
                if ($font['enc']) {
                    if (isset($font['diff'])) {
                        $out .= ' /Encoding ' . ($nf + $font['diff']) . ' 0 R';
                    } else {
                        $out .= ' /Encoding /WinAnsiEncoding';
                    }
                }
                $out .= ' >>';
                $out .= "\n" . 'endobj';
                $this->_out($out);
                // Widths
                $this->_newobj();
                $s = '[';
                for ($i = 32; $i < 256; ++$i) {
                    if (isset($font['cw'][$i])) {
                        $s .= $font['cw'][$i] . ' ';
                    } else {
                        $s .= $font['dw'] . ' ';
                    }
                }
                $s .= ']';
                $s .= "\n" . 'endobj';
                $this->_out($s);
                //Descriptor
                $this->_newobj();
                $s = '<</Type /FontDescriptor /FontName /' . $name;
                foreach ($font['desc'] as $fdk => $fdv) {
                    if (is_float($fdv)) {
                        $fdv = sprintf('%F', $fdv);
                    }
                    $s .= ' /' . $fdk . ' ' . $fdv . '';
                }
                if (!$this->empty_string($font['file'])) {
                    $s .= ' /FontFile' . ($type == 'Type1' ? '' : '2') . ' ' . $this->FontFiles[$font['file']]['n'] . ' 0 R';
                }
                $s .= '>>';
                $s .= "\n" . 'endobj';
                $this->_out($s);
            } else {
                // additional types
                $mtd = '_put' . strtolower($type);
                if (!method_exists($this, $mtd)) {
                    $this->Error('Unsupported font type: ' . $type);
                }
                $this->$mtd($font);
            }
        }
    }

    /**
     * Adds unicode fonts.<br>
     * Based on PDF Reference 1.3 (section 5)
     * @param $font (array) font data
     * @protected
     * @author Nicola Asuni
     * @since 1.52.0.TC005 (2005-01-05)
     */
    protected function _puttruetypeunicode($font) {
        $fontname = '';
        if ($font['subset']) {
            // change name for font subsetting
            $subtag = sprintf('%06u', $font['i']);
            $subtag = strtr($subtag, '0123456789', 'ABCDEFGHIJ');
            $fontname .= $subtag . '+';
        }
        $fontname .= $font['name'];
        // Type0 Font
        // A composite font composed of other fonts, organized hierarchically
        $out = $this->_getobj($this->font_obj_ids[$font['fontkey']]) . "\n";
        $out .= '<< /Type /Font';
        $out .= ' /Subtype /Type0';
        $out .= ' /BaseFont /' . $fontname;
        $out .= ' /Name /F' . $font['i'];
        $out .= ' /Encoding /' . $font['enc'];
        $out .= ' /ToUnicode ' . ($this->n + 1) . ' 0 R';
        $out .= ' /DescendantFonts [' . ($this->n + 2) . ' 0 R]';
        $out .= ' >>';
        $out .= "\n" . 'endobj';
        $this->_out($out);
        // ToUnicode map for Identity-H
        $stream = "/CIDInit /ProcSet findresource begin\n";
        $stream .= "12 dict begin\n";
        $stream .= "begincmap\n";
        $stream .= "/CIDSystemInfo << /Registry (Adobe) /Ordering (UCS) /Supplement 0 >> def\n";
        $stream .= "/CMapName /Adobe-Identity-UCS def\n";
        $stream .= "/CMapType 2 def\n";
        $stream .= "/WMode 0 def\n";
        $stream .= "1 begincodespacerange\n";
        $stream .= "<0000> <FFFF>\n";
        $stream .= "endcodespacerange\n";
        $stream .= "100 beginbfrange\n";
        $stream .= "<0000> <00ff> <0000>\n";
        $stream .= "<0100> <01ff> <0100>\n";
        $stream .= "<0200> <02ff> <0200>\n";
        $stream .= "<0300> <03ff> <0300>\n";
        $stream .= "<0400> <04ff> <0400>\n";
        $stream .= "<0500> <05ff> <0500>\n";
        $stream .= "<0600> <06ff> <0600>\n";
        $stream .= "<0700> <07ff> <0700>\n";
        $stream .= "<0800> <08ff> <0800>\n";
        $stream .= "<0900> <09ff> <0900>\n";
        $stream .= "<0a00> <0aff> <0a00>\n";
        $stream .= "<0b00> <0bff> <0b00>\n";
        $stream .= "<0c00> <0cff> <0c00>\n";
        $stream .= "<0d00> <0dff> <0d00>\n";
        $stream .= "<0e00> <0eff> <0e00>\n";
        $stream .= "<0f00> <0fff> <0f00>\n";
        $stream .= "<1000> <10ff> <1000>\n";
        $stream .= "<1100> <11ff> <1100>\n";
        $stream .= "<1200> <12ff> <1200>\n";
        $stream .= "<1300> <13ff> <1300>\n";
        $stream .= "<1400> <14ff> <1400>\n";
        $stream .= "<1500> <15ff> <1500>\n";
        $stream .= "<1600> <16ff> <1600>\n";
        $stream .= "<1700> <17ff> <1700>\n";
        $stream .= "<1800> <18ff> <1800>\n";
        $stream .= "<1900> <19ff> <1900>\n";
        $stream .= "<1a00> <1aff> <1a00>\n";
        $stream .= "<1b00> <1bff> <1b00>\n";
        $stream .= "<1c00> <1cff> <1c00>\n";
        $stream .= "<1d00> <1dff> <1d00>\n";
        $stream .= "<1e00> <1eff> <1e00>\n";
        $stream .= "<1f00> <1fff> <1f00>\n";
        $stream .= "<2000> <20ff> <2000>\n";
        $stream .= "<2100> <21ff> <2100>\n";
        $stream .= "<2200> <22ff> <2200>\n";
        $stream .= "<2300> <23ff> <2300>\n";
        $stream .= "<2400> <24ff> <2400>\n";
        $stream .= "<2500> <25ff> <2500>\n";
        $stream .= "<2600> <26ff> <2600>\n";
        $stream .= "<2700> <27ff> <2700>\n";
        $stream .= "<2800> <28ff> <2800>\n";
        $stream .= "<2900> <29ff> <2900>\n";
        $stream .= "<2a00> <2aff> <2a00>\n";
        $stream .= "<2b00> <2bff> <2b00>\n";
        $stream .= "<2c00> <2cff> <2c00>\n";
        $stream .= "<2d00> <2dff> <2d00>\n";
        $stream .= "<2e00> <2eff> <2e00>\n";
        $stream .= "<2f00> <2fff> <2f00>\n";
        $stream .= "<3000> <30ff> <3000>\n";
        $stream .= "<3100> <31ff> <3100>\n";
        $stream .= "<3200> <32ff> <3200>\n";
        $stream .= "<3300> <33ff> <3300>\n";
        $stream .= "<3400> <34ff> <3400>\n";
        $stream .= "<3500> <35ff> <3500>\n";
        $stream .= "<3600> <36ff> <3600>\n";
        $stream .= "<3700> <37ff> <3700>\n";
        $stream .= "<3800> <38ff> <3800>\n";
        $stream .= "<3900> <39ff> <3900>\n";
        $stream .= "<3a00> <3aff> <3a00>\n";
        $stream .= "<3b00> <3bff> <3b00>\n";
        $stream .= "<3c00> <3cff> <3c00>\n";
        $stream .= "<3d00> <3dff> <3d00>\n";
        $stream .= "<3e00> <3eff> <3e00>\n";
        $stream .= "<3f00> <3fff> <3f00>\n";
        $stream .= "<4000> <40ff> <4000>\n";
        $stream .= "<4100> <41ff> <4100>\n";
        $stream .= "<4200> <42ff> <4200>\n";
        $stream .= "<4300> <43ff> <4300>\n";
        $stream .= "<4400> <44ff> <4400>\n";
        $stream .= "<4500> <45ff> <4500>\n";
        $stream .= "<4600> <46ff> <4600>\n";
        $stream .= "<4700> <47ff> <4700>\n";
        $stream .= "<4800> <48ff> <4800>\n";
        $stream .= "<4900> <49ff> <4900>\n";
        $stream .= "<4a00> <4aff> <4a00>\n";
        $stream .= "<4b00> <4bff> <4b00>\n";
        $stream .= "<4c00> <4cff> <4c00>\n";
        $stream .= "<4d00> <4dff> <4d00>\n";
        $stream .= "<4e00> <4eff> <4e00>\n";
        $stream .= "<4f00> <4fff> <4f00>\n";
        $stream .= "<5000> <50ff> <5000>\n";
        $stream .= "<5100> <51ff> <5100>\n";
        $stream .= "<5200> <52ff> <5200>\n";
        $stream .= "<5300> <53ff> <5300>\n";
        $stream .= "<5400> <54ff> <5400>\n";
        $stream .= "<5500> <55ff> <5500>\n";
        $stream .= "<5600> <56ff> <5600>\n";
        $stream .= "<5700> <57ff> <5700>\n";
        $stream .= "<5800> <58ff> <5800>\n";
        $stream .= "<5900> <59ff> <5900>\n";
        $stream .= "<5a00> <5aff> <5a00>\n";
        $stream .= "<5b00> <5bff> <5b00>\n";
        $stream .= "<5c00> <5cff> <5c00>\n";
        $stream .= "<5d00> <5dff> <5d00>\n";
        $stream .= "<5e00> <5eff> <5e00>\n";
        $stream .= "<5f00> <5fff> <5f00>\n";
        $stream .= "<6000> <60ff> <6000>\n";
        $stream .= "<6100> <61ff> <6100>\n";
        $stream .= "<6200> <62ff> <6200>\n";
        $stream .= "<6300> <63ff> <6300>\n";
        $stream .= "endbfrange\n";
        $stream .= "100 beginbfrange\n";
        $stream .= "<6400> <64ff> <6400>\n";
        $stream .= "<6500> <65ff> <6500>\n";
        $stream .= "<6600> <66ff> <6600>\n";
        $stream .= "<6700> <67ff> <6700>\n";
        $stream .= "<6800> <68ff> <6800>\n";
        $stream .= "<6900> <69ff> <6900>\n";
        $stream .= "<6a00> <6aff> <6a00>\n";
        $stream .= "<6b00> <6bff> <6b00>\n";
        $stream .= "<6c00> <6cff> <6c00>\n";
        $stream .= "<6d00> <6dff> <6d00>\n";
        $stream .= "<6e00> <6eff> <6e00>\n";
        $stream .= "<6f00> <6fff> <6f00>\n";
        $stream .= "<7000> <70ff> <7000>\n";
        $stream .= "<7100> <71ff> <7100>\n";
        $stream .= "<7200> <72ff> <7200>\n";
        $stream .= "<7300> <73ff> <7300>\n";
        $stream .= "<7400> <74ff> <7400>\n";
        $stream .= "<7500> <75ff> <7500>\n";
        $stream .= "<7600> <76ff> <7600>\n";
        $stream .= "<7700> <77ff> <7700>\n";
        $stream .= "<7800> <78ff> <7800>\n";
        $stream .= "<7900> <79ff> <7900>\n";
        $stream .= "<7a00> <7aff> <7a00>\n";
        $stream .= "<7b00> <7bff> <7b00>\n";
        $stream .= "<7c00> <7cff> <7c00>\n";
        $stream .= "<7d00> <7dff> <7d00>\n";
        $stream .= "<7e00> <7eff> <7e00>\n";
        $stream .= "<7f00> <7fff> <7f00>\n";
        $stream .= "<8000> <80ff> <8000>\n";
        $stream .= "<8100> <81ff> <8100>\n";
        $stream .= "<8200> <82ff> <8200>\n";
        $stream .= "<8300> <83ff> <8300>\n";
        $stream .= "<8400> <84ff> <8400>\n";
        $stream .= "<8500> <85ff> <8500>\n";
        $stream .= "<8600> <86ff> <8600>\n";
        $stream .= "<8700> <87ff> <8700>\n";
        $stream .= "<8800> <88ff> <8800>\n";
        $stream .= "<8900> <89ff> <8900>\n";
        $stream .= "<8a00> <8aff> <8a00>\n";
        $stream .= "<8b00> <8bff> <8b00>\n";
        $stream .= "<8c00> <8cff> <8c00>\n";
        $stream .= "<8d00> <8dff> <8d00>\n";
        $stream .= "<8e00> <8eff> <8e00>\n";
        $stream .= "<8f00> <8fff> <8f00>\n";
        $stream .= "<9000> <90ff> <9000>\n";
        $stream .= "<9100> <91ff> <9100>\n";
        $stream .= "<9200> <92ff> <9200>\n";
        $stream .= "<9300> <93ff> <9300>\n";
        $stream .= "<9400> <94ff> <9400>\n";
        $stream .= "<9500> <95ff> <9500>\n";
        $stream .= "<9600> <96ff> <9600>\n";
        $stream .= "<9700> <97ff> <9700>\n";
        $stream .= "<9800> <98ff> <9800>\n";
        $stream .= "<9900> <99ff> <9900>\n";
        $stream .= "<9a00> <9aff> <9a00>\n";
        $stream .= "<9b00> <9bff> <9b00>\n";
        $stream .= "<9c00> <9cff> <9c00>\n";
        $stream .= "<9d00> <9dff> <9d00>\n";
        $stream .= "<9e00> <9eff> <9e00>\n";
        $stream .= "<9f00> <9fff> <9f00>\n";
        $stream .= "<a000> <a0ff> <a000>\n";
        $stream .= "<a100> <a1ff> <a100>\n";
        $stream .= "<a200> <a2ff> <a200>\n";
        $stream .= "<a300> <a3ff> <a300>\n";
        $stream .= "<a400> <a4ff> <a400>\n";
        $stream .= "<a500> <a5ff> <a500>\n";
        $stream .= "<a600> <a6ff> <a600>\n";
        $stream .= "<a700> <a7ff> <a700>\n";
        $stream .= "<a800> <a8ff> <a800>\n";
        $stream .= "<a900> <a9ff> <a900>\n";
        $stream .= "<aa00> <aaff> <aa00>\n";
        $stream .= "<ab00> <abff> <ab00>\n";
        $stream .= "<ac00> <acff> <ac00>\n";
        $stream .= "<ad00> <adff> <ad00>\n";
        $stream .= "<ae00> <aeff> <ae00>\n";
        $stream .= "<af00> <afff> <af00>\n";
        $stream .= "<b000> <b0ff> <b000>\n";
        $stream .= "<b100> <b1ff> <b100>\n";
        $stream .= "<b200> <b2ff> <b200>\n";
        $stream .= "<b300> <b3ff> <b300>\n";
        $stream .= "<b400> <b4ff> <b400>\n";
        $stream .= "<b500> <b5ff> <b500>\n";
        $stream .= "<b600> <b6ff> <b600>\n";
        $stream .= "<b700> <b7ff> <b700>\n";
        $stream .= "<b800> <b8ff> <b800>\n";
        $stream .= "<b900> <b9ff> <b900>\n";
        $stream .= "<ba00> <baff> <ba00>\n";
        $stream .= "<bb00> <bbff> <bb00>\n";
        $stream .= "<bc00> <bcff> <bc00>\n";
        $stream .= "<bd00> <bdff> <bd00>\n";
        $stream .= "<be00> <beff> <be00>\n";
        $stream .= "<bf00> <bfff> <bf00>\n";
        $stream .= "<c000> <c0ff> <c000>\n";
        $stream .= "<c100> <c1ff> <c100>\n";
        $stream .= "<c200> <c2ff> <c200>\n";
        $stream .= "<c300> <c3ff> <c300>\n";
        $stream .= "<c400> <c4ff> <c400>\n";
        $stream .= "<c500> <c5ff> <c500>\n";
        $stream .= "<c600> <c6ff> <c600>\n";
        $stream .= "<c700> <c7ff> <c700>\n";
        $stream .= "endbfrange\n";
        $stream .= "56 beginbfrange\n";
        $stream .= "<c800> <c8ff> <c800>\n";
        $stream .= "<c900> <c9ff> <c900>\n";
        $stream .= "<ca00> <caff> <ca00>\n";
        $stream .= "<cb00> <cbff> <cb00>\n";
        $stream .= "<cc00> <ccff> <cc00>\n";
        $stream .= "<cd00> <cdff> <cd00>\n";
        $stream .= "<ce00> <ceff> <ce00>\n";
        $stream .= "<cf00> <cfff> <cf00>\n";
        $stream .= "<d000> <d0ff> <d000>\n";
        $stream .= "<d100> <d1ff> <d100>\n";
        $stream .= "<d200> <d2ff> <d200>\n";
        $stream .= "<d300> <d3ff> <d300>\n";
        $stream .= "<d400> <d4ff> <d400>\n";
        $stream .= "<d500> <d5ff> <d500>\n";
        $stream .= "<d600> <d6ff> <d600>\n";
        $stream .= "<d700> <d7ff> <d700>\n";
        $stream .= "<d800> <d8ff> <d800>\n";
        $stream .= "<d900> <d9ff> <d900>\n";
        $stream .= "<da00> <daff> <da00>\n";
        $stream .= "<db00> <dbff> <db00>\n";
        $stream .= "<dc00> <dcff> <dc00>\n";
        $stream .= "<dd00> <ddff> <dd00>\n";
        $stream .= "<de00> <deff> <de00>\n";
        $stream .= "<df00> <dfff> <df00>\n";
        $stream .= "<e000> <e0ff> <e000>\n";
        $stream .= "<e100> <e1ff> <e100>\n";
        $stream .= "<e200> <e2ff> <e200>\n";
        $stream .= "<e300> <e3ff> <e300>\n";
        $stream .= "<e400> <e4ff> <e400>\n";
        $stream .= "<e500> <e5ff> <e500>\n";
        $stream .= "<e600> <e6ff> <e600>\n";
        $stream .= "<e700> <e7ff> <e700>\n";
        $stream .= "<e800> <e8ff> <e800>\n";
        $stream .= "<e900> <e9ff> <e900>\n";
        $stream .= "<ea00> <eaff> <ea00>\n";
        $stream .= "<eb00> <ebff> <eb00>\n";
        $stream .= "<ec00> <ecff> <ec00>\n";
        $stream .= "<ed00> <edff> <ed00>\n";
        $stream .= "<ee00> <eeff> <ee00>\n";
        $stream .= "<ef00> <efff> <ef00>\n";
        $stream .= "<f000> <f0ff> <f000>\n";
        $stream .= "<f100> <f1ff> <f100>\n";
        $stream .= "<f200> <f2ff> <f200>\n";
        $stream .= "<f300> <f3ff> <f300>\n";
        $stream .= "<f400> <f4ff> <f400>\n";
        $stream .= "<f500> <f5ff> <f500>\n";
        $stream .= "<f600> <f6ff> <f600>\n";
        $stream .= "<f700> <f7ff> <f700>\n";
        $stream .= "<f800> <f8ff> <f800>\n";
        $stream .= "<f900> <f9ff> <f900>\n";
        $stream .= "<fa00> <faff> <fa00>\n";
        $stream .= "<fb00> <fbff> <fb00>\n";
        $stream .= "<fc00> <fcff> <fc00>\n";
        $stream .= "<fd00> <fdff> <fd00>\n";
        $stream .= "<fe00> <feff> <fe00>\n";
        $stream .= "<ff00> <ffff> <ff00>\n";
        $stream .= "endbfrange\n";
        $stream .= "endcmap\n";
        $stream .= "CMapName currentdict /CMap defineresource pop\n";
        $stream .= "end\n";
        $stream .= "end";
        // ToUnicode Object
        $this->_newobj();
        $stream = ($this->compress) ? gzcompress($stream) : $stream;
        $filter = ($this->compress) ? '/Filter /FlateDecode ' : '';
        $stream = $this->_getrawstream($stream);
        $this->_out('<<' . $filter . '/Length ' . strlen($stream) . '>> stream' . "\n" . $stream . "\n" . 'endstream' . "\n" . 'endobj');
        // CIDFontType2
        // A CIDFont whose glyph descriptions are based on TrueType font technology
        $oid = $this->_newobj();
        $out = '<< /Type /Font';
        $out .= ' /Subtype /CIDFontType2';
        $out .= ' /BaseFont /' . $fontname;
        // A dictionary containing entries that define the character collection of the CIDFont.
        $cidinfo = '/Registry ' . $this->_datastring($font['cidinfo']['Registry'], $oid);
        $cidinfo .= ' /Ordering ' . $this->_datastring($font['cidinfo']['Ordering'], $oid);
        $cidinfo .= ' /Supplement ' . $font['cidinfo']['Supplement'];
        $out .= ' /CIDSystemInfo << ' . $cidinfo . ' >>';
        $out .= ' /FontDescriptor ' . ($this->n + 1) . ' 0 R';
        $out .= ' /DW ' . $font['dw']; // default width
        $out .= "\n" . $this->_putfontwidths($font, 0);
        if (isset($font['ctg']) AND (!$this->empty_string($font['ctg']))) {
            $out .= "\n" . '/CIDToGIDMap ' . ($this->n + 2) . ' 0 R';
        }
        $out .= ' >>';
        $out .= "\n" . 'endobj';
        $this->_out($out);
        // Font descriptor
        // A font descriptor describing the CIDFont default metrics other than its glyph widths
        $this->_newobj();
        $out = '<< /Type /FontDescriptor';
        $out .= ' /FontName /' . $fontname;
        foreach ($font['desc'] as $key => $value) {
            if (is_float($value)) {
                $value = sprintf('%F', $value);
            }
            $out .= ' /' . $key . ' ' . $value;
        }
        $fontdir = false;
        if (!$this->empty_string($font['file'])) {
            // A stream containing a TrueType font
            $out .= ' /FontFile2 ' . $this->FontFiles[$font['file']]['n'] . ' 0 R';
            $fontdir = $this->FontFiles[$font['file']]['fontdir'];
        }
        $out .= ' >>';
        $out .= "\n" . 'endobj';
        $this->_out($out);
        if (isset($font['ctg']) AND (!$this->empty_string($font['ctg']))) {
            $this->_newobj();
            // Embed CIDToGIDMap
            // A specification of the mapping from CIDs to glyph indices
            // search and get CTG font file to embedd
            $ctgfile = strtolower($font['ctg']);
            // search and get ctg font file to embedd
            $fontfile = '';
            // search files on various directories
            if (($fontdir !== false) AND file_exists($fontdir . $ctgfile)) {
                $fontfile = $fontdir . $ctgfile;
            } elseif (file_exists($this->_getfontpath() . $ctgfile)) {
                $fontfile = $this->_getfontpath() . $ctgfile;
            } elseif (file_exists($ctgfile)) {
                $fontfile = $ctgfile;
            }
            if ($this->empty_string($fontfile)) {
                $this->Error('Font file not found: ' . $ctgfile);
            }
            $stream = $this->_getrawstream(file_get_contents($fontfile));
            $out = '<< /Length ' . strlen($stream) . '';
            if (substr($fontfile, -2) == '.z') { // check file extension
                // Decompresses data encoded using the public-domain
                // zlib/deflate compression method, reproducing the
                // original text or binary data
                $out .= ' /Filter /FlateDecode';
            }
            $out .= ' >>';
            $out .= ' stream' . "\n" . $stream . "\n" . 'endstream';
            $out .= "\n" . 'endobj';
            $this->_out($out);
        }
    }

    /**
     * Output CID-0 fonts.
     * A Type 0 CIDFont contains glyph descriptions based on the Adobe Type 1 font format
     * @param $font (array) font data
     * @protected
     * @author Andrew Whitehead, Nicola Asuni, Yukihiro Nakadaira
     * @since 3.2.000 (2008-06-23)
     */
    protected function _putcidfont0($font) {
        $cidoffset = 0;
        if (!isset($font['cw'][1])) {
            $cidoffset = 31;
        }
        if (isset($font['cidinfo']['uni2cid'])) {
            // convert unicode to cid.
            $uni2cid = $font['cidinfo']['uni2cid'];
            $cw = array();
            foreach ($font['cw'] as $uni => $width) {
                if (isset($uni2cid[$uni])) {
                    $cw[($uni2cid[$uni] + $cidoffset)] = $width;
                } elseif ($uni < 256) {
                    $cw[$uni] = $width;
                } // else unknown character
            }
            $font = array_merge($font, array('cw' => $cw));
        }
        $name = $font['name'];
        $enc = $font['enc'];
        if ($enc) {
            $longname = $name . '-' . $enc;
        } else {
            $longname = $name;
        }
        $out = $this->_getobj($this->font_obj_ids[$font['fontkey']]) . "\n";
        $out .= '<</Type /Font';
        $out .= ' /Subtype /Type0';
        $out .= ' /BaseFont /' . $longname;
        $out .= ' /Name /F' . $font['i'];
        if ($enc) {
            $out .= ' /Encoding /' . $enc;
        }
        $out .= ' /DescendantFonts [' . ($this->n + 1) . ' 0 R]';
        $out .= ' >>';
        $out .= "\n" . 'endobj';
        $this->_out($out);
        $oid = $this->_newobj();
        $out = '<</Type /Font';
        $out .= ' /Subtype /CIDFontType0';
        $out .= ' /BaseFont /' . $name;
        $cidinfo = '/Registry ' . $this->_datastring($font['cidinfo']['Registry'], $oid);
        $cidinfo .= ' /Ordering ' . $this->_datastring($font['cidinfo']['Ordering'], $oid);
        $cidinfo .= ' /Supplement ' . $font['cidinfo']['Supplement'];
        $out .= ' /CIDSystemInfo <<' . $cidinfo . '>>';
        $out .= ' /FontDescriptor ' . ($this->n + 1) . ' 0 R';
        $out .= ' /DW ' . $font['dw'];
        $out .= "\n" . $this->_putfontwidths($font, $cidoffset);
        $out .= ' >>';
        $out .= "\n" . 'endobj';
        $this->_out($out);
        $this->_newobj();
        $s = '<</Type /FontDescriptor /FontName /' . $name;
        foreach ($font['desc'] as $k => $v) {
            if ($k != 'Style') {
                if (is_float($v)) {
                    $v = sprintf('%F', $v);
                }
                $s .= ' /' . $k . ' ' . $v . '';
            }
        }
        $s .= '>>';
        $s .= "\n" . 'endobj';
        $this->_out($s);
    }

    /**
     * Output images.
     * @protected
     */
    protected function _putimages() {
        $filter = ($this->compress) ? '/Filter /FlateDecode ' : '';
        foreach ($this->imagekeys as $file) {
            $info = $this->getImageBuffer($file);
            // set object for alternate images array
            if ((!$this->pdfa_mode) AND isset($info['altimgs']) AND !empty($info['altimgs'])) {
                $altoid = $this->_newobj();
                $out = '[';
                foreach ($info['altimgs'] as $altimage) {
                    if (isset($this->xobjects['I' . $altimage[0]]['n'])) {
                        $out .= ' << /Image ' . $this->xobjects['I' . $altimage[0]]['n'] . ' 0 R';
                        $out .= ' /DefaultForPrinting';
                        if ($altimage[1] === true) {
                            $out .= ' true';
                        } else {
                            $out .= ' false';
                        }
                        $out .= ' >>';
                    }
                }
                $out .= ' ]';
                $out .= "\n" . 'endobj';
                $this->_out($out);
            }
            // set image object
            $oid = $this->_newobj();
            $this->xobjects['I' . $info['i']] = array('n' => $oid);
            $this->setImageSubBuffer($file, 'n', $this->n);
            $out = '<</Type /XObject';
            $out .= ' /Subtype /Image';
            $out .= ' /Width ' . $info['w'];
            $out .= ' /Height ' . $info['h'];
            if (array_key_exists('masked', $info)) {
                $out .= ' /SMask ' . ($this->n - 1) . ' 0 R';
            }
            // set color space
            $icc = false;
            if (isset($info['icc']) AND ($info['icc'] !== false)) {
                // ICC Colour Space
                $icc = true;
                $out .= ' /ColorSpace [/ICCBased ' . ($this->n + 1) . ' 0 R]';
            } elseif ($info['cs'] == 'Indexed') {
                // Indexed Colour Space
                $out .= ' /ColorSpace [/Indexed /DeviceRGB ' . ((strlen($info['pal']) / 3) - 1) . ' ' . ($this->n + 1) . ' 0 R]';
            } else {
                // Device Colour Space
                $out .= ' /ColorSpace /' . $info['cs'];
            }
            if ($info['cs'] == 'DeviceCMYK') {
                $out .= ' /Decode [1 0 1 0 1 0 1 0]';
            }
            $out .= ' /BitsPerComponent ' . $info['bpc'];
            if (isset($altoid) AND ($altoid > 0)) {
                // reference to alternate images dictionary
                $out .= ' /Alternates ' . $altoid . ' 0 R';
            }
            if (isset($info['exurl']) AND !empty($info['exurl'])) {
                // external stream
                $out .= ' /Length 0';
                $out .= ' /F << /FS /URL /F ' . $this->_datastring($info['exurl'], $oid) . ' >>';
                if (isset($info['f'])) {
                    $out .= ' /FFilter /' . $info['f'];
                }
                $out .= ' >>';
                $out .= ' stream' . "\n" . 'endstream';
            } else {
                if (isset($info['f'])) {
                    $out .= ' /Filter /' . $info['f'];
                }
                if (isset($info['parms'])) {
                    $out .= ' ' . $info['parms'];
                }
                if (isset($info['trns']) AND is_array($info['trns'])) {
                    $trns = '';
                    $count_info = count($info['trns']);
                    for ($i = 0; $i < $count_info; ++$i) {
                        $trns .= $info['trns'][$i] . ' ' . $info['trns'][$i] . ' ';
                    }
                    $out .= ' /Mask [' . $trns . ']';
                }
                $stream = $this->_getrawstream($info['data']);
                $out .= ' /Length ' . strlen($stream) . ' >>';
                $out .= ' stream' . "\n" . $stream . "\n" . 'endstream';
            }
            $out .= "\n" . 'endobj';
            $this->_out($out);
            if ($icc) {
                // ICC colour profile
                $this->_newobj();
                $icc = ($this->compress) ? gzcompress($info['icc']) : $info['icc'];
                $icc = $this->_getrawstream($icc);
                $this->_out('<</N ' . $info['ch'] . ' /Alternate /' . $info['cs'] . ' ' . $filter . '/Length ' . strlen($icc) . '>> stream' . "\n" . $icc . "\n" . 'endstream' . "\n" . 'endobj');
            } elseif ($info['cs'] == 'Indexed') {
                // colour palette
                $this->_newobj();
                $pal = ($this->compress) ? gzcompress($info['pal']) : $info['pal'];
                $pal = $this->_getrawstream($pal);
                $this->_out('<<' . $filter . '/Length ' . strlen($pal) . '>> stream' . "\n" . $pal . "\n" . 'endstream' . "\n" . 'endobj');
            }
        }
    }

    /**
     * Output Form XObjects Templates.
     * @author Nicola Asuni
     * @since 5.8.017 (2010-08-24)
     * @protected
     * @see startTemplate(), endTemplate(), printTemplate()
     */
    protected function _putxobjects() {
        foreach ($this->xobjects as $key => $data) {
            if (isset($data['outdata'])) {
                $stream = trim($data['outdata']);
                $out = $this->_getobj($data['n']) . "\n";
                $out .= '<<';
                $out .= ' /Type /XObject';
                $out .= ' /Subtype /Form';
                $out .= ' /FormType 1';
                if ($this->compress) {
                    $stream = gzcompress($stream);
                    $out .= ' /Filter /FlateDecode';
                }
                $out .= sprintf(' /BBox [%F %F %F %F]', ($data['x'] * $this->k), (-$data['y'] * $this->k), (($data['w'] + $data['x']) * $this->k), (($data['h'] - $data['y']) * $this->k));
                $out .= ' /Matrix [1 0 0 1 0 0]';
                $out .= ' /Resources <<';
                $out .= ' /ProcSet [/PDF /Text /ImageB /ImageC /ImageI]';
                if (!$this->pdfa_mode) {
                    // transparency
                    if (isset($data['extgstates']) AND !empty($data['extgstates'])) {
                        $out .= ' /ExtGState <<';
                        foreach ($data['extgstates'] as $k => $extgstate) {
                            if (isset($this->extgstates[$k]['name'])) {
                                $out .= ' /' . $this->extgstates[$k]['name'];
                            } else {
                                $out .= ' /GS' . $k;
                            }
                            $out .= ' ' . $this->extgstates[$k]['n'] . ' 0 R';
                        }
                        $out .= ' >>';
                    }
                    if (isset($data['gradients']) AND !empty($data['gradients'])) {
                        $gp = '';
                        $gs = '';
                        foreach ($data['gradients'] as $id => $grad) {
                            // gradient patterns
                            $gp .= ' /p' . $id . ' ' . $this->gradients[$id]['pattern'] . ' 0 R';
                            // gradient shadings
                            $gs .= ' /Sh' . $id . ' ' . $this->gradients[$id]['id'] . ' 0 R';
                        }
                        $out .= ' /Pattern <<' . $gp . ' >>';
                        $out .= ' /Shading <<' . $gs . ' >>';
                    }
                }
                // spot colors
                if (isset($data['spot_colors']) AND !empty($data['spot_colors'])) {
                    $out .= ' /ColorSpace <<';
                    foreach ($data['spot_colors'] as $name => $color) {
                        $out .= ' /CS' . $color['i'] . ' ' . $this->spot_colors[$name]['n'] . ' 0 R';
                    }
                    $out .= ' >>';
                }
                // fonts
                if (!empty($data['fonts'])) {
                    $out .= ' /Font <<';
                    foreach ($data['fonts'] as $fontkey => $fontid) {
                        $out .= ' /F' . $fontid . ' ' . $this->font_obj_ids[$fontkey] . ' 0 R';
                    }
                    $out .= ' >>';
                }
                // images or nested xobjects
                if (!empty($data['images']) OR !empty($data['xobjects'])) {
                    $out .= ' /XObject <<';
                    foreach ($data['images'] as $imgid) {
                        $out .= ' /I' . $imgid . ' ' . $this->xobjects['I' . $imgid]['n'] . ' 0 R';
                    }
                    foreach ($data['xobjects'] as $sub_id => $sub_objid) {
                        $out .= ' /' . $sub_id . ' ' . $sub_objid['n'] . ' 0 R';
                    }
                    $out .= ' >>';
                }
                $out .= ' >>'; //end resources
                if (isset($data['group']) AND ($data['group'] !== false)) {
                    // set transparency group
                    $out .= ' /Group << /Type /Group /S /Transparency';
                    if (is_array($data['group'])) {
                        if (isset($data['group']['CS']) AND !empty($data['group']['CS'])) {
                            $out .= ' /CS /' . $data['group']['CS'];
                        }
                        if (isset($data['group']['I'])) {
                            $out .= ' /I /' . ($data['group']['I'] === true ? 'true' : 'false');
                        }
                        if (isset($data['group']['K'])) {
                            $out .= ' /K /' . ($data['group']['K'] === true ? 'true' : 'false');
                        }
                    }
                    $out .= ' >>';
                }
                $stream = $this->_getrawstream($stream, $data['n']);
                $out .= ' /Length ' . strlen($stream);
                $out .= ' >>';
                $out .= ' stream' . "\n" . $stream . "\n" . 'endstream';
                $out .= "\n" . 'endobj';
                $this->_out($out);
            }
        }
    }

    /**
     * Output Spot Colors Resources.
     * @protected
     * @since 4.0.024 (2008-09-12)
     */
    protected function _putspotcolors() {
        foreach ($this->spot_colors as $name => $color) {
            $this->_newobj();
            $this->spot_colors[$name]['n'] = $this->n;
            $out = '[/Separation /' . str_replace(' ', '#20', $name);
            $out .= ' /DeviceCMYK <<';
            $out .= ' /Range [0 1 0 1 0 1 0 1] /C0 [0 0 0 0]';
            $out .= ' ' . sprintf('/C1 [%F %F %F %F] ', ($color['C'] / 100), ($color['M'] / 100), ($color['Y'] / 100), ($color['K'] / 100));
            $out .= ' /FunctionType 2 /Domain [0 1] /N 1>>]';
            $out .= "\n" . 'endobj';
            $this->_out($out);
        }
    }

    /**
     * Return XObjects Dictionary.
     * @return string XObjects dictionary
     * @protected
     * @since 5.8.014 (2010-08-23)
     */
    protected function _getxobjectdict() {
        $out = '';
        foreach ($this->xobjects as $id => $objid) {
            $out .= ' /' . $id . ' ' . $objid['n'] . ' 0 R';
        }
        return $out;
    }

    /**
     * Output Resources Dictionary.
     * @protected
     */
    protected function _putresourcedict() {
        $out = $this->_getobj(2) . "\n";
        $out .= '<< /ProcSet [/PDF /Text /ImageB /ImageC /ImageI]';
        $out .= ' /Font <<';
        foreach ($this->fontkeys as $fontkey) {
            $font = $this->getFontBuffer($fontkey);
            $out .= ' /F' . $font['i'] . ' ' . $font['n'] . ' 0 R';
        }
        $out .= ' >>';
        $out .= ' /XObject <<';
        $out .= $this->_getxobjectdict();
        $out .= ' >>';
        // layers
        if (!empty($this->pdflayers)) {
            $out .= ' /Properties <<';
            foreach ($this->pdflayers as $layer) {
                $out .= ' /' . $layer['layer'] . ' ' . $layer['objid'] . ' 0 R';
            }
            $out .= ' >>';
        }
        if (!$this->pdfa_mode) {
            // transparency
            if (isset($this->extgstates) AND !empty($this->extgstates)) {
                $out .= ' /ExtGState <<';
                foreach ($this->extgstates as $k => $extgstate) {
                    if (isset($extgstate['name'])) {
                        $out .= ' /' . $extgstate['name'];
                    } else {
                        $out .= ' /GS' . $k;
                    }
                    $out .= ' ' . $extgstate['n'] . ' 0 R';
                }
                $out .= ' >>';
            }
            if (isset($this->gradients) AND !empty($this->gradients)) {
                $gp = '';
                $gs = '';
                foreach ($this->gradients as $id => $grad) {
                    // gradient patterns
                    $gp .= ' /p' . $id . ' ' . $grad['pattern'] . ' 0 R';
                    // gradient shadings
                    $gs .= ' /Sh' . $id . ' ' . $grad['id'] . ' 0 R';
                }
                $out .= ' /Pattern <<' . $gp . ' >>';
                $out .= ' /Shading <<' . $gs . ' >>';
            }
        }
        // spot colors
        if (isset($this->spot_colors) AND !empty($this->spot_colors)) {
            $out .= ' /ColorSpace <<';
            foreach ($this->spot_colors as $color) {
                $out .= ' /CS' . $color['i'] . ' ' . $color['n'] . ' 0 R';
            }
            $out .= ' >>';
        }
        $out .= ' >>';
        $out .= "\n" . 'endobj';
        $this->_out($out);
    }

    /**
     * Output Resources.
     * @protected
     */
    protected function _putresources() {
        $this->_putextgstates();
        $this->_putocg();
        $this->_putfonts();
        $this->_putimages();
        $this->_putspotcolors();
        $this->_putshaders();
        $this->_putxobjects();
        $this->_putresourcedict();
        $this->_putdests();
        $this->_putbookmarks();
        $this->_putEmbeddedFiles();
        $this->_putannotsobjs();
        $this->_putjavascript();
        $this->_putencryption();
    }

    /**
     * Adds some Metadata information (Document Information Dictionary)
     * (see Chapter 14.3.3 Document Information Dictionary of PDF32000_2008.pdf Reference)
     * @return int object id
     * @protected
     */
    protected function _putinfo() {
        $oid = $this->_newobj();
        $out = '<<';
        // store current isunicode value
        $prev_isunicode = $this->isunicode;
        if ($this->docinfounicode) {
            $this->isunicode = true;
        }
        if (!$this->empty_string($this->title)) {
            // The document's title.
            $out .= ' /Title ' . $this->_textstring($this->title, $oid);
        }
        if (!$this->empty_string($this->author)) {
            // The name of the person who created the document.
            $out .= ' /Author ' . $this->_textstring($this->author, $oid);
        }
        if (!$this->empty_string($this->subject)) {
            // The subject of the document.
            $out .= ' /Subject ' . $this->_textstring($this->subject, $oid);
        }
        if (!$this->empty_string($this->keywords)) {
            // Keywords associated with the document.
            $out .= ' /Keywords ' . $this->_textstring($this->keywords . ' TCPDF', $oid);
        }
        if (!$this->empty_string($this->creator)) {
            // If the document was converted to PDF from another format, the name of the conforming product that created the original document from which it was converted.
            $out .= ' /Creator ' . $this->_textstring($this->creator, $oid);
        }
        // restore previous isunicode value
        $this->isunicode = $prev_isunicode;
        // default producer
        $out .= ' /Producer ' . $this->_textstring($this->pdfproducer, $oid);
        // The date and time the document was created, in human-readable form
        $out .= ' /CreationDate ' . $this->_datestring(0, $this->doc_creation_timestamp);
        // The date and time the document was most recently modified, in human-readable form
        $out .= ' /ModDate ' . $this->_datestring(0, $this->doc_modification_timestamp);
        // A name object indicating whether the document has been modified to include trapping information
        $out .= ' /Trapped /False';
        $out .= ' >>';
        $out .= "\n" . 'endobj';
        $this->_out($out);
        return $oid;
    }

    /**
     * Set additional XMP data to be added on the default XMP data just before the end of "x:xmpmeta" tag.
     * IMPORTANT: This data is added as-is without controls, so you have to validate your data before using this method!
     * @param $xmp (string) Custom XMP data.
     * @since 5.9.128 (2011-10-06)
     * @public
     */
    public function setExtraXMP($xmp) {
        $this->custom_xmp = $xmp;
    }

    /**
     * Put XMP data object and return ID.
     * @return (int) The object ID.
     * @since 5.9.121 (2011-09-28)
     * @protected
     */
    protected function _putXMP() {
        $oid = $this->_newobj();
        // store current isunicode value
        $prev_isunicode = $this->isunicode;
        $this->isunicode = true;
        $prev_encrypted = $this->encrypted;
        $this->encrypted = false;
        // set XMP data
        $xmp = '<?xpacket begin="' . $this->unichr(0xfeff) . '" id="W5M0MpCehiHzreSzNTczkc9d"?>' . "\n";
        $xmp .= '<x:xmpmeta xmlns:x="adobe:ns:meta/" x:xmptk="Adobe XMP Core 4.2.1-c043 52.372728, 2009/01/18-15:08:04">' . "\n";
        $xmp .= "\t" . '<rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#">' . "\n";
        $xmp .= "\t\t" . '<rdf:Description rdf:about="" xmlns:dc="http://purl.org/dc/elements/1.1/">' . "\n";
        $xmp .= "\t\t\t" . '<dc:format>application/pdf</dc:format>' . "\n";
        $xmp .= "\t\t\t" . '<dc:title>' . "\n";
        $xmp .= "\t\t\t\t" . '<rdf:Alt>' . "\n";
        $xmp .= "\t\t\t\t\t" . '<rdf:li xml:lang="x-default">' . $this->_escapeXML($this->title) . '</rdf:li>' . "\n";
        $xmp .= "\t\t\t\t" . '</rdf:Alt>' . "\n";
        $xmp .= "\t\t\t" . '</dc:title>' . "\n";
        $xmp .= "\t\t\t" . '<dc:creator>' . "\n";
        $xmp .= "\t\t\t\t" . '<rdf:Seq>' . "\n";
        $xmp .= "\t\t\t\t\t" . '<rdf:li>' . $this->_escapeXML($this->author) . '</rdf:li>' . "\n";
        $xmp .= "\t\t\t\t" . '</rdf:Seq>' . "\n";
        $xmp .= "\t\t\t" . '</dc:creator>' . "\n";
        $xmp .= "\t\t\t" . '<dc:description>' . "\n";
        $xmp .= "\t\t\t\t" . '<rdf:Alt>' . "\n";
        $xmp .= "\t\t\t\t\t" . '<rdf:li xml:lang="x-default">' . $this->_escapeXML($this->subject) . '</rdf:li>' . "\n";
        $xmp .= "\t\t\t\t" . '</rdf:Alt>' . "\n";
        $xmp .= "\t\t\t" . '</dc:description>' . "\n";
        $xmp .= "\t\t\t" . '<dc:subject>' . "\n";
        $xmp .= "\t\t\t\t" . '<rdf:Bag>' . "\n";
        $xmp .= "\t\t\t\t\t" . '<rdf:li>' . $this->_escapeXML($this->keywords) . ' TCPDF</rdf:li>' . "\n";
        $xmp .= "\t\t\t\t" . '</rdf:Bag>' . "\n";
        $xmp .= "\t\t\t" . '</dc:subject>' . "\n";
        $xmp .= "\t\t" . '</rdf:Description>' . "\n";
        // convert doc creation date format
        $dcdate = $this->getFormattedDate($this->doc_creation_timestamp);
        $doccreationdate = substr($dcdate, 0, 4) . '-' . substr($dcdate, 4, 2) . '-' . substr($dcdate, 6, 2);
        $doccreationdate .= 'T' . substr($dcdate, 8, 2) . ':' . substr($dcdate, 10, 2) . ':' . substr($dcdate, 12, 2);
        $doccreationdate .= '+' . substr($dcdate, 15, 2) . ':' . substr($dcdate, 18, 2);
        $doccreationdate = $this->_escapeXML($doccreationdate);
        // convert doc modification date format
        $dmdate = $this->getFormattedDate($this->doc_modification_timestamp);
        $docmoddate = substr($dmdate, 0, 4) . '-' . substr($dmdate, 4, 2) . '-' . substr($dmdate, 6, 2);
        $docmoddate .= 'T' . substr($dmdate, 8, 2) . ':' . substr($dmdate, 10, 2) . ':' . substr($dmdate, 12, 2);
        $docmoddate .= '+' . substr($dmdate, 15, 2) . ':' . substr($dmdate, 18, 2);
        $docmoddate = $this->_escapeXML($docmoddate);
        $xmp .= "\t\t" . '<rdf:Description rdf:about="" xmlns:xmp="http://ns.adobe.com/xap/1.0/">' . "\n";
        $xmp .= "\t\t\t" . '<xmp:CreateDate>' . $doccreationdate . '</xmp:CreateDate>' . "\n";
        $xmp .= "\t\t\t" . '<xmp:CreatorTool>' . $this->creator . '</xmp:CreatorTool>' . "\n";
        $xmp .= "\t\t\t" . '<xmp:ModifyDate>' . $docmoddate . '</xmp:ModifyDate>' . "\n";
        $xmp .= "\t\t\t" . '<xmp:MetadataDate>' . $doccreationdate . '</xmp:MetadataDate>' . "\n";
        $xmp .= "\t\t" . '</rdf:Description>' . "\n";
        $xmp .= "\t\t" . '<rdf:Description rdf:about="" xmlns:pdf="http://ns.adobe.com/pdf/1.3/">' . "\n";
        $xmp .= "\t\t\t" . '<pdf:Keywords>' . $this->_escapeXML($this->keywords) . ' TCPDF</pdf:Keywords>' . "\n";
        $xmp .= "\t\t\t" . '<pdf:Producer>' . $this->_escapeXML($this->pdfproducer) . '</pdf:Producer>' . "\n";
        $xmp .= "\t\t" . '</rdf:Description>' . "\n";
        $xmp .= "\t\t" . '<rdf:Description rdf:about="" xmlns:xmpMM="http://ns.adobe.com/xap/1.0/mm/">' . "\n";
        $uuid = 'uuid:' . substr($this->file_id, 0, 8) . '-' . substr($this->file_id, 8, 4) . '-' . substr($this->file_id, 12, 4) . '-' . substr($this->file_id, 16, 4) . '-' . substr($this->file_id, 20, 12);
        $xmp .= "\t\t\t" . '<xmpMM:DocumentID>' . $uuid . '</xmpMM:DocumentID>' . "\n";
        $xmp .= "\t\t\t" . '<xmpMM:InstanceID>' . $uuid . '</xmpMM:InstanceID>' . "\n";
        $xmp .= "\t\t" . '</rdf:Description>' . "\n";
        if ($this->pdfa_mode) {
            $xmp .= "\t\t" . '<rdf:Description rdf:about="" xmlns:pdfaid="http://www.aiim.org/pdfa/ns/id/">' . "\n";
            $xmp .= "\t\t\t" . '<pdfaid:part>1</pdfaid:part>' . "\n";
            $xmp .= "\t\t\t" . '<pdfaid:conformance>B</pdfaid:conformance>' . "\n";
            $xmp .= "\t\t" . '</rdf:Description>' . "\n";
        }
        // XMP extension schemas
        $xmp .= "\t\t" . '<rdf:Description rdf:about="" xmlns:pdfaExtension="http://www.aiim.org/pdfa/ns/extension/" xmlns:pdfaSchema="http://www.aiim.org/pdfa/ns/schema#" xmlns:pdfaProperty="http://www.aiim.org/pdfa/ns/property#">' . "\n";
        $xmp .= "\t\t\t" . '<pdfaExtension:schemas>' . "\n";
        $xmp .= "\t\t\t\t" . '<rdf:Bag>' . "\n";
        $xmp .= "\t\t\t\t\t" . '<rdf:li rdf:parseType="Resource">' . "\n";
        $xmp .= "\t\t\t\t\t\t" . '<pdfaSchema:namespaceURI>http://ns.adobe.com/pdf/1.3/</pdfaSchema:namespaceURI>' . "\n";
        $xmp .= "\t\t\t\t\t\t" . '<pdfaSchema:prefix>pdf</pdfaSchema:prefix>' . "\n";
        $xmp .= "\t\t\t\t\t\t" . '<pdfaSchema:schema>Adobe PDF Schema</pdfaSchema:schema>' . "\n";
        $xmp .= "\t\t\t\t\t" . '</rdf:li>' . "\n";
        $xmp .= "\t\t\t\t\t" . '<rdf:li rdf:parseType="Resource">' . "\n";
        $xmp .= "\t\t\t\t\t\t" . '<pdfaSchema:namespaceURI>http://ns.adobe.com/xap/1.0/mm/</pdfaSchema:namespaceURI>' . "\n";
        $xmp .= "\t\t\t\t\t\t" . '<pdfaSchema:prefix>xmpMM</pdfaSchema:prefix>' . "\n";
        $xmp .= "\t\t\t\t\t\t" . '<pdfaSchema:schema>XMP Media Management Schema</pdfaSchema:schema>' . "\n";
        $xmp .= "\t\t\t\t\t\t" . '<pdfaSchema:property>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t" . '<rdf:Seq>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t" . '<rdf:li rdf:parseType="Resource">' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t\t" . '<pdfaProperty:category>internal</pdfaProperty:category>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t\t" . '<pdfaProperty:description>UUID based identifier for specific incarnation of a document</pdfaProperty:description>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t\t" . '<pdfaProperty:name>InstanceID</pdfaProperty:name>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t\t" . '<pdfaProperty:valueType>URI</pdfaProperty:valueType>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t" . '</rdf:li>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t" . '</rdf:Seq>' . "\n";
        $xmp .= "\t\t\t\t\t\t" . '</pdfaSchema:property>' . "\n";
        $xmp .= "\t\t\t\t\t" . '</rdf:li>' . "\n";
        $xmp .= "\t\t\t\t\t" . '<rdf:li rdf:parseType="Resource">' . "\n";
        $xmp .= "\t\t\t\t\t\t" . '<pdfaSchema:namespaceURI>http://www.aiim.org/pdfa/ns/id/</pdfaSchema:namespaceURI>' . "\n";
        $xmp .= "\t\t\t\t\t\t" . '<pdfaSchema:prefix>pdfaid</pdfaSchema:prefix>' . "\n";
        $xmp .= "\t\t\t\t\t\t" . '<pdfaSchema:schema>PDF/A ID Schema</pdfaSchema:schema>' . "\n";
        $xmp .= "\t\t\t\t\t\t" . '<pdfaSchema:property>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t" . '<rdf:Seq>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t" . '<rdf:li rdf:parseType="Resource">' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t\t" . '<pdfaProperty:category>internal</pdfaProperty:category>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t\t" . '<pdfaProperty:description>Part of PDF/A standard</pdfaProperty:description>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t\t" . '<pdfaProperty:name>part</pdfaProperty:name>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t\t" . '<pdfaProperty:valueType>Integer</pdfaProperty:valueType>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t" . '</rdf:li>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t" . '<rdf:li rdf:parseType="Resource">' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t\t" . '<pdfaProperty:category>internal</pdfaProperty:category>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t\t" . '<pdfaProperty:description>Amendment of PDF/A standard</pdfaProperty:description>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t\t" . '<pdfaProperty:name>amd</pdfaProperty:name>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t\t" . '<pdfaProperty:valueType>Text</pdfaProperty:valueType>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t" . '</rdf:li>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t" . '<rdf:li rdf:parseType="Resource">' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t\t" . '<pdfaProperty:category>internal</pdfaProperty:category>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t\t" . '<pdfaProperty:description>Conformance level of PDF/A standard</pdfaProperty:description>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t\t" . '<pdfaProperty:name>conformance</pdfaProperty:name>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t\t" . '<pdfaProperty:valueType>Text</pdfaProperty:valueType>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t\t" . '</rdf:li>' . "\n";
        $xmp .= "\t\t\t\t\t\t\t" . '</rdf:Seq>' . "\n";
        $xmp .= "\t\t\t\t\t\t" . '</pdfaSchema:property>' . "\n";
        $xmp .= "\t\t\t\t\t" . '</rdf:li>' . "\n";
        $xmp .= "\t\t\t\t" . '</rdf:Bag>' . "\n";
        $xmp .= "\t\t\t" . '</pdfaExtension:schemas>' . "\n";
        $xmp .= "\t\t" . '</rdf:Description>' . "\n";
        $xmp .= "\t" . '</rdf:RDF>' . "\n";
        $xmp .= $this->custom_xmp;
        $xmp .= '</x:xmpmeta>' . "\n";
        $xmp .= '<?xpacket end="w"?>';
        $out = '<< /Type /Metadata /Subtype /XML /Length ' . strlen($xmp) . ' >> stream' . "\n" . $xmp . "\n" . 'endstream' . "\n" . 'endobj';
        // restore previous isunicode value
        $this->isunicode = $prev_isunicode;
        $this->encrypted = $prev_encrypted;
        $this->_out($out);
        return $oid;
    }

    /**
     * Output Catalog.
     * @return int object id
     * @protected
     */
    protected function _putcatalog() {
        // put XMP
        $xmpobj = $this->_putXMP();
        // if required, add standard sRGB_IEC61966-2.1 blackscaled ICC colour profile
        if ($this->pdfa_mode OR $this->force_srgb) {
            $iccobj = $this->_newobj();
            $icc = file_get_contents(dirname(__FILE__) . '/sRGB.icc');
            $filter = '';
            if ($this->compress) {
                $filter = ' /Filter /FlateDecode';
                $icc = gzcompress($icc);
            }
            $icc = $this->_getrawstream($icc);
            $this->_out('<</N 3 ' . $filter . '/Length ' . strlen($icc) . '>> stream' . "\n" . $icc . "\n" . 'endstream' . "\n" . 'endobj');
        }
        // start catalog
        $oid = $this->_newobj();
        $out = '<< /Type /Catalog';
        $out .= ' /Version /' . $this->PDFVersion;
        //$out .= ' /Extensions <<>>';
        $out .= ' /Pages 1 0 R';
        //$out .= ' /PageLabels ' //...;
        $out .= ' /Names <<';
        if ((!$this->pdfa_mode) AND ((!empty($this->javascript)) OR (!empty($this->js_objects)))) {
            $out .= ' /JavaScript ' . ($this->n_js) . ' 0 R';
        }
        $out .= ' >>';
        if (!empty($this->dests)) {
            $out .= ' /Dests ' . $this->n_dests . ' 0 R';
        }
        $out .= $this->_putviewerpreferences();
        if (isset($this->LayoutMode) AND (!$this->empty_string($this->LayoutMode))) {
            $out .= ' /PageLayout /' . $this->LayoutMode;
        }
        if (isset($this->PageMode) AND (!$this->empty_string($this->PageMode))) {
            $out .= ' /PageMode /' . $this->PageMode;
        }
        if (count($this->outlines) > 0) {
            $out .= ' /Outlines ' . $this->OutlineRoot . ' 0 R';
            $out .= ' /PageMode /UseOutlines';
        }
        //$out .= ' /Threads []';
        if ($this->ZoomMode == 'fullpage') {
            $out .= ' /OpenAction [' . $this->page_obj_id[1] . ' 0 R /Fit]';
        } elseif ($this->ZoomMode == 'fullwidth') {
            $out .= ' /OpenAction [' . $this->page_obj_id[1] . ' 0 R /FitH null]';
        } elseif ($this->ZoomMode == 'real') {
            $out .= ' /OpenAction [' . $this->page_obj_id[1] . ' 0 R /XYZ null null 1]';
        } elseif (!is_string($this->ZoomMode)) {
            $out .= sprintf(' /OpenAction [' . $this->page_obj_id[1] . ' 0 R /XYZ null null %F]', ($this->ZoomMode / 100));
        }
        //$out .= ' /AA <<>>';
        //$out .= ' /URI <<>>';
        $out .= ' /Metadata ' . $xmpobj . ' 0 R';
        //$out .= ' /StructTreeRoot <<>>';
        //$out .= ' /MarkInfo <<>>';
        if (isset($this->l['a_meta_language'])) {
            $out .= ' /Lang ' . $this->_textstring($this->l['a_meta_language'], $oid);
        }
        //$out .= ' /SpiderInfo <<>>';
        // set OutputIntent to sRGB IEC61966-2.1 if required
        if ($this->pdfa_mode OR $this->force_srgb) {
            $out .= ' /OutputIntents [<<';
            $out .= ' /Type /OutputIntent';
            $out .= ' /S /GTS_PDFA1';
            $out .= ' /OutputCondition ' . $this->_textstring('sRGB IEC61966-2.1', $oid);
            $out .= ' /OutputConditionIdentifier ' . $this->_textstring('sRGB IEC61966-2.1', $oid);
            $out .= ' /RegistryName ' . $this->_textstring('http://www.color.org', $oid);
            $out .= ' /Info ' . $this->_textstring('sRGB IEC61966-2.1', $oid);
            $out .= ' /DestOutputProfile ' . $iccobj . ' 0 R';
            $out .= ' >>]';
        }
        //$out .= ' /PieceInfo <<>>';
        if (!empty($this->pdflayers)) {
            $lyrobjs = '';
            $lyrobjs_print = '';
            $lyrobjs_view = '';
            foreach ($this->pdflayers as $layer) {
                $lyrobjs .= ' ' . $layer['objid'] . ' 0 R';
                if ($layer['print']) {
                    $lyrobjs_print .= ' ' . $layer['objid'] . ' 0 R';
                }
                if ($layer['view']) {
                    $lyrobjs_view .= ' ' . $layer['objid'] . ' 0 R';
                }
            }
            $out .= ' /OCProperties << /OCGs [' . $lyrobjs . ']';
            $out .= ' /D <<';
            $out .= ' /Name ' . $this->_textstring('Layers', $oid);
            $out .= ' /Creator ' . $this->_textstring('TCPDF', $oid);
            $out .= ' /BaseState /ON';
            $out .= ' /ON [' . $lyrobjs_print . ']';
            $out .= ' /OFF [' . $lyrobjs_view . ']';
            $out .= ' /Intent /View';
            $out .= ' /AS [';
            $out .= ' << /Event /Print /OCGs [' . $lyrobjs . '] /Category [/Print] >>';
            $out .= ' << /Event /View /OCGs [' . $lyrobjs . '] /Category [/View] >>';
            $out .= ' ]';
            $out .= ' /Order [' . $lyrobjs . ']';
            $out .= ' /ListMode /AllPages';
            //$out .= ' /RBGroups ['..']';
            //$out .= ' /Locked ['..']';
            $out .= ' >>';
            $out .= ' >>';
        }
        // AcroForm
        if (!empty($this->form_obj_id) OR ($this->sign AND isset($this->signature_data['cert_type']))) {
            $out .= ' /AcroForm <<';
            $objrefs = '';
            if ($this->sign AND isset($this->signature_data['cert_type'])) {
                // set reference for signature object
                $objrefs .= $this->sig_obj_id . ' 0 R';
            }
            if (!empty($this->empty_signature_appearance)) {
                foreach ($this->empty_signature_appearance as $esa) {
                    // set reference for empty signature objects
                    $objrefs .= ' ' . $esa['objid'] . ' 0 R';
                }
            }
            if (!empty($this->form_obj_id)) {
                foreach ($this->form_obj_id as $objid) {
                    $objrefs .= ' ' . $objid . ' 0 R';
                }
            }
            $out .= ' /Fields [' . $objrefs . ']';
            // It's better to turn off this value and set the appearance stream for each annotation (/AP) to avoid conflicts with signature fields.
            $out .= ' /NeedAppearances false';
            if ($this->sign AND isset($this->signature_data['cert_type'])) {
                if ($this->signature_data['cert_type'] > 0) {
                    $out .= ' /SigFlags 3';
                } else {
                    $out .= ' /SigFlags 1';
                }
            }
            //$out .= ' /CO ';
            if (isset($this->annotation_fonts) AND !empty($this->annotation_fonts)) {
                $out .= ' /DR <<';
                $out .= ' /Font <<';
                foreach ($this->annotation_fonts as $fontkey => $fontid) {
                    $out .= ' /F' . $fontid . ' ' . $this->font_obj_ids[$fontkey] . ' 0 R';
                }
                $out .= ' >> >>';
            }
            $font = $this->getFontBuffer('helvetica');
            $out .= ' /DA (/F' . $font['i'] . ' 0 Tf 0 g)';
            $out .= ' /Q ' . (($this->rtl) ? '2' : '0');
            //$out .= ' /XFA ';
            $out .= ' >>';
            // signatures
            if ($this->sign AND isset($this->signature_data['cert_type'])) {
                if ($this->signature_data['cert_type'] > 0) {
                    $out .= ' /Perms << /DocMDP ' . ($this->sig_obj_id + 1) . ' 0 R >>';
                } else {
                    $out .= ' /Perms << /UR3 ' . ($this->sig_obj_id + 1) . ' 0 R >>';
                }
            }
        }
        //$out .= ' /Legal <<>>';
        //$out .= ' /Requirements []';
        //$out .= ' /Collection <<>>';
        //$out .= ' /NeedsRendering true';
        $out .= ' >>';
        $out .= "\n" . 'endobj';
        $this->_out($out);
        return $oid;
    }

    /**
     * Output viewer preferences.
     * @return string for viewer preferences
     * @author Nicola asuni
     * @since 3.1.000 (2008-06-09)
     * @protected
     */
    protected function _putviewerpreferences() {
        $out = ' /ViewerPreferences <<';
        if ($this->rtl) {
            $out .= ' /Direction /R2L';
        } else {
            $out .= ' /Direction /L2R';
        }
        if (isset($this->viewer_preferences['HideToolbar']) AND ($this->viewer_preferences['HideToolbar'])) {
            $out .= ' /HideToolbar true';
        }
        if (isset($this->viewer_preferences['HideMenubar']) AND ($this->viewer_preferences['HideMenubar'])) {
            $out .= ' /HideMenubar true';
        }
        if (isset($this->viewer_preferences['HideWindowUI']) AND ($this->viewer_preferences['HideWindowUI'])) {
            $out .= ' /HideWindowUI true';
        }
        if (isset($this->viewer_preferences['FitWindow']) AND ($this->viewer_preferences['FitWindow'])) {
            $out .= ' /FitWindow true';
        }
        if (isset($this->viewer_preferences['CenterWindow']) AND ($this->viewer_preferences['CenterWindow'])) {
            $out .= ' /CenterWindow true';
        }
        if (isset($this->viewer_preferences['DisplayDocTitle']) AND ($this->viewer_preferences['DisplayDocTitle'])) {
            $out .= ' /DisplayDocTitle true';
        }
        if (isset($this->viewer_preferences['NonFullScreenPageMode'])) {
            $out .= ' /NonFullScreenPageMode /' . $this->viewer_preferences['NonFullScreenPageMode'];
        }
        if (isset($this->viewer_preferences['ViewArea'])) {
            $out .= ' /ViewArea /' . $this->viewer_preferences['ViewArea'];
        }
        if (isset($this->viewer_preferences['ViewClip'])) {
            $out .= ' /ViewClip /' . $this->viewer_preferences['ViewClip'];
        }
        if (isset($this->viewer_preferences['PrintArea'])) {
            $out .= ' /PrintArea /' . $this->viewer_preferences['PrintArea'];
        }
        if (isset($this->viewer_preferences['PrintClip'])) {
            $out .= ' /PrintClip /' . $this->viewer_preferences['PrintClip'];
        }
        if (isset($this->viewer_preferences['PrintScaling'])) {
            $out .= ' /PrintScaling /' . $this->viewer_preferences['PrintScaling'];
        }
        if (isset($this->viewer_preferences['Duplex']) AND (!$this->empty_string($this->viewer_preferences['Duplex']))) {
            $out .= ' /Duplex /' . $this->viewer_preferences['Duplex'];
        }
        if (isset($this->viewer_preferences['PickTrayByPDFSize'])) {
            if ($this->viewer_preferences['PickTrayByPDFSize']) {
                $out .= ' /PickTrayByPDFSize true';
            } else {
                $out .= ' /PickTrayByPDFSize false';
            }
        }
        if (isset($this->viewer_preferences['PrintPageRange'])) {
            $PrintPageRangeNum = '';
            foreach ($this->viewer_preferences['PrintPageRange'] as $k => $v) {
                $PrintPageRangeNum .= ' ' . ($v - 1) . '';
            }
            $out .= ' /PrintPageRange [' . substr($PrintPageRangeNum, 1) . ']';
        }
        if (isset($this->viewer_preferences['NumCopies'])) {
            $out .= ' /NumCopies ' . intval($this->viewer_preferences['NumCopies']);
        }
        $out .= ' >>';
        return $out;
    }

    /**
     * Output PDF File Header (7.5.2).
     * @protected
     */
    protected function _putheader() {
        $this->_out('%PDF-' . $this->PDFVersion);
        $this->_out('%' . chr(0xe2) . chr(0xe3) . chr(0xcf) . chr(0xd3));
    }

    /**
     * Output end of document (EOF).
     * @protected
     */
    protected function _enddoc() {
        $this->state = 1;
        $this->_putheader();
        $this->_putpages();
        $this->_putresources();
        // empty signature fields
        if (!empty($this->empty_signature_appearance)) {
            foreach ($this->empty_signature_appearance as $key => $esa) {
                // widget annotation for empty signature
                $out = $this->_getobj($esa['objid']) . "\n";
                $out .= '<< /Type /Annot';
                $out .= ' /Subtype /Widget';
                $out .= ' /Rect [' . $esa['rect'] . ']';
                $out .= ' /P ' . $this->page_obj_id[($esa['page'])] . ' 0 R'; // link to signature appearance page
                $out .= ' /F 4';
                $out .= ' /FT /Sig';
                $signame = sprintf('Signature_%03d', ($key + 1));
                $out .= ' /T ' . $this->_textstring($signame, $esa['objid']);
                $out .= ' /Ff 0';
                $out .= ' >>';
                $out .= "\n" . 'endobj';
                $this->_out($out);
            }
        }
        // Signature
        if ($this->sign AND isset($this->signature_data['cert_type'])) {
            // widget annotation for signature
            $out = $this->_getobj($this->sig_obj_id) . "\n";
            $out .= '<< /Type /Annot';
            $out .= ' /Subtype /Widget';
            $out .= ' /Rect [' . $this->signature_appearance['rect'] . ']';
            $out .= ' /P ' . $this->page_obj_id[($this->signature_appearance['page'])] . ' 0 R'; // link to signature appearance page
            $out .= ' /F 4';
            $out .= ' /FT /Sig';
            $out .= ' /T ' . $this->_textstring('Signature_000', $this->sig_obj_id);
            $out .= ' /Ff 0';
            $out .= ' /V ' . ($this->sig_obj_id + 1) . ' 0 R';
            $out .= ' >>';
            $out .= "\n" . 'endobj';
            $this->_out($out);
            // signature
            $this->_putsignature();
        }
        // Info
        $objid_info = $this->_putinfo();
        // Catalog
        $objid_catalog = $this->_putcatalog();
        // Cross-ref
        $o = $this->bufferlen;
        // XREF section
        $this->_out('xref');
        $this->_out('0 ' . ($this->n + 1));
        $this->_out('0000000000 65535 f ');
        $freegen = ($this->n + 2);
        for ($i = 1; $i <= $this->n; ++$i) {
            if (!isset($this->offsets[$i]) AND ($i > 1)) {
                $this->_out(sprintf('0000000000 %05d f ', $freegen));
                ++$freegen;
            } else {
                $this->_out(sprintf('%010d 00000 n ', $this->offsets[$i]));
            }
        }
        // TRAILER
        $out = 'trailer' . "\n";
        $out .= '<<';
        $out .= ' /Size ' . ($this->n + 1);
        $out .= ' /Root ' . $objid_catalog . ' 0 R';
        $out .= ' /Info ' . $objid_info . ' 0 R';
        if ($this->encrypted) {
            $out .= ' /Encrypt ' . $this->encryptdata['objid'] . ' 0 R';
        }
        $out .= ' /ID [ <' . $this->file_id . '> <' . $this->file_id . '> ]';
        $out .= ' >>';
        $this->_out($out);
        $this->_out('startxref');
        $this->_out($o);
        $this->_out('%%EOF');
        $this->state = 3; // end-of-doc
        if ($this->diskcache) {
            // remove temporary files used for images
            foreach ($this->imagekeys as $key) {
                // remove temporary files
                unlink($this->images[$key]);
            }
            foreach ($this->fontkeys as $key) {
                // remove temporary files
                unlink($this->fonts[$key]);
            }
        }
    }

    /**
     * Initialize a new page.
     * @param $orientation (string) page orientation. Possible values are (case insensitive):<ul><li>P or PORTRAIT (default)</li><li>L or LANDSCAPE</li></ul>
     * @param $format (mixed) The format used for pages. It can be either: one of the string values specified at getPageSizeFromFormat() or an array of parameters specified at setPageFormat().
     * @protected
     * @see getPageSizeFromFormat(), setPageFormat()
     */
    protected function _beginpage($orientation = '', $format = '') {
        ++$this->page;
        $this->pageobjects[$this->page] = array();
        $this->setPageBuffer($this->page, '');
        // initialize array for graphics tranformation positions inside a page buffer
        $this->transfmrk[$this->page] = array();
        $this->state = 2;
        if ($this->empty_string($orientation)) {
            if (isset($this->CurOrientation)) {
                $orientation = $this->CurOrientation;
            } elseif ($this->fwPt > $this->fhPt) {
                // landscape
                $orientation = 'L';
            } else {
                // portrait
                $orientation = 'P';
            }
        }
        if ($this->empty_string($format)) {
            $this->pagedim[$this->page] = $this->pagedim[($this->page - 1)];
            $this->setPageOrientation($orientation);
        } else {
            $this->setPageFormat($format, $orientation);
        }
        if ($this->rtl) {
            $this->x = $this->w - $this->rMargin;
        } else {
            $this->x = $this->lMargin;
        }
        $this->y = $this->tMargin;
        if (isset($this->newpagegroup[$this->page])) {
            // start a new group
            $this->currpagegroup = $this->newpagegroup[$this->page];
            $this->pagegroups[$this->currpagegroup] = 1;
        } elseif (isset($this->currpagegroup) AND ($this->currpagegroup > 0)) {
            ++$this->pagegroups[$this->currpagegroup];
        }
    }

    /**
     * Mark end of page.
     * @protected
     */
    protected function _endpage() {
        $this->setVisibility('all');
        $this->state = 1;
    }

    /**
     * Begin a new object and return the object number.
     * @return int object number
     * @protected
     */
    protected function _newobj() {
        $this->_out($this->_getobj());
        return $this->n;
    }

    /**
     * Return the starting object string for the selected object ID.
     * @param $objid (int) Object ID (leave empty to get a new ID).
     * @return string the starting object string
     * @protected
     * @since 5.8.009 (2010-08-20)
     */
    protected function _getobj($objid = '') {
        if ($objid === '') {
            ++$this->n;
            $objid = $this->n;
        }
        $this->offsets[$objid] = $this->bufferlen;
        $this->pageobjects[$this->page][] = $objid;
        return $objid . ' 0 obj';
    }

    /**
     * Underline text.
     * @param $x (int) X coordinate
     * @param $y (int) Y coordinate
     * @param $txt (string) text to underline
     * @protected
     */
    protected function _dounderline($x, $y, $txt) {
        $w = $this->GetStringWidth($txt);
        return $this->_dounderlinew($x, $y, $w);
    }

    /**
     * Underline for rectangular text area.
     * @param $x (int) X coordinate
     * @param $y (int) Y coordinate
     * @param $w (int) width to underline
     * @protected
     * @since 4.8.008 (2009-09-29)
     */
    protected function _dounderlinew($x, $y, $w) {
        $linew = - $this->CurrentFont['ut'] / 1000 * $this->FontSizePt;
        return sprintf('%F %F %F %F re f', $x * $this->k, ((($this->h - $y) * $this->k) + $linew), $w * $this->k, $linew);
    }

    /**
     * Line through text.
     * @param $x (int) X coordinate
     * @param $y (int) Y coordinate
     * @param $txt (string) text to linethrough
     * @protected
     */
    protected function _dolinethrough($x, $y, $txt) {
        $w = $this->GetStringWidth($txt);
        return $this->_dolinethroughw($x, $y, $w);
    }

    /**
     * Line through for rectangular text area.
     * @param $x (int) X coordinate
     * @param $y (int) Y coordinate
     * @param $w (int) line length (width)
     * @protected
     * @since 4.9.008 (2009-09-29)
     */
    protected function _dolinethroughw($x, $y, $w) {
        $linew = - $this->CurrentFont['ut'] / 1000 * $this->FontSizePt;
        return sprintf('%F %F %F %F re f', $x * $this->k, ((($this->h - $y) * $this->k) + $linew + ($this->FontSizePt / 3)), $w * $this->k, $linew);
    }

    /**
     * Overline text.
     * @param $x (int) X coordinate
     * @param $y (int) Y coordinate
     * @param $txt (string) text to overline
     * @protected
     * @since 4.9.015 (2010-04-19)
     */
    protected function _dooverline($x, $y, $txt) {
        $w = $this->GetStringWidth($txt);
        return $this->_dooverlinew($x, $y, $w);
    }

    /**
     * Overline for rectangular text area.
     * @param $x (int) X coordinate
     * @param $y (int) Y coordinate
     * @param $w (int) width to overline
     * @protected
     * @since 4.9.015 (2010-04-19)
     */
    protected function _dooverlinew($x, $y, $w) {
        $linew = - $this->CurrentFont['ut'] / 1000 * $this->FontSizePt;
        return sprintf('%F %F %F %F re f', $x * $this->k, (($this->h - $y + $this->FontAscent) * $this->k) - $linew, $w * $this->k, $linew);
    }

    /**
     * Read a 4-byte (32 bit) integer from file.
     * @param $f (string) file name.
     * @return 4-byte integer
     * @protected
     */
    protected function _freadint($f) {
        $a = unpack('Ni', fread($f, 4));
        return $a['i'];
    }

    /**
     * Add "\" before "\", "(" and ")"
     * @param $s (string) string to escape.
     * @return string escaped string.
     * @protected
     */
    protected function _escape($s) {
        // the chr(13) substitution fixes the Bugs item #1421290.
        return strtr($s, array(')' => '\\)', '(' => '\\(', '\\' => '\\\\', chr(13) => '\r'));
    }

    /**
     * Format a data string for meta information
     * @param $s (string) data string to escape.
     * @param $n (int) object ID
     * @return string escaped string.
     * @protected
     */
    protected function _datastring($s, $n = 0) {
        if ($n == 0) {
            $n = $this->n;
        }
        $s = $this->_encrypt_data($n, $s);
        return '(' . $this->_escape($s) . ')';
    }

    /**
     * Set the document creation timestamp
     * @param $time (mixed) Document creation timestamp in seconds or date-time string.
     * @public
     * @since 5.9.152 (2012-03-23)
     */
    public function setDocCreationTimestamp($time) {
        if (is_string($time)) {
            $time = getTimestamp($time);
        }
        $this->doc_creation_timestamp = intval($time);
    }

    /**
     * Set the document modification timestamp
     * @param $time (mixed) Document modification timestamp in seconds or date-time string.
     * @public
     * @since 5.9.152 (2012-03-23)
     */
    public function setDocModificationTimestamp($time) {
        if (is_string($time)) {
            $time = getTimestamp($time);
        }
        $this->doc_modification_timestamp = intval($time);
    }

    /**
     * Returns document creation timestamp in seconds.
     * @return (int) Creation timestamp in seconds.
     * @public
     * @since 5.9.152 (2012-03-23)
     */
    public function getDocCreationTimestamp() {
        return $this->doc_creation_timestamp;
    }

    /**
     * Returns document modification timestamp in seconds.
     * @return (int) Modfication timestamp in seconds.
     * @public
     * @since 5.9.152 (2012-03-23)
     */
    public function getDocModificationTimestamp() {
        return $this->doc_modification_timestamp;
    }

    /**
     * Returns timestamp in seconds from formatted date-time.
     * @param $date (string) Formatted date-time.
     * @return int seconds.
     * @public
     * @since 5.9.152 (2012-03-23)
     */
    public function getTimestamp($date) {
        if (($date[0] == 'D') AND ($date[1] == ':')) {
            // remove date prefix if present
            $date = substr($date, 2);
        }
        return strtotime($date);
    }

    /**
     * Returns a formatted date-time.
     * @param $time (int) Time in seconds.
     * @return string escaped date string.
     * @public
     * @since 5.9.152 (2012-03-23)
     */
    public function getFormattedDate($time) {
        return substr_replace(date('YmdHisO', intval($time)), '\'', (0 - 2), 0) . '\'';
    }

    /**
     * Returns a formatted date for meta information
     * @param $n (int) Object ID.
     * @param $timestamp (int) Timestamp to convert.
     * @return string escaped date string.
     * @protected
     * @since 4.6.028 (2009-08-25)
     */
    protected function _datestring($n = 0, $timestamp = 0) {
        if ((empty($timestamp)) OR ($timestamp < 0)) {
            $timestamp = $this->doc_creation_timestamp;
        }
        return $this->_datastring('D:' . $this->getFormattedDate($timestamp), $n);
    }

    /**
     * Format a text string for meta information
     * @param $s (string) string to escape.
     * @param $n (int) object ID
     * @return string escaped string.
     * @protected
     */
    protected function _textstring($s, $n = 0) {
        if ($this->isunicode) {
            //Convert string to UTF-16BE
            $s = $this->UTF8ToUTF16BE($s, true);
        }
        return $this->_datastring($s, $n);
    }

    /**
     * THIS METHOD IS DEPRECATED
     * Format a text string
     * @param $s (string) string to escape.
     * @return string escaped string.
     * @protected
     * @deprecated
     */
    protected function _escapetext($s) {
        if ($this->isunicode) {
            if (($this->CurrentFont['type'] == 'core') OR ($this->CurrentFont['type'] == 'TrueType') OR ($this->CurrentFont['type'] == 'Type1')) {
                $s = $this->UTF8ToLatin1($s);
            } else {
                //Convert string to UTF-16BE and reverse RTL language
                $s = $this->utf8StrRev($s, false, $this->tmprtl);
            }
        }
        return $this->_escape($s);
    }

    /**
     * Escape some special characters (&lt; &gt; &amp;) for XML output.
     * @param $str (string) Input string to convert.
     * @return converted string
     * @since 5.9.121 (2011-09-28)
     * @protected
     */
    protected function _escapeXML($str) {
        $replaceTable = array("\0" => '', '&' => '&amp;', '<' => '&lt;', '>' => '&gt;');
        $str = strtr($str, $replaceTable);
        return $str;
    }

    /**
     * get raw output stream.
     * @param $s (string) string to output.
     * @param $n (int) object reference for encryption mode
     * @protected
     * @author Nicola Asuni
     * @since 5.5.000 (2010-06-22)
     */
    protected function _getrawstream($s, $n = 0) {
        if ($n <= 0) {
            // default to current object
            $n = $this->n;
        }
        return $this->_encrypt_data($n, $s);
    }

    /**
     * Format output stream (DEPRECATED).
     * @param $s (string) string to output.
     * @param $n (int) object reference for encryption mode
     * @protected
     * @deprecated
     */
    protected function _getstream($s, $n = 0) {
        return 'stream' . "\n" . $this->_getrawstream($s, $n) . "\n" . 'endstream';
    }

    /**
     * Output a stream (DEPRECATED).
     * @param $s (string) string to output.
     * @param $n (int) object reference for encryption mode
     * @protected
     * @deprecated
     */
    protected function _putstream($s, $n = 0) {
        $this->_out($this->_getstream($s, $n));
    }

    /**
     * Output a string to the document.
     * @param $s (string) string to output.
     * @protected
     */
    protected function _out($s) {
        if ($this->state == 2) {
            if ($this->inxobj) {
                // we are inside an XObject template
                $this->xobjects[$this->xobjid]['outdata'] .= $s . "\n";
            } elseif ((!$this->InFooter) AND isset($this->footerlen[$this->page]) AND ($this->footerlen[$this->page] > 0)) {
                // puts data before page footer
                $pagebuff = $this->getPageBuffer($this->page);
                $page = substr($pagebuff, 0, -$this->footerlen[$this->page]);
                $footer = substr($pagebuff, -$this->footerlen[$this->page]);
                $this->setPageBuffer($this->page, $page . $s . "\n" . $footer);
                // update footer position
                $this->footerpos[$this->page] += strlen($s . "\n");
            } else {
                // set page data
                $this->setPageBuffer($this->page, $s . "\n", true);
            }
        } elseif ($this->state > 0) {
            // set general data
            $this->setBuffer($s . "\n");
        }
    }

    /**
     * Converts UTF-8 strings to codepoints array.<br>
     * Invalid byte sequences will be replaced with 0xFFFD (replacement character)<br>
     * Based on: http://www.faqs.org/rfcs/rfc3629.html
     * <pre>
     *    Char. number range  |        UTF-8 octet sequence
     *       (hexadecimal)    |              (binary)
     *    --------------------+-----------------------------------------------
     *    0000 0000-0000 007F | 0xxxxxxx
     *    0000 0080-0000 07FF | 110xxxxx 10xxxxxx
     *    0000 0800-0000 FFFF | 1110xxxx 10xxxxxx 10xxxxxx
     *    0001 0000-0010 FFFF | 11110xxx 10xxxxxx 10xxxxxx 10xxxxxx
     *    ---------------------------------------------------------------------
     *
     *   ABFN notation:
     *   ---------------------------------------------------------------------
     *   UTF8-octets = *( UTF8-char )
     *   UTF8-char   = UTF8-1 / UTF8-2 / UTF8-3 / UTF8-4
     *   UTF8-1      = %x00-7F
     *   UTF8-2      = %xC2-DF UTF8-tail
     *
     *   UTF8-3      = %xE0 %xA0-BF UTF8-tail / %xE1-EC 2( UTF8-tail ) /
     *                 %xED %x80-9F UTF8-tail / %xEE-EF 2( UTF8-tail )
     *   UTF8-4      = %xF0 %x90-BF 2( UTF8-tail ) / %xF1-F3 3( UTF8-tail ) /
     *                 %xF4 %x80-8F 2( UTF8-tail )
     *   UTF8-tail   = %x80-BF
     *   ---------------------------------------------------------------------
     * </pre>
     * @param $str (string) string to process.
     * @return array containing codepoints (UTF-8 characters values)
     * @protected
     * @author Nicola Asuni
     * @since 1.53.0.TC005 (2005-01-05)
     */
    protected function UTF8StringToArray($str) {
        // build a unique string key
        $strkey = md5($str);
        if (isset($this->cache_UTF8StringToArray[$strkey])) {
            // return cached value
            $chrarray = $this->cache_UTF8StringToArray[$strkey]['s'];
            if (!isset($this->cache_UTF8StringToArray[$strkey]['f'][$this->CurrentFont['fontkey']])) {
                if ($this->isunicode) {
                    foreach ($chrarray as $chr) {
                        // store this char for font subsetting
                        $this->CurrentFont['subsetchars'][$chr] = true;
                    }
                    // update font subsetchars
                    $this->setFontSubBuffer($this->CurrentFont['fontkey'], 'subsetchars', $this->CurrentFont['subsetchars']);
                }
                $this->cache_UTF8StringToArray[$strkey]['f'][$this->CurrentFont['fontkey']] = true;
            }
            return $chrarray;
        }
        // check cache size
        if ($this->cache_size_UTF8StringToArray >= $this->cache_maxsize_UTF8StringToArray) {
            // remove first element
            array_shift($this->cache_UTF8StringToArray);
        }
        // new cache array for selected string
        $this->cache_UTF8StringToArray[$strkey] = array('s' => array(), 'f' => array());
        ++$this->cache_size_UTF8StringToArray;
        if (!$this->isunicode) {
            // split string into array of equivalent codes
            $strarr = array();
            $strlen = strlen($str);
            for ($i = 0; $i < $strlen; ++$i) {
                $strarr[] = ord($str[$i]);
            }
            // insert new value on cache
            $this->cache_UTF8StringToArray[$strkey]['s'] = $strarr;
            $this->cache_UTF8StringToArray[$strkey]['f'][$this->CurrentFont['fontkey']] = true;
            return $strarr;
        }
        $unichar = -1; // last unicode char
        $unicode = array(); // array containing unicode values
        $bytes = array(); // array containing single character byte sequences
        $numbytes = 1; // number of octetc needed to represent the UTF-8 character
        $str .= ''; // force $str to be a string
        $length = strlen($str);
        for ($i = 0; $i < $length; ++$i) {
            $char = ord($str[$i]); // get one string character at time
            if (count($bytes) == 0) { // get starting octect
                if ($char <= 0x7F) {
                    $unichar = $char; // use the character "as is" because is ASCII
                    $numbytes = 1;
                } elseif (($char >> 0x05) == 0x06) { // 2 bytes character (0x06 = 110 BIN)
                    $bytes[] = ($char - 0xC0) << 0x06;
                    $numbytes = 2;
                } elseif (($char >> 0x04) == 0x0E) { // 3 bytes character (0x0E = 1110 BIN)
                    $bytes[] = ($char - 0xE0) << 0x0C;
                    $numbytes = 3;
                } elseif (($char >> 0x03) == 0x1E) { // 4 bytes character (0x1E = 11110 BIN)
                    $bytes[] = ($char - 0xF0) << 0x12;
                    $numbytes = 4;
                } else {
                    // use replacement character for other invalid sequences
                    $unichar = 0xFFFD;
                    $bytes = array();
                    $numbytes = 1;
                }
            } elseif (($char >> 0x06) == 0x02) { // bytes 2, 3 and 4 must start with 0x02 = 10 BIN
                $bytes[] = $char - 0x80;
                if (count($bytes) == $numbytes) {
                    // compose UTF-8 bytes to a single unicode value
                    $char = $bytes[0];
                    for ($j = 1; $j < $numbytes; ++$j) {
                        $char += ($bytes[$j] << (($numbytes - $j - 1) * 0x06));
                    }
                    if ((($char >= 0xD800) AND ($char <= 0xDFFF)) OR ($char >= 0x10FFFF)) {
                        /* The definition of UTF-8 prohibits encoding character numbers between
                          U+D800 and U+DFFF, which are reserved for use with the UTF-16
                          encoding form (as surrogate pairs) and do not directly represent
                          characters. */
                        $unichar = 0xFFFD; // use replacement character
                    } else {
                        $unichar = $char; // add char to array
                    }
                    // reset data for next char
                    $bytes = array();
                    $numbytes = 1;
                }
            } else {
                // use replacement character for other invalid sequences
                $unichar = 0xFFFD;
                $bytes = array();
                $numbytes = 1;
            }
            if ($unichar >= 0) {
                // insert unicode value into array
                $unicode[] = $unichar;
                // store this char for font subsetting
                $this->CurrentFont['subsetchars'][$unichar] = true;
                $unichar = -1;
            }
        }
        // update font subsetchars
        $this->setFontSubBuffer($this->CurrentFont['fontkey'], 'subsetchars', $this->CurrentFont['subsetchars']);
        // insert new value on cache
        $this->cache_UTF8StringToArray[$strkey]['s'] = $unicode;
        $this->cache_UTF8StringToArray[$strkey]['f'][$this->CurrentFont['fontkey']] = true;
        return $unicode;
    }

    /**
     * Converts UTF-8 strings to UTF16-BE.<br>
     * @param $str (string) string to process.
     * @param $setbom (boolean) if true set the Byte Order Mark (BOM = 0xFEFF)
     * @return string
     * @author Nicola Asuni
     * @since 1.53.0.TC005 (2005-01-05)
     * @see UTF8StringToArray(), arrUTF8ToUTF16BE()
     * @protected
     */
    protected function UTF8ToUTF16BE($str, $setbom = false) {
        if (!$this->isunicode) {
            return $str; // string is not in unicode
        }
        $unicode = $this->UTF8StringToArray($str); // array containing UTF-8 unicode values
        return $this->arrUTF8ToUTF16BE($unicode, $setbom);
    }

    /**
     * Converts UTF-8 strings to Latin1 when using the standard 14 core fonts.<br>
     * @param $str (string) string to process.
     * @return string
     * @author Andrew Whitehead, Nicola Asuni
     * @protected
     * @since 3.2.000 (2008-06-23)
     */
    protected function UTF8ToLatin1($str) {
        if (!$this->isunicode) {
            return $str; // string is not in unicode
        }
        $outstr = ''; // string to be returned
        $unicode = $this->UTF8StringToArray($str); // array containing UTF-8 unicode values
        foreach ($unicode as $char) {
            if ($char < 256) {
                $outstr .= chr($char);
            } elseif (array_key_exists($char, $this->unicode->uni_utf8tolatin)) {
                // map from UTF-8
                $outstr .= chr($this->unicode->uni_utf8tolatin[$char]);
            } elseif ($char == 0xFFFD) {
                // skip
            } else {
                $outstr .= '?';
            }
        }
        return $outstr;
    }

    /**
     * Converts UTF-8 characters array to array of Latin1 characters<br>
     * @param $unicode (array) array containing UTF-8 unicode values
     * @return array
     * @author Nicola Asuni
     * @protected
     * @since 4.8.023 (2010-01-15)
     */
    protected function UTF8ArrToLatin1($unicode) {
        if ((!$this->isunicode) OR $this->isUnicodeFont()) {
            return $unicode;
        }
        $outarr = array(); // array to be returned
        foreach ($unicode as $char) {
            if ($char < 256) {
                $outarr[] = $char;
            } elseif (array_key_exists($char, $this->unicode->uni_utf8tolatin)) {
                // map from UTF-8
                $outarr[] = $this->unicode->uni_utf8tolatin[$char];
            } elseif ($char == 0xFFFD) {
                // skip
            } else {
                $outarr[] = 63; // '?' character
            }
        }
        return $outarr;
    }

    /**
     * Converts array of UTF-8 characters to UTF16-BE string.<br>
     * Based on: http://www.faqs.org/rfcs/rfc2781.html
     * <pre>
     *   Encoding UTF-16:
     *
     *   Encoding of a single character from an ISO 10646 character value to
     *    UTF-16 proceeds as follows. Let U be the character number, no greater
     *    than 0x10FFFF.
     *
     *    1) If U < 0x10000, encode U as a 16-bit unsigned integer and
     *       terminate.
     *
     *    2) Let U' = U - 0x10000. Because U is less than or equal to 0x10FFFF,
     *       U' must be less than or equal to 0xFFFFF. That is, U' can be
     *       represented in 20 bits.
     *
     *    3) Initialize two 16-bit unsigned integers, W1 and W2, to 0xD800 and
     *       0xDC00, respectively. These integers each have 10 bits free to
     *       encode the character value, for a total of 20 bits.
     *
     *    4) Assign the 10 high-order bits of the 20-bit U' to the 10 low-order
     *       bits of W1 and the 10 low-order bits of U' to the 10 low-order
     *       bits of W2. Terminate.
     *
     *    Graphically, steps 2 through 4 look like:
     *    U' = yyyyyyyyyyxxxxxxxxxx
     *    W1 = 110110yyyyyyyyyy
     *    W2 = 110111xxxxxxxxxx
     * </pre>
     * @param $unicode (array) array containing UTF-8 unicode values
     * @param $setbom (boolean) if true set the Byte Order Mark (BOM = 0xFEFF)
     * @return string
     * @protected
     * @author Nicola Asuni
     * @since 2.1.000 (2008-01-08)
     * @see UTF8ToUTF16BE()
     */
    protected function arrUTF8ToUTF16BE($unicode, $setbom = false) {
        $outstr = ''; // string to be returned
        if ($setbom) {
            $outstr .= "\xFE\xFF"; // Byte Order Mark (BOM)
        }
        foreach ($unicode as $char) {
            if ($char == 0x200b) {
                // skip Unicode Character 'ZERO WIDTH SPACE' (DEC:8203, U+200B)
            } elseif ($char == 0xFFFD) {
                $outstr .= "\xFF\xFD"; // replacement character
            } elseif ($char < 0x10000) {
                $outstr .= chr($char >> 0x08);
                $outstr .= chr($char & 0xFF);
            } else {
                $char -= 0x10000;
                $w1 = 0xD800 | ($char >> 0x0a);
                $w2 = 0xDC00 | ($char & 0x3FF);
                $outstr .= chr($w1 >> 0x08);
                $outstr .= chr($w1 & 0xFF);
                $outstr .= chr($w2 >> 0x08);
                $outstr .= chr($w2 & 0xFF);
            }
        }
        return $outstr;
    }

    // ====================================================

    /**
     * Set header font.
     * @param $font (array) font
     * @public
     * @since 1.1
     */
    public function setHeaderFont($font) {
        $this->header_font = $font;
    }

    /**
     * Get header font.
     * @return array()
     * @public
     * @since 4.0.012 (2008-07-24)
     */
    public function getHeaderFont() {
        return $this->header_font;
    }

    /**
     * Set footer font.
     * @param $font (array) font
     * @public
     * @since 1.1
     */
    public function setFooterFont($font) {
        $this->footer_font = $font;
    }

    /**
     * Get Footer font.
     * @return array()
     * @public
     * @since 4.0.012 (2008-07-24)
     */
    public function getFooterFont() {
        return $this->footer_font;
    }

    /**
     * Set language array.
     * @param $language (array)
     * @public
     * @since 1.1
     */
    public function setLanguageArray($language) {
        $this->l = $language;
        if (isset($this->l['a_meta_dir'])) {
            $this->rtl = $this->l['a_meta_dir'] == 'rtl' ? true : false;
        } else {
            $this->rtl = false;
        }
    }

    /**
     * Returns the PDF data.
     * @public
     */
    public function getPDFData() {
        if ($this->state < 3) {
            $this->Close();
        }
        return $this->buffer;
    }

    /**
     * Output anchor link.
     * @param $url (string) link URL or internal link (i.e.: &lt;a href="#23,4.5"&gt;link to page 23 at 4.5 Y position&lt;/a&gt;)
     * @param $name (string) link name
     * @param $fill (boolean) Indicates if the cell background must be painted (true) or transparent (false).
     * @param $firstline (boolean) if true prints only the first line and return the remaining string.
     * @param $color (array) array of RGB text color
     * @param $style (string) font style (U, D, B, I)
     * @param $firstblock (boolean) if true the string is the starting of a line.
     * @return the number of cells used or the remaining text if $firstline = true;
     * @public
     */
    public function addHtmlLink($url, $name, $fill = false, $firstline = false, $color = '', $style = -1, $firstblock = false) {
        if (!$this->empty_string($url) AND ($url[0] == '#') AND is_numeric($url[1])) {
            // convert url to internal link
            $lnkdata = explode(',', $url);
            if (isset($lnkdata[0])) {
                $page = intval(substr($lnkdata[0], 1));
                if (empty($page) OR ($page <= 0)) {
                    $page = $this->page;
                }
                if (isset($lnkdata[1]) AND (strlen($lnkdata[1]) > 0)) {
                    $lnky = floatval($lnkdata[1]);
                } else {
                    $lnky = 0;
                }
                $url = $this->AddLink();
                $this->SetLink($url, $lnky, $page);
            }
        }
        // store current settings
        $prevcolor = $this->fgcolor;
        $prevstyle = $this->FontStyle;
        if (empty($color)) {
            $this->SetTextColorArray($this->htmlLinkColorArray);
        } else {
            $this->SetTextColorArray($color);
        }
        if ($style == -1) {
            $this->SetFont('', $this->FontStyle . $this->htmlLinkFontStyle);
        } else {
            $this->SetFont('', $this->FontStyle . $style);
        }
        $ret = $this->Write($this->lasth, $name, $url, $fill, '', false, 0, $firstline, $firstblock, 0);
        // restore settings
        $this->SetFont('', $prevstyle);
        $this->SetTextColorArray($prevcolor);
        return $ret;
    }

    /**
     * Returns an array (RGB or CMYK) from an html color name, or a six-digit (i.e. #3FE5AA), or three-digit (i.e. #7FF) hexadecimal color, or a javascript color array, or javascript color name.
     * @param $hcolor (string) HTML color.
     * @param $defcol (array) Color to return in case of error.
     * @return array RGB or CMYK color, or false in case of error.
     * @public
     */
    public function convertHTMLColorToDec($hcolor = '#FFFFFF', $defcol = array('R' => 128, 'G' => 128, 'B' => 128)) {
        $color = preg_replace('/[\s]*/', '', $hcolor); // remove extra spaces
        $color = strtolower($color);
        // check for javascript color array syntax
        if (strpos($color, '[') !== false) {
            if (preg_match('/[\[][\"\'](t|g|rgb|cmyk)[\"\'][\,]?([0-9\.]*)[\,]?([0-9\.]*)[\,]?([0-9\.]*)[\,]?([0-9\.]*)[\]]/', $color, $m) > 0) {
                $returncolor = array();
                switch ($m[1]) {
                    case 'cmyk': {
                            // RGB
                            $returncolor['C'] = max(0, min(100, (floatval($m[2]) * 100)));
                            $returncolor['M'] = max(0, min(100, (floatval($m[3]) * 100)));
                            $returncolor['Y'] = max(0, min(100, (floatval($m[4]) * 100)));
                            $returncolor['K'] = max(0, min(100, (floatval($m[5]) * 100)));
                            break;
                        }
                    case 'rgb': {
                            // RGB
                            $returncolor['R'] = max(0, min(255, (floatval($m[2]) * 255)));
                            $returncolor['G'] = max(0, min(255, (floatval($m[3]) * 255)));
                            $returncolor['B'] = max(0, min(255, (floatval($m[4]) * 255)));
                            break;
                        }
                    case 'g': {
                            // grayscale
                            $returncolor['G'] = max(0, min(255, (floatval($m[2]) * 255)));
                            break;
                        }
                    case 't':
                    default: {
                            // transparent (empty array)
                            break;
                        }
                }
                return $returncolor;
            }
        } elseif (($dotpos = strpos($color, '.')) !== false) {
            // remove class parent (i.e.: color.red)
            $color = substr($color, ($dotpos + 1));
            if ($color == 'transparent') {
                // transparent (empty array)
                return array();
            }
        }
        if (strlen($color) == 0) {
            return $defcol;
        }
        // RGB ARRAY
        if (substr($color, 0, 3) == 'rgb') {
            $codes = substr($color, 4);
            $codes = str_replace(')', '', $codes);
            $returncolor = explode(',', $codes);
            foreach ($returncolor as $key => $val) {
                if (strpos($val, '%') > 0) {
                    // percentage
                    $returncolor[$key] = (255 * intval($val) / 100);
                } else {
                    $returncolor[$key] = intval($val);
                }
                // normalize value
                $returncolor[$key] = max(0, min(255, $returncolor[$key]));
            }
            return $returncolor;
        }
        // CMYK ARRAY
        if (substr($color, 0, 4) == 'cmyk') {
            $codes = substr($color, 5);
            $codes = str_replace(')', '', $codes);
            $returncolor = explode(',', $codes);
            foreach ($returncolor as $key => $val) {
                if (strpos($val, '%') !== false) {
                    // percentage
                    $returncolor[$key] = (100 * intval($val) / 100);
                } else {
                    $returncolor[$key] = intval($val);
                }
                // normalize value
                $returncolor[$key] = max(0, min(100, $returncolor[$key]));
            }
            return $returncolor;
        }
        if ($color{0} != '#') {
            // COLOR NAME
            if (isset($this->webcolor[$color])) {
                // web color
                $color_code = $this->webcolor[$color];
            } else {
                // spot color
                $returncolor = $this->getSpotColor($color);
                if ($returncolor === false) {
                    $returncolor = $defcol;
                }
                return $returncolor;
            }
        } else {
            $color_code = substr($color, 1);
        }
        // HEXADECIMAL REPRESENTATION
        switch (strlen($color_code)) {
            case 3: {
                    // 3-digit RGB hexadecimal representation
                    $r = substr($color_code, 0, 1);
                    $g = substr($color_code, 1, 1);
                    $b = substr($color_code, 2, 1);
                    $returncolor = array();
                    $returncolor['R'] = max(0, min(255, hexdec($r . $r)));
                    $returncolor['G'] = max(0, min(255, hexdec($g . $g)));
                    $returncolor['B'] = max(0, min(255, hexdec($b . $b)));
                    break;
                }
            case 6: {
                    // 6-digit RGB hexadecimal representation
                    $returncolor = array();
                    $returncolor['R'] = max(0, min(255, hexdec(substr($color_code, 0, 2))));
                    $returncolor['G'] = max(0, min(255, hexdec(substr($color_code, 2, 2))));
                    $returncolor['B'] = max(0, min(255, hexdec(substr($color_code, 4, 2))));
                    break;
                }
            case 8: {
                    // 8-digit CMYK hexadecimal representation
                    $returncolor = array();
                    $returncolor['C'] = max(0, min(100, round(hexdec(substr($color_code, 0, 2)) / 2.55)));
                    $returncolor['M'] = max(0, min(100, round(hexdec(substr($color_code, 2, 2)) / 2.55)));
                    $returncolor['Y'] = max(0, min(100, round(hexdec(substr($color_code, 4, 2)) / 2.55)));
                    $returncolor['K'] = max(0, min(100, round(hexdec(substr($color_code, 6, 2)) / 2.55)));
                    break;
                }
            default: {
                    $returncolor = $defcol;
                    break;
                }
        }
        return $returncolor;
    }

    /**
     * Converts pixels to User's Units.
     * @param $px (int) pixels
     * @return float value in user's unit
     * @public
     * @see setImageScale(), getImageScale()
     */
    public function pixelsToUnits($px) {
        return ($px / ($this->imgscale * $this->k));
    }

    /**
     * Reverse function for htmlentities.
     * Convert entities in UTF-8.
     * @param $text_to_convert (string) Text to convert.
     * @return string converted text string
     * @public
     */
    public function unhtmlentities($text_to_convert) {
        return @html_entity_decode($text_to_convert, ENT_QUOTES, $this->encoding);
    }

    // ENCRYPTION METHODS ----------------------------------

    /**
     * Returns a string containing random data to be used as a seed for encryption methods.
     * @param $seed (string) starting seed value
     * @return string containing random data
     * @author Nicola Asuni
     * @since 5.9.006 (2010-10-19)
     * @protected
     */
    protected function getRandomSeed($seed = '') {
        $seed .= microtime();
        if (function_exists('openssl_random_pseudo_bytes') AND (strtoupper(substr(PHP_OS, 0, 3)) !== 'WIN')) {
            // this is not used on windows systems because it is very slow for a know bug
            $seed .= openssl_random_pseudo_bytes(512);
        } else {
            for ($i = 0; $i < 23; ++$i) {
                $seed .= uniqid('', true);
            }
        }
        $seed .= uniqid('', true);
        $seed .= rand();
        $seed .= getmypid();
        $seed .= __FILE__;
        $seed .= $this->bufferlen;
        if (isset($_SERVER['REMOTE_ADDR'])) {
            $seed .= $_SERVER['REMOTE_ADDR'];
        }
        if (isset($_SERVER['HTTP_USER_AGENT'])) {
            $seed .= $_SERVER['HTTP_USER_AGENT'];
        }
        if (isset($_SERVER['HTTP_ACCEPT'])) {
            $seed .= $_SERVER['HTTP_ACCEPT'];
        }
        if (isset($_SERVER['HTTP_ACCEPT_ENCODING'])) {
            $seed .= $_SERVER['HTTP_ACCEPT_ENCODING'];
        }
        if (isset($_SERVER['HTTP_ACCEPT_LANGUAGE'])) {
            $seed .= $_SERVER['HTTP_ACCEPT_LANGUAGE'];
        }
        if (isset($_SERVER['HTTP_ACCEPT_CHARSET'])) {
            $seed .= $_SERVER['HTTP_ACCEPT_CHARSET'];
        }
        $seed .= rand();
        $seed .= uniqid('', true);
        $seed .= microtime();
        return $seed;
    }

    /**
     * Compute encryption key depending on object number where the encrypted data is stored.
     * This is used for all strings and streams without crypt filter specifier.
     * @param $n (int) object number
     * @return int object key
     * @protected
     * @author Nicola Asuni
     * @since 2.0.000 (2008-01-02)
     */
    protected function _objectkey($n) {
        $objkey = $this->encryptdata['key'] . pack('VXxx', $n);
        if ($this->encryptdata['mode'] == 2) { // AES-128
            // AES padding
            $objkey .= "\x73\x41\x6C\x54"; // sAlT
        }
        $objkey = substr($this->_md5_16($objkey), 0, (($this->encryptdata['Length'] / 8) + 5));
        $objkey = substr($objkey, 0, 16);
        return $objkey;
    }

    /**
     * Encrypt the input string.
     * @param $n (int) object number
     * @param $s (string) data string to encrypt
     * @return encrypted string
     * @protected
     * @author Nicola Asuni
     * @since 5.0.005 (2010-05-11)
     */
    protected function _encrypt_data($n, $s) {
        if (!$this->encrypted) {
            return $s;
        }
        switch ($this->encryptdata['mode']) {
            case 0:   // RC4-40
            case 1: { // RC4-128
                    $s = $this->_RC4($this->_objectkey($n), $s);
                    break;
                }
            case 2: { // AES-128
                    $s = $this->_AES($this->_objectkey($n), $s);
                    break;
                }
            case 3: { // AES-256
                    $s = $this->_AES($this->encryptdata['key'], $s);
                    break;
                }
        }
        return $s;
    }

    /**
     * Put encryption on PDF document.
     * @protected
     * @author Nicola Asuni
     * @since 2.0.000 (2008-01-02)
     */
    protected function _putencryption() {
        if (!$this->encrypted) {
            return;
        }
        $this->encryptdata['objid'] = $this->_newobj();
        $out = '<<';
        if (!isset($this->encryptdata['Filter']) OR empty($this->encryptdata['Filter'])) {
            $this->encryptdata['Filter'] = 'Standard';
        }
        $out .= ' /Filter /' . $this->encryptdata['Filter'];
        if (isset($this->encryptdata['SubFilter']) AND !empty($this->encryptdata['SubFilter'])) {
            $out .= ' /SubFilter /' . $this->encryptdata['SubFilter'];
        }
        if (!isset($this->encryptdata['V']) OR empty($this->encryptdata['V'])) {
            $this->encryptdata['V'] = 1;
        }
        // V is a code specifying the algorithm to be used in encrypting and decrypting the document
        $out .= ' /V ' . $this->encryptdata['V'];
        if (isset($this->encryptdata['Length']) AND !empty($this->encryptdata['Length'])) {
            // The length of the encryption key, in bits. The value shall be a multiple of 8, in the range 40 to 256
            $out .= ' /Length ' . $this->encryptdata['Length'];
        } else {
            $out .= ' /Length 40';
        }
        if ($this->encryptdata['V'] >= 4) {
            if (!isset($this->encryptdata['StmF']) OR empty($this->encryptdata['StmF'])) {
                $this->encryptdata['StmF'] = 'Identity';
            }
            if (!isset($this->encryptdata['StrF']) OR empty($this->encryptdata['StrF'])) {
                // The name of the crypt filter that shall be used when decrypting all strings in the document.
                $this->encryptdata['StrF'] = 'Identity';
            }
            // A dictionary whose keys shall be crypt filter names and whose values shall be the corresponding crypt filter dictionaries.
            if (isset($this->encryptdata['CF']) AND !empty($this->encryptdata['CF'])) {
                $out .= ' /CF <<';
                $out .= ' /' . $this->encryptdata['StmF'] . ' <<';
                $out .= ' /Type /CryptFilter';
                if (isset($this->encryptdata['CF']['CFM']) AND !empty($this->encryptdata['CF']['CFM'])) {
                    // The method used
                    $out .= ' /CFM /' . $this->encryptdata['CF']['CFM'];
                    if ($this->encryptdata['pubkey']) {
                        $out .= ' /Recipients [';
                        foreach ($this->encryptdata['Recipients'] as $rec) {
                            $out .= ' <' . $rec . '>';
                        }
                        $out .= ' ]';
                        if (isset($this->encryptdata['CF']['EncryptMetadata']) AND (!$this->encryptdata['CF']['EncryptMetadata'])) {
                            $out .= ' /EncryptMetadata false';
                        } else {
                            $out .= ' /EncryptMetadata true';
                        }
                    }
                } else {
                    $out .= ' /CFM /None';
                }
                if (isset($this->encryptdata['CF']['AuthEvent']) AND !empty($this->encryptdata['CF']['AuthEvent'])) {
                    // The event to be used to trigger the authorization that is required to access encryption keys used by this filter.
                    $out .= ' /AuthEvent /' . $this->encryptdata['CF']['AuthEvent'];
                } else {
                    $out .= ' /AuthEvent /DocOpen';
                }
                if (isset($this->encryptdata['CF']['Length']) AND !empty($this->encryptdata['CF']['Length'])) {
                    // The bit length of the encryption key.
                    $out .= ' /Length ' . $this->encryptdata['CF']['Length'];
                }
                $out .= ' >> >>';
            }
            // The name of the crypt filter that shall be used by default when decrypting streams.
            $out .= ' /StmF /' . $this->encryptdata['StmF'];
            // The name of the crypt filter that shall be used when decrypting all strings in the document.
            $out .= ' /StrF /' . $this->encryptdata['StrF'];
            if (isset($this->encryptdata['EFF']) AND !empty($this->encryptdata['EFF'])) {
                // The name of the crypt filter that shall be used when encrypting embedded file streams that do not have their own crypt filter specifier.
                $out .= ' /EFF /' . $this->encryptdata[''];
            }
        }
        // Additional encryption dictionary entries for the standard security handler
        if ($this->encryptdata['pubkey']) {
            if (($this->encryptdata['V'] < 4) AND isset($this->encryptdata['Recipients']) AND !empty($this->encryptdata['Recipients'])) {
                $out .= ' /Recipients [';
                foreach ($this->encryptdata['Recipients'] as $rec) {
                    $out .= ' <' . $rec . '>';
                }
                $out .= ' ]';
            }
        } else {
            $out .= ' /R';
            if ($this->encryptdata['V'] == 5) { // AES-256
                $out .= ' 5';
                $out .= ' /OE (' . $this->_escape($this->encryptdata['OE']) . ')';
                $out .= ' /UE (' . $this->_escape($this->encryptdata['UE']) . ')';
                $out .= ' /Perms (' . $this->_escape($this->encryptdata['perms']) . ')';
            } elseif ($this->encryptdata['V'] == 4) { // AES-128
                $out .= ' 4';
            } elseif ($this->encryptdata['V'] < 2) { // RC-40
                $out .= ' 2';
            } else { // RC-128
                $out .= ' 3';
            }
            $out .= ' /O (' . $this->_escape($this->encryptdata['O']) . ')';
            $out .= ' /U (' . $this->_escape($this->encryptdata['U']) . ')';
            $out .= ' /P ' . $this->encryptdata['P'];
            if (isset($this->encryptdata['EncryptMetadata']) AND (!$this->encryptdata['EncryptMetadata'])) {
                $out .= ' /EncryptMetadata false';
            } else {
                $out .= ' /EncryptMetadata true';
            }
        }
        $out .= ' >>';
        $out .= "\n" . 'endobj';
        $this->_out($out);
    }

    /**
     * Returns the input text encrypted using RC4 algorithm and the specified key.
     * RC4 is the standard encryption algorithm used in PDF format
     * @param $key (string) encryption key
     * @param $text (String) input text to be encrypted
     * @return String encrypted text
     * @protected
     * @since 2.0.000 (2008-01-02)
     * @author Klemen Vodopivec, Nicola Asuni
     */
    protected function _RC4($key, $text) {
        if (function_exists('mcrypt_decrypt') AND ($out = @mcrypt_decrypt(MCRYPT_ARCFOUR, $key, $text, MCRYPT_MODE_STREAM, ''))) {
            // try to use mcrypt function if exist
            return $out;
        }
        if ($this->last_enc_key != $key) {
            $k = str_repeat($key, ((256 / strlen($key)) + 1));
            $rc4 = range(0, 255);
            $j = 0;
            for ($i = 0; $i < 256; ++$i) {
                $t = $rc4[$i];
                $j = ($j + $t + ord($k[$i])) % 256;
                $rc4[$i] = $rc4[$j];
                $rc4[$j] = $t;
            }
            $this->last_enc_key = $key;
            $this->last_enc_key_c = $rc4;
        } else {
            $rc4 = $this->last_enc_key_c;
        }
        $len = strlen($text);
        $a = 0;
        $b = 0;
        $out = '';
        for ($i = 0; $i < $len; ++$i) {
            $a = ($a + 1) % 256;
            $t = $rc4[$a];
            $b = ($b + $t) % 256;
            $rc4[$a] = $rc4[$b];
            $rc4[$b] = $t;
            $k = $rc4[($rc4[$a] + $rc4[$b]) % 256];
            $out .= chr(ord($text[$i]) ^ $k);
        }
        return $out;
    }

    /**
     * Returns the input text exrypted using AES algorithm and the specified key.
     * This method requires mcrypt.
     * @param $key (string) encryption key
     * @param $text (String) input text to be encrypted
     * @return String encrypted text
     * @protected
     * @author Nicola Asuni
     * @since 5.0.005 (2010-05-11)
     */
    protected function _AES($key, $text) {
        // padding (RFC 2898, PKCS #5: Password-Based Cryptography Specification Version 2.0)
        $padding = 16 - (strlen($text) % 16);
        $text .= str_repeat(chr($padding), $padding);
        $iv = mcrypt_create_iv(mcrypt_get_iv_size(MCRYPT_RIJNDAEL_128, MCRYPT_MODE_CBC), MCRYPT_RAND);
        $text = mcrypt_encrypt(MCRYPT_RIJNDAEL_128, $key, $text, MCRYPT_MODE_CBC, $iv);
        $text = $iv . $text;
        return $text;
    }

    /**
     * Encrypts a string using MD5 and returns it's value as a binary string.
     * @param $str (string) input string
     * @return String MD5 encrypted binary string
     * @protected
     * @since 2.0.000 (2008-01-02)
     * @author Klemen Vodopivec
     */
    protected function _md5_16($str) {
        return pack('H*', md5($str));
    }

    /**
     * Compute U value (used for encryption)
     * @return string U value
     * @protected
     * @since 2.0.000 (2008-01-02)
     * @author Nicola Asuni
     */
    protected function _Uvalue() {
        if ($this->encryptdata['mode'] == 0) { // RC4-40
            return $this->_RC4($this->encryptdata['key'], $this->enc_padding);
        } elseif ($this->encryptdata['mode'] < 3) { // RC4-128, AES-128
            $tmp = $this->_md5_16($this->enc_padding . $this->encryptdata['fileid']);
            $enc = $this->_RC4($this->encryptdata['key'], $tmp);
            $len = strlen($tmp);
            for ($i = 1; $i <= 19; ++$i) {
                $ek = '';
                for ($j = 0; $j < $len; ++$j) {
                    $ek .= chr(ord($this->encryptdata['key'][$j]) ^ $i);
                }
                $enc = $this->_RC4($ek, $enc);
            }
            $enc .= str_repeat("\x00", 16);
            return substr($enc, 0, 32);
        } elseif ($this->encryptdata['mode'] == 3) { // AES-256
            $seed = $this->_md5_16($this->getRandomSeed());
            // User Validation Salt
            $this->encryptdata['UVS'] = substr($seed, 0, 8);
            // User Key Salt
            $this->encryptdata['UKS'] = substr($seed, 8, 16);
            return hash('sha256', $this->encryptdata['user_password'] . $this->encryptdata['UVS'], true) . $this->encryptdata['UVS'] . $this->encryptdata['UKS'];
        }
    }

    /**
     * Compute UE value (used for encryption)
     * @return string UE value
     * @protected
     * @since 5.9.006 (2010-10-19)
     * @author Nicola Asuni
     */
    protected function _UEvalue() {
        $hashkey = hash('sha256', $this->encryptdata['user_password'] . $this->encryptdata['UKS'], true);
        $iv = str_repeat("\x00", mcrypt_get_iv_size(MCRYPT_RIJNDAEL_128, MCRYPT_MODE_CBC));
        return mcrypt_encrypt(MCRYPT_RIJNDAEL_128, $hashkey, $this->encryptdata['key'], MCRYPT_MODE_CBC, $iv);
    }

    /**
     * Compute O value (used for encryption)
     * @return string O value
     * @protected
     * @since 2.0.000 (2008-01-02)
     * @author Nicola Asuni
     */
    protected function _Ovalue() {
        if ($this->encryptdata['mode'] < 3) { // RC4-40, RC4-128, AES-128
            $tmp = $this->_md5_16($this->encryptdata['owner_password']);
            if ($this->encryptdata['mode'] > 0) {
                for ($i = 0; $i < 50; ++$i) {
                    $tmp = $this->_md5_16($tmp);
                }
            }
            $owner_key = substr($tmp, 0, ($this->encryptdata['Length'] / 8));
            $enc = $this->_RC4($owner_key, $this->encryptdata['user_password']);
            if ($this->encryptdata['mode'] > 0) {
                $len = strlen($owner_key);
                for ($i = 1; $i <= 19; ++$i) {
                    $ek = '';
                    for ($j = 0; $j < $len; ++$j) {
                        $ek .= chr(ord($owner_key[$j]) ^ $i);
                    }
                    $enc = $this->_RC4($ek, $enc);
                }
            }
            return $enc;
        } elseif ($this->encryptdata['mode'] == 3) { // AES-256
            $seed = $this->_md5_16($this->getRandomSeed());
            // Owner Validation Salt
            $this->encryptdata['OVS'] = substr($seed, 0, 8);
            // Owner Key Salt
            $this->encryptdata['OKS'] = substr($seed, 8, 16);
            return hash('sha256', $this->encryptdata['owner_password'] . $this->encryptdata['OVS'] . $this->encryptdata['U'], true) . $this->encryptdata['OVS'] . $this->encryptdata['OKS'];
        }
    }

    /**
     * Compute OE value (used for encryption)
     * @return string OE value
     * @protected
     * @since 5.9.006 (2010-10-19)
     * @author Nicola Asuni
     */
    protected function _OEvalue() {
        $hashkey = hash('sha256', $this->encryptdata['owner_password'] . $this->encryptdata['OKS'] . $this->encryptdata['U'], true);
        $iv = str_repeat("\x00", mcrypt_get_iv_size(MCRYPT_RIJNDAEL_128, MCRYPT_MODE_CBC));
        return mcrypt_encrypt(MCRYPT_RIJNDAEL_128, $hashkey, $this->encryptdata['key'], MCRYPT_MODE_CBC, $iv);
    }

    /**
     * Convert password for AES-256 encryption mode
     * @param $password (string) password
     * @return string password
     * @protected
     * @since 5.9.006 (2010-10-19)
     * @author Nicola Asuni
     */
    protected function _fixAES256Password($password) {
        $psw = ''; // password to be returned
        $psw_array = $this->utf8Bidi($this->UTF8StringToArray($password), $password, $this->rtl);
        foreach ($psw_array as $c) {
            $psw .= $this->unichr($c);
        }
        return substr($psw, 0, 127);
    }

    /**
     * Compute encryption key
     * @protected
     * @since 2.0.000 (2008-01-02)
     * @author Nicola Asuni
     */
    protected function _generateencryptionkey() {
        $keybytelen = ($this->encryptdata['Length'] / 8);
        if (!$this->encryptdata['pubkey']) { // standard mode
            if ($this->encryptdata['mode'] == 3) { // AES-256
                // generate 256 bit random key
                $this->encryptdata['key'] = substr(hash('sha256', $this->getRandomSeed(), true), 0, $keybytelen);
                // truncate passwords
                $this->encryptdata['user_password'] = $this->_fixAES256Password($this->encryptdata['user_password']);
                $this->encryptdata['owner_password'] = $this->_fixAES256Password($this->encryptdata['owner_password']);
                // Compute U value
                $this->encryptdata['U'] = $this->_Uvalue();
                // Compute UE value
                $this->encryptdata['UE'] = $this->_UEvalue();
                // Compute O value
                $this->encryptdata['O'] = $this->_Ovalue();
                // Compute OE value
                $this->encryptdata['OE'] = $this->_OEvalue();
                // Compute P value
                $this->encryptdata['P'] = $this->encryptdata['protection'];
                // Computing the encryption dictionary's Perms (permissions) value
                $perms = $this->getEncPermissionsString($this->encryptdata['protection']); // bytes 0-3
                $perms .= chr(255) . chr(255) . chr(255) . chr(255); // bytes 4-7
                if (isset($this->encryptdata['CF']['EncryptMetadata']) AND (!$this->encryptdata['CF']['EncryptMetadata'])) { // byte 8
                    $perms .= 'F';
                } else {
                    $perms .= 'T';
                }
                $perms .= 'adb'; // bytes 9-11
                $perms .= 'nick'; // bytes 12-15
                $iv = str_repeat("\x00", mcrypt_get_iv_size(MCRYPT_RIJNDAEL_128, MCRYPT_MODE_ECB));
                $this->encryptdata['perms'] = mcrypt_encrypt(MCRYPT_RIJNDAEL_128, $this->encryptdata['key'], $perms, MCRYPT_MODE_ECB, $iv);
            } else { // RC4-40, RC4-128, AES-128
                // Pad passwords
                $this->encryptdata['user_password'] = substr($this->encryptdata['user_password'] . $this->enc_padding, 0, 32);
                $this->encryptdata['owner_password'] = substr($this->encryptdata['owner_password'] . $this->enc_padding, 0, 32);
                // Compute O value
                $this->encryptdata['O'] = $this->_Ovalue();
                // get default permissions (reverse byte order)
                $permissions = $this->getEncPermissionsString($this->encryptdata['protection']);
                // Compute encryption key
                $tmp = $this->_md5_16($this->encryptdata['user_password'] . $this->encryptdata['O'] . $permissions . $this->encryptdata['fileid']);
                if ($this->encryptdata['mode'] > 0) {
                    for ($i = 0; $i < 50; ++$i) {
                        $tmp = $this->_md5_16(substr($tmp, 0, $keybytelen));
                    }
                }
                $this->encryptdata['key'] = substr($tmp, 0, $keybytelen);
                // Compute U value
                $this->encryptdata['U'] = $this->_Uvalue();
                // Compute P value
                $this->encryptdata['P'] = $this->encryptdata['protection'];
            }
        } else { // Public-Key mode
            // random 20-byte seed
            $seed = sha1($this->getRandomSeed(), true);
            $recipient_bytes = '';
            foreach ($this->encryptdata['pubkeys'] as $pubkey) {
                // for each public certificate
                if (isset($pubkey['p'])) {
                    $pkprotection = $this->getUserPermissionCode($pubkey['p'], $this->encryptdata['mode']);
                } else {
                    $pkprotection = $this->encryptdata['protection'];
                }
                // get default permissions (reverse byte order)
                $pkpermissions = $this->getEncPermissionsString($pkprotection);
                // envelope data
                $envelope = $seed . $pkpermissions;
                // write the envelope data to a temporary file
                $tempkeyfile = tempnam(K_PATH_CACHE, 'tmpkey_');
                $f = fopen($tempkeyfile, 'wb');
                if (!$f) {
                    $this->Error('Unable to create temporary key file: ' . $tempkeyfile);
                }
                $envelope_length = strlen($envelope);
                fwrite($f, $envelope, $envelope_length);
                fclose($f);
                $tempencfile = tempnam(K_PATH_CACHE, 'tmpenc_');
                if (!openssl_pkcs7_encrypt($tempkeyfile, $tempencfile, $pubkey['c'], array(), PKCS7_BINARY | PKCS7_DETACHED)) {
                    $this->Error('Unable to encrypt the file: ' . $tempkeyfile);
                }
                unlink($tempkeyfile);
                // read encryption signature
                $signature = file_get_contents($tempencfile, false, null, $envelope_length);
                unlink($tempencfile);
                // extract signature
                $signature = substr($signature, strpos($signature, 'Content-Disposition'));
                $tmparr = explode("\n\n", $signature);
                $signature = trim($tmparr[1]);
                unset($tmparr);
                // decode signature
                $signature = base64_decode($signature);
                // convert signature to hex
                $hexsignature = current(unpack('H*', $signature));
                // store signature on recipients array
                $this->encryptdata['Recipients'][] = $hexsignature;
                // The bytes of each item in the Recipients array of PKCS#7 objects in the order in which they appear in the array
                $recipient_bytes .= $signature;
            }
            // calculate encryption key
            if ($this->encryptdata['mode'] == 3) { // AES-256
                $this->encryptdata['key'] = substr(hash('sha256', $seed . $recipient_bytes, true), 0, $keybytelen);
            } else { // RC4-40, RC4-128, AES-128
                $this->encryptdata['key'] = substr(sha1($seed . $recipient_bytes, true), 0, $keybytelen);
            }
        }
    }

    /**
     * Return the premission code used on encryption (P value).
     * @param $permissions (Array) the set of permissions (specify the ones you want to block).
     * @param $mode (int) encryption strength: 0 = RC4 40 bit; 1 = RC4 128 bit; 2 = AES 128 bit; 3 = AES 256 bit.
     * @protected
     * @since 5.0.005 (2010-05-12)
     * @author Nicola Asuni
     */
    protected function getUserPermissionCode($permissions, $mode = 0) {
        $options = array(
            'owner' => 2, // bit 2 -- inverted logic: cleared by default
            'print' => 4, // bit 3
            'modify' => 8, // bit 4
            'copy' => 16, // bit 5
            'annot-forms' => 32, // bit 6
            'fill-forms' => 256, // bit 9
            'extract' => 512, // bit 10
            'assemble' => 1024, // bit 11
            'print-high' => 2048 // bit 12
        );
        $protection = 2147422012; // 32 bit: (01111111 11111111 00001111 00111100)
        foreach ($permissions as $permission) {
            if (!isset($options[$permission])) {
                $this->Error('Incorrect permission: ' . $permission);
            }
            if (($mode > 0) OR ($options[$permission] <= 32)) {
                // set only valid permissions
                if ($options[$permission] == 2) {
                    // the logic for bit 2 is inverted (cleared by default)
                    $protection += $options[$permission];
                } else {
                    $protection -= $options[$permission];
                }
            }
        }
        return $protection;
    }

    /**
     * Set document protection
     * Remark: the protection against modification is for people who have the full Acrobat product.
     * If you don't set any password, the document will open as usual. If you set a user password, the PDF viewer will ask for it before displaying the document. The master password, if different from the user one, can be used to get full access.
     * Note: protecting a document requires to encrypt it, which increases the processing time a lot. This can cause a PHP time-out in some cases, especially if the document contains images or fonts.
     * @param $permissions (Array) the set of permissions (specify the ones you want to block):<ul><li>print : Print the document;</li><li>modify : Modify the contents of the document by operations other than those controlled by 'fill-forms', 'extract' and 'assemble';</li><li>copy : Copy or otherwise extract text and graphics from the document;</li><li>annot-forms : Add or modify text annotations, fill in interactive form fields, and, if 'modify' is also set, create or modify interactive form fields (including signature fields);</li><li>fill-forms : Fill in existing interactive form fields (including signature fields), even if 'annot-forms' is not specified;</li><li>extract : Extract text and graphics (in support of accessibility to users with disabilities or for other purposes);</li><li>assemble : Assemble the document (insert, rotate, or delete pages and create bookmarks or thumbnail images), even if 'modify' is not set;</li><li>print-high : Print the document to a representation from which a faithful digital copy of the PDF content could be generated. When this is not set, printing is limited to a low-level representation of the appearance, possibly of degraded quality.</li><li>owner : (inverted logic - only for public-key) when set permits change of encryption and enables all other permissions.</li></ul>
     * @param $user_pass (String) user password. Empty by default.
     * @param $owner_pass (String) owner password. If not specified, a random value is used.
     * @param $mode (int) encryption strength: 0 = RC4 40 bit; 1 = RC4 128 bit; 2 = AES 128 bit; 3 = AES 256 bit.
     * @param $pubkeys (String) array of recipients containing public-key certificates ('c') and permissions ('p'). For example: array(array('c' => 'file://../tcpdf.crt', 'p' => array('print')))
     * @public
     * @since 2.0.000 (2008-01-02)
     * @author Nicola Asuni
     */
    public function SetProtection($permissions = array('print', 'modify', 'copy', 'annot-forms', 'fill-forms', 'extract', 'assemble', 'print-high'), $user_pass = '', $owner_pass = null, $mode = 0, $pubkeys = null) {
        if ($this->pdfa_mode) {
            // encryption is not allowed in PDF/A mode
            return;
        }
        $this->encryptdata['protection'] = $this->getUserPermissionCode($permissions, $mode);
        if (($pubkeys !== null) AND (is_array($pubkeys))) {
            // public-key mode
            $this->encryptdata['pubkeys'] = $pubkeys;
            if ($mode == 0) {
                // public-Key Security requires at least 128 bit
                $mode = 1;
            }
            if (!function_exists('openssl_pkcs7_encrypt')) {
                $this->Error('Public-Key Security requires openssl library.');
            }
            // Set Public-Key filter (availabe are: Entrust.PPKEF, Adobe.PPKLite, Adobe.PubSec)
            $this->encryptdata['pubkey'] = true;
            $this->encryptdata['Filter'] = 'Adobe.PubSec';
            $this->encryptdata['StmF'] = 'DefaultCryptFilter';
            $this->encryptdata['StrF'] = 'DefaultCryptFilter';
        } else {
            // standard mode (password mode)
            $this->encryptdata['pubkey'] = false;
            $this->encryptdata['Filter'] = 'Standard';
            $this->encryptdata['StmF'] = 'StdCF';
            $this->encryptdata['StrF'] = 'StdCF';
        }
        if ($mode > 1) { // AES
            if (!extension_loaded('mcrypt')) {
                $this->Error('AES encryption requires mcrypt library (http://www.php.net/manual/en/mcrypt.requirements.php).');
            }
            if (mcrypt_get_cipher_name(MCRYPT_RIJNDAEL_128) === false) {
                $this->Error('AES encryption requires MCRYPT_RIJNDAEL_128 cypher.');
            }
            if (($mode == 3) AND !function_exists('hash')) {
                // the Hash extension requires no external libraries and is enabled by default as of PHP 5.1.2.
                $this->Error('AES 256 encryption requires HASH Message Digest Framework (http://www.php.net/manual/en/book.hash.php).');
            }
        }
        if ($owner_pass === null) {
            $owner_pass = md5($this->getRandomSeed());
        }
        $this->encryptdata['user_password'] = $user_pass;
        $this->encryptdata['owner_password'] = $owner_pass;
        $this->encryptdata['mode'] = $mode;
        switch ($mode) {
            case 0: { // RC4 40 bit
                    $this->encryptdata['V'] = 1;
                    $this->encryptdata['Length'] = 40;
                    $this->encryptdata['CF']['CFM'] = 'V2';
                    break;
                }
            case 1: { // RC4 128 bit
                    $this->encryptdata['V'] = 2;
                    $this->encryptdata['Length'] = 128;
                    $this->encryptdata['CF']['CFM'] = 'V2';
                    if ($this->encryptdata['pubkey']) {
                        $this->encryptdata['SubFilter'] = 'adbe.pkcs7.s4';
                        $this->encryptdata['Recipients'] = array();
                    }
                    break;
                }
            case 2: { // AES 128 bit
                    $this->encryptdata['V'] = 4;
                    $this->encryptdata['Length'] = 128;
                    $this->encryptdata['CF']['CFM'] = 'AESV2';
                    $this->encryptdata['CF']['Length'] = 128;
                    if ($this->encryptdata['pubkey']) {
                        $this->encryptdata['SubFilter'] = 'adbe.pkcs7.s5';
                        $this->encryptdata['Recipients'] = array();
                    }
                    break;
                }
            case 3: { // AES 256 bit
                    $this->encryptdata['V'] = 5;
                    $this->encryptdata['Length'] = 256;
                    $this->encryptdata['CF']['CFM'] = 'AESV3';
                    $this->encryptdata['CF']['Length'] = 256;
                    if ($this->encryptdata['pubkey']) {
                        $this->encryptdata['SubFilter'] = 'adbe.pkcs7.s5';
                        $this->encryptdata['Recipients'] = array();
                    }
                    break;
                }
        }
        $this->encrypted = true;
        $this->encryptdata['fileid'] = $this->convertHexStringToString($this->file_id);
        $this->_generateencryptionkey();
    }

    /**
     * Convert hexadecimal string to string
     * @param $bs (string) byte-string to convert
     * @return String
     * @protected
     * @since 5.0.005 (2010-05-12)
     * @author Nicola Asuni
     */
    protected function convertHexStringToString($bs) {
        $string = ''; // string to be returned
        $bslength = strlen($bs);
        if (($bslength % 2) != 0) {
            // padding
            $bs .= '0';
            ++$bslength;
        }
        for ($i = 0; $i < $bslength; $i += 2) {
            $string .= chr(hexdec($bs[$i] . $bs[($i + 1)]));
        }
        return $string;
    }

    /**
     * Convert string to hexadecimal string (byte string)
     * @param $s (string) string to convert
     * @return byte string
     * @protected
     * @since 5.0.010 (2010-05-17)
     * @author Nicola Asuni
     */
    protected function convertStringToHexString($s) {
        $bs = '';
        $chars = preg_split('//', $s, -1, PREG_SPLIT_NO_EMPTY);
        foreach ($chars as $c) {
            $bs .= sprintf('%02s', dechex(ord($c)));
        }
        return $bs;
    }

    /**
     * Convert encryption P value to a string of bytes, low-order byte first.
     * @param $protection (string) 32bit encryption permission value (P value)
     * @return String
     * @protected
     * @since 5.0.005 (2010-05-12)
     * @author Nicola Asuni
     */
    protected function getEncPermissionsString($protection) {
        $binprot = sprintf('%032b', $protection);
        $str = chr(bindec(substr($binprot, 24, 8)));
        $str .= chr(bindec(substr($binprot, 16, 8)));
        $str .= chr(bindec(substr($binprot, 8, 8)));
        $str .= chr(bindec(substr($binprot, 0, 8)));
        return $str;
    }

    // END OF ENCRYPTION FUNCTIONS -------------------------
    // START TRANSFORMATIONS SECTION -----------------------

    /**
     * Starts a 2D tranformation saving current graphic state.
     * This function must be called before scaling, mirroring, translation, rotation and skewing.
     * Use StartTransform() before, and StopTransform() after the transformations to restore the normal behavior.
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    public function StartTransform() {
        if ($this->state != 2) {
            return;
        }
        $this->_out('q');
        if ($this->inxobj) {
            // we are inside an XObject template
            $this->xobjects[$this->xobjid]['transfmrk'][] = strlen($this->xobjects[$this->xobjid]['outdata']);
        } else {
            $this->transfmrk[$this->page][] = $this->pagelen[$this->page];
        }
        ++$this->transfmatrix_key;
        $this->transfmatrix[$this->transfmatrix_key] = array();
    }

    /**
     * Stops a 2D tranformation restoring previous graphic state.
     * This function must be called after scaling, mirroring, translation, rotation and skewing.
     * Use StartTransform() before, and StopTransform() after the transformations to restore the normal behavior.
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    public function StopTransform() {
        if ($this->state != 2) {
            return;
        }
        $this->_out('Q');
        if (isset($this->transfmatrix[$this->transfmatrix_key])) {
            array_pop($this->transfmatrix[$this->transfmatrix_key]);
            --$this->transfmatrix_key;
        }
        if ($this->inxobj) {
            // we are inside an XObject template
            array_pop($this->xobjects[$this->xobjid]['transfmrk']);
        } else {
            array_pop($this->transfmrk[$this->page]);
        }
    }

    /**
     * Horizontal Scaling.
     * @param $s_x (float) scaling factor for width as percent. 0 is not allowed.
     * @param $x (int) abscissa of the scaling center. Default is current x position
     * @param $y (int) ordinate of the scaling center. Default is current y position
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    public function ScaleX($s_x, $x = '', $y = '') {
        $this->Scale($s_x, 100, $x, $y);
    }

    /**
     * Vertical Scaling.
     * @param $s_y (float) scaling factor for height as percent. 0 is not allowed.
     * @param $x (int) abscissa of the scaling center. Default is current x position
     * @param $y (int) ordinate of the scaling center. Default is current y position
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    public function ScaleY($s_y, $x = '', $y = '') {
        $this->Scale(100, $s_y, $x, $y);
    }

    /**
     * Vertical and horizontal proportional Scaling.
     * @param $s (float) scaling factor for width and height as percent. 0 is not allowed.
     * @param $x (int) abscissa of the scaling center. Default is current x position
     * @param $y (int) ordinate of the scaling center. Default is current y position
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    public function ScaleXY($s, $x = '', $y = '') {
        $this->Scale($s, $s, $x, $y);
    }

    /**
     * Vertical and horizontal non-proportional Scaling.
     * @param $s_x (float) scaling factor for width as percent. 0 is not allowed.
     * @param $s_y (float) scaling factor for height as percent. 0 is not allowed.
     * @param $x (int) abscissa of the scaling center. Default is current x position
     * @param $y (int) ordinate of the scaling center. Default is current y position
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    public function Scale($s_x, $s_y, $x = '', $y = '') {
        if ($x === '') {
            $x = $this->x;
        }
        if ($y === '') {
            $y = $this->y;
        }
        if (($s_x == 0) OR ($s_y == 0)) {
            $this->Error('Please do not use values equal to zero for scaling');
        }
        $y = ($this->h - $y) * $this->k;
        $x *= $this->k;
        //calculate elements of transformation matrix
        $s_x /= 100;
        $s_y /= 100;
        $tm = array();
        $tm[0] = $s_x;
        $tm[1] = 0;
        $tm[2] = 0;
        $tm[3] = $s_y;
        $tm[4] = $x * (1 - $s_x);
        $tm[5] = $y * (1 - $s_y);
        //scale the coordinate system
        $this->Transform($tm);
    }

    /**
     * Horizontal Mirroring.
     * @param $x (int) abscissa of the point. Default is current x position
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    public function MirrorH($x = '') {
        $this->Scale(-100, 100, $x);
    }

    /**
     * Verical Mirroring.
     * @param $y (int) ordinate of the point. Default is current y position
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    public function MirrorV($y = '') {
        $this->Scale(100, -100, '', $y);
    }

    /**
     * Point reflection mirroring.
     * @param $x (int) abscissa of the point. Default is current x position
     * @param $y (int) ordinate of the point. Default is current y position
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    public function MirrorP($x = '', $y = '') {
        $this->Scale(-100, -100, $x, $y);
    }

    /**
     * Reflection against a straight line through point (x, y) with the gradient angle (angle).
     * @param $angle (float) gradient angle of the straight line. Default is 0 (horizontal line).
     * @param $x (int) abscissa of the point. Default is current x position
     * @param $y (int) ordinate of the point. Default is current y position
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    public function MirrorL($angle = 0, $x = '', $y = '') {
        $this->Scale(-100, 100, $x, $y);
        $this->Rotate(-2 * ($angle - 90), $x, $y);
    }

    /**
     * Translate graphic object horizontally.
     * @param $t_x (int) movement to the right (or left for RTL)
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    public function TranslateX($t_x) {
        $this->Translate($t_x, 0);
    }

    /**
     * Translate graphic object vertically.
     * @param $t_y (int) movement to the bottom
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    public function TranslateY($t_y) {
        $this->Translate(0, $t_y);
    }

    /**
     * Translate graphic object horizontally and vertically.
     * @param $t_x (int) movement to the right
     * @param $t_y (int) movement to the bottom
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    public function Translate($t_x, $t_y) {
        //calculate elements of transformation matrix
        $tm = array();
        $tm[0] = 1;
        $tm[1] = 0;
        $tm[2] = 0;
        $tm[3] = 1;
        $tm[4] = $t_x * $this->k;
        $tm[5] = -$t_y * $this->k;
        //translate the coordinate system
        $this->Transform($tm);
    }

    /**
     * Rotate object.
     * @param $angle (float) angle in degrees for counter-clockwise rotation
     * @param $x (int) abscissa of the rotation center. Default is current x position
     * @param $y (int) ordinate of the rotation center. Default is current y position
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    public function Rotate($angle, $x = '', $y = '') {
        if ($x === '') {
            $x = $this->x;
        }
        if ($y === '') {
            $y = $this->y;
        }
        $y = ($this->h - $y) * $this->k;
        $x *= $this->k;
        //calculate elements of transformation matrix
        $tm = array();
        $tm[0] = cos(deg2rad($angle));
        $tm[1] = sin(deg2rad($angle));
        $tm[2] = -$tm[1];
        $tm[3] = $tm[0];
        $tm[4] = $x + ($tm[1] * $y) - ($tm[0] * $x);
        $tm[5] = $y - ($tm[0] * $y) - ($tm[1] * $x);
        //rotate the coordinate system around ($x,$y)
        $this->Transform($tm);
    }

    /**
     * Skew horizontally.
     * @param $angle_x (float) angle in degrees between -90 (skew to the left) and 90 (skew to the right)
     * @param $x (int) abscissa of the skewing center. default is current x position
     * @param $y (int) ordinate of the skewing center. default is current y position
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    public function SkewX($angle_x, $x = '', $y = '') {
        $this->Skew($angle_x, 0, $x, $y);
    }

    /**
     * Skew vertically.
     * @param $angle_y (float) angle in degrees between -90 (skew to the bottom) and 90 (skew to the top)
     * @param $x (int) abscissa of the skewing center. default is current x position
     * @param $y (int) ordinate of the skewing center. default is current y position
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    public function SkewY($angle_y, $x = '', $y = '') {
        $this->Skew(0, $angle_y, $x, $y);
    }

    /**
     * Skew.
     * @param $angle_x (float) angle in degrees between -90 (skew to the left) and 90 (skew to the right)
     * @param $angle_y (float) angle in degrees between -90 (skew to the bottom) and 90 (skew to the top)
     * @param $x (int) abscissa of the skewing center. default is current x position
     * @param $y (int) ordinate of the skewing center. default is current y position
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    public function Skew($angle_x, $angle_y, $x = '', $y = '') {
        if ($x === '') {
            $x = $this->x;
        }
        if ($y === '') {
            $y = $this->y;
        }
        if (($angle_x <= -90) OR ($angle_x >= 90) OR ($angle_y <= -90) OR ($angle_y >= 90)) {
            $this->Error('Please use values between -90 and +90 degrees for Skewing.');
        }
        $x *= $this->k;
        $y = ($this->h - $y) * $this->k;
        //calculate elements of transformation matrix
        $tm = array();
        $tm[0] = 1;
        $tm[1] = tan(deg2rad($angle_y));
        $tm[2] = tan(deg2rad($angle_x));
        $tm[3] = 1;
        $tm[4] = -$tm[2] * $y;
        $tm[5] = -$tm[1] * $x;
        //skew the coordinate system
        $this->Transform($tm);
    }

    /**
     * Apply graphic transformations.
     * @param $tm (array) transformation matrix
     * @protected
     * @since 2.1.000 (2008-01-07)
     * @see StartTransform(), StopTransform()
     */
    protected function Transform($tm) {
        if ($this->state != 2) {
            return;
        }
        $this->_out(sprintf('%F %F %F %F %F %F cm', $tm[0], $tm[1], $tm[2], $tm[3], $tm[4], $tm[5]));
        // add tranformation matrix
        $this->transfmatrix[$this->transfmatrix_key][] = array('a' => $tm[0], 'b' => $tm[1], 'c' => $tm[2], 'd' => $tm[3], 'e' => $tm[4], 'f' => $tm[5]);
        // update transformation mark
        if ($this->inxobj) {
            // we are inside an XObject template
            if (end($this->xobjects[$this->xobjid]['transfmrk']) !== false) {
                $key = key($this->xobjects[$this->xobjid]['transfmrk']);
                $this->xobjects[$this->xobjid]['transfmrk'][$key] = strlen($this->xobjects[$this->xobjid]['outdata']);
            }
        } elseif (end($this->transfmrk[$this->page]) !== false) {
            $key = key($this->transfmrk[$this->page]);
            $this->transfmrk[$this->page][$key] = $this->pagelen[$this->page];
        }
    }

    // END TRANSFORMATIONS SECTION -------------------------
    // START GRAPHIC FUNCTIONS SECTION ---------------------
    // The following section is based on the code provided by David Hernandez Sanz

    /**
     * Defines the line width. By default, the value equals 0.2 mm. The method can be called before the first page is created and the value is retained from page to page.
     * @param $width (float) The width.
     * @public
     * @since 1.0
     * @see Line(), Rect(), Cell(), MultiCell()
     */
    public function SetLineWidth($width) {
        //Set line width
        $this->LineWidth = $width;
        $this->linestyleWidth = sprintf('%F w', ($width * $this->k));
        if ($this->state == 2) {
            $this->_out($this->linestyleWidth);
        }
    }

    /**
     * Returns the current the line width.
     * @return int Line width
     * @public
     * @since 2.1.000 (2008-01-07)
     * @see Line(), SetLineWidth()
     */
    public function GetLineWidth() {
        return $this->LineWidth;
    }

    /**
     * Set line style.
     * @param $style (array) Line style. Array with keys among the following:
     * <ul>
     * 	 <li>width (float): Width of the line in user units.</li>
     * 	 <li>cap (string): Type of cap to put on the line. Possible values are:
     * butt, round, square. The difference between "square" and "butt" is that
     * "square" projects a flat end past the end of the line.</li>
     * 	 <li>join (string): Type of join. Possible values are: miter, round,
     * bevel.</li>
     * 	 <li>dash (mixed): Dash pattern. Is 0 (without dash) or string with
     * series of length values, which are the lengths of the on and off dashes.
     * For example: "2" represents 2 on, 2 off, 2 on, 2 off, ...; "2,1" is 2 on,
     * 1 off, 2 on, 1 off, ...</li>
     * 	 <li>phase (integer): Modifier on the dash pattern which is used to shift
     * the point at which the pattern starts.</li>
     * 	 <li>color (array): Draw color. Format: array(GREY) or array(R,G,B) or array(C,M,Y,K) or array(C,M,Y,K,SpotColorName).</li>
     * </ul>
     * @param $ret (boolean) if true do not send the command.
     * @return string the PDF command
     * @public
     * @since 2.1.000 (2008-01-08)
     */
    public function SetLineStyle($style, $ret = false) {
        $s = ''; // string to be returned
        if (!is_array($style)) {
            return;
        }
        if (isset($style['width'])) {
            $this->LineWidth = $style['width'];
            $this->linestyleWidth = sprintf('%F w', ($style['width'] * $this->k));
            $s .= $this->linestyleWidth . ' ';
        }
        if (isset($style['cap'])) {
            $ca = array('butt' => 0, 'round' => 1, 'square' => 2);
            if (isset($ca[$style['cap']])) {
                $this->linestyleCap = $ca[$style['cap']] . ' J';
                $s .= $this->linestyleCap . ' ';
            }
        }
        if (isset($style['join'])) {
            $ja = array('miter' => 0, 'round' => 1, 'bevel' => 2);
            if (isset($ja[$style['join']])) {
                $this->linestyleJoin = $ja[$style['join']] . ' j';
                $s .= $this->linestyleJoin . ' ';
            }
        }
        if (isset($style['dash'])) {
            $dash_string = '';
            if ($style['dash']) {
                if (preg_match('/^.+,/', $style['dash']) > 0) {
                    $tab = explode(',', $style['dash']);
                } else {
                    $tab = array($style['dash']);
                }
                $dash_string = '';
                foreach ($tab as $i => $v) {
                    if ($i) {
                        $dash_string .= ' ';
                    }
                    $dash_string .= sprintf('%F', $v);
                }
            }
            if (!isset($style['phase']) OR !$style['dash']) {
                $style['phase'] = 0;
            }
            $this->linestyleDash = sprintf('[%s] %F d', $dash_string, $style['phase']);
            $s .= $this->linestyleDash . ' ';
        }
        if (isset($style['color'])) {
            $s .= $this->SetDrawColorArray($style['color'], true) . ' ';
        }
        if (!$ret AND ($this->state == 2)) {
            $this->_out($s);
        }
        return $s;
    }

    /**
     * Begin a new subpath by moving the current point to coordinates (x, y), omitting any connecting line segment.
     * @param $x (float) Abscissa of point.
     * @param $y (float) Ordinate of point.
     * @protected
     * @since 2.1.000 (2008-01-08)
     */
    protected function _outPoint($x, $y) {
        if ($this->state == 2) {
            $this->_out(sprintf('%F %F m', ($x * $this->k), (($this->h - $y) * $this->k)));
        }
    }

    /**
     * Append a straight line segment from the current point to the point (x, y).
     * The new current point shall be (x, y).
     * @param $x (float) Abscissa of end point.
     * @param $y (float) Ordinate of end point.
     * @protected
     * @since 2.1.000 (2008-01-08)
     */
    protected function _outLine($x, $y) {
        if ($this->state == 2) {
            $this->_out(sprintf('%F %F l', ($x * $this->k), (($this->h - $y) * $this->k)));
        }
    }

    /**
     * Append a rectangle to the current path as a complete subpath, with lower-left corner (x, y) and dimensions widthand height in user space.
     * @param $x (float) Abscissa of upper-left corner.
     * @param $y (float) Ordinate of upper-left corner.
     * @param $w (float) Width.
     * @param $h (float) Height.
     * @param $op (string) options
     * @protected
     * @since 2.1.000 (2008-01-08)
     */
    protected function _outRect($x, $y, $w, $h, $op) {
        if ($this->state == 2) {
            $this->_out(sprintf('%F %F %F %F re %s', $x * $this->k, ($this->h - $y) * $this->k, $w * $this->k, -$h * $this->k, $op));
        }
    }

    /**
     * Append a cubic B�zier curve to the current path. The curve shall extend from the current point to the point (x3, y3), using (x1, y1) and (x2, y2) as the B�zier control points.
     * The new current point shall be (x3, y3).
     * @param $x1 (float) Abscissa of control point 1.
     * @param $y1 (float) Ordinate of control point 1.
     * @param $x2 (float) Abscissa of control point 2.
     * @param $y2 (float) Ordinate of control point 2.
     * @param $x3 (float) Abscissa of end point.
     * @param $y3 (float) Ordinate of end point.
     * @protected
     * @since 2.1.000 (2008-01-08)
     */
    protected function _outCurve($x1, $y1, $x2, $y2, $x3, $y3) {
        if ($this->state == 2) {
            $this->_out(sprintf('%F %F %F %F %F %F c', $x1 * $this->k, ($this->h - $y1) * $this->k, $x2 * $this->k, ($this->h - $y2) * $this->k, $x3 * $this->k, ($this->h - $y3) * $this->k));
        }
    }

    /**
     * Append a cubic B�zier curve to the current path. The curve shall extend from the current point to the point (x3, y3), using the current point and (x2, y2) as the B�zier control points.
     * The new current point shall be (x3, y3).
     * @param $x2 (float) Abscissa of control point 2.
     * @param $y2 (float) Ordinate of control point 2.
     * @param $x3 (float) Abscissa of end point.
     * @param $y3 (float) Ordinate of end point.
     * @protected
     * @since 4.9.019 (2010-04-26)
     */
    protected function _outCurveV($x2, $y2, $x3, $y3) {
        if ($this->state == 2) {
            $this->_out(sprintf('%F %F %F %F v', $x2 * $this->k, ($this->h - $y2) * $this->k, $x3 * $this->k, ($this->h - $y3) * $this->k));
        }
    }

    /**
     * Append a cubic B�zier curve to the current path. The curve shall extend from the current point to the point (x3, y3), using (x1, y1) and (x3, y3) as the B�zier control points.
     * The new current point shall be (x3, y3).
     * @param $x1 (float) Abscissa of control point 1.
     * @param $y1 (float) Ordinate of control point 1.
     * @param $x3 (float) Abscissa of end point.
     * @param $y3 (float) Ordinate of end point.
     * @protected
     * @since 2.1.000 (2008-01-08)
     */
    protected function _outCurveY($x1, $y1, $x3, $y3) {
        if ($this->state == 2) {
            $this->_out(sprintf('%F %F %F %F y', $x1 * $this->k, ($this->h - $y1) * $this->k, $x3 * $this->k, ($this->h - $y3) * $this->k));
        }
    }

    /**
     * Draws a line between two points.
     * @param $x1 (float) Abscissa of first point.
     * @param $y1 (float) Ordinate of first point.
     * @param $x2 (float) Abscissa of second point.
     * @param $y2 (float) Ordinate of second point.
     * @param $style (array) Line style. Array like for SetLineStyle(). Default value: default line style (empty array).
     * @public
     * @since 1.0
     * @see SetLineWidth(), SetDrawColor(), SetLineStyle()
     */
    public function Line($x1, $y1, $x2, $y2, $style = array()) {
        if ($this->state != 2) {
            return;
        }
        if (is_array($style)) {
            $this->SetLineStyle($style);
        }
        $this->_outPoint($x1, $y1);
        $this->_outLine($x2, $y2);
        $this->_out('S');
    }

    /**
     * Draws a rectangle.
     * @param $x (float) Abscissa of upper-left corner.
     * @param $y (float) Ordinate of upper-left corner.
     * @param $w (float) Width.
     * @param $h (float) Height.
     * @param $style (string) Style of rendering. See the getPathPaintOperator() function for more information.
     * @param $border_style (array) Border style of rectangle. Array with keys among the following:
     * <ul>
     * 	 <li>all: Line style of all borders. Array like for SetLineStyle().</li>
     * 	 <li>L, T, R, B or combinations: Line style of left, top, right or bottom border. Array like for SetLineStyle().</li>
     * </ul>
     * If a key is not present or is null, not draws the border. Default value: default line style (empty array).
     * @param $fill_color (array) Fill color. Format: array(GREY) or array(R,G,B) or array(C,M,Y,K) or array(C,M,Y,K,SpotColorName). Default value: default color (empty array).
     * @public
     * @since 1.0
     * @see SetLineStyle()
     */
    public function Rect($x, $y, $w, $h, $style = '', $border_style = array(), $fill_color = array()) {
        if ($this->state != 2) {
            return;
        }
        if (!(false === strpos($style, 'F')) AND !empty($fill_color)) {
            $this->SetFillColorArray($fill_color);
        }
        $op = $this->getPathPaintOperator($style);
        if ((!$border_style) OR (isset($border_style['all']))) {
            if (isset($border_style['all']) AND $border_style['all']) {
                $this->SetLineStyle($border_style['all']);
                $border_style = array();
            }
        }
        $this->_outRect($x, $y, $w, $h, $op);
        if ($border_style) {
            $border_style2 = array();
            foreach ($border_style as $line => $value) {
                $length = strlen($line);
                for ($i = 0; $i < $length; ++$i) {
                    $border_style2[$line[$i]] = $value;
                }
            }
            $border_style = $border_style2;
            if (isset($border_style['L']) AND $border_style['L']) {
                $this->Line($x, $y, $x, $y + $h, $border_style['L']);
            }
            if (isset($border_style['T']) AND $border_style['T']) {
                $this->Line($x, $y, $x + $w, $y, $border_style['T']);
            }
            if (isset($border_style['R']) AND $border_style['R']) {
                $this->Line($x + $w, $y, $x + $w, $y + $h, $border_style['R']);
            }
            if (isset($border_style['B']) AND $border_style['B']) {
                $this->Line($x, $y + $h, $x + $w, $y + $h, $border_style['B']);
            }
        }
    }

    /**
     * Draws a Bezier curve.
     * The Bezier curve is a tangent to the line between the control points at
     * either end of the curve.
     * @param $x0 (float) Abscissa of start point.
     * @param $y0 (float) Ordinate of start point.
     * @param $x1 (float) Abscissa of control point 1.
     * @param $y1 (float) Ordinate of control point 1.
     * @param $x2 (float) Abscissa of control point 2.
     * @param $y2 (float) Ordinate of control point 2.
     * @param $x3 (float) Abscissa of end point.
     * @param $y3 (float) Ordinate of end point.
     * @param $style (string) Style of rendering. See the getPathPaintOperator() function for more information.
     * @param $line_style (array) Line style of curve. Array like for SetLineStyle(). Default value: default line style (empty array).
     * @param $fill_color (array) Fill color. Format: array(GREY) or array(R,G,B) or array(C,M,Y,K) or array(C,M,Y,K,SpotColorName). Default value: default color (empty array).
     * @public
     * @see SetLineStyle()
     * @since 2.1.000 (2008-01-08)
     */
    public function Curve($x0, $y0, $x1, $y1, $x2, $y2, $x3, $y3, $style = '', $line_style = array(), $fill_color = array()) {
        if ($this->state != 2) {
            return;
        }
        if (!(false === strpos($style, 'F')) AND isset($fill_color)) {
            $this->SetFillColorArray($fill_color);
        }
        $op = $this->getPathPaintOperator($style);
        if ($line_style) {
            $this->SetLineStyle($line_style);
        }
        $this->_outPoint($x0, $y0);
        $this->_outCurve($x1, $y1, $x2, $y2, $x3, $y3);
        $this->_out($op);
    }

    /**
     * Draws a poly-Bezier curve.
     * Each Bezier curve segment is a tangent to the line between the control points at
     * either end of the curve.
     * @param $x0 (float) Abscissa of start point.
     * @param $y0 (float) Ordinate of start point.
     * @param $segments (float) An array of bezier descriptions. Format: array(x1, y1, x2, y2, x3, y3).
     * @param $style (string) Style of rendering. See the getPathPaintOperator() function for more information.
     * @param $line_style (array) Line style of curve. Array like for SetLineStyle(). Default value: default line style (empty array).
     * @param $fill_color (array) Fill color. Format: array(GREY) or array(R,G,B) or array(C,M,Y,K) or array(C,M,Y,K,SpotColorName). Default value: default color (empty array).
     * @public
     * @see SetLineStyle()
     * @since 3.0008 (2008-05-12)
     */
    public function Polycurve($x0, $y0, $segments, $style = '', $line_style = array(), $fill_color = array()) {
        if ($this->state != 2) {
            return;
        }
        if (!(false === strpos($style, 'F')) AND isset($fill_color)) {
            $this->SetFillColorArray($fill_color);
        }
        $op = $this->getPathPaintOperator($style);
        if ($op == 'f') {
            $line_style = array();
        }
        if ($line_style) {
            $this->SetLineStyle($line_style);
        }
        $this->_outPoint($x0, $y0);
        foreach ($segments as $segment) {
            list($x1, $y1, $x2, $y2, $x3, $y3) = $segment;
            $this->_outCurve($x1, $y1, $x2, $y2, $x3, $y3);
        }
        $this->_out($op);
    }

    /**
     * Draws an ellipse.
     * An ellipse is formed from n Bezier curves.
     * @param $x0 (float) Abscissa of center point.
     * @param $y0 (float) Ordinate of center point.
     * @param $rx (float) Horizontal radius.
     * @param $ry (float) Vertical radius (if ry = 0 then is a circle, see Circle()). Default value: 0.
     * @param $angle: (float) Angle oriented (anti-clockwise). Default value: 0.
     * @param $astart: (float) Angle start of draw line. Default value: 0.
     * @param $afinish: (float) Angle finish of draw line. Default value: 360.
     * @param $style (string) Style of rendering. See the getPathPaintOperator() function for more information.
     * @param $line_style (array) Line style of ellipse. Array like for SetLineStyle(). Default value: default line style (empty array).
     * @param $fill_color (array) Fill color. Format: array(GREY) or array(R,G,B) or array(C,M,Y,K) or array(C,M,Y,K,SpotColorName). Default value: default color (empty array).
     * @param $nc (integer) Number of curves used to draw a 90 degrees portion of ellipse.
     * @author Nicola Asuni
     * @public
     * @since 2.1.000 (2008-01-08)
     */
    public function Ellipse($x0, $y0, $rx, $ry = '', $angle = 0, $astart = 0, $afinish = 360, $style = '', $line_style = array(), $fill_color = array(), $nc = 2) {
        if ($this->state != 2) {
            return;
        }
        if ($this->empty_string($ry) OR ($ry == 0)) {
            $ry = $rx;
        }
        if (!(false === strpos($style, 'F')) AND isset($fill_color)) {
            $this->SetFillColorArray($fill_color);
        }
        $op = $this->getPathPaintOperator($style);
        if ($op == 'f') {
            $line_style = array();
        }
        if ($line_style) {
            $this->SetLineStyle($line_style);
        }
        $this->_outellipticalarc($x0, $y0, $rx, $ry, $angle, $astart, $afinish, false, $nc, true, true, false);
        $this->_out($op);
    }

    /**
     * Append an elliptical arc to the current path.
     * An ellipse is formed from n Bezier curves.
     * @param $xc (float) Abscissa of center point.
     * @param $yc (float) Ordinate of center point.
     * @param $rx (float) Horizontal radius.
     * @param $ry (float) Vertical radius (if ry = 0 then is a circle, see Circle()). Default value: 0.
     * @param $xang: (float) Angle between the X-axis and the major axis of the ellipse. Default value: 0.
     * @param $angs: (float) Angle start of draw line. Default value: 0.
     * @param $angf: (float) Angle finish of draw line. Default value: 360.
     * @param $pie (boolean) if true do not mark the border point (used to draw pie sectors).
     * @param $nc (integer) Number of curves used to draw a 90 degrees portion of ellipse.
     * @param $startpoint (boolean) if true output a starting point.
     * @param $ccw (boolean) if true draws in counter-clockwise.
     * @param $svg (boolean) if true the angles are in svg mode (already calculated).
     * @return array bounding box coordinates (x min, y min, x max, y max)
     * @author Nicola Asuni
     * @protected
     * @since 4.9.019 (2010-04-26)
     */
    protected function _outellipticalarc($xc, $yc, $rx, $ry, $xang = 0, $angs = 0, $angf = 360, $pie = false, $nc = 2, $startpoint = true, $ccw = true, $svg = false) {
        $k = $this->k;
        if ($nc < 2) {
            $nc = 2;
        }
        $xmin = 2147483647;
        $ymin = 2147483647;
        $xmax = 0;
        $ymax = 0;
        if ($pie) {
            // center of the arc
            $this->_outPoint($xc, $yc);
        }
        $xang = deg2rad((float) $xang);
        $angs = deg2rad((float) $angs);
        $angf = deg2rad((float) $angf);
        if ($svg) {
            $as = $angs;
            $af = $angf;
        } else {
            $as = atan2((sin($angs) / $ry), (cos($angs) / $rx));
            $af = atan2((sin($angf) / $ry), (cos($angf) / $rx));
        }
        if ($as < 0) {
            $as += (2 * M_PI);
        }
        if ($af < 0) {
            $af += (2 * M_PI);
        }
        if ($ccw AND ($as > $af)) {
            // reverse rotation
            $as -= (2 * M_PI);
        } elseif (!$ccw AND ($as < $af)) {
            // reverse rotation
            $af -= (2 * M_PI);
        }
        $total_angle = ($af - $as);
        if ($nc < 2) {
            $nc = 2;
        }
        // total arcs to draw
        $nc *= (2 * abs($total_angle) / M_PI);
        $nc = round($nc) + 1;
        // angle of each arc
        $arcang = ($total_angle / $nc);
        // center point in PDF coordinates
        $x0 = $xc;
        $y0 = ($this->h - $yc);
        // starting angle
        $ang = $as;
        $alpha = sin($arcang) * ((sqrt(4 + (3 * pow(tan(($arcang) / 2), 2))) - 1) / 3);
        $cos_xang = cos($xang);
        $sin_xang = sin($xang);
        $cos_ang = cos($ang);
        $sin_ang = sin($ang);
        // first arc point
        $px1 = $x0 + ($rx * $cos_xang * $cos_ang) - ($ry * $sin_xang * $sin_ang);
        $py1 = $y0 + ($rx * $sin_xang * $cos_ang) + ($ry * $cos_xang * $sin_ang);
        // first Bezier control point
        $qx1 = ($alpha * ((-$rx * $cos_xang * $sin_ang) - ($ry * $sin_xang * $cos_ang)));
        $qy1 = ($alpha * ((-$rx * $sin_xang * $sin_ang) + ($ry * $cos_xang * $cos_ang)));
        if ($pie) {
            // line from center to arc starting point
            $this->_outLine($px1, $this->h - $py1);
        } elseif ($startpoint) {
            // arc starting point
            $this->_outPoint($px1, $this->h - $py1);
        }
        // draw arcs
        for ($i = 1; $i <= $nc; ++$i) {
            // starting angle
            $ang = $as + ($i * $arcang);
            if ($i == $nc) {
                $ang = $af;
            }
            $cos_ang = cos($ang);
            $sin_ang = sin($ang);
            // second arc point
            $px2 = $x0 + ($rx * $cos_xang * $cos_ang) - ($ry * $sin_xang * $sin_ang);
            $py2 = $y0 + ($rx * $sin_xang * $cos_ang) + ($ry * $cos_xang * $sin_ang);
            // second Bezier control point
            $qx2 = ($alpha * ((-$rx * $cos_xang * $sin_ang) - ($ry * $sin_xang * $cos_ang)));
            $qy2 = ($alpha * ((-$rx * $sin_xang * $sin_ang) + ($ry * $cos_xang * $cos_ang)));
            // draw arc
            $cx1 = ($px1 + $qx1);
            $cy1 = ($this->h - ($py1 + $qy1));
            $cx2 = ($px2 - $qx2);
            $cy2 = ($this->h - ($py2 - $qy2));
            $cx3 = $px2;
            $cy3 = ($this->h - $py2);
            $this->_outCurve($cx1, $cy1, $cx2, $cy2, $cx3, $cy3);
            // get bounding box coordinates
            $xmin = min($xmin, $cx1, $cx2, $cx3);
            $ymin = min($ymin, $cy1, $cy2, $cy3);
            $xmax = max($xmax, $cx1, $cx2, $cx3);
            $ymax = max($ymax, $cy1, $cy2, $cy3);
            // move to next point
            $px1 = $px2;
            $py1 = $py2;
            $qx1 = $qx2;
            $qy1 = $qy2;
        }
        if ($pie) {
            $this->_outLine($xc, $yc);
            // get bounding box coordinates
            $xmin = min($xmin, $xc);
            $ymin = min($ymin, $yc);
            $xmax = max($xmax, $xc);
            $ymax = max($ymax, $yc);
        }
        return array($xmin, $ymin, $xmax, $ymax);
    }

    /**
     * Draws a circle.
     * A circle is formed from n Bezier curves.
     * @param $x0 (float) Abscissa of center point.
     * @param $y0 (float) Ordinate of center point.
     * @param $r (float) Radius.
     * @param $angstr: (float) Angle start of draw line. Default value: 0.
     * @param $angend: (float) Angle finish of draw line. Default value: 360.
     * @param $style (string) Style of rendering. See the getPathPaintOperator() function for more information.
     * @param $line_style (array) Line style of circle. Array like for SetLineStyle(). Default value: default line style (empty array).
     * @param $fill_color (array) Fill color. Format: array(red, green, blue). Default value: default color (empty array).
     * @param $nc (integer) Number of curves used to draw a 90 degrees portion of circle.
     * @public
     * @since 2.1.000 (2008-01-08)
     */
    public function Circle($x0, $y0, $r, $angstr = 0, $angend = 360, $style = '', $line_style = array(), $fill_color = array(), $nc = 2) {
        $this->Ellipse($x0, $y0, $r, $r, 0, $angstr, $angend, $style, $line_style, $fill_color, $nc);
    }

    /**
     * Draws a polygonal line
     * @param $p (array) Points 0 to ($np - 1). Array with values (x0, y0, x1, y1,..., x(np-1), y(np - 1))
     * @param $style (string) Style of rendering. See the getPathPaintOperator() function for more information.
     * @param $line_style (array) Line style of polygon. Array with keys among the following:
     * <ul>
     * 	 <li>all: Line style of all lines. Array like for SetLineStyle().</li>
     * 	 <li>0 to ($np - 1): Line style of each line. Array like for SetLineStyle().</li>
     * </ul>
     * If a key is not present or is null, not draws the line. Default value is default line style (empty array).
     * @param $fill_color (array) Fill color. Format: array(GREY) or array(R,G,B) or array(C,M,Y,K) or array(C,M,Y,K,SpotColorName). Default value: default color (empty array).
     * @since 4.8.003 (2009-09-15)
     * @public
     */
    public function PolyLine($p, $style = '', $line_style = array(), $fill_color = array()) {
        $this->Polygon($p, $style, $line_style, $fill_color, false);
    }

    /**
     * Draws a polygon.
     * @param $p (array) Points 0 to ($np - 1). Array with values (x0, y0, x1, y1,..., x(np-1), y(np - 1))
     * @param $style (string) Style of rendering. See the getPathPaintOperator() function for more information.
     * @param $line_style (array) Line style of polygon. Array with keys among the following:
     * <ul>
     * 	 <li>all: Line style of all lines. Array like for SetLineStyle().</li>
     * 	 <li>0 to ($np - 1): Line style of each line. Array like for SetLineStyle().</li>
     * </ul>
     * If a key is not present or is null, not draws the line. Default value is default line style (empty array).
     * @param $fill_color (array) Fill color. Format: array(GREY) or array(R,G,B) or array(C,M,Y,K) or array(C,M,Y,K,SpotColorName). Default value: default color (empty array).
     * @param $closed (boolean) if true the polygon is closes, otherwise will remain open
     * @public
     * @since 2.1.000 (2008-01-08)
     */
    public function Polygon($p, $style = '', $line_style = array(), $fill_color = array(), $closed = true) {
        if ($this->state != 2) {
            return;
        }
        $nc = count($p); // number of coordinates
        $np = $nc / 2; // number of points
        if ($closed) {
            // close polygon by adding the first 2 points at the end (one line)
            for ($i = 0; $i < 4; ++$i) {
                $p[$nc + $i] = $p[$i];
            }
            // copy style for the last added line
            if (isset($line_style[0])) {
                $line_style[$np] = $line_style[0];
            }
            $nc += 4;
        }
        if (!(false === strpos($style, 'F')) AND isset($fill_color)) {
            $this->SetFillColorArray($fill_color);
        }
        $op = $this->getPathPaintOperator($style);
        if ($op == 'f') {
            $line_style = array();
        }
        $draw = true;
        if ($line_style) {
            if (isset($line_style['all'])) {
                $this->SetLineStyle($line_style['all']);
            } else {
                $draw = false;
                if ($op == 'B') {
                    // draw fill
                    $op = 'f';
                    $this->_outPoint($p[0], $p[1]);
                    for ($i = 2; $i < $nc; $i = $i + 2) {
                        $this->_outLine($p[$i], $p[$i + 1]);
                    }
                    $this->_out($op);
                }
                // draw outline
                $this->_outPoint($p[0], $p[1]);
                for ($i = 2; $i < $nc; $i = $i + 2) {
                    $line_num = ($i / 2) - 1;
                    if (isset($line_style[$line_num])) {
                        if ($line_style[$line_num] != 0) {
                            if (is_array($line_style[$line_num])) {
                                $this->_out('S');
                                $this->SetLineStyle($line_style[$line_num]);
                                $this->_outPoint($p[$i - 2], $p[$i - 1]);
                                $this->_outLine($p[$i], $p[$i + 1]);
                                $this->_out('S');
                                $this->_outPoint($p[$i], $p[$i + 1]);
                            } else {
                                $this->_outLine($p[$i], $p[$i + 1]);
                            }
                        }
                    } else {
                        $this->_outLine($p[$i], $p[$i + 1]);
                    }
                }
                $this->_out($op);
            }
        }
        if ($draw) {
            $this->_outPoint($p[0], $p[1]);
            for ($i = 2; $i < $nc; $i = $i + 2) {
                $this->_outLine($p[$i], $p[$i + 1]);
            }
            $this->_out($op);
        }
    }

    /**
     * Draws a regular polygon.
     * @param $x0 (float) Abscissa of center point.
     * @param $y0 (float) Ordinate of center point.
     * @param $r: (float) Radius of inscribed circle.
     * @param $ns (integer) Number of sides.
     * @param $angle (float) Angle oriented (anti-clockwise). Default value: 0.
     * @param $draw_circle (boolean) Draw inscribed circle or not. Default value: false.
     * @param $style (string) Style of rendering. See the getPathPaintOperator() function for more information.
     * @param $line_style (array) Line style of polygon sides. Array with keys among the following:
     * <ul>
     * 	 <li>all: Line style of all sides. Array like for SetLineStyle().</li>
     * 	 <li>0 to ($ns - 1): Line style of each side. Array like for SetLineStyle().</li>
     * </ul>
     * If a key is not present or is null, not draws the side. Default value is default line style (empty array).
     * @param $fill_color (array) Fill color. Format: array(red, green, blue). Default value: default color (empty array).
     * @param $circle_style (string) Style of rendering of inscribed circle (if draws). Possible values are:
     * <ul>
     * 	 <li>D or empty string: Draw (default).</li>
     * 	 <li>F: Fill.</li>
     * 	 <li>DF or FD: Draw and fill.</li>
     * 	 <li>CNZ: Clipping mode (using the even-odd rule to determine which regions lie inside the clipping path).</li>
     * 	 <li>CEO: Clipping mode (using the nonzero winding number rule to determine which regions lie inside the clipping path).</li>
     * </ul>
     * @param $circle_outLine_style (array) Line style of inscribed circle (if draws). Array like for SetLineStyle(). Default value: default line style (empty array).
     * @param $circle_fill_color (array) Fill color of inscribed circle (if draws). Format: array(red, green, blue). Default value: default color (empty array).
     * @public
     * @since 2.1.000 (2008-01-08)
     */
    public function RegularPolygon($x0, $y0, $r, $ns, $angle = 0, $draw_circle = false, $style = '', $line_style = array(), $fill_color = array(), $circle_style = '', $circle_outLine_style = array(), $circle_fill_color = array()) {
        if (3 > $ns) {
            $ns = 3;
        }
        if ($draw_circle) {
            $this->Circle($x0, $y0, $r, 0, 360, $circle_style, $circle_outLine_style, $circle_fill_color);
        }
        $p = array();
        for ($i = 0; $i < $ns; ++$i) {
            $a = $angle + ($i * 360 / $ns);
            $a_rad = deg2rad((float) $a);
            $p[] = $x0 + ($r * sin($a_rad));
            $p[] = $y0 + ($r * cos($a_rad));
        }
        $this->Polygon($p, $style, $line_style, $fill_color);
    }

    /**
     * Draws a star polygon
     * @param $x0 (float) Abscissa of center point.
     * @param $y0 (float) Ordinate of center point.
     * @param $r (float) Radius of inscribed circle.
     * @param $nv (integer) Number of vertices.
     * @param $ng (integer) Number of gap (if ($ng % $nv = 1) then is a regular polygon).
     * @param $angle: (float) Angle oriented (anti-clockwise). Default value: 0.
     * @param $draw_circle: (boolean) Draw inscribed circle or not. Default value is false.
     * @param $style (string) Style of rendering. See the getPathPaintOperator() function for more information.
     * @param $line_style (array) Line style of polygon sides. Array with keys among the following:
     * <ul>
     * 	 <li>all: Line style of all sides. Array like for
     * SetLineStyle().</li>
     * 	 <li>0 to (n - 1): Line style of each side. Array like for SetLineStyle().</li>
     * </ul>
     * If a key is not present or is null, not draws the side. Default value is default line style (empty array).
     * @param $fill_color (array) Fill color. Format: array(red, green, blue). Default value: default color (empty array).
     * @param $circle_style (string) Style of rendering of inscribed circle (if draws). Possible values are:
     * <ul>
     * 	 <li>D or empty string: Draw (default).</li>
     * 	 <li>F: Fill.</li>
     * 	 <li>DF or FD: Draw and fill.</li>
     * 	 <li>CNZ: Clipping mode (using the even-odd rule to determine which regions lie inside the clipping path).</li>
     * 	 <li>CEO: Clipping mode (using the nonzero winding number rule to determine which regions lie inside the clipping path).</li>
     * </ul>
     * @param $circle_outLine_style (array) Line style of inscribed circle (if draws). Array like for SetLineStyle(). Default value: default line style (empty array).
     * @param $circle_fill_color (array) Fill color of inscribed circle (if draws). Format: array(red, green, blue). Default value: default color (empty array).
     * @public
     * @since 2.1.000 (2008-01-08)
     */
    public function StarPolygon($x0, $y0, $r, $nv, $ng, $angle = 0, $draw_circle = false, $style = '', $line_style = array(), $fill_color = array(), $circle_style = '', $circle_outLine_style = array(), $circle_fill_color = array()) {
        if ($nv < 2) {
            $nv = 2;
        }
        if ($draw_circle) {
            $this->Circle($x0, $y0, $r, 0, 360, $circle_style, $circle_outLine_style, $circle_fill_color);
        }
        $p2 = array();
        $visited = array();
        for ($i = 0; $i < $nv; ++$i) {
            $a = $angle + ($i * 360 / $nv);
            $a_rad = deg2rad((float) $a);
            $p2[] = $x0 + ($r * sin($a_rad));
            $p2[] = $y0 + ($r * cos($a_rad));
            $visited[] = false;
        }
        $p = array();
        $i = 0;
        do {
            $p[] = $p2[$i * 2];
            $p[] = $p2[($i * 2) + 1];
            $visited[$i] = true;
            $i += $ng;
            $i %= $nv;
        } while (!$visited[$i]);
        $this->Polygon($p, $style, $line_style, $fill_color);
    }

    /**
     * Draws a rounded rectangle.
     * @param $x (float) Abscissa of upper-left corner.
     * @param $y (float) Ordinate of upper-left corner.
     * @param $w (float) Width.
     * @param $h (float) Height.
     * @param $r (float) the radius of the circle used to round off the corners of the rectangle.
     * @param $round_corner (string) Draws rounded corner or not. String with a 0 (not rounded i-corner) or 1 (rounded i-corner) in i-position. Positions are, in order and begin to 0: top right, bottom right, bottom left and top left. Default value: all rounded corner ("1111").
     * @param $style (string) Style of rendering. See the getPathPaintOperator() function for more information.
     * @param $border_style (array) Border style of rectangle. Array like for SetLineStyle(). Default value: default line style (empty array).
     * @param $fill_color (array) Fill color. Format: array(GREY) or array(R,G,B) or array(C,M,Y,K) or array(C,M,Y,K,SpotColorName). Default value: default color (empty array).
     * @public
     * @since 2.1.000 (2008-01-08)
     */
    public function RoundedRect($x, $y, $w, $h, $r, $round_corner = '1111', $style = '', $border_style = array(), $fill_color = array()) {
        $this->RoundedRectXY($x, $y, $w, $h, $r, $r, $round_corner, $style, $border_style, $fill_color);
    }

    /**
     * Draws a rounded rectangle.
     * @param $x (float) Abscissa of upper-left corner.
     * @param $y (float) Ordinate of upper-left corner.
     * @param $w (float) Width.
     * @param $h (float) Height.
     * @param $rx (float) the x-axis radius of the ellipse used to round off the corners of the rectangle.
     * @param $ry (float) the y-axis radius of the ellipse used to round off the corners of the rectangle.
     * @param $round_corner (string) Draws rounded corner or not. String with a 0 (not rounded i-corner) or 1 (rounded i-corner) in i-position. Positions are, in order and begin to 0: top right, bottom right, bottom left and top left. Default value: all rounded corner ("1111").
     * @param $style (string) Style of rendering. See the getPathPaintOperator() function for more information.
     * @param $border_style (array) Border style of rectangle. Array like for SetLineStyle(). Default value: default line style (empty array).
     * @param $fill_color (array) Fill color. Format: array(GREY) or array(R,G,B) or array(C,M,Y,K) or array(C,M,Y,K,SpotColorName). Default value: default color (empty array).
     * @public
     * @since 4.9.019 (2010-04-22)
     */
    public function RoundedRectXY($x, $y, $w, $h, $rx, $ry, $round_corner = '1111', $style = '', $border_style = array(), $fill_color = array()) {
        if ($this->state != 2) {
            return;
        }
        if (($round_corner == '0000') OR (($rx == $ry) AND ($rx == 0))) {
            // Not rounded
            $this->Rect($x, $y, $w, $h, $style, $border_style, $fill_color);
            return;
        }
        // Rounded
        if (!(false === strpos($style, 'F')) AND isset($fill_color)) {
            $this->SetFillColorArray($fill_color);
        }
        $op = $this->getPathPaintOperator($style);
        if ($op == 'f') {
            $border_style = array();
        }
        if ($border_style) {
            $this->SetLineStyle($border_style);
        }
        $MyArc = 4 / 3 * (sqrt(2) - 1);
        $this->_outPoint($x + $rx, $y);
        $xc = $x + $w - $rx;
        $yc = $y + $ry;
        $this->_outLine($xc, $y);
        if ($round_corner[0]) {
            $this->_outCurve($xc + ($rx * $MyArc), $yc - $ry, $xc + $rx, $yc - ($ry * $MyArc), $xc + $rx, $yc);
        } else {
            $this->_outLine($x + $w, $y);
        }
        $xc = $x + $w - $rx;
        $yc = $y + $h - $ry;
        $this->_outLine($x + $w, $yc);
        if ($round_corner[1]) {
            $this->_outCurve($xc + $rx, $yc + ($ry * $MyArc), $xc + ($rx * $MyArc), $yc + $ry, $xc, $yc + $ry);
        } else {
            $this->_outLine($x + $w, $y + $h);
        }
        $xc = $x + $rx;
        $yc = $y + $h - $ry;
        $this->_outLine($xc, $y + $h);
        if ($round_corner[2]) {
            $this->_outCurve($xc - ($rx * $MyArc), $yc + $ry, $xc - $rx, $yc + ($ry * $MyArc), $xc - $rx, $yc);
        } else {
            $this->_outLine($x, $y + $h);
        }
        $xc = $x + $rx;
        $yc = $y + $ry;
        $this->_outLine($x, $yc);
        if ($round_corner[3]) {
            $this->_outCurve($xc - $rx, $yc - ($ry * $MyArc), $xc - ($rx * $MyArc), $yc - $ry, $xc, $yc - $ry);
        } else {
            $this->_outLine($x, $y);
            $this->_outLine($x + $rx, $y);
        }
        $this->_out($op);
    }

    /**
     * Draws a grahic arrow.
     * @param $x0 (float) Abscissa of first point.
     * @param $y0 (float) Ordinate of first point.
     * @param $x1 (float) Abscissa of second point.
     * @param $y1 (float) Ordinate of second point.
     * @param $head_style (int) (0 = draw only arrowhead arms, 1 = draw closed arrowhead, but no fill, 2 = closed and filled arrowhead, 3 = filled arrowhead)
     * @param $arm_size (float) length of arrowhead arms
     * @param $arm_angle (int) angle between an arm and the shaft
     * @author Piotr Galecki, Nicola Asuni, Andy Meier
     * @since 4.6.018 (2009-07-10)
     */
    public function Arrow($x0, $y0, $x1, $y1, $head_style = 0, $arm_size = 5, $arm_angle = 15) {
        // getting arrow direction angle
        // 0 deg angle is when both arms go along X axis. angle grows clockwise.
        $dir_angle = atan2(($y0 - $y1), ($x0 - $x1));
        if ($dir_angle < 0) {
            $dir_angle += (2 * M_PI);
        }
        $arm_angle = deg2rad($arm_angle);
        $sx1 = $x1;
        $sy1 = $y1;
        if ($head_style > 0) {
            // calculate the stopping point for the arrow shaft
            $sx1 = $x1 + (($arm_size - $this->LineWidth) * cos($dir_angle));
            $sy1 = $y1 + (($arm_size - $this->LineWidth) * sin($dir_angle));
        }
        // main arrow line / shaft
        $this->Line($x0, $y0, $sx1, $sy1);
        // left arrowhead arm tip
        $x2L = $x1 + ($arm_size * cos($dir_angle + $arm_angle));
        $y2L = $y1 + ($arm_size * sin($dir_angle + $arm_angle));
        // right arrowhead arm tip
        $x2R = $x1 + ($arm_size * cos($dir_angle - $arm_angle));
        $y2R = $y1 + ($arm_size * sin($dir_angle - $arm_angle));
        $mode = 'D';
        $style = array();
        switch ($head_style) {
            case 0: {
                    // draw only arrowhead arms
                    $mode = 'D';
                    $style = array(1, 1, 0);
                    break;
                }
            case 1: {
                    // draw closed arrowhead, but no fill
                    $mode = 'D';
                    break;
                }
            case 2: {
                    // closed and filled arrowhead
                    $mode = 'DF';
                    break;
                }
            case 3: {
                    // filled arrowhead
                    $mode = 'F';
                    break;
                }
        }
        $this->Polygon(array($x2L, $y2L, $x1, $y1, $x2R, $y2R), $mode, $style, array());
    }

    // END GRAPHIC FUNCTIONS SECTION -----------------------
    // BIDIRECTIONAL TEXT SECTION --------------------------

    /**
     * Reverse the RLT substrings using the Bidirectional Algorithm (http://unicode.org/reports/tr9/).
     * @param $str (string) string to manipulate.
     * @param $setbom (bool) if true set the Byte Order Mark (BOM = 0xFEFF)
     * @param $forcertl (bool) if true forces RTL text direction
     * @return string
     * @protected
     * @author Nicola Asuni
     * @since 2.1.000 (2008-01-08)
     */
    protected function utf8StrRev($str, $setbom = false, $forcertl = false) {
        return $this->utf8StrArrRev($this->UTF8StringToArray($str), $str, $setbom, $forcertl);
    }

    /**
     * Reverse the RLT substrings array using the Bidirectional Algorithm (http://unicode.org/reports/tr9/).
     * @param $arr (array) array of unicode values.
     * @param $str (string) string to manipulate (or empty value).
     * @param $setbom (bool) if true set the Byte Order Mark (BOM = 0xFEFF)
     * @param $forcertl (bool) if true forces RTL text direction
     * @return string
     * @protected
     * @author Nicola Asuni
     * @since 4.9.000 (2010-03-27)
     */
    protected function utf8StrArrRev($arr, $str = '', $setbom = false, $forcertl = false) {
        return $this->arrUTF8ToUTF16BE($this->utf8Bidi($arr, $str, $forcertl), $setbom);
    }

    /**
     * Reverse the RLT substrings using the Bidirectional Algorithm (http://unicode.org/reports/tr9/).
     * @param $ta (array) array of characters composing the string.
     * @param $str (string) string to process
     * @param $forcertl (bool) if 'R' forces RTL, if 'L' forces LTR
     * @return array of unicode chars
     * @author Nicola Asuni
     * @protected
     * @since 2.4.000 (2008-03-06)
     */
    protected function utf8Bidi($ta, $str = '', $forcertl = false) {
        // paragraph embedding level
        $pel = 0;
        // max level
        $maxlevel = 0;
        if ($this->empty_string($str)) {
            // create string from array
            $str = $this->UTF8ArrSubString($ta);
        }
        // check if string contains arabic text
        if (preg_match($this->unicode->uni_RE_PATTERN_ARABIC, $str)) {
            $arabic = true;
        } else {
            $arabic = false;
        }
        // check if string contains RTL text
        if (!($forcertl OR $arabic OR preg_match($this->unicode->uni_RE_PATTERN_RTL, $str))) {
            return $ta;
        }

        // get number of chars
        $numchars = count($ta);

        if ($forcertl == 'R') {
            $pel = 1;
        } elseif ($forcertl == 'L') {
            $pel = 0;
        } else {
            // P2. In each paragraph, find the first character of type L, AL, or R.
            // P3. If a character is found in P2 and it is of type AL or R, then set the paragraph embedding level to one; otherwise, set it to zero.
            for ($i = 0; $i < $numchars; ++$i) {
                $type = $this->unicode->uni_type[$ta[$i]];
                if ($type == 'L') {
                    $pel = 0;
                    break;
                } elseif (($type == 'AL') OR ($type == 'R')) {
                    $pel = 1;
                    break;
                }
            }
        }

        // Current Embedding Level
        $cel = $pel;
        // directional override status
        $dos = 'N';
        $remember = array();
        // start-of-level-run
        $sor = $pel % 2 ? 'R' : 'L';
        $eor = $sor;

        // Array of characters data
        $chardata = Array();

        // X1. Begin by setting the current embedding level to the paragraph embedding level. Set the directional override status to neutral. Process each character iteratively, applying rules X2 through X9. Only embedding levels from 0 to 61 are valid in this phase.
        // In the resolution of levels in rules I1 and I2, the maximum embedding level of 62 can be reached.
        for ($i = 0; $i < $numchars; ++$i) {
            if ($ta[$i] == $this->unicode->uni_RLE) {
                // X2. With each RLE, compute the least greater odd embedding level.
                //	a. If this new level would be valid, then this embedding code is valid. Remember (push) the current embedding level and override status. Reset the current level to this new level, and reset the override status to neutral.
                //	b. If the new level would not be valid, then this code is invalid. Do not change the current level or override status.
                $next_level = $cel + ($cel % 2) + 1;
                if ($next_level < 62) {
                    $remember[] = array('num' => $this->unicode->uni_RLE, 'cel' => $cel, 'dos' => $dos);
                    $cel = $next_level;
                    $dos = 'N';
                    $sor = $eor;
                    $eor = $cel % 2 ? 'R' : 'L';
                }
            } elseif ($ta[$i] == $this->unicode->uni_LRE) {
                // X3. With each LRE, compute the least greater even embedding level.
                //	a. If this new level would be valid, then this embedding code is valid. Remember (push) the current embedding level and override status. Reset the current level to this new level, and reset the override status to neutral.
                //	b. If the new level would not be valid, then this code is invalid. Do not change the current level or override status.
                $next_level = $cel + 2 - ($cel % 2);
                if ($next_level < 62) {
                    $remember[] = array('num' => $this->unicode->uni_LRE, 'cel' => $cel, 'dos' => $dos);
                    $cel = $next_level;
                    $dos = 'N';
                    $sor = $eor;
                    $eor = $cel % 2 ? 'R' : 'L';
                }
            } elseif ($ta[$i] == $this->unicode->uni_RLO) {
                // X4. With each RLO, compute the least greater odd embedding level.
                //	a. If this new level would be valid, then this embedding code is valid. Remember (push) the current embedding level and override status. Reset the current level to this new level, and reset the override status to right-to-left.
                //	b. If the new level would not be valid, then this code is invalid. Do not change the current level or override status.
                $next_level = $cel + ($cel % 2) + 1;
                if ($next_level < 62) {
                    $remember[] = array('num' => $this->unicode->uni_RLO, 'cel' => $cel, 'dos' => $dos);
                    $cel = $next_level;
                    $dos = 'R';
                    $sor = $eor;
                    $eor = $cel % 2 ? 'R' : 'L';
                }
            } elseif ($ta[$i] == $this->unicode->uni_LRO) {
                // X5. With each LRO, compute the least greater even embedding level.
                //	a. If this new level would be valid, then this embedding code is valid. Remember (push) the current embedding level and override status. Reset the current level to this new level, and reset the override status to left-to-right.
                //	b. If the new level would not be valid, then this code is invalid. Do not change the current level or override status.
                $next_level = $cel + 2 - ($cel % 2);
                if ($next_level < 62) {
                    $remember[] = array('num' => $this->unicode->uni_LRO, 'cel' => $cel, 'dos' => $dos);
                    $cel = $next_level;
                    $dos = 'L';
                    $sor = $eor;
                    $eor = $cel % 2 ? 'R' : 'L';
                }
            } elseif ($ta[$i] == $this->unicode->uni_PDF) {
                // X7. With each PDF, determine the matching embedding or override code. If there was a valid matching code, restore (pop) the last remembered (pushed) embedding level and directional override.
                if (count($remember)) {
                    $last = count($remember) - 1;
                    if (($remember[$last]['num'] == $this->unicode->uni_RLE) OR
                            ($remember[$last]['num'] == $this->unicode->uni_LRE) OR
                            ($remember[$last]['num'] == $this->unicode->uni_RLO) OR
                            ($remember[$last]['num'] == $this->unicode->uni_LRO)) {
                        $match = array_pop($remember);
                        $cel = $match['cel'];
                        $dos = $match['dos'];
                        $sor = $eor;
                        $eor = ($cel > $match['cel'] ? $cel : $match['cel']) % 2 ? 'R' : 'L';
                    }
                }
            } elseif (($ta[$i] != $this->unicode->uni_RLE) AND
                    ($ta[$i] != $this->unicode->uni_LRE) AND
                    ($ta[$i] != $this->unicode->uni_RLO) AND
                    ($ta[$i] != $this->unicode->uni_LRO) AND
                    ($ta[$i] != $this->unicode->uni_PDF)) {
                // X6. For all types besides RLE, LRE, RLO, LRO, and PDF:
                //	a. Set the level of the current character to the current embedding level.
                //	b. Whenever the directional override status is not neutral, reset the current character type to the directional override status.
                if ($dos != 'N') {
                    $chardir = $dos;
                } else {
                    if (isset($this->unicode->uni_type[$ta[$i]])) {
                        $chardir = $this->unicode->uni_type[$ta[$i]];
                    } else {
                        $chardir = 'L';
                    }
                }
                // stores string characters and other information
                $chardata[] = array('char' => $ta[$i], 'level' => $cel, 'type' => $chardir, 'sor' => $sor, 'eor' => $eor);
            }
        } // end for each char
        // X8. All explicit directional embeddings and overrides are completely terminated at the end of each paragraph. Paragraph separators are not included in the embedding.
        // X9. Remove all RLE, LRE, RLO, LRO, PDF, and BN codes.
        // X10. The remaining rules are applied to each run of characters at the same level. For each run, determine the start-of-level-run (sor) and end-of-level-run (eor) type, either L or R. This depends on the higher of the two levels on either side of the boundary (at the start or end of the paragraph, the level of the 'other' run is the base embedding level). If the higher level is odd, the type is R; otherwise, it is L.
        // 3.3.3 Resolving Weak Types
        // Weak types are now resolved one level run at a time. At level run boundaries where the type of the character on the other side of the boundary is required, the type assigned to sor or eor is used.
        // Nonspacing marks are now resolved based on the previous characters.
        $numchars = count($chardata);

        // W1. Examine each nonspacing mark (NSM) in the level run, and change the type of the NSM to the type of the previous character. If the NSM is at the start of the level run, it will get the type of sor.
        $prevlevel = -1; // track level changes
        $levcount = 0; // counts consecutive chars at the same level
        for ($i = 0; $i < $numchars; ++$i) {
            if ($chardata[$i]['type'] == 'NSM') {
                if ($levcount) {
                    $chardata[$i]['type'] = $chardata[$i]['sor'];
                } elseif ($i > 0) {
                    $chardata[$i]['type'] = $chardata[($i - 1)]['type'];
                }
            }
            if ($chardata[$i]['level'] != $prevlevel) {
                $levcount = 0;
            } else {
                ++$levcount;
            }
            $prevlevel = $chardata[$i]['level'];
        }

        // W2. Search backward from each instance of a European number until the first strong type (R, L, AL, or sor) is found. If an AL is found, change the type of the European number to Arabic number.
        $prevlevel = -1;
        $levcount = 0;
        for ($i = 0; $i < $numchars; ++$i) {
            if ($chardata[$i]['char'] == 'EN') {
                for ($j = $levcount; $j >= 0; $j--) {
                    if ($chardata[$j]['type'] == 'AL') {
                        $chardata[$i]['type'] = 'AN';
                    } elseif (($chardata[$j]['type'] == 'L') OR ($chardata[$j]['type'] == 'R')) {
                        break;
                    }
                }
            }
            if ($chardata[$i]['level'] != $prevlevel) {
                $levcount = 0;
            } else {
                ++$levcount;
            }
            $prevlevel = $chardata[$i]['level'];
        }

        // W3. Change all ALs to R.
        for ($i = 0; $i < $numchars; ++$i) {
            if ($chardata[$i]['type'] == 'AL') {
                $chardata[$i]['type'] = 'R';
            }
        }

        // W4. A single European separator between two European numbers changes to a European number. A single common separator between two numbers of the same type changes to that type.
        $prevlevel = -1;
        $levcount = 0;
        for ($i = 0; $i < $numchars; ++$i) {
            if (($levcount > 0) AND (($i + 1) < $numchars) AND ($chardata[($i + 1)]['level'] == $prevlevel)) {
                if (($chardata[$i]['type'] == 'ES') AND ($chardata[($i - 1)]['type'] == 'EN') AND ($chardata[($i + 1)]['type'] == 'EN')) {
                    $chardata[$i]['type'] = 'EN';
                } elseif (($chardata[$i]['type'] == 'CS') AND ($chardata[($i - 1)]['type'] == 'EN') AND ($chardata[($i + 1)]['type'] == 'EN')) {
                    $chardata[$i]['type'] = 'EN';
                } elseif (($chardata[$i]['type'] == 'CS') AND ($chardata[($i - 1)]['type'] == 'AN') AND ($chardata[($i + 1)]['type'] == 'AN')) {
                    $chardata[$i]['type'] = 'AN';
                }
            }
            if ($chardata[$i]['level'] != $prevlevel) {
                $levcount = 0;
            } else {
                ++$levcount;
            }
            $prevlevel = $chardata[$i]['level'];
        }

        // W5. A sequence of European terminators adjacent to European numbers changes to all European numbers.
        $prevlevel = -1;
        $levcount = 0;
        for ($i = 0; $i < $numchars; ++$i) {
            if ($chardata[$i]['type'] == 'ET') {
                if (($levcount > 0) AND ($chardata[($i - 1)]['type'] == 'EN')) {
                    $chardata[$i]['type'] = 'EN';
                } else {
                    $j = $i + 1;
                    while (($j < $numchars) AND ($chardata[$j]['level'] == $prevlevel)) {
                        if ($chardata[$j]['type'] == 'EN') {
                            $chardata[$i]['type'] = 'EN';
                            break;
                        } elseif ($chardata[$j]['type'] != 'ET') {
                            break;
                        }
                        ++$j;
                    }
                }
            }
            if ($chardata[$i]['level'] != $prevlevel) {
                $levcount = 0;
            } else {
                ++$levcount;
            }
            $prevlevel = $chardata[$i]['level'];
        }

        // W6. Otherwise, separators and terminators change to Other Neutral.
        $prevlevel = -1;
        $levcount = 0;
        for ($i = 0; $i < $numchars; ++$i) {
            if (($chardata[$i]['type'] == 'ET') OR ($chardata[$i]['type'] == 'ES') OR ($chardata[$i]['type'] == 'CS')) {
                $chardata[$i]['type'] = 'ON';
            }
            if ($chardata[$i]['level'] != $prevlevel) {
                $levcount = 0;
            } else {
                ++$levcount;
            }
            $prevlevel = $chardata[$i]['level'];
        }

        //W7. Search backward from each instance of a European number until the first strong type (R, L, or sor) is found. If an L is found, then change the type of the European number to L.
        $prevlevel = -1;
        $levcount = 0;
        for ($i = 0; $i < $numchars; ++$i) {
            if ($chardata[$i]['char'] == 'EN') {
                for ($j = $levcount; $j >= 0; $j--) {
                    if ($chardata[$j]['type'] == 'L') {
                        $chardata[$i]['type'] = 'L';
                    } elseif ($chardata[$j]['type'] == 'R') {
                        break;
                    }
                }
            }
            if ($chardata[$i]['level'] != $prevlevel) {
                $levcount = 0;
            } else {
                ++$levcount;
            }
            $prevlevel = $chardata[$i]['level'];
        }

        // N1. A sequence of neutrals takes the direction of the surrounding strong text if the text on both sides has the same direction. European and Arabic numbers act as if they were R in terms of their influence on neutrals. Start-of-level-run (sor) and end-of-level-run (eor) are used at level run boundaries.
        $prevlevel = -1;
        $levcount = 0;
        for ($i = 0; $i < $numchars; ++$i) {
            if (($levcount > 0) AND (($i + 1) < $numchars) AND ($chardata[($i + 1)]['level'] == $prevlevel)) {
                if (($chardata[$i]['type'] == 'N') AND ($chardata[($i - 1)]['type'] == 'L') AND ($chardata[($i + 1)]['type'] == 'L')) {
                    $chardata[$i]['type'] = 'L';
                } elseif (($chardata[$i]['type'] == 'N') AND
                        (($chardata[($i - 1)]['type'] == 'R') OR ($chardata[($i - 1)]['type'] == 'EN') OR ($chardata[($i - 1)]['type'] == 'AN')) AND
                        (($chardata[($i + 1)]['type'] == 'R') OR ($chardata[($i + 1)]['type'] == 'EN') OR ($chardata[($i + 1)]['type'] == 'AN'))) {
                    $chardata[$i]['type'] = 'R';
                } elseif ($chardata[$i]['type'] == 'N') {
                    // N2. Any remaining neutrals take the embedding direction
                    $chardata[$i]['type'] = $chardata[$i]['sor'];
                }
            } elseif (($levcount == 0) AND (($i + 1) < $numchars) AND ($chardata[($i + 1)]['level'] == $prevlevel)) {
                // first char
                if (($chardata[$i]['type'] == 'N') AND ($chardata[$i]['sor'] == 'L') AND ($chardata[($i + 1)]['type'] == 'L')) {
                    $chardata[$i]['type'] = 'L';
                } elseif (($chardata[$i]['type'] == 'N') AND
                        (($chardata[$i]['sor'] == 'R') OR ($chardata[$i]['sor'] == 'EN') OR ($chardata[$i]['sor'] == 'AN')) AND
                        (($chardata[($i + 1)]['type'] == 'R') OR ($chardata[($i + 1)]['type'] == 'EN') OR ($chardata[($i + 1)]['type'] == 'AN'))) {
                    $chardata[$i]['type'] = 'R';
                } elseif ($chardata[$i]['type'] == 'N') {
                    // N2. Any remaining neutrals take the embedding direction
                    $chardata[$i]['type'] = $chardata[$i]['sor'];
                }
            } elseif (($levcount > 0) AND ((($i + 1) == $numchars) OR (($i + 1) < $numchars) AND ($chardata[($i + 1)]['level'] != $prevlevel))) {
                //last char
                if (($chardata[$i]['type'] == 'N') AND ($chardata[($i - 1)]['type'] == 'L') AND ($chardata[$i]['eor'] == 'L')) {
                    $chardata[$i]['type'] = 'L';
                } elseif (($chardata[$i]['type'] == 'N') AND
                        (($chardata[($i - 1)]['type'] == 'R') OR ($chardata[($i - 1)]['type'] == 'EN') OR ($chardata[($i - 1)]['type'] == 'AN')) AND
                        (($chardata[$i]['eor'] == 'R') OR ($chardata[$i]['eor'] == 'EN') OR ($chardata[$i]['eor'] == 'AN'))) {
                    $chardata[$i]['type'] = 'R';
                } elseif ($chardata[$i]['type'] == 'N') {
                    // N2. Any remaining neutrals take the embedding direction
                    $chardata[$i]['type'] = $chardata[$i]['sor'];
                }
            } elseif ($chardata[$i]['type'] == 'N') {
                // N2. Any remaining neutrals take the embedding direction
                $chardata[$i]['type'] = $chardata[$i]['sor'];
            }
            if ($chardata[$i]['level'] != $prevlevel) {
                $levcount = 0;
            } else {
                ++$levcount;
            }
            $prevlevel = $chardata[$i]['level'];
        }

        // I1. For all characters with an even (left-to-right) embedding direction, those of type R go up one level and those of type AN or EN go up two levels.
        // I2. For all characters with an odd (right-to-left) embedding direction, those of type L, EN or AN go up one level.
        for ($i = 0; $i < $numchars; ++$i) {
            $odd = $chardata[$i]['level'] % 2;
            if ($odd) {
                if (($chardata[$i]['type'] == 'L') OR ($chardata[$i]['type'] == 'AN') OR ($chardata[$i]['type'] == 'EN')) {
                    $chardata[$i]['level'] += 1;
                }
            } else {
                if ($chardata[$i]['type'] == 'R') {
                    $chardata[$i]['level'] += 1;
                } elseif (($chardata[$i]['type'] == 'AN') OR ($chardata[$i]['type'] == 'EN')) {
                    $chardata[$i]['level'] += 2;
                }
            }
            $maxlevel = max($chardata[$i]['level'], $maxlevel);
        }

        // L1. On each line, reset the embedding level of the following characters to the paragraph embedding level:
        //	1. Segment separators,
        //	2. Paragraph separators,
        //	3. Any sequence of whitespace characters preceding a segment separator or paragraph separator, and
        //	4. Any sequence of white space characters at the end of the line.
        for ($i = 0; $i < $numchars; ++$i) {
            if (($chardata[$i]['type'] == 'B') OR ($chardata[$i]['type'] == 'S')) {
                $chardata[$i]['level'] = $pel;
            } elseif ($chardata[$i]['type'] == 'WS') {
                $j = $i + 1;
                while ($j < $numchars) {
                    if ((($chardata[$j]['type'] == 'B') OR ($chardata[$j]['type'] == 'S')) OR
                            (($j == ($numchars - 1)) AND ($chardata[$j]['type'] == 'WS'))) {
                        $chardata[$i]['level'] = $pel;
                        break;
                    } elseif ($chardata[$j]['type'] != 'WS') {
                        break;
                    }
                    ++$j;
                }
            }
        }

        // Arabic Shaping
        // Cursively connected scripts, such as Arabic or Syriac, require the selection of positional character shapes that depend on adjacent characters. Shaping is logically applied after the Bidirectional Algorithm is used and is limited to characters within the same directional run.
        if ($arabic) {
            $endedletter = array(1569, 1570, 1571, 1572, 1573, 1575, 1577, 1583, 1584, 1585, 1586, 1608, 1688);
            $alfletter = array(1570, 1571, 1573, 1575);
            $chardata2 = $chardata;
            $laaletter = false;
            $charAL = array();
            $x = 0;
            for ($i = 0; $i < $numchars; ++$i) {
                if (($this->unicode->uni_type[$chardata[$i]['char']] == 'AL') OR ($chardata[$i]['char'] == 32) OR ($chardata[$i]['char'] == 8204)) {
                    $charAL[$x] = $chardata[$i];
                    $charAL[$x]['i'] = $i;
                    $chardata[$i]['x'] = $x;
                    ++$x;
                }
            }
            $numAL = $x;
            for ($i = 0; $i < $numchars; ++$i) {
                $thischar = $chardata[$i];
                if ($i > 0) {
                    $prevchar = $chardata[($i - 1)];
                } else {
                    $prevchar = false;
                }
                if (($i + 1) < $numchars) {
                    $nextchar = $chardata[($i + 1)];
                } else {
                    $nextchar = false;
                }
                if ($this->unicode->uni_type[$thischar['char']] == 'AL') {
                    $x = $thischar['x'];
                    if ($x > 0) {
                        $prevchar = $charAL[($x - 1)];
                    } else {
                        $prevchar = false;
                    }
                    if (($x + 1) < $numAL) {
                        $nextchar = $charAL[($x + 1)];
                    } else {
                        $nextchar = false;
                    }
                    // if laa letter
                    if (($prevchar !== false) AND ($prevchar['char'] == 1604) AND (in_array($thischar['char'], $alfletter))) {
                        $arabicarr = $this->unicode->uni_laa_array;
                        $laaletter = true;
                        if ($x > 1) {
                            $prevchar = $charAL[($x - 2)];
                        } else {
                            $prevchar = false;
                        }
                    } else {
                        $arabicarr = $this->unicode->uni_arabicsubst;
                        $laaletter = false;
                    }
                    if (($prevchar !== false) AND ($nextchar !== false) AND
                            (($this->unicode->uni_type[$prevchar['char']] == 'AL') OR ($this->unicode->uni_type[$prevchar['char']] == 'NSM')) AND
                            (($this->unicode->uni_type[$nextchar['char']] == 'AL') OR ($this->unicode->uni_type[$nextchar['char']] == 'NSM')) AND
                            ($prevchar['type'] == $thischar['type']) AND
                            ($nextchar['type'] == $thischar['type']) AND
                            ($nextchar['char'] != 1567)) {
                        if (in_array($prevchar['char'], $endedletter)) {
                            if (isset($arabicarr[$thischar['char']][2])) {
                                // initial
                                $chardata2[$i]['char'] = $arabicarr[$thischar['char']][2];
                            }
                        } else {
                            if (isset($arabicarr[$thischar['char']][3])) {
                                // medial
                                $chardata2[$i]['char'] = $arabicarr[$thischar['char']][3];
                            }
                        }
                    } elseif (($nextchar !== false) AND
                            (($this->unicode->uni_type[$nextchar['char']] == 'AL') OR ($this->unicode->uni_type[$nextchar['char']] == 'NSM')) AND
                            ($nextchar['type'] == $thischar['type']) AND
                            ($nextchar['char'] != 1567)) {
                        if (isset($arabicarr[$chardata[$i]['char']][2])) {
                            // initial
                            $chardata2[$i]['char'] = $arabicarr[$thischar['char']][2];
                        }
                    } elseif ((($prevchar !== false) AND
                            (($this->unicode->uni_type[$prevchar['char']] == 'AL') OR ($this->unicode->uni_type[$prevchar['char']] == 'NSM')) AND
                            ($prevchar['type'] == $thischar['type'])) OR
                            (($nextchar !== false) AND ($nextchar['char'] == 1567))) {
                        // final
                        if (($i > 1) AND ($thischar['char'] == 1607) AND
                                ($chardata[$i - 1]['char'] == 1604) AND
                                ($chardata[$i - 2]['char'] == 1604)) {
                            //Allah Word
                            // mark characters to delete with false
                            $chardata2[$i - 2]['char'] = false;
                            $chardata2[$i - 1]['char'] = false;
                            $chardata2[$i]['char'] = 65010;
                        } else {
                            if (($prevchar !== false) AND in_array($prevchar['char'], $endedletter)) {
                                if (isset($arabicarr[$thischar['char']][0])) {
                                    // isolated
                                    $chardata2[$i]['char'] = $arabicarr[$thischar['char']][0];
                                }
                            } else {
                                if (isset($arabicarr[$thischar['char']][1])) {
                                    // final
                                    $chardata2[$i]['char'] = $arabicarr[$thischar['char']][1];
                                }
                            }
                        }
                    } elseif (isset($arabicarr[$thischar['char']][0])) {
                        // isolated
                        $chardata2[$i]['char'] = $arabicarr[$thischar['char']][0];
                    }
                    // if laa letter
                    if ($laaletter) {
                        // mark characters to delete with false
                        $chardata2[($charAL[($x - 1)]['i'])]['char'] = false;
                    }
                } // end if AL (Arabic Letter)
            } // end for each char
            /*
             * Combining characters that can occur with Arabic Shadda (0651 HEX, 1617 DEC) are replaced.
             * Putting the combining mark and shadda in the same glyph allows us to avoid the two marks overlapping each other in an illegible manner.
             */
            for ($i = 0; $i < ($numchars - 1); ++$i) {
                if (($chardata2[$i]['char'] == 1617) AND (isset($this->unicode->uni_diacritics[($chardata2[$i + 1]['char'])]))) {
                    // check if the subtitution font is defined on current font
                    if (isset($this->CurrentFont['cw'][($this->unicode->uni_diacritics[($chardata2[$i + 1]['char'])])])) {
                        $chardata2[$i]['char'] = false;
                        $chardata2[$i + 1]['char'] = $this->unicode->uni_diacritics[($chardata2[$i + 1]['char'])];
                    }
                }
            }
            // remove marked characters
            foreach ($chardata2 as $key => $value) {
                if ($value['char'] === false) {
                    unset($chardata2[$key]);
                }
            }
            $chardata = array_values($chardata2);
            $numchars = count($chardata);
            unset($chardata2);
            unset($arabicarr);
            unset($laaletter);
            unset($charAL);
        }

        // L2. From the highest level found in the text to the lowest odd level on each line, including intermediate levels not actually present in the text, reverse any contiguous sequence of characters that are at that level or higher.
        for ($j = $maxlevel; $j > 0; $j--) {
            $ordarray = Array();
            $revarr = Array();
            $onlevel = false;
            for ($i = 0; $i < $numchars; ++$i) {
                if ($chardata[$i]['level'] >= $j) {
                    $onlevel = true;
                    if (isset($this->unicode->uni_mirror[$chardata[$i]['char']])) {
                        // L4. A character is depicted by a mirrored glyph if and only if (a) the resolved directionality of that character is R, and (b) the Bidi_Mirrored property value of that character is true.
                        $chardata[$i]['char'] = $this->unicode->uni_mirror[$chardata[$i]['char']];
                    }
                    $revarr[] = $chardata[$i];
                } else {
                    if ($onlevel) {
                        $revarr = array_reverse($revarr);
                        $ordarray = array_merge($ordarray, $revarr);
                        $revarr = Array();
                        $onlevel = false;
                    }
                    $ordarray[] = $chardata[$i];
                }
            }
            if ($onlevel) {
                $revarr = array_reverse($revarr);
                $ordarray = array_merge($ordarray, $revarr);
            }
            $chardata = $ordarray;
        }

        $ordarray = array();
        for ($i = 0; $i < $numchars; ++$i) {
            $ordarray[] = $chardata[$i]['char'];
            // store char values for subsetting
            $this->CurrentFont['subsetchars'][$chardata[$i]['char']] = true;
        }
        // update font subsetchars
        $this->setFontSubBuffer($this->CurrentFont['fontkey'], 'subsetchars', $this->CurrentFont['subsetchars']);
        return $ordarray;
    }

    // END OF BIDIRECTIONAL TEXT SECTION -------------------

    /**
     * Encode a name object.
     * @param $name (string) Name object to encode.
     * @return (string) Encoded name object.
     * @protected
     * @author Nicola Asuni
     * @since 5.9.097 (2011-06-23)
     */
    protected function encodeNameObject($name) {
        $escname = '';
        $length = strlen($name);
        for ($i = 0; $i < $length; ++$i) {
            $chr = $name[$i];
            if (preg_match('/[0-9a-zA-Z]/', $chr) == 1) {
                $escname .= $chr;
            } else {
                $escname .= sprintf('#%02X', ord($chr));
            }
        }
        return $escname;
    }

    /**
     * Add a Named Destination.
     * NOTE: destination names are unique, so only last entry will be saved.
     * @param $name (string) Destination name.
     * @param $y (float) Y position in user units of the destiantion on the selected page (default = -1 = current position; 0 = page start;).
     * @param $page (int) Target page number (leave empty for current page).
     * @param $x (float) X position in user units of the destiantion on the selected page (default = -1 = current position;).
     * @return (string) Stripped named destination identifier or false in case of error.
     * @public
     * @author Christian Deligant, Nicola Asuni
     * @since 5.9.097 (2011-06-23)
     */
    public function setDestination($name, $y = -1, $page = '', $x = -1) {
        // remove unsupported characters
        $name = $this->encodeNameObject($name);
        if ($this->empty_string($name)) {
            return false;
        }
        if ($y == -1) {
            $y = $this->GetY();
        } elseif ($y < 0) {
            $y = 0;
        } elseif ($y > $this->h) {
            $y = $this->h;
        }
        if ($x == -1) {
            $x = $this->GetX();
        } elseif ($x < 0) {
            $x = 0;
        } elseif ($x > $this->w) {
            $x = $this->w;
        }
        if (empty($page)) {
            $page = $this->PageNo();
            if (empty($page)) {
                return;
            }
        }
        $this->dests[$name] = array('x' => $x, 'y' => $y, 'p' => $page);
        return $name;
    }

    /**
     * Return the Named Destination array.
     * @return (array) Named Destination array.
     * @public
     * @author Nicola Asuni
     * @since 5.9.097 (2011-06-23)
     */
    public function getDestination() {
        return $this->dests;
    }

    /**
     * Insert Named Destinations.
     * @protected
     * @author Johannes G�ntert, Nicola Asuni
     * @since 5.9.098 (2011-06-23)
     */
    protected function _putdests() {
        if (empty($this->dests)) {
            return;
        }
        $this->n_dests = $this->_newobj();
        $out = ' <<';
        foreach ($this->dests as $name => $o) {
            $out .= ' /' . $name . ' ' . sprintf('[%u 0 R /XYZ %F %F null]', $this->page_obj_id[($o['p'])], ($o['x'] * $this->k), ($this->pagedim[$o['p']]['h'] - ($o['y'] * $this->k)));
        }
        $out .= ' >>';
        $out .= "\n" . 'endobj';
        $this->_out($out);
    }

    /**
     * Adds a bookmark - alias for Bookmark().
     * @param $txt (string) Bookmark description.
     * @param $level (int) Bookmark level (minimum value is 0).
     * @param $y (float) Y position in user units of the bookmark on the selected page (default = -1 = current position; 0 = page start;).
     * @param $page (int) Target page number (leave empty for current page).
     * @param $style (string) Font style: B = Bold, I = Italic, BI = Bold + Italic.
     * @param $color (array) RGB color array (values from 0 to 255).
     * @public
     */
    public function setBookmark($txt, $level = 0, $y = -1, $page = '', $style = '', $color = array(0, 0, 0)) {
        $this->Bookmark($txt, $level, $y, $page, $style, $color);
    }

    /**
     * Adds a bookmark.
     * @param $txt (string) Bookmark description.
     * @param $level (int) Bookmark level (minimum value is 0).
     * @param $y (float) Y position in user units of the bookmark on the selected page (default = -1 = current position; 0 = page start;).
     * @param $page (int) Target page number (leave empty for current page).
     * @param $style (string) Font style: B = Bold, I = Italic, BI = Bold + Italic.
     * @param $color (array) RGB color array (values from 0 to 255).
     * @param $x (float) X position in user units of the bookmark on the selected page (default = -1 = current position;).
     * @public
     * @author Olivier Plathey, Nicola Asuni
     * @since 2.1.002 (2008-02-12)
     */
    public function Bookmark($txt, $level = 0, $y = -1, $page = '', $style = '', $color = array(0, 0, 0), $x = -1) {
        if ($level < 0) {
            $level = 0;
        }
        if (isset($this->outlines[0])) {
            $lastoutline = end($this->outlines);
            $maxlevel = $lastoutline['l'] + 1;
        } else {
            $maxlevel = 0;
        }
        if ($level > $maxlevel) {
            $level = $maxlevel;
        }
        if ($y == -1) {
            $y = $this->GetY();
        } elseif ($y < 0) {
            $y = 0;
        } elseif ($y > $this->h) {
            $y = $this->h;
        }
        if ($x == -1) {
            $x = $this->GetX();
        } elseif ($x < 0) {
            $x = 0;
        } elseif ($x > $this->w) {
            $x = $this->w;
        }
        if (empty($page)) {
            $page = $this->PageNo();
            if (empty($page)) {
                return;
            }
        }
        $this->outlines[] = array('t' => $txt, 'l' => $level, 'x' => $x, 'y' => $y, 'p' => $page, 's' => strtoupper($style), 'c' => $color);
    }

    /**
     * Sort bookmarks for page and key.
     * @protected
     * @since 5.9.119 (2011-09-19)
     */
    protected function sortBookmarks() {
        // get sorting columns
        $outline_p = array();
        $outline_y = array();
        foreach ($this->outlines as $key => $row) {
            $outline_p[$key] = $row['p'];
            $outline_k[$key] = $key;
        }
        // sort outlines by page and original position
        array_multisort($outline_p, SORT_NUMERIC, SORT_ASC, $outline_k, SORT_NUMERIC, SORT_ASC, $this->outlines);
    }

    /**
     * Create a bookmark PDF string.
     * @protected
     * @author Olivier Plathey, Nicola Asuni
     * @since 2.1.002 (2008-02-12)
     */
    protected function _putbookmarks() {
        $nb = count($this->outlines);
        if ($nb == 0) {
            return;
        }
        // sort bookmarks
        $this->sortBookmarks();
        $lru = array();
        $level = 0;
        foreach ($this->outlines as $i => $o) {
            if ($o['l'] > 0) {
                $parent = $lru[($o['l'] - 1)];
                //Set parent and last pointers
                $this->outlines[$i]['parent'] = $parent;
                $this->outlines[$parent]['last'] = $i;
                if ($o['l'] > $level) {
                    //Level increasing: set first pointer
                    $this->outlines[$parent]['first'] = $i;
                }
            } else {
                $this->outlines[$i]['parent'] = $nb;
            }
            if (($o['l'] <= $level) AND ($i > 0)) {
                //Set prev and next pointers
                $prev = $lru[$o['l']];
                $this->outlines[$prev]['next'] = $i;
                $this->outlines[$i]['prev'] = $prev;
            }
            $lru[$o['l']] = $i;
            $level = $o['l'];
        }
        //Outline items
        $n = $this->n + 1;
        $nltags = '/<br[\s]?\/>|<\/(blockquote|dd|dl|div|dt|h1|h2|h3|h4|h5|h6|hr|li|ol|p|pre|ul|tcpdf|table|tr|td)>/si';
        foreach ($this->outlines as $i => $o) {
            $oid = $this->_newobj();
            // covert HTML title to string
            $title = preg_replace($nltags, "\n", $o['t']);
            $title = preg_replace("/[\r]+/si", '', $title);
            $title = preg_replace("/[\n]+/si", "\n", $title);
            $title = strip_tags($title);
            $title = $this->stringTrim($title);
            $out = '<</Title ' . $this->_textstring($title, $oid);
            $out .= ' /Parent ' . ($n + $o['parent']) . ' 0 R';
            if (isset($o['prev'])) {
                $out .= ' /Prev ' . ($n + $o['prev']) . ' 0 R';
            }
            if (isset($o['next'])) {
                $out .= ' /Next ' . ($n + $o['next']) . ' 0 R';
            }
            if (isset($o['first'])) {
                $out .= ' /First ' . ($n + $o['first']) . ' 0 R';
            }
            if (isset($o['last'])) {
                $out .= ' /Last ' . ($n + $o['last']) . ' 0 R';
            }
            if (isset($this->page_obj_id[($o['p'])])) {
                $out .= ' ' . sprintf('/Dest [%u 0 R /XYZ %F %F null]', $this->page_obj_id[($o['p'])], ($o['x'] * $this->k), ($this->pagedim[$o['p']]['h'] - ($o['y'] * $this->k)));
            }
            // set font style
            $style = 0;
            if (!empty($o['s'])) {
                // bold
                if (strpos($o['s'], 'B') !== false) {
                    $style |= 2;
                }
                // oblique
                if (strpos($o['s'], 'I') !== false) {
                    $style |= 1;
                }
            }
            $out .= sprintf(' /F %d', $style);
            // set bookmark color
            if (isset($o['c']) AND is_array($o['c']) AND (count($o['c']) == 3)) {
                $color = array_values($o['c']);
                $out .= sprintf(' /C [%F %F %F]', ($color[0] / 255), ($color[1] / 255), ($color[2] / 255));
            } else {
                // black
                $out .= ' /C [0.0 0.0 0.0]';
            }
            $out .= ' /Count 0'; // normally closed item
            $out .= ' >>';
            $out .= "\n" . 'endobj';
            $this->_out($out);
        }
        //Outline root
        $this->OutlineRoot = $this->_newobj();
        $this->_out('<< /Type /Outlines /First ' . $n . ' 0 R /Last ' . ($n + $lru[0]) . ' 0 R >>' . "\n" . 'endobj');
    }

    // --- JAVASCRIPT ------------------------------------------------------

    /**
     * Adds a javascript
     * @param $script (string) Javascript code
     * @public
     * @author Johannes G�ntert, Nicola Asuni
     * @since 2.1.002 (2008-02-12)
     */
    public function IncludeJS($script) {
        $this->javascript .= $script;
    }

    /**
     * Adds a javascript object and return object ID
     * @param $script (string) Javascript code
     * @param $onload (boolean) if true executes this object when opening the document
     * @return int internal object ID
     * @public
     * @author Nicola Asuni
     * @since 4.8.000 (2009-09-07)
     */
    public function addJavascriptObject($script, $onload = false) {
        if ($this->pdfa_mode) {
            // javascript is not allowed in PDF/A mode
            return false;
        }
        ++$this->n;
        $this->js_objects[$this->n] = array('n' => $this->n, 'js' => $script, 'onload' => $onload);
        return $this->n;
    }

    /**
     * Create a javascript PDF string.
     * @protected
     * @author Johannes G�ntert, Nicola Asuni
     * @since 2.1.002 (2008-02-12)
     */
    protected function _putjavascript() {
        if ($this->pdfa_mode OR (empty($this->javascript) AND empty($this->js_objects))) {
            return;
        }
        if (strpos($this->javascript, 'this.addField') > 0) {
            if (!$this->ur['enabled']) {
                //$this->setUserRights();
            }
            // the following two lines are used to avoid form fields duplication after saving
            // The addField method only works when releasing user rights (UR3)
            $jsa = sprintf("ftcpdfdocsaved=this.addField('%s','%s',%d,[%F,%F,%F,%F]);", 'tcpdfdocsaved', 'text', 0, 0, 1, 0, 1);
            $jsb = "getField('tcpdfdocsaved').value='saved';";
            $this->javascript = $jsa . "\n" . $this->javascript . "\n" . $jsb;
        }
        $this->n_js = $this->_newobj();
        $out = ' << /Names [';
        if (!empty($this->javascript)) {
            $out .= ' (EmbeddedJS) ' . ($this->n + 1) . ' 0 R';
        }
        if (!empty($this->js_objects)) {
            foreach ($this->js_objects as $key => $val) {
                if ($val['onload']) {
                    $out .= ' (JS' . $key . ') ' . $key . ' 0 R';
                }
            }
        }
        $out .= ' ] >>';
        $out .= "\n" . 'endobj';
        $this->_out($out);
        // default Javascript object
        if (!empty($this->javascript)) {
            $obj_id = $this->_newobj();
            $out = '<< /S /JavaScript';
            $out .= ' /JS ' . $this->_textstring($this->javascript, $obj_id);
            $out .= ' >>';
            $out .= "\n" . 'endobj';
            $this->_out($out);
        }
        // additional Javascript objects
        if (!empty($this->js_objects)) {
            foreach ($this->js_objects as $key => $val) {
                $out = $this->_getobj($key) . "\n" . ' << /S /JavaScript /JS ' . $this->_textstring($val['js'], $key) . ' >>' . "\n" . 'endobj';
                $this->_out($out);
            }
        }
    }

    /**
     * Convert color to javascript color.
     * @param $color (string) color name or "#RRGGBB"
     * @protected
     * @author Denis Van Nuffelen, Nicola Asuni
     * @since 2.1.002 (2008-02-12)
     */
    protected function _JScolor($color) {
        static $aColors = array('transparent', 'black', 'white', 'red', 'green', 'blue', 'cyan', 'magenta', 'yellow', 'dkGray', 'gray', 'ltGray');
        if (substr($color, 0, 1) == '#') {
            return sprintf("['RGB',%F,%F,%F]", hexdec(substr($color, 1, 2)) / 255, hexdec(substr($color, 3, 2)) / 255, hexdec(substr($color, 5, 2)) / 255);
        }
        if (!in_array($color, $aColors)) {
            $this->Error('Invalid color: ' . $color);
        }
        return 'color.' . $color;
    }

    /**
     * Adds a javascript form field.
     * @param $type (string) field type
     * @param $name (string) field name
     * @param $x (int) horizontal position
     * @param $y (int) vertical position
     * @param $w (int) width
     * @param $h (int) height
     * @param $prop (array) javascript field properties. Possible values are described on official Javascript for Acrobat API reference.
     * @protected
     * @author Denis Van Nuffelen, Nicola Asuni
     * @since 2.1.002 (2008-02-12)
     */
    protected function _addfield($type, $name, $x, $y, $w, $h, $prop) {
        if ($this->rtl) {
            $x = $x - $w;
        }
        // the followind avoid fields duplication after saving the document
        $this->javascript .= "if (getField('tcpdfdocsaved').value != 'saved') {";
        $k = $this->k;
        $this->javascript .= sprintf("f" . $name . "=this.addField('%s','%s',%u,[%F,%F,%F,%F]);", $name, $type, $this->PageNo() - 1, $x * $k, ($this->h - $y) * $k + 1, ($x + $w) * $k, ($this->h - $y - $h) * $k + 1) . "\n";
        $this->javascript .= 'f' . $name . '.textSize=' . $this->FontSizePt . ";\n";
        while (list($key, $val) = each($prop)) {
            if (strcmp(substr($key, -5), 'Color') == 0) {
                $val = $this->_JScolor($val);
            } else {
                $val = "'" . $val . "'";
            }
            $this->javascript .= 'f' . $name . '.' . $key . '=' . $val . ";\n";
        }
        if ($this->rtl) {
            $this->x -= $w;
        } else {
            $this->x += $w;
        }
        $this->javascript .= '}';
    }

    // --- FORM FIELDS -----------------------------------------------------

    /**
     * Convert JavaScript form fields properties array to Annotation Properties array.
     * @param $prop (array) javascript field properties. Possible values are described on official Javascript for Acrobat API reference.
     * @return array of annotation properties
     * @protected
     * @author Nicola Asuni
     * @since 4.8.000 (2009-09-06)
     */
    protected function getAnnotOptFromJSProp($prop) {
        if (isset($prop['aopt']) AND is_array($prop['aopt'])) {
            // the annotation options area lready defined
            return $prop['aopt'];
        }
        $opt = array(); // value to be returned
        // alignment: Controls how the text is laid out within the text field.
        if (isset($prop['alignment'])) {
            switch ($prop['alignment']) {
                case 'left': {
                        $opt['q'] = 0;
                        break;
                    }
                case 'center': {
                        $opt['q'] = 1;
                        break;
                    }
                case 'right': {
                        $opt['q'] = 2;
                        break;
                    }
                default: {
                        $opt['q'] = ($this->rtl) ? 2 : 0;
                        break;
                    }
            }
        }
        // lineWidth: Specifies the thickness of the border when stroking the perimeter of a field's rectangle.
        if (isset($prop['lineWidth'])) {
            $linewidth = intval($prop['lineWidth']);
        } else {
            $linewidth = 1;
        }
        // borderStyle: The border style for a field.
        if (isset($prop['borderStyle'])) {
            switch ($prop['borderStyle']) {
                case 'border.d':
                case 'dashed': {
                        $opt['border'] = array(0, 0, $linewidth, array(3, 2));
                        $opt['bs'] = array('w' => $linewidth, 's' => 'D', 'd' => array(3, 2));
                        break;
                    }
                case 'border.b':
                case 'beveled': {
                        $opt['border'] = array(0, 0, $linewidth);
                        $opt['bs'] = array('w' => $linewidth, 's' => 'B');
                        break;
                    }
                case 'border.i':
                case 'inset': {
                        $opt['border'] = array(0, 0, $linewidth);
                        $opt['bs'] = array('w' => $linewidth, 's' => 'I');
                        break;
                    }
                case 'border.u':
                case 'underline': {
                        $opt['border'] = array(0, 0, $linewidth);
                        $opt['bs'] = array('w' => $linewidth, 's' => 'U');
                        break;
                    }
                case 'border.s':
                case 'solid': {
                        $opt['border'] = array(0, 0, $linewidth);
                        $opt['bs'] = array('w' => $linewidth, 's' => 'S');
                        break;
                    }
                default: {
                        break;
                    }
            }
        }
        if (isset($prop['border']) AND is_array($prop['border'])) {
            $opt['border'] = $prop['border'];
        }
        if (!isset($opt['mk'])) {
            $opt['mk'] = array();
        }
        if (!isset($opt['mk']['if'])) {
            $opt['mk']['if'] = array();
        }
        $opt['mk']['if']['a'] = array(0.5, 0.5);
        // buttonAlignX: Controls how space is distributed from the left of the button face with respect to the icon.
        if (isset($prop['buttonAlignX'])) {
            $opt['mk']['if']['a'][0] = $prop['buttonAlignX'];
        }
        // buttonAlignY: Controls how unused space is distributed from the bottom of the button face with respect to the icon.
        if (isset($prop['buttonAlignY'])) {
            $opt['mk']['if']['a'][1] = $prop['buttonAlignY'];
        }
        // buttonFitBounds: If true, the extent to which the icon may be scaled is set to the bounds of the button field.
        if (isset($prop['buttonFitBounds']) AND ($prop['buttonFitBounds'] == 'true')) {
            $opt['mk']['if']['fb'] = true;
        }
        // buttonScaleHow: Controls how the icon is scaled (if necessary) to fit inside the button face.
        if (isset($prop['buttonScaleHow'])) {
            switch ($prop['buttonScaleHow']) {
                case 'scaleHow.proportional': {
                        $opt['mk']['if']['s'] = 'P';
                        break;
                    }
                case 'scaleHow.anamorphic': {
                        $opt['mk']['if']['s'] = 'A';
                        break;
                    }
            }
        }
        // buttonScaleWhen: Controls when an icon is scaled to fit inside the button face.
        if (isset($prop['buttonScaleWhen'])) {
            switch ($prop['buttonScaleWhen']) {
                case 'scaleWhen.always': {
                        $opt['mk']['if']['sw'] = 'A';
                        break;
                    }
                case 'scaleWhen.never': {
                        $opt['mk']['if']['sw'] = 'N';
                        break;
                    }
                case 'scaleWhen.tooBig': {
                        $opt['mk']['if']['sw'] = 'B';
                        break;
                    }
                case 'scaleWhen.tooSmall': {
                        $opt['mk']['if']['sw'] = 'S';
                        break;
                    }
            }
        }
        // buttonPosition: Controls how the text and the icon of the button are positioned with respect to each other within the button face.
        if (isset($prop['buttonPosition'])) {
            switch ($prop['buttonPosition']) {
                case 0:
                case 'position.textOnly': {
                        $opt['mk']['tp'] = 0;
                        break;
                    }
                case 1:
                case 'position.iconOnly': {
                        $opt['mk']['tp'] = 1;
                        break;
                    }
                case 2:
                case 'position.iconTextV': {
                        $opt['mk']['tp'] = 2;
                        break;
                    }
                case 3:
                case 'position.textIconV': {
                        $opt['mk']['tp'] = 3;
                        break;
                    }
                case 4:
                case 'position.iconTextH': {
                        $opt['mk']['tp'] = 4;
                        break;
                    }
                case 5:
                case 'position.textIconH': {
                        $opt['mk']['tp'] = 5;
                        break;
                    }
                case 6:
                case 'position.overlay': {
                        $opt['mk']['tp'] = 6;
                        break;
                    }
            }
        }
        // fillColor: Specifies the background color for a field.
        if (isset($prop['fillColor'])) {
            if (is_array($prop['fillColor'])) {
                $opt['mk']['bg'] = $prop['fillColor'];
            } else {
                $opt['mk']['bg'] = $this->convertHTMLColorToDec($prop['fillColor']);
            }
        }
        // strokeColor: Specifies the stroke color for a field that is used to stroke the rectangle of the field with a line as large as the line width.
        if (isset($prop['strokeColor'])) {
            if (is_array($prop['strokeColor'])) {
                $opt['mk']['bc'] = $prop['strokeColor'];
            } else {
                $opt['mk']['bc'] = $this->convertHTMLColorToDec($prop['strokeColor']);
            }
        }
        // rotation: The rotation of a widget in counterclockwise increments.
        if (isset($prop['rotation'])) {
            $opt['mk']['r'] = $prop['rotation'];
        }
        // charLimit: Limits the number of characters that a user can type into a text field.
        if (isset($prop['charLimit'])) {
            $opt['maxlen'] = intval($prop['charLimit']);
        }
        if (!isset($ff)) {
            $ff = 0; // default value
        }
        // readonly: The read-only characteristic of a field. If a field is read-only, the user can see the field but cannot change it.
        if (isset($prop['readonly']) AND ($prop['readonly'] == 'true')) {
            $ff += 1 << 0;
        }
        // required: Specifies whether a field requires a value.
        if (isset($prop['required']) AND ($prop['required'] == 'true')) {
            $ff += 1 << 1;
        }
        // multiline: Controls how text is wrapped within the field.
        if (isset($prop['multiline']) AND ($prop['multiline'] == 'true')) {
            $ff += 1 << 12;
        }
        // password: Specifies whether the field should display asterisks when data is entered in the field.
        if (isset($prop['password']) AND ($prop['password'] == 'true')) {
            $ff += 1 << 13;
        }
        // NoToggleToOff: If set, exactly one radio button shall be selected at all times; selecting the currently selected button has no effect.
        if (isset($prop['NoToggleToOff']) AND ($prop['NoToggleToOff'] == 'true')) {
            $ff += 1 << 14;
        }
        // Radio: If set, the field is a set of radio buttons.
        if (isset($prop['Radio']) AND ($prop['Radio'] == 'true')) {
            $ff += 1 << 15;
        }
        // Pushbutton: If set, the field is a pushbutton that does not retain a permanent value.
        if (isset($prop['Pushbutton']) AND ($prop['Pushbutton'] == 'true')) {
            $ff += 1 << 16;
        }
        // Combo: If set, the field is a combo box; if clear, the field is a list box.
        if (isset($prop['Combo']) AND ($prop['Combo'] == 'true')) {
            $ff += 1 << 17;
        }
        // editable: Controls whether a combo box is editable.
        if (isset($prop['editable']) AND ($prop['editable'] == 'true')) {
            $ff += 1 << 18;
        }
        // Sort: If set, the field's option items shall be sorted alphabetically.
        if (isset($prop['Sort']) AND ($prop['Sort'] == 'true')) {
            $ff += 1 << 19;
        }
        // fileSelect: If true, sets the file-select flag in the Options tab of the text field (Field is Used for File Selection).
        if (isset($prop['fileSelect']) AND ($prop['fileSelect'] == 'true')) {
            $ff += 1 << 20;
        }
        // multipleSelection: If true, indicates that a list box allows a multiple selection of items.
        if (isset($prop['multipleSelection']) AND ($prop['multipleSelection'] == 'true')) {
            $ff += 1 << 21;
        }
        // doNotSpellCheck: If true, spell checking is not performed on this editable text field.
        if (isset($prop['doNotSpellCheck']) AND ($prop['doNotSpellCheck'] == 'true')) {
            $ff += 1 << 22;
        }
        // doNotScroll: If true, the text field does not scroll and the user, therefore, is limited by the rectangular region designed for the field.
        if (isset($prop['doNotScroll']) AND ($prop['doNotScroll'] == 'true')) {
            $ff += 1 << 23;
        }
        // comb: If set to true, the field background is drawn as series of boxes (one for each character in the value of the field) and each character of the content is drawn within those boxes. The number of boxes drawn is determined from the charLimit property. It applies only to text fields. The setter will also raise if any of the following field properties are also set multiline, password, and fileSelect. A side-effect of setting this property is that the doNotScroll property is also set.
        if (isset($prop['comb']) AND ($prop['comb'] == 'true')) {
            $ff += 1 << 24;
        }
        // radiosInUnison: If false, even if a group of radio buttons have the same name and export value, they behave in a mutually exclusive fashion, like HTML radio buttons.
        if (isset($prop['radiosInUnison']) AND ($prop['radiosInUnison'] == 'true')) {
            $ff += 1 << 25;
        }
        // richText: If true, the field allows rich text formatting.
        if (isset($prop['richText']) AND ($prop['richText'] == 'true')) {
            $ff += 1 << 25;
        }
        // commitOnSelChange: Controls whether a field value is committed after a selection change.
        if (isset($prop['commitOnSelChange']) AND ($prop['commitOnSelChange'] == 'true')) {
            $ff += 1 << 26;
        }
        $opt['ff'] = $ff;
        // defaultValue: The default value of a field - that is, the value that the field is set to when the form is reset.
        if (isset($prop['defaultValue'])) {
            $opt['dv'] = $prop['defaultValue'];
        }
        $f = 4; // default value for annotation flags
        // readonly: The read-only characteristic of a field. If a field is read-only, the user can see the field but cannot change it.
        if (isset($prop['readonly']) AND ($prop['readonly'] == 'true')) {
            $f += 1 << 6;
        }
        // display: Controls whether the field is hidden or visible on screen and in print.
        if (isset($prop['display'])) {
            if ($prop['display'] == 'display.visible') {
                //
            } elseif ($prop['display'] == 'display.hidden') {
                $f += 1 << 1;
            } elseif ($prop['display'] == 'display.noPrint') {
                $f -= 1 << 2;
            } elseif ($prop['display'] == 'display.noView') {
                $f += 1 << 5;
            }
        }
        $opt['f'] = $f;
        // currentValueIndices: Reads and writes single or multiple values of a list box or combo box.
        if (isset($prop['currentValueIndices']) AND is_array($prop['currentValueIndices'])) {
            $opt['i'] = $prop['currentValueIndices'];
        }
        // value: The value of the field data that the user has entered.
        if (isset($prop['value'])) {
            if (is_array($prop['value'])) {
                $opt['opt'] = array();
                foreach ($prop['value'] AS $key => $optval) {
                    // exportValues: An array of strings representing the export values for the field.
                    if (isset($prop['exportValues'][$key])) {
                        $opt['opt'][$key] = array($prop['exportValues'][$key], $prop['value'][$key]);
                    } else {
                        $opt['opt'][$key] = $prop['value'][$key];
                    }
                }
            } else {
                $opt['v'] = $prop['value'];
            }
        }
        // richValue: This property specifies the text contents and formatting of a rich text field.
        if (isset($prop['richValue'])) {
            $opt['rv'] = $prop['richValue'];
        }
        // submitName: If nonempty, used during form submission instead of name. Only applicable if submitting in HTML format (that is, URL-encoded).
        if (isset($prop['submitName'])) {
            $opt['tm'] = $prop['submitName'];
        }
        // name: Fully qualified field name.
        if (isset($prop['name'])) {
            $opt['t'] = $prop['name'];
        }
        // userName: The user name (short description string) of the field.
        if (isset($prop['userName'])) {
            $opt['tu'] = $prop['userName'];
        }
        // highlight: Defines how a button reacts when a user clicks it.
        if (isset($prop['highlight'])) {
            switch ($prop['highlight']) {
                case 'none':
                case 'highlight.n': {
                        $opt['h'] = 'N';
                        break;
                    }
                case 'invert':
                case 'highlight.i': {
                        $opt['h'] = 'i';
                        break;
                    }
                case 'push':
                case 'highlight.p': {
                        $opt['h'] = 'P';
                        break;
                    }
                case 'outline':
                case 'highlight.o': {
                        $opt['h'] = 'O';
                        break;
                    }
            }
        }
        // Unsupported options:
        // - calcOrderIndex: Changes the calculation order of fields in the document.
        // - delay: Delays the redrawing of a field's appearance.
        // - defaultStyle: This property defines the default style attributes for the form field.
        // - style: Allows the user to set the glyph style of a check box or radio button.
        // - textColor, textFont, textSize
        return $opt;
    }

    /**
     * Set default properties for form fields.
     * @param $prop (array) javascript field properties. Possible values are described on official Javascript for Acrobat API reference.
     * @public
     * @author Nicola Asuni
     * @since 4.8.000 (2009-09-06)
     */
    public function setFormDefaultProp($prop = array()) {
        $this->default_form_prop = $prop;
    }

    /**
     * Return the default properties for form fields.
     * @return array $prop javascript field properties. Possible values are described on official Javascript for Acrobat API reference.
     * @public
     * @author Nicola Asuni
     * @since 4.8.000 (2009-09-06)
     */
    public function getFormDefaultProp() {
        return $this->default_form_prop;
    }

    /**
     * Creates a text field
     * @param $name (string) field name
     * @param $w (float) Width of the rectangle
     * @param $h (float) Height of the rectangle
     * @param $prop (array) javascript field properties. Possible values are described on official Javascript for Acrobat API reference.
     * @param $opt (array) annotation parameters. Possible values are described on official PDF32000_2008 reference.
     * @param $x (float) Abscissa of the upper-left corner of the rectangle
     * @param $y (float) Ordinate of the upper-left corner of the rectangle
     * @param $js (boolean) if true put the field using JavaScript (requires Acrobat Writer to be rendered).
     * @public
     * @author Nicola Asuni
     * @since 4.8.000 (2009-09-07)
     */
    public function TextField($name, $w, $h, $prop = array(), $opt = array(), $x = '', $y = '', $js = false) {
        if ($x === '') {
            $x = $this->x;
        }
        if ($y === '') {
            $y = $this->y;
        }
        // check page for no-write regions and adapt page margins if necessary
        list($x, $y) = $this->checkPageRegions($h, $x, $y);
        if ($js) {
            $this->_addfield('text', $name, $x, $y, $w, $h, $prop);
            return;
        }
        // get default style
        $prop = array_merge($this->getFormDefaultProp(), $prop);
        // get annotation data
        $popt = $this->getAnnotOptFromJSProp($prop);
        // set default appearance stream
        $this->annotation_fonts[$this->CurrentFont['fontkey']] = $this->CurrentFont['i'];
        $fontstyle = sprintf('/F%d %F Tf %s', $this->CurrentFont['i'], $this->FontSizePt, $this->TextColor);
        $popt['da'] = $fontstyle;
        // build appearance stream
        $popt['ap'] = array();
        $popt['ap']['n'] = '/Tx BMC q ' . $fontstyle . ' ';
        $text = '';
        if (isset($prop['value']) AND !empty($prop['value'])) {
            $text = $prop['value'];
        } elseif (isset($opt['v']) AND !empty($opt['v'])) {
            $text = $opt['v'];
        }
        $tmpid = $this->startTemplate($w, $h, false);
        $align = '';
        if (isset($popt['q'])) {
            switch ($popt['q']) {
                case 0: {
                        $align = 'L';
                        break;
                    }
                case 1: {
                        $align = 'C';
                        break;
                    }
                case 2: {
                        $align = 'R';
                        break;
                    }
                default: {
                        $align = '';
                        break;
                    }
            }
        }
        $this->MultiCell($w, $h, $text, 0, $align, false, 0, 0, 0, true, 0, false, true, 0, 'T', false);
        $this->endTemplate();
        --$this->n;
        $popt['ap']['n'] .= $this->xobjects[$tmpid]['outdata'];
        unset($this->xobjects[$tmpid]);
        $popt['ap']['n'] .= 'Q EMC';
        // merge options
        $opt = array_merge($popt, $opt);
        // remove some conflicting options
        unset($opt['bs']);
        // set remaining annotation data
        $opt['Subtype'] = 'Widget';
        $opt['ft'] = 'Tx';
        $opt['t'] = $name;
        // Additional annotation's parameters (check _putannotsobj() method):
        //$opt['f']
        //$opt['as']
        //$opt['bs']
        //$opt['be']
        //$opt['c']
        //$opt['border']
        //$opt['h']
        //$opt['mk'];
        //$opt['mk']['r']
        //$opt['mk']['bc'];
        //$opt['mk']['bg'];
        unset($opt['mk']['ca']);
        unset($opt['mk']['rc']);
        unset($opt['mk']['ac']);
        unset($opt['mk']['i']);
        unset($opt['mk']['ri']);
        unset($opt['mk']['ix']);
        unset($opt['mk']['if']);
        //$opt['mk']['if']['sw'];
        //$opt['mk']['if']['s'];
        //$opt['mk']['if']['a'];
        //$opt['mk']['if']['fb'];
        unset($opt['mk']['tp']);
        //$opt['tu']
        //$opt['tm']
        //$opt['ff']
        //$opt['v']
        //$opt['dv']
        //$opt['a']
        //$opt['aa']
        //$opt['q']
        $this->Annotation($x, $y, $w, $h, $name, $opt, 0);
        if ($this->rtl) {
            $this->x -= $w;
        } else {
            $this->x += $w;
        }
    }

    /**
     * Creates a RadioButton field.
     * @param $name (string) Field name.
     * @param $w (int) Width of the radio button.
     * @param $prop (array) Javascript field properties. Possible values are described on official Javascript for Acrobat API reference.
     * @param $opt (array) Annotation parameters. Possible values are described on official PDF32000_2008 reference.
     * @param $onvalue (string) Value to be returned if selected.
     * @param $checked (boolean) Define the initial state.
     * @param $x (float) Abscissa of the upper-left corner of the rectangle
     * @param $y (float) Ordinate of the upper-left corner of the rectangle
     * @param $js (boolean) If true put the field using JavaScript (requires Acrobat Writer to be rendered).
     * @public
     * @author Nicola Asuni
     * @since 4.8.000 (2009-09-07)
     */
    public function RadioButton($name, $w, $prop = array(), $opt = array(), $onvalue = 'On', $checked = false, $x = '', $y = '', $js = false) {
        if ($x === '') {
            $x = $this->x;
        }
        if ($y === '') {
            $y = $this->y;
        }
        // check page for no-write regions and adapt page margins if necessary
        list($x, $y) = $this->checkPageRegions($w, $x, $y);
        if ($js) {
            $this->_addfield('radiobutton', $name, $x, $y, $w, $w, $prop);
            return;
        }
        if ($this->empty_string($onvalue)) {
            $onvalue = 'On';
        }
        if ($checked) {
            $defval = $onvalue;
        } else {
            $defval = 'Off';
        }
        // set font
        $font = 'zapfdingbats';
        if ($this->pdfa_mode) {
            // all fonts must be embedded
            $font = 'pdfa' . $font;
        }
        $this->AddFont($font);
        $tmpfont = $this->getFontBuffer($font);
        // set data for parent group
        if (!isset($this->radiobutton_groups[$this->page])) {
            $this->radiobutton_groups[$this->page] = array();
        }
        if (!isset($this->radiobutton_groups[$this->page][$name])) {
            $this->radiobutton_groups[$this->page][$name] = array();
            ++$this->n;
            $this->radiobutton_groups[$this->page][$name]['n'] = $this->n;
            $this->radio_groups[] = $this->n;
        }
        $kid = ($this->n + 1);
        // save object ID to be added on Kids entry on parent object
        $this->radiobutton_groups[$this->page][$name][] = array('kid' => $kid, 'def' => $defval);
        // get default style
        $prop = array_merge($this->getFormDefaultProp(), $prop);
        $prop['NoToggleToOff'] = 'true';
        $prop['Radio'] = 'true';
        $prop['borderStyle'] = 'inset';
        // get annotation data
        $popt = $this->getAnnotOptFromJSProp($prop);
        // set additional default options
        $this->annotation_fonts[$tmpfont['fontkey']] = $tmpfont['i'];
        $fontstyle = sprintf('/F%d %F Tf %s', $tmpfont['i'], $this->FontSizePt, $this->TextColor);
        $popt['da'] = $fontstyle;
        // build appearance stream
        $popt['ap'] = array();
        $popt['ap']['n'] = array();
        $fx = ((($w - $this->getAbsFontMeasure($tmpfont['cw'][108])) / 2) * $this->k);
        $fy = (($w - ((($tmpfont['desc']['Ascent'] - $tmpfont['desc']['Descent']) * $this->FontSizePt / 1000) / $this->k)) * $this->k);
        $popt['ap']['n'][$onvalue] = sprintf('q %s BT /F%d %F Tf %F %F Td (' . chr(108) . ') Tj ET Q', $this->TextColor, $tmpfont['i'], $this->FontSizePt, $fx, $fy);
        $popt['ap']['n']['Off'] = sprintf('q %s BT /F%d %F Tf %F %F Td (' . chr(109) . ') Tj ET Q', $this->TextColor, $tmpfont['i'], $this->FontSizePt, $fx, $fy);
        if (!isset($popt['mk'])) {
            $popt['mk'] = array();
        }
        $popt['mk']['ca'] = '(l)';
        // merge options
        $opt = array_merge($popt, $opt);
        // set remaining annotation data
        $opt['Subtype'] = 'Widget';
        $opt['ft'] = 'Btn';
        if ($checked) {
            $opt['v'] = array('/' . $onvalue);
            $opt['as'] = $onvalue;
        } else {
            $opt['as'] = 'Off';
        }
        // store readonly flag
        if (!isset($this->radiobutton_groups[$this->page][$name]['#readonly#'])) {
            $this->radiobutton_groups[$this->page][$name]['#readonly#'] = false;
        }
        $this->radiobutton_groups[$this->page][$name]['#readonly#'] |= ($opt['f'] & 64);
        $this->Annotation($x, $y, $w, $w, $name, $opt, 0);
        if ($this->rtl) {
            $this->x -= $w;
        } else {
            $this->x += $w;
        }
    }

    /**
     * Creates a List-box field
     * @param $name (string) field name
     * @param $w (int) width
     * @param $h (int) height
     * @param $values (array) array containing the list of values.
     * @param $prop (array) javascript field properties. Possible values are described on official Javascript for Acrobat API reference.
     * @param $opt (array) annotation parameters. Possible values are described on official PDF32000_2008 reference.
     * @param $x (float) Abscissa of the upper-left corner of the rectangle
     * @param $y (float) Ordinate of the upper-left corner of the rectangle
     * @param $js (boolean) if true put the field using JavaScript (requires Acrobat Writer to be rendered).
     * @public
     * @author Nicola Asuni
     * @since 4.8.000 (2009-09-07)
     */
    public function ListBox($name, $w, $h, $values, $prop = array(), $opt = array(), $x = '', $y = '', $js = false) {
        if ($x === '') {
            $x = $this->x;
        }
        if ($y === '') {
            $y = $this->y;
        }
        // check page for no-write regions and adapt page margins if necessary
        list($x, $y) = $this->checkPageRegions($h, $x, $y);
        if ($js) {
            $this->_addfield('listbox', $name, $x, $y, $w, $h, $prop);
            $s = '';
            foreach ($values as $value) {
                if (is_array($value)) {
                    $s .= ',[\'' . addslashes($value[1]) . '\',\'' . addslashes($value[0]) . '\']';
                } else {
                    $s .= ',[\'' . addslashes($value) . '\',\'' . addslashes($value) . '\']';
                }
            }
            $this->javascript .= 'f' . $name . '.setItems(' . substr($s, 1) . ');' . "\n";
            return;
        }
        // get default style
        $prop = array_merge($this->getFormDefaultProp(), $prop);
        // get annotation data
        $popt = $this->getAnnotOptFromJSProp($prop);
        // set additional default values
        $this->annotation_fonts[$this->CurrentFont['fontkey']] = $this->CurrentFont['i'];
        $fontstyle = sprintf('/F%d %F Tf %s', $this->CurrentFont['i'], $this->FontSizePt, $this->TextColor);
        $popt['da'] = $fontstyle;
        // build appearance stream
        $popt['ap'] = array();
        $popt['ap']['n'] = '/Tx BMC q ' . $fontstyle . ' ';
        $text = '';
        foreach ($values as $item) {
            if (is_array($item)) {
                $text .= $item[1] . "\n";
            } else {
                $text .= $item . "\n";
            }
        }
        $tmpid = $this->startTemplate($w, $h, false);
        $this->MultiCell($w, $h, $text, 0, '', false, 0, 0, 0, true, 0, false, true, 0, 'T', false);
        $this->endTemplate();
        --$this->n;
        $popt['ap']['n'] .= $this->xobjects[$tmpid]['outdata'];
        unset($this->xobjects[$tmpid]);
        $popt['ap']['n'] .= 'Q EMC';
        // merge options
        $opt = array_merge($popt, $opt);
        // set remaining annotation data
        $opt['Subtype'] = 'Widget';
        $opt['ft'] = 'Ch';
        $opt['t'] = $name;
        $opt['opt'] = $values;
        unset($opt['mk']['ca']);
        unset($opt['mk']['rc']);
        unset($opt['mk']['ac']);
        unset($opt['mk']['i']);
        unset($opt['mk']['ri']);
        unset($opt['mk']['ix']);
        unset($opt['mk']['if']);
        unset($opt['mk']['tp']);
        $this->Annotation($x, $y, $w, $h, $name, $opt, 0);
        if ($this->rtl) {
            $this->x -= $w;
        } else {
            $this->x += $w;
        }
    }

    /**
     * Creates a Combo-box field
     * @param $name (string) field name
     * @param $w (int) width
     * @param $h (int) height
     * @param $values (array) array containing the list of values.
     * @param $prop (array) javascript field properties. Possible values are described on official Javascript for Acrobat API reference.
     * @param $opt (array) annotation parameters. Possible values are described on official PDF32000_2008 reference.
     * @param $x (float) Abscissa of the upper-left corner of the rectangle
     * @param $y (float) Ordinate of the upper-left corner of the rectangle
     * @param $js (boolean) if true put the field using JavaScript (requires Acrobat Writer to be rendered).
     * @public
     * @author Nicola Asuni
     * @since 4.8.000 (2009-09-07)
     */
    public function ComboBox($name, $w, $h, $values, $prop = array(), $opt = array(), $x = '', $y = '', $js = false) {
        if ($x === '') {
            $x = $this->x;
        }
        if ($y === '') {
            $y = $this->y;
        }
        // check page for no-write regions and adapt page margins if necessary
        list($x, $y) = $this->checkPageRegions($h, $x, $y);
        if ($js) {
            $this->_addfield('combobox', $name, $x, $y, $w, $h, $prop);
            $s = '';
            foreach ($values as $value) {
                if (is_array($value)) {
                    $s .= ',[\'' . addslashes($value[1]) . '\',\'' . addslashes($value[0]) . '\']';
                } else {
                    $s .= ',[\'' . addslashes($value) . '\',\'' . addslashes($value) . '\']';
                }
            }
            $this->javascript .= 'f' . $name . '.setItems(' . substr($s, 1) . ');' . "\n";
            return;
        }
        // get default style
        $prop = array_merge($this->getFormDefaultProp(), $prop);
        $prop['Combo'] = true;
        // get annotation data
        $popt = $this->getAnnotOptFromJSProp($prop);
        // set additional default options
        $this->annotation_fonts[$this->CurrentFont['fontkey']] = $this->CurrentFont['i'];
        $fontstyle = sprintf('/F%d %F Tf %s', $this->CurrentFont['i'], $this->FontSizePt, $this->TextColor);
        $popt['da'] = $fontstyle;
        // build appearance stream
        $popt['ap'] = array();
        $popt['ap']['n'] = '/Tx BMC q ' . $fontstyle . ' ';
        $text = '';
        foreach ($values as $item) {
            if (is_array($item)) {
                $text .= $item[1] . "\n";
            } else {
                $text .= $item . "\n";
            }
        }
        $tmpid = $this->startTemplate($w, $h, false);
        $this->MultiCell($w, $h, $text, 0, '', false, 0, 0, 0, true, 0, false, true, 0, 'T', false);
        $this->endTemplate();
        --$this->n;
        $popt['ap']['n'] .= $this->xobjects[$tmpid]['outdata'];
        unset($this->xobjects[$tmpid]);
        $popt['ap']['n'] .= 'Q EMC';
        // merge options
        $opt = array_merge($popt, $opt);
        // set remaining annotation data
        $opt['Subtype'] = 'Widget';
        $opt['ft'] = 'Ch';
        $opt['t'] = $name;
        $opt['opt'] = $values;
        unset($opt['mk']['ca']);
        unset($opt['mk']['rc']);
        unset($opt['mk']['ac']);
        unset($opt['mk']['i']);
        unset($opt['mk']['ri']);
        unset($opt['mk']['ix']);
        unset($opt['mk']['if']);
        unset($opt['mk']['tp']);
        $this->Annotation($x, $y, $w, $h, $name, $opt, 0);
        if ($this->rtl) {
            $this->x -= $w;
        } else {
            $this->x += $w;
        }
    }

    /**
     * Creates a CheckBox field
     * @param $name (string) field name
     * @param $w (int) width
     * @param $checked (boolean) define the initial state.
     * @param $prop (array) javascript field properties. Possible values are described on official Javascript for Acrobat API reference.
     * @param $opt (array) annotation parameters. Possible values are described on official PDF32000_2008 reference.
     * @param $onvalue (string) value to be returned if selected.
     * @param $x (float) Abscissa of the upper-left corner of the rectangle
     * @param $y (float) Ordinate of the upper-left corner of the rectangle
     * @param $js (boolean) if true put the field using JavaScript (requires Acrobat Writer to be rendered).
     * @public
     * @author Nicola Asuni
     * @since 4.8.000 (2009-09-07)
     */
    public function CheckBox($name, $w, $checked = false, $prop = array(), $opt = array(), $onvalue = 'Yes', $x = '', $y = '', $js = false) {
        if ($x === '') {
            $x = $this->x;
        }
        if ($y === '') {
            $y = $this->y;
        }
        // check page for no-write regions and adapt page margins if necessary
        list($x, $y) = $this->checkPageRegions($w, $x, $y);
        if ($js) {
            $this->_addfield('checkbox', $name, $x, $y, $w, $w, $prop);
            return;
        }
        if (!isset($prop['value'])) {
            $prop['value'] = array('Yes');
        }
        // get default style
        $prop = array_merge($this->getFormDefaultProp(), $prop);
        $prop['borderStyle'] = 'inset';
        // get annotation data
        $popt = $this->getAnnotOptFromJSProp($prop);
        // set additional default options
        $font = 'zapfdingbats';
        if ($this->pdfa_mode) {
            // all fonts must be embedded
            $font = 'pdfa' . $font;
        }
        $this->AddFont($font);
        $tmpfont = $this->getFontBuffer($font);
        $this->annotation_fonts[$tmpfont['fontkey']] = $tmpfont['i'];
        $fontstyle = sprintf('/F%d %F Tf %s', $tmpfont['i'], $this->FontSizePt, $this->TextColor);
        $popt['da'] = $fontstyle;
        // build appearance stream
        $popt['ap'] = array();
        $popt['ap']['n'] = array();
        $fx = ((($w - $this->getAbsFontMeasure($tmpfont['cw'][110])) / 2) * $this->k);
        $fy = (($w - ((($tmpfont['desc']['Ascent'] - $tmpfont['desc']['Descent']) * $this->FontSizePt / 1000) / $this->k)) * $this->k);
        $popt['ap']['n']['Yes'] = sprintf('q %s BT /F%d %F Tf %F %F Td (' . chr(110) . ') Tj ET Q', $this->TextColor, $tmpfont['i'], $this->FontSizePt, $fx, $fy);
        $popt['ap']['n']['Off'] = sprintf('q %s BT /F%d %F Tf %F %F Td (' . chr(111) . ') Tj ET Q', $this->TextColor, $tmpfont['i'], $this->FontSizePt, $fx, $fy);
        // merge options
        $opt = array_merge($popt, $opt);
        // set remaining annotation data
        $opt['Subtype'] = 'Widget';
        $opt['ft'] = 'Btn';
        $opt['t'] = $name;
        if ($this->empty_string($onvalue)) {
            $onvalue = 'Yes';
        }
        $opt['opt'] = array($onvalue);
        if ($checked) {
            $opt['v'] = array('/Yes');
            $opt['as'] = 'Yes';
        } else {
            $opt['v'] = array('/Off');
            $opt['as'] = 'Off';
        }
        $this->Annotation($x, $y, $w, $w, $name, $opt, 0);
        if ($this->rtl) {
            $this->x -= $w;
        } else {
            $this->x += $w;
        }
    }

    /**
     * Creates a button field
     * @param $name (string) field name
     * @param $w (int) width
     * @param $h (int) height
     * @param $caption (string) caption.
     * @param $action (mixed) action triggered by pressing the button. Use a string to specify a javascript action. Use an array to specify a form action options as on section 12.7.5 of PDF32000_2008.
     * @param $prop (array) javascript field properties. Possible values are described on official Javascript for Acrobat API reference.
     * @param $opt (array) annotation parameters. Possible values are described on official PDF32000_2008 reference.
     * @param $x (float) Abscissa of the upper-left corner of the rectangle
     * @param $y (float) Ordinate of the upper-left corner of the rectangle
     * @param $js (boolean) if true put the field using JavaScript (requires Acrobat Writer to be rendered).
     * @public
     * @author Nicola Asuni
     * @since 4.8.000 (2009-09-07)
     */
    public function Button($name, $w, $h, $caption, $action, $prop = array(), $opt = array(), $x = '', $y = '', $js = false) {
        if ($x === '') {
            $x = $this->x;
        }
        if ($y === '') {
            $y = $this->y;
        }
        // check page for no-write regions and adapt page margins if necessary
        list($x, $y) = $this->checkPageRegions($h, $x, $y);
        if ($js) {
            $this->_addfield('button', $name, $this->x, $this->y, $w, $h, $prop);
            $this->javascript .= 'f' . $name . ".buttonSetCaption('" . addslashes($caption) . "');\n";
            $this->javascript .= 'f' . $name . ".setAction('MouseUp','" . addslashes($action) . "');\n";
            $this->javascript .= 'f' . $name . ".highlight='push';\n";
            $this->javascript .= 'f' . $name . ".print=false;\n";
            return;
        }
        // get default style
        $prop = array_merge($this->getFormDefaultProp(), $prop);
        $prop['Pushbutton'] = 'true';
        $prop['highlight'] = 'push';
        $prop['display'] = 'display.noPrint';
        // get annotation data
        $popt = $this->getAnnotOptFromJSProp($prop);
        $this->annotation_fonts[$this->CurrentFont['fontkey']] = $this->CurrentFont['i'];
        $fontstyle = sprintf('/F%d %F Tf %s', $this->CurrentFont['i'], $this->FontSizePt, $this->TextColor);
        $popt['da'] = $fontstyle;
        // build appearance stream
        $popt['ap'] = array();
        $popt['ap']['n'] = '/Tx BMC q ' . $fontstyle . ' ';
        $tmpid = $this->startTemplate($w, $h, false);
        $bw = (2 / $this->k); // border width
        $border = array(
            'L' => array('width' => $bw, 'cap' => 'square', 'join' => 'miter', 'dash' => 0, 'color' => array(231)),
            'R' => array('width' => $bw, 'cap' => 'square', 'join' => 'miter', 'dash' => 0, 'color' => array(51)),
            'T' => array('width' => $bw, 'cap' => 'square', 'join' => 'miter', 'dash' => 0, 'color' => array(231)),
            'B' => array('width' => $bw, 'cap' => 'square', 'join' => 'miter', 'dash' => 0, 'color' => array(51)));
        $this->SetFillColor(204);
        $this->Cell($w, $h, $caption, $border, 0, 'C', true, '', 1, false, 'T', 'M');
        $this->endTemplate();
        --$this->n;
        $popt['ap']['n'] .= $this->xobjects[$tmpid]['outdata'];
        unset($this->xobjects[$tmpid]);
        $popt['ap']['n'] .= 'Q EMC';
        // set additional default options
        if (!isset($popt['mk'])) {
            $popt['mk'] = array();
        }
        $ann_obj_id = ($this->n + 1);
        if (!empty($action) AND !is_array($action)) {
            $ann_obj_id = ($this->n + 2);
        }
        $popt['mk']['ca'] = $this->_textstring($caption, $ann_obj_id);
        $popt['mk']['rc'] = $this->_textstring($caption, $ann_obj_id);
        $popt['mk']['ac'] = $this->_textstring($caption, $ann_obj_id);
        // merge options
        $opt = array_merge($popt, $opt);
        // set remaining annotation data
        $opt['Subtype'] = 'Widget';
        $opt['ft'] = 'Btn';
        $opt['t'] = $caption;
        $opt['v'] = $name;
        if (!empty($action)) {
            if (is_array($action)) {
                // form action options as on section 12.7.5 of PDF32000_2008.
                $opt['aa'] = '/D <<';
                $bmode = array('SubmitForm', 'ResetForm', 'ImportData');
                foreach ($action AS $key => $val) {
                    if (($key == 'S') AND in_array($val, $bmode)) {
                        $opt['aa'] .= ' /S /' . $val;
                    } elseif (($key == 'F') AND (!empty($val))) {
                        $opt['aa'] .= ' /F ' . $this->_datastring($val, $ann_obj_id);
                    } elseif (($key == 'Fields') AND is_array($val) AND !empty($val)) {
                        $opt['aa'] .= ' /Fields [';
                        foreach ($val AS $field) {
                            $opt['aa'] .= ' ' . $this->_textstring($field, $ann_obj_id);
                        }
                        $opt['aa'] .= ']';
                    } elseif (($key == 'Flags')) {
                        $ff = 0;
                        if (is_array($val)) {
                            foreach ($val AS $flag) {
                                switch ($flag) {
                                    case 'Include/Exclude': {
                                            $ff += 1 << 0;
                                            break;
                                        }
                                    case 'IncludeNoValueFields': {
                                            $ff += 1 << 1;
                                            break;
                                        }
                                    case 'ExportFormat': {
                                            $ff += 1 << 2;
                                            break;
                                        }
                                    case 'GetMethod': {
                                            $ff += 1 << 3;
                                            break;
                                        }
                                    case 'SubmitCoordinates': {
                                            $ff += 1 << 4;
                                            break;
                                        }
                                    case 'XFDF': {
                                            $ff += 1 << 5;
                                            break;
                                        }
                                    case 'IncludeAppendSaves': {
                                            $ff += 1 << 6;
                                            break;
                                        }
                                    case 'IncludeAnnotations': {
                                            $ff += 1 << 7;
                                            break;
                                        }
                                    case 'SubmitPDF': {
                                            $ff += 1 << 8;
                                            break;
                                        }
                                    case 'CanonicalFormat': {
                                            $ff += 1 << 9;
                                            break;
                                        }
                                    case 'ExclNonUserAnnots': {
                                            $ff += 1 << 10;
                                            break;
                                        }
                                    case 'ExclFKey': {
                                            $ff += 1 << 11;
                                            break;
                                        }
                                    case 'EmbedForm': {
                                            $ff += 1 << 13;
                                            break;
                                        }
                                }
                            }
                        } else {
                            $ff = intval($val);
                        }
                        $opt['aa'] .= ' /Flags ' . $ff;
                    }
                }
                $opt['aa'] .= ' >>';
            } else {
                // Javascript action or raw action command
                $js_obj_id = $this->addJavascriptObject($action);
                $opt['aa'] = '/D ' . $js_obj_id . ' 0 R';
            }
        }
        $this->Annotation($x, $y, $w, $h, $name, $opt, 0);
        if ($this->rtl) {
            $this->x -= $w;
        } else {
            $this->x += $w;
        }
    }

    // --- END FORMS FIELDS ------------------------------------------------

    /**
     * Add certification signature (DocMDP or UR3)
     * You can set only one signature type
     * @protected
     * @author Nicola Asuni
     * @since 4.6.008 (2009-05-07)
     */
    protected function _putsignature() {
        if ((!$this->sign) OR (!isset($this->signature_data['cert_type']))) {
            return;
        }
        $sigobjid = ($this->sig_obj_id + 1);
        $out = $this->_getobj($sigobjid) . "\n";
        $out .= '<< /Type /Sig';
        $out .= ' /Filter /Adobe.PPKLite';
        $out .= ' /SubFilter /adbe.pkcs7.detached';
        $out .= ' ' . $this->byterange_string;
        $out .= ' /Contents<' . str_repeat('0', $this->signature_max_length) . '>';
        $out .= ' /Reference ['; // array of signature reference dictionaries
        $out .= ' << /Type /SigRef';
        if ($this->signature_data['cert_type'] > 0) {
            $out .= ' /TransformMethod /DocMDP';
            $out .= ' /TransformParams <<';
            $out .= ' /Type /TransformParams';
            $out .= ' /P ' . $this->signature_data['cert_type'];
            $out .= ' /V /1.2';
        } else {
            $out .= ' /TransformMethod /UR3';
            $out .= ' /TransformParams <<';
            $out .= ' /Type /TransformParams';
            $out .= ' /V /2.2';
            if (!$this->empty_string($this->ur['document'])) {
                $out .= ' /Document[' . $this->ur['document'] . ']';
            }
            if (!$this->empty_string($this->ur['form'])) {
                $out .= ' /Form[' . $this->ur['form'] . ']';
            }
            if (!$this->empty_string($this->ur['signature'])) {
                $out .= ' /Signature[' . $this->ur['signature'] . ']';
            }
            if (!$this->empty_string($this->ur['annots'])) {
                $out .= ' /Annots[' . $this->ur['annots'] . ']';
            }
            if (!$this->empty_string($this->ur['ef'])) {
                $out .= ' /EF[' . $this->ur['ef'] . ']';
            }
            if (!$this->empty_string($this->ur['formex'])) {
                $out .= ' /FormEX[' . $this->ur['formex'] . ']';
            }
        }
        $out .= ' >>'; // close TransformParams
        // optional digest data (values must be calculated and replaced later)
        //$out .= ' /Data ********** 0 R';
        //$out .= ' /DigestMethod/MD5';
        //$out .= ' /DigestLocation[********** 34]';
        //$out .= ' /DigestValue<********************************>';
        $out .= ' >>';
        $out .= ' ]'; // end of reference
        if (isset($this->signature_data['info']['Name']) AND !$this->empty_string($this->signature_data['info']['Name'])) {
            $out .= ' /Name ' . $this->_textstring($this->signature_data['info']['Name'], $sigobjid);
        }
        if (isset($this->signature_data['info']['Location']) AND !$this->empty_string($this->signature_data['info']['Location'])) {
            $out .= ' /Location ' . $this->_textstring($this->signature_data['info']['Location'], $sigobjid);
        }
        if (isset($this->signature_data['info']['Reason']) AND !$this->empty_string($this->signature_data['info']['Reason'])) {
            $out .= ' /Reason ' . $this->_textstring($this->signature_data['info']['Reason'], $sigobjid);
        }
        if (isset($this->signature_data['info']['ContactInfo']) AND !$this->empty_string($this->signature_data['info']['ContactInfo'])) {
            $out .= ' /ContactInfo ' . $this->_textstring($this->signature_data['info']['ContactInfo'], $sigobjid);
        }
        $out .= ' /M ' . $this->_datestring($sigobjid, $this->doc_modification_timestamp);
        $out .= ' >>';
        $out .= "\n" . 'endobj';
        $this->_out($out);
    }

    /**
     * Set User's Rights for PDF Reader
     * WARNING: This is experimental and currently do not work.
     * Check the PDF Reference 8.7.1 Transform Methods,
     * Table 8.105 Entries in the UR transform parameters dictionary
     * @param $enable (boolean) if true enable user's rights on PDF reader
     * @param $document (string) Names specifying additional document-wide usage rights for the document. The only defined value is "/FullSave", which permits a user to save the document along with modified form and/or annotation data.
     * @param $annots (string) Names specifying additional annotation-related usage rights for the document. Valid names in PDF 1.5 and later are /Create/Delete/Modify/Copy/Import/Export, which permit the user to perform the named operation on annotations.
     * @param $form (string) Names specifying additional form-field-related usage rights for the document. Valid names are: /Add/Delete/FillIn/Import/Export/SubmitStandalone/SpawnTemplate
     * @param $signature (string) Names specifying additional signature-related usage rights for the document. The only defined value is /Modify, which permits a user to apply a digital signature to an existing signature form field or clear a signed signature form field.
     * @param $ef (string) Names specifying additional usage rights for named embedded files in the document. Valid names are /Create/Delete/Modify/Import, which permit the user to perform the named operation on named embedded files
      Names specifying additional embedded-files-related usage rights for the document.
     * @param $formex (string) Names specifying additional form-field-related usage rights. The only valid name is BarcodePlaintext, which permits text form field data to be encoded as a plaintext two-dimensional barcode.
     * @public
     * @author Nicola Asuni
     * @since 2.9.000 (2008-03-26)
     */
    public function setUserRights(
    $enable = true, $document = '/FullSave', $annots = '/Create/Delete/Modify/Copy/Import/Export', $form = '/Add/Delete/FillIn/Import/Export/SubmitStandalone/SpawnTemplate', $signature = '/Modify', $ef = '/Create/Delete/Modify/Import', $formex = '') {
        $this->ur['enabled'] = $enable;
        $this->ur['document'] = $document;
        $this->ur['annots'] = $annots;
        $this->ur['form'] = $form;
        $this->ur['signature'] = $signature;
        $this->ur['ef'] = $ef;
        $this->ur['formex'] = $formex;
        if (!$this->sign) {
            $this->setSignature('', '', '', '', 0, array());
        }
    }

    /**
     * Enable document signature (requires the OpenSSL Library).
     * The digital signature improve document authenticity and integrity and allows o enable extra features on Acrobat Reader.
     * To create self-signed signature: openssl req -x509 -nodes -days 365000 -newkey rsa:1024 -keyout tcpdf.crt -out tcpdf.crt
     * To export crt to p12: openssl pkcs12 -export -in tcpdf.crt -out tcpdf.p12
     * To convert pfx certificate to pem: openssl pkcs12 -in tcpdf.pfx -out tcpdf.crt -nodes
     * @param $signing_cert (mixed) signing certificate (string or filename prefixed with 'file://')
     * @param $private_key (mixed) private key (string or filename prefixed with 'file://')
     * @param $private_key_password (string) password
     * @param $extracerts (string) specifies the name of a file containing a bunch of extra certificates to include in the signature which can for example be used to help the recipient to verify the certificate that you used.
     * @param $cert_type (int) The access permissions granted for this document. Valid values shall be: 1 = No changes to the document shall be permitted; any change to the document shall invalidate the signature; 2 = Permitted changes shall be filling in forms, instantiating page templates, and signing; other changes shall invalidate the signature; 3 = Permitted changes shall be the same as for 2, as well as annotation creation, deletion, and modification; other changes shall invalidate the signature.
     * @param $info (array) array of option information: Name, Location, Reason, ContactInfo.
     * @public
     * @author Nicola Asuni
     * @since 4.6.005 (2009-04-24)
     */
    public function setSignature($signing_cert = '', $private_key = '', $private_key_password = '', $extracerts = '', $cert_type = 2, $info = array()) {
        // to create self-signed signature: openssl req -x509 -nodes -days 365000 -newkey rsa:1024 -keyout tcpdf.crt -out tcpdf.crt
        // to export crt to p12: openssl pkcs12 -export -in tcpdf.crt -out tcpdf.p12
        // to convert pfx certificate to pem: openssl
        //     OpenSSL> pkcs12 -in <cert.pfx> -out <cert.crt> -nodes
        $this->sign = true;
        ++$this->n;
        $this->sig_obj_id = $this->n; // signature widget
        ++$this->n; // signature object ($this->sig_obj_id + 1)
        $this->signature_data = array();
        if (strlen($signing_cert) == 0) {
            $signing_cert = 'file://' . dirname(__FILE__) . '/tcpdf.crt';
            $private_key_password = 'tcpdfdemo';
        }
        if (strlen($private_key) == 0) {
            $private_key = $signing_cert;
        }
        $this->signature_data['signcert'] = $signing_cert;
        $this->signature_data['privkey'] = $private_key;
        $this->signature_data['password'] = $private_key_password;
        $this->signature_data['extracerts'] = $extracerts;
        $this->signature_data['cert_type'] = $cert_type;
        $this->signature_data['info'] = $info;
    }

    /**
     * Set the digital signature appearance (a cliccable rectangle area to get signature properties)
     * @param $x (float) Abscissa of the upper-left corner.
     * @param $y (float) Ordinate of the upper-left corner.
     * @param $w (float) Width of the signature area.
     * @param $h (float) Height of the signature area.
     * @param $page (int) option page number (if < 0 the current page is used).
     * @public
     * @author Nicola Asuni
     * @since 5.3.011 (2010-06-17)
     */
    public function setSignatureAppearance($x = 0, $y = 0, $w = 0, $h = 0, $page = -1) {
        $this->signature_appearance = $this->getSignatureAppearanceArray($x, $y, $w, $h, $page);
    }

    /**
     * Add an empty digital signature appearance (a cliccable rectangle area to get signature properties)
     * @param $x (float) Abscissa of the upper-left corner.
     * @param $y (float) Ordinate of the upper-left corner.
     * @param $w (float) Width of the signature area.
     * @param $h (float) Height of the signature area.
     * @param $page (int) option page number (if < 0 the current page is used).
     * @public
     * @author Nicola Asuni
     * @since 5.9.101 (2011-07-06)
     */
    public function addEmptySignatureAppearance($x = 0, $y = 0, $w = 0, $h = 0, $page = -1) {
        ++$this->n;
        $this->empty_signature_appearance[] = array('objid' => $this->n) + $this->getSignatureAppearanceArray($x, $y, $w, $h, $page);
    }

    /**
     * Get the array that defines the signature appearance (page and rectangle coordinates).
     * @param $x (float) Abscissa of the upper-left corner.
     * @param $y (float) Ordinate of the upper-left corner.
     * @param $w (float) Width of the signature area.
     * @param $h (float) Height of the signature area.
     * @param $page (int) option page number (if < 0 the current page is used).
     * @return (array) Array defining page and rectangle coordinates of signature appearance.
     * @protected
     * @author Nicola Asuni
     * @since 5.9.101 (2011-07-06)
     */
    protected function getSignatureAppearanceArray($x = 0, $y = 0, $w = 0, $h = 0, $page = -1) {
        $sigapp = array();
        if (($page < 1) OR ($page > $this->numpages)) {
            $sigapp['page'] = $this->page;
        } else {
            $sigapp['page'] = intval($page);
        }
        $a = $x * $this->k;
        $b = $this->pagedim[($sigapp['page'])]['h'] - (($y + $h) * $this->k);
        $c = $w * $this->k;
        $d = $h * $this->k;
        $sigapp['rect'] = sprintf('%F %F %F %F', $a, $b, ($a + $c), ($b + $d));
        return $sigapp;
    }

    /**
     * Create a new page group.
     * NOTE: call this function before calling AddPage()
     * @param $page (int) starting group page (leave empty for next page).
     * @public
     * @since 3.0.000 (2008-03-27)
     */
    public function startPageGroup($page = '') {
        if (empty($page)) {
            $page = $this->page + 1;
        }
        $this->newpagegroup[$page] = sizeof($this->newpagegroup) + 1;
    }

    /**
     * This method is DEPRECATED and doesn't have any effect.
     * Please remove any reference to this method.
     * @param $s (string) Empty parameter.
     * @deprecated deprecated since version 5.9.089 (2011-06-13)
     * @public
     */
    public function AliasNbPages($s = '') {
        
    }

    /**
     * This method is DEPRECATED and doesn't have any effect.
     * Please remove any reference to this method.
     * @param $s (string) Empty parameter.
     * @deprecated deprecated since version 5.9.089 (2011-06-13)
     * @public
     */
    public function AliasNumPage($s = '') {
        
    }

    /**
     * Set the starting page number.
     * @param $num (int) Starting page number.
     * @since 5.9.093 (2011-06-16)
     * @public
     */
    public function setStartingPageNumber($num = 1) {
        $this->starting_page_number = max(0, intval($num));
    }

    /**
     * Returns the string alias used right align page numbers.
     * If the current font is unicode type, the returned string wil contain an additional open curly brace.
     * @return string
     * @since 5.9.099 (2011-06-27)
     * @public
     */
    public function getAliasRightShift() {
        // calculate aproximatively the ratio between widths of aliases and replacements.
        $ref = '{' . $this->alias_right_shift . '}{' . $this->alias_tot_pages . '}{' . $this->alias_num_page . '}';
        $rep = str_repeat(' ', $this->GetNumChars($ref));
        $wdiff = max(1, ($this->GetStringWidth($ref) / $this->GetStringWidth($rep)));
        $sdiff = sprintf('%F', $wdiff);
        $alias = $this->alias_right_shift . $sdiff . '}';
        if ($this->isUnicodeFont()) {
            $alias = '{' . $alias;
        }
        return $alias;
    }

    /**
     * Returns the string alias used for the total number of pages.
     * If the current font is unicode type, the returned string is surrounded by additional curly braces.
     * This alias will be replaced by the total number of pages in the document.
     * @return string
     * @since 4.0.018 (2008-08-08)
     * @public
     */
    public function getAliasNbPages() {
        if ($this->isUnicodeFont()) {
            return '{' . $this->alias_tot_pages . '}';
        }
        return $this->alias_tot_pages;
    }

    /**
     * Returns the string alias used for the page number.
     * If the current font is unicode type, the returned string is surrounded by additional curly braces.
     * This alias will be replaced by the page number.
     * @return string
     * @since 4.5.000 (2009-01-02)
     * @public
     */
    public function getAliasNumPage() {
        if ($this->isUnicodeFont()) {
            return '{' . $this->alias_num_page . '}';
        }
        return $this->alias_num_page;
    }

    /**
     * Return the alias for the total number of pages in the current page group.
     * If the current font is unicode type, the returned string is surrounded by additional curly braces.
     * This alias will be replaced by the total number of pages in this group.
     * @return alias of the current page group
     * @public
     * @since 3.0.000 (2008-03-27)
     */
    public function getPageGroupAlias() {
        if ($this->isUnicodeFont()) {
            return '{' . $this->alias_group_tot_pages . '}';
        }
        return $this->alias_group_tot_pages;
    }

    /**
     * Return the alias for the page number on the current page group.
     * If the current font is unicode type, the returned string is surrounded by additional curly braces.
     * This alias will be replaced by the page number (relative to the belonging group).
     * @return alias of the current page group
     * @public
     * @since 4.5.000 (2009-01-02)
     */
    public function getPageNumGroupAlias() {
        if ($this->isUnicodeFont()) {
            return '{' . $this->alias_group_num_page . '}';
        }
        return $this->alias_group_num_page;
    }

    /**
     * Return the current page in the group.
     * @return current page in the group
     * @public
     * @since 3.0.000 (2008-03-27)
     */
    public function getGroupPageNo() {
        return $this->pagegroups[$this->currpagegroup];
    }

    /**
     * Returns the current group page number formatted as a string.
     * @public
     * @since 4.3.003 (2008-11-18)
     * @see PaneNo(), formatPageNumber()
     */
    public function getGroupPageNoFormatted() {
        return $this->formatPageNumber($this->getGroupPageNo());
    }

    /**
     * Format the page numbers.
     * This method can be overriden for custom formats.
     * @param $num (int) page number
     * @protected
     * @since 4.2.005 (2008-11-06)
     */
    protected function formatPageNumber($num) {
        return number_format((float) $num, 0, '', '.');
    }

    /**
     * Format the page numbers on the Table Of Content.
     * This method can be overriden for custom formats.
     * @param $num (int) page number
     * @protected
     * @since 4.5.001 (2009-01-04)
     * @see addTOC(), addHTMLTOC()
     */
    protected function formatTOCPageNumber($num) {
        return number_format((float) $num, 0, '', '.');
    }

    /**
     * Returns the current page number formatted as a string.
     * @public
     * @since 4.2.005 (2008-11-06)
     * @see PaneNo(), formatPageNumber()
     */
    public function PageNoFormatted() {
        return $this->formatPageNumber($this->PageNo());
    }

    /**
     * Put pdf layers.
     * @protected
     * @since 3.0.000 (2008-03-27)
     */
    protected function _putocg() {
        if (empty($this->pdflayers)) {
            return;
        }
        foreach ($this->pdflayers as $key => $layer) {
            $this->pdflayers[$key]['objid'] = $this->_newobj();
            $out = '<< /Type /OCG';
            $out .= ' /Name ' . $this->_textstring($layer['name'], $this->pdflayers[$key]['objid']);
            $out .= ' /Usage <<';
            $out .= ' /Print <</PrintState /' . ($layer['print'] ? 'ON' : 'OFF') . '>>';
            $out .= ' /View <</ViewState /' . ($layer['view'] ? 'ON' : 'OFF') . '>>';
            $out .= ' >> >>';
            $out .= "\n" . 'endobj';
            $this->_out($out);
        }
    }

    /**
     * Start a new pdf layer.
     * @param $name (string) Layer name (only a-z letters and numbers). Leave empty for automatic name.
     * @param $print (boolean) Set to true to print this layer.
     * @param $view (boolean) Set to true to view this layer.
     * @public
     * @since 5.9.102 (2011-07-13)
     */
    public function startLayer($name = '', $print = true, $view = true) {
        if ($this->state != 2) {
            return;
        }
        $layer = sprintf('LYR%03d', (count($this->pdflayers) + 1));
        if (empty($name)) {
            $name = $layer;
        } else {
            $name = preg_replace('/[^a-zA-Z0-9_\-]/', '', $name);
        }
        $this->pdflayers[] = array('layer' => $layer, 'name' => $name, 'print' => $print, 'view' => $view);
        $this->openMarkedContent = true;
        $this->_out('/OC /' . $layer . ' BDC');
    }

    /**
     * End the current PDF layer.
     * @public
     * @since 5.9.102 (2011-07-13)
     */
    public function endLayer() {
        if ($this->state != 2) {
            return;
        }
        if ($this->openMarkedContent) {
            // close existing open marked-content layer
            $this->_out('EMC');
            $this->openMarkedContent = false;
        }
    }

    /**
     * Set the visibility of the successive elements.
     * This can be useful, for instance, to put a background
     * image or color that will show on screen but won't print.
     * @param $v (string) visibility mode. Legal values are: all, print, screen or view.
     * @public
     * @since 3.0.000 (2008-03-27)
     */
    public function setVisibility($v) {
        if ($this->state != 2) {
            return;
        }
        $this->endLayer();
        switch ($v) {
            case 'print': {
                    $this->startLayer('Print', true, false);
                    break;
                }
            case 'view':
            case 'screen': {
                    $this->startLayer('View', false, true);
                    break;
                }
            case 'all': {
                    $this->_out('');
                    break;
                }
            default: {
                    $this->Error('Incorrect visibility: ' . $v);
                    break;
                }
        }
    }

    /**
     * Add transparency parameters to the current extgstate
     * @param $parms (array) parameters
     * @return the number of extgstates
     * @protected
     * @since 3.0.000 (2008-03-27)
     */
    protected function addExtGState($parms) {
        if ($this->pdfa_mode) {
            // transparencies are not allowed in PDF/A mode
            return;
        }
        // check if this ExtGState already exist
        foreach ($this->extgstates as $i => $ext) {
            if ($ext['parms'] == $parms) {
                if ($this->inxobj) {
                    // we are inside an XObject template
                    $this->xobjects[$this->xobjid]['extgstates'][$i] = $ext;
                }
                // return reference to existing ExtGState
                return $i;
            }
        }
        $n = (count($this->extgstates) + 1);
        $this->extgstates[$n] = array('parms' => $parms);
        if ($this->inxobj) {
            // we are inside an XObject template
            $this->xobjects[$this->xobjid]['extgstates'][$n] = $this->extgstates[$n];
        }
        return $n;
    }

    /**
     * Add an extgstate
     * @param $gs (array) extgstate
     * @protected
     * @since 3.0.000 (2008-03-27)
     */
    protected function setExtGState($gs) {
        if ($this->pdfa_mode OR ($this->state != 2)) {
            // transparency is not allowed in PDF/A mode
            return;
        }
        $this->_out(sprintf('/GS%d gs', $gs));
    }

    /**
     * Put extgstates for object transparency
     * @protected
     * @since 3.0.000 (2008-03-27)
     */
    protected function _putextgstates() {
        foreach ($this->extgstates as $i => $ext) {
            $this->extgstates[$i]['n'] = $this->_newobj();
            $out = '<< /Type /ExtGState';
            foreach ($ext['parms'] as $k => $v) {
                if (is_float($v)) {
                    $v = sprintf('%F', $v);
                } elseif ($v === true) {
                    $v = 'true';
                } elseif ($v === false) {
                    $v = 'false';
                }
                $out .= ' /' . $k . ' ' . $v;
            }
            $out .= ' >>';
            $out .= "\n" . 'endobj';
            $this->_out($out);
        }
    }

    /**
     * Set overprint mode for stroking (OP) and non-stroking (op) painting operations.
     * (Check the "Entries in a Graphics State Parameter Dictionary" on PDF 32000-1:2008).
     * @param $stroking (boolean) If true apply overprint for stroking operations.
     * @param $nonstroking (boolean) If true apply overprint for painting operations other than stroking.
     * @param $mode (integer) Overprint mode: (0 = each source colour component value replaces the value previously painted for the corresponding device colorant; 1 = a tint value of 0.0 for a source colour component shall leave the corresponding component of the previously painted colour unchanged).
     * @public
     * @since 5.9.152 (2012-03-23)
     */
    public function setOverprint($stroking = true, $nonstroking = '', $mode = 0) {
        if ($this->state != 2) {
            return;
        }
        $stroking = $stroking ? true : false;
        if ($this->empty_string($nonstroking)) {
            // default value if not set
            $nonstroking = $stroking;
        } else {
            $nonstroking = $nonstroking ? true : false;
        }
        if (($mode != 0) AND ($mode != 1)) {
            $mode = 0;
        }
        $this->overprint = array('OP' => $stroking, 'op' => $nonstroking, 'OPM' => $mode);
        $gs = $this->addExtGState($this->overprint);
        $this->setExtGState($gs);
    }

    /**
     * Get the overprint mode array (OP, op, OPM).
     * (Check the "Entries in a Graphics State Parameter Dictionary" on PDF 32000-1:2008).
     * @return array.
     * @public
     * @since 5.9.152 (2012-03-23)
     */
    public function getOverprint() {
        return $this->overprint;
    }

    /**
     * Set alpha for stroking (CA) and non-stroking (ca) operations.
     * @param $stroking (float) Alpha value for stroking operations: real value from 0 (transparent) to 1 (opaque).
     * @param $bm (string) blend mode, one of the following: Normal, Multiply, Screen, Overlay, Darken, Lighten, ColorDodge, ColorBurn, HardLight, SoftLight, Difference, Exclusion, Hue, Saturation, Color, Luminosity
     * @param $nonstroking (float) Alpha value for non-stroking operations: real value from 0 (transparent) to 1 (opaque).
     * @param $ais (boolean)
     * @public
     * @since 3.0.000 (2008-03-27)
     */
    public function setAlpha($stroking = 1, $bm = 'Normal', $nonstroking = '', $ais = false) {
        if ($this->pdfa_mode) {
            // transparency is not allowed in PDF/A mode
            return;
        }
        $stroking = floatval($stroking);
        if ($this->empty_string($nonstroking)) {
            // default value if not set
            $nonstroking = $stroking;
        } else {
            $nonstroking = floatval($nonstroking);
        }
        if ($bm[0] == '/') {
            // remove trailing slash
            $bm = substr($bm, 1);
        }
        if (!in_array($bm, array('Normal', 'Multiply', 'Screen', 'Overlay', 'Darken', 'Lighten', 'ColorDodge', 'ColorBurn', 'HardLight', 'SoftLight', 'Difference', 'Exclusion', 'Hue', 'Saturation', 'Color', 'Luminosity'))) {
            $bm = 'Normal';
        }
        $ais = $ais ? true : false;
        $this->alpha = array('CA' => $stroking, 'ca' => $nonstroking, 'BM' => '/' . $bm, 'AIS' => $ais);
        $gs = $this->addExtGState($this->alpha);
        $this->setExtGState($gs);
    }

    /**
     * Get the alpha mode array (CA, ca, BM, AIS).
     * (Check the "Entries in a Graphics State Parameter Dictionary" on PDF 32000-1:2008).
     * @return array.
     * @public
     * @since 5.9.152 (2012-03-23)
     */
    public function getAlpha() {
        return $this->alpha;
    }

    /**
     * Set the default JPEG compression quality (1-100)
     * @param $quality (int) JPEG quality, integer between 1 and 100
     * @public
     * @since 3.0.000 (2008-03-27)
     */
    public function setJPEGQuality($quality) {
        if (($quality < 1) OR ($quality > 100)) {
            $quality = 75;
        }
        $this->jpeg_quality = intval($quality);
    }

    /**
     * Set the default number of columns in a row for HTML tables.
     * @param $cols (int) number of columns
     * @public
     * @since 3.0.014 (2008-06-04)
     */
    public function setDefaultTableColumns($cols = 4) {
        $this->default_table_columns = intval($cols);
    }

    /**
     * Set the height of the cell (line height) respect the font height.
     * @param $h (int) cell proportion respect font height (typical value = 1.25).
     * @public
     * @since 3.0.014 (2008-06-04)
     */
    public function setCellHeightRatio($h) {
        $this->cell_height_ratio = $h;
    }

    /**
     * return the height of cell repect font height.
     * @public
     * @since 4.0.012 (2008-07-24)
     */
    public function getCellHeightRatio() {
        return $this->cell_height_ratio;
    }

    /**
     * Set the PDF version (check PDF reference for valid values).
     * @param $version (string) PDF document version.
     * @public
     * @since 3.1.000 (2008-06-09)
     */
    public function setPDFVersion($version = '1.7') {
        if ($this->pdfa_mode) {
            // PDF/A mode
            $this->PDFVersion = '1.4';
        } else {
            $this->PDFVersion = $version;
        }
    }

    /**
     * Set the viewer preferences dictionary controlling the way the document is to be presented on the screen or in print.
     * (see Section 8.1 of PDF reference, "Viewer Preferences").
     * <ul><li>HideToolbar boolean (Optional) A flag specifying whether to hide the viewer application's tool bars when the document is active. Default value: false.</li><li>HideMenubar boolean (Optional) A flag specifying whether to hide the viewer application's menu bar when the document is active. Default value: false.</li><li>HideWindowUI boolean (Optional) A flag specifying whether to hide user interface elements in the document's window (such as scroll bars and navigation controls), leaving only the document's contents displayed. Default value: false.</li><li>FitWindow boolean (Optional) A flag specifying whether to resize the document's window to fit the size of the first displayed page. Default value: false.</li><li>CenterWindow boolean (Optional) A flag specifying whether to position the document's window in the center of the screen. Default value: false.</li><li>DisplayDocTitle boolean (Optional; PDF 1.4) A flag specifying whether the window's title bar should display the document title taken from the Title entry of the document information dictionary (see Section 10.2.1, "Document Information Dictionary"). If false, the title bar should instead display the name of the PDF file containing the document. Default value: false.</li><li>NonFullScreenPageMode name (Optional) The document's page mode, specifying how to display the document on exiting full-screen mode:<ul><li>UseNone Neither document outline nor thumbnail images visible</li><li>UseOutlines Document outline visible</li><li>UseThumbs Thumbnail images visible</li><li>UseOC Optional content group panel visible</li></ul>This entry is meaningful only if the value of the PageMode entry in the catalog dictionary (see Section 3.6.1, "Document Catalog") is FullScreen; it is ignored otherwise. Default value: UseNone.</li><li>ViewArea name (Optional; PDF 1.4) The name of the page boundary representing the area of a page to be displayed when viewing the document on the screen. Valid values are (see Section 10.10.1, "Page Boundaries").:<ul><li>MediaBox</li><li>CropBox (default)</li><li>BleedBox</li><li>TrimBox</li><li>ArtBox</li></ul></li><li>ViewClip name (Optional; PDF 1.4) The name of the page boundary to which the contents of a page are to be clipped when viewing the document on the screen. Valid values are (see Section 10.10.1, "Page Boundaries").:<ul><li>MediaBox</li><li>CropBox (default)</li><li>BleedBox</li><li>TrimBox</li><li>ArtBox</li></ul></li><li>PrintArea name (Optional; PDF 1.4) The name of the page boundary representing the area of a page to be rendered when printing the document. Valid values are (see Section 10.10.1, "Page Boundaries").:<ul><li>MediaBox</li><li>CropBox (default)</li><li>BleedBox</li><li>TrimBox</li><li>ArtBox</li></ul></li><li>PrintClip name (Optional; PDF 1.4) The name of the page boundary to which the contents of a page are to be clipped when printing the document. Valid values are (see Section 10.10.1, "Page Boundaries").:<ul><li>MediaBox</li><li>CropBox (default)</li><li>BleedBox</li><li>TrimBox</li><li>ArtBox</li></ul></li><li>PrintScaling name (Optional; PDF 1.6) The page scaling option to be selected when a print dialog is displayed for this document. Valid values are: <ul><li>None, which indicates that the print dialog should reflect no page scaling</li><li>AppDefault (default), which indicates that applications should use the current print scaling</li></ul></li><li>Duplex name (Optional; PDF 1.7) The paper handling option to use when printing the file from the print dialog. The following values are valid:<ul><li>Simplex - Print single-sided</li><li>DuplexFlipShortEdge - Duplex and flip on the short edge of the sheet</li><li>DuplexFlipLongEdge - Duplex and flip on the long edge of the sheet</li></ul>Default value: none</li><li>PickTrayByPDFSize boolean (Optional; PDF 1.7) A flag specifying whether the PDF page size is used to select the input paper tray. This setting influences only the preset values used to populate the print dialog presented by a PDF viewer application. If PickTrayByPDFSize is true, the check box in the print dialog associated with input paper tray is checked. Note: This setting has no effect on Mac OS systems, which do not provide the ability to pick the input tray by size.</li><li>PrintPageRange array (Optional; PDF 1.7) The page numbers used to initialize the print dialog box when the file is printed. The first page of the PDF file is denoted by 1. Each pair consists of the first and last pages in the sub-range. An odd number of integers causes this entry to be ignored. Negative numbers cause the entire array to be ignored. Default value: as defined by PDF viewer application</li><li>NumCopies integer (Optional; PDF 1.7) The number of copies to be printed when the print dialog is opened for this file. Supported values are the integers 2 through 5. Values outside this range are ignored. Default value: as defined by PDF viewer application, but typically 1</li></ul>
     * @param $preferences (array) array of options.
     * @author Nicola Asuni
     * @public
     * @since 3.1.000 (2008-06-09)
     */
    public function setViewerPreferences($preferences) {
        $this->viewer_preferences = $preferences;
    }

    /**
     * Paints color transition registration bars
     * @param $x (float) abscissa of the top left corner of the rectangle.
     * @param $y (float) ordinate of the top left corner of the rectangle.
     * @param $w (float) width of the rectangle.
     * @param $h (float) height of the rectangle.
     * @param $transition (boolean) if true prints tcolor transitions to white.
     * @param $vertical (boolean) if true prints bar vertically.
     * @param $colors (string) colors to print, one letter per color separated by comma (for example 'A,W,R,G,B,C,M,Y,K'): A=black, W=white, R=red, G=green, B=blue, C=cyan, M=magenta, Y=yellow, K=black.
     * @author Nicola Asuni
     * @since 4.9.000 (2010-03-26)
     * @public
     */
    public function colorRegistrationBar($x, $y, $w, $h, $transition = true, $vertical = false, $colors = 'A,R,G,B,C,M,Y,K') {
        $bars = explode(',', $colors);
        $numbars = count($bars); // number of bars to print
        // set bar measures
        if ($vertical) {
            $coords = array(0, 0, 0, 1);
            $wb = $w / $numbars; // bar width
            $hb = $h; // bar height
            $xd = $wb; // delta x
            $yd = 0; // delta y
        } else {
            $coords = array(1, 0, 0, 0);
            $wb = $w; // bar width
            $hb = $h / $numbars; // bar height
            $xd = 0; // delta x
            $yd = $hb; // delta y
        }
        $xb = $x;
        $yb = $y;
        foreach ($bars as $col) {
            switch ($col) {
                // set transition colors
                case 'A': { // BLACK
                        $col_a = array(255);
                        $col_b = array(0);
                        break;
                    }
                case 'W': { // WHITE
                        $col_a = array(0);
                        $col_b = array(255);
                        break;
                    }
                case 'R': { // R
                        $col_a = array(255, 255, 255);
                        $col_b = array(255, 0, 0);
                        break;
                    }
                case 'G': { // G
                        $col_a = array(255, 255, 255);
                        $col_b = array(0, 255, 0);
                        break;
                    }
                case 'B': { // B
                        $col_a = array(255, 255, 255);
                        $col_b = array(0, 0, 255);
                        break;
                    }
                case 'C': { // C
                        $col_a = array(0, 0, 0, 0);
                        $col_b = array(100, 0, 0, 0);
                        break;
                    }
                case 'M': { // M
                        $col_a = array(0, 0, 0, 0);
                        $col_b = array(0, 100, 0, 0);
                        break;
                    }
                case 'Y': { // Y
                        $col_a = array(0, 0, 0, 0);
                        $col_b = array(0, 0, 100, 0);
                        break;
                    }
                case 'K': { // K
                        $col_a = array(0, 0, 0, 0);
                        $col_b = array(0, 0, 0, 100);
                        break;
                    }
                default: { // GRAY
                        $col_a = array(255);
                        $col_b = array(0);
                        break;
                    }
            }
            if ($transition) {
                // color gradient
                $this->LinearGradient($xb, $yb, $wb, $hb, $col_a, $col_b, $coords);
            } else {
                // color rectangle
                $this->SetFillColorArray($col_b);
                $this->Rect($xb, $yb, $wb, $hb, 'F', array());
            }
            $xb += $xd;
            $yb += $yd;
        }
    }

    /**
     * Paints crop marks.
     * @param $x (float) abscissa of the crop mark center.
     * @param $y (float) ordinate of the crop mark center.
     * @param $w (float) width of the crop mark.
     * @param $h (float) height of the crop mark.
     * @param $type (string) type of crop mark, one symbol per type separated by comma: T = TOP, F = BOTTOM, L = LEFT, R = RIGHT, TL = A = TOP-LEFT, TR = B = TOP-RIGHT, BL = C = BOTTOM-LEFT, BR = D = BOTTOM-RIGHT.
     * @param $color (array) crop mark color (default black).
     * @author Nicola Asuni
     * @since 4.9.000 (2010-03-26)
     * @public
     */
    public function cropMark($x, $y, $w, $h, $type = 'T,R,B,L', $color = array(0, 0, 0)) {
        $this->SetLineStyle(array('width' => (0.5 / $this->k), 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => $color));
        $type = strtoupper($type);
        $type = preg_replace('/[^A-Z\-\,]*/', '', $type);
        // split type in single components
        $type = str_replace('-', ',', $type);
        $type = str_replace('TL', 'T,L', $type);
        $type = str_replace('TR', 'T,R', $type);
        $type = str_replace('BL', 'F,L', $type);
        $type = str_replace('BR', 'F,R', $type);
        $type = str_replace('A', 'T,L', $type);
        $type = str_replace('B', 'T,R', $type);
        $type = str_replace('T,RO', 'BO', $type);
        $type = str_replace('C', 'F,L', $type);
        $type = str_replace('D', 'F,R', $type);
        $crops = explode(',', strtoupper($type));
        // remove duplicates
        $crops = array_unique($crops);
        $dw = ($w / 4); // horizontal space to leave before the intersection point
        $dh = ($h / 4); // vertical space to leave before the intersection point
        foreach ($crops as $crop) {
            switch ($crop) {
                case 'T':
                case 'TOP': {
                        $x1 = $x;
                        $y1 = ($y - $h);
                        $x2 = $x;
                        $y2 = ($y - $dh);
                        break;
                    }
                case 'F':
                case 'BOTTOM': {
                        $x1 = $x;
                        $y1 = ($y + $dh);
                        $x2 = $x;
                        $y2 = ($y + $h);
                        break;
                    }
                case 'L':
                case 'LEFT': {
                        $x1 = ($x - $w);
                        $y1 = $y;
                        $x2 = ($x - $dw);
                        $y2 = $y;
                        break;
                    }
                case 'R':
                case 'RIGHT': {
                        $x1 = ($x + $dw);
                        $y1 = $y;
                        $x2 = ($x + $w);
                        $y2 = $y;
                        break;
                    }
            }
            $this->Line($x1, $y1, $x2, $y2);
        }
    }

    /**
     * Paints a registration mark
     * @param $x (float) abscissa of the registration mark center.
     * @param $y (float) ordinate of the registration mark center.
     * @param $r (float) radius of the crop mark.
     * @param $double (boolean) if true print two concentric crop marks.
     * @param $cola (array) crop mark color (default black).
     * @param $colb (array) second crop mark color.
     * @author Nicola Asuni
     * @since 4.9.000 (2010-03-26)
     * @public
     */
    public function registrationMark($x, $y, $r, $double = false, $cola = array(0, 0, 0), $colb = array(255, 255, 255)) {
        $line_style = array('width' => (0.5 / $this->k), 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => $cola);
        $this->SetFillColorArray($cola);
        $this->PieSector($x, $y, $r, 90, 180, 'F');
        $this->PieSector($x, $y, $r, 270, 360, 'F');
        $this->Circle($x, $y, $r, 0, 360, 'C', $line_style, array(), 8);
        if ($double) {
            $r2 = $r * 0.5;
            $this->SetFillColorArray($colb);
            $this->PieSector($x, $y, $r2, 90, 180, 'F');
            $this->PieSector($x, $y, $r2, 270, 360, 'F');
            $this->SetFillColorArray($cola);
            $this->PieSector($x, $y, $r2, 0, 90, 'F');
            $this->PieSector($x, $y, $r2, 180, 270, 'F');
            $this->Circle($x, $y, $r2, 0, 360, 'C', $line_style, array(), 8);
        }
    }

    /**
     * Paints a linear colour gradient.
     * @param $x (float) abscissa of the top left corner of the rectangle.
     * @param $y (float) ordinate of the top left corner of the rectangle.
     * @param $w (float) width of the rectangle.
     * @param $h (float) height of the rectangle.
     * @param $col1 (array) first color (Grayscale, RGB or CMYK components).
     * @param $col2 (array) second color (Grayscale, RGB or CMYK components).
     * @param $coords (array) array of the form (x1, y1, x2, y2) which defines the gradient vector (see linear_gradient_coords.jpg). The default value is from left to right (x1=0, y1=0, x2=1, y2=0).
     * @author Andreas W�rmser, Nicola Asuni
     * @since 3.1.000 (2008-06-09)
     * @public
     */
    public function LinearGradient($x, $y, $w, $h, $col1 = array(), $col2 = array(), $coords = array(0, 0, 1, 0)) {
        $this->Clip($x, $y, $w, $h);
        $this->Gradient(2, $coords, array(array('color' => $col1, 'offset' => 0, 'exponent' => 1), array('color' => $col2, 'offset' => 1, 'exponent' => 1)), array(), false);
    }

    /**
     * Paints a radial colour gradient.
     * @param $x (float) abscissa of the top left corner of the rectangle.
     * @param $y (float) ordinate of the top left corner of the rectangle.
     * @param $w (float) width of the rectangle.
     * @param $h (float) height of the rectangle.
     * @param $col1 (array) first color (Grayscale, RGB or CMYK components).
     * @param $col2 (array) second color (Grayscale, RGB or CMYK components).
     * @param $coords (array) array of the form (fx, fy, cx, cy, r) where (fx, fy) is the starting point of the gradient with color1, (cx, cy) is the center of the circle with color2, and r is the radius of the circle (see radial_gradient_coords.jpg). (fx, fy) should be inside the circle, otherwise some areas will not be defined.
     * @author Andreas W�rmser, Nicola Asuni
     * @since 3.1.000 (2008-06-09)
     * @public
     */
    public function RadialGradient($x, $y, $w, $h, $col1 = array(), $col2 = array(), $coords = array(0.5, 0.5, 0.5, 0.5, 1)) {
        $this->Clip($x, $y, $w, $h);
        $this->Gradient(3, $coords, array(array('color' => $col1, 'offset' => 0, 'exponent' => 1), array('color' => $col2, 'offset' => 1, 'exponent' => 1)), array(), false);
    }

    /**
     * Paints a coons patch mesh.
     * @param $x (float) abscissa of the top left corner of the rectangle.
     * @param $y (float) ordinate of the top left corner of the rectangle.
     * @param $w (float) width of the rectangle.
     * @param $h (float) height of the rectangle.
     * @param $col1 (array) first color (lower left corner) (RGB components).
     * @param $col2 (array) second color (lower right corner) (RGB components).
     * @param $col3 (array) third color (upper right corner) (RGB components).
     * @param $col4 (array) fourth color (upper left corner) (RGB components).
     * @param $coords (array) <ul><li>for one patch mesh: array(float x1, float y1, .... float x12, float y12): 12 pairs of coordinates (normally from 0 to 1) which specify the Bezier control points that define the patch. First pair is the lower left edge point, next is its right control point (control point 2). Then the other points are defined in the order: control point 1, edge point, control point 2 going counter-clockwise around the patch. Last (x12, y12) is the first edge point's left control point (control point 1).</li><li>for two or more patch meshes: array[number of patches]: arrays with the following keys for each patch: f: where to put that patch (0 = first patch, 1, 2, 3 = right, top and left of precedent patch - I didn't figure this out completely - just try and error ;-) points: 12 pairs of coordinates of the Bezier control points as above for the first patch, 8 pairs of coordinates for the following patches, ignoring the coordinates already defined by the precedent patch (I also didn't figure out the order of these - also: try and see what's happening) colors: must be 4 colors for the first patch, 2 colors for the following patches</li></ul>
     * @param $coords_min (array) minimum value used by the coordinates. If a coordinate's value is smaller than this it will be cut to coords_min. default: 0
     * @param $coords_max (array) maximum value used by the coordinates. If a coordinate's value is greater than this it will be cut to coords_max. default: 1
     * @param $antialias (boolean) A flag indicating whether to filter the shading function to prevent aliasing artifacts.
     * @author Andreas W�rmser, Nicola Asuni
     * @since 3.1.000 (2008-06-09)
     * @public
     */
    public function CoonsPatchMesh($x, $y, $w, $h, $col1 = array(), $col2 = array(), $col3 = array(), $col4 = array(), $coords = array(0.00, 0.0, 0.33, 0.00, 0.67, 0.00, 1.00, 0.00, 1.00, 0.33, 1.00, 0.67, 1.00, 1.00, 0.67, 1.00, 0.33, 1.00, 0.00, 1.00, 0.00, 0.67, 0.00, 0.33), $coords_min = 0, $coords_max = 1, $antialias = false) {
        if ($this->pdfa_mode OR ($this->state != 2)) {
            return;
        }
        $this->Clip($x, $y, $w, $h);
        $n = count($this->gradients) + 1;
        $this->gradients[$n] = array();
        $this->gradients[$n]['type'] = 6; //coons patch mesh
        $this->gradients[$n]['coords'] = array();
        $this->gradients[$n]['antialias'] = $antialias;
        $this->gradients[$n]['colors'] = array();
        $this->gradients[$n]['transparency'] = false;
        //check the coords array if it is the simple array or the multi patch array
        if (!isset($coords[0]['f'])) {
            //simple array -> convert to multi patch array
            if (!isset($col1[1])) {
                $col1[1] = $col1[2] = $col1[0];
            }
            if (!isset($col2[1])) {
                $col2[1] = $col2[2] = $col2[0];
            }
            if (!isset($col3[1])) {
                $col3[1] = $col3[2] = $col3[0];
            }
            if (!isset($col4[1])) {
                $col4[1] = $col4[2] = $col4[0];
            }
            $patch_array[0]['f'] = 0;
            $patch_array[0]['points'] = $coords;
            $patch_array[0]['colors'][0]['r'] = $col1[0];
            $patch_array[0]['colors'][0]['g'] = $col1[1];
            $patch_array[0]['colors'][0]['b'] = $col1[2];
            $patch_array[0]['colors'][1]['r'] = $col2[0];
            $patch_array[0]['colors'][1]['g'] = $col2[1];
            $patch_array[0]['colors'][1]['b'] = $col2[2];
            $patch_array[0]['colors'][2]['r'] = $col3[0];
            $patch_array[0]['colors'][2]['g'] = $col3[1];
            $patch_array[0]['colors'][2]['b'] = $col3[2];
            $patch_array[0]['colors'][3]['r'] = $col4[0];
            $patch_array[0]['colors'][3]['g'] = $col4[1];
            $patch_array[0]['colors'][3]['b'] = $col4[2];
        } else {
            //multi patch array
            $patch_array = $coords;
        }
        $bpcd = 65535; //16 bits per coordinate
        //build the data stream
        $this->gradients[$n]['stream'] = '';
        $count_patch = count($patch_array);
        for ($i = 0; $i < $count_patch; ++$i) {
            $this->gradients[$n]['stream'] .= chr($patch_array[$i]['f']); //start with the edge flag as 8 bit
            $count_points = count($patch_array[$i]['points']);
            for ($j = 0; $j < $count_points; ++$j) {
                //each point as 16 bit
                $patch_array[$i]['points'][$j] = (($patch_array[$i]['points'][$j] - $coords_min) / ($coords_max - $coords_min)) * $bpcd;
                if ($patch_array[$i]['points'][$j] < 0) {
                    $patch_array[$i]['points'][$j] = 0;
                }
                if ($patch_array[$i]['points'][$j] > $bpcd) {
                    $patch_array[$i]['points'][$j] = $bpcd;
                }
                $this->gradients[$n]['stream'] .= chr(floor($patch_array[$i]['points'][$j] / 256));
                $this->gradients[$n]['stream'] .= chr(floor($patch_array[$i]['points'][$j] % 256));
            }
            $count_cols = count($patch_array[$i]['colors']);
            for ($j = 0; $j < $count_cols; ++$j) {
                //each color component as 8 bit
                $this->gradients[$n]['stream'] .= chr($patch_array[$i]['colors'][$j]['r']);
                $this->gradients[$n]['stream'] .= chr($patch_array[$i]['colors'][$j]['g']);
                $this->gradients[$n]['stream'] .= chr($patch_array[$i]['colors'][$j]['b']);
            }
        }
        //paint the gradient
        $this->_out('/Sh' . $n . ' sh');
        //restore previous Graphic State
        $this->_out('Q');
        if ($this->inxobj) {
            // we are inside an XObject template
            $this->xobjects[$this->xobjid]['gradients'][$n] = $this->gradients[$n];
        }
    }

    /**
     * Set a rectangular clipping area.
     * @param $x (float) abscissa of the top left corner of the rectangle (or top right corner for RTL mode).
     * @param $y (float) ordinate of the top left corner of the rectangle.
     * @param $w (float) width of the rectangle.
     * @param $h (float) height of the rectangle.
     * @author Andreas W�rmser, Nicola Asuni
     * @since 3.1.000 (2008-06-09)
     * @protected
     */
    protected function Clip($x, $y, $w, $h) {
        if ($this->state != 2) {
            return;
        }
        if ($this->rtl) {
            $x = $this->w - $x - $w;
        }
        //save current Graphic State
        $s = 'q';
        //set clipping area
        $s .= sprintf(' %F %F %F %F re W n', $x * $this->k, ($this->h - $y) * $this->k, $w * $this->k, -$h * $this->k);
        //set up transformation matrix for gradient
        $s .= sprintf(' %F 0 0 %F %F %F cm', $w * $this->k, $h * $this->k, $x * $this->k, ($this->h - ($y + $h)) * $this->k);
        $this->_out($s);
    }

    /**
     * Output gradient.
     * @param $type (int) type of gradient (1 Function-based shading; 2 Axial shading; 3 Radial shading; 4 Free-form Gouraud-shaded triangle mesh; 5 Lattice-form Gouraud-shaded triangle mesh; 6 Coons patch mesh; 7 Tensor-product patch mesh). (Not all types are currently supported)
     * @param $coords (array) array of coordinates.
     * @param $stops (array) array gradient color components: color = array of GRAY, RGB or CMYK color components; offset = (0 to 1) represents a location along the gradient vector; exponent = exponent of the exponential interpolation function (default = 1).
     * @param $background (array) An array of colour components appropriate to the colour space, specifying a single background colour value.
     * @param $antialias (boolean) A flag indicating whether to filter the shading function to prevent aliasing artifacts.
     * @author Nicola Asuni
     * @since 3.1.000 (2008-06-09)
     * @public
     */
    public function Gradient($type, $coords, $stops, $background = array(), $antialias = false) {
        if ($this->pdfa_mode OR ($this->state != 2)) {
            return;
        }
        $n = count($this->gradients) + 1;
        $this->gradients[$n] = array();
        $this->gradients[$n]['type'] = $type;
        $this->gradients[$n]['coords'] = $coords;
        $this->gradients[$n]['antialias'] = $antialias;
        $this->gradients[$n]['colors'] = array();
        $this->gradients[$n]['transparency'] = false;
        // color space
        $numcolspace = count($stops[0]['color']);
        $bcolor = array_values($background);
        switch ($numcolspace) {
            case 4: { // CMYK
                    $this->gradients[$n]['colspace'] = 'DeviceCMYK';
                    if (!empty($background)) {
                        $this->gradients[$n]['background'] = sprintf('%F %F %F %F', $bcolor[0] / 100, $bcolor[1] / 100, $bcolor[2] / 100, $bcolor[3] / 100);
                    }
                    break;
                }
            case 3: { // RGB
                    $this->gradients[$n]['colspace'] = 'DeviceRGB';
                    if (!empty($background)) {
                        $this->gradients[$n]['background'] = sprintf('%F %F %F', $bcolor[0] / 255, $bcolor[1] / 255, $bcolor[2] / 255);
                    }
                    break;
                }
            case 1: { // Gray scale
                    $this->gradients[$n]['colspace'] = 'DeviceGray';
                    if (!empty($background)) {
                        $this->gradients[$n]['background'] = sprintf('%F', $bcolor[0] / 255);
                    }
                    break;
                }
        }
        $num_stops = count($stops);
        $last_stop_id = $num_stops - 1;
        foreach ($stops as $key => $stop) {
            $this->gradients[$n]['colors'][$key] = array();
            // offset represents a location along the gradient vector
            if (isset($stop['offset'])) {
                $this->gradients[$n]['colors'][$key]['offset'] = $stop['offset'];
            } else {
                if ($key == 0) {
                    $this->gradients[$n]['colors'][$key]['offset'] = 0;
                } elseif ($key == $last_stop_id) {
                    $this->gradients[$n]['colors'][$key]['offset'] = 1;
                } else {
                    $offsetstep = (1 - $this->gradients[$n]['colors'][($key - 1)]['offset']) / ($num_stops - $key);
                    $this->gradients[$n]['colors'][$key]['offset'] = $this->gradients[$n]['colors'][($key - 1)]['offset'] + $offsetstep;
                }
            }
            if (isset($stop['opacity'])) {
                $this->gradients[$n]['colors'][$key]['opacity'] = $stop['opacity'];
                if ((!$this->pdfa_mode) AND ($stop['opacity'] < 1)) {
                    $this->gradients[$n]['transparency'] = true;
                }
            } else {
                $this->gradients[$n]['colors'][$key]['opacity'] = 1;
            }
            // exponent for the exponential interpolation function
            if (isset($stop['exponent'])) {
                $this->gradients[$n]['colors'][$key]['exponent'] = $stop['exponent'];
            } else {
                $this->gradients[$n]['colors'][$key]['exponent'] = 1;
            }
            // set colors
            $color = array_values($stop['color']);
            switch ($numcolspace) {
                case 4: { // CMYK
                        $this->gradients[$n]['colors'][$key]['color'] = sprintf('%F %F %F %F', $color[0] / 100, $color[1] / 100, $color[2] / 100, $color[3] / 100);
                        break;
                    }
                case 3: { // RGB
                        $this->gradients[$n]['colors'][$key]['color'] = sprintf('%F %F %F', $color[0] / 255, $color[1] / 255, $color[2] / 255);
                        break;
                    }
                case 1: { // Gray scale
                        $this->gradients[$n]['colors'][$key]['color'] = sprintf('%F', $color[0] / 255);
                        break;
                    }
            }
        }
        if ($this->gradients[$n]['transparency']) {
            // paint luminosity gradient
            $this->_out('/TGS' . $n . ' gs');
        }
        //paint the gradient
        $this->_out('/Sh' . $n . ' sh');
        //restore previous Graphic State
        $this->_out('Q');
        if ($this->inxobj) {
            // we are inside an XObject template
            $this->xobjects[$this->xobjid]['gradients'][$n] = $this->gradients[$n];
        }
    }

    /**
     * Output gradient shaders.
     * @author Nicola Asuni
     * @since 3.1.000 (2008-06-09)
     * @protected
     */
    function _putshaders() {
        if ($this->pdfa_mode) {
            return;
        }
        $idt = count($this->gradients); //index for transparency gradients
        foreach ($this->gradients as $id => $grad) {
            if (($grad['type'] == 2) OR ($grad['type'] == 3)) {
                $fc = $this->_newobj();
                $out = '<<';
                $out .= ' /FunctionType 3';
                $out .= ' /Domain [0 1]';
                $functions = '';
                $bounds = '';
                $encode = '';
                $i = 1;
                $num_cols = count($grad['colors']);
                $lastcols = $num_cols - 1;
                for ($i = 1; $i < $num_cols; ++$i) {
                    $functions .= ($fc + $i) . ' 0 R ';
                    if ($i < $lastcols) {
                        $bounds .= sprintf('%F ', $grad['colors'][$i]['offset']);
                    }
                    $encode .= '0 1 ';
                }
                $out .= ' /Functions [' . trim($functions) . ']';
                $out .= ' /Bounds [' . trim($bounds) . ']';
                $out .= ' /Encode [' . trim($encode) . ']';
                $out .= ' >>';
                $out .= "\n" . 'endobj';
                $this->_out($out);
                for ($i = 1; $i < $num_cols; ++$i) {
                    $this->_newobj();
                    $out = '<<';
                    $out .= ' /FunctionType 2';
                    $out .= ' /Domain [0 1]';
                    $out .= ' /C0 [' . $grad['colors'][($i - 1)]['color'] . ']';
                    $out .= ' /C1 [' . $grad['colors'][$i]['color'] . ']';
                    $out .= ' /N ' . $grad['colors'][$i]['exponent'];
                    $out .= ' >>';
                    $out .= "\n" . 'endobj';
                    $this->_out($out);
                }
                // set transparency fuctions
                if ($grad['transparency']) {
                    $ft = $this->_newobj();
                    $out = '<<';
                    $out .= ' /FunctionType 3';
                    $out .= ' /Domain [0 1]';
                    $functions = '';
                    $i = 1;
                    $num_cols = count($grad['colors']);
                    for ($i = 1; $i < $num_cols; ++$i) {
                        $functions .= ($ft + $i) . ' 0 R ';
                    }
                    $out .= ' /Functions [' . trim($functions) . ']';
                    $out .= ' /Bounds [' . trim($bounds) . ']';
                    $out .= ' /Encode [' . trim($encode) . ']';
                    $out .= ' >>';
                    $out .= "\n" . 'endobj';
                    $this->_out($out);
                    for ($i = 1; $i < $num_cols; ++$i) {
                        $this->_newobj();
                        $out = '<<';
                        $out .= ' /FunctionType 2';
                        $out .= ' /Domain [0 1]';
                        $out .= ' /C0 [' . $grad['colors'][($i - 1)]['opacity'] . ']';
                        $out .= ' /C1 [' . $grad['colors'][$i]['opacity'] . ']';
                        $out .= ' /N ' . $grad['colors'][$i]['exponent'];
                        $out .= ' >>';
                        $out .= "\n" . 'endobj';
                        $this->_out($out);
                    }
                }
            }
            // set shading object
            $this->_newobj();
            $out = '<< /ShadingType ' . $grad['type'];
            if (isset($grad['colspace'])) {
                $out .= ' /ColorSpace /' . $grad['colspace'];
            } else {
                $out .= ' /ColorSpace /DeviceRGB';
            }
            if (isset($grad['background']) AND !empty($grad['background'])) {
                $out .= ' /Background [' . $grad['background'] . ']';
            }
            if (isset($grad['antialias']) AND ($grad['antialias'] === true)) {
                $out .= ' /AntiAlias true';
            }
            if ($grad['type'] == 2) {
                $out .= ' ' . sprintf('/Coords [%F %F %F %F]', $grad['coords'][0], $grad['coords'][1], $grad['coords'][2], $grad['coords'][3]);
                $out .= ' /Domain [0 1]';
                $out .= ' /Function ' . $fc . ' 0 R';
                $out .= ' /Extend [true true]';
                $out .= ' >>';
            } elseif ($grad['type'] == 3) {
                //x0, y0, r0, x1, y1, r1
                //at this this time radius of inner circle is 0
                $out .= ' ' . sprintf('/Coords [%F %F 0 %F %F %F]', $grad['coords'][0], $grad['coords'][1], $grad['coords'][2], $grad['coords'][3], $grad['coords'][4]);
                $out .= ' /Domain [0 1]';
                $out .= ' /Function ' . $fc . ' 0 R';
                $out .= ' /Extend [true true]';
                $out .= ' >>';
            } elseif ($grad['type'] == 6) {
                $out .= ' /BitsPerCoordinate 16';
                $out .= ' /BitsPerComponent 8';
                $out .= ' /Decode[0 1 0 1 0 1 0 1 0 1]';
                $out .= ' /BitsPerFlag 8';
                $stream = $this->_getrawstream($grad['stream']);
                $out .= ' /Length ' . strlen($stream);
                $out .= ' >>';
                $out .= ' stream' . "\n" . $stream . "\n" . 'endstream';
            }
            $out .= "\n" . 'endobj';
            $this->_out($out);
            if ($grad['transparency']) {
                $shading_transparency = preg_replace('/\/ColorSpace \/[^\s]+/si', '/ColorSpace /DeviceGray', $out);
                $shading_transparency = preg_replace('/\/Function [0-9]+ /si', '/Function ' . $ft . ' ', $shading_transparency);
            }
            $this->gradients[$id]['id'] = $this->n;
            // set pattern object
            $this->_newobj();
            $out = '<< /Type /Pattern /PatternType 2';
            $out .= ' /Shading ' . $this->gradients[$id]['id'] . ' 0 R';
            $out .= ' >>';
            $out .= "\n" . 'endobj';
            $this->_out($out);
            $this->gradients[$id]['pattern'] = $this->n;
            // set shading and pattern for transparency mask
            if ($grad['transparency']) {
                // luminosity pattern
                $idgs = $id + $idt;
                $this->_newobj();
                $this->_out($shading_transparency);
                $this->gradients[$idgs]['id'] = $this->n;
                $this->_newobj();
                $out = '<< /Type /Pattern /PatternType 2';
                $out .= ' /Shading ' . $this->gradients[$idgs]['id'] . ' 0 R';
                $out .= ' >>';
                $out .= "\n" . 'endobj';
                $this->_out($out);
                $this->gradients[$idgs]['pattern'] = $this->n;
                // luminosity XObject
                $oid = $this->_newobj();
                $this->xobjects['LX' . $oid] = array('n' => $oid);
                $filter = '';
                $stream = 'q /a0 gs /Pattern cs /p' . $idgs . ' scn 0 0 ' . $this->wPt . ' ' . $this->hPt . ' re f Q';
                if ($this->compress) {
                    $filter = ' /Filter /FlateDecode';
                    $stream = gzcompress($stream);
                }
                $stream = $this->_getrawstream($stream);
                $out = '<< /Type /XObject /Subtype /Form /FormType 1' . $filter;
                $out .= ' /Length ' . strlen($stream);
                $rect = sprintf('%F %F', $this->wPt, $this->hPt);
                $out .= ' /BBox [0 0 ' . $rect . ']';
                $out .= ' /Group << /Type /Group /S /Transparency /CS /DeviceGray >>';
                $out .= ' /Resources <<';
                $out .= ' /ExtGState << /a0 << /ca 1 /CA 1 >> >>';
                $out .= ' /Pattern << /p' . $idgs . ' ' . $this->gradients[$idgs]['pattern'] . ' 0 R >>';
                $out .= ' >>';
                $out .= ' >> ';
                $out .= ' stream' . "\n" . $stream . "\n" . 'endstream';
                $out .= "\n" . 'endobj';
                $this->_out($out);
                // SMask
                $this->_newobj();
                $out = '<< /Type /Mask /S /Luminosity /G ' . ($this->n - 1) . ' 0 R >>' . "\n" . 'endobj';
                $this->_out($out);
                // ExtGState
                $this->_newobj();
                $out = '<< /Type /ExtGState /SMask ' . ($this->n - 1) . ' 0 R /AIS false >>' . "\n" . 'endobj';
                $this->_out($out);
                $this->extgstates[] = array('n' => $this->n, 'name' => 'TGS' . $id);
            }
        }
    }

    /**
     * Draw the sector of a circle.
     * It can be used for instance to render pie charts.
     * @param $xc (float) abscissa of the center.
     * @param $yc (float) ordinate of the center.
     * @param $r (float) radius.
     * @param $a (float) start angle (in degrees).
     * @param $b (float) end angle (in degrees).
     * @param $style (string) Style of rendering. See the getPathPaintOperator() function for more information.
     * @param $cw: (float) indicates whether to go clockwise (default: true).
     * @param $o: (float) origin of angles (0 for 3 o'clock, 90 for noon, 180 for 9 o'clock, 270 for 6 o'clock). Default: 90.
     * @author Maxime Delorme, Nicola Asuni
     * @since 3.1.000 (2008-06-09)
     * @public
     */
    public function PieSector($xc, $yc, $r, $a, $b, $style = 'FD', $cw = true, $o = 90) {
        $this->PieSectorXY($xc, $yc, $r, $r, $a, $b, $style, $cw, $o);
    }

    /**
     * Draw the sector of an ellipse.
     * It can be used for instance to render pie charts.
     * @param $xc (float) abscissa of the center.
     * @param $yc (float) ordinate of the center.
     * @param $rx (float) the x-axis radius.
     * @param $ry (float) the y-axis radius.
     * @param $a (float) start angle (in degrees).
     * @param $b (float) end angle (in degrees).
     * @param $style (string) Style of rendering. See the getPathPaintOperator() function for more information.
     * @param $cw: (float) indicates whether to go clockwise.
     * @param $o: (float) origin of angles (0 for 3 o'clock, 90 for noon, 180 for 9 o'clock, 270 for 6 o'clock).
     * @param $nc (integer) Number of curves used to draw a 90 degrees portion of arc.
     * @author Maxime Delorme, Nicola Asuni
     * @since 3.1.000 (2008-06-09)
     * @public
     */
    public function PieSectorXY($xc, $yc, $rx, $ry, $a, $b, $style = 'FD', $cw = false, $o = 0, $nc = 2) {
        if ($this->state != 2) {
            return;
        }
        if ($this->rtl) {
            $xc = ($this->w - $xc);
        }
        $op = $this->getPathPaintOperator($style);
        if ($op == 'f') {
            $line_style = array();
        }
        if ($cw) {
            $d = $b;
            $b = (360 - $a + $o);
            $a = (360 - $d + $o);
        } else {
            $b += $o;
            $a += $o;
        }
        $this->_outellipticalarc($xc, $yc, $rx, $ry, 0, $a, $b, true, $nc);
        $this->_out($op);
    }

    /**
     * Embed vector-based Adobe Illustrator (AI) or AI-compatible EPS files.
     * NOTE: EPS is not yet fully implemented, use the setRasterizeVectorImages() method to enable/disable rasterization of vector images using ImageMagick library.
     * Only vector drawing is supported, not text or bitmap.
     * Although the script was successfully tested with various AI format versions, best results are probably achieved with files that were exported in the AI3 format (tested with Illustrator CS2, Freehand MX and Photoshop CS2).
     * @param $file (string) Name of the file containing the image or a '@' character followed by the EPS/AI data string.
     * @param $x (float) Abscissa of the upper-left corner.
     * @param $y (float) Ordinate of the upper-left corner.
     * @param $w (float) Width of the image in the page. If not specified or equal to zero, it is automatically calculated.
     * @param $h (float) Height of the image in the page. If not specified or equal to zero, it is automatically calculated.
     * @param $link (mixed) URL or identifier returned by AddLink().
     * @param $useBoundingBox (boolean) specifies whether to position the bounding box (true) or the complete canvas (false) at location (x,y). Default value is true.
     * @param $align (string) Indicates the alignment of the pointer next to image insertion relative to image height. The value can be:<ul><li>T: top-right for LTR or top-left for RTL</li><li>M: middle-right for LTR or middle-left for RTL</li><li>B: bottom-right for LTR or bottom-left for RTL</li><li>N: next line</li></ul>
     * @param $palign (string) Allows to center or align the image on the current line. Possible values are:<ul><li>L : left align</li><li>C : center</li><li>R : right align</li><li>'' : empty string : left for LTR or right for RTL</li></ul>
     * @param $border (mixed) Indicates if borders must be drawn around the cell. The value can be a number:<ul><li>0: no border (default)</li><li>1: frame</li></ul> or a string containing some or all of the following characters (in any order):<ul><li>L: left</li><li>T: top</li><li>R: right</li><li>B: bottom</li></ul> or an array of line styles for each border group - for example: array('LTRB' => array('width' => 2, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(0, 0, 0)))
     * @param $fitonpage (boolean) if true the image is resized to not exceed page dimensions.
     * @param $fixoutvals (boolean) if true remove values outside the bounding box.
     * @author Valentin Schmidt, Nicola Asuni
     * @since 3.1.000 (2008-06-09)
     * @public
     */
    public function ImageEps($file, $x = '', $y = '', $w = 0, $h = 0, $link = '', $useBoundingBox = true, $align = '', $palign = '', $border = 0, $fitonpage = false, $fixoutvals = false) {
        if ($this->state != 2) {
            return;
        }
        if ($this->rasterize_vector_images AND ($w > 0) AND ($h > 0)) {
            // convert EPS to raster image using GD or ImageMagick libraries
            return $this->Image($file, $x, $y, $w, $h, 'EPS', $link, $align, true, 300, $palign, false, false, $border, false, false, $fitonpage);
        }
        if ($x === '') {
            $x = $this->x;
        }
        if ($y === '') {
            $y = $this->y;
        }
        // check page for no-write regions and adapt page margins if necessary
        list($x, $y) = $this->checkPageRegions($h, $x, $y);
        $k = $this->k;
        if ($file{0} === '@') { // image from string
            $data = substr($file, 1);
        } else { // EPS/AI file
            $data = file_get_contents($file);
        }
        if ($data === false) {
            $this->Error('EPS file not found: ' . $file);
        }
        $regs = array();
        // EPS/AI compatibility check (only checks files created by Adobe Illustrator!)
        preg_match("/%%Creator:([^\r\n]+)/", $data, $regs); # find Creator
        if (count($regs) > 1) {
            $version_str = trim($regs[1]); # e.g. "Adobe Illustrator(R) 8.0"
            if (strpos($version_str, 'Adobe Illustrator') !== false) {
                $versexp = explode(' ', $version_str);
                $version = (float) array_pop($versexp);
                if ($version >= 9) {
                    $this->Error('This version of Adobe Illustrator file is not supported: ' . $file);
                }
            }
        }
        // strip binary bytes in front of PS-header
        $start = strpos($data, '%!PS-Adobe');
        if ($start > 0) {
            $data = substr($data, $start);
        }
        // find BoundingBox params
        preg_match("/%%BoundingBox:([^\r\n]+)/", $data, $regs);
        if (count($regs) > 1) {
            list($x1, $y1, $x2, $y2) = explode(' ', trim($regs[1]));
        } else {
            $this->Error('No BoundingBox found in EPS/AI file: ' . $file);
        }
        $start = strpos($data, '%%EndSetup');
        if ($start === false) {
            $start = strpos($data, '%%EndProlog');
        }
        if ($start === false) {
            $start = strpos($data, '%%BoundingBox');
        }
        $data = substr($data, $start);
        $end = strpos($data, '%%PageTrailer');
        if ($end === false) {
            $end = strpos($data, 'showpage');
        }
        if ($end) {
            $data = substr($data, 0, $end);
        }
        // calculate image width and height on document
        if (($w <= 0) AND ($h <= 0)) {
            $w = ($x2 - $x1) / $k;
            $h = ($y2 - $y1) / $k;
        } elseif ($w <= 0) {
            $w = ($x2 - $x1) / $k * ($h / (($y2 - $y1) / $k));
        } elseif ($h <= 0) {
            $h = ($y2 - $y1) / $k * ($w / (($x2 - $x1) / $k));
        }
        // fit the image on available space
        list($w, $h, $x, $y) = $this->fitBlock($w, $h, $x, $y, $fitonpage);
        if ($this->rasterize_vector_images) {
            // convert EPS to raster image using GD or ImageMagick libraries
            return $this->Image($file, $x, $y, $w, $h, 'EPS', $link, $align, true, 300, $palign, false, false, $border, false, false, $fitonpage);
        }
        // set scaling factors
        $scale_x = $w / (($x2 - $x1) / $k);
        $scale_y = $h / (($y2 - $y1) / $k);
        // set alignment
        $this->img_rb_y = $y + $h;
        // set alignment
        if ($this->rtl) {
            if ($palign == 'L') {
                $ximg = $this->lMargin;
            } elseif ($palign == 'C') {
                $ximg = ($this->w + $this->lMargin - $this->rMargin - $w) / 2;
            } elseif ($palign == 'R') {
                $ximg = $this->w - $this->rMargin - $w;
            } else {
                $ximg = $x - $w;
            }
            $this->img_rb_x = $ximg;
        } else {
            if ($palign == 'L') {
                $ximg = $this->lMargin;
            } elseif ($palign == 'C') {
                $ximg = ($this->w + $this->lMargin - $this->rMargin - $w) / 2;
            } elseif ($palign == 'R') {
                $ximg = $this->w - $this->rMargin - $w;
            } else {
                $ximg = $x;
            }
            $this->img_rb_x = $ximg + $w;
        }
        if ($useBoundingBox) {
            $dx = $ximg * $k - $x1;
            $dy = $y * $k - $y1;
        } else {
            $dx = $ximg * $k;
            $dy = $y * $k;
        }
        // save the current graphic state
        $this->_out('q' . $this->epsmarker);
        // translate
        $this->_out(sprintf('%F %F %F %F %F %F cm', 1, 0, 0, 1, $dx, $dy + ($this->hPt - (2 * $y * $k) - ($y2 - $y1))));
        // scale
        if (isset($scale_x)) {
            $this->_out(sprintf('%F %F %F %F %F %F cm', $scale_x, 0, 0, $scale_y, $x1 * (1 - $scale_x), $y2 * (1 - $scale_y)));
        }
        // handle pc/unix/mac line endings
        $lines = preg_split('/[\r\n]+/si', $data, -1, PREG_SPLIT_NO_EMPTY);
        $u = 0;
        $cnt = count($lines);
        for ($i = 0; $i < $cnt; ++$i) {
            $line = $lines[$i];
            if (($line == '') OR ($line{0} == '%')) {
                continue;
            }
            $len = strlen($line);
            // check for spot color names
            $color_name = '';
            if (strcasecmp('x', substr(trim($line), -1)) == 0) {
                if (preg_match('/\([^\)]*\)/', $line, $matches) > 0) {
                    // extract spot color name
                    $color_name = $matches[0];
                    // remove color name from string
                    $line = str_replace(' ' . $color_name, '', $line);
                    // remove pharentesis from color name
                    $color_name = substr($color_name, 1, -1);
                }
            }
            $chunks = explode(' ', $line);
            $cmd = trim(array_pop($chunks));
            // RGB
            if (($cmd == 'Xa') OR ($cmd == 'XA')) {
                $b = array_pop($chunks);
                $g = array_pop($chunks);
                $r = array_pop($chunks);
                $this->_out('' . $r . ' ' . $g . ' ' . $b . ' ' . ($cmd == 'Xa' ? 'rg' : 'RG')); //substr($line, 0, -2).'rg' -> in EPS (AI8): c m y k r g b rg!
                continue;
            }
            $skip = false;
            if ($fixoutvals) {
                // check for values outside the bounding box
                switch ($cmd) {
                    case 'm':
                    case 'l':
                    case 'L': {
                            // skip values outside bounding box
                            foreach ($chunks as $key => $val) {
                                if ((($key % 2) == 0) AND (($val < $x1) OR ($val > $x2))) {
                                    $skip = true;
                                } elseif ((($key % 2) != 0) AND (($val < $y1) OR ($val > $y2))) {
                                    $skip = true;
                                }
                            }
                        }
                }
            }
            switch ($cmd) {
                case 'm':
                case 'l':
                case 'v':
                case 'y':
                case 'c':
                case 'k':
                case 'K':
                case 'g':
                case 'G':
                case 's':
                case 'S':
                case 'J':
                case 'j':
                case 'w':
                case 'M':
                case 'd':
                case 'n': {
                        if ($skip) {
                            break;
                        }
                        $this->_out($line);
                        break;
                    }
                case 'x': {// custom fill color
                        if (empty($color_name)) {
                            // CMYK color
                            list($col_c, $col_m, $col_y, $col_k) = $chunks;
                            $this->_out('' . $col_c . ' ' . $col_m . ' ' . $col_y . ' ' . $col_k . ' k');
                        } else {
                            // Spot Color (CMYK + tint)
                            list($col_c, $col_m, $col_y, $col_k, $col_t) = $chunks;
                            $this->AddSpotColor($color_name, ($col_c * 100), ($col_m * 100), ($col_y * 100), ($col_k * 100));
                            $color_cmd = sprintf('/CS%d cs %F scn', $this->spot_colors[$color_name]['i'], (1 - $col_t));
                            $this->_out($color_cmd);
                        }
                        break;
                    }
                case 'X': { // custom stroke color
                        if (empty($color_name)) {
                            // CMYK color
                            list($col_c, $col_m, $col_y, $col_k) = $chunks;
                            $this->_out('' . $col_c . ' ' . $col_m . ' ' . $col_y . ' ' . $col_k . ' K');
                        } else {
                            // Spot Color (CMYK + tint)
                            list($col_c, $col_m, $col_y, $col_k, $col_t) = $chunks;
                            $this->AddSpotColor($color_name, ($col_c * 100), ($col_m * 100), ($col_y * 100), ($col_k * 100));
                            $color_cmd = sprintf('/CS%d CS %F SCN', $this->spot_colors[$color_name]['i'], (1 - $col_t));
                            $this->_out($color_cmd);
                        }
                        break;
                    }
                case 'Y':
                case 'N':
                case 'V':
                case 'L':
                case 'C': {
                        if ($skip) {
                            break;
                        }
                        $line[($len - 1)] = strtolower($cmd);
                        $this->_out($line);
                        break;
                    }
                case 'b':
                case 'B': {
                        $this->_out($cmd . '*');
                        break;
                    }
                case 'f':
                case 'F': {
                        if ($u > 0) {
                            $isU = false;
                            $max = min(($i + 5), $cnt);
                            for ($j = ($i + 1); $j < $max; ++$j) {
                                $isU = ($isU OR (($lines[$j] == 'U') OR ($lines[$j] == '*U')));
                            }
                            if ($isU) {
                                $this->_out('f*');
                            }
                        } else {
                            $this->_out('f*');
                        }
                        break;
                    }
                case '*u': {
                        ++$u;
                        break;
                    }
                case '*U': {
                        --$u;
                        break;
                    }
            }
        }
        // restore previous graphic state
        $this->_out($this->epsmarker . 'Q');
        if (!empty($border)) {
            $bx = $this->x;
            $by = $this->y;
            $this->x = $ximg;
            if ($this->rtl) {
                $this->x += $w;
            }
            $this->y = $y;
            $this->Cell($w, $h, '', $border, 0, '', 0, '', 0, true);
            $this->x = $bx;
            $this->y = $by;
        }
        if ($link) {
            $this->Link($ximg, $y, $w, $h, $link, 0);
        }
        // set pointer to align the next text/objects
        switch ($align) {
            case 'T': {
                    $this->y = $y;
                    $this->x = $this->img_rb_x;
                    break;
                }
            case 'M': {
                    $this->y = $y + round($h / 2);
                    $this->x = $this->img_rb_x;
                    break;
                }
            case 'B': {
                    $this->y = $this->img_rb_y;
                    $this->x = $this->img_rb_x;
                    break;
                }
            case 'N': {
                    $this->SetY($this->img_rb_y);
                    break;
                }
            default: {
                    break;
                }
        }
        $this->endlinex = $this->img_rb_x;
    }

    /**
     * Set document barcode.
     * @param $bc (string) barcode
     * @public
     */
    public function setBarcode($bc = '') {
        $this->barcode = $bc;
    }

    /**
     * Get current barcode.
     * @return string
     * @public
     * @since 4.0.012 (2008-07-24)
     */
    public function getBarcode() {
        return $this->barcode;
    }

    /**
     * Print a Linear Barcode.
     * @param $code (string) code to print
     * @param $type (string) type of barcode (see barcodes.php for supported formats).
     * @param $x (int) x position in user units (empty string = current x position)
     * @param $y (int) y position in user units (empty string = current y position)
     * @param $w (int) width in user units (empty string = remaining page width)
     * @param $h (int) height in user units (empty string = remaining page height)
     * @param $xres (float) width of the smallest bar in user units (empty string = default value = 0.4mm)
     * @param $style (array) array of options:<ul>
     * <li>boolean $style['border'] if true prints a border</li>
     * <li>int $style['padding'] padding to leave around the barcode in user units (set to 'auto' for automatic padding)</li>
     * <li>int $style['hpadding'] horizontal padding in user units (set to 'auto' for automatic padding)</li>
     * <li>int $style['vpadding'] vertical padding in user units (set to 'auto' for automatic padding)</li>
     * <li>array $style['fgcolor'] color array for bars and text</li>
     * <li>mixed $style['bgcolor'] color array for background (set to false for transparent)</li>
     * <li>boolean $style['text'] if true prints text below the barcode</li>
     * <li>string $style['label'] override default label</li>
     * <li>string $style['font'] font name for text</li><li>int $style['fontsize'] font size for text</li>
     * <li>int $style['stretchtext']: 0 = disabled; 1 = horizontal scaling only if necessary; 2 = forced horizontal scaling; 3 = character spacing only if necessary; 4 = forced character spacing.</li>
     * <li>string $style['position'] horizontal position of the containing barcode cell on the page: L = left margin; C = center; R = right margin.</li>
     * <li>string $style['align'] horizontal position of the barcode on the containing rectangle: L = left; C = center; R = right.</li>
     * <li>string $style['stretch'] if true stretch the barcode to best fit the available width, otherwise uses $xres resolution for a single bar.</li>
     * <li>string $style['fitwidth'] if true reduce the width to fit the barcode width + padding. When this option is enabled the 'stretch' option is automatically disabled.</li>
     * <li>string $style['cellfitalign'] this option works only when 'fitwidth' is true and 'position' is unset or empty. Set the horizontal position of the containing barcode cell inside the specified rectangle: L = left; C = center; R = right.</li></ul>
     * @param $align (string) Indicates the alignment of the pointer next to barcode insertion relative to barcode height. The value can be:<ul><li>T: top-right for LTR or top-left for RTL</li><li>M: middle-right for LTR or middle-left for RTL</li><li>B: bottom-right for LTR or bottom-left for RTL</li><li>N: next line</li></ul>
     * @author Nicola Asuni
     * @since 3.1.000 (2008-06-09)
     * @public
     */
    public function write1DBarcode($code, $type, $x = '', $y = '', $w = '', $h = '', $xres = '', $style = '', $align = '') {
        if ($this->empty_string(trim($code))) {
            return;
        }
        require_once(dirname(__FILE__) . '/barcodes.php');
        // save current graphic settings
        $gvars = $this->getGraphicVars();
        // create new barcode object
        $barcodeobj = new TCPDFBarcode($code, $type);
        $arrcode = $barcodeobj->getBarcodeArray();
        if (($arrcode === false) OR empty($arrcode) OR ($arrcode['maxw'] == 0)) {
            $this->Error('Error in 1D barcode string');
        }
        // set default values
        if (!isset($style['position'])) {
            $style['position'] = '';
        } elseif ($style['position'] == 'S') {
            // keep this for backward compatibility
            $style['position'] = '';
            $style['stretch'] = true;
        }
        if (!isset($style['fitwidth'])) {
            if (!isset($style['stretch'])) {
                $style['fitwidth'] = true;
            } else {
                $style['fitwidth'] = false;
            }
        }
        if ($style['fitwidth']) {
            // disable stretch
            $style['stretch'] = false;
        }
        if (!isset($style['stretch'])) {
            if (($w === '') OR ($w <= 0)) {
                $style['stretch'] = false;
            } else {
                $style['stretch'] = true;
            }
        }
        if (!isset($style['fgcolor'])) {
            $style['fgcolor'] = array(0, 0, 0); // default black
        }
        if (!isset($style['bgcolor'])) {
            $style['bgcolor'] = false; // default transparent
        }
        if (!isset($style['border'])) {
            $style['border'] = false;
        }
        $fontsize = 0;
        if (!isset($style['text'])) {
            $style['text'] = false;
        }
        if ($style['text'] AND isset($style['font'])) {
            if (isset($style['fontsize'])) {
                $fontsize = $style['fontsize'];
            }
            $this->SetFont($style['font'], '', $fontsize);
        }
        if (!isset($style['stretchtext'])) {
            $style['stretchtext'] = 4;
        }
        if ($x === '') {
            $x = $this->x;
        }
        if ($y === '') {
            $y = $this->y;
        }
        // check page for no-write regions and adapt page margins if necessary
        list($x, $y) = $this->checkPageRegions($h, $x, $y);
        if (($w === '') OR ($w <= 0)) {
            if ($this->rtl) {
                $w = $x - $this->lMargin;
            } else {
                $w = $this->w - $this->rMargin - $x;
            }
        }
        // padding
        if (!isset($style['padding'])) {
            $padding = 0;
        } elseif ($style['padding'] === 'auto') {
            $padding = 10 * ($w / ($arrcode['maxw'] + 20));
        } else {
            $padding = floatval($style['padding']);
        }
        // horizontal padding
        if (!isset($style['hpadding'])) {
            $hpadding = $padding;
        } elseif ($style['hpadding'] === 'auto') {
            $hpadding = 10 * ($w / ($arrcode['maxw'] + 20));
        } else {
            $hpadding = floatval($style['hpadding']);
        }
        // vertical padding
        if (!isset($style['vpadding'])) {
            $vpadding = $padding;
        } elseif ($style['vpadding'] === 'auto') {
            $vpadding = ($hpadding / 2);
        } else {
            $vpadding = floatval($style['vpadding']);
        }
        // calculate xres (single bar width)
        $max_xres = ($w - (2 * $hpadding)) / $arrcode['maxw'];
        if ($style['stretch']) {
            $xres = $max_xres;
        } else {
            if ($this->empty_string($xres)) {
                $xres = (0.141 * $this->k); // default bar width = 0.4 mm
            }
            if ($xres > $max_xres) {
                // correct xres to fit on $w
                $xres = $max_xres;
            }
            if ((isset($style['padding']) AND ($style['padding'] === 'auto'))
                    OR (isset($style['hpadding']) AND ($style['hpadding'] === 'auto'))) {
                $hpadding = 10 * $xres;
                if (isset($style['vpadding']) AND ($style['vpadding'] === 'auto')) {
                    $vpadding = ($hpadding / 2);
                }
            }
        }
        if ($style['fitwidth']) {
            $wold = $w;
            $w = (($arrcode['maxw'] * $xres) + (2 * $hpadding));
            if (isset($style['cellfitalign'])) {
                switch ($style['cellfitalign']) {
                    case 'L': {
                            if ($this->rtl) {
                                $x -= ($wold - $w);
                            }
                            break;
                        }
                    case 'R': {
                            if (!$this->rtl) {
                                $x += ($wold - $w);
                            }
                            break;
                        }
                    case 'C': {
                            if ($this->rtl) {
                                $x -= (($wold - $w) / 2);
                            } else {
                                $x += (($wold - $w) / 2);
                            }
                            break;
                        }
                    default : {
                            break;
                        }
                }
            }
        }
        $text_height = ($this->cell_height_ratio * $fontsize / $this->k);
        // height
        if (($h === '') OR ($h <= 0)) {
            // set default height
            $h = (($arrcode['maxw'] * $xres) / 3) + (2 * $vpadding) + $text_height;
        }
        $barh = $h - $text_height - (2 * $vpadding);
        if ($barh <= 0) {
            // try to reduce font or padding to fit barcode on available height
            if ($text_height > $h) {
                $fontsize = (($h * $this->k) / (4 * $this->cell_height_ratio));
                $text_height = ($this->cell_height_ratio * $fontsize / $this->k);
                $this->SetFont($style['font'], '', $fontsize);
            }
            if ($vpadding > 0) {
                $vpadding = (($h - $text_height) / 4);
            }
            $barh = $h - $text_height - (2 * $vpadding);
        }
        // fit the barcode on available space
        list($w, $h, $x, $y) = $this->fitBlock($w, $h, $x, $y, false);
        // set alignment
        $this->img_rb_y = $y + $h;
        // set alignment
        if ($this->rtl) {
            if ($style['position'] == 'L') {
                $xpos = $this->lMargin;
            } elseif ($style['position'] == 'C') {
                $xpos = ($this->w + $this->lMargin - $this->rMargin - $w) / 2;
            } elseif ($style['position'] == 'R') {
                $xpos = $this->w - $this->rMargin - $w;
            } else {
                $xpos = $x - $w;
            }
            $this->img_rb_x = $xpos;
        } else {
            if ($style['position'] == 'L') {
                $xpos = $this->lMargin;
            } elseif ($style['position'] == 'C') {
                $xpos = ($this->w + $this->lMargin - $this->rMargin - $w) / 2;
            } elseif ($style['position'] == 'R') {
                $xpos = $this->w - $this->rMargin - $w;
            } else {
                $xpos = $x;
            }
            $this->img_rb_x = $xpos + $w;
        }
        $xpos_rect = $xpos;
        if (!isset($style['align'])) {
            $style['align'] = 'C';
        }
        switch ($style['align']) {
            case 'L': {
                    $xpos = $xpos_rect + $hpadding;
                    break;
                }
            case 'R': {
                    $xpos = $xpos_rect + ($w - ($arrcode['maxw'] * $xres)) - $hpadding;
                    break;
                }
            case 'C':
            default : {
                    $xpos = $xpos_rect + (($w - ($arrcode['maxw'] * $xres)) / 2);
                    break;
                }
        }
        $xpos_text = $xpos;
        // barcode is always printed in LTR direction
        $tempRTL = $this->rtl;
        $this->rtl = false;
        // print background color
        if ($style['bgcolor']) {
            $this->Rect($xpos_rect, $y, $w, $h, $style['border'] ? 'DF' : 'F', '', $style['bgcolor']);
        } elseif ($style['border']) {
            $this->Rect($xpos_rect, $y, $w, $h, 'D');
        }
        // set foreground color
        $this->SetDrawColorArray($style['fgcolor']);
        $this->SetTextColorArray($style['fgcolor']);
        // print bars
        foreach ($arrcode['bcode'] as $k => $v) {
            $bw = ($v['w'] * $xres);
            if ($v['t']) {
                // draw a vertical bar
                $ypos = $y + $vpadding + ($v['p'] * $barh / $arrcode['maxh']);
                $this->Rect($xpos, $ypos, $bw, ($v['h'] * $barh / $arrcode['maxh']), 'F', array(), $style['fgcolor']);
            }
            $xpos += $bw;
        }
        // print text
        if ($style['text']) {
            if (isset($style['label']) AND !$this->empty_string($style['label'])) {
                $label = $style['label'];
            } else {
                $label = $code;
            }
            $txtwidth = ($arrcode['maxw'] * $xres);
            if ($this->GetStringWidth($label) > $txtwidth) {
                $style['stretchtext'] = 2;
            }
            // print text
            $this->x = $xpos_text;
            $this->y = $y + $vpadding + $barh;
            $cellpadding = $this->cell_padding;
            $this->SetCellPadding(0);
            $this->Cell($txtwidth, '', $label, 0, 0, 'C', false, '', $style['stretchtext'], false, 'T', 'T');
            $this->cell_padding = $cellpadding;
        }
        // restore original direction
        $this->rtl = $tempRTL;
        // restore previous settings
        $this->setGraphicVars($gvars);
        // set pointer to align the next text/objects
        switch ($align) {
            case 'T': {
                    $this->y = $y;
                    $this->x = $this->img_rb_x;
                    break;
                }
            case 'M': {
                    $this->y = $y + round($h / 2);
                    $this->x = $this->img_rb_x;
                    break;
                }
            case 'B': {
                    $this->y = $this->img_rb_y;
                    $this->x = $this->img_rb_x;
                    break;
                }
            case 'N': {
                    $this->SetY($this->img_rb_y);
                    break;
                }
            default: {
                    break;
                }
        }
        $this->endlinex = $this->img_rb_x;
    }

    /**
     * This function is DEPRECATED, please use the new write1DBarcode() function.
     * @param $x (int) x position in user units
     * @param $y (int) y position in user units
     * @param $w (int) width in user units
     * @param $h (int) height position in user units
     * @param $type (string) type of barcode
     * @param $style (string) barcode style
     * @param $font (string) font for text
     * @param $xres (int) x resolution
     * @param $code (string) code to print
     * @deprecated deprecated since version 3.1.000 (2008-06-10)
     * @public
     * @see write1DBarcode()
     */
    public function writeBarcode($x, $y, $w, $h, $type, $style, $font, $xres, $code) {
        // convert old settings for the new write1DBarcode() function.
        $xres = 1 / $xres;
        $newstyle = array(
            'position' => '',
            'align' => '',
            'stretch' => false,
            'fitwidth' => false,
            'cellfitalign' => '',
            'border' => false,
            'padding' => 0,
            'fgcolor' => array(0, 0, 0),
            'bgcolor' => false,
            'text' => true,
            'font' => $font,
            'fontsize' => 8,
            'stretchtext' => 4
        );
        if ($style & 1) {
            $newstyle['border'] = true;
        }
        if ($style & 2) {
            $newstyle['bgcolor'] = false;
        }
        if ($style & 4) {
            $newstyle['position'] = 'C';
        } elseif ($style & 8) {
            $newstyle['position'] = 'L';
        } elseif ($style & 16) {
            $newstyle['position'] = 'R';
        }
        if ($style & 128) {
            $newstyle['text'] = true;
        }
        if ($style & 256) {
            $newstyle['stretchtext'] = 4;
        }
        $this->write1DBarcode($code, $type, $x, $y, $w, $h, $xres, $newstyle, '');
    }

    /**
     * Print 2D Barcode.
     * @param $code (string) code to print
     * @param $type (string) type of barcode (see 2dbarcodes.php for supported formats).
     * @param $x (int) x position in user units
     * @param $y (int) y position in user units
     * @param $w (int) width in user units
     * @param $h (int) height in user units
     * @param $style (array) array of options:<ul>
     * <li>boolean $style['border'] if true prints a border around the barcode</li>
     * <li>int $style['padding'] padding to leave around the barcode in barcode units (set to 'auto' for automatic padding)</li>
     * <li>int $style['hpadding'] horizontal padding in barcode units (set to 'auto' for automatic padding)</li>
     * <li>int $style['vpadding'] vertical padding in barcode units (set to 'auto' for automatic padding)</li>
     * <li>int $style['module_width'] width of a single module in points</li>
     * <li>int $style['module_height'] height of a single module in points</li>
     * <li>array $style['fgcolor'] color array for bars and text</li>
     * <li>mixed $style['bgcolor'] color array for background or false for transparent</li>
     * <li>string $style['position'] barcode position on the page: L = left margin; C = center; R = right margin; S = stretch</li><li>$style['module_width'] width of a single module in points</li>
     * <li>$style['module_height'] height of a single module in points</li></ul>
     * @param $align (string) Indicates the alignment of the pointer next to barcode insertion relative to barcode height. The value can be:<ul><li>T: top-right for LTR or top-left for RTL</li><li>M: middle-right for LTR or middle-left for RTL</li><li>B: bottom-right for LTR or bottom-left for RTL</li><li>N: next line</li></ul>
     * @param $distort (boolean) if true distort the barcode to fit width and height, otherwise preserve aspect ratio
     * @author Nicola Asuni
     * @since 4.5.037 (2009-04-07)
     * @public
     */
    public function write2DBarcode($code, $type, $x = '', $y = '', $w = '', $h = '', $style = '', $align = '', $distort = false) {
        if ($this->empty_string(trim($code))) {
            return;
        }
        require_once(dirname(__FILE__) . '/2dbarcodes.php');
        // save current graphic settings
        $gvars = $this->getGraphicVars();
        // create new barcode object
        $barcodeobj = new TCPDF2DBarcode($code, $type);
        $arrcode = $barcodeobj->getBarcodeArray();
        if (($arrcode === false) OR empty($arrcode) OR !isset($arrcode['num_rows']) OR ($arrcode['num_rows'] == 0) OR !isset($arrcode['num_cols']) OR ($arrcode['num_cols'] == 0)) {
            $this->Error('Error in 2D barcode string');
        }
        // set default values
        if (!isset($style['position'])) {
            $style['position'] = '';
        }
        if (!isset($style['fgcolor'])) {
            $style['fgcolor'] = array(0, 0, 0); // default black
        }
        if (!isset($style['bgcolor'])) {
            $style['bgcolor'] = false; // default transparent
        }
        if (!isset($style['border'])) {
            $style['border'] = false;
        }
        // padding
        if (!isset($style['padding'])) {
            $style['padding'] = 0;
        } elseif ($style['padding'] === 'auto') {
            $style['padding'] = 4;
        }
        if (!isset($style['hpadding'])) {
            $style['hpadding'] = $style['padding'];
        } elseif ($style['hpadding'] === 'auto') {
            $style['hpadding'] = 4;
        }
        if (!isset($style['vpadding'])) {
            $style['vpadding'] = $style['padding'];
        } elseif ($style['vpadding'] === 'auto') {
            $style['vpadding'] = 4;
        }
        $hpad = (2 * $style['hpadding']);
        $vpad = (2 * $style['vpadding']);
        // cell (module) dimension
        if (!isset($style['module_width'])) {
            $style['module_width'] = 1; // width of a single module in points
        }
        if (!isset($style['module_height'])) {
            $style['module_height'] = 1; // height of a single module in points
        }
        if ($x === '') {
            $x = $this->x;
        }
        if ($y === '') {
            $y = $this->y;
        }
        // check page for no-write regions and adapt page margins if necessary
        list($x, $y) = $this->checkPageRegions($h, $x, $y);
        // number of barcode columns and rows
        $rows = $arrcode['num_rows'];
        $cols = $arrcode['num_cols'];
        // module width and height
        $mw = $style['module_width'];
        $mh = $style['module_height'];
        if (($mw == 0) OR ($mh == 0)) {
            $this->Error('Error in 2D barcode string');
        }
        // get max dimensions
        if ($this->rtl) {
            $maxw = $x - $this->lMargin;
        } else {
            $maxw = $this->w - $this->rMargin - $x;
        }
        $maxh = ($this->h - $this->tMargin - $this->bMargin);
        $ratioHW = ((($rows * $mh) + $hpad) / (($cols * $mw) + $vpad));
        $ratioWH = ((($cols * $mw) + $vpad) / (($rows * $mh) + $hpad));
        if (!$distort) {
            if (($maxw * $ratioHW) > $maxh) {
                $maxw = $maxh * $ratioWH;
            }
            if (($maxh * $ratioWH) > $maxw) {
                $maxh = $maxw * $ratioHW;
            }
        }
        // set maximum dimesions
        if ($w > $maxw) {
            $w = $maxw;
        }
        if ($h > $maxh) {
            $h = $maxh;
        }
        // set dimensions
        if ((($w === '') OR ($w <= 0)) AND (($h === '') OR ($h <= 0))) {
            $w = ($cols + $hpad) * ($mw / $this->k);
            $h = ($rows + $vpad) * ($mh / $this->k);
        } elseif (($w === '') OR ($w <= 0)) {
            $w = $h * $ratioWH;
        } elseif (($h === '') OR ($h <= 0)) {
            $h = $w * $ratioHW;
        }
        // barcode size (excluding padding)
        $bw = ($w * $cols) / ($cols + $hpad);
        $bh = ($h * $rows) / ($rows + $vpad);
        // dimension of single barcode cell unit
        $cw = $bw / $cols;
        $ch = $bh / $rows;
        if (!$distort) {
            if (($cw / $ch) > ($mw / $mh)) {
                // correct horizontal distortion
                $cw = $ch * $mw / $mh;
                $bw = $cw * $cols;
                $style['hpadding'] = ($w - $bw) / (2 * $cw);
            } else {
                // correct vertical distortion
                $ch = $cw * $mh / $mw;
                $bh = $ch * $rows;
                $style['vpadding'] = ($h - $bh) / (2 * $ch);
            }
        }
        // fit the barcode on available space
        list($w, $h, $x, $y) = $this->fitBlock($w, $h, $x, $y, false);
        // set alignment
        $this->img_rb_y = $y + $h;
        // set alignment
        if ($this->rtl) {
            if ($style['position'] == 'L') {
                $xpos = $this->lMargin;
            } elseif ($style['position'] == 'C') {
                $xpos = ($this->w + $this->lMargin - $this->rMargin - $w) / 2;
            } elseif ($style['position'] == 'R') {
                $xpos = $this->w - $this->rMargin - $w;
            } else {
                $xpos = $x - $w;
            }
            $this->img_rb_x = $xpos;
        } else {
            if ($style['position'] == 'L') {
                $xpos = $this->lMargin;
            } elseif ($style['position'] == 'C') {
                $xpos = ($this->w + $this->lMargin - $this->rMargin - $w) / 2;
            } elseif ($style['position'] == 'R') {
                $xpos = $this->w - $this->rMargin - $w;
            } else {
                $xpos = $x;
            }
            $this->img_rb_x = $xpos + $w;
        }
        $xstart = $xpos + ($style['hpadding'] * $cw);
        $ystart = $y + ($style['vpadding'] * $ch);
        // barcode is always printed in LTR direction
        $tempRTL = $this->rtl;
        $this->rtl = false;
        // print background color
        if ($style['bgcolor']) {
            $this->Rect($xpos, $y, $w, $h, $style['border'] ? 'DF' : 'F', '', $style['bgcolor']);
        } elseif ($style['border']) {
            $this->Rect($xpos, $y, $w, $h, 'D');
        }
        // set foreground color
        $this->SetDrawColorArray($style['fgcolor']);
        // print barcode cells
        // for each row
        for ($r = 0; $r < $rows; ++$r) {
            $xr = $xstart;
            // for each column
            for ($c = 0; $c < $cols; ++$c) {
                if ($arrcode['bcode'][$r][$c] == 1) {
                    // draw a single barcode cell
                    $this->Rect($xr, $ystart, $cw, $ch, 'F', array(), $style['fgcolor']);
                }
                $xr += $cw;
            }
            $ystart += $ch;
        }
        // restore original direction
        $this->rtl = $tempRTL;
        // restore previous settings
        $this->setGraphicVars($gvars);
        // set pointer to align the next text/objects
        switch ($align) {
            case 'T': {
                    $this->y = $y;
                    $this->x = $this->img_rb_x;
                    break;
                }
            case 'M': {
                    $this->y = $y + round($h / 2);
                    $this->x = $this->img_rb_x;
                    break;
                }
            case 'B': {
                    $this->y = $this->img_rb_y;
                    $this->x = $this->img_rb_x;
                    break;
                }
            case 'N': {
                    $this->SetY($this->img_rb_y);
                    break;
                }
            default: {
                    break;
                }
        }
        $this->endlinex = $this->img_rb_x;
    }

    /**
     * Returns an array containing current margins:
     * <ul>
      <li>$ret['left'] = left margin</li>
      <li>$ret['right'] = right margin</li>
      <li>$ret['top'] = top margin</li>
      <li>$ret['bottom'] = bottom margin</li>
      <li>$ret['header'] = header margin</li>
      <li>$ret['footer'] = footer margin</li>
      <li>$ret['cell'] = cell padding array</li>
      <li>$ret['padding_left'] = cell left padding</li>
      <li>$ret['padding_top'] = cell top padding</li>
      <li>$ret['padding_right'] = cell right padding</li>
      <li>$ret['padding_bottom'] = cell bottom padding</li>
     * </ul>
     * @return array containing all margins measures
     * @public
     * @since 3.2.000 (2008-06-23)
     */
    public function getMargins() {
        $ret = array(
            'left' => $this->lMargin,
            'right' => $this->rMargin,
            'top' => $this->tMargin,
            'bottom' => $this->bMargin,
            'header' => $this->header_margin,
            'footer' => $this->footer_margin,
            'cell' => $this->cell_padding,
            'padding_left' => $this->cell_padding['L'],
            'padding_top' => $this->cell_padding['T'],
            'padding_right' => $this->cell_padding['R'],
            'padding_bottom' => $this->cell_padding['B']
        );
        return $ret;
    }

    /**
     * Returns an array containing original margins:
     * <ul>
      <li>$ret['left'] = left margin</li>
      <li>$ret['right'] = right margin</li>
     * </ul>
     * @return array containing all margins measures
     * @public
     * @since 4.0.012 (2008-07-24)
     */
    public function getOriginalMargins() {
        $ret = array(
            'left' => $this->original_lMargin,
            'right' => $this->original_rMargin
        );
        return $ret;
    }

    /**
     * Returns the current font size.
     * @return current font size
     * @public
     * @since 3.2.000 (2008-06-23)
     */
    public function getFontSize() {
        return $this->FontSize;
    }

    /**
     * Returns the current font size in points unit.
     * @return current font size in points unit
     * @public
     * @since 3.2.000 (2008-06-23)
     */
    public function getFontSizePt() {
        return $this->FontSizePt;
    }

    /**
     * Returns the current font family name.
     * @return string current font family name
     * @public
     * @since 4.3.008 (2008-12-05)
     */
    public function getFontFamily() {
        return $this->FontFamily;
    }

    /**
     * Returns the current font style.
     * @return string current font style
     * @public
     * @since 4.3.008 (2008-12-05)
     */
    public function getFontStyle() {
        return $this->FontStyle;
    }

    /**
     * Cleanup HTML code (requires HTML Tidy library).
     * @param $html (string) htmlcode to fix
     * @param $default_css (string) CSS commands to add
     * @param $tagvs (array) parameters for setHtmlVSpace method
     * @param $tidy_options (array) options for tidy_parse_string function
     * @return string XHTML code cleaned up
     * @author Nicola Asuni
     * @public
     * @since 5.9.017 (2010-11-16)
     * @see setHtmlVSpace()
     */
    public function fixHTMLCode($html, $default_css = '', $tagvs = '', $tidy_options = '') {
        // configure parameters for HTML Tidy
        if ($tidy_options === '') {
            $tidy_options = array(
                'clean' => 1,
                'drop-empty-paras' => 0,
                'drop-proprietary-attributes' => 1,
                'fix-backslash' => 1,
                'hide-comments' => 1,
                'join-styles' => 1,
                'lower-literals' => 1,
                'merge-divs' => 1,
                'merge-spans' => 1,
                'output-xhtml' => 1,
                'word-2000' => 1,
                'wrap' => 0,
                'output-bom' => 0,
                    //'char-encoding' => 'utf8',
                    //'input-encoding' => 'utf8',
                    //'output-encoding' => 'utf8'
            );
        }
        // clean up the HTML code
        $tidy = tidy_parse_string($html, $tidy_options);
        // fix the HTML
        $tidy->cleanRepair();
        // get the CSS part
        $tidy_head = tidy_get_head($tidy);
        $css = $tidy_head->value;
        $css = preg_replace('/<style([^>]+)>/ims', '<style>', $css);
        $css = preg_replace('/<\/style>(.*)<style>/ims', "\n", $css);
        $css = str_replace('/*<![CDATA[*/', '', $css);
        $css = str_replace('/*]]>*/', '', $css);
        preg_match('/<style>(.*)<\/style>/ims', $css, $matches);
        if (isset($matches[1])) {
            $css = strtolower($matches[1]);
        } else {
            $css = '';
        }
        // include default css
        $css = '<style>' . $default_css . $css . '</style>';
        // get the body part
        $tidy_body = tidy_get_body($tidy);
        $html = $tidy_body->value;
        // fix some self-closing tags
        $html = str_replace('<br>', '<br />', $html);
        // remove some empty tag blocks
        $html = preg_replace('/<div([^\>]*)><\/div>/', '', $html);
        $html = preg_replace('/<p([^\>]*)><\/p>/', '', $html);
        if ($tagvs !== '') {
            // set vertical space for some XHTML tags
            $this->setHtmlVSpace($tagvs);
        }
        // return the cleaned XHTML code + CSS
        return $css . $html;
    }

    /**
     * Extracts the CSS properties from a CSS string.
     * @param $cssdata (string) string containing CSS definitions.
     * @return An array where the keys are the CSS selectors and the values are the CSS properties.
     * @author Nicola Asuni
     * @since 5.1.000 (2010-05-25)
     * @protected
     */
    protected function extractCSSproperties($cssdata) {
        if (empty($cssdata)) {
            return array();
        }
        // remove comments
        $cssdata = preg_replace('/\/\*[^\*]*\*\//', '', $cssdata);
        // remove newlines and multiple spaces
        $cssdata = preg_replace('/[\s]+/', ' ', $cssdata);
        // remove some spaces
        $cssdata = preg_replace('/[\s]*([;:\{\}]{1})[\s]*/', '\\1', $cssdata);
        // remove empty blocks
        $cssdata = preg_replace('/([^\}\{]+)\{\}/', '', $cssdata);
        // replace media type parenthesis
        $cssdata = preg_replace('/@media[\s]+([^\{]*)\{/i', '@media \\1�', $cssdata);
        $cssdata = preg_replace('/\}\}/si', '}�', $cssdata);
        // trim string
        $cssdata = trim($cssdata);
        // find media blocks (all, braille, embossed, handheld, print, projection, screen, speech, tty, tv)
        $cssblocks = array();
        $matches = array();
        if (preg_match_all('/@media[\s]+([^\�]*)�([^�]*)�/i', $cssdata, $matches) > 0) {
            foreach ($matches[1] as $key => $type) {
                $cssblocks[$type] = $matches[2][$key];
            }
            // remove media blocks
            $cssdata = preg_replace('/@media[\s]+([^\�]*)�([^�]*)�/i', '', $cssdata);
        }
        // keep 'all' and 'print' media, other media types are discarded
        if (isset($cssblocks['all']) AND !empty($cssblocks['all'])) {
            $cssdata .= $cssblocks['all'];
        }
        if (isset($cssblocks['print']) AND !empty($cssblocks['print'])) {
            $cssdata .= $cssblocks['print'];
        }
        // reset css blocks array
        $cssblocks = array();
        $matches = array();
        // explode css data string into array
        if (substr($cssdata, -1) == '}') {
            // remove last parethesis
            $cssdata = substr($cssdata, 0, -1);
        }
        $matches = explode('}', $cssdata);
        foreach ($matches as $key => $block) {
            // index 0 contains the CSS selector, index 1 contains CSS properties
            $cssblocks[$key] = explode('{', $block);
            if (!isset($cssblocks[$key][1])) {
                // remove empty definitions
                unset($cssblocks[$key]);
            }
        }
        // split groups of selectors (comma-separated list of selectors)
        foreach ($cssblocks as $key => $block) {
            if (strpos($block[0], ',') > 0) {
                $selectors = explode(',', $block[0]);
                foreach ($selectors as $sel) {
                    $cssblocks[] = array(0 => trim($sel), 1 => $block[1]);
                }
                unset($cssblocks[$key]);
            }
        }
        // covert array to selector => properties
        $cssdata = array();
        foreach ($cssblocks as $block) {
            $selector = $block[0];
            // calculate selector's specificity
            $matches = array();
            $a = 0; // the declaration is not from is a 'style' attribute
            $b = intval(preg_match_all('/[\#]/', $selector, $matches)); // number of ID attributes
            $c = intval(preg_match_all('/[\[\.]/', $selector, $matches)); // number of other attributes
            $c += intval(preg_match_all('/[\:]link|visited|hover|active|focus|target|lang|enabled|disabled|checked|indeterminate|root|nth|first|last|only|empty|contains|not/i', $selector, $matches)); // number of pseudo-classes
            $d = intval(preg_match_all('/[\>\+\~\s]{1}[a-zA-Z0-9]+/', ' ' . $selector, $matches)); // number of element names
            $d += intval(preg_match_all('/[\:][\:]/', $selector, $matches)); // number of pseudo-elements
            $specificity = $a . $b . $c . $d;
            // add specificity to the beginning of the selector
            $cssdata[$specificity . ' ' . $selector] = $block[1];
        }
        // sort selectors alphabetically to account for specificity
        ksort($cssdata, SORT_STRING);
        // return array
        return $cssdata;
    }

    /**
     * Returns true if the CSS selector is valid for the selected HTML tag
     * @param $dom (array) array of HTML tags and properties
     * @param $key (int) key of the current HTML tag
     * @param $selector (string) CSS selector string
     * @return true if the selector is valid, false otherwise
     * @protected
     * @since 5.1.000 (2010-05-25)
     */
    protected function isValidCSSSelectorForTag($dom, $key, $selector) {
        $valid = false; // value to be returned
        $tag = $dom[$key]['value'];
        $class = array();
        if (isset($dom[$key]['attribute']['class']) AND !empty($dom[$key]['attribute']['class'])) {
            $class = explode(' ', strtolower($dom[$key]['attribute']['class']));
        }
        $id = '';
        if (isset($dom[$key]['attribute']['id']) AND !empty($dom[$key]['attribute']['id'])) {
            $id = strtolower($dom[$key]['attribute']['id']);
        }
        $selector = preg_replace('/([\>\+\~\s]{1})([\.]{1})([^\>\+\~\s]*)/si', '\\1*.\\3', $selector);
        $matches = array();
        if (preg_match_all('/([\>\+\~\s]{1})([a-zA-Z0-9\*]+)([^\>\+\~\s]*)/si', $selector, $matches, PREG_PATTERN_ORDER | PREG_OFFSET_CAPTURE) > 0) {
            $parentop = array_pop($matches[1]);
            $operator = $parentop[0];
            $offset = $parentop[1];
            $lasttag = array_pop($matches[2]);
            $lasttag = strtolower(trim($lasttag[0]));
            if (($lasttag == '*') OR ($lasttag == $tag)) {
                // the last element on selector is our tag or 'any tag'
                $attrib = array_pop($matches[3]);
                $attrib = strtolower(trim($attrib[0]));
                if (!empty($attrib)) {
                    // check if matches class, id, attribute, pseudo-class or pseudo-element
                    switch ($attrib{0}) {
                        case '.': { // class
                                if (in_array(substr($attrib, 1), $class)) {
                                    $valid = true;
                                }
                                break;
                            }
                        case '#': { // ID
                                if (substr($attrib, 1) == $id) {
                                    $valid = true;
                                }
                                break;
                            }
                        case '[': { // attribute
                                $attrmatch = array();
                                if (preg_match('/\[([a-zA-Z0-9]*)[\s]*([\~\^\$\*\|\=]*)[\s]*["]?([^"\]]*)["]?\]/i', $attrib, $attrmatch) > 0) {
                                    $att = strtolower($attrmatch[1]);
                                    $val = $attrmatch[3];
                                    if (isset($dom[$key]['attribute'][$att])) {
                                        switch ($attrmatch[2]) {
                                            case '=': {
                                                    if ($dom[$key]['attribute'][$att] == $val) {
                                                        $valid = true;
                                                    }
                                                    break;
                                                }
                                            case '~=': {
                                                    if (in_array($val, explode(' ', $dom[$key]['attribute'][$att]))) {
                                                        $valid = true;
                                                    }
                                                    break;
                                                }
                                            case '^=': {
                                                    if ($val == substr($dom[$key]['attribute'][$att], 0, strlen($val))) {
                                                        $valid = true;
                                                    }
                                                    break;
                                                }
                                            case '$=': {
                                                    if ($val == substr($dom[$key]['attribute'][$att], -strlen($val))) {
                                                        $valid = true;
                                                    }
                                                    break;
                                                }
                                            case '*=': {
                                                    if (strpos($dom[$key]['attribute'][$att], $val) !== false) {
                                                        $valid = true;
                                                    }
                                                    break;
                                                }
                                            case '|=': {
                                                    if ($dom[$key]['attribute'][$att] == $val) {
                                                        $valid = true;
                                                    } elseif (preg_match('/' . $val . '[\-]{1}/i', $dom[$key]['attribute'][$att]) > 0) {
                                                        $valid = true;
                                                    }
                                                    break;
                                                }
                                            default: {
                                                    $valid = true;
                                                }
                                        }
                                    }
                                }
                                break;
                            }
                        case ':': { // pseudo-class or pseudo-element
                                if ($attrib{1} == ':') { // pseudo-element
                                    // pseudo-elements are not supported!
                                    // (::first-line, ::first-letter, ::before, ::after)
                                } else { // pseudo-class
                                    // pseudo-classes are not supported!
                                    // (:root, :nth-child(n), :nth-last-child(n), :nth-of-type(n), :nth-last-of-type(n), :first-child, :last-child, :first-of-type, :last-of-type, :only-child, :only-of-type, :empty, :link, :visited, :active, :hover, :focus, :target, :lang(fr), :enabled, :disabled, :checked)
                                }
                                break;
                            }
                    } // end of switch
                } else {
                    $valid = true;
                }
                if ($valid AND ($offset > 0)) {
                    $valid = false;
                    // check remaining selector part
                    $selector = substr($selector, 0, $offset);
                    switch ($operator) {
                        case ' ': { // descendant of an element
                                while ($dom[$key]['parent'] > 0) {
                                    if ($this->isValidCSSSelectorForTag($dom, $dom[$key]['parent'], $selector)) {
                                        $valid = true;
                                        break;
                                    } else {
                                        $key = $dom[$key]['parent'];
                                    }
                                }
                                break;
                            }
                        case '>': { // child of an element
                                $valid = $this->isValidCSSSelectorForTag($dom, $dom[$key]['parent'], $selector);
                                break;
                            }
                        case '+': { // immediately preceded by an element
                                for ($i = ($key - 1); $i > $dom[$key]['parent']; --$i) {
                                    if ($dom[$i]['tag'] AND $dom[$i]['opening']) {
                                        $valid = $this->isValidCSSSelectorForTag($dom, $i, $selector);
                                        break;
                                    }
                                }
                                break;
                            }
                        case '~': { // preceded by an element
                                for ($i = ($key - 1); $i > $dom[$key]['parent']; --$i) {
                                    if ($dom[$i]['tag'] AND $dom[$i]['opening']) {
                                        if ($this->isValidCSSSelectorForTag($dom, $i, $selector)) {
                                            break;
                                        }
                                    }
                                }
                                break;
                            }
                    }
                }
            }
        }
        return $valid;
    }

    /**
     * Returns the styles array that apply for the selected HTML tag.
     * @param $dom (array) array of HTML tags and properties
     * @param $key (int) key of the current HTML tag
     * @param $css (array) array of CSS properties
     * @return array containing CSS properties
     * @protected
     * @since 5.1.000 (2010-05-25)
     */
    protected function getCSSdataArray($dom, $key, $css) {
        $cssarray = array(); // style to be returned
        // get parent CSS selectors
        $selectors = array();
        if (isset($dom[($dom[$key]['parent'])]['csssel'])) {
            $selectors = $dom[($dom[$key]['parent'])]['csssel'];
        }
        // get all styles that apply
        foreach ($css as $selector => $style) {
            $pos = strpos($selector, ' ');
            // get specificity
            $specificity = substr($selector, 0, $pos);
            // remove specificity
            $selector = substr($selector, $pos);
            // check if this selector apply to current tag
            if ($this->isValidCSSSelectorForTag($dom, $key, $selector)) {
                if (!in_array($selector, $selectors)) {
                    // add style if not already added on parent selector
                    $cssarray[] = array('k' => $selector, 's' => $specificity, 'c' => $style);
                    $selectors[] = $selector;
                }
            }
        }
        if (isset($dom[$key]['attribute']['style'])) {
            // attach inline style (latest properties have high priority)
            $cssarray[] = array('k' => '', 's' => '1000', 'c' => $dom[$key]['attribute']['style']);
        }
        // order the css array to account for specificity
        $cssordered = array();
        foreach ($cssarray as $key => $val) {
            $skey = sprintf('%04d', $key);
            $cssordered[$val['s'] . '_' . $skey] = $val;
        }
        // sort selectors alphabetically to account for specificity
        ksort($cssordered, SORT_STRING);
        return array($selectors, $cssordered);
    }

    /**
     * Compact CSS data array into single string.
     * @param $css (array) array of CSS properties
     * @return string containing merged CSS properties
     * @protected
     * @since 5.9.070 (2011-04-19)
     */
    protected function getTagStyleFromCSSarray($css) {
        $tagstyle = ''; // value to be returned
        foreach ($css as $style) {
            // split single css commands
            $csscmds = explode(';', $style['c']);
            foreach ($csscmds as $cmd) {
                if (!empty($cmd)) {
                    $pos = strpos($cmd, ':');
                    if ($pos !== false) {
                        $cmd = substr($cmd, 0, ($pos + 1));
                        if (strpos($tagstyle, $cmd) !== false) {
                            // remove duplicate commands (last commands have high priority)
                            $tagstyle = preg_replace('/' . $cmd . '[^;]+/i', '', $tagstyle);
                        }
                    }
                }
            }
            $tagstyle .= ';' . $style['c'];
        }
        // remove multiple semicolons
        $tagstyle = preg_replace('/[;]+/', ';', $tagstyle);
        return $tagstyle;
    }

    /**
     * Returns the border width from CSS property
     * @param $width (string) border width
     * @return int with in user units
     * @protected
     * @since 5.7.000 (2010-08-02)
     */
    protected function getCSSBorderWidth($width) {
        if ($width == 'thin') {
            $width = (2 / $this->k);
        } elseif ($width == 'medium') {
            $width = (4 / $this->k);
        } elseif ($width == 'thick') {
            $width = (6 / $this->k);
        } else {
            $width = $this->getHTMLUnitToUnits($width, 1, 'px', false);
        }
        return $width;
    }

    /**
     * Returns the border dash style from CSS property
     * @param $style (string) border style to convert
     * @return int sash style (return -1 in case of none or hidden border)
     * @protected
     * @since 5.7.000 (2010-08-02)
     */
    protected function getCSSBorderDashStyle($style) {
        switch (strtolower($style)) {
            case 'none':
            case 'hidden': {
                    $dash = -1;
                    break;
                }
            case 'dotted': {
                    $dash = 1;
                    break;
                }
            case 'dashed': {
                    $dash = 3;
                    break;
                }
            case 'double':
            case 'groove':
            case 'ridge':
            case 'inset':
            case 'outset':
            case 'solid':
            default: {
                    $dash = 0;
                    break;
                }
        }
        return $dash;
    }

    /**
     * Returns the border style array from CSS border properties
     * @param $cssborder (string) border properties
     * @return array containing border properties
     * @protected
     * @since 5.7.000 (2010-08-02)
     */
    protected function getCSSBorderStyle($cssborder) {
        $bprop = preg_split('/[\s]+/', trim($cssborder));
        $border = array(); // value to be returned
        switch (count($bprop)) {
            case 3: {
                    $width = $bprop[0];
                    $style = $bprop[1];
                    $color = $bprop[2];
                    break;
                }
            case 2: {
                    $width = 'medium';
                    $style = $bprop[0];
                    $color = $bprop[1];
                    break;
                }
            case 1: {
                    $width = 'medium';
                    $style = $bprop[0];
                    $color = 'black';
                    break;
                }
            default: {
                    $width = 'medium';
                    $style = 'solid';
                    $color = 'black';
                    break;
                }
        }
        if ($style == 'none') {
            return array();
        }
        $border['cap'] = 'square';
        $border['join'] = 'miter';
        $border['dash'] = $this->getCSSBorderDashStyle($style);
        if ($border['dash'] < 0) {
            return array();
        }
        $border['width'] = $this->getCSSBorderWidth($width);
        $border['color'] = $this->convertHTMLColorToDec($color);
        return $border;
    }

    /**
     * Get the internal Cell padding from CSS attribute.
     * @param $csspadding (string) padding properties
     * @param $width (float) width of the containing element
     * @return array of cell paddings
     * @public
     * @since 5.9.000 (2010-10-04)
     */
    public function getCSSPadding($csspadding, $width = 0) {
        $padding = preg_split('/[\s]+/', trim($csspadding));
        $cell_padding = array(); // value to be returned
        switch (count($padding)) {
            case 4: {
                    $cell_padding['T'] = $padding[0];
                    $cell_padding['R'] = $padding[1];
                    $cell_padding['B'] = $padding[2];
                    $cell_padding['L'] = $padding[3];
                    break;
                }
            case 3: {
                    $cell_padding['T'] = $padding[0];
                    $cell_padding['R'] = $padding[1];
                    $cell_padding['B'] = $padding[2];
                    $cell_padding['L'] = $padding[1];
                    break;
                }
            case 2: {
                    $cell_padding['T'] = $padding[0];
                    $cell_padding['R'] = $padding[1];
                    $cell_padding['B'] = $padding[0];
                    $cell_padding['L'] = $padding[1];
                    break;
                }
            case 1: {
                    $cell_padding['T'] = $padding[0];
                    $cell_padding['R'] = $padding[0];
                    $cell_padding['B'] = $padding[0];
                    $cell_padding['L'] = $padding[0];
                    break;
                }
            default: {
                    return $this->cell_padding;
                }
        }
        if ($width == 0) {
            $width = $this->w - $this->lMargin - $this->rMargin;
        }
        $cell_padding['T'] = $this->getHTMLUnitToUnits($cell_padding['T'], $width, 'px', false);
        $cell_padding['R'] = $this->getHTMLUnitToUnits($cell_padding['R'], $width, 'px', false);
        $cell_padding['B'] = $this->getHTMLUnitToUnits($cell_padding['B'], $width, 'px', false);
        $cell_padding['L'] = $this->getHTMLUnitToUnits($cell_padding['L'], $width, 'px', false);
        return $cell_padding;
    }

    /**
     * Get the internal Cell margin from CSS attribute.
     * @param $cssmargin (string) margin properties
     * @param $width (float) width of the containing element
     * @return array of cell margins
     * @public
     * @since 5.9.000 (2010-10-04)
     */
    public function getCSSMargin($cssmargin, $width = 0) {
        $margin = preg_split('/[\s]+/', trim($cssmargin));
        $cell_margin = array(); // value to be returned
        switch (count($margin)) {
            case 4: {
                    $cell_margin['T'] = $margin[0];
                    $cell_margin['R'] = $margin[1];
                    $cell_margin['B'] = $margin[2];
                    $cell_margin['L'] = $margin[3];
                    break;
                }
            case 3: {
                    $cell_margin['T'] = $margin[0];
                    $cell_margin['R'] = $margin[1];
                    $cell_margin['B'] = $margin[2];
                    $cell_margin['L'] = $margin[1];
                    break;
                }
            case 2: {
                    $cell_margin['T'] = $margin[0];
                    $cell_margin['R'] = $margin[1];
                    $cell_margin['B'] = $margin[0];
                    $cell_margin['L'] = $margin[1];
                    break;
                }
            case 1: {
                    $cell_margin['T'] = $margin[0];
                    $cell_margin['R'] = $margin[0];
                    $cell_margin['B'] = $margin[0];
                    $cell_margin['L'] = $margin[0];
                    break;
                }
            default: {
                    return $this->cell_margin;
                }
        }
        if ($width == 0) {
            $width = $this->w - $this->lMargin - $this->rMargin;
        }
        $cell_margin['T'] = $this->getHTMLUnitToUnits(str_replace('auto', '0', $cell_margin['T']), $width, 'px', false);
        $cell_margin['R'] = $this->getHTMLUnitToUnits(str_replace('auto', '0', $cell_margin['R']), $width, 'px', false);
        $cell_margin['B'] = $this->getHTMLUnitToUnits(str_replace('auto', '0', $cell_margin['B']), $width, 'px', false);
        $cell_margin['L'] = $this->getHTMLUnitToUnits(str_replace('auto', '0', $cell_margin['L']), $width, 'px', false);
        return $cell_margin;
    }

    /**
     * Get the border-spacing from CSS attribute.
     * @param $cssbspace (string) border-spacing CSS properties
     * @param $width (float) width of the containing element
     * @return array of border spacings
     * @public
     * @since 5.9.010 (2010-10-27)
     */
    public function getCSSBorderMargin($cssbspace, $width = 0) {
        $space = preg_split('/[\s]+/', trim($cssbspace));
        $border_spacing = array(); // value to be returned
        switch (count($space)) {
            case 2: {
                    $border_spacing['H'] = $space[0];
                    $border_spacing['V'] = $space[1];
                    break;
                }
            case 1: {
                    $border_spacing['H'] = $space[0];
                    $border_spacing['V'] = $space[0];
                    break;
                }
            default: {
                    return array('H' => 0, 'V' => 0);
                }
        }
        if ($width == 0) {
            $width = $this->w - $this->lMargin - $this->rMargin;
        }
        $border_spacing['H'] = $this->getHTMLUnitToUnits($border_spacing['H'], $width, 'px', false);
        $border_spacing['V'] = $this->getHTMLUnitToUnits($border_spacing['V'], $width, 'px', false);
        return $border_spacing;
    }

    /**
     * Returns the letter-spacing value from CSS value
     * @param $spacing (string) letter-spacing value
     * @param $parent (float) font spacing (tracking) value of the parent element
     * @return float quantity to increases or decreases the space between characters in a text.
     * @protected
     * @since 5.9.000 (2010-10-02)
     */
    protected function getCSSFontSpacing($spacing, $parent = 0) {
        $val = 0; // value to be returned
        $spacing = trim($spacing);
        switch ($spacing) {
            case 'normal': {
                    $val = 0;
                    break;
                }
            case 'inherit': {
                    if ($parent == 'normal') {
                        $val = 0;
                    } else {
                        $val = $parent;
                    }
                    break;
                }
            default: {
                    $val = $this->getHTMLUnitToUnits($spacing, 0, 'px', false);
                }
        }
        return $val;
    }

    /**
     * Returns the percentage of font stretching from CSS value
     * @param $stretch (string) stretch mode
     * @param $parent (float) stretch value of the parent element
     * @return float font stretching percentage
     * @protected
     * @since 5.9.000 (2010-10-02)
     */
    protected function getCSSFontStretching($stretch, $parent = 100) {
        $val = 100; // value to be returned
        $stretch = trim($stretch);
        switch ($stretch) {
            case 'ultra-condensed': {
                    $val = 40;
                    break;
                }
            case 'extra-condensed': {
                    $val = 55;
                    break;
                }
            case 'condensed': {
                    $val = 70;
                    break;
                }
            case 'semi-condensed': {
                    $val = 85;
                    break;
                }
            case 'normal': {
                    $val = 100;
                    break;
                }
            case 'semi-expanded': {
                    $val = 115;
                    break;
                }
            case 'expanded': {
                    $val = 130;
                    break;
                }
            case 'extra-expanded': {
                    $val = 145;
                    break;
                }
            case 'ultra-expanded': {
                    $val = 160;
                    break;
                }
            case 'wider': {
                    $val = $parent + 10;
                    break;
                }
            case 'narrower': {
                    $val = $parent - 10;
                    break;
                }
            case 'inherit': {
                    if ($parent == 'normal') {
                        $val = 100;
                    } else {
                        $val = $parent;
                    }
                    break;
                }
            default: {
                    $val = $this->getHTMLUnitToUnits($stretch, 100, '%', false);
                }
        }
        return $val;
    }

    /**
     * Returns the HTML DOM array.
     * @param $html (string) html code
     * @return array
     * @protected
     * @since 3.2.000 (2008-06-20)
     */
    protected function getHtmlDomArray($html) {
        // array of CSS styles ( selector => properties).
        $css = array();
        // get CSS array defined at previous call
        $matches = array();
        if (preg_match_all('/<cssarray>([^\<]*)<\/cssarray>/isU', $html, $matches) > 0) {
            if (isset($matches[1][0])) {
                $css = array_merge($css, unserialize($this->unhtmlentities($matches[1][0])));
            }
            $html = preg_replace('/<cssarray>(.*?)<\/cssarray>/isU', '', $html);
        }
        // extract external CSS files
        $matches = array();
        if (preg_match_all('/<link([^\>]*)>/isU', $html, $matches) > 0) {
            foreach ($matches[1] as $key => $link) {
                $type = array();
                if (preg_match('/type[\s]*=[\s]*"text\/css"/', $link, $type)) {
                    $type = array();
                    preg_match('/media[\s]*=[\s]*"([^"]*)"/', $link, $type);
                    // get 'all' and 'print' media, other media types are discarded
                    // (all, braille, embossed, handheld, print, projection, screen, speech, tty, tv)
                    if (empty($type) OR (isset($type[1]) AND (($type[1] == 'all') OR ($type[1] == 'print')))) {
                        $type = array();
                        if (preg_match('/href[\s]*=[\s]*"([^"]*)"/', $link, $type) > 0) {
                            // read CSS data file
                            $cssdata = file_get_contents(trim($type[1]));
                            $css = array_merge($css, $this->extractCSSproperties($cssdata));
                        }
                    }
                }
            }
        }
        // extract style tags
        $matches = array();
        if (preg_match_all('/<style([^\>]*)>([^\<]*)<\/style>/isU', $html, $matches) > 0) {
            foreach ($matches[1] as $key => $media) {
                $type = array();
                preg_match('/media[\s]*=[\s]*"([^"]*)"/', $media, $type);
                // get 'all' and 'print' media, other media types are discarded
                // (all, braille, embossed, handheld, print, projection, screen, speech, tty, tv)
                if (empty($type) OR (isset($type[1]) AND (($type[1] == 'all') OR ($type[1] == 'print')))) {
                    $cssdata = $matches[2][$key];
                    $css = array_merge($css, $this->extractCSSproperties($cssdata));
                }
            }
        }
        // create a special tag to contain the CSS array (used for table content)
        $csstagarray = '<cssarray>' . htmlentities(serialize($css)) . '</cssarray>';
        // remove head and style blocks
        $html = preg_replace('/<head([^\>]*)>(.*?)<\/head>/siU', '', $html);
        $html = preg_replace('/<style([^\>]*)>([^\<]*)<\/style>/isU', '', $html);
        // define block tags
        $blocktags = array('blockquote', 'br', 'dd', 'dl', 'div', 'dt', 'h1', 'h2', 'h3', 'h4', 'h5', 'h6', 'hr', 'li', 'ol', 'p', 'pre', 'ul', 'tcpdf', 'table', 'tr', 'td');
        // define self-closing tags
        $selfclosingtags = array('area', 'base', 'basefont', 'br', 'hr', 'input', 'img', 'link', 'meta');
        // remove all unsupported tags (the line below lists all supported tags)
        $html = strip_tags($html, '<marker/><a><b><blockquote><body><br><br/><dd><del><div><dl><dt><em><font><form><h1><h2><h3><h4><h5><h6><hr><hr/><i><img><input><label><li><ol><option><p><pre><s><select><small><span><strike><strong><sub><sup><table><tablehead><tcpdf><td><textarea><th><thead><tr><tt><u><ul>');
        //replace some blank characters
        $html = preg_replace('/<pre/', '<xre', $html); // preserve pre tag
        $html = preg_replace('/<(table|tr|td|th|tcpdf|blockquote|dd|div|dl|dt|form|h1|h2|h3|h4|h5|h6|br|hr|li|ol|ul|p)([^\>]*)>[\n\r\t]+/', '<\\1\\2>', $html);
        $html = preg_replace('@(\r\n|\r)@', "\n", $html);
        $repTable = array("\t" => ' ', "\0" => ' ', "\x0B" => ' ', "\\" => "\\\\");
        $html = strtr($html, $repTable);
        $offset = 0;
        while (($offset < strlen($html)) AND ($pos = strpos($html, '</pre>', $offset)) !== false) {
            $html_a = substr($html, 0, $offset);
            $html_b = substr($html, $offset, ($pos - $offset + 6));
            while (preg_match("'<xre([^\>]*)>(.*?)\n(.*?)</pre>'si", $html_b)) {
                // preserve newlines on <pre> tag
                $html_b = preg_replace("'<xre([^\>]*)>(.*?)\n(.*?)</pre>'si", "<xre\\1>\\2<br />\\3</pre>", $html_b);
            }
            while (preg_match("'<xre([^\>]*)>(.*?)" . $this->re_space['p'] . "(.*?)</pre>'" . $this->re_space['m'], $html_b)) {
                // preserve spaces on <pre> tag
                $html_b = preg_replace("'<xre([^\>]*)>(.*?)" . $this->re_space['p'] . "(.*?)</pre>'" . $this->re_space['m'], "<xre\\1>\\2&nbsp;\\3</pre>", $html_b);
            }
            $html = $html_a . $html_b . substr($html, $pos + 6);
            $offset = strlen($html_a . $html_b);
        }
        $offset = 0;
        while (($offset < strlen($html)) AND ($pos = strpos($html, '</textarea>', $offset)) !== false) {
            $html_a = substr($html, 0, $offset);
            $html_b = substr($html, $offset, ($pos - $offset + 11));
            while (preg_match("'<textarea([^\>]*)>(.*?)\n(.*?)</textarea>'si", $html_b)) {
                // preserve newlines on <textarea> tag
                $html_b = preg_replace("'<textarea([^\>]*)>(.*?)\n(.*?)</textarea>'si", "<textarea\\1>\\2<TBR>\\3</textarea>", $html_b);
                $html_b = preg_replace("'<textarea([^\>]*)>(.*?)[\"](.*?)</textarea>'si", "<textarea\\1>\\2''\\3</textarea>", $html_b);
            }
            $html = $html_a . $html_b . substr($html, $pos + 11);
            $offset = strlen($html_a . $html_b);
        }
        $html = preg_replace('/([\s]*)<option/si', '<option', $html);
        $html = preg_replace('/<\/option>([\s]*)/si', '</option>', $html);
        $offset = 0;
        while (($offset < strlen($html)) AND ($pos = strpos($html, '</option>', $offset)) !== false) {
            $html_a = substr($html, 0, $offset);
            $html_b = substr($html, $offset, ($pos - $offset + 9));
            while (preg_match("'<option([^\>]*)>(.*?)</option>'si", $html_b)) {
                $html_b = preg_replace("'<option([\s]+)value=\"([^\"]*)\"([^\>]*)>(.*?)</option>'si", "\\2#!TaB!#\\4#!NwL!#", $html_b);
                $html_b = preg_replace("'<option([^\>]*)>(.*?)</option>'si", "\\2#!NwL!#", $html_b);
            }
            $html = $html_a . $html_b . substr($html, $pos + 9);
            $offset = strlen($html_a . $html_b);
        }
        if (preg_match("'</select'si", $html)) {
            $html = preg_replace("'<select([^\>]*)>'si", "<select\\1 opt=\"", $html);
            $html = preg_replace("'#!NwL!#</select>'si", "\" />", $html);
        }
        $html = str_replace("\n", ' ', $html);
        // restore textarea newlines
        $html = str_replace('<TBR>', "\n", $html);
        // remove extra spaces from code
        $html = preg_replace('/[\s]+<\/(table|tr|ul|ol|dl)>/', '</\\1>', $html);
        $html = preg_replace('/' . $this->re_space['p'] . '+<\/(td|th|li|dt|dd)>/' . $this->re_space['m'], '</\\1>', $html);
        $html = preg_replace('/[\s]+<(tr|td|th|li|dt|dd)/', '<\\1', $html);
        $html = preg_replace('/' . $this->re_space['p'] . '+<(ul|ol|dl|br)/' . $this->re_space['m'], '<\\1', $html);
        $html = preg_replace('/<\/(table|tr|td|th|blockquote|dd|dt|dl|div|dt|h1|h2|h3|h4|h5|h6|hr|li|ol|ul|p)>[\s]+</', '</\\1><', $html);
        $html = preg_replace('/<\/(td|th)>/', '<marker style="font-size:0"/></\\1>', $html);
        $html = preg_replace('/<\/table>([\s]*)<marker style="font-size:0"\/>/', '</table>', $html);
        $html = preg_replace('/' . $this->re_space['p'] . '+<img/' . $this->re_space['m'], chr(32) . '<img', $html);
        $html = preg_replace('/<img([^\>]*)>[\s]+([^\<])/xi', '<img\\1>&nbsp;\\2', $html);
        $html = preg_replace('/<img([^\>]*)>/xi', '<img\\1><span><marker style="font-size:0"/></span>', $html);
        $html = preg_replace('/<xre/', '<pre', $html); // restore pre tag
        $html = preg_replace('/<textarea([^\>]*)>([^\<]*)<\/textarea>/xi', '<textarea\\1 value="\\2" />', $html);
        $html = preg_replace('/<li([^\>]*)><\/li>/', '<li\\1>&nbsp;</li>', $html);
        $html = preg_replace('/<li([^\>]*)>' . $this->re_space['p'] . '*<img/' . $this->re_space['m'], '<li\\1><font size="1">&nbsp;</font><img', $html);
        $html = preg_replace('/<([^\>\/]*)>[\s]/', '<\\1>&nbsp;', $html); // preserve some spaces
        $html = preg_replace('/[\s]<\/([^\>]*)>/', '&nbsp;</\\1>', $html); // preserve some spaces
        $html = preg_replace('/<su([bp])/', '<zws/><su\\1', $html); // fix sub/sup alignment
        $html = preg_replace('/<\/su([bp])>/', '</su\\1><zws/>', $html); // fix sub/sup alignment
        $html = preg_replace('/' . $this->re_space['p'] . '+/' . $this->re_space['m'], chr(32), $html); // replace multiple spaces with a single space
        // trim string
        $html = $this->stringTrim($html);
        // fix first image tag alignment
        $html = preg_replace('/^<img/', '<span style="font-size:0"><br /></span> <img', $html, 1);
        // pattern for generic tag
        $tagpattern = '/(<[^>]+>)/';
        // explodes the string
        $a = preg_split($tagpattern, $html, -1, PREG_SPLIT_DELIM_CAPTURE | PREG_SPLIT_NO_EMPTY);
        // count elements
        $maxel = count($a);
        $elkey = 0;
        $key = 0;
        // create an array of elements
        $dom = array();
        $dom[$key] = array();
        // set inheritable properties fot the first void element
        // possible inheritable properties are: azimuth, border-collapse, border-spacing, caption-side, color, cursor, direction, empty-cells, font, font-family, font-stretch, font-size, font-size-adjust, font-style, font-variant, font-weight, letter-spacing, line-height, list-style, list-style-image, list-style-position, list-style-type, orphans, page, page-break-inside, quotes, speak, speak-header, text-align, text-indent, text-transform, volume, white-space, widows, word-spacing
        $dom[$key]['tag'] = false;
        $dom[$key]['block'] = false;
        $dom[$key]['value'] = '';
        $dom[$key]['parent'] = 0;
        $dom[$key]['hide'] = false;
        $dom[$key]['fontname'] = $this->FontFamily;
        $dom[$key]['fontstyle'] = $this->FontStyle;
        $dom[$key]['fontsize'] = $this->FontSizePt;
        $dom[$key]['font-stretch'] = $this->font_stretching;
        $dom[$key]['letter-spacing'] = $this->font_spacing;
        $dom[$key]['stroke'] = $this->textstrokewidth;
        $dom[$key]['fill'] = (($this->textrendermode % 2) == 0);
        $dom[$key]['clip'] = ($this->textrendermode > 3);
        $dom[$key]['line-height'] = $this->cell_height_ratio;
        $dom[$key]['bgcolor'] = false;
        $dom[$key]['fgcolor'] = $this->fgcolor; // color
        $dom[$key]['strokecolor'] = $this->strokecolor;
        $dom[$key]['align'] = '';
        $dom[$key]['listtype'] = '';
        $dom[$key]['text-indent'] = 0;
        $dom[$key]['border'] = array();
        $dom[$key]['dir'] = $this->rtl ? 'rtl' : 'ltr';
        $thead = false; // true when we are inside the THEAD tag
        ++$key;
        $level = array();
        array_push($level, 0); // root
        while ($elkey < $maxel) {
            $dom[$key] = array();
            $element = $a[$elkey];
            $dom[$key]['elkey'] = $elkey;
            if (preg_match($tagpattern, $element)) {
                // html tag
                $element = substr($element, 1, -1);
                // get tag name
                preg_match('/[\/]?([a-zA-Z0-9]*)/', $element, $tag);
                $tagname = strtolower($tag[1]);
                // check if we are inside a table header
                if ($tagname == 'thead') {
                    if ($element{0} == '/') {
                        $thead = false;
                    } else {
                        $thead = true;
                    }
                    ++$elkey;
                    continue;
                }
                $dom[$key]['tag'] = true;
                $dom[$key]['value'] = $tagname;
                if (in_array($dom[$key]['value'], $blocktags)) {
                    $dom[$key]['block'] = true;
                } else {
                    $dom[$key]['block'] = false;
                }
                if ($element{0} == '/') {
                    // *** closing html tag
                    $dom[$key]['opening'] = false;
                    $dom[$key]['parent'] = end($level);
                    array_pop($level);
                    $dom[$key]['hide'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['hide'];
                    $dom[$key]['fontname'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['fontname'];
                    $dom[$key]['fontstyle'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['fontstyle'];
                    $dom[$key]['fontsize'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['fontsize'];
                    $dom[$key]['font-stretch'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['font-stretch'];
                    $dom[$key]['letter-spacing'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['letter-spacing'];
                    $dom[$key]['stroke'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['stroke'];
                    $dom[$key]['fill'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['fill'];
                    $dom[$key]['clip'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['clip'];
                    $dom[$key]['line-height'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['line-height'];
                    $dom[$key]['bgcolor'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['bgcolor'];
                    $dom[$key]['fgcolor'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['fgcolor'];
                    $dom[$key]['strokecolor'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['strokecolor'];
                    $dom[$key]['align'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['align'];
                    $dom[$key]['dir'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['dir'];
                    if (isset($dom[($dom[($dom[$key]['parent'])]['parent'])]['listtype'])) {
                        $dom[$key]['listtype'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['listtype'];
                    }
                    // set the number of columns in table tag
                    if (($dom[$key]['value'] == 'tr') AND (!isset($dom[($dom[($dom[$key]['parent'])]['parent'])]['cols']))) {
                        $dom[($dom[($dom[$key]['parent'])]['parent'])]['cols'] = $dom[($dom[$key]['parent'])]['cols'];
                    }
                    if (($dom[$key]['value'] == 'td') OR ($dom[$key]['value'] == 'th')) {
                        $dom[($dom[$key]['parent'])]['content'] = $csstagarray;
                        for ($i = ($dom[$key]['parent'] + 1); $i < $key; ++$i) {
                            $dom[($dom[$key]['parent'])]['content'] .= $a[$dom[$i]['elkey']];
                        }
                        $key = $i;
                        // mark nested tables
                        $dom[($dom[$key]['parent'])]['content'] = str_replace('<table', '<table nested="true"', $dom[($dom[$key]['parent'])]['content']);
                        // remove thead sections from nested tables
                        $dom[($dom[$key]['parent'])]['content'] = str_replace('<thead>', '', $dom[($dom[$key]['parent'])]['content']);
                        $dom[($dom[$key]['parent'])]['content'] = str_replace('</thead>', '', $dom[($dom[$key]['parent'])]['content']);
                    }
                    // store header rows on a new table
                    if (($dom[$key]['value'] == 'tr') AND ($dom[($dom[$key]['parent'])]['thead'] === true)) {
                        if ($this->empty_string($dom[($dom[($dom[$key]['parent'])]['parent'])]['thead'])) {
                            $dom[($dom[($dom[$key]['parent'])]['parent'])]['thead'] = $csstagarray . $a[$dom[($dom[($dom[$key]['parent'])]['parent'])]['elkey']];
                        }
                        for ($i = $dom[$key]['parent']; $i <= $key; ++$i) {
                            $dom[($dom[($dom[$key]['parent'])]['parent'])]['thead'] .= $a[$dom[$i]['elkey']];
                        }
                        if (!isset($dom[($dom[$key]['parent'])]['attribute'])) {
                            $dom[($dom[$key]['parent'])]['attribute'] = array();
                        }
                        // header elements must be always contained in a single page
                        $dom[($dom[$key]['parent'])]['attribute']['nobr'] = 'true';
                    }
                    if (($dom[$key]['value'] == 'table') AND (!$this->empty_string($dom[($dom[$key]['parent'])]['thead']))) {
                        // remove the nobr attributes from the table header
                        $dom[($dom[$key]['parent'])]['thead'] = str_replace(' nobr="true"', '', $dom[($dom[$key]['parent'])]['thead']);
                        $dom[($dom[$key]['parent'])]['thead'] .= '</tablehead>';
                    }
                } else {
                    // *** opening or self-closing html tag
                    $dom[$key]['opening'] = true;
                    $dom[$key]['parent'] = end($level);
                    if ((substr($element, -1, 1) == '/') OR (in_array($dom[$key]['value'], $selfclosingtags))) {
                        // self-closing tag
                        $dom[$key]['self'] = true;
                    } else {
                        // opening tag
                        array_push($level, $key);
                        $dom[$key]['self'] = false;
                    }
                    // copy some values from parent
                    $parentkey = 0;
                    if ($key > 0) {
                        $parentkey = $dom[$key]['parent'];
                        $dom[$key]['hide'] = $dom[$parentkey]['hide'];
                        $dom[$key]['fontname'] = $dom[$parentkey]['fontname'];
                        $dom[$key]['fontstyle'] = $dom[$parentkey]['fontstyle'];
                        $dom[$key]['fontsize'] = $dom[$parentkey]['fontsize'];
                        $dom[$key]['font-stretch'] = $dom[$parentkey]['font-stretch'];
                        $dom[$key]['letter-spacing'] = $dom[$parentkey]['letter-spacing'];
                        $dom[$key]['stroke'] = $dom[$parentkey]['stroke'];
                        $dom[$key]['fill'] = $dom[$parentkey]['fill'];
                        $dom[$key]['clip'] = $dom[$parentkey]['clip'];
                        $dom[$key]['line-height'] = $dom[$parentkey]['line-height'];
                        $dom[$key]['bgcolor'] = $dom[$parentkey]['bgcolor'];
                        $dom[$key]['fgcolor'] = $dom[$parentkey]['fgcolor'];
                        $dom[$key]['strokecolor'] = $dom[$parentkey]['strokecolor'];
                        $dom[$key]['align'] = $dom[$parentkey]['align'];
                        $dom[$key]['listtype'] = $dom[$parentkey]['listtype'];
                        $dom[$key]['text-indent'] = $dom[$parentkey]['text-indent'];
                        $dom[$key]['border'] = array();
                        $dom[$key]['dir'] = $dom[$parentkey]['dir'];
                    }
                    // get attributes
                    preg_match_all('/([^=\s]*)[\s]*=[\s]*"([^"]*)"/', $element, $attr_array, PREG_PATTERN_ORDER);
                    $dom[$key]['attribute'] = array(); // reset attribute array
                    while (list($id, $name) = each($attr_array[1])) {
                        $dom[$key]['attribute'][strtolower($name)] = $attr_array[2][$id];
                    }
                    if (!empty($css)) {
                        // merge CSS style to current style
                        list($dom[$key]['csssel'], $dom[$key]['cssdata']) = $this->getCSSdataArray($dom, $key, $css);
                        $dom[$key]['attribute']['style'] = $this->getTagStyleFromCSSarray($dom[$key]['cssdata']);
                    }
                    // split style attributes
                    if (isset($dom[$key]['attribute']['style']) AND !empty($dom[$key]['attribute']['style'])) {
                        // get style attributes
                        preg_match_all('/([^;:\s]*):([^;]*)/', $dom[$key]['attribute']['style'], $style_array, PREG_PATTERN_ORDER);
                        $dom[$key]['style'] = array(); // reset style attribute array
                        while (list($id, $name) = each($style_array[1])) {
                            // in case of duplicate attribute the last replace the previous
                            $dom[$key]['style'][strtolower($name)] = trim($style_array[2][$id]);
                        }
                        // --- get some style attributes ---
                        // text direction
                        if (isset($dom[$key]['style']['direction'])) {
                            $dom[$key]['dir'] = $dom[$key]['style']['direction'];
                        }
                        // display
                        if (isset($dom[$key]['style']['display'])) {
                            $dom[$key]['hide'] = (trim(strtolower($dom[$key]['style']['display'])) == 'none');
                        }
                        // font family
                        if (isset($dom[$key]['style']['font-family'])) {
                            $dom[$key]['fontname'] = $this->getFontFamilyName($dom[$key]['style']['font-family']);
                        }
                        // list-style-type
                        if (isset($dom[$key]['style']['list-style-type'])) {
                            $dom[$key]['listtype'] = trim(strtolower($dom[$key]['style']['list-style-type']));
                            if ($dom[$key]['listtype'] == 'inherit') {
                                $dom[$key]['listtype'] = $dom[$parentkey]['listtype'];
                            }
                        }
                        // text-indent
                        if (isset($dom[$key]['style']['text-indent'])) {
                            $dom[$key]['text-indent'] = $this->getHTMLUnitToUnits($dom[$key]['style']['text-indent']);
                            if ($dom[$key]['text-indent'] == 'inherit') {
                                $dom[$key]['text-indent'] = $dom[$parentkey]['text-indent'];
                            }
                        }
                        // font size
                        if (isset($dom[$key]['style']['font-size'])) {
                            $fsize = trim($dom[$key]['style']['font-size']);
                            switch ($fsize) {
                                // absolute-size
                                case 'xx-small': {
                                        $dom[$key]['fontsize'] = $dom[0]['fontsize'] - 4;
                                        break;
                                    }
                                case 'x-small': {
                                        $dom[$key]['fontsize'] = $dom[0]['fontsize'] - 3;
                                        break;
                                    }
                                case 'small': {
                                        $dom[$key]['fontsize'] = $dom[0]['fontsize'] - 2;
                                        break;
                                    }
                                case 'medium': {
                                        $dom[$key]['fontsize'] = $dom[0]['fontsize'];
                                        break;
                                    }
                                case 'large': {
                                        $dom[$key]['fontsize'] = $dom[0]['fontsize'] + 2;
                                        break;
                                    }
                                case 'x-large': {
                                        $dom[$key]['fontsize'] = $dom[0]['fontsize'] + 4;
                                        break;
                                    }
                                case 'xx-large': {
                                        $dom[$key]['fontsize'] = $dom[0]['fontsize'] + 6;
                                        break;
                                    }
                                // relative-size
                                case 'smaller': {
                                        $dom[$key]['fontsize'] = $dom[$parentkey]['fontsize'] - 3;
                                        break;
                                    }
                                case 'larger': {
                                        $dom[$key]['fontsize'] = $dom[$parentkey]['fontsize'] + 3;
                                        break;
                                    }
                                default: {
                                        $dom[$key]['fontsize'] = $this->getHTMLUnitToUnits($fsize, $dom[$parentkey]['fontsize'], 'pt', true);
                                    }
                            }
                        }
                        // font-stretch
                        if (isset($dom[$key]['style']['font-stretch'])) {
                            $dom[$key]['font-stretch'] = $this->getCSSFontStretching($dom[$key]['style']['font-stretch'], $dom[$parentkey]['font-stretch']);
                        }
                        // letter-spacing
                        if (isset($dom[$key]['style']['letter-spacing