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