--- /dev/null
+<?php
+
+include_once('class.pdf.php');
+
+class Cezpdf extends Cpdf {
+//==============================================================================
+// this class will take the basic interaction facilities of the Cpdf class
+// and make more useful functions so that the user does not have to
+// know all the ins and outs of pdf presentation to produce something pretty.
+//
+// IMPORTANT NOTE
+// there is no warranty, implied or otherwise with this software.
+//
+// version 009 (versioning is linked to class.pdf.php)
+//
+// released under a public domain licence.
+//
+// Wayne Munro, R&OS Ltd, http://www.ros.co.nz/pdf
+//==============================================================================
+
+var $ez=array('fontSize'=>10); // used for storing most of the page configuration parameters
+var $y; // this is the current vertical positon on the page of the writing point, very important
+var $ezPages=array(); // keep an array of the ids of the pages, making it easy to go back and add page numbers etc.
+var $ezPageCount=0;
+
+// ------------------------------------------------------------------------------
+
+function Cezpdf($paper='a4',$orientation='portrait'){
+ // Assuming that people don't want to specify the paper size using the absolute coordinates
+ // allow a couple of options:
+ // orientation can be 'portrait' or 'landscape'
+ // or, to actually set the coordinates, then pass an array in as the first parameter.
+ // the defaults are as shown.
+ //
+ // -------------------------
+ // 2002-07-24 - Nicola Asuni (info@tecnick.com):
+ // Added new page formats (45 standard ISO paper formats and 4 american common formats)
+ // paper cordinates are calculated in this way: (inches * 72) where 1 inch = 2.54 cm
+ //
+ // Now you may also pass a 2 values array containing the page width and height in centimeters
+ // -------------------------
+
+ if (!is_array($paper)){
+ switch (strtoupper($paper)){
+ case '4A0': {$size = array(0,0,4767.87,6740.79); break;}
+ case '2A0': {$size = array(0,0,3370.39,4767.87); break;}
+ case 'A0': {$size = array(0,0,2383.94,3370.39); break;}
+ case 'A1': {$size = array(0,0,1683.78,2383.94); break;}
+ case 'A2': {$size = array(0,0,1190.55,1683.78); break;}
+ case 'A3': {$size = array(0,0,841.89,1190.55); break;}
+ case 'A4': default: {$size = array(0,0,595.28,841.89); break;}
+ case 'A5': {$size = array(0,0,419.53,595.28); break;}
+ case 'A6': {$size = array(0,0,297.64,419.53); break;}
+ case 'A7': {$size = array(0,0,209.76,297.64); break;}
+ case 'A8': {$size = array(0,0,147.40,209.76); break;}
+ case 'A9': {$size = array(0,0,104.88,147.40); break;}
+ case 'A10': {$size = array(0,0,73.70,104.88); break;}
+ case 'B0': {$size = array(0,0,2834.65,4008.19); break;}
+ case 'B1': {$size = array(0,0,2004.09,2834.65); break;}
+ case 'B2': {$size = array(0,0,1417.32,2004.09); break;}
+ case 'B3': {$size = array(0,0,1000.63,1417.32); break;}
+ case 'B4': {$size = array(0,0,708.66,1000.63); break;}
+ case 'B5': {$size = array(0,0,498.90,708.66); break;}
+ case 'B6': {$size = array(0,0,354.33,498.90); break;}
+ case 'B7': {$size = array(0,0,249.45,354.33); break;}
+ case 'B8': {$size = array(0,0,175.75,249.45); break;}
+ case 'B9': {$size = array(0,0,124.72,175.75); break;}
+ case 'B10': {$size = array(0,0,87.87,124.72); break;}
+ case 'C0': {$size = array(0,0,2599.37,3676.54); break;}
+ case 'C1': {$size = array(0,0,1836.85,2599.37); break;}
+ case 'C2': {$size = array(0,0,1298.27,1836.85); break;}
+ case 'C3': {$size = array(0,0,918.43,1298.27); break;}
+ case 'C4': {$size = array(0,0,649.13,918.43); break;}
+ case 'C5': {$size = array(0,0,459.21,649.13); break;}
+ case 'C6': {$size = array(0,0,323.15,459.21); break;}
+ case 'C7': {$size = array(0,0,229.61,323.15); break;}
+ case 'C8': {$size = array(0,0,161.57,229.61); break;}
+ case 'C9': {$size = array(0,0,113.39,161.57); break;}
+ case 'C10': {$size = array(0,0,79.37,113.39); break;}
+ case 'RA0': {$size = array(0,0,2437.80,3458.27); break;}
+ case 'RA1': {$size = array(0,0,1729.13,2437.80); break;}
+ case 'RA2': {$size = array(0,0,1218.90,1729.13); break;}
+ case 'RA3': {$size = array(0,0,864.57,1218.90); break;}
+ case 'RA4': {$size = array(0,0,609.45,864.57); break;}
+ case 'SRA0': {$size = array(0,0,2551.18,3628.35); break;}
+ case 'SRA1': {$size = array(0,0,1814.17,2551.18); break;}
+ case 'SRA2': {$size = array(0,0,1275.59,1814.17); break;}
+ case 'SRA3': {$size = array(0,0,907.09,1275.59); break;}
+ case 'SRA4': {$size = array(0,0,637.80,907.09); break;}
+ case 'LETTER': {$size = array(0,0,612.00,792.00); break;}
+ case 'LEGAL': {$size = array(0,0,612.00,1008.00); break;}
+ case 'EXECUTIVE': {$size = array(0,0,521.86,756.00); break;}
+ case 'FOLIO': {$size = array(0,0,612.00,936.00); break;}
+ }
+ switch (strtolower($orientation)){
+ case 'landscape':
+ $a=$size[3];
+ $size[3]=$size[2];
+ $size[2]=$a;
+ break;
+ }
+ } else {
+ if (count($paper)>2) {
+ // then an array was sent it to set the size
+ $size = $paper;
+ }
+ else { //size in centimeters has been passed
+ $size[0] = 0;
+ $size[1] = 0;
+ $size[2] = ( $paper[0] / 2.54 ) * 72;
+ $size[3] = ( $paper[1] / 2.54 ) * 72;
+ }
+ }
+ $this->Cpdf($size);
+ $this->ez['pageWidth']=$size[2];
+ $this->ez['pageHeight']=$size[3];
+
+ // also set the margins to some reasonable defaults
+ $this->ez['topMargin']=30;
+ $this->ez['bottomMargin']=30;
+ $this->ez['leftMargin']=30;
+ $this->ez['rightMargin']=30;
+
+ // set the current writing position to the top of the first page
+ $this->y = $this->ez['pageHeight']-$this->ez['topMargin'];
+ // and get the ID of the page that was created during the instancing process.
+ $this->ezPages[1]=$this->getFirstPageId();
+ $this->ezPageCount=1;
+}
+
+// ------------------------------------------------------------------------------
+// 2002-07-24: Nicola Asuni (info@tecnick.com)
+// Set Margins in centimeters
+function ezSetCmMargins($top,$bottom,$left,$right){
+ $top = ( $top / 2.54 ) * 72;
+ $bottom = ( $bottom / 2.54 ) * 72;
+ $left = ( $left / 2.54 ) * 72;
+ $right = ( $right / 2.54 ) * 72;
+ $this->ezSetMargins($top,$bottom,$left,$right);
+}
+// ------------------------------------------------------------------------------
+
+
+function ezColumnsStart($options=array()){
+ // start from the current y-position, make the set number of columne
+ if (isset($this->ez['columns']) && $this->ez['columns']==1){
+ // if we are already in a column mode then just return.
+ return;
+ }
+ $def=array('gap'=>10,'num'=>2);
+ foreach($def as $k=>$v){
+ if (!isset($options[$k])){
+ $options[$k]=$v;
+ }
+ }
+ // setup the columns
+ $this->ez['columns']=array('on'=>1,'colNum'=>1);
+
+ // store the current margins
+ $this->ez['columns']['margins']=array(
+ $this->ez['leftMargin']
+ ,$this->ez['rightMargin']
+ ,$this->ez['topMargin']
+ ,$this->ez['bottomMargin']
+ );
+ // and store the settings for the columns
+ $this->ez['columns']['options']=$options;
+ // then reset the margins to suit the new columns
+ // safe enough to assume the first column here, but start from the current y-position
+ $this->ez['topMargin']=$this->ez['pageHeight']-$this->y;
+ $width=($this->ez['pageWidth']-$this->ez['leftMargin']-$this->ez['rightMargin']-($options['num']-1)*$options['gap'])/$options['num'];
+ $this->ez['columns']['width']=$width;
+ $this->ez['rightMargin']=$this->ez['pageWidth']-$this->ez['leftMargin']-$width;
+
+}
+// ------------------------------------------------------------------------------
+function ezColumnsStop(){
+ if (isset($this->ez['columns']) && $this->ez['columns']['on']==1){
+ $this->ez['columns']['on']=0;
+ $this->ez['leftMargin']=$this->ez['columns']['margins'][0];
+ $this->ez['rightMargin']=$this->ez['columns']['margins'][1];
+ $this->ez['topMargin']=$this->ez['columns']['margins'][2];
+ $this->ez['bottomMargin']=$this->ez['columns']['margins'][3];
+ }
+}
+// ------------------------------------------------------------------------------
+function ezInsertMode($status=1,$pageNum=1,$pos='before'){
+ // puts the document into insert mode. new pages are inserted until this is re-called with status=0
+ // by default pages wil be inserted at the start of the document
+ switch($status){
+ case '1':
+ if (isset($this->ezPages[$pageNum])){
+ $this->ez['insertMode']=1;
+ $this->ez['insertOptions']=array('id'=>$this->ezPages[$pageNum],'pos'=>$pos);
+ }
+ break;
+ case '0':
+ $this->ez['insertMode']=0;
+ break;
+ }
+}
+// ------------------------------------------------------------------------------
+
+function ezNewPage(){
+ $pageRequired=1;
+ if (isset($this->ez['columns']) && $this->ez['columns']['on']==1){
+ // check if this is just going to a new column
+ // increment the column number
+//echo 'HERE<br>';
+ $this->ez['columns']['colNum']++;
+//echo $this->ez['columns']['colNum'].'<br>';
+ if ($this->ez['columns']['colNum'] <= $this->ez['columns']['options']['num']){
+ // then just reset to the top of the next column
+ $pageRequired=0;
+ } else {
+ $this->ez['columns']['colNum']=1;
+ $this->ez['topMargin']=$this->ez['columns']['margins'][2];
+ }
+
+ $width = $this->ez['columns']['width'];
+ $this->ez['leftMargin']=$this->ez['columns']['margins'][0]+($this->ez['columns']['colNum']-1)*($this->ez['columns']['options']['gap']+$width);
+ $this->ez['rightMargin']=$this->ez['pageWidth']-$this->ez['leftMargin']-$width;
+ }
+//echo 'left='.$this->ez['leftMargin'].' right='.$this->ez['rightMargin'].'<br>';
+
+ if ($pageRequired){
+ // make a new page, setting the writing point back to the top
+ $this->y = $this->ez['pageHeight']-$this->ez['topMargin'];
+ // make the new page with a call to the basic class.
+ $this->ezPageCount++;
+ if (isset($this->ez['insertMode']) && $this->ez['insertMode']==1){
+ $id = $this->ezPages[$this->ezPageCount] = $this->newPage(1,$this->ez['insertOptions']['id'],$this->ez['insertOptions']['pos']);
+ // then manipulate the insert options so that inserted pages follow each other
+ $this->ez['insertOptions']['id']=$id;
+ $this->ez['insertOptions']['pos']='after';
+ } else {
+ $this->ezPages[$this->ezPageCount] = $this->newPage();
+ }
+ } else {
+ $this->y = $this->ez['pageHeight']-$this->ez['topMargin'];
+ }
+}
+
+// ------------------------------------------------------------------------------
+
+function ezSetMargins($top,$bottom,$left,$right){
+ // sets the margins to new values
+ $this->ez['topMargin']=$top;
+ $this->ez['bottomMargin']=$bottom;
+ $this->ez['leftMargin']=$left;
+ $this->ez['rightMargin']=$right;
+ // check to see if this means that the current writing position is outside the
+ // writable area
+ if ($this->y > $this->ez['pageHeight']-$top){
+ // then move y down
+ $this->y = $this->ez['pageHeight']-$top;
+ }
+ if ( $this->y < $bottom){
+ // then make a new page
+ $this->ezNewPage();
+ }
+}
+
+// ------------------------------------------------------------------------------
+
+function ezGetCurrentPageNumber(){
+ // return the strict numbering (1,2,3,4..) number of the current page
+ return $this->ezPageCount;
+}
+
+// ------------------------------------------------------------------------------
+
+function ezStartPageNumbers($x,$y,$size,$pos='left',$pattern='{PAGENUM} of {TOTALPAGENUM}',$num=''){
+ // put page numbers on the pages from here.
+ // place then on the 'pos' side of the coordinates (x,y).
+ // pos can be 'left' or 'right'
+ // use the given 'pattern' for display, where (PAGENUM} and {TOTALPAGENUM} are replaced
+ // as required.
+ // if $num is set, then make the first page this number, the number of total pages will
+ // be adjusted to account for this.
+ // Adjust this function so that each time you 'start' page numbers then you effectively start a different batch
+ // return the number of the batch, so that they can be stopped in a different order if required.
+ if (!$pos || !strlen($pos)){
+ $pos='left';
+ }
+ if (!$pattern || !strlen($pattern)){
+ $pattern='{PAGENUM} of {TOTALPAGENUM}';
+ }
+ if (!isset($this->ez['pageNumbering'])){
+ $this->ez['pageNumbering']=array();
+ }
+ $i = count($this->ez['pageNumbering']);
+ $this->ez['pageNumbering'][$i][$this->ezPageCount]=array('x'=>$x,'y'=>$y,'pos'=>$pos,'pattern'=>$pattern,'num'=>$num,'size'=>$size);
+ return $i;
+}
+
+// ------------------------------------------------------------------------------
+
+function ezWhatPageNumber($pageNum,$i=0){
+ // given a particular generic page number (ie, document numbered sequentially from beginning),
+ // return the page number under a particular page numbering scheme ($i)
+ $num=0;
+ $start=1;
+ $startNum=1;
+ if (!isset($this->ez['pageNumbering']))
+ {
+ $this->addMessage('WARNING: page numbering called for and wasn\'t started with ezStartPageNumbers');
+ return 0;
+ }
+ foreach($this->ez['pageNumbering'][$i] as $k=>$v){
+ if ($k<=$pageNum){
+ if (is_array($v)){
+ // start block
+ if (strlen($v['num'])){
+ // a start was specified
+ $start=$v['num'];
+ $startNum=$k;
+ $num=$pageNum-$startNum+$start;
+ }
+ } else {
+ // stop block
+ $num=0;
+ }
+ }
+ }
+ return $num;
+}
+
+// ------------------------------------------------------------------------------
+
+function ezStopPageNumbers($stopTotal=0,$next=0,$i=0){
+ // if stopTotal=1 then the totalling of pages for this number will stop too
+ // if $next=1, then do this page, but not the next, else do not do this page either
+ // if $i is set, then stop that particular pagenumbering sequence.
+ if (!isset($this->ez['pageNumbering'])){
+ $this->ez['pageNumbering']=array();
+ }
+ if ($next && isset($this->ez['pageNumbering'][$i][$this->ezPageCount]) && is_array($this->ez['pageNumbering'][$i][$this->ezPageCount])){
+ // then this has only just been started, this will over-write the start, and nothing will appear
+ // add a special command to the start block, telling it to stop as well
+ if ($stopTotal){
+ $this->ez['pageNumbering'][$i][$this->ezPageCount]['stoptn']=1;
+ } else {
+ $this->ez['pageNumbering'][$i][$this->ezPageCount]['stopn']=1;
+ }
+ } else {
+ if ($stopTotal){
+ $this->ez['pageNumbering'][$i][$this->ezPageCount]='stopt';
+ } else {
+ $this->ez['pageNumbering'][$i][$this->ezPageCount]='stop';
+ }
+ if ($next){
+ $this->ez['pageNumbering'][$i][$this->ezPageCount].='n';
+ }
+ }
+}
+
+// ------------------------------------------------------------------------------
+
+function ezPRVTpageNumberSearch($lbl,&$tmp){
+ foreach($tmp as $i=>$v){
+ if (is_array($v)){
+ if (isset($v[$lbl])){
+ return $i;
+ }
+ } else {
+ if ($v==$lbl){
+ return $i;
+ }
+ }
+ }
+ return 0;
+}
+
+// ------------------------------------------------------------------------------
+
+function ezPRVTaddPageNumbers(){
+ // this will go through the pageNumbering array and add the page numbers are required
+ if (isset($this->ez['pageNumbering'])){
+ $totalPages1 = $this->ezPageCount;
+ $tmp1=$this->ez['pageNumbering'];
+ $status=0;
+ foreach($tmp1 as $i=>$tmp){
+ // do each of the page numbering systems
+ // firstly, find the total pages for this one
+ $k = $this->ezPRVTpageNumberSearch('stopt',$tmp);
+ if ($k && $k>0){
+ $totalPages = $k-1;
+ } else {
+ $l = $this->ezPRVTpageNumberSearch('stoptn',$tmp);
+ if ($l && $l>0){
+ $totalPages = $l;
+ } else {
+ $totalPages = $totalPages1;
+ }
+ }
+ foreach ($this->ezPages as $pageNum=>$id){
+ if (isset($tmp[$pageNum])){
+ if (is_array($tmp[$pageNum])){
+ // then this must be starting page numbers
+ $status=1;
+ $info = $tmp[$pageNum];
+ $info['dnum']=$info['num']-$pageNum;
+ // also check for the special case of the numbering stopping and starting on the same page
+ if (isset($info['stopn']) || isset($info['stoptn']) ){
+ $status=2;
+ }
+ } else if ($tmp[$pageNum]=='stop' || $tmp[$pageNum]=='stopt'){
+ // then we are stopping page numbers
+ $status=0;
+ } else if ($status==1 && ($tmp[$pageNum]=='stoptn' || $tmp[$pageNum]=='stopn')){
+ // then we are stopping page numbers
+ $status=2;
+ }
+ }
+ if ($status){
+ // then add the page numbering to this page
+ if (strlen($info['num'])){
+ $num=$pageNum+$info['dnum'];
+ } else {
+ $num=$pageNum;
+ }
+ $total = $totalPages+$num-$pageNum;
+ $pat = str_replace('{PAGENUM}',$num,$info['pattern']);
+ $pat = str_replace('{TOTALPAGENUM}',$total,$pat);
+ $this->reopenObject($id);
+ switch($info['pos']){
+ case 'right':
+ $this->addText($info['x'],$info['y'],$info['size'],$pat);
+ break;
+ default:
+ $w=$this->getTextWidth($info['size'],$pat);
+ $this->addText($info['x']-$w,$info['y'],$info['size'],$pat);
+ break;
+ }
+ $this->closeObject();
+ }
+ if ($status==2){
+ $status=0;
+ }
+ }
+ }
+ }
+}
+
+// ------------------------------------------------------------------------------
+
+function ezPRVTcleanUp(){
+ $this->ezPRVTaddPageNumbers();
+}
+
+// ------------------------------------------------------------------------------
+
+function ezStream($options=''){
+ $this->ezPRVTcleanUp();
+ $this->stream($options);
+}
+
+// ------------------------------------------------------------------------------
+
+function ezOutput($options=0){
+ $this->ezPRVTcleanUp();
+ return $this->output($options);
+}
+
+// ------------------------------------------------------------------------------
+
+function ezSetY($y){
+ // used to change the vertical position of the writing point.
+ $this->y = $y;
+ if ( $this->y < $this->ez['bottomMargin']){
+ // then make a new page
+ $this->ezNewPage();
+ }
+}
+
+// ------------------------------------------------------------------------------
+
+function ezSetDy($dy,$mod=''){
+ // used to change the vertical position of the writing point.
+ // changes up by a positive increment, so enter a negative number to go
+ // down the page
+ // if $mod is set to 'makeSpace' and a new page is forced, then the pointed will be moved
+ // down on the new page, this will allow space to be reserved for graphics etc.
+ $this->y += $dy;
+ if ( $this->y < $this->ez['bottomMargin']){
+ // then make a new page
+ $this->ezNewPage();
+ if ($mod=='makeSpace'){
+ $this->y += $dy;
+ }
+ }
+}
+
+// ------------------------------------------------------------------------------
+
+function ezPrvtTableDrawLines($pos,$gap,$x0,$x1,$y0,$y1,$y2,$col,$inner,$outer,$opt=1){
+ $x0=1000;
+ $x1=0;
+ $this->setStrokeColor($col[0],$col[1],$col[2]);
+ $cnt=0;
+ $n = count($pos);
+ foreach($pos as $x){
+ $cnt++;
+ if ($cnt==1 || $cnt==$n){
+ $this->setLineStyle($outer);
+ } else {
+ $this->setLineStyle($inner);
+ }
+ $this->line($x-$gap/2,$y0,$x-$gap/2,$y2);
+ if ($x>$x1){ $x1=$x; };
+ if ($x<$x0){ $x0=$x; };
+ }
+ $this->setLineStyle($outer);
+ $this->line($x0-$gap/2-$outer/2,$y0,$x1-$gap/2+$outer/2,$y0);
+ // only do the second line if it is different to the first, AND each row does not have
+ // a line on it.
+ if ($y0!=$y1 && $opt<2){
+ $this->line($x0-$gap/2,$y1,$x1-$gap/2,$y1);
+ }
+ $this->line($x0-$gap/2-$outer/2,$y2,$x1-$gap/2+$outer/2,$y2);
+}
+
+// ------------------------------------------------------------------------------
+
+function ezPrvtTableColumnHeadings($cols,$pos,$maxWidth,$height,$decender,$gap,$size,&$y,$optionsAll=array()){
+ // uses ezText to add the text, and returns the height taken by the largest heading
+ // this page will move the headings to a new page if they will not fit completely on this one
+ // transaction support will be used to implement this
+
+ if (isset($optionsAll['cols'])){
+ $options = $optionsAll['cols'];
+ } else {
+ $options = array();
+ }
+
+ $mx=0;
+ $startPage = $this->ezPageCount;
+ $secondGo=0;
+
+ // $y is the position at which the top of the table should start, so the base
+ // of the first text, is $y-$height-$gap-$decender, but ezText starts by dropping $height
+
+ // the return from this function is the total cell height, including gaps, and $y is adjusted
+ // to be the postion of the bottom line
+
+ // begin the transaction
+ $this->transaction('start');
+ $ok=0;
+// $y-=$gap-$decender;
+ $y-=$gap;
+ while ($ok==0){
+ foreach($cols as $colName=>$colHeading){
+ $this->ezSetY($y);
+ if (isset($options[$colName]) && isset($options[$colName]['justification'])){
+ $justification = $options[$colName]['justification'];
+ } else {
+ $justification = 'left';
+ }
+ $this->ezText($colHeading,$size,array('aleft'=> $pos[$colName],'aright'=>($maxWidth[$colName]+$pos[$colName]),'justification'=>$justification));
+ $dy = $y-$this->y;
+ if ($dy>$mx){
+ $mx=$dy;
+ }
+ }
+ $y = $y - $mx - $gap + $decender;
+// $y -= $mx-$gap+$decender;
+
+ // now, if this has moved to a new page, then abort the transaction, move to a new page, and put it there
+ // do not check on the second time around, to avoid an infinite loop
+ if ($this->ezPageCount != $startPage && $secondGo==0){
+ $this->transaction('rewind');
+ $this->ezNewPage();
+ $y = $this->y - $gap-$decender;
+ $ok=0;
+ $secondGo=1;
+// $y = $store_y;
+ $mx=0;
+
+ } else {
+ $this->transaction('commit');
+ $ok=1;
+ }
+ }
+
+ return $mx+$gap*2-$decender;
+}
+
+// ------------------------------------------------------------------------------
+
+function ezPrvtGetTextWidth($size,$text){
+ // will calculate the maximum width, taking into account that the text may be broken
+ // by line breaks.
+ $mx=0;
+ $lines = explode("\n",$text);
+ foreach ($lines as $line){
+ $w = $this->getTextWidth($size,$line);
+ if ($w>$mx){
+ $mx=$w;
+ }
+ }
+ return $mx;
+}
+
+// ------------------------------------------------------------------------------
+
+function ezTable(&$data,$cols='',$title='',$options=''){
+ // add a table of information to the pdf document
+ // $data is a two dimensional array
+ // $cols (optional) is an associative array, the keys are the names of the columns from $data
+ // to be presented (and in that order), the values are the titles to be given to the columns
+ // $title (optional) is the title to be put on the top of the table
+ //
+ // $options is an associative array which can contain:
+ // 'showLines'=> 0,1,2, default is 1 (show outside and top lines only), 2=> lines on each row
+ // 'showHeadings' => 0 or 1
+ // 'shaded'=> 0,1,2,3 default is 1 (1->alternate lines are shaded, 0->no shading, 2-> both shaded, second uses shadeCol2)
+ // 'shadeCol' => (r,g,b) array, defining the colour of the shading, default is (0.8,0.8,0.8)
+ // 'shadeCol2' => (r,g,b) array, defining the colour of the shading of the other blocks, default is (0.7,0.7,0.7)
+ // 'fontSize' => 10
+ // 'textCol' => (r,g,b) array, text colour
+ // 'titleFontSize' => 12
+ // 'rowGap' => 2 , the space added at the top and bottom of each row, between the text and the lines
+ // 'colGap' => 5 , the space on the left and right sides of each cell
+ // 'lineCol' => (r,g,b) array, defining the colour of the lines, default, black.
+ // 'xPos' => 'left','right','center','centre',or coordinate, reference coordinate in the x-direction
+ // 'xOrientation' => 'left','right','center','centre', position of the table w.r.t 'xPos'
+ // 'width'=> <number> which will specify the width of the table, if it turns out to not be this
+ // wide, then it will stretch the table to fit, if it is wider then each cell will be made
+ // proportionalty smaller, and the content may have to wrap.
+ // 'maxWidth'=> <number> similar to 'width', but will only make table smaller than it wants to be
+ // 'options' => array(<colname>=>array('justification'=>'left','width'=>100,'link'=>linkDataName),<colname>=>....)
+ // allow the setting of other paramaters for the individual columns
+ // 'minRowSpace'=> the minimum space between the bottom of each row and the bottom margin, in which a new row will be started
+ // if it is less, then a new page would be started, default=-100
+ // 'innerLineThickness'=>1
+ // 'outerLineThickness'=>1
+ // 'splitRows'=>0, 0 or 1, whether or not to allow the rows to be split across page boundaries
+ // 'protectRows'=>number, the number of rows to hold with the heading on page, ie, if there less than this number of
+ // rows on the page, then move the whole lot onto the next page, default=1
+ //
+ // note that the user will have had to make a font selection already or this will not
+ // produce a valid pdf file.
+
+ if (!is_array($data)){
+ return;
+ }
+
+ if (!is_array($cols)){
+ // take the columns from the first row of the data set
+ reset($data);
+ list($k,$v)=each($data);
+ if (!is_array($v)){
+ return;
+ }
+ $cols=array();
+ foreach($v as $k1=>$v1){
+ $cols[$k1]=$k1;
+ }
+ }
+
+ if (!is_array($options)){
+ $options=array();
+ }
+
+ $defaults = array(
+ 'shaded'=>1,'showLines'=>1,'shadeCol'=>array(0.8,0.8,0.8),'shadeCol2'=>array(0.7,0.7,0.7),'fontSize'=>10,'titleFontSize'=>12
+ ,'titleGap'=>5,'lineCol'=>array(0,0,0),'gap'=>5,'xPos'=>'centre','xOrientation'=>'centre'
+ ,'showHeadings'=>1,'textCol'=>array(0,0,0),'width'=>0,'maxWidth'=>0,'cols'=>array(),'minRowSpace'=>-100,'rowGap'=>2,'colGap'=>5
+ ,'innerLineThickness'=>1,'outerLineThickness'=>1,'splitRows'=>0,'protectRows'=>1
+ );
+
+ foreach($defaults as $key=>$value){
+ if (is_array($value)){
+ if (!isset($options[$key]) || !is_array($options[$key])){
+ $options[$key]=$value;
+ }
+ } else {
+ if (!isset($options[$key])){
+ $options[$key]=$value;
+ }
+ }
+ }
+ $options['gap']=2*$options['colGap'];
+
+ $middle = ($this->ez['pageWidth']-$this->ez['rightMargin'])/2+($this->ez['leftMargin'])/2;
+ // figure out the maximum widths of the text within each column
+ $maxWidth=array();
+ foreach($cols as $colName=>$colHeading){
+ $maxWidth[$colName]=0;
+ }
+ // find the maximum cell widths based on the data
+ foreach($data as $row){
+ foreach($cols as $colName=>$colHeading){
+ $w = $this->ezPrvtGetTextWidth($options['fontSize'],(string)$row[$colName])*1.01;
+ if ($w > $maxWidth[$colName]){
+ $maxWidth[$colName]=$w;
+ }
+ }
+ }
+ // and the maximum widths to fit in the headings
+ foreach($cols as $colName=>$colTitle){
+ $w = $this->ezPrvtGetTextWidth($options['fontSize'],(string)$colTitle)*1.01;
+ if ($w > $maxWidth[$colName]){
+ $maxWidth[$colName]=$w;
+ }
+ }
+
+ // calculate the start positions of each of the columns
+ $pos=array();
+ $x=0;
+ $t=$x;
+ $adjustmentWidth=0;
+ $setWidth=0;
+ foreach($maxWidth as $colName => $w){
+ $pos[$colName]=$t;
+ // if the column width has been specified then set that here, also total the
+ // width avaliable for adjustment
+ if (isset($options['cols'][$colName]) && isset($options['cols'][$colName]['width']) && $options['cols'][$colName]['width']>0){
+ $t=$t+$options['cols'][$colName]['width'];
+ $maxWidth[$colName] = $options['cols'][$colName]['width']-$options['gap'];
+ $setWidth += $options['cols'][$colName]['width'];
+ } else {
+ $t=$t+$w+$options['gap'];
+ $adjustmentWidth += $w;
+ $setWidth += $options['gap'];
+ }
+ }
+ $pos['_end_']=$t;
+
+ // if maxWidth is specified, and the table is too wide, and the width has not been set,
+ // then set the width.
+ if ($options['width']==0 && $options['maxWidth'] && ($t-$x)>$options['maxWidth']){
+ // then need to make this one smaller
+ $options['width']=$options['maxWidth'];
+ }
+
+ if ($options['width'] && $adjustmentWidth>0 && $setWidth<$options['width']){
+ // first find the current widths of the columns involved in this mystery
+ $cols0 = array();
+ $cols1 = array();
+ $xq=0;
+ $presentWidth=0;
+ $last='';
+ foreach($pos as $colName=>$p){
+ if (!isset($options['cols'][$last]) || !isset($options['cols'][$last]['width']) || $options['cols'][$last]['width']<=0){
+ if (strlen($last)){
+ $cols0[$last]=$p-$xq -$options['gap'];
+ $presentWidth += ($p-$xq - $options['gap']);
+ }
+ } else {
+ $cols1[$last]=$p-$xq;
+ }
+ $last=$colName;
+ $xq=$p;
+ }
+ // $cols0 contains the widths of all the columns which are not set
+ $neededWidth = $options['width']-$setWidth;
+ // if needed width is negative then add it equally to each column, else get more tricky
+ if ($presentWidth<$neededWidth){
+ foreach($cols0 as $colName=>$w){
+ $cols0[$colName]+= ($neededWidth-$presentWidth)/count($cols0);
+ }
+ } else {
+
+ $cnt=0;
+ while ($presentWidth>$neededWidth && $cnt<100){
+ $cnt++; // insurance policy
+ // find the widest columns, and the next to widest width
+ $aWidest = array();
+ $nWidest=0;
+ $widest=0;
+ foreach($cols0 as $colName=>$w){
+ if ($w>$widest){
+ $aWidest=array($colName);
+ $nWidest = $widest;
+ $widest=$w;
+ } else if ($w==$widest){
+ $aWidest[]=$colName;
+ }
+ }
+ // then figure out what the width of the widest columns would have to be to take up all the slack
+ $newWidestWidth = $widest - ($presentWidth-$neededWidth)/count($aWidest);
+ if ($newWidestWidth > $nWidest){
+ // then there is space to set them to this
+ foreach($aWidest as $colName){
+ $cols0[$colName] = $newWidestWidth;
+ }
+ $presentWidth=$neededWidth;
+ } else {
+ // there is not space, reduce the size of the widest ones down to the next size down, and we
+ // will go round again
+ foreach($aWidest as $colName){
+ $cols0[$colName] = $nWidest;
+ }
+ $presentWidth=$presentWidth-($widest-$nWidest)*count($aWidest);
+ }
+ }
+ }
+ // $cols0 now contains the new widths of the constrained columns.
+ // now need to update the $pos and $maxWidth arrays
+ $xq=0;
+ foreach($pos as $colName=>$p){
+ $pos[$colName]=$xq;
+ if (!isset($options['cols'][$colName]) || !isset($options['cols'][$colName]['width']) || $options['cols'][$colName]['width']<=0){
+ if (isset($cols0[$colName])){
+ $xq += $cols0[$colName] + $options['gap'];
+ $maxWidth[$colName]=$cols0[$colName];
+ }
+ } else {
+ if (isset($cols1[$colName])){
+ $xq += $cols1[$colName];
+ }
+ }
+ }
+
+ $t=$x+$options['width'];
+ $pos['_end_']=$t;
+ }
+
+ // now adjust the table to the correct location across the page
+ switch ($options['xPos']){
+ case 'left':
+ $xref = $this->ez['leftMargin'];
+ break;
+ case 'right':
+ $xref = $this->ez['pageWidth'] - $this->ez['rightMargin'];
+ break;
+ case 'centre':
+ case 'center':
+ $xref = $middle;
+ break;
+ default:
+ $xref = $options['xPos'];
+ break;
+ }
+ switch ($options['xOrientation']){
+ case 'left':
+ $dx = $xref-$t;
+ break;
+ case 'right':
+ $dx = $xref;
+ break;
+ case 'centre':
+ case 'center':
+ $dx = $xref-$t/2;
+ break;
+ }
+
+
+ foreach($pos as $k=>$v){
+ $pos[$k]=$v+$dx;
+ }
+ $x0=$x+$dx;
+ $x1=$t+$dx;
+
+ $baseLeftMargin = $this->ez['leftMargin'];
+ $basePos = $pos;
+ $baseX0 = $x0;
+ $baseX1 = $x1;
+
+ // ok, just about ready to make me a table
+ $this->setColor($options['textCol'][0],$options['textCol'][1],$options['textCol'][2]);
+ $this->setStrokeColor($options['shadeCol'][0],$options['shadeCol'][1],$options['shadeCol'][2]);
+
+ $middle = ($x1+$x0)/2;
+
+ // start a transaction which will be used to regress the table, if there are not enough rows protected
+ if ($options['protectRows']>0){
+ $this->transaction('start');
+ $movedOnce=0;
+ }
+ $abortTable = 1;
+ while ($abortTable){
+ $abortTable=0;
+
+ $dm = $this->ez['leftMargin']-$baseLeftMargin;
+ foreach($basePos as $k=>$v){
+ $pos[$k]=$v+$dm;
+ }
+ $x0=$baseX0+$dm;
+ $x1=$baseX1+$dm;
+ $middle = ($x1+$x0)/2;
+
+
+ // if the title is set, then do that
+ if (strlen($title)){
+ $w = $this->getTextWidth($options['titleFontSize'],$title);
+ $this->y -= $this->getFontHeight($options['titleFontSize']);
+ if ($this->y < $this->ez['bottomMargin']){
+ $this->ezNewPage();
+ // margins may have changed on the newpage
+ $dm = $this->ez['leftMargin']-$baseLeftMargin;
+ foreach($basePos as $k=>$v){
+ $pos[$k]=$v+$dm;
+ }
+ $x0=$baseX0+$dm;
+ $x1=$baseX1+$dm;
+ $middle = ($x1+$x0)/2;
+ $this->y -= $this->getFontHeight($options['titleFontSize']);
+ }
+ $this->addText($middle-$w/2,$this->y,$options['titleFontSize'],$title);
+ $this->y -= $options['titleGap'];
+ }
+
+ // margins may have changed on the newpage
+ $dm = $this->ez['leftMargin']-$baseLeftMargin;
+ foreach($basePos as $k=>$v){
+ $pos[$k]=$v+$dm;
+ }
+ $x0=$baseX0+$dm;
+ $x1=$baseX1+$dm;
+
+ $y=$this->y; // to simplify the code a bit
+
+ // make the table
+ $height = $this->getFontHeight($options['fontSize']);
+ $decender = $this->getFontDecender($options['fontSize']);
+
+
+
+ $y0=$y+$decender;
+ $dy=0;
+ if ($options['showHeadings']){
+ // this function will move the start of the table to a new page if it does not fit on this one
+ $headingHeight = $this->ezPrvtTableColumnHeadings($cols,$pos,$maxWidth,$height,$decender,$options['rowGap'],$options['fontSize'],$y,$options);
+ $y0 = $y+$headingHeight;
+ $y1 = $y;
+
+
+ $dm = $this->ez['leftMargin']-$baseLeftMargin;
+ foreach($basePos as $k=>$v){
+ $pos[$k]=$v+$dm;
+ }
+ $x0=$baseX0+$dm;
+ $x1=$baseX1+$dm;
+
+ } else {
+ $y1 = $y0;
+ }
+ $firstLine=1;
+
+
+ // open an object here so that the text can be put in over the shading
+ if ($options['shaded']){
+ $this->saveState();
+ $textObjectId = $this->openObject();
+ $this->closeObject();
+ $this->addObject($textObjectId);
+ $this->reopenObject($textObjectId);
+ }
+
+ $cnt=0;
+ $newPage=0;
+ foreach($data as $row){
+ $cnt++;
+ // the transaction support will be used to prevent rows being split
+ if ($options['splitRows']==0){
+ $pageStart = $this->ezPageCount;
+ if (isset($this->ez['columns']) && $this->ez['columns']['on']==1){
+ $columnStart = $this->ez['columns']['colNum'];
+ }
+ $this->transaction('start');
+ $row_orig = $row;
+ $y_orig = $y;
+ $y0_orig = $y0;
+ $y1_orig = $y1;
+ }
+ $ok=0;
+ $secondTurn=0;
+ while(!$abortTable && $ok == 0){
+
+ $mx=0;
+ $newRow=1;
+ while(!$abortTable && ($newPage || $newRow)){
+
+ $y-=$height;
+ if ($newPage || $y<$this->ez['bottomMargin'] || (isset($options['minRowSpace']) && $y<($this->ez['bottomMargin']+$options['minRowSpace'])) ){
+ // check that enough rows are with the heading
+ if ($options['protectRows']>0 && $movedOnce==0 && $cnt<=$options['protectRows']){
+ // then we need to move the whole table onto the next page
+ $movedOnce = 1;
+ $abortTable = 1;
+ }
+
+ $y2=$y-$mx+2*$height+$decender-$newRow*$height;
+ if ($options['showLines']){
+ if (!$options['showHeadings']){
+ $y0=$y1;
+ }
+ $this->ezPrvtTableDrawLines($pos,$options['gap'],$x0,$x1,$y0,$y1,$y2,$options['lineCol'],$options['innerLineThickness'],$options['outerLineThickness'],$options['showLines']);
+ }
+ if ($options['shaded']){
+ $this->closeObject();
+ $this->restoreState();
+ }
+ $this->ezNewPage();
+ // and the margins may have changed, this is due to the possibility of the columns being turned on
+ // as the columns are managed by manipulating the margins
+
+ $dm = $this->ez['leftMargin']-$baseLeftMargin;
+ foreach($basePos as $k=>$v){
+ $pos[$k]=$v+$dm;
+ }
+// $x0=$x0+$dm;
+// $x1=$x1+$dm;
+ $x0=$baseX0+$dm;
+ $x1=$baseX1+$dm;
+
+ if ($options['shaded']){
+ $this->saveState();
+ $textObjectId = $this->openObject();
+ $this->closeObject();
+ $this->addObject($textObjectId);
+ $this->reopenObject($textObjectId);
+ }
+ $this->setColor($options['textCol'][0],$options['textCol'][1],$options['textCol'][2],1);
+ $y = $this->ez['pageHeight']-$this->ez['topMargin'];
+ $y0=$y+$decender;
+ $mx=0;
+ if ($options['showHeadings']){
+ $this->ezPrvtTableColumnHeadings($cols,$pos,$maxWidth,$height,$decender,$options['rowGap'],$options['fontSize'],$y,$options);
+ $y1=$y;
+ } else {
+ $y1=$y0;
+ }
+ $firstLine=1;
+ $y -= $height;
+ }
+ $newRow=0;
+ // write the actual data
+ // if these cells need to be split over a page, then $newPage will be set, and the remaining
+ // text will be placed in $leftOvers
+ $newPage=0;
+ $leftOvers=array();
+
+ foreach($cols as $colName=>$colTitle){
+ $this->ezSetY($y+$height);
+ $colNewPage=0;
+ if (isset($row[$colName])){
+ if (isset($options['cols'][$colName]) && isset($options['cols'][$colName]['link']) && strlen($options['cols'][$colName]['link'])){
+
+ $lines = explode("\n",$row[$colName]);
+ if (isset($row[$options['cols'][$colName]['link']]) && strlen($row[$options['cols'][$colName]['link']])){
+ foreach($lines as $k=>$v){
+ $lines[$k]='<c:alink:'.$row[$options['cols'][$colName]['link']].'>'.$v.'</c:alink>';
+ }
+ }
+ } else {
+ $lines = explode("\n",$row[$colName]);
+ }
+ } else {
+ $lines = array();
+ }
+ $this->y -= $options['rowGap'];
+ foreach ($lines as $line){
+ $line = $this->ezProcessText($line);
+ $start=1;
+
+ while (strlen($line) || $start){
+ $start=0;
+ if (!$colNewPage){
+ $this->y=$this->y-$height;
+ }
+ if ($this->y < $this->ez['bottomMargin']){
+ // $this->ezNewPage();
+ $newPage=1; // whether a new page is required for any of the columns
+ $colNewPage=1; // whether a new page is required for this column
+ }
+ if ($colNewPage){
+ if (isset($leftOvers[$colName])){
+ $leftOvers[$colName].="\n".$line;
+ } else {
+ $leftOvers[$colName] = $line;
+ }
+ $line='';
+ } else {
+ if (isset($options['cols'][$colName]) && isset($options['cols'][$colName]['justification']) ){
+ $just = $options['cols'][$colName]['justification'];
+ } else {
+ $just='left';
+ }
+
+ $line=$this->addTextWrap($pos[$colName],$this->y,$maxWidth[$colName],$options['fontSize'],$line,$just);
+ }
+ }
+ }
+
+ $dy=$y+$height-$this->y+$options['rowGap'];
+ if ($dy-$height*$newPage>$mx){
+ $mx=$dy-$height*$newPage;
+ }
+ }
+ // set $row to $leftOvers so that they will be processed onto the new page
+ $row = $leftOvers;
+ // now add the shading underneath
+ if ($options['shaded'] && $cnt%2==0){
+ $this->closeObject();
+ $this->setColor($options['shadeCol'][0],$options['shadeCol'][1],$options['shadeCol'][2],1);
+ $this->filledRectangle($x0-$options['gap']/2,$y+$decender+$height-$mx,$x1-$x0,$mx);
+ $this->reopenObject($textObjectId);
+ }
+
+ if ($options['shaded']==2 && $cnt%2==1){
+ $this->closeObject();
+ $this->setColor($options['shadeCol2'][0],$options['shadeCol2'][1],$options['shadeCol2'][2],1);
+ $this->filledRectangle($x0-$options['gap']/2,$y+$decender+$height-$mx,$x1-$x0,$mx);
+ $this->reopenObject($textObjectId);
+ }
+
+ if ($options['showLines']>1){
+ // then draw a line on the top of each block
+// $this->closeObject();
+ $this->saveState();
+ $this->setStrokeColor($options['lineCol'][0],$options['lineCol'][1],$options['lineCol'][2],1);
+// $this->line($x0-$options['gap']/2,$y+$decender+$height-$mx,$x1-$x0,$mx);
+ if ($firstLine){
+ $this->setLineStyle($options['outerLineThickness']);
+ $firstLine=0;
+ } else {
+ $this->setLineStyle($options['innerLineThickness']);
+ }
+ $this->line($x0-$options['gap']/2,$y+$decender+$height,$x1-$options['gap']/2,$y+$decender+$height);
+ $this->restoreState();
+// $this->reopenObject($textObjectId);
+ }
+ } // end of while
+ $y=$y-$mx+$height;
+
+ // checking row split over pages
+ if ($options['splitRows']==0){
+ if ( ( ($this->ezPageCount != $pageStart) || (isset($this->ez['columns']) && $this->ez['columns']['on']==1 && $columnStart != $this->ez['columns']['colNum'] )) && $secondTurn==0){
+ // then we need to go back and try that again !
+ $newPage=1;
+ $secondTurn=1;
+ $this->transaction('rewind');
+ $row = $row_orig;
+ $y = $y_orig;
+ $y0 = $y0_orig;
+ $y1 = $y1_orig;
+ $ok=0;
+
+ $dm = $this->ez['leftMargin']-$baseLeftMargin;
+ foreach($basePos as $k=>$v){
+ $pos[$k]=$v+$dm;
+ }
+ $x0=$baseX0+$dm;
+ $x1=$baseX1+$dm;
+
+ } else {
+ $this->transaction('commit');
+ $ok=1;
+ }
+ } else {
+ $ok=1; // don't go round the loop if splitting rows is allowed
+ }
+
+ } // end of while to check for row splitting
+ if ($abortTable){
+ if ($ok==0){
+ $this->transaction('abort');
+ }
+ // only the outer transaction should be operational
+ $this->transaction('rewind');
+ $this->ezNewPage();
+ break;
+ }
+
+ } // end of foreach ($data as $row)
+
+ } // end of while ($abortTable)
+
+ // table has been put on the page, the rows guarded as required, commit.
+ $this->transaction('commit');
+
+ $y2=$y+$decender;
+ if ($options['showLines']){
+ if (!$options['showHeadings']){
+ $y0=$y1;
+ }
+ $this->ezPrvtTableDrawLines($pos,$options['gap'],$x0,$x1,$y0,$y1,$y2,$options['lineCol'],$options['innerLineThickness'],$options['outerLineThickness'],$options['showLines']);
+ }
+
+ // close the object for drawing the text on top
+ if ($options['shaded']){
+ $this->closeObject();
+ $this->restoreState();
+ }
+
+ $this->y=$y;
+ return $y;
+}
+
+// ------------------------------------------------------------------------------
+function ezProcessText($text){
+ // this function will intially be used to implement underlining support, but could be used for a range of other
+ // purposes
+ $search = array('<u>','<U>','</u>','</U>');
+ $replace = array('<c:uline>','<c:uline>','</c:uline>','</c:uline>');
+ return str_replace($search,$replace,$text);
+}
+
+// ------------------------------------------------------------------------------
+
+function ezText($text,$size=0,$options=array(),$test=0){
+ // this will add a string of text to the document, starting at the current drawing
+ // position.
+ // it will wrap to keep within the margins, including optional offsets from the left
+ // and the right, if $size is not specified, then it will be the last one used, or
+ // the default value (12 I think).
+ // the text will go to the start of the next line when a return code "\n" is found.
+ // possible options are:
+ // 'left'=> number, gap to leave from the left margin
+ // 'right'=> number, gap to leave from the right margin
+ // 'aleft'=> number, absolute left position (overrides 'left')
+ // 'aright'=> number, absolute right position (overrides 'right')
+ // 'justification' => 'left','right','center','centre','full'
+
+ // only set one of the next two items (leading overrides spacing)
+ // 'leading' => number, defines the total height taken by the line, independent of the font height.
+ // 'spacing' => a real number, though usually set to one of 1, 1.5, 2 (line spacing as used in word processing)
+
+ // if $test is set then this should just check if the text is going to flow onto a new page or not, returning true or false
+
+ // apply the filtering which will make the underlining function.
+ $text = $this->ezProcessText($text);
+
+ $newPage=false;
+ $store_y = $this->y;
+
+ if (is_array($options) && isset($options['aleft'])){
+ $left=$options['aleft'];
+ } else {
+ $left = $this->ez['leftMargin'] + ((is_array($options) && isset($options['left']))?$options['left']:0);
+ }
+ if (is_array($options) && isset($options['aright'])){
+ $right=$options['aright'];
+ } else {
+ $right = $this->ez['pageWidth'] - $this->ez['rightMargin'] - ((is_array($options) && isset($options['right']))?$options['right']:0);
+ }
+ if ($size<=0){
+ $size = $this->ez['fontSize'];
+ } else {
+ $this->ez['fontSize']=$size;
+ }
+
+ if (is_array($options) && isset($options['justification'])){
+ $just = $options['justification'];
+ } else {
+ $just = 'left';
+ }
+
+ // modifications to give leading and spacing based on those given by Craig Heydenburg 1/1/02
+ if (is_array($options) && isset($options['leading'])) { ## use leading instead of spacing
+ $height = $options['leading'];
+ } else if (is_array($options) && isset($options['spacing'])) {
+ $height = $this->getFontHeight($size) * $options['spacing'];
+ } else {
+ $height = $this->getFontHeight($size);
+ }
+
+
+ $lines = explode("\n",$text);
+ foreach ($lines as $line){
+ $start=1;
+ while (strlen($line) || $start){
+ $start=0;
+ $this->y=$this->y-$height;
+ if ($this->y < $this->ez['bottomMargin']){
+ if ($test){
+ $newPage=true;
+ } else {
+ $this->ezNewPage();
+ // and then re-calc the left and right, in case they have changed due to columns
+ }
+ }
+ if (is_array($options) && isset($options['aleft'])){
+ $left=$options['aleft'];
+ } else {
+ $left = $this->ez['leftMargin'] + ((is_array($options) && isset($options['left']))?$options['left']:0);
+ }
+ if (is_array($options) && isset($options['aright'])){
+ $right=$options['aright'];
+ } else {
+ $right = $this->ez['pageWidth'] - $this->ez['rightMargin'] - ((is_array($options) && isset($options['right']))?$options['right']:0);
+ }
+ $line=$this->addTextWrap($left,$this->y,$right-$left,$size,$line,$just,0,$test);
+ }
+ }
+
+ if ($test){
+ $this->y=$store_y;
+ return $newPage;
+ } else {
+ return $this->y;
+ }
+}
+
+// ------------------------------------------------------------------------------
+
+function ezImage($image,$pad = 5,$width = 0,$resize = 'full',$just = 'center',$border = ''){
+ //beta ezimage function
+ if (stristr($image,'://'))//copy to temp file
+ {
+ $fp = @fopen($image,"rb");
+ while(!feof($fp))
+ {
+ $cont.= fread($fp,1024);
+ }
+ fclose($fp);
+ $image = tempnam ("/tmp", "php-pdf");
+ $fp2 = @fopen($image,"w");
+ fwrite($fp2,$cont);
+ fclose($fp2);
+ $temp = true;
+ }
+
+ if (!(file_exists($image))) return false; //return immediately if image file does not exist
+ $imageInfo = getimagesize($image);
+ switch ($imageInfo[2]){
+ case 2:
+ $type = "jpeg";
+ break;
+ case 3:
+ $type = "png";
+ break;
+ default:
+ return false; //return if file is not jpg or png
+ }
+ if ($width == 0) $width = $imageInfo[0]; //set width
+ $ratio = $imageInfo[0]/$imageInfo[1];
+
+ //get maximum width of image
+ if (isset($this->ez['columns']) && $this->ez['columns']['on'] == 1)
+ {
+ $bigwidth = $this->ez['columns']['width'] - ($pad * 2);
+ }
+ else
+ {
+ $bigwidth = $this->ez['pageWidth'] - ($pad * 2);
+ }
+ //fix width if larger than maximum or if $resize=full
+ if ($resize == 'full' || $resize == 'width' || $width > $bigwidth)
+ {
+ $width = $bigwidth;
+
+ }
+
+ $height = ($width/$ratio); //set height
+
+ //fix size if runs off page
+ if ($height > ($this->y - $this->ez['bottomMargin'] - ($pad * 2)))
+ {
+ if ($resize != 'full')
+ {
+ $this->ezNewPage();
+ }
+ else
+ {
+ $height = ($this->y - $this->ez['bottomMargin'] - ($pad * 2)); //shrink height
+ $width = ($height*$ratio); //fix width
+ }
+ }
+
+ //fix x-offset if image smaller than bigwidth
+ if ($width < $bigwidth)
+ {
+ //center if justification=center
+ if ($just == 'center')
+ {
+ $offset = ($bigwidth - $width) / 2;
+ }
+ //move to right if justification=right
+ if ($just == 'right')
+ {
+ $offset = ($bigwidth - $width);
+ }
+ //leave at left if justification=left
+ if ($just == 'left')
+ {
+ $offset = 0;
+ }
+ }
+
+
+ //call appropriate function
+ if ($type == "jpeg"){
+ $this->addJpegFromFile($image,$this->ez['leftMargin'] + $pad + $offset, $this->y + $this->getFontHeight($this->ez['fontSize']) - $pad - $height,$width);
+ }
+
+ if ($type == "png"){
+ $this->addPngFromFile($image,$this->ez['leftMargin'] + $pad + $offset, $this->y + $this->getFontHeight($this->ez['fontSize']) - $pad - $height,$width);
+ }
+ //draw border
+ if ($border != '')
+ {
+ if (!(isset($border['color'])))
+ {
+ $border['color']['red'] = .5;
+ $border['color']['blue'] = .5;
+ $border['color']['green'] = .5;
+ }
+ if (!(isset($border['width']))) $border['width'] = 1;
+ if (!(isset($border['cap']))) $border['cap'] = 'round';
+ if (!(isset($border['join']))) $border['join'] = 'round';
+
+
+ $this->setStrokeColor($border['color']['red'],$border['color']['green'],$border['color']['blue']);
+ $this->setLineStyle($border['width'],$border['cap'],$border['join']);
+ $this->rectangle($this->ez['leftMargin'] + $pad + $offset, $this->y + $this->getFontHeight($this->ez['fontSize']) - $pad - $height,$width,$height);
+
+ }
+ // move y below image
+ $this->y = $this->y - $pad - $height;
+ //remove tempfile for remote images
+ if ($temp == true) unlink($image);
+
+}
+// ------------------------------------------------------------------------------
+
+// note that templating code is still considered developmental - have not really figured
+// out a good way of doing this yet.
+function loadTemplate($templateFile){
+ // this function will load the requested template ($file includes full or relative pathname)
+ // the code for the template will be modified to make it name safe, and then stored in
+ // an array for later use
+ // The id of the template will be returned for the user to operate on it later
+ if (!file_exists($templateFile)){
+ return -1;
+ }
+
+ $code = implode('',file($templateFile));
+ if (!strlen($code)){
+ return;
+ }
+
+ $code = trim($code);
+ if (substr($code,0,5)=='<?php'){
+ $code = substr($code,5);
+ }
+ if (substr($code,-2)=='?>'){
+ $code = substr($code,0,strlen($code)-2);
+ }
+ if (isset($this->ez['numTemplates'])){
+ $newNum = $this->ez['numTemplates'];
+ $this->ez['numTemplates']++;
+ } else {
+ $newNum=0;
+ $this->ez['numTemplates']=1;
+ $this->ez['templates']=array();
+ }
+
+ $this->ez['templates'][$newNum]['code']=$code;
+
+ return $newNum;
+}
+
+// ------------------------------------------------------------------------------
+
+function execTemplate($id,$data=array(),$options=array()){
+ // execute the given template on the current document.
+ if (!isset($this->ez['templates'][$id])){
+ return;
+ }
+ eval($this->ez['templates'][$id]['code']);
+}
+
+// ------------------------------------------------------------------------------
+function ilink($info){
+ $this->alink($info,1);
+}
+
+function alink($info,$internal=0){
+ // a callback function to support the formation of clickable links within the document
+ $lineFactor=0.05; // the thickness of the line as a proportion of the height. also the drop of the line.
+ switch($info['status']){
+ case 'start':
+ case 'sol':
+ // the beginning of the link
+ // this should contain the URl for the link as the 'p' entry, and will also contain the value of 'nCallback'
+ if (!isset($this->ez['links'])){
+ $this->ez['links']=array();
+ }
+ $i = $info['nCallback'];
+ $this->ez['links'][$i] = array('x'=>$info['x'],'y'=>$info['y'],'angle'=>$info['angle'],'decender'=>$info['decender'],'height'=>$info['height'],'url'=>$info['p']);
+ if ($internal==0){
+ $this->saveState();
+ $this->setColor(0,0,1);
+ $this->setStrokeColor(0,0,1);
+ $thick = $info['height']*$lineFactor;
+ $this->setLineStyle($thick);
+ }
+ break;
+ case 'end':
+ case 'eol':
+ // the end of the link
+ // assume that it is the most recent opening which has closed
+ $i = $info['nCallback'];
+ $start = $this->ez['links'][$i];
+ // add underlining
+ if ($internal){
+ $this->addInternalLink($start['url'],$start['x'],$start['y']+$start['decender'],$info['x'],$start['y']+$start['decender']+$start['height']);
+ } else {
+ $a = deg2rad((float)$start['angle']-90.0);
+ $drop = $start['height']*$lineFactor*1.5;
+ $dropx = cos($a)*$drop;
+ $dropy = -sin($a)*$drop;
+ $this->line($start['x']-$dropx,$start['y']-$dropy,$info['x']-$dropx,$info['y']-$dropy);
+ $this->addLink($start['url'],$start['x'],$start['y']+$start['decender'],$info['x'],$start['y']+$start['decender']+$start['height']);
+ $this->restoreState();
+ }
+ break;
+ }
+}
+
+// ------------------------------------------------------------------------------
+
+function uline($info){
+ // a callback function to support underlining
+ $lineFactor=0.05; // the thickness of the line as a proportion of the height. also the drop of the line.
+ switch($info['status']){
+ case 'start':
+ case 'sol':
+
+ // the beginning of the underline zone
+ if (!isset($this->ez['links'])){
+ $this->ez['links']=array();
+ }
+ $i = $info['nCallback'];
+ $this->ez['links'][$i] = array('x'=>$info['x'],'y'=>$info['y'],'angle'=>$info['angle'],'decender'=>$info['decender'],'height'=>$info['height']);
+ $this->saveState();
+ $thick = $info['height']*$lineFactor;
+ $this->setLineStyle($thick);
+ break;
+ case 'end':
+ case 'eol':
+ // the end of the link
+ // assume that it is the most recent opening which has closed
+ $i = $info['nCallback'];
+ $start = $this->ez['links'][$i];
+ // add underlining
+ $a = deg2rad((float)$start['angle']-90.0);
+ $drop = $start['height']*$lineFactor*1.5;
+ $dropx = cos($a)*$drop;
+ $dropy = -sin($a)*$drop;
+ $this->line($start['x']-$dropx,$start['y']-$dropy,$info['x']-$dropx,$info['y']-$dropy);
+ $this->restoreState();
+ break;
+ }
+}
+
+// ------------------------------------------------------------------------------
+
+}
+?>
\ No newline at end of file
--- /dev/null
+<?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
+*/
+var $numObj=0;
+/**
+* this array contains all of the pdf objects, ready for final assembly
+*/
+var $objects = array();
+/**
+* the objectId (number within the objects array) of the document catalog
+*/
+var $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
+*/
+var $fonts=array();
+/**
+* a record of the current font
+*/
+var $currentFont='';
+/**
+* the current base font
+*/
+var $currentBaseFont='';
+/**
+* the number of the current font within the font array
+*/
+var $currentFontNum=0;
+/**
+*
+*/
+var $currentNode;
+/**
+* object number of the current page
+*/
+var $currentPage;
+/**
+* object number of the currently active contents block
+*/
+var $currentContents;
+/**
+* number of fonts within the system
+*/
+var $numFonts=0;
+/**
+* current colour for fill operations, defaults to inactive value, all three components should be between 0 and 1 inclusive when active
+*/
+var $currentColour=array('r'=>-1,'g'=>-1,'b'=>-1);
+/**
+* current colour for stroke operations (lines etc.)
+*/
+var $currentStrokeColour=array('r'=>-1,'g'=>-1,'b'=>-1);
+/**
+* current style that lines are drawn in
+*/
+var $currentLineStyle='';
+/**
+* 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
+*/
+var $stateStack = array();
+/**
+* number of elements within the state stack
+*/
+var $nStateStack = 0;
+/**
+* number of page objects within the document
+*/
+var $numPages=0;
+/**
+* object Id storage stack
+*/
+var $stack=array();
+/**
+* number of elements within the object Id storage stack
+*/
+var $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
+*/
+var $looseObjects=array();
+/**
+* array contains infomation about how the loose objects are to be added to the document
+*/
+var $addLooseObjects=array();
+/**
+* the objectId of the information object for the document
+* this contains authorship, title etc.
+*/
+var $infoObject=0;
+/**
+* number of images being tracked within the document
+*/
+var $numImages=0;
+/**
+* an array containing options about the document
+* it defaults to turning on the compression of the objects
+*/
+var $options=array('compression'=>1);
+/**
+* the objectId of the first page of the document
+*/
+var $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.
+*/
+var $wordSpaceAdjust=0;
+/**
+* the object Id of the procset object
+*/
+var $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.
+*/
+var $fontFamilies = array();
+/**
+* track if the current font is bolded or italicised
+*/
+var $currentTextState = '';
+/**
+* messages are stored here during processing, these can be selected afterwards to give some useful debug information
+*/
+var $messages='';
+/**
+* the ancryption array for the document encryption is stored here
+*/
+var $arc4='';
+/**
+* the object Id of the encryption information
+*/
+var $arc4_objnum=0;
+/**
+* the file identifier, used to uniquely identify a pdf document
+*/
+var $fileIdentifier='';
+/**
+* a flag to say if a document is to be encrypted or not
+*/
+var $encrypted=0;
+/**
+* the ancryption key for the encryption of all the document content (structure is not encrypted)
+*/
+var $encryptionKey='';
+/**
+* array which forms a stack to keep track of nested callback functions
+*/
+var $callback = array();
+/**
+* the number of callback functions in the callback array
+*/
+var $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
+*/
+var $destinations = array();
+/**
+* store the stack for the transaction commands, each item in here is a record of the values of all the
+* variables 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.
+*/
+var $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 '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'])){
+ $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.=" >>";
+ }
+ $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";
+ 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);
+ }
+ 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;
+ }
+ }
+ } else {
+ $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;
+ }
+}
+
+/**
+* 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.=substr('0000000000',0,10-strlen($p)).$p." 00000 n \n";
+ }
+ $content.="\ntrailer\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($dir.'php_'.$name.'.afm');
+ $this->fonts[$font]=unserialize($tmp[0]);
+ 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;
+ $fp = fopen($dir.'php_'.$name.'.afm','w');
+ fwrite($fp,serialize($data));
+ fclose($fp);
+ } 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++;
+ $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.
+ $fp = fopen($fbfile,'rb');
+ $tmp = get_magic_quotes_runtime();
+ set_magic_quotes_runtime(0);
+ $data = fread($fp,filesize($fbfile));
+ set_magic_quotes_runtime($tmp);
+ fclose($fp);
+
+ // 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 line means that if a new font is selected, then the current text state will be
+ // applied to it as well.
+ $this->setCurrentFont();
+ }
+ return $this->currentFontNum;
+}
+
+/**
+* sets up the current font, based on the font families, and the current text state
+* note that this system is quite flexible, a <b><i> font can be completely different to a
+* <i><b> font, and even <b><b> 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);
+ }
+}
+
+/**
+* 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){
+ return;
+ }
+ if ($r2==0){
+ $r2=$r1;
+ }
+ if ($nSeg<2){
+ $nSeg=2;
+ }
+
+ $astart = deg2rad((float)$astart);
+ $afinish = deg2rad((float)$afinish);
+ $totalAngle =$afinish-$astart;
+
+ $dt = $totalAngle/$nSeg;
+ $dtm = $dt/3;
+
+ if ($angle != 0){
+ $a = -1*deg2rad((float)$angle);
+ $tmp = "\n q ";
+ $tmp .= sprintf('%.3f',cos($a)).' '.sprintf('%.3f',(-1.0*sin($a))).' '.sprintf('%.3f',sin($a)).' '.sprintf('%.3f',cos($a)).' ';
+ $tmp .= sprintf('%.3f',$x0).' '.sprintf('%.3f',$y0).' cm';
+ $this->objects[$this->currentContents]['c'].= $tmp;
+ $x0=0;
+ $y0=0;
+ }
+
+ $t1 = $astart;
+ $a0 = $x0+$r1*cos($t1);
+ $b0 = $y0+$r2*sin($t1);
+ $c0 = -$r1*sin($t1);
+ $d0 = $r2*cos($t1);
+
+ $this->objects[$this->currentContents]['c'].="\n".sprintf('%.3f',$a0).' '.sprintf('%.3f',$b0).' m ';
+ for ($i=1;$i<=$nSeg;$i++){
+ // draw this bit of the total curve
+ $t1 = $i*$dt+$astart;
+ $a1 = $x0+$r1*cos($t1);
+ $b1 = $y0+$r2*sin($t1);
+ $c1 = -$r1*sin($t1);
+ $d1 = $r2*cos($t1);
+ $this->objects[$this->currentContents]['c'].="\n".sprintf('%.3f',($a0+$c0*$dtm)).' '.sprintf('%.3f',($b0+$d0*$dtm));
+ $this->objects[$this->currentContents]['c'].= ' '.sprintf('%.3f',($a1-$c1*$dtm)).' '.sprintf('%.3f',($b1-$d1*$dtm)).' '.sprintf('%.3f',$a1).' '.sprintf('%.3f',$b1).' c';
+ $a0=$a1;
+ $b0=$b1;
+ $c0=$c1;
+ $d0=$d1;
+ }
+ if ($fill){
+ $this->objects[$this->currentContents]['c'].=' f';
+ } else {
+ if ($close){
+ $this->objects[$this->currentContents]['c'].=' s'; // small 's' signifies closing the path as well
+ } else {
+ $this->objects[$this->currentContents]['c'].=' S';
+ }
+ }
+ if ($angle !=0){
+ $this->objects[$this->currentContents]['c'].=' Q';
+ }
+}
+
+/**
+* this sets the line drawing style.
+* width, is the thickness of the line in user units
+* cap is the type of cap to put on the line, values can be 'butt','round','square'
+* where the diffference between 'square' and 'butt' is that 'square' projects a flat end past the
+* end of the line.
+* join can be 'miter', 'round', 'bevel'
+* dash is an array which sets the dash pattern, is a series of length values, which are the lengths of the
+* on and off dashes.
+* (2) represents 2 on, 2 off, 2 on , 2 off ...
+* (2,1) is 2 on, 1 off, 2 on, 1 off.. etc
+* phase is a modifier on the dash pattern which is used to shift the point at which the pattern starts.
+*/
+function setLineStyle($width=1,$cap='',$join='',$dash='',$phase=0){
+
+ // this is quite inefficient in that it sets all the parameters whenever 1 is changed, but will fix another day
+ $string = '';
+ if ($width>0){
+ $string.= $width.' w';
+ }
+ $ca = array('butt'=>0,'round'=>1,'square'=>2);
+ if (isset($ca[$cap])){
+ $string.= ' '.$ca[$cap].' J';
+ }
+ $ja = array('miter'=>0,'round'=>1,'bevel'=>2);
+ if (isset($ja[$join])){
+ $string.= ' '.$ja[$join].' j';
+ }
+ if (is_array($dash)){
+ $string.= ' [';
+ foreach ($dash as $len){
+ $string.=' '.$len;
+ }
+ $string.= ' ] '.$phase.' d';
+ }
+ $this->currentLineStyle = $string;
+ $this->objects[$this->currentContents]['c'].="\n".$string;
+}
+
+/**
+* draw a polygon, the syntax for this is similar to the GD polygon command
+*/
+function polygon($p,$np,$f=0){
+ $this->objects[$this->currentContents]['c'].="\n";
+ $this->objects[$this->currentContents]['c'].=sprintf('%.3f',$p[0]).' '.sprintf('%.3f',$p[1]).' m ';
+ for ($i=2;$i<$np*2;$i=$i+2){
+ $this->objects[$this->currentContents]['c'].= sprintf('%.3f',$p[$i]).' '.sprintf('%.3f',$p[$i+1]).' l ';
+ }
+ if ($f==1){
+ $this->objects[$this->currentContents]['c'].=' f';
+ } else {
+ $this->objects[$this->currentContents]['c'].=' S';
+ }
+}
+
+/**
+* a filled rectangle, note that it is the width and height of the rectangle which are the secondary paramaters, not
+* the coordinates of the upper-right corner
+*/
+function filledRectangle($x1,$y1,$width,$height){
+ $this->objects[$this->currentContents]['c'].="\n".sprintf('%.3f',$x1).' '.sprintf('%.3f',$y1).' '.sprintf('%.3f',$width).' '.sprintf('%.3f',$height).' re f';
+}
+
+/**
+* draw a rectangle, note that it is the width and height of the rectangle which are the secondary paramaters, not
+* the coordinates of the upper-right corner
+*/
+function rectangle($x1,$y1,$width,$height){
+ $this->objects[$this->currentContents]['c'].="\n".sprintf('%.3f',$x1).' '.sprintf('%.3f',$y1).' '.sprintf('%.3f',$width).' '.sprintf('%.3f',$height).' re S';
+}
+
+/**
+* add a new page to the document
+* this also makes the new page the current active object
+*/
+function newPage($insert=0,$id=0,$pos='after'){
+
+ // if there is a state saved, then go up the stack closing them
+ // then on the new page, re-open them with the right setings
+
+ if ($this->nStateStack){
+ for ($i=$this->nStateStack;$i>=1;$i--){
+ $this->restoreState($i);
+ }
+ }
+
+ $this->numObj++;
+ if ($insert){
+ // the id from the ezPdf class is the od of the contents of the page, not the page object itself
+ // query that object to find the parent
+ $rid = $this->objects[$id]['onPage'];
+ $opt= array('rid'=>$rid,'pos'=>$pos);
+ $this->o_page($this->numObj,'new',$opt);
+ } else {
+ $this->o_page($this->numObj,'new');
+ }
+ // if there is a stack saved, then put that onto the page
+ if ($this->nStateStack){
+ for ($i=1;$i<=$this->nStateStack;$i++){
+ $this->saveState($i);
+ }
+ }
+ // and if there has been a stroke or fill colour set, then transfer them
+ if ($this->currentColour['r']>=0){
+ $this->setColor($this->currentColour['r'],$this->currentColour['g'],$this->currentColour['b'],1);
+ }
+ if ($this->currentStrokeColour['r']>=0){
+ $this->setStrokeColor($this->currentStrokeColour['r'],$this->currentStrokeColour['g'],$this->currentStrokeColour['b'],1);
+ }
+
+ // if there is a line style set, then put this in too
+ if (strlen($this->currentLineStyle)){
+ $this->objects[$this->currentContents]['c'].="\n".$this->currentLineStyle;
+ }
+
+ // the call to the o_page object set currentContents to the present page, so this can be returned as the page id
+ return $this->currentContents;
+}
+
+/**
+* output the pdf code, streaming it to the browser
+* the relevant headers are set so that hopefully the browser will recognise it
+*/
+function stream($options=''){
+ // setting the options allows the adjustment of the headers
+ // values at the moment are:
+ // 'Content-Disposition'=>'filename' - sets the filename, though not too sure how well this will
+ // work as in my trial the browser seems to use the filename of the php file with .pdf on the end
+ // 'Accept-Ranges'=>1 or 0 - if this is not set to 1, then this header is not included, off by default
+ // this header seems to have caused some problems despite tha fact that it is supposed to solve
+ // them, so I am leaving it off by default.
+ // 'compress'=> 1 or 0 - apply content stream compression, this is on (1) by default
+ if (!is_array($options)){
+ $options=array();
+ }
+ if ( isset($options['compress']) && $options['compress']==0){
+ $tmp = $this->output(1);
+ } else {
+ $tmp = $this->output();
+ }
+ header("Content-type: application/pdf");
+ header("Content-Length: ".strlen(ltrim($tmp)));
+ $fileName = (isset($options['Content-Disposition'])?$options['Content-Disposition']:'file.pdf');
+ header("Content-Disposition: inline; filename=".$fileName);
+ if (isset($options['Accept-Ranges']) && $options['Accept-Ranges']==1){
+ header("Accept-Ranges: ".strlen(ltrim($tmp)));
+ }
+ echo ltrim($tmp);
+}
+
+/**
+* return the height in units of the current font in the given size
+*/
+function getFontHeight($size){
+ if (!$this->numFonts){
+ $this->selectFont('./fonts/Helvetica');
+ }
+ // for the current font, and the given size, what is the height of the font in user units
+ $h = $this->fonts[$this->currentFont]['FontBBox'][3]-$this->fonts[$this->currentFont]['FontBBox'][1];
+ return $size*$h/1000;
+}
+
+/**
+* return the font decender, this will normally return a negative number
+* if you add this number to the baseline, you get the level of the bottom of the font
+* it is in the pdf user units
+*/
+function getFontDecender($size){
+ // note that this will most likely return a negative value
+ if (!$this->numFonts){
+ $this->selectFont('./fonts/Helvetica');
+ }
+ $h = $this->fonts[$this->currentFont]['FontBBox'][1];
+ return $size*$h/1000;
+}
+
+/**
+* filter the text, this is applied to all text just before being inserted into the pdf document
+* it escapes the various things that need to be escaped, and so on
+*
+* @access private
+*/
+function filterText($text){
+ $text = str_replace('\\','\\\\',$text);
+ $text = str_replace('(','\(',$text);
+ $text = str_replace(')','\)',$text);
+ $text = str_replace('<','<',$text);
+ $text = str_replace('>','>',$text);
+ $text = str_replace(''','\'',$text);
+ $text = str_replace('"','"',$text);
+ $text = str_replace('&','&',$text);
+
+ return $text;
+}
+
+/**
+* given a start position and information about how text is to be laid out, calculate where
+* on the page the text will end
+*
+* @access private
+*/
+function PRVTgetTextPosition($x,$y,$angle,$size,$wa,$text){
+ // given this information return an array containing x and y for the end position as elements 0 and 1
+ $w = $this->getTextWidth($size,$text);
+ // need to adjust for the number of spaces in this text
+ $words = explode(' ',$text);
+ $nspaces=count($words)-1;
+ $w += $wa*$nspaces;
+ $a = deg2rad((float)$angle);
+ return array(cos($a)*$w+$x,-sin($a)*$w+$y);
+}
+
+/**
+* wrapper function for PRVTcheckTextDirective1
+*
+* @access private
+*/
+function PRVTcheckTextDirective(&$text,$i,&$f){
+ $x=0;
+ $y=0;
+ return $this->PRVTcheckTextDirective1($text,$i,$f,0,$x,$y);
+}
+
+/**
+* checks if the text stream contains a control directive
+* if so then makes some changes and returns the number of characters involved in the directive
+* this has been re-worked to include everything neccesary to fins the current writing point, so that
+* the location can be sent to the callback function if required
+* if the directive does not require a font change, then $f should be set to 0
+*
+* @access private
+*/
+function PRVTcheckTextDirective1(&$text,$i,&$f,$final,&$x,&$y,$size=0,$angle=0,$wordSpaceAdjust=0){
+ $directive = 0;
+ $j=$i;
+ if ($text[$j]=='<'){
+ $j++;
+ switch($text[$j]){
+ case '/':
+ $j++;
+ if (strlen($text) <= $j){
+ return $directive;
+ }
+ switch($text[$j]){
+ case 'b':
+ case 'i':
+ $j++;
+ if ($text[$j]=='>'){
+ $p = strrpos($this->currentTextState,$text[$j-1]);
+ if ($p !== false){
+ // then there is one to remove
+ $this->currentTextState = substr($this->currentTextState,0,$p).substr($this->currentTextState,$p+1);
+ }
+ $directive=$j-$i+1;
+ }
+ break;
+ case 'c':
+ // this this might be a callback function
+ $j++;
+ $k = strpos($text,'>',$j);
+ if ($k!==false && $text[$j]==':'){
+ // then this will be treated as a callback directive
+ $directive = $k-$i+1;
+ $f=0;
+ // split the remainder on colons to get the function name and the paramater
+ $tmp = substr($text,$j+1,$k-$j-1);
+ $b1 = strpos($tmp,':');
+ if ($b1!==false){
+ $func = substr($tmp,0,$b1);
+ $parm = substr($tmp,$b1+1);
+ } else {
+ $func=$tmp;
+ $parm='';
+ }
+ if (!isset($func) || !strlen(trim($func))){
+ $directive=0;
+ } else {
+ // only call the function if this is the final call
+ if ($final){
+ // need to assess the text position, calculate the text width to this point
+ // can use getTextWidth to find the text width I think
+ $tmp = $this->PRVTgetTextPosition($x,$y,$angle,$size,$wordSpaceAdjust,substr($text,0,$i));
+ $info = array('x'=>$tmp[0],'y'=>$tmp[1],'angle'=>$angle,'status'=>'end','p'=>$parm,'nCallback'=>$this->nCallback);
+ $x=$tmp[0];
+ $y=$tmp[1];
+ $ret = $this->$func($info);
+ if (is_array($ret)){
+ // then the return from the callback function could set the position, to start with, later will do font colour, and font
+ foreach($ret as $rk=>$rv){
+ switch($rk){
+ case 'x':
+ case 'y':
+ $$rk=$rv;
+ break;
+ }
+ }
+ }
+ // also remove from to the stack
+ // for simplicity, just take from the end, fix this another day
+ $this->nCallback--;
+ if ($this->nCallback<0){
+ $this->nCallBack=0;
+ }
+ }
+ }
+ }
+ break;
+ }
+ break;
+ case 'b':
+ case 'i':
+ $j++;
+ if ($text[$j]=='>'){
+ $this->currentTextState.=$text[$j-1];
+ $directive=$j-$i+1;
+ }
+ break;
+ case 'C':
+ $noClose=1;
+ case 'c':
+ // this this might be a callback function
+ $j++;
+ $k = strpos($text,'>',$j);
+ if ($k!==false && $text[$j]==':'){
+ // then this will be treated as a callback directive
+ $directive = $k-$i+1;
+ $f=0;
+ // split the remainder on colons to get the function name and the paramater
+// $bits = explode(':',substr($text,$j+1,$k-$j-1));
+ $tmp = substr($text,$j+1,$k-$j-1);
+ $b1 = strpos($tmp,':');
+ if ($b1!==false){
+ $func = substr($tmp,0,$b1);
+ $parm = substr($tmp,$b1+1);
+ } else {
+ $func=$tmp;
+ $parm='';
+ }
+ if (!isset($func) || !strlen(trim($func))){
+ $directive=0;
+ } else {
+ // only call the function if this is the final call, ie, the one actually doing printing, not measurement
+ if ($final){
+ // need to assess the text position, calculate the text width to this point
+ // can use getTextWidth to find the text width I think
+ // also add the text height and decender
+ $tmp = $this->PRVTgetTextPosition($x,$y,$angle,$size,$wordSpaceAdjust,substr($text,0,$i));
+ $info = array('x'=>$tmp[0],'y'=>$tmp[1],'angle'=>$angle,'status'=>'start','p'=>$parm,'f'=>$func,'height'=>$this->getFontHeight($size),'decender'=>$this->getFontDecender($size));
+ $x=$tmp[0];
+ $y=$tmp[1];
+ if (!isset($noClose) || !$noClose){
+ // only add to the stack if this is a small 'c', therefore is a start-stop pair
+ $this->nCallback++;
+ $info['nCallback']=$this->nCallback;
+ $this->callback[$this->nCallback]=$info;
+ }
+ $ret = $this->$func($info);
+ if (is_array($ret)){
+ // then the return from the callback function could set the position, to start with, later will do font colour, and font
+ foreach($ret as $rk=>$rv){
+ switch($rk){
+ case 'x':
+ case 'y':
+ $$rk=$rv;
+ break;
+ }
+ }
+ }
+ }
+ }
+ }
+ break;
+ }
+ }
+ return $directive;
+}
+
+/**
+* add text to the document, at a specified location, size and angle on the page
+*/
+function addText($x,$y,$size,$text,$angle=0,$wordSpaceAdjust=0){
+ if (!$this->numFonts){$this->selectFont('./fonts/Helvetica');}
+
+ // if there are any open callbacks, then they should be called, to show the start of the line
+ if ($this->nCallback>0){
+ for ($i=$this->nCallback;$i>0;$i--){
+ // call each function
+ $info = array('x'=>$x,'y'=>$y,'angle'=>$angle,'status'=>'sol','p'=>$this->callback[$i]['p'],'nCallback'=>$this->callback[$i]['nCallback'],'height'=>$this->callback[$i]['height'],'decender'=>$this->callback[$i]['decender']);
+ $func = $this->callback[$i]['f'];
+ $this->$func($info);
+ }
+ }
+ if ($angle==0){
+ $this->objects[$this->currentContents]['c'].="\n".'BT '.sprintf('%.3f',$x).' '.sprintf('%.3f',$y).' Td';
+ } else {
+ $a = deg2rad((float)$angle);
+ $tmp = "\n".'BT ';
+ $tmp .= sprintf('%.3f',cos($a)).' '.sprintf('%.3f',(-1.0*sin($a))).' '.sprintf('%.3f',sin($a)).' '.sprintf('%.3f',cos($a)).' ';
+ $tmp .= sprintf('%.3f',$x).' '.sprintf('%.3f',$y).' Tm';
+ $this->objects[$this->currentContents]['c'] .= $tmp;
+ }
+ if ($wordSpaceAdjust!=0 || $wordSpaceAdjust != $this->wordSpaceAdjust){
+ $this->wordSpaceAdjust=$wordSpaceAdjust;
+ $this->objects[$this->currentContents]['c'].=' '.sprintf('%.3f',$wordSpaceAdjust).' Tw';
+ }
+ $len=strlen($text);
+ $start=0;
+ for ($i=0;$i<$len;$i++){
+ $f=1;
+ $directive = $this->PRVTcheckTextDirective($text,$i,$f);
+ if ($directive){
+ // then we should write what we need to
+ if ($i>$start){
+ $part = substr($text,$start,$i-$start);
+ $this->objects[$this->currentContents]['c'].=' /F'.$this->currentFontNum.' '.sprintf('%.1f',$size).' Tf ';
+ $this->objects[$this->currentContents]['c'].=' ('.$this->filterText($part).') Tj';
+ }
+ if ($f){
+ // then there was nothing drastic done here, restore the contents
+ $this->setCurrentFont();
+ } else {
+ $this->objects[$this->currentContents]['c'] .= ' ET';
+ $f=1;
+ $xp=$x;
+ $yp=$y;
+ $directive = $this->PRVTcheckTextDirective1($text,$i,$f,1,$xp,$yp,$size,$angle,$wordSpaceAdjust);
+
+ // restart the text object
+ if ($angle==0){
+ $this->objects[$this->currentContents]['c'].="\n".'BT '.sprintf('%.3f',$xp).' '.sprintf('%.3f',$yp).' Td';
+ } else {
+ $a = deg2rad((float)$angle);
+ $tmp = "\n".'BT ';
+ $tmp .= sprintf('%.3f',cos($a)).' '.sprintf('%.3f',(-1.0*sin($a))).' '.sprintf('%.3f',sin($a)).' '.sprintf('%.3f',cos($a)).' ';
+ $tmp .= sprintf('%.3f',$xp).' '.sprintf('%.3f',$yp).' Tm';
+ $this->objects[$this->currentContents]['c'] .= $tmp;
+ }
+ if ($wordSpaceAdjust!=0 || $wordSpaceAdjust != $this->wordSpaceAdjust){
+ $this->wordSpaceAdjust=$wordSpaceAdjust;
+ $this->objects[$this->currentContents]['c'].=' '.sprintf('%.3f',$wordSpaceAdjust).' Tw';
+ }
+ }
+ // and move the writing point to the next piece of text
+ $i=$i+$directive-1;
+ $start=$i+1;
+ }
+
+ }
+ if ($start<$len){
+ $part = substr($text,$start);
+ $this->objects[$this->currentContents]['c'].=' /F'.$this->currentFontNum.' '.sprintf('%.1f',$size).' Tf ';
+ $this->objects[$this->currentContents]['c'].=' ('.$this->filterText($part).') Tj';
+ }
+ $this->objects[$this->currentContents]['c'].=' ET';
+
+ // if there are any open callbacks, then they should be called, to show the end of the line
+ if ($this->nCallback>0){
+ for ($i=$this->nCallback;$i>0;$i--){
+ // call each function
+ $tmp = $this->PRVTgetTextPosition($x,$y,$angle,$size,$wordSpaceAdjust,$text);
+ $info = array('x'=>$tmp[0],'y'=>$tmp[1],'angle'=>$angle,'status'=>'eol','p'=>$this->callback[$i]['p'],'nCallback'=>$this->callback[$i]['nCallback'],'height'=>$this->callback[$i]['height'],'decender'=>$this->callback[$i]['decender']);
+ $func = $this->callback[$i]['f'];
+ $this->$func($info);
+ }
+ }
+
+}
+
+/**
+* calculate how wide a given text string will be on a page, at a given size.
+* this can be called externally, but is alse used by the other class functions
+*/
+function getTextWidth($size,$text){
+ // this function should not change any of the settings, though it will need to
+ // track any directives which change during calculation, so copy them at the start
+ // and put them back at the end.
+ $store_currentTextState = $this->currentTextState;
+
+ if (!$this->numFonts){
+ $this->selectFont('./fonts/Helvetica');
+ }
+
+ // converts a number or a float to a string so it can get the width
+ $text = "$text";
+
+ // hmm, this is where it all starts to get tricky - use the font information to
+ // calculate the width of each character, add them up and convert to user units
+ $w=0;
+ $len=strlen($text);
+ $cf = $this->currentFont;
+ for ($i=0;$i<$len;$i++){
+ $f=1;
+ $directive = $this->PRVTcheckTextDirective($text,$i,$f);
+ if ($directive){
+ if ($f){
+ $this->setCurrentFont();
+ $cf = $this->currentFont;
+ }
+ $i=$i+$directive-1;
+ } else {
+ $char=ord($text[$i]);
+ if (isset($this->fonts[$cf]['differences'][$char])){
+ // then this character is being replaced by another
+ $name = $this->fonts[$cf]['differences'][$char];
+ if (isset($this->fonts[$cf]['C'][$name]['WX'])){
+ $w+=$this->fonts[$cf]['C'][$name]['WX'];
+ }
+ } else if (isset($this->fonts[$cf]['C'][$char]['WX'])){
+ $w+=$this->fonts[$cf]['C'][$char]['WX'];
+ }
+ }
+ }
+
+ $this->currentTextState = $store_currentTextState;
+ $this->setCurrentFont();
+
+ return $w*$size/1000;
+}
+
+/**
+* do a part of the calculation for sorting out the justification of the text
+*
+* @access private
+*/
+function PRVTadjustWrapText($text,$actual,$width,&$x,&$adjust,$justification){
+ switch ($justification){
+ case 'left':
+ return;
+ break;
+ case 'right':
+ $x+=$width-$actual;
+ break;
+ case 'center':
+ case 'centre':
+ $x+=($width-$actual)/2;
+ break;
+ case 'full':
+ // count the number of words
+ $words = explode(' ',$text);
+ $nspaces=count($words)-1;
+ if ($nspaces>0){
+ $adjust = ($width-$actual)/$nspaces;
+ } else {
+ $adjust=0;
+ }
+ break;
+ }
+}
+
+/**
+* add text to the page, but ensure that it fits within a certain width
+* if it does not fit then put in as much as possible, splitting at word boundaries
+* and return the remainder.
+* justification and angle can also be specified for the text
+*/
+function addTextWrap($x,$y,$width,$size,$text,$justification='left',$angle=0,$test=0){
+ // this will display the text, and if it goes beyond the width $width, will backtrack to the
+ // previous space or hyphen, and return the remainder of the text.
+
+ // $justification can be set to 'left','right','center','centre','full'
+
+ // need to store the initial text state, as this will change during the width calculation
+ // but will need to be re-set before printing, so that the chars work out right
+ $store_currentTextState = $this->currentTextState;
+
+ if (!$this->numFonts){$this->selectFont('./fonts/Helvetica');}
+ if ($width<=0){
+ // error, pretend it printed ok, otherwise risking a loop
+ return '';
+ }
+ $w=0;
+ $break=0;
+ $breakWidth=0;
+ $len=strlen($text);
+ $cf = $this->currentFont;
+ $tw = $width/$size*1000;
+ for ($i=0;$i<$len;$i++){
+ $f=1;
+ $directive = $this->PRVTcheckTextDirective($text,$i,$f);
+ if ($directive){
+ if ($f){
+ $this->setCurrentFont();
+ $cf = $this->currentFont;
+ }
+ $i=$i+$directive-1;
+ } else {
+ $cOrd = ord($text[$i]);
+ if (isset($this->fonts[$cf]['differences'][$cOrd])){
+ // then this character is being replaced by another
+ $cOrd2 = $this->fonts[$cf]['differences'][$cOrd];
+ } else {
+ $cOrd2 = $cOrd;
+ }
+
+ if (isset($this->fonts[$cf]['C'][$cOrd2]['WX'])){
+ $w+=$this->fonts[$cf]['C'][$cOrd2]['WX'];
+ }
+ if ($w>$tw){
+ // then we need to truncate this line
+ if ($break>0){
+ // then we have somewhere that we can split :)
+ if ($text[$break]==' '){
+ $tmp = substr($text,0,$break);
+ } else {
+ $tmp = substr($text,0,$break+1);
+ }
+ $adjust=0;
+ $this->PRVTadjustWrapText($tmp,$breakWidth,$width,$x,$adjust,$justification);
+
+ // reset the text state
+ $this->currentTextState = $store_currentTextState;
+ $this->setCurrentFont();
+ if (!$test){
+ $this->addText($x,$y,$size,$tmp,$angle,$adjust);
+ }
+ return substr($text,$break+1);
+ } else {
+ // just split before the current character
+ $tmp = substr($text,0,$i);
+ $adjust=0;
+ $ctmp=ord($text[$i]);
+ if (isset($this->fonts[$cf]['differences'][$ctmp])){
+ $ctmp=$this->fonts[$cf]['differences'][$ctmp];
+ }
+ $tmpw=($w-$this->fonts[$cf]['C'][$ctmp]['WX'])*$size/1000;
+ $this->PRVTadjustWrapText($tmp,$tmpw,$width,$x,$adjust,$justification);
+ // reset the text state
+ $this->currentTextState = $store_currentTextState;
+ $this->setCurrentFont();
+ if (!$test){
+ $this->addText($x,$y,$size,$tmp,$angle,$adjust);
+ }
+ return substr($text,$i);
+ }
+ }
+ if ($text[$i]=='-'){
+ $break=$i;
+ $breakWidth = $w*$size/1000;
+ }
+ if ($text[$i]==' '){
+ $break=$i;
+ $ctmp=ord($text[$i]);
+ if (isset($this->fonts[$cf]['differences'][$ctmp])){
+ $ctmp=$this->fonts[$cf]['differences'][$ctmp];
+ }
+ $breakWidth = ($w-$this->fonts[$cf]['C'][$ctmp]['WX'])*$size/1000;
+ }
+ }
+ }
+ // then there was no need to break this line
+ if ($justification=='full'){
+ $justification='left';
+ }
+ $adjust=0;
+ $tmpw=$w*$size/1000;
+ $this->PRVTadjustWrapText($text,$tmpw,$width,$x,$adjust,$justification);
+ // reset the text state
+ $this->currentTextState = $store_currentTextState;
+ $this->setCurrentFont();
+ if (!$test){
+ $this->addText($x,$y,$size,$text,$angle,$adjust,$angle);
+ }
+ return '';
+}
+
+/**
+* this will be called at a new page to return the state to what it was on the
+* end of the previous page, before the stack was closed down
+* This is to get around not being able to have open 'q' across pages
+*
+*/
+function saveState($pageEnd=0){
+ if ($pageEnd){
+ // this will be called at a new page to return the state to what it was on the
+ // end of the previous page, before the stack was closed down
+ // This is to get around not being able to have open 'q' across pages
+ $opt = $this->stateStack[$pageEnd]; // ok to use this as stack starts numbering at 1
+ $this->setColor($opt['col']['r'],$opt['col']['g'],$opt['col']['b'],1);
+ $this->setStrokeColor($opt['str']['r'],$opt['str']['g'],$opt['str']['b'],1);
+ $this->objects[$this->currentContents]['c'].="\n".$opt['lin'];
+// $this->currentLineStyle = $opt['lin'];
+ } else {
+ $this->nStateStack++;
+ $this->stateStack[$this->nStateStack]=array(
+ 'col'=>$this->currentColour
+ ,'str'=>$this->currentStrokeColour
+ ,'lin'=>$this->currentLineStyle
+ );
+ }
+ $this->objects[$this->currentContents]['c'].="\nq";
+}
+
+/**
+* restore a previously saved state
+*/
+function restoreState($pageEnd=0){
+ if (!$pageEnd){
+ $n = $this->nStateStack;
+ $this->currentColour = $this->stateStack[$n]['col'];
+ $this->currentStrokeColour = $this->stateStack[$n]['str'];
+ $this->objects[$this->currentContents]['c'].="\n".$this->stateStack[$n]['lin'];
+ $this->currentLineStyle = $this->stateStack[$n]['lin'];
+ unset($this->stateStack[$n]);
+ $this->nStateStack--;
+ }
+ $this->objects[$this->currentContents]['c'].="\nQ";
+}
+
+/**
+* make a loose object, the output will go into this object, until it is closed, then will revert to
+* the current one.
+* this object will not appear until it is included within a page.
+* the function will return the object number
+*/
+function openObject(){
+ $this->nStack++;
+ $this->stack[$this->nStack]=array('c'=>$this->currentContents,'p'=>$this->currentPage);
+ // add a new object of the content type, to hold the data flow
+ $this->numObj++;
+ $this->o_contents($this->numObj,'new');
+ $this->currentContents=$this->numObj;
+ $this->looseObjects[$this->numObj]=1;
+
+ return $this->numObj;
+}
+
+/**
+* open an existing object for editing
+*/
+function reopenObject($id){
+ $this->nStack++;
+ $this->stack[$this->nStack]=array('c'=>$this->currentContents,'p'=>$this->currentPage);
+ $this->currentContents=$id;
+ // also if this object is the primary contents for a page, then set the current page to its parent
+ if (isset($this->objects[$id]['onPage'])){
+ $this->currentPage = $this->objects[$id]['onPage'];
+ }
+}
+
+/**
+* close an object
+*/
+function closeObject(){
+ // close the object, as long as there was one open in the first place, which will be indicated by
+ // an objectId on the stack.
+ if ($this->nStack>0){
+ $this->currentContents=$this->stack[$this->nStack]['c'];
+ $this->currentPage=$this->stack[$this->nStack]['p'];
+ $this->nStack--;
+ // easier to probably not worry about removing the old entries, they will be overwritten
+ // if there are new ones.
+ }
+}
+
+/**
+* stop an object from appearing on pages from this point on
+*/
+function stopObject($id){
+ // if an object has been appearing on pages up to now, then stop it, this page will
+ // be the last one that could contian it.
+ if (isset($this->addLooseObjects[$id])){
+ $this->addLooseObjects[$id]='';
+ }
+}
+
+/**
+* after an object has been created, it wil only show if it has been added, using this function.
+*/
+function addObject($id,$options='add'){
+ // add the specified object to the page
+ if (isset($this->looseObjects[$id]) && $this->currentContents!=$id){
+ // then it is a valid object, and it is not being added to itself
+ switch($options){
+ case 'all':
+ // then this object is to be added to this page (done in the next block) and
+ // all future new pages.
+ $this->addLooseObjects[$id]='all';
+ case 'add':
+ if (isset($this->objects[$this->currentContents]['onPage'])){
+ // then the destination contents is the primary for the page
+ // (though this object is actually added to that page)
+ $this->o_page($this->objects[$this->currentContents]['onPage'],'content',$id);
+ }
+ break;
+ case 'even':
+ $this->addLooseObjects[$id]='even';
+ $pageObjectId=$this->objects[$this->currentContents]['onPage'];
+ if ($this->objects[$pageObjectId]['info']['pageNum']%2==0){
+ $this->addObject($id); // hacky huh :)
+ }
+ break;
+ case 'odd':
+ $this->addLooseObjects[$id]='odd';
+ $pageObjectId=$this->objects[$this->currentContents]['onPage'];
+ if ($this->objects[$pageObjectId]['info']['pageNum']%2==1){
+ $this->addObject($id); // hacky huh :)
+ }
+ break;
+ case 'next':
+ $this->addLooseObjects[$id]='all';
+ break;
+ case 'nexteven':
+ $this->addLooseObjects[$id]='even';
+ break;
+ case 'nextodd':
+ $this->addLooseObjects[$id]='odd';
+ break;
+ }
+ }
+}
+
+/**
+* add content to the documents info object
+*/
+function addInfo($label,$value=0){
+ // this will only work if the label is one of the valid ones.
+ // modify this so that arrays can be passed as well.
+ // if $label is an array then assume that it is key=>value pairs
+ // else assume that they are both scalar, anything else will probably error
+ if (is_array($label)){
+ foreach ($label as $l=>$v){
+ $this->o_info($this->infoObject,$l,$v);
+ }
+ } else {
+ $this->o_info($this->infoObject,$label,$value);
+ }
+}
+
+/**
+* set the viewer preferences of the document, it is up to the browser to obey these.
+*/
+function setPreferences($label,$value=0){
+ // this will only work if the label is one of the valid ones.
+ if (is_array($label)){
+ foreach ($label as $l=>$v){
+ $this->o_catalog($this->catalogId,'viewerPreferences',array($l=>$v));
+ }
+ } else {
+ $this->o_catalog($this->catalogId,'viewerPreferences',array($label=>$value));
+ }
+}
+
+/**
+* extract an integer from a position in a byte stream
+*
+* @access private
+*/
+function PRVT_getBytes(&$data,$pos,$num){
+ // return the integer represented by $num bytes from $pos within $data
+ $ret=0;
+ for ($i=0;$i<$num;$i++){
+ $ret=$ret*256;
+ $ret+=ord($data[$pos+$i]);
+ }
+ return $ret;
+}
+
+/**
+* add a PNG image into the document, from a file
+* this should work with remote files
+*/
+function addPngFromFile($file,$x,$y,$w=0,$h=0){
+ // read in a png file, interpret it, then add to the system
+ $error=0;
+ $tmp = get_magic_quotes_runtime();
+ set_magic_quotes_runtime(0);
+ $fp = @fopen($file,'rb');
+ if ($fp){
+ $data='';
+ while(!feof($fp)){
+ $data .= fread($fp,1024);
+ }
+ fclose($fp);
+ } else {
+ $error = 1;
+ $errormsg = 'trouble opening file: '.$file;
+ }
+ set_magic_quotes_runtime($tmp);
+
+ if (!$error){
+ $header = chr(137).chr(80).chr(78).chr(71).chr(13).chr(10).chr(26).chr(10);
+ if (substr($data,0,8)!=$header){
+ $error=1;
+ $errormsg = 'this file does not have a valid header';
+ }
+ }
+
+ if (!$error){
+ // set pointer
+ $p = 8;
+ $len = strlen($data);
+ // cycle through the file, identifying chunks
+ $haveHeader=0;
+ $info=array();
+ $idata='';
+ $pdata='';
+ while ($p<$len){
+ $chunkLen = $this->PRVT_getBytes($data,$p,4);
+ $chunkType = substr($data,$p+4,4);
+// echo $chunkType.' - '.$chunkLen.'<br>';
+
+ switch($chunkType){
+ case 'IHDR':
+ // this is where all the file information comes from
+ $info['width']=$this->PRVT_getBytes($data,$p+8,4);
+ $info['height']=$this->PRVT_getBytes($data,$p+12,4);
+ $info['bitDepth']=ord($data[$p+16]);
+ $info['colorType']=ord($data[$p+17]);
+ $info['compressionMethod']=ord($data[$p+18]);
+ $info['filterMethod']=ord($data[$p+19]);
+ $info['interlaceMethod']=ord($data[$p+20]);
+//print_r($info);
+ $haveHeader=1;
+ if ($info['compressionMethod']!=0){
+ $error=1;
+ $errormsg = 'unsupported compression method';
+ }
+ if ($info['filterMethod']!=0){
+ $error=1;
+ $errormsg = 'unsupported filter method';
+ }
+ break;
+ case 'PLTE':
+ $pdata.=substr($data,$p+8,$chunkLen);
+ break;
+ case 'IDAT':
+ $idata.=substr($data,$p+8,$chunkLen);
+ break;
+ case 'tRNS':
+ //this chunk can only occur once and it must occur after the PLTE chunk and before IDAT chunk
+ //print "tRNS found, color type = ".$info['colorType']."<BR>";
+ $transparency = array();
+ if ($info['colorType'] == 3) { // indexed color, rbg
+ /* corresponding to entries in the plte chunk
+ Alpha for palette index 0: 1 byte
+ Alpha for palette index 1: 1 byte
+ ...etc...
+ */
+ // there will be one entry for each palette entry. up until the last non-opaque entry.
+ // set up an array, stretching over all palette entries which will be o (opaque) or 1 (transparent)
+ $transparency['type']='indexed';
+ $numPalette = strlen($pdata)/3;
+ $trans=0;
+ for ($i=$chunkLen;$i>=0;$i--){
+ if (ord($data[$p+8+$i])==0){
+ $trans=$i;
+ }
+ }
+ $transparency['data'] = $trans;
+
+ } elseif($info['colorType'] == 0) { // grayscale
+ /* corresponding to entries in the plte chunk
+ Gray: 2 bytes, range 0 .. (2^bitdepth)-1
+ */
+// $transparency['grayscale']=$this->PRVT_getBytes($data,$p+8,2); // g = grayscale
+ $transparency['type']='indexed';
+ $transparency['data'] = ord($data[$p+8+1]);
+
+ } elseif($info['colorType'] == 2) { // truecolor
+ /* corresponding to entries in the plte chunk
+ Red: 2 bytes, range 0 .. (2^bitdepth)-1
+ Green: 2 bytes, range 0 .. (2^bitdepth)-1
+ Blue: 2 bytes, range 0 .. (2^bitdepth)-1
+ */
+ $transparency['r']=$this->PRVT_getBytes($data,$p+8,2); // r from truecolor
+ $transparency['g']=$this->PRVT_getBytes($data,$p+10,2); // g from truecolor
+ $transparency['b']=$this->PRVT_getBytes($data,$p+12,2); // b from truecolor
+
+ } else {
+ //unsupported transparency type
+ }
+ // KS End new code
+ break;
+ default:
+ break;
+ }
+
+ $p += $chunkLen+12;
+ }
+
+ if(!$haveHeader){
+ $error = 1;
+ $errormsg = 'information header is missing';
+ }
+ if (isset($info['interlaceMethod']) && $info['interlaceMethod']){
+ $error = 1;
+ $errormsg = 'There appears to be no support for interlaced images in pdf.';
+ }
+ }
+
+ if (!$error && $info['bitDepth'] > 8){
+ $error = 1;
+ $errormsg = 'only bit depth of 8 or less is supported';
+ }
+
+ if (!$error){
+ if ($info['colorType']!=2 && $info['colorType']!=0 && $info['colorType']!=3){
+ $error = 1;
+ $errormsg = 'transparancey alpha channel not supported, transparency only supported for palette images.';
+ } else {
+ switch ($info['colorType']){
+ case 3:
+ $color = 'DeviceRGB';
+ $ncolor=1;
+ break;
+ case 2:
+ $color = 'DeviceRGB';
+ $ncolor=3;
+ break;
+ case 0:
+ $color = 'DeviceGray';
+ $ncolor=1;
+ break;
+ }
+ }
+ }
+ if ($error){
+ $this->addMessage('PNG error - ('.$file.') '.$errormsg);
+ return;
+ }
+ if ($w==0){
+ $w=$h/$info['height']*$info['width'];
+ }
+ if ($h==0){
+ $h=$w*$info['height']/$info['width'];
+ }
+//print_r($info);
+ // so this image is ok... add it in.
+ $this->numImages++;
+ $im=$this->numImages;
+ $label='I'.$im;
+ $this->numObj++;
+// $this->o_image($this->numObj,'new',array('label'=>$label,'data'=>$idata,'iw'=>$w,'ih'=>$h,'type'=>'png','ic'=>$info['width']));
+ $options = array('label'=>$label,'data'=>$idata,'bitsPerComponent'=>$info['bitDepth'],'pdata'=>$pdata
+ ,'iw'=>$info['width'],'ih'=>$info['height'],'type'=>'png','color'=>$color,'ncolor'=>$ncolor);
+ if (isset($transparency)){
+ $options['transparency']=$transparency;
+ }
+ $this->o_image($this->numObj,'new',$options);
+
+ $this->objects[$this->currentContents]['c'].="\nq";
+ $this->objects[$this->currentContents]['c'].="\n".sprintf('%.3f',$w)." 0 0 ".sprintf('%.3f',$h)." ".sprintf('%.3f',$x)." ".sprintf('%.3f',$y)." cm";
+ $this->objects[$this->currentContents]['c'].="\n/".$label.' Do';
+ $this->objects[$this->currentContents]['c'].="\nQ";
+}
+
+/**
+* add a JPEG image into the document, from a file
+*/
+function addJpegFromFile($img,$x,$y,$w=0,$h=0){
+ // attempt to add a jpeg image straight from a file, using no GD commands
+ // note that this function is unable to operate on a remote file.
+
+ if (!file_exists($img)){
+ return;
+ }
+
+ $tmp=getimagesize($img);
+ $imageWidth=$tmp[0];
+ $imageHeight=$tmp[1];
+
+ if (isset($tmp['channels'])){
+ $channels = $tmp['channels'];
+ } else {
+ $channels = 3;
+ }
+
+ if ($w<=0 && $h<=0){
+ $w=$imageWidth;
+ }
+ if ($w==0){
+ $w=$h/$imageHeight*$imageWidth;
+ }
+ if ($h==0){
+ $h=$w*$imageHeight/$imageWidth;
+ }
+
+ $fp=fopen($img,'rb');
+
+ $tmp = get_magic_quotes_runtime();
+ set_magic_quotes_runtime(0);
+ $data = fread($fp,filesize($img));
+ set_magic_quotes_runtime($tmp);
+
+ fclose($fp);
+
+ $this->addJpegImage_common($data,$x,$y,$w,$h,$imageWidth,$imageHeight,$channels);
+}
+
+/**
+* add an image into the document, from a GD object
+* this function is not all that reliable, and I would probably encourage people to use
+* the file based functions
+*/
+function addImage(&$img,$x,$y,$w=0,$h=0,$quality=75){
+ // add a new image into the current location, as an external object
+ // add the image at $x,$y, and with width and height as defined by $w & $h
+
+ // note that this will only work with full colour images and makes them jpg images for display
+ // later versions could present lossless image formats if there is interest.
+
+ // there seems to be some problem here in that images that have quality set above 75 do not appear
+ // not too sure why this is, but in the meantime I have restricted this to 75.
+ if ($quality>75){
+ $quality=75;
+ }
+
+ // if the width or height are set to zero, then set the other one based on keeping the image
+ // height/width ratio the same, if they are both zero, then give up :)
+ $imageWidth=imagesx($img);
+ $imageHeight=imagesy($img);
+
+ if ($w<=0 && $h<=0){
+ return;
+ }
+ if ($w==0){
+ $w=$h/$imageHeight*$imageWidth;
+ }
+ if ($h==0){
+ $h=$w*$imageHeight/$imageWidth;
+ }
+
+ // gotta get the data out of the img..
+
+ // so I write to a temp file, and then read it back.. soo ugly, my apologies.
+ $tmpDir='/tmp';
+ $tmpName=tempnam($tmpDir,'img');
+ imagejpeg($img,$tmpName,$quality);
+ $fp=fopen($tmpName,'rb');
+
+ $tmp = get_magic_quotes_runtime();
+ set_magic_quotes_runtime(0);
+ $fp = @fopen($tmpName,'rb');
+ if ($fp){
+ $data='';
+ while(!feof($fp)){
+ $data .= fread($fp,1024);
+ }
+ fclose($fp);
+ } else {
+ $error = 1;
+ $errormsg = 'trouble opening file';
+ }
+// $data = fread($fp,filesize($tmpName));
+ set_magic_quotes_runtime($tmp);
+// fclose($fp);
+ unlink($tmpName);
+ $this->addJpegImage_common($data,$x,$y,$w,$h,$imageWidth,$imageHeight);
+}
+
+/**
+* common code used by the two JPEG adding functions
+*
+* @access private
+*/
+function addJpegImage_common(&$data,$x,$y,$w=0,$h=0,$imageWidth,$imageHeight,$channels=3){
+ // note that this function is not to be called externally
+ // it is just the common code between the GD and the file options
+ $this->numImages++;
+ $im=$this->numImages;
+ $label='I'.$im;
+ $this->numObj++;
+ $this->o_image($this->numObj,'new',array('label'=>$label,'data'=>$data,'iw'=>$imageWidth,'ih'=>$imageHeight,'channels'=>$channels));
+
+ $this->objects[$this->currentContents]['c'].="\nq";
+ $this->objects[$this->currentContents]['c'].="\n".sprintf('%.3f',$w)." 0 0 ".sprintf('%.3f',$h)." ".sprintf('%.3f',$x)." ".sprintf('%.3f',$y)." cm";
+ $this->objects[$this->currentContents]['c'].="\n/".$label.' Do';
+ $this->objects[$this->currentContents]['c'].="\nQ";
+}
+
+/**
+* specify where the document should open when it first starts
+*/
+function openHere($style,$a=0,$b=0,$c=0){
+ // this function will open the document at a specified page, in a specified style
+ // the values for style, and the required paramters are:
+ // 'XYZ' left, top, zoom
+ // 'Fit'
+ // 'FitH' top
+ // 'FitV' left
+ // 'FitR' left,bottom,right
+ // 'FitB'
+ // 'FitBH' top
+ // 'FitBV' left
+ $this->numObj++;
+ $this->o_destination($this->numObj,'new',array('page'=>$this->currentPage,'type'=>$style,'p1'=>$a,'p2'=>$b,'p3'=>$c));
+ $id = $this->catalogId;
+ $this->o_catalog($id,'openHere',$this->numObj);
+}
+
+/**
+* create a labelled destination within the document
+*/
+function addDestination($label,$style,$a=0,$b=0,$c=0){
+ // associates the given label with the destination, it is done this way so that a destination can be specified after
+ // it has been linked to
+ // styles are the same as the 'openHere' function
+ $this->numObj++;
+ $this->o_destination($this->numObj,'new',array('page'=>$this->currentPage,'type'=>$style,'p1'=>$a,'p2'=>$b,'p3'=>$c));
+ $id = $this->numObj;
+ // store the label->idf relationship, note that this means that labels can be used only once
+ $this->destinations["$label"]=$id;
+}
+
+/**
+* define font families, this is used to initialize the font families for the default fonts
+* and for the user to add new ones for their fonts. The default bahavious can be overridden should
+* that be desired.
+*/
+function setFontFamily($family,$options=''){
+ if (!is_array($options)){
+ if ($family=='init'){
+ // set the known family groups
+ // these font families will be used to enable bold and italic markers to be included
+ // within text streams. html forms will be used... <b></b> <i></i>
+ $this->fontFamilies['Helvetica.afm']=array(
+ 'b'=>'Helvetica-Bold.afm'
+ ,'i'=>'Helvetica-Oblique.afm'
+ ,'bi'=>'Helvetica-BoldOblique.afm'
+ ,'ib'=>'Helvetica-BoldOblique.afm'
+ );
+ $this->fontFamilies['Courier.afm']=array(
+ 'b'=>'Courier-Bold.afm'
+ ,'i'=>'Courier-Oblique.afm'
+ ,'bi'=>'Courier-BoldOblique.afm'
+ ,'ib'=>'Courier-BoldOblique.afm'
+ );
+ $this->fontFamilies['Times-Roman.afm']=array(
+ 'b'=>'Times-Bold.afm'
+ ,'i'=>'Times-Italic.afm'
+ ,'bi'=>'Times-BoldItalic.afm'
+ ,'ib'=>'Times-BoldItalic.afm'
+ );
+ }
+ } else {
+ // the user is trying to set a font family
+ // note that this can also be used to set the base ones to something else
+ if (strlen($family)){
+ $this->fontFamilies[$family] = $options;
+ }
+ }
+}
+
+/**
+* used to add messages for use in debugging
+*/
+function addMessage($message){
+ $this->messages.=$message."\n";
+}
+
+/**
+* a few functions which should allow the document to be treated transactionally.
+*/
+function transaction($action){
+ switch ($action){
+ case 'start':
+ // store all the data away into the checkpoint variable
+ $data = get_object_vars($this);
+ $this->checkpoint = $data;
+ unset($data);
+ break;
+ case 'commit':
+ if (is_array($this->checkpoint) && isset($this->checkpoint['checkpoint'])){
+ $tmp = $this->checkpoint['checkpoint'];
+ $this->checkpoint = $tmp;
+ unset($tmp);
+ } else {
+ $this->checkpoint='';
+ }
+ break;
+ case 'rewind':
+ // do not destroy the current checkpoint, but move us back to the state then, so that we can try again
+ if (is_array($this->checkpoint)){
+ // can only abort if were inside a checkpoint
+ $tmp = $this->checkpoint;
+ foreach ($tmp as $k=>$v){
+ if ($k != 'checkpoint'){
+ $this->$k=$v;
+ }
+ }
+ unset($tmp);
+ }
+ break;
+ case 'abort':
+ if (is_array($this->checkpoint)){
+ // can only abort if were inside a checkpoint
+ $tmp = $this->checkpoint;
+ foreach ($tmp as $k=>$v){
+ $this->$k=$v;
+ }
+ unset($tmp);
+ }
+ break;
+ }
+
+}
+
+} // end of class
+
+?>
\ No newline at end of file
projects / WP-Plugins / glm-coupons.git / commitdiff