tcpdf.php

Go to the documentation of this file.

<?php
//============================================================+
// File name   : tcpdf.php
// Begin       : 2002-08-03
// Last Update : 2009-05-07
// Author      : Nicola Asuni - [email protected] - http://www.tcpdf.org
// Version     : 4.6.008
// License     : GNU LGPL (http://www.gnu.org/copyleft/lesser.html)
//  ----------------------------------------------------------------------------
//  Copyright (C) 2002-2009  Nicola Asuni - Tecnick.com S.r.l.
//  
//  This program 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 2.1 of the License, or
//  (at your option) any later version.
//  
//  This program 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 GNU Lesser General Public License
//  along with this program.  If not, see <http://www.gnu.org/licenses/>.
//  
//  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.
//
// Main features:
//  * no external libraries are required for the basic functions;
//  * supports all ISO page formats;
//  * supports custom page formats, margins and units of measure;
//  * supports UTF-8 Unicode and Right-To-Left languages;
//  * supports TrueTypeUnicode, OpenTypeUnicode, TrueType, OpenType, Type1 and CID-0 fonts;
//  * supports document encryption;
//  * includes methods to publish some XHTML code;
//  * includes graphic (geometric) and transformation methods;
//  * includes Javascript and forms support;
//  * includes a method to print various barcode formats: 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;
//  * includes methods to set Bookmarks and print a Table of Content;
//  * includes methods to move and delete pages;
//  * includes methods for automatic page header and footer management;
//  * supports automatic page break;
//  * supports automatic page numbering and page groups;
//  * supports automatic line break and text justification;
//  * supports JPEG and PNG 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)
//  * supports stroke and clipping mode for text;
//  * supports clipping masks;
//  * supports Grayscale, RGB, CMYK, Spot Colors and Transparencies;
//  * supports several annotations, including links, text and file attachments;
//  * supports page compression (requires zlib extension);
//  * supports text hyphenation.
//  * supports transactions to UNDO commands.
//
// -----------------------------------------------------------
// THANKS TO:
// 
// Olivier Plathey (http://www.fpdf.org) for original FPDF.
// Efthimios Mavrogeorgiadis ([email protected]) for suggestions on RTL language support.
// Klemen Vodopivec (http://www.fpdf.de/downloads/addons/37/) for Encryption algorithm.
// Warren Sherliker ([email protected]) for better image handling.
// dullus for text Justification.
// Bob Vincent ([email protected]) 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.
// Anyone that has reported a bug or sent a suggestion.
//============================================================+

require_once(dirname(__FILE__).'/config/tcpdf_config.php');

// includes some support files

require_once(dirname(__FILE__).'/unicode_data.php');

require_once(dirname(__FILE__).'/htmlcolors.php');

