science-ation/lpdf.php
2024-12-10 19:40:23 -05:00

930 lines
28 KiB
PHP

<?
/*
This file is part of the 'Science Fair In A Box' project
SFIAB Website: http://www.sfiab.ca
Copyright (C) 2005 Sci-Tech Ontario Inc <info@scitechontario.org>
Copyright (C) 2005 James Grant <james@lightbox.org>
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public
License as published by the Free Software Foundation, version 2.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; see the file COPYING. If not, write to
the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
Boston, MA 02111-1307, USA.
*/
// This file was modified Jan of 2014 by Richard Sin
// It properly formats pdf files and prevents overflows.
?>
<?
class lpdf
{
var $pdf;
var $yloc=10.25;
var $page_header;
var $page_subheader;
var $pagenumber;
var $logoimage;
var $page_style="normal";
var $page_margin=0.75;
//these are defaults, they get overwritten with the first call to newPage(width,height)
var $page_width=8.5;
var $page_height=11;
//all of these are overwritten by setLabelDimensions(width,height,xspacer,yspacer);
var $label_width=4;
var $label_height=2, $label_effective_height=0;
var $label_xspacer=0.125;
var $label_yspacer=0.125;
var $labels_per_row=2;
var $labels_per_column=5;
var $labels_per_page=10;
var $labels_start_xpos;
var $labels_start_ypos;
var $current_label_index=0;
var $current_label_col_index=0;
var $current_label_row_index=1;
var $currentFontSize=12;
var $defaultFontSize=10;
var $normalfont;
var $boldfont;
function loc($inch)
{
return $inch*72;
}
function addHeaderAndFooterToPage()
{
//The title of the fair
$this->yloc=$this->page_height-$this->page_margin;
$height['title']=0.25;
$height['subtitle']=0.22;
pdf_setfont($this->pdf,$this->headerfont,18);
pdf_show_boxed($this->pdf,$this->page_header,$this->loc($this->page_margin),$this->loc($this->yloc),$this->loc($this->content_width),$this->loc($height['title']),"center",null);
$this->yloc-=$height['title'];
pdf_setfont($this->pdf,$this->headerfont,14);
pdf_show_boxed($this->pdf,$this->page_subheader,$this->loc($this->page_margin),$this->loc($this->yloc),$this->loc($this->content_width),$this->loc($height['subtitle']),"center",null);
$this->yloc-=$height['subtitle'];
//only put the logo on the page if we actually have the logo
if($this->logoimage)
{
/* now place the logo image in the top-left-ish
* within a box width=height=0.70, fit to the box, and
* center in the box */
$w = $this->loc(0.70);
pdf_fit_image($this->pdf, $this->logoimage,
$this->loc($this->page_margin),
$this->loc($this->yloc+.02),
"boxsize { $w $w} position {50 50} fitmethod meet" ) ;
}
//header line
pdf_moveto($this->pdf,$this->loc($this->page_margin-0.25),$this->loc($this->yloc));
pdf_lineto($this->pdf,$this->loc($this->page_width-$this->page_margin+0.25),$this->loc($this->yloc));
pdf_stroke($this->pdf);
$this->yloc-=0.20;
//now put a nice little footer at the bottom
$footertext=date("Y-m-d h:ia")." - ".$this->page_header." - ".$this->page_subheader;
$footerwidth=pdf_stringwidth($this->pdf,$footertext,$this->normalfont,9);
pdf_setfont($this->pdf,$this->normalfont,9);
pdf_show_xy($this->pdf,$footertext,$this->loc($this->page_width/2)-$footerwidth/2,$this->loc(0.5));
pdf_setfont($this->pdf,$this->normalfont,11);
pdf_show_xy($this->pdf,($this->pagenumber),$this->loc($this->page_width - 0.5),$this->loc(0.5));
//footer line
pdf_moveto($this->pdf,$this->loc($this->page_margin-0.25),$this->loc($this->page_margin-0.05));
pdf_lineto($this->pdf,$this->loc($this->page_width-$this->page_margin+0.25),$this->loc($this->page_margin-0.05));
pdf_stroke($this->pdf);
}
function newPage($width="",$height="",$pagenumber=0)
{
if($width && $height)
{
$this->page_width=$width;
$this->page_height=$height;
$this->content_width=$width-(2*$this->page_margin);
}
if($this->pagenumber>0)
pdf_end_page($this->pdf);
$this->pagenumber = ($pagenumber == 0) ? ($this->pagenumber + 1) : $pagenumber;
//Letter size (8.5 x 11) is 612,792
pdf_begin_page($this->pdf,$this->loc($this->page_width),$this->loc($this->page_height));
pdf_setlinewidth($this->pdf,0.3);
if($this->page_style=="normal")
{
$this->addHeaderAndFooterToPage();
//make sure we set the font back to whatever it used to be
//because adding header/footer changes the fontsize
$this->setFontSize($this->currentFontSize);
}
}
function vspace($space)
{
$this->yloc-=$space;
}
function setDefaultFontSize($size) {
$this->defaultFontSize=$size;
}
function setFontSize($size)
{
$this->currentFontSize=$size;
pdf_setfont($this->pdf,$this->normalfont,$size);
$leading=round($size*1.3);
pdf_set_value($this->pdf,"leading",$leading);
}
function setFontBold()
{
pdf_setfont($this->pdf, $this->boldfont, $this->currentFontSize);
}
function setFontNormal()
{
pdf_setfont($this->pdf, $this->normalfont, $this->currentFontSize);
}
function addText($text,$align="left", $xloc=0, $displayfont="normalfont")
{
$fontsize=pdf_get_value($this->pdf,"fontsize",0);
$lineheight=ceil($fontsize*1.3);
//the line height should be 1.2 * fontsize (approx)
$stringwidth=pdf_stringwidth($this->pdf,$text,$this->$displayfont,$fontsize);
$textstr=$text;
if($xloc == 0) {
$xloc = $this->page_margin;
$content_width = $this->content_width;
} else {
$content_width = $this->content_width - $xloc;
}
$nr=0;
$prevnr=-1;
do
{
//echo "textstr=$textstr";
$len=strlen($textstr);
// echo "(lh:$lineheight nr:$nr len:$len)".$textstr;
$nl=false;
//now lets handle a newline at the beginning, just rip it off and move the yloc ourself
while($textstr[0]=="\n")
{
$textstr=substr($textstr,1);
$this->yloc-=$lineheight/72;
$nl=true;
}
if($nl == false) $this->yloc-=$lineheight/72;
$nr=pdf_show_boxed($this->pdf,$textstr, $this->loc($xloc),$this->loc($this->yloc),$this->loc($content_width),$lineheight,$align,null);
if($this->yloc< (0.9 + $lineheight/72) )
$this->newPage();
if($nr==$prevnr)
{
//Comment this out, so if it ever does happen, the PDF will still generate, it just might be missing a small blurb somewhere, better than no PDF at all
// echo "breaking because nr==prevnr ($nr==$prevnr) trying to output [$textstr] (debug: fontsize=$fontsize, lineheight=$lineheight, stringwidth=$stringwidth, left=".$this->loc(0.75).", top=".$this->loc($this->yloc).", width=".$this->loc(7).", height=$lineheight)\n";
break;
}
$q=$pdo->prepare("SELECT * FROM translations WHERE lang='".$_SESSION['lang']."' AND strmd5='".md5($str)."'");
$q->execute();
if($r=$q->fetch(PDO::FETCH_OBJ))
$prevnr=$nr;
// printf("x=%f y=%f w=%f h=%f",$this->loc(0.75),$this->loc($this->yloc),$this->loc(7),$lineheight);
// echo "$nr didnt fit";
// echo "<br>doing: substr($textstr,-$nr) <br>";
$textstr=substr($textstr,-$nr);
// echo "nr=$nr";
} while($nr>0);
// pdf_rect($this->pdf,$this->loc(0.75),$this->loc($this->yloc),$this->loc(7),$height);
}
function mailingLabel($to,$co,$address,$city,$province,$postalcode)
{
$this->setFontSize($this->currentFontSize);
//mailing addresses are all uppercase, left aligned
//see http://www.canadapost.ca/tools/pg/standards/cps1-05-e.asp
$tmpY=0.1;
$fontsize=pdf_get_value($this->pdf,"fontsize",0);
$lineheight=ceil($fontsize*1.2);
//this is to make sure if the name of the school goes onto two lines we handle it properly
$l=$this->addLabelText($tmpY,mb_strtoupper(trim($to)));
$tmpY+=($lineheight/72)*$l;
if($co)
{
$l=$this->addLabelText($tmpY,trim(mb_strtoupper($co)));
$tmpY+=($lineheight/72)*$l;
}
if($address[strlen($address)-1]==".") $address=substr($address,0,-1);
$l=$this->addLabelText($tmpY,mb_strtoupper(trim($address)));
$tmpY+=($lineheight/72)*$l;
if(strlen($postalcode)==6) $pc=substr($postalcode,0,3)." ".substr($postalcode,3,3); else $pc=$postalcode;
$this->addLabelText($tmpY,trim(mb_strtoupper("$city $province $pc")));
}
function addLabelText($Y,$text,$align="left")
{
$this->setFontSize($this->currentFontSize);
$fontsize=pdf_get_value($this->pdf,"fontsize",0);
$lineheight=ceil($fontsize*1.35);
$linemove=ceil($fontsize*1.2);
// echo "fontsize=$fontsize lineheight=$lineheight";
$textstr=$text;
$texty=$this->label_current_ypos-$Y;
$nr=0;
$prevnr=-1;
$numlines=0;
do
{
$len=strlen($textstr);
$nl=false;
//now lets handle a newline at the beginning, just rip it off and move the yloc ourself
while($textstr[0]=="\n")
{
$textstr=substr($textstr,1);
$texty-=$linemove/72;
$nl=true;
}
if(!$nl)
$texty-=$linemove/72;
$nr=pdf_show_boxed($this->pdf,$textstr, $this->loc($this->label_current_xpos+0.20),$this->loc($texty),$this->loc($this->label_width-0.3),$lineheight,$align,null);
if($nr==$len)
{
$texty+=$linemove/72;
//okay so it really doesnt fit. so lets just keep shortening it until it does!
$textstr=substr($textstr,0,-1);
}
else
{
$textstr=substr($textstr,-$nr);
$numlines++;
}
$prevnr=$nr;
} while($nr>0);
return $numlines;
}
function addLabelText2($xp,$yp,$wp,$hp,$lh,$text,$options)
{
// print("$xp,$yp,$wp,$hp,$lh,$text,$options,$this->label_width");
/* Some assumptions:
- we will scale the font instead of doing line wrapping
- all coords are given in percentages of the label
- a width or height of 0 means "don't care"
- xp or yp can also be 'center', meaning center the text */
if($xp == 'center') {
if($wp == 0) $wp = 100;
$xp = 50 - ($wp / 2);
}
if($yp == 'center') {
if($hp == 0) $hp = 100;
$yp = 50 - ($hp / 2);
}
$xpos = ($xp * $this->label_width) /100;
$ypos = ($yp * $this->label_effective_height) / 100;
$desired_width = ($this->label_width * $wp) / 100;
$desired_height = ($this->label_effective_height * $hp) / 100;
/* Pick a font */
if(in_array('bold', $options)) {
$font = $this->boldfont;
} else {
$font = $this->normalfont;
}
$align = 'left';
$valign = 'top';
$boxtext = false;
if(in_array('left', $options)) $align = 'left';
if(in_array('right', $options)) $align = 'right';
if(in_array('center', $options)) $align = 'center';
if(in_array('vtop', $options)) $valign = 'top';
if(in_array('vcenter', $options)) $valign = 'center';
if(in_array('vbottom', $options)) $valign = 'bottom';
if(in_array('field_box', $options)) $boxtext = true;
/* Find the correct font size for the lineheight */
if($lh == 0) $lh = $hp;
$desired_line_height = ($this->label_effective_height * $lh) / 100;
$desired_line_height_loc = $desired_line_height * 72;
// print("Desired line height=[$desired_line_height => $desired_line_height_loc]");
$fontpt = intval($desired_line_height_loc);
pdf_setfont($this->pdf, $font, $fontpt);
// print("$xpos, $ypos x $desired_width, $desired_height<br>");
if($boxtext == true) {
pdf_rect($this->pdf,
$this->loc($this->label_current_xpos + $xpos),
$this->loc($this->label_current_ypos - ($ypos + $desired_height)),
$this->loc($desired_width),
$this->loc($desired_height));
pdf_stroke($this->pdf);
}
$x = $this->label_current_xpos + $xpos;
$y = $this->label_current_ypos - ($ypos + $desired_height);
$lines = 1;
$nr=pdf_show_boxed($this->pdf, $text,
$this->loc($x), $this->loc($y),
$this->loc($desired_width), $this->loc($desired_line_height),
$align,'blind');
$prevnr=$nr;
while($nr > 0) {
$nr=pdf_show_boxed($this->pdf, substr($text, -$nr),
$this->loc($x), $this->loc($y),
$this->loc($desired_width), $this->loc($desired_line_height),
$align,'blind');
$lines ++;
if($nr==$prevnr) break;
$prevnr=$nr;
}
/* Now adjust the ypos, and do it for real */
if($valign == 'top') {
$y = $this->label_current_ypos - ($ypos + $desired_line_height);
} else if($valign == 'center') {
$extra = ($desired_height - ($lines * $desired_line_height)) / 2;
$y = $this->label_current_ypos - ($ypos + $desired_line_height) - $extra;
} else {
echo "Unimplemented valign [$valign]";
exit();
}
$nr=pdf_show_boxed($this->pdf, $text,
$this->loc($x), $this->loc($y),
$this->loc($desired_width), $this->loc($desired_line_height),
$align,null);
$prevnr=$nr;
while($nr > 0) {
$y -= $desired_line_height;
$nr=pdf_show_boxed($this->pdf, substr($text, -$nr),
$this->loc($x), $this->loc($y),
$this->loc($desired_width), $this->loc($desired_line_height),
$align,null);
if($nr==$prevnr) break;
$prevnr=$nr;
}
}
function addLabelBox($xp,$yp,$wp,$hp)
{
$xpos = ($xp * $this->label_width) /100;
$ypos = ($yp * $this->label_effective_height) / 100;
$desired_width = ($this->label_width * $wp) / 100;
$desired_height = ($this->label_effective_height * $hp) / 100;
pdf_rect($this->pdf,
$this->loc($this->label_current_xpos + $xpos),
$this->loc($this->label_current_ypos - ($ypos + $desired_height)),
$this->loc($desired_width),
$this->loc($desired_height));
pdf_stroke($this->pdf);
}
function newLabel($show_box=false, $show_fairname=false, $show_logo=false)
{
if($this->current_label_index==$this->labels_per_page)
{
$this->newPage();
$this->current_label_index=1;
$this->current_label_col_index=0;
$this->current_label_row_index=1;
}
else
{
$this->current_label_index++;
}
if($this->current_label_col_index==$this->labels_per_row)
{
$this->current_label_col_index=1;
$this->current_label_row_index++;
}
else
{
$this->current_label_col_index++;
}
$this->label_current_ypos=$this->labels_start_ypos-(($this->current_label_row_index-1)*($this->label_height + $this->label_yspacer))-$this->label_height;
$this->label_current_xpos=$this->labels_start_xpos+(($this->current_label_col_index-1)*($this->label_width + $this->label_xspacer));
if($show_box == true) {
pdf_rect($this->pdf,
$this->loc($this->label_current_xpos),
$this->loc($this->label_current_ypos),
$this->loc($this->label_width),
$this->loc($this->label_height));
pdf_stroke($this->pdf);
}
$this->label_current_ypos+=$this->label_height;//-0.15;
//only put the logo on the label if we actually have the logo
if($show_logo == true && $this->logoimage)
{
/* now place the logo image in the top-left-ish
* within a box width=height=0.70, fit to the box, and
* center in the box */
$w = $this->loc(0.70);
pdf_fit_image($this->pdf, $this->logoimage,
$this->loc($this->label_current_xpos+0.05),
$this->loc($this->label_current_ypos-0.75),
"boxsize { $w $w} position {50 50} fitmethod meet" ) ;
}
$this->label_effective_height = $this->label_height;
if($show_fairname) {
$height['title']=0.50;
$this->label_current_ypos -= $height['title'];
$this->label_effective_height -= $height['title'];
pdf_setfont($this->pdf,$this->headerfont,13);
pdf_show_boxed($this->pdf,$this->page_header,
$this->loc($this->label_current_xpos+0.65),
$this->loc($this->label_current_ypos-0.15),
$this->loc($this->label_width-0.70),
$this->loc($height['title']),
"center",
null);
}
}
function addTextX($text,$xpos)
{
$fontsize=pdf_get_value($this->pdf,"fontsize",0);
$lineheight=ceil($fontsize*1.2);
//we do it before here, to make sure we never get too low
if($this->yloc< (0.9 + $lineheight/72) )
$this->newPage();
pdf_show_xy($this->pdf,$text,$this->loc($xpos),$this->loc($this->yloc));
}
function stringWidth($text, $font=null, $size=null)
{
if($size == null) $size = pdf_get_value($this->pdf,"fontsize",0);
if($font == null) $font = $this->normalfont;
return pdf_stringwidth($this->pdf, $text, $font, $size);
}
function nextLine()
{
$fontsize=pdf_get_value($this->pdf,"fontsize",0);
$lineheight=ceil($fontsize*1.2);
$this->yloc-=$this->currentFontSize*1.4/72;
//new page check can come after the nextline call
if($this->yloc< (0.9 + $lineheight/72) )
$this->newPage();
}
function prevLine()
{
$fontsize=pdf_get_value($this->pdf,"fontsize",0);
$lineheight=ceil($fontsize*1.2);
$this->yloc+=$this->currentFontSize*1.4/72;
}
function hr()
{
$fontsize=pdf_get_value($this->pdf,"fontsize",0);
$lineheight=ceil($fontsize*1.2);
pdf_moveto($this->pdf,$this->loc($this->page_margin-0.25),$this->loc($this->yloc));
pdf_lineto($this->pdf,$this->loc($this->page_width-$this->page_margin+0.25),$this->loc($this->yloc));
pdf_stroke($this->pdf);
$this->yloc-=0.25;
//again we do it after the nextline call
if($this->yloc< (0.9 + $lineheight/72) )
$this->newPage();
}
function hline($x1,$x2)
{
pdf_moveto($this->pdf,$this->loc($x1),$this->loc($this->yloc));
pdf_lineto($this->pdf,$this->loc($x2),$this->loc($this->yloc));
pdf_stroke($this->pdf);
}
function heading($text)
{
//if we are close to the bottom, lets just move the whole heading to the next page.
//no point putting the heading here then the new text on the next page.
//12/72 is height of the heading
//4/72 is the space under the heading
if($this->yloc< (1.1 + 12/72 + 4/72) )
$this->newPage();
pdf_setfont($this->pdf,$this->headerfont, round($this->defaultFontSize*1.2));
$this->addText($text,"left",0,"headerfont");
pdf_setfont($this->pdf,$this->normalfont,$this->currentFontSize);
//now leave some space under the heading (4 is 1/3 of 12, so 1/3 of the line height we leave)
$this->yloc-=4/72;
}
function addTableStart(&$table, $xpos_of_table, $table_width)
{
if(is_array($table['header'])) {
$table_cols=count($table['header']);
$height_header=round(round($this->defaultFontSize*1.2)/50,2);
} else {
$table_cols=count($table['data']);
$height_header=0;
}
$this->yloc-=$height_header;
$top_of_table=$this->yloc;
//draw the top line of the table (above the table header)
pdf_moveto($this->pdf,$this->loc($xpos_of_table),$this->loc($this->yloc+$height_header));
pdf_lineto($this->pdf,$this->loc($xpos_of_table+$table_width),$this->loc($this->yloc+$height_header));
pdf_stroke($this->pdf);
//do the header first
if(is_array($table['header']))
{
//draw the top line of the table (below the table header)
pdf_moveto($this->pdf,$this->loc($xpos_of_table),$this->loc($this->yloc));
pdf_lineto($this->pdf,$this->loc($xpos_of_table+$table_width),$this->loc($this->yloc));
pdf_stroke($this->pdf);
$xpos=$xpos_of_table;
pdf_setfont($this->pdf,$this->headerfont,round($this->defaultFontSize*1.2));
for($c=0;$c<$table_cols;$c++)
{
$head=$table['header'][$c];
$width=$table['widths'][$c];
pdf_show_boxed($this->pdf,$head,$this->loc($xpos),$this->loc($this->yloc),$this->loc($width),$this->loc($height_header),"center",null);
$xpos+=$width;
}
pdf_setfont($this->pdf,$this->normalfont,$this->defaultFontSize);
}
return $top_of_table;
}
function addTableEnd(&$table, $xpos_of_table, $top_of_table)
{
if(is_array($table['header'])) {
$table_cols=count($table['header']);
$height_header=round(round($this->defaultFontSize*1.2)/50,2);
} else {
$table_cols=count($table['data']);
$height_header=0;
}
//now draw all the vertical lines
$xpos=$xpos_of_table;
for($c=0;$c<$table_cols;$c++)
{
$width=$table['widths'][$c];
//draw the line below the table data)
pdf_moveto($this->pdf,$this->loc($xpos),$this->loc($top_of_table+$height_header));
pdf_lineto($this->pdf,$this->loc($xpos),$this->loc($this->yloc));
pdf_stroke($this->pdf);
$xpos+=$width;
}
//and the final line on the right side of the table:
pdf_moveto($this->pdf,$this->loc($xpos),$this->loc($top_of_table+$height_header));
pdf_lineto($this->pdf,$this->loc($xpos),$this->loc($this->yloc));
pdf_stroke($this->pdf);
}
function addTable($table,$align="center")
{
//if we get a table passed in that doesnt look like a table (not an array) then just return doing nothing
if(!is_array($table)) return;
if(is_array($table['header']))
{
$table_cols=count($table['header']);
} else {
$table_cols=count($table['data']);
}
$line_height=round(round($this->defaultFontSize)/64,2);
$table_width=array_sum($table['widths']);
$table_padding=0.03;
$allow_multiline = false;
if(is_array($table['option']))
{
$allow_multiline = ($table['option']['allow_multiline'] == true) ? true : false;
}
switch($align)
{
case "center"; $xpos_of_table=($this->page_width-$table_width)/2; break;
case "left"; $xpos_of_table=$this->page_margin; break;
case "right"; $xpos_of_table=$this->page_width-$this->page_margin-$table_width; break;
}
$top_of_table = $this->addTableStart($table, $xpos_of_table, $table_width);
//now do the data in the table
if($table['data'])
{
pdf_setfont($this->pdf,$this->normalfont,$this->defaultFontSize);
foreach($table['data'] AS $dataline)
{
do
{
$xpos=$xpos_of_table;
/* Fit first */
$col_width = array();
$col_height = 1;
for($c=0;$c<$table_cols;$c++)
{
$width=$table['widths'][$c];
$textstr=trim($dataline[$c]);
$try=0;
$h = $col_height;
$last_notfit = 0;
while(1)
{
$notfit=pdf_show_boxed($this->pdf,$textstr,
$this->loc($xpos+$table_padding),$this->loc($this->yloc-($h)*$line_height),
$this->loc($width-2*$table_padding),$this->loc($line_height*$h),
$table['dataalign'][$c],'blind');
/* It fits, break and do it for real */
if($notfit == 0) break;
/* If we're not allowed to use multiple lines, we're done. */
if($allow_multiline == false) break;
if($last_notfit == $notfit)
{
/* Height was increased, but it didn't help the fit at all
* Try again up to 5 times. */
if($try == 5)
{
/* Text in is the same as text out for 5 line increments,
* we're probably in an infinite loop. So, instead
* of trying to just add vspace, fudge the hspace and
* restart */
$h = 1;
$width += 0.1;
$try=0;
continue;
}
$try++;
} else {
/* We found a line height that helped the fit */
$try=0;
}
$last_notfit = $notfit;
if($this->yloc - ($line_height * $h) < 0.75)
{
$h--;
break;
} else {
/* Increase the height and try again */
$h++;
}
}
$col_width[$c] = $width;
if($h > $col_height) $col_height = $h;
}
/* If this entry goes off the bottom of the
* page, start a new page, and then blindly
* dump this entry on it (but try to squeeze on
* as much as possible) */
//if($this->yloc - ($line_height * $col_height) < 0.75)
//{
// $this->addTableEnd($table, $xpos_of_table, $top_of_table);
// $this->newPage($this->page_width,$this->page_height);
// $top_of_table = $this->addTableStart($table, $xpos_of_table, $table_width);
//}
/* Do it for real */
for($c=0;$c<$table_cols;$c++)
{
$width = $col_width[$c];
$h = $col_height * $line_height;
$textstr=trim($dataline[$c]);
$notfit = pdf_show_boxed($this->pdf,$textstr,
$this->loc($xpos+$table_padding),$this->loc($this->yloc-$h),
$this->loc($width-2*$table_padding),$this->loc($h),
$table['dataalign'][$c],null);
//put a little "..." at the end of the field
if($notfit)
{
$dataline[$c]=substr($textstr,-$notfit);
pdf_setfont($this->pdf,$this->normalfont,8);
if($allow_multiline)pdf_show_boxed($this->pdf,"(continued..)",
$this->loc($xpos+$width-0.55),$this->loc($this->yloc-$h-0.15),
$this->loc(0.6),$this->loc($line_height),
$table['dataalign'][$c],null);
pdf_setfont($this->pdf,$this->normalfont,$this->defaultFontSize);
}
$xpos+=$width;
}
$this->yloc -= $line_height*$col_height;
//draw the line below the table data)
pdf_moveto($this->pdf,$this->loc($xpos_of_table),$this->loc($this->yloc));
pdf_lineto($this->pdf,$this->loc($xpos_of_table+$table_width),$this->loc($this->yloc));
pdf_stroke($this->pdf);
if($this->yloc<1.1)
{
$this->addTableEnd($table, $xpos_of_table, $top_of_table);
$this->newPage($this->page_width,$this->page_height);
$top_of_table = $this->addTableStart($table, $xpos_of_table, $table_width);
}
}while($notfit>0);
}
}
/* Finish the table */
$this->addTableEnd($table, $xpos_of_table, $top_of_table);
// print the total in th etable at the bottom of the table
if($table['total'] != 0) {
$this->addText("(Total: {$table['total']})", 'right');
} else {
$t = count($table['data']);
$this->addText("(Rows: $t)", 'right');
}
}
//page styles: "normal" "empty" "labels"
function setPageStyle($style="normal")
{
$this->page_style=$style;
}
function setLabelDimensions($width,$height,$xspacer=0.125,$yspacer=0.125,$fontsize=10,$toppadding=0)
{
$this->label_width=$width;
$this->label_height=$height;
$this->label_xspacer=$xspacer;
$this->label_yspacer=$yspacer;
$this->label_toppadding=$toppadding;
$this->labels_per_row=floor($this->page_width/($width+$xspacer));
$this->labels_per_column=floor(($this->page_height-$toppadding*2)/($height+$yspacer));
$this->labels_per_page=$this->labels_per_row * $this->labels_per_column;
$this->labels_start_xpos=($this->page_width-$this->labels_per_row*$width - $this->label_xspacer*($this->labels_per_row-1))/2;
$this->labels_start_ypos=$this->page_height
- ($this->page_height-$this->labels_per_column*$height-$this->label_yspacer*($this->labels_per_column-1))/2;
$this->setFontSize($fontsize);
}
function outputArray()
{
$ret = array();
pdf_end_page($this->pdf);
//only close the image if it was opened to begin with
if($this->logoimage)
pdf_close_image($this->pdf,$this->logoimage);
pdf_close($this->pdf);
$ret['data'] = pdf_get_buffer($this->pdf);
$filename=strtolower($this->page_subheader);
$filename=ereg_replace("[^a-z0-9]","_",$filename);
$ret['header'][] = "Content-type: application/pdf";
$ret['header'][] = "Content-disposition: inline; filename=sfiab_".$filename.".pdf";
$ret['header'][] = "Content-length: ".strlen($ret['data']);
$ret['header'][] = "Pragma: public";
return $ret;
}
function output()
{
$data = $this->outputArray();
foreach($data['header'] as $h) header($h);
echo $data['data'];
}
function lpdf($header,$subheader,$logo)
{
$this->pdf=pdf_new();
pdf_open_file($this->pdf,null);
//calculate this now, becauasae aparently we cant calculated up top in the class definition
$this->content_width=$this->page_width-($this->page_margin*2);
//open up the first page
//Letter size (8.5 x 11) is 612,792
// pdf_begin_page($this->pdf,612,792);
// pdf_set_parameter($this->pdf, "FontOutline", "Arial=/home/sfiab/www.sfiab.ca/sfiab/arial.ttf");
//$arial=pdf_findfont($this->pdf,"Arial","host",1);
$this->normalfont=pdf_findfont($this->pdf,"Times-Roman","host",0);
$this->boldfont=pdf_findfont($this->pdf,"Times-Bold","host",0);
$this->headerfont=pdf_findfont($this->pdf,"Times-Bold","host",0);
if(file_exists($logo))
$this->logoimage=pdf_open_image_file($this->pdf,"gif",$logo,"",0);
pdf_set_info($this->pdf,"Author","SFIAB");
pdf_set_info($this->pdf,"Creator","SFIAB");
pdf_set_info($this->pdf,"Title","SFIAB - $subheader");
pdf_set_info($this->pdf,"Subject","$subheader");
$this->page_header=$header;
$this->page_subheader=$subheader;
$this->pagenumber=0;
//add the stuff to the first page
// $this->addHeaderAndFooterToPage();
}
}
?>