1568 lines
		
	
	
		
			38 KiB
		
	
	
	
		
			PHP
		
	
	
	
		
		
			
		
	
	
			1568 lines
		
	
	
		
			38 KiB
		
	
	
	
		
			PHP
		
	
	
	
|  | <?php | ||
|  | /**************************************************************************** | ||
|  | * Software: FPDF                                                            * | ||
|  | * Version:  1.51                                                            * | ||
|  | * Date:     2002/08/03                                                      * | ||
|  | * Author:   Olivier PLATHEY                                                 * | ||
|  | * License:  Freeware                                                        * | ||
|  | *                                                                           * | ||
|  | * You may use and modify this software as you wish.                         * | ||
|  | ****************************************************************************/ | ||
|  | define('FPDF_VERSION','1.51'); | ||
|  | 
 | ||
|  | 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 $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 $k;                  //scale factor (number of points in user unit)
 | ||
|  | 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 positionning
 | ||
|  | 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
 | ||
|  | 
 | ||
|  | /**************************************************************************** | ||
|  | *                                                                           * | ||
|  | *                              Public methods                               * | ||
|  | *                                                                           * | ||
|  | ****************************************************************************/ | ||
|  | function FPDF($orientation='P',$unit='mm',$format='A4') | ||
|  | { | ||
|  | 	//Check for PHP locale-related bug
 | ||
|  | 	if(1.1==1) | ||
|  | 		$this->Error('Don\'t alter the locale before including class file'); | ||
|  | 	//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->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['courier']='Courier'; | ||
|  | 	$this->CoreFonts['courierB']='Courier-Bold'; | ||
|  | 	$this->CoreFonts['courierI']='Courier-Oblique'; | ||
|  | 	$this->CoreFonts['courierBI']='Courier-BoldOblique'; | ||
|  | 	$this->CoreFonts['helvetica']='Helvetica'; | ||
|  | 	$this->CoreFonts['helveticaB']='Helvetica-Bold'; | ||
|  | 	$this->CoreFonts['helveticaI']='Helvetica-Oblique'; | ||
|  | 	$this->CoreFonts['helveticaBI']='Helvetica-BoldOblique'; | ||
|  | 	$this->CoreFonts['times']='Times-Roman'; | ||
|  | 	$this->CoreFonts['timesB']='Times-Bold'; | ||
|  | 	$this->CoreFonts['timesI']='Times-Italic'; | ||
|  | 	$this->CoreFonts['timesBI']='Times-BoldItalic'; | ||
|  | 	$this->CoreFonts['symbol']='Symbol'; | ||
|  | 	$this->CoreFonts['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' or $orientation=='portrait') | ||
|  | 	{ | ||
|  | 		$this->DefOrientation='P'; | ||
|  | 		$this->wPt=$this->fwPt; | ||
|  | 		$this->hPt=$this->fhPt; | ||
|  | 	} | ||
|  | 	elseif($orientation=='l' or $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'); | ||
|  | 	//Compression
 | ||
|  | 	$this->SetCompression(true); | ||
|  | } | ||
|  | 
 | ||
|  | 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 and $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' or $zoom=='fullwidth' or $zoom=='real' or $zoom=='default' or !is_string($zoom)) | ||
|  | 		$this->ZoomMode=$zoom; | ||
|  | 	elseif($zoom=='zoom') | ||
|  | 		$this->ZoomMode=$layout; | ||
|  | 	else | ||
|  | 		$this->Error('Incorrect zoom display mode: '.$zoom); | ||
|  | 	if($layout=='single' or $layout=='continuous' or $layout=='two' or $layout=='default') | ||
|  | 		$this->LayoutMode=$layout; | ||
|  | 	elseif($zoom!='zoom') | ||
|  | 		$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->_begindoc(); | ||
|  | } | ||
|  | 
 | ||
