/library/dompdf/lib/class.pdf.php
PHP | 2892 lines | 1313 code | 1102 blank | 477 comment | 276 complexity | 9bd0a4e0f75b4fb5b4a2820d72ae288f MD5 | raw file
Possible License(s): GPL-3.0, LGPL-2.1
- <?php
- /**
- * Cpdf
- *
- * http://www.ros.co.nz/pdf
- *
- * A PHP class to provide the basic functionality to create a pdf document without
- * any requirement for additional modules.
- *
- * Note that they companion class CezPdf can be used to extend this class and dramatically
- * simplify the creation of documents.
- *
- * IMPORTANT NOTE
- * there is no warranty, implied or otherwise with this software.
- *
- * LICENCE
- * This code has been placed in the Public Domain for all to enjoy.
- *
- * @author Wayne Munro <pdf@ros.co.nz>
- * @version 009
- * @package Cpdf
- */
- class Cpdf {
- /**
- * the current number of pdf objects in the document
- */
- public $numObj = 0;
- /**
- * this array contains all of the pdf objects, ready for final assembly
- */
- public $objects = array();
- /**
- * the objectId (number within the objects array) of the document catalog
- */
- public $catalogId;
- /**
- * 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();
- /**
- * a record of the current font
- */
- public $currentFont = '';
- /**
- * the current base font
- */
- public $currentBaseFont = '';
- /**
- * the number of the current font within the font array
- */
- public $currentFontNum = 0;
- /**
- *
- */
- public $currentNode;
- /**
- * object number of the current page
- */
- public $currentPage;
- /**
- * object number of the currently active contents block
- */
- public $currentContents;
- /**
- * number of fonts within the system
- */
- public $numFonts = 0;
- /**
- * Number of graphic state resources used
- */
- private $numStates = 0;
- /**
- * current colour for fill operations, defaults to inactive value, all three components should be between 0 and 1 inclusive when active
- */
- public $currentColour = array('r'=>-1, 'g'=>-1, 'b'=>-1);
- /**
- * current colour for stroke operations (lines etc.)
- */
- public $currentStrokeColour = array('r'=>-1, 'g'=>-1, 'b'=>-1);
- /**
- * current style that lines are drawn in
- */
- public $currentLineStyle = '';
- /**
- * current line transparency (partial graphics state)
- */
- public $currentLineTransparency = array("mode" => "Normal", "opacity" => 1.0);
-
- /**
- * current fill transparency (partial graphics state)
- */
- public $currentFillTransparency = array("mode" => "Normal", "opacity" => 1.0);
-
- /**
- * 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();
- /**
- * number of elements within the state stack
- */
- public $nStateStack = 0;
- /**
- * number of page objects within the document
- */
- public $numPages = 0;
- /**
- * object Id storage stack
- */
- public $stack = array();
- /**
- * 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();
- /**
- * the objectId of the information object for the document
- * this contains authorship, title etc.
- */
- public $infoObject = 0;
- /**
- * number of images being tracked within the document
- */
- public $numImages = 0;
- /**
- * an array containing options about the document
- * it defaults to turning on the compression of the objects
- */
- public $options = array('compression'=>1);
- /**
- * the objectId of the first page of the document
- */
- public $firstPageId;
- /**
- * 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;
- /**
- * the object Id of the procset object
- */
- public $procsetObjectId;
- /**
- * 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();
- /**
- * track if the current font is bolded or italicised
- */
- public $currentTextState = '';
- /**
- * messages are stored here during processing, these can be selected afterwards to give some useful debug information
- */
- public $messages = '';
- /**
- * the ancryption array for the document encryption is stored here
- */
- public $arc4 = '';
- /**
- * the object Id of the encryption information
- */
- public $arc4_objnum = 0;
- /**
- * the file identifier, used to uniquely identify a pdf document
- */
- public $fileIdentifier = '';
- /**
- * a flag to say if a document is to be encrypted or not
- */
- public $encrypted = 0;
- /**
- * the ancryption key for the encryption of all the document content (structure is not encrypted)
- */
- public $encryptionKey = '';
- /**
- * array which forms a stack to keep track of nested callback functions
- */
- public $callback = array();
- /**
- * the number of callback functions in the callback array
- */
- public $nCallback = 0;
- /**
- * 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();
- /**
- * 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 = '';
- /**
- * class constructor
- * this will start a new document
- * @var array array of 4 numbers, defining the bottom left and upper right corner of the page. first two are normally zero.
- */
- function Cpdf ($pageSize = array(0, 0, 612, 792)) {
- $this->newDocument($pageSize);
- // 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
- */
- 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\n";
- return $res;
- break;
- }
- }
- /**
- * set the viewer preferences
- */
- 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;
- break;
- }
- }
- /**
- * define the document catalog, the overall controller for the document
- */
- 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':
- $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 '.$o['info']['viewerPreferences'].' 0 R';
- break;
- case 'openHere':
- $res.= "\n".'/OpenAction '.$o['info']['openHere'].' 0 R';
- break;
- }
- }
- $res.= " >>\nendobj";
- return $res;
- break;
- }
- }
- /**
- * object which is a parent to the pages in the document
- */
- 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
- 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 $k=>$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.= " >>";
- }
- 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.= " >>";
- }
- 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.= " >>";
- }
- $res.= "\n>>";
- if (isset($o['info']['mediaBox'])) {
- $tmp = $o['info']['mediaBox'];
- $res.= "\n/MediaBox [".sprintf('%.3f', $tmp[0]) .' '.sprintf('%.3f', $tmp[1]) .' '.sprintf('%.3f', $tmp[2]) .' '.sprintf('%.3f', $tmp[3]) .']';
- }
- }
- $res.= "\n >>\nendobj";
- } else {
- $res = "\n".$id." 0 obj\n<< /Type /Pages\n/Count 0\n>>\nendobj";
- }
- return $res;
- break;
- }
- }
- /**
- * define the outlines in the doc, empty for now
- */
- 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 $k=>$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;
- break;
- }
- }
- /**
- * an object to hold the font description
- */
- 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'], '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';
- }
- // 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;
- }
- }
- break;
- case 'out':
- $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.= ">>\nendobj";
- return $res;
- break;
- }
- }
- /**
- * a font descriptor, needed for including additional fonts
- */
- 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 (strlen($value)) {
- $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;
- break;
- }
- }
- /**
- * the font encoding
- */
- 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;
- break;
- }
- }
- /**
- * the document procset, solves some problems with printing to old PS printers
- */
- 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;
- break;
- }
- }
- /**
- * define the document information
- */
- 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.' (';
- if ($this->encrypted) {
- $res.= $this->filterText($this->ARC4($v));
- } else {
- $res.= $this->filterText($v);
- }
- $res.= ")\n";
- }
- $res.= ">>\nendobj";
- return $res;
- break;
- }
- }
- /**
- * an action object, used to link to URLS initially
- */
- 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':
- // 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']));
- } else {
- $res.= $this->filterText($o['info']);
- }
- $res.= ")";
- break;
- }
- $res.= "\n>>\nendobj";
- return $res;
- break;
- }
- }
- /**
- * an annotation object, this will add an annotation to the current page.
- * initially will support just link annotations
- */
- 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;
- break;
- }
- }
- /**
- * a page object, it also creates a contents object to hold its contents
- */
- 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 shoudl 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;
- break;
- }
- }
- /**
- * the contents objects hold all of the content which appears on pages
- */
- 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 (strlen($options) && 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 (function_exists('gzcompress') && $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 ".strlen($tmp) ." >>\nstream\n".$tmp."\nendstream";
- }
- $res.= "\nendobj\n";
- return $res;
- break;
- }
- }
- /**
- * an image object, will be an XObject in the document, includes description and data
- */
- 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());
- $this->objects[$id]['info']['Type'] = '/XObject';
- $this->objects[$id]['info']['Subtype'] = '/Image';
- $this->objects[$id]['info']['Width'] = $options['iw'];
- $this->objects[$id]['info']['Height'] = $options['ih'];
- if (!isset($options['type']) || $options['type'] == 'jpg') {
- if (!isset($options['channels'])) {
- $options['channels'] = 3;
- }
- switch ($options['channels']) {
- case 1:
- $this->objects[$id]['info']['ColorSpace'] = '/DeviceGray';
- break;
- default:
- $this->objects[$id]['info']['ColorSpace'] = '/DeviceRGB';
- break;
- }
- $this->objects[$id]['info']['Filter'] = '/DCTDecode';
- $this->objects[$id]['info']['BitsPerComponent'] = 8;
- } else if ($options['type'] == 'png') {
-
- $this->objects[$id]['info']['Filter'] = '/FlateDecode';
- $this->objects[$id]['info']['DecodeParms'] = '<< /Predictor 15 /Colors '.$options['ncolor'].' /Columns '.$options['iw'].' /BitsPerComponent '.$options['bitsPerComponent'].'>>';
- if (strlen($options['pdata'])) {
- $tmp = ' [ /Indexed /DeviceRGB '.(strlen($options['pdata']) /3-1) .' ';
- $this->numObj++;
- $this->o_contents($this->numObj, 'new');
- $this->objects[$this->numObj]['c'] = $options['pdata'];
- $tmp.= $this->numObj.' 0 R';
- $tmp.= ' ]';
- $this->objects[$id]['info']['ColorSpace'] = $tmp;
- if (isset($options['transparency'])) {
- switch ($options['transparency']['type']) {
- case 'indexed':
- $tmp = ' [ '.$options['transparency']['data'].' '.$options['transparency']['data'].'] ';
- $this->objects[$id]['info']['Mask'] = $tmp;
- break;
- case 'color-key':
- $tmp = ' [ '.
- $options['transparency']['r'] . ' ' . $options['transparency']['r'] .
- $options['transparency']['g'] . ' ' . $options['transparency']['g'] .
- $options['transparency']['b'] . ' ' . $options['transparency']['b'] .
- ' ] ';
- $this->objects[$id]['info']['Mask'] = $tmp;
- pre_r($tmp);
- break;
-
- }
- }
- } else {
- if (isset($options['transparency'])) {
- switch ($options['transparency']['type']) {
- case 'indexed':
- $tmp = ' [ '.$options['transparency']['data'].' '.$options['transparency']['data'].'] ';
- $this->objects[$id]['info']['Mask'] = $tmp;
- break;
- case 'color-key':
- $tmp = ' [ '.
- $options['transparency']['r'] . ' ' . $options['transparency']['r'] . ' ' .
- $options['transparency']['g'] . ' ' . $options['transparency']['g'] . ' ' .
- $options['transparency']['b'] . ' ' . $options['transparency']['b'] .
- ' ] ';
- $this->objects[$id]['info']['Mask'] = $tmp;
- break;
-
- }
- }
- $this->objects[$id]['info']['ColorSpace'] = '/'.$options['color'];
- }
- $this->objects[$id]['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 ".strlen($tmp) ." >>\nstream\n".$tmp."\nendstream\nendobj\n";
- return $res;
- break;
- }
- }
- /**
- * graphics state object
- */
- 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 $parameter => $value) {
- if ( !in_array($parameter, $valid_params))
- continue;
- $res.= "/$parameter $value\n";
- }
- $res.=
- ">>\n".
- "endobj";
- return $res;
- }
- }
- /**
- * encryption object.
- */
- 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 = strlen($options['owner']);
- 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 = strlen($options['user']);
- 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 = 1;
- $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.= "\n/O (".$this->filterText($o['info']['O']) .')';
- $res.= "\n/U (".$this->filterText($o['info']['U']) .')';
- // and the p-value needs to be converted to account for the twos-complement approach
- $o['info']['p'] = (($o['info']['p']^255) +1) *-1;
- $res.= "\n/P ".($o['info']['p']);
- $res.= "\n>>\nendobj\n";
- return $res;
- break;
- }
- }
- /**
- * ARC4 functions
- * A series of function to implement ARC4 encoding in PHP
- */
- /**
- * calculate the 16 byte version of the 128 bit md5 digest of the string
- */
- function md5_16($string) {
- $tmp = md5($string);
- $out = '';
- for ($i = 0;$i <= 30;$i = $i+2) {
- $out.= chr(hexdec(substr($tmp, $i, 2)));
- }
- return $out;
- }
- /**
- * initialize the encryption for processing a particular object
- */
- function encryptInit($id) {
- $tmp = $this->encryptionKey;
- $hex = dechex($id);
- if (strlen($hex) <6) {
- $hex = substr('000000', 0, 6-strlen($hex)) .$hex;
- }
- $tmp.= chr(hexdec(substr($hex, 4, 2))) .chr(hexdec(substr($hex, 2, 2))) .chr(hexdec(substr($hex, 0, 2))) .chr(0) .chr(0);
- $key = $this->md5_16($tmp);
- $this->ARC4_init(substr($key, 0, 10));
- }
- /**
- * initialize the ARC4 encryption
- */
- function ARC4_init($key = '') {
- $this->arc4 = '';
- // setup the control array
- if (strlen($key) == 0) {
- return;
- }
- $k = '';
- while (strlen($k) <256) {
- $k.= $key;
- }
- $k = substr($k, 0, 256);
- for ($i = 0;$i<256;$i++) {
- $this->arc4.= chr($i);
- }
- $j = 0;
- for ($i = 0;$i<256;$i++) {
- $t = $this->arc4[$i];
- $j = ($j + ord($t) + ord($k[$i])) %256;
- $this->arc4[$i] = $this->arc4[$j];
- $this->arc4[$j] = $t;
- }
- }
- /**
- * ARC4 encrypt a text string
- */
- function ARC4($text) {
- $len = strlen($text);
- $a = 0;
- $b = 0;
- $c = $this->arc4;
- $out = '';
- for ($i = 0;$i<$len;$i++) {
- $a = ($a+1) %256;
- $t = $c[$a];
- $b = ($b+ord($t)) %256;
- $c[$a] = $c[$b];
- $c[$b] = $t;
- $k = ord($c[(ord($c[$a]) +ord($c[$b])) %256]);
- $out.= chr(ord($text[$i]) ^ $k);
- }
- return $out;
- }
- /**
- * functions which can be called to adjust or add to the document
- */
- /**
- * add a link in the document to an external URL
- */
- function addLink($url, $x0, $y0, $x1, $y1) {
- $this->numObj++;
- $info = array('type'=>'link', 'url'=>$url, 'rect'=>array($x0, $y0, $x1, $y1));
- $this->o_annotation($this->numObj, 'new', $info);
- }
- /**
- * add a link in the document to an internal destination (ie. within the document)
- */
- function addInternalLink($label, $x0, $y0, $x1, $y1) {
- $this->numObj++;
- $info = array('type'=>'ilink', 'label'=>$label, 'rect'=>array($x0, $y0, $x1, $y1));
- $this->o_annotation($this->numObj, 'new', $info);
- }
- /**
- * set the encryption of the document
- * can be used to turn it on and/or set the passwords which it will have.
- * also the functions that the user will have are set here, such as print, modify, add
- */
- function setEncryption($userPass = '', $ownerPass = '', $pc = array()) {
- $p = bindec(11000000);
- $options = array(
- 'print'=>4, 'modify'=>8, 'copy'=>16, 'add'=>32);
- foreach($pc as $k=>$v) {
- if ($v && isset($options[$k])) {
- $p+= $options[$k];
- } else if (isset($options[$v])) {
- $p+= $options[$v];
- }
- }
- // implement encryption on the document
- if ($this->arc4_objnum == 0) {
- // then the block does not exist already, add it.
- $this->numObj++;
- if (strlen($ownerPass) == 0) {
- $ownerPass = $userPass;
- }
- $this->o_encryption($this->numObj, 'new', array('user'=>$userPass, 'owner'=>$ownerPass, 'p'=>$p));
- }
- }
- /**
- * should be used for internal checks, not implemented as yet
- */
- function checkAllHere() {
- }
- /**
- * return the pdf stream as a string returned from the function
- */
- function output($debug = 0) {
- if ($debug) {
- // turn compression off
- $this->options['compression'] = 0;
- }
- if ($this->arc4_objnum) {
- $this->ARC4_init($this->encryptionKey);
- }
- $this->checkAllHere();
- $xref = array();
- $content = "%PDF-1.3\n%????\n";
- // $content="%PDF-1.3\n";
- $pos = strlen($content);
- foreach($this->objects as $k=>$v) {
- $tmp = 'o_'.$v['t'];
- $cont = $this->$tmp($k, 'out');
- $content.= $cont;
- $xref[] = $pos;
- $pos+= strlen($cont);
- }
- $content.= "\nxref\n0 ".(count($xref) +1) ."\n0000000000 65535 f \n";
- foreach($xref as $p) {
- $content.= str_pad($p, 10, "0", STR_PAD_LEFT) . " 00000 n \n";
- }
- $content.= "trailer\n<<\n/Size ".(count($xref) +1) ."\n/Root 1 0 R\n/Info ".$this->infoObject." 0 R\n";
- // if encryption has been applied to this document then add the marker for this dictionary
- if ($this->arc4_objnum > 0) {
- $content.= "/Encrypt ".$this->arc4_objnum." 0 R\n";
- }
- if (strlen($this->fileIdentifier)) {
- $content.= "/ID[<".$this->fileIdentifier."><".$this->fileIdentifier.">]\n";
- }
- $content.= ">>\nstartxref\n".$pos."\n%%EOF\n";
- return $content;
- }
- /**
- * intialize a new document
- * if this is called on an existing document results may be unpredictable, but the existing document would be lost at minimum
- * this function is called automatically by the constructor function
- *
- * @access private
- */
- function newDocument($pageSize = array(0, 0, 612, 792)) {
- $this->numObj = 0;
- $this->objects = array();
- $this->numObj++;
- $this->o_catalog($this->numObj, 'new');
- $this->numObj++;
- $this->o_outlines($this->numObj, 'new');
- $this->numObj++;
- $this->o_pages($this->numObj, 'new');
- $this->o_pages($this->numObj, 'mediaBox', $pageSize);
- $this->currentNode = 3;
- $this->numObj++;
- $this->o_procset($this->numObj, 'new');
- $this->numObj++;
- $this->o_info($this->numObj, 'new');
- $this->numObj++;
- $this->o_page($this->numObj, 'new');
- // need to store the first page id as there is no way to get it to the user during
- // startup
- $this->firstPageId = $this->currentContents;
- }
- /**
- * open the font file and return a php structure containing it.
- * first check if this one has been done before and saved in a form more suited to php
- * note that if a php serialized version does not exist it will try and make one, but will
- * require write access to the directory to do it... it is MUCH faster to have these serialized
- * files.
- *
- * @access private
- */
- function openFont($font) {
- // assume that $font contains both the path and perhaps the extension to the file, split them
- $pos = strrpos($font, '/');
- if ($pos === false) {
- $dir = './';
- $name = $font;
- } else {
- $dir = substr($font, 0, $pos+1);
- $name = substr($font, $pos+1);
- }
- if (substr($name, -4) == '.afm') {
- $name = substr($name, 0, strlen($name) -4);
- }
- $this->addMessage('openFont: '.$font.' - '.$name);
- if (file_exists($dir . 'php_' . $name . '.afm')) {
- $this->addMessage('openFont: php file exists ' . $dir . 'php_' . $name.'.afm');
- $tmp = file_get_contents($dir.'php_'.$name.'.afm');
- eval($tmp);
- if (!isset($this->fonts[$font]['_version_']) || $this->fonts[$font]['_version_']<1) {
- // if the font file is old, then clear it out and prepare for re-creation
- $this->addMessage('openFont: clear out, make way for new version.');
- unset($this->fonts[$font]);
- }
- }
- if (!isset($this->fonts[$font]) && file_exists($dir.$name.'.afm')) {
- // then rebuild the php_<font>.afm file from the <font>.afm file
- $this->addMessage('openFont: build php file from '.$dir.$name.'.afm');
- $data = array();
- $file = file($dir.$name.'.afm');
- foreach ($file as $rowA) {
- $row = trim($rowA);
- $pos = strpos($row, ' ');
- if ($pos) {
- // then there must be some keyword
- $key = substr($row, 0, $pos);
- switch ($key) {
- case 'FontName':
- case 'FullName':
- case 'FamilyName':
- case 'Weight':
- case 'ItalicAngle':
- case 'IsFixedPitch':
- case 'CharacterSet':
- case 'UnderlinePosition':
- case 'UnderlineThickness':
- case 'Version':
- case 'EncodingScheme':
- case 'CapHeight':
- case 'XHeight':
- case 'Ascender':
- case 'Descender':
- case 'StdHW':
- case 'StdVW':
- case 'StartCharMetrics':
- $data[$key] = trim(substr($row, $pos));
- break;
- case 'FontBBox':
- $data[$key] = explode(' ', trim(substr($row, $pos)));
- break;
- case 'C':
- //C 39 ; WX 222 ; N quoteright ; B 53 463 157 718 ;
- $bits = explode(';', trim($row));
- $dtmp = array();
- foreach($bits as $bit) {
- $bits2 = explode(' ', trim($bit));
- if (strlen($bits2[0])) {
- if (count($bits2) >2) {
- $dtmp[$bits2[0]] = array();
- for ($i = 1;$i<count($bits2);$i++) {
- $dtmp[$bits2[0]][] = $bits2[$i];
- }
- } else if (count($bits2) == 2) {
- $dtmp[$bits2[0]] = $bits2[1];
- }
- }
- }
- if ($dtmp['C'] >= 0) {
- $data['C'][$dtmp['C']] = $dtmp;
- $data['C'][$dtmp['N']] = $dtmp;
- } else {
- $data['C'][$dtmp['N']] = $dtmp;
- }
- break;
- case 'KPX':
- //KPX Adieresis yacute -40
- $bits = explode(' ', trim($row));
- $data['KPX'][$bits[1]][$bits[2]] = $bits[3];
- break;
- }
- }
- }
- $data['_version_'] = 1;
- $this->fonts[$font] = $data;
- file_put_contents($dir . 'php_' . $name . '.afm', '$this->fonts[$font]=' . var_export($data, true) . ';');
- } else if (!isset($this->fonts[$font])) {
- $this->addMessage('openFont: no font file found');
- // echo 'Font not Found '.$font;
- }
- }
- /**
- * if the font is not loaded then load it and make the required object
- * else just make it the current font
- * the encoding array can contain 'encoding'=> 'none','WinAnsiEncoding','MacRomanEncoding' or 'MacExpertEncoding'
- * note that encoding='none' will need to be used for symbolic fonts
- * and 'differences' => an array of mappings between numbers 0->255 and character names.
- *
- */
- function selectFont($fontName, $encoding = '', $set = 1) {
- if (!isset($this->fonts[$fontName])) {
- // load the file
- $this->openFont($fontName);
- if (isset($this->fonts[$fontName])) {
- $this->numObj++;
- $this->numFonts++;
- //$this->numFonts = md5($fontName);
- $pos = strrpos($fontName, '/');
- // $dir = substr($fontName,0,$pos+1);
- $name = substr($fontName, $pos+1);
- if (substr($name, -4) == '.afm') {
- $name = substr($name, 0, strlen($name) -4);
- }
- $options = array('name' => $name);
- if (is_array($encoding)) {
- // then encoding and differences might be set
- if (isset($encoding['encoding'])) {
- $options['encoding'] = $encoding['encoding'];
- }
- if (isset($encoding['differences'])) {
- $options['differences'] = $encoding['differences'];
- }
- } else if (strlen($encoding)) {
- // then perhaps only the encoding has been set
- $options['encoding'] = $encoding;
- }
- $fontObj = $this->numObj;
- $this->o_font($this->numObj, 'new', $options);
- $this->fonts[$fontName]['fontNum'] = $this->numFonts;
- // if this is a '.afm' font, and there is a '.pfa' file to go with it ( as there
- // should be for all non-basic fonts), then load it into an object and put the
- // references into the font object
- $basefile = substr($fontName, 0, strlen($fontName) -4);
- if (file_exists($basefile.'.pfb')) {
- $fbtype = 'pfb';
- } else if (file_exists($basefile.'.ttf')) {
- $fbtype = 'ttf';
- } else {
- $fbtype = '';
- }
- $fbfile = $basefile.'.'.$fbtype;
- // $pfbfile = substr($fontName,0,strlen($fontName)-4).'.pfb';
- // $ttffile = substr($fontName,0,strlen($fontName)-4).'.ttf';
- $this->addMessage('selectFont: checking for - '.$fbfile);
- if (substr($fontName, -4) == '.afm' && strlen($fbtype)) {
- $adobeFontName = $this->fonts[$fontName]['FontName'];
- // $fontObj = $this->numObj;
- $this->addMessage('selectFont: adding font file - '.$fbfile.' - '.$adobeFontName);
- // find the array of fond widths, and put that into an object.
- $firstChar = -1;
- $lastChar = 0;
- $widths = array();
- foreach ($this->fonts[$fontName]['C'] as $num => $d) {
- if (intval($num) >0 || $num == '0') {
- if ($lastChar>0 && $num>$lastChar+1) {
- for ($i = $lastChar+1;$i<$num;$i++) {
- $widths[] = 0;
- }
- }
- $widths[] = $d['WX'];
- if ($firstChar == -1) {
- $firstChar = $num;
- }
- $lastChar = $num;
- }
- }
- // also need to adjust the widths for the differences array
- if (isset($options['differences'])) {
- foreach($options['differences'] as $charNum => $charName) {
- if ($charNum > $lastChar) {
- for ($i = $lastChar + 1; $i <= $charNum; $i++) {
- $widths[] = 0;
- }
- $lastChar = $charNum;
- }
- if (isset($this->fonts[$fontName]['C'][$charName])) {
- $widths[$charNum-$firstChar] = $this->fonts[$fontName]['C'][$charName]['WX'];
- }
- }
- }
- $this->addMessage('selectFont: FirstChar = '.$firstChar);
- $this->addMessage('selectFont: LastChar = '.$lastChar);
- $this->numObj++;
- $this->o_contents($this->numObj, 'new', 'raw');
- $this->objects[$this->numObj]['c'].= '[';
- foreach($widths as $width) {
- $this->objects[$this->numObj]['c'].= ' '.$width;
- }
- $this->objects[$this->numObj]['c'].= ' ]';
- $widthid = $this->numObj;
- // load the pfb file, and put that into an object too.
- // note that pdf supports only binary format type 1 font files, though there is a
- // simple utility to convert them from pfa to pfb.
- $tmp = get_magic_quotes_runtime();
- set_magic_quotes_runtime(0);
- $data = file_get_contents($fbfile);
- set_magic_quotes_runtime($tmp);
- // create the font descriptor
- $this->numObj++;
- $fontDescriptorId = $this->numObj;
- $this->numObj++;
- $pfbid = $this->numObj;
- // determine flags (more than a little flakey, hopefully will not matter much)
- $flags = 0;
- if ($this->fonts[$fontName]['ItalicAngle'] != 0) {
- $flags+= pow(2, 6);
- }
- if ($this->fonts[$fontName]['IsFixedPitch'] == 'true') {
- $flags+= 1;
- }
- $flags+= pow(2, 5);
- // assume non-sybolic
- $list = array('Ascent' => 'Ascender', 'CapHeight' => 'CapHeight', 'Descent' => 'Descender', 'FontBBox' => 'FontBBox', 'ItalicAngle' => 'ItalicAngle');
- $fdopt = array(
- 'Flags' => $flags, 'FontName' => $adobeFontName, 'StemV' => 100 // don't know what the value for this should be!
- );
- foreach($list as $k => $v) {
- if (isset($this->fonts[$fontName][$v])) {
- $fdopt[$k] = $this->fonts[$fontName][$v];
- }
- }
- if ($fbtype == 'pfb') {
- $fdopt['FontFile'] = $pfbid;
- } else if ($fbtype == 'ttf') {
- $fdopt['FontFile2'] = $pfbid;
- }
- $this->o_fontDescriptor($fontDescriptorId, 'new', $fdopt);
- // embed the font program
- $this->o_contents($this->numObj, 'new');
- $this->objects[$pfbid]['c'].= $data;
- // determine the cruicial lengths within this file
- if ($fbtype == 'pfb') {
- $l1 = strpos($data, 'eexec') +6;
- $l2 = strpos($data, '00000000') -$l1;
- $l3 = strlen($data) -$l2-$l1;
- $this->o_contents($this->numObj, 'add', array('Length1' => $l1, 'Length2' => $l2, 'Length3' => $l3));
- } else if ($fbtype == 'ttf') {
- $l1 = strlen($data);
- $this->o_contents($this->numObj, 'add', array('Length1' => $l1));
- }
- // tell the font object about all this new stuff
- $tmp = array('BaseFont' => $adobeFontName, 'Widths' => $widthid, 'FirstChar' => $firstChar, 'LastChar' => $lastChar, 'FontDescriptor' => $fontDescriptorId);
- if ($fbtype == 'ttf') {
- $tmp['SubType'] = 'TrueType';
- }
- $this->addMessage('adding extra info to font.('.$fontObj.')');
- foreach($tmp as $fk => $fv) {
- $this->addMessage($fk." : ".$fv);
- }
- $this->o_font($fontObj, 'add', $tmp);
- } else {
- $this->addMessage('selectFont: pfb or ttf file not found, ok if this is one of the 14 standard fonts');
- }
- // also set the differences here, note that this means that these will take effect only the
- //first time that a font is selected, else they are ignored
- if (isset($options['differences'])) {
- $this->fonts[$fontName]['differences'] = $options['differences'];
- }
- }
- }
- if ($set && isset($this->fonts[$fontName])) {
- // so if for some reason the font was not set in the last one then it will not be selected
- $this->currentBaseFont = $fontName;
- // the next lines mean that if a new font is selected, then the current text state will be
- // applied to it as well.
- $this->currentFont = $this->currentBaseFont;
- $this->currentFontNum = $this->fonts[$this->currentFont]['fontNum'];
- //$this->setCurrentFont();
- }
- return $this->currentFontNum;
- //return $this->numObj;
- }
- /**
- * sets up the current font, based on the font families, and the current text state
- * note that this system is quite flexible, a bold-italic font can be completely different to a
- * italic-bold font, and even bold-bold will have to be defined within the family to have meaning
- * This function is to be called whenever the currentTextState is changed, it will update
- * the currentFont setting to whatever the appropriatte family one is.
- * If the user calls selectFont themselves then that will reset the currentBaseFont, and the currentFont
- * This function will change the currentFont to whatever it should be, but will not change the
- * currentBaseFont.
- *
- * @access private
- */
- function setCurrentFont() {
- // if (strlen($this->currentBaseFont) == 0){
- // // then assume an initial font
- // $this->selectFont('./fonts/Helvetica.afm');
- // }
- // $cf = substr($this->currentBaseFont,strrpos($this->currentBaseFont,'/')+1);
- // if (strlen($this->currentTextState)
- // && isset($this->fontFamilies[$cf])
- // && isset($this->fontFamilies[$cf][$this->currentTextState])){
- // // then we are in some state or another
- // // and this font has a family, and the current setting exists within it
- // // select the font, then return it
- // $nf = substr($this->currentBaseFont,0,strrpos($this->currentBaseFont,'/')+1).$this->fontFamilies[$cf][$this->currentTextState];
- // $this->selectFont($nf,'',0);
- // $this->currentFont = $nf;
- // $this->currentFontNum = $this->fonts[$nf]['fontNum'];
- // } else {
- // // the this font must not have the right family member for the current state
- // // simply assume the base font
- $this->currentFont = $this->currentBaseFont;
- $this->currentFontNum = $this->fonts[$this->currentFont]['fontNum'];
- // }
- }
- /**
- * function for the user to find out what the ID is of the first page that was created during
- * startup - useful if they wish to add something to it later.
- */
- function getFirstPageId() {
- return $this->firstPageId;
- }
- /**
- * add content to the currently active object
- *
- * @access private
- */
- function addContent($content) {
- $this->objects[$this->currentContents]['c'].= $content;
- }
- /**
- * sets the colour for fill operations
- */
- function setColor($r, $g, $b, $force = 0) {
- if ($r >= 0 && ($force || $r != $this->currentColour['r'] || $g != $this->currentColour['g'] || $b != $this->currentColour['b'])) {
- $this->objects[$this->currentContents]['c'].= "\n".sprintf('%.3f', $r) .' '.sprintf('%.3f', $g) .' '.sprintf('%.3f', $b) .' rg';
- $this->currentColour = array('r' => $r, 'g' => $g, 'b' => $b);
- }
- }
- /**
- * sets the colour for stroke operations
- */
- function setStrokeColor($r, $g, $b, $force = 0) {
- if ($r >= 0 && ($force || $r != $this->currentStrokeColour['r'] || $g != $this->currentStrokeColour['g'] || $b != $this->currentStrokeColour['b'])) {
- $this->objects[$this->currentContents]['c'].= "\n".sprintf('%.3f', $r) .' '.sprintf('%.3f', $g) .' '.sprintf('%.3f', $b) .' RG';
- $this->currentStrokeColour = array('r' => $r, 'g' => $g, 'b' => $b);
- }
- }
- /**
- * Set the graphics state for compositions
- */
- function setGraphicsState($parameters) {
- // Create a new graphics state object
- // FIXME: should actually keep track of states that have already been created...
- $this->numObj++;
- $this->o_extGState($this->numObj, 'new', $parameters);
- $this->objects[ $this->currentContents ]['c'].= "\n/GS" . $this->numStates . " gs";
- }
- /**
- * Set current blend mode & opacity for lines.
- *
- * Valid blend modes are:
- *
- * Normal, Multiply, Screen, Overlay, Darken, Lighten,
- * ColorDogde, ColorBurn, HardLight, SoftLight, Difference,
- * Exclusion
- *
- * @param string $mode the blend mode to use
- * @param float $opacity 0.0 fully transparent, 1.0 fully opaque
- */
- function setLineTransparency($mode, $opacity) {
- static $blend_modes = array("Normal", "Multiply", "Screen",
- "Overlay", "Darken", "Lighten",
- "ColorDogde", "ColorBurn", "HardLight",
- "SoftLight", "Difference", "Exclusion");
- if ( !in_array($mode, $blend_modes) )
- $mode = "Normal";
-
- // Only create a new graphics state if required
- if ( $mode == $this->currentLineTransparency["mode"] &&
- $opacity == $this->currentLineTransparency["opacity"] )
- return;
- $options = array("BM" => "/$mode",
- "CA" => (float)$opacity);
- $this->setGraphicsState($options);
- }
-
- /**
- * Set current blend mode & opacity for filled objects.
- *
- * Valid blend modes are:
- *
- * Normal, Multiply, Screen, Overlay, Darken, Lighten,
- * ColorDogde, ColorBurn, HardLight, SoftLight, Difference,
- * Exclusion
- *
- * @param string $mode the blend mode to use
- * @param float $opacity 0.0 fully transparent, 1.0 fully opaque
- */
- function setFillTransparency($mode, $opacity) {
- static $blend_modes = array("Normal", "Multiply", "Screen",
- "Overlay", "Darken", "Lighten",
- "ColorDogde", "ColorBurn", "HardLight",
- "SoftLight", "Difference", "Exclusion");
- if ( !in_array($mode, $blend_modes) )
- $mode = "Normal";
- if ( $mode == $this->currentFillTransparency["mode"] &&
- $opacity == $this->currentFillTransparency["opacity"] )
- return;
- $options = array("BM" => "/$mode",
- "ca" => (float)$opacity);
-
- $this->setGraphicsState($options);
- }
- /**
- * draw a line from one set of coordinates to another
- */
- function line($x1, $y1, $x2, $y2) {
- $this->objects[$this->currentContents]['c'] .=
- "\n".sprintf('%.3f', $x1) .' '.sprintf('%.3f', $y1) .' m '.sprintf('%.3f', $x2) .' '.sprintf('%.3f', $y2) .' l S';
- }
- /**
- * draw a bezier curve based on 4 control points
- */
- function curve($x0, $y0, $x1, $y1, $x2, $y2, $x3, $y3) {
- // in the current line style, draw a bezier curve from (x0,y0) to (x3,y3) using the other two points
- // as the control points for the curve.
- $this->objects[$this->currentContents]['c'] .=
- "\n".sprintf('%.3f', $x0) .' '.sprintf('%.3f', $y0) .' m '.sprintf('%.3f', $x1) .' '.sprintf('%.3f', $y1);
- $this->objects[$this->currentContents]['c'] .=
- ' '.sprintf('%.3f', $x2) .' '.sprintf('%.3f', $y2) .' '.sprintf('%.3f', $x3) .' '.sprintf('%.3f', $y3) .' c S';
- }
- /**
- * draw a part of an ellipse
- */
- function partEllipse($x0, $y0, $astart, $afinish, $r1, $r2 = 0, $angle = 0, $nSeg = 8) {
- $this->ellipse($x0, $y0, $r1, $r2, $angle, $nSeg, $astart, $afinish, 0);
- }
- /**
- * draw a filled ellipse
- */
- function filledEllipse($x0, $y0, $r1, $r2 = 0, $angle = 0, $nSeg = 8, $astart = 0, $afinish = 360) {
- return $this->ellipse($x0, $y0, $r1, $r2 = 0, $angle, $nSeg, $astart, $afinish, 1, 1);
- }
- /**
- * draw an ellipse
- * note that the part and filled ellipse are just special cases of this function
- *
- * draws an ellipse in the current line style
- * centered at $x0,$y0, radii $r1,$r2
- * if $r2 is not set, then a circle is drawn
- * nSeg is not allowed to be less than 2, as this will simply draw a line (and will even draw a
- * pretty crappy shape at 2, as we are approximating with bezier curves.
- */
- function ellipse($x0, $y0, $r1, $r2 = 0, $angle = 0, $nSeg = 8, $astart = 0, $afinish = 360, $close = 1, $fill = 0) {
- if ($r1 == 0) {
-