/app/protected/extensions/pdf/dompdf/lib/class.pdf.php

Large files files are truncated, but you can click here to view the full file

<?php
/**
 * A PHP class to provide the basic functionality to create a pdf document without
 * any requirement for additional modules.
 *
 * Extended by Orion Richardson to support Unicode / UTF-8 characters using
 * TCPDF and others as a guide.
 *
 * @author  Wayne Munro <pdf@ros.co.nz>
 * @author  Orion Richardson <orionr@yahoo.com>
 * @author  Helmut Tischer <htischer@weihenstephan.org>
 * @author  Ryan H. Masten <ryan.masten@gmail.com>
 * @author  Brian Sweeney <eclecticgeek@gmail.com>
 * @author  Fabien Ménager <fabien.menager@gmail.com>
 * @version $Id: class.pdf.php 469 2012-02-05 22:25:30Z fabien.menager $
 * @license Public Domain http://creativecommons.org/licenses/publicdomain/
 * @package Cpdf
 */
class Cpdf {
  
  /**
   * @var integer The current number of pdf objects in the document
   */
  public  $numObj = 0;

  /**
   * @var array This array contains all of the pdf objects, ready for final assembly
   */
  public  $objects =  array();

  /**
   * @var integer The objectId (number within the objects array) of the document catalog
   */
  public  $catalogId;

  /**
   * @var array Array carrying information about the fonts that the system currently knows about
   * Used to ensure that a font is not loaded twice, among other things
   */
  public  $fonts = array();
  
  /**
   * @var string The default font metrics file to use if no other font has been loaded.
   * The path to the directory containing the font metrics should be included
   */
  public  $defaultFont = './fonts/Helvetica.afm';
  
  /**
   * @string A record of the current font
   */
  public  $currentFont = '';

  /**
   * @var string The current base font
   */
  public  $currentBaseFont = '';

  /**
   * @var integer The number of the current font within the font array
   */
  public  $currentFontNum = 0;

  /**
   * @var integer
   */
  public  $currentNode;

  /**
   * @var integer Object number of the current page
   */
  public  $currentPage;

  /**
   * @var integer Object number of the currently active contents block
   */
  public  $currentContents;

  /**
   * @var integer Number of fonts within the system
   */
  public  $numFonts = 0;

  /**
   * @var integer Number of graphic state resources used
   */
  private  $numStates =  0;

  /**
   * @var array Current colour for fill operations, defaults to inactive value, 
   * all three components should be between 0 and 1 inclusive when active
   */
  public  $currentColour = null;

  /**
   * @var array Current colour for stroke operations (lines etc.)
   */
  public  $currentStrokeColour = null;

  /**
   * @var string Current style that lines are drawn in
   */
  public  $currentLineStyle = '';

  /**
   * @var array Current line transparency (partial graphics state)
   */
  public $currentLineTransparency = array("mode" => "Normal", "opacity" => 1.0);
  
  /**
   * array Current fill transparency (partial graphics state)
   */
  public $currentFillTransparency = array("mode" => "Normal", "opacity" => 1.0);
  
  /**
   * @var array An array which is used to save the state of the document, mainly the colours and styles
   * it is used to temporarily change to another state, the change back to what it was before
   */
  public  $stateStack =  array();

  /**
   * @var integer Number of elements within the state stack
   */
  public  $nStateStack =  0;

  /**
   * @var integer Number of page objects within the document
   */
  public  $numPages = 0;

  /**
   * @var array Object Id storage stack
   */
  public  $stack = array();

  /**
   * @var integer Number of elements within the object Id storage stack
   */
  public  $nStack = 0;

  /**
   * an array which contains information about the objects which are not firmly attached to pages
   * these have been added with the addObject function
   */
  public  $looseObjects = array();

  /**
   * array contains infomation about how the loose objects are to be added to the document
   */
  public  $addLooseObjects = array();

  /**
   * @var integer The objectId of the information object for the document
   * this contains authorship, title etc.
   */
  public  $infoObject = 0;

  /**
   * @var integer Number of images being tracked within the document
   */
  public  $numImages = 0;

  /**
   * @var array An array containing options about the document
   * it defaults to turning on the compression of the objects
   */
  public  $options = array('compression'=>true);

  /**
   * @var integer The objectId of the first page of the document
   */
  public  $firstPageId;

  /**
   * @var float Used to track the last used value of the inter-word spacing, this is so that it is known
   * when the spacing is changed.
   */
  public  $wordSpaceAdjust = 0;

  /**
   * @var float Used to track the last used value of the inter-letter spacing, this is so that it is known
   * when the spacing is changed.
   */
  public  $charSpaceAdjust = 0;
  
  /**
   * @var integer The object Id of the procset object
   */
  public  $procsetObjectId;

  /**
   * @var array Store the information about the relationship between font families
   * this used so that the code knows which font is the bold version of another font, etc.
   * the value of this array is initialised in the constuctor function.
   */
  public  $fontFamilies =  array();
 
  /**
   * @var string Folder for php serialized formats of font metrics files.
   * If empty string, use same folder as original metrics files.
   * This can be passed in from class creator.
   * If this folder does not exist or is not writable, Cpdf will be **much** slower.
   * Because of potential trouble with php safe mode, folder cannot be created at runtime.
   */
  public  $fontcache = '';
  
  /**
   * @var integer The version of the font metrics cache file.
   * This value must be manually incremented whenever the internal font data structure is modified.
   */
  public  $fontcacheVersion = 5;

  /**
   * @var string Temporary folder.
   * If empty string, will attempty system tmp folder.
   * This can be passed in from class creator.
   * Only used for conversion of gd images to jpeg images.
   */
  public  $tmp = '';

  /**
   * @var string Track if the current font is bolded or italicised
   */
  public  $currentTextState =  '';

  /**
   * @var string Messages are stored here during processing, these can be selected afterwards to give some useful debug information
   */
  public  $messages = '';

  /**
   * @var string The ancryption array for the document encryption is stored here
   */
  public  $arc4 = '';

  /**
   * @var integer The object Id of the encryption information
   */
  public  $arc4_objnum = 0;

  /**
   * @var string The file identifier, used to uniquely identify a pdf document
   */
  public  $fileIdentifier = '';

