+++ /dev/null
-<?php\r
-/*******************************************************************************\r
-* Software: FPDF *\r
-* Version: 1.53 *\r
-* Date: 2004-12-31 *\r
-* Author: Olivier PLATHEY *\r
-* License: Freeware *\r
-* *\r
-* You may use, modify and redistribute this software as you wish. *\r
-*******************************************************************************/\r
-\r
-if(!class_exists('FPDF'))\r
-{\r
-define('FPDF_VERSION','1.53');\r
-\r
-class FPDF\r
-{\r
-//Private properties\r
-var $page; //current page number\r
-var $n; //current object number\r
-var $offsets; //array of object offsets\r
-var $buffer; //buffer holding in-memory PDF\r
-var $pages; //array containing pages\r
-var $state; //current document state\r
-var $compress; //compression flag\r
-var $DefOrientation; //default orientation\r
-var $CurOrientation; //current orientation\r
-var $OrientationChanges; //array indicating orientation changes\r
-var $k; //scale factor (number of points in user unit)\r
-var $fwPt,$fhPt; //dimensions of page format in points\r
-var $fw,$fh; //dimensions of page format in user unit\r
-var $wPt,$hPt; //current dimensions of page in points\r
-var $w,$h; //current dimensions of page in user unit\r
-var $lMargin; //left margin\r
-var $tMargin; //top margin\r
-var $rMargin; //right margin\r
-var $bMargin; //page break margin\r
-var $cMargin; //cell margin\r
-var $x,$y; //current position in user unit for cell positioning\r
-var $lasth; //height of last cell printed\r
-var $LineWidth; //line width in user unit\r
-var $CoreFonts; //array of standard font names\r
-var $fonts; //array of used fonts\r
-var $FontFiles; //array of font files\r
-var $diffs; //array of encoding differences\r
-var $images; //array of used images\r
-var $PageLinks; //array of links in pages\r
-var $links; //array of internal links\r
-var $FontFamily; //current font family\r
-var $FontStyle; //current font style\r
-var $underline; //underlining flag\r
-var $CurrentFont; //current font info\r
-var $FontSizePt; //current font size in points\r
-var $FontSize; //current font size in user unit\r
-var $DrawColor; //commands for drawing color\r
-var $FillColor; //commands for filling color\r
-var $TextColor; //commands for text color\r
-var $ColorFlag; //indicates whether fill and text colors are different\r
-var $ws; //word spacing\r
-var $AutoPageBreak; //automatic page breaking\r
-var $PageBreakTrigger; //threshold used to trigger page breaks\r
-var $InFooter; //flag set when processing footer\r
-var $ZoomMode; //zoom display mode\r
-var $LayoutMode; //layout display mode\r
-var $title; //title\r
-var $subject; //subject\r
-var $author; //author\r
-var $keywords; //keywords\r
-var $creator; //creator\r
-var $AliasNbPages; //alias for total number of pages\r
-var $PDFVersion; //PDF version number\r
-\r
-/*******************************************************************************\r
-* *\r
-* Public methods *\r
-* *\r
-*******************************************************************************/\r
-function FPDF($orientation='P',$unit='mm',$format='A4')\r
-{\r
- //Some checks\r
- $this->_dochecks();\r
- //Initialization of properties\r
- $this->page=0;\r
- $this->n=2;\r
- $this->buffer='';\r
- $this->pages=array();\r
- $this->OrientationChanges=array();\r
- $this->state=0;\r
- $this->fonts=array();\r
- $this->FontFiles=array();\r
- $this->diffs=array();\r
- $this->images=array();\r
- $this->links=array();\r
- $this->InFooter=false;\r
- $this->lasth=0;\r
- $this->FontFamily='';\r
- $this->FontStyle='';\r
- $this->FontSizePt=12;\r
- $this->underline=false;\r
- $this->DrawColor='0 G';\r
- $this->FillColor='0 g';\r
- $this->TextColor='0 g';\r
- $this->ColorFlag=false;\r
- $this->ws=0;\r
- //Standard fonts\r
- $this->CoreFonts=array('courier'=>'Courier','courierB'=>'Courier-Bold','courierI'=>'Courier-Oblique','courierBI'=>'Courier-BoldOblique',\r
- 'helvetica'=>'Helvetica','helveticaB'=>'Helvetica-Bold','helveticaI'=>'Helvetica-Oblique','helveticaBI'=>'Helvetica-BoldOblique',\r
- 'times'=>'Times-Roman','timesB'=>'Times-Bold','timesI'=>'Times-Italic','timesBI'=>'Times-BoldItalic',\r
- 'symbol'=>'Symbol','zapfdingbats'=>'ZapfDingbats');\r
- //Scale factor\r
- if($unit=='pt')\r
- $this->k=1;\r
- elseif($unit=='mm')\r
- $this->k=72/25.4;\r
- elseif($unit=='cm')\r
- $this->k=72/2.54;\r
- elseif($unit=='in')\r
- $this->k=72;\r
- else\r
- $this->Error('Incorrect unit: '.$unit);\r
- //Page format\r
- if(is_string($format))\r
- {\r
- $format=strtolower($format);\r
- if($format=='a3')\r
- $format=array(841.89,1190.55);\r
- elseif($format=='a4')\r
- $format=array(595.28,841.89);\r
- elseif($format=='a5')\r
- $format=array(420.94,595.28);\r
- elseif($format=='letter')\r
- $format=array(612,792);\r
- elseif($format=='legal')\r
- $format=array(612,1008);\r
- else\r
- $this->Error('Unknown page format: '.$format);\r
- $this->fwPt=$format[0];\r
- $this->fhPt=$format[1];\r
- }\r
- else\r
- {\r
- $this->fwPt=$format[0]*$this->k;\r
- $this->fhPt=$format[1]*$this->k;\r
- }\r
- $this->fw=$this->fwPt/$this->k;\r
- $this->fh=$this->fhPt/$this->k;\r
- //Page orientation\r
- $orientation=strtolower($orientation);\r
- if($orientation=='p' || $orientation=='portrait')\r
- {\r
- $this->DefOrientation='P';\r
- $this->wPt=$this->fwPt;\r
- $this->hPt=$this->fhPt;\r
- }\r
- elseif($orientation=='l' || $orientation=='landscape')\r
- {\r
- $this->DefOrientation='L';\r
- $this->wPt=$this->fhPt;\r
- $this->hPt=$this->fwPt;\r
- }\r
- else\r
- $this->Error('Incorrect orientation: '.$orientation);\r
- $this->CurOrientation=$this->DefOrientation;\r
- $this->w=$this->wPt/$this->k;\r
- $this->h=$this->hPt/$this->k;\r
- //Page margins (1 cm)\r
- $margin=28.35/$this->k;\r
- $this->SetMargins($margin,$margin);\r
- //Interior cell margin (1 mm)\r
- $this->cMargin=$margin/10;\r
- //Line width (0.2 mm)\r
- $this->LineWidth=.567/$this->k;\r
- //Automatic page break\r
- $this->SetAutoPageBreak(true,2*$margin);\r
- //Full width display mode\r
- $this->SetDisplayMode('fullwidth');\r
- //Enable compression\r
- $this->SetCompression(true);\r
- //Set default PDF version number\r
- $this->PDFVersion='1.3';\r
-}\r
-\r
-function SetMargins($left,$top,$right=-1)\r
-{\r
- //Set left, top and right margins\r
- $this->lMargin=$left;\r
- $this->tMargin=$top;\r
- if($right==-1)\r
- $right=$left;\r
- $this->rMargin=$right;\r
-}\r
-\r
-function SetLeftMargin($margin)\r
-{\r
- //Set left margin\r
- $this->lMargin=$margin;\r
- if($this->page>0 && $this->x<$margin)\r
- $this->x=$margin;\r
-}\r
-\r
-function SetTopMargin($margin)\r
-{\r
- //Set top margin\r
- $this->tMargin=$margin;\r
-}\r
-\r
-function SetRightMargin($margin)\r
-{\r
- //Set right margin\r
- $this->rMargin=$margin;\r
-}\r
-\r
-function SetAutoPageBreak($auto,$margin=0)\r
-{\r
- //Set auto page break mode and triggering margin\r
- $this->AutoPageBreak=$auto;\r
- $this->bMargin=$margin;\r
- $this->PageBreakTrigger=$this->h-$margin;\r
-}\r
-\r
-function SetDisplayMode($zoom,$layout='continuous')\r
-{\r
- //Set display mode in viewer\r
- if($zoom=='fullpage' || $zoom=='fullwidth' || $zoom=='real' || $zoom=='default' || !is_string($zoom))\r
- $this->ZoomMode=$zoom;\r
- else\r
- $this->Error('Incorrect zoom display mode: '.$zoom);\r
- if($layout=='single' || $layout=='continuous' || $layout=='two' || $layout=='default')\r
- $this->LayoutMode=$layout;\r
- else\r
- $this->Error('Incorrect layout display mode: '.$layout);\r
-}\r
-\r
-function SetCompression($compress)\r
-{\r
- //Set page compression\r
- if(function_exists('gzcompress'))\r
- $this->compress=$compress;\r
- else\r
- $this->compress=false;\r
-}\r
-\r
-function SetTitle($title)\r
-{\r
- //Title of document\r
- $this->title=$title;\r
-}\r
-\r
-function SetSubject($subject)\r
-{\r
- //Subject of document\r
- $this->subject=$subject;\r
-}\r
-\r
-function SetAuthor($author)\r
-{\r
- //Author of document\r
- $this->author=$author;\r
-}\r
-\r
-function SetKeywords($keywords)\r
-{\r
- //Keywords of document\r
- $this->keywords=$keywords;\r
-}\r
-\r
-function SetCreator($creator)\r
-{\r
- //Creator of document\r
- $this->creator=$creator;\r
-}\r
-\r
-function AliasNbPages($alias='{nb}')\r
-{\r
- //Define an alias for total number of pages\r
- $this->AliasNbPages=$alias;\r
-}\r
-\r
-function Error($msg)\r
-{\r
- //Fatal error\r
- die('<B>FPDF error: </B>'.$msg);\r
-}\r
-\r
-function Open()\r
-{\r
- //Begin document\r
- $this->state=1;\r
-}\r
-\r
-function Close()\r
-{\r
- //Terminate document\r
- if($this->state==3)\r
- return;\r
- if($this->page==0)\r
- $this->AddPage();\r
- //Page footer\r
- $this->InFooter=true;\r
- $this->Footer();\r
- $this->InFooter=false;\r
- //Close page\r
- $this->_endpage();\r
- //Close document\r
- $this->_enddoc();\r
-}\r
-\r
-function AddPage($orientation='')\r
-{\r
- //Start a new page\r
- if($this->state==0)\r
- $this->Open();\r
- $family=$this->FontFamily;\r
- $style=$this->FontStyle.($this->underline ? 'U' : '');\r
- $size=$this->FontSizePt;\r
- $lw=$this->LineWidth;\r
- $dc=$this->DrawColor;\r
- $fc=$this->FillColor;\r
- $tc=$this->TextColor;\r
- $cf=$this->ColorFlag;\r
- if($this->page>0)\r
- {\r
- //Page footer\r
- $this->InFooter=true;\r
- $this->Footer();\r
- $this->InFooter=false;\r
- //Close page\r
- $this->_endpage();\r
- }\r
- //Start new page\r
- $this->_beginpage($orientation);\r
- //Set line cap style to square\r
- $this->_out('2 J');\r
- //Set line width\r
- $this->LineWidth=$lw;\r
- $this->_out(sprintf('%.2f w',$lw*$this->k));\r
- //Set font\r
- if($family)\r
- $this->SetFont($family,$style,$size);\r
- //Set colors\r
- $this->DrawColor=$dc;\r
- if($dc!='0 G')\r
- $this->_out($dc);\r
- $this->FillColor=$fc;\r
- if($fc!='0 g')\r
- $this->_out($fc);\r
- $this->TextColor=$tc;\r
- $this->ColorFlag=$cf;\r
- //Page header\r
- $this->Header();\r
- //Restore line width\r
- if($this->LineWidth!=$lw)\r
- {\r
- $this->LineWidth=$lw;\r
- $this->_out(sprintf('%.2f w',$lw*$this->k));\r
- }\r
- //Restore font\r
- if($family)\r
- $this->SetFont($family,$style,$size);\r
- //Restore colors\r
- if($this->DrawColor!=$dc)\r
- {\r
- $this->DrawColor=$dc;\r
- $this->_out($dc);\r
- }\r
- if($this->FillColor!=$fc)\r
- {\r
- $this->FillColor=$fc;\r
- $this->_out($fc);\r
- }\r
- $this->TextColor=$tc;\r
- $this->ColorFlag=$cf;\r
-}\r
-\r
-function Header()\r
-{\r
- //To be implemented in your own inherited class\r
-}\r
-\r
-function Footer()\r
-{\r
- //To be implemented in your own inherited class\r
-}\r
-\r
-function PageNo()\r
-{\r
- //Get current page number\r
- return $this->page;\r
-}\r
-\r
-function SetDrawColor($r,$g=-1,$b=-1)\r
-{\r
- //Set color for all stroking operations\r
- if(($r==0 && $g==0 && $b==0) || $g==-1)\r
- $this->DrawColor=sprintf('%.3f G',$r/255);\r
- else\r
- $this->DrawColor=sprintf('%.3f %.3f %.3f RG',$r/255,$g/255,$b/255);\r
- if($this->page>0)\r
- $this->_out($this->DrawColor);\r
-}\r
-\r
-function SetFillColor($r,$g=-1,$b=-1)\r
-{\r
- //Set color for all filling operations\r
- if(($r==0 && $g==0 && $b==0) || $g==-1)\r
- $this->FillColor=sprintf('%.3f g',$r/255);\r
- else\r
- $this->FillColor=sprintf('%.3f %.3f %.3f rg',$r/255,$g/255,$b/255);\r
- $this->ColorFlag=($this->FillColor!=$this->TextColor);\r
- if($this->page>0)\r
- $this->_out($this->FillColor);\r
-}\r
-\r
-function SetTextColor($r,$g=-1,$b=-1)\r
-{\r
- //Set color for text\r
- if(($r==0 && $g==0 && $b==0) || $g==-1)\r
- $this->TextColor=sprintf('%.3f g',$r/255);\r
- else\r
- $this->TextColor=sprintf('%.3f %.3f %.3f rg',$r/255,$g/255,$b/255);\r
- $this->ColorFlag=($this->FillColor!=$this->TextColor);\r
-}\r
-\r
-function GetStringWidth($s)\r
-{\r
- //Get width of a string in the current font\r
- $s=(string)$s;\r
- $cw=&$this->CurrentFont['cw'];\r
- $w=0;\r
- $l=strlen($s);\r
- for($i=0;$i<$l;$i++)\r
- $w+=$cw[$s{$i}];\r
- return $w*$this->FontSize/1000;\r
-}\r
-\r
-function SetLineWidth($width)\r
-{\r
- //Set line width\r
- $this->LineWidth=$width;\r
- if($this->page>0)\r
- $this->_out(sprintf('%.2f w',$width*$this->k));\r
-}\r
-\r
-function Line($x1,$y1,$x2,$y2)\r
-{\r
- //Draw a line\r
- $this->_out(sprintf('%.2f %.2f m %.2f %.2f l S',$x1*$this->k,($this->h-$y1)*$this->k,$x2*$this->k,($this->h-$y2)*$this->k));\r
-}\r
-\r
-function Rect($x,$y,$w,$h,$style='')\r
-{\r
- //Draw a rectangle\r
- if($style=='F')\r
- $op='f';\r
- elseif($style=='FD' || $style=='DF')\r
- $op='B';\r
- else\r
- $op='S';\r
- $this->_out(sprintf('%.2f %.2f %.2f %.2f re %s',$x*$this->k,($this->h-$y)*$this->k,$w*$this->k,-$h*$this->k,$op));\r
-}\r
-\r
-function AddFont($family,$style='',$file='')\r
-{\r
- //Add a TrueType or Type1 font\r
- $family=strtolower($family);\r
- if($file=='')\r
- $file=str_replace(' ','',$family).strtolower($style).'.php';\r
- if($family=='arial')\r
- $family='helvetica';\r
- $style=strtoupper($style);\r
- if($style=='IB')\r
- $style='BI';\r
- $fontkey=$family.$style;\r
- if(isset($this->fonts[$fontkey]))\r
- $this->Error('Font already added: '.$family.' '.$style);\r
- include($this->_getfontpath().$file);\r
- if(!isset($name))\r
- $this->Error('Could not include font definition file');\r
- $i=count($this->fonts)+1;\r
- $this->fonts[$fontkey]=array('i'=>$i,'type'=>$type,'name'=>$name,'desc'=>$desc,'up'=>$up,'ut'=>$ut,'cw'=>$cw,'enc'=>$enc,'file'=>$file);\r
- if($diff)\r
- {\r
- //Search existing encodings\r
- $d=0;\r
- $nb=count($this->diffs);\r
- for($i=1;$i<=$nb;$i++)\r
- {\r
- if($this->diffs[$i]==$diff)\r
- {\r
- $d=$i;\r
- break;\r
- }\r
- }\r
- if($d==0)\r
- {\r
- $d=$nb+1;\r
- $this->diffs[$d]=$diff;\r
- }\r
- $this->fonts[$fontkey]['diff']=$d;\r
- }\r
- if($file)\r
- {\r
- if($type=='TrueType')\r
- $this->FontFiles[$file]=array('length1'=>$originalsize);\r
- else\r
- $this->FontFiles[$file]=array('length1'=>$size1,'length2'=>$size2);\r
- }\r
-}\r
-\r
-function SetFont($family,$style='',$size=0)\r
-{\r
- //Select a font; size given in points\r
- global $fpdf_charwidths;\r
-\r
- $family=strtolower($family);\r
- if($family=='')\r
- $family=$this->FontFamily;\r
- if($family=='arial')\r
- $family='helvetica';\r
- elseif($family=='symbol' || $family=='zapfdingbats')\r
- $style='';\r
- $style=strtoupper($style);\r
- if(strpos($style,'U')!==false)\r
- {\r
- $this->underline=true;\r
- $style=str_replace('U','',$style);\r
- }\r
- else\r
- $this->underline=false;\r
- if($style=='IB')\r
- $style='BI';\r
- if($size==0)\r
- $size=$this->FontSizePt;\r
- //Test if font is already selected\r
- if($this->FontFamily==$family && $this->FontStyle==$style && $this->FontSizePt==$size)\r
- return;\r
- //Test if used for the first time\r
- $fontkey=$family.$style;\r
- if(!isset($this->fonts[$fontkey]))\r
- {\r
- //Check if one of the standard fonts\r
- if(isset($this->CoreFonts[$fontkey]))\r
- {\r
- if(!isset($fpdf_charwidths[$fontkey]))\r
- {\r
- //Load metric file\r
- $file=$family;\r
- if($family=='times' || $family=='helvetica')\r
- $file.=strtolower($style);\r
- include($this->_getfontpath().$file.'.php');\r
- if(!isset($fpdf_charwidths[$fontkey]))\r
- $this->Error('Could not include font metric file');\r
- }\r
- $i=count($this->fonts)+1;\r
- $this->fonts[$fontkey]=array('i'=>$i,'type'=>'core','name'=>$this->CoreFonts[$fontkey],'up'=>-100,'ut'=>50,'cw'=>$fpdf_charwidths[$fontkey]);\r
- }\r
- else\r
- $this->Error('Undefined font: '.$family.' '.$style);\r
- }\r
- //Select it\r
- $this->FontFamily=$family;\r
- $this->FontStyle=$style;\r
- $this->FontSizePt=$size;\r
- $this->FontSize=$size/$this->k;\r
- $this->CurrentFont=&$this->fonts[$fontkey];\r
- if($this->page>0)\r
- $this->_out(sprintf('BT /F%d %.2f Tf ET',$this->CurrentFont['i'],$this->FontSizePt));\r
-}\r
-\r
-function SetFontSize($size)\r
-{\r
- //Set font size in points\r
- if($this->FontSizePt==$size)\r
- return;\r
- $this->FontSizePt=$size;\r
- $this->FontSize=$size/$this->k;\r
- if($this->page>0)\r
- $this->_out(sprintf('BT /F%d %.2f Tf ET',$this->CurrentFont['i'],$this->FontSizePt));\r
-}\r
-\r
-function AddLink()\r
-{\r
- //Create a new internal link\r
- $n=count($this->links)+1;\r
- $this->links[$n]=array(0,0);\r
- return $n;\r
-}\r
-\r
-function SetLink($link,$y=0,$page=-1)\r
-{\r
- //Set destination of internal link\r
- if($y==-1)\r
- $y=$this->y;\r
- if($page==-1)\r
- $page=$this->page;\r
- $this->links[$link]=array($page,$y);\r
-}\r
-\r
-function Link($x,$y,$w,$h,$link)\r
-{\r
- //Put a link on the page\r
- $this->PageLinks[$this->page][]=array($x*$this->k,$this->hPt-$y*$this->k,$w*$this->k,$h*$this->k,$link);\r
-}\r
-\r
-function Text($x,$y,$txt)\r
-{\r
- //Output a string\r
- $s=sprintf('BT %.2f %.2f Td (%s) Tj ET',$x*$this->k,($this->h-$y)*$this->k,$this->_escape($txt));\r
- if($this->underline && $txt!='')\r
- $s.=' '.$this->_dounderline($x,$y,$txt);\r
- if($this->ColorFlag)\r
- $s='q '.$this->TextColor.' '.$s.' Q';\r
- $this->_out($s);\r
-}\r
-\r
-function AcceptPageBreak()\r
-{\r
- //Accept automatic page break or not\r
- return $this->AutoPageBreak;\r
-}\r
-\r
-function Cell($w,$h=0,$txt='',$border=0,$ln=0,$align='',$fill=0,$link='')\r
-{\r
- //Output a cell\r
- $k=$this->k;\r
- if($this->y+$h>$this->PageBreakTrigger && !$this->InFooter && $this->AcceptPageBreak())\r
- {\r
- //Automatic page break\r
- $x=$this->x;\r
- $ws=$this->ws;\r
- if($ws>0)\r
- {\r
- $this->ws=0;\r
- $this->_out('0 Tw');\r
- }\r
- $this->AddPage($this->CurOrientation);\r
- $this->x=$x;\r
- if($ws>0)\r
- {\r
- $this->ws=$ws;\r
- $this->_out(sprintf('%.3f Tw',$ws*$k));\r
- }\r
- }\r
- if($w==0)\r
- $w=$this->w-$this->rMargin-$this->x;\r
- $s='';\r
- if($fill==1 || $border==1)\r
- {\r
- if($fill==1)\r
- $op=($border==1) ? 'B' : 'f';\r
- else\r
- $op='S';\r
- $s=sprintf('%.2f %.2f %.2f %.2f re %s ',$this->x*$k,($this->h-$this->y)*$k,$w*$k,-$h*$k,$op);\r
- }\r
- if(is_string($border))\r
- {\r
- $x=$this->x;\r
- $y=$this->y;\r
- if(strpos($border,'L')!==false)\r
- $s.=sprintf('%.2f %.2f m %.2f %.2f l S ',$x*$k,($this->h-$y)*$k,$x*$k,($this->h-($y+$h))*$k);\r
- if(strpos($border,'T')!==false)\r
- $s.=sprintf('%.2f %.2f m %.2f %.2f l S ',$x*$k,($this->h-$y)*$k,($x+$w)*$k,($this->h-$y)*$k);\r
- if(strpos($border,'R')!==false)\r
- $s.=sprintf('%.2f %.2f m %.2f %.2f l S ',($x+$w)*$k,($this->h-$y)*$k,($x+$w)*$k,($this->h-($y+$h))*$k);\r
- if(strpos($border,'B')!==false)\r
- $s.=sprintf('%.2f %.2f m %.2f %.2f l S ',$x*$k,($this->h-($y+$h))*$k,($x+$w)*$k,($this->h-($y+$h))*$k);\r
- }\r
- if($txt!=='')\r
- {\r
- if($align=='R')\r
- $dx=$w-$this->cMargin-$this->GetStringWidth($txt);\r
- elseif($align=='C')\r
- $dx=($w-$this->GetStringWidth($txt))/2;\r
- else\r
- $dx=$this->cMargin;\r
- if($this->ColorFlag)\r
- $s.='q '.$this->TextColor.' ';\r
- $txt2=str_replace(')','\\)',str_replace('(','\\(',str_replace('\\','\\\\',$txt)));\r
- $s.=sprintf('BT %.2f %.2f Td (%s) Tj ET',($this->x+$dx)*$k,($this->h-($this->y+.5*$h+.3*$this->FontSize))*$k,$txt2);\r
- if($this->underline)\r
- $s.=' '.$this->_dounderline($this->x+$dx,$this->y+.5*$h+.3*$this->FontSize,$txt);\r
- if($this->ColorFlag)\r
- $s.=' Q';\r
- if($link)\r
- $this->Link($this->x+$dx,$this->y+.5*$h-.5*$this->FontSize,$this->GetStringWidth($txt),$this->FontSize,$link);\r
- }\r
- if($s)\r
- $this->_out($s);\r
- $this->lasth=$h;\r
- if($ln>0)\r
- {\r
- //Go to next line\r
- $this->y+=$h;\r
- if($ln==1)\r
- $this->x=$this->lMargin;\r
- }\r
- else\r
- $this->x+=$w;\r
-}\r
-\r
-function MultiCell($w,$h,$txt,$border=0,$align='J',$fill=0)\r
-{\r
- //Output text with automatic or explicit line breaks\r
- $cw=&$this->CurrentFont['cw'];\r
- if($w==0)\r
- $w=$this->w-$this->rMargin-$this->x;\r
- $wmax=($w-2*$this->cMargin)*1000/$this->FontSize;\r
- $s=str_replace("\r",'',$txt);\r
- $nb=strlen($s);\r
- if($nb>0 && $s[$nb-1]=="\n")\r
- $nb--;\r
- $b=0;\r
- if($border)\r
- {\r
- if($border==1)\r
- {\r
- $border='LTRB';\r
- $b='LRT';\r
- $b2='LR';\r
- }\r
- else\r
- {\r
- $b2='';\r
- if(strpos($border,'L')!==false)\r
- $b2.='L';\r
- if(strpos($border,'R')!==false)\r
- $b2.='R';\r
- $b=(strpos($border,'T')!==false) ? $b2.'T' : $b2;\r
- }\r
- }\r
- $sep=-1;\r
- $i=0;\r
- $j=0;\r
- $l=0;\r
- $ns=0;\r
- $nl=1;\r
- while($i<$nb)\r
- {\r
- //Get next character\r
- $c=$s{$i};\r
- if($c=="\n")\r
- {\r
- //Explicit line break\r
- if($this->ws>0)\r
- {\r
- $this->ws=0;\r
- $this->_out('0 Tw');\r
- }\r
- $this->Cell($w,$h,substr($s,$j,$i-$j),$b,2,$align,$fill);\r
- $i++;\r
- $sep=-1;\r
- $j=$i;\r
- $l=0;\r
- $ns=0;\r
- $nl++;\r
- if($border && $nl==2)\r
- $b=$b2;\r
- continue;\r
- }\r
- if($c==' ')\r
- {\r
- $sep=$i;\r
- $ls=$l;\r
- $ns++;\r
- }\r
- $l+=$cw[$c];\r
- if($l>$wmax)\r
- {\r
- //Automatic line break\r
- if($sep==-1)\r
- {\r
- if($i==$j)\r
- $i++;\r
- if($this->ws>0)\r
- {\r
- $this->ws=0;\r
- $this->_out('0 Tw');\r
- }\r
- $this->Cell($w,$h,substr($s,$j,$i-$j),$b,2,$align,$fill);\r
- }\r
- else\r
- {\r
- if($align=='J')\r
- {\r
- $this->ws=($ns>1) ? ($wmax-$ls)/1000*$this->FontSize/($ns-1) : 0;\r
- $this->_out(sprintf('%.3f Tw',$this->ws*$this->k));\r
- }\r
- $this->Cell($w,$h,substr($s,$j,$sep-$j),$b,2,$align,$fill);\r
- $i=$sep+1;\r
- }\r
- $sep=-1;\r
- $j=$i;\r
- $l=0;\r
- $ns=0;\r
- $nl++;\r
- if($border && $nl==2)\r
- $b=$b2;\r
- }\r
- else\r
- $i++;\r
- }\r
- //Last chunk\r
- if($this->ws>0)\r
- {\r
- $this->ws=0;\r
- $this->_out('0 Tw');\r
- }\r
- if($border && strpos($border,'B')!==false)\r
- $b.='B';\r
- $this->Cell($w,$h,substr($s,$j,$i-$j),$b,2,$align,$fill);\r
- $this->x=$this->lMargin;\r
-}\r
-\r
-function Write($h,$txt,$link='')\r
-{\r
- //Output text in flowing mode\r
- $cw=&$this->CurrentFont['cw'];\r
- $w=$this->w-$this->rMargin-$this->x;\r
- $wmax=($w-2*$this->cMargin)*1000/$this->FontSize;\r
- $s=str_replace("\r",'',$txt);\r
- $nb=strlen($s);\r
- $sep=-1;\r
- $i=0;\r
- $j=0;\r
- $l=0;\r
- $nl=1;\r
- while($i<$nb)\r
- {\r
- //Get next character\r
- $c=$s{$i};\r
- if($c=="\n")\r
- {\r
- //Explicit line break\r
- $this->Cell($w,$h,substr($s,$j,$i-$j),0,2,'',0,$link);\r
- $i++;\r
- $sep=-1;\r
- $j=$i;\r
- $l=0;\r
- if($nl==1)\r
- {\r
- $this->x=$this->lMargin;\r
- $w=$this->w-$this->rMargin-$this->x;\r
- $wmax=($w-2*$this->cMargin)*1000/$this->FontSize;\r
- }\r
- $nl++;\r
- continue;\r
- }\r
- if($c==' ')\r
- $sep=$i;\r
- $l+=$cw[$c];\r
- if($l>$wmax)\r
- {\r
- //Automatic line break\r
- if($sep==-1)\r
- {\r
- if($this->x>$this->lMargin)\r
- {\r
- //Move to next line\r
- $this->x=$this->lMargin;\r
- $this->y+=$h;\r
- $w=$this->w-$this->rMargin-$this->x;\r
- $wmax=($w-2*$this->cMargin)*1000/$this->FontSize;\r
- $i++;\r
- $nl++;\r
- continue;\r
- }\r
- if($i==$j)\r
- $i++;\r
- $this->Cell($w,$h,substr($s,$j,$i-$j),0,2,'',0,$link);\r
- }\r
- else\r
- {\r
- $this->Cell($w,$h,substr($s,$j,$sep-$j),0,2,'',0,$link);\r
- $i=$sep+1;\r
- }\r
- $sep=-1;\r
- $j=$i;\r
- $l=0;\r
- if($nl==1)\r
- {\r
- $this->x=$this->lMargin;\r
- $w=$this->w-$this->rMargin-$this->x;\r
- $wmax=($w-2*$this->cMargin)*1000/$this->FontSize;\r
- }\r
- $nl++;\r
- }\r
- else\r
- $i++;\r
- }\r
- //Last chunk\r
- if($i!=$j)\r
- $this->Cell($l/1000*$this->FontSize,$h,substr($s,$j),0,0,'',0,$link);\r
-}\r
-\r
-function Image($file,$x,$y,$w=0,$h=0,$type='',$link='')\r
-{\r
- //Put an image on the page\r
- if(!isset($this->images[$file]))\r
- {\r
- //First use of image, get info\r
- if($type=='')\r
- {\r
- $pos=strrpos($file,'.');\r
- if(!$pos)\r
- $this->Error('Image file has no extension and no type was specified: '.$file);\r
- $type=substr($file,$pos+1);\r
- }\r
- $type=strtolower($type);\r
- $mqr=get_magic_quotes_runtime();\r
- set_magic_quotes_runtime(0);\r
- if($type=='jpg' || $type=='jpeg')\r
- $info=$this->_parsejpg($file);\r
- elseif($type=='png')\r
- $info=$this->_parsepng($file);\r
- else\r
- {\r
- //Allow for additional formats\r
- $mtd='_parse'.$type;\r
- if(!method_exists($this,$mtd))\r
- $this->Error('Unsupported image type: '.$type);\r
- $info=$this->$mtd($file);\r
- }\r
- set_magic_quotes_runtime($mqr);\r
- $info['i']=count($this->images)+1;\r
- $this->images[$file]=$info;\r
- }\r
- else\r
- $info=$this->images[$file];\r
- //Automatic width and height calculation if needed\r
- if($w==0 && $h==0)\r
- {\r
- //Put image at 72 dpi\r
- $w=$info['w']/$this->k;\r
- $h=$info['h']/$this->k;\r
- }\r
- if($w==0)\r
- $w=$h*$info['w']/$info['h'];\r
- if($h==0)\r
- $h=$w*$info['h']/$info['w'];\r
- $this->_out(sprintf('q %.2f 0 0 %.2f %.2f %.2f cm /I%d Do Q',$w*$this->k,$h*$this->k,$x*$this->k,($this->h-($y+$h))*$this->k,$info['i']));\r
- if($link)\r
- $this->Link($x,$y,$w,$h,$link);\r
-}\r
-\r
-function Ln($h='')\r
-{\r
- //Line feed; default value is last cell height\r
- $this->x=$this->lMargin;\r
- if(is_string($h))\r
- $this->y+=$this->lasth;\r
- else\r
- $this->y+=$h;\r
-}\r
-\r
-function GetX()\r
-{\r
- //Get x position\r
- return $this->x;\r
-}\r
-\r
-function SetX($x)\r
-{\r
- //Set x position\r
- if($x>=0)\r
- $this->x=$x;\r
- else\r
- $this->x=$this->w+$x;\r
-}\r
-\r
-function GetY()\r
-{\r
- //Get y position\r
- return $this->y;\r
-}\r
-\r
-function SetY($y)\r
-{\r
- //Set y position and reset x\r
- $this->x=$this->lMargin;\r
- if($y>=0)\r
- $this->y=$y;\r
- else\r
- $this->y=$this->h+$y;\r
-}\r
-\r
-function SetXY($x,$y)\r
-{\r
- //Set x and y positions\r
- $this->SetY($y);\r
- $this->SetX($x);\r
-}\r
-\r
-function Output($name='',$dest='')\r
-{\r
- //Output PDF to some destination\r
- //Finish document if necessary\r
- if($this->state<3)\r
- $this->Close();\r
- //Normalize parameters\r
- if(is_bool($dest))\r
- $dest=$dest ? 'D' : 'F';\r
- $dest=strtoupper($dest);\r
- if($dest=='')\r
- {\r
- if($name=='')\r
- {\r
- $name='doc.pdf';\r
- $dest='I';\r
- }\r
- else\r
- $dest='F';\r
- }\r
- switch($dest)\r
- {\r
- case 'I':\r
- //Send to standard output\r
- if(ob_get_contents())\r
- $this->Error('Some data has already been output, can\'t send PDF file');\r
- if(php_sapi_name()!='cli')\r
- {\r
- //We send to a browser\r
- header('Content-Type: application/pdf');\r
- if(headers_sent())\r
- $this->Error('Some data has already been output to browser, can\'t send PDF file');\r
- header('Content-Length: '.strlen($this->buffer));\r
- header('Content-disposition: inline; filename="'.$name.'"');\r
- }\r
- echo $this->buffer;\r
- break;\r
- case 'D':\r
- //Download file\r
- if(ob_get_contents())\r
- $this->Error('Some data has already been output, can\'t send PDF file');\r
- if(isset($_SERVER['HTTP_USER_AGENT']) && strpos($_SERVER['HTTP_USER_AGENT'],'MSIE'))\r
- header('Content-Type: application/force-download');\r
- else\r
- header('Content-Type: application/octet-stream');\r
- if(headers_sent())\r
- $this->Error('Some data has already been output to browser, can\'t send PDF file');\r
- header('Content-Length: '.strlen($this->buffer));\r
- header('Content-disposition: attachment; filename="'.$name.'"');\r
- echo $this->buffer;\r
- break;\r
- case 'F':\r
- //Save to local file\r
- $f=fopen($name,'wb');\r
- if(!$f)\r
- $this->Error('Unable to create output file: '.$name);\r
- fwrite($f,$this->buffer,strlen($this->buffer));\r
- fclose($f);\r
- break;\r
- case 'S':\r
- //Return as a string\r
- return $this->buffer;\r
- default:\r
- $this->Error('Incorrect output destination: '.$dest);\r
- }\r
- return '';\r
-}\r
-\r
-/*******************************************************************************\r
-* *\r
-* Protected methods *\r
-* *\r
-*******************************************************************************/\r
-function _dochecks()\r
-{\r
- //Check for locale-related bug\r
- if(1.1==1)\r
- $this->Error('Don\'t alter the locale before including class file');\r
- //Check for decimal separator\r
- if(sprintf('%.1f',1.0)!='1.0')\r
- setlocale(LC_NUMERIC,'C');\r
-}\r
-\r
-function _getfontpath()\r
-{\r
- if(!defined('FPDF_FONTPATH') && is_dir(dirname(__FILE__).'/font'))\r
- define('FPDF_FONTPATH',dirname(__FILE__).'/font/');\r
- return defined('FPDF_FONTPATH') ? FPDF_FONTPATH : '';\r
-}\r
-\r
-function _putpages()\r
-{\r
- $nb=$this->page;\r
- if(!empty($this->AliasNbPages))\r
- {\r
- //Replace number of pages\r
- for($n=1;$n<=$nb;$n++)\r
- $this->pages[$n]=str_replace($this->AliasNbPages,$nb,$this->pages[$n]);\r
- }\r
- if($this->DefOrientation=='P')\r
- {\r
- $wPt=$this->fwPt;\r
- $hPt=$this->fhPt;\r
- }\r
- else\r
- {\r
- $wPt=$this->fhPt;\r
- $hPt=$this->fwPt;\r
- }\r
- $filter=($this->compress) ? '/Filter /FlateDecode ' : '';\r
- for($n=1;$n<=$nb;$n++)\r
- {\r
- //Page\r
- $this->_newobj();\r
- $this->_out('<</Type /Page');\r
- $this->_out('/Parent 1 0 R');\r
- if(isset($this->OrientationChanges[$n]))\r
- $this->_out(sprintf('/MediaBox [0 0 %.2f %.2f]',$hPt,$wPt));\r
- $this->_out('/Resources 2 0 R');\r
- if(isset($this->PageLinks[$n]))\r
- {\r
- //Links\r
- $annots='/Annots [';\r
- foreach($this->PageLinks[$n] as $pl)\r
- {\r
- $rect=sprintf('%.2f %.2f %.2f %.2f',$pl[0],$pl[1],$pl[0]+$pl[2],$pl[1]-$pl[3]);\r
- $annots.='<</Type /Annot /Subtype /Link /Rect ['.$rect.'] /Border [0 0 0] ';\r
- if(is_string($pl[4]))\r
- $annots.='/A <</S /URI /URI '.$this->_textstring($pl[4]).'>>>>';\r
- else\r
- {\r
- $l=$this->links[$pl[4]];\r
- $h=isset($this->OrientationChanges[$l[0]]) ? $wPt : $hPt;\r
- $annots.=sprintf('/Dest [%d 0 R /XYZ 0 %.2f null]>>',1+2*$l[0],$h-$l[1]*$this->k);\r
- }\r
- }\r
- $this->_out($annots.']');\r
- }\r
- $this->_out('/Contents '.($this->n+1).' 0 R>>');\r
- $this->_out('endobj');\r
- //Page content\r
- $p=($this->compress) ? gzcompress($this->pages[$n]) : $this->pages[$n];\r
- $this->_newobj();\r
- $this->_out('<<'.$filter.'/Length '.strlen($p).'>>');\r
- $this->_putstream($p);\r
- $this->_out('endobj');\r
- }\r
- //Pages root\r
- $this->offsets[1]=strlen($this->buffer);\r
- $this->_out('1 0 obj');\r
- $this->_out('<</Type /Pages');\r
- $kids='/Kids [';\r
- for($i=0;$i<$nb;$i++)\r
- $kids.=(3+2*$i).' 0 R ';\r
- $this->_out($kids.']');\r
- $this->_out('/Count '.$nb);\r
- $this->_out(sprintf('/MediaBox [0 0 %.2f %.2f]',$wPt,$hPt));\r
- $this->_out('>>');\r
- $this->_out('endobj');\r
-}\r
-\r
-function _putfonts()\r
-{\r
- $nf=$this->n;\r
- foreach($this->diffs as $diff)\r
- {\r
- //Encodings\r
- $this->_newobj();\r
- $this->_out('<</Type /Encoding /BaseEncoding /WinAnsiEncoding /Differences ['.$diff.']>>');\r
- $this->_out('endobj');\r
- }\r
- $mqr=get_magic_quotes_runtime();\r
- set_magic_quotes_runtime(0);\r
- foreach($this->FontFiles as $file=>$info)\r
- {\r
- //Font file embedding\r
- $this->_newobj();\r
- $this->FontFiles[$file]['n']=$this->n;\r
- $font='';\r
- $f=fopen($this->_getfontpath().$file,'rb',1);\r
- if(!$f)\r
- $this->Error('Font file not found');\r
- while(!feof($f))\r
- $font.=fread($f,8192);\r
- fclose($f);\r
- $compressed=(substr($file,-2)=='.z');\r
- if(!$compressed && isset($info['length2']))\r
- {\r
- $header=(ord($font{0})==128);\r
- if($header)\r
- {\r
- //Strip first binary header\r
- $font=substr($font,6);\r
- }\r
- if($header && ord($font{$info['length1']})==128)\r
- {\r
- //Strip second binary header\r
- $font=substr($font,0,$info['length1']).substr($font,$info['length1']+6);\r
- }\r
- }\r
- $this->_out('<</Length '.strlen($font));\r
- if($compressed)\r
- $this->_out('/Filter /FlateDecode');\r
- $this->_out('/Length1 '.$info['length1']);\r
- if(isset($info['length2']))\r
- $this->_out('/Length2 '.$info['length2'].' /Length3 0');\r
- $this->_out('>>');\r
- $this->_putstream($font);\r
- $this->_out('endobj');\r
- }\r
- set_magic_quotes_runtime($mqr);\r
- foreach($this->fonts as $k=>$font)\r
- {\r
- //Font objects\r
- $this->fonts[$k]['n']=$this->n+1;\r
- $type=$font['type'];\r
- $name=$font['name'];\r
- if($type=='core')\r
- {\r
- //Standard font\r
- $this->_newobj();\r
- $this->_out('<</Type /Font');\r
- $this->_out('/BaseFont /'.$name);\r
- $this->_out('/Subtype /Type1');\r
- if($name!='Symbol' && $name!='ZapfDingbats')\r
- $this->_out('/Encoding /WinAnsiEncoding');\r
- $this->_out('>>');\r
- $this->_out('endobj');\r
- }\r
- elseif($type=='Type1' || $type=='TrueType')\r
- {\r
- //Additional Type1 or TrueType font\r
- $this->_newobj();\r
- $this->_out('<</Type /Font');\r
- $this->_out('/BaseFont /'.$name);\r
- $this->_out('/Subtype /'.$type);\r
- $this->_out('/FirstChar 32 /LastChar 255');\r
- $this->_out('/Widths '.($this->n+1).' 0 R');\r
- $this->_out('/FontDescriptor '.($this->n+2).' 0 R');\r
- if($font['enc'])\r
- {\r
- if(isset($font['diff']))\r
- $this->_out('/Encoding '.($nf+$font['diff']).' 0 R');\r
- else\r
- $this->_out('/Encoding /WinAnsiEncoding');\r
- }\r
- $this->_out('>>');\r
- $this->_out('endobj');\r
- //Widths\r
- $this->_newobj();\r
- $cw=&$font['cw'];\r
- $s='[';\r
- for($i=32;$i<=255;$i++)\r
- $s.=$cw[chr($i)].' ';\r
- $this->_out($s.']');\r
- $this->_out('endobj');\r
- //Descriptor\r
- $this->_newobj();\r
- $s='<</Type /FontDescriptor /FontName /'.$name;\r
- foreach($font['desc'] as $k=>$v)\r
- $s.=' /'.$k.' '.$v;\r
- $file=$font['file'];\r
- if($file)\r
- $s.=' /FontFile'.($type=='Type1' ? '' : '2').' '.$this->FontFiles[$file]['n'].' 0 R';\r
- $this->_out($s.'>>');\r
- $this->_out('endobj');\r
- }\r
- else\r
- {\r
- //Allow for additional types\r
- $mtd='_put'.strtolower($type);\r
- if(!method_exists($this,$mtd))\r
- $this->Error('Unsupported font type: '.$type);\r
- $this->$mtd($font);\r
- }\r
- }\r
-}\r
-\r
-function _putimages()\r
-{\r
- $filter=($this->compress) ? '/Filter /FlateDecode ' : '';\r
- reset($this->images);\r
- while(list($file,$info)=each($this->images))\r
- {\r
- $this->_newobj();\r
- $this->images[$file]['n']=$this->n;\r
- $this->_out('<</Type /XObject');\r
- $this->_out('/Subtype /Image');\r
- $this->_out('/Width '.$info['w']);\r
- $this->_out('/Height '.$info['h']);\r
- if($info['cs']=='Indexed')\r
- $this->_out('/ColorSpace [/Indexed /DeviceRGB '.(strlen($info['pal'])/3-1).' '.($this->n+1).' 0 R]');\r
- else\r
- {\r
- $this->_out('/ColorSpace /'.$info['cs']);\r
- if($info['cs']=='DeviceCMYK')\r
- $this->_out('/Decode [1 0 1 0 1 0 1 0]');\r
- }\r
- $this->_out('/BitsPerComponent '.$info['bpc']);\r
- if(isset($info['f']))\r
- $this->_out('/Filter /'.$info['f']);\r
- if(isset($info['parms']))\r
- $this->_out($info['parms']);\r
- if(isset($info['trns']) && is_array($info['trns']))\r
- {\r
- $trns='';\r
- for($i=0;$i<count($info['trns']);$i++)\r
- $trns.=$info['trns'][$i].' '.$info['trns'][$i].' ';\r
- $this->_out('/Mask ['.$trns.']');\r
- }\r
- $this->_out('/Length '.strlen($info['data']).'>>');\r
- $this->_putstream($info['data']);\r
- unset($this->images[$file]['data']);\r
- $this->_out('endobj');\r
- //Palette\r
- if($info['cs']=='Indexed')\r
- {\r
- $this->_newobj();\r
- $pal=($this->compress) ? gzcompress($info['pal']) : $info['pal'];\r
- $this->_out('<<'.$filter.'/Length '.strlen($pal).'>>');\r
- $this->_putstream($pal);\r
- $this->_out('endobj');\r
- }\r
- }\r
-}\r
-\r
-function _putxobjectdict()\r
-{\r
- foreach($this->images as $image)\r
- $this->_out('/I'.$image['i'].' '.$image['n'].' 0 R');\r
-}\r
-\r
-function _putresourcedict()\r
-{\r
- $this->_out('/ProcSet [/PDF /Text /ImageB /ImageC /ImageI]');\r
- $this->_out('/Font <<');\r
- foreach($this->fonts as $font)\r
- $this->_out('/F'.$font['i'].' '.$font['n'].' 0 R');\r
- $this->_out('>>');\r
- $this->_out('/XObject <<');\r
- $this->_putxobjectdict();\r
- $this->_out('>>');\r
-}\r
-\r
-function _putresources()\r
-{\r
- $this->_putfonts();\r
- $this->_putimages();\r
- //Resource dictionary\r
- $this->offsets[2]=strlen($this->buffer);\r
- $this->_out('2 0 obj');\r
- $this->_out('<<');\r
- $this->_putresourcedict();\r
- $this->_out('>>');\r
- $this->_out('endobj');\r
-}\r
-\r
-function _putinfo()\r
-{\r
- $this->_out('/Producer '.$this->_textstring('FPDF '.FPDF_VERSION));\r
- if(!empty($this->title))\r
- $this->_out('/Title '.$this->_textstring($this->title));\r
- if(!empty($this->subject))\r
- $this->_out('/Subject '.$this->_textstring($this->subject));\r
- if(!empty($this->author))\r
- $this->_out('/Author '.$this->_textstring($this->author));\r
- if(!empty($this->keywords))\r
- $this->_out('/Keywords '.$this->_textstring($this->keywords));\r
- if(!empty($this->creator))\r
- $this->_out('/Creator '.$this->_textstring($this->creator));\r
- $this->_out('/CreationDate '.$this->_textstring('D:'.date('YmdHis')));\r
-}\r
-\r
-function _putcatalog()\r
-{\r
- $this->_out('/Type /Catalog');\r
- $this->_out('/Pages 1 0 R');\r
- if($this->ZoomMode=='fullpage')\r
- $this->_out('/OpenAction [3 0 R /Fit]');\r
- elseif($this->ZoomMode=='fullwidth')\r
- $this->_out('/OpenAction [3 0 R /FitH null]');\r
- elseif($this->ZoomMode=='real')\r
- $this->_out('/OpenAction [3 0 R /XYZ null null 1]');\r
- elseif(!is_string($this->ZoomMode))\r
- $this->_out('/OpenAction [3 0 R /XYZ null null '.($this->ZoomMode/100).']');\r
- if($this->LayoutMode=='single')\r
- $this->_out('/PageLayout /SinglePage');\r
- elseif($this->LayoutMode=='continuous')\r
- $this->_out('/PageLayout /OneColumn');\r
- elseif($this->LayoutMode=='two')\r
- $this->_out('/PageLayout /TwoColumnLeft');\r
-}\r
-\r
-function _putheader()\r
-{\r
- $this->_out('%PDF-'.$this->PDFVersion);\r
-}\r
-\r
-function _puttrailer()\r
-{\r
- $this->_out('/Size '.($this->n+1));\r
- $this->_out('/Root '.$this->n.' 0 R');\r
- $this->_out('/Info '.($this->n-1).' 0 R');\r
-}\r
-\r
-function _enddoc()\r
-{\r
- $this->_putheader();\r
- $this->_putpages();\r
- $this->_putresources();\r
- //Info\r
- $this->_newobj();\r
- $this->_out('<<');\r
- $this->_putinfo();\r
- $this->_out('>>');\r
- $this->_out('endobj');\r
- //Catalog\r
- $this->_newobj();\r
- $this->_out('<<');\r
- $this->_putcatalog();\r
- $this->_out('>>');\r
- $this->_out('endobj');\r
- //Cross-ref\r
- $o=strlen($this->buffer);\r
- $this->_out('xref');\r
- $this->_out('0 '.($this->n+1));\r
- $this->_out('0000000000 65535 f ');\r
- for($i=1;$i<=$this->n;$i++)\r
- $this->_out(sprintf('%010d 00000 n ',$this->offsets[$i]));\r
- //Trailer\r
- $this->_out('trailer');\r
- $this->_out('<<');\r
- $this->_puttrailer();\r
- $this->_out('>>');\r
- $this->_out('startxref');\r
- $this->_out($o);\r
- $this->_out('%%EOF');\r
- $this->state=3;\r
-}\r
-\r
-function _beginpage($orientation)\r
-{\r
- $this->page++;\r
- $this->pages[$this->page]='';\r
- $this->state=2;\r
- $this->x=$this->lMargin;\r
- $this->y=$this->tMargin;\r
- $this->FontFamily='';\r
- //Page orientation\r
- if(!$orientation)\r
- $orientation=$this->DefOrientation;\r
- else\r
- {\r
- $orientation=strtoupper($orientation{0});\r
- if($orientation!=$this->DefOrientation)\r
- $this->OrientationChanges[$this->page]=true;\r
- }\r
- if($orientation!=$this->CurOrientation)\r
- {\r
- //Change orientation\r
- if($orientation=='P')\r
- {\r
- $this->wPt=$this->fwPt;\r
- $this->hPt=$this->fhPt;\r
- $this->w=$this->fw;\r
- $this->h=$this->fh;\r
- }\r
- else\r
- {\r
- $this->wPt=$this->fhPt;\r
- $this->hPt=$this->fwPt;\r
- $this->w=$this->fh;\r
- $this->h=$this->fw;\r
- }\r
- $this->PageBreakTrigger=$this->h-$this->bMargin;\r
- $this->CurOrientation=$orientation;\r
- }\r
-}\r
-\r
-function _endpage()\r
-{\r
- //End of page contents\r
- $this->state=1;\r
-}\r
-\r
-function _newobj()\r
-{\r
- //Begin a new object\r
- $this->n++;\r
- $this->offsets[$this->n]=strlen($this->buffer);\r
- $this->_out($this->n.' 0 obj');\r
-}\r
-\r
-function _dounderline($x,$y,$txt)\r
-{\r
- //Underline text\r
- $up=$this->CurrentFont['up'];\r
- $ut=$this->CurrentFont['ut'];\r
- $w=$this->GetStringWidth($txt)+$this->ws*substr_count($txt,' ');\r
- return sprintf('%.2f %.2f %.2f %.2f re f',$x*$this->k,($this->h-($y-$up/1000*$this->FontSize))*$this->k,$w*$this->k,-$ut/1000*$this->FontSizePt);\r
-}\r
-\r
-function _parsejpg($file)\r
-{\r
- //Extract info from a JPEG file\r
- $a=GetImageSize($file);\r
- if(!$a)\r
- $this->Error('Missing or incorrect image file: '.$file);\r
- if($a[2]!=2)\r
- $this->Error('Not a JPEG file: '.$file);\r
- if(!isset($a['channels']) || $a['channels']==3)\r
- $colspace='DeviceRGB';\r
- elseif($a['channels']==4)\r
- $colspace='DeviceCMYK';\r
- else\r
- $colspace='DeviceGray';\r
- $bpc=isset($a['bits']) ? $a['bits'] : 8;\r
- //Read whole file\r
- $f=fopen($file,'rb');\r
- $data='';\r
- while(!feof($f))\r
- $data.=fread($f,4096);\r
- fclose($f);\r
- return array('w'=>$a[0],'h'=>$a[1],'cs'=>$colspace,'bpc'=>$bpc,'f'=>'DCTDecode','data'=>$data);\r
-}\r
-\r
-function _parsepng($file)\r
-{\r
- //Extract info from a PNG file\r
- $f=fopen($file,'rb');\r
- if(!$f)\r
- $this->Error('Can\'t open image file: '.$file);\r
- //Check signature\r
- if(fread($f,8)!=chr(137).'PNG'.chr(13).chr(10).chr(26).chr(10))\r
- $this->Error('Not a PNG file: '.$file);\r
- //Read header chunk\r
- fread($f,4);\r
- if(fread($f,4)!='IHDR')\r
- $this->Error('Incorrect PNG file: '.$file);\r
- $w=$this->_freadint($f);\r
- $h=$this->_freadint($f);\r
- $bpc=ord(fread($f,1));\r
- if($bpc>8)\r
- $this->Error('16-bit depth not supported: '.$file);\r
- $ct=ord(fread($f,1));\r
- if($ct==0)\r
- $colspace='DeviceGray';\r
- elseif($ct==2)\r
- $colspace='DeviceRGB';\r
- elseif($ct==3)\r
- $colspace='Indexed';\r
- else\r
- $this->Error('Alpha channel not supported: '.$file);\r
- if(ord(fread($f,1))!=0)\r
- $this->Error('Unknown compression method: '.$file);\r
- if(ord(fread($f,1))!=0)\r
- $this->Error('Unknown filter method: '.$file);\r
- if(ord(fread($f,1))!=0)\r
- $this->Error('Interlacing not supported: '.$file);\r
- fread($f,4);\r
- $parms='/DecodeParms <</Predictor 15 /Colors '.($ct==2 ? 3 : 1).' /BitsPerComponent '.$bpc.' /Columns '.$w.'>>';\r
- //Scan chunks looking for palette, transparency and image data\r
- $pal='';\r
- $trns='';\r
- $data='';\r
- do\r
- {\r
- $n=$this->_freadint($f);\r
- $type=fread($f,4);\r
- if($type=='PLTE')\r
- {\r
- //Read palette\r
- $pal=fread($f,$n);\r
- fread($f,4);\r
- }\r
- elseif($type=='tRNS')\r
- {\r
- //Read transparency info\r
- $t=fread($f,$n);\r
- if($ct==0)\r
- $trns=array(ord(substr($t,1,1)));\r
- elseif($ct==2)\r
- $trns=array(ord(substr($t,1,1)),ord(substr($t,3,1)),ord(substr($t,5,1)));\r
- else\r
- {\r
- $pos=strpos($t,chr(0));\r
- if($pos!==false)\r
- $trns=array($pos);\r
- }\r
- fread($f,4);\r
- }\r
- elseif($type=='IDAT')\r
- {\r
- //Read image data block\r
- $data.=fread($f,$n);\r
- fread($f,4);\r
- }\r
- elseif($type=='IEND')\r
- break;\r
- else\r
- fread($f,$n+4);\r
- }\r
- while($n);\r
- if($colspace=='Indexed' && empty($pal))\r
- $this->Error('Missing palette in '.$file);\r
- fclose($f);\r
- return array('w'=>$w,'h'=>$h,'cs'=>$colspace,'bpc'=>$bpc,'f'=>'FlateDecode','parms'=>$parms,'pal'=>$pal,'trns'=>$trns,'data'=>$data);\r
-}\r
-\r
-function _freadint($f)\r
-{\r
- //Read a 4-byte integer from file\r
- $a=unpack('Ni',fread($f,4));\r
- return $a['i'];\r
-}\r
-\r
-function _textstring($s)\r
-{\r
- //Format a text string\r
- return '('.$this->_escape($s).')';\r
-}\r
-\r
-function _escape($s)\r
-{\r
- //Add \ before \, ( and )\r
- return str_replace(')','\\)',str_replace('(','\\(',str_replace('\\','\\\\',$s)));\r
-}\r
-\r
-function _putstream($s)\r
-{\r
- $this->_out('stream');\r
- $this->_out($s);\r
- $this->_out('endstream');\r
-}\r
-\r
-function _out($s)\r
-{\r
- //Add a line to the document\r
- if($this->state==2)\r
- $this->pages[$this->page].=$s."\n";\r
- else\r
- $this->buffer.=$s."\n";\r
-}\r
-//End of class\r
-}\r
-\r
-//Handle special IE contype request\r
-if(isset($_SERVER['HTTP_USER_AGENT']) && $_SERVER['HTTP_USER_AGENT']=='contype')\r
-{\r
- header('Content-Type: application/pdf');\r
- exit;\r
-}\r
-\r
-}\r
-?>\r