if (!class_exists('TCPDF', false)) {
    define('PDF_PRODUCER', 'TCPDF 4.6.008 (http://www.tcpdf.org)');
    
    class TCPDF {
        
        // protected or Protected properties

        protected $page;
        
        protected $n;

        protected $offsets;

        protected $buffer;

        protected $pages = array();

        protected $state;

        protected $compress;
        
        protected $CurOrientation;

        protected $pagedim = array();

        protected $k;

        protected $fwPt;

        protected $fhPt;

        protected $wPt;

        protected $hPt;

        protected $w;

        protected $h;

        protected $lMargin;

        protected $tMargin;

        protected $rMargin;

        protected $bMargin;

        //protected
        public $cMargin;
        
        protected $oldcMargin;

        protected $x;

        protected $y;

        protected $lasth;

        protected $LineWidth;

        protected $CoreFonts;

        protected $fonts = array();

        protected $FontFiles = array();

        protected $diffs = array();

        protected $images = array();

        protected $PageAnnots = array();

        protected $links = array();

        protected $FontFamily;

        protected $FontStyle;
        
        protected $FontAscent;
        
        protected $FontDescent;

        protected $underline;

        protected $CurrentFont;

        protected $FontSizePt;

        protected $FontSize;

        protected $DrawColor;

        protected $FillColor;

        protected $TextColor;

        protected $ColorFlag;

        protected $AutoPageBreak;

        protected $PageBreakTrigger;

        protected $InFooter = false;

        protected $ZoomMode;

        protected $LayoutMode;

        protected $title = '';

        protected $subject = '';

        protected $author = '';

        protected $keywords = '';

        protected $creator = '';

        protected $AliasNbPages = '{nb}';
        
        protected $AliasNumPage = '{pnb}';
        
        protected $img_rb_x;

        protected $img_rb_y;

        protected $imgscale = 1;

        protected $isunicode = false;

        protected $PDFVersion = '1.7';
        
        
        // ----------------------
        
        protected $header_margin;
        
        protected $footer_margin;
        
        protected $original_lMargin;
        
        protected $original_rMargin;
            
        protected $header_font;
        
        protected $footer_font;
        
        protected $l;
        
        protected $barcode = false;
        
        protected $print_header = true;
        
        protected $print_footer = true;
            
        protected $header_logo = '';
        
        protected $header_logo_width = 30;
        
        protected $header_title = '';
        
        protected $header_string = '';
        
        protected $default_table_columns = 4;
        
        
        // variables for html parser
        
        protected $HREF = array();
        
        protected $fontlist = array();
        
        protected $fgcolor;
                        
        protected $listordered = array();
        
        protected $listcount = array();
        
        protected $listnum = 0;
        
        protected $listindent;
        
        protected $bgcolor;
        
        protected $tempfontsize = 10;
        
        protected $lispacer = '';
        
        protected $encoding = 'UTF-8';
        
        protected $internal_encoding;
        
        protected $rtl = false;
        
        protected $tmprtl = false;
        
        // --- Variables used for document encryption:
        
        protected $encrypted;
        
        protected $Uvalue;
        
        protected $Ovalue;
        
        protected $Pvalue;
        
        protected $enc_obj_id;
        
        protected $last_rc4_key;
        
        protected $last_rc4_key_c;
        
        protected $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";
        
        protected $encryption_key;
        
        // --- bookmark ---
        
        protected $outlines = array();
        
        protected $OutlineRoot;
        
        
        // --- javascript and form ---
        
        protected $javascript = '';
        
        protected $n_js;

        protected $linethrough;

        // --- Variables used for User's Rights ---
        // See PDF reference chapter 8.7 Digital Signatures

        protected $ur;

        protected $ur_document;

        protected $ur_annots;

        protected $ur_form;

        protected $ur_signature;

        protected $dpi = 72;
        
        protected $newpagegroup = array();
        
        protected $pagegroups;
        
        protected $currpagegroup; 
        
        protected $visibility = 'all';
        
        protected $n_ocg_print;
        
        protected $n_ocg_view;
        
        protected $extgstates;
        
        protected $jpeg_quality;
        
        protected $cell_height_ratio = K_CELL_HEIGHT_RATIO;
        
        protected $viewer_preferences;
        
        protected $PageMode;
        
        protected $gradients = array();
        
        protected $intmrk = array();
        
        protected $footerpos = array();
        
        
        protected $footerlen = array();
        
        protected $newline = true;
        
        protected $endlinex = 0;
        
        protected $linestyleWidth = '';
        
        protected $linestyleCap = '0 J';
        
        protected $linestyleJoin = '0 j';
        
        protected $linestyleDash = '[] 0 d';
        
        protected $openMarkedContent = false;
        
        protected $htmlvspace = 0;
        
        protected $spot_colors = array();
        
        protected $lisymbol = '';
        
        protected $epsmarker = 'x#!#EPS#!#x';
        
        protected $transfmatrix = array();
        
        protected $booklet = false;
        
        protected $feps = 0.001;
        
        protected $tagvspaces = array();
        
        protected $customlistindent = -1;
        
        protected $opencell = true;

        protected $embeddedfiles = array();

        protected $premode = false;

        protected $transfmrk = array();

        protected $htmlLinkColorArray = array(0, 0, 255);

        protected $htmlLinkFontStyle = 'U';

        protected $numpages = 0;

        protected $pagelen = array();

        protected $numimages = 0;

        protected $imagekeys = array();

        protected $bufferlen = 0;

        protected $diskcache = false;

        protected $numfonts = 0;

        protected $fontkeys = array();

        protected $pageopen = array();
        
        protected $default_monospaced_font = 'courier';

        protected $objcopy;

        protected $cache_file_lenght = array();

        protected $thead = '';

        protected $theadMargin = '';

        protected $cache_UTF8StringToArray = array();

        protected $cache_maxsize_UTF8StringToArray = 8;

        protected $cache_size_UTF8StringToArray = 0;

        protected $sign = false;

        protected $signature_data = array();

        protected $signature_max_lenght = 5120;

        protected $re_spaces = '/[\s\p{Z}\p{Lo}]/';

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

        public function __construct($orientation='P', $unit='mm', $format='A4', $unicode=true, $encoding='UTF-8', $diskcache=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');
            }
            // set disk caching
            $this->diskcache = $diskcache ? true : false;
            // set language direction
            $this->rtl = $this->l['a_meta_dir']=='rtl' ? true : 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 = 'helvetica';
            $this->FontStyle = '';
            $this->FontSizePt = 12;
            $this->underline = false;
            $this->linethrough = false;
            $this->DrawColor = '0 G';
            $this->FillColor = '0 g';
            $this->TextColor = '0 g';
            $this->ColorFlag = false;
            // encryption values
            $this->encrypted = false;
            $this->last_rc4_key = '';
            $this->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";
            //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);
            //Interior cell margin
            $this->cMargin = $margin / 10;
            //Line width (0.2 mm)
            $this->LineWidth = 0.57 / $this->k;
            $this->linestyleWidth = sprintf('%.2F 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(true);
            //Set default PDF version number
            $this->PDFVersion = '1.7';
            $this->encoding = $encoding;
            $this->HREF = array();
            $this->getFontsList();
            $this->fgcolor = array('R' => 0, 'G' => 0, 'B' => 0);
            $this->bgcolor = array('R' => 255, 'G' => 255, 'B' => 255);
            $this->extgstates = array();
            // user's rights
            $this->sign = false;
            $this->ur = 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';            
            // 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 (@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->re_spaces = '/[\s\p{Z}\p{Lo}]/';
            } else {
                // PCRE unicode support is turned OFF
                $this->re_spaces = '/[\s]/';
            }
        }
        
        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);
        }
        
        public function setPageUnit($unit) {
        //Set scale factor
            switch (strtolower($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;
                }
            }
            if (isset($this->CurOrientation)) {
                    $this->setPageOrientation($this->CurOrientation);
            }
        }
        
        public function setPageFormat($format, $orientation='P') {
            //Page format
            if (is_string($format)) {
                // Page formats (45 standard ISO paper formats and 4 american common formats).
                // Paper cordinates are calculated in this way: (inches * 72) where (1 inch = 2.54 cm)
                switch (strtoupper($format)) {
                    case '4A0': {$format = array(4767.87,6740.79); break;}
                    case '2A0': {$format = array(3370.39,4767.87); break;}
                    case 'A0': {$format = array(2383.94,3370.39); break;}
                    case 'A1': {$format = array(1683.78,2383.94); break;}
                    case 'A2': {$format = array(1190.55,1683.78); break;}
                    case 'A3': {$format = array(841.89,1190.55); break;}
                    case 'A4': default: {$format = array(595.28,841.89); break;}
                    case 'A5': {$format = array(419.53,595.28); break;}
                    case 'A6': {$format = array(297.64,419.53); break;}
                    case 'A7': {$format = array(209.76,297.64); break;}
                    case 'A8': {$format = array(147.40,209.76); break;}
                    case 'A9': {$format = array(104.88,147.40); break;}
                    case 'A10': {$format = array(73.70,104.88); break;}
                    case 'B0': {$format = array(2834.65,4008.19); break;}
                    case 'B1': {$format = array(2004.09,2834.65); break;}
                    case 'B2': {$format = array(1417.32,2004.09); break;}
                    case 'B3': {$format = array(1000.63,1417.32); break;}
                    case 'B4': {$format = array(708.66,1000.63); break;}
                    case 'B5': {$format = array(498.90,708.66); break;}
                    case 'B6': {$format = array(354.33,498.90); break;}
                    case 'B7': {$format = array(249.45,354.33); break;}
                    case 'B8': {$format = array(175.75,249.45); break;}
                    case 'B9': {$format = array(124.72,175.75); break;}
                    case 'B10': {$format = array(87.87,124.72); break;}
                    case 'C0': {$format = array(2599.37,3676.54); break;}
                    case 'C1': {$format = array(1836.85,2599.37); break;}
                    case 'C2': {$format = array(1298.27,1836.85); break;}
                    case 'C3': {$format = array(918.43,1298.27); break;}
                    case 'C4': {$format = array(649.13,918.43); break;}
                    case 'C5': {$format = array(459.21,649.13); break;}
                    case 'C6': {$format = array(323.15,459.21); break;}
                    case 'C7': {$format = array(229.61,323.15); break;}
                    case 'C8': {$format = array(161.57,229.61); break;}
                    case 'C9': {$format = array(113.39,161.57); break;}
                    case 'C10': {$format = array(79.37,113.39); break;}
                    case 'RA0': {$format = array(2437.80,3458.27); break;}
                    case 'RA1': {$format = array(1729.13,2437.80); break;}
                    case 'RA2': {$format = array(1218.90,1729.13); break;}
                    case 'RA3': {$format = array(864.57,1218.90); break;}
                    case 'RA4': {$format = array(609.45,864.57); break;}
                    case 'SRA0': {$format = array(2551.18,3628.35); break;}
                    case 'SRA1': {$format = array(1814.17,2551.18); break;}
                    case 'SRA2': {$format = array(1275.59,1814.17); break;}
                    case 'SRA3': {$format = array(907.09,1275.59); break;}
                    case 'SRA4': {$format = array(637.80,907.09); break;}
                    case 'LETTER': {$format = array(612.00,792.00); break;}
                    case 'LEGAL': {$format = array(612.00,1008.00); break;}
                    case 'EXECUTIVE': {$format = array(521.86,756.00); break;}
                    case 'FOLIO': {$format = array(612.00,936.00); break;}
                }
                $this->fwPt = $format[0];
                $this->fhPt = $format[1];
            } else {
                $this->fwPt = $format[0] * $this->k;
                $this->fhPt = $format[1] * $this->k;
            }
            $this->setPageOrientation($orientation);
        }
        
        public function setPageOrientation($orientation, $autopagebreak='', $bottommargin='') {
            $orientation = strtoupper($orientation);
            if (($orientation == 'P') OR ($orientation == 'PORTRAIT')) {
                $this->CurOrientation = 'P';
                $this->wPt = $this->fwPt;
                $this->hPt = $this->fhPt;
            } elseif (($orientation == 'L') OR ($orientation == 'LANDSCAPE')) {
                $this->CurOrientation = 'L';
                $this->wPt = $this->fhPt;
                $this->hPt = $this->fwPt;
            } else {
                $this->Error('Incorrect orientation: '.$orientation);
            }
            $this->w = $this->wPt / $this->k;
            $this->h = $this->hPt / $this->k;
            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] = array('w' => $this->wPt, 'h' => $this->hPt, 'wk' => $this->w, 'hk' => $this->h, 'tm' => $this->tMargin, 'bm' => $bottommargin, 'lm' => $this->lMargin, 'rm' => $this->rMargin, 'pb' => $autopagebreak, 'or' => $this->CurOrientation, 'olm' => $this->original_lMargin, 'orm' => $this->original_rMargin);
        }
                
        public function setRTL($enable) {
            $this->rtl = $enable ? true : false;
            $this->tmprtl = false;
        }
        
        public function getRTL() {
            return $this->rtl;
        }
        
        public function setTempRTL($mode) {
            switch ($mode) {
                case false:
                case 'L':
                case 'R': {
                    $this->tmprtl = $mode;
                }
            }
        }
        
        public function setLastH($h) {
            $this->lasth = $h;
        }
        
        public function getLastH() {
            return $this->lasth;
        }
        
        public function setImageScale($scale) {
            $this->imgscale = $scale;
        }

        public function getImageScale() {
            return $this->imgscale;
        }
                
        public function getPageDimensions($pagenum='') {
            if (empty($pagenum)) {
                $pagenum = $this->page;
            }
            return $this->pagedim[$pagenum];
        }
        
        public function getPageWidth($pagenum='') {
            if (empty($pagenum)) {
                return $this->w;
            }
            return $this->pagedim[$pagenum]['w'];
        }

        public function getPageHeight($pagenum='') {
            if (empty($pagenum)) {
                return $this->h;
            }
            return $this->pagedim[$pagenum]['h'];
        }

        public function getBreakMargin($pagenum='') {
            if (empty($pagenum)) {
                return $this->bMargin;
            }
            return $this->pagedim[$pagenum]['bm'];
        }

        public function getScaleFactor() {
            return $this->k;
        }

        public function SetMargins($left, $top, $right=-1) {
            //Set left, top and right margins
            $this->lMargin = $left;
            $this->tMargin = $top;
            if ($right == -1) {
                $right = $left;
            }
            $this->rMargin = $right;
        }

        public function SetLeftMargin($margin) {
            //Set left margin
            $this->lMargin=$margin;
            if (($this->page > 0) AND ($this->x < $margin)) {
                $this->x = $margin;
            }
        }

        public function SetTopMargin($margin) {
            //Set top margin
            $this->tMargin=$margin;
            if (($this->page > 0) AND ($this->y < $margin)) {
                $this->y = $margin;
            }
        }

        public function SetRightMargin($margin) {
            $this->rMargin=$margin;
            if (($this->page > 0) AND ($this->x > ($this->w - $margin))) {
                $this->x = $this->w - $margin;
            }
        }

        public function SetCellPadding($pad) {
            $this->cMargin = $pad;
        }

        public function SetAutoPageBreak($auto, $margin=0) {
            //Set auto page break mode and triggering margin
            $this->AutoPageBreak = $auto;
            $this->bMargin = $margin;
            $this->PageBreakTrigger = $this->h - $margin;
        }

        public function SetDisplayMode($zoom, $layout='SinglePage', $mode='UseNone') {
            //Set display mode in viewer
            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';
                }
            }
        }

        public function SetCompression($compress) {
            //Set page compression
            if (function_exists('gzcompress')) {
                $this->compress = $compress;
            } else {
                $this->compress = false;
            }
        }

        public function SetTitle($title) {
            //Title of document
            $this->title = $title;
        }

        public function SetSubject($subject) {
            //Subject of document
            $this->subject = $subject;
        }

        public function SetAuthor($author) {
            //Author of document
            $this->author = $author;
        }

        public function SetKeywords($keywords) {
            //Keywords of document
            $this->keywords = $keywords;
        }

        public function SetCreator($creator) {
            //Creator of document
            $this->creator = $creator;
        }
        
        public function Error($msg) {
            // unset all class variables
            $this->_destroy(true);
            // exit program and print error
            die('<strong>TCPDF ERROR: </strong>'.$msg);
        }

        public function Open() {
            //Begin document
            $this->state = 1;
        }

        public function Close() {
            if ($this->state == 3) {
                return;
            }
            if ($this->page == 0) {
                $this->AddPage();
            }
            // close page
            $this->endPage();
            // close document
            $this->_enddoc();
            // unset all class variables (except critical ones)
            $this->_destroy(false);
        }
        
        public function setPage($pnum, $resetmargins=false) {
            if ($pnum == $this->page) {
                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->wPt / $this->k;
                $this->h = $this->hPt / $this->k;
                $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.');
            }
        }
        
        public function lastPage($resetmargins=false) {
            $this->setPage($this->getNumPages(), $resetmargins);
        }
        
        public function getPage() {
            return $this->page;
        }
        
        
        public function getNumPages() {
            return $this->numpages;
        }

        public function AddPage($orientation='', $format='') {
            if (!isset($this->original_lMargin)) {
                $this->original_lMargin = $this->lMargin;
            }
            if (!isset($this->original_rMargin)) {
                $this->original_rMargin = $this->rMargin;
            }
            // terminate previous page
            $this->endPage();
            // start new page
            $this->startPage($orientation, $format);
        }

        protected function endPage() {
            // check if page is already closed
            if (($this->page == 0) OR ($this->numpages > $this->page) OR (!$this->pageopen[$this->page])) {
                return;
            }
            $this->InFooter = true;
            // print page footer
            $this->setFooter();
            // close page
            $this->_endpage();
            // mark page as closed
            $this->pageopen[$this->page] = false;
            $this->InFooter = false;
        }

        protected function startPage($orientation='', $format='') {
            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();
        }
            
        public function setPageMark() {
            $this->intmrk[$this->page] = $this->pagelen[$this->page];
        }
        
        public function setHeaderData($ln='', $lw=0, $ht='', $hs='') {
            $this->header_logo = $ln;
            $this->header_logo_width = $lw;
            $this->header_title = $ht;
            $this->header_string = $hs;
        }
        
        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;
            return $ret;
        }
        
        public function setHeaderMargin($hm=10) {
            $this->header_margin = $hm;
        }
        
        public function getHeaderMargin() {
            return $this->header_margin;
        }
        
        public function setFooterMargin($fm=10) {
            $this->footer_margin = $fm;
        }
        
        public function getFooterMargin() {
            return $this->footer_margin;
        }
        public function setPrintHeader($val=true) {
            $this->print_header = $val;
        }
        
        public function setPrintFooter($val=true) {
            $this->print_footer = $val;
        }
        
        public function getImageRBX() {
            return $this->img_rb_x;
        }
        
        public function getImageRBY() {
            return $this->img_rb_y;
        }
        
        public function Header() {
            $ormargins = $this->getOriginalMargins();
            $headerfont = $this->getHeaderFont();
            $headerdata = $this->getHeaderData();
            if (($headerdata['logo']) AND ($headerdata['logo'] != K_BLANK_IMAGE)) {
                $this->Image(K_PATH_IMAGES.$headerdata['logo'], $this->GetX(), $this->getHeaderMargin(), $headerdata['logo_width']);
                $imgy = $this->getImageRBY();
            } else {
                $imgy = $this->GetY();
            }
            $cell_height = round(($this->getCellHeightRatio() * $headerfont[2]) / $this->getScaleFactor(), 2);
            // set starting margin for text data cell
            if ($this->getRTL()) {
                $header_x = $ormargins['right'] + ($headerdata['logo_width'] * 1.1);
            } else {
                $header_x = $ormargins['left'] + ($headerdata['logo_width'] * 1.1);
            }
            $this->SetTextColor(0, 0, 0);
            // header title
            $this->SetFont($headerfont[0], 'B', $headerfont[2] + 1);
            $this->SetX($header_x);         
            $this->Cell(0, $cell_height, $headerdata['title'], 0, 1, '', 0, '', 0);
            // header string
            $this->SetFont($headerfont[0], $headerfont[1], $headerfont[2]);
            $this->SetX($header_x);
            $this->MultiCell(0, $cell_height, $headerdata['string'], 0, '', 0, 1, '', '', true, 0, false);
            // print an ending header line
            $this->SetLineStyle(array('width' => 0.85 / $this->getScaleFactor(), 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(0, 0, 0)));
            $this->SetY((2.835 / $this->getScaleFactor()) + max($imgy, $this->GetY()));
            if ($this->getRTL()) {
                $this->SetX($ormargins['right']);
            } else {
                $this->SetX($ormargins['left']);
            }
            $this->Cell(0, 0, '', 'T', 0, 'C');
        }
        
        public function Footer() {              
            $cur_y = $this->GetY();
            $ormargins = $this->getOriginalMargins();
            $this->SetTextColor(0, 0, 0);           
            //set style for cell border
            $line_width = 0.85 / $this->getScaleFactor();
            $this->SetLineStyle(array('width' => $line_width, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(0, 0, 0)));
            //print document barcode
            $barcode = $this->getBarcode();
            if (!empty($barcode)) {
                $this->Ln($line_width);
                $barcode_width = round(($this->getPageWidth() - $ormargins['left'] - $ormargins['right'])/3);
                $this->write1DBarcode($barcode, 'C128B', $this->GetX(), $cur_y + $line_width, $barcode_width, (($this->getFooterMargin() / 3) - $line_width), 0.3, '', ''); 
            }
            if (empty($this->pagegroups)) {
                $pagenumtxt = $this->l['w_page'].' '.$this->getAliasNumPage().' / '.$this->getAliasNbPages();
            } else {
                $pagenumtxt = $this->l['w_page'].' '.$this->getPageNumGroupAlias().' / '.$this->getPageGroupAlias();
            }       
            $this->SetY($cur_y);
            //Print page number
            if ($this->getRTL()) {
                $this->SetX($ormargins['right']);
                $this->Cell(0, 0, $pagenumtxt, 'T', 0, 'L');
            } else {
                $this->SetX($ormargins['left']);
                $this->Cell(0, 0, $pagenumtxt, 'T', 0, 'R');
            }
        }
        
        protected function setHeader() {
            if ($this->print_header) {
                $lasth = $this->lasth;
                $this->_out('q');
                $this->rMargin = $this->original_rMargin;
                $this->lMargin = $this->original_lMargin;
                $this->cMargin = 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;
            }
        }
        
        protected function setFooter() {
            //Page footer
            // 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) {
                $lasth = $this->lasth;
                $this->_out('q');
                $this->rMargin = $this->original_rMargin;
                $this->lMargin = $this->original_lMargin;
                $this->cMargin = 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;
            }
            // restore graphic settings
            $this->setGraphicVars($gvars);
            // calculate footer lenght
            $this->footerlen[$this->page] = $this->pagelen[$this->page] - $this->footerpos[$this->page] + 1;
        }

        protected function setTableHeader() {
            if (!$this->empty_string($this->theadMargin)) {
                // restore the original top-margin
                $this->tMargin = $this->theadMargin;
                $this->pagedim[$this->page]['tm'] = $this->theadMargin;
                $this->y = $this->theadMargin;
            }
            if (!$this->empty_string($this->thead)) {
                // print table header
                $this->writeHTML($this->thead, false, false, false, false, '');
                // set new top margin to skip the table headers
                if (!isset($this->theadMargin) OR ($this->empty_string($this->theadMargin))) {
                    $this->theadMargin = $this->tMargin;
                }
                $this->tMargin = $this->y;
                $this->pagedim[$this->page]['tm'] = $this->tMargin;
            }
        }
        
        public function PageNo() {
            return $this->page;
        }

        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('i' => $i, 'c' => $c, 'm' => $m, 'y' => $y, 'k' => $k);
            }
        }

        public function SetDrawColorArray($color) {
            if (isset($color)) {
                $color = array_values($color);
                $r = isset($color[0]) ? $color[0] : -1;
                $g = isset($color[1]) ? $color[1] : -1;
                $b = isset($color[2]) ? $color[2] : -1;
                $k = isset($color[3]) ? $color[3] : -1;
                if ($r >= 0) {
                    $this->SetDrawColor($r, $g, $b, $k);
                }
            }
        }

        public function SetDrawColor($col1=0, $col2=-1, $col3=-1, $col4=-1) {
            // 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 for all stroking operations
            if (($col2 == -1) AND ($col3 == -1) AND ($col4 == -1)) {
                // Grey scale
                $this->DrawColor = sprintf('%.3F G', $col1/255);
            } elseif ($col4 == -1) {
                // RGB
                $this->DrawColor = sprintf('%.3F %.3F %.3F RG', $col1/255, $col2/255, $col3/255);
            } else {
                // CMYK
                $this->DrawColor = sprintf('%.3F %.3F %.3F %.3F K', $col1/100, $col2/100, $col3/100, $col4/100);
            }
            if ($this->page > 0) {
                $this->_out($this->DrawColor);
            }
        }
        
        public function SetDrawSpotColor($name, $tint=100) {
            if (!isset($this->spot_colors[$name])) {
                $this->Error('Undefined spot color: '.$name);
            }
            $this->DrawColor = sprintf('/CS%d CS %.3F SCN', $this->spot_colors[$name]['i'], $tint/100);
            if ($this->page > 0) {
                $this->_out($this->DrawColor);
            }
        }
        
        public function SetFillColorArray($color) {
            if (isset($color)) {
                $color = array_values($color);
                $r = isset($color[0]) ? $color[0] : -1;
                $g = isset($color[1]) ? $color[1] : -1;
                $b = isset($color[2]) ? $color[2] : -1;
                $k = isset($color[3]) ? $color[3] : -1;
                if ($r >= 0) {
                    $this->SetFillColor($r, $g, $b, $k);
                }
            }
        }
        
        public function SetFillColor($col1=0, $col2=-1, $col3=-1, $col4=-1) {
            // 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 for all filling operations
            if (($col2 == -1) AND ($col3 == -1) AND ($col4 == -1)) {
                // Grey scale
                $this->FillColor = sprintf('%.3F g', $col1/255);
                $this->bgcolor = array('G' => $col1);
            } elseif ($col4 == -1) {
                // RGB
                $this->FillColor = sprintf('%.3F %.3F %.3F rg', $col1/255, $col2/255, $col3/255);
                $this->bgcolor = array('R' => $col1, 'G' => $col2, 'B' => $col3);
            } else {
                // CMYK
                $this->FillColor = sprintf('%.3F %.3F %.3F %.3F k', $col1/100, $col2/100, $col3/100, $col4/100);
                $this->bgcolor = array('C' => $col1, 'M' => $col2, 'Y' => $col3, 'K' => $col4);
            }
            $this->ColorFlag = ($this->FillColor != $this->TextColor);
            if ($this->page > 0) {
                $this->_out($this->FillColor);
            }
        }
        
        public function SetFillSpotColor($name, $tint=100) {
            if (!isset($this->spot_colors[$name])) {
                $this->Error('Undefined spot color: '.$name);
            }
            $this->FillColor = sprintf('/CS%d cs %.3F scn', $this->spot_colors[$name]['i'], $tint/100);
            $this->ColorFlag = ($this->FillColor != $this->TextColor);
            if ($this->page > 0) {
                $this->_out($this->FillColor);
            }
        }
        
        public function SetTextColorArray($color) {
            if (isset($color)) {
                $color = array_values($color);
                $r = isset($color[0]) ? $color[0] : -1;
                $g = isset($color[1]) ? $color[1] : -1;
                $b = isset($color[2]) ? $color[2] : -1;
                $k = isset($color[3]) ? $color[3] : -1;
                if ($r >= 0) {
                    $this->SetTextColor($r, $g, $b, $k);
                }
            }
        }

        public function SetTextColor($col1=0, $col2=-1, $col3=-1, $col4=-1) {
            // 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 for text
            if (($col2 == -1) AND ($col3 == -1) AND ($col4 == -1)) {
                // Grey scale
                $this->TextColor = sprintf('%.3F g', $col1/255);
                $this->fgcolor = array('G' => $col1);
            } elseif ($col4 == -1) {
                // RGB
                $this->TextColor = sprintf('%.3F %.3F %.3F rg', $col1/255, $col2/255, $col3/255);
                $this->fgcolor = array('R' => $col1, 'G' => $col2, 'B' => $col3);
            } else {
                // CMYK
                $this->TextColor = sprintf('%.3F %.3F %.3F %.3F k', $col1/100, $col2/100, $col3/100, $col4/100);
                $this->fgcolor = array('C' => $col1, 'M' => $col2, 'Y' => $col3, 'K' => $col4);
            }
            $this->ColorFlag = ($this->FillColor != $this->TextColor);
        }
        
        public function SetTextSpotColor($name, $tint=100) {
            if (!isset($this->spot_colors[$name])) {
                $this->Error('Undefined spot color: '.$name);
            }
            $this->TextColor = sprintf('/CS%d cs %.3F scn', $this->spot_colors[$name]['i'], $tint/100);
            $this->ColorFlag = ($this->FillColor != $this->TextColor);
            if ($this->page > 0) {
                $this->_out($this->TextColor);
            }
        }

        public function GetStringWidth($s, $fontname='', $fontstyle='', $fontsize=0) {
            return $this->GetArrStringWidth($this->utf8Bidi($this->UTF8StringToArray($s), $s, $this->tmprtl), $fontname, $fontstyle, $fontsize);
        }
        
        public function GetArrStringWidth($sa, $fontname='', $fontstyle='', $fontsize=0) {
            // 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);
            }
            $w = 0;
            foreach ($sa as $char) {
                $w += $this->GetCharWidth($char);
            }
            // restore previous values
            if (!$this->empty_string($fontname)) {
                $this->SetFont($prev_FontFamily, $prev_FontStyle, $prev_FontSizePt);
            }
            return $w;
        }
        
        public function GetCharWidth($char) {
            if ($char == 173) {
                // SHY character will not be printed
                return (0);
            }
            $cw = &$this->CurrentFont['cw'];
            if (isset($cw[$char])) {
                $w = $cw[$char];
            } elseif (isset($this->CurrentFont['dw'])) {
                // default width
                $w = $this->CurrentFont['dw'];
            } elseif (isset($cw[32])) {
                // default width
                $dw = $cw[32];
            } else {
                $w = 600;
            }
            return ($w * $this->FontSize / 1000);
        }
        
        public function GetNumChars($s) {
            if (($this->CurrentFont['type'] == 'TrueTypeUnicode') OR ($this->CurrentFont['type'] == 'cidfont0')) {
                return count($this->UTF8StringToArray($s));
            } 
            return strlen($s);
        }
            
        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);
        }
        
        public function AddFont($family, $style='', $fontfile='') {
            if ($this->empty_string($family)) {
                if (!$this->empty_string($this->FontFamily)) {
                    $family = $this->FontFamily;
                } else {
                    $this->Error('Empty font family');
                }
            }
            $family = strtolower($family);
            if ((!$this->isunicode) AND ($family == 'arial')) {
                $family = 'helvetica';
            }
            if (($family == 'symbol') OR ($family == 'zapfdingbats')) {
                $style = '';
            }
            $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;
            }
            // 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' : '');
            $fontdata = array('fontkey' => $fontkey, 'family' => $family, 'style' => $font_style);
            // check if the font has been already added
            if ($this->getFontBuffer($fontkey) !== false) {
                return $fontdata;
            }
            if (isset($type)) {
                unset($type); 
            }
            if (isset($cw)) {
                unset($cw); 
            }
            // get specified font directory (if any)
            $fontdir = '';
            if (!$this->empty_string($fontfile)) {
                $fontdir = dirname($fontfile);
                if ($this->empty_string($fontdir) OR ($fontdir == '.')) {
                    $fontdir = '';
                } else {
                    $fontdir .= '/';
                }
            }
            // search and include font file
            if ($this->empty_string($fontfile) OR (!file_exists($fontfile))) {
                // build a standard filenames for specified font
                $fontfile1 = str_replace(' ', '', $family).strtolower($style).'.php';
                $fontfile2 = str_replace(' ', '', $family).'.php';
                // search files on various directories
                if (file_exists($fontdir.$fontfile1)) {
                    $fontfile = $fontdir.$fontfile1;
                } elseif (file_exists($this->_getfontpath().$fontfile1)) {
                    $fontfile = $this->_getfontpath().$fontfile1;
                } elseif (file_exists($fontfile1)) {
                    $fontfile = $fontfile1;
                } elseif (file_exists($fontdir.$fontfile2)) {
                    $fontfile = $fontdir.$fontfile2;
                } elseif (file_exists($this->_getfontpath().$fontfile2)) {
                    $fontfile = $this->_getfontpath().$fontfile2;
                } else {
                    $fontfile = $fontfile2;
                }
            }
            // 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.'');
            }
            if (!isset($file)) {
                $file = '';
            }
            if (!isset($enc)) {
                $enc = '';
            }
            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;          
            // register CID font (all styles at once)
            if ($type == 'cidfont0') {
                $file = ''; // not embedded
                $styles = array('' => '', 'B' => ',Bold', 'I' => ',Italic', 'BI' => ',BoldItalic');
                $sname = $name.$styles[$bistyle];
                if ((strpos($bistyle, 'B') !== false) AND (isset($desc['StemV'])) AND ($desc['StemV'] == 70)) {
                    $desc['StemV'] = 120;
                }
                $this->setFontBuffer($fontkey, array('i' => $this->numfonts, 'type' => $type, 'name' => $sname, 'desc' => $desc, 'cidinfo' => $cidinfo, 'up' => $up, 'ut' => $ut, 'cw' => $cw, 'dw' => $dw, 'enc' => $enc));
            } elseif ($type == 'core') {
                $this->setFontBuffer($fontkey, array('i' => $this->numfonts, 'type' => 'core', 'name' => $this->CoreFonts[$fontkey], 'up' => -100, 'ut' => 50, 'cw' => $cw, 'dw' => $dw));
            } elseif (($type == 'TrueType') OR ($type == 'Type1')) {
                $this->setFontBuffer($fontkey, array('i' => $this->numfonts, 'type' => $type, 'name' => $name, 'up' => $up, 'ut' => $ut, 'cw' => $cw, 'dw' => $dw, 'file' => $file, 'enc' => $enc, 'desc' => $desc));
            } elseif ($type == 'TrueTypeUnicode') {
                $this->setFontBuffer($fontkey, array('i' => $this->numfonts, 'type' => $type, 'name' => $name, 'desc' => $desc, 'up' => $up, 'ut' => $ut, 'cw' => $cw, 'dw' => $dw, 'enc' => $enc, 'file' => $file, 'ctg' => $ctg));
            } else {
                $this->Error('Unknow font type: '.$type.'');
            }
            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 ((strcasecmp($type,'TrueType') == 0) OR (strcasecmp($type, 'TrueTypeUnicode') == 0)) {
                    $this->FontFiles[$file] = array('length1' => $originalsize, 'fontdir' => $fontdir);
                } elseif ($type != 'core') {
                    $this->FontFiles[$file] = array('length1' => $size1, 'length2' => $size2, 'fontdir' => $fontdir);
                }
            }
            return $fontdata;
        }

        public function SetFont($family, $style='', $size=0, $fontfile='') {
            //Select a font; size given in points
            if ($size == 0) {
                $size = $this->FontSizePt;
            }
            // try to add font (if not already added)
            $fontdata = $this->AddFont($family, $style, $fontfile);
            $this->FontFamily = $fontdata['family'];
            $this->FontStyle = $fontdata['style'];
            $this->CurrentFont = $this->getFontBuffer($fontdata['fontkey']);
            $this->SetFontSize($size);
        }

        public function SetFontSize($size) {
            //Set font size in points
            $this->FontSizePt = $size;
            $this->FontSize = $size / $this->k;
            if (isset($this->CurrentFont['desc']['Ascent']) AND ($this->CurrentFont['desc']['Ascent'] > 0)) {
                $this->FontAscent = $this->CurrentFont['desc']['Ascent'] * $this->FontSize / 1000;
            } else {
                $this->FontAscent = 0.8 * $this->FontSize;
            }
            if (isset($this->CurrentFont['desc']['Descent']) AND ($this->CurrentFont['desc']['Descent'] > 0)) {
                $this->FontDescent = - $this->CurrentFont['desc']['Descent'] * $this->FontSize / 1000;
            } else {
                $this->FontDescent = 0.2 * $this->FontSize;
            }
            if (($this->page > 0) AND (isset($this->CurrentFont['i']))) {
                $this->_out(sprintf('BT /F%d %.2F Tf ET', $this->CurrentFont['i'], $this->FontSizePt));
            }
        }

        public function SetDefaultMonospacedFont($font) {
            $this->default_monospaced_font = $font;
        }
        
        public function AddLink() {
            //Create a new internal link
            $n = count($this->links) + 1;
            $this->links[$n] = array(0, 0);
            return $n;
        }

        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);
        }

        public function Link($x, $y, $w, $h, $link, $spaces=0) {
            $this->Annotation($x, $y, $w, $h, $link, array('Subtype'=>'Link'), $spaces);
        }
        
        public function Annotation($x, $y, $w, $h, $text, $opt=array('Subtype'=>'Text'), $spaces=0) {
            // recalculate coordinates to account for graphic transformations
            if (isset($this->transfmatrix)) {
                $maxid = count($this->transfmatrix) - 1;
                for ($i=$maxid; $i >= 0; $i--) {
                    $ctm = $this->transfmatrix[$i];
                    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);
                    }
                }
            }
            $this->PageAnnots[$this->page][] = array('x' => $x, 'y' => $y, 'w' => $w, 'h' => $h, 'txt' => $text, 'opt' => $opt, 'numspaces' => $spaces);
            if (($opt['Subtype'] == 'FileAttachment') AND (!$this->empty_string($opt['FS'])) AND file_exists($opt['FS']) AND (!isset($this->embeddedfiles[basename($opt['FS'])]))) {
                $this->embeddedfiles[basename($opt['FS'])] = array('file' => $opt['FS'], 'n' => ($this->n + count($this->embeddedfiles) + 10000));
            }
        }

        protected function _putEmbeddedFiles() {
            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';
                }
                $this->offsets[$filedata['n']] = $this->bufferlen;
                $this->_out($filedata['n'].' 0 obj');
                $this->_out('<</Type /EmbeddedFile'.$filter.' /Length '.strlen($data).' >>');
                $this->_putstream($data);
                $this->_out('endobj');
            }
        }
        
        public function Text($x, $y, $txt, $stroke=0, $clip=false) {
            //Output a string
            if ($this->rtl) {
                // bidirectional algorithm (some chars may be changed affecting the line length)
                $s = $this->utf8Bidi($this->UTF8StringToArray($txt), $txt, $this->tmprtl);
                $l = $this->GetArrStringWidth($s);
                $xr = $this->w - $x - $this->GetArrStringWidth($s);
            } else {
                $xr = $x;
            }
            $opt = '';
            if (($stroke > 0) AND (!$clip)) {
                $opt .= '1 Tr '.intval($stroke).' w ';
            } elseif (($stroke > 0) AND $clip) {
                $opt .= '5 Tr '.intval($stroke).' w ';
            } elseif ($clip) {
                $opt .= '7 Tr ';
            }
            $s = sprintf('BT %.2F %.2F Td %s(%s) Tj ET 0 Tr', $xr * $this->k, ($this->h-$y) * $this->k, $opt, $this->_escapetext($txt));
            if ($this->underline AND ($txt!='')) {
                $s .= ' '.$this->_dounderline($xr, $y, $txt);
            }
            if ($this->linethrough AND ($txt!='')) { 
                $s .= ' '.$this->_dolinethrough($xr, $y, $txt); 
            }
            if ($this->ColorFlag AND (!$clip)) {
                $s='q '.$this->TextColor.' '.$s.' Q';
            }
            $this->_out($s);
        }

        public function AcceptPageBreak() {
            return $this->AutoPageBreak;
        }
        
        protected function checkPageBreak($h) {
            if ((($this->y + $h) > $this->PageBreakTrigger) AND (!$this->InFooter) AND ($this->AcceptPageBreak())) {
                //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;
            }
            return false;
        }

        public function Cell($w, $h=0, $txt='', $border=0, $ln=0, $align='', $fill=0, $link='', $stretch=0, $ignore_min_height=false) {
            //$min_cell_height = $this->FontAscent + $this->FontDescent;
            $min_cell_height = $this->FontSize * $this->cell_height_ratio;
            if ($h < $min_cell_height) {
                $h = $min_cell_height;
            }
            $this->checkPageBreak($h);
            $this->_out($this->getCellCode($w, $h, $txt, $border, $ln, $align, $fill, $link, $stretch, $ignore_min_height));
        }

        public function removeSHY($txt='') {
            /*
            * Unicode Data
            * Name : SOFT HYPHEN, commonly abbreviated as SHY
            * HTML Entity (decimal): &#173;
            * HTML Entity (hex): &#xad;
            * HTML Entity (named): &shy;
            * How to type in Microsoft Windows: [Alt +00AD] or [Alt 0173]
            * UTF-8 (hex): 0xC2 0xAD (c2ad)
            * UTF-8 character: chr(194).chr(173)
            */
            $txt = preg_replace('/([\\xc2]{1}[\\xad]{1})/', '', $txt);
            if (!$this->isunicode) {
                $txt = preg_replace('/([\\xad]{1})/', '', $txt);
            }
            return $txt;
        }
        
        protected function getCellCode($w, $h=0, $txt='', $border=0, $ln=0, $align='', $fill=0, $link='', $stretch=0, $ignore_min_height=false) {
            $txt = $this->removeSHY($txt);
            $rs = ''; //string to be returned
            if (!$ignore_min_height) {
                $min_cell_height = $this->FontSize * $this->cell_height_ratio;
                if ($h < $min_cell_height) {
                    $h = $min_cell_height;
                }
            }
            $k = $this->k;
            if ($this->empty_string($w) OR ($w <= 0)) {
                if ($this->rtl) {
                    $w = $this->x - $this->lMargin;
                } else {
                    $w = $this->w - $this->rMargin - $this->x;
                }
            }
            $s = '';            
            if (($fill == 1) OR ($border == 1)) {
                if ($fill == 1) {
                    $op = ($border == 1) ? 'B' : 'f';
                } else {
                    $op = 'S';
                }
                if ($this->rtl) {
                    $xk = (($this->x  - $w) * $k);
                } else {
                    $xk = ($this->x * $k);
                }
                $s .= sprintf('%.2F %.2F %.2F %.2F re %s ', $xk, (($this->h - $this->y) * $k), ($w * $k), (-$h * $k), $op);
            }
            if (is_string($border)) {
                $lm = ($this->LineWidth / 2);
                $x = $this->x;
                $y = $this->y;
                if (strpos($border,'L') !== false) {
                    if ($this->rtl) {
                        $xk = ($x - $w) * $k;
                    } else {
                        $xk = $x * $k;
                    }
                    $s .= sprintf('%.2F %.2F m %.2F %.2F l S ', $xk, (($this->h - $y + $lm) * $k), $xk, (($this->h - ($y + $h + $lm)) * $k));
                }
                if (strpos($border,'T') !== false) {
                    if ($this->rtl) {
                        $xk = ($x - $w + $lm) * $k;
                        $xwk = ($x - $lm) * $k;
                    } else {
                        $xk = ($x - $lm) * $k;
                        $xwk = ($x + $w + $lm) * $k;
                    }
                    $s .= sprintf('%.2F %.2F m %.2F %.2F l S ', $xk, (($this->h - $y) * $k), $xwk, (($this->h - $y) * $k));
                }
                if (strpos($border,'R') !== false) {
                    if ($this->rtl) {
                        $xk = $x * $k;
                    } else {
                        $xk = ($x + $w) * $k;
                    }
                    $s .= sprintf('%.2F %.2F m %.2F %.2F l S ', $xk, (($this->h - $y + $lm) * $k), $xk, (($this->h - ($y + $h + $lm))* $k));
                }
                if (strpos($border,'B') !== false) {
                    if ($this->rtl) {
                        $xk = ($x - $w + $lm) * $k;
                        $xwk = ($x - $lm) * $k;
                    } else {
                        $xk = ($x - $lm) * $k;
                        $xwk = ($x + $w + $lm) * $k;
                    }
                    $s .= sprintf('%.2F %.2F m %.2F %.2F l S ', $xk, (($this->h - ($y + $h)) * $k), $xwk, (($this->h - ($y + $h)) * $k));
                }
            }
            if ($txt != '') {
                // text lenght
                $width = $this->GetStringWidth($txt);
                // ratio between cell lenght and text lenght
                $ratio = ($w - (2 * $this->cMargin)) / $width;
                
                // stretch text if required
                if (($stretch > 0) AND (($ratio < 1) OR (($ratio > 1) AND (($stretch % 2) == 0)))) {
                    if ($stretch > 2) {
                        // spacing
                        //Calculate character spacing in points
                        $char_space = (($w - $width - (2 * $this->cMargin)) * $this->k) / max($this->GetNumChars($txt)-1,1);
                        //Set character spacing
                        $rs .= sprintf('BT %.2F Tc ET ', $char_space);
                    } else {
                        // scaling
                        //Calculate horizontal scaling
                        $horiz_scale = $ratio * 100.0;
                        //Set horizontal scaling
                        $rs .= sprintf('BT %.2F Tz ET ', $horiz_scale);
                    }
                    $align = '';
                    $width = $w - (2 * $this->cMargin);
                } else {
                    $stretch == 0;
                }
                if ($align == 'L') {
                    if ($this->rtl) {
                        $dx = $w - $width - $this->cMargin;
                    } else {
                        $dx = $this->cMargin;
                    }
                } elseif ($align == 'R') {
                    if ($this->rtl) {
                        $dx = $this->cMargin;
                    } else {
                        $dx = $w - $width - $this->cMargin;
                    }
                } elseif ($align == 'C') {
                    $dx = ($w - $width) / 2;
                } elseif ($align == 'J') {
                    if ($this->rtl) {
                        $dx = $w - $width - $this->cMargin;
                    } else {
                        $dx = $this->cMargin;
                    }
                } else {
                    $dx = $this->cMargin;
                }
                if ($this->ColorFlag) {
                    $s .= 'q '.$this->TextColor.' ';
                }
                $txt2 = $this->_escapetext($txt);
                if ($this->rtl) {
                    $xdk = ($this->x - $dx - $width) * $k;
                } else {
                    $xdk = ($this->x + $dx) * $k;
                }
                // Justification
                if ($align == 'J') {
                    // count number of spaces
                    $ns = substr_count($txt, ' ');
                    if (($this->CurrentFont['type'] == 'TrueTypeUnicode') OR ($this->CurrentFont['type'] == 'cidfont0')) {
                        // get string width without spaces
                        $width = $this->GetStringWidth(str_replace(' ', '', $txt));
                        // calculate average space width
                        $spacewidth = ($w - $width - (2 * $this->cMargin)) / ($ns?$ns:1) / $this->FontSize / $this->k;
                        // set word position to be used with TJ operator
                        $txt2 = str_replace(chr(0).' ', ') '.(-2830 * $spacewidth).' (', $txt2);
                    } else {
                        // get string width
                        $width = $this->GetStringWidth($txt);
                        $spacewidth = (($w - $width - (2 * $this->cMargin)) / ($ns?$ns:1)) * $this->k;
                        $rs .= sprintf('BT %.3F Tw ET ', $spacewidth);
                    }
                }
                // calculate approximate position of the font base line
                //$basefonty = $this->y + (($h + $this->FontAscent - $this->FontDescent)/2);
                $basefonty = $this->y + ($h/2) + ($this->FontSize/3);
                // print text
                $s .= sprintf('BT %.2F %.2F Td [(%s)] TJ ET', $xdk, (($this->h - $basefonty) * $k), $txt2);
                if ($this->rtl) {
                    $xdx = $this->x - $dx - $width;
                } else {
                    $xdx = $this->x + $dx;
                }
                if ($this->underline)  {
                    $s .= ' '.$this->_dounderline($xdx, $basefonty, $txt);
                }
                if ($this->linethrough) { 
                    $s .= ' '.$this->_dolinethrough($xdx, $basefonty, $txt);
                }
                if ($this->ColorFlag) {
                    $s .= ' Q';
                }
                if ($link) {
                    $this->Link($xdx, $this->y + (($h - $this->FontSize)/2), $width, $this->FontSize, $link, substr_count($txt, chr(32)));
                }
            }
            // output cell
            if ($s) {
                // output cell
                $rs .= $s;
                // reset text stretching
                if ($stretch > 2) {
                    //Reset character horizontal spacing
                    $rs .= ' BT 0 Tc ET';
                } elseif ($stretch > 0) {
                    //Reset character horizontal scaling
                    $rs .= ' BT 100 Tz ET';
                }
            }
            // reset word spacing
            if (!(($this->CurrentFont['type'] == 'TrueTypeUnicode') OR ($this->CurrentFont['type'] == 'cidfont0')) AND ($align == 'J')) {
                $rs .= ' BT 0 Tw ET';
            }
            $this->lasth = $h;
            if ($ln > 0) {
                //Go to the beginning of the next line
                $this->y += $h;
                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 -= $w;
                } else {
                    $this->x += $w;
                }
            }
            $gstyles = ''.$this->linestyleWidth.' '.$this->linestyleCap.' '.$this->linestyleJoin.' '.$this->linestyleDash.' '.$this->DrawColor.' '.$this->FillColor."\n";
            $rs = $gstyles.$rs;
            return $rs;
        }

        public function MultiCell($w, $h, $txt, $border=0, $align='J', $fill=0, $ln=1, $x='', $y='', $reseth=true, $stretch=0, $ishtml=false, $autopadding=true, $maxh=0) { 
            if ($this->empty_string($this->lasth) OR $reseth) {
                //set row height
                $this->lasth = $this->FontSize * $this->cell_height_ratio;
            }
            if (!$this->empty_string($y)) {
                $this->SetY($y);
            } else {
                $y = $this->GetY();
            }
            // check for page break
            $this->checkPageBreak($h);
            $y = $this->GetY();
            // get current page number
            $startpage = $this->page;
            if (!$this->empty_string($x)) {
                $this->SetX($x);
            } else {
                $x = $this->GetX();
            }
            if ($this->empty_string($w) OR ($w <= 0)) {
                if ($this->rtl) {
                    $w = $this->x - $this->lMargin;
                } else {
                    $w = $this->w - $this->rMargin - $this->x;
                }
            }
            // store original margin values
            $lMargin = $this->lMargin;
            $rMargin = $this->rMargin;
            if ($this->rtl) {
                $this->SetRightMargin($this->w - $this->x);
                $this->SetLeftMargin($this->x - $w);
            } else {
                $this->SetLeftMargin($this->x);
                $this->SetRightMargin($this->w - $this->x - $w);
            }
            $starty = $this->y;
            if ($autopadding) {
                // Adjust internal padding
                if ($this->cMargin < ($this->LineWidth / 2)) {
                    $this->cMargin = ($this->LineWidth / 2);
                }
                // Add top space if needed
                if (($this->lasth - $this->FontSize) < $this->LineWidth) {
                    $this->y += $this->LineWidth / 2;
                }
                // add top padding
                $this->y += $this->cMargin;
            }
            if ($ishtml) {
                // ******* Write HTML text
                $this->writeHTML($txt, true, 0, $reseth, true, $align);
                $nl = 1;
            } else {
                // ******* Write text
                $nl = $this->Write($this->lasth, $txt, '', 0, $align, true, $stretch, false, false, $maxh);
            }
            if ($autopadding) {
                // add bottom padding
                $this->y += $this->cMargin;
                // Add bottom space if needed
                if (($this->lasth - $this->FontSize) < $this->LineWidth) {
                    $this->y += $this->LineWidth / 2;
                }
            }
            // Get end-of-text Y position
            $currentY = $this->y;
            // get latest page number
            $endpage = $this->page;
            // check if a new page has been created
            if ($endpage > $startpage) {
                // design borders around HTML cells.
                for ($page=$startpage; $page <= $endpage; ++$page) {
                    $this->setPage($page);
                    if ($page == $startpage) {
                        $this->y = $starty; // put cursor at the beginning of cell on the first page
                        $h = $this->getPageHeight() - $starty - $this->getBreakMargin();
                        $cborder = $this->getBorderMode($border, $position='start');
                    } elseif ($page == $endpage) {
                        $this->y = $this->tMargin; // put cursor at the beginning of last page
                        $h = $currentY - $this->tMargin;
                        $cborder = $this->getBorderMode($border, $position='end');
                    } else {
                        $this->y = $this->tMargin; // put cursor at the beginning of the current page
                        $h = $this->getPageHeight() - $this->tMargin - $this->getBreakMargin();
                        $cborder = $this->getBorderMode($border, $position='middle');
                    }
                    $nx = $x;
                    // account for margin changes
                    if ($page > $startpage) {
                        if (($this->rtl) AND ($this->pagedim[$page]['orm'] != $this->pagedim[$startpage]['orm'])) {
                            $nx = $x + ($this->pagedim[$page]['orm'] - $this->pagedim[$startpage]['orm']);
                        } elseif ((!$this->rtl) AND ($this->pagedim[$page]['olm'] != $this->pagedim[$startpage]['olm'])) {
                            $nx = $x + ($this->pagedim[$page]['olm'] - $this->pagedim[$startpage]['olm']);
                        }
                    }
                    $this->SetX($nx);
                    $ccode = $this->getCellCode($w, $h, '', $cborder, 1, '', $fill, '', 0, false);
                    if ($cborder OR $fill) {
                        $pagebuff = $this->getPageBuffer($this->page);
                        $pstart = substr($pagebuff, 0, $this->intmrk[$this->page]);
                        $pend = substr($pagebuff, $this->intmrk[$this->page]);
                        $this->setPageBuffer($this->page, $pstart.$ccode."\n".$pend);
                        $this->intmrk[$this->page] += strlen($ccode."\n");
                    }
                }
            } else {
                $h = max($h, ($currentY - $y));
                // put cursor at the beginning of text
                $this->SetY($y); 
                $this->SetX($x);
                // design a cell around the text
                $ccode = $this->getCellCode($w, $h, '', $border, 1, '', $fill, '', 0, true);
                if ($border OR $fill) {
                    if (end($this->transfmrk[$this->page]) !== false) {
                        $pagemarkkey = key($this->transfmrk[$this->page]);
                        $pagemark = &$this->transfmrk[$this->page][$pagemarkkey];
                    } elseif ($this->InFooter) {
                        $pagemark = &$this->footerpos[$this->page];
                    } else {
                        $pagemark = &$this->intmrk[$this->page];
                    }
                    $pagebuff = $this->getPageBuffer($this->page);
                    $pstart = substr($pagebuff, 0, $pagemark);
                    $pend = substr($pagebuff, $pagemark);
                    $this->setPageBuffer($this->page, $pstart.$ccode."\n".$pend);
                    $pagemark += strlen($ccode."\n");
                }
            }
            // Get end-of-cell Y position
            $currentY = $this->GetY();
            // restore original margin values
            $this->SetLeftMargin($lMargin);
            $this->SetRightMargin($rMargin);
            if ($ln > 0) {
                //Go to the beginning of the next line
                $this->SetY($currentY);
                if ($ln == 2) {
                    $this->SetX($x + $w);
                }
            } else {
                // go left or right by case
                $this->setPage($startpage);
                $this->y = $y;
                $this->SetX($x + $w);
            }
            return $nl;
        }

        protected function getBorderMode($border, $position='start') {
            if ((!$this->opencell) AND ($border == 1)) {
                return 1;
            }
            $cborder = '';
            switch ($position) {
                case 'start': {
                    if ($border == 1) {
                        $cborder = 'LTR';
                    } else {
                        if (!(false === strpos($border, 'L'))) {
                            $cborder .= 'L';
                        }
                        if (!(false === strpos($border, 'T'))) {
                            $cborder .= 'T';
                        }
                        if (!(false === strpos($border, 'R'))) {
                            $cborder .= 'R';
                        }
                        if ((!$this->opencell) AND (!(false === strpos($border, 'B')))) {
                            $cborder .= 'B';
                        }
                    }
                    break;
                }
                case 'middle': {
                    if ($border == 1) {
                        $cborder = 'LR';
                    } else {
                        if (!(false === strpos($border, 'L'))) {
                            $cborder .= 'L';
                        }
                        if ((!$this->opencell) AND (!(false === strpos($border, 'T')))) {
                            $cborder .= 'T';
                        }
                        if (!(false === strpos($border, 'R'))) {
                            $cborder .= 'R';
                        }
                        if ((!$this->opencell) AND (!(false === strpos($border, 'B')))) {
                            $cborder .= 'B';
                        }
                    }
                    break;
                }
                case 'end': {
                    if ($border == 1) {
                        $cborder = 'LRB';
                    } else {
                        if (!(false === strpos($border, 'L'))) {
                            $cborder .= 'L';
                        }
                        if ((!$this->opencell) AND (!(false === strpos($border, 'T')))) {
                            $cborder .= 'T';
                        }
                        if (!(false === strpos($border, 'R'))) {
                            $cborder .= 'R';
                        }
                        if (!(false === strpos($border, 'B'))) {
                            $cborder .= 'B';
                        }
                    }
                    break;
                }
                default: {
                    $cborder = $border;
                    break;
                }
            }
            return $cborder;
        }

        public function getNumLines($txt, $w=0) {
            $lines = 0;
            if ($this->empty_string($w) OR ($w <= 0)) {
                if ($this->rtl) {
                    $w = $this->x - $this->lMargin;
                } else {
                    $w = $this->w - $this->rMargin - $this->x;
                }
            }
            // max column width
            $wmax = $w - (2 * $this->cMargin);
            // remove carriage returns
            $txt = str_replace("\r", '', $txt);
            // remove last newline (if any)
            if (substr($txt,-1) == "\n") {
                $txt = substr($txt, 0, -1);
            }
            // divide text in blocks
            $txtblocks = explode("\n", $txt);
            // for each block;
            foreach ($txtblocks as $block) {
                // estimate the number of lines
                $lines += $this->empty_string($block) ? 1 : (ceil($this->GetStringWidth($block) / $wmax));
            }
            return $lines;
        }
            
        public function Write($h, $txt, $link='', $fill=0, $align='', $ln=false, $stretch=0, $firstline=false, $firstblock=false, $maxh=0) {
            if (strlen($txt) == 0) {
                $txt = ' ';
            }
            // remove carriage returns
            $s = str_replace("\r", '', $txt);
            // check if string contains arabic text
            if (preg_match(K_RE_PATTERN_ARABIC, $s)) {
                $arabic = true;
            } else {
                $arabic = false;
            }
            // check if string contains RTL text
            if ($arabic OR $this->tmprtl OR preg_match(K_RE_PATTERN_RTL, $txt)) {
                $rtlmode = true;
            } else {
                $rtlmode = false;
            }
            // get a char width
            $chrwidth = $this->GetCharWidth('.');
            // get array of unicode values
            $chars = $this->UTF8StringToArray($s);
            // 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);
            // store current position
            $prevx = $this->x;
            $prevy = $this->y;
            // max Y
            $maxy = $this->y + $maxh - $h - (2 * $this->cMargin);
            // 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 - (2 * $this->cMargin);
            $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 lenght
            $nl = 0; //number of lines
            $linebreak = false;
            // for each character
            while ($i < $nb) {
                if (($maxh > 0) AND ($this->y >= $maxy) ) {
                    $firstline = true;
                }
                //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);
                        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;
                        $tmpcmargin = $this->cMargin;
                        if ($maxh == 0) {
                            $this->cMargin = 0;
                        }
                    }
                    $this->Cell($w, $h, $tmpstr, 0, 1, $talign, $fill, $link, $stretch);
                    unset($tmpstr);
                    if ($firstline) {
                        $this->cMargin = $tmpcmargin;
                        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->InFooter)) {
                        // AcceptPageBreak() may be overriden on extended classed to include margin changes
                        $this->AcceptPageBreak();
                    }
                    $w = $this->getRemainingWidth();
                    $wmax = $w - (2 * $this->cMargin);
                } 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)))) {
                        // update last blank space position
                        $sep = $i;
                        // check if is a SHY
                        if ($c == 173) {
                            $shy = true;
                        } else {
                            $shy = false;
                        }
                    }
                    // update string length
                    if ((($this->CurrentFont['type'] == 'TrueTypeUnicode') OR ($this->CurrentFont['type'] == 'cidfont0')) 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+1), '', $this->tmprtl));
                    } else {
                        $l += $this->GetCharWidth($c);
                    }
                    if (($l > $wmax) OR ($shy AND (($l + $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 - $chrwidth)))
                                OR ((!$this->rtl) AND ($this->x >= ($this->lMargin + $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);
                                    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;
                                    $tmpcmargin = $this->cMargin;
                                    if ($maxh == 0) {
                                        $this->cMargin = 0;
                                    }
                                }
                                $this->Cell($w, $h, $tmpstr, 0, 1, $align, $fill, $link, $stretch);
                                unset($tmpstr);
                                if ($firstline) {
                                    $this->cMargin = $tmpcmargin;
                                    return ($this->UniArrSubString($uchars, $i));
                                }
                                $j = $i;
                                --$i;
                            }   
                        } else {
                            // word wrapping
                            if ($this->rtl AND (!$firstblock)) {
                                $endspace = 1;
                            } else {
                                $endspace = 0;
                            }
                            if ($shy) {
                                // add hypen (minus symbol) at the end of the line
                                $shy_width = $shy_replacement_width;
                                if ($this->rtl) {
                                    $shy_char_left = $shy_replacement_char;
                                    $shy_char_right = '';
                                } else {
                                    $shy_char_left = '';
                                    $shy_char_right = $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));
                                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;
                                $tmpcmargin = $this->cMargin;
                                if ($maxh == 0) {
                                    $this->cMargin = 0;
                                }
                            }
                            // print the line
                            $this->Cell($w, $h, $shy_char_left.$tmpstr.$shy_char_right, 0, 1, $align, $fill, $link, $stretch);
                            unset($tmpstr);
                            if ($firstline) {
                                // return the remaining text
                                $this->cMargin = $tmpcmargin;
                                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->InFooter)) {
                            // AcceptPageBreak() may be overriden on extended classed to include margin changes
                            $this->AcceptPageBreak();
                        }
                        $w = $this->getRemainingWidth();
                        $wmax = $w - (2 * $this->cMargin);
                        if ($linebreak) {
                            $linebreak = false;
                        } else {
                            ++$nl;
                            $l = 0;
                        }
                    }
                }
                ++$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);
                    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;
                    $tmpcmargin = $this->cMargin;
                    if ($maxh == 0) {
                        $this->cMargin = 0;
                    }
                }
                $this->Cell($w, $h, $tmpstr, 0, $ln, $align, $fill, $link, $stretch);
                unset($tmpstr);
                if ($firstline) {
                    $this->cMargin = $tmpcmargin;
                    return ($this->UniArrSubString($uchars, $nb));
                }
                ++$nl;
            }
            if ($firstline) {
                return '';
            }
            return $nl;
        }
                
        protected function getRemainingWidth() {
            if ($this->rtl) {
                return ($this->x - $this->lMargin);
            } else {
                return ($this->w - $this->rMargin - $this->x);
            }
        }

        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;
        }

        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;
        }

        public function UTF8ArrayToUniArray($ta) {
            return array_map(array($this, 'unichr'), $ta);
        }
        
        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 '';
            }
        }
        
        public function Image($file, $x='', $y='', $w=0, $h=0, $type='', $link='', $align='', $resize=false, $dpi=300, $palign='', $ismask=false, $imgmask=false, $border=0) {
            if ($x === '') {
                $x = $this->x;
            }
            if ($y === '') {
                $y = $this->y;
            }
            // get image dimensions
            $imsize = @getimagesize($file);
            if ($imsize === FALSE) {
                // encode spaces on filename
                $file = str_replace(' ', '%20', $file);
                $imsize = @getimagesize($file);
                if ($imsize === FALSE) {
                    $this->Error('[Image] No such file or directory in '.$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;
            }
            // 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)
            if (($neww * $newh) >= ($pixw * $pixh)) {
                $resize = false;
            }
            // check if image has been already added on document
            if (!in_array($file, $this->imagekeys)) {
                //First use of image, get info
                if ($type == '') {
                    $fileinfo = pathinfo($file);
                    if (isset($fileinfo['extension']) AND (!$this->empty_string($fileinfo['extension']))) {
                        $type = $fileinfo['extension'];
                    } else {
                        $this->Error('Image file has no extension and no type was specified: '.$file);
                    }
                }
                $type = strtolower($type);
                if ($type == 'jpg') {
                    $type = 'jpeg';
                }
                $mqr = get_magic_quotes_runtime();
                set_magic_quotes_runtime(0);
                // 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)))) {
                    // TCPDF image functions
                    $info = $this->$mtd($file);
                    if ($info == 'pngalpha') {
                        return $this->ImagePngAlpha($file, $x, $y, $w, $h, 'PNG', $link, $align, $resize, $dpi, $palign);
                    }
                } 
                if (!$info) {
                    if (function_exists($gdfunction)) {
                        // GD library
                        $img = $gdfunction($file);
                        if ($resize) {
                            $imgr = imagecreatetruecolor($neww, $newh);
                            imagecopyresampled($imgr, $img, 0, 0, 0, 0, $neww, $newh, $pixw, $pixh); 
                            $info = $this->_toJPEG($imgr);
                        } else {
                            $info = $this->_toJPEG($img);
                        }
                    } elseif (extension_loaded('imagick')) {
                        // ImageMagick library
                        $img = new Imagick();
                        $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;
                }
                set_magic_quotes_runtime($mqr);
                if ($ismask) {
                    // force grayscale
                    $info['cs'] = 'DeviceGray';
                }
                $info['i'] = $this->numimages + 1;
                if ($imgmask !== false) {
                    $info['masked'] = $imgmask;
                }
                // add image to document
                $this->setImageBuffer($file, $info);
            } else {
                $info = $this->getImageBuffer($file);
            }
            // Check whether we need a new page first as this does not fit
            if ((($y + $h) > $this->PageBreakTrigger) AND (!$this->InFooter) AND $this->AcceptPageBreak()) {
                // Automatic page break
                $this->AddPage($this->CurOrientation);
                // Reset Y coordinate to the top of next page
                $y = $this->GetY() + $this->cMargin;
            }
            // set bottomcoordinates
            $this->img_rb_y = $y + $h;
            // set alignment
            if ($this->rtl) {
                if ($palign == 'L') {
                    $ximg = $this->lMargin;
                    // set right side coordinate
                    $this->img_rb_x = $ximg + $w;
                } elseif ($palign == 'C') {
                    $ximg = ($this->w - $x - $w) / 2;
                    // set right side coordinate
                    $this->img_rb_x = $ximg + $w;
                } else {
                    $ximg = $this->w - $x - $w;
                    // set left side coordinate
                    $this->img_rb_x = $ximg;
                }
            } else {
                if ($palign == 'R') {
                    $ximg = $this->w - $this->rMargin - $w;
                    // set left side coordinate
                    $this->img_rb_x = $ximg;
                } elseif ($palign == 'C') {
                    $ximg = ($this->w - $x - $w) / 2;
                    // set right side coordinate
                    $this->img_rb_x = $ximg + $w;
                } else {
                    $ximg = $x;
                    // set right side coordinate
                    $this->img_rb_x = $ximg + $w;
                }
            }
            if ($ismask) {
                // embed hidden, ouside the canvas
                $xkimg = ($this->pagedim[$this->page]['w'] + 10);
            } else {
                $xkimg = $ximg * $this->k;
            }
            $this->_out(sprintf('q %.2F 0 0 %.2F %.2F %.2F cm /I%d Do Q', ($w * $this->k), ($h * $this->k), $xkimg, (($this->h - ($y + $h)) * $this->k), $info['i']));
            if (!empty($border)) {
                $bx = $x;
                $by = $y;
                $this->x = $ximg;
                $this->y = $y;
                $this->Cell($w, $h, '', $border, 0, '', 0, '', 0);
                $this->x = $bx;
                $this->y = $by;
            }
            if ($link) {
                $this->Link($ximg, $y, $w, $h, $link, 0);
            }
            // set pointer to align the successive 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;
            return $info['i'];
        }
                
        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;
        }
        
        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);
            }
            if ((!isset($a['channels'])) OR ($a['channels'] == 3)) {
                $colspace = 'DeviceRGB';
            } elseif ($a['channels'] == 4) {
                $colspace = 'DeviceCMYK';
            } else {
                $colspace = 'DeviceGray';
            }
            $bpc = isset($a['bits']) ? $a['bits'] : 8;
            $data = file_get_contents($file);
            return array('w' => $a[0], 'h' => $a[1], 'cs' => $colspace, 'bpc' => $bpc, 'f' => 'DCTDecode', 'data' => $data);
        }

        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);
            $parms = '/DecodeParms <</Predictor 15 /Colors '.($ct==2 ? 3 : 1).' /BitsPerComponent '.$bpc.' /Columns '.$w.'>>';
            //Scan chunks looking for palette, transparency and image data
            $pal = '';
            $trns = '';
            $data = '';
            do {
                $n = $this->_freadint($f);
                $type = fread($f, 4);
                if ($type == 'PLTE') {
                    //Read palette
                    $pal = $this->rfread($f, $n);
                    fread($f, 4);
                } elseif ($type == 'tRNS') {
                    //Read transparency info
                    $t = $this->rfread($f, $n);
                    if ($ct == 0) {
                        $trns = array(ord(substr($t, 1, 1)));
                    } elseif ($ct == 2) {
                        $trns = array(ord(substr($t, 1, 1)), ord(substr($t, 3, 1)), ord(substr($t, 5, 1)));
                    } else {
                        $pos = strpos($t, chr(0));
                        if ($pos !== false) {
                            $trns = array($pos);
                        }
                    }
                    fread($f, 4);
                } elseif ($type == 'IDAT') {
                    //Read image data block
                    $data .= $this->rfread($f, $n);
                    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, 'cs' => $colspace, 'bpc' => $bpc, 'f' => 'FlateDecode', 'parms' => $parms, 'pal' => $pal, 'trns' => $trns, 'data' => $data);
        }

        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;
        }

        protected function ImagePngAlpha($file, $x='', $y='', $w=0, $h=0, $type='', $link='', $align='', $resize=false, $dpi=300, $palign='') {
            // get image size
            list($wpx, $hpx) = getimagesize($file);
            // generate images
            $img = imagecreatefrompng($file);
            $imgalpha = imagecreate($wpx, $hpx);
            // generate gray scale pallete
            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) {
                    $colorindex = imagecolorat($img, $xpx, $ypx);
                    $col = imagecolorsforindex($img, $colorindex);
                    imagesetpixel($imgalpha, $xpx, $ypx, $this->getGDgamma((127 - $col['alpha']) * 255 / 127));
                }
            }
            // create temp alpha file
            $tempfile_alpha = tempnam(K_PATH_CACHE, 'mska_');
            imagepng($imgalpha, $tempfile_alpha);
            imagedestroy($imgalpha);
            // extract image without alpha channel
            $imgplain = imagecreatetruecolor($wpx, $hpx);
            imagecopy($imgplain, $img, 0, 0, 0, 0, $wpx, $hpx);
            // create temp image file
            $tempfile_plain = tempnam(K_PATH_CACHE, 'mskp_');
            imagepng($imgplain, $tempfile_plain);
            imagedestroy($imgplain);
            // 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);
        }

        protected function getGDgamma($v) {
            return (pow(($v / 255), 2.2) * 255);
        } 
        
        public function Ln($h='', $cell=false) {
            //Line feed; default value is last cell height
            if ($cell) {
                $cellmargin = $this->cMargin;
            } else {
                $cellmargin = 0;
            }
            if ($this->rtl) {
                $this->x = $this->w - $this->rMargin - $cellmargin;
            } else {
                $this->x = $this->lMargin + $cellmargin;
            }
            if (is_string($h)) {
                $this->y += $this->lasth;
            } else {
                $this->y += $h;
            }
            $this->newline = true;
        }

        public function GetX() {
            //Get x position
            if ($this->rtl) {
                return ($this->w - $this->x);
            } else {
                return $this->x;
            }
        }
        
        public function GetAbsX() {
            return $this->x;
        }
        
        public function GetY() {
            //Get y position
            return $this->y;
        }
        
        public function SetX($x) {
            //Set x position
            if ($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;
            }
        }
        
        public function SetY($y, $resetx=true) {
            if ($resetx) {
                //reset x
                if ($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;
            }
        }
        
        public function SetXY($x, $y) {
            //Set x and y positions
            $this->SetY($y);
            $this->SetX($x);
        }

        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 != '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
                $tmppos = strpos($pdfdoc, '/ByteRange[0 ********** ********** **********]') + 58;
                $pdfdoc = substr($pdfdoc, 0, $tmppos).substr($pdfdoc, $tmppos + $this->signature_max_lenght);
                // define the ByteRange
                $byte_range = array();
                $byte_range[0] = 0;
                $byte_range[1] = $tmppos - 1;
                $byte_range[2] = $byte_range[1] + $this->signature_max_lenght;
                $byte_range[3] = strlen($pdfdoc) - $byte_range[1];
                // replace the ByteRange
                $byterange = sprintf('/ByteRange[0 %010u %010u %010u]', $byte_range[1], $byte_range[2], $byte_range[3]);
                $pdfdoc = str_replace('/ByteRange[0 ********** ********** **********]', $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_lenght = strlen($pdfdoc);
                fwrite($f, $pdfdoc, $pdfdoc_lenght);
                fclose($f);
                // get digital signature.
                // IS THE FOLLOWING PROCEDURE CORRECT? THE SIGNED DOCUMENTS ARE NOT VALID!
                $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, false, null, $pdfdoc_lenght);
                unlink($tempsign);
                // extract signature
                $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_lenght, '0');
                // Add signature to the document
                $pdfdoc = substr($pdfdoc, 0, $byte_range[1]).$signature.substr($pdfdoc, (0 - $byte_range[3]));
                $this->diskcache = false;
                $this->buffer = &$pdfdoc;
                $this->bufferlen = strlen($pdfdoc);
            }
            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') {
                        //We send 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: 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-Length: '.$this->bufferlen);
                        header('Content-Disposition: inline; filename="'.basename($name).'";');
                    }
                    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: 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
                    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);
                    // use the Content-Disposition header to supply a recommended filename
                    header('Content-Disposition: attachment; filename="'.basename($name).'";');
                    header('Content-Transfer-Encoding: binary');
                    header('Content-Length: '.$this->bufferlen);
                    echo $this->getBuffer();
                    break;
                }
                case 'F': {
                    // 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);
                    }
                    break;
                }
                case 'S': {
                    // Returns PDF as a string
                    return $this->getBuffer();
                }
                default: {
                    $this->Error('Incorrect output destination: '.$dest);
                }
            }
            return '';
        }

        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);
            }
            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 != 'sign')
                    AND ($val != 'signature_data')
                    AND ($val != 'signature_max_lenght')
                    )) {
                    if (!$preserve_objcopy OR ($val != 'objcopy')) {
                        unset($this->$val);
                    }
                }
            }
        }
        
        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');
            }
        }

        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 : '';
        }
        
        protected function _putpages() {
            $nb = $this->numpages;
            if (!empty($this->AliasNbPages)) {
                $nbs = $this->formatPageNumber($nb);
                $nbu = $this->UTF8ToUTF16BE($nbs, false); // replacement for unicode font
                $alias_a = $this->_escape($this->AliasNbPages);
                $alias_au = $this->_escape('{'.$this->AliasNbPages.'}');
                if ($this->isunicode) {
                    $alias_b = $this->_escape($this->UTF8ToLatin1($this->AliasNbPages));
                    $alias_bu = $this->_escape($this->UTF8ToLatin1('{'.$this->AliasNbPages.'}'));
                    $alias_c = $this->_escape($this->utf8StrRev($this->AliasNbPages, false, $this->tmprtl));
                    $alias_cu = $this->_escape($this->utf8StrRev('{'.$this->AliasNbPages.'}', false, $this->tmprtl));
                }
            }
            if (!empty($this->AliasNumPage)) {
                $alias_pa = $this->_escape($this->AliasNumPage);
                $alias_pau = $this->_escape('{'.$this->AliasNumPage.'}');
                if ($this->isunicode) {
                    $alias_pb = $this->_escape($this->UTF8ToLatin1($this->AliasNumPage));
                    $alias_pbu = $this->_escape($this->UTF8ToLatin1('{'.$this->AliasNumPage.'}'));
                    $alias_pc = $this->_escape($this->utf8StrRev($this->AliasNumPage, false, $this->tmprtl));
                    $alias_pcu = $this->_escape($this->utf8StrRev('{'.$this->AliasNumPage.'}', false, $this->tmprtl));
                }
            }
            $pagegroupnum = 0;
            $filter = ($this->compress) ? '/Filter /FlateDecode ' : '';
            for($n=1; $n <= $nb; ++$n) {
                $temppage = $this->getPageBuffer($n);
                if (!empty($this->pagegroups)) {
                    if(isset($this->newpagegroup[$n])) {
                        $pagegroupnum = 0;
                    }
                    ++$pagegroupnum;
                    foreach ($this->pagegroups as $k => $v) {
                        // replace total pages group numbers
                        $vs = $this->formatPageNumber($v);
                        $vu = $this->UTF8ToUTF16BE($vs, false);
                        $alias_ga = $this->_escape($k);
                        $alias_gau = $this->_escape('{'.$k.'}');
                        if ($this->isunicode) {
                            $alias_gb = $this->_escape($this->UTF8ToLatin1($k));
                            $alias_gbu = $this->_escape($this->UTF8ToLatin1('{'.$k.'}'));
                            $alias_gc = $this->_escape($this->utf8StrRev($k, false, $this->tmprtl));
                            $alias_gcu = $this->_escape($this->utf8StrRev('{'.$k.'}', false, $this->tmprtl));
                        }
                        $temppage = str_replace($alias_gau, $vu, $temppage);
                        if ($this->isunicode) {
                            $temppage = str_replace($alias_gbu, $vu, $temppage);
                            $temppage = str_replace($alias_gcu, $vu, $temppage);
                            $temppage = str_replace($alias_gb, $vs, $temppage);
                            $temppage = str_replace($alias_gc, $vs, $temppage);
                        }
                        $temppage = str_replace($alias_ga, $vs, $temppage);
                        // replace page group numbers
                        $pvs = $this->formatPageNumber($pagegroupnum);
                        $pvu = $this->UTF8ToUTF16BE($pvs, false);
                        $pk = str_replace('{nb', '{pnb', $k);
                        $alias_pga = $this->_escape($pk);
                        $alias_pgau = $this->_escape('{'.$pk.'}');
                        if ($this->isunicode) {
                            $alias_pgb = $this->_escape($this->UTF8ToLatin1($pk));
                            $alias_pgbu = $this->_escape($this->UTF8ToLatin1('{'.$pk.'}'));
                            $alias_pgc = $this->_escape($this->utf8StrRev($pk, false, $this->tmprtl));
                            $alias_pgcu = $this->_escape($this->utf8StrRev('{'.$pk.'}', false, $this->tmprtl));
                        }
                        $temppage = str_replace($alias_pgau, $pvu, $temppage);
                        if ($this->isunicode) {
                            $temppage = str_replace($alias_pgbu, $pvu, $temppage);
                            $temppage = str_replace($alias_pgcu, $pvu, $temppage);
                            $temppage = str_replace($alias_pgb, $pvs, $temppage);
                            $temppage = str_replace($alias_pgc, $pvs, $temppage);
                        }
                        $temppage = str_replace($alias_pga, $pvs, $temppage);
                    }
                }
                if (!empty($this->AliasNbPages)) {
                    // replace total pages number
                    $temppage = str_replace($alias_au, $nbu, $temppage);
                    if ($this->isunicode) {
                        $temppage = str_replace($alias_bu, $nbu, $temppage);
                        $temppage = str_replace($alias_cu, $nbu, $temppage);
                        $temppage = str_replace($alias_b, $nbs, $temppage);
                        $temppage = str_replace($alias_c, $nbs, $temppage);
                    }
                    $temppage = str_replace($alias_a, $nbs, $temppage);
                }
                if (!empty($this->AliasNumPage)) {
                    // replace page number
                    $pnbs = $this->formatPageNumber($n);
                    $pnbu = $this->UTF8ToUTF16BE($pnbs, false); // replacement for unicode font
                    $temppage = str_replace($alias_pau, $pnbu, $temppage);
                    if ($this->isunicode) {
                        $temppage = str_replace($alias_pbu, $pnbu, $temppage);
                        $temppage = str_replace($alias_pcu, $pnbu, $temppage);
                        $temppage = str_replace($alias_pb, $pnbs, $temppage);
                        $temppage = str_replace($alias_pc, $pnbs, $temppage);
                    }
                    $temppage = str_replace($alias_pa, $pnbs, $temppage);
                }
                $temppage = str_replace($this->epsmarker, '', $temppage);
                //$this->setPageBuffer($n, $temppage);
                //Page
                $this->_newobj();
                $this->_out('<</Type /Page');
                $this->_out('/Parent 1 0 R');
                $this->_out(sprintf('/MediaBox [0 0 %.2F %.2F]', $this->pagedim[$n]['w'], $this->pagedim[$n]['h']));
                $this->_out('/Resources 2 0 R');
                $this->_putannots($n);
                $this->_out('/Contents '.($this->n + 1).' 0 R>>');
                $this->_out('endobj');
                //Page content
                $p = ($this->compress) ? gzcompress($temppage) : $temppage;
                $this->_newobj();
                $this->_out('<<'.$filter.'/Length '.strlen($p).'>>');
                $this->_putstream($p);
                $this->_out('endobj');
                if ($this->diskcache) {
                    // remove temporary files
                    unlink($this->pages[$n]);
                }
            }
            //Pages root
            $this->offsets[1] = $this->bufferlen;
            $this->_out('1 0 obj');
            $this->_out('<</Type /Pages');
            $kids='/Kids [';
            for($i=0; $i < $nb; ++$i) {
                $kids .= (3 + (2 * $i)).' 0 R ';
            }
            $this->_out($kids.']');
            $this->_out('/Count '.$nb);
            //$this->_out(sprintf('/MediaBox [0 0 %.2F %.2F]',$this->pagedim[0]['w'],$this->pagedim[0]['h']));
            $this->_out('>>');
            $this->_out('endobj');
        }

        protected function _putannots($n) {
            if (isset($this->PageAnnots[$n])) {
                $annots = '/Annots [';
                foreach ($this->PageAnnots[$n] as $key => $pl) {
                    $pl['opt'] = array_change_key_case($pl['opt'], CASE_LOWER);
                    $a = $pl['x'] * $this->k;
                    $b = $this->pagedim[$n]['h'] - ($pl['y']  * $this->k);
                    $c = $pl['w'] * $this->k;
                    $d = $pl['h'] * $this->k;
                    $rect = sprintf('%.2F %.2F %.2F %.2F', $a, $b, $a+$c, $b-$d);
                    $annots .= "\n";
                    $annots .= '<</Type /Annot';
                    $annots .= ' /Subtype /'.$pl['opt']['subtype'];
                    $annots .= ' /Rect ['.$rect.']';
                    $annots .= ' /Contents '.$this->_textstring($pl['txt']);
                    //$annots .= ' /P ';
                    $annots .= ' /NM '.$this->_textstring(sprintf('%04u-%04u', $n, $key));
                    $annots .= ' /M '.$this->_datastring('D:'.date('YmdHis'));
                    if (isset($pl['opt']['f'])) {
                        $val = 0;
                        if (is_array($pl['opt']['f'])) {
                            foreach ($pl['opt']['f'] as $f) {
                                switch (strtolower($f)) {
                                    case 'invisible': {
                                        $val += 1 << 0;
                                        break;
                                    }
                                    case 'hidden': {
                                        $val += 1 << 1;
                                        break;
                                    }
                                    case 'print': {
                                        $val += 1 << 2;
                                        break;
                                    }
                                    case 'nozoom': {
                                        $val += 1 << 3;
                                        break;
                                    }
                                    case 'norotate': {
                                        $val += 1 << 4;
                                        break;
                                    }
                                    case 'noview': {
                                        $val += 1 << 5;
                                        break;
                                    }
                                    case 'readonly': {
                                        $val += 1 << 6;
                                        break;
                                    }
                                    case 'locked': {
                                        $val += 1 << 8;
                                        break;
                                    }
                                    case 'togglenoview': {
                                        $val += 1 << 9;
                                        break;
                                    }
                                    case 'lockedcontents': {
                                        $val += 1 << 10;
                                        break;
                                    }
                                    default: {
                                        break;
                                    }
                                }
                            }
                        }
                        $annots .= ' /F '.intval($val);
                    }
                    //$annots .= ' /AP ';
                    //$annots .= ' /AS ';
                    $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']['bs']) AND (is_array($pl['opt']['bs']))) {
                        $annots .= ' /BS <<Type /Border';
                        if (isset($pl['opt']['bs']['w'])) {
                            $annots .= ' /W '.sprintf("%.4F", floatval($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) {
                                $cord = floatval($cord);
                                $annots .= sprintf(" %.4F", $cord);
                            }
                            $annots .= ']';
                        }
                        $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'], $markups)) {
                            $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(" %.4F", $pl['opt']['be']['i']);
                        }
                        $annots .= '>>';
                    }
                    $annots .= ' /C [';
                    if (isset($pl['opt']['c']) AND (is_array($pl['opt']['c']))) {
                        foreach ($pl['opt']['c'] as $col) {
                            $col = intval($col);
                            $color = $col <= 0 ? 0 : ($col >= 255 ? 1 : $col / 255);
                            $annots .= sprintf(" %.4F", $color);
                        }
                    }
                    $annots .= ']';
                    //$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']);
                        }
                        //$annots .= ' /Popup ';
                        if (isset($pl['opt']['ca'])) {
                            $annots .= ' /CA '.sprintf("%.4F", floatval($pl['opt']['ca']));
                        }
                        if (isset($pl['opt']['rc'])) {
                            $annots .= ' /RC '.$this->_textstring($pl['opt']['rc']);
                        }
                        $annots .= ' /CreationDate '.$this->_datastring('D:'.date('YmdHis'));
                        //$annots .= ' /IRT ';
                        if (isset($pl['opt']['subj'])) {
                            $annots .= ' /Subj '.$this->_textstring($pl['opt']['subj']);
                        }
                        //$annots .= ' /RT ';
                        //$annots .= ' /IT ';
                        //$annots .= ' /ExData ';
                    }
                    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'])) {
                                // external URI link
                                $annots .= ' /A <</S /URI /URI '.$this->_datastring($pl['txt']).'>>';
                            } else {
                                // internal link
                                $l = $this->links[$pl['txt']];
                                $annots .= sprintf(' /Dest [%d 0 R /XYZ 0 %.2F null]', (1 + (2 * $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': {
                            $annots .= ' /DA '.$this->_textstring($pl['txt']);
                            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']);
                            }
                            if (isset($pl['opt']['ds'])) {
                                $annots .= ' /DS '.$this->_textstring($pl['opt']['ds']);
                            }
                            if (isset($pl['opt']['cl']) AND is_array($pl['opt']['cl'])) {
                                $annots .= ' /CL [';
                                foreach ($pl['opt']['cl'] as $cl) {
                                    $annots .= sprintf("%.4F ", $cl * $this->k);
                                }
                                $annots .= ']';
                            }
                            $tfit = array('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('%.2F %.2F %.2F %.2F', $l, $r, $t, $b).']';
                            }
                            //$annots .= ' /LE ';
                            break;
                        }
                        // ... to be completed ...
                        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 (!isset($pl['opt']['fs'])) {
                                break;
                            }
                            $filename = basename($pl['opt']['fs']);
                            if (isset($this->embeddedfiles[$filename]['n'])) {
                                $annots .= ' /FS <</Type /Filespec /F '.$this->_datastring($filename).' /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']['sound'])) {
                                break;
                            }
                            $filename = basename($pl['opt']['sound']);
                            if (isset($this->embeddedfiles[$filename]['n'])) {
                                // ... TO BE COMPLETED ...
                                $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': {
                            if (isset($pl['opt']['h'])) {
                                $annots .= ' /H '.intval($pl['opt']['h']);
                            }
                            if (isset($pl['opt']['mk']) AND (is_array($pl['opt']['mk']))) {
                                $annots .= ' /MK <<';
                                // ... TO BE COMPLETED ...
                                $annots .= '>>';
                            }
                            break;
                        }
                        case 'screen': {
                            break;
                        }
                        case 'printermark': {
                            break;
                        }
                        case 'trapnet': {
                            break;
                        }
                        case 'watermark': {
                            break;
                        }
                        case '3d': {
                            break;
                        }
                        default: {
                            break;
                        }
                    }
                    
                $annots .= '>>';
                }
                $annots .= "\n]";
                $this->_out($annots);
            }
        }

        protected function _putfonts() {
            $nf = $this->n;
            foreach ($this->diffs as $diff) {
                //Encodings
                $this->_newobj();
                $this->_out('<</Type /Encoding /BaseEncoding /WinAnsiEncoding /Differences ['.$diff.']>>');
                $this->_out('endobj');
            }
            $mqr = get_magic_quotes_runtime();
            set_magic_quotes_runtime(0);
            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 (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));
                        }
                    }
                    $this->_newobj();
                    $this->FontFiles[$file]['n'] = $this->n;
                    $this->_out('<</Length '.strlen($font));
                    if ($compressed) {
                        $this->_out('/Filter /FlateDecode');
                    }
                    $this->_out('/Length1 '.$info['length1']);
                    if (isset($info['length2'])) {
                        $this->_out('/Length2 '.$info['length2'].' /Length3 0');
                    }
                    $this->_out('>>');
                    $this->_putstream($font);
                    $this->_out('endobj');
                }
            }
            set_magic_quotes_runtime($mqr);
            foreach ($this->fontkeys as $k) {
                //Font objects
                $this->setFontSubBuffer($k, 'n', $this->n + 1);
                $font = $this->getFontBuffer($k);
                $type = $font['type'];
                $name = $font['name'];
                if ($type == 'core') {
                    //Standard font
                    $this->_newobj();
                    $this->_out('<</Type /Font');
                    $this->_out('/BaseFont /'.$name);
                    $this->_out('/Subtype /Type1');
                    if (($name != 'symbol') AND ($name != 'zapfdingbats')) {
                        $this->_out('/Encoding /WinAnsiEncoding');
                    }
                    $this->_out('>>');
                    $this->_out('endobj');
                } elseif (($type == 'Type1') OR ($type == 'TrueType')) {
                    //Additional Type1 or TrueType font
                    $this->_newobj();
                    $this->_out('<</Type /Font');
                    $this->_out('/BaseFont /'.$name);
                    $this->_out('/Subtype /'.$type);
                    $this->_out('/FirstChar 32 /LastChar 255');
                    $this->_out('/Widths '.($this->n + 1).' 0 R');
                    $this->_out('/FontDescriptor '.($this->n + 2).' 0 R');
                    if ($font['enc']) {
                        if (isset($font['diff'])) {
                            $this->_out('/Encoding '.($nf + $font['diff']).' 0 R');
                        } else {
                            $this->_out('/Encoding /WinAnsiEncoding');
                        }
                    }
                    $this->_out('>>');
                    $this->_out('endobj');
                    // Widths
                    $this->_newobj();
                    $cw = &$font['cw'];
                    $s = '[';
                    for($i = 32; $i < 256; ++$i) {
                        $s .= $cw[$i].' ';
                    }
                    $this->_out($s.']');
                    $this->_out('endobj');
                    //Descriptor
                    $this->_newobj();
                    $s = '<</Type /FontDescriptor /FontName /'.$name;
                    foreach ($font['desc'] as $k => $v) {
                        $s .= ' /'.$k.' '.$v.'';
                    }
                    if (!$this->empty_string($font['file'])) {
                        $s .= ' /FontFile'.($type == 'Type1' ? '' : '2').' '.$this->FontFiles[$font['file']]['n'].' 0 R';
                    }
                    $this->_out($s.'>>');
                    $this->_out('endobj');
                } else {
                    //Allow for additional types
                    $mtd = '_put'.strtolower($type);
                    if (!method_exists($this, $mtd)) {
                        $this->Error('Unsupported font type: '.$type);
                    }
                    $this->$mtd($font);
                }
            }
        }
        
        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 ($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;
                    }
                    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).' ]';
                }
            }
            $this->_out('/W ['.$w.' ]');
        }
        
        protected function _puttruetypeunicode($font) {
            // Type0 Font
            // A composite font composed of other fonts, organized hierarchically
            $this->_newobj();
            $this->_out('<</Type /Font');
            $this->_out('/Subtype /Type0');
            $this->_out('/BaseFont /'.$font['name'].'');
            $this->_out('/Encoding /Identity-H'); //The horizontal identity mapping for 2-byte CIDs; may be used with CIDFonts using any Registry, Ordering, and Supplement values.
            $this->_out('/ToUnicode /Identity-H');
            $this->_out('/DescendantFonts ['.($this->n + 1).' 0 R]');
            $this->_out('>>');
            $this->_out('endobj');
            // CIDFontType2
            // A CIDFont whose glyph descriptions are based on TrueType font technology
            $this->_newobj();
            $this->_out('<</Type /Font');
            $this->_out('/Subtype /CIDFontType2');
            $this->_out('/BaseFont /'.$font['name'].'');
            // A dictionary containing entries that define the character collection of the CIDFont.
            $cidinfo = '/Registry '.$this->_datastring('Adobe');
            $cidinfo .= ' /Ordering '.$this->_datastring('Identity');
            $cidinfo .= ' /Supplement 0';
            $this->_out('/CIDSystemInfo <<'.$cidinfo.'>>');
            $this->_out('/FontDescriptor '.($this->n + 1).' 0 R');
            $this->_out('/DW '.$font['dw'].''); // default width
            $this->_putfontwidths($font, 0);
            $this->_out('/CIDToGIDMap '.($this->n + 2).' 0 R');
            $this->_out('>>');
            $this->_out('endobj');          
            // Font descriptor
            // A font descriptor describing the CIDFont default metrics other than its glyph widths
            $this->_newobj();
            $this->_out('<</Type /FontDescriptor');
            $this->_out('/FontName /'.$font['name']);
            foreach ($font['desc'] as $key => $value) {
                $this->_out('/'.$key.' '.$value);
            }
            $fontdir = '';
            if (!$this->empty_string($font['file'])) {
                // A stream containing a TrueType font
                $this->_out('/FontFile2 '.$this->FontFiles[$font['file']]['n'].' 0 R');
                $fontdir = $this->FontFiles[$font['file']]['fontdir'];
            }
            $this->_out('>>');
            $this->_out('endobj');
            $this->_newobj();
            if (isset($font['ctg']) AND (!$this->empty_string($font['ctg']))) {
                // 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 (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);
                }
                $size = filesize($fontfile);
                $this->_out('<</Length '.$size.'');
                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
                    $this->_out('/Filter /FlateDecode');
                }
                $this->_out('>>');
                $this->_putstream(file_get_contents($fontfile));
            }
            $this->_out('endobj');
        }
        
        protected function _putcidfont0($font) {
            $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;
            }
            $this->_newobj();
            $this->_out('<</Type /Font');
            $this->_out('/BaseFont /'.$longname);
            $this->_out('/Subtype /Type0');
            if ($enc) {
                $this->_out('/Encoding /'.$enc);
            }
            $this->_out('/DescendantFonts ['.($this->n + 1).' 0 R]');
            $this->_out('>>');
            $this->_out('endobj');
            $this->_newobj();
            $this->_out('<</Type /Font');
            $this->_out('/BaseFont /'.$name);
            $this->_out('/Subtype /CIDFontType0');
            $cidinfo = '/Registry '.$this->_datastring($font['cidinfo']['Registry']);
            $cidinfo .= ' /Ordering '.$this->_datastring($font['cidinfo']['Ordering']);
            $cidinfo .= ' /Supplement '.$font['cidinfo']['Supplement'];
            $this->_out('/CIDSystemInfo <<'.$cidinfo.'>>');
            $this->_out('/FontDescriptor '.($this->n + 1).' 0 R');
            $this->_out('/DW '.$font['dw']);
            $this->_putfontwidths($font, $cidoffset);
            $this->_out('>>');
            $this->_out('endobj');
            $this->_newobj();
            $s = '<</Type /FontDescriptor /FontName /'.$name;
            foreach ($font['desc'] as $k => $v) {
                if ($k != 'Style') {
                    $s .= ' /'.$k.' '.$v.'';
                }
            }
            $this->_out($s.'>>');
            $this->_out('endobj');
        }

        protected function _putimages() {
            $filter = ($this->compress) ? '/Filter /FlateDecode ' : '';
            foreach ($this->imagekeys as $file) {
                $info = $this->getImageBuffer($file);
                $this->_newobj();
                $this->setImageSubBuffer($file, 'n', $this->n);
                $this->_out('<</Type /XObject');
                $this->_out('/Subtype /Image');
                $this->_out('/Width '.$info['w']);
                $this->_out('/Height '.$info['h']);
                if (isset($info['masked'])) {
                    $this->_out('/SMask '.($this->n - 1).' 0 R');
                }
                if ($info['cs'] == 'Indexed') {
                    $this->_out('/ColorSpace [/Indexed /DeviceRGB '.((strlen($info['pal']) / 3) - 1).' '.($this->n + 1).' 0 R]');
                } else {
                    $this->_out('/ColorSpace /'.$info['cs']);
                    if ($info['cs'] == 'DeviceCMYK') {
                        $this->_out('/Decode [1 0 1 0 1 0 1 0]');
                    }
                }
                $this->_out('/BitsPerComponent '.$info['bpc']);
                if (isset($info['f'])) {
                    $this->_out('/Filter /'.$info['f']);
                }
                if (isset($info['parms'])) {
                    $this->_out($info['parms']);
                }
                if (isset($info['trns']) 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].' ';
                    }
                    $this->_out('/Mask ['.$trns.']');
                }
                $this->_out('/Length '.strlen($info['data']).'>>');
                $this->_putstream($info['data']);
                $this->_out('endobj');
                //Palette
                if ($info['cs'] == 'Indexed') {
                    $this->_newobj();
                    $pal = ($this->compress) ? gzcompress($info['pal']) : $info['pal'];
                    $this->_out('<<'.$filter.'/Length '.strlen($pal).'>>');
                    $this->_putstream($pal);
                    $this->_out('endobj');
                }
            }
        }

        protected function _putspotcolors() {
            foreach ($this->spot_colors as $name => $color) {
                $this->_newobj();
                $this->spot_colors[$name]['n'] = $this->n;
                $this->_out('[/Separation /'.str_replace(' ', '#20', $name));
                $this->_out('/DeviceCMYK <<');
                $this->_out('/Range [0 1 0 1 0 1 0 1] /C0 [0 0 0 0] ');
                $this->_out(sprintf('/C1 [%.4F %.4F %.4F %.4F] ', $color['c']/100, $color['m']/100, $color['y']/100, $color['k']/100));
                $this->_out('/FunctionType 2 /Domain [0 1] /N 1>>]');
                $this->_out('endobj');
            }
        }

        protected function _putxobjectdict() {
            foreach ($this->imagekeys as $file) {
                $info = $this->getImageBuffer($file);
                $this->_out('/I'.$info['i'].' '.$info['n'].' 0 R');
            }
        }

        protected function _putresourcedict() {
            $this->_out('/ProcSet [/PDF /Text /ImageB /ImageC /ImageI]');
            $this->_out('/Font <<');
            foreach ($this->fontkeys as $fontkey) {
                $font = $this->getFontBuffer($fontkey);
                $this->_out('/F'.$font['i'].' '.$font['n'].' 0 R');
            }
            $this->_out('>>');
            $this->_out('/XObject <<');
            $this->_putxobjectdict();
            $this->_out('>>');
            // visibility
            $this->_out('/Properties <</OC1 '.$this->n_ocg_print.' 0 R /OC2 '.$this->n_ocg_view.' 0 R>>');
            // transparency
            $this->_out('/ExtGState <<');
            foreach ($this->extgstates as $k => $extgstate) {
                $this->_out('/GS'.$k.' '.$extgstate['n'].' 0 R');
            }
            $this->_out('>>');
            // gradients
            if (isset($this->gradients) AND (count($this->gradients) > 0)) {
                $this->_out('/Shading <<');
                foreach ($this->gradients as $id => $grad) {
                    $this->_out('/Sh'.$id.' '.$grad['id'].' 0 R');
                }
                $this->_out('>>');
            }
            // spot colors
            if (isset($this->spot_colors) AND (count($this->spot_colors) > 0)) {
                $this->_out('/ColorSpace <<');
                foreach ($this->spot_colors as $color) {
                    $this->_out('/CS'.$color['i'].' '.$color['n'].' 0 R');
                }
                $this->_out('>>');
            }
        }
        
        protected function _putresources() {
            $this->_putextgstates();
            $this->_putocg();
            $this->_putfonts();
            $this->_putimages();
            $this->_putspotcolors();
            $this->_putshaders();
            //Resource dictionary
            $this->offsets[2] = $this->bufferlen;
            $this->_out('2 0 obj');
            $this->_out('<<');
            $this->_putresourcedict();
            $this->_out('>>');
            $this->_out('endobj');
            $this->_putjavascript();
            $this->_putbookmarks();
            $this->_putEmbeddedFiles();
            // encryption
            if ($this->encrypted) {
                $this->_newobj();
                $this->enc_obj_id = $this->n;
                $this->_out('<<');
                $this->_putencryption();
                $this->_out('>>');
                $this->_out('endobj');
            }
        }
        
        protected function _putinfo() {
            if (!$this->empty_string($this->title)) {
                $this->_out('/Title '.$this->_textstring($this->title));
            }
            if (!$this->empty_string($this->author)) {
                $this->_out('/Author '.$this->_textstring($this->author));
            }
            if (!$this->empty_string($this->subject)) {
                $this->_out('/Subject '.$this->_textstring($this->subject));
            }
            if (!$this->empty_string($this->keywords)) {
                $this->_out('/Keywords '.$this->_textstring($this->keywords));
            }
            if (!$this->empty_string($this->creator)) {
                $this->_out('/Creator '.$this->_textstring($this->creator));
            }
            if (defined('PDF_PRODUCER')) {
                $this->_out('/Producer '.$this->_textstring(PDF_PRODUCER));
            }
            $this->_out('/CreationDate '.$this->_datastring('D:'.date('YmdHis')));
            $this->_out('/ModDate '.$this->_datastring('D:'.date('YmdHis')));   
        }
        
        protected function _putcatalog() {
            $this->_out('/Type /Catalog');
            $this->_out('/Pages 1 0 R');
            if ($this->ZoomMode == 'fullpage') {
                $this->_out('/OpenAction [3 0 R /Fit]');
            } elseif ($this->ZoomMode == 'fullwidth') {
                $this->_out('/OpenAction [3 0 R /FitH null]');
            } elseif ($this->ZoomMode == 'real') {
                $this->_out('/OpenAction [3 0 R /XYZ null null 1]');
            } elseif (!is_string($this->ZoomMode)) {
                $this->_out('/OpenAction [3 0 R /XYZ null null '.($this->ZoomMode / 100).']');
            }
            if (isset($this->LayoutMode) AND (!$this->empty_string($this->LayoutMode))) {
                $this->_out('/PageLayout /'.$this->LayoutMode.'');
            }
            if (isset($this->PageMode) AND (!$this->empty_string($this->PageMode))) {
                $this->_out('/PageMode /'.$this->PageMode);
            }
            if (isset($this->l['a_meta_language'])) {
                $this->_out('/Lang /'.$this->l['a_meta_language']);
            }
            $this->_out('/Names <<');
            if (!$this->empty_string($this->javascript)) {
                $this->_out('/JavaScript '.($this->n_js).' 0 R');
            }
            $this->_out('>>');
            if (count($this->outlines) > 0) {
                $this->_out('/Outlines '.$this->OutlineRoot.' 0 R');
                $this->_out('/PageMode /UseOutlines');
            }
            $this->_putviewerpreferences();
            $p = $this->n_ocg_print.' 0 R';
            $v = $this->n_ocg_view.' 0 R';
            $as = '<</Event /Print /OCGs ['.$p.' '.$v.'] /Category [/Print]>> <</Event /View /OCGs ['.$p.' '.$v.'] /Category [/View]>>';
            $this->_out('/OCProperties <</OCGs ['.$p.' '.$v.'] /D <</ON ['.$p.'] /OFF ['.$v.'] /AS ['.$as.']>>>>');
        }
        
        protected function _putviewerpreferences() {
            $this->_out('/ViewerPreferences<<');
            if ($this->rtl) {
                $this->_out('/Direction /R2L');
            } else {
                $this->_out('/Direction /L2R');
            }
            if (isset($this->viewer_preferences['HideToolbar']) AND ($this->viewer_preferences['HideToolbar'])) {
                $this->_out('/HideToolbar true');
            }
            if (isset($this->viewer_preferences['HideMenubar']) AND ($this->viewer_preferences['HideMenubar'])) {
                $this->_out('/HideMenubar true');
            }
            if (isset($this->viewer_preferences['HideWindowUI']) AND ($this->viewer_preferences['HideWindowUI'])) {
                $this->_out('/HideWindowUI true');
            }
            if (isset($this->viewer_preferences['FitWindow']) AND ($this->viewer_preferences['FitWindow'])) {
                $this->_out('/FitWindow true');
            }
            if (isset($this->viewer_preferences['CenterWindow']) AND ($this->viewer_preferences['CenterWindow'])) {
                $this->_out('/CenterWindow true');
            }
            if (isset($this->viewer_preferences['DisplayDocTitle']) AND ($this->viewer_preferences['DisplayDocTitle'])) {
                $this->_out('/DisplayDocTitle true');
            }
            if (isset($this->viewer_preferences['NonFullScreenPageMode'])) {
                $this->_out('/NonFullScreenPageMode /'.$this->viewer_preferences['NonFullScreenPageMode'].'');
            }
            if (isset($this->viewer_preferences['ViewArea'])) {
                $this->_out('/ViewArea /'.$this->viewer_preferences['ViewArea']);
            }
            if (isset($this->viewer_preferences['ViewClip'])) {
                $this->_out('/ViewClip /'.$this->viewer_preferences['ViewClip']);
            }
            if (isset($this->viewer_preferences['PrintArea'])) {
                $this->_out('/PrintArea /'.$this->viewer_preferences['PrintArea']);
            }
            if (isset($this->viewer_preferences['PrintClip'])) {
                $this->_out('/PrintClip /'.$this->viewer_preferences['PrintClip']);
            }
            if (isset($this->viewer_preferences['PrintScaling'])) {
                $this->_out('/PrintScaling /'.$this->viewer_preferences['PrintScaling']);
            }
            if (isset($this->viewer_preferences['Duplex']) AND (!$this->empty_string($this->viewer_preferences['Duplex']))) {
                $this->_out('/Duplex /'.$this->viewer_preferences['Duplex']);
            }
            if (isset($this->viewer_preferences['PickTrayByPDFSize'])) {
                if ($this->viewer_preferences['PickTrayByPDFSize']) {
                    $this->_out('/PickTrayByPDFSize true');
                } else {
                    $this->_out('/PickTrayByPDFSize false');
                }
            }
            if (isset($this->viewer_preferences['PrintPageRange'])) {
                $PrintPageRangeNum = '';
                foreach ($this->viewer_preferences['PrintPageRange'] as $k => $v) {
                    $PrintPageRangeNum .= ' '.($v - 1).'';
                }
                $this->_out('/PrintPageRange ['.substr($PrintPageRangeNum,1).']');
            }
            if (isset($this->viewer_preferences['NumCopies'])) {
                $this->_out('/NumCopies '.intval($this->viewer_preferences['NumCopies']));
            }
            $this->_out('>>');
        }

        protected function _puttrailer() {
            $this->_out('/Size '.($this->n + 1));
            $this->_out('/Root '.$this->n.' 0 R');
            $this->_out('/Info '.($this->n - 1).' 0 R');
            if ($this->encrypted) {
                $this->_out('/Encrypt '.$this->enc_obj_id.' 0 R');
                $this->_out('/ID [()()]');
            }
        }

        protected function _putheader() {
            $this->_out('%PDF-'.$this->PDFVersion);
        }

        protected function _enddoc() {
            $this->state = 1;
            $this->_putheader();
            $this->_putpages();
            $this->_putresources();
            //Info
            $this->_newobj();
            $this->_out('<<');
            $this->_putinfo();
            $this->_out('>>');
            $this->_out('endobj');
            //Catalog
            $this->_newobj();
            $this->_out('<<');
            $this->_putcatalog();
            $this->_putcertification();
            $this->_putuserrights();
            $this->_out('>>');
            $this->_out('endobj');
            //Cross-ref
            $o = $this->bufferlen;
            $this->_out('xref');
            $this->_out('0 '.($this->n + 1));
            $this->_out('0000000000 65535 f ');
            for($i=1; $i <= $this->n; ++$i) {
                $this->_out(sprintf('%010d 00000 n ',$this->offsets[$i]));
            }
            foreach ($this->embeddedfiles as $filename => $filedata) {
                $this->_out(sprintf('%010d 00000 n ',$this->offsets[$filedata['n']]));
            }
            //Trailer
            $this->_out('trailer');
            $this->_out('<<');
            $this->_puttrailer();
            $this->_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]);
                }
            }
        }

        protected function _beginpage($orientation='', $format='') {
            ++$this->page;
            $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;
                } else {
                    $orientation = 'P';
                }
            }
            if ($this->empty_string($format)) {
                $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
                $n = sizeof($this->pagegroups) + 1;
                $alias = '{nb'.$n.'}';
                $this->pagegroups[$alias] = 1;
                $this->currpagegroup = $alias;
            } elseif ($this->currpagegroup) {
                ++$this->pagegroups[$this->currpagegroup];
            }
        }

        protected function _endpage() {
            $this->setVisibility('all');
            $this->state = 1;
        }

        protected function _newobj() {
            ++$this->n;
            $this->offsets[$this->n] = $this->bufferlen;
            $this->_out($this->n.' 0 obj');
        }

        protected function _dounderline($x, $y, $txt) {
            $up = $this->CurrentFont['up'];
            $ut = $this->CurrentFont['ut'];
            $w = $this->GetStringWidth($txt);
            return sprintf('%.2F %.2F %.2F %.2F re f', $x * $this->k, ($this->h - ($y - $up / 1000 * $this->FontSize)) * $this->k, $w * $this->k, -$ut / 1000 * $this->FontSizePt);
        }
        
        protected function _dolinethrough($x, $y, $txt) {
            $up = $this->CurrentFont['up'];
            $ut = $this->CurrentFont['ut'];
            $w = $this->GetStringWidth($txt);
            return sprintf('%.2F %.2F %.2F %.2F re f', $x * $this->k, ($this->h - ($y - ($this->FontSize/2) - $up / 1000 * $this->FontSize)) * $this->k, $w * $this->k, -$ut / 1000 * $this->FontSizePt);
        }
        
        protected function _freadint($f) {
            $a = unpack('Ni', fread($f, 4));
            return $a['i'];
        }
        
        protected function _escape($s) {
            // the chr(13) substitution fixes the Bugs item #1421290.
            return strtr($s, array(')' => '\\)', '(' => '\\(', '\\' => '\\\\', chr(13) => '\r'));
        }
        
        protected function _datastring($s) {
            if ($this->encrypted) {
                $s = $this->_RC4($this->_objectkey($this->n), $s);
            }
            return '('. $this->_escape($s).')';
        }
        
        protected function _textstring($s) {
            if ($this->isunicode) {
                //Convert string to UTF-16BE
                $s = $this->UTF8ToUTF16BE($s, true);
            }
            return $this->_datastring($s);
        }
                
        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);
        }
        
        protected function _putstream($s) {
            if ($this->encrypted) {
                $s = $this->_RC4($this->_objectkey($this->n), $s);
            }
            $this->_out('stream');
            $this->_out($s);
            $this->_out('endstream');
        }
        
        protected function _out($s) {
            if ($this->state == 2) {
                if ((!$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 {
                    $this->setPageBuffer($this->page, $s."\n", true);
                }
            } else {
                $this->setBuffer($s."\n");
            }
        }
        
        protected function UTF8StringToArray($str) {
            if (isset($this->cache_UTF8StringToArray['_'.$str])) {
                // return cached value
                return($this->cache_UTF8StringToArray['_'.$str]);
            }
            // check cache size
            if ($this->cache_size_UTF8StringToArray >= $this->cache_maxsize_UTF8StringToArray) {
                // remove first element
                array_shift($this->cache_UTF8StringToArray);
            }
            ++$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['_'.$str] = $strarr;
                return $strarr;
            }
            $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) {
                        $unicode[] = $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
                        $unicode[] = 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. */
                            $unicode[] = 0xFFFD; // use replacement character
                        } else {
                            $unicode[] = $char; // add char to array
                        }
                        // reset data for next char
                        $bytes = array(); 
                        $numbytes = 1;
                    }
                } else {
                    // use replacement character for other invalid sequences
                    $unicode[] = 0xFFFD;
                    $bytes = array();
                    $numbytes = 1;
                }
            }
            // insert new value on cache
            $this->cache_UTF8StringToArray['_'.$str] = $unicode;
            return $unicode;
        }
        
        protected function UTF8ToUTF16BE($str, $setbom=true) {
            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);
        }
        
        protected function UTF8ToLatin1($str) {
            global $utf8tolatin;
            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, $utf8tolatin)) {
                    // map from UTF-8
                    $outstr .= chr($utf8tolatin[$char]);
                } elseif ($char == 0xFFFD) {
                    // skip
                } else {
                    $outstr .= '?';
                }
            }
            return $outstr;
        }

        protected function arrUTF8ToUTF16BE($unicode, $setbom=true) {
            $outstr = ''; // string to be returned
            if ($setbom) {
                $outstr .= "\xFE\xFF"; // Byte Order Mark (BOM)
            }
            foreach ($unicode as $char) {
                if ($char == 0xFFFD) {
                    $outstr .= "\xFF\xFD"; // replacement character
                } elseif ($char < 0x10000) {
                    $outstr .= chr($char >> 0x08);
                    $outstr .= chr($char & 0xFF);
                } else {
                    $char -= 0x10000;
                    $w1 = 0xD800 | ($char >> 0x10);
                    $w2 = 0xDC00 | ($char & 0x3FF); 
                    $outstr .= chr($w1 >> 0x08);
                    $outstr .= chr($w1 & 0xFF);
                    $outstr .= chr($w2 >> 0x08);
                    $outstr .= chr($w2 & 0xFF);
                }
            }
            return $outstr;
        }
        // ====================================================
        
        public function setHeaderFont($font) {
            $this->header_font = $font;
        }
        
        public function getHeaderFont() {
            return $this->header_font;
        }
        
        public function setFooterFont($font) {
            $this->footer_font = $font;
        }
        
        public function getFooterFont() {
            return $this->footer_font;
        }
        
        public function setLanguageArray($language) {
            $this->l = $language;
            $this->rtl = $this->l['a_meta_dir']=='rtl' ? true : false;
        }
        
        public function getPDFData() {
            if ($this->state < 3) {
                $this->Close();
            }
            return $this->buffer;
        }
                
        public function addHtmlLink($url, $name, $fill=0, $firstline=false, $color='', $style=-1) {
            if (!$this->empty_string($url) AND ($url{0} == '#')) {
                // convert url to internal link
                $page = intval(substr($url, 1));
                $url = $this->AddLink();
                $this->SetLink($url, 0, $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);
            // restore settings
            $this->SetFont('', $prevstyle);
            $this->SetTextColorArray($prevcolor);
            return $ret;
        }
        
        public function convertHTMLColorToDec($color='#FFFFFF') {
            global $webcolor;
            $color = preg_replace('/[\s]*/', '', $color); // remove extra spaces
            $color = strtolower($color);
            if (strlen($color) == 0) {
                return false;
            }
            if (substr($color, 0, 3) == 'rgb') {
                $codes = substr($color, 4);
                $codes = str_replace(')', '', $codes);
                $returncolor = explode(',', $codes, 3);
                return $returncolor;
            }
            if (substr($color, 0, 1) != '#') {
                // decode color name
                if (isset($webcolor[$color])) {
                    $color_code = $webcolor[$color];
                } else {
                    return false;
                }
            } else {
                $color_code = substr($color, 1);
            }
            switch (strlen($color_code)) {
                case 3: {
                    // three-digit hexadecimal representation
                    $r = substr($color_code, 0, 1);
                    $g = substr($color_code, 1, 1);
                    $b = substr($color_code, 2, 1);
                    $returncolor['R'] = hexdec($r.$r);
                    $returncolor['G'] = hexdec($g.$g);
                    $returncolor['B'] = hexdec($b.$b);
                    break;
                }
                case 6: {
                    // six-digit hexadecimal representation
                    $returncolor['R'] = hexdec(substr($color_code, 0, 2));
                    $returncolor['G'] = hexdec(substr($color_code, 2, 2));
                    $returncolor['B'] = hexdec(substr($color_code, 4, 2));
                    break;
                }
            }
            return $returncolor;
        }
        
        public function pixelsToUnits($px) {
            return ($px / ($this->imgscale * $this->k));
        }
            
        public function unhtmlentities($text_to_convert) {
            return html_entity_decode($text_to_convert, ENT_QUOTES, $this->encoding);
        }
        
        // ENCRYPTION METHODS ----------------------------------
        // SINCE 2.0.000 (2008-01-02)
        
        protected function _objectkey($n) {
            return substr($this->_md5_16($this->encryption_key.pack('VXxx', $n)), 0, 10);
        }
        
        protected function _putencryption() {
            $this->_out('/Filter /Standard');
            $this->_out('/V 1');
            $this->_out('/R 2');
            $this->_out('/O ('.$this->_escape($this->Ovalue).')');
            $this->_out('/U ('.$this->_escape($this->Uvalue).')');
            $this->_out('/P '.$this->Pvalue);
        }
        
        protected function _RC4($key, $text) {
            if ($this->last_rc4_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_rc4_key = $key;
                $this->last_rc4_key_c = $rc4;
            } else {
                $rc4 = $this->last_rc4_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;
        }
        
        protected function _md5_16($str) {
            return pack('H*', md5($str));
        }
        
        protected function _Ovalue($user_pass, $owner_pass) {
            $tmp = $this->_md5_16($owner_pass);
            $owner_RC4_key = substr($tmp, 0, 5);
            return $this->_RC4($owner_RC4_key, $user_pass);
        }
        
        protected function _Uvalue() {
            return $this->_RC4($this->encryption_key, $this->padding);
        }
        
        protected function _generateencryptionkey($user_pass, $owner_pass, $protection) {
            // Pad passwords
            $user_pass = substr($user_pass.$this->padding, 0, 32);
            $owner_pass = substr($owner_pass.$this->padding, 0, 32);
            // Compute O value
            $this->Ovalue = $this->_Ovalue($user_pass, $owner_pass);
            // Compute encyption key
            $tmp = $this->_md5_16($user_pass.$this->Ovalue.chr($protection)."\xFF\xFF\xFF");
            $this->encryption_key = substr($tmp, 0, 5);
            // Compute U value
            $this->Uvalue = $this->_Uvalue();
            // Compute P value
            $this->Pvalue = -(($protection^255) + 1);
        }
        
        public function SetProtection($permissions=array(), $user_pass='', $owner_pass=null) {
            $options = array('print' => 4, 'modify' => 8, 'copy' => 16, 'annot-forms' => 32);
            $protection = 192;
            foreach ($permissions as $permission) {
                if (!isset($options[$permission])) {
                    $this->Error('Incorrect permission: '.$permission);
                }
                $protection += $options[$permission];
            }
            if ($owner_pass === null) {
                $owner_pass = uniqid(rand());
            }
            $this->encrypted = true;
            $this->_generateencryptionkey($user_pass, $owner_pass, $protection);
        }
        
        // END OF ENCRYPTION FUNCTIONS -------------------------
        
        // START TRANSFORMATIONS SECTION -----------------------
        
        public function StartTransform() {
            $this->_out('q');
            $this->transfmrk[$this->page][] = $this->pagelen[$this->page];
        }
        
        public function StopTransform() {
            $this->_out('Q');
            if (isset($this->transfmatrix)) {
                array_pop($this->transfmatrix);
            }
            array_pop($this->transfmrk[$this->page]);
        }
        public function ScaleX($s_x, $x='', $y='') {
            $this->Scale($s_x, 100, $x, $y);
        }
        
        public function ScaleY($s_y, $x='', $y='') {
            $this->Scale(100, $s_y, $x, $y);
        }
        
        public function ScaleXY($s, $x='', $y='') {
            $this->Scale($s, $s, $x, $y);
        }
        
        public function Scale($s_x, $s_y, $x='', $y='') {
            if ($x === '') {
                $x = $this->x;
            }
            if ($y === '') {
                $y = $this->y;
            }
            if ($this->rtl) {
                $x = $this->w - $x;
            }
            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[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);
        }
        
        public function MirrorH($x='') {
            $this->Scale(-100, 100, $x);
        }
        
        public function MirrorV($y='') {
            $this->Scale(100, -100, '', $y);
        }
        
        public function MirrorP($x='',$y='') {
            $this->Scale(-100, -100, $x, $y);
        }
        
        public function MirrorL($angle=0, $x='',$y='') {
            $this->Scale(-100, 100, $x, $y);
            $this->Rotate(-2*($angle-90), $x, $y);
        }
        
        public function TranslateX($t_x) {
            $this->Translate($t_x, 0);
        }
        
        public function TranslateY($t_y) {
            $this->Translate(0, $t_y);
        }
        
        public function Translate($t_x, $t_y) {
            if ($this->rtl) {
                $t_x = -$t_x;
            }
            //calculate elements of transformation matrix
            $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);
        }
        
        public function Rotate($angle, $x='', $y='') {
            if ($x === '') {
                $x = $this->x;
            }
            if ($y === '') {
                $y = $this->y;
            }
            if ($this->rtl) {
                $x = $this->w - $x;
                $angle = -$angle;
            }
            $y = ($this->h - $y) * $this->k;
            $x *= $this->k;
            //calculate elements of transformation matrix
            $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);
        }
        
        public function SkewX($angle_x, $x='', $y='') {
            $this->Skew($angle_x, 0, $x, $y);
        }
        
        public function SkewY($angle_y, $x='', $y='') {
            $this->Skew(0, $angle_y, $x, $y);
        }
        
        public function Skew($angle_x, $angle_y, $x='', $y='') {
            if ($x === '') {
                $x = $this->x;
            }
            if ($y === '') {
                $y = $this->y;
            }
            if ($this->rtl) {
                $x = $this->w - $x;
                $angle_x = -$angle_x;
            }
            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[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);
        }
        
        protected function Transform($tm) {
            $this->_out(sprintf('%.3F %.3F %.3F %.3F %.3F %.3F cm', $tm[0], $tm[1], $tm[2], $tm[3], $tm[4], $tm[5]));
            // store transformation matrix
            $this->transfmatrix[] = array('a' => $tm[0], 'b' => $tm[1], 'c' => $tm[2], 'd' => $tm[3], 'e' => $tm[4], 'f' => $tm[5]);
            // update tranformation mark
            if (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
        
        public function SetLineWidth($width) {
            //Set line width
            $this->LineWidth = $width;
            $this->linestyleWidth = sprintf('%.2F w', ($width * $this->k));
            $this->_out($this->linestyleWidth);
        }
        
        public function GetLineWidth() {
            return $this->LineWidth;
        }
        
        public function SetLineStyle($style) {
            extract($style);
            if (isset($width)) {
                $width_prev = $this->LineWidth;
                $this->SetLineWidth($width);
                $this->LineWidth = $width_prev;
            }
            if (isset($cap)) {
                $ca = array('butt' => 0, 'round'=> 1, 'square' => 2);
                if (isset($ca[$cap])) {
                    $this->linestyleCap = $ca[$cap].' J';
                    $this->_out($this->linestyleCap);
                }
            }
            if (isset($join)) {
                $ja = array('miter' => 0, 'round' => 1, 'bevel' => 2);
                if (isset($ja[$join])) {
                    $this->linestyleJoin = $ja[$join].' j';
                    $this->_out($this->linestyleJoin);
                }
            }
            if (isset($dash)) {
                $dash_string = '';
                if ($dash) {
                    if (ereg('^.+,', $dash)) {
                        $tab = explode(',', $dash);
                    } else {
                        $tab = array($dash);
                    }
                    $dash_string = '';
                    foreach ($tab as $i => $v) {
                        if ($i) {
                            $dash_string .= ' ';
                        }
                        $dash_string .= sprintf("%.2F", $v);
                    }
                }
                if (!isset($phase) OR !$dash) {
                    $phase = 0;
                }
                $this->linestyleDash = sprintf("[%s] %.2F d", $dash_string, $phase);
                $this->_out($this->linestyleDash);
            }
            if (isset($color)) {
                $this->SetDrawColorArray($color);
            }
        }
        
        /*
        * Set a draw point.
        * @param float $x Abscissa of point.
        * @param float $y Ordinate of point.
        * @access protected
        * @since 2.1.000 (2008-01-08)
        */
        protected function _outPoint($x, $y) {
            if ($this->rtl) {
                $x = $this->w - $x;
            }
            $this->_out(sprintf("%.2F %.2F m", $x * $this->k, ($this->h - $y) * $this->k));
        }
        
        /*
        * Draws a line from last draw point.
        * @param float $x Abscissa of end point.
        * @param float $y Ordinate of end point.
        * @access protected
        * @since 2.1.000 (2008-01-08)
        */
        protected function _outLine($x, $y) {
            if ($this->rtl) {
                $x = $this->w - $x;
            }
            $this->_out(sprintf("%.2F %.2F l", $x * $this->k, ($this->h - $y) * $this->k));
        }
        
        protected function _outRect($x, $y, $w, $h, $op) {
            if ($this->rtl) {
                $x = $this->w - $x - $w;
            }
            $this->_out(sprintf('%.2F %.2F %.2F %.2F re %s', $x*$this->k, ($this->h-$y)*$this->k, $w*$this->k, -$h*$this->k, $op));
        }
        
        /*
        * Draws a Bezier curve from last draw point.
        * The Bezier curve is a tangent to the line between the control points at either end of the curve.
        * @param float $x1 Abscissa of control point 1.
        * @param float $y1 Ordinate of control point 1.
        * @param float $x2 Abscissa of control point 2.
        * @param float $y2 Ordinate of control point 2.
        * @param float $x3 Abscissa of end point.
        * @param float $y3 Ordinate of end point.
        * @access protected
        * @since 2.1.000 (2008-01-08)
        */
        protected function _outCurve($x1, $y1, $x2, $y2, $x3, $y3) {
            if ($this->rtl) {
                $x1 = $this->w - $x1;
                $x2 = $this->w - $x2;
                $x3 = $this->w - $x3;
            }
            $this->_out(sprintf("%.2F %.2F %.2F %.2F %.2F %.2F 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));
        }
        
        public function Line($x1, $y1, $x2, $y2, $style=array()) {
            if ($style) {
                $this->SetLineStyle($style);
            }
            $this->_outPoint($x1, $y1);
            $this->_outLine($x2, $y2);
            $this->_out(' S');
        }
        
        public function Rect($x, $y, $w, $h, $style='', $border_style=array(), $fill_color=array()) {
            if (!(false === strpos($style, 'F')) AND isset($fill_color)) {
                $this->SetFillColorArray($fill_color);
            }
            switch ($style) {
                case 'F': {
                    $op = 'f';
                    $border_style = array();
                    $this->_outRect($x, $y, $w, $h, $op);
                    break;
                }
                case 'DF':
                case 'FD': {
                    if ((!$border_style) OR (isset($border_style['all']))) {
                        $op = 'B';
                        if (isset($border_style['all'])) {
                            $this->SetLineStyle($border_style['all']);
                            $border_style = array();
                        }
                    } else {
                        $op = 'f';
                    }
                    $this->_outRect($x, $y, $w, $h, $op);
                    break;
                }
                case 'CNZ': {
                    $op = 'W n';
                    $this->_outRect($x, $y, $w, $h, $op);
                    break;
                }
                case 'CEO': {
                    $op = 'W* n';
                    $this->_outRect($x, $y, $w, $h, $op);
                    break;
                }
                default: {
                    $op = 'S';
                    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);
                    }
                    break;
                }
            }
            if ($border_style) {
                $border_style2 = array();
                foreach ($border_style as $line => $value) {
                    $lenght = strlen($line);
                    for ($i = 0; $i < $lenght; ++$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']);
                }
            }
        }
        
        
        public function Curve($x0, $y0, $x1, $y1, $x2, $y2, $x3, $y3, $style='', $line_style=array(), $fill_color=array()) {
            if (!(false === strpos($style, 'F')) AND isset($fill_color)) {
                $this->SetFillColorArray($fill_color);
            }
            switch ($style) {
                case 'F': {
                    $op = 'f';
                    $line_style = array();
                    break;
                }
                case 'FD': 
                case 'DF': {
                    $op = 'B';
                    break;
                }
                case 'CNZ': {
                    $op = 'W n';
                    break;
                }
                case 'CEO': {
                    $op = 'W* n';
                    break;
                }
                default: {
                    $op = 'S';
                    break;
                }
            }
            if ($line_style) {
                $this->SetLineStyle($line_style);
            }
            $this->_outPoint($x0, $y0);
            $this->_outCurve($x1, $y1, $x2, $y2, $x3, $y3);
            $this->_out($op);
        }
        
        public function Polycurve($x0, $y0, $segments, $style='', $line_style=array(), $fill_color=array()) {
            if (!(false === strpos($style, 'F')) AND isset($fill_color)) {
                $this->SetFillColorArray($fill_color);
            }
            switch ($style) {
                case 'F': {
                    $op = 'f';
                    $line_style = array();
                    break;
                }
                case 'FD':
                case 'DF': {
                    $op = 'B';
                    break;
                }
                case 'CNZ': {
                    $op = 'W n';
                    break;
                }
                case 'CEO': {
                    $op = 'W* n';
                    break;
                }
                default: {
                    $op = 'S';
                    break;
                }
            }
            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);
        }
        
        public function Ellipse($x0, $y0, $rx, $ry=0, $angle=0, $astart=0, $afinish=360, $style='', $line_style=array(), $fill_color=array(), $nc=8) {
            if ($angle) {
                $this->StartTransform();
                $this->Rotate($angle, $x0, $y0);
                $this->Ellipse($x0, $y0, $rx, $ry, 0, $astart, $afinish, $style, $line_style, $fill_color, $nc);
                $this->StopTransform();
                return;
            }
            if ($rx) {
                if (!(false === strpos($style, 'F')) AND isset($fill_color)) {
                    $this->SetFillColorArray($fill_color);
                }
                switch ($style) {
                    case 'F': {
                        $op = 'f';
                        $line_style = array();
                        break;
                    }
                    case 'FD': 
                    case 'DF': {
                        $op = 'B';
                        break;
                    }
                    case 'C': {
                        $op = 's'; // Small 's' signifies closing the path as well
                        break;
                    }
                    case 'CNZ': {
                        $op = 'W n';
                        break;
                    }
                    case 'CEO': {
                        $op = 'W* n';
                        break;
                    }
                    default: {
                        $op = 'S';
                        break;
                    }
                }
                if ($line_style) {
                    $this->SetLineStyle($line_style);
                }
                if (!$ry) {
                    $ry = $rx;
                }
                $rx *= $this->k;
                $ry *= $this->k;
                if ($nc < 2) {
                    $nc = 2;
                }
                $astart = deg2rad((float) $astart);
                $afinish = deg2rad((float) $afinish);
                $total_angle = $afinish - $astart;
                $dt = $total_angle / $nc;
                $dtm = $dt / 3;
                $x0 *= $this->k;
                $y0 = ($this->h - $y0) * $this->k;
                $t1 = $astart;
                $a0 = $x0 + ($rx * cos($t1));
                $b0 = $y0 + ($ry * sin($t1));
                $c0 = -$rx * sin($t1);
                $d0 = $ry * cos($t1);
                $this->_outPoint($a0 / $this->k, $this->h - ($b0 / $this->k));
                for ($i = 1; $i <= $nc; ++$i) {
                    // Draw this bit of the total curve
                    $t1 = ($i * $dt) + $astart;
                    $a1 = $x0 + ($rx * cos($t1));
                    $b1 = $y0 + ($ry * sin($t1));
                    $c1 = -$rx * sin($t1);
                    $d1 = $ry * cos($t1);
                    $this->_outCurve(($a0 + ($c0 * $dtm)) / $this->k, $this->h - (($b0 + ($d0 * $dtm)) / $this->k), ($a1 - ($c1 * $dtm)) / $this->k, $this->h - (($b1 - ($d1 * $dtm)) / $this->k), $a1 / $this->k, $this->h - ($b1 / $this->k));
                    $a0 = $a1;
                    $b0 = $b1;
                    $c0 = $c1;
                    $d0 = $d1;
                }
                $this->_out($op);
            }
        }
        
        public function Circle($x0, $y0, $r, $astart=0, $afinish=360, $style='', $line_style=array(), $fill_color=array(), $nc=8) {
            $this->Ellipse($x0, $y0, $r, 0, 0, $astart, $afinish, $style, $line_style, $fill_color, $nc);
        }
        
        public function Polygon($p, $style='', $line_style=array(), $fill_color=array()) {
            $np = count($p) / 2;
            if (!(false === strpos($style, 'F')) AND isset($fill_color)) {
                $this->SetFillColorArray($fill_color);
            }
            switch ($style) {
                case 'F': {
                    $line_style = array();
                    $op = 'f';
                    break;
                }
                case 'FD': 
                case 'DF': {
                    $op = 'B';
                    break;
                }
                case 'CNZ': {
                    $op = 'W n';
                    break;
                }
                case 'CEO': {
                    $op = 'W* n';
                    break;
                }               
                default: {
                    $op = 'S';
                    break;
                }
            }
            $draw = true;
            if ($line_style) {
                if (isset($line_style['all'])) {
                    $this->SetLineStyle($line_style['all']);
                } else { // 0 .. (np - 1), op = {B, S}
                    $draw = false;
                    if ('B' == $op) {
                        $op = 'f';
                        $this->_outPoint($p[0], $p[1]);
                        for ($i = 2; $i < ($np * 2); $i = $i + 2) {
                            $this->_outLine($p[$i], $p[$i + 1]);
                        }
                        $this->_outLine($p[0], $p[1]);
                        $this->_out($op);
                    }
                    $p[($np * 2)] = $p[0];
                    $p[(($np * 2) + 1)] = $p[1];
                    for ($i = 0; $i < $np; ++$i) {
                        if (isset($line_style[$i]) AND ($line_style[$i] != 0)) {
                            $this->Line($p[($i * 2)], $p[(($i * 2) + 1)], $p[(($i * 2) + 2)], $p[(($i * 2) + 3)], $line_style[$i]);
                        }
                    }
                }
            }
            if ($draw) {
                $this->_outPoint($p[0], $p[1]);
                for ($i = 2; $i < ($np * 2); $i = $i + 2) {
                    $this->_outLine($p[$i], $p[$i + 1]);
                }
                $this->_outLine($p[0], $p[1]);
                $this->_out($op);
            }
        }
        
        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);
        }
        
        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 (2 > $nv) {
                $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);
        }
        
        public function RoundedRect($x, $y, $w, $h, $r, $round_corner='1111', $style='', $border_style=array(), $fill_color=array()) {
            if ('0000' == $round_corner) { // Not rounded
                $this->Rect($x, $y, $w, $h, $style, $border_style, $fill_color);
            } else { // Rounded
                if (!(false === strpos($style, 'F')) AND isset($fill_color)) {
                    $this->SetFillColorArray($fill_color);
                }
                switch ($style) {
                    case 'F': {
                        $border_style = array();
                        $op = 'f';
                        break;
                    }
                    case 'FD': 
                    case 'DF': {
                        $op = 'B';
                        break;
                    }
                    case 'CNZ': {
                        $op = 'W n';
                        break;
                    }
                    case 'CEO': {
                        $op = 'W* n';
                        break;
                    }
                    default: {
                        $op = 'S';
                        break;
                    }
                }
                if ($border_style) {
                    $this->SetLineStyle($border_style);
                }
                $MyArc = 4 / 3 * (sqrt(2) - 1);
                $this->_outPoint($x + $r, $y);
                $xc = $x + $w - $r;
                $yc = $y + $r;
                $this->_outLine($xc, $y);
                if ($round_corner[0]) {
                    $this->_outCurve($xc + ($r * $MyArc), $yc - $r, $xc + $r, $yc - ($r * $MyArc), $xc + $r, $yc);
                } else {
                    $this->_outLine($x + $w, $y);
                }
                $xc = $x + $w - $r;
                $yc = $y + $h - $r;
                $this->_outLine($x + $w, $yc);
                if ($round_corner[1]) {
                    $this->_outCurve($xc + $r, $yc + ($r * $MyArc), $xc + ($r * $MyArc), $yc + $r, $xc, $yc + $r);
                } else {
                    $this->_outLine($x + $w, $y + $h);
                }
                $xc = $x + $r;
                $yc = $y + $h - $r;
                $this->_outLine($xc, $y + $h);
                if ($round_corner[2]) {
                    $this->_outCurve($xc - ($r * $MyArc), $yc + $r, $xc - $r, $yc + ($r * $MyArc), $xc - $r, $yc);
                } else {
                    $this->_outLine($x, $y + $h);
                }
                $xc = $x + $r;
                $yc = $y + $r;
                $this->_outLine($x, $yc);
                if ($round_corner[3]) {
                    $this->_outCurve($xc - $r, $yc - ($r * $MyArc), $xc - ($r * $MyArc), $yc - $r, $xc, $yc - $r);
                } else {
                    $this->_outLine($x, $y);
                    $this->_outLine($x + $r, $y);
                }
                $this->_out($op);
            }
        }
        
        // END GRAPHIC FUNCTIONS SECTION -----------------------
        
        // BIDIRECTIONAL TEXT SECTION --------------------------
        protected function utf8StrRev($str, $setbom=false, $forcertl=false) {
            return $this->arrUTF8ToUTF16BE($this->utf8Bidi($this->UTF8StringToArray($str), $str, $forcertl), $setbom);
        }
        
        protected function utf8Bidi($ta, $str='', $forcertl=false) {
            global $unicode, $unicode_mirror, $unicode_arlet, $laa_array, $diacritics;
            // 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(K_RE_PATTERN_ARABIC, $str)) {
                $arabic = true;
            } else {
                $arabic = false;
            }
            // check if string contains RTL text
            if (!($forcertl OR $arabic OR preg_match(K_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 = $unicode[$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] == K_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' => K_RLE, 'cel' => $cel, 'dos' => $dos);
                        $cel = $next_level;
                        $dos = 'N';
                        $sor = $eor;
                        $eor = $cel % 2 ? 'R' : 'L';
                    }
                } elseif ($ta[$i] == K_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' => K_LRE, 'cel' => $cel, 'dos' => $dos);
                        $cel = $next_level;
                        $dos = 'N';
                        $sor = $eor;
                        $eor = $cel % 2 ? 'R' : 'L';
                    }
                } elseif ($ta[$i] == K_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' => K_RLO, 'cel' => $cel, 'dos' => $dos);
                        $cel = $next_level;
                        $dos = 'R';
                        $sor = $eor;
                        $eor = $cel % 2 ? 'R' : 'L';
                    }
                } elseif ($ta[$i] == K_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' => K_LRO, 'cel' => $cel, 'dos' => $dos);
                        $cel = $next_level;
                        $dos = 'L';
                        $sor = $eor;
                        $eor = $cel % 2 ? 'R' : 'L';
                    }
                } elseif ($ta[$i] == K_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'] == K_RLE) OR 
                              ($remember[$last]['num'] == K_LRE) OR 
                              ($remember[$last]['num'] == K_RLO) OR 
                              ($remember[$last]['num'] == K_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] != K_RLE) AND
                                 ($ta[$i] != K_LRE) AND
                                 ($ta[$i] != K_RLO) AND
                                 ($ta[$i] != K_LRO) AND
                                 ($ta[$i] != K_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 {
                        $chardir = $unicode[$ta[$i]];
                    }
                    // 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 (($unicode[$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 ($unicode[$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 = $laa_array;
                            $laaletter = true;
                            if ($x > 1) {
                                $prevchar = $charAL[($x-2)];
                            } else {
                                $prevchar = false;
                            }
                        } else {
                            $arabicarr = $unicode_arlet;
                            $laaletter = false;
                        }
                        if (($prevchar !== false) AND ($nextchar !== false) AND
                            (($unicode[$prevchar['char']] == 'AL') OR ($unicode[$prevchar['char']] == 'NSM')) AND
                            (($unicode[$nextchar['char']] == 'AL') OR ($unicode[$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
                            (($unicode[$nextchar['char']] == 'AL') OR ($unicode[$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
                            (($unicode[$prevchar['char']] == 'AL') OR ($unicode[$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 Shadda (0651 HEX, 1617 DEC) are placed in UE586-UE594. 
                 * Putting the combining mark and shadda in the same glyph allows us to avoid the two marks overlapping each other in an illegible manner.
                 */
                $cw = &$this->CurrentFont['cw'];
                for ($i = 0; $i < ($numchars-1); ++$i) {
                    if (($chardata2[$i]['char'] == 1617) AND (isset($diacritics[($chardata2[$i+1]['char'])]))) {
                        // check if the subtitution font is defined on current font
                        if (isset($cw[($diacritics[($chardata2[$i+1]['char'])])])) {
                            $chardata2[$i]['char'] = false;
                            $chardata2[$i+1]['char'] = $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($unicode_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'] = $unicode_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'];
            }
            
            return $ordarray;
        }
        
        // END OF BIDIRECTIONAL TEXT SECTION -------------------
        
        /*
        * Adds a bookmark.
        * @param string $txt bookmark description.
        * @param int $level bookmark level (minimum value is 0).
        * @param float $y Ordinate of the boorkmark position (default = -1 = current position).
        * @param int $page target page number (leave empty for current page).
        * @access public
        * @author Olivier Plathey, Nicola Asuni
        * @since 2.1.002 (2008-02-12)
        */
        public function Bookmark($txt, $level=0, $y=-1, $page='') {
            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();
            }
            if (empty($page)) {
                $page = $this->PageNo();
            }
            $this->outlines[] = array('t' => $txt, 'l' => $level, 'y' => $y, 'p' => $page);
        }
        
        /*
        * Create a bookmark PDF string.
        * @access protected
        * @author Olivier Plathey, Nicola Asuni
        * @since 2.1.002 (2008-02-12)
        */
        protected function _putbookmarks() {
            $nb = count($this->outlines);
            if ($nb == 0) {
                return;
            }
            $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;
            foreach ($this->outlines as $i => $o) {
                $this->_newobj();
                $this->_out('<</Title '.$this->_textstring($o['t']));
                $this->_out('/Parent '.($n + $o['parent']).' 0 R');
                if (isset($o['prev']))
                $this->_out('/Prev '.($n + $o['prev']).' 0 R');
                if (isset($o['next']))
                $this->_out('/Next '.($n + $o['next']).' 0 R');
                if (isset($o['first']))
                $this->_out('/First '.($n + $o['first']).' 0 R');
                if (isset($o['last']))
                $this->_out('/Last '.($n + $o['last']).' 0 R');
                $this->_out(sprintf('/Dest [%d 0 R /XYZ 0 %.2F null]', (1 + (2 * $o['p'])), ($this->pagedim[$o['p']]['h'] - ($o['y'] * $this->k))));
                $this->_out('/Count 0>>');
                $this->_out('endobj');
            }
            //Outline root
            $this->_newobj();
            $this->OutlineRoot = $this->n;
            $this->_out('<</Type /Outlines /First '.$n.' 0 R');
            $this->_out('/Last '.($n + $lru[0]).' 0 R>>');
            $this->_out('endobj');
        }
        
        
        // --- JAVASCRIPT - FORMS ------------------------------
        
        /*
        * Adds a javascript
        * @access public
        * @author Johannes Güntert, Nicola Asuni
        * @since 2.1.002 (2008-02-12)
        */
        public function IncludeJS($script) {
            $this->javascript .= $script;
        }
        
        /*
        * Create a javascript PDF string.
        * @access protected
        * @author Johannes Güntert, Nicola Asuni
        * @since 2.1.002 (2008-02-12)
        */
        protected function _putjavascript() {
            if (empty($this->javascript)) {
                return;
            }
            // the following two lines are uded to avoid form fields duplication after saving
            $js1 = sprintf("ftcpdfdocsaved=this.addField('%s','%s',%d,[%.2F,%.2F,%.2F,%.2F]);", 'tcpdfdocsaved', 'text', 0, 0, 1, 0, 1);
            $js2 = "getField('tcpdfdocsaved').value = 'saved';";
            $this->_newobj();
            $this->n_js = $this->n;
            $this->_out('<<');
            $this->_out('/Names [(EmbeddedJS) '.($this->n + 1).' 0 R ]');
            $this->_out('>>');
            $this->_out('endobj');
            $this->_newobj();
            $this->_out('<<');
            $this->_out('/S /JavaScript');
            $this->_out('/JS '.$this->_textstring($js1."\n".$this->javascript."\n".$js2));
            $this->_out('>>');
            $this->_out('endobj');
        }
        
        /*
        * Convert color to javascript color.
        * @param string $color color name or #RRGGBB
        * @access 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',%.3F,%.3F,%.3F]", 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 string $type field type
        * @param string $name field name
        * @param int $x horizontal position
        * @param int $y vertical position
        * @param int $w width
        * @param int $h height
        * @param array $prop array of properties. Possible values are (http://www.adobe.com/devnet/acrobat/pdfs/js_developer_guide.pdf): <ul><li>rect: Position and size of field on page.</li><li>borderStyle: Rectangle border appearance.</li><li>strokeColor: Color of bounding rectangle.</li><li>lineWidth: Width of the edge of the surrounding rectangle.</li><li>rotation: Rotation of field in 90-degree increments.</li><li>fillColor: Background color of field (gray, transparent, RGB, or CMYK).</li><li>userName: Short description of field that appears on mouse-over.</li><li>readonly: Whether the user may change the field contents.</li><li>doNotScroll: Whether text fields may scroll.</li><li>display: Whether visible or hidden on screen or in print.</li><li>textFont: Text font.</li><li>textColor: Text color.</li><li>textSize: Text size.</li><li>richText: Rich text.</li><li>richValue: Text.</li><li>comb: Text comb format.</li><li>multiline: Text multiline.</li><li>charLimit: Text limit to number of characters.</li><li>fileSelect: Text file selection format.</li><li>password: Text password format.</li><li>alignment: Text layout in text fields.</li><li>buttonAlignX: X alignment of icon on button face.</li><li>buttonAlignY: Y alignment of icon on button face.</li><li>buttonFitBounds: Relative scaling of an icon to fit inside a button face.</li><li>buttonScaleHow: Relative scaling of an icon to fit inside a button face.</li><li>buttonScaleWhen: Relative scaling of an icon to fit inside a button face.</li><li>highlight: Appearance of a button when pushed.</li><li>style: Glyph style for checkbox and radio buttons.</li><li>numItems: Number of items in a combo box or list box.</li><li>editable: Whether the user can type in a combo box.</li><li>multipleSelection: Whether multiple list box items may be selected.</li></ul>
        * @access 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',%d,[%.2F,%.2F,%.2F,%.2F]);", $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 .= '}';
        }
        
        /*
        * Creates a text field
        * @param string $name field name
        * @param int $w width
        * @param int $h height
        * @param string $prop properties. The value property allows to set the initial value. The multiline property allows to define the field as multiline. Possible values are (http://www.adobe.com/devnet/acrobat/pdfs/js_developer_guide.pdf): <ul><li>rect: Position and size of field on page.</li><li>borderStyle: Rectangle border appearance.</li><li>strokeColor: Color of bounding rectangle.</li><li>lineWidth: Width of the edge of the surrounding rectangle.</li><li>rotation: Rotation of field in 90-degree increments.</li><li>fillColor: Background color of field (gray, transparent, RGB, or CMYK).</li><li>userName: Short description of field that appears on mouse-over.</li><li>readonly: Whether the user may change the field contents.</li><li>doNotScroll: Whether text fields may scroll.</li><li>display: Whether visible or hidden on screen or in print.</li><li>textFont: Text font.</li><li>textColor: Text color.</li><li>textSize: Text size.</li><li>richText: Rich text.</li><li>richValue: Text.</li><li>comb: Text comb format.</li><li>multiline: Text multiline.</li><li>charLimit: Text limit to number of characters.</li><li>fileSelect: Text file selection format.</li><li>password: Text password format.</li><li>alignment: Text layout in text fields.</li><li>buttonAlignX: X alignment of icon on button face.</li><li>buttonAlignY: Y alignment of icon on button face.</li><li>buttonFitBounds: Relative scaling of an icon to fit inside a button face.</li><li>buttonScaleHow: Relative scaling of an icon to fit inside a button face.</li><li>buttonScaleWhen: Relative scaling of an icon to fit inside a button face.</li><li>highlight: Appearance of a button when pushed.</li><li>style: Glyph style for checkbox and radio buttons.</li><li>numItems: Number of items in a combo box or list box.</li><li>editable: Whether the user can type in a combo box.</li><li>multipleSelection: Whether multiple list box items may be selected.</li></ul>
        * @access public
        * @author Denis Van Nuffelen, Nicola Asuni
        * @since 2.1.002 (2008-02-12)
        */
        public function TextField($name, $w, $h, $prop=array()) {
            $this->_addfield('text', $name, $this->x, $this->y, $w, $h, $prop);
        }
        
        /*
        * Creates a RadioButton field
        * @param string $name field name
        * @param int $w width
        * @param string $prop properties. Possible values are (http://www.adobe.com/devnet/acrobat/pdfs/js_developer_guide.pdf): <ul><li>rect: Position and size of field on page.</li><li>borderStyle: Rectangle border appearance.</li><li>strokeColor: Color of bounding rectangle.</li><li>lineWidth: Width of the edge of the surrounding rectangle.</li><li>rotation: Rotation of field in 90-degree increments.</li><li>fillColor: Background color of field (gray, transparent, RGB, or CMYK).</li><li>userName: Short description of field that appears on mouse-over.</li><li>readonly: Whether the user may change the field contents.</li><li>doNotScroll: Whether text fields may scroll.</li><li>display: Whether visible or hidden on screen or in print.</li><li>textFont: Text font.</li><li>textColor: Text color.</li><li>textSize: Text size.</li><li>richText: Rich text.</li><li>richValue: Text.</li><li>comb: Text comb format.</li><li>multiline: Text multiline.</li><li>charLimit: Text limit to number of characters.</li><li>fileSelect: Text file selection format.</li><li>password: Text password format.</li><li>alignment: Text layout in text fields.</li><li>buttonAlignX: X alignment of icon on button face.</li><li>buttonAlignY: Y alignment of icon on button face.</li><li>buttonFitBounds: Relative scaling of an icon to fit inside a button face.</li><li>buttonScaleHow: Relative scaling of an icon to fit inside a button face.</li><li>buttonScaleWhen: Relative scaling of an icon to fit inside a button face.</li><li>highlight: Appearance of a button when pushed.</li><li>style: Glyph style for checkbox and radio buttons.</li><li>numItems: Number of items in a combo box or list box.</li><li>editable: Whether the user can type in a combo box.</li><li>multipleSelection: Whether multiple list box items may be selected.</li></ul>
        * @access public
        * @author Nicola Asuni
        * @since 2.2.003 (2008-03-03)
        */
        public function RadioButton($name, $w, $prop=array()) {
            if (!isset($prop['strokeColor'])) {
                $prop['strokeColor']='black';
            }
            $this->_addfield('radiobutton', $name, $this->x, $this->y, $w, $w, $prop);
        }
        
        /*
        * Creates a List-box field
        * @param string $name field name
        * @param int $w width
        * @param int $h height
        * @param array $values array containing the list of values.
        * @param string $prop properties. Possible values are (http://www.adobe.com/devnet/acrobat/pdfs/js_developer_guide.pdf): <ul><li>rect: Position and size of field on page.</li><li>borderStyle: Rectangle border appearance.</li><li>strokeColor: Color of bounding rectangle.</li><li>lineWidth: Width of the edge of the surrounding rectangle.</li><li>rotation: Rotation of field in 90-degree increments.</li><li>fillColor: Background color of field (gray, transparent, RGB, or CMYK).</li><li>userName: Short description of field that appears on mouse-over.</li><li>readonly: Whether the user may change the field contents.</li><li>doNotScroll: Whether text fields may scroll.</li><li>display: Whether visible or hidden on screen or in print.</li><li>textFont: Text font.</li><li>textColor: Text color.</li><li>textSize: Text size.</li><li>richText: Rich text.</li><li>richValue: Text.</li><li>comb: Text comb format.</li><li>multiline: Text multiline.</li><li>charLimit: Text limit to number of characters.</li><li>fileSelect: Text file selection format.</li><li>password: Text password format.</li><li>alignment: Text layout in text fields.</li><li>buttonAlignX: X alignment of icon on button face.</li><li>buttonAlignY: Y alignment of icon on button face.</li><li>buttonFitBounds: Relative scaling of an icon to fit inside a button face.</li><li>buttonScaleHow: Relative scaling of an icon to fit inside a button face.</li><li>buttonScaleWhen: Relative scaling of an icon to fit inside a button face.</li><li>highlight: Appearance of a button when pushed.</li><li>style: Glyph style for checkbox and radio buttons.</li><li>numItems: Number of items in a combo box or list box.</li><li>editable: Whether the user can type in a combo box.</li><li>multipleSelection: Whether multiple list box items may be selected.</li></ul>
        * @access public
        * @author Nicola Asuni
        * @since 2.2.003 (2008-03-03)
        */
        public function ListBox($name, $w, $h, $values, $prop=array()) {
            if (!isset($prop['strokeColor'])) {
                $prop['strokeColor'] = 'ltGray';
            }
            $this->_addfield('listbox', $name, $this->x, $this->y, $w, $h, $prop);
            $s = '';
            foreach ($values as $value) {
                $s .= "'".addslashes($value)."',";
            }
            $this->javascript .= 'f'.$name.'.setItems(['.substr($s, 0, -1)."]);\n";
        }
        
        /*
        * Creates a Combo-box field
        * @param string $name field name
        * @param int $w width
        * @param int $h height
        * @param array $values array containing the list of values.
        * @param string $prop properties. Possible values are (http://www.adobe.com/devnet/acrobat/pdfs/js_developer_guide.pdf): <ul><li>rect: Position and size of field on page.</li><li>borderStyle: Rectangle border appearance.</li><li>strokeColor: Color of bounding rectangle.</li><li>lineWidth: Width of the edge of the surrounding rectangle.</li><li>rotation: Rotation of field in 90-degree increments.</li><li>fillColor: Background color of field (gray, transparent, RGB, or CMYK).</li><li>userName: Short description of field that appears on mouse-over.</li><li>readonly: Whether the user may change the field contents.</li><li>doNotScroll: Whether text fields may scroll.</li><li>display: Whether visible or hidden on screen or in print.</li><li>textFont: Text font.</li><li>textColor: Text color.</li><li>textSize: Text size.</li><li>richText: Rich text.</li><li>richValue: Text.</li><li>comb: Text comb format.</li><li>multiline: Text multiline.</li><li>charLimit: Text limit to number of characters.</li><li>fileSelect: Text file selection format.</li><li>password: Text password format.</li><li>alignment: Text layout in text fields.</li><li>buttonAlignX: X alignment of icon on button face.</li><li>buttonAlignY: Y alignment of icon on button face.</li><li>buttonFitBounds: Relative scaling of an icon to fit inside a button face.</li><li>buttonScaleHow: Relative scaling of an icon to fit inside a button face.</li><li>buttonScaleWhen: Relative scaling of an icon to fit inside a button face.</li><li>highlight: Appearance of a button when pushed.</li><li>style: Glyph style for checkbox and radio buttons.</li><li>numItems: Number of items in a combo box or list box.</li><li>editable: Whether the user can type in a combo box.</li><li>multipleSelection: Whether multiple list box items may be selected.</li></ul>
        * @access public
        * @author Denis Van Nuffelen, Nicola Asuni
        * @since 2.1.002 (2008-02-12)
        */
        public function ComboBox($name, $w, $h, $values, $prop=array()) {
            $this->_addfield('combobox', $name, $this->x, $this->y, $w, $h, $prop);
            $s = '';
            foreach ($values as $value) {
                $s .= "'".addslashes($value)."',";
            }
            $this->javascript .= 'f'.$name.'.setItems(['.substr($s, 0, -1)."]);\n";
        }
        
        /*
        * Creates a CheckBox field
        * @param string $name field name
        * @param int $w width
        * @param boolean $checked define the initial state (default = false).
        * @param string $prop properties. Possible values are (http://www.adobe.com/devnet/acrobat/pdfs/js_developer_guide.pdf): <ul><li>rect: Position and size of field on page.</li><li>borderStyle: Rectangle border appearance.</li><li>strokeColor: Color of bounding rectangle.</li><li>lineWidth: Width of the edge of the surrounding rectangle.</li><li>rotation: Rotation of field in 90-degree increments.</li><li>fillColor: Background color of field (gray, transparent, RGB, or CMYK).</li><li>userName: Short description of field that appears on mouse-over.</li><li>readonly: Whether the user may change the field contents.</li><li>doNotScroll: Whether text fields may scroll.</li><li>display: Whether visible or hidden on screen or in print.</li><li>textFont: Text font.</li><li>textColor: Text color.</li><li>textSize: Text size.</li><li>richText: Rich text.</li><li>richValue: Text.</li><li>comb: Text comb format.</li><li>multiline: Text multiline.</li><li>charLimit: Text limit to number of characters.</li><li>fileSelect: Text file selection format.</li><li>password: Text password format.</li><li>alignment: Text layout in text fields.</li><li>buttonAlignX: X alignment of icon on button face.</li><li>buttonAlignY: Y alignment of icon on button face.</li><li>buttonFitBounds: Relative scaling of an icon to fit inside a button face.</li><li>buttonScaleHow: Relative scaling of an icon to fit inside a button face.</li><li>buttonScaleWhen: Relative scaling of an icon to fit inside a button face.</li><li>highlight: Appearance of a button when pushed.</li><li>style: Glyph style for checkbox and radio buttons.</li><li>numItems: Number of items in a combo box or list box.</li><li>editable: Whether the user can type in a combo box.</li><li>multipleSelection: Whether multiple list box items may be selected.</li></ul>
        * @access public
        * @author Denis Van Nuffelen, Nicola Asuni
        * @since 2.1.002 (2008-02-12)
        */
        public function CheckBox($name, $w, $checked=false, $prop=array()) {
            $prop['value'] = ($checked ? 'Yes' : 'Off');
            if (!isset($prop['strokeColor'])) {
                $prop['strokeColor'] = 'black';
            }
            $this->_addfield('checkbox', $name, $this->x, $this->y, $w, $w, $prop);
        }
        
        /*
        * Creates a button field
        * @param string $name field name
        * @param int $w width
        * @param int $h height
        * @param string $caption caption.
        * @param string $action action triggered by the button (JavaScript code).
        * @param string $prop properties. Possible values are (http://www.adobe.com/devnet/acrobat/pdfs/js_developer_guide.pdf): <ul><li>rect: Position and size of field on page.</li><li>borderStyle: Rectangle border appearance.</li><li>strokeColor: Color of bounding rectangle.</li><li>lineWidth: Width of the edge of the surrounding rectangle.</li><li>rotation: Rotation of field in 90-degree increments.</li><li>fillColor: Background color of field (gray, transparent, RGB, or CMYK).</li><li>userName: Short description of field that appears on mouse-over.</li><li>readonly: Whether the user may change the field contents.</li><li>doNotScroll: Whether text fields may scroll.</li><li>display: Whether visible or hidden on screen or in print.</li><li>textFont: Text font.</li><li>textColor: Text color.</li><li>textSize: Text size.</li><li>richText: Rich text.</li><li>richValue: Text.</li><li>comb: Text comb format.</li><li>multiline: Text multiline.</li><li>charLimit: Text limit to number of characters.</li><li>fileSelect: Text file selection format.</li><li>password: Text password format.</li><li>alignment: Text layout in text fields.</li><li>buttonAlignX: X alignment of icon on button face.</li><li>buttonAlignY: Y alignment of icon on button face.</li><li>buttonFitBounds: Relative scaling of an icon to fit inside a button face.</li><li>buttonScaleHow: Relative scaling of an icon to fit inside a button face.</li><li>buttonScaleWhen: Relative scaling of an icon to fit inside a button face.</li><li>highlight: Appearance of a button when pushed.</li><li>style: Glyph style for checkbox and radio buttons.</li><li>numItems: Number of items in a combo box or list box.</li><li>editable: Whether the user can type in a combo box.</li><li>multipleSelection: Whether multiple list box items may be selected.</li></ul>
        * @access public
        * @author Denis Van Nuffelen, Nicola Asuni
        * @since 2.1.002 (2008-02-12)
        */
        public function Button($name, $w, $h, $caption, $action, $prop=array()) {
            if (!isset($prop['strokeColor'])) {
                $prop['strokeColor'] = 'black';
            }
            if (!isset($prop['borderStyle'])) {
                $prop['borderStyle'] = 'beveled';
            }
            $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";
        }
        
        // END JAVASCRIPT - FORMS ------------------------------
        
        /*
        * Enable Write permissions for PDF Reader.
        * WARNING: This works only using the Adobe private key with the setSignature() method.
        * @access protected
        * @author Nicola Asuni
        * @since 2.9.000 (2008-03-26)
        */
        protected function _putuserrights() {
            if ((!$this->sign) OR (isset($this->signature_data['cert_type']) AND ($this->signature_data['cert_type'] > 0))) {
                return;
            }
            $this->_out('/Perms');
            $this->_out('<<');
            $this->_out('/UR3');
            $this->_out('<<');
            $this->_out('/Type/Sig');
            $this->_out('/Filter/Adobe.PPKLite');
            $this->_out('/SubFilter/adbe.pkcs7.detached');
            $this->_out('/ByteRange[0 ********** ********** **********]');
            $this->_out('/Contents<>'.str_repeat(' ', $this->signature_max_lenght));
            if ($this->ur) {
                $this->_out('/Reference');
                $this->_out('[');
                $this->_out('<<');
                $this->_out('/Type/SigRef');
                $this->_out('/TransformMethod/UR3');
                $this->_out('/TransformParams');
                $this->_out('<<');
                $this->_out('/Type/TransformParams');
                $this->_out('/V/2.2');
                if (!$this->empty_string($this->ur_document)) {
                    $this->_out('/Document['.$this->ur_document.']');
                }
                if (!$this->empty_string($this->ur_annots)) {
                    $this->_out('/Annots['.$this->ur_annots.']');
                }
                if (!$this->empty_string($this->ur_form)) {
                    $this->_out('/Form['.$this->ur_form.']');
                }
                if (!$this->empty_string($this->ur_signature)) {
                    $this->_out('/Signature['.$this->ur_signature.']');
                }           
                $this->_out('>>');
                $this->_out('>>');
                $this->_out(']');
            }
            $this->_out('/M '.$this->_datastring('D:'.date('YmdHisO')));
            $this->_out('>>');
            $this->_out('>>');
        }
        
        /*
        * Add certification signature (DocMDP)
        * @access protected
        * @author Nicola Asuni
        * @since 4.6.008 (2009-05-07)
        */
        protected function _putcertification() {
            if ((!$this->sign) OR (isset($this->signature_data['cert_type']) AND ($this->signature_data['cert_type'] <= 0))) {
                return;
            }
            $this->_out('/Perms');
            $this->_out('<<');
            $this->_out('/DocMDP');
            $this->_out('<<');
            $this->_out('/Type/Sig');
            $this->_out('/Filter/Adobe.PPKLite');
            $this->_out('/SubFilter/adbe.pkcs7.detached');
            $this->_out('/ByteRange[0 ********** ********** **********]');
            $this->_out('/Contents<>'.str_repeat(' ', $this->signature_max_lenght));
            $this->_out('/Reference');
            $this->_out('[');
            $this->_out('<<');
            $this->_out('/Type/SigRef');
            $this->_out('/TransformMethod/DocMDP');
            $this->_out('/TransformParams');
            $this->_out('<<');
            $this->_out('/Type/TransformParams');
            $this->_out('/V/1.2');
            $this->_out('/P '.$this->signature_data['cert_type'].'');
            $this->_out('>>');
            $this->_out('>>');
            $this->_out(']');
            $this->_out('/M '.$this->_datastring('D:'.date('YmdHisO')));
            if (isset($this->signature_data['info']['Name']) AND !$this->empty_string($this->signature_data['info']['Name'])) {
                $this->_out('/Name '.$this->_textstring($this->signature_data['info']['Name']).'');
            }
            if (isset($this->signature_data['info']['Location']) AND !$this->empty_string($this->signature_data['info']['Location'])) {
                $this->_out('/Location '.$this->_textstring($this->signature_data['info']['Location']).'');
            }
            if (isset($this->signature_data['info']['Reason']) AND !$this->empty_string($this->signature_data['info']['Reason'])) {
                $this->_out('/Reason '.$this->_textstring($this->signature_data['info']['Reason']).'');
            }
            if (isset($this->signature_data['info']['ContactInfo']) AND !$this->empty_string($this->signature_data['info']['ContactInfo'])) {
                $this->_out('/ContactInfo '.$this->_textstring($this->signature_data['info']['ContactInfo']).'');
            }
            $this->_out('>>');
            $this->_out('>>');
        }
        
        /*
        * Set User's Rights for PDF Reader
        * WARNING: This should work only using the Adobe private key with the setSignature() method.
        * Check the PDF Reference 8.7.1 Transform Methods, 
        * Table 8.105 Entries in the UR transform parameters dictionary
        * @param boolean $enable if true enable user's rights on PDF reader
        * @param string $document 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 string $annots 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 string $form Names specifying additional form-field-related usage rights for the document. Valid names are: /Add/Delete/FillIn/Import/Export/SubmitStandalone/SpawnTemplate 
        * @param string $signature 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.
        * @access 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') {
            $this->ur = $enable;
            $this->ur_document = $document;
            $this->ur_annots = $annots;
            $this->ur_form = $form;
            $this->ur_signature = $signature;
            if ($this->ur) {
                $this->setSignature('', '', '', '', 0);
            }
        }
        
        /*
        * Enable document signature (requires the OpenSSL Library).
        * The digital signature improve document authenticity and integrity and allows o enable extra features on Acrobat Reader.
        * @param mixed $signing_cert signing certificate (string or filename prefixed with 'file://')
        * @param mixed $private_key private key (string or filename prefixed with 'file://')
        * @param string $private_key_password password
        * @param string $extracerts 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 int $cert_type 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.
        * @parm array $info array of option information: Name, Location, Reason, ContactInfo.
        * @access 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.pem -out tcpdf.pem
            $this->sign = true;
            $this->signature_data = array();
            if (strlen($signing_cert) == 0) {
                $signing_cert = 'file://'.dirname(__FILE__).'/tcpdf.pem';
            }
            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'] = array();
        }
        
        /*
        * Create a new page group.
        * NOTE: call this function before calling AddPage()
        * @param int $page starting group page (leave empty for next page).
        * @access public
        * @since 3.0.000 (2008-03-27)
        */
        public function startPageGroup($page='') {
            if (empty($page)) {
                $page = $this->page + 1;
            }
            $this->newpagegroup[$page] = true;
        }

        public function AliasNbPages($alias='{nb}') {
            $this->AliasNbPages = $alias;
        }
        
        public function getAliasNbPages() {
            if (($this->CurrentFont['type'] == 'TrueTypeUnicode') OR ($this->CurrentFont['type'] == 'cidfont0')) {
                return '{'.$this->AliasNbPages.'}';
            }
            return $this->AliasNbPages;
        }

        public function AliasNumPage($alias='{pnb}') {
            //Define an alias for total number of pages
            $this->AliasNumPage = $alias;
        }
        
        public function getAliasNumPage() {
            if (($this->CurrentFont['type'] == 'TrueTypeUnicode') OR ($this->CurrentFont['type'] == 'cidfont0')) {
                return '{'.$this->AliasNumPage.'}';
            }
            return $this->AliasNumPage;
        }
        
        /*
        * Return the current page in the group.
        * @return current page in the group
        * @access public
        * @since 3.0.000 (2008-03-27)
        */
        public function getGroupPageNo() {
            return $this->pagegroups[$this->currpagegroup];
        }

        public function getGroupPageNoFormatted() {
            return $this->formatPageNumber($this->getGroupPageNo());
        }
        
        /*
         * Return the alias of the current page group
         * If the current font is unicode type, the returned string is surrounded by additional curly braces.
         * (will be replaced by the total number of pages in this group).
         * @return alias of the current page group
         * @access public
         * @since 3.0.000 (2008-03-27)
        */
        public function getPageGroupAlias() {
            if (($this->CurrentFont['type'] == 'TrueTypeUnicode') OR ($this->CurrentFont['type'] == 'cidfont0')) {
                return '{'.$this->currpagegroup.'}';
            }
            return $this->currpagegroup;
        }
        
        /*
         * 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.
         * (will be replaced by the total number of pages in this group).
         * @return alias of the current page group
         * @access public
         * @since 4.5.000 (2009-01-02)
        */
        public function getPageNumGroupAlias() {
            if (($this->CurrentFont['type'] == 'TrueTypeUnicode') OR ($this->CurrentFont['type'] == 'cidfont0')) {
                return '{'.str_replace('{nb', '{pnb', $this->currpagegroup).'}';
            }
            return str_replace('{nb', '{pnb', $this->currpagegroup);
        }

        protected function formatPageNumber($num) {
            return number_format((float)$num, 0, '', '.');
        }

        protected function formatTOCPageNumber($num) {
            return number_format((float)$num, 0, '', '.');
        }

        public function PageNoFormatted() {
            return $this->formatPageNumber($this->PageNo());
        }

        /*
        * Put visibility settings.
        * @access protected
        * @since 3.0.000 (2008-03-27)
        */
        protected function _putocg() {
            $this->_newobj();
            $this->n_ocg_print = $this->n;
            $this->_out('<</Type /OCG /Name '.$this->_textstring('print'));
            $this->_out('/Usage <</Print <</PrintState /ON>> /View <</ViewState /OFF>>>>>>');
            $this->_out('endobj');
            $this->_newobj();
            $this->n_ocg_view=$this->n;
            $this->_out('<</Type /OCG /Name '.$this->_textstring('view'));
            $this->_out('/Usage <</Print <</PrintState /OFF>> /View <</ViewState /ON>>>>>>');
            $this->_out('endobj');
        }
        
        /*
        * 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 string $v visibility mode. Legal values are: all, print, screen.
        * @access public
        * @since 3.0.000 (2008-03-27)
        */
        public function setVisibility($v) {
            if ($this->openMarkedContent) {
                // close existing open marked-content
                $this->_out('EMC');
                $this->openMarkedContent = false;
            }
            switch($v) {
                case 'print': {
                    $this->_out('/OC /OC1 BDC');
                    $this->openMarkedContent = true;
                    break;
                }
                case 'screen': {
                    $this->_out('/OC /OC2 BDC');
                    $this->openMarkedContent = true;
                    break;
                }
                case 'all': {
                    $this->_out('');
                    break;
                }
                default: {
                    $this->Error('Incorrect visibility: '.$v);
                    break;
                }
            }
            $this->visibility = $v;
        }
        
        /*
        * Add transparency parameters to the current extgstate
        * @param array $params parameters
        * @return the number of extgstates
        * @access protected
        * @since 3.0.000 (2008-03-27)
        */
        protected function addExtGState($parms) {
            $n = count($this->extgstates) + 1;
            $this->extgstates[$n]['parms'] = $parms;
            return $n;
        }
        
        /*
        * Add an extgstate
        * @param array $gs extgstate
        * @access protected
        * @since 3.0.000 (2008-03-27)
        */
        protected function setExtGState($gs) {
            $this->_out(sprintf('/GS%d gs', $gs));
        }
        
        /*
        * Put extgstates for object transparency
        * @param array $gs extgstate
        * @access protected
        * @since 3.0.000 (2008-03-27)
        */
        protected function _putextgstates() {
            $ne = count($this->extgstates);
            for ($i = 1; $i <= $ne; ++$i) {
                $this->_newobj();
                $this->extgstates[$i]['n'] = $this->n;
                $this->_out('<</Type /ExtGState');
                foreach ($this->extgstates[$i]['parms'] as $k => $v) {
                    $this->_out('/'.$k.' '.$v);
                }
                $this->_out('>>');
                $this->_out('endobj');
            }
        }
        
        /*
        * Set alpha for stroking (CA) and non-stroking (ca) operations.
        * @param float $alpha real value from 0 (transparent) to 1 (opaque)
        * @param string $bm blend mode, one of the following: Normal, Multiply, Screen, Overlay, Darken, Lighten, ColorDodge, ColorBurn, HardLight, SoftLight, Difference, Exclusion, Hue, Saturation, Color, Luminosity
        * @access public
        * @since 3.0.000 (2008-03-27)
        */
        public function setAlpha($alpha, $bm='Normal') {
            $gs = $this->addExtGState(array('ca' => $alpha, 'CA' => $alpha, 'BM' => '/'.$bm));
            $this->setExtGState($gs);
        }

        /*
        * Set the default JPEG compression quality (1-100)
        * @param int $quality JPEG quality, integer between 1 and 100
        * @access 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 int $cols number of columns
        * @access public
        * @since 3.0.014 (2008-06-04)
        */
        public function setDefaultTableColumns($cols=4) { 
            $this->default_table_columns = intval($cols); 
        }
        
        /*
        * Set the height of cell repect font height.
        * @param int $h cell proportion respect font height (typical value = 1.25).
        * @access 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.
        * @access 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).
        * Default value is 1.t
        * @access public
        * @since 3.1.000 (2008-06-09)
        */
        public function setPDFVersion($version='1.7') { 
            $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 array $preferences array of options.
        * @author Nicola Asuni
        * @access public
        * @since 3.1.000 (2008-06-09)
        */
        public function setViewerPreferences($preferences) { 
            $this->viewer_preferences = $preferences;
        }
        
        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, $col1, $col2, $coords);
        }
        
        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, $col1, $col2, $coords);
        }
        
        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) {
            $this->Clip($x, $y, $w, $h);        
            $n = count($this->gradients) + 1;
            $this->gradients[$n]['type'] = 6; //coons patch mesh
            //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 BitsPerCoordinate
            //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');
        }
        
        protected function Clip($x, $y, $w, $h) {
            if ($this->rtl) {
                $x = $this->w - $x - $w;
            }
            //save current Graphic State
            $s = 'q';
            //set clipping area
            $s .= sprintf(' %.2F %.2F %.2F %.2F 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(' %.3F 0 0 %.3F %.3F %.3F cm', $w*$this->k, $h*$this->k, $x*$this->k, ($this->h-($y+$h))*$this->k);
            $this->_out($s);
        }
                
        protected function Gradient($type, $col1, $col2, $coords) {
            $n = count($this->gradients) + 1;
            $this->gradients[$n]['type'] = $type;
            if (!isset($col1[1])) {
                $col1[1]=$col1[2]=$col1[0];
            }
            $this->gradients[$n]['col1'] = sprintf('%.3F %.3F %.3F', ($col1[0]/255), ($col1[1]/255), ($col1[2]/255));
            if (!isset($col2[1])) {
                $col2[1] = $col2[2] = $col2[0];
            }
            $this->gradients[$n]['col2'] = sprintf('%.3F %.3F %.3F', ($col2[0]/255), ($col2[1]/255), ($col2[2]/255));
            $this->gradients[$n]['coords'] = $coords;
            //paint the gradient
            $this->_out('/Sh'.$n.' sh');
            //restore previous Graphic State
            $this->_out('Q');
        }
        
        function _putshaders() {
            foreach ($this->gradients as $id => $grad) {  
                if (($grad['type'] == 2) OR ($grad['type'] == 3)) {
                    $this->_newobj();
                    $this->_out('<<');
                    $this->_out('/FunctionType 2');
                    $this->_out('/Domain [0.0 1.0]');
                    $this->_out('/C0 ['.$grad['col1'].']');
                    $this->_out('/C1 ['.$grad['col2'].']');
                    $this->_out('/N 1');
                    $this->_out('>>');
                    $this->_out('endobj');
                    $f1 = $this->n;
                }
                $this->_newobj();
                $this->_out('<<');
                $this->_out('/ShadingType '.$grad['type']);
                $this->_out('/ColorSpace /DeviceRGB');
                if ($grad['type'] == 2) {
                    $this->_out(sprintf('/Coords [%.3F %.3F %.3F %.3F]', $grad['coords'][0], $grad['coords'][1], $grad['coords'][2], $grad['coords'][3]));
                    $this->_out('/Function '.$f1.' 0 R');
                    $this->_out('/Extend [true true] ');
                    $this->_out('>>');
                } elseif ($grad['type'] == 3) {
                    //x0, y0, r0, x1, y1, r1
                    //at this this time radius of inner circle is 0
                    $this->_out(sprintf('/Coords [%.3F %.3F 0 %.3F %.3F %.3F]', $grad['coords'][0], $grad['coords'][1], $grad['coords'][2], $grad['coords'][3], $grad['coords'][4]));
                    $this->_out('/Function '.$f1.' 0 R');
                    $this->_out('/Extend [true true] ');
                    $this->_out('>>');
                } elseif ($grad['type'] == 6) {
                    $this->_out('/BitsPerCoordinate 16');
                    $this->_out('/BitsPerComponent 8');
                    $this->_out('/Decode[0 1 0 1 0 1 0 1 0 1]');
                    $this->_out('/BitsPerFlag 8');
                    $this->_out('/Length '.strlen($grad['stream']));
                    $this->_out('>>');
                    $this->_putstream($grad['stream']);
                }
                $this->_out('endobj');
                $this->gradients[$id]['id'] = $this->n;
            }
        }

        protected function _outarc($x1, $y1, $x2, $y2, $x3, $y3 ) {
            $h = $this->h;
            $this->_out(sprintf('%.2F %.2F %.2F %.2F %.2F %.2F c', $x1*$this->k, ($h-$y1)*$this->k, $x2*$this->k, ($h-$y2)*$this->k, $x3*$this->k, ($h-$y3)*$this->k));
        }
        
        public function PieSector($xc, $yc, $r, $a, $b, $style='FD', $cw=true, $o=90) {
            if ($this->rtl) {
                $xc = $this->w - $xc;
            }
            if ($cw) {
                $d = $b;
                $b = $o - $a;
                $a = $o - $d;
            } else {
                $b += $o;
                $a += $o;
            }
            $a = ($a % 360) + 360;
            $b = ($b % 360) + 360;
            if ($a > $b) {
                $b +=360;
            }
            $b = $b / 360 * 2 * M_PI;
            $a = $a / 360 * 2 * M_PI;
            $d = $b - $a;
            if ($d == 0 ) {
                $d = 2 * M_PI;
            }
            $k = $this->k;
            $hp = $this->h;
            if ($style=='F') {
                $op = 'f';
            } elseif ($style=='FD' or $style=='DF') {
                $op = 'b';
            } else {
                $op = 's';
            }
            if (sin($d/2)) {
                $MyArc = 4/3 * (1 - cos($d/2)) / sin($d/2) * $r;
            }
            //first put the center
            $this->_out(sprintf('%.2F %.2F m', ($xc)*$k, ($hp-$yc)*$k));
            //put the first point
            $this->_out(sprintf('%.2F %.2F l', ($xc+$r*cos($a))*$k, (($hp-($yc-$r*sin($a)))*$k)));
            //draw the arc
            if ($d < (M_PI/2)) {
                $this->_outarc($xc+$r*cos($a)+$MyArc*cos(M_PI/2+$a), $yc-$r*sin($a)-$MyArc*sin(M_PI/2+$a), $xc+$r*cos($b)+$MyArc*cos($b-M_PI/2), $yc-$r*sin($b)-$MyArc*sin($b-M_PI/2), $xc+$r*cos($b), $yc-$r*sin($b));
            } else {
                $b = $a + $d/4;
                $MyArc = 4/3*(1-cos($d/8))/sin($d/8)*$r;
                $this->_outarc($xc+$r*cos($a)+$MyArc*cos(M_PI/2+$a), $yc-$r*sin($a)-$MyArc*sin(M_PI/2+$a), $xc+$r*cos($b)+$MyArc*cos($b-M_PI/2), $yc-$r*sin($b)-$MyArc*sin($b-M_PI/2), $xc+$r*cos($b), $yc-$r*sin($b));
                $a = $b;
                $b = $a + $d/4;
                $this->_outarc($xc+$r*cos($a)+$MyArc*cos(M_PI/2+$a), $yc-$r*sin($a)-$MyArc*sin(M_PI/2+$a), $xc+$r*cos($b)+$MyArc*cos($b-M_PI/2), $yc-$r*sin($b)-$MyArc*sin($b-M_PI/2), $xc+$r*cos($b), $yc-$r*sin($b));
                $a = $b;
                $b = $a + $d/4;
                $this->_outarc($xc+$r*cos($a)+$MyArc*cos(M_PI/2+$a), $yc-$r*sin($a)-$MyArc*sin(M_PI/2+$a), $xc+$r*cos($b)+$MyArc*cos($b-M_PI/2), $yc-$r*sin($b)-$MyArc*sin($b-M_PI/2), $xc+$r*cos($b), $yc-$r*sin($b) );
                $a = $b;
                $b = $a + $d/4;
                $this->_outarc($xc+$r*cos($a)+$MyArc*cos(M_PI/2+$a), $yc-$r*sin($a)-$MyArc*sin(M_PI/2+$a), $xc+$r*cos($b)+$MyArc*cos($b-M_PI/2), $yc-$r*sin($b)-$MyArc*sin($b-M_PI/2), $xc+$r*cos($b), $yc-$r*sin($b));
            }
            //terminate drawing
            $this->_out($op);
        }
        
        public function ImageEps($file, $x='', $y='', $w=0, $h=0, $link='', $useBoundingBox=true, $align='', $palign='', $border=0) {
            if ($x === '') {
                $x = $this->x;
            }
            if ($y === '') {
                $y = $this->y;
            }
            $k = $this->k;
            $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 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);
            }
            if ($w > 0) {
                $scale_x = $w / (($x2 - $x1) / $k);
                if ($h > 0) {
                    $scale_y = $h / (($y2 - $y1) / $k);
                } else {
                    $scale_y = $scale_x;
                    $h = ($y2 - $y1) / $k * $scale_y;
                }
            } else {
                if ($h > 0) {
                    $scale_y = $h / (($y2 - $y1) / $k);
                    $scale_x = $scale_y;
                    $w = ($x2-$x1) / $k * $scale_x;
                } else {
                    $w = ($x2 - $x1) / $k;
                    $h = ($y2 - $y1) / $k;
                }
            }
            // Check whether we need a new page first as this does not fit
            if ((($y + $h) > $this->PageBreakTrigger) AND (!$this->InFooter) AND $this->AcceptPageBreak()) {
                // Automatic page break
                $this->AddPage($this->CurOrientation);
                // Reset Y coordinate to the top of next page
                $y = $this->GetY() + $this->cMargin;
            }
            // set bottomcoordinates
            $this->img_rb_y = $y + $h;
            // set alignment
            if ($this->rtl) {
                if ($palign == 'L') {
                    $ximg = $this->lMargin;
                    // set right side coordinate
                    $this->img_rb_x = $ximg + $w;
                } elseif ($palign == 'C') {
                    $ximg = ($this->w - $x - $w) / 2;
                    // set right side coordinate
                    $this->img_rb_x = $ximg + $w;
                } else {
                    $ximg = $this->w - $x - $w;
                    // set left side coordinate
                    $this->img_rb_x = $ximg;
                }
            } else {
                if ($palign == 'R') {
                    $ximg = $this->w - $this->rMargin - $w;
                    // set left side coordinate
                    $this->img_rb_x = $ximg;
                } elseif ($palign == 'C') {
                    $ximg = ($this->w - $x - $w) / 2;
                    // set right side coordinate
                    $this->img_rb_x = $ximg + $w;
                } else {
                    $ximg = $x;
                    // set right side coordinate
                    $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('%.3F %.3F %.3F %.3F %.3F %.3F cm', 1, 0, 0, 1, $dx, $dy + ($this->hPt - (2 * $y * $k) - ($y2 - $y1))));
            // scale
            if (isset($scale_x)) {
                $this->_out(sprintf('%.3F %.3F %.3F %.3F %.3F %.3F cm', $scale_x, 0, 0, $scale_y, $x1 * (1 - $scale_x), $y2 * (1 - $scale_y)));
            }
            // handle pc/unix/mac line endings
            preg_match('/[\r\n]+/s', $data, $regs);
            $lines = explode($regs[0], $data);
            $u=0;
            $cnt = count($lines);
            for ($i=0; $i < $cnt; ++$i) {
                $line = $lines[$i];
                if (($line == '') OR ($line{0} == '%')) {
                    continue;
                }
                $len = strlen($line);
                $chunks = explode(' ', $line);
                $cmd = 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;
                }
                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':
                    case 'v': {
                        $this->_out($line);
                        break;
                    }
                    case 'x': {// custom fill color
                        list($c,$m,$y,$k) = $chunks;
                        $this->_out(''.$c.' '.$m.' '.$y.' '.$k.' k');
                        break;
                    }
                    case 'X': { // custom stroke color
                        list($c,$m,$y,$k) = $chunks;
                        $this->_out(''.$c.' '.$m.' '.$y.' '.$k.' K');
                        break;
                    }
                    case 'Y':
                    case 'N':
                    case 'V':
                    case 'L':
                    case 'C': {
                        $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 = $x;
                $by = $y;
                $this->x = $x;
                $this->y = $y;
                $this->Cell($w, $h, '', $border, 0, '', 0, '', 0);
                $this->x = $bx;
                $this->y = $by;
            }
            if ($link) {
                $this->Link($ximg, $y, $w, $h, $link, 0);
            }
            // set pointer to align the successive 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;
        }
        
        public function setBarcode($bc='') {
            $this->barcode = $bc;
        }
        
        public function getBarcode() {
            return $this->barcode;
        }
        
        public function write1DBarcode($code, $type, $x='', $y='', $w='', $h='', $xres=0.4, $style='', $align='') {
            if ($this->empty_string($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) {
                $this->Error('Error in 1D barcode string');
            }
            // set default values
            if (!isset($style['position'])) {
                if ($this->rtl) {
                    $style['position'] = 'R';
                } else {
                    $style['position'] = 'L';
                }
            }
            if (!isset($style['padding'])) {
                $style['padding'] = 0;
            }
            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;
            }
            if (!isset($style['text'])) {
                $style['text'] = false;
                $fontsize = 0;
            }
            if ($style['text'] AND isset($style['font'])) {
                if (isset($style['fontsize'])) {
                    $fontsize = $style['fontsize'];
                } else {
                    $fontsize = 0;
                }
                $this->SetFont($style['font'], '', $fontsize);
            }
            if (!isset($style['stretchtext'])) {
                $style['stretchtext'] = 4;
            }
            // set foreground color
            $this->SetDrawColorArray($style['fgcolor']);
            $this->SetTextColorArray($style['fgcolor']);
            if ($this->empty_string($w) OR ($w <= 0)) {
                if ($this->rtl) {
                    $w = $this->x - $this->lMargin;
                } else {
                    $w = $this->w - $this->rMargin - $this->x;
                }
            }
            if ($this->empty_string($x)) {
                $x = $this->GetX();
            }
            if ($this->rtl) {
                $x = $this->w - $x;
            }
            if ($this->empty_string($y)) {
                $y = $this->GetY();
            }
            if ($this->empty_string($xres)) {
                $xres = 0.4;
            }
            $fbw = ($arrcode['maxw'] * $xres) + (2 * $style['padding']);
            $extraspace = ($this->cell_height_ratio * $fontsize / $this->k) + (2 * $style['padding']);
            if ($this->empty_string($h) OR ($h <= 0)) {
                $h = 10 + $extraspace;
            }
            if ($this->checkPageBreak($h)) {
                $y = $this->y;
            }
            // maximum bar heigth
            $barh = $h - $extraspace;
            switch ($style['position']) {
                case 'L': { // left
                    if ($this->rtl) {
                        $xpos = $x - $w;
                    } else {
                        $xpos = $x;
                    }
                    break;
                }
                case 'C': { // center
                    $xdiff = (($w - $fbw) / 2);
                    if ($this->rtl) {
                        $xpos = $x - $w + $xdiff;
                    } else {
                        $xpos = $x + $xdiff;
                    }
                    break;
                }
                case 'R': { // right
                    if ($this->rtl) {
                        $xpos = $x - $fbw;
                    } else {
                        $xpos = $x + $w - $fbw;
                    }
                    break;
                }
                case 'S': { // stretch
                    $fbw = $w;
                    $xres = ($w - (2 * $style['padding'])) / $arrcode['maxw'];
                    if ($this->rtl) {
                        $xpos = $x - $w;
                    } else {
                        $xpos = $x;
                    }
                    break;
                }
            }
            $xpos_rect = $xpos;
            $xpos = $xpos_rect + $style['padding'];
            $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, $fbw, $h, 'DF', '', $style['bgcolor']);
            } elseif ($style['border']) {
                $this->Rect($xpos_rect, $y, $fbw, $h, 'D');
            }
            // print bars
            if ($arrcode !== false) {
                foreach ($arrcode['bcode'] as $k => $v) {
                    $bw = ($v['w'] * $xres);
                    if ($v['t']) {
                        // draw a vertical bar
                        $ypos = $y + $style['padding'] + ($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']) {
                // print text
                $this->x = $xpos_text;
                $this->y = $y + $style['padding'] + $barh; 
                $this->Cell(($arrcode['maxw'] * $xres), ($this->cell_height_ratio * $fontsize / $this->k), $code, 0, 0, 'C', 0, '', $style['stretchtext']);
            }
            // restore original direction
            $this->rtl = $tempRTL;
            // restore previous settings
            $this->setGraphicVars($gvars);
            // set bottomcoordinates
            $this->img_rb_y = $y + $h;
            if ($this->rtl) {
                // set left side coordinate
                $this->img_rb_x = ($this->w - $x - $w);
            } else {
                // set right side coordinate
                $this->img_rb_x = $x + $w;
            }
            // set pointer to align the successive 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;
                }
            }
        }
        
        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' => 'L',
                '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, '');
        }
        
        public function write2DBarcode($code, $type, $x='', $y='', $w='', $h='', $style='', $align='') {
            if ($this->empty_string($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) {
                $this->Error('Error in 2D barcode string');
            }
            // set default values
            if (!isset($style['padding'])) {
                $style['padding'] = 0;
            }
            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;
            }
            // set foreground color
            $this->SetDrawColorArray($style['fgcolor']);
            if ($this->empty_string($x)) {
                $x = $this->GetX();
            }
            if ($this->rtl) {
                $x = $this->w - $x;
            }
            if ($this->empty_string($y)) {
                $y = $this->GetY();
            }
            if ($this->empty_string($w) OR ($w <= 0)) {
                if ($this->rtl) {
                    $w = $x - $this->lMargin;
                } else {
                    $w = $this->w - $this->rMargin - $x;
                }
            }
            if ($this->empty_string($h) OR ($h <= 0)) {
                // 2d barcodes are square by default
                $h = $w;
            }
            if ($this->checkPageBreak($h)) {
                $y = $this->y;
            }
            // calculate barcode size (excluding padding)
            $bw = $w - (2 * $style['padding']);
            $bh = $h - (2 * $style['padding']);
            // calculate starting coordinates
            if ($this->rtl) {
                $xpos = $x - $w;
            } else {
                $xpos = $x;
            }
            $xpos += $style['padding'];
            $ypos = $y + $style['padding'];
            // barcode is always printed in LTR direction
            $tempRTL = $this->rtl;
            $this->rtl = false;
            // print background color
            if ($style['bgcolor']) {
                $this->Rect($x, $y, $w, $h, 'DF', '', $style['bgcolor']);
            } elseif ($style['border']) {
                $this->Rect($x, $y, $w, $h, 'D');
            }
            // print barcode cells
            if ($arrcode !== false) {
                $rows = $arrcode['num_rows'];
                $cols = $arrcode['num_cols'];
                // calculate dimension of single barcode cell
                $cw = $bw / $cols;
                $ch = $bh / $rows;
                // for each row
                for ($r = 0; $r < $rows; ++$r) {
                    $xr = $xpos;
                    // for each column
                    for ($c = 0; $c < $cols; ++$c) {
                        if ($arrcode['bcode'][$r][$c] == 1) {
                            // draw a single barcode cell
                            $this->Rect($xr, $ypos, $cw, $ch, 'F', array(), $style['fgcolor']);
                        }
                        $xr += $cw;
                    }
                    $ypos += $ch;
                }
            }
            // restore original direction
            $this->rtl = $tempRTL;
            // restore previous settings
            $this->setGraphicVars($gvars);
            // set bottomcoordinates
            $this->img_rb_y = $y + $h;
            if ($this->rtl) {
                // set left side coordinate
                $this->img_rb_x = ($this->w - $x - $w);
            } else {
                // set right side coordinate
                $this->img_rb_x = $x + $w;
            }
            // set pointer to align the successive 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;
                }
            }
        }
        
        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->cMargin,
            );
            return $ret;
        }
        
        public function getOriginalMargins() {
            $ret = array(
                'left' => $this->original_lMargin,
                'right' => $this->original_rMargin
            );
            return $ret;
        }
        
        public function getFontSize() {
            return $this->FontSize;
        }
        
        public function getFontSizePt() {
            return $this->FontSizePt;
        }

        public function getFontFamily() {
            return $this->FontFamily;
        }

        public function getFontStyle() {
            return $this->FontStyle;
        }
        
        public function writeHTMLCell($w, $h, $x, $y, $html='', $border=0, $ln=0, $fill=0, $reseth=true, $align='', $autopadding=true) {
            return $this->MultiCell($w, $h, $html, $border, $align, $fill, $ln, $x, $y, $reseth, 0, true, $autopadding, 0);
        }
        
        protected function getHtmlDomArray($html) {
            // remove all unsupported tags (the line below lists all supported tags)
            $html = strip_tags($html, '<marker/><a><b><blockquote><br><br/><dd><del><div><dl><dt><em><font><h1><h2><h3><h4><h5><h6><hr><i><img><li><ol><p><pre><small><span><strong><sub><sup><table><tcpdf><td><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|blockquote|dd|div|dt|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);
            while (preg_match("'<xre([^>]*)>(.*?)\n(.*?)</pre>'si", $html)) {
                // preserve newlines on <pre> tag
                $html = preg_replace("'<xre([^>]*)>(.*?)\n(.*?)</pre>'si", "<xre\\1>\\2<br />\\3</pre>", $html);
            }
            $html = str_replace("\n", ' ', $html);
            // remove extra spaces from code
            $html = preg_replace('/[\s]+<\/(table|tr|td|th|ul|ol|li)>/', '</\\1>', $html);
            $html = preg_replace('/[\s]+<(tr|td|th|ul|ol|li|br)/', '<\\1', $html);
            $html = preg_replace('/<\/(table|tr|td|th|blockquote|dd|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('/<img/', ' <img', $html);
            $html = preg_replace('/<img([^>]*)>/xi', '<img\\1><span></span>', $html);
            $html = preg_replace('/<xre/', '<pre', $html); // restore pre tag
            // trim string
            $html = preg_replace('/^[\s]+/', '', $html);
            $html = preg_replace('/[\s]+$/', '', $html);
            // 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 first void element
            $dom[$key]['tag'] = false;
            $dom[$key]['value'] = '';
            $dom[$key]['parent'] = 0;
            $dom[$key]['fontname'] = $this->FontFamily;
            $dom[$key]['fontstyle'] = $this->FontStyle;
            $dom[$key]['fontsize'] = $this->FontSizePt;
            $dom[$key]['bgcolor'] = false;
            $dom[$key]['fgcolor'] = $this->fgcolor;
            $dom[$key]['align'] = '';
            $dom[$key]['listtype'] = '';
            $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 ($element{0} == '/') {
                        // closing html tag
                        $dom[$key]['opening'] = false;
                        $dom[$key]['parent'] = end($level);
                        array_pop($level);
                        $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]['bgcolor'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['bgcolor'];
                        $dom[$key]['fgcolor'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['fgcolor'];
                        $dom[$key]['align'] = $dom[($dom[($dom[$key]['parent'])]['parent'])]['align'];
                        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'] = '';
                            for ($i = ($dom[$key]['parent'] + 1); $i < $key; ++$i) {
                                $dom[($dom[$key]['parent'])]['content'] .= $a[$dom[$i]['elkey']];
                            }
                            $key = $i;
                        }
                        // 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'] = $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 (($dom[$key]['value'] == 'table') AND (!$this->empty_string($dom[($dom[$key]['parent'])]['thead']))) {
                            $dom[($dom[$key]['parent'])]['thead'] .= '</table>';
                        }
                    } else {
                        // opening html tag
                        $dom[$key]['opening'] = true;
                        $dom[$key]['parent'] = end($level);
                        if (substr($element, -1, 1) != '/') {
                            // not self-closing tag
                            array_push($level, $key);
                            $dom[$key]['self'] = false;
                        } else {
                            $dom[$key]['self'] = true;
                        }
                        // copy some values from parent
                        $parentkey = 0;
                        if ($key > 0) {
                            $parentkey = $dom[$key]['parent'];
                            $dom[$key]['fontname'] = $dom[$parentkey]['fontname'];
                            $dom[$key]['fontstyle'] = $dom[$parentkey]['fontstyle'];
                            $dom[$key]['fontsize'] = $dom[$parentkey]['fontsize'];
                            $dom[$key]['bgcolor'] = $dom[$parentkey]['bgcolor'];
                            $dom[$key]['fgcolor'] = $dom[$parentkey]['fgcolor'];
                            $dom[$key]['align'] = $dom[$parentkey]['align'];
                            $dom[$key]['listtype'] = $dom[$parentkey]['listtype'];
                        }
                        // get attributes
                        preg_match_all('/([^=\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];
                        }
                        // split style attributes
                        if (isset($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])) {
                                $dom[$key]['style'][strtolower($name)] = trim($style_array[2][$id]);
                            }
                            // --- get some style attributes ---
                            if (isset($dom[$key]['style']['font-family'])) {
                                // font family
                                if (isset($dom[$key]['style']['font-family'])) {
                                    $fontslist = split(',', strtolower($dom[$key]['style']['font-family']));
                                    foreach ($fontslist as $font) {
                                        $font = trim(strtolower($font));
                                        if (in_array($font, $this->fontlist) OR in_array($font, $this->fontkeys)) {
                                            $dom[$key]['fontname'] = $font;
                                            break;
                                        }
                                    }
                                }
                            }
                            // 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'];
                                }
                            }
                            // 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 style
                            if (isset($dom[$key]['style']['font-weight']) AND (strtolower($dom[$key]['style']['font-weight']{0}) == 'b')) {
                                $dom[$key]['fontstyle'] .= 'B';
                            }
                            if (isset($dom[$key]['style']['font-style']) AND (strtolower($dom[$key]['style']['font-style']{0}) == 'i')) {
                                $dom[$key]['fontstyle'] .= '"I';
                            }
                            // font color
                            if (isset($dom[$key]['style']['color']) AND (!$this->empty_string($dom[$key]['style']['color']))) {
                                $dom[$key]['fgcolor'] = $this->convertHTMLColorToDec($dom[$key]['style']['color']);
                            }
                            // background color
                            if (isset($dom[$key]['style']['background-color']) AND (!$this->empty_string($dom[$key]['style']['background-color']))) {
                                $dom[$key]['bgcolor'] = $this->convertHTMLColorToDec($dom[$key]['style']['background-color']);
                            }
                            // text-decoration
                            if (isset($dom[$key]['style']['text-decoration'])) {
                                $decors = explode(' ', strtolower($dom[$key]['style']['text-decoration']));
                                foreach ($decors as $dec) {
                                    $dec = trim($dec);
                                    if (!$this->empty_string($dec)) {
                                        if ($dec{0} == 'u') {
                                            $dom[$key]['fontstyle'] .= 'U';
                                        } elseif ($dec{0} == 'l') {
                                            $dom[$key]['fontstyle'] .= 'D';
                                        }
                                    }
                                }
                            }
                            // check for width attribute
                            if (isset($dom[$key]['style']['width'])) {
                                $dom[$key]['width'] = $dom[$key]['style']['width'];
                            }
                            // check for height attribute
                            if (isset($dom[$key]['style']['height'])) {
                                $dom[$key]['height'] = $dom[$key]['style']['height'];
                            }
                            // check for text alignment
                            if (isset($dom[$key]['style']['text-align'])) {
                                $dom[$key]['align'] = strtoupper($dom[$key]['style']['text-align']{0});
                            }
                            // check for border attribute
                            if (isset($dom[$key]['style']['border'])) {
                                $dom[$key]['attribute']['border'] = $dom[$key]['style']['border'];
                            }
                        }
                        // check for font tag
                        if ($dom[$key]['value'] == 'font') {
                            // font family
                            if (isset($dom[$key]['attribute']['face'])) {
                                $fontslist = split(',', strtolower($dom[$key]['attribute']['face']));
                                foreach ($fontslist as $font) {
                                    $font = trim(strtolower($font));
                                    if (in_array($font, $this->fontlist) OR in_array($font, $this->fontkeys)) {
                                        $dom[$key]['fontname'] = $font;
                                        break;
                                    }
                                }
                            }
                            // font size
                            if (isset($dom[$key]['attribute']['size'])) {
                                if ($key > 0) {
                                    if ($dom[$key]['attribute']['size']{0} == '+') {
                                        $dom[$key]['fontsize'] = $dom[($dom[$key]['parent'])]['fontsize'] + intval(substr($dom[$key]['attribute']['size'], 1));
                                    } elseif ($dom[$key]['attribute']['size']{0} == '-') {
                                        $dom[$key]['fontsize'] = $dom[($dom[$key]['parent'])]['fontsize'] - intval(substr($dom[$key]['attribute']['size'], 1));
                                    } else {
                                        $dom[$key]['fontsize'] = intval($dom[$key]['attribute']['size']);
                                    }
                                } else {
                                    $dom[$key]['fontsize'] = intval($dom[$key]['attribute']['size']);
                                }
                            }
                        }
                        // force natural alignment for lists
                        if ((($dom[$key]['value'] == 'ul') OR ($dom[$key]['value'] == 'ol') OR ($dom[$key]['value'] == 'dl'))
                            AND (!isset($dom[$key]['align']) OR $this->empty_string($dom[$key]['align']) OR ($dom[$key]['align'] != 'J'))) {
                            if ($this->rtl) {
                                $dom[$key]['align'] = 'R';
                            } else {
                                $dom[$key]['align'] = 'L';
                            }
                        }
                        if (($dom[$key]['value'] == 'small') OR ($dom[$key]['value'] == 'sup') OR ($dom[$key]['value'] == 'sub')) {
                            $dom[$key]['fontsize'] = $dom[$key]['fontsize'] * K_SMALL_RATIO;
                        }
                        if (($dom[$key]['value'] == 'strong') OR ($dom[$key]['value'] == 'b')) {
                            $dom[$key]['fontstyle'] .= 'B';
                        }
                        if (($dom[$key]['value'] == 'em') OR ($dom[$key]['value'] == 'i')) {
                            $dom[$key]['fontstyle'] .= 'I';
                        }
                        if ($dom[$key]['value'] == 'u') {
                            $dom[$key]['fontstyle'] .= 'U';
                        }
                        if ($dom[$key]['value'] == 'del') {
                            $dom[$key]['fontstyle'] .= 'D';
                        }
                        if (($dom[$key]['value'] == 'pre') OR ($dom[$key]['value'] == 'tt')) {
                            $dom[$key]['fontname'] = $this->default_monospaced_font;
                        }
                        if (($dom[$key]['value']{0} == 'h') AND (intval($dom[$key]['value']{1}) > 0) AND (intval($dom[$key]['value']{1}) < 7)) {
                            $headsize = (4 - intval($dom[$key]['value']{1})) * 2;
                            $dom[$key]['fontsize'] = $dom[0]['fontsize'] + $headsize;
                            $dom[$key]['fontstyle'] .= 'B';
                        }
                        if (($dom[$key]['value'] == 'table')) {
                            $dom[$key]['rows'] = 0; // number of rows
                            $dom[$key]['trids'] = array(); // IDs of TR elements
                            $dom[$key]['thead'] = ''; // table header rows
                        }
                        if (($dom[$key]['value'] == 'tr')) {
                            $dom[$key]['cols'] = 0;
                            // store the number of rows on table element
                            ++$dom[($dom[$key]['parent'])]['rows'];
                            // store the TR elements IDs on table element
                            array_push($dom[($dom[$key]['parent'])]['trids'], $key);
                            if ($thead) {
                                $dom[$key]['thead'] = true;
                            } else {
                                $dom[$key]['thead'] = false;
                            }
                        }
                        if (($dom[$key]['value'] == 'th') OR ($dom[$key]['value'] == 'td')) {
                            if (isset($dom[$key]['attribute']['colspan'])) {
                                $colspan = intval($dom[$key]['attribute']['colspan']);
                            } else {
                                $colspan = 1;
                            }
                            $dom[$key]['attribute']['colspan'] = $colspan;
                            $dom[($dom[$key]['parent'])]['cols'] += $colspan;
                        }
                        // set foreground color attribute
                        if (isset($dom[$key]['attribute']['color']) AND (!$this->empty_string($dom[$key]['attribute']['color']))) {
                            $dom[$key]['fgcolor'] = $this->convertHTMLColorToDec($dom[$key]['attribute']['color']);
                        }
                        // set background color attribute
                        if (isset($dom[$key]['attribute']['bgcolor']) AND (!$this->empty_string($dom[$key]['attribute']['bgcolor']))) {
                            $dom[$key]['bgcolor'] = $this->convertHTMLColorToDec($dom[$key]['attribute']['bgcolor']);
                        }
                        // check for width attribute
                        if (isset($dom[$key]['attribute']['width'])) {
                            $dom[$key]['width'] = $dom[$key]['attribute']['width'];
                        }
                        // check for height attribute
                        if (isset($dom[$key]['attribute']['height'])) {
                            $dom[$key]['height'] = $dom[$key]['attribute']['height'];
                        }
                        // check for text alignment
                        if (isset($dom[$key]['attribute']['align']) AND (!$this->empty_string($dom[$key]['attribute']['align'])) AND ($dom[$key]['value'] !== 'img')) {
                            $dom[$key]['align'] = strtoupper($dom[$key]['attribute']['align']{0});
                        }
                    } // end opening tag
                } else {
                    // text
                    $dom[$key]['tag'] = false;
                    $dom[$key]['value'] = stripslashes($this->unhtmlentities($element));
                    $dom[$key]['parent'] = end($level);
                }
                ++$elkey;
                ++$key;
            }
            return $dom;
        }
        
        public function writeHTML($html, $ln=true, $fill=false, $reseth=false, $cell=false, $align='') {
            $gvars = $this->getGraphicVars();
            // store current values
            $prevPage = $this->page;
            $prevlMargin = $this->lMargin;
            $prevrMargin = $this->rMargin;
            $curfontname = $this->FontFamily;
            $curfontstyle = $this->FontStyle;
            $curfontsize = $this->FontSizePt;   
            $this->newline = true;
            $minstartliney = $this->y;
            $yshift = 0;
            $startlinepage = $this->page;
            $newline = true;
            $loop = 0;
            $curpos = 0;
            $blocktags = array('blockquote','br','dd','div','dt','h1','h2','h3','h4','h5','h6','hr','li','ol','p','ul');
            $this->premode = false;
            if (isset($this->PageAnnots[$this->page])) {
                $pask = count($this->PageAnnots[$this->page]);
            } else {
                $pask = 0;
            }
            if (isset($this->footerlen[$this->page])) {
                $this->footerpos[$this->page] = $this->pagelen[$this->page] - $this->footerlen[$this->page];
            } else {
                $this->footerpos[$this->page] = $this->pagelen[$this->page];
            }
            $startlinepos = $this->footerpos[$this->page];
            $lalign = $align;
            $plalign = $align;
            if ($this->rtl) {
                $w = $this->x - $this->lMargin;
            } else {
                $w = $this->w - $this->rMargin - $this->x;
            }
            $w -= (2 * $this->cMargin);
            if ($cell) {
                if ($this->rtl) {
                    $this->x -= $this->cMargin;
                } else {
                    $this->x += $this->cMargin;
                }
            }
            if ($this->customlistindent >= 0) {
                $this->listindent = $this->customlistindent;
            } else {
                $this->listindent = $this->GetStringWidth('0000');
            }
            $this->listnum = 0;
            if (($this->empty_string($this->lasth)) OR ($reseth)) {
                //set row height
                $this->lasth = $this->FontSize * $this->cell_height_ratio; 
            }
            $dom = $this->getHtmlDomArray($html);
            $maxel = count($dom);
            $key = 0;
            while ($key < $maxel) {
                if ($dom[$key]['tag'] OR ($key == 0)) {
                    if ((($dom[$key]['value'] == 'table') OR ($dom[$key]['value'] == 'tr')) AND (isset($dom[$key]['align']))) {
                        $dom[$key]['align'] = ($this->rtl) ? 'R' : 'L';
                    }
                    // vertically align image in line
                    if ((!$this->newline)
                        AND ($dom[$key]['value'] == 'img')
                        AND (isset($dom[$key]['attribute']['height']))
                        AND ($dom[$key]['attribute']['height'] > 0)
                        AND (!((($this->y + $this->getHTMLUnitToUnits($dom[$key]['attribute']['height'], $this->lasth, 'px')) > $this->PageBreakTrigger)
                            AND (!$this->InFooter)
                            AND $this->AcceptPageBreak()))
                        ) {
                        if ($this->page > $startlinepage) {
                            // fix lines splitted over two pages
                            if (isset($this->footerlen[$startlinepage])) {
                                $curpos = $this->pagelen[$startlinepage] - $this->footerlen[$startlinepage];
                            }
                            // line to be moved one page forward
                            $pagebuff = $this->getPageBuffer($startlinepage);
                            $linebeg = substr($pagebuff, $startlinepos, ($curpos - $startlinepos));
                            $tstart = substr($pagebuff, 0, $startlinepos);
                            $tend = substr($this->getPageBuffer($startlinepage), $curpos);
                            // remove line start from previous page
                            $this->setPageBuffer($startlinepage, $tstart.''.$tend);
                            $pagebuff = $this->getPageBuffer($this->page);
                            $tstart = substr($pagebuff, 0, $this->intmrk[$this->page]);
                            $tend = substr($pagebuff, $this->intmrk[$this->page]);
                            // add line start to current page
                            $yshift = $minstartliney - $this->y;
                            $try = sprintf('1 0 0 1 0 %.3F cm', ($yshift * $this->k));
                            $this->setPageBuffer($this->page, $tstart."\nq\n".$try."\n".$linebeg."\nQ\n".$tend);
                            // shift the annotations and links
                            if (isset($this->PageAnnots[$startlinepage])) {
                                foreach ($this->PageAnnots[$startlinepage] as $pak => $pac) {
                                    if ($pak >= $pask) {
                                        $this->PageAnnots[$this->page][] = $pac;
                                        unset($this->PageAnnots[$startlinepage][$pak]);
                                        $npak = count($this->PageAnnots[$this->page]) - 1;
                                        $this->PageAnnots[$this->page][$npak]['y'] -= $yshift;
                                    }
                                }
                            }
                        }
                        $this->y += (($curfontsize / $this->k) - $this->getHTMLUnitToUnits($dom[$key]['attribute']['height'], $this->lasth, 'px'));
                        $minstartliney = min($this->y, $minstartliney);
                    } elseif (isset($dom[$key]['fontname']) OR isset($dom[$key]['fontstyle']) OR isset($dom[$key]['fontsize'])) {
                        // account for different font size
                        $pfontname = $curfontname;
                        $pfontstyle = $curfontstyle;
                        $pfontsize = $curfontsize;
                        $fontname = isset($dom[$key]['fontname']) ? $dom[$key]['fontname'] : $curfontname;
                        $fontstyle = isset($dom[$key]['fontstyle']) ? $dom[$key]['fontstyle'] : $curfontstyle;
                        $fontsize = isset($dom[$key]['fontsize']) ? $dom[$key]['fontsize'] : $curfontsize;
                        if (($fontname != $curfontname) OR ($fontstyle != $curfontstyle) OR ($fontsize != $curfontsize)) {
                            $this->SetFont($fontname, $fontstyle, $fontsize);
                            $this->lasth = $this->FontSize * $this->cell_height_ratio;
                            if (is_numeric($fontsize) AND ($fontsize > 0)
                                AND is_numeric($curfontsize) AND ($curfontsize > 0)
                                AND ($fontsize != $curfontsize) AND (!$this->newline)
                                AND ($key < ($maxel - 1))
                                ) {
                                if ((!$this->newline) AND ($this->page > $startlinepage)) {
                                    // fix lines splitted over two pages
                                    if (isset($this->footerlen[$startlinepage])) {
                                        $curpos = $this->pagelen[$startlinepage] - $this->footerlen[$startlinepage];
                                    }
                                    // line to be moved one page forward
                                    $pagebuff = $this->getPageBuffer($startlinepage);
                                    $linebeg = substr($pagebuff, $startlinepos, ($curpos - $startlinepos));
                                    $tstart = substr($pagebuff, 0, $startlinepos);
                                    $tend = substr($this->getPageBuffer($startlinepage), $curpos);
                                    // remove line start from previous page
                                    $this->setPageBuffer($startlinepage, $tstart.''.$tend);
                                    $pagebuff = $this->getPageBuffer($this->page);
                                    $tstart = substr($pagebuff, 0, $this->intmrk[$this->page]);
                                    $tend = substr($pagebuff, $this->intmrk[$this->page]);
                                    // add line start to current page
                                    $yshift = $minstartliney - $this->y;
                                    $try = sprintf('1 0 0 1 0 %.3F cm', ($yshift * $this->k));
                                    $this->setPageBuffer($this->page, $tstart."\nq\n".$try."\n".$linebeg."\nQ\n".$tend);
                                    // shift the annotations and links
                                    if (isset($this->PageAnnots[$startlinepage])) {
                                        foreach ($this->PageAnnots[$startlinepage] as $pak => $pac) {
                                            if ($pak >= $pask) {
                                                $this->PageAnnots[$this->page][] = $pac;
                                                unset($this->PageAnnots[$startlinepage][$pak]);
                                                $npak = count($this->PageAnnots[$this->page]) - 1;
                                                $this->PageAnnots[$this->page][$npak]['y'] -= $yshift;
                                            }
                                        }
                                    }
                                }
                                $this->y += (($curfontsize - $fontsize) / $this->k);
                                $minstartliney = min($this->y, $minstartliney);
                            }
                            $curfontname = $fontname;
                            $curfontstyle = $fontstyle;
                            $curfontsize = $fontsize;
                        }
                    }
                    if (($plalign == 'J') AND (in_array($dom[$key]['value'], $blocktags))) {
                        $plalign = '';
                    }
                    // get current position on page buffer
                    $curpos = $this->pagelen[$startlinepage];
                    if (isset($dom[$key]['bgcolor']) AND ($dom[$key]['bgcolor'] !== false)) {
                        $this->SetFillColorArray($dom[$key]['bgcolor']);
                        $wfill = true;
                    } else {
                        $wfill = $fill | false;
                    }
                    if (isset($dom[$key]['fgcolor']) AND ($dom[$key]['fgcolor'] !== false)) {
                        $this->SetTextColorArray($dom[$key]['fgcolor']);
                    }
                    if (isset($dom[$key]['align'])) {
                        $lalign = $dom[$key]['align'];
                    }
                    if ($this->empty_string($lalign)) {
                        $lalign = $align;
                    }
                }
                // align lines
                if ($this->newline AND (strlen($dom[$key]['value']) > 0) AND ($dom[$key]['value'] != 'td') AND ($dom[$key]['value'] != 'th')) {
                    $newline = true;
                    // we are at the beginning of a new line
                    if (isset($startlinex)) {
                        $yshift = $minstartliney - $startliney;
                        if (($yshift > 0) OR ($this->page > $startlinepage)) {
                            $yshift = 0;
                        }
                        if ((isset($plalign) AND ((($plalign == 'C') OR ($plalign == 'J') OR (($plalign == 'R') AND (!$this->rtl)) OR (($plalign == 'L') AND ($this->rtl))))) OR ($yshift < 0)) {
                            // the last line must be shifted to be aligned as requested
                            $linew = abs($this->endlinex - $startlinex);
                            $pstart = substr($this->getPageBuffer($startlinepage), 0, $startlinepos);
                            if (isset($opentagpos) AND isset($this->footerlen[$startlinepage]) AND (!$this->InFooter)) {
                                $this->footerpos[$startlinepage] = $this->pagelen[$startlinepage] - $this->footerlen[$startlinepage];
                                $midpos = min($opentagpos, $this->footerpos[$startlinepage]);
                            } elseif (isset($opentagpos)) {
                                $midpos = $opentagpos;
                            } elseif (isset($this->footerlen[$startlinepage]) AND (!$this->InFooter)) {
                                $this->footerpos[$startlinepage] = $this->pagelen[$startlinepage] - $this->footerlen[$startlinepage];
                                $midpos = $this->footerpos[$startlinepage];
                            } else {
                                $midpos = 0;
                            }
                            if ($midpos > 0) {
                                $pmid = substr($this->getPageBuffer($startlinepage), $startlinepos, ($midpos - $startlinepos));
                                $pend = substr($this->getPageBuffer($startlinepage), $midpos);
                            } else {
                                $pmid = substr($this->getPageBuffer($startlinepage), $startlinepos);
                                $pend = '';
                            }
                            // calculate shifting amount
                            $tw = $w;
                            if ($this->lMargin != $prevlMargin) {
                                $tw += ($prevlMargin - $this->lMargin);
                            }
                            if ($this->rMargin != $prevrMargin) {
                                $tw += ($prevrMargin - $this->rMargin);
                            }
                            $mdiff = abs($tw - $linew);
                            $t_x = 0;
                            if ($plalign == 'C') {
                                if ($this->rtl) {
                                    $t_x = -($mdiff / 2);
                                } else {
                                    $t_x = ($mdiff / 2);
                                }
                            } elseif (($plalign == 'R') AND (!$this->rtl)) {
                                // right alignment on LTR document
                                $t_x = $mdiff;  
                            } elseif (($plalign == 'L') AND ($this->rtl)) {
                                // left alignment on RTL document
                                $t_x = -$mdiff;
                            } elseif (($plalign == 'J') AND ($plalign == $lalign)) {
                                // Justification
                                if ($this->rtl OR $this->tmprtl) {
                                    $t_x = $this->lMargin - $this->endlinex;
                                }
                                $no = 0;
                                $ns = 0;
                                $pmidtemp = $pmid;
                                // escape special characters
                                $pmidtemp = preg_replace('/[\\\][\(]/x', '\\#!#OP#!#', $pmidtemp);
                                $pmidtemp = preg_replace('/[\\\][\)]/x', '\\#!#CP#!#', $pmidtemp);
                                // search spaces
                                if (preg_match_all('/\[\(([^\)]*)\)\]/x', $pmidtemp, $lnstring, PREG_PATTERN_ORDER)) {
                                    $maxkk = count($lnstring[1]) - 1;
                                    for ($kk=0; $kk <= $maxkk; ++$kk) {
                                        // restore special characters
                                        $lnstring[1][$kk] = str_replace('#!#OP#!#', '(', $lnstring[1][$kk]);
                                        $lnstring[1][$kk] = str_replace('#!#CP#!#', ')', $lnstring[1][$kk]);
                                        if ($kk == $maxkk) {
                                            if ($this->rtl OR $this->tmprtl) {
                                                $tvalue = ltrim($lnstring[1][$kk]);
                                            } else {
                                                $tvalue = rtrim($lnstring[1][$kk]);
                                            }
                                        } else {
                                            $tvalue = $lnstring[1][$kk];
                                        }
                                        // count spaces on line
                                        $no += substr_count($lnstring[1][$kk], chr(32));
                                        $ns += substr_count($tvalue, chr(32));
                                    }
                                    if ($this->rtl OR $this->tmprtl) {
                                        $t_x = $this->lMargin - $this->endlinex - (($no - $ns - 1) * $this->GetStringWidth(chr(32)));
                                    }
                                    // calculate additional space to add to each space
                                    $spacewidth = (($tw - $linew + (($no - $ns) * $this->GetStringWidth(chr(32)))) / ($ns?$ns:1)) * $this->k;
                                    $spacewidthu = ($tw - $linew + ($no * $this->GetStringWidth(chr(32)))) / ($ns?$ns:1) / $this->FontSize / $this->k;
                                    $nsmax = $ns;
                                    $ns = 0;
                                    reset($lnstring);
                                    $offset = 0;
                                    $strcount = 0;
                                    $prev_epsposbeg = 0;
                                    global $spacew;
                                    while (preg_match('/([0-9\.\+\-]*)[\s](Td|cm|m|l|c|re)[\s]/x', $pmid, $strpiece, PREG_OFFSET_CAPTURE, $offset) == 1) {
                                        if ($this->rtl OR $this->tmprtl) {
                                            $spacew = ($spacewidth * ($nsmax - $ns));
                                        } else {
                                            $spacew = ($spacewidth * $ns);
                                        }
                                        $offset = $strpiece[2][1] + strlen($strpiece[2][0]);
                                        $epsposbeg = strpos($pmid, 'q'.$this->epsmarker, $offset);
                                        $epsposend = strpos($pmid, $this->epsmarker.'Q', $offset) + strlen($this->epsmarker.'Q');
                                        if ((($epsposbeg > 0) AND ($epsposend > 0) AND ($offset > $epsposbeg) AND ($offset < $epsposend))
                                            OR (($epsposbeg === false) AND ($epsposend > 0) AND ($offset < $epsposend))) {
                                            // shift EPS images
                                            $trx = sprintf('1 0 0 1 %.3F 0 cm', $spacew);
                                            $epsposbeg = strpos($pmid, 'q'.$this->epsmarker, ($prev_epsposbeg - 6));
                                            $pmid_b = substr($pmid, 0, $epsposbeg);
                                            $pmid_m = substr($pmid, $epsposbeg, ($epsposend - $epsposbeg));
                                            $pmid_e = substr($pmid, $epsposend);
                                            $pmid = $pmid_b."\nq\n".$trx."\n".$pmid_m."\nQ\n".$pmid_e;
                                            $offset = $epsposend;
                                            continue;
                                        }
                                        $prev_epsposbeg = $epsposbeg;
                                        $currentxpos = 0;
                                        // shift blocks of code
                                        switch ($strpiece[2][0]) {
                                            case 'Td':
                                            case 'cm':
                                            case 'm':
                                            case 'l': {
                                                // get current X position
                                                preg_match('/([0-9\.\+\-]*)[\s]('.$strpiece[1][0].')[\s]('.$strpiece[2][0].')([\s]*)/x', $pmid, $xmatches);
                                                $currentxpos = $xmatches[1];
                                                if (($strcount <= $maxkk) AND ($strpiece[2][0] == 'Td')) {
                                                    if ($strcount == $maxkk) {
                                                        if ($this->rtl OR $this->tmprtl) {
                                                            $tvalue = $lnstring[1][$strcount];
                                                        } else {
                                                            $tvalue = rtrim($lnstring[1][$strcount]);
                                                        }
                                                    } else {
                                                        $tvalue = $lnstring[1][$strcount];
                                                    }
                                                    $ns += substr_count($tvalue, chr(32));
                                                    ++$strcount;
                                                }
                                                if ($this->rtl OR $this->tmprtl) {
                                                    $spacew = ($spacewidth * ($nsmax - $ns));
                                                }
                                                // justify block
                                                $pmid = preg_replace_callback('/([0-9\.\+\-]*)[\s]('.$strpiece[1][0].')[\s]('.$strpiece[2][0].')([\s]*)/x',
                                                    create_function('$matches', 'global $spacew;
                                                    $newx = sprintf("%.2F",(floatval($matches[1]) + $spacew));
                                                    return "".$newx." ".$matches[2]." x*#!#*x".$matches[3].$matches[4];'), $pmid, 1);
                                                break;
                                            }
                                            case 're': {
                                                // get current X position
                                                preg_match('/([0-9\.\+\-]*)[\s]([0-9\.\+\-]*)[\s]([0-9\.\+\-]*)[\s]('.$strpiece[1][0].')[\s]('.$strpiece[2][0].')([\s]*)/x', $pmid, $xmatches);
                                                $currentxpos = $xmatches[1];
                                                // justify block
                                                $pmid = preg_replace_callback('/([0-9\.\+\-]*)[\s]([0-9\.\+\-]*)[\s]([0-9\.\+\-]*)[\s]('.$strpiece[1][0].')[\s]('.$strpiece[2][0].')([\s]*)/x',
                                                    create_function('$matches', 'global $spacew;
                                                    $newx = sprintf("%.2F",(floatval($matches[1]) + $spacew));
                                                    return "".$newx." ".$matches[2]." ".$matches[3]." ".$matches[4]." x*#!#*x".$matches[5].$matches[6];'), $pmid, 1);
                                                break;
                                            }
                                            case 'c': {
                                                // get current X position
                                                preg_match('/([0-9\.\+\-]*)[\s]([0-9\.\+\-]*)[\s]([0-9\.\+\-]*)[\s]([0-9\.\+\-]*)[\s]([0-9\.\+\-]*)[\s]('.$strpiece[1][0].')[\s]('.$strpiece[2][0].')([\s]*)/x', $pmid, $xmatches);
                                                $currentxpos = $xmatches[1];
                                                // justify block
                                                $pmid = preg_replace_callback('/([0-9\.\+\-]*)[\s]([0-9\.\+\-]*)[\s]([0-9\.\+\-]*)[\s]([0-9\.\+\-]*)[\s]([0-9\.\+\-]*)[\s]('.$strpiece[1][0].')[\s]('.$strpiece[2][0].')([\s]*)/x',
                                                    create_function('$matches', 'global $spacew;
                                                    $newx1 = sprintf("%.3F",(floatval($matches[1]) + $spacew));
                                                    $newx2 = sprintf("%.3F",(floatval($matches[3]) + $spacew));
                                                    $newx3 = sprintf("%.3F",(floatval($matches[5]) + $spacew));
                                                    return "".$newx1." ".$matches[2]." ".$newx2." ".$matches[4]." ".$newx3." ".$matches[6]." x*#!#*x".$matches[7].$matches[8];'), $pmid, 1);
                                                break;
                                            }
                                        }
                                        // shift the annotations and links
                                        if (isset($this->PageAnnots[$this->page])) {
                                            foreach ($this->PageAnnots[$this->page] as $pak => $pac) {
                                                if (($pac['y'] >= $minstartliney) AND (($pac['x'] * $this->k) >= ($currentxpos - $this->feps)) AND (($pac['x'] * $this->k) <= ($currentxpos + $this->feps))) {
                                                    $this->PageAnnots[$this->page][$pak]['x'] += ($spacew / $this->k);
                                                    $this->PageAnnots[$this->page][$pak]['w'] += (($spacewidth * $pac['numspaces']) / $this->k);
                                                    break;
                                                }
                                            }
                                        }
                                    } // end of while
                                    // remove markers
                                    $pmid = str_replace('x*#!#*x', '', $pmid);
                                    if (($this->CurrentFont['type'] == 'TrueTypeUnicode') OR ($this->CurrentFont['type'] == 'cidfont0')) {
                                        // multibyte characters
                                        $spacew = $spacewidthu;
                                        $pmidtemp = $pmid;
                                        // escape special characters
                                        $pmidtemp = preg_replace('/[\\\][\(]/x', '\\#!#OP#!#', $pmidtemp);
                                        $pmidtemp = preg_replace('/[\\\][\)]/x', '\\#!#CP#!#', $pmidtemp);
                                        $pmid = preg_replace_callback("/\[\(([^\)]*)\)\]/x",
                                                    create_function('$matches', 'global $spacew;
                                                    $matches[1] = str_replace("#!#OP#!#", "(", $matches[1]);
                                                    $matches[1] = str_replace("#!#CP#!#", ")", $matches[1]);
                                                    return "[(".str_replace(chr(0).chr(32), ") ".(-2830 * $spacew)." (", $matches[1]).")]";'), $pmidtemp);
                                        $this->setPageBuffer($startlinepage, $pstart."\n".$pmid."\n".$pend);
                                        $endlinepos = strlen($pstart."\n".$pmid."\n");
                                    } else {
                                        // non-unicode (single-byte characters)
                                        $rs = sprintf("%.3F Tw", $spacewidth);
                                        $pmid = preg_replace("/\[\(/x", $rs.' [(', $pmid);
                                        $this->setPageBuffer($startlinepage, $pstart."\n".$pmid."\nBT 0 Tw ET\n".$pend);
                                        $endlinepos = strlen($pstart."\n".$pmid."\nBT 0 Tw ET\n");
                                    }
                                }
                            } // end of J
                            if (($t_x != 0) OR ($yshift < 0)) {
                                // shift the line
                                $trx = sprintf('1 0 0 1 %.3F %.3F cm', ($t_x * $this->k), ($yshift * $this->k));
                                $this->setPageBuffer($startlinepage, $pstart."\nq\n".$trx."\n".$pmid."\nQ\n".$pend);
                                $endlinepos = strlen($pstart."\nq\n".$trx."\n".$pmid."\nQ\n");
                                // shift the annotations and links
                                if (isset($this->PageAnnots[$this->page])) {
                                    foreach ($this->PageAnnots[$this->page] as $pak => $pac) {
                                        if ($pak >= $pask) {
                                            $this->PageAnnots[$this->page][$pak]['x'] += $t_x;
                                            $this->PageAnnots[$this->page][$pak]['y'] -= $yshift;
                                        }
                                    }
                                }
                                $this->y -= $yshift;
                            }
                        }
                    }
                    $this->newline = false;
                    $pbrk = $this->checkPageBreak($this->lasth);
                    $this->SetFont($fontname, $fontstyle, $fontsize);
                    if ($wfill) {
                        $this->SetFillColorArray($this->bgcolor);
                    }
                    $startlinex = $this->x;
                    $startliney = $this->y;
                    $minstartliney = $this->y;
                    $startlinepage = $this->page;
                    if (isset($endlinepos) AND (!$pbrk)) {
                        $startlinepos = $endlinepos;
                        unset($endlinepos);
                    } else {
                        if (isset($this->footerlen[$this->page])) {
                            $this->footerpos[$this->page] = $this->pagelen[$this->page] - $this->footerlen[$this->page];
                        } else {
                            $this->footerpos[$this->page] = $this->pagelen[$this->page];
                        }
                        $startlinepos = $this->footerpos[$this->page];
                    }
                    $plalign = $lalign;
                    if (isset($this->PageAnnots[$this->page])) {
                        $pask = count($this->PageAnnots[$this->page]);
                    } else {
                        $pask = 0;
                    }
                }
                if (isset($opentagpos)) {
                    unset($opentagpos);
                }
                if ($dom[$key]['tag']) {
                    if ($dom[$key]['opening']) {
                        if ($dom[$key]['value'] == 'table') {
                            if ($this->rtl) {
                                $wtmp = $this->x - $this->lMargin;
                            } else {
                                $wtmp = $this->w - $this->rMargin - $this->x;
                            }
                            $wtmp -= (2 * $this->cMargin);
                            // calculate cell width
                            if (isset($dom[$key]['width'])) {
                                $table_width = $this->getHTMLUnitToUnits($dom[$key]['width'], $wtmp, 'px');
                            } else {
                                $table_width = $wtmp;
                            }
                        }
                        // table content is handled in a special way
                        if (($dom[$key]['value'] == 'td') OR ($dom[$key]['value'] == 'th')) {
                            $trid = $dom[$key]['parent'];
                            $table_el = $dom[$trid]['parent'];
                            if (!isset($dom[$table_el]['cols'])) {
                                $dom[$table_el]['cols'] = $trid['cols'];
                            }
                            $oldmargin = $this->cMargin;
                            if (isset($dom[($dom[$trid]['parent'])]['attribute']['cellpadding'])) {
                                $currentcmargin = $this->getHTMLUnitToUnits($dom[($dom[$trid]['parent'])]['attribute']['cellpadding'], 1, 'px');
                            } else {
                                $currentcmargin = 0;        
                            }
                            $this->cMargin = $currentcmargin;
                            if (isset($dom[($dom[$trid]['parent'])]['attribute']['cellspacing'])) {
                                $cellspacing = $this->getHTMLUnitToUnits($dom[($dom[$trid]['parent'])]['attribute']['cellspacing'], 1, 'px');
                            } else {
                                $cellspacing = 0;
                            }
                            if ($this->rtl) {
                                $cellspacingx = -$cellspacing;
                            } else {
                                $cellspacingx = $cellspacing;
                            }
                            $colspan = $dom[$key]['attribute']['colspan'];
                            $wtmp = ($colspan * ($table_width / $dom[$table_el]['cols']));
                            if (isset($dom[$key]['width'])) {
                                $cellw = $this->getHTMLUnitToUnits($dom[$key]['width'], $wtmp, 'px');
                            } else {
                                $cellw = $wtmp;
                            }
                            if (isset($dom[$key]['height'])) {
                                // minimum cell height
                                $cellh = $this->getHTMLUnitToUnits($dom[$key]['height'], 0, 'px');
                            } else {
                                $cellh = 0;
                            }
                            $cellw -= $cellspacing;
                            if (isset($dom[$key]['content'])) {
                                $cell_content = $dom[$key]['content'];
                            } else {
                                $cell_content = '&nbsp;';
                            }
                            $tagtype = $dom[$key]['value'];
                            $parentid = $key;
                            while (($key < $maxel) AND (!(($dom[$key]['tag']) AND (!$dom[$key]['opening']) AND ($dom[$key]['value'] == $tagtype) AND ($dom[$key]['parent'] == $parentid)))) {
                                // move $key index forward
                                ++$key;
                            }
                            if (!isset($dom[$trid]['startpage'])) {
                                $dom[$trid]['startpage'] = $this->page;
                            } else {
                                $this->setPage($dom[$trid]['startpage']);
                            }
                            if (!isset($dom[$trid]['starty'])) {
                                $dom[$trid]['starty'] = $this->y;
                            } else {
                                $this->y = $dom[$trid]['starty'];
                            }
                            if (!isset($dom[$trid]['startx'])) {
                                $dom[$trid]['startx'] = $this->x;
                            }
                            $this->x += ($cellspacingx / 2);                        
                            if (isset($dom[$parentid]['attribute']['rowspan'])) {
                                $rowspan = intval($dom[$parentid]['attribute']['rowspan']);
                            } else {
                                $rowspan = 1;
                            }
                            // skip row-spanned cells started on the previous rows
                            if (isset($dom[$table_el]['rowspans'])) {
                                $rsk = 0;
                                $rskmax = count($dom[$table_el]['rowspans']);
                                while ($rsk < $rskmax) {
                                    $trwsp = $dom[$table_el]['rowspans'][$rsk];
                                    $rsstartx = $trwsp['startx'];
                                    $rsendx = $trwsp['endx'];
                                    // account for margin changes
                                    if ($trwsp['startpage'] < $this->page) {
                                        if (($this->rtl) AND ($this->pagedim[$this->page]['orm'] != $this->pagedim[$trwsp['startpage']]['orm'])) {
                                            $dl = ($this->pagedim[$this->page]['orm'] - $this->pagedim[$trwsp['startpage']]['orm']);
                                            $rsstartx -= $dl;
                                            $rsendx -= $dl;
                                        } elseif ((!$this->rtl) AND ($this->pagedim[$this->page]['olm'] != $this->pagedim[$trwsp['startpage']]['olm'])) {
                                            $dl = ($this->pagedim[$this->page]['olm'] - $this->pagedim[$trwsp['startpage']]['olm']);
                                            $rsstartx += $dl;
                                            $rsendx += $dl;
                                        }
                                    }
                                    if  (($trwsp['rowspan'] > 0)
                                        AND ($rsstartx > ($this->x - $cellspacing - $currentcmargin - $this->feps))
                                        AND ($rsstartx < ($this->x + $cellspacing + $currentcmargin + $this->feps))
                                        AND (($trwsp['starty'] < ($this->y - $this->feps)) OR ($trwsp['startpage'] < $this->page))) {
                                        // set the starting X position of the current cell
                                        $this->x = $rsendx + $cellspacingx;
                                        if (($trwsp['rowspan'] == 1)
                                            AND (isset($dom[$trid]['endy']))
                                            AND (isset($dom[$trid]['endpage']))
                                            AND ($trwsp['endpage'] == $dom[$trid]['endpage'])) {
                                            // set ending Y position for row
                                            $dom[$table_el]['rowspans'][$rsk]['endy'] = max($dom[$trid]['endy'], $trwsp['endy']);
                                            $dom[$trid]['endy'] = $dom[$table_el]['rowspans'][$rsk]['endy'];
                                        }
                                        $rsk = 0;
                                    } else {
                                        ++$rsk;
                                    }
                                }
                            }
                            // add rowspan information to table element
                            if ($rowspan > 1) {
                                if (isset($this->footerlen[$this->page])) {
                                    $this->footerpos[$this->page] = $this->pagelen[$this->page] - $this->footerlen[$this->page];
                                } else {
                                    $this->footerpos[$this->page] = $this->pagelen[$this->page];
                                }
                                $trintmrkpos = $this->footerpos[$this->page];
                                $trsid = array_push($dom[$table_el]['rowspans'], array('trid' => $trid, 'rowspan' => $rowspan, 'mrowspan' => $rowspan, 'colspan' => $colspan, 'startpage' => $this->page, 'startx' => $this->x, 'starty' => $this->y, 'intmrkpos' => $trintmrkpos));
                            }
                            $cellid = array_push($dom[$trid]['cellpos'], array('startx' => $this->x));
                            if ($rowspan > 1) {
                                $dom[$trid]['cellpos'][($cellid - 1)]['rowspanid'] = ($trsid - 1);
                            }
                            // push background colors
                            if (isset($dom[$parentid]['bgcolor']) AND ($dom[$parentid]['bgcolor'] !== false)) {
                                $dom[$trid]['cellpos'][($cellid - 1)]['bgcolor'] = $dom[$parentid]['bgcolor'];
                            }
                            $prevLastH = $this->lasth;
                            // ****** write the cell content ******
                            $this->MultiCell($cellw, $cellh, $cell_content, false, $lalign, false, 2, '', '', true, 0, true);
                            $this->lasth = $prevLastH;
                            $this->cMargin = $oldmargin;
                            $dom[$trid]['cellpos'][($cellid - 1)]['endx'] = $this->x;
                            // update the end of row position
                            if ($rowspan <= 1) {
                                if (isset($dom[$trid]['endy'])) {
                                    if ($this->page == $dom[$trid]['endpage']) {
                                        $dom[$trid]['endy'] = max($this->y, $dom[$trid]['endy']);
                                    } elseif ($this->page > $dom[$trid]['endpage']) {
                                        $dom[$trid]['endy'] = $this->y;
                                    }
                                } else {
                                    $dom[$trid]['endy'] = $this->y;
                                }
                                if (isset($dom[$trid]['endpage'])) {
                                    $dom[$trid]['endpage'] = max($this->page, $dom[$trid]['endpage']);
                                } else {
                                    $dom[$trid]['endpage'] = $this->page;
                                }                               
                            } else {
                                // account for row-spanned cells
                                $dom[$table_el]['rowspans'][($trsid - 1)]['endx'] = $this->x;
                                $dom[$table_el]['rowspans'][($trsid - 1)]['endy'] = $this->y;
                                $dom[$table_el]['rowspans'][($trsid - 1)]['endpage'] = $this->page;
                            }
                            if (isset($dom[$table_el]['rowspans'])) {
                                // update endy and endpage on rowspanned cells
                                foreach ($dom[$table_el]['rowspans'] as $k => $trwsp) {
                                    if ($trwsp['rowspan'] > 0) {
                                        if (isset($dom[$trid]['endpage'])) {
                                            if ($trwsp['endpage'] == $dom[$trid]['endpage']) {
                                                $dom[$table_el]['rowspans'][$k]['endy'] = max($dom[$trid]['endy'], $trwsp['endy']);
                                            } elseif ($trwsp['endpage'] < $dom[$trid]['endpage']) {
                                                $dom[$table_el]['rowspans'][$k]['endy'] = $dom[$trid]['endy'];
                                                $dom[$table_el]['rowspans'][$k]['endpage'] = $dom[$trid]['endpage'];
                                            } else {
                                                $dom[$trid]['endy'] = $this->pagedim[$dom[$trid]['endpage']]['hk'] - $this->pagedim[$dom[$trid]['endpage']]['bm'];
                                            }
                                        }
                                    }
                                }
                            }
                            $this->x += ($cellspacingx / 2);                            
                        } else {
                            // opening tag (or self-closing tag)
                            if (!isset($opentagpos)) {
                                if (!$this->InFooter) {
                                    if (isset($this->footerlen[$this->page])) {
                                        $this->footerpos[$this->page] = $this->pagelen[$this->page] - $this->footerlen[$this->page];
                                    } else {
                                        $this->footerpos[$this->page] = $this->pagelen[$this->page];
                                    }
                                    $opentagpos = $this->footerpos[$this->page];
                                }
                            }
                            $this->openHTMLTagHandler($dom, $key, $cell);
                        }
                    } else {
                        // closing tag
                        $this->closeHTMLTagHandler($dom, $key, $cell);
                    }
                } elseif (strlen($dom[$key]['value']) > 0) {
                    // print list-item
                    if (!$this->empty_string($this->lispacer)) {
                        $this->SetFont($pfontname, $pfontstyle, $pfontsize);
                        $this->lasth = $this->FontSize * $this->cell_height_ratio;
                        $minstartliney = $this->y;
                        $this->putHtmlListBullet($this->listnum, $this->lispacer, $pfontsize);
                        $this->SetFont($curfontname, $curfontstyle, $curfontsize);
                        $this->lasth = $this->FontSize * $this->cell_height_ratio;
                        if (is_numeric($pfontsize) AND ($pfontsize > 0) AND is_numeric($curfontsize) AND ($curfontsize > 0) AND ($pfontsize != $curfontsize)) {
                            $this->y += (($pfontsize - $curfontsize) / $this->k);
                            $minstartliney = min($this->y, $minstartliney);
                        }
                    }
                    // text
                    $this->htmlvspace = 0;
                    if ((!$this->premode) AND ($this->rtl OR $this->tmprtl)) {
                        // reverse spaces order
                        $len1 = strlen($dom[$key]['value']);
                        $lsp = $len1 - strlen(ltrim($dom[$key]['value']));
                        $rsp = $len1 - strlen(rtrim($dom[$key]['value']));
                        $tmpstr = '';
                        if ($rsp > 0) {
                            $tmpstr .= substr($dom[$key]['value'], -$rsp);
                        }
                        $tmpstr .= trim($dom[$key]['value']);
                        if ($lsp > 0) {
                            $tmpstr .= substr($dom[$key]['value'], 0, $lsp);
                        }
                        $dom[$key]['value'] = $tmpstr;
                    }
                    if ($newline) {
                        if (!$this->premode) {
                            if (($this->rtl OR $this->tmprtl)) {
                                $dom[$key]['value'] = rtrim($dom[$key]['value']);
                            } else {
                                $dom[$key]['value'] = ltrim($dom[$key]['value']);
                            }
                        }
                        $newline = false;
                        $firstblock = true;
                    } else {
                        $firstblock = false;
                    }
                    $strrest = '';
                    if (!empty($this->HREF) AND (isset($this->HREF['url']))) {
                        // HTML <a> Link
                        $strrest = $this->addHtmlLink($this->HREF['url'], $dom[$key]['value'], $wfill, true, $this->HREF['color'], $this->HREF['style']);
                    } else {
                        $ctmpmargin = $this->cMargin;
                        $this->cMargin = 0;
                        // ****** write only until the end of the line and get the rest ******
                        $strrest = $this->Write($this->lasth, $dom[$key]['value'], '', $wfill, '', false, 0, true, $firstblock);
                        $this->cMargin = $ctmpmargin;
                    }
                    if (strlen($strrest) > 0) {
                        // store the remaining string on the previous $key position
                        $this->newline = true;
                        if ($cell) {
                            if ($this->rtl) {
                                $this->x -= $this->cMargin;
                            } else {
                                $this->x += $this->cMargin;
                            }
                        }
                        if ($strrest == $dom[$key]['value']) {
                            // used to avoid infinite loop
                            ++$loop;
                        } else {
                            $loop = 0;
                        }
                        $dom[$key]['value'] = ltrim($strrest);
                        if ($loop < 3) {
                            --$key;
                        }
                    } else {
                        $loop = 0;
                    }
                }
                ++$key;
            } // end for each $key
            // align the last line
            if (isset($startlinex)) {
                $yshift = $minstartliney - $startliney;
                if (($yshift > 0) OR ($this->page > $startlinepage)) {
                    $yshift = 0;
                }
                if ((isset($plalign) AND ((($plalign == 'C') OR ($plalign == 'J') OR (($plalign == 'R') AND (!$this->rtl)) OR (($plalign == 'L') AND ($this->rtl))))) OR ($yshift < 0)) {
                    // the last line must be shifted to be aligned as requested
                    $linew = abs($this->endlinex - $startlinex);
                    $pstart = substr($this->getPageBuffer($startlinepage), 0, $startlinepos);
                    if (isset($opentagpos) AND isset($this->footerlen[$startlinepage]) AND (!$this->InFooter)) {
                        $this->footerpos[$startlinepage] = $this->pagelen[$startlinepage] - $this->footerlen[$startlinepage];
                        $midpos = min($opentagpos, $this->footerpos[$startlinepage]);
                    } elseif (isset($opentagpos)) {
                        $midpos = $opentagpos;
                    } elseif (isset($this->footerlen[$startlinepage]) AND (!$this->InFooter)) {
                        $this->footerpos[$startlinepage] = $this->pagelen[$startlinepage] - $this->footerlen[$startlinepage];
                        $midpos = $this->footerpos[$startlinepage];
                    } else {
                        $midpos = 0;
                    }
                    if ($midpos > 0) {
                        $pmid = substr($this->getPageBuffer($startlinepage), $startlinepos, ($midpos - $startlinepos));
                        $pend = substr($this->getPageBuffer($startlinepage), $midpos);
                    } else {
                        $pmid = substr($this->getPageBuffer($startlinepage), $startlinepos);
                        $pend = '';
                    }   
                    // calculate shifting amount
                    $tw = $w;
                    if ($this->lMargin != $prevlMargin) {
                        $tw += ($prevlMargin - $this->lMargin);
                    }
                    if ($this->rMargin != $prevrMargin) {
                        $tw += ($prevrMargin - $this->rMargin);
                    }
                    $mdiff = abs($tw - $linew);
                    if ($plalign == 'C') {
                        if ($this->rtl) {
                            $t_x = -($mdiff / 2);
                        } else {
                            $t_x = ($mdiff / 2);
                        }
                    } elseif (($plalign == 'R') AND (!$this->rtl)) {
                        // right alignment on LTR document
                        $t_x = $mdiff;
                    } elseif (($plalign == 'L') AND ($this->rtl)) {
                        // left alignment on RTL document
                        $t_x = -$mdiff;
                    } else {
                        $t_x = 0;
                    }
                    if (($t_x != 0) OR ($yshift < 0)) {
                        // shift the line
                        $trx = sprintf('1 0 0 1 %.3F %.3F cm', ($t_x * $this->k), ($yshift * $this->k));
                        $this->setPageBuffer($startlinepage, $pstart."\nq\n".$trx."\n".$pmid."\nQ\n".$pend);
                        $endlinepos = strlen($pstart."\nq\n".$trx."\n".$pmid."\nQ\n");
                        // shift the annotations and links
                        if (isset($this->PageAnnots[$this->page])) {
                            foreach ($this->PageAnnots[$this->page] as $pak => $pac) {
                                if ($pak >= $pask) {
                                    $this->PageAnnots[$this->page][$pak]['x'] += $t_x;
                                    $this->PageAnnots[$this->page][$pak]['y'] -= $yshift;
                                }
                            }
                        }
                        $this->y -= $yshift;
                    }
                }
            }
            if ($ln AND (!($cell AND ($dom[$key-1]['value'] == 'table')))) {
                $this->Ln($this->lasth);
            }
            // restore previous values
            $this->setGraphicVars($gvars);
            if ($this->page > $prevPage) {
                $this->lMargin = $this->pagedim[$this->page]['olm'];
                $this->rMargin = $this->pagedim[$this->page]['orm'];
            }
            unset($dom);
        }
        
        protected function openHTMLTagHandler(&$dom, $key, $cell=false) {
            $tag = $dom[$key];
            $parent = $dom[($dom[$key]['parent'])];
            $firstorlast = ($key == 1);
            // check for text direction attribute
            if (isset($tag['attribute']['dir'])) {
                $this->tmprtl = $tag['attribute']['dir'] == 'rtl' ? 'R' : 'L';
            } else {
                $this->tmprtl = false;
            }
            //Opening tag
            switch($tag['value']) {
                case 'table': {
                    $cp = 0;
                    $cs = 0;
                    $dom[$key]['rowspans'] = array();
                    if (!$this->empty_string($dom[$key]['thead'])) {
                        // set table header
                        $this->thead = $dom[$key]['thead'];
                    }
                    if (isset($tag['attribute']['cellpadding'])) {
                        $cp = $this->getHTMLUnitToUnits($tag['attribute']['cellpadding'], 1, 'px');
                        $this->oldcMargin = $this->cMargin;
                        $this->cMargin = $cp;
                    }
                    if (isset($tag['attribute']['cellspacing'])) {
                        $cs = $this->getHTMLUnitToUnits($tag['attribute']['cellspacing'], 1, 'px');
                    }
                    $this->checkPageBreak((2 * $cp) + (2 * $cs) + $this->lasth);
                    break;
                }
                case 'tr': {
                    // array of columns positions
                    $dom[$key]['cellpos'] = array();
                    break;
                }
                case 'hr': {
                    $this->addHTMLVertSpace(1, $cell, '', $firstorlast, $tag['value'], false);
                    $this->htmlvspace = 0;
                    $wtmp = $this->w - $this->lMargin - $this->rMargin;
                    if ((isset($tag['attribute']['width'])) AND ($tag['attribute']['width'] != '')) {
                        $hrWidth = $this->getHTMLUnitToUnits($tag['attribute']['width'], $wtmp, 'px');
                    } else {
                        $hrWidth = $wtmp;
                    }
                    $x = $this->GetX();
                    $y = $this->GetY();
                    $prevlinewidth = $this->GetLineWidth();
                    $this->Line($x, $y, $x + $hrWidth, $y);
                    $this->SetLineWidth($prevlinewidth);
                    $this->addHTMLVertSpace(1, $cell, '', !isset($dom[($key + 1)]), $tag['value'], false);
                    break;
                }
                case 'a': {
                    if (array_key_exists('href', $tag['attribute'])) {
                        $this->HREF['url'] = $tag['attribute']['href'];
                    }
                    $this->HREF['color'] = $this->htmlLinkColorArray;
                    $this->HREF['style'] = $this->htmlLinkFontStyle;
                    if (array_key_exists('style', $tag['attribute'])) {
                        // get style attributes
                        preg_match_all('/([^;:\s]*):([^;]*)/', $tag['attribute']['style'], $style_array, PREG_PATTERN_ORDER);
                        $astyle = array();
                        while (list($id, $name) = each($style_array[1])) {
                            $name = strtolower($name);
                            $astyle[$name] = trim($style_array[2][$id]);
                        }
                        if (isset($astyle['color'])) {
                            $this->HREF['color'] = $this->convertHTMLColorToDec($astyle['color']);
                        }
                        if (isset($astyle['text-decoration'])) {
                            $this->HREF['style'] = '';
                            $decors = explode(' ', strtolower($astyle['text-decoration']));
                            foreach ($decors as $dec) {
                                $dec = trim($dec);
                                if (!$this->empty_string($dec)) {
                                    if ($dec{0} == 'u') {
                                        $this->HREF['style'] .= 'U';
                                    } elseif ($dec{0} == 'l') {
                                        $this->HREF['style'] .= 'D';
                                    }
                                }
                            }
                        }
                    }       
                    break;
                }
                case 'img': {
                    if (isset($tag['attribute']['src'])) {
                        // replace relative path with real server path
                        if ($tag['attribute']['src'][0] == '/') {
                            $tag['attribute']['src'] = $_SERVER['DOCUMENT_ROOT'].$tag['attribute']['src'];
                        }
                        $tag['attribute']['src'] = urldecode($tag['attribute']['src']);
                        $tag['attribute']['src'] = str_replace(K_PATH_URL, K_PATH_MAIN, $tag['attribute']['src']);
                        if (!isset($tag['attribute']['width'])) {
                            $tag['attribute']['width'] = 0;
                        }
                        if (!isset($tag['attribute']['height'])) {
                            $tag['attribute']['height'] = 0;
                        }
                        //if (!isset($tag['attribute']['align'])) {
                            // the only alignment supported is "bottom"
                            // further development is required for other modes.
                            $tag['attribute']['align'] = 'bottom';
                        //} 
                        switch($tag['attribute']['align']) {
                            case 'top': {
                                $align = 'T';
                                break;
                            }
                            case 'middle': {
                                $align = 'M';
                                break;
                            }
                            case 'bottom': {
                                $align = 'B';
                                break;
                            }
                            default: {
                                $align = 'B';
                                break;
                            }
                        }
                        $fileinfo = pathinfo($tag['attribute']['src']);
                        if (isset($fileinfo['extension']) AND (!$this->empty_string($fileinfo['extension']))) {
                            $type = strtolower($fileinfo['extension']);
                        }
                        $prevy = $this->y;
                        $xpos = $this->GetX();
                        if (isset($dom[($key - 1)]) AND ($dom[($key - 1)]['value'] == ' ')) {
                            if ($this->rtl) {
                                $xpos += $this->GetStringWidth(' ');
                            } else {
                                $xpos -= $this->GetStringWidth(' ');
                            }
                        }
                        $imglink = '';
                        if (isset($this->HREF['url']) AND !$this->empty_string($this->HREF['url'])) {
                            $imglink = $this->HREF['url'];
                            if ($imglink{0} == '#') {
                                // convert url to internal link
                                $page = intval(substr($imglink, 1));
                                $imglink = $this->AddLink();
                                $this->SetLink($imglink, 0, $page);
                            }
                        }
                        $border = 0;
                        if (isset($tag['attribute']['border']) AND !empty($tag['attribute']['border'])) {
                            // currently only support 1 (frame) or a combination of 'LTRB'
                            $border = $tag['attribute']['border'];
                        }
                        if (isset($tag['attribute']['width'])) {
                            $iw = $this->getHTMLUnitToUnits($tag['attribute']['width'], 1, 'px', false);
                        }
                        if (isset($tag['attribute']['height'])) {
                            $ih = $this->getHTMLUnitToUnits($tag['attribute']['height'], 1, 'px', false);
                        }
                        if (($type == 'eps') OR ($type == 'ai')) {
                            $this->ImageEps($tag['attribute']['src'], $xpos, $this->GetY(), $iw, $ih, $imglink, true, $align, '', $border);
                        } else {
                            $this->Image($tag['attribute']['src'], $xpos, $this->GetY(), $iw, $ih, '', $imglink, $align, false, 300, '', false, false, $border);
                        }
                        switch($align) {
                            case 'T': {
                                $this->y = $prevy;
                                break;
                            }
                            case 'M': {
                                $this->y = (($this->img_rb_y + $prevy - ($tag['fontsize'] / $this->k)) / 2) ;
                                break;
                            }
                            case 'B': {
                                $this->y = $this->img_rb_y - ($tag['fontsize'] / $this->k);
                                break;
                            }
                        }
                    }
                    break;
                }
                case 'dl': {
                    ++$this->listnum;
                    $this->addHTMLVertSpace(0, $cell, '', $firstorlast, $tag['value'], false);
                    break;
                }
                case 'dt': {
                    $this->addHTMLVertSpace(1, $cell, '', $firstorlast, $tag['value'], false);
                    break;
                }
                case 'dd': {
                    if ($this->rtl) {
                        $this->rMargin += $this->listindent;
                    } else {
                        $this->lMargin += $this->listindent;
                    }
                    $this->addHTMLVertSpace(1, $cell, '', $firstorlast, $tag['value'], false);
                    break;
                }
                case 'ul':
                case 'ol': {
                    $this->addHTMLVertSpace(0, $cell, '', $firstorlast, $tag['value'], false);
                    $this->htmlvspace = 0;
                    ++$this->listnum;
                    if ($tag['value'] == 'ol') {
                        $this->listordered[$this->listnum] = true;
                    } else {
                        $this->listordered[$this->listnum] = false;
                    }
                    if (isset($tag['attribute']['start'])) {
                        $this->listcount[$this->listnum] = intval($tag['attribute']['start']) - 1;
                    } else {
                        $this->listcount[$this->listnum] = 0;
                    }
                    if ($this->rtl) {
                        $this->rMargin += $this->listindent;
                    } else {
                        $this->lMargin += $this->listindent;
                    }
                    $this->addHTMLVertSpace(0, $cell, '', $firstorlast, $tag['value'], false);
                    $this->htmlvspace = 0;
                    break;
                }
                case 'li': {
                    $this->addHTMLVertSpace(1, $cell, '', $firstorlast, $tag['value'], false);
                    if ($this->listordered[$this->listnum]) {
                        // ordered item
                        if (isset($parent['attribute']['type']) AND !$this->empty_string($parent['attribute']['type'])) {
                            $this->lispacer = $parent['attribute']['type'];
                        } elseif (isset($parent['listtype']) AND !$this->empty_string($parent['listtype'])) {
                            $this->lispacer = $parent['listtype'];
                        } elseif (isset($this->lisymbol) AND !$this->empty_string($this->lisymbol)) {
                            $this->lispacer = $this->lisymbol;
                        } else {
                            $this->lispacer = '#';
                        }
                        ++$this->listcount[$this->listnum];
                        if (isset($tag['attribute']['value'])) {
                            $this->listcount[$this->listnum] = intval($tag['attribute']['value']);
                        }
                    } else {
                        // unordered item
                        if (isset($parent['attribute']['type']) AND !$this->empty_string($parent['attribute']['type'])) {
                            $this->lispacer = $parent['attribute']['type'];
                        } elseif (isset($parent['listtype']) AND !$this->empty_string($parent['listtype'])) {
                            $this->lispacer = $parent['listtype'];
                        } elseif (isset($this->lisymbol) AND !$this->empty_string($this->lisymbol)) {
                            $this->lispacer = $this->lisymbol;
                        } else {
                            $this->lispacer = '!';
                        }
                    }
                    break;
                }
                case 'blockquote': {
                    if ($this->rtl) {
                        $this->rMargin += $this->listindent;
                    } else {
                        $this->lMargin += $this->listindent;
                    }
                    $this->addHTMLVertSpace(2, $cell, '', $firstorlast, $tag['value'], false);
                    break;
                }
                case 'br': {
                    $this->Ln('', $cell);
                    break;
                }
                case 'div': {
                    $this->addHTMLVertSpace(1, $cell, '', $firstorlast, $tag['value'], false);
                    break;
                }
                case 'p': {
                    $this->addHTMLVertSpace(2, $cell, '', $firstorlast, $tag['value'], false);
                    break;
                }
                case 'pre': {
                    $this->addHTMLVertSpace(1, $cell, '', $firstorlast, $tag['value'], false);
                    $this->premode = true;
                    break;
                }
                case 'sup': {
                    $this->SetXY($this->GetX(), $this->GetY() - ((0.7 * $this->FontSizePt) / $this->k));
                    break;
                }
                case 'sub': {
                    $this->SetXY($this->GetX(), $this->GetY() + ((0.3 * $this->FontSizePt) / $this->k));
                    break;
                }
                case 'h1': 
                case 'h2': 
                case 'h3': 
                case 'h4': 
                case 'h5': 
                case 'h6': {
                    $this->addHTMLVertSpace(1, $cell, ($tag['fontsize'] * 1.5) / $this->k, $firstorlast, $tag['value'], false);
                    break;
                }
                case 'tcpdf': {
                    // NOT HTML: used to call TCPDF methods
                    if (isset($tag['attribute']['method'])) {
                        $tcpdf_method = $tag['attribute']['method'];
                        if (method_exists($this, $tcpdf_method)) {
                            if (isset($tag['attribute']['params']) AND (!empty($tag['attribute']['params']))) {
                                eval('$params = array('.$tag['attribute']['params'].');');
                                call_user_func_array(array($this, $tcpdf_method), $params);
                            } else {
                                $this->$tcpdf_method();
                            }
                            $this->newline = true;
                        }
                    }
                }
                default: {
                    break;
                }
            }
        }
        
        protected function closeHTMLTagHandler(&$dom, $key, $cell=false) {
            $tag = $dom[$key];
            $parent = $dom[($dom[$key]['parent'])];
            $firstorlast = ((!isset($dom[($key + 1)])) OR ((!isset($dom[($key + 2)])) AND ($dom[($key + 1)]['value'] == 'marker')));
            //Closing tag
            switch($tag['value']) {
                case 'tr': {
                    $table_el = $dom[($dom[$key]['parent'])]['parent'];
                    if(!isset($parent['endy'])) {
                        $dom[($dom[$key]['parent'])]['endy'] = $this->y;
                        $parent['endy'] = $this->y;
                    }
                    if(!isset($parent['endpage'])) {
                        $dom[($dom[$key]['parent'])]['endpage'] = $this->page;
                        $parent['endpage'] = $this->page;
                    }
                    // update row-spanned cells
                    if (isset($dom[$table_el]['rowspans'])) {
                        foreach ($dom[$table_el]['rowspans'] as $k => $trwsp) {
                            $dom[$table_el]['rowspans'][$k]['rowspan'] -= 1;
                            if ($dom[$table_el]['rowspans'][$k]['rowspan'] == 0) {
                                if ($dom[$table_el]['rowspans'][$k]['endpage'] == $parent['endpage']) {
                                    $dom[($dom[$key]['parent'])]['endy'] = max($dom[$table_el]['rowspans'][$k]['endy'], $parent['endy']);
                                } elseif ($dom[$table_el]['rowspans'][$k]['endpage'] > $parent['endpage']) {
                                    $dom[($dom[$key]['parent'])]['endy'] = $dom[$table_el]['rowspans'][$k]['endy'];
                                    $dom[($dom[$key]['parent'])]['endpage'] = $dom[$table_el]['rowspans'][$k]['endpage'];
                                }
                            }
                        }
                        // report new endy and endpage to the rowspanned cells
                        foreach ($dom[$table_el]['rowspans'] as $k => $trwsp) {
                            if ($dom[$table_el]['rowspans'][$k]['rowspan'] == 0) {
                                $dom[$table_el]['rowspans'][$k]['endpage'] = max($dom[$table_el]['rowspans'][$k]['endpage'], $dom[($dom[$key]['parent'])]['endpage']);
                                $dom[($dom[$key]['parent'])]['endpage'] = $dom[$table_el]['rowspans'][$k]['endpage'];
                                $dom[$table_el]['rowspans'][$k]['endy'] = max($dom[$table_el]['rowspans'][$k]['endy'], $dom[($dom[$key]['parent'])]['endy']);
                                $dom[($dom[$key]['parent'])]['endy'] = $dom[$table_el]['rowspans'][$k]['endy'];
                            }
                        }
                        // update remaining rowspanned cells
                        foreach ($dom[$table_el]['rowspans'] as $k => $trwsp) {
                            if ($dom[$table_el]['rowspans'][$k]['rowspan'] == 0) {
                                $dom[$table_el]['rowspans'][$k]['endpage'] = $dom[($dom[$key]['parent'])]['endpage'];
                                $dom[$table_el]['rowspans'][$k]['endy'] = $dom[($dom[$key]['parent'])]['endy'];
                            }
                        }
                    }
                    $this->setPage($dom[($dom[$key]['parent'])]['endpage']);
                    $this->y = $dom[($dom[$key]['parent'])]['endy'];                    
                    if (isset($dom[$table_el]['attribute']['cellspacing'])) {
                        $cellspacing = $this->getHTMLUnitToUnits($dom[$table_el]['attribute']['cellspacing'], 1, 'px');
                        $this->y += $cellspacing;
                    }               
                    $this->Ln(0, $cell);
                    $this->x = $parent['startx'];
                    // account for booklet mode
                    if ($this->page > $parent['startpage']) {
                        if (($this->rtl) AND ($this->pagedim[$this->page]['orm'] != $this->pagedim[$parent['startpage']]['orm'])) {
                            $this->x += ($this->pagedim[$this->page]['orm'] - $this->pagedim[$parent['startpage']]['orm']);
                        } elseif ((!$this->rtl) AND ($this->pagedim[$this->page]['olm'] != $this->pagedim[$parent['startpage']]['olm'])) {
                            $this->x += ($this->pagedim[$this->page]['olm'] - $this->pagedim[$parent['startpage']]['olm']);
                        }
                    }
                    break;
                }
                case 'table': {
                    // draw borders
                    $table_el = $parent;
                    if ((isset($table_el['attribute']['border']) AND ($table_el['attribute']['border'] > 0)) 
                        OR (isset($table_el['style']['border']) AND ($table_el['style']['border'] > 0))) {
                            $border = 1;
                    } else {
                        $border = 0;
                    }
                    // fix bottom line alignment of last line before page break
                    foreach ($dom[($dom[$key]['parent'])]['trids'] as $j => $trkey) {
                        // update row-spanned cells
                        if (isset($dom[($dom[$key]['parent'])]['rowspans'])) {
                            foreach ($dom[($dom[$key]['parent'])]['rowspans'] as $k => $trwsp) {
                                if ($trwsp['trid'] == $trkey) {
                                    $dom[($dom[$key]['parent'])]['rowspans'][$k]['mrowspan'] -= 1;
                                }
                                if (isset($prevtrkey) AND ($trwsp['trid'] == $prevtrkey) AND ($trwsp['mrowspan'] >= 0)) {
                                    $dom[($dom[$key]['parent'])]['rowspans'][$k]['trid'] = $trkey;
                                }
                            }
                        }
                        if (isset($prevtrkey) AND ($dom[$trkey]['startpage'] > $dom[$prevtrkey]['endpage'])) {
                            $pgendy = $this->pagedim[$dom[$prevtrkey]['endpage']]['hk'] - $this->pagedim[$dom[$prevtrkey]['endpage']]['bm'];
                            $dom[$prevtrkey]['endy'] = $pgendy;
                            // update row-spanned cells
                            if (isset($dom[($dom[$key]['parent'])]['rowspans'])) {
                                foreach ($dom[($dom[$key]['parent'])]['rowspans'] as $k => $trwsp) {
                                    if (($trwsp['trid'] == $trkey) AND ($trwsp['mrowspan'] == 1) AND ($trwsp['endpage'] == $dom[$prevtrkey]['endpage'])) {
                                        $dom[($dom[$key]['parent'])]['rowspans'][$k]['endy'] = $pgendy;
                                        $dom[($dom[$key]['parent'])]['rowspans'][$k]['mrowspan'] = -1;
                                    }
                                }
                            }
                        }
                        $prevtrkey = $trkey;
                        $table_el = $dom[($dom[$key]['parent'])];
                    }
                    // for each row
                    foreach ($table_el['trids'] as $j => $trkey) {
                        $parent = $dom[$trkey];
                        // for each cell on the row
                        foreach ($parent['cellpos'] as $k => $cellpos) {
                            if (isset($cellpos['rowspanid']) AND ($cellpos['rowspanid'] >= 0)) {
                                $cellpos['startx'] = $table_el['rowspans'][($cellpos['rowspanid'])]['startx'];
                                $cellpos['endx'] = $table_el['rowspans'][($cellpos['rowspanid'])]['endx'];
                                $endy = $table_el['rowspans'][($cellpos['rowspanid'])]['endy'];
                                $startpage = $table_el['rowspans'][($cellpos['rowspanid'])]['startpage'];
                                $endpage = $table_el['rowspans'][($cellpos['rowspanid'])]['endpage'];
                            } else {
                                $endy = $parent['endy'];
                                $startpage = $parent['startpage'];
                                $endpage = $parent['endpage'];
                            }
                            if ($endpage > $startpage) {
                                // design borders around HTML cells.
                                for ($page=$startpage; $page <= $endpage; ++$page) {
                                    $this->setPage($page);
                                    if ($page == $startpage) {
                                        $this->y = $parent['starty']; // put cursor at the beginning of row on the first page
                                        $ch = $this->getPageHeight() - $parent['starty'] - $this->getBreakMargin();
                                        $cborder = $this->getBorderMode($border, $position='start');
                                    } elseif ($page == $endpage) {
                                        $this->y = $this->tMargin; // put cursor at the beginning of last page
                                        $ch = $endy - $this->tMargin;
                                        $cborder = $this->getBorderMode($border, $position='end');
                                    } else {
                                        $this->y = $this->tMargin; // put cursor at the beginning of the current page
                                        $ch = $this->getPageHeight() - $this->tMargin - $this->getBreakMargin();
                                        $cborder = $this->getBorderMode($border, $position='middle');
                                    }
                                    if (isset($cellpos['bgcolor']) AND ($cellpos['bgcolor']) !== false) {
                                        $this->SetFillColorArray($cellpos['bgcolor']);
                                        $fill = true;
                                    } else {
                                        $fill = false;
                                    }
                                    $cw = abs($cellpos['endx'] - $cellpos['startx']);
                                    $this->x = $cellpos['startx'];
                                    // 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]['lm'] != $this->pagedim[$startpage]['olm'])) {
                                            $this->x += ($this->pagedim[$page]['olm'] - $this->pagedim[$startpage]['olm']);
                                        }
                                    }
                                    // design a cell around the text
                                    $ccode = $this->FillColor."\n".$this->getCellCode($cw, $ch, '', $cborder, 1, '', $fill, '', 0, true);
                                    if ($cborder OR $fill) {
                                        $pagebuff = $this->getPageBuffer($this->page);
                                        $pstart = substr($pagebuff, 0, $this->intmrk[$this->page]);
                                        $pend = substr($pagebuff, $this->intmrk[$this->page]);
                                        $this->setPageBuffer($this->page, $pstart.$ccode."\n".$pend);
                                        $this->intmrk[$this->page] += strlen($ccode."\n");
                                    }
                                }
                            } else {
                                $this->setPage($startpage);
                                if (isset($cellpos['bgcolor']) AND ($cellpos['bgcolor']) !== false) {
                                    $this->SetFillColorArray($cellpos['bgcolor']);
                                    $fill = true;
                                } else {
                                    $fill = false;
                                }
                                $this->x = $cellpos['startx'];
                                $this->y = $parent['starty'];
                                $cw = abs($cellpos['endx'] - $cellpos['startx']);
                                $ch = $endy - $parent['starty'];
                                // design a cell around the text
                                $ccode = $this->FillColor."\n".$this->getCellCode($cw, $ch, '', $border, 1, '', $fill, '', 0, true);
                                if ($border OR $fill) {
                                    if (end($this->transfmrk[$this->page]) !== false) {
                                        $pagemarkkey = key($this->transfmrk[$this->page]);
                                        $pagemark = &$this->transfmrk[$this->page][$pagemarkkey];
                                    } elseif ($this->InFooter) {
                                        $pagemark = &$this->footerpos[$this->page];
                                    } else {
                                        $pagemark = &$this->intmrk[$this->page];
                                    }
                                    $pagebuff = $this->getPageBuffer($this->page);
                                    $pstart = substr($pagebuff, 0, $pagemark);
                                    $pend = substr($pagebuff, $pagemark);
                                    $this->setPageBuffer($this->page, $pstart.$ccode."\n".$pend);
                                    $pagemark += strlen($ccode."\n");
                                }                   
                            }
                        }                   
                        if (isset($table_el['attribute']['cellspacing'])) {
                            $cellspacing = $this->getHTMLUnitToUnits($table_el['attribute']['cellspacing'], 1, 'px');
                            $this->y += $cellspacing;
                        }               
                        $this->Ln(0, $cell);
                        $this->x = $parent['startx'];
                        if ($endpage > $startpage) {
                            if (($this->rtl) AND ($this->pagedim[$endpage]['orm'] != $this->pagedim[$startpage]['orm'])) {
                                $this->x += ($this->pagedim[$endpage]['orm'] - $this->pagedim[$startpage]['orm']);
                            } elseif ((!$this->rtl) AND ($this->pagedim[$endpage]['olm'] != $this->pagedim[$startpage]['olm'])) {
                                $this->x += ($this->pagedim[$endpage]['olm'] - $this->pagedim[$startpage]['olm']);
                            }
                        }
                    }
                    if (isset($parent['cellpadding'])) {
                        $this->cMargin = $this->oldcMargin;
                    }
                    $this->lasth = $this->FontSize * $this->cell_height_ratio;
                    if (!$this->empty_string($this->theadMargin)) {
                        // restore top margin
                        $this->tMargin = $this->theadMargin;
                        $this->pagedim[$this->page]['tm'] = $this->theadMargin;
                    }
                    // reset table header
                    $this->thead = '';
                    $this->theadMargin = '';
                    break;
                }
                case 'a': {
                    $this->HREF = '';
                    break;
                }
                case 'sup': {
                    $this->SetXY($this->GetX(), $this->GetY() + ((0.7 * $parent['fontsize']) / $this->k));
                    break;
                }
                case 'sub': {
                    $this->SetXY($this->GetX(), $this->GetY() - ((0.3 * $parent['fontsize'])/$this->k));
                    break;
                }
                case 'div': {
                    $this->addHTMLVertSpace(1, $cell, '', $firstorlast, $tag['value'], true);
                    break;
                }
                case 'blockquote': {
                    if ($this->rtl) {
                        $this->rMargin -= $this->listindent;
                    } else {
                        $this->lMargin -= $this->listindent;
                    }
                    $this->addHTMLVertSpace(2, $cell, '', $firstorlast, $tag['value'], true);
                    break;
                }
                case 'p': {
                    $this->addHTMLVertSpace(2, $cell, '', $firstorlast, $tag['value'], true);
                    break;
                }
                case 'pre': {
                    $this->addHTMLVertSpace(1, $cell, '', $firstorlast, $tag['value'], true);
                    $this->premode = false;
                    break;
                }
                case 'dl': {
                    --$this->listnum;
                    if ($this->listnum <= 0) {
                        $this->listnum = 0;
                        $this->addHTMLVertSpace(2, $cell, '', $firstorlast, $tag['value'], true);
                    }
                    break;
                }
                case 'dt': {
                    $this->lispacer = '';
                    $this->addHTMLVertSpace(0, $cell, '', $firstorlast, $tag['value'], true);
                    break;
                }
                case 'dd': {
                    $this->lispacer = '';
                    if ($this->rtl) {
                        $this->rMargin -= $this->listindent;
                    } else {
                        $this->lMargin -= $this->listindent;
                    }
                    $this->addHTMLVertSpace(0, $cell, '', $firstorlast, $tag['value'], true);
                    break;
                }
                case 'ul':
                case 'ol': {
                    --$this->listnum;
                    $this->lispacer = '';
                    if ($this->rtl) {
                        $this->rMargin -= $this->listindent;
                    } else {
                        $this->lMargin -= $this->listindent;
                    }
                    if ($this->listnum <= 0) {
                        $this->listnum = 0;
                        $this->addHTMLVertSpace(2, $cell, '', $firstorlast, $tag['value'], true);
                    }
                    $this->lasth = $this->FontSize * $this->cell_height_ratio;
                    break;
                }
                case 'li': {
                    $this->lispacer = '';
                    $this->addHTMLVertSpace(0, $cell, '', $firstorlast, $tag['value'], true);
                    break;
                }
                case 'h1': 
                case 'h2': 
                case 'h3': 
                case 'h4': 
                case 'h5': 
                case 'h6': {
                    $this->addHTMLVertSpace(1, $cell, ($parent['fontsize'] * 1.5) / $this->k, $firstorlast, $tag['value'], true);
                    break;
                }
                default : {
                    break;
                }
            }
            $this->tmprtl = false;
        }
        
        protected function addHTMLVertSpace($n, $cell=false, $h='', $firstorlast=false, $tag='', $closing=false) {
            if ($firstorlast) {
                $this->Ln(0, $cell);
                $this->htmlvspace = 0;
                return;
            }
            if (isset($this->tagvspaces[$tag][intval($closing)]['n'])) {
                $n = $this->tagvspaces[$tag][intval($closing)]['n'];
            }
            if (isset($this->tagvspaces[$tag][intval($closing)]['h'])) {
                $h = $this->tagvspaces[$tag][intval($closing)]['h'];
            }
            if (is_string($h)) {
                $vsize = $n * $this->lasth;
            } else {
                $vsize = $n * $h;
            }
            if ($vsize > $this->htmlvspace) {
                $this->Ln(($vsize - $this->htmlvspace), $cell);
                $this->htmlvspace = $vsize;
            }
        }
        
        public function setLIsymbol($symbol='!') {
            $symbol = strtolower($symbol);
            switch ($symbol) {
                case '!' :
                case '#' :
                case 'disc' :
                case 'disc' :
                case 'circle' :
                case 'square' :
                case '1':
                case 'decimal':
                case 'decimal-leading-zero':
                case 'i':
                case 'lower-roman':
                case 'I':
                case 'upper-roman':
                case 'a':
                case 'lower-alpha':
                case 'lower-latin':
                case 'A':
                case 'upper-alpha':
                case 'upper-latin':
                case 'lower-greek': {
                    $this->lisymbol = $symbol;
                    break;
                }
                default : {
                    $this->lisymbol = '';
                }
            }
        }
        
        public function SetBooklet($booklet=true, $inner=-1, $outer=-1) {
            $this->booklet = $booklet;
            if ($inner >= 0) {
                $this->lMargin = $inner;
            }
            if ($outer >= 0) {
                $this->rMargin = $outer;
            }
        }
        
        protected function swapMargins($reverse=true) {
            if ($reverse) {
                // swap left and right margins
                $mtemp = $this->original_lMargin;
                $this->original_lMargin = $this->original_rMargin;
                $this->original_rMargin = $mtemp;
                $deltam = $this->original_lMargin - $this->original_rMargin;
                $this->lMargin += $deltam;
                $this->rMargin -= $deltam;
            }
        }

        public function setHtmlVSpace($tagvs) {
            $this->tagvspaces = $tagvs;
        }

        public function setListIndentWidth($width) {
            return $this->customlistindent = floatval($width);
        }

        public function setOpenCell($isopen) {
            $this->opencell = $isopen;
        }

        public function setHtmlLinksStyle($color=array(0,0,255), $fontstyle='U') {
            $this->htmlLinkColorArray = $color;
            $this->htmlLinkFontStyle = $fontstyle;
        }

        public function getHTMLUnitToUnits($htmlval, $refsize=1, $defaultunit='px', $points=false) {
            $supportedunits = array('%', 'em', 'ex', 'px', 'in', 'cm', 'mm', 'pc', 'pt');
            $retval = 0;
            $value = 0;
            $unit = 'px';
            $k = $this->k;
            if ($points) {
                $k = 1;
            }
            if (in_array($defaultunit, $supportedunits)) {
                $unit = $defaultunit;
            }
            if (is_numeric($htmlval)) {
                $value = floatval($htmlval);
            } elseif (preg_match('/([0-9\.]+)/', $htmlval, $mnum)) {
                $value = floatval($mnum[1]);
                if (preg_match('/([a-z%]+)/', $htmlval, $munit)) {
                    if (in_array($munit[1], $supportedunits)) {
                        $unit = $munit[1];
                    }
                }
            }
            switch ($unit) {
                // percentage
                case '%': {
                    $retval = (($value * $refsize) / 100);
                    break;
                }
                // relative-size
                case 'em': {
                    $retval = ($value * $refsize);
                    break;
                }
                case 'ex': {
                    $retval = $value * ($refsize / 2);
                    break;
                }
                // absolute-size
                case 'in': {
                    $retval = ($value * $this->dpi) / $k;
                    break;
                }
                case 'cm': {
                    $retval = ($value / 2.54 * $this->dpi) / $k;
                    break;
                }
                case 'mm': {
                    $retval = ($value / 25.4 * $this->dpi) / $k;
                    break;
                }
                case 'pc': {
                    // one pica is 12 points
                    $retval = ($value * 12) / $k;
                    break;
                }
                case 'pt': {
                    $retval = $value / $k;
                    break;
                }
                case 'px': {
                    $retval = $this->pixelsToUnits($value);
                    break;
                }
            }
            return $retval;
        }

        public function intToRoman($number) {
            $roman = '';
            while ($number >= 1000) {
                $roman .= 'M';
                $number -= 1000;
            }
            while ($number >= 900) {
                $roman .= 'CM';
                $number -= 900;
            }
            while ($number >= 500) {
                $roman .= 'D';
                $number -= 500;
            }
            while ($number >= 400) {
                $roman .= 'CD';
                $number -= 400;
            }
            while ($number >= 100) {
                $roman .= 'C';
                $number -= 100;
            }
            while ($number >= 90) {
            $roman .= 'XC';
            $number -= 90;
            }
            while ($number >= 50) {
                $roman .= 'L';
                $number -= 50;
            }
            while ($number >= 40) {
                $roman .= 'XL';
                $number -= 40;
            }
            while ($number >= 10) {
            $roman .= 'X';
            $number -= 10;
            }
            while ($number >= 9) {
                $roman .= 'IX';
                $number -= 9;
            }
            while ($number >= 5) {
                $roman .= 'V';
                $number -= 5;
            }
            while ($number >= 4) {
            $roman .= 'IV';
            $number -= 4;
            }
            while ($number >= 1) {
                $roman .= 'I';
                --$number;
            }
            return $roman;
        }

        protected function putHtmlListBullet($listdepth, $listtype='', $size=10) {
            $size /= $this->k;
            $fill = '';
            $color = $this->fgcolor;
            $width = 0;
            $textitem = '';
            $tmpx = $this->x;       
            $lspace = $this->GetStringWidth('  ');
            if ($listtype == '!') {
                // set default list type for unordered list
                $deftypes = array('disc', 'circle', 'square');
                $listtype = $deftypes[($listdepth - 1) % 3];
            } elseif ($listtype == '#') {
                // set default list type for ordered list
                $listtype = 'decimal';
            }
            switch ($listtype) {
                // unordered types
                case 'none': {
                    break;
                }
                case 'disc': {
                    $fill = 'F';
                }
                case 'circle': {
                    $fill .= 'D';
                    $r = $size / 6;
                    $lspace += (2 * $r);
                    if ($this->rtl) {
                        $this->x += $lspace;
                    } else {
                        $this->x -= $lspace;
                    }
                    $this->Circle(($this->x + $r), ($this->y + ($this->lasth / 2)), $r, 0, 360, $fill, array('color'=>$color), $color, 8);
                    break;
                }
                case 'square': {
                    $l = $size / 3;
                    $lspace += $l;
                    if ($this->rtl) {
                        $this->x += $lspace;
                    } else {
                        $this->x -= $lspace;
                    }
                    $this->Rect($this->x, ($this->y + (($this->lasth - $l)/ 2)), $l, $l, 'F', array(), $color);
                    break;
                }
                // ordered types

                // $this->listcount[$this->listnum];
                // $textitem
                case '1':
                case 'decimal': {
                    $textitem = $this->listcount[$this->listnum];
                    break;
                }
                case 'decimal-leading-zero': {
                    $textitem = sprintf("%02d", $this->listcount[$this->listnum]);
                    break;
                }
                case 'i':
                case 'lower-roman': {
                    $textitem = strtolower($this->intToRoman($this->listcount[$this->listnum]));
                    break;
                }
                case 'I':
                case 'upper-roman': {
                    $textitem = $this->intToRoman($this->listcount[$this->listnum]);
                    break;
                }
                case 'a':
                case 'lower-alpha':
                case 'lower-latin': {
                    $textitem = chr(97 + $this->listcount[$this->listnum] - 1);
                    break;
                }
                case 'A':
                case 'upper-alpha':
                case 'upper-latin': {
                    $textitem = chr(65 + $this->listcount[$this->listnum] - 1);
                    break;
                }
                case 'lower-greek': {
                    $textitem = $this->unichr(945 + $this->listcount[$this->listnum] - 1);
                    break;
                }
                /*
                // Types to be implemented (special handling)
                case 'hebrew': {
                    break;
                }
                case 'armenian': {
                    break;
                }
                case 'georgian': {
                    break;
                }
                case 'cjk-ideographic': {
                    break;
                }
                case 'hiragana': {
                    break;
                }
                case 'katakana': {
                    break;
                }
                case 'hiragana-iroha': {
                    break;
                }
                case 'katakana-iroha': {
                    break;
                }
                */
                default: {
                    $textitem = $this->listcount[$this->listnum];
                }
            }
            if (!$this->empty_string($textitem)) {
                // print ordered item
                if ($this->rtl) {
                    $textitem = '.'.$textitem;
                } else {
                    $textitem = $textitem.'.';
                }
                $lspace += $this->GetStringWidth($textitem);
                if ($this->rtl) {
                    $this->x += $lspace;
                } else {
                    $this->x -= $lspace;
                }
                $this->Write($this->lasth, $textitem, '', false, '', false, 0, false);
            }
            $this->x = $tmpx;
            $this->lispacer = '';
        }

        protected function getGraphicVars() {
            $grapvars = array(
                'FontFamily' => $this->FontFamily,
                'FontStyle' => $this->FontStyle,
                'FontSizePt' => $this->FontSizePt,
                'rMargin' => $this->rMargin,
                'lMargin' => $this->lMargin,
                'cMargin' => $this->cMargin,
                'LineWidth' => $this->LineWidth,
                'linestyleWidth' => $this->linestyleWidth,
                'linestyleCap' => $this->linestyleCap,
                'linestyleJoin' => $this->linestyleJoin,
                'linestyleDash' => $this->linestyleDash,
                'DrawColor' => $this->DrawColor,
                'FillColor' => $this->FillColor,
                'TextColor' => $this->TextColor,
                'ColorFlag' => $this->ColorFlag,
                'bgcolor' => $this->bgcolor,
                'fgcolor' => $this->fgcolor,
                'htmlvspace' => $this->htmlvspace,
                'lasth' => $this->lasth
                );
            return $grapvars;
        }

        protected function setGraphicVars($gvars) {
            $this->FontFamily = $gvars['FontFamily'];
            $this->FontStyle = $gvars['FontStyle'];
            $this->FontSizePt = $gvars['FontSizePt'];
            $this->rMargin = $gvars['rMargin'];
            $this->lMargin = $gvars['lMargin'];
            $this->cMargin = $gvars['cMargin'];
            $this->LineWidth = $gvars['LineWidth'];
            $this->linestyleWidth = $gvars['linestyleWidth'];
            $this->linestyleCap = $gvars['linestyleCap'];
            $this->linestyleJoin = $gvars['linestyleJoin'];
            $this->linestyleDash = $gvars['linestyleDash'];
            $this->DrawColor = $gvars['DrawColor'];
            $this->FillColor = $gvars['FillColor'];
            $this->TextColor = $gvars['TextColor'];
            $this->ColorFlag = $gvars['ColorFlag'];
            $this->bgcolor = $gvars['bgcolor'];
            $this->fgcolor = $gvars['fgcolor'];
            $this->htmlvspace = $gvars['htmlvspace'];
            //$this->lasth = $gvars['lasth'];
            $this->_out(''.$this->linestyleWidth.' '.$this->linestyleCap.' '.$this->linestyleJoin.' '.$this->linestyleDash.' '.$this->DrawColor.' '.$this->FillColor.'');
            if (!$this->empty_string($this->FontFamily)) {
                $this->SetFont($this->FontFamily, $this->FontStyle, $this->FontSizePt);
            }
        }

        protected function getObjFilename($name) {
            return tempnam(K_PATH_CACHE, $name.'_');
        }

        protected function writeDiskCache($filename, $data, $append=false) {
            if ($append) {
                $fmode = 'ab+';
            } else {
                $fmode = 'wb+';
            }
            $f = @fopen($filename, $fmode);
            if (!$f) {
                $this->Error('Unable to write cache file: '.$filename);
            } else {
                fwrite($f, $data);
                fclose($f);
            }
            // update file lenght (needed for transactions)
            if (!isset($this->cache_file_lenght['_'.$filename])) {
                $this->cache_file_lenght['_'.$filename] = strlen($data);
            } else {
                $this->cache_file_lenght['_'.$filename] += strlen($data);
            }
        }

        protected function readDiskCache($filename) {
            return file_get_contents($filename);
        }

        protected function setBuffer($data) {
            $this->bufferlen += strlen($data);
            if ($this->diskcache) {
                if (!isset($this->buffer) OR $this->empty_string($this->buffer)) {
                    $this->buffer = $this->getObjFilename('buffer');
                }
                $this->writeDiskCache($this->buffer, $data, true);
            } else {
                $this->buffer .= $data;
            }
        }

        protected function getBuffer() {
            if ($this->diskcache) {
                return $this->readDiskCache($this->buffer);
            } else {
                return $this->buffer;
            }
        }

        protected function setPageBuffer($page, $data, $append=false) {
            if ($this->diskcache) {
                if (!isset($this->pages[$page])) {
                    $this->pages[$page] = $this->getObjFilename('page'.$page);
                }
                $this->writeDiskCache($this->pages[$page], $data, $append);
            } else {
                if ($append) {
                    $this->pages[$page] .= $data;
                } else {
                    $this->pages[$page] = $data;
                }
            }
            if ($append AND isset($this->pagelen[$page])) {
                $this->pagelen[$page] += strlen($data);
            } else {
                $this->pagelen[$page] = strlen($data);
            }
        }

        protected function getPageBuffer($page) {
            if ($this->diskcache) {
                return $this->readDiskCache($this->pages[$page]);
            } elseif (isset($this->pages[$page])) {
                return $this->pages[$page];
            }
            return false;
        }

        protected function setImageBuffer($image, $data) {
            if ($this->diskcache) {
                if (!isset($this->images[$image])) {
                    $this->images[$image] = $this->getObjFilename('image'.$image);
                }
                $this->writeDiskCache($this->images[$image], serialize($data));
            } else {
                $this->images[$image] = $data;
            }
            if (!in_array($image, $this->imagekeys)) {
                $this->imagekeys[] = $image;
            }
            ++$this->numimages;
        }

        protected function setImageSubBuffer($image, $key, $data) {
            if (!isset($this->images[$image])) {
                $this->setImageBuffer($image, array());
            }
            if ($this->diskcache) {
                $tmpimg = $this->getImageBuffer($image);
                $tmpimg[$key] = $data;
                $this->writeDiskCache($this->images[$image], serialize($tmpimg));
            } else {
                $this->images[$image][$key] = $data;
            }
        }

        protected function getImageBuffer($image) {
            if ($this->diskcache AND isset($this->images[$image])) {
                return unserialize($this->readDiskCache($this->images[$image]));
            } elseif (isset($this->images[$image])) {
                return $this->images[$image];
            }
            return false;
        }

        protected function setFontBuffer($font, $data) {
            if ($this->diskcache) {
                if (!isset($this->fonts[$font])) {
                    $this->fonts[$font] = $this->getObjFilename('font');
                }
                $this->writeDiskCache($this->fonts[$font], serialize($data));
            } else {
                $this->fonts[$font] = $data;
            }
            if (!in_array($font, $this->fontkeys)) {
                $this->fontkeys[] = $font;
            }
        }

        protected function setFontSubBuffer($font, $key, $data) {
            if (!isset($this->fonts[$font])) {
                $this->setFontBuffer($font, array());
            }
            if ($this->diskcache) {
                $tmpfont = $this->getFontBuffer($font);
                $tmpfont[$key] = $data;
                $this->writeDiskCache($this->fonts[$font], serialize($tmpfont));
            } else {
                $this->fonts[$font][$key] = $data;
            }
        }

        protected function getFontBuffer($font) {
            if ($this->diskcache AND isset($this->fonts[$font])) {
                return unserialize($this->readDiskCache($this->fonts[$font]));
            } elseif (isset($this->fonts[$font])) {
                return $this->fonts[$font];
            }
            return false;
        }

        public function movePage($frompage, $topage) {
            if (($frompage > $this->numpages) OR ($frompage <= $topage)) {
                return false;
            }
            if ($frompage == $this->page) {
                // close the page before moving it
                $this->endPage();
            }
            // move all page-related states
            $tmppage = $this->pages[$frompage];
            $tmppagedim = $this->pagedim[$frompage];
            $tmppagelen = $this->pagelen[$frompage];
            $tmpintmrk = $this->intmrk[$frompage];
            if (isset($this->footerpos[$frompage])) {
                $tmpfooterpos = $this->footerpos[$frompage];
            }
            if (isset($this->footerlen[$frompage])) {
                $tmpfooterlen = $this->footerlen[$frompage];
            }
            if (isset($this->transfmrk[$frompage])) {
                $tmptransfmrk = $this->transfmrk[$frompage];
            }
            if (isset($this->PageAnnots[$frompage])) {
                $tmpannots = $this->PageAnnots[$frompage];
            }
            if (isset($this->newpagegroup[$frompage])) {
                $tmpnewpagegroup = $this->newpagegroup[$frompage];
            }
            for ($i = $frompage; $i > $topage; --$i) {
                $j = $i - 1;
                // shift pages down
                $this->pages[$i] = $this->pages[$j];
                $this->pagedim[$i] = $this->pagedim[$j];
                $this->pagelen[$i] = $this->pagelen[$j];
                $this->intmrk[$i] = $this->intmrk[$j];
                if (isset($this->footerpos[$j])) {
                    $this->footerpos[$i] = $this->footerpos[$j];
                } elseif (isset($this->footerpos[$i])) {
                    unset($this->footerpos[$i]);
                }
                if (isset($this->footerlen[$j])) {
                    $this->footerlen[$i] = $this->footerlen[$j];
                } elseif (isset($this->footerlen[$i])) {
                    unset($this->footerlen[$i]);
                }
                if (isset($this->transfmrk[$j])) {
                    $this->transfmrk[$i] = $this->transfmrk[$j];
                } elseif (isset($this->transfmrk[$i])) {
                    unset($this->transfmrk[$i]);
                }
                if (isset($this->PageAnnots[$j])) {
                    $this->PageAnnots[$i] = $this->PageAnnots[$j];
                } elseif (isset($this->PageAnnots[$i])) {
                    unset($this->PageAnnots[$i]);
                }
                if (isset($this->newpagegroup[$j])) {
                    $this->newpagegroup[$i] = $this->newpagegroup[$j];
                } elseif (isset($this->newpagegroup[$i])) {
                    unset($this->newpagegroup[$i]);
                }
            }
            $this->pages[$topage] = $tmppage;
            $this->pagedim[$topage] = $tmppagedim;
            $this->pagelen[$topage] = $tmppagelen;
            $this->intmrk[$topage] = $tmpintmrk;
            if (isset($tmpfooterpos)) {
                $this->footerpos[$topage] = $tmpfooterpos;
            } elseif (isset($this->footerpos[$topage])) {
                unset($this->footerpos[$topage]);
            }
            if (isset($tmpfooterlen)) {
                $this->footerlen[$topage] = $tmpfooterlen;
            } elseif (isset($this->footerlen[$topage])) {
                unset($this->footerlen[$topage]);
            }
            if (isset($tmptransfmrk)) {
                $this->transfmrk[$topage] = $tmptransfmrk;
            } elseif (isset($this->transfmrk[$topage])) {
                unset($this->transfmrk[$topage]);
            }
            if (isset($tmpannots)) {
                $this->PageAnnots[$topage] = $tmpannots;
            } elseif (isset($this->PageAnnots[$topage])) {
                unset($this->PageAnnots[$topage]);
            }
            if (isset($tmpnewpagegroup)) {
                $this->newpagegroup[$topage] = $tmpnewpagegroup;
            } elseif (isset($this->newpagegroup[$topage])) {
                unset($this->newpagegroup[$topage]);
            }
            // adjust outlines
            $tmpoutlines = $this->outlines;
            foreach ($tmpoutlines as $key => $outline) {
                if (($outline['p'] >= $topage) AND ($outline['p'] < $frompage)) {
                    $this->outlines[$key]['p'] = $outline['p'] + 1;
                } elseif ($outline['p'] == $frompage) {
                    $this->outlines[$key]['p'] = $topage;
                }
            }
            // adjust links
            $tmplinks = $this->links;
            foreach ($tmplinks as $key => $link) {
                if (($link[0] >= $topage) AND ($link[0] < $frompage)) {
                    $this->links[$key][0] = $link[0] + 1;
                } elseif ($link[0] == $frompage) {
                    $this->links[$key][0] = $topage;
                }
            }
            // adjust javascript
            $tmpjavascript = $this->javascript;
            global $jfrompage, $jtopage;
            $jfrompage = $frompage;
            $jtopage = $topage;
            $this->javascript = preg_replace_callback('/this\.addField\(\'([^\']*)\',\'([^\']*)\',([0-9]+)/',
                create_function('$matches', 'global $jfrompage, $jtopage;
                $pagenum = intval($matches[3]) + 1;
                if (($pagenum >= $jtopage) AND ($pagenum < $jfrompage)) {
                    $newpage = ($pagenum + 1);
                } elseif ($pagenum == $jfrompage) {
                    $newpage = $jtopage;
                } else {
                    $newpage = $pagenum;
                }
                --$newpage;
                return "this.addField(\'".$matches[1]."\',\'".$matches[2]."\',".$newpage."";'), $tmpjavascript);
            // return to last page
            $this->lastPage(true);
            return true;
        }

        public function deletePage($page) {
            if ($page > $this->numpages) {
                return false;
            }
            // delete current page
            unset($this->pages[$page]);
            unset($this->pagedim[$page]);
            unset($this->pagelen[$page]);
            unset($this->intmrk[$page]);
            if (isset($this->footerpos[$page])) {
                unset($this->footerpos[$page]);
            }
            if (isset($this->footerlen[$page])) {
                unset($this->footerlen[$page]);
            }
            if (isset($this->transfmrk[$page])) {
                unset($this->transfmrk[$page]);
            }
            if (isset($this->PageAnnots[$page])) {
                unset($this->PageAnnots[$page]);
            }
            if (isset($this->newpagegroup[$page])) {
                unset($this->newpagegroup[$page]);
            }
            if (isset($this->pageopen[$page])) {
                unset($this->pageopen[$page]);
            }
            // update remaining pages
            for ($i = $page; $i < $this->numpages; ++$i) {
                $j = $i + 1;
                // shift pages
                $this->pages[$i] = $this->pages[$j];
                $this->pagedim[$i] = $this->pagedim[$j];
                $this->pagelen[$i] = $this->pagelen[$j];
                $this->intmrk[$i] = $this->intmrk[$j];
                if (isset($this->footerpos[$j])) {
                    $this->footerpos[$i] = $this->footerpos[$j];
                } elseif (isset($this->footerpos[$i])) {
                    unset($this->footerpos[$i]);
                }
                if (isset($this->footerlen[$j])) {
                    $this->footerlen[$i] = $this->footerlen[$j];
                } elseif (isset($this->footerlen[$i])) {
                    unset($this->footerlen[$i]);
                }
                if (isset($this->transfmrk[$j])) {
                    $this->transfmrk[$i] = $this->transfmrk[$j];
                } elseif (isset($this->transfmrk[$i])) {
                    unset($this->transfmrk[$i]);
                }
                if (isset($this->PageAnnots[$j])) {
                    $this->PageAnnots[$i] = $this->PageAnnots[$j];
                } elseif (isset($this->PageAnnots[$i])) {
                    unset($this->PageAnnots[$i]);
                }
                if (isset($this->newpagegroup[$j])) {
                    $this->newpagegroup[$i] = $this->newpagegroup[$j];
                } elseif (isset($this->newpagegroup[$i])) {
                    unset($this->newpagegroup[$i]);
                }
                if (isset($this->pageopen[$j])) {
                    $this->pageopen[$i] = $this->pageopen[$j];
                } elseif (isset($this->pageopen[$i])) {
                    unset($this->pageopen[$i]);
                }
            }
            // remove last page
            unset($this->pages[$this->numpages]);
            unset($this->pagedim[$this->numpages]);
            unset($this->pagelen[$this->numpages]);
            unset($this->intmrk[$this->numpages]);
            if (isset($this->footerpos[$this->numpages])) {
                unset($this->footerpos[$this->numpages]);
            }
            if (isset($this->footerlen[$this->numpages])) {
                unset($this->footerlen[$this->numpages]);
            }
            if (isset($this->transfmrk[$this->numpages])) {
                unset($this->transfmrk[$this->numpages]);
            }
            if (isset($this->PageAnnots[$this->numpages])) {
                unset($this->PageAnnots[$this->numpages]);
            }
            if (isset($this->newpagegroup[$this->numpages])) {
                unset($this->newpagegroup[$this->numpages]);
            }
            if (isset($this->pageopen[$this->numpages])) {
                unset($this->pageopen[$this->numpages]);
            }
            --$this->numpages;
            $this->page = $this->numpages;
            // adjust outlines
            $tmpoutlines = $this->outlines;
            foreach ($tmpoutlines as $key => $outline) {
                if ($outline['p'] > $page) {
                    $this->outlines[$key]['p'] = $outline['p'] - 1;
                } elseif ($outline['p'] == $page) {
                    unset($this->outlines[$key]);
                }
            }
            // adjust links
            $tmplinks = $this->links;
            foreach ($tmplinks as $key => $link) {
                if ($link[0] > $page) {
                    $this->links[$key][0] = $link[0] - 1;
                } elseif ($link[0] == $page) {
                    unset($this->links[$key]);
                }
            }
            // adjust javascript
            $tmpjavascript = $this->javascript;
            global $jpage;
            $jpage = $page;
            $this->javascript = preg_replace_callback('/this\.addField\(\'([^\']*)\',\'([^\']*)\',([0-9]+)/',
                create_function('$matches', 'global $jpage;
                $pagenum = intval($matches[3]) + 1;
                if ($pagenum >= $jpage) {
                    $newpage = ($pagenum - 1);
                } elseif ($pagenum == $jpage) {
                    $newpage = 1;
                } else {
                    $newpage = $pagenum;
                }
                --$newpage;
                return "this.addField(\'".$matches[1]."\',\'".$matches[2]."\',".$newpage."";'), $tmpjavascript);
            // return to last page
            $this->lastPage(true);
            return true;
        }

        public function addTOC($page='', $numbersfont='', $filler='.') {
            $fontsize = $this->FontSizePt;
            $fontfamily = $this->FontFamily;
            $fontstyle = $this->FontStyle;
            $w = $this->w - $this->lMargin - $this->rMargin;
            $spacer = $this->GetStringWidth(' ') * 4;
            $page_first = $this->getPage();
            $lmargin = $this->lMargin;
            $rmargin = $this->rMargin;
            $x_start = $this->GetX();
            if ($this->empty_string($numbersfont)) {
                $numbersfont = $this->default_monospaced_font;
            }
            if ($this->empty_string($filler)) {
                $filler = ' ';
            }
            if ($this->empty_string($page)) {
                $gap = ' ';
            } else {
                $gap = '';
            }
            foreach ($this->outlines as $key => $outline) {
                if ($this->rtl) {
                    $aligntext = 'R';
                    $alignnum = 'L';
                } else {
                    $aligntext = 'L';
                    $alignnum = 'R';
                }
                if ($outline['l'] == 0) {
                    $this->SetFont($fontfamily, $fontstyle.'B', $fontsize);
                } else {
                    $this->SetFont($fontfamily, $fontstyle, $fontsize - $outline['l']);
                }
                $indent = ($spacer * $outline['l']);
                if ($this->rtl) {
                    $this->rMargin += $indent;
                    $this->x -= $indent;
                } else {
                    $this->lMargin += $indent;
                    $this->x += $indent;
                }
                $link = $this->AddLink();
                $this->SetLink($link, 0, $outline['p']);
                // write the text
                $this->Write(0, $outline['t'], $link, 0, $aligntext, false, 0, false, false, 0);
                $this->SetFont($numbersfont, $fontstyle, $fontsize);
                if ($this->empty_string($page)) {
                    $pagenum = $outline['p'];
                } else {
                    // placemark to be replaced with the correct number
                    $pagenum = '{#'.($outline['p']).'}';
                    if (($this->CurrentFont['type'] == 'TrueTypeUnicode') OR ($this->CurrentFont['type'] == 'cidfont0')) {
                        $pagenum = '{'.$pagenum.'}';
                    }
                }
                $numwidth = $this->GetStringWidth($pagenum);
                if ($this->rtl) {
                    $tw = $this->x - $this->lMargin;
                } else {
                    $tw = $this->w - $this->rMargin - $this->x;
                }
                $fw = $tw - $numwidth - $this->GetStringWidth(' ');
                $numfills = floor($fw / $this->GetStringWidth($filler));
                if ($numfills > 0) {
                    $rowfill = str_repeat($filler, $numfills);
                } else {
                    $rowfill = '';
                }
                if ($this->rtl) {
                    $pagenum = $pagenum.$gap.$rowfill.' ';
                } else {
                    $pagenum = ' '.$rowfill.$gap.$pagenum;
                }
                // write the number
                //$this->SetX($x_start);
                $this->Cell($tw, 0, $pagenum, 0, 1, $alignnum, 0, $link, 0);
                $this->SetX($x_start);
                $this->lMargin = $lmargin;
                $this->rMargin = $rmargin;
            }
            $page_last = $this->getPage();
            $numpages = $page_last - $page_first + 1;
            if (!$this->empty_string($page)) {
                for($p = $page_first; $p <= $page_last; ++$p) {
                    // get page data
                    $temppage = $this->getPageBuffer($p);
                    for($n = 1; $n <= $this->numpages; ++$n) {
                        // update page numbers
                        $k = '{#'.$n.'}';
                        $ku = '{'.$k.'}';
                        $alias_a = $this->_escape($k);
                        $alias_au = $this->_escape('{'.$k.'}');
                        if ($this->isunicode) {
                            $alias_b = $this->_escape($this->UTF8ToLatin1($k));
                            $alias_bu = $this->_escape($this->UTF8ToLatin1($ku));
                            $alias_c = $this->_escape($this->utf8StrRev($k, false, $this->tmprtl));
                            $alias_cu = $this->_escape($this->utf8StrRev($ku, false, $this->tmprtl));
                        }
                        if ($n >= $page) {
                            $np = $n + $numpages;
                        } else {
                            $np = $n;
                        }
                        $ns = $this->formatTOCPageNumber($np);
                        $nu = $ns;
                        $sdiff = strlen($k) - strlen($ns) - 1;
                        $sdiffu = strlen($ku) - strlen($ns) - 1;
                        $sfill = str_repeat($filler, $sdiff);
                        $sfillu = str_repeat($filler, $sdiffu);
                        if ($this->rtl) {
                            $ns = $ns.' '.$sfill;
                            $nu = $nu.' '.$sfillu;
                        } else {
                            $ns = $sfill.' '.$ns;
                            $nu = $sfillu.' '.$nu;
                        }
                        $nu = $this->UTF8ToUTF16BE($nu, false);
                        $temppage = str_replace($alias_au, $nu, $temppage);
                        if ($this->isunicode) {
                            $temppage = str_replace($alias_bu, $nu, $temppage);
                            $temppage = str_replace($alias_cu, $nu, $temppage);
                            $temppage = str_replace($alias_b, $ns, $temppage);
                            $temppage = str_replace($alias_c, $ns, $temppage);
                        }
                        $temppage = str_replace($alias_a, $ns, $temppage);
                    }
                    // save changes
                    $this->setPageBuffer($p, $temppage);
                }
                // move pages
                for ($i = 0; $i < $numpages; ++$i) {
                    $this->movePage($page_last, $page);
                }
            }
            $this->SetFont($fontfamily, $fontstyle, $fontsize);
        }

        public function startTransaction() {
            if (isset($this->objcopy)) {
                // remove previous copy
                $this->commitTransaction();
            }
            // clone current object
            $this->objcopy = $this->objclone($this);
        }

        public function commitTransaction() {
            if (isset($this->objcopy)) {
                $this->objcopy->_destroy(true, true);
                unset($this->objcopy);
            }
        }

        public function rollbackTransaction() {
            if (isset($this->objcopy)) {
                if (isset($this->objcopy->diskcache) AND $this->objcopy->diskcache) {
                    // truncate files to previous values
                    foreach ($this->objcopy->cache_file_lenght as $file => $lenght) {
                        $file = substr($file, 1);
                        $handle = fopen($file, 'r+');
                        ftruncate($handle, $lenght);
                    }
                }
                $this->_destroy(true, true);
                return $this->objcopy;
            }
            return $this;
        }

        public function objclone($object) {
            return @clone($object);
        }

        public function empty_string($str) {
            return (is_null($str) OR (is_string($str) AND (strlen($str) == 0)));
        }
        
    } // END OF TCPDF CLASS
}
//============================================================+
// END OF FILE
//============================================================+
?>

---