  /**
   * @var boolean A flag to say if a document is to be encrypted or not
   */
  public  $encrypted = false;

  /**
   * @var string The encryption key for the encryption of all the document content (structure is not encrypted)
   */
  public  $encryptionKey = '';

  /**
   * @var array Array which forms a stack to keep track of nested callback functions
   */
  public  $callback =  array();

  /**
   * @var integer The number of callback functions in the callback array
   */
  public  $nCallback =  0;

  /**
   * @var array Store label->id pairs for named destinations, these will be used to replace internal links
   * done this way so that destinations can be defined after the location that links to them
   */
  public  $destinations =  array();

  /**
   * @var array Store the stack for the transaction commands, each item in here is a record of the values of all the
   * publiciables within the class, so that the user can rollback at will (from each 'start' command)
   * note that this includes the objects array, so these can be large.
   */
  public  $checkpoint =  '';

  /**
   * @var array Table of Image origin filenames and image labels which were already added with o_image().
   * Allows to merge identical images
   */
  public  $imagelist = array();

  /**
   * @var boolean Whether the text passed in should be treated as Unicode or just local character set.
   */
  public  $isUnicode = false;

  /**
   * @var string the JavaScript code of the document
   */
  public  $javascript = '';

  /**
   * @var boolean whether the compression is possible
   */
  protected $compressionReady = false;

  /**
   * @var array Current page size
   */
  protected $currentPageSize = array("width" => 0, "height" => 0);
  
  /**
   * @var array All the chars that will be required in the font subsets
   */
  protected $stringSubsets = array();
  
  /**
   * @var string The target internal encoding
   */
  static protected $targetEncoding = 'iso-8859-1';
  
  /**
   * @var array The list of the core fonts
   */
  static protected $coreFonts = array(
    'courier', 'courier-bold', 'courier-oblique', 'courier-boldoblique',
    'helvetica', 'helvetica-bold', 'helvetica-oblique', 'helvetica-boldoblique',
    'times-roman', 'times-bold', 'times-italic', 'times-bolditalic',
    'symbol', 'zapfdingbats'
  );
  
  /**
   * class constructor
   * this will start a new document
   * @var array   $pageSize  Array of 4 numbers, defining the bottom left and upper right corner of the page. first two are normally zero.
   * @var boolean $isUnicode Whether text will be treated as Unicode or not.
   * @var string  $fontcache The font cache folder
   * @var string  $tmp The temporary folder
   */
  function __construct ($pageSize = array(0, 0, 612, 792), $isUnicode = false, $fontcache = '', $tmp = '') {
    $this->isUnicode = $isUnicode;
    $this->fontcache = $fontcache;
    $this->tmp = $tmp;
    $this->newDocument($pageSize);
    
    $this->compressionReady = function_exists('gzcompress');
    
    if ( in_array('Windows-1252', mb_list_encodings()) ) {
      self::$targetEncoding = 'Windows-1252';
    }

    // also initialize the font families that are known about already
    $this->setFontFamily('init');
    //  $this->fileIdentifier = md5('xxxxxxxx'.time());
  }
  
  /**
   * Document object methods (internal use only)
   *
   * There is about one object method for each type of object in the pdf document
   * Each function has the same call list ($id,$action,$options).
   * $id = the object ID of the object, or what it is to be if it is being created
   * $action = a string specifying the action to be performed, though ALL must support:
   *           'new' - create the object with the id $id
   *           'out' - produce the output for the pdf object
   * $options = optional, a string or array containing the various parameters for the object
   *
   * These, in conjunction with the output function are the ONLY way for output to be produced
   * within the pdf 'file'.
   */

  /**
   *destination object, used to specify the location for the user to jump to, presently on opening
   */
  protected function  o_destination($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch ($action) {
    case  'new':
      $this->objects[$id] = array('t'=>'destination', 'info'=>array());
      $tmp =  '';
      switch  ($options['type']) {
      case  'XYZ':
      case  'FitR':
        $tmp =   ' '.$options['p3'].$tmp;
      case  'FitH':
      case  'FitV':
      case  'FitBH':
      case  'FitBV':
        $tmp =   ' '.$options['p1'].' '.$options['p2'].$tmp;
      case  'Fit':
      case  'FitB':
        $tmp =   $options['type'].$tmp;
        $this->objects[$id]['info']['string'] = $tmp;
        $this->objects[$id]['info']['page'] = $options['page'];
      }
      break;

    case  'out':
      $tmp =  $o['info'];
      $res = "\n$id 0 obj\n".'['.$tmp['page'].' 0 R /'.$tmp['string']."]\nendobj";
      return  $res;
    }
  }