|  | function Close() | ||
|  | { | ||
|  | 	//Terminate document
 | ||
|  | 	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
 | ||
|  | 	$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 and $g==0 and $b==0) or $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 and $g==0 and $b==0) or $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 and $g==0 and $b==0) or $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' or $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($family=='arial') | ||
|  | 		$family='helvetica'; | ||
|  | 	$style=strtoupper($style); | ||
|  | 	if($style=='IB') | ||
|  | 		$style='BI'; | ||
|  | 	if(isset($this->fonts[$family.$style])) | ||
|  | 		$this->Error('Font already added: '.$family.' '.$style); | ||
|  | 	if($file=='') | ||
|  | 		$file=str_replace(' ','',$family).strtolower($style).'.php'; | ||
|  | 	if(defined('FPDF_FONTPATH')) | ||
|  | 		$file=FPDF_FONTPATH.$file; | ||
|  | 	include($file); | ||
|  | 	if(!isset($name)) | ||
|  | 		$this->Error('Could not include font definition file'); | ||
|  | 	$i=count($this->fonts)+1; | ||
|  | 	$this->fonts[$family.$style]=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[$family.$style]['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' or $family=='zapfdingbats') | ||
|  | 		$style=''; | ||
|  | 	$style=strtoupper($style); | ||
|  | 	if(is_int(strpos($style,'U'))) | ||
|  | 	{ | ||
|  | 		$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 and $this->FontStyle==$style and $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' or $family=='helvetica') | ||
|  | 					$file.=strtolower($style); | ||
|  | 				$file.='.php'; | ||
|  | 				if(defined('FPDF_FONTPATH')) | ||
|  | 					$file=FPDF_FONTPATH.$file; | ||
|  | 				include($file); | ||
|  | 				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
 | ||
|  | 	$txt=str_replace(')','\\)',str_replace('(','\\(',str_replace('\\','\\\\',$txt))); | ||
|  | 	$s=sprintf('BT %.2f %.2f Td (%s) Tj ET',$x*$this->k,($this->h-$y)*$this->k,$txt); | ||
|  | 	if($this->underline and $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 and !$this->InFooter and $this->AcceptPageBreak()) | ||
|  | 	{ | ||
|  | 		$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 or $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(is_int(strpos($border,'L'))) | ||
|  | 			$s.=sprintf('%.2f %.2f m %.2f %.2f l S ',$x*$k,($this->h-$y)*$k,$x*$k,($this->h-($y+$h))*$k); | ||
|  | 		if(is_int(strpos($border,'T'))) | ||
|  | 			$s.=sprintf('%.2f %.2f m %.2f %.2f l S ',$x*$k,($this->h-$y)*$k,($x+$w)*$k,($this->h-$y)*$k); | ||
|  | 		if(is_int(strpos($border,'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); | ||
|  | 		if(is_int(strpos($border,'B'))) | ||
|  | 			$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; | ||
|  | 		$txt=str_replace(')','\\)',str_replace('(','\\(',str_replace('\\','\\\\',$txt))); | ||
|  | 		if($this->ColorFlag) | ||
|  | 			$s.='q '.$this->TextColor.' '; | ||
|  | 		$s.=sprintf('BT %.2f %.2f Td (%s) Tj ET',($this->x+$dx)*$k,($this->h-($this->y+.5*$h+.3*$this->FontSize))*$k,$txt); | ||
|  | 		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 and $s[$nb-1]=="\n") | ||
|  | 		$nb--; | ||
|  | 	$b=0; | ||
|  | 	if($border) | ||
|  | 	{ | ||
|  | 		if($border==1) | ||
|  | 		{ | ||
|  | 			$border='LTRB'; | ||
|  | 			$b='LRT'; | ||
|  | 			$b2='LR'; | ||
|  | 		} | ||
|  | 		else | ||
|  | 		{ | ||
|  | 			$b2=''; | ||
|  | 			if(is_int(strpos($border,'L'))) | ||
|  | 				$b2.='L'; | ||
|  | 			if(is_int(strpos($border,'R'))) | ||
|  | 				$b2.='R'; | ||
|  | 			$b=is_int(strpos($border,'T')) ? $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 and $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 and $nl==2) | ||
|  | 				$b=$b2; | ||
|  | 		} | ||
|  | 		else | ||
|  | 			$i++; | ||
|  | 	} | ||
|  | 	//Last chunk
 | ||
|  | 	if($this->ws>0) | ||
|  | 	{ | ||
|  | 		$this->ws=0; | ||
|  | 		$this->_out('0 Tw'); | ||
|  | 	} | ||
|  | 	if($border and is_int(strpos($border,'B'))) | ||
|  | 		$b.='B'; | ||
|  | 	$this->Cell($w,$h,substr($s,$j,$i),$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; | ||
|  | 			$ls=$l; | ||
|  | 		} | ||
|  | 		$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,$i),0,0,'',0,$link); | ||
|  | } | ||
|  | 
 | ||
