| @@ -1,1647 +1,1647 @@ | ||
| 1 | -<?php | |
| 2 | -/******************************************************************************* | |
| 3 | -* Software: FPDF * | |
| 4 | -* Version: 1.53 * | |
| 5 | -* Date: 2004-12-31 * | |
| 6 | -* Author: Olivier PLATHEY * | |
| 7 | -* License: Freeware * | |
| 8 | -* * | |
| 9 | -* You may use, modify and redistribute this software as you wish. * | |
| 10 | -*******************************************************************************/ | |
| 11 | - | |
| 12 | -if(!class_exists('FPDF')) | |
| 13 | -{ | |
| 14 | -define('FPDF_VERSION','1.53'); | |
| 15 | - | |
| 16 | -class FPDF | |
| 17 | -{ | |
| 18 | -//Private properties | |
| 19 | -var $page; //current page number | |
| 20 | -var $n; //current object number | |
| 21 | -var $offsets; //array of object offsets | |
| 22 | -var $buffer; //buffer holding in-memory PDF | |
| 23 | -var $pages; //array containing pages | |
| 24 | -var $state; //current document state | |
| 25 | -var $compress; //compression flag | |
| 26 | -var $DefOrientation; //default orientation | |
| 27 | -var $CurOrientation; //current orientation | |
| 28 | -var $OrientationChanges; //array indicating orientation changes | |
| 29 | -var $k; //scale factor (number of points in user unit) | |
| 30 | -var $fwPt,$fhPt; //dimensions of page format in points | |
| 31 | -var $fw,$fh; //dimensions of page format in user unit | |
| 32 | -var $wPt,$hPt; //current dimensions of page in points | |
| 33 | -var $w,$h; //current dimensions of page in user unit | |
| 34 | -var $lMargin; //left margin | |
| 35 | -var $tMargin; //top margin | |
| 36 | -var $rMargin; //right margin | |
| 37 | -var $bMargin; //page break margin | |
| 38 | -var $cMargin; //cell margin | |
| 39 | -var $x,$y; //current position in user unit for cell positioning | |
| 40 | -var $lasth; //height of last cell printed | |
| 41 | -var $LineWidth; //line width in user unit | |
| 42 | -var $CoreFonts; //array of standard font names | |
| 43 | -var $fonts; //array of used fonts | |
| 44 | -var $FontFiles; //array of font files | |
| 45 | -var $diffs; //array of encoding differences | |
| 46 | -var $images; //array of used images | |
| 47 | -var $PageLinks; //array of links in pages | |
| 48 | -var $links; //array of internal links | |
| 49 | -var $FontFamily; //current font family | |
| 50 | -var $FontStyle; //current font style | |
| 51 | -var $underline; //underlining flag | |
| 52 | -var $CurrentFont; //current font info | |
| 53 | -var $FontSizePt; //current font size in points | |
| 54 | -var $FontSize; //current font size in user unit | |
| 55 | -var $DrawColor; //commands for drawing color | |
| 56 | -var $FillColor; //commands for filling color | |
| 57 | -var $TextColor; //commands for text color | |
| 58 | -var $ColorFlag; //indicates whether fill and text colors are different | |
| 59 | -var $ws; //word spacing | |
| 60 | -var $AutoPageBreak; //automatic page breaking | |
| 61 | -var $PageBreakTrigger; //threshold used to trigger page breaks | |
| 62 | -var $InFooter; //flag set when processing footer | |
| 63 | -var $ZoomMode; //zoom display mode | |
| 64 | -var $LayoutMode; //layout display mode | |
| 65 | -var $title; //title | |
| 66 | -var $subject; //subject | |
| 67 | -var $author; //author | |
| 68 | -var $keywords; //keywords | |
| 69 | -var $creator; //creator | |
| 70 | -var $AliasNbPages; //alias for total number of pages | |
| 71 | -var $PDFVersion; //PDF version number | |
| 72 | - | |
| 73 | -/******************************************************************************* | |
| 74 | -* * | |
| 75 | -* Public methods * | |
| 76 | -* * | |
| 77 | -*******************************************************************************/ | |
| 78 | -function FPDF($orientation='P',$unit='mm',$format='A4') | |
| 79 | -{ | |
| 80 | - //Some checks | |
| 81 | - $this->_dochecks(); | |
| 82 | - //Initialization of properties | |
| 83 | - $this->page=0; | |
| 84 | - $this->n=2; | |
| 85 | - $this->buffer=''; | |
| 86 | - $this->pages=array(); | |
| 87 | - $this->OrientationChanges=array(); | |
| 88 | - $this->state=0; | |
| 89 | - $this->fonts=array(); | |
| 90 | - $this->FontFiles=array(); | |
| 91 | - $this->diffs=array(); | |
| 92 | - $this->images=array(); | |
| 93 | - $this->links=array(); | |
| 94 | - $this->InFooter=false; | |
| 95 | - $this->lasth=0; | |
| 96 | - $this->FontFamily=''; | |
| 97 | - $this->FontStyle=''; | |
| 98 | - $this->FontSizePt=12; | |
| 99 | - $this->underline=false; | |
| 100 | - $this->DrawColor='0 G'; | |
| 101 | - $this->FillColor='0 g'; | |
| 102 | - $this->TextColor='0 g'; | |
| 103 | - $this->ColorFlag=false; | |
| 104 | - $this->ws=0; | |
| 105 | - //Standard fonts | |
| 106 | - $this->CoreFonts=array('courier'=>'Courier','courierB'=>'Courier-Bold','courierI'=>'Courier-Oblique','courierBI'=>'Courier-BoldOblique', | |
| 107 | - 'helvetica'=>'Helvetica','helveticaB'=>'Helvetica-Bold','helveticaI'=>'Helvetica-Oblique','helveticaBI'=>'Helvetica-BoldOblique', | |
| 108 | - 'times'=>'Times-Roman','timesB'=>'Times-Bold','timesI'=>'Times-Italic','timesBI'=>'Times-BoldItalic', | |
| 109 | - 'symbol'=>'Symbol','zapfdingbats'=>'ZapfDingbats'); | |
| 110 | - //Scale factor | |
| 111 | - if($unit=='pt') | |
| 112 | - $this->k=1; | |
| 113 | - elseif($unit=='mm') | |
| 114 | - $this->k=72/25.4; | |
| 115 | - elseif($unit=='cm') | |
| 116 | - $this->k=72/2.54; | |
| 117 | - elseif($unit=='in') | |
| 118 | - $this->k=72; | |
| 119 | - else | |
| 120 | - $this->Error('Incorrect unit: '.$unit); | |
| 121 | - //Page format | |
| 122 | - if(is_string($format)) | |
| 123 | - { | |
| 124 | - $format=strtolower($format); | |
| 125 | - if($format=='a3') | |
| 126 | - $format=array(841.89,1190.55); | |
| 127 | - elseif($format=='a4') | |
| 128 | - $format=array(595.28,841.89); | |
| 129 | - elseif($format=='a5') | |
| 130 | - $format=array(420.94,595.28); | |
| 131 | - elseif($format=='letter') | |
| 132 | - $format=array(612,792); | |
| 133 | - elseif($format=='legal') | |
| 134 | - $format=array(612,1008); | |
| 135 | - else | |
| 136 | - $this->Error('Unknown page format: '.$format); | |
| 137 | - $this->fwPt=$format[0]; | |
| 138 | - $this->fhPt=$format[1]; | |
| 139 | - } | |
| 140 | - else | |
| 141 | - { | |
| 142 | - $this->fwPt=$format[0]*$this->k; | |
| 143 | - $this->fhPt=$format[1]*$this->k; | |
| 144 | - } | |
| 145 | - $this->fw=$this->fwPt/$this->k; | |
| 146 | - $this->fh=$this->fhPt/$this->k; | |
| 147 | - //Page orientation | |
| 148 | - $orientation=strtolower($orientation); | |
| 149 | - if($orientation=='p' || $orientation=='portrait') | |
| 150 | - { | |
| 151 | - $this->DefOrientation='P'; | |
| 152 | - $this->wPt=$this->fwPt; | |
| 153 | - $this->hPt=$this->fhPt; | |
| 154 | - } | |
| 155 | - elseif($orientation=='l' || $orientation=='landscape') | |
| 156 | - { | |
| 157 | - $this->DefOrientation='L'; | |
| 158 | - $this->wPt=$this->fhPt; | |
| 159 | - $this->hPt=$this->fwPt; | |
| 160 | - } | |
| 161 | - else | |
| 162 | - $this->Error('Incorrect orientation: '.$orientation); | |
| 163 | - $this->CurOrientation=$this->DefOrientation; | |
| 164 | - $this->w=$this->wPt/$this->k; | |
| 165 | - $this->h=$this->hPt/$this->k; | |
| 166 | - //Page margins (1 cm) | |
| 167 | - $margin=28.35/$this->k; | |
| 168 | - $this->SetMargins($margin,$margin); | |
| 169 | - //Interior cell margin (1 mm) | |
| 170 | - $this->cMargin=$margin/10; | |
| 171 | - //Line width (0.2 mm) | |
| 172 | - $this->LineWidth=.567/$this->k; | |
| 173 | - //Automatic page break | |
| 174 | - $this->SetAutoPageBreak(true,2*$margin); | |
| 175 | - //Full width display mode | |
| 176 | - $this->SetDisplayMode('fullwidth'); | |
| 177 | - //Enable compression | |
| 178 | - $this->SetCompression(true); | |
| 179 | - //Set default PDF version number | |
| 180 | - $this->PDFVersion='1.3'; | |
| 181 | -} | |
| 182 | - | |
| 183 | -function SetMargins($left,$top,$right=-1) | |
| 184 | -{ | |
| 185 | - //Set left, top and right margins | |
| 186 | - $this->lMargin=$left; | |
| 187 | - $this->tMargin=$top; | |
| 188 | - if($right==-1) | |
| 189 | - $right=$left; | |
| 190 | - $this->rMargin=$right; | |
| 191 | -} | |
| 192 | - | |
| 193 | -function SetLeftMargin($margin) | |
| 194 | -{ | |
| 195 | - //Set left margin | |
| 196 | - $this->lMargin=$margin; | |
| 197 | - if($this->page>0 && $this->x<$margin) | |
| 198 | - $this->x=$margin; | |
| 199 | -} | |
| 200 | - | |
| 201 | -function SetTopMargin($margin) | |
| 202 | -{ | |
| 203 | - //Set top margin | |
| 204 | - $this->tMargin=$margin; | |
| 205 | -} | |
| 206 | - | |
| 207 | -function SetRightMargin($margin) | |
| 208 | -{ | |
| 209 | - //Set right margin | |
| 210 | - $this->rMargin=$margin; | |
| 211 | -} | |
| 212 | - | |
| 213 | -function SetAutoPageBreak($auto,$margin=0) | |
| 214 | -{ | |
| 215 | - //Set auto page break mode and triggering margin | |
| 216 | - $this->AutoPageBreak=$auto; | |
| 217 | - $this->bMargin=$margin; | |
| 218 | - $this->PageBreakTrigger=$this->h-$margin; | |
| 219 | -} | |
| 220 | - | |
| 221 | -function SetDisplayMode($zoom,$layout='continuous') | |
| 222 | -{ | |
| 223 | - //Set display mode in viewer | |
| 224 | - if($zoom=='fullpage' || $zoom=='fullwidth' || $zoom=='real' || $zoom=='default' || !is_string($zoom)) | |
| 225 | - $this->ZoomMode=$zoom; | |
| 226 | - else | |
| 227 | - $this->Error('Incorrect zoom display mode: '.$zoom); | |
| 228 | - if($layout=='single' || $layout=='continuous' || $layout=='two' || $layout=='default') | |
| 229 | - $this->LayoutMode=$layout; | |
| 230 | - else | |
| 231 | - $this->Error('Incorrect layout display mode: '.$layout); | |
| 232 | -} | |
| 233 | - | |
| 234 | -function SetCompression($compress) | |
| 235 | -{ | |
| 236 | - //Set page compression | |
| 237 | - if(function_exists('gzcompress')) | |
| 238 | - $this->compress=$compress; | |
| 239 | - else | |
| 240 | - $this->compress=false; | |
| 241 | -} | |
| 242 | - | |
| 243 | -function SetTitle($title) | |
| 244 | -{ | |
| 245 | - //Title of document | |
| 246 | - $this->title=$title; | |
| 247 | -} | |
| 248 | - | |
| 249 | -function SetSubject($subject) | |
| 250 | -{ | |
| 251 | - //Subject of document | |
| 252 | - $this->subject=$subject; | |
| 253 | -} | |
| 254 | - | |
| 255 | -function SetAuthor($author) | |
| 256 | -{ | |
| 257 | - //Author of document | |
| 258 | - $this->author=$author; | |
| 259 | -} | |
| 260 | - | |
| 261 | -function SetKeywords($keywords) | |
| 262 | -{ | |
| 263 | - //Keywords of document | |
| 264 | - $this->keywords=$keywords; | |
| 265 | -} | |
| 266 | - | |
| 267 | -function SetCreator($creator) | |
| 268 | -{ | |
| 269 | - //Creator of document | |
| 270 | - $this->creator=$creator; | |
| 271 | -} | |
| 272 | - | |
| 273 | -function AliasNbPages($alias='{nb}') | |
| 274 | -{ | |
| 275 | - //Define an alias for total number of pages | |
| 276 | - $this->AliasNbPages=$alias; | |
| 277 | -} | |
| 278 | - | |
| 279 | -function Error($msg) | |
| 280 | -{ | |
| 281 | - //Fatal error | |
| 282 | - die('<B>FPDF error: </B>'.$msg); | |
| 283 | -} | |
| 284 | - | |
| 285 | -function Open() | |
| 286 | -{ | |
| 287 | - //Begin document | |
| 288 | - $this->state=1; | |
| 289 | -} | |
| 290 | - | |
| 291 | -function Close() | |
| 292 | -{ | |
| 293 | - //Terminate document | |
| 294 | - if($this->state==3) | |
| 295 | - return; | |
| 296 | - if($this->page==0) | |
| 297 | - $this->AddPage(); | |
| 298 | - //Page footer | |
| 299 | - $this->InFooter=true; | |
| 300 | - $this->Footer(); | |
| 301 | - $this->InFooter=false; | |
| 302 | - //Close page | |
| 303 | - $this->_endpage(); | |
| 304 | - //Close document | |
| 305 | - $this->_enddoc(); | |
| 306 | -} | |
| 307 | - | |
| 308 | -function AddPage($orientation='') | |
| 309 | -{ | |
| 310 | - //Start a new page | |
| 311 | - if($this->state==0) | |
| 312 | - $this->Open(); | |
| 313 | - $family=$this->FontFamily; | |
| 314 | - $style=$this->FontStyle.($this->underline ? 'U' : ''); | |
| 315 | - $size=$this->FontSizePt; | |
| 316 | - $lw=$this->LineWidth; | |
| 317 | - $dc=$this->DrawColor; | |
| 318 | - $fc=$this->FillColor; | |
| 319 | - $tc=$this->TextColor; | |
| 320 | - $cf=$this->ColorFlag; | |
| 321 | - if($this->page>0) | |
| 322 | - { | |
| 323 | - //Page footer | |
| 324 | - $this->InFooter=true; | |
| 325 | - $this->Footer(); | |
| 326 | - $this->InFooter=false; | |
| 327 | - //Close page | |
| 328 | - $this->_endpage(); | |
| 329 | - } | |
| 330 | - //Start new page | |
| 331 | - $this->_beginpage($orientation); | |
| 332 | - //Set line cap style to square | |
| 333 | - $this->_out('2 J'); | |
| 334 | - //Set line width | |
| 335 | - $this->LineWidth=$lw; | |
| 336 | - $this->_out(sprintf('%.2f w',$lw*$this->k)); | |
| 337 | - //Set font | |
| 338 | - if($family) | |
| 339 | - $this->SetFont($family,$style,$size); | |
| 340 | - //Set colors | |
| 341 | - $this->DrawColor=$dc; | |
| 342 | - if($dc!='0 G') | |
| 343 | - $this->_out($dc); | |
| 344 | - $this->FillColor=$fc; | |
| 345 | - if($fc!='0 g') | |
| 346 | - $this->_out($fc); | |
| 347 | - $this->TextColor=$tc; | |
| 348 | - $this->ColorFlag=$cf; | |
| 349 | - //Page header | |
| 350 | - $this->Header(); | |
| 351 | - //Restore line width | |
| 352 | - if($this->LineWidth!=$lw) | |
| 353 | - { | |
| 354 | - $this->LineWidth=$lw; | |
| 355 | - $this->_out(sprintf('%.2f w',$lw*$this->k)); | |
| 356 | - } | |
| 357 | - //Restore font | |
| 358 | - if($family) | |
| 359 | - $this->SetFont($family,$style,$size); | |
| 360 | - //Restore colors | |
| 361 | - if($this->DrawColor!=$dc) | |
| 362 | - { | |
| 363 | - $this->DrawColor=$dc; | |
| 364 | - $this->_out($dc); | |
| 365 | - } | |
| 366 | - if($this->FillColor!=$fc) | |
| 367 | - { | |
| 368 | - $this->FillColor=$fc; | |
| 369 | - $this->_out($fc); | |
| 370 | - } | |
| 371 | - $this->TextColor=$tc; | |
| 372 | - $this->ColorFlag=$cf; | |
| 373 | -} | |
| 374 | - | |
| 375 | -function Header() | |
| 376 | -{ | |
| 377 | - //To be implemented in your own inherited class | |
| 378 | -} | |
| 379 | - | |
| 380 | -function Footer() | |
| 381 | -{ | |
| 382 | - //To be implemented in your own inherited class | |
| 383 | -} | |
| 384 | - | |
| 385 | -function PageNo() | |
| 386 | -{ | |
| 387 | - //Get current page number | |
| 388 | - return $this->page; | |
| 389 | -} | |
| 390 | - | |
| 391 | -function SetDrawColor($r,$g=-1,$b=-1) | |
| 392 | -{ | |
| 393 | - //Set color for all stroking operations | |
| 394 | - if(($r==0 && $g==0 && $b==0) || $g==-1) | |
| 395 | - $this->DrawColor=sprintf('%.3f G',$r/255); | |
| 396 | - else | |
| 397 | - $this->DrawColor=sprintf('%.3f %.3f %.3f RG',$r/255,$g/255,$b/255); | |
| 398 | - if($this->page>0) | |
| 399 | - $this->_out($this->DrawColor); | |
| 400 | -} | |
| 401 | - | |
| 402 | -function SetFillColor($r,$g=-1,$b=-1) | |
| 403 | -{ | |
| 404 | - //Set color for all filling operations | |
| 405 | - if(($r==0 && $g==0 && $b==0) || $g==-1) | |
| 406 | - $this->FillColor=sprintf('%.3f g',$r/255); | |
| 407 | - else | |
| 408 | - $this->FillColor=sprintf('%.3f %.3f %.3f rg',$r/255,$g/255,$b/255); | |
| 409 | - $this->ColorFlag=($this->FillColor!=$this->TextColor); | |
| 410 | - if($this->page>0) | |
| 411 | - $this->_out($this->FillColor); | |
| 412 | -} | |
| 413 | - | |
| 414 | -function SetTextColor($r,$g=-1,$b=-1) | |
| 415 | -{ | |
| 416 | - //Set color for text | |
| 417 | - if(($r==0 && $g==0 && $b==0) || $g==-1) | |
| 418 | - $this->TextColor=sprintf('%.3f g',$r/255); | |
| 419 | - else | |
| 420 | - $this->TextColor=sprintf('%.3f %.3f %.3f rg',$r/255,$g/255,$b/255); | |
| 421 | - $this->ColorFlag=($this->FillColor!=$this->TextColor); | |
| 422 | -} | |
| 423 | - | |
| 424 | -function GetStringWidth($s) | |
| 425 | -{ | |
| 426 | - //Get width of a string in the current font | |
| 427 | - $s=(string)$s; | |
| 428 | - $cw=&$this->CurrentFont['cw']; | |
| 429 | - $w=0; | |
| 430 | - $l=strlen($s); | |
| 431 | - for($i=0;$i<$l;$i++) | |
| 432 | - $w+=$cw[$s{$i}]; | |
| 433 | - return $w*$this->FontSize/1000; | |
| 434 | -} | |
| 435 | - | |
| 436 | -function SetLineWidth($width) | |
| 437 | -{ | |
| 438 | - //Set line width | |
| 439 | - $this->LineWidth=$width; | |
| 440 | - if($this->page>0) | |
| 441 | - $this->_out(sprintf('%.2f w',$width*$this->k)); | |
| 442 | -} | |
| 443 | - | |
| 444 | -function Line($x1,$y1,$x2,$y2) | |
| 445 | -{ | |
| 446 | - //Draw a line | |
| 447 | - $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)); | |
| 448 | -} | |
| 449 | - | |
| 450 | -function Rect($x,$y,$w,$h,$style='') | |
| 451 | -{ | |
| 452 | - //Draw a rectangle | |
| 453 | - if($style=='F') | |
| 454 | - $op='f'; | |
| 455 | - elseif($style=='FD' || $style=='DF') | |
| 456 | - $op='B'; | |
| 457 | - else | |
| 458 | - $op='S'; | |
| 459 | - $this->_out(sprintf('%.2f %.2f %.2f %.2f re %s',$x*$this->k,($this->h-$y)*$this->k,$w*$this->k,-$h*$this->k,$op)); | |
| 460 | -} | |
| 461 | - | |
| 462 | -function AddFont($family,$style='',$file='') | |
| 463 | -{ | |
| 464 | - //Add a TrueType or Type1 font | |
| 465 | - $family=strtolower($family); | |
| 466 | - if($file=='') | |
| 467 | - $file=str_replace(' ','',$family).strtolower($style).'.php'; | |
| 468 | - if($family=='arial') | |
| 469 | - $family='helvetica'; | |
| 470 | - $style=strtoupper($style); | |
| 471 | - if($style=='IB') | |
| 472 | - $style='BI'; | |
| 473 | - $fontkey=$family.$style; | |
| 474 | - if(isset($this->fonts[$fontkey])) | |
| 475 | - $this->Error('Font already added: '.$family.' '.$style); | |
| 476 | - include($this->_getfontpath().$file); | |
| 477 | - if(!isset($name)) | |
| 478 | - $this->Error('Could not include font definition file'); | |
| 479 | - $i=count($this->fonts)+1; | |
| 480 | - $this->fonts[$fontkey]=array('i'=>$i,'type'=>$type,'name'=>$name,'desc'=>$desc,'up'=>$up,'ut'=>$ut,'cw'=>$cw,'enc'=>$enc,'file'=>$file); | |
| 481 | - if($diff) | |
| 482 | - { | |
| 483 | - //Search existing encodings | |
| 484 | - $d=0; | |
| 485 | - $nb=count($this->diffs); | |
| 486 | - for($i=1;$i<=$nb;$i++) | |
| 487 | - { | |
| 488 | - if($this->diffs[$i]==$diff) | |
| 489 | - { | |
| 490 | - $d=$i; | |
| 491 | - break; | |
| 492 | - } | |
| 493 | - } | |
| 494 | - if($d==0) | |
| 495 | - { | |
| 496 | - $d=$nb+1; | |
| 497 | - $this->diffs[$d]=$diff; | |
| 498 | - } | |
| 499 | - $this->fonts[$fontkey]['diff']=$d; | |
| 500 | - } | |
| 501 | - if($file) | |
| 502 | - { | |
| 503 | - if($type=='TrueType') | |
| 504 | - $this->FontFiles[$file]=array('length1'=>$originalsize); | |
| 505 | - else | |
| 506 | - $this->FontFiles[$file]=array('length1'=>$size1,'length2'=>$size2); | |
| 507 | - } | |
| 508 | -} | |
| 509 | - | |
| 510 | -function SetFont($family,$style='',$size=0) | |
| 511 | -{ | |
| 512 | - //Select a font; size given in points | |
| 513 | - global $fpdf_charwidths; | |
| 514 | - | |
| 515 | - $family=strtolower($family); | |
| 516 | - if($family=='') | |
| 517 | - $family=$this->FontFamily; | |
| 518 | - if($family=='arial') | |
| 519 | - $family='helvetica'; | |
| 520 | - elseif($family=='symbol' || $family=='zapfdingbats') | |
| 521 | - $style=''; | |
| 522 | - $style=strtoupper($style); | |
| 523 | - if(strpos($style,'U')!==false) | |
| 524 | - { | |
| 525 | - $this->underline=true; | |
| 526 | - $style=str_replace('U','',$style); | |
| 527 | - } | |
| 528 | - else | |
| 529 | - $this->underline=false; | |
| 530 | - if($style=='IB') | |
| 531 | - $style='BI'; | |
| 532 | - if($size==0) | |
| 533 | - $size=$this->FontSizePt; | |
| 534 | - //Test if font is already selected | |
| 535 | - if($this->FontFamily==$family && $this->FontStyle==$style && $this->FontSizePt==$size) | |
| 536 | - return; | |
| 537 | - //Test if used for the first time | |
| 538 | - $fontkey=$family.$style; | |
| 539 | - if(!isset($this->fonts[$fontkey])) | |
| 540 | - { | |
| 541 | - //Check if one of the standard fonts | |
| 542 | - if(isset($this->CoreFonts[$fontkey])) | |
| 543 | - { | |
| 544 | - if(!isset($fpdf_charwidths[$fontkey])) | |
| 545 | - { | |
| 546 | - //Load metric file | |
| 547 | - $file=$family; | |
| 548 | - if($family=='times' || $family=='helvetica') | |
| 549 | - $file.=strtolower($style); | |
| 550 | - include($this->_getfontpath().$file.'.php'); | |
| 551 | - if(!isset($fpdf_charwidths[$fontkey])) | |
| 552 | - $this->Error('Could not include font metric file'); | |
| 553 | - } | |
| 554 | - $i=count($this->fonts)+1; | |
| 555 | - $this->fonts[$fontkey]=array('i'=>$i,'type'=>'core','name'=>$this->CoreFonts[$fontkey],'up'=>-100,'ut'=>50,'cw'=>$fpdf_charwidths[$fontkey]); | |
| 556 | - } | |
| 557 | - else | |
| 558 | - $this->Error('Undefined font: '.$family.' '.$style); | |
| 559 | - } | |
| 560 | - //Select it | |
| 561 | - $this->FontFamily=$family; | |
| 562 | - $this->FontStyle=$style; | |
| 563 | - $this->FontSizePt=$size; | |
| 564 | - $this->FontSize=$size/$this->k; | |
| 565 | - $this->CurrentFont=&$this->fonts[$fontkey]; | |
| 566 | - if($this->page>0) | |
| 567 | - $this->_out(sprintf('BT /F%d %.2f Tf ET',$this->CurrentFont['i'],$this->FontSizePt)); | |
| 568 | -} | |
| 569 | - | |
| 570 | -function SetFontSize($size) | |
| 571 | -{ | |
| 572 | - //Set font size in points | |
| 573 | - if($this->FontSizePt==$size) | |
| 574 | - return; | |
| 575 | - $this->FontSizePt=$size; | |
| 576 | - $this->FontSize=$size/$this->k; | |
| 577 | - if($this->page>0) | |
| 578 | - $this->_out(sprintf('BT /F%d %.2f Tf ET',$this->CurrentFont['i'],$this->FontSizePt)); | |
| 579 | -} | |
| 580 | - | |
| 581 | -function AddLink() | |
| 582 | -{ | |
| 583 | - //Create a new internal link | |
| 584 | - $n=count($this->links)+1; | |
| 585 | - $this->links[$n]=array(0,0); | |
| 586 | - return $n; | |
| 587 | -} | |
| 588 | - | |
| 589 | -function SetLink($link,$y=0,$page=-1) | |
| 590 | -{ | |
| 591 | - //Set destination of internal link | |
| 592 | - if($y==-1) | |
| 593 | - $y=$this->y; | |
| 594 | - if($page==-1) | |
| 595 | - $page=$this->page; | |
| 596 | - $this->links[$link]=array($page,$y); | |
| 597 | -} | |
| 598 | - | |
| 599 | -function Link($x,$y,$w,$h,$link) | |
| 600 | -{ | |
| 601 | - //Put a link on the page | |
| 602 | - $this->PageLinks[$this->page][]=array($x*$this->k,$this->hPt-$y*$this->k,$w*$this->k,$h*$this->k,$link); | |
| 603 | -} | |
| 604 | - | |
| 605 | -function Text($x,$y,$txt) | |
| 606 | -{ | |
| 607 | - //Output a string | |
| 608 | - $s=sprintf('BT %.2f %.2f Td (%s) Tj ET',$x*$this->k,($this->h-$y)*$this->k,$this->_escape($txt)); | |
| 609 | - if($this->underline && $txt!='') | |
| 610 | - $s.=' '.$this->_dounderline($x,$y,$txt); | |
| 611 | - if($this->ColorFlag) | |
| 612 | - $s='q '.$this->TextColor.' '.$s.' Q'; | |
| 613 | - $this->_out($s); | |
| 614 | -} | |
| 615 | - | |
| 616 | -function AcceptPageBreak() | |
| 617 | -{ | |
| 618 | - //Accept automatic page break or not | |
| 619 | - return $this->AutoPageBreak; | |
| 620 | -} | |
| 621 | - | |
| 622 | -function Cell($w,$h=0,$txt='',$border=0,$ln=0,$align='',$fill=0,$link='') | |
| 623 | -{ | |
| 624 | - //Output a cell | |
| 625 | - $k=$this->k; | |
| 626 | - if($this->y+$h>$this->PageBreakTrigger && !$this->InFooter && $this->AcceptPageBreak()) | |
| 627 | - { | |
| 628 | - //Automatic page break | |
| 629 | - $x=$this->x; | |
| 630 | - $ws=$this->ws; | |
| 631 | - if($ws>0) | |
| 632 | - { | |
| 633 | - $this->ws=0; | |
| 634 | - $this->_out('0 Tw'); | |
| 635 | - } | |
| 636 | - $this->AddPage($this->CurOrientation); | |
| 637 | - $this->x=$x; | |
| 638 | - if($ws>0) | |
| 639 | - { | |
| 640 | - $this->ws=$ws; | |
| 641 | - $this->_out(sprintf('%.3f Tw',$ws*$k)); | |
| 642 | - } | |
| 643 | - } | |
| 644 | - if($w==0) | |
| 645 | - $w=$this->w-$this->rMargin-$this->x; | |
| 646 | - $s=''; | |
| 647 | - if($fill==1 || $border==1) | |
| 648 | - { | |
| 649 | - if($fill==1) | |
| 650 | - $op=($border==1) ? 'B' : 'f'; | |
| 651 | - else | |
| 652 | - $op='S'; | |
| 653 | - $s=sprintf('%.2f %.2f %.2f %.2f re %s ',$this->x*$k,($this->h-$this->y)*$k,$w*$k,-$h*$k,$op); | |
| 654 | - } | |
| 655 | - if(is_string($border)) | |
| 656 | - { | |
| 657 | - $x=$this->x; | |
| 658 | - $y=$this->y; | |
| 659 | - if(strpos($border,'L')!==false) | |
| 660 | - $s.=sprintf('%.2f %.2f m %.2f %.2f l S ',$x*$k,($this->h-$y)*$k,$x*$k,($this->h-($y+$h))*$k); | |
| 661 | - if(strpos($border,'T')!==false) | |
| 662 | - $s.=sprintf('%.2f %.2f m %.2f %.2f l S ',$x*$k,($this->h-$y)*$k,($x+$w)*$k,($this->h-$y)*$k); | |
| 663 | - if(strpos($border,'R')!==false) | |
| 664 | - $s.=sprintf('%.2f %.2f m %.2f %.2f l S ',($x+$w)*$k,($this->h-$y)*$k,($x+$w)*$k,($this->h-($y+$h))*$k); | |
| 665 | - if(strpos($border,'B')!==false) | |
| 666 | - $s.=sprintf('%.2f %.2f m %.2f %.2f l S ',$x*$k,($this->h-($y+$h))*$k,($x+$w)*$k,($this->h-($y+$h))*$k); | |
| 667 | - } | |
| 668 | - if($txt!=='') | |
| 669 | - { | |
| 670 | - if($align=='R') | |
| 671 | - $dx=$w-$this->cMargin-$this->GetStringWidth($txt); | |
| 672 | - elseif($align=='C') | |
| 673 | - $dx=($w-$this->GetStringWidth($txt))/2; | |
| 674 | - else | |
| 675 | - $dx=$this->cMargin; | |
| 676 | - if($this->ColorFlag) | |
| 677 | - $s.='q '.$this->TextColor.' '; | |
| 678 | - $txt2=str_replace(')','\\)',str_replace('(','\\(',str_replace('\\','\\\\',$txt))); | |
| 679 | - $s.=sprintf('BT %.2f %.2f Td (%s) Tj ET',($this->x+$dx)*$k,($this->h-($this->y+.5*$h+.3*$this->FontSize))*$k,$txt2); | |
| 680 | - if($this->underline) | |
| 681 | - $s.=' '.$this->_dounderline($this->x+$dx,$this->y+.5*$h+.3*$this->FontSize,$txt); | |
| 682 | - if($this->ColorFlag) | |
| 683 | - $s.=' Q'; | |
| 684 | - if($link) | |
| 685 | - $this->Link($this->x+$dx,$this->y+.5*$h-.5*$this->FontSize,$this->GetStringWidth($txt),$this->FontSize,$link); | |
| 686 | - } | |
| 687 | - if($s) | |
| 688 | - $this->_out($s); | |
| 689 | - $this->lasth=$h; | |
| 690 | - if($ln>0) | |
| 691 | - { | |
| 692 | - //Go to next line | |
| 693 | - $this->y+=$h; | |
| 694 | - if($ln==1) | |
| 695 | - $this->x=$this->lMargin; | |
| 696 | - } | |
| 697 | - else | |
| 698 | - $this->x+=$w; | |
| 699 | -} | |
| 700 | - | |
| 701 | -function MultiCell($w,$h,$txt,$border=0,$align='J',$fill=0) | |
| 702 | -{ | |
| 703 | - //Output text with automatic or explicit line breaks | |
| 704 | - $cw=&$this->CurrentFont['cw']; | |
| 705 | - if($w==0) | |
| 706 | - $w=$this->w-$this->rMargin-$this->x; | |
| 707 | - $wmax=($w-2*$this->cMargin)*1000/$this->FontSize; | |
| 708 | - $s=str_replace("\r",'',$txt); | |
| 709 | - $nb=strlen($s); | |
| 710 | - if($nb>0 && $s[$nb-1]=="\n") | |
| 711 | - $nb--; | |
| 712 | - $b=0; | |
| 713 | - if($border) | |
| 714 | - { | |
| 715 | - if($border==1) | |
| 716 | - { | |
| 717 | - $border='LTRB'; | |
| 718 | - $b='LRT'; | |
| 719 | - $b2='LR'; | |
| 720 | - } | |
| 721 | - else | |
| 722 | - { | |
| 723 | - $b2=''; | |
| 724 | - if(strpos($border,'L')!==false) | |
| 725 | - $b2.='L'; | |
| 726 | - if(strpos($border,'R')!==false) | |
| 727 | - $b2.='R'; | |
| 728 | - $b=(strpos($border,'T')!==false) ? $b2.'T' : $b2; | |
| 729 | - } | |
| 730 | - } | |
| 731 | - $sep=-1; | |
| 732 | - $i=0; | |
| 733 | - $j=0; | |
| 734 | - $l=0; | |
| 735 | - $ns=0; | |
| 736 | - $nl=1; | |
| 737 | - while($i<$nb) | |
| 738 | - { | |
| 739 | - //Get next character | |
| 740 | - $c=$s{$i}; | |
| 741 | - if($c=="\n") | |
| 742 | - { | |
| 743 | - //Explicit line break | |
| 744 | - if($this->ws>0) | |
| 745 | - { | |
| 746 | - $this->ws=0; | |
| 747 | - $this->_out('0 Tw'); | |
| 748 | - } | |
| 749 | - $this->Cell($w,$h,substr($s,$j,$i-$j),$b,2,$align,$fill); | |
| 750 | - $i++; | |
| 751 | - $sep=-1; | |
| 752 | - $j=$i; | |
| 753 | - $l=0; | |
| 754 | - $ns=0; | |
| 755 | - $nl++; | |
| 756 | - if($border && $nl==2) | |
| 757 | - $b=$b2; | |
| 758 | - continue; | |
| 759 | - } | |
| 760 | - if($c==' ') | |
| 761 | - { | |
| 762 | - $sep=$i; | |
| 763 | - $ls=$l; | |
| 764 | - $ns++; | |
| 765 | - } | |
| 766 | - $l+=$cw[$c]; | |
| 767 | - if($l>$wmax) | |
| 768 | - { | |
| 769 | - //Automatic line break | |
| 770 | - if($sep==-1) | |
| 771 | - { | |
| 772 | - if($i==$j) | |
| 773 | - $i++; | |
| 774 | - if($this->ws>0) | |
| 775 | - { | |
| 776 | - $this->ws=0; | |
| 777 | - $this->_out('0 Tw'); | |
| 778 | - } | |
| 779 | - $this->Cell($w,$h,substr($s,$j,$i-$j),$b,2,$align,$fill); | |
| 780 | - } | |
| 781 | - else | |
| 782 | - { | |
| 783 | - if($align=='J') | |
| 784 | - { | |
| 785 | - $this->ws=($ns>1) ? ($wmax-$ls)/1000*$this->FontSize/($ns-1) : 0; | |
| 786 | - $this->_out(sprintf('%.3f Tw',$this->ws*$this->k)); | |
| 787 | - } | |
| 788 | - $this->Cell($w,$h,substr($s,$j,$sep-$j),$b,2,$align,$fill); | |
| 789 | - $i=$sep+1; | |
| 790 | - } | |
| 791 | - $sep=-1; | |
| 792 | - $j=$i; | |
| 793 | - $l=0; | |
| 794 | - $ns=0; | |
| 795 | - $nl++; | |
| 796 | - if($border && $nl==2) | |
| 797 | - $b=$b2; | |
| 798 | - } | |
| 799 | - else | |
| 800 | - $i++; | |
| 801 | - } | |
| 802 | - //Last chunk | |
| 803 | - if($this->ws>0) | |
| 804 | - { | |
| 805 | - $this->ws=0; | |
| 806 | - $this->_out('0 Tw'); | |
| 807 | - } | |
| 808 | - if($border && strpos($border,'B')!==false) | |
| 809 | - $b.='B'; | |
| 810 | - $this->Cell($w,$h,substr($s,$j,$i-$j),$b,2,$align,$fill); | |
| 811 | - $this->x=$this->lMargin; | |
| 812 | -} | |
| 813 | - | |
| 814 | -function Write($h,$txt,$link='') | |
| 815 | -{ | |
| 816 | - //Output text in flowing mode | |
| 817 | - $cw=&$this->CurrentFont['cw']; | |
| 818 | - $w=$this->w-$this->rMargin-$this->x; | |
| 819 | - $wmax=($w-2*$this->cMargin)*1000/$this->FontSize; | |
| 820 | - $s=str_replace("\r",'',$txt); | |
| 821 | - $nb=strlen($s); | |
| 822 | - $sep=-1; | |
| 823 | - $i=0; | |
| 824 | - $j=0; | |
| 825 | - $l=0; | |
| 826 | - $nl=1; | |
| 827 | - while($i<$nb) | |
| 828 | - { | |
| 829 | - //Get next character | |
| 830 | - $c=$s{$i}; | |
| 831 | - if($c=="\n") | |
| 832 | - { | |
| 833 | - //Explicit line break | |
| 834 | - $this->Cell($w,$h,substr($s,$j,$i-$j),0,2,'',0,$link); | |
| 835 | - $i++; | |
| 836 | - $sep=-1; | |
| 837 | - $j=$i; | |
| 838 | - $l=0; | |
| 839 | - if($nl==1) | |
| 840 | - { | |
| 841 | - $this->x=$this->lMargin; | |
| 842 | - $w=$this->w-$this->rMargin-$this->x; | |
| 843 | - $wmax=($w-2*$this->cMargin)*1000/$this->FontSize; | |
| 844 | - } | |
| 845 | - $nl++; | |
| 846 | - continue; | |
| 847 | - } | |
| 848 | - if($c==' ') | |
| 849 | - $sep=$i; | |
| 850 | - $l+=$cw[$c]; | |
| 851 | - if($l>$wmax) | |
| 852 | - { | |
| 853 | - //Automatic line break | |
| 854 | - if($sep==-1) | |
| 855 | - { | |
| 856 | - if($this->x>$this->lMargin) | |
| 857 | - { | |
| 858 | - //Move to next line | |
| 859 | - $this->x=$this->lMargin; | |
| 860 | - $this->y+=$h; | |
| 861 | - $w=$this->w-$this->rMargin-$this->x; | |
| 862 | - $wmax=($w-2*$this->cMargin)*1000/$this->FontSize; | |
| 863 | - $i++; | |
| 864 | - $nl++; | |
| 865 | - continue; | |
| 866 | - } | |
| 867 | - if($i==$j) | |
| 868 | - $i++; | |
| 869 | - $this->Cell($w,$h,substr($s,$j,$i-$j),0,2,'',0,$link); | |
| 870 | - } | |
| 871 | - else | |
| 872 | - { | |
| 873 | - $this->Cell($w,$h,substr($s,$j,$sep-$j),0,2,'',0,$link); | |
| 874 | - $i=$sep+1; | |
| 875 | - } | |
| 876 | - $sep=-1; | |
| 877 | - $j=$i; | |
| 878 | - $l=0; | |
| 879 | - if($nl==1) | |
| 880 | - { | |
| 881 | - $this->x=$this->lMargin; | |
| 882 | - $w=$this->w-$this->rMargin-$this->x; | |
| 883 | - $wmax=($w-2*$this->cMargin)*1000/$this->FontSize; | |
| 884 | - } | |
| 885 | - $nl++; | |
| 886 | - } | |
| 887 | - else | |
| 888 | - $i++; | |
| 889 | - } | |
| 890 | - //Last chunk | |
| 891 | - if($i!=$j) | |
| 892 | - $this->Cell($l/1000*$this->FontSize,$h,substr($s,$j),0,0,'',0,$link); | |
| 893 | -} | |
| 894 | - | |
| 895 | -function Image($file,$x,$y,$w=0,$h=0,$type='',$link='') | |
| 896 | -{ | |
| 897 | - //Put an image on the page | |
| 898 | - if(!isset($this->images[$file])) | |
| 899 | - { | |
| 900 | - //First use of image, get info | |
| 901 | - if($type=='') | |
| 902 | - { | |
| 903 | - $pos=strrpos($file,'.'); | |
| 904 | - if(!$pos) | |
| 905 | - $this->Error('Image file has no extension and no type was specified: '.$file); | |
| 906 | - $type=substr($file,$pos+1); | |
| 907 | - } | |
| 908 | - $type=strtolower($type); | |
| 909 | - $mqr=get_magic_quotes_runtime(); | |
| 910 | - set_magic_quotes_runtime(0); | |
| 911 | - if($type=='jpg' || $type=='jpeg') | |
| 912 | - $info=$this->_parsejpg($file); | |
| 913 | - elseif($type=='png') | |
| 914 | - $info=$this->_parsepng($file); | |
| 915 | - else | |
| 916 | - { | |
| 917 | - //Allow for additional formats | |
| 918 | - $mtd='_parse'.$type; | |
| 919 | - if(!method_exists($this,$mtd)) | |
| 920 | - $this->Error('Unsupported image type: '.$type); | |
| 921 | - $info=$this->$mtd($file); | |
| 922 | - } | |
| 923 | - set_magic_quotes_runtime($mqr); | |
| 924 | - $info['i']=count($this->images)+1; | |
| 925 | - $this->images[$file]=$info; | |
| 926 | - } | |
| 927 | - else | |
| 928 | - $info=$this->images[$file]; | |
| 929 | - //Automatic width and height calculation if needed | |
| 930 | - if($w==0 && $h==0) | |
| 931 | - { | |
| 932 | - //Put image at 72 dpi | |
| 933 | - $w=$info['w']/$this->k; | |
| 934 | - $h=$info['h']/$this->k; | |
| 935 | - } | |
| 936 | - if($w==0) | |
| 937 | - $w=$h*$info['w']/$info['h']; | |
| 938 | - if($h==0) | |
| 939 | - $h=$w*$info['h']/$info['w']; | |
| 940 | - $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'])); | |
| 941 | - if($link) | |
| 942 | - $this->Link($x,$y,$w,$h,$link); | |
| 943 | -} | |
| 944 | - | |
| 945 | -function Ln($h='') | |
| 946 | -{ | |
| 947 | - //Line feed; default value is last cell height | |
| 948 | - $this->x=$this->lMargin; | |
| 949 | - if(is_string($h)) | |
| 950 | - $this->y+=$this->lasth; | |
| 951 | - else | |
| 952 | - $this->y+=$h; | |
| 953 | -} | |
| 954 | - | |
| 955 | -function GetX() | |
| 956 | -{ | |
| 957 | - //Get x position | |
| 958 | - return $this->x; | |
| 959 | -} | |
| 960 | - | |
| 961 | -function SetX($x) | |
| 962 | -{ | |
| 963 | - //Set x position | |
| 964 | - if($x>=0) | |
| 965 | - $this->x=$x; | |
| 966 | - else | |
| 967 | - $this->x=$this->w+$x; | |
| 968 | -} | |
| 969 | - | |
| 970 | -function GetY() | |
| 971 | -{ | |
| 972 | - //Get y position | |
| 973 | - return $this->y; | |
| 974 | -} | |
| 975 | - | |
| 976 | -function SetY($y) | |
| 977 | -{ | |
| 978 | - //Set y position and reset x | |
| 979 | - $this->x=$this->lMargin; | |
| 980 | - if($y>=0) | |
| 981 | - $this->y=$y; | |
| 982 | - else | |
| 983 | - $this->y=$this->h+$y; | |
| 984 | -} | |
| 985 | - | |
| 986 | -function SetXY($x,$y) | |
| 987 | -{ | |
| 988 | - //Set x and y positions | |
| 989 | - $this->SetY($y); | |
| 990 | - $this->SetX($x); | |
| 991 | -} | |
| 992 | - | |
| 993 | -function Output($name='',$dest='') | |
| 994 | -{ | |
| 995 | - //Output PDF to some destination | |
| 996 | - //Finish document if necessary | |
| 997 | - if($this->state<3) | |
| 998 | - $this->Close(); | |
| 999 | - //Normalize parameters | |
| 1000 | - if(is_bool($dest)) | |
| 1001 | - $dest=$dest ? 'D' : 'F'; | |
| 1002 | - $dest=strtoupper($dest); | |
| 1003 | - if($dest=='') | |
| 1004 | - { | |
| 1005 | - if($name=='') | |
| 1006 | - { | |
| 1007 | - $name='doc.pdf'; | |
| 1008 | - $dest='I'; | |
| 1009 | - } | |
| 1010 | - else | |
| 1011 | - $dest='F'; | |
| 1012 | - } | |
| 1013 | - switch($dest) | |
| 1014 | - { | |
| 1015 | - case 'I': | |
| 1016 | - //Send to standard output | |
| 1017 | - if(ob_get_contents()) | |
| 1018 | - $this->Error('Some data has already been output, can\'t send PDF file'); | |
| 1019 | - if(php_sapi_name()!='cli') | |
| 1020 | - { | |
| 1021 | - //We send to a browser | |
| 1022 | - header('Content-Type: application/pdf'); | |
| 1023 | - if(headers_sent()) | |
| 1024 | - $this->Error('Some data has already been output to browser, can\'t send PDF file'); | |
| 1025 | - header('Content-Length: '.strlen($this->buffer)); | |
| 1026 | - header('Content-disposition: inline; filename="'.$name.'"'); | |
| 1027 | - } | |
| 1028 | - echo $this->buffer; | |
| 1029 | - break; | |
| 1030 | - case 'D': | |
| 1031 | - //Download file | |
| 1032 | - if(ob_get_contents()) | |
| 1033 | - $this->Error('Some data has already been output, can\'t send PDF file'); | |
| 1034 | - if(isset($_SERVER['HTTP_USER_AGENT']) && strpos($_SERVER['HTTP_USER_AGENT'],'MSIE')) | |
| 1035 | - header('Content-Type: application/force-download'); | |
| 1036 | - else | |
| 1037 | - header('Content-Type: application/octet-stream'); | |
| 1038 | - if(headers_sent()) | |
| 1039 | - $this->Error('Some data has already been output to browser, can\'t send PDF file'); | |
| 1040 | - header('Content-Length: '.strlen($this->buffer)); | |
| 1041 | - header('Content-disposition: attachment; filename="'.$name.'"'); | |
| 1042 | - echo $this->buffer; | |
| 1043 | - break; | |
| 1044 | - case 'F': | |
| 1045 | - //Save to local file | |
| 1046 | - $f=fopen($name,'wb'); | |
| 1047 | - if(!$f) | |
| 1048 | - $this->Error('Unable to create output file: '.$name); | |
| 1049 | - fwrite($f,$this->buffer,strlen($this->buffer)); | |
| 1050 | - fclose($f); | |
| 1051 | - break; | |
| 1052 | - case 'S': | |
| 1053 | - //Return as a string | |
| 1054 | - return $this->buffer; | |
| 1055 | - default: | |
| 1056 | - $this->Error('Incorrect output destination: '.$dest); | |
| 1057 | - } | |
| 1058 | - return ''; | |
| 1059 | -} | |
| 1060 | - | |
| 1061 | -/******************************************************************************* | |
| 1062 | -* * | |
| 1063 | -* Protected methods * | |
| 1064 | -* * | |
| 1065 | -*******************************************************************************/ | |
| 1066 | -function _dochecks() | |
| 1067 | -{ | |
| 1068 | - //Check for locale-related bug | |
| 1069 | - if(1.1==1) | |
| 1070 | - $this->Error('Don\'t alter the locale before including class file'); | |
| 1071 | - //Check for decimal separator | |
| 1072 | - if(sprintf('%.1f',1.0)!='1.0') | |
| 1073 | - setlocale(LC_NUMERIC,'C'); | |
| 1074 | -} | |
| 1075 | - | |
| 1076 | -function _getfontpath() | |
| 1077 | -{ | |
| 1078 | - if(!defined('FPDF_FONTPATH') && is_dir(dirname(__FILE__).'/font')) | |
| 1079 | - define('FPDF_FONTPATH',dirname(__FILE__).'/font/'); | |
| 1080 | - return defined('FPDF_FONTPATH') ? FPDF_FONTPATH : ''; | |
| 1081 | -} | |
| 1082 | - | |
| 1083 | -function _putpages() | |
| 1084 | -{ | |
| 1085 | - $nb=$this->page; | |
| 1086 | - if(!empty($this->AliasNbPages)) | |
| 1087 | - { | |
| 1088 | - //Replace number of pages | |
| 1089 | - for($n=1;$n<=$nb;$n++) | |
| 1090 | - $this->pages[$n]=str_replace($this->AliasNbPages,$nb,$this->pages[$n]); | |
| 1091 | - } | |
| 1092 | - if($this->DefOrientation=='P') | |
| 1093 | - { | |
| 1094 | - $wPt=$this->fwPt; | |
| 1095 | - $hPt=$this->fhPt; | |
| 1096 | - } | |
| 1097 | - else | |
| 1098 | - { | |
| 1099 | - $wPt=$this->fhPt; | |
| 1100 | - $hPt=$this->fwPt; | |
| 1101 | - } | |
| 1102 | - $filter=($this->compress) ? '/Filter /FlateDecode ' : ''; | |
| 1103 | - for($n=1;$n<=$nb;$n++) | |
| 1104 | - { | |
| 1105 | - //Page | |
| 1106 | - $this->_newobj(); | |
| 1107 | - $this->_out('<</Type /Page'); | |
| 1108 | - $this->_out('/Parent 1 0 R'); | |
| 1109 | - if(isset($this->OrientationChanges[$n])) | |
| 1110 | - $this->_out(sprintf('/MediaBox [0 0 %.2f %.2f]',$hPt,$wPt)); | |
| 1111 | - $this->_out('/Resources 2 0 R'); | |
| 1112 | - if(isset($this->PageLinks[$n])) | |
| 1113 | - { | |
| 1114 | - //Links | |
| 1115 | - $annots='/Annots ['; | |
| 1116 | - foreach($this->PageLinks[$n] as $pl) | |
| 1117 | - { | |
| 1118 | - $rect=sprintf('%.2f %.2f %.2f %.2f',$pl[0],$pl[1],$pl[0]+$pl[2],$pl[1]-$pl[3]); | |
| 1119 | - $annots.='<</Type /Annot /Subtype /Link /Rect ['.$rect.'] /Border [0 0 0] '; | |
| 1120 | - if(is_string($pl[4])) | |
| 1121 | - $annots.='/A <</S /URI /URI '.$this->_textstring($pl[4]).'>>>>'; | |
| 1122 | - else | |
| 1123 | - { | |
| 1124 | - $l=$this->links[$pl[4]]; | |
| 1125 | - $h=isset($this->OrientationChanges[$l[0]]) ? $wPt : $hPt; | |
| 1126 | - $annots.=sprintf('/Dest [%d 0 R /XYZ 0 %.2f null]>>',1+2*$l[0],$h-$l[1]*$this->k); | |
| 1127 | - } | |
| 1128 | - } | |
| 1129 | - $this->_out($annots.']'); | |
| 1130 | - } | |
| 1131 | - $this->_out('/Contents '.($this->n+1).' 0 R>>'); | |
| 1132 | - $this->_out('endobj'); | |
| 1133 | - //Page content | |
| 1134 | - $p=($this->compress) ? gzcompress($this->pages[$n]) : $this->pages[$n]; | |
| 1135 | - $this->_newobj(); | |
| 1136 | - $this->_out('<<'.$filter.'/Length '.strlen($p).'>>'); | |
| 1137 | - $this->_putstream($p); | |
| 1138 | - $this->_out('endobj'); | |
| 1139 | - } | |
| 1140 | - //Pages root | |
| 1141 | - $this->offsets[1]=strlen($this->buffer); | |
| 1142 | - $this->_out('1 0 obj'); | |
| 1143 | - $this->_out('<</Type /Pages'); | |
| 1144 | - $kids='/Kids ['; | |
| 1145 | - for($i=0;$i<$nb;$i++) | |
| 1146 | - $kids.=(3+2*$i).' 0 R '; | |
| 1147 | - $this->_out($kids.']'); | |
| 1148 | - $this->_out('/Count '.$nb); | |
| 1149 | - $this->_out(sprintf('/MediaBox [0 0 %.2f %.2f]',$wPt,$hPt)); | |
| 1150 | - $this->_out('>>'); | |
| 1151 | - $this->_out('endobj'); | |
| 1152 | -} | |
| 1153 | - | |
| 1154 | -function _putfonts() | |
| 1155 | -{ | |
| 1156 | - $nf=$this->n; | |
| 1157 | - foreach($this->diffs as $diff) | |
| 1158 | - { | |
| 1159 | - //Encodings | |
| 1160 | - $this->_newobj(); | |
| 1161 | - $this->_out('<</Type /Encoding /BaseEncoding /WinAnsiEncoding /Differences ['.$diff.']>>'); | |
| 1162 | - $this->_out('endobj'); | |
| 1163 | - } | |
| 1164 | - $mqr=get_magic_quotes_runtime(); | |
| 1165 | - set_magic_quotes_runtime(0); | |
| 1166 | - foreach($this->FontFiles as $file=>$info) | |
| 1167 | - { | |
| 1168 | - //Font file embedding | |
| 1169 | - $this->_newobj(); | |
| 1170 | - $this->FontFiles[$file]['n']=$this->n; | |
| 1171 | - $font=''; | |
| 1172 | - $f=fopen($this->_getfontpath().$file,'rb',1); | |
| 1173 | - if(!$f) | |
| 1174 | - $this->Error('Font file not found'); | |
| 1175 | - while(!feof($f)) | |
| 1176 | - $font.=fread($f,8192); | |
| 1177 | - fclose($f); | |
| 1178 | - $compressed=(substr($file,-2)=='.z'); | |
| 1179 | - if(!$compressed && isset($info['length2'])) | |
| 1180 | - { | |
| 1181 | - $header=(ord($font{0})==128); | |
| 1182 | - if($header) | |
| 1183 | - { | |
| 1184 | - //Strip first binary header | |
| 1185 | - $font=substr($font,6); | |
| 1186 | - } | |
| 1187 | - if($header && ord($font{$info['length1']})==128) | |
| 1188 | - { | |
| 1189 | - //Strip second binary header | |
| 1190 | - $font=substr($font,0,$info['length1']).substr($font,$info['length1']+6); | |
| 1191 | - } | |
| 1192 | - } | |
| 1193 | - $this->_out('<</Length '.strlen($font)); | |
| 1194 | - if($compressed) | |
| 1195 | - $this->_out('/Filter /FlateDecode'); | |
| 1196 | - $this->_out('/Length1 '.$info['length1']); | |
| 1197 | - if(isset($info['length2'])) | |
| 1198 | - $this->_out('/Length2 '.$info['length2'].' /Length3 0'); | |
| 1199 | - $this->_out('>>'); | |
| 1200 | - $this->_putstream($font); | |
| 1201 | - $this->_out('endobj'); | |
| 1202 | - } | |
| 1203 | - set_magic_quotes_runtime($mqr); | |
| 1204 | - foreach($this->fonts as $k=>$font) | |
| 1205 | - { | |
| 1206 | - //Font objects | |
| 1207 | - $this->fonts[$k]['n']=$this->n+1; | |
| 1208 | - $type=$font['type']; | |
| 1209 | - $name=$font['name']; | |
| 1210 | - if($type=='core') | |
| 1211 | - { | |
| 1212 | - //Standard font | |
| 1213 | - $this->_newobj(); | |
| 1214 | - $this->_out('<</Type /Font'); | |
| 1215 | - $this->_out('/BaseFont /'.$name); | |
| 1216 | - $this->_out('/Subtype /Type1'); | |
| 1217 | - if($name!='Symbol' && $name!='ZapfDingbats') | |
| 1218 | - $this->_out('/Encoding /WinAnsiEncoding'); | |
| 1219 | - $this->_out('>>'); | |
| 1220 | - $this->_out('endobj'); | |
| 1221 | - } | |
| 1222 | - elseif($type=='Type1' || $type=='TrueType') | |
| 1223 | - { | |
| 1224 | - //Additional Type1 or TrueType font | |
| 1225 | - $this->_newobj(); | |
| 1226 | - $this->_out('<</Type /Font'); | |
| 1227 | - $this->_out('/BaseFont /'.$name); | |
| 1228 | - $this->_out('/Subtype /'.$type); | |
| 1229 | - $this->_out('/FirstChar 32 /LastChar 255'); | |
| 1230 | - $this->_out('/Widths '.($this->n+1).' 0 R'); | |
| 1231 | - $this->_out('/FontDescriptor '.($this->n+2).' 0 R'); | |
| 1232 | - if($font['enc']) | |
| 1233 | - { | |
| 1234 | - if(isset($font['diff'])) | |
| 1235 | - $this->_out('/Encoding '.($nf+$font['diff']).' 0 R'); | |
| 1236 | - else | |
| 1237 | - $this->_out('/Encoding /WinAnsiEncoding'); | |
| 1238 | - } | |
| 1239 | - $this->_out('>>'); | |
| 1240 | - $this->_out('endobj'); | |
| 1241 | - //Widths | |
| 1242 | - $this->_newobj(); | |
| 1243 | - $cw=&$font['cw']; | |
| 1244 | - $s='['; | |
| 1245 | - for($i=32;$i<=255;$i++) | |
| 1246 | - $s.=$cw[chr($i)].' '; | |
| 1247 | - $this->_out($s.']'); | |
| 1248 | - $this->_out('endobj'); | |
| 1249 | - //Descriptor | |
| 1250 | - $this->_newobj(); | |
| 1251 | - $s='<</Type /FontDescriptor /FontName /'.$name; | |
| 1252 | - foreach($font['desc'] as $k=>$v) | |
| 1253 | - $s.=' /'.$k.' '.$v; | |
| 1254 | - $file=$font['file']; | |
| 1255 | - if($file) | |
| 1256 | - $s.=' /FontFile'.($type=='Type1' ? '' : '2').' '.$this->FontFiles[$file]['n'].' 0 R'; | |
| 1257 | - $this->_out($s.'>>'); | |
| 1258 | - $this->_out('endobj'); | |
| 1259 | - } | |
| 1260 | - else | |
| 1261 | - { | |
| 1262 | - //Allow for additional types | |
| 1263 | - $mtd='_put'.strtolower($type); | |
| 1264 | - if(!method_exists($this,$mtd)) | |
| 1265 | - $this->Error('Unsupported font type: '.$type); | |
| 1266 | - $this->$mtd($font); | |
| 1267 | - } | |
| 1268 | - } | |
| 1269 | -} | |
| 1270 | - | |
| 1271 | -function _putimages() | |
| 1272 | -{ | |
| 1273 | - $filter=($this->compress) ? '/Filter /FlateDecode ' : ''; | |
| 1274 | - reset($this->images); | |
| 1275 | - while(list($file,$info)=each($this->images)) | |
| 1276 | - { | |
| 1277 | - $this->_newobj(); | |
| 1278 | - $this->images[$file]['n']=$this->n; | |
| 1279 | - $this->_out('<</Type /XObject'); | |
| 1280 | - $this->_out('/Subtype /Image'); | |
| 1281 | - $this->_out('/Width '.$info['w']); | |
| 1282 | - $this->_out('/Height '.$info['h']); | |
| 1283 | - if($info['cs']=='Indexed') | |
| 1284 | - $this->_out('/ColorSpace [/Indexed /DeviceRGB '.(strlen($info['pal'])/3-1).' '.($this->n+1).' 0 R]'); | |
| 1285 | - else | |
| 1286 | - { | |
| 1287 | - $this->_out('/ColorSpace /'.$info['cs']); | |
| 1288 | - if($info['cs']=='DeviceCMYK') | |
| 1289 | - $this->_out('/Decode [1 0 1 0 1 0 1 0]'); | |
| 1290 | - } | |
| 1291 | - $this->_out('/BitsPerComponent '.$info['bpc']); | |
| 1292 | - if(isset($info['f'])) | |
| 1293 | - $this->_out('/Filter /'.$info['f']); | |
| 1294 | - if(isset($info['parms'])) | |
| 1295 | - $this->_out($info['parms']); | |
| 1296 | - if(isset($info['trns']) && is_array($info['trns'])) | |
| 1297 | - { | |
| 1298 | - $trns=''; | |
| 1299 | - for($i=0;$i<count($info['trns']);$i++) | |
| 1300 | - $trns.=$info['trns'][$i].' '.$info['trns'][$i].' '; | |
| 1301 | - $this->_out('/Mask ['.$trns.']'); | |
| 1302 | - } | |
| 1303 | - $this->_out('/Length '.strlen($info['data']).'>>'); | |
| 1304 | - $this->_putstream($info['data']); | |
| 1305 | - unset($this->images[$file]['data']); | |
| 1306 | - $this->_out('endobj'); | |
| 1307 | - //Palette | |
| 1308 | - if($info['cs']=='Indexed') | |
| 1309 | - { | |
| 1310 | - $this->_newobj(); | |
| 1311 | - $pal=($this->compress) ? gzcompress($info['pal']) : $info['pal']; | |
| 1312 | - $this->_out('<<'.$filter.'/Length '.strlen($pal).'>>'); | |
| 1313 | - $this->_putstream($pal); | |
| 1314 | - $this->_out('endobj'); | |
| 1315 | - } | |
| 1316 | - } | |
| 1317 | -} | |
| 1318 | - | |
| 1319 | -function _putxobjectdict() | |
| 1320 | -{ | |
| 1321 | - foreach($this->images as $image) | |
| 1322 | - $this->_out('/I'.$image['i'].' '.$image['n'].' 0 R'); | |
| 1323 | -} | |
| 1324 | - | |
| 1325 | -function _putresourcedict() | |
| 1326 | -{ | |
| 1327 | - $this->_out('/ProcSet [/PDF /Text /ImageB /ImageC /ImageI]'); | |
| 1328 | - $this->_out('/Font <<'); | |
| 1329 | - foreach($this->fonts as $font) | |
| 1330 | - $this->_out('/F'.$font['i'].' '.$font['n'].' 0 R'); | |
| 1331 | - $this->_out('>>'); | |
| 1332 | - $this->_out('/XObject <<'); | |
| 1333 | - $this->_putxobjectdict(); | |
| 1334 | - $this->_out('>>'); | |
| 1335 | -} | |
| 1336 | - | |
| 1337 | -function _putresources() | |
| 1338 | -{ | |
| 1339 | - $this->_putfonts(); | |
| 1340 | - $this->_putimages(); | |
| 1341 | - //Resource dictionary | |
| 1342 | - $this->offsets[2]=strlen($this->buffer); | |
| 1343 | - $this->_out('2 0 obj'); | |
| 1344 | - $this->_out('<<'); | |
| 1345 | - $this->_putresourcedict(); | |
| 1346 | - $this->_out('>>'); | |
| 1347 | - $this->_out('endobj'); | |
| 1348 | -} | |
| 1349 | - | |
| 1350 | -function _putinfo() | |
| 1351 | -{ | |
| 1352 | - $this->_out('/Producer '.$this->_textstring('FPDF '.FPDF_VERSION)); | |
| 1353 | - if(!empty($this->title)) | |
| 1354 | - $this->_out('/Title '.$this->_textstring($this->title)); | |
| 1355 | - if(!empty($this->subject)) | |
| 1356 | - $this->_out('/Subject '.$this->_textstring($this->subject)); | |
| 1357 | - if(!empty($this->author)) | |
| 1358 | - $this->_out('/Author '.$this->_textstring($this->author)); | |
| 1359 | - if(!empty($this->keywords)) | |
| 1360 | - $this->_out('/Keywords '.$this->_textstring($this->keywords)); | |
| 1361 | - if(!empty($this->creator)) | |
| 1362 | - $this->_out('/Creator '.$this->_textstring($this->creator)); | |
| 1363 | - $this->_out('/CreationDate '.$this->_textstring('D:'.date('YmdHis'))); | |
| 1364 | -} | |
| 1365 | - | |
| 1366 | -function _putcatalog() | |
| 1367 | -{ | |
| 1368 | - $this->_out('/Type /Catalog'); | |
| 1369 | - $this->_out('/Pages 1 0 R'); | |
| 1370 | - if($this->ZoomMode=='fullpage') | |
| 1371 | - $this->_out('/OpenAction [3 0 R /Fit]'); | |
| 1372 | - elseif($this->ZoomMode=='fullwidth') | |
| 1373 | - $this->_out('/OpenAction [3 0 R /FitH null]'); | |
| 1374 | - elseif($this->ZoomMode=='real') | |
| 1375 | - $this->_out('/OpenAction [3 0 R /XYZ null null 1]'); | |
| 1376 | - elseif(!is_string($this->ZoomMode)) | |
| 1377 | - $this->_out('/OpenAction [3 0 R /XYZ null null '.($this->ZoomMode/100).']'); | |
| 1378 | - if($this->LayoutMode=='single') | |
| 1379 | - $this->_out('/PageLayout /SinglePage'); | |
| 1380 | - elseif($this->LayoutMode=='continuous') | |
| 1381 | - $this->_out('/PageLayout /OneColumn'); | |
| 1382 | - elseif($this->LayoutMode=='two') | |
| 1383 | - $this->_out('/PageLayout /TwoColumnLeft'); | |
| 1384 | -} | |
| 1385 | - | |
| 1386 | -function _putheader() | |
| 1387 | -{ | |
| 1388 | - $this->_out('%PDF-'.$this->PDFVersion); | |
| 1389 | -} | |
| 1390 | - | |
| 1391 | -function _puttrailer() | |
| 1392 | -{ | |
| 1393 | - $this->_out('/Size '.($this->n+1)); | |
| 1394 | - $this->_out('/Root '.$this->n.' 0 R'); | |
| 1395 | - $this->_out('/Info '.($this->n-1).' 0 R'); | |
| 1396 | -} | |
| 1397 | - | |
| 1398 | -function _enddoc() | |
| 1399 | -{ | |
| 1400 | - $this->_putheader(); | |
| 1401 | - $this->_putpages(); | |
| 1402 | - $this->_putresources(); | |
| 1403 | - //Info | |
| 1404 | - $this->_newobj(); | |
| 1405 | - $this->_out('<<'); | |
| 1406 | - $this->_putinfo(); | |
| 1407 | - $this->_out('>>'); | |
| 1408 | - $this->_out('endobj'); | |
| 1409 | - //Catalog | |
| 1410 | - $this->_newobj(); | |
| 1411 | - $this->_out('<<'); | |
| 1412 | - $this->_putcatalog(); | |
| 1413 | - $this->_out('>>'); | |
| 1414 | - $this->_out('endobj'); | |
| 1415 | - //Cross-ref | |
| 1416 | - $o=strlen($this->buffer); | |
| 1417 | - $this->_out('xref'); | |
| 1418 | - $this->_out('0 '.($this->n+1)); | |
| 1419 | - $this->_out('0000000000 65535 f '); | |
| 1420 | - for($i=1;$i<=$this->n;$i++) | |
| 1421 | - $this->_out(sprintf('%010d 00000 n ',$this->offsets[$i])); | |
| 1422 | - //Trailer | |
| 1423 | - $this->_out('trailer'); | |
| 1424 | - $this->_out('<<'); | |
| 1425 | - $this->_puttrailer(); | |
| 1426 | - $this->_out('>>'); | |
| 1427 | - $this->_out('startxref'); | |
| 1428 | - $this->_out($o); | |
| 1429 | - $this->_out('%%EOF'); | |
| 1430 | - $this->state=3; | |
| 1431 | -} | |
| 1432 | - | |
| 1433 | -function _beginpage($orientation) | |
| 1434 | -{ | |
| 1435 | - $this->page++; | |
| 1436 | - $this->pages[$this->page]=''; | |
| 1437 | - $this->state=2; | |
| 1438 | - $this->x=$this->lMargin; | |
| 1439 | - $this->y=$this->tMargin; | |
| 1440 | - $this->FontFamily=''; | |
| 1441 | - //Page orientation | |
| 1442 | - if(!$orientation) | |
| 1443 | - $orientation=$this->DefOrientation; | |
| 1444 | - else | |
| 1445 | - { | |
| 1446 | - $orientation=strtoupper($orientation{0}); | |
| 1447 | - if($orientation!=$this->DefOrientation) | |
| 1448 | - $this->OrientationChanges[$this->page]=true; | |
| 1449 | - } | |
| 1450 | - if($orientation!=$this->CurOrientation) | |
| 1451 | - { | |
| 1452 | - //Change orientation | |
| 1453 | - if($orientation=='P') | |
| 1454 | - { | |
| 1455 | - $this->wPt=$this->fwPt; | |
| 1456 | - $this->hPt=$this->fhPt; | |
| 1457 | - $this->w=$this->fw; | |
| 1458 | - $this->h=$this->fh; | |
| 1459 | - } | |
| 1460 | - else | |
| 1461 | - { | |
| 1462 | - $this->wPt=$this->fhPt; | |
| 1463 | - $this->hPt=$this->fwPt; | |
| 1464 | - $this->w=$this->fh; | |
| 1465 | - $this->h=$this->fw; | |
| 1466 | - } | |
| 1467 | - $this->PageBreakTrigger=$this->h-$this->bMargin; | |
| 1468 | - $this->CurOrientation=$orientation; | |
| 1469 | - } | |
| 1470 | -} | |
| 1471 | - | |
| 1472 | -function _endpage() | |
| 1473 | -{ | |
| 1474 | - //End of page contents | |
| 1475 | - $this->state=1; | |
| 1476 | -} | |
| 1477 | - | |
| 1478 | -function _newobj() | |
| 1479 | -{ | |
| 1480 | - //Begin a new object | |
| 1481 | - $this->n++; | |
| 1482 | - $this->offsets[$this->n]=strlen($this->buffer); | |
| 1483 | - $this->_out($this->n.' 0 obj'); | |
| 1484 | -} | |
| 1485 | - | |
| 1486 | -function _dounderline($x,$y,$txt) | |
| 1487 | -{ | |
| 1488 | - //Underline text | |
| 1489 | - $up=$this->CurrentFont['up']; | |
| 1490 | - $ut=$this->CurrentFont['ut']; | |
| 1491 | - $w=$this->GetStringWidth($txt)+$this->ws*substr_count($txt,' '); | |
| 1492 | - 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); | |
| 1493 | -} | |
| 1494 | - | |
| 1495 | -function _parsejpg($file) | |
| 1496 | -{ | |
| 1497 | - //Extract info from a JPEG file | |
| 1498 | - $a=GetImageSize($file); | |
| 1499 | - if(!$a) | |
| 1500 | - $this->Error('Missing or incorrect image file: '.$file); | |
| 1501 | - if($a[2]!=2) | |
| 1502 | - $this->Error('Not a JPEG file: '.$file); | |
| 1503 | - if(!isset($a['channels']) || $a['channels']==3) | |
| 1504 | - $colspace='DeviceRGB'; | |
| 1505 | - elseif($a['channels']==4) | |
| 1506 | - $colspace='DeviceCMYK'; | |
| 1507 | - else | |
| 1508 | - $colspace='DeviceGray'; | |
| 1509 | - $bpc=isset($a['bits']) ? $a['bits'] : 8; | |
| 1510 | - //Read whole file | |
| 1511 | - $f=fopen($file,'rb'); | |
| 1512 | - $data=''; | |
| 1513 | - while(!feof($f)) | |
| 1514 | - $data.=fread($f,4096); | |
| 1515 | - fclose($f); | |
| 1516 | - return array('w'=>$a[0],'h'=>$a[1],'cs'=>$colspace,'bpc'=>$bpc,'f'=>'DCTDecode','data'=>$data); | |
| 1517 | -} | |
| 1518 | - | |
| 1519 | -function _parsepng($file) | |
| 1520 | -{ | |
| 1521 | - //Extract info from a PNG file | |
| 1522 | - $f=fopen($file,'rb'); | |
| 1523 | - if(!$f) | |
| 1524 | - $this->Error('Can\'t open image file: '.$file); | |
| 1525 | - //Check signature | |
| 1526 | - if(fread($f,8)!=chr(137).'PNG'.chr(13).chr(10).chr(26).chr(10)) | |
| 1527 | - $this->Error('Not a PNG file: '.$file); | |
| 1528 | - //Read header chunk | |
| 1529 | - fread($f,4); | |
| 1530 | - if(fread($f,4)!='IHDR') | |
| 1531 | - $this->Error('Incorrect PNG file: '.$file); | |
| 1532 | - $w=$this->_freadint($f); | |
| 1533 | - $h=$this->_freadint($f); | |
| 1534 | - $bpc=ord(fread($f,1)); | |
| 1535 | - if($bpc>8) | |
| 1536 | - $this->Error('16-bit depth not supported: '.$file); | |
| 1537 | - $ct=ord(fread($f,1)); | |
| 1538 | - if($ct==0) | |
| 1539 | - $colspace='DeviceGray'; | |
| 1540 | - elseif($ct==2) | |
| 1541 | - $colspace='DeviceRGB'; | |
| 1542 | - elseif($ct==3) | |
| 1543 | - $colspace='Indexed'; | |
| 1544 | - else | |
| 1545 | - $this->Error('Alpha channel not supported: '.$file); | |
| 1546 | - if(ord(fread($f,1))!=0) | |
| 1547 | - $this->Error('Unknown compression method: '.$file); | |
| 1548 | - if(ord(fread($f,1))!=0) | |
| 1549 | - $this->Error('Unknown filter method: '.$file); | |
| 1550 | - if(ord(fread($f,1))!=0) | |
| 1551 | - $this->Error('Interlacing not supported: '.$file); | |
| 1552 | - fread($f,4); | |
| 1553 | - $parms='/DecodeParms <</Predictor 15 /Colors '.($ct==2 ? 3 : 1).' /BitsPerComponent '.$bpc.' /Columns '.$w.'>>'; | |
| 1554 | - //Scan chunks looking for palette, transparency and image data | |
| 1555 | - $pal=''; | |
| 1556 | - $trns=''; | |
| 1557 | - $data=''; | |
| 1558 | - do | |
| 1559 | - { | |
| 1560 | - $n=$this->_freadint($f); | |
| 1561 | - $type=fread($f,4); | |
| 1562 | - if($type=='PLTE') | |
| 1563 | - { | |
| 1564 | - //Read palette | |
| 1565 | - $pal=fread($f,$n); | |
| 1566 | - fread($f,4); | |
| 1567 | - } | |
| 1568 | - elseif($type=='tRNS') | |
| 1569 | - { | |
| 1570 | - //Read transparency info | |
| 1571 | - $t=fread($f,$n); | |
| 1572 | - if($ct==0) | |
| 1573 | - $trns=array(ord(substr($t,1,1))); | |
| 1574 | - elseif($ct==2) | |
| 1575 | - $trns=array(ord(substr($t,1,1)),ord(substr($t,3,1)),ord(substr($t,5,1))); | |
| 1576 | - else | |
| 1577 | - { | |
| 1578 | - $pos=strpos($t,chr(0)); | |
| 1579 | - if($pos!==false) | |
| 1580 | - $trns=array($pos); | |
| 1581 | - } | |
| 1582 | - fread($f,4); | |
| 1583 | - } | |
| 1584 | - elseif($type=='IDAT') | |
| 1585 | - { | |
| 1586 | - //Read image data block | |
| 1587 | - $data.=fread($f,$n); | |
| 1588 | - fread($f,4); | |
| 1589 | - } | |
| 1590 | - elseif($type=='IEND') | |
| 1591 | - break; | |
| 1592 | - else | |
| 1593 | - fread($f,$n+4); | |
| 1594 | - } | |
| 1595 | - while($n); | |
| 1596 | - if($colspace=='Indexed' && empty($pal)) | |
| 1597 | - $this->Error('Missing palette in '.$file); | |
| 1598 | - fclose($f); | |
| 1599 | - return array('w'=>$w,'h'=>$h,'cs'=>$colspace,'bpc'=>$bpc,'f'=>'FlateDecode','parms'=>$parms,'pal'=>$pal,'trns'=>$trns,'data'=>$data); | |
| 1600 | -} | |
| 1601 | - | |
| 1602 | -function _freadint($f) | |
| 1603 | -{ | |
| 1604 | - //Read a 4-byte integer from file | |
| 1605 | - $a=unpack('Ni',fread($f,4)); | |
| 1606 | - return $a['i']; | |
| 1607 | -} | |
| 1608 | - | |
| 1609 | -function _textstring($s) | |
| 1610 | -{ | |
| 1611 | - //Format a text string | |
| 1612 | - return '('.$this->_escape($s).')'; | |
| 1613 | -} | |
| 1614 | - | |
| 1615 | -function _escape($s) | |
| 1616 | -{ | |
| 1617 | - //Add \ before \, ( and ) | |
| 1618 | - return str_replace(')','\\)',str_replace('(','\\(',str_replace('\\','\\\\',$s))); | |
| 1619 | -} | |
| 1620 | - | |
| 1621 | -function _putstream($s) | |
| 1622 | -{ | |
| 1623 | - $this->_out('stream'); | |
| 1624 | - $this->_out($s); | |
| 1625 | - $this->_out('endstream'); | |
| 1626 | -} | |
| 1627 | - | |
| 1628 | -function _out($s) | |
| 1629 | -{ | |
| 1630 | - //Add a line to the document | |
| 1631 | - if($this->state==2) | |
| 1632 | - $this->pages[$this->page].=$s."\n"; | |
| 1633 | - else | |
| 1634 | - $this->buffer.=$s."\n"; | |
| 1635 | -} | |
| 1636 | -//End of class | |
| 1637 | -} | |
| 1638 | - | |
| 1639 | -//Handle special IE contype request | |
| 1640 | -if(isset($_SERVER['HTTP_USER_AGENT']) && $_SERVER['HTTP_USER_AGENT']=='contype') | |
| 1641 | -{ | |
| 1642 | - header('Content-Type: application/pdf'); | |
| 1643 | - exit; | |
| 1644 | -} | |
| 1645 | - | |
| 1646 | -} | |
| 1647 | -?> | |
| 1 | +<?php | |
| 2 | +/******************************************************************************* | |
| 3 | +* Software: FPDF * | |
| 4 | +* Version: 1.53 * | |
| 5 | +* Date: 2004-12-31 * | |
| 6 | +* Author: Olivier PLATHEY * | |
| 7 | +* License: Freeware * | |
| 8 | +* * | |
| 9 | +* You may use, modify and redistribute this software as you wish. * | |
| 10 | +*******************************************************************************/ | |
| 11 | + | |
| 12 | +if(!class_exists('FPDF')) | |
| 13 | +{ | |
| 14 | +define('FPDF_VERSION','1.53'); | |
| 15 | + | |
| 16 | +class FPDF | |
| 17 | +{ | |
| 18 | +//Private properties | |
| 19 | +var $page; //current page number | |
| 20 | +var $n; //current object number | |
| 21 | +var $offsets; //array of object offsets | |
| 22 | +var $buffer; //buffer holding in-memory PDF | |
| 23 | +var $pages; //array containing pages | |
| 24 | +var $state; //current document state | |
| 25 | +var $compress; //compression flag | |
| 26 | +var $DefOrientation; //default orientation | |
| 27 | +var $CurOrientation; //current orientation | |
| 28 | +var $OrientationChanges; //array indicating orientation changes | |
| 29 | +var $k; //scale factor (number of points in user unit) | |
| 30 | +var $fwPt,$fhPt; //dimensions of page format in points | |
| 31 | +var $fw,$fh; //dimensions of page format in user unit | |
| 32 | +var $wPt,$hPt; //current dimensions of page in points | |
| 33 | +var $w,$h; //current dimensions of page in user unit | |
| 34 | +var $lMargin; //left margin | |
| 35 | +var $tMargin; //top margin | |
| 36 | +var $rMargin; //right margin | |
| 37 | +var $bMargin; //page break margin | |
| 38 | +var $cMargin; //cell margin | |
| 39 | +var $x,$y; //current position in user unit for cell positioning | |
| 40 | +var $lasth; //height of last cell printed | |
| 41 | +var $LineWidth; //line width in user unit | |
| 42 | +var $CoreFonts; //array of standard font names | |
| 43 | +var $fonts; //array of used fonts | |
| 44 | +var $FontFiles; //array of font files | |
| 45 | +var $diffs; //array of encoding differences | |
| 46 | +var $images; //array of used images | |
| 47 | +var $PageLinks; //array of links in pages | |
| 48 | +var $links; //array of internal links | |
| 49 | +var $FontFamily; //current font family | |
| 50 | +var $FontStyle; //current font style | |
| 51 | +var $underline; //underlining flag | |
| 52 | +var $CurrentFont; //current font info | |
| 53 | +var $FontSizePt; //current font size in points | |
| 54 | +var $FontSize; //current font size in user unit | |
| 55 | +var $DrawColor; //commands for drawing color | |
| 56 | +var $FillColor; //commands for filling color | |
| 57 | +var $TextColor; //commands for text color | |
| 58 | +var $ColorFlag; //indicates whether fill and text colors are different | |
| 59 | +var $ws; //word spacing | |
| 60 | +var $AutoPageBreak; //automatic page breaking | |
| 61 | +var $PageBreakTrigger; //threshold used to trigger page breaks | |
| 62 | +var $InFooter; //flag set when processing footer | |
| 63 | +var $ZoomMode; //zoom display mode | |
| 64 | +var $LayoutMode; //layout display mode | |
| 65 | +var $title; //title | |
| 66 | +var $subject; //subject | |
| 67 | +var $author; //author | |
| 68 | +var $keywords; //keywords | |
| 69 | +var $creator; //creator | |
| 70 | +var $AliasNbPages; //alias for total number of pages | |
| 71 | +var $PDFVersion; //PDF version number | |
| 72 | + | |
| 73 | +/******************************************************************************* | |
| 74 | +* * | |
| 75 | +* Public methods * | |
| 76 | +* * | |
| 77 | +*******************************************************************************/ | |
| 78 | +function FPDF($orientation='P',$unit='mm',$format='A4') | |
| 79 | +{ | |
| 80 | + //Some checks | |
| 81 | + $this->_dochecks(); | |
| 82 | + //Initialization of properties | |
| 83 | + $this->page=0; | |
| 84 | + $this->n=2; | |
| 85 | + $this->buffer=''; | |
| 86 | + $this->pages=array(); | |
| 87 | + $this->OrientationChanges=array(); | |
| 88 | + $this->state=0; | |
| 89 | + $this->fonts=array(); | |
| 90 | + $this->FontFiles=array(); | |
| 91 | + $this->diffs=array(); | |
| 92 | + $this->images=array(); | |
| 93 | + $this->links=array(); | |
| 94 | + $this->InFooter=false; | |
| 95 | + $this->lasth=0; | |
| 96 | + $this->FontFamily=''; | |
| 97 | + $this->FontStyle=''; | |
| 98 | + $this->FontSizePt=12; | |
| 99 | + $this->underline=false; | |
| 100 | + $this->DrawColor='0 G'; | |
| 101 | + $this->FillColor='0 g'; | |
| 102 | + $this->TextColor='0 g'; | |
| 103 | + $this->ColorFlag=false; | |
| 104 | + $this->ws=0; | |
| 105 | + //Standard fonts | |
| 106 | + $this->CoreFonts=array('courier'=>'Courier','courierB'=>'Courier-Bold','courierI'=>'Courier-Oblique','courierBI'=>'Courier-BoldOblique', | |
| 107 | + 'helvetica'=>'Helvetica','helveticaB'=>'Helvetica-Bold','helveticaI'=>'Helvetica-Oblique','helveticaBI'=>'Helvetica-BoldOblique', | |
| 108 | + 'times'=>'Times-Roman','timesB'=>'Times-Bold','timesI'=>'Times-Italic','timesBI'=>'Times-BoldItalic', | |
| 109 | + 'symbol'=>'Symbol','zapfdingbats'=>'ZapfDingbats'); | |
| 110 | + //Scale factor | |
| 111 | + if($unit=='pt') | |
| 112 | + $this->k=1; | |
| 113 | + elseif($unit=='mm') | |
| 114 | + $this->k=72/25.4; | |
| 115 | + elseif($unit=='cm') | |
| 116 | + $this->k=72/2.54; | |
| 117 | + elseif($unit=='in') | |
| 118 | + $this->k=72; | |
| 119 | + else | |
| 120 | + $this->Error('Incorrect unit: '.$unit); | |
| 121 | + //Page format | |
| 122 | + if(is_string($format)) | |
| 123 | + { | |
| 124 | + $format=strtolower($format); | |
| 125 | + if($format=='a3') | |
| 126 | + $format=array(841.89,1190.55); | |
| 127 | + elseif($format=='a4') | |
| 128 | + $format=array(595.28,841.89); | |
| 129 | + elseif($format=='a5') | |
| 130 | + $format=array(420.94,595.28); | |
| 131 | + elseif($format=='letter') | |
| 132 | + $format=array(612,792); | |
| 133 | + elseif($format=='legal') | |
| 134 | + $format=array(612,1008); | |
| 135 | + else | |
| 136 | + $this->Error('Unknown page format: '.$format); | |
| 137 | + $this->fwPt=$format[0]; | |
| 138 | + $this->fhPt=$format[1]; | |
| 139 | + } | |
| 140 | + else | |
| 141 | + { | |
| 142 | + $this->fwPt=$format[0]*$this->k; | |
| 143 | + $this->fhPt=$format[1]*$this->k; | |
| 144 | + } | |
| 145 | + $this->fw=$this->fwPt/$this->k; | |
| 146 | + $this->fh=$this->fhPt/$this->k; | |
| 147 | + //Page orientation | |
| 148 | + $orientation=strtolower($orientation); | |
| 149 | + if($orientation=='p' || $orientation=='portrait') | |
| 150 | + { | |
| 151 | + $this->DefOrientation='P'; | |
| 152 | + $this->wPt=$this->fwPt; | |
| 153 | + $this->hPt=$this->fhPt; | |
| 154 | + } | |
| 155 | + elseif($orientation=='l' || $orientation=='landscape') | |
| 156 | + { | |
| 157 | + $this->DefOrientation='L'; | |
| 158 | + $this->wPt=$this->fhPt; | |
| 159 | + $this->hPt=$this->fwPt; | |
| 160 | + } | |
| 161 | + else | |
| 162 | + $this->Error('Incorrect orientation: '.$orientation); | |
| 163 | + $this->CurOrientation=$this->DefOrientation; | |
| 164 | + $this->w=$this->wPt/$this->k; | |
| 165 | + $this->h=$this->hPt/$this->k; | |
| 166 | + //Page margins (1 cm) | |
| 167 | + $margin=28.35/$this->k; | |
| 168 | + $this->SetMargins($margin,$margin); | |
| 169 | + //Interior cell margin (1 mm) | |
| 170 | + $this->cMargin=$margin/10; | |
| 171 | + //Line width (0.2 mm) | |
| 172 | + $this->LineWidth=.567/$this->k; | |
| 173 | + //Automatic page break | |
| 174 | + $this->SetAutoPageBreak(true,2*$margin); | |
| 175 | + //Full width display mode | |
| 176 | + $this->SetDisplayMode('fullwidth'); | |
| 177 | + //Enable compression | |
| 178 | + $this->SetCompression(true); | |
| 179 | + //Set default PDF version number | |
| 180 | + $this->PDFVersion='1.3'; | |
| 181 | +} | |
| 182 | + | |
| 183 | +function SetMargins($left,$top,$right=-1) | |
| 184 | +{ | |
| 185 | + //Set left, top and right margins | |
| 186 | + $this->lMargin=$left; | |
| 187 | + $this->tMargin=$top; | |
| 188 | + if($right==-1) | |
| 189 | + $right=$left; | |
| 190 | + $this->rMargin=$right; | |
| 191 | +} | |
| 192 | + | |
| 193 | +function SetLeftMargin($margin) | |
| 194 | +{ | |
| 195 | + //Set left margin | |
| 196 | + $this->lMargin=$margin; | |
| 197 | + if($this->page>0 && $this->x<$margin) | |
| 198 | + $this->x=$margin; | |
| 199 | +} | |
| 200 | + | |
| 201 | +function SetTopMargin($margin) | |
| 202 | +{ | |
| 203 | + //Set top margin | |
| 204 | + $this->tMargin=$margin; | |
| 205 | +} | |
| 206 | + | |
| 207 | +function SetRightMargin($margin) | |
| 208 | +{ | |
| 209 | + //Set right margin | |
| 210 | + $this->rMargin=$margin; | |
| 211 | +} | |
| 212 | + | |
| 213 | +function SetAutoPageBreak($auto,$margin=0) | |
| 214 | +{ | |
| 215 | + //Set auto page break mode and triggering margin | |
| 216 | + $this->AutoPageBreak=$auto; | |
| 217 | + $this->bMargin=$margin; | |
| 218 | + $this->PageBreakTrigger=$this->h-$margin; | |
| 219 | +} | |
| 220 | + | |
| 221 | +function SetDisplayMode($zoom,$layout='continuous') | |
| 222 | +{ | |
| 223 | + //Set display mode in viewer | |
| 224 | + if($zoom=='fullpage' || $zoom=='fullwidth' || $zoom=='real' || $zoom=='default' || !is_string($zoom)) | |
| 225 | + $this->ZoomMode=$zoom; | |
| 226 | + else | |
| 227 | + $this->Error('Incorrect zoom display mode: '.$zoom); | |
| 228 | + if($layout=='single' || $layout=='continuous' || $layout=='two' || $layout=='default') | |
| 229 | + $this->LayoutMode=$layout; | |
| 230 | + else | |
| 231 | + $this->Error('Incorrect layout display mode: '.$layout); | |
| 232 | +} | |
| 233 | + | |
| 234 | +function SetCompression($compress) | |
| 235 | +{ | |
| 236 | + //Set page compression | |
| 237 | + if(function_exists('gzcompress')) | |
| 238 | + $this->compress=$compress; | |
| 239 | + else | |
| 240 | + $this->compress=false; | |
| 241 | +} | |
| 242 | + | |
| 243 | +function SetTitle($title) | |
| 244 | +{ | |
| 245 | + //Title of document | |
| 246 | + $this->title=$title; | |
| 247 | +} | |
| 248 | + | |
| 249 | +function SetSubject($subject) | |
| 250 | +{ | |
| 251 | + //Subject of document | |
| 252 | + $this->subject=$subject; | |
| 253 | +} | |
| 254 | + | |
| 255 | +function SetAuthor($author) | |
| 256 | +{ | |
| 257 | + //Author of document | |
| 258 | + $this->author=$author; | |
| 259 | +} | |
| 260 | + | |
| 261 | +function SetKeywords($keywords) | |
| 262 | +{ | |
| 263 | + //Keywords of document | |
| 264 | + $this->keywords=$keywords; | |
| 265 | +} | |
| 266 | + | |
| 267 | +function SetCreator($creator) | |
| 268 | +{ | |
| 269 | + //Creator of document | |
| 270 | + $this->creator=$creator; | |
| 271 | +} | |
| 272 | + | |
| 273 | +function AliasNbPages($alias='{nb}') | |
| 274 | +{ | |
| 275 | + //Define an alias for total number of pages | |
| 276 | + $this->AliasNbPages=$alias; | |
| 277 | +} | |
| 278 | + | |
| 279 | +function Error($msg) | |
| 280 | +{ | |
| 281 | + //Fatal error | |
| 282 | + die('<B>FPDF error: </B>'.$msg); | |
| 283 | +} | |
| 284 | + | |
| 285 | +function Open() | |
| 286 | +{ | |
| 287 | + //Begin document | |
| 288 | + $this->state=1; | |
| 289 | +} | |
| 290 | + | |
| 291 | +function Close() | |
| 292 | +{ | |
| 293 | + //Terminate document | |
| 294 | + if($this->state==3) | |
| 295 | + return; | |
| 296 | + if($this->page==0) | |
| 297 | + $this->AddPage(); | |
| 298 | + //Page footer | |
| 299 | + $this->InFooter=true; | |
| 300 | + $this->Footer(); | |
| 301 | + $this->InFooter=false; | |
| 302 | + //Close page | |
| 303 | + $this->_endpage(); | |
| 304 | + //Close document | |
| 305 | + $this->_enddoc(); | |
| 306 | +} | |
| 307 | + | |
| 308 | +function AddPage($orientation='') | |
| 309 | +{ | |
| 310 | + //Start a new page | |
| 311 | + if($this->state==0) | |
| 312 | + $this->Open(); | |
| 313 | + $family=$this->FontFamily; | |
| 314 | + $style=$this->FontStyle.($this->underline ? 'U' : ''); | |
| 315 | + $size=$this->FontSizePt; | |
| 316 | + $lw=$this->LineWidth; | |
| 317 | + $dc=$this->DrawColor; | |
| 318 | + $fc=$this->FillColor; | |
| 319 | + $tc=$this->TextColor; | |
| 320 | + $cf=$this->ColorFlag; | |
| 321 | + if($this->page>0) | |
| 322 | + { | |
| 323 | + //Page footer | |
| 324 | + $this->InFooter=true; | |
| 325 | + $this->Footer(); | |
| 326 | + $this->InFooter=false; | |
| 327 | + //Close page | |
| 328 | + $this->_endpage(); | |
| 329 | + } | |
| 330 | + //Start new page | |
| 331 | + $this->_beginpage($orientation); | |
| 332 | + //Set line cap style to square | |
| 333 | + $this->_out('2 J'); | |
| 334 | + //Set line width | |
| 335 | + $this->LineWidth=$lw; | |
| 336 | + $this->_out(sprintf('%.2f w',$lw*$this->k)); | |
| 337 | + //Set font | |
| 338 | + if($family) | |
| 339 | + $this->SetFont($family,$style,$size); | |
| 340 | + //Set colors | |
| 341 | + $this->DrawColor=$dc; | |
| 342 | + if($dc!='0 G') | |
| 343 | + $this->_out($dc); | |
| 344 | + $this->FillColor=$fc; | |
| 345 | + if($fc!='0 g') | |
| 346 | + $this->_out($fc); | |
| 347 | + $this->TextColor=$tc; | |
| 348 | + $this->ColorFlag=$cf; | |
| 349 | + //Page header | |
| 350 | + $this->Header(); | |
| 351 | + //Restore line width | |
| 352 | + if($this->LineWidth!=$lw) | |
| 353 | + { | |
| 354 | + $this->LineWidth=$lw; | |
| 355 | + $this->_out(sprintf('%.2f w',$lw*$this->k)); | |
| 356 | + } | |
| 357 | + //Restore font | |
| 358 | + if($family) | |
| 359 | + $this->SetFont($family,$style,$size); | |
| 360 | + //Restore colors | |
| 361 | + if($this->DrawColor!=$dc) | |
| 362 | + { | |
| 363 | + $this->DrawColor=$dc; | |
| 364 | + $this->_out($dc); | |
| 365 | + } | |
| 366 | + if($this->FillColor!=$fc) | |
| 367 | + { | |
| 368 | + $this->FillColor=$fc; | |
| 369 | + $this->_out($fc); | |
| 370 | + } | |
| 371 | + $this->TextColor=$tc; | |
| 372 | + $this->ColorFlag=$cf; | |
| 373 | +} | |
| 374 | + | |
| 375 | +function Header() | |
| 376 | +{ | |
| 377 | + //To be implemented in your own inherited class | |
| 378 | +} | |
| 379 | + | |
| 380 | +function Footer() | |
| 381 | +{ | |
| 382 | + //To be implemented in your own inherited class | |
| 383 | +} | |
| 384 | + | |
| 385 | +function PageNo() | |
| 386 | +{ | |
| 387 | + //Get current page number | |
| 388 | + return $this->page; | |
| 389 | +} | |
| 390 | + | |
| 391 | +function SetDrawColor($r,$g=-1,$b=-1) | |
| 392 | +{ | |
| 393 | + //Set color for all stroking operations | |
| 394 | + if(($r==0 && $g==0 && $b==0) || $g==-1) | |
| 395 | + $this->DrawColor=sprintf('%.3f G',$r/255); | |
| 396 | + else | |
| 397 | + $this->DrawColor=sprintf('%.3f %.3f %.3f RG',$r/255,$g/255,$b/255); | |
| 398 | + if($this->page>0) | |
| 399 | + $this->_out($this->DrawColor); | |
| 400 | +} | |
| 401 | + | |
| 402 | +function SetFillColor($r,$g=-1,$b=-1) | |
| 403 | +{ | |
| 404 | + //Set color for all filling operations | |
| 405 | + if(($r==0 && $g==0 && $b==0) || $g==-1) | |
| 406 | + $this->FillColor=sprintf('%.3f g',$r/255); | |
| 407 | + else | |
| 408 | + $this->FillColor=sprintf('%.3f %.3f %.3f rg',$r/255,$g/255,$b/255); | |
| 409 | + $this->ColorFlag=($this->FillColor!=$this->TextColor); | |
| 410 | + if($this->page>0) | |
| 411 | + $this->_out($this->FillColor); | |
| 412 | +} | |
| 413 | + | |
| 414 | +function SetTextColor($r,$g=-1,$b=-1) | |
| 415 | +{ | |
| 416 | + //Set color for text | |
| 417 | + if(($r==0 && $g==0 && $b==0) || $g==-1) | |
| 418 | + $this->TextColor=sprintf('%.3f g',$r/255); | |
| 419 | + else | |
| 420 | + $this->TextColor=sprintf('%.3f %.3f %.3f rg',$r/255,$g/255,$b/255); | |
| 421 | + $this->ColorFlag=($this->FillColor!=$this->TextColor); | |
| 422 | +} | |
| 423 | + | |
| 424 | +function GetStringWidth($s) | |
| 425 | +{ | |
| 426 | + //Get width of a string in the current font | |
| 427 | + $s=(string)$s; | |
| 428 | + $cw=&$this->CurrentFont['cw']; | |
| 429 | + $w=0; | |
| 430 | + $l=strlen($s); | |
| 431 | + for($i=0;$i<$l;$i++) | |
| 432 | + $w+=$cw[$s{$i}]; | |
| 433 | + return $w*$this->FontSize/1000; | |
| 434 | +} | |
| 435 | + | |
| 436 | +function SetLineWidth($width) | |
| 437 | +{ | |
| 438 | + //Set line width | |
| 439 | + $this->LineWidth=$width; | |
| 440 | + if($this->page>0) | |
| 441 | + $this->_out(sprintf('%.2f w',$width*$this->k)); | |
| 442 | +} | |
| 443 | + | |
| 444 | +function Line($x1,$y1,$x2,$y2) | |
| 445 | +{ | |
| 446 | + //Draw a line | |
| 447 | + $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)); | |
| 448 | +} | |
| 449 | + | |
| 450 | +function Rect($x,$y,$w,$h,$style='') | |
| 451 | +{ | |
| 452 | + //Draw a rectangle | |
| 453 | + if($style=='F') | |
| 454 | + $op='f'; | |
| 455 | + elseif($style=='FD' || $style=='DF') | |
| 456 | + $op='B'; | |
| 457 | + else | |
| 458 | + $op='S'; | |
| 459 | + $this->_out(sprintf('%.2f %.2f %.2f %.2f re %s',$x*$this->k,($this->h-$y)*$this->k,$w*$this->k,-$h*$this->k,$op)); | |
| 460 | +} | |
| 461 | + | |
| 462 | +function AddFont($family,$style='',$file='') | |
| 463 | +{ | |
| 464 | + //Add a TrueType or Type1 font | |
| 465 | + $family=strtolower($family); | |
| 466 | + if($file=='') | |
| 467 | + $file=str_replace(' ','',$family).strtolower($style).'.php'; | |
| 468 | + if($family=='arial') | |
| 469 | + $family='helvetica'; | |
| 470 | + $style=strtoupper($style); | |
| 471 | + if($style=='IB') | |
| 472 | + $style='BI'; | |
| 473 | + $fontkey=$family.$style; | |
| 474 | + if(isset($this->fonts[$fontkey])) | |
| 475 | + $this->Error('Font already added: '.$family.' '.$style); | |
| 476 | + include($this->_getfontpath().$file); | |
| 477 | + if(!isset($name)) | |
| 478 | + $this->Error('Could not include font definition file'); | |
| 479 | + $i=count($this->fonts)+1; | |
| 480 | + $this->fonts[$fontkey]=array('i'=>$i,'type'=>$type,'name'=>$name,'desc'=>$desc,'up'=>$up,'ut'=>$ut,'cw'=>$cw,'enc'=>$enc,'file'=>$file); | |
| 481 | + if($diff) | |
| 482 | + { | |
| 483 | + //Search existing encodings | |
| 484 | + $d=0; | |
| 485 | + $nb=count($this->diffs); | |
| 486 | + for($i=1;$i<=$nb;$i++) | |
| 487 | + { | |
| 488 | + if($this->diffs[$i]==$diff) | |
| 489 | + { | |
| 490 | + $d=$i; | |
| 491 | + break; | |
| 492 | + } | |
| 493 | + } | |
| 494 | + if($d==0) | |
| 495 | + { | |
| 496 | + $d=$nb+1; | |
| 497 | + $this->diffs[$d]=$diff; | |
| 498 | + } | |
| 499 | + $this->fonts[$fontkey]['diff']=$d; | |
| 500 | + } | |
| 501 | + if($file) | |
| 502 | + { | |
| 503 | + if($type=='TrueType') | |
| 504 | + $this->FontFiles[$file]=array('length1'=>$originalsize); | |
| 505 | + else | |
| 506 | + $this->FontFiles[$file]=array('length1'=>$size1,'length2'=>$size2); | |
| 507 | + } | |
| 508 | +} | |
| 509 | + | |
| 510 | +function SetFont($family,$style='',$size=0) | |
| 511 | +{ | |
| 512 | + //Select a font; size given in points | |
| 513 | + global $fpdf_charwidths; | |
| 514 | + | |
| 515 | + $family=strtolower($family); | |
| 516 | + if($family=='') | |
| 517 | + $family=$this->FontFamily; | |
| 518 | + if($family=='arial') | |
| 519 | + $family='helvetica'; | |
| 520 | + elseif($family=='symbol' || $family=='zapfdingbats') | |
| 521 | + $style=''; | |
| 522 | + $style=strtoupper($style); | |
| 523 | + if(strpos($style,'U')!==false) | |
| 524 | + { | |
| 525 | + $this->underline=true; | |
| 526 | + $style=str_replace('U','',$style); | |
| 527 | + } | |
| 528 | + else | |
| 529 | + $this->underline=false; | |
| 530 | + if($style=='IB') | |
| 531 | + $style='BI'; | |
| 532 | + if($size==0) | |
| 533 | + $size=$this->FontSizePt; | |
| 534 | + //Test if font is already selected | |
| 535 | + if($this->FontFamily==$family && $this->FontStyle==$style && $this->FontSizePt==$size) | |
| 536 | + return; | |
| 537 | + //Test if used for the first time | |
| 538 | + $fontkey=$family.$style; | |
| 539 | + if(!isset($this->fonts[$fontkey])) | |
| 540 | + { | |
| 541 | + //Check if one of the standard fonts | |
| 542 | + if(isset($this->CoreFonts[$fontkey])) | |
| 543 | + { | |
| 544 | + if(!isset($fpdf_charwidths[$fontkey])) | |
| 545 | + { | |
| 546 | + //Load metric file | |
| 547 | + $file=$family; | |
| 548 | + if($family=='times' || $family=='helvetica') | |
| 549 | + $file.=strtolower($style); | |
| 550 | + include($this->_getfontpath().$file.'.php'); | |
| 551 | + if(!isset($fpdf_charwidths[$fontkey])) | |
| 552 | + $this->Error('Could not include font metric file'); | |
| 553 | + } | |
| 554 | + $i=count($this->fonts)+1; | |
| 555 | + $this->fonts[$fontkey]=array('i'=>$i,'type'=>'core','name'=>$this->CoreFonts[$fontkey],'up'=>-100,'ut'=>50,'cw'=>$fpdf_charwidths[$fontkey]); | |
| 556 | + } | |
| 557 | + else | |
| 558 | + $this->Error('Undefined font: '.$family.' '.$style); | |
| 559 | + } | |
| 560 | + //Select it | |
| 561 | + $this->FontFamily=$family; | |
| 562 | + $this->FontStyle=$style; | |
| 563 | + $this->FontSizePt=$size; | |
| 564 | + $this->FontSize=$size/$this->k; | |
| 565 | + $this->CurrentFont=&$this->fonts[$fontkey]; | |
| 566 | + if($this->page>0) | |
| 567 | + $this->_out(sprintf('BT /F%d %.2f Tf ET',$this->CurrentFont['i'],$this->FontSizePt)); | |
| 568 | +} | |
| 569 | + | |
| 570 | +function SetFontSize($size) | |
| 571 | +{ | |
| 572 | + //Set font size in points | |
| 573 | + if($this->FontSizePt==$size) | |
| 574 | + return; | |
| 575 | + $this->FontSizePt=$size; | |
| 576 | + $this->FontSize=$size/$this->k; | |
| 577 | + if($this->page>0) | |
| 578 | + $this->_out(sprintf('BT /F%d %.2f Tf ET',$this->CurrentFont['i'],$this->FontSizePt)); | |
| 579 | +} | |
| 580 | + | |
| 581 | +function AddLink() | |
| 582 | +{ | |
| 583 | + //Create a new internal link | |
| 584 | + $n=count($this->links)+1; | |
| 585 | + $this->links[$n]=array(0,0); | |
| 586 | + return $n; | |
| 587 | +} | |
| 588 | + | |
| 589 | +function SetLink($link,$y=0,$page=-1) | |
| 590 | +{ | |
| 591 | + //Set destination of internal link | |
| 592 | + if($y==-1) | |
| 593 | + $y=$this->y; | |
| 594 | + if($page==-1) | |
| 595 | + $page=$this->page; | |
| 596 | + $this->links[$link]=array($page,$y); | |
| 597 | +} | |
| 598 | + | |
| 599 | +function Link($x,$y,$w,$h,$link) | |
| 600 | +{ | |
| 601 | + //Put a link on the page | |
| 602 | + $this->PageLinks[$this->page][]=array($x*$this->k,$this->hPt-$y*$this->k,$w*$this->k,$h*$this->k,$link); | |
| 603 | +} | |
| 604 | + | |
| 605 | +function Text($x,$y,$txt) | |
| 606 | +{ | |
| 607 | + //Output a string | |
| 608 | + $s=sprintf('BT %.2f %.2f Td (%s) Tj ET',$x*$this->k,($this->h-$y)*$this->k,$this->_escape($txt)); | |
| 609 | + if($this->underline && $txt!='') | |
| 610 | + $s.=' '.$this->_dounderline($x,$y,$txt); | |
| 611 | + if($this->ColorFlag) | |
| 612 | + $s='q '.$this->TextColor.' '.$s.' Q'; | |
| 613 | + $this->_out($s); | |
| 614 | +} | |
| 615 | + | |
| 616 | +function AcceptPageBreak() | |
| 617 | +{ | |
| 618 | + //Accept automatic page break or not | |
| 619 | + return $this->AutoPageBreak; | |
| 620 | +} | |
| 621 | + | |
| 622 | +function Cell($w,$h=0,$txt='',$border=0,$ln=0,$align='',$fill=0,$link='') | |
| 623 | +{ | |
| 624 | + //Output a cell | |
| 625 | + $k=$this->k; | |
| 626 | + if($this->y+$h>$this->PageBreakTrigger && !$this->InFooter && $this->AcceptPageBreak()) | |
| 627 | + { | |
| 628 | + //Automatic page break | |
| 629 | + $x=$this->x; | |
| 630 | + $ws=$this->ws; | |
| 631 | + if($ws>0) | |
| 632 | + { | |
| 633 | + $this->ws=0; | |
| 634 | + $this->_out('0 Tw'); | |
| 635 | + } | |
| 636 | + $this->AddPage($this->CurOrientation); | |
| 637 | + $this->x=$x; | |
| 638 | + if($ws>0) | |
| 639 | + { | |
| 640 | + $this->ws=$ws; | |
| 641 | + $this->_out(sprintf('%.3f Tw',$ws*$k)); | |
| 642 | + } | |
| 643 | + } | |
| 644 | + if($w==0) | |
| 645 | + $w=$this->w-$this->rMargin-$this->x; | |
| 646 | + $s=''; | |
| 647 | + if($fill==1 || $border==1) | |
| 648 | + { | |
| 649 | + if($fill==1) | |
| 650 | + $op=($border==1) ? 'B' : 'f'; | |
| 651 | + else | |
| 652 | + $op='S'; | |
| 653 | + $s=sprintf('%.2f %.2f %.2f %.2f re %s ',$this->x*$k,($this->h-$this->y)*$k,$w*$k,-$h*$k,$op); | |
| 654 | + } | |
| 655 | + if(is_string($border)) | |
| 656 | + { | |
| 657 | + $x=$this->x; | |
| 658 | + $y=$this->y; | |
| 659 | + if(strpos($border,'L')!==false) | |
| 660 | + $s.=sprintf('%.2f %.2f m %.2f %.2f l S ',$x*$k,($this->h-$y)*$k,$x*$k,($this->h-($y+$h))*$k); | |
| 661 | + if(strpos($border,'T')!==false) | |
| 662 | + $s.=sprintf('%.2f %.2f m %.2f %.2f l S ',$x*$k,($this->h-$y)*$k,($x+$w)*$k,($this->h-$y)*$k); | |
| 663 | + if(strpos($border,'R')!==false) | |
| 664 | + $s.=sprintf('%.2f %.2f m %.2f %.2f l S ',($x+$w)*$k,($this->h-$y)*$k,($x+$w)*$k,($this->h-($y+$h))*$k); | |
| 665 | + if(strpos($border,'B')!==false) | |
| 666 | + $s.=sprintf('%.2f %.2f m %.2f %.2f l S ',$x*$k,($this->h-($y+$h))*$k,($x+$w)*$k,($this->h-($y+$h))*$k); | |
| 667 | + } | |
| 668 | + if($txt!=='') | |
| 669 | + { | |
| 670 | + if($align=='R') | |
| 671 | + $dx=$w-$this->cMargin-$this->GetStringWidth($txt); | |
| 672 | + elseif($align=='C') | |
| 673 | + $dx=($w-$this->GetStringWidth($txt))/2; | |
| 674 | + else | |
| 675 | + $dx=$this->cMargin; | |
| 676 | + if($this->ColorFlag) | |
| 677 | + $s.='q '.$this->TextColor.' '; | |
| 678 | + $txt2=str_replace(')','\\)',str_replace('(','\\(',str_replace('\\','\\\\',$txt))); | |
| 679 | + $s.=sprintf('BT %.2f %.2f Td (%s) Tj ET',($this->x+$dx)*$k,($this->h-($this->y+.5*$h+.3*$this->FontSize))*$k,$txt2); | |
| 680 | + if($this->underline) | |
| 681 | + $s.=' '.$this->_dounderline($this->x+$dx,$this->y+.5*$h+.3*$this->FontSize,$txt); | |
| 682 | + if($this->ColorFlag) | |
| 683 | + $s.=' Q'; | |
| 684 | + if($link) | |
| 685 | + $this->Link($this->x+$dx,$this->y+.5*$h-.5*$this->FontSize,$this->GetStringWidth($txt),$this->FontSize,$link); | |
| 686 | + } | |
| 687 | + if($s) | |
| 688 | + $this->_out($s); | |
| 689 | + $this->lasth=$h; | |
| 690 | + if($ln>0) | |
| 691 | + { | |
| 692 | + //Go to next line | |
| 693 | + $this->y+=$h; | |
| 694 | + if($ln==1) | |
| 695 | + $this->x=$this->lMargin; | |
| 696 | + } | |
| 697 | + else | |
| 698 | + $this->x+=$w; | |
| 699 | +} | |
| 700 | + | |
| 701 | +function MultiCell($w,$h,$txt,$border=0,$align='J',$fill=0) | |
| 702 | +{ | |
| 703 | + //Output text with automatic or explicit line breaks | |
| 704 | + $cw=&$this->CurrentFont['cw']; | |
| 705 | + if($w==0) | |
| 706 | + $w=$this->w-$this->rMargin-$this->x; | |
| 707 | + $wmax=($w-2*$this->cMargin)*1000/$this->FontSize; | |
| 708 | + $s=str_replace("\r",'',$txt); | |
| 709 | + $nb=strlen($s); | |
| 710 | + if($nb>0 && $s[$nb-1]=="\n") | |
| 711 | + $nb--; | |
| 712 | + $b=0; | |
| 713 | + if($border) | |
| 714 | + { | |
| 715 | + if($border==1) | |
| 716 | + { | |
| 717 | + $border='LTRB'; | |
| 718 | + $b='LRT'; | |
| 719 | + $b2='LR'; | |
| 720 | + } | |
| 721 | + else | |
| 722 | + { | |
| 723 | + $b2=''; | |
| 724 | + if(strpos($border,'L')!==false) | |
| 725 | + $b2.='L'; | |
| 726 | + if(strpos($border,'R')!==false) | |
| 727 | + $b2.='R'; | |
| 728 | + $b=(strpos($border,'T')!==false) ? $b2.'T' : $b2; | |
| 729 | + } | |
| 730 | + } | |
| 731 | + $sep=-1; | |
| 732 | + $i=0; | |
| 733 | + $j=0; | |
| 734 | + $l=0; | |
| 735 | + $ns=0; | |
| 736 | + $nl=1; | |
| 737 | + while($i<$nb) | |
| 738 | + { | |
| 739 | + //Get next character | |
| 740 | + $c=$s{$i}; | |
| 741 | + if($c=="\n") | |
| 742 | + { | |
| 743 | + //Explicit line break | |
| 744 | + if($this->ws>0) | |
| 745 | + { | |
| 746 | + $this->ws=0; | |
| 747 | + $this->_out('0 Tw'); | |
| 748 | + } | |
| 749 | + $this->Cell($w,$h,substr($s,$j,$i-$j),$b,2,$align,$fill); | |
| 750 | + $i++; | |
| 751 | + $sep=-1; | |
| 752 | + $j=$i; | |
| 753 | + $l=0; | |
| 754 | + $ns=0; | |
| 755 | + $nl++; | |
| 756 | + if($border && $nl==2) | |
| 757 | + $b=$b2; | |
| 758 | + continue; | |
| 759 | + } | |
| 760 | + if($c==' ') | |
| 761 | + { | |
| 762 | + $sep=$i; | |
| 763 | + $ls=$l; | |
| 764 | + $ns++; | |
| 765 | + } | |
| 766 | + $l+=$cw[$c]; | |
| 767 | + if($l>$wmax) | |
| 768 | + { | |
| 769 | + //Automatic line break | |
| 770 | + if($sep==-1) | |
| 771 | + { | |
| 772 | + if($i==$j) | |
| 773 | + $i++; | |
| 774 | + if($this->ws>0) | |
| 775 | + { | |
| 776 | + $this->ws=0; | |
| 777 | + $this->_out('0 Tw'); | |
| 778 | + } | |
| 779 | + $this->Cell($w,$h,substr($s,$j,$i-$j),$b,2,$align,$fill); | |
| 780 | + } | |
| 781 | + else | |
| 782 | + { | |
| 783 | + if($align=='J') | |
| 784 | + { | |
| 785 | + $this->ws=($ns>1) ? ($wmax-$ls)/1000*$this->FontSize/($ns-1) : 0; | |
| 786 | + $this->_out(sprintf('%.3f Tw',$this->ws*$this->k)); | |
| 787 | + } | |
| 788 | + $this->Cell($w,$h,substr($s,$j,$sep-$j),$b,2,$align,$fill); | |
| 789 | + $i=$sep+1; | |
| 790 | + } | |
| 791 | + $sep=-1; | |
| 792 | + $j=$i; | |
| 793 | + $l=0; | |
| 794 | + $ns=0; | |
| 795 | + $nl++; | |
| 796 | + if($border && $nl==2) | |
| 797 | + $b=$b2; | |
| 798 | + } | |
| 799 | + else | |
| 800 | + $i++; | |
| 801 | + } | |
| 802 | + //Last chunk | |
| 803 | + if($this->ws>0) | |
| 804 | + { | |
| 805 | + $this->ws=0; | |
| 806 | + $this->_out('0 Tw'); | |
| 807 | + } | |
| 808 | + if($border && strpos($border,'B')!==false) | |
| 809 | + $b.='B'; | |
| 810 | + $this->Cell($w,$h,substr($s,$j,$i-$j),$b,2,$align,$fill); | |
| 811 | + $this->x=$this->lMargin; | |
| 812 | +} | |
| 813 | + | |
| 814 | +function Write($h,$txt,$link='') | |
| 815 | +{ | |
| 816 | + //Output text in flowing mode | |
| 817 | + $cw=&$this->CurrentFont['cw']; | |
| 818 | + $w=$this->w-$this->rMargin-$this->x; | |
| 819 | + $wmax=($w-2*$this->cMargin)*1000/$this->FontSize; | |
| 820 | + $s=str_replace("\r",'',$txt); | |
| 821 | + $nb=strlen($s); | |
| 822 | + $sep=-1; | |
| 823 | + $i=0; | |
| 824 | + $j=0; | |
| 825 | + $l=0; | |
| 826 | + $nl=1; | |
| 827 | + while($i<$nb) | |
| 828 | + { | |
| 829 | + //Get next character | |
| 830 | + $c=$s{$i}; | |
| 831 | + if($c=="\n") | |
| 832 | + { | |
| 833 | + //Explicit line break | |
| 834 | + $this->Cell($w,$h,substr($s,$j,$i-$j),0,2,'',0,$link); | |
| 835 | + $i++; | |
| 836 | + $sep=-1; | |
| 837 | + $j=$i; | |
| 838 | + $l=0; | |
| 839 | + if($nl==1) | |
| 840 | + { | |
| 841 | + $this->x=$this->lMargin; | |
| 842 | + $w=$this->w-$this->rMargin-$this->x; | |
| 843 | + $wmax=($w-2*$this->cMargin)*1000/$this->FontSize; | |
| 844 | + } | |
| 845 | + $nl++; | |
| 846 | + continue; | |
| 847 | + } | |
| 848 | + if($c==' ') | |
| 849 | + $sep=$i; | |
| 850 | + $l+=$cw[$c]; | |
| 851 | + if($l>$wmax) | |
| 852 | + { | |
| 853 | + //Automatic line break | |
| 854 | + if($sep==-1) | |
| 855 | + { | |
| 856 | + if($this->x>$this->lMargin) | |
| 857 | + { | |
| 858 | + //Move to next line | |
| 859 | + $this->x=$this->lMargin; | |
| 860 | + $this->y+=$h; | |
| 861 | + $w=$this->w-$this->rMargin-$this->x; | |
| 862 | + $wmax=($w-2*$this->cMargin)*1000/$this->FontSize; | |
| 863 | + $i++; | |
| 864 | + $nl++; | |
| 865 | + continue; | |
| 866 | + } | |
| 867 | + if($i==$j) | |
| 868 | + $i++; | |
| 869 | + $this->Cell($w,$h,substr($s,$j,$i-$j),0,2,'',0,$link); | |
| 870 | + } | |
| 871 | + else | |
| 872 | + { | |
| 873 | + $this->Cell($w,$h,substr($s,$j,$sep-$j),0,2,'',0,$link); | |
| 874 | + $i=$sep+1; | |
| 875 | + } | |
| 876 | + $sep=-1; | |
| 877 | + $j=$i; | |
| 878 | + $l=0; | |
| 879 | + if($nl==1) | |
| 880 | + { | |
| 881 | + $this->x=$this->lMargin; | |
| 882 | + $w=$this->w-$this->rMargin-$this->x; | |
| 883 | + $wmax=($w-2*$this->cMargin)*1000/$this->FontSize; | |
| 884 | + } | |
| 885 | + $nl++; | |
| 886 | + } | |
| 887 | + else | |
| 888 | + $i++; | |
| 889 | + } | |
| 890 | + //Last chunk | |
| 891 | + if($i!=$j) | |
| 892 | + $this->Cell($l/1000*$this->FontSize,$h,substr($s,$j),0,0,'',0,$link); | |
| 893 | +} | |
| 894 | + | |
| 895 | +function Image($file,$x,$y,$w=0,$h=0,$type='',$link='') | |
| 896 | +{ | |
| 897 | + //Put an image on the page | |
| 898 | + if(!isset($this->images[$file])) | |
| 899 | + { | |
| 900 | + //First use of image, get info | |
| 901 | + if($type=='') | |
| 902 | + { | |
| 903 | + $pos=strrpos($file,'.'); | |
| 904 | + if(!$pos) | |
| 905 | + $this->Error('Image file has no extension and no type was specified: '.$file); | |
| 906 | + $type=substr($file,$pos+1); | |
| 907 | + } | |
| 908 | + $type=strtolower($type); | |
| 909 | +// $mqr=get_magic_quotes_runtime(); | |
| 910 | +// set_magic_quotes_runtime(0); | |
| 911 | + if($type=='jpg' || $type=='jpeg') | |
| 912 | + $info=$this->_parsejpg($file); | |
| 913 | + elseif($type=='png') | |
| 914 | + $info=$this->_parsepng($file); | |
| 915 | + else | |
| 916 | + { | |
| 917 | + //Allow for additional formats | |
| 918 | + $mtd='_parse'.$type; | |
| 919 | + if(!method_exists($this,$mtd)) | |
| 920 | + $this->Error('Unsupported image type: '.$type); | |
| 921 | + $info=$this->$mtd($file); | |
| 922 | + } | |
| 923 | +// set_magic_quotes_runtime($mqr); | |
| 924 | + $info['i']=count($this->images)+1; | |
| 925 | + $this->images[$file]=$info; | |
| 926 | + } | |
| 927 | + else | |
| 928 | + $info=$this->images[$file]; | |
| 929 | + //Automatic width and height calculation if needed | |
| 930 | + if($w==0 && $h==0) | |
| 931 | + { | |
| 932 | + //Put image at 72 dpi | |
| 933 | + $w=$info['w']/$this->k; | |
| 934 | + $h=$info['h']/$this->k; | |
| 935 | + } | |
| 936 | + if($w==0) | |
| 937 | + $w=$h*$info['w']/$info['h']; | |
| 938 | + if($h==0) | |
| 939 | + $h=$w*$info['h']/$info['w']; | |
| 940 | + $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'])); | |
| 941 | + if($link) | |
| 942 | + $this->Link($x,$y,$w,$h,$link); | |
| 943 | +} | |
| 944 | + | |
| 945 | +function Ln($h='') | |
| 946 | +{ | |
| 947 | + //Line feed; default value is last cell height | |
| 948 | + $this->x=$this->lMargin; | |
| 949 | + if(is_string($h)) | |
| 950 | + $this->y+=$this->lasth; | |
| 951 | + else | |
| 952 | + $this->y+=$h; | |
| 953 | +} | |
| 954 | + | |
| 955 | +function GetX() | |
| 956 | +{ | |
| 957 | + //Get x position | |
| 958 | + return $this->x; | |
| 959 | +} | |
| 960 | + | |
| 961 | +function SetX($x) | |
| 962 | +{ | |
| 963 | + //Set x position | |
| 964 | + if($x>=0) | |
| 965 | + $this->x=$x; | |
| 966 | + else | |
| 967 | + $this->x=$this->w+$x; | |
| 968 | +} | |
| 969 | + | |
| 970 | +function GetY() | |
| 971 | +{ | |
| 972 | + //Get y position | |
| 973 | + return $this->y; | |
| 974 | +} | |
| 975 | + | |
| 976 | +function SetY($y) | |
| 977 | +{ | |
| 978 | + //Set y position and reset x | |
| 979 | + $this->x=$this->lMargin; | |
| 980 | + if($y>=0) | |
| 981 | + $this->y=$y; | |
| 982 | + else | |
| 983 | + $this->y=$this->h+$y; | |
| 984 | +} | |
| 985 | + | |
| 986 | +function SetXY($x,$y) | |
| 987 | +{ | |
| 988 | + //Set x and y positions | |
| 989 | + $this->SetY($y); | |
| 990 | + $this->SetX($x); | |
| 991 | +} | |
| 992 | + | |
| 993 | +function Output($name='',$dest='') | |
| 994 | +{ | |
| 995 | + //Output PDF to some destination | |
| 996 | + //Finish document if necessary | |
| 997 | + if($this->state<3) | |
| 998 | + $this->Close(); | |
| 999 | + //Normalize parameters | |
| 1000 | + if(is_bool($dest)) | |
| 1001 | + $dest=$dest ? 'D' : 'F'; | |
| 1002 | + $dest=strtoupper($dest); | |
| 1003 | + if($dest=='') | |
| 1004 | + { | |
| 1005 | + if($name=='') | |
| 1006 | + { | |
| 1007 | + $name='doc.pdf'; | |
| 1008 | + $dest='I'; | |
| 1009 | + } | |
| 1010 | + else | |
| 1011 | + $dest='F'; | |
| 1012 | + } | |
| 1013 | + switch($dest) | |
| 1014 | + { | |
| 1015 | + case 'I': | |
| 1016 | + //Send to standard output | |
| 1017 | + if(ob_get_contents()) | |
| 1018 | + $this->Error('Some data has already been output, can\'t send PDF file'); | |
| 1019 | + if(php_sapi_name()!='cli') | |
| 1020 | + { | |
| 1021 | + //We send to a browser | |
| 1022 | + header('Content-Type: application/pdf'); | |
| 1023 | + if(headers_sent()) | |
| 1024 | + $this->Error('Some data has already been output to browser, can\'t send PDF file'); | |
| 1025 | + header('Content-Length: '.strlen($this->buffer)); | |
| 1026 | + header('Content-disposition: inline; filename="'.$name.'"'); | |
| 1027 | + } | |
| 1028 | + echo $this->buffer; | |
| 1029 | + break; | |
| 1030 | + case 'D': | |
| 1031 | + //Download file | |
| 1032 | + if(ob_get_contents()) | |
| 1033 | + $this->Error('Some data has already been output, can\'t send PDF file'); | |
| 1034 | + if(isset($_SERVER['HTTP_USER_AGENT']) && strpos($_SERVER['HTTP_USER_AGENT'],'MSIE')) | |
| 1035 | + header('Content-Type: application/force-download'); | |
| 1036 | + else | |
| 1037 | + header('Content-Type: application/octet-stream'); | |
| 1038 | + if(headers_sent()) | |
| 1039 | + $this->Error('Some data has already been output to browser, can\'t send PDF file'); | |
| 1040 | + header('Content-Length: '.strlen($this->buffer)); | |
| 1041 | + header('Content-disposition: attachment; filename="'.$name.'"'); | |
| 1042 | + echo $this->buffer; | |
| 1043 | + break; | |
| 1044 | + case 'F': | |
| 1045 | + //Save to local file | |
| 1046 | + $f=fopen($name,'wb'); | |
| 1047 | + if(!$f) | |
| 1048 | + $this->Error('Unable to create output file: '.$name); | |
| 1049 | + fwrite($f,$this->buffer,strlen($this->buffer)); | |
| 1050 | + fclose($f); | |
| 1051 | + break; | |
| 1052 | + case 'S': | |
| 1053 | + //Return as a string | |
| 1054 | + return $this->buffer; | |
| 1055 | + default: | |
| 1056 | + $this->Error('Incorrect output destination: '.$dest); | |
| 1057 | + } | |
| 1058 | + return ''; | |
| 1059 | +} | |
| 1060 | + | |
| 1061 | +/******************************************************************************* | |
| 1062 | +* * | |
| 1063 | +* Protected methods * | |
| 1064 | +* * | |
| 1065 | +*******************************************************************************/ | |
| 1066 | +function _dochecks() | |
| 1067 | +{ | |
| 1068 | + //Check for locale-related bug | |
| 1069 | + if(1.1==1) | |
| 1070 | + $this->Error('Don\'t alter the locale before including class file'); | |
| 1071 | + //Check for decimal separator | |
| 1072 | + if(sprintf('%.1f',1.0)!='1.0') | |
| 1073 | + setlocale(LC_NUMERIC,'C'); | |
| 1074 | +} | |
| 1075 | + | |
| 1076 | +function _getfontpath() | |
| 1077 | +{ | |
| 1078 | + if(!defined('FPDF_FONTPATH') && is_dir(dirname(__FILE__).'/font')) | |
| 1079 | + define('FPDF_FONTPATH',dirname(__FILE__).'/font/'); | |
| 1080 | + return defined('FPDF_FONTPATH') ? FPDF_FONTPATH : ''; | |
| 1081 | +} | |
| 1082 | + | |
| 1083 | +function _putpages() | |
| 1084 | +{ | |
| 1085 | + $nb=$this->page; | |
| 1086 | + if(!empty($this->AliasNbPages)) | |
| 1087 | + { | |
| 1088 | + //Replace number of pages | |
| 1089 | + for($n=1;$n<=$nb;$n++) | |
| 1090 | + $this->pages[$n]=str_replace($this->AliasNbPages,$nb,$this->pages[$n]); | |
| 1091 | + } | |
| 1092 | + if($this->DefOrientation=='P') | |
| 1093 | + { | |
| 1094 | + $wPt=$this->fwPt; | |
| 1095 | + $hPt=$this->fhPt; | |
| 1096 | + } | |
| 1097 | + else | |
| 1098 | + { | |
| 1099 | + $wPt=$this->fhPt; | |
| 1100 | + $hPt=$this->fwPt; | |
| 1101 | + } | |
| 1102 | + $filter=($this->compress) ? '/Filter /FlateDecode ' : ''; | |
| 1103 | + for($n=1;$n<=$nb;$n++) | |
| 1104 | + { | |
| 1105 | + //Page | |
| 1106 | + $this->_newobj(); | |
| 1107 | + $this->_out('<</Type /Page'); | |
| 1108 | + $this->_out('/Parent 1 0 R'); | |
| 1109 | + if(isset($this->OrientationChanges[$n])) | |
| 1110 | + $this->_out(sprintf('/MediaBox [0 0 %.2f %.2f]',$hPt,$wPt)); | |
| 1111 | + $this->_out('/Resources 2 0 R'); | |
| 1112 | + if(isset($this->PageLinks[$n])) | |
| 1113 | + { | |
| 1114 | + //Links | |
| 1115 | + $annots='/Annots ['; | |
| 1116 | + foreach($this->PageLinks[$n] as $pl) | |
| 1117 | + { | |
| 1118 | + $rect=sprintf('%.2f %.2f %.2f %.2f',$pl[0],$pl[1],$pl[0]+$pl[2],$pl[1]-$pl[3]); | |
| 1119 | + $annots.='<</Type /Annot /Subtype /Link /Rect ['.$rect.'] /Border [0 0 0] '; | |
| 1120 | + if(is_string($pl[4])) | |
| 1121 | + $annots.='/A <</S /URI /URI '.$this->_textstring($pl[4]).'>>>>'; | |
| 1122 | + else | |
| 1123 | + { | |
| 1124 | + $l=$this->links[$pl[4]]; | |
| 1125 | + $h=isset($this->OrientationChanges[$l[0]]) ? $wPt : $hPt; | |
| 1126 | + $annots.=sprintf('/Dest [%d 0 R /XYZ 0 %.2f null]>>',1+2*$l[0],$h-$l[1]*$this->k); | |
| 1127 | + } | |
| 1128 | + } | |
| 1129 | + $this->_out($annots.']'); | |
| 1130 | + } | |
| 1131 | + $this->_out('/Contents '.($this->n+1).' 0 R>>'); | |
| 1132 | + $this->_out('endobj'); | |
| 1133 | + //Page content | |
| 1134 | + $p=($this->compress) ? gzcompress($this->pages[$n]) : $this->pages[$n]; | |
| 1135 | + $this->_newobj(); | |
| 1136 | + $this->_out('<<'.$filter.'/Length '.strlen($p).'>>'); | |
| 1137 | + $this->_putstream($p); | |
| 1138 | + $this->_out('endobj'); | |
| 1139 | + } | |
| 1140 | + //Pages root | |
| 1141 | + $this->offsets[1]=strlen($this->buffer); | |
| 1142 | + $this->_out('1 0 obj'); | |
| 1143 | + $this->_out('<</Type /Pages'); | |
| 1144 | + $kids='/Kids ['; | |
| 1145 | + for($i=0;$i<$nb;$i++) | |
| 1146 | + $kids.=(3+2*$i).' 0 R '; | |
| 1147 | + $this->_out($kids.']'); | |
| 1148 | + $this->_out('/Count '.$nb); | |
| 1149 | + $this->_out(sprintf('/MediaBox [0 0 %.2f %.2f]',$wPt,$hPt)); | |
| 1150 | + $this->_out('>>'); | |
| 1151 | + $this->_out('endobj'); | |
| 1152 | +} | |
| 1153 | + | |
| 1154 | +function _putfonts() | |
| 1155 | +{ | |
| 1156 | + $nf=$this->n; | |
| 1157 | + foreach($this->diffs as $diff) | |
| 1158 | + { | |
| 1159 | + //Encodings | |
| 1160 | + $this->_newobj(); | |
| 1161 | + $this->_out('<</Type /Encoding /BaseEncoding /WinAnsiEncoding /Differences ['.$diff.']>>'); | |
| 1162 | + $this->_out('endobj'); | |
| 1163 | + } | |
| 1164 | +// $mqr=get_magic_quotes_runtime(); | |
| 1165 | +// set_magic_quotes_runtime(0); | |
| 1166 | + foreach($this->FontFiles as $file=>$info) | |
| 1167 | + { | |
| 1168 | + //Font file embedding | |
| 1169 | + $this->_newobj(); | |
| 1170 | + $this->FontFiles[$file]['n']=$this->n; | |
| 1171 | + $font=''; | |
| 1172 | + $f=fopen($this->_getfontpath().$file,'rb',1); | |
| 1173 | + if(!$f) | |
| 1174 | + $this->Error('Font file not found'); | |
| 1175 | + while(!feof($f)) | |
| 1176 | + $font.=fread($f,8192); | |
| 1177 | + fclose($f); | |
| 1178 | + $compressed=(substr($file,-2)=='.z'); | |
| 1179 | + if(!$compressed && isset($info['length2'])) | |
| 1180 | + { | |
| 1181 | + $header=(ord($font{0})==128); | |
| 1182 | + if($header) | |
| 1183 | + { | |
| 1184 | + //Strip first binary header | |
| 1185 | + $font=substr($font,6); | |
| 1186 | + } | |
| 1187 | + if($header && ord($font{$info['length1']})==128) | |
| 1188 | + { | |
| 1189 | + //Strip second binary header | |
| 1190 | + $font=substr($font,0,$info['length1']).substr($font,$info['length1']+6); | |
| 1191 | + } | |
| 1192 | + } | |
| 1193 | + $this->_out('<</Length '.strlen($font)); | |
| 1194 | + if($compressed) | |
| 1195 | + $this->_out('/Filter /FlateDecode'); | |
| 1196 | + $this->_out('/Length1 '.$info['length1']); | |
| 1197 | + if(isset($info['length2'])) | |
| 1198 | + $this->_out('/Length2 '.$info['length2'].' /Length3 0'); | |
| 1199 | + $this->_out('>>'); | |
| 1200 | + $this->_putstream($font); | |
| 1201 | + $this->_out('endobj'); | |
| 1202 | + } | |
| 1203 | +// set_magic_quotes_runtime($mqr); | |
| 1204 | + foreach($this->fonts as $k=>$font) | |
| 1205 | + { | |
| 1206 | + //Font objects | |
| 1207 | + $this->fonts[$k]['n']=$this->n+1; | |
| 1208 | + $type=$font['type']; | |
| 1209 | + $name=$font['name']; | |
| 1210 | + if($type=='core') | |
| 1211 | + { | |
| 1212 | + //Standard font | |
| 1213 | + $this->_newobj(); | |
| 1214 | + $this->_out('<</Type /Font'); | |
| 1215 | + $this->_out('/BaseFont /'.$name); | |
| 1216 | + $this->_out('/Subtype /Type1'); | |
| 1217 | + if($name!='Symbol' && $name!='ZapfDingbats') | |
| 1218 | + $this->_out('/Encoding /WinAnsiEncoding'); | |
| 1219 | + $this->_out('>>'); | |
| 1220 | + $this->_out('endobj'); | |
| 1221 | + } | |
| 1222 | + elseif($type=='Type1' || $type=='TrueType') | |
| 1223 | + { | |
| 1224 | + //Additional Type1 or TrueType font | |
| 1225 | + $this->_newobj(); | |
| 1226 | + $this->_out('<</Type /Font'); | |
| 1227 | + $this->_out('/BaseFont /'.$name); | |
| 1228 | + $this->_out('/Subtype /'.$type); | |
| 1229 | + $this->_out('/FirstChar 32 /LastChar 255'); | |
| 1230 | + $this->_out('/Widths '.($this->n+1).' 0 R'); | |
| 1231 | + $this->_out('/FontDescriptor '.($this->n+2).' 0 R'); | |
| 1232 | + if($font['enc']) | |
| 1233 | + { | |
| 1234 | + if(isset($font['diff'])) | |
| 1235 | + $this->_out('/Encoding '.($nf+$font['diff']).' 0 R'); | |
| 1236 | + else | |
| 1237 | + $this->_out('/Encoding /WinAnsiEncoding'); | |
| 1238 | + } | |
| 1239 | + $this->_out('>>'); | |
| 1240 | + $this->_out('endobj'); | |
| 1241 | + //Widths | |
| 1242 | + $this->_newobj(); | |
| 1243 | + $cw=&$font['cw']; | |
| 1244 | + $s='['; | |
| 1245 | + for($i=32;$i<=255;$i++) | |
| 1246 | + $s.=$cw[chr($i)].' '; | |
| 1247 | + $this->_out($s.']'); | |
| 1248 | + $this->_out('endobj'); | |
| 1249 | + //Descriptor | |
| 1250 | + $this->_newobj(); | |
| 1251 | + $s='<</Type /FontDescriptor /FontName /'.$name; | |
| 1252 | + foreach($font['desc'] as $k=>$v) | |
| 1253 | + $s.=' /'.$k.' '.$v; | |
| 1254 | + $file=$font['file']; | |
| 1255 | + if($file) | |
| 1256 | + $s.=' /FontFile'.($type=='Type1' ? '' : '2').' '.$this->FontFiles[$file]['n'].' 0 R'; | |
| 1257 | + $this->_out($s.'>>'); | |
| 1258 | + $this->_out('endobj'); | |
| 1259 | + } | |
| 1260 | + else | |
| 1261 | + { | |
| 1262 | + //Allow for additional types | |
| 1263 | + $mtd='_put'.strtolower($type); | |
| 1264 | + if(!method_exists($this,$mtd)) | |
| 1265 | + $this->Error('Unsupported font type: '.$type); | |
| 1266 | + $this->$mtd($font); | |
| 1267 | + } | |
| 1268 | + } | |
| 1269 | +} | |
| 1270 | + | |
| 1271 | +function _putimages() | |
| 1272 | +{ | |
| 1273 | + $filter=($this->compress) ? '/Filter /FlateDecode ' : ''; | |
| 1274 | + reset($this->images); | |
| 1275 | + foreach ($this->images as $file => $info) | |
| 1276 | + { | |
| 1277 | + $this->_newobj(); | |
| 1278 | + $this->images[$file]['n']=$this->n; | |
| 1279 | + $this->_out('<</Type /XObject'); | |
| 1280 | + $this->_out('/Subtype /Image'); | |
| 1281 | + $this->_out('/Width '.$info['w']); | |
| 1282 | + $this->_out('/Height '.$info['h']); | |
| 1283 | + if($info['cs']=='Indexed') | |
| 1284 | + $this->_out('/ColorSpace [/Indexed /DeviceRGB '.(strlen($info['pal'])/3-1).' '.($this->n+1).' 0 R]'); | |
| 1285 | + else | |
| 1286 | + { | |
| 1287 | + $this->_out('/ColorSpace /'.$info['cs']); | |
| 1288 | + if($info['cs']=='DeviceCMYK') | |
| 1289 | + $this->_out('/Decode [1 0 1 0 1 0 1 0]'); | |
| 1290 | + } | |
| 1291 | + $this->_out('/BitsPerComponent '.$info['bpc']); | |
| 1292 | + if(isset($info['f'])) | |
| 1293 | + $this->_out('/Filter /'.$info['f']); | |
| 1294 | + if(isset($info['parms'])) | |
| 1295 | + $this->_out($info['parms']); | |
| 1296 | + if(isset($info['trns']) && is_array($info['trns'])) | |
| 1297 | + { | |
| 1298 | + $trns=''; | |
| 1299 | + for($i=0;$i<count($info['trns']);$i++) | |
| 1300 | + $trns.=$info['trns'][$i].' '.$info['trns'][$i].' '; | |
| 1301 | + $this->_out('/Mask ['.$trns.']'); | |
| 1302 | + } | |
| 1303 | + $this->_out('/Length '.strlen($info['data']).'>>'); | |
| 1304 | + $this->_putstream($info['data']); | |
| 1305 | + unset($this->images[$file]['data']); | |
| 1306 | + $this->_out('endobj'); | |
| 1307 | + //Palette | |
| 1308 | + if($info['cs']=='Indexed') | |
| 1309 | + { | |
| 1310 | + $this->_newobj(); | |
| 1311 | + $pal=($this->compress) ? gzcompress($info['pal']) : $info['pal']; | |
| 1312 | + $this->_out('<<'.$filter.'/Length '.strlen($pal).'>>'); | |
| 1313 | + $this->_putstream($pal); | |
| 1314 | + $this->_out('endobj'); | |
| 1315 | + } | |
| 1316 | + } | |
| 1317 | +} | |
| 1318 | + | |
| 1319 | +function _putxobjectdict() | |
| 1320 | +{ | |
| 1321 | + foreach($this->images as $image) | |
| 1322 | + $this->_out('/I'.$image['i'].' '.$image['n'].' 0 R'); | |
| 1323 | +} | |
| 1324 | + | |
| 1325 | +function _putresourcedict() | |
| 1326 | +{ | |
| 1327 | + $this->_out('/ProcSet [/PDF /Text /ImageB /ImageC /ImageI]'); | |
| 1328 | + $this->_out('/Font <<'); | |
| 1329 | + foreach($this->fonts as $font) | |
| 1330 | + $this->_out('/F'.$font['i'].' '.$font['n'].' 0 R'); | |
| 1331 | + $this->_out('>>'); | |
| 1332 | + $this->_out('/XObject <<'); | |
| 1333 | + $this->_putxobjectdict(); | |
| 1334 | + $this->_out('>>'); | |
| 1335 | +} | |
| 1336 | + | |
| 1337 | +function _putresources() | |
| 1338 | +{ | |
| 1339 | + $this->_putfonts(); | |
| 1340 | + $this->_putimages(); | |
| 1341 | + //Resource dictionary | |
| 1342 | + $this->offsets[2]=strlen($this->buffer); | |
| 1343 | + $this->_out('2 0 obj'); | |
| 1344 | + $this->_out('<<'); | |
| 1345 | + $this->_putresourcedict(); | |
| 1346 | + $this->_out('>>'); | |
| 1347 | + $this->_out('endobj'); | |
| 1348 | +} | |
| 1349 | + | |
| 1350 | +function _putinfo() | |
| 1351 | +{ | |
| 1352 | + $this->_out('/Producer '.$this->_textstring('FPDF '.FPDF_VERSION)); | |
| 1353 | + if(!empty($this->title)) | |
| 1354 | + $this->_out('/Title '.$this->_textstring($this->title)); | |
| 1355 | + if(!empty($this->subject)) | |
| 1356 | + $this->_out('/Subject '.$this->_textstring($this->subject)); | |
| 1357 | + if(!empty($this->author)) | |
| 1358 | + $this->_out('/Author '.$this->_textstring($this->author)); | |
| 1359 | + if(!empty($this->keywords)) | |
| 1360 | + $this->_out('/Keywords '.$this->_textstring($this->keywords)); | |
| 1361 | + if(!empty($this->creator)) | |
| 1362 | + $this->_out('/Creator '.$this->_textstring($this->creator)); | |
| 1363 | + $this->_out('/CreationDate '.$this->_textstring('D:'.date('YmdHis'))); | |
| 1364 | +} | |
| 1365 | + | |
| 1366 | +function _putcatalog() | |
| 1367 | +{ | |
| 1368 | + $this->_out('/Type /Catalog'); | |
| 1369 | + $this->_out('/Pages 1 0 R'); | |
| 1370 | + if($this->ZoomMode=='fullpage') | |
| 1371 | + $this->_out('/OpenAction [3 0 R /Fit]'); | |
| 1372 | + elseif($this->ZoomMode=='fullwidth') | |
| 1373 | + $this->_out('/OpenAction [3 0 R /FitH null]'); | |
| 1374 | + elseif($this->ZoomMode=='real') | |
| 1375 | + $this->_out('/OpenAction [3 0 R /XYZ null null 1]'); | |
| 1376 | + elseif(!is_string($this->ZoomMode)) | |
| 1377 | + $this->_out('/OpenAction [3 0 R /XYZ null null '.($this->ZoomMode/100).']'); | |
| 1378 | + if($this->LayoutMode=='single') | |
| 1379 | + $this->_out('/PageLayout /SinglePage'); | |
| 1380 | + elseif($this->LayoutMode=='continuous') | |
| 1381 | + $this->_out('/PageLayout /OneColumn'); | |
| 1382 | + elseif($this->LayoutMode=='two') | |
| 1383 | + $this->_out('/PageLayout /TwoColumnLeft'); | |
| 1384 | +} | |
| 1385 | + | |
| 1386 | +function _putheader() | |
| 1387 | +{ | |
| 1388 | + $this->_out('%PDF-'.$this->PDFVersion); | |
| 1389 | +} | |
| 1390 | + | |
| 1391 | +function _puttrailer() | |
| 1392 | +{ | |
| 1393 | + $this->_out('/Size '.($this->n+1)); | |
| 1394 | + $this->_out('/Root '.$this->n.' 0 R'); | |
| 1395 | + $this->_out('/Info '.($this->n-1).' 0 R'); | |
| 1396 | +} | |
| 1397 | + | |
| 1398 | +function _enddoc() | |
| 1399 | +{ | |
| 1400 | + $this->_putheader(); | |
| 1401 | + $this->_putpages(); | |
| 1402 | + $this->_putresources(); | |
| 1403 | + //Info | |
| 1404 | + $this->_newobj(); | |
| 1405 | + $this->_out('<<'); | |
| 1406 | + $this->_putinfo(); | |
| 1407 | + $this->_out('>>'); | |
| 1408 | + $this->_out('endobj'); | |
| 1409 | + //Catalog | |
| 1410 | + $this->_newobj(); | |
| 1411 | + $this->_out('<<'); | |
| 1412 | + $this->_putcatalog(); | |
| 1413 | + $this->_out('>>'); | |
| 1414 | + $this->_out('endobj'); | |
| 1415 | + //Cross-ref | |
| 1416 | + $o=strlen($this->buffer); | |
| 1417 | + $this->_out('xref'); | |
| 1418 | + $this->_out('0 '.($this->n+1)); | |
| 1419 | + $this->_out('0000000000 65535 f '); | |
| 1420 | + for($i=1;$i<=$this->n;$i++) | |
| 1421 | + $this->_out(sprintf('%010d 00000 n ',$this->offsets[$i])); | |
| 1422 | + //Trailer | |
| 1423 | + $this->_out('trailer'); | |
| 1424 | + $this->_out('<<'); | |
| 1425 | + $this->_puttrailer(); | |
| 1426 | + $this->_out('>>'); | |
| 1427 | + $this->_out('startxref'); | |
| 1428 | + $this->_out($o); | |
| 1429 | + $this->_out('%%EOF'); | |
| 1430 | + $this->state=3; | |
| 1431 | +} | |
| 1432 | + | |
| 1433 | +function _beginpage($orientation) | |
| 1434 | +{ | |
| 1435 | + $this->page++; | |
| 1436 | + $this->pages[$this->page]=''; | |
| 1437 | + $this->state=2; | |
| 1438 | + $this->x=$this->lMargin; | |
| 1439 | + $this->y=$this->tMargin; | |
| 1440 | + $this->FontFamily=''; | |
| 1441 | + //Page orientation | |
| 1442 | + if(!$orientation) | |
| 1443 | + $orientation=$this->DefOrientation; | |
| 1444 | + else | |
| 1445 | + { | |
| 1446 | + $orientation=strtoupper($orientation{0}); | |
| 1447 | + if($orientation!=$this->DefOrientation) | |
| 1448 | + $this->OrientationChanges[$this->page]=true; | |
| 1449 | + } | |
| 1450 | + if($orientation!=$this->CurOrientation) | |
| 1451 | + { | |
| 1452 | + //Change orientation | |
| 1453 | + if($orientation=='P') | |
| 1454 | + { | |
| 1455 | + $this->wPt=$this->fwPt; | |
| 1456 | + $this->hPt=$this->fhPt; | |
| 1457 | + $this->w=$this->fw; | |
| 1458 | + $this->h=$this->fh; | |
| 1459 | + } | |
| 1460 | + else | |
| 1461 | + { | |
| 1462 | + $this->wPt=$this->fhPt; | |
| 1463 | + $this->hPt=$this->fwPt; | |
| 1464 | + $this->w=$this->fh; | |
| 1465 | + $this->h=$this->fw; | |
| 1466 | + } | |
| 1467 | + $this->PageBreakTrigger=$this->h-$this->bMargin; | |
| 1468 | + $this->CurOrientation=$orientation; | |
| 1469 | + } | |
| 1470 | +} | |
| 1471 | + | |
| 1472 | +function _endpage() | |
| 1473 | +{ | |
| 1474 | + //End of page contents | |
| 1475 | + $this->state=1; | |
| 1476 | +} | |
| 1477 | + | |
| 1478 | +function _newobj() | |
| 1479 | +{ | |
| 1480 | + //Begin a new object | |
| 1481 | + $this->n++; | |
| 1482 | + $this->offsets[$this->n]=strlen($this->buffer); | |
| 1483 | + $this->_out($this->n.' 0 obj'); | |
| 1484 | +} | |
| 1485 | + | |
| 1486 | +function _dounderline($x,$y,$txt) | |
| 1487 | +{ | |
| 1488 | + //Underline text | |
| 1489 | + $up=$this->CurrentFont['up']; | |
| 1490 | + $ut=$this->CurrentFont['ut']; | |
| 1491 | + $w=$this->GetStringWidth($txt)+$this->ws*substr_count($txt,' '); | |
| 1492 | + 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); | |
| 1493 | +} | |
| 1494 | + | |
| 1495 | +function _parsejpg($file) | |
| 1496 | +{ | |
| 1497 | + //Extract info from a JPEG file | |
| 1498 | + $a=GetImageSize($file); | |
| 1499 | + if(!$a) | |
| 1500 | + $this->Error('Missing or incorrect image file: '.$file); | |
| 1501 | + if($a[2]!=2) | |
| 1502 | + $this->Error('Not a JPEG file: '.$file); | |
| 1503 | + if(!isset($a['channels']) || $a['channels']==3) | |
| 1504 | + $colspace='DeviceRGB'; | |
| 1505 | + elseif($a['channels']==4) | |
| 1506 | + $colspace='DeviceCMYK'; | |
| 1507 | + else | |
| 1508 | + $colspace='DeviceGray'; | |
| 1509 | + $bpc=isset($a['bits']) ? $a['bits'] : 8; | |
| 1510 | + //Read whole file | |
| 1511 | + $f=fopen($file,'rb'); | |
| 1512 | + $data=''; | |
| 1513 | + while(!feof($f)) | |
| 1514 | + $data.=fread($f,4096); | |
| 1515 | + fclose($f); | |
| 1516 | + return array('w'=>$a[0],'h'=>$a[1],'cs'=>$colspace,'bpc'=>$bpc,'f'=>'DCTDecode','data'=>$data); | |
| 1517 | +} | |
| 1518 | + | |
| 1519 | +function _parsepng($file) | |
| 1520 | +{ | |
| 1521 | + //Extract info from a PNG file | |
| 1522 | + $f=fopen($file,'rb'); | |
| 1523 | + if(!$f) | |
| 1524 | + $this->Error('Can\'t open image file: '.$file); | |
| 1525 | + //Check signature | |
| 1526 | + if(fread($f,8)!=chr(137).'PNG'.chr(13).chr(10).chr(26).chr(10)) | |
| 1527 | + $this->Error('Not a PNG file: '.$file); | |
| 1528 | + //Read header chunk | |
| 1529 | + fread($f,4); | |
| 1530 | + if(fread($f,4)!='IHDR') | |
| 1531 | + $this->Error('Incorrect PNG file: '.$file); | |
| 1532 | + $w=$this->_freadint($f); | |
| 1533 | + $h=$this->_freadint($f); | |
| 1534 | + $bpc=ord(fread($f,1)); | |
| 1535 | + if($bpc>8) | |
| 1536 | + $this->Error('16-bit depth not supported: '.$file); | |
| 1537 | + $ct=ord(fread($f,1)); | |
| 1538 | + if($ct==0) | |
| 1539 | + $colspace='DeviceGray'; | |
| 1540 | + elseif($ct==2) | |
| 1541 | + $colspace='DeviceRGB'; | |
| 1542 | + elseif($ct==3) | |
| 1543 | + $colspace='Indexed'; | |
| 1544 | + else | |
| 1545 | + $this->Error('Alpha channel not supported: '.$file); | |
| 1546 | + if(ord(fread($f,1))!=0) | |
| 1547 | + $this->Error('Unknown compression method: '.$file); | |
| 1548 | + if(ord(fread($f,1))!=0) | |
| 1549 | + $this->Error('Unknown filter method: '.$file); | |
| 1550 | + if(ord(fread($f,1))!=0) | |
| 1551 | + $this->Error('Interlacing not supported: '.$file); | |
| 1552 | + fread($f,4); | |
| 1553 | + $parms='/DecodeParms <</Predictor 15 /Colors '.($ct==2 ? 3 : 1).' /BitsPerComponent '.$bpc.' /Columns '.$w.'>>'; | |
| 1554 | + //Scan chunks looking for palette, transparency and image data | |
| 1555 | + $pal=''; | |
| 1556 | + $trns=''; | |
| 1557 | + $data=''; | |
| 1558 | + do | |
| 1559 | + { | |
| 1560 | + $n=$this->_freadint($f); | |
| 1561 | + $type=fread($f,4); | |
| 1562 | + if($type=='PLTE') | |
| 1563 | + { | |
| 1564 | + //Read palette | |
| 1565 | + $pal=fread($f,$n); | |
| 1566 | + fread($f,4); | |
| 1567 | + } | |
| 1568 | + elseif($type=='tRNS') | |
| 1569 | + { | |
| 1570 | + //Read transparency info | |
| 1571 | + $t=fread($f,$n); | |
| 1572 | + if($ct==0) | |
| 1573 | + $trns=array(ord(substr($t,1,1))); | |
| 1574 | + elseif($ct==2) | |
| 1575 | + $trns=array(ord(substr($t,1,1)),ord(substr($t,3,1)),ord(substr($t,5,1))); | |
| 1576 | + else | |
| 1577 | + { | |
| 1578 | + $pos=strpos($t,chr(0)); | |
| 1579 | + if($pos!==false) | |
| 1580 | + $trns=array($pos); | |
| 1581 | + } | |
| 1582 | + fread($f,4); | |
| 1583 | + } | |
| 1584 | + elseif($type=='IDAT') | |
| 1585 | + { | |
| 1586 | + //Read image data block | |
| 1587 | + $data.=fread($f,$n); | |
| 1588 | + fread($f,4); | |
| 1589 | + } | |
| 1590 | + elseif($type=='IEND') | |
| 1591 | + break; | |
| 1592 | + else | |
| 1593 | + fread($f,$n+4); | |
| 1594 | + } | |
| 1595 | + while($n); | |
| 1596 | + if($colspace=='Indexed' && empty($pal)) | |
| 1597 | + $this->Error('Missing palette in '.$file); | |
| 1598 | + fclose($f); | |
| 1599 | + return array('w'=>$w,'h'=>$h,'cs'=>$colspace,'bpc'=>$bpc,'f'=>'FlateDecode','parms'=>$parms,'pal'=>$pal,'trns'=>$trns,'data'=>$data); | |
| 1600 | +} | |
| 1601 | + | |
| 1602 | +function _freadint($f) | |
| 1603 | +{ | |
| 1604 | + //Read a 4-byte integer from file | |
| 1605 | + $a=unpack('Ni',fread($f,4)); | |
| 1606 | + return $a['i']; | |
| 1607 | +} | |
| 1608 | + | |
| 1609 | +function _textstring($s) | |
| 1610 | +{ | |
| 1611 | + //Format a text string | |
| 1612 | + return '('.$this->_escape($s).')'; | |
| 1613 | +} | |
| 1614 | + | |
| 1615 | +function _escape($s) | |
| 1616 | +{ | |
| 1617 | + //Add \ before \, ( and ) | |
| 1618 | + return str_replace(')','\\)',str_replace('(','\\(',str_replace('\\','\\\\',$s))); | |
| 1619 | +} | |
| 1620 | + | |
| 1621 | +function _putstream($s) | |
| 1622 | +{ | |
| 1623 | + $this->_out('stream'); | |
| 1624 | + $this->_out($s); | |
| 1625 | + $this->_out('endstream'); | |
| 1626 | +} | |
| 1627 | + | |
| 1628 | +function _out($s) | |
| 1629 | +{ | |
| 1630 | + //Add a line to the document | |
| 1631 | + if($this->state==2) | |
| 1632 | + $this->pages[$this->page].=$s."\n"; | |
| 1633 | + else | |
| 1634 | + $this->buffer.=$s."\n"; | |
| 1635 | +} | |
| 1636 | +//End of class | |
| 1637 | +} | |
| 1638 | + | |
| 1639 | +//Handle special IE contype request | |
| 1640 | +if(isset($_SERVER['HTTP_USER_AGENT']) && $_SERVER['HTTP_USER_AGENT']=='contype') | |
| 1641 | +{ | |
| 1642 | + header('Content-Type: application/pdf'); | |
| 1643 | + exit; | |
| 1644 | +} | |
| 1645 | + | |
| 1646 | +} | |
| 1647 | +?> | |