  /**
   * set the viewer preferences
   */
  protected function  o_viewerPreferences($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  'new':
      $this->objects[$id] = array('t'=>'viewerPreferences', 'info'=>array());
      break;

    case  'add':
      foreach($options as  $k=>$v) {
        switch  ($k) {
        case  'HideToolbar':
        case  'HideMenubar':
        case  'HideWindowUI':
        case  'FitWindow':
        case  'CenterWindow':
        case  'NonFullScreenPageMode':
        case  'Direction':
          $o['info'][$k] = $v;
          break;
        }
      }
      break;

    case  'out':
      $res = "\n$id 0 obj\n<< ";
      foreach($o['info'] as  $k=>$v) {
        $res.= "\n/$k $v";
      }
      $res.= "\n>>\n";
      return  $res;
    }
  }

  /**
   * define the document catalog, the overall controller for the document
   */
  protected function  o_catalog($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  'new':
      $this->objects[$id] = array('t'=>'catalog', 'info'=>array());
      $this->catalogId = $id;
      break;

    case  'outlines':
    case  'pages':
    case  'openHere':
    case  'javascript':
      $o['info'][$action] = $options;
      break;

    case  'viewerPreferences':
      if  (!isset($o['info']['viewerPreferences'])) {
        $this->numObj++;
        $this->o_viewerPreferences($this->numObj, 'new');
        $o['info']['viewerPreferences'] = $this->numObj;
      }

      $vp =  $o['info']['viewerPreferences'];
      $this->o_viewerPreferences($vp, 'add', $options);

      break;

    case  'out':
      $res = "\n$id 0 obj\n<< /Type /Catalog";

      foreach($o['info'] as  $k=>$v) {
        switch ($k) {
        case  'outlines':
          $res.= "\n/Outlines $v 0 R";
          break;
          
        case  'pages':
          $res.= "\n/Pages $v 0 R";
          break;

        case  'viewerPreferences':
          $res.= "\n/ViewerPreferences $v 0 R";
          break;

        case  'openHere':
          $res.= "\n/OpenAction $v 0 R";
          break;

        case  'javascript':
          $res.= "\n/Names <</JavaScript $v 0 R>>";
          break;
        }
      }

      $res.= " >>\nendobj";
      return  $res;
    }
  }

  /**
   * object which is a parent to the pages in the document
   */
  protected function  o_pages($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  'new':
      $this->objects[$id] = array('t'=>'pages', 'info'=>array());
      $this->o_catalog($this->catalogId, 'pages', $id);
      break;

    case  'page':
      if  (!is_array($options)) {
        // then it will just be the id of the new page
        $o['info']['pages'][] = $options;
      } else {
        // then it should be an array having 'id','rid','pos', where rid=the page to which this one will be placed relative
        // and pos is either 'before' or 'after', saying where this page will fit.
        if  (isset($options['id']) &&  isset($options['rid']) &&  isset($options['pos'])) {
          $i =  array_search($options['rid'], $o['info']['pages']);
          if  (isset($o['info']['pages'][$i]) &&  $o['info']['pages'][$i] == $options['rid']) {

            // then there is a match
            // make a space
            switch  ($options['pos']) {
            case  'before':
              $k =  $i;
              break;

            case  'after':
              $k = $i+1;
              break;

            default:
              $k = -1;
              break;
            }

            if  ($k >= 0) {
              for  ($j = count($o['info']['pages']) -1;$j >= $k;$j--) {
                $o['info']['pages'][$j+1] = $o['info']['pages'][$j];
              }

              $o['info']['pages'][$k] = $options['id'];
            }
          }
        }
      }
      break;

    case  'procset':
      $o['info']['procset'] = $options;
      break;

    case  'mediaBox':
      $o['info']['mediaBox'] = $options;
      // which should be an array of 4 numbers
      $this->currentPageSize = array('width' => $options[2], 'height' => $options[3]);
      break;

    case  'font':
      $o['info']['fonts'][] = array('objNum'=>$options['objNum'], 'fontNum'=>$options['fontNum']);
      break;

    case  'extGState':
      $o['info']['extGStates'][] =  array('objNum' => $options['objNum'],  'stateNum' => $options['stateNum']);
      break;

    case  'xObject':
      $o['info']['xObjects'][] = array('objNum'=>$options['objNum'], 'label'=>$options['label']);
      break;

    case  'out':
      if  (count($o['info']['pages'])) {
        $res = "\n$id 0 obj\n<< /Type /Pages\n/Kids [";
        foreach($o['info']['pages'] as  $v) {
          $res.= "$v 0 R\n";
        }

        $res.= "]\n/Count ".count($this->objects[$id]['info']['pages']);

        if  ( (isset($o['info']['fonts']) &&  count($o['info']['fonts'])) ||
              isset($o['info']['procset']) ||
              (isset($o['info']['extGStates']) &&  count($o['info']['extGStates']))) {
          $res.= "\n/Resources <<";

          if  (isset($o['info']['procset'])) {
            $res.= "\n/ProcSet ".$o['info']['procset']." 0 R";
          }

          if  (isset($o['info']['fonts']) &&  count($o['info']['fonts'])) {
            $res.= "\n/Font << ";
            foreach($o['info']['fonts'] as  $finfo) {
              $res.= "\n/F".$finfo['fontNum']." ".$finfo['objNum']." 0 R";
            }
            $res.= "\n>>";
          }

          if  (isset($o['info']['xObjects']) &&  count($o['info']['xObjects'])) {
            $res.= "\n/XObject << ";
            foreach($o['info']['xObjects'] as  $finfo) {
              $res.= "\n/".$finfo['label']." ".$finfo['objNum']." 0 R";
            }
            $res.= "\n>>";
          }

          if  ( isset($o['info']['extGStates']) &&  count($o['info']['extGStates'])) {
            $res.=  "\n/ExtGState << ";
            foreach ($o['info']['extGStates'] as  $gstate) {
              $res.=  "\n/GS" . $gstate['stateNum'] . " " . $gstate['objNum'] . " 0 R";
            }
            $res.=  "\n>>";
          }

          $res.= "\n>>";
          if  (isset($o['info']['mediaBox'])) {
            $tmp = $o['info']['mediaBox'];
            $res.= "\n/MediaBox [".sprintf('%.3F %.3F %.3F %.3F', $tmp[0], $tmp[1], $tmp[2], $tmp[3]) .']';
          }
        }

        $res.= "\n >>\nendobj";
      } else {
        $res = "\n$id 0 obj\n<< /Type /Pages\n/Count 0\n>>\nendobj";
      }

      return  $res;
    }
  }

  /**
   * define the outlines in the doc, empty for now
   */
  protected function  o_outlines($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  'new':
      $this->objects[$id] = array('t'=>'outlines', 'info'=>array('outlines'=>array()));
      $this->o_catalog($this->catalogId, 'outlines', $id);
      break;

    case  'outline':
      $o['info']['outlines'][] = $options;
      break;

    case  'out':
      if  (count($o['info']['outlines'])) {
        $res = "\n$id 0 obj\n<< /Type /Outlines /Kids [";
        foreach($o['info']['outlines'] as  $v) {
          $res.= "$v 0 R ";
        }

        $res.= "] /Count ".count($o['info']['outlines']) ." >>\nendobj";
      } else {
        $res = "\n$id 0 obj\n<< /Type /Outlines /Count 0 >>\nendobj";
      }

      return  $res;
    }
  }

  /**
   * an object to hold the font description
   */
  protected function  o_font($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  'new':
      $this->objects[$id] =  array('t' => 'font', 'info' => array('name' => $options['name'], 'fontFileName' => $options['fontFileName'], 'SubType' => 'Type1'));
      $fontNum =  $this->numFonts;
      $this->objects[$id]['info']['fontNum'] =  $fontNum;

      // deal with the encoding and the differences
      if  (isset($options['differences'])) {
        // then we'll need an encoding dictionary
        $this->numObj++;
        $this->o_fontEncoding($this->numObj, 'new', $options);
        $this->objects[$id]['info']['encodingDictionary'] =  $this->numObj;
      } else  if  (isset($options['encoding'])) {
        // we can specify encoding here
        switch ($options['encoding']) {
        case  'WinAnsiEncoding':
        case  'MacRomanEncoding':
        case  'MacExpertEncoding':
          $this->objects[$id]['info']['encoding'] =  $options['encoding'];
          break;

        case  'none':
          break;

        default:
          $this->objects[$id]['info']['encoding'] =  'WinAnsiEncoding';
          break;
        }
      } else {
        $this->objects[$id]['info']['encoding'] =  'WinAnsiEncoding';
      }

      if ($this->fonts[$options['fontFileName']]['isUnicode']) {
        // For Unicode fonts, we need to incorporate font data into
        // sub-sections that are linked from the primary font section.
        // Look at o_fontGIDtoCID and o_fontDescendentCID functions
        // for more informaiton.
        //
        // All of this code is adapted from the excellent changes made to
        // transform FPDF to TCPDF (http://tcpdf.sourceforge.net/)

        $toUnicodeId = ++$this->numObj;
        $this->o_contents($toUnicodeId, 'new', 'raw');
        $this->objects[$id]['info']['toUnicode'] = $toUnicodeId;
        
        $stream =  <<<EOT
/CIDInit /ProcSet findresource begin
12 dict begin
begincmap
/CIDSystemInfo
<</Registry (Adobe)
/Ordering (UCS)
/Supplement 0
>> def
/CMapName /Adobe-Identity-UCS def
/CMapType 2 def
1 begincodespacerange
<0000> <FFFF>
endcodespacerange
1 beginbfrange
<0000> <FFFF> <0000>
endbfrange
endcmap
CMapName currentdict /CMap defineresource pop
end
end
EOT;

        $res =   "<</Length " . mb_strlen($stream, '8bit') . " >>\n";
        $res .=  "stream\n" . $stream . "endstream";

        $this->objects[$toUnicodeId]['c'] = $res;

        $cidFontId = ++$this->numObj;
        $this->o_fontDescendentCID($cidFontId, 'new', $options);
        $this->objects[$id]['info']['cidFont'] = $cidFontId;
      }
      
      // also tell the pages node about the new font
      $this->o_pages($this->currentNode, 'font', array('fontNum' => $fontNum, 'objNum' => $id));
      break;

    case  'add':
      foreach ($options as  $k => $v) {
        switch  ($k) {
        case  'BaseFont':
          $o['info']['name'] =  $v;
          break;
        case  'FirstChar':
        case  'LastChar':
        case  'Widths':
        case  'FontDescriptor':
        case  'SubType':
          $this->addMessage('o_font '.$k." : ".$v);
          $o['info'][$k] =  $v;
          break;
        }
      }

      // pass values down to descendent font
      if (isset($o['info']['cidFont'])) {
        $this->o_fontDescendentCID($o['info']['cidFont'], 'add', $options);
      }
      break;

    case  'out':
      if ($this->fonts[$this->objects[$id]['info']['fontFileName']]['isUnicode']) {
        // For Unicode fonts, we need to incorporate font data into
        // sub-sections that are linked from the primary font section.
        // Look at o_fontGIDtoCID and o_fontDescendentCID functions
        // for more informaiton.
        //
        // All of this code is adapted from the excellent changes made to
        // transform FPDF to TCPDF (http://tcpdf.sourceforge.net/)

        $res =  "\n$id 0 obj\n<</Type /Font\n/Subtype /Type0\n";
        $res.=  "/BaseFont /".$o['info']['name']."\n";

        // The horizontal identity mapping for 2-byte CIDs; may be used
        // with CIDFonts using any Registry, Ordering, and Supplement values.
        $res.=  "/Encoding /Identity-H\n";
        $res.=  "/DescendantFonts [".$o['info']['cidFont']." 0 R]\n";
        $res.=  "/ToUnicode ".$o['info']['toUnicode']." 0 R\n";
        $res.=  ">>\n";
        $res.=  "endobj";
      } else {
        $res =  "\n$id 0 obj\n<< /Type /Font\n/Subtype /".$o['info']['SubType']."\n";
        $res.=  "/Name /F".$o['info']['fontNum']."\n";
        $res.=  "/BaseFont /".$o['info']['name']."\n";
  
        if  (isset($o['info']['encodingDictionary'])) {
          // then place a reference to the dictionary
          $res.=  "/Encoding ".$o['info']['encodingDictionary']." 0 R\n";
        } else  if  (isset($o['info']['encoding'])) {
          // use the specified encoding
          $res.=  "/Encoding /".$o['info']['encoding']."\n";
        }
  
        if  (isset($o['info']['FirstChar'])) {
          $res.=  "/FirstChar ".$o['info']['FirstChar']."\n";
        }
  
        if  (isset($o['info']['LastChar'])) {
          $res.=  "/LastChar ".$o['info']['LastChar']."\n";
        }
  
        if  (isset($o['info']['Widths'])) {
          $res.=  "/Widths ".$o['info']['Widths']." 0 R\n";
        }
  
        if  (isset($o['info']['FontDescriptor'])) {
          $res.=  "/FontDescriptor ".$o['info']['FontDescriptor']." 0 R\n";
        }

        $res.=  ">>\n";
        $res.=  "endobj";
      }

      return  $res;
    }
  }

  /**
   * a font descriptor, needed for including additional fonts
   */
  protected function  o_fontDescriptor($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  'new':
      $this->objects[$id] = array('t'=>'fontDescriptor', 'info'=>$options);
      break;

    case  'out':
      $res = "\n$id 0 obj\n<< /Type /FontDescriptor\n";
      foreach ($o['info'] as  $label => $value) {
        switch  ($label) {
        case  'Ascent':
        case  'CapHeight':
        case  'Descent':
        case  'Flags':
        case  'ItalicAngle':
        case  'StemV':
        case  'AvgWidth':
        case  'Leading':
        case  'MaxWidth':
        case  'MissingWidth':
        case  'StemH':
        case  'XHeight':
        case  'CharSet':
          if  (mb_strlen($value, '8bit')) {
            $res.= "/$label $value\n";
          }

          break;
        case  'FontFile':
        case  'FontFile2':
        case  'FontFile3':
          $res.= "/$label $value 0 R\n";
          break;

        case  'FontBBox':
          $res.= "/$label [$value[0] $value[1] $value[2] $value[3]]\n";
          break;

        case  'FontName':
          $res.= "/$label /$value\n";
          break;
        }
      }

      $res.= ">>\nendobj";

      return  $res;
    }
  }

  /**
   * the font encoding
   */
  protected function  o_fontEncoding($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  'new':
      // the options array should contain 'differences' and maybe 'encoding'
      $this->objects[$id] = array('t'=>'fontEncoding', 'info'=>$options);
      break;

    case  'out':
      $res = "\n$id 0 obj\n<< /Type /Encoding\n";
      if  (!isset($o['info']['encoding'])) {
        $o['info']['encoding'] = 'WinAnsiEncoding';
      }

      if  ($o['info']['encoding'] !== 'none') {
        $res.= "/BaseEncoding /".$o['info']['encoding']."\n";
      }

      $res.= "/Differences \n[";

      $onum = -100;

      foreach($o['info']['differences'] as  $num=>$label) {
        if  ($num != $onum+1) {
          // we cannot make use of consecutive numbering
          $res.=  "\n$num /$label";
        } else {
          $res.=  " /$label";
        }

        $onum = $num;
      }

      $res.= "\n]\n>>\nendobj";
      return  $res;
    }
  }

  /**
   * a descendent cid font,  needed for unicode fonts
   */
  protected function  o_fontDescendentCID($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  'new':
      $this->objects[$id] =  array('t'=>'fontDescendentCID', 'info'=>$options);

      // we need a CID system info section
      $cidSystemInfoId = ++$this->numObj;
      $this->o_contents($cidSystemInfoId, 'new', 'raw');
      $this->objects[$id]['info']['cidSystemInfo'] = $cidSystemInfoId;
      $res=   "<</Registry (Adobe)\n"; // A string identifying an issuer of character collections
      $res.=  "/Ordering (UCS)\n"; // A string that uniquely names a character collection issued by a specific registry
      $res.=  "/Supplement 0\n"; // The supplement number of the character collection.
      $res.=  ">>";
      $this->objects[$cidSystemInfoId]['c'] = $res;

      // and a CID to GID map
      $cidToGidMapId = ++$this->numObj;
      $this->o_fontGIDtoCIDMap($cidToGidMapId, 'new', $options);
      $this->objects[$id]['info']['cidToGidMap'] = $cidToGidMapId;
      break;

    case  'add':
      foreach ($options as  $k => $v) {
        switch  ($k) {
        case  'BaseFont':
          $o['info']['name'] =  $v;
          break;

        case  'FirstChar':
        case  'LastChar':
        case  'MissingWidth':
        case  'FontDescriptor':
        case  'SubType':
          $this->addMessage("o_fontDescendentCID $k : $v");
          $o['info'][$k] =  $v;
          break;
        }
      }

      // pass values down to cid to gid map
      $this->o_fontGIDtoCIDMap($o['info']['cidToGidMap'], 'add', $options);
      break;

    case  'out':
      $res =  "\n$id 0 obj\n";
      $res.=  "<</Type /Font\n";
      $res.=  "/Subtype /CIDFontType2\n";
      $res.=  "/BaseFont /".$o['info']['name']."\n";
      $res.=  "/CIDSystemInfo ".$o['info']['cidSystemInfo']." 0 R\n";
//      if  (isset($o['info']['FirstChar'])) {
//        $res.=  "/FirstChar ".$o['info']['FirstChar']."\n";
//      }

//      if  (isset($o['info']['LastChar'])) {
//        $res.=  "/LastChar ".$o['info']['LastChar']."\n";
//      }
      if  (isset($o['info']['FontDescriptor'])) {
        $res.=  "/FontDescriptor ".$o['info']['FontDescriptor']." 0 R\n";
      }

      if  (isset($o['info']['MissingWidth'])) {
        $res.=  "/DW ".$o['info']['MissingWidth']."\n";
      }

      if  (isset($o['info']['fontFileName']) && isset($this->fonts[$o['info']['fontFileName']]['CIDWidths'])) {
        $cid_widths = &$this->fonts[$o['info']['fontFileName']]['CIDWidths'];
        $w = '';
        foreach ($cid_widths as $cid => $width) {
          $w .= "$cid [$width] ";
        }
        $res.=  "/W [$w]\n";
      }

      $res.=  "/CIDToGIDMap ".$o['info']['cidToGidMap']." 0 R\n";
      $res.=  ">>\n";
      $res.=  "endobj";

      return  $res;
    }
  }
  
  /**
   * a font glyph to character map,  needed for unicode fonts
   */
  protected function  o_fontGIDtoCIDMap($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  'new':
      $this->objects[$id] =  array('t'=>'fontGIDtoCIDMap', 'info'=>$options);
      break;

    case  'out':
      $res = "\n$id 0 obj\n";
      $fontFileName = $o['info']['fontFileName'];
      $tmp = $this->fonts[$fontFileName]['CIDtoGID'] = base64_decode($this->fonts[$fontFileName]['CIDtoGID']);
      
      $compressed = isset($this->fonts[$fontFileName]['CIDtoGID_Compressed']) &&
                    $this->fonts[$fontFileName]['CIDtoGID_Compressed'];

      if  (!$compressed && isset($o['raw'])) {
        $res.= $tmp;
      } else {
        $res.=  "<<";

        if  (!$compressed && $this->compressionReady && $this->options['compression']) {
          // then implement ZLIB based compression on this content stream
          $compressed = true;
          $tmp =  gzcompress($tmp,  6);
        }
        if ($compressed) {
          $res.= "\n/Filter /FlateDecode";
        }

        $res.= "\n/Length ".mb_strlen($tmp, '8bit') .">>\nstream\n$tmp\nendstream";
      }

      $res.= "\nendobj";
      return  $res;
    }
  }
  
  /**
   * the document procset, solves some problems with printing to old PS printers
   */
  protected function  o_procset($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  'new':
      $this->objects[$id] = array('t'=>'procset', 'info'=>array('PDF'=>1, 'Text'=>1));
      $this->o_pages($this->currentNode, 'procset', $id);
      $this->procsetObjectId = $id;
      break;

    case  'add':
      // this is to add new items to the procset list, despite the fact that this is considered
      // obselete, the items are required for printing to some postscript printers
      switch  ($options) {
      case  'ImageB':
      case  'ImageC':
      case  'ImageI':
        $o['info'][$options] = 1;
        break;
      }
      break;

    case  'out':
      $res = "\n$id 0 obj\n[";
      foreach ($o['info'] as  $label=>$val) {
        $res.= "/$label ";
      }
      $res.= "]\nendobj";
      return  $res;
    }
  }

  /**
   * define the document information
   */
  protected function  o_info($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  'new':
      $this->infoObject = $id;
      $date = 'D:'.@date('Ymd');
      $this->objects[$id] = array('t'=>'info', 'info'=>array('Creator'=>'R and OS php pdf writer, http://www.ros.co.nz', 'CreationDate'=>$date));
      break;
    case  'Title':
    case  'Author':
    case  'Subject':
    case  'Keywords':
    case  'Creator':
    case  'Producer':
    case  'CreationDate':
    case  'ModDate':
    case  'Trapped':
      $o['info'][$action] = $options;
      break;

    case  'out':
      if  ($this->encrypted) {
        $this->encryptInit($id);
      }

      $res = "\n$id 0 obj\n<<\n";
      foreach ($o['info'] as  $k=>$v) {
        $res.= "/$k (";
        // dates must be outputted as-is, without Unicode transformations
        $raw = ($k === 'CreationDate' || $k === 'ModDate');
        $c = $v;

        if  ($this->encrypted) {
          $c = $this->ARC4($c);
        }

        $res.= ($raw) ? $c : $this->filterText($c);
        $res.= ")\n";
      }

      $res.= ">>\nendobj";
      return  $res;
    }
  }

  /**
   * an action object, used to link to URLS initially
   */
  protected function  o_action($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  'new':
      if  (is_array($options)) {
        $this->objects[$id] = array('t'=>'action', 'info'=>$options, 'type'=>$options['type']);
      } else {
        // then assume a URI action
        $this->objects[$id] = array('t'=>'action', 'info'=>$options, 'type'=>'URI');
      }
      break;

    case  'out':
      if  ($this->encrypted) {
        $this->encryptInit($id);
      }

      $res = "\n$id 0 obj\n<< /Type /Action";
      switch ($o['type']) {
      case  'ilink':
        if (!isset($this->destinations[(string)$o['info']['label']])) break;
        
        // there will be an 'label' setting, this is the name of the destination
        $res.= "\n/S /GoTo\n/D ".$this->destinations[(string)$o['info']['label']]." 0 R";
        break;

      case  'URI':
        $res.= "\n/S /URI\n/URI (";
        if  ($this->encrypted) {
          $res.= $this->filterText($this->ARC4($o['info']), true, false);
        } else {
          $res.= $this->filterText($o['info'], true, false);
        }

        $res.= ")";
        break;
      }

      $res.= "\n>>\nendobj";
      return  $res;
    }
  }

  /**
   * an annotation object, this will add an annotation to the current page.
   * initially will support just link annotations
   */
  protected function  o_annotation($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  'new':
      // add the annotation to the current page
      $pageId =  $this->currentPage;
      $this->o_page($pageId, 'annot', $id);

      // and add the action object which is going to be required
      switch ($options['type']) {
      case  'link':
        $this->objects[$id] = array('t'=>'annotation', 'info'=>$options);
        $this->numObj++;
        $this->o_action($this->numObj, 'new', $options['url']);
        $this->objects[$id]['info']['actionId'] = $this->numObj;
        break;

      case  'ilink':
        // this is to a named internal link
        $label =  $options['label'];
        $this->objects[$id] = array('t'=>'annotation', 'info'=>$options);
        $this->numObj++;
        $this->o_action($this->numObj, 'new', array('type'=>'ilink', 'label'=>$label));
        $this->objects[$id]['info']['actionId'] = $this->numObj;
        break;
      }
      break;

    case  'out':
      $res = "\n$id 0 obj\n<< /Type /Annot";
      switch ($o['info']['type']) {
      case  'link':
      case  'ilink':
        $res.=  "\n/Subtype /Link";
        break;
      }
      $res.= "\n/A ".$o['info']['actionId']." 0 R";
      $res.= "\n/Border [0 0 0]";
      $res.= "\n/H /I";
      $res.= "\n/Rect [ ";

      foreach($o['info']['rect'] as  $v) {
        $res.=  sprintf("%.4F ", $v);
      }

      $res.= "]";
      $res.= "\n>>\nendobj";
      return  $res;
    }
  }

  /**
   * a page object, it also creates a contents object to hold its contents
   */
  protected function  o_page($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  'new':
      $this->numPages++;
      $this->objects[$id] = array('t'=>'page', 'info'=>array('parent'=>$this->currentNode, 'pageNum'=>$this->numPages));

      if  (is_array($options)) {
        // then this must be a page insertion, array should contain 'rid','pos'=[before|after]
        $options['id'] = $id;
        $this->o_pages($this->currentNode, 'page', $options);
      } else {
        $this->o_pages($this->currentNode, 'page', $id);
      }

      $this->currentPage = $id;
      //make a contents object to go with this page
      $this->numObj++;
      $this->o_contents($this->numObj, 'new', $id);
      $this->currentContents = $this->numObj;
      $this->objects[$id]['info']['contents'] = array();
      $this->objects[$id]['info']['contents'][] = $this->numObj;

      $match =  ($this->numPages%2 ?  'odd' :  'even');
      foreach($this->addLooseObjects as  $oId=>$target) {
        if  ($target === 'all' || $match === $target) {
          $this->objects[$id]['info']['contents'][] = $oId;
        }
      }
      break;

    case  'content':
      $o['info']['contents'][] = $options;
      break;

    case  'annot':
      // add an annotation to this page
      if  (!isset($o['info']['annot'])) {
        $o['info']['annot'] = array();
      }

      // $options should contain the id of the annotation dictionary
      $o['info']['annot'][] = $options;
      break;

    case  'out':
      $res = "\n$id 0 obj\n<< /Type /Page";
      $res.= "\n/Parent ".$o['info']['parent']." 0 R";

      if  (isset($o['info']['annot'])) {
        $res.= "\n/Annots [";
        foreach($o['info']['annot'] as  $aId) {
          $res.= " $aId 0 R";
        }
        $res.= " ]";
      }

      $count =  count($o['info']['contents']);
      if  ($count == 1) {
        $res.= "\n/Contents ".$o['info']['contents'][0]." 0 R";
      } else  if  ($count>1) {
        $res.= "\n/Contents [\n";

        // reverse the page contents so added objects are below normal content
        //foreach (array_reverse($o['info']['contents']) as  $cId) {
        // Back to normal now that I've got transparency working --Benj
        foreach ($o['info']['contents'] as  $cId) {
          $res.= "$cId 0 R\n";
        }
        $res.= "]";
      }

      $res.= "\n>>\nendobj";
      return  $res;
    }
  }

  /**
   * the contents objects hold all of the content which appears on pages
   */
  protected function  o_contents($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  'new':
      $this->objects[$id] = array('t'=>'contents', 'c'=>'', 'info'=>array());
      if  (mb_strlen($options, '8bit') &&  intval($options)) {
        // then this contents is the primary for a page
        $this->objects[$id]['onPage'] = $options;
      } else  if  ($options === 'raw') {
        // then this page contains some other type of system object
        $this->objects[$id]['raw'] = 1;
      }
      break;

    case  'add':
      // add more options to the decleration
      foreach ($options as  $k=>$v) {
        $o['info'][$k] = $v;
      }

    case  'out':
      $tmp = $o['c'];
      $res =  "\n$id 0 obj\n";

      if  (isset($this->objects[$id]['raw'])) {
        $res.= $tmp;
      } else {
        $res.=  "<<";
        if  ($this->compressionReady && $this->options['compression']) {
          // then implement ZLIB based compression on this content stream
          $res.= " /Filter /FlateDecode";
          $tmp =  gzcompress($tmp,  6);
        }

        if  ($this->encrypted) {
          $this->encryptInit($id);
          $tmp =  $this->ARC4($tmp);
        }

        foreach($o['info'] as  $k=>$v) {
          $res.=  "\n/$k $v";
        }

        $res.= "\n/Length ".mb_strlen($tmp, '8bit') ." >>\nstream\n$tmp\nendstream";
      }

      $res.= "\nendobj";
      return  $res;
    }
  }

  protected function  o_embedjs($id, $action, $code = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  'new':
      $this->objects[$id] = array('t'=>'embedjs', 'info'=>array(
        'Names' => '[(EmbeddedJS) '.($id+1).' 0 R]'
      ));
      break;

    case  'out':
      $res = "\n$id 0 obj\n<< ";
      foreach($o['info'] as  $k=>$v) {
        $res.=  "\n/$k $v";
      }
      $res.= "\n>>\nendobj";
      return  $res;
    }
  }
  
  protected function  o_javascript($id, $action, $code = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  'new':
      $this->objects[$id] = array('t'=>'javascript', 'info'=>array(
        'S' => '/JavaScript',
        'JS' => '('.$this->filterText($code).')',
      ));
      break;

    case  'out':
      $res = "\n$id 0 obj\n<< ";
      foreach($o['info'] as  $k=>$v) {
        $res.=  "\n/$k $v";
      }
      $res.= "\n>>\nendobj";
      return  $res;
    }
  }

  /**
   * an image object, will be an XObject in the document, includes description and data
   */
  protected function  o_image($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch ($action) {
    case  'new':
      // make the new object
      $this->objects[$id] = array('t'=>'image', 'data'=>&$options['data'], 'info'=>array());
      
      $info =& $this->objects[$id]['info'];
      
      $info['Type'] = '/XObject';
      $info['Subtype'] = '/Image';
      $info['Width'] = $options['iw'];
      $info['Height'] = $options['ih'];
      
      if (isset($options['masked']) && $options['masked']) {
        $info['SMask'] = ($this->numObj-1).' 0 R';
      }
      
      if  (!isset($options['type']) || $options['type'] === 'jpg') {
        if  (!isset($options['channels'])) {
          $options['channels'] = 3;
        }

        switch ($options['channels']) {
          case  1: $info['ColorSpace'] = '/DeviceGray'; break;
          case  4: $info['ColorSpace'] = '/DeviceCMYK'; break;
          default: $info['ColorSpace'] = '/DeviceRGB'; break;
        }
        
        if ($info['ColorSpace'] === '/DeviceCMYK') {
          $info['Decode'] = '[1 0 1 0 1 0 1 0]';
        }

        $info['Filter'] = '/DCTDecode';
        $info['BitsPerComponent'] = 8;
      } 
      
      else if  ($options['type'] === 'png') {
        $info['Filter'] = '/FlateDecode';
        $info['DecodeParms'] = '<< /Predictor 15 /Colors '.$options['ncolor'].' /Columns '.$options['iw'].' /BitsPerComponent '.$options['bitsPerComponent'].'>>';
      
        if ($options['isMask']) {
          $info['ColorSpace'] = '/DeviceGray';
        }
        else {
          if  (mb_strlen($options['pdata'], '8bit')) {
            $tmp =  ' [ /Indexed /DeviceRGB '.(mb_strlen($options['pdata'], '8bit') /3-1) .' ';
            $this->numObj++;
            $this->o_contents($this->numObj, 'new');
            $this->objects[$this->numObj]['c'] = $options['pdata'];
            $tmp.= $this->numObj.' 0 R';
            $tmp.= ' ]';
            $info['ColorSpace'] =  $tmp;
            
            if  (isset($options['transparency'])) {
              $transparency = $options['transparency'];
              switch ($transparency['type']) {
              case  'indexed':
                $tmp = ' [ '.$transparency['data'].' '.$transparency['data'].'] ';
                $info['Mask'] =  $tmp;
                break;
  
              case 'color-key':
                $tmp = ' [ '.
                  $transparency['r'] . ' ' . $transparency['r'] .
                  $transparency['g'] . ' ' . $transparency['g'] .
                  $transparency['b'] . ' ' . $transparency['b'] .
                  ' ] ';
                $info['Mask'] = $tmp;
                break;
              }
            }
          } else {
            if  (isset($options['transparency'])) {
              $transparency = $options['transparency'];
              
              switch ($transparency['type']) {
              case  'indexed':
                $tmp = ' [ '.$transparency['data'].' '.$transparency['data'].'] ';
                $info['Mask'] =  $tmp;
                break;
  
              case 'color-key':
                $tmp = ' [ '.
                  $transparency['r'] . ' ' . $transparency['r'] . ' ' .
                  $transparency['g'] . ' ' . $transparency['g'] . ' ' .
                  $transparency['b'] . ' ' . $transparency['b'] .
                  ' ] ';
                $info['Mask'] = $tmp;
                break;
              }
            }
            $info['ColorSpace'] = '/'.$options['color'];
          }
        }
        
        $info['BitsPerComponent'] = $options['bitsPerComponent'];
      }

      // assign it a place in the named resource dictionary as an external object, according to
      // the label passed in with it.
      $this->o_pages($this->currentNode, 'xObject', array('label'=>$options['label'], 'objNum'=>$id));

      // also make sure that we have the right procset object for it.
      $this->o_procset($this->procsetObjectId, 'add', 'ImageC');
      break;

    case  'out':
      $tmp = &$o['data'];
      $res =  "\n$id 0 obj\n<<";

      foreach($o['info'] as  $k=>$v) {
        $res.= "\n/$k $v";
      }

      if  ($this->encrypted) {
        $this->encryptInit($id);
        $tmp =  $this->ARC4($tmp);
      }

      $res.= "\n/Length ".mb_strlen($tmp, '8bit') .">>\nstream\n$tmp\nendstream\nendobj";

      return  $res;
    }
  }

  /**
   * graphics state object
   */
  protected function  o_extGState($id,  $action,  $options = "") {
    static  $valid_params =  array("LW",  "LC",  "LC",  "LJ",  "ML",
                                   "D",  "RI",  "OP",  "op",  "OPM",
                                   "Font",  "BG",  "BG2",  "UCR",
                                   "TR",  "TR2",  "HT",  "FL",
                                   "SM",  "SA",  "BM",  "SMask",
                                   "CA",  "ca",  "AIS",  "TK");

    if  ($action !==  "new") {
      $o = & $this->objects[$id];
    }

    switch  ($action) {
    case  "new":
      $this->objects[$id] =  array('t' => 'extGState',  'info' => $options);

      // Tell the pages about the new resource
      $this->numStates++;
      $this->o_pages($this->currentNode,  'extGState',  array("objNum" => $id,  "stateNum" => $this->numStates));
      break;

    case  "out":
      $res = "\n$id 0 obj\n<< /Type /ExtGState\n";

      foreach ($o["info"] as  $k => $v) {
        if  ( !in_array($k, $valid_params))
          continue;
        $res.=  "/$k $v\n";
      }

      $res.= ">>\nendobj";
      return  $res;
    }
  }

  /**
   * encryption object.
   */
  protected function  o_encryption($id, $action, $options = '') {
    if  ($action !== 'new') {
      $o = & $this->objects[$id];
    }

    switch ($action) {
    case  'new':
      // make the new object
      $this->objects[$id] = array('t'=>'encryption', 'info'=>$options);
      $this->arc4_objnum = $id;

      // figure out the additional paramaters required
      $pad =  chr(0x28) .chr(0xBF) .chr(0x4E) .chr(0x5E) .chr(0x4E) .chr(0x75) .chr(0x8A) .chr(0x41)
             .chr(0x64) .chr(0x00) .chr(0x4E) .chr(0x56) .chr(0xFF) .chr(0xFA) .chr(0x01) .chr(0x08)
             .chr(0x2E) .chr(0x2E) .chr(0x00) .chr(0xB6) .chr(0xD0) .chr(0x68) .chr(0x3E) .chr(0x80)
             .chr(0x2F) .chr(0x0C) .chr(0xA9) .chr(0xFE) .chr(0x64) .chr(0x53) .chr(0x69) .chr(0x7A);
             
      $len =  mb_strlen($options['owner'], '8bit');

      if  ($len>32) {
        $owner =  substr($options['owner'], 0, 32);
      } else  if  ($len<32) {
        $owner =  $options['owner'].substr($pad, 0, 32-$len);
      } else {
        $owner =  $options['owner'];
      }

      $len =  mb_strlen($options['user'], '8bit');
      if  ($len>32) {
        $user =  substr($options['user'], 0, 32);
      } else  if  ($len<32) {
        $user =  $options['user'].substr($pad, 0, 32-$len);
      } else {
        $user =  $options['user'];
      }

      $tmp =  $this->md5_16($owner);
      $okey =  substr($tmp, 0, 5);
      $this->ARC4_init($okey);
      $ovalue = $this->ARC4($user);
      $this->objects[$id]['info']['O'] = $ovalue;

      // now make the u value, phew.
      $tmp =  $this->md5_16($user.$ovalue.chr($options['p']) .chr(255) .chr(255) .chr(255) .$this->fileIdentifier);

      $ukey =  substr($tmp, 0, 5);
      $this->ARC4_init($ukey);
      $this->encryptionKey =  $ukey;
      $this->encrypted = true;
      $uvalue = $this->ARC4($pad);
      $this->objects[$id]['info']['U'] = $uvalue;
      $this->encryptionKey = $ukey;
      // initialize the arc4 array
      break;

    case  'out':
      $res =  "\n$id 0 obj\n<<";
      $res.= "\n/Filter /Standard";
      $res.= "\n/V 1";
      $res.= "\n/R 2";
      $res.…