|  | function Image($file,$x,$y,$w,$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' or $type=='jpeg') | ||
|  | 			$info=$this->_parsejpg($file); | ||
|  | 		elseif($type=='png') | ||
|  | 			$info=$this->_parsepng($file); | ||
|  | 		else | ||
|  | 			$this->Error('Unsupported image file type: '.$type); | ||
|  | 		set_magic_quotes_runtime($mqr); | ||
|  | 		$info['i']=count($this->images)+1; | ||
|  | 		$this->images[$file]=$info; | ||
|  | 	} | ||
|  | 	else | ||
|  | 		$info=$this->images[$file]; | ||
|  | 	//Automatic width or height calculation
 | ||
|  | 	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($file='',$download=false) | ||
|  | { | ||
|  | 	//Output PDF to file or browser
 | ||
|  | 	global $HTTP_ENV_VARS; | ||
|  | 
 | ||
|  | 	if($this->state<3) | ||
|  | 		$this->Close(); | ||
|  | 	if($file=='') | ||
|  | 	{ | ||
|  | 		//Send to 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=doc.pdf'); | ||
|  | 		echo $this->buffer; | ||
|  | 	} | ||
|  | 	else | ||
|  | 	{ | ||
|  | 		if($download) | ||
|  | 		{ | ||
|  | 			//Download file
 | ||
|  | 			if(isset($HTTP_ENV_VARS['HTTP_USER_AGENT']) and strpos($HTTP_ENV_VARS['HTTP_USER_AGENT'],'MSIE 5.5')) | ||
|  | 				Header('Content-Type: application/dummy'); | ||
|  | 			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='.$file); | ||
|  | 			echo $this->buffer; | ||
|  | 		} | ||
|  | 		else | ||
|  | 		{ | ||
|  | 			//Save file locally
 | ||
|  | 			$f=fopen($file,'wb'); | ||
|  | 			if(!$f) | ||
|  | 				$this->Error('Unable to create output file: '.$file); | ||
|  | 			fwrite($f,$this->buffer,strlen($this->buffer)); | ||
|  | 			fclose($f); | ||
|  | 		} | ||
|  | 	} | ||
|  | } | ||
|  | 
 | ||
|  | /**************************************************************************** | ||
|  | *                                                                           * | ||
|  | *                              Private methods                              * | ||
|  | *                                                                           * | ||
|  | ****************************************************************************/ | ||
|  | function _begindoc() | ||
|  | { | ||
|  | 	//Start document
 | ||
|  | 	$this->state=1; | ||
|  | 	$this->_out('%PDF-1.3'); | ||
|  | } | ||
|  | 
 | ||
