|
<?php |
|
/******************************************************************************* |
|
* tFPDF (based on FPDF 1.7) * |
|
* * |
|
* Version: 1.24 * |
|
* Date: 2011-09-24 * |
|
* Author: Ian Back <ianb@bpm1.com> * |
|
* License: LGPL * |
|
*******************************************************************************/ |
|
|
|
define('tFPDF_VERSION','1.24'); |
|
|
|
class tFPDF |
|
{ |
|
|
|
var $unifontSubset; |
|
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 $k; // scale factor (number of points in user unit) |
|
var $DefOrientation; // default orientation |
|
var $CurOrientation; // current orientation |
|
var $StdPageSizes; // standard page sizes |
|
var $DefPageSize; // default page size |
|
var $CurPageSize; // current page size |
|
var $PageSizes; // used for pages with non default sizes or orientations |
|
var $wPt, $hPt; // dimensions of current page in points |
|
var $w, $h; // dimensions of current 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 |
|
var $lasth; // height of last printed cell |
|
var $LineWidth; // line width in user unit |
|
var $fontpath; // path containing fonts |
|
var $CoreFonts; // array of core font names |
|
var $fonts; // array of used fonts |
|
var $FontFiles; // array of font files |
|
var $diffs; // array of encoding differences |
|
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 $images; // array of used images |
|
var $PageLinks; // array of links in pages |
|
var $links; // array of internal links |
|
var $AutoPageBreak; // automatic page breaking |
|
var $PageBreakTrigger; // threshold used to trigger page breaks |
|
var $InHeader; // flag set when processing header |
|
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 tFPDF($orientation='P', $unit='mm', $size='A4') |
|
{ |
|
// Some checks |
|
$this->_dochecks(); |
|
// Initialization of properties |
|
$this->page = 0; |
|
$this->n = 2; |
|
$this->buffer = ''; |
|
$this->pages = array(); |
|
$this->PageSizes = array(); |
|
$this->state = 0; |
|
$this->fonts = array(); |
|
$this->FontFiles = array(); |
|
$this->diffs = array(); |
|
$this->images = array(); |
|
$this->links = array(); |
|
$this->InHeader = false; |
|
$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; |
|
// Font path |
|
if(defined('FPDF_FONTPATH')) |
|
{ |
|
$this->fontpath = FPDF_FONTPATH; |
|
if(substr($this->fontpath,-1)!='/' && substr($this->fontpath,-1)!='\\') |
|
$this->fontpath .= '/'; |
|
} |
|
elseif(is_dir(dirname(__FILE__).'/font')) |
|
$this->fontpath = dirname(__FILE__).'/font/'; |
|
else |
|
$this->fontpath = ''; |
|
// Core fonts |
|
$this->CoreFonts = array('courier', 'helvetica', 'times', 'symbol', '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 sizes |
|
$this->StdPageSizes = array('a3'=>array(841.89,1190.55), 'a4'=>array(595.28,841.89), 'a5'=>array(420.94,595.28), |
|
'letter'=>array(612,792), 'legal'=>array(612,1008)); |
|
$size = $this->_getpagesize($size); |
|
$this->DefPageSize = $size; |
|
$this->CurPageSize = $size; |
|
// Page orientation |
|
$orientation = strtolower($orientation); |
|
if($orientation=='p' || $orientation=='portrait') |
|
{ |
|
$this->DefOrientation = 'P'; |
|
$this->w = $size[0]; |
|
$this->h = $size[1]; |
|
} |
|
elseif($orientation=='l' || $orientation=='landscape') |
|
{ |
|
$this->DefOrientation = 'L'; |
|
$this->w = $size[1]; |
|
$this->h = $size[0]; |
|
} |
|
else |
|
$this->Error('Incorrect orientation: '.$orientation); |
|
$this->CurOrientation = $this->DefOrientation; |
|
$this->wPt = $this->w*$this->k; |
|
$this->hPt = $this->h*$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); |
|
// Default display mode |
|
$this->SetDisplayMode('default'); |
|
// Enable compression |
|
$this->SetCompression(true); |
|
// Set default PDF version number |
|
$this->PDFVersion = '1.3'; |
|
} |
|
|
|
function SetMargins($left, $top, $right=null) |
|
{ |
|
// Set left, top and right margins |
|
$this->lMargin = $left; |
|
$this->tMargin = $top; |
|
if($right===null) |
|
$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='default') |
|
{ |
|
// 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, $isUTF8=false) |
|
{ |
|
// Title of document |
|
if($isUTF8) |
|
$title = $this->_UTF8toUTF16($title); |
|
$this->title = $title; |
|
} |
|
|
|
function SetSubject($subject, $isUTF8=false) |
|
{ |
|
// Subject of document |
|
if($isUTF8) |
|
$subject = $this->_UTF8toUTF16($subject); |
|
$this->subject = $subject; |
|
} |
|
|
|
function SetAuthor($author, $isUTF8=false) |
|
{ |
|
// Author of document |
|
if($isUTF8) |
|
$author = $this->_UTF8toUTF16($author); |
|
$this->author = $author; |
|
} |
|
|
|
function SetKeywords($keywords, $isUTF8=false) |
|
{ |
|
// Keywords of document |
|
if($isUTF8) |
|
$keywords = $this->_UTF8toUTF16($keywords); |
|
$this->keywords = $keywords; |
|
} |
|
|
|
function SetCreator($creator, $isUTF8=false) |
|
{ |
|
// Creator of document |
|
if($isUTF8) |
|
$creator = $this->_UTF8toUTF16($creator); |
|
$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='', $size='') |
|
{ |
|
// Start a new page |
|
if($this->state==0) |
|
$this->Open(); |
|
$family = $this->FontFamily; |
|
$style = $this->FontStyle.($this->underline ? 'U' : ''); |
|
$fontsize = $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,$size); |
|
// 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,$fontsize); |
|
// 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->InHeader = true; |
|
$this->Header(); |
|
$this->InHeader = false; |
|
// 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,$fontsize); |
|
// 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=null, $b=null) |
|
{ |
|
// Set color for all stroking operations |
|
if(($r==0 && $g==0 && $b==0) || $g===null) |
|
$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=null, $b=null) |
|
{ |
|
// Set color for all filling operations |
|
if(($r==0 && $g==0 && $b==0) || $g===null) |
|
$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=null, $b=null) |
|
{ |
|
// Set color for text |
|
if(($r==0 && $g==0 && $b==0) || $g===null) |
|
$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; |
|
if ($this->unifontSubset) { |
|
$unicode = $this->UTF8StringToArray($s); |
|
foreach($unicode as $char) { |
|
if (isset($cw[$char])) { $w += (ord($cw[2*$char])<<8) + ord($cw[2*$char+1]); } |
|
else if($char>0 && $char<128 && isset($cw[chr($char)])) { $w += $cw[chr($char)]; } |
|
else if(isset($this->CurrentFont['desc']['MissingWidth'])) { $w += $this->CurrentFont['desc']['MissingWidth']; } |
|
else if(isset($this->CurrentFont['MissingWidth'])) { $w += $this->CurrentFont['MissingWidth']; } |
|
else { $w += 500; } |
|
} |
|
} |
|
else { |
|
$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='', $uni=false) |
|
{ |
|
// Add a TrueType, OpenType or Type1 font |
|
$family = strtolower($family); |
|
$style = strtoupper($style); |
|
if($style=='IB') |
|
$style='BI'; |
|
if($file=='') { |
|
if ($uni) { |
|
$file = str_replace(' ','',$family).strtolower($style).'.ttf'; |
|
} |
|
else { |
|
$file = str_replace(' ','',$family).strtolower($style).'.php'; |
|
} |
|
} |
|
$fontkey = $family.$style; |
|
if(isset($this->fonts[$fontkey])) |
|
return; |
|
|
|
if ($uni) { |
|
if (defined("_SYSTEM_TTFONTS") && file_exists(_SYSTEM_TTFONTS.$file )) { $ttffilename = _SYSTEM_TTFONTS.$file ; } |
|
else { $ttffilename = $this->_getfontpath().'unifont/'.$file ; } |
|
$unifilename = $this->_getfontpath().'unifont/'.strtolower(substr($file ,0,(strpos($file ,'.')))); |
|
$name = ''; |
|
$originalsize = 0; |
|
$ttfstat = stat($ttffilename); |
|
if (file_exists($unifilename.'.mtx.php')) { |
|
include($unifilename.'.mtx.php'); |
|
} |
|
if (!isset($type) || !isset($name) || $originalsize != $ttfstat['size']) { |
|
$ttffile = $ttffilename; |
|
require_once($this->_getfontpath().'unifont/ttfonts.php'); |
|
$ttf = new TTFontFile(); |
|
$ttf->getMetrics($ttffile); |
|
$cw = $ttf->charWidths; |
|
$name = preg_replace('/[ ()]/','',$ttf->fullName); |
|
|
|
$desc= array('Ascent'=>round($ttf->ascent), |
|
'Descent'=>round($ttf->descent), |
|
'CapHeight'=>round($ttf->capHeight), |
|
'Flags'=>$ttf->flags, |
|
'FontBBox'=>'['.round($ttf->bbox[0])." ".round($ttf->bbox[1])." ".round($ttf->bbox[2])." ".round($ttf->bbox[3]).']', |
|
'ItalicAngle'=>$ttf->italicAngle, |
|
'StemV'=>round($ttf->stemV), |
|
'MissingWidth'=>round($ttf->defaultWidth)); |
|
$up = round($ttf->underlinePosition); |
|
$ut = round($ttf->underlineThickness); |
|
$originalsize = $ttfstat['size']+0; |
|
$type = 'TTF'; |
|
// Generate metrics .php file |
|
$s='<?php'."\n"; |
|
$s.='$name=\''.$name."';\n"; |
|
$s.='$type=\''.$type."';\n"; |
|
$s.='$desc='.var_export($desc,true).";\n"; |
|
$s.='$up='.$up.";\n"; |
|
$s.='$ut='.$ut.";\n"; |
|
$s.='$ttffile=\''.$ttffile."';\n"; |
|
$s.='$originalsize='.$originalsize.";\n"; |
|
$s.='$fontkey=\''.$fontkey."';\n"; |
|
$s.="?>"; |
|
if (is_writable(dirname($this->_getfontpath().'unifont/'.'x'))) { |
|
$fh = fopen($unifilename.'.mtx.php',"w"); |
|
fwrite($fh,$s,strlen($s)); |
|
fclose($fh); |
|
$fh = fopen($unifilename.'.cw.dat',"wb"); |
|
fwrite($fh,$cw,strlen($cw)); |
|
fclose($fh); |
|
@unlink($unifilename.'.cw127.php'); |
|
} |
|
unset($ttf); |
|
} |
|
else { |
|
$cw = @file_get_contents($unifilename.'.cw.dat'); |
|
} |
|
$i = count($this->fonts)+1; |
|
if(!empty($this->AliasNbPages)) |
|
$sbarr = range(0,57); |
|
else |
|
$sbarr = range(0,32); |
|
$this->fonts[$fontkey] = array('i'=>$i, 'type'=>$type, 'name'=>$name, 'desc'=>$desc, 'up'=>$up, 'ut'=>$ut, 'cw'=>$cw, 'ttffile'=>$ttffile, 'fontkey'=>$fontkey, 'subset'=>$sbarr, 'unifilename'=>$unifilename); |
|
|
|
$this->FontFiles[$fontkey]=array('length1'=>$originalsize, 'type'=>"TTF", 'ttffile'=>$ttffile); |
|
$this->FontFiles[$file]=array('type'=>"TTF"); |
|
unset($cw); |
|
} |
|
else { |
|
$info = $this->_loadfont($file); |
|
$info['i'] = count($this->fonts)+1; |
|
if(!empty($info['diff'])) |
|
{ |
|
// Search existing encodings |
|
$n = array_search($info['diff'],$this->diffs); |
|
if(!$n) |
|
{ |
|
$n = count($this->diffs)+1; |
|
$this->diffs[$n] = $info['diff']; |
|
} |
|
$info['diffn'] = $n; |
|
} |
|
if(!empty($info['file'])) |
|
{ |
|
// Embedded font |
|
if($info['type']=='TrueType') |
|
$this->FontFiles[$info['file']] = array('length1'=>$info['originalsize']); |
|
else |
|
$this->FontFiles[$info['file']] = array('length1'=>$info['size1'], 'length2'=>$info['size2']); |
|
} |
|
$this->fonts[$fontkey] = $info; |
|
} |
|
} |
|
|
|
function SetFont($family, $style='', $size=0) |
|
{ |
|
// Select a font; size given in points |
|
if($family=='') |
|
$family = $this->FontFamily; |
|
else |
|
$family = strtolower($family); |
|
$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 font is already loaded |
|
$fontkey = $family.$style; |
|
if(!isset($this->fonts[$fontkey])) |
|
{ |
|
// Test if one of the core fonts |
|
if($family=='arial') |
|
$family = 'helvetica'; |
|
if(in_array($family,$this->CoreFonts)) |
|
{ |
|
if($family=='symbol' || $family=='zapfdingbats') |
|
$style = ''; |
|
$fontkey = $family.$style; |
|
if(!isset($this->fonts[$fontkey])) |
|
$this->AddFont($family,$style); |
|
} |
|
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->fonts[$fontkey]['type']=='TTF') { $this->unifontSubset = true; } |
|
else { $this->unifontSubset = false; } |
|
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 |
|
if ($this->unifontSubset) |
|
{ |
|
$txt2 = '('.$this->_escape($this->UTF8ToUTF16BE($txt, false)).')'; |
|
foreach($this->UTF8StringToArray($txt) as $uni) |
|
$this->CurrentFont['subset'][$uni] = $uni; |
|
} |
|
else |
|
$txt2 = '('.$this->_escape($txt).')'; |
|
$s = sprintf('BT %.2F %.2F Td %s Tj ET',$x*$this->k,($this->h-$y)*$this->k,$txt2); |
|
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=false, $link='') |
|
{ |
|
// Output a cell |
|
$k = $this->k; |
|
if($this->y+$h>$this->PageBreakTrigger && !$this->InHeader && !$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->CurPageSize); |
|
$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 || $border==1) |
|
{ |
|
if($fill) |
|
$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.' '; |
|
|
|
// If multibyte, Tw has no effect - do word spacing using an adjustment before each space |
|
if ($this->ws && $this->unifontSubset) { |
|
foreach($this->UTF8StringToArray($txt) as $uni) |
|
$this->CurrentFont['subset'][$uni] = $uni; |
|
$space = $this->_escape($this->UTF8ToUTF16BE(' ', false)); |
|
$s .= sprintf('BT 0 Tw %.2F %.2F Td [',($this->x+$dx)*$k,($this->h-($this->y+.5*$h+.3*$this->FontSize))*$k); |
|
$t = explode(' ',$txt); |
|
$numt = count($t); |
|
for($i=0;$i<$numt;$i++) { |
|
$tx = $t[$i]; |
|
$tx = '('.$this->_escape($this->UTF8ToUTF16BE($tx, false)).')'; |
|
$s .= sprintf('%s ',$tx); |
|
if (($i+1)<$numt) { |
|
$adj = -($this->ws*$this->k)*1000/$this->FontSizePt; |
|
$s .= sprintf('%d(%s) ',$adj,$space); |
|
} |
|
} |
|
$s .= '] TJ'; |
|
$s .= ' ET'; |
|
} |
|
else { |
|
if ($this->unifontSubset) |
|
{ |
|
$txt2 = '('.$this->_escape($this->UTF8ToUTF16BE($txt, false)).')'; |
|
foreach($this->UTF8StringToArray($txt) as $uni) |
|
$this->CurrentFont['subset'][$uni] = $uni; |
|
} |
|
else |
|
$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=false) |
|
{ |
|
// 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); |
|
$s = str_replace("\r",'',$txt); |
|
if ($this->unifontSubset) { |
|
$nb=mb_strlen($s, 'utf-8'); |
|
while($nb>0 && mb_substr($s,$nb-1,1,'utf-8')=="\n") $nb--; |
|
} |
|
else { |
|
$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 |
|
if ($this->unifontSubset) { |
|
$c = mb_substr($s,$i,1,'UTF-8'); |
|
} |
|
else { |
|
$c=$s[$i]; |
|
} |
|
if($c=="\n") |
|
{ |
|
// Explicit line break |
|
if($this->ws>0) |
|
{ |
|
$this->ws = 0; |
|
$this->_out('0 Tw'); |
|
} |
|
if ($this->unifontSubset) { |
|
$this->Cell($w,$h,mb_substr($s,$j,$i-$j,'UTF-8'),$b,2,$align,$fill); |
|
} |
|
else { |
|
$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++; |
|
} |
|
|
|
if ($this->unifontSubset) { $l += $this->GetStringWidth($c); } |
|
else { $l += $cw[$c]*$this->FontSize/1000; } |
|
|
|
if($l>$wmax) |
|
{ |
|
// Automatic line break |
|
if($sep==-1) |
|
{ |
|
if($i==$j) |
|
$i++; |
|
if($this->ws>0) |
|
{ |
|
$this->ws = 0; |
|
$this->_out('0 Tw'); |
|
} |
|
if ($this->unifontSubset) { |
|
$this->Cell($w,$h,mb_substr($s,$j,$i-$j,'UTF-8'),$b,2,$align,$fill); |
|
} |
|
else { |
|
$this->Cell($w,$h,substr($s,$j,$i-$j),$b,2,$align,$fill); |
|
} |
|
} |
|
else |
|
{ |
|
if($align=='J') |
|
{ |
|
$this->ws = ($ns>1) ? ($wmax-$ls)/($ns-1) : 0; |
|
$this->_out(sprintf('%.3F Tw',$this->ws*$this->k)); |
|
} |
|
if ($this->unifontSubset) { |
|
$this->Cell($w,$h,mb_substr($s,$j,$sep-$j,'UTF-8'),$b,2,$align,$fill); |
|
} |
|
else { |
|
$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'; |
|
if ($this->unifontSubset) { |
|
$this->Cell($w,$h,mb_substr($s,$j,$i-$j,'UTF-8'),$b,2,$align,$fill); |
|
} |
|
else { |
|
$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); |
|
$s = str_replace("\r",'',$txt); |
|
if ($this->unifontSubset) { |
|
$nb = mb_strlen($s, 'UTF-8'); |
|
if($nb==1 && $s==" ") { |
|
$this->x += $this->GetStringWidth($s); |
|
return; |
|
} |
|
} |
|
else { |
|
$nb = strlen($s); |
|
} |
|
$sep = -1; |
|
$i = 0; |
|
$j = 0; |
|
$l = 0; |
|
$nl = 1; |
|
while($i<$nb) |
|
{ |
|
// Get next character |
|
if ($this->unifontSubset) { |
|
$c = mb_substr($s,$i,1,'UTF-8'); |
|
} |
|
else { |
|
$c = $s[$i]; |
|
} |
|
if($c=="\n") |
|
{ |
|
// Explicit line break |
|
if ($this->unifontSubset) { |
|
$this->Cell($w,$h,mb_substr($s,$j,$i-$j,'UTF-8'),0,2,'',0,$link); |
|
} |
|
else { |
|
$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); |
|
} |
|
$nl++; |
|
continue; |
|
} |
|
if($c==' ') |
|
$sep = $i; |
|
|
|
if ($this->unifontSubset) { $l += $this->GetStringWidth($c); } |
|
else { $l += $cw[$c]*$this->FontSize/1000; } |
|
|
|
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); |
|
$i++; |
|
$nl++; |
|
continue; |
|
} |
|
if($i==$j) |
|
$i++; |
|
if ($this->unifontSubset) { |
|
$this->Cell($w,$h,mb_substr($s,$j,$i-$j,'UTF-8'),0,2,'',0,$link); |
|
} |
|
else { |
|
$this->Cell($w,$h,substr($s,$j,$i-$j),0,2,'',0,$link); |
|
} |
|
} |
|
else |
|
{ |
|
if ($this->unifontSubset) { |
|
$this->Cell($w,$h,mb_substr($s,$j,$sep-$j,'UTF-8'),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); |
|
} |
|
$nl++; |
|
} |
|
else |
|
$i++; |
|
} |
|
// Last chunk |
|
if($i!=$j) { |
|
if ($this->unifontSubset) { |
|
$this->Cell($l,$h,mb_substr($s,$j,$i-$j,'UTF-8'),0,0,'',0,$link); |
|
} |
|
else { |
|
$this->Cell($l,$h,substr($s,$j),0,0,'',0,$link); |
|
} |
|
} |
|
} |
|
|
|
function Ln($h=null) |
|
{ |
|
// Line feed; default value is last cell height |
|
$this->x = $this->lMargin; |
|
if($h===null) |
|
$this->y += $this->lasth; |
|
else |
|
$this->y += $h; |
|
} |
|
|
|
function Image($file, $x=null, $y=null, $w=0, $h=0, $type='', $link='') |
|
{ |
|
// Put an image on the page |
|
if(!isset($this->images[$file])) |
|
{ |
|
// First use of this 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); |
|
if($type=='jpeg') |
|
$type = 'jpg'; |
|
$mtd = '_parse'.$type; |
|
if(!method_exists($this,$mtd)) |
|
$this->Error('Unsupported image type: '.$type); |
|
$info = $this->$mtd($file); |
|
$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 96 dpi |
|
$w = -96; |
|
$h = -96; |
|
} |
|
if($w<0) |
|
$w = -$info['w']*72/$w/$this->k; |
|
if($h<0) |
|
$h = -$info['h']*72/$h/$this->k; |
|
if($w==0) |
|
$w = $h*$info['w']/$info['h']; |
|
if($h==0) |
|
$h = $w*$info['h']/$info['w']; |
|
|
|
// Flowing mode |
|
if($y===null) |
|
{ |
|
if($this->y+$h>$this->PageBreakTrigger && !$this->InHeader && !$this->InFooter && $this->AcceptPageBreak()) |
|
{ |
|
// Automatic page break |
|
$x2 = $this->x; |
|
$this->AddPage($this->CurOrientation,$this->CurPageSize); |
|
$this->x = $x2; |
|
} |
|
$y = $this->y; |
|
$this->y += $h; |
|
} |
|
|
|
if($x===null) |
|
$x = $this->x; |
|
$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 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 |
|
if($this->state<3) |
|
$this->Close(); |
|
$dest = strtoupper($dest); |
|
if($dest=='') |
|
{ |
|
if($name=='') |
|
{ |
|
$name = 'doc.pdf'; |
|
$dest = 'I'; |
|
} |
|
else |
|
$dest = 'F'; |
|
} |
|
switch($dest) |
|
{ |
|
case 'I': |
|
// Send to standard output |
|
$this->_checkoutput(); |
|
if(PHP_SAPI!='cli') |
|
{ |
|
// We send to a browser |
|
header('Content-Type: application/pdf'); |
|
header('Content-Disposition: inline; filename="'.$name.'"'); |
|
header('Cache-Control: private, max-age=0, must-revalidate'); |
|
header('Pragma: public'); |
|
} |
|
echo $this->buffer; |
|
break; |
|
case 'D': |
|
// Download file |
|
$this->_checkoutput(); |
|
header('Content-Type: application/x-download'); |
|
header('Content-Disposition: attachment; filename="'.$name.'"'); |
|
header('Cache-Control: private, max-age=0, must-revalidate'); |
|
header('Pragma: public'); |
|
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 availability of %F |
|
if(sprintf('%.1F',1.0)!='1.0') |
|
$this->Error('This version of PHP is not supported'); |
|
// Check availability of mbstring |
|
if(!function_exists('mb_strlen')) |
|
$this->Error('mbstring extension is not available'); |
|
// Check mbstring overloading |
|
if(ini_get('mbstring.func_overload') & 2) |
|
$this->Error('mbstring overloading must be disabled'); |
|
// Ensure runtime magic quotes are disabled |
|
if(get_magic_quotes_runtime()) |
|
@set_magic_quotes_runtime(0); |
|
} |
|
|
|
function _getfontpath() |
|
{ |
|
return $this->fontpath; |
|
} |
|
|
|
function _checkoutput() |
|
{ |
|
if(PHP_SAPI!='cli') |
|
{ |
|
if(headers_sent($file,$line)) |
|
$this->Error("Some data has already been output, can't send PDF file (output started at $file:$line)"); |
|
} |
|
if(ob_get_length()) |
|
{ |
|
// The output buffer is not empty |
|
if(preg_match('/^(\xEF\xBB\xBF)?\s*$/',ob_get_contents())) |
|
{ |
|
// It contains only a UTF-8 BOM and/or whitespace, let's clean it |
|
ob_clean(); |
|
} |
|
else |
|
$this->Error("Some data has already been output, can't send PDF file"); |
|
} |
|
} |
|
|
|
function _getpagesize($size) |
|
{ |
|
if(is_string($size)) |
|
{ |
|
$size = strtolower($size); |
|
if(!isset($this->StdPageSizes[$size])) |
|
$this->Error('Unknown page size: '.$size); |
|
$a = $this->StdPageSizes[$size]; |
|
return array($a[0]/$this->k, $a[1]/$this->k); |
|
} |
|
else |
|
{ |
|
if($size[0]>$size[1]) |
|
return array($size[1], $size[0]); |
|
else |
|
return $size; |
|
} |
|
} |
|
|
|
function _beginpage($orientation, $size) |
|
{ |
|
$this->page++; |
|
$this->pages[$this->page] = ''; |
|
$this->state = 2; |
|
$this->x = $this->lMargin; |
|
$this->y = $this->tMargin; |
|
$this->FontFamily = ''; |
|
// Check page size and orientation |
|
if($orientation=='') |
|
$orientation = $this->DefOrientation; |
|
else |
|
$orientation = strtoupper($orientation[0]); |
|
if($size=='') |
|
$size = $this->DefPageSize; |
|
else |
|
$size = $this->_getpagesize($size); |
|
if($orientation!=$this->CurOrientation || $size[0]!=$this->CurPageSize[0] || $size[1]!=$this->CurPageSize[1]) |
|
{ |
|
// New size or orientation |
|
if($orientation=='P') |
|
{ |
|
$this->w = $size[0]; |
|
$this->h = $size[1]; |
|
} |
|
else |
|
{ |
|
$this->w = $size[1]; |
|
$this->h = $size[0]; |
|
} |
|
$this->wPt = $this->w*$this->k; |
|
$this->hPt = $this->h*$this->k; |
|
$this->PageBreakTrigger = $this->h-$this->bMargin; |
|
$this->CurOrientation = $orientation; |
|
$this->CurPageSize = $size; |
|
} |
|
if($orientation!=$this->DefOrientation || $size[0]!=$this->DefPageSize[0] || $size[1]!=$this->DefPageSize[1]) |
|
$this->PageSizes[$this->page] = array($this->wPt, $this->hPt); |
|
} |
|
|
|
function _endpage() |
|
{ |
|
$this->state = 1; |
|
} |
|
|
|
function _loadfont($font) |
|
{ |
|
// Load a font definition file from the font directory |
|
include($this->fontpath.$font); |
|
$a = get_defined_vars(); |
|
if(!isset($a['name'])) |
|
$this->Error('Could not include font definition file'); |
|
return $a; |
|
} |
|
|
|
function _escape($s) |
|
{ |
|
// Escape special characters in strings |
|
$s = str_replace('\\','\\\\',$s); |
|
$s = str_replace('(','\\(',$s); |
|
$s = str_replace(')','\\)',$s); |
|
$s = str_replace("\r",'\\r',$s); |
|
return $s; |
|
} |
|
|
|
function _textstring($s) |
|
{ |
|
// Format a text string |
|
return '('.$this->_escape($s).')'; |
|
} |
|
|
|
function _UTF8toUTF16($s) |
|
{ |
|
// Convert UTF-8 to UTF-16BE with BOM |
|
$res = "\xFE\xFF"; |
|
$nb = strlen($s); |
|
$i = 0; |
|
while($i<$nb) |
|
{ |
|
$c1 = ord($s[$i++]); |
|
if($c1>=224) |
|
{ |
|
// 3-byte character |
|
$c2 = ord($s[$i++]); |
|
$c3 = ord($s[$i++]); |
|
$res .= chr((($c1 & 0x0F)<<4) + (($c2 & 0x3C)>>2)); |
|
$res .= chr((($c2 & 0x03)<<6) + ($c3 & 0x3F)); |
|
} |
|
elseif($c1>=192) |
|
{ |
|
// 2-byte character |
|
$c2 = ord($s[$i++]); |
|
$res .= chr(($c1 & 0x1C)>>2); |
|
$res .= chr((($c1 & 0x03)<<6) + ($c2 & 0x3F)); |
|
} |
|
else |
|
{ |
|
// Single-byte character |
|
$res .= "\0".chr($c1); |
|
} |
|
} |
|
return $res; |
|
} |
|
|
|
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; |
|
$data = file_get_contents($file); |
|
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); |
|
$info = $this->_parsepngstream($f,$file); |
|
fclose($f); |
|
return $info; |
|
} |
|
|
|
function _parsepngstream($f, $file) |
|
{ |
|
// Check signature |
|
if($this->_readstream($f,8)!=chr(137).'PNG'.chr(13).chr(10).chr(26).chr(10)) |
|
$this->Error('Not a PNG file: '.$file); |
|
|
|
// Read header chunk |
|
$this->_readstream($f,4); |
|
if($this->_readstream($f,4)!='IHDR') |
|
$this->Error('Incorrect PNG file: '.$file); |
|
$w = $this->_readint($f); |
|
$h = $this->_readint($f); |
|
$bpc = ord($this->_readstream($f,1)); |
|
if($bpc>8) |
|
$this->Error('16-bit depth not supported: '.$file); |
|
$ct = ord($this->_readstream($f,1)); |
|
if($ct==0 || $ct==4) |
|
$colspace = 'DeviceGray'; |
|
elseif($ct==2 || $ct==6) |
|
$colspace = 'DeviceRGB'; |
|
elseif($ct==3) |
|
$colspace = 'Indexed'; |
|
else |
|
$this->Error('Unknown color type: '.$file); |
|
if(ord($this->_readstream($f,1))!=0) |
|
$this->Error('Unknown compression method: '.$file); |
|
if(ord($this->_readstream($f,1))!=0) |
|
$this->Error('Unknown filter method: '.$file); |
|
if(ord($this->_readstream($f,1))!=0) |
|
$this->Error('Interlacing not supported: '.$file); |
|
$this->_readstream($f,4); |
|
$dp = '/Predictor 15 /Colors '.($colspace=='DeviceRGB' ? 3 : 1).' /BitsPerComponent '.$bpc.' /Columns '.$w; |
|
|
|
// Scan chunks looking for palette, transparency and image data |
|
$pal = ''; |
|
$trns = ''; |
|
$data = ''; |
|
do |
|
{ |
|
$n = $this->_readint($f); |
|
$type = $this->_readstream($f,4); |
|
if($type=='PLTE') |
|
{ |
|
// Read palette |
|
$pal = $this->_readstream($f,$n); |
|
$this->_readstream($f,4); |
|
} |
|
elseif($type=='tRNS') |
|
{ |
|
// Read transparency info |
|
$t = $this->_readstream($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); |
|
} |
|
$this->_readstream($f,4); |
|
} |
|
elseif($type=='IDAT') |
|
{ |
|
// Read image data block |
|
$data .= $this->_readstream($f,$n); |
|
$this->_readstream($f,4); |
|
} |
|
elseif($type=='IEND') |
|
break; |
|
else |
|
$this->_readstream($f,$n+4); |
|
} |
|
while($n); |
|
|
|
if($colspace=='Indexed' && empty($pal)) |
|
$this->Error('Missing palette in '.$file); |
|
$info = array('w'=>$w, 'h'=>$h, 'cs'=>$colspace, 'bpc'=>$bpc, 'f'=>'FlateDecode', 'dp'=>$dp, 'pal'=>$pal, 'trns'=>$trns); |
|
if($ct>=4) |
|
{ |
|
// Extract alpha channel |
|
if(!function_exists('gzuncompress')) |
|
$this->Error('Zlib not available, can\'t handle alpha channel: '.$file); |
|
$data = gzuncompress($data); |
|
$color = ''; |
|
$alpha = ''; |
|
if($ct==4) |
|
{ |
|
// Gray image |
|
$len = 2*$w; |
|
for($i=0;$i<$h;$i++) |
|
{ |
|
$pos = (1+$len)*$i; |
|
$color .= $data[$pos]; |
|
$alpha .= $data[$pos]; |
|
$line = substr($data,$pos+1,$len); |
|
$color .= preg_replace('/(.)./s','$1',$line); |
|
$alpha .= preg_replace('/.(.)/s','$1',$line); |
|
} |
|
} |
|
else |
|
{ |
|
// RGB image |
|
$len = 4*$w; |
|
for($i=0;$i<$h;$i++) |
|
{ |
|
$pos = (1+$len)*$i; |
|
$color .= $data[$pos]; |
|
$alpha .= $data[$pos]; |
|
$line = substr($data,$pos+1,$len); |
|
$color .= preg_replace('/(.{3})./s','$1',$line); |
|
$alpha .= preg_replace('/.{3}(.)/s','$1',$line); |
|
} |
|
} |
|
unset($data); |
|
$data = gzcompress($color); |
|
$info['smask'] = gzcompress($alpha); |
|
if($this->PDFVersion<'1.4') |
|
$this->PDFVersion = '1.4'; |
|
} |
|
$info['data'] = $data; |
|
return $info; |
|
} |
|
|
|
function _readstream($f, $n) |
|
{ |
|
// Read n bytes from stream |
|
$res = ''; |
|
while($n>0 && !feof($f)) |
|
{ |
|
$s = fread($f,$n); |
|
if($s===false) |
|
$this->Error('Error while reading stream'); |
|
$n -= strlen($s); |
|
$res .= $s; |
|
} |
|
if($n>0) |
|
$this->Error('Unexpected end of stream'); |
|
return $res; |
|
} |
|
|
|
function _readint($f) |
|
{ |
|
// Read a 4-byte integer from stream |
|
$a = unpack('Ni',$this->_readstream($f,4)); |
|
return $a['i']; |
|
} |
|
|
|
function _parsegif($file) |
|
{ |
|
// Extract info from a GIF file (via PNG conversion) |
|
if(!function_exists('imagepng')) |
|
$this->Error('GD extension is required for GIF support'); |
|
if(!function_exists('imagecreatefromgif')) |
|
$this->Error('GD has no GIF read support'); |
|
$im = imagecreatefromgif($file); |
|
if(!$im) |
|
$this->Error('Missing or incorrect image file: '.$file); |
|
imageinterlace($im,0); |
|
$f = @fopen('php://temp','rb+'); |
|
if($f) |
|
{ |
|
// Perform conversion in memory |
|
ob_start(); |
|
imagepng($im); |
|
$data = ob_get_clean(); |
|
imagedestroy($im); |
|
fwrite($f,$data); |
|
rewind($f); |
|
$info = $this->_parsepngstream($f,$file); |
|
fclose($f); |
|
} |
|
else |
|
{ |
|
// Use temporary file |
|
$tmp = tempnam('.','gif'); |
|
if(!$tmp) |
|
$this->Error('Unable to create a temporary file'); |
|
if(!imagepng($im,$tmp)) |
|
$this->Error('Error while saving to temporary file'); |
|
imagedestroy($im); |
|
$info = $this->_parsepng($tmp); |
|
unlink($tmp); |
|
} |
|
return $info; |
|
} |
|
|
|
function _newobj() |
|
{ |
|
// Begin a new object |
|
$this->n++; |
|
$this->offsets[$this->n] = strlen($this->buffer); |
|
$this->_out($this->n.' 0 obj'); |
|
} |
|
|
|
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"; |
|
} |
|
|
|
function _putpages() |
|
{ |
|
$nb = $this->page; |
|
if(!empty($this->AliasNbPages)) |
|
{ |
|
// Replace number of pages in fonts using subsets |
|
$alias = $this->UTF8ToUTF16BE($this->AliasNbPages, false); |
|
$r = $this->UTF8ToUTF16BE("$nb", false); |
|
for($n=1;$n<=$nb;$n++) |
|
$this->pages[$n] = str_replace($alias,$r,$this->pages[$n]); |
|
// Now repeat for no pages in non-subset fonts |
|
for($n=1;$n<=$nb;$n++) |
|
$this->pages[$n] = str_replace($this->AliasNbPages,$nb,$this->pages[$n]); |
|
} |
|
if($this->DefOrientation=='P') |
|
{ |
|
$wPt = $this->DefPageSize[0]*$this->k; |
|
$hPt = $this->DefPageSize[1]*$this->k; |
|
} |
|
else |
|
{ |
|
$wPt = $this->DefPageSize[1]*$this->k; |
|
$hPt = $this->DefPageSize[0]*$this->k; |
|
} |
|
$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->PageSizes[$n])) |
|
$this->_out(sprintf('/MediaBox [0 0 %.2F %.2F]',$this->PageSizes[$n][0],$this->PageSizes[$n][1])); |
|
$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->PageSizes[$l[0]]) ? $this->PageSizes[$l[0]][1] : $hPt; |
|
$annots .= sprintf('/Dest [%d 0 R /XYZ 0 %.2F null]>>',1+2*$l[0],$h-$l[1]*$this->k); |
|
} |
|
} |
|
$this->_out($annots.']'); |
|
} |
|
if($this->PDFVersion>'1.3') |
|
$this->_out('/Group <</Type /Group /S /Transparency /CS /DeviceRGB>>'); |
|
$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'); |
|
} |
|
foreach($this->FontFiles as $file=>$info) |
|
{ |
|
if (!isset($info['type']) || $info['type']!='TTF') { |
|
// 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'); |
|
} |
|
} |
|
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->fonts[$k]['n']=$this->n+1; |
|
$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->fonts[$k]['n']=$this->n+1; |
|
$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'); |
|
} |
|
// TrueType embedded SUBSETS or FULL |
|
else if ($type=='TTF') { |
|
$this->fonts[$k]['n']=$this->n+1; |
|
require_once($this->_getfontpath().'unifont/ttfonts.php'); |
|
$ttf = new TTFontFile(); |
|
$fontname = 'MPDFAA'.'+'.$font['name']; |
|
$subset = $font['subset']; |
|
unset($subset[0]); |
|
$ttfontstream = $ttf->makeSubset($font['ttffile'], $subset); |
|
$ttfontsize = strlen($ttfontstream); |
|
$fontstream = gzcompress($ttfontstream); |
|
$codeToGlyph = $ttf->codeToGlyph; |
|
unset($codeToGlyph[0]); |
|
|
|
// Type0 Font |
|
// A composite font - a font composed of other fonts, organized hierarchically |
|
$this->_newobj(); |
|
$this->_out('<</Type /Font'); |
|
$this->_out('/Subtype /Type0'); |
|
$this->_out('/BaseFont /'.$fontname.''); |
|
$this->_out('/Encoding /Identity-H'); |
|
$this->_out('/DescendantFonts ['.($this->n + 1).' 0 R]'); |
|
$this->_out('/ToUnicode '.($this->n + 2).' 0 R'); |
|
$this->_out('>>'); |
|
$this->_out('endobj'); |
|
|
|
// CIDFontType2 |
|
// A CIDFont whose glyph descriptions are based on TrueType font technology |
|
$this->_newobj(); |
|
$this->_out('<</Type /Font'); |
|
$this->_out('/Subtype /CIDFontType2'); |
|
$this->_out('/BaseFont /'.$fontname.''); |
|
$this->_out('/CIDSystemInfo '.($this->n + 2).' 0 R'); |
|
$this->_out('/FontDescriptor '.($this->n + 3).' 0 R'); |
|
if (isset($font['desc']['MissingWidth'])){ |
|
$this->_out('/DW '.$font['desc']['MissingWidth'].''); |
|
} |
|
|
|
$this->_putTTfontwidths($font, $ttf->maxUni); |
|
|
|
$this->_out('/CIDToGIDMap '.($this->n + 4).' 0 R'); |
|
$this->_out('>>'); |
|
$this->_out('endobj'); |
|
|
|
// ToUnicode |
|
$this->_newobj(); |
|
$toUni = "/CIDInit /ProcSet findresource begin\n"; |
|
$toUni .= "12 dict begin\n"; |
|
$toUni .= "begincmap\n"; |
|
$toUni .= "/CIDSystemInfo\n"; |
|
$toUni .= "<</Registry (Adobe)\n"; |
|
$toUni .= "/Ordering (UCS)\n"; |
|
$toUni .= "/Supplement 0\n"; |
|
$toUni .= ">> def\n"; |
|
$toUni .= "/CMapName /Adobe-Identity-UCS def\n"; |
|
$toUni .= "/CMapType 2 def\n"; |
|
$toUni .= "1 begincodespacerange\n"; |
|
$toUni .= "<0000> <FFFF>\n"; |
|
$toUni .= "endcodespacerange\n"; |
|
$toUni .= "1 beginbfrange\n"; |
|
$toUni .= "<0000> <FFFF> <0000>\n"; |
|
$toUni .= "endbfrange\n"; |
|
$toUni .= "endcmap\n"; |
|
$toUni .= "CMapName currentdict /CMap defineresource pop\n"; |
|
$toUni .= "end\n"; |
|
$toUni .= "end"; |
|
$this->_out('<</Length '.(strlen($toUni)).'>>'); |
|
$this->_putstream($toUni); |
|
$this->_out('endobj'); |
|
|
|
// CIDSystemInfo dictionary |
|
$this->_newobj(); |
|
$this->_out('<</Registry (Adobe)'); |
|
$this->_out('/Ordering (UCS)'); |
|
$this->_out('/Supplement 0'); |
|
$this->_out('>>'); |
|
$this->_out('endobj'); |
|
|
|
// Font descriptor |
|
$this->_newobj(); |
|
$this->_out('<</Type /FontDescriptor'); |
|
$this->_out('/FontName /'.$fontname); |
|
foreach($font['desc'] as $kd=>$v) { |
|
if ($kd == 'Flags') { $v = $v | 4; $v = $v & ~32; } // SYMBOLIC font flag |
|
$this->_out(' /'.$kd.' '.$v); |
|
} |
|
$this->_out('/FontFile2 '.($this->n + 2).' 0 R'); |
|
$this->_out('>>'); |
|
$this->_out('endobj'); |
|
|
|
// Embed CIDToGIDMap |
|
// A specification of the mapping from CIDs to glyph indices |
|
$cidtogidmap = ''; |
|
$cidtogidmap = str_pad('', 256*256*2, "\x00"); |
|
foreach($codeToGlyph as $cc=>$glyph) { |
|
$cidtogidmap[$cc*2] = chr($glyph >> 8); |
|
$cidtogidmap[$cc*2 + 1] = chr($glyph & 0xFF); |
|
} |
|
$cidtogidmap = gzcompress($cidtogidmap); |
|
$this->_newobj(); |
|
$this->_out('<</Length '.strlen($cidtogidmap).''); |
|
$this->_out('/Filter /FlateDecode'); |
|
$this->_out('>>'); |
|
$this->_putstream($cidtogidmap); |
|
$this->_out('endobj'); |
|
|
|
//Font file |
|
$this->_newobj(); |
|
$this->_out('<</Length '.strlen($fontstream)); |
|
$this->_out('/Filter /FlateDecode'); |
|
$this->_out('/Length1 '.$ttfontsize); |
|
$this->_out('>>'); |
|
$this->_putstream($fontstream); |
|
$this->_out('endobj'); |
|
unset($ttf); |
|
} |
|
else |
|
{ |
|
// Allow for additional types |
|
$this->fonts[$k]['n'] = $this->n+1; |
|
$mtd='_put'.strtolower($type); |
|
if(!method_exists($this,$mtd)) |
|
$this->Error('Unsupported font type: '.$type); |
|
$this->$mtd($font); |
|
} |
|
} |
|
} |
|
|
|
function _putTTfontwidths(&$font, $maxUni) { |
|
if (file_exists($font['unifilename'].'.cw127.php')) { |
|
include($font['unifilename'].'.cw127.php') ; |
|
$startcid = 128; |
|
} |
|
else { |
|
$rangeid = 0; |
|
$range = array(); |
|
$prevcid = -2; |
|
$prevwidth = -1; |
|
$interval = false; |
|
$startcid = 1; |
|
} |
|
$cwlen = $maxUni + 1; |
|
|
|
// for each character |
|
for ($cid=$startcid; $cid<$cwlen; $cid++) { |
|
if ($cid==128 && (!file_exists($font['unifilename'].'.cw127.php'))) { |
|
if (is_writable(dirname($this->_getfontpath().'unifont/x'))) { |
|
$fh = fopen($font['unifilename'].'.cw127.php',"wb"); |
|
$cw127='<?php'."\n"; |
|
$cw127.='$rangeid='.$rangeid.";\n"; |
|
$cw127.='$prevcid='.$prevcid.";\n"; |
|
$cw127.='$prevwidth='.$prevwidth.";\n"; |
|
if ($interval) { $cw127.='$interval=true'.";\n"; } |
|
else { $cw127.='$interval=false'.";\n"; } |
|
$cw127.='$range='.var_export($range,true).";\n"; |
|
$cw127.="?>"; |
|
fwrite($fh,$cw127,strlen($cw127)); |
|
fclose($fh); |
|
} |
|
} |
|
if ($font['cw'][$cid*2] == "\00" && $font['cw'][$cid*2+1] == "\00") { continue; } |
|
$width = (ord($font['cw'][$cid*2]) << 8) + ord($font['cw'][$cid*2+1]); |
|
if ($width == 65535) { $width = 0; } |
|
if ($cid > 255 && (!isset($font['subset'][$cid]) || !$font['subset'][$cid])) { continue; } |
|
if (!isset($font['dw']) || (isset($font['dw']) && $width != $font['dw'])) { |
|
if ($cid == ($prevcid + 1)) { |
|
if ($width == $prevwidth) { |
|
if ($width == $range[$rangeid][0]) { |
|
$range[$rangeid][] = $width; |
|
} |
|
else { |
|
array_pop($range[$rangeid]); |
|
// new range |
|
$rangeid = $prevcid; |
|
$range[$rangeid] = array(); |
|
$range[$rangeid][] = $prevwidth; |
|
$range[$rangeid][] = $width; |
|
} |
|
$interval = true; |
|
$range[$rangeid]['interval'] = true; |
|
} else { |
|
if ($interval) { |
|
// new range |
|
$rangeid = $cid; |
|
$range[$rangeid] = array(); |
|
$range[$rangeid][] = $width; |
|
} |
|
else { $range[$rangeid][] = $width; } |
|
$interval = false; |
|
} |
|
} else { |
|
$rangeid = $cid; |
|
$range[$rangeid] = array(); |
|
$range[$rangeid][] = $width; |
|
$interval = false; |
|
} |
|
$prevcid = $cid; |
|
$prevwidth = $width; |
|
} |
|
} |
|
$prevk = -1; |
|
$nextk = -1; |
|
$prevint = false; |
|
foreach ($range as $k => $ws) { |
|
$cws = count($ws); |
|
if (($k == $nextk) AND (!$prevint) AND ((!isset($ws['interval'])) OR ($cws < 4))) { |
|
if (isset($range[$k]['interval'])) { unset($range[$k]['interval']); } |
|
$range[$prevk] = array_merge($range[$prevk], $range[$k]); |
|
unset($range[$k]); |
|
} |
|
else { $prevk = $k; } |
|
$nextk = $k + $cws; |
|
if (isset($ws['interval'])) { |
|
if ($cws > 3) { $prevint = true; } |
|
else { $prevint = false; } |
|
unset($range[$k]['interval']); |
|
--$nextk; |
|
} |
|
else { $prevint = false; } |
|
} |
|
$w = ''; |
|
foreach ($range as $k => $ws) { |
|
if (count(array_count_values($ws)) == 1) { $w .= ' '.$k.' '.($k + count($ws) - 1).' '.$ws[0]; } |
|
else { $w .= ' '.$k.' [ '.implode(' ', $ws).' ]' . "\n"; } |
|
} |
|
$this->_out('/W ['.$w.' ]'); |
|
} |
|
|
|
function _putimages() |
|
{ |
|
foreach(array_keys($this->images) as $file) |
|
{ |
|
$this->_putimage($this->images[$file]); |
|
unset($this->images[$file]['data']); |
|
unset($this->images[$file]['smask']); |
|
} |
|
} |
|
|
|
function _putimage(&$info) |
|
{ |
|
$this->_newobj(); |
|
$info['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['dp'])) |
|
$this->_out('/DecodeParms <<'.$info['dp'].'>>'); |
|
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.']'); |
|
} |
|
if(isset($info['smask'])) |
|
$this->_out('/SMask '.($this->n+1).' 0 R'); |
|
$this->_out('/Length '.strlen($info['data']).'>>'); |
|
$this->_putstream($info['data']); |
|
$this->_out('endobj'); |
|
// Soft mask |
|
if(isset($info['smask'])) |
|
{ |
|
$dp = '/Predictor 15 /Colors 1 /BitsPerComponent 8 /Columns '.$info['w']; |
|
$smask = array('w'=>$info['w'], 'h'=>$info['h'], 'cs'=>'DeviceGray', 'bpc'=>8, 'f'=>$info['f'], 'dp'=>$dp, 'data'=>$info['smask']); |
|
$this->_putimage($smask); |
|
} |
|
// Palette |
|
if($info['cs']=='Indexed') |
|
{ |
|
$filter = ($this->compress) ? '/Filter /FlateDecode ' : ''; |
|
$pal = ($this->compress) ? gzcompress($info['pal']) : $info['pal']; |
|
$this->_newobj(); |
|
$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('tFPDF '.tFPDF_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 '.sprintf('%.2F',$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; |
|
} |
|
|
|
// ********* NEW FUNCTIONS ********* |
|
// Converts UTF-8 strings to UTF16-BE. |
|
function UTF8ToUTF16BE($str, $setbom=true) { |
|
$outstr = ""; |
|
if ($setbom) { |
|
$outstr .= "\xFE\xFF"; // Byte Order Mark (BOM) |
|
} |
|
$outstr .= mb_convert_encoding($str, 'UTF-16BE', 'UTF-8'); |
|
return $outstr; |
|
} |
|
|
|
// Converts UTF-8 strings to codepoints array |
|
function UTF8StringToArray($str) { |
|
$out = array(); |
|
$len = strlen($str); |
|
for ($i = 0; $i < $len; $i++) { |
|
$uni = -1; |
|
$h = ord($str[$i]); |
|
if ( $h <= 0x7F ) |
|
$uni = $h; |
|
elseif ( $h >= 0xC2 ) { |
|
if ( ($h <= 0xDF) && ($i < $len -1) ) |
|
$uni = ($h & 0x1F) << 6 | (ord($str[++$i]) & 0x3F); |
|
elseif ( ($h <= 0xEF) && ($i < $len -2) ) |
|
$uni = ($h & 0x0F) << 12 | (ord($str[++$i]) & 0x3F) << 6 |
|
| (ord($str[++$i]) & 0x3F); |
|
elseif ( ($h <= 0xF4) && ($i < $len -3) ) |
|
$uni = ($h & 0x0F) << 18 | (ord($str[++$i]) & 0x3F) << 12 |
|
| (ord($str[++$i]) & 0x3F) << 6 |
|
| (ord($str[++$i]) & 0x3F); |
|
} |
|
if ($uni >= 0) { |
|
$out[] = $uni; |
|
} |
|
} |
|
return $out; |
|
} |
|
|
|
|
|
// 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; |
|
} |
|
|
|
?> |