|  | 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; | ||
|  | 		if(defined('FPDF_FONTPATH')) | ||
|  | 			$file=FPDF_FONTPATH.$file; | ||
|  | 		$size=filesize($file); | ||
|  | 		if(!$size) | ||
|  | 			$this->Error('Font file not found'); | ||
|  | 		$this->_out('<</Length '.$size); | ||
|  | 		if(substr($file,-2)=='.z') | ||
|  | 			$this->_out('/Filter /FlateDecode'); | ||
|  | 		$this->_out('/Length1 '.$info['length1']); | ||
|  | 		if(isset($info['length2'])) | ||
|  | 			$this->_out('/Length2 '.$info['length2'].' /Length3 0'); | ||
|  | 		$this->_out('>>'); | ||
|  | 		$f=fopen($file,'rb'); | ||
|  | 		$this->_putstream(fread($f,$size)); | ||
|  | 		fclose($f); | ||
|  | 		$this->_out('endobj'); | ||
|  | 	} | ||
|  | 	set_magic_quotes_runtime($mqr); | ||
|  | 	foreach($this->fonts as $k=>$font) | ||
|  | 	{ | ||
|  | 		//Font objects
 | ||
|  | 		$this->_newobj(); | ||
|  | 		$this->fonts[$k]['n']=$this->n; | ||
|  | 		$name=$font['name']; | ||
|  | 		$this->_out('<</Type /Font'); | ||
|  | 		$this->_out('/BaseFont /'.$name); | ||
|  | 		if($font['type']=='core') | ||
|  | 		{ | ||
|  | 			//Standard font
 | ||
|  | 			$this->_out('/Subtype /Type1'); | ||
|  | 			if($name!='Symbol' and $name!='ZapfDingbats') | ||
|  | 				$this->_out('/Encoding /WinAnsiEncoding'); | ||
|  | 		} | ||
|  | 		else | ||
|  | 		{ | ||
|  | 			//Additional font
 | ||
|  | 			$this->_out('/Subtype /'.$font['type']); | ||
|  | 			$this->_out('/FirstChar 32'); | ||
|  | 			$this->_out('/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'); | ||
|  | 		if($font['type']!='core') | ||
|  | 		{ | ||
|  | 			//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'.($font['type']=='Type1' ? '' : '2').' '.$this->FontFiles[$file]['n'].' 0 R'; | ||
|  | 			$this->_out($s.'>>'); | ||
|  | 			$this->_out('endobj'); | ||
|  | 		} | ||
|  | 	} | ||
|  | } | ||
|  | 
 | ||
|  | function _putimages() | ||
|  | { | ||
|  | 	$filter=($this->compress) ? '/Filter /FlateDecode ' : ''; | ||
|  | 	foreach($this->images as $file=>$info) | ||
|  | 	{ | ||
|  | 		$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']); | ||
|  | 		$this->_out('/Filter /'.$info['f']); | ||
|  | 		if(isset($info['parms'])) | ||
|  | 			$this->_out($info['parms']); | ||
|  | 		if(isset($info['trns']) and 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']); | ||
|  | 		$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 _putresources() | ||
|  | { | ||
|  | 	$this->_putfonts(); | ||
|  | 	$this->_putimages(); | ||
|  | 	//Resource dictionary
 | ||
|  | 	$this->offsets[2]=strlen($this->buffer); | ||
|  | 	$this->_out('2 0 obj'); | ||
|  | 	$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('>>'); | ||
|  | 	if(count($this->images)) | ||
|  | 	{ | ||
|  | 		$this->_out('/XObject <<'); | ||
|  | 		foreach($this->images as $image) | ||
|  | 			$this->_out('/I'.$image['i'].' '.$image['n'].' 0 R'); | ||
|  | 		$this->_out('>>'); | ||
|  | 	} | ||
|  | 	$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 _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->_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->lasth=0; | ||
|  | 	$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']) or $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=fread($f,filesize($file)); | ||
|  | 	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(is_int($pos)) | ||
|  | 					$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' and 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
 | ||
|  | 	$i=ord(fread($f,1))<<24; | ||
|  | 	$i+=ord(fread($f,1))<<16; | ||
|  | 	$i+=ord(fread($f,1))<<8; | ||
|  | 	$i+=ord(fread($f,1)); | ||
|  | 	return $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 silly IE contype request
 | ||
|  | if(isset($HTTP_ENV_VARS['HTTP_USER_AGENT']) and $HTTP_ENV_VARS['HTTP_USER_AGENT']=='contype') | ||
|  | { | ||
|  | 	Header('Content-Type: application/pdf'); | ||
|  | 	exit; | ||
|  | } | ||
|  | 
 | ||
|  | ?>
 |