2005-01-13 22:00:34 +00:00
< ?
2005-01-24 18:00:03 +00:00
/*
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 .
*/
?>
< ?
2005-01-13 22:00:34 +00:00
class lpdf
{
var $pdf ;
var $yloc = 10.25 ;
var $page_header ;
var $page_subheader ;
var $pagenumber ;
2005-01-14 20:42:03 +00:00
var $logoimage ;
2005-01-13 22:00:34 +00:00
2005-04-22 17:37:19 +00:00
var $page_style = " normal " ;
2005-04-22 14:04:47 +00:00
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 ;
2006-09-12 18:03:46 +00:00
//all of these are overwritten by setLabelDimensions(width,height,xspacer,yspacer);
2006-09-11 18:05:35 +00:00
var $label_width = 4 ;
2007-03-19 06:56:38 +00:00
var $label_height = 2 , $label_effective_height = 0 ;
2006-09-12 18:03:46 +00:00
var $label_xspacer = 0.125 ;
var $label_yspacer = 0.125 ;
2006-09-11 18:05:35 +00:00
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 ;
2005-05-04 21:23:00 +00:00
var $currentFontSize = 12 ;
2010-03-23 16:42:59 +00:00
var $defaultFontSize = 10 ;
2005-05-04 21:23:00 +00:00
2007-12-10 21:28:17 +00:00
var $normalfont ;
var $boldfont ;
2005-01-13 22:00:34 +00:00
function loc ( $inch )
{
return $inch * 72 ;
}
function addHeaderAndFooterToPage ()
{
//The title of the fair
2005-04-22 14:04:47 +00:00
$this -> yloc = $this -> page_height - $this -> page_margin ;
2005-01-13 22:00:34 +00:00
$height [ 'title' ] = 0.25 ;
$height [ 'subtitle' ] = 0.22 ;
pdf_setfont ( $this -> pdf , $this -> headerfont , 18 );
2005-04-22 14:04:47 +00:00
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 );
2005-01-13 22:00:34 +00:00
$this -> yloc -= $height [ 'title' ];
pdf_setfont ( $this -> pdf , $this -> headerfont , 14 );
2005-04-22 14:04:47 +00:00
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 );
2005-01-13 22:00:34 +00:00
$this -> yloc -= $height [ 'subtitle' ];
2005-01-21 17:00:28 +00:00
//only put the logo on the page if we actually have the logo
if ( $this -> logoimage )
{
2007-12-22 03:31:02 +00:00
/* 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 " ) ;
2005-01-21 17:00:28 +00:00
}
2005-01-14 20:42:03 +00:00
2005-01-13 22:00:34 +00:00
//header line
2005-04-22 14:04:47 +00:00
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 ));
2005-01-13 22:00:34 +00:00
pdf_stroke ( $this -> pdf );
2005-01-18 03:33:37 +00:00
$this -> yloc -= 0.20 ;
2005-01-13 22:00:34 +00:00
//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 );
2005-04-22 14:04:47 +00:00
pdf_show_xy ( $this -> pdf , $footertext , $this -> loc ( $this -> page_width / 2 ) - $footerwidth / 2 , $this -> loc ( 0.5 ));
2005-01-13 22:00:34 +00:00
2007-03-18 05:02:14 +00:00
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 ));
2005-01-13 22:00:34 +00:00
//footer line
2005-04-22 14:04:47 +00:00
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 ));
2005-01-13 22:00:34 +00:00
pdf_stroke ( $this -> pdf );
}
2009-09-25 19:13:29 +00:00
function newPage ( $width = " " , $height = " " , $pagenumber = 0 )
2005-01-13 22:00:34 +00:00
{
2005-04-22 14:04:47 +00:00
if ( $width && $height )
{
$this -> page_width = $width ;
$this -> page_height = $height ;
$this -> content_width = $width - ( 2 * $this -> page_margin );
}
2005-01-13 23:59:22 +00:00
if ( $this -> pagenumber > 0 )
pdf_end_page ( $this -> pdf );
2009-09-25 19:13:29 +00:00
$this -> pagenumber = ( $pagenumber == 0 ) ? ( $this -> pagenumber + 1 ) : $pagenumber ;
2005-04-22 17:37:19 +00:00
2005-01-13 22:00:34 +00:00
//Letter size (8.5 x 11) is 612,792
2005-04-22 14:09:13 +00:00
pdf_begin_page ( $this -> pdf , $this -> loc ( $this -> page_width ), $this -> loc ( $this -> page_height ));
2005-01-13 23:59:22 +00:00
pdf_setlinewidth ( $this -> pdf , 0.3 );
2005-04-22 17:37:19 +00:00
if ( $this -> page_style == " normal " )
2005-05-04 21:23:00 +00:00
{
2005-04-22 17:37:19 +00:00
$this -> addHeaderAndFooterToPage ();
2005-05-04 21:23:00 +00:00
//make sure we set the font back to whatever it used to be
//because adding header/footer changes the fontsize
$this -> setFontSize ( $this -> currentFontSize );
}
2005-01-13 22:00:34 +00:00
}
2005-01-18 03:33:37 +00:00
function vspace ( $space )
{
$this -> yloc -= $space ;
}
2010-03-23 16:42:59 +00:00
function setDefaultFontSize ( $size ) {
$this -> defaultFontSize = $size ;
}
2005-01-18 03:33:37 +00:00
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 );
}
2007-12-10 21:28:17 +00:00
function setFontBold ()
{
pdf_setfont ( $this -> pdf , $this -> boldfont , $this -> currentFontSize );
}
function setFontNormal ()
{
pdf_setfont ( $this -> pdf , $this -> normalfont , $this -> currentFontSize );
}
2008-03-04 21:57:49 +00:00
function addText ( $text , $align = " left " , $xloc = 0 , $displayfont = " normalfont " )
2005-01-18 03:33:37 +00:00
{
$fontsize = pdf_get_value ( $this -> pdf , " fontsize " , 0 );
$lineheight = ceil ( $fontsize * 1.3 );
//the line height should be 1.2 * fontsize (approx)
2008-03-04 21:57:49 +00:00
$stringwidth = pdf_stringwidth ( $this -> pdf , $text , $this -> $displayfont , $fontsize );
2005-01-18 03:33:37 +00:00
$textstr = $text ;
2007-12-10 21:28:17 +00:00
if ( $xloc == 0 ) {
$xloc = $this -> page_margin ;
$content_width = $this -> content_width ;
} else {
$content_width = $this -> content_width - $xloc ;
}
2005-01-18 03:33:37 +00:00
$nr = 0 ;
2005-04-21 20:29:08 +00:00
$prevnr =- 1 ;
2005-01-18 03:33:37 +00:00
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 ;
}
2007-12-10 21:28:17 +00:00
if ( $nl == false ) $this -> yloc -= $lineheight / 72 ;
2005-05-04 21:23:00 +00:00
2007-12-10 21:28:17 +00:00
$nr = pdf_show_boxed ( $this -> pdf , $textstr , $this -> loc ( $xloc ), $this -> loc ( $this -> yloc ), $this -> loc ( $content_width ), $lineheight , $align , null );
2005-05-04 21:23:00 +00:00
if ( $this -> yloc < ( 0.9 + $lineheight / 72 ) )
$this -> newPage ();
2005-01-18 03:33:37 +00:00
if ( $nr == $prevnr )
{
2007-12-11 18:21:27 +00:00
//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";
2005-01-18 03:33:37 +00:00
break ;
}
$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);
2005-04-22 17:37:19 +00:00
}
2006-10-16 15:42:29 +00:00
function mailingLabel ( $to , $co , $address , $city , $province , $postalcode )
2006-09-11 18:05:35 +00:00
{
2006-10-16 15:42:29 +00:00
$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 ;
2006-09-11 18:05:35 +00:00
$fontsize = pdf_get_value ( $this -> pdf , " fontsize " , 0 );
2006-10-16 15:42:29 +00:00
$lineheight = ceil ( $fontsize * 1.2 );
//this is to make sure if the name of the school goes onto two lines we handle it properly
2007-09-27 14:08:46 +00:00
$l = $this -> addLabelText ( $tmpY , mb_strtoupper ( trim ( $to )));
2006-10-16 15:42:29 +00:00
$tmpY += ( $lineheight / 72 ) * $l ;
if ( $co )
{
2007-09-27 15:29:48 +00:00
$l = $this -> addLabelText ( $tmpY , trim ( mb_strtoupper ( $co )));
2006-10-16 15:42:29 +00:00
$tmpY += ( $lineheight / 72 ) * $l ;
}
if ( $address [ strlen ( $address ) - 1 ] == " . " ) $address = substr ( $address , 0 , - 1 );
2007-09-27 14:08:46 +00:00
$l = $this -> addLabelText ( $tmpY , mb_strtoupper ( trim ( $address )));
2006-10-16 15:42:29 +00:00
$tmpY += ( $lineheight / 72 ) * $l ;
if ( strlen ( $postalcode ) == 6 ) $pc = substr ( $postalcode , 0 , 3 ) . " " . substr ( $postalcode , 3 , 3 ); else $pc = $postalcode ;
2007-09-27 14:08:46 +00:00
$this -> addLabelText ( $tmpY , trim ( mb_strtoupper ( " $city $province $pc " )));
2006-10-16 15:42:29 +00:00
}
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";
2006-09-11 18:05:35 +00:00
$textstr = $text ;
$texty = $this -> label_current_ypos - $Y ;
$nr = 0 ;
$prevnr =- 1 ;
2006-10-16 15:42:29 +00:00
$numlines = 0 ;
2006-09-11 18:05:35 +00:00
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 );
2006-10-16 15:42:29 +00:00
$texty -= $linemove / 72 ;
2006-09-11 18:05:35 +00:00
$nl = true ;
}
if ( ! $nl )
2006-10-16 15:42:29 +00:00
$texty -= $linemove / 72 ;
2006-09-11 18:05:35 +00:00
2006-10-16 15:42:29 +00:00
$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 )
2006-09-11 18:05:35 +00:00
{
2006-10-16 15:42:29 +00:00
$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 ++ ;
2006-09-11 18:05:35 +00:00
}
$prevnr = $nr ;
} while ( $nr > 0 );
2006-10-16 15:42:29 +00:00
return $numlines ;
2006-09-11 18:05:35 +00:00
}
2007-03-19 06:56:38 +00:00
function addLabelText2 ( $xp , $yp , $wp , $hp , $lh , $text , $options )
2007-03-18 05:02:14 +00:00
{
2007-03-19 06:56:38 +00:00
// print("$xp,$yp,$wp,$hp,$lh,$text,$options,$this->label_width");
2007-03-18 05:02:14 +00:00
/* 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 */
2007-03-19 06:56:38 +00:00
2007-03-18 05:02:14 +00:00
if ( $xp == 'center' ) {
2007-03-19 06:56:38 +00:00
if ( $wp == 0 ) $wp = 100 ;
$xp = 50 - ( $wp / 2 );
2007-03-18 05:02:14 +00:00
}
if ( $yp == 'center' ) {
2007-03-19 06:56:38 +00:00
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 )) {
2007-12-10 21:29:53 +00:00
$font = $this -> boldfont ;
2007-03-18 05:02:14 +00:00
} else {
2007-03-19 06:56:38 +00:00
$font = $this -> normalfont ;
2007-03-18 05:02:14 +00:00
}
2007-03-19 06:56:38 +00:00
$align = 'left' ;
2007-10-05 20:12:19 +00:00
$valign = 'top' ;
$boxtext = false ;
2007-03-19 06:56:38 +00:00
if ( in_array ( 'left' , $options )) $align = 'left' ;
if ( in_array ( 'right' , $options )) $align = 'right' ;
if ( in_array ( 'center' , $options )) $align = 'center' ;
2007-10-05 20:12:19 +00:00
if ( in_array ( 'vtop' , $options )) $valign = 'top' ;
if ( in_array ( 'vcenter' , $options )) $valign = 'center' ;
if ( in_array ( 'vbottom' , $options )) $valign = 'bottom' ;
2008-03-20 20:07:13 +00:00
if ( in_array ( 'field_box' , $options )) $boxtext = true ;
2007-10-05 20:12:19 +00:00
2007-03-19 06:56:38 +00:00
/* 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 );
2007-10-05 20:12:19 +00:00
2007-03-19 06:56:38 +00:00
pdf_setfont ( $this -> pdf , $font , $fontpt );
2007-10-05 20:12:19 +00:00
// 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 ;
2007-03-19 06:56:38 +00:00
$nr = pdf_show_boxed ( $this -> pdf , $text ,
2007-10-05 20:12:19 +00:00
$this -> loc ( $x ), $this -> loc ( $y ),
$this -> loc ( $desired_width ), $this -> loc ( $desired_line_height ),
$align , 'blind' );
2007-12-11 18:21:27 +00:00
$prevnr = $nr ;
2007-10-05 20:12:19 +00:00
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 ++ ;
2007-12-11 18:21:27 +00:00
if ( $nr == $prevnr ) break ;
$prevnr = $nr ;
2007-10-05 20:12:19 +00:00
}
/* 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 ),
2007-03-19 06:56:38 +00:00
$align , null );
2007-12-11 18:21:27 +00:00
$prevnr = $nr ;
2007-10-05 20:12:19 +00:00
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 );
2007-12-11 18:21:27 +00:00
if ( $nr == $prevnr ) break ;
$prevnr = $nr ;
2007-10-05 20:12:19 +00:00
}
2007-03-18 05:02:14 +00:00
}
2008-01-23 18:32:31 +00:00
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 );
}
2007-03-19 06:56:38 +00:00
function newLabel ( $show_box = false , $show_fairname = false , $show_logo = false )
2006-09-11 18:05:35 +00:00
{
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 ++ ;
}
2006-09-12 18:03:46 +00:00
$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 ));
2006-09-11 18:05:35 +00:00
2007-03-19 06:56:38 +00:00
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;
2006-09-11 18:05:35 +00:00
//only put the logo on the label if we actually have the logo
2007-03-19 06:56:38 +00:00
if ( $show_logo == true && $this -> logoimage )
2006-09-11 18:05:35 +00:00
{
2007-12-22 03:31:02 +00:00
/* 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 ,
2006-09-11 18:05:35 +00:00
$this -> loc ( $this -> label_current_xpos + 0.05 ),
2007-12-22 03:31:02 +00:00
$this -> loc ( $this -> label_current_ypos - 0.75 ),
" boxsize { $w $w } position { 50 50} fitmethod meet " ) ;
2006-09-11 18:05:35 +00:00
}
2007-03-19 06:56:38 +00:00
$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' ];
2007-03-20 06:27:04 +00:00
pdf_setfont ( $this -> pdf , $this -> headerfont , 13 );
2007-03-19 06:56:38 +00:00
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 );
}
2005-01-18 03:33:37 +00:00
}
function addTextX ( $text , $xpos )
{
2007-03-04 16:26:04 +00:00
$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 ();
2005-01-18 03:33:37 +00:00
pdf_show_xy ( $this -> pdf , $text , $this -> loc ( $xpos ), $this -> loc ( $this -> yloc ));
}
2008-03-24 18:45:51 +00:00
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 );
}
2005-01-18 03:33:37 +00:00
function nextLine ()
{
2007-03-04 16:26:04 +00:00
$fontsize = pdf_get_value ( $this -> pdf , " fontsize " , 0 );
$lineheight = ceil ( $fontsize * 1.2 );
2005-01-18 03:33:37 +00:00
$this -> yloc -= $this -> currentFontSize * 1.4 / 72 ;
2007-03-04 16:26:04 +00:00
//new page check can come after the nextline call
if ( $this -> yloc < ( 0.9 + $lineheight / 72 ) )
$this -> newPage ();
2005-01-18 03:33:37 +00:00
}
2009-09-25 19:13:29 +00:00
function prevLine ()
{
$fontsize = pdf_get_value ( $this -> pdf , " fontsize " , 0 );
$lineheight = ceil ( $fontsize * 1.2 );
$this -> yloc += $this -> currentFontSize * 1.4 / 72 ;
}
2005-01-18 03:33:37 +00:00
function hr ()
{
2007-03-04 16:26:04 +00:00
$fontsize = pdf_get_value ( $this -> pdf , " fontsize " , 0 );
$lineheight = ceil ( $fontsize * 1.2 );
2005-04-22 14:04:47 +00:00
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 ));
2005-01-18 03:33:37 +00:00
pdf_stroke ( $this -> pdf );
$this -> yloc -= 0.25 ;
2007-03-04 16:26:04 +00:00
//again we do it after the nextline call
if ( $this -> yloc < ( 0.9 + $lineheight / 72 ) )
$this -> newPage ();
2005-01-18 03:33:37 +00:00
}
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 )
{
2005-04-15 16:44:26 +00:00
//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 ) )
2005-05-04 21:23:00 +00:00
$this -> newPage ();
2005-04-15 16:44:26 +00:00
2010-03-23 16:42:59 +00:00
pdf_setfont ( $this -> pdf , $this -> headerfont , round ( $this -> defaultFontSize * 1.2 ));
2008-03-04 21:57:49 +00:00
$this -> addText ( $text , " left " , 0 , " headerfont " );
2005-01-18 03:33:37 +00:00
pdf_setfont ( $this -> pdf , $this -> normalfont , $this -> currentFontSize );
2005-01-18 17:45:26 +00:00
//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 ;
2005-04-15 16:44:26 +00:00
2005-01-18 03:33:37 +00:00
}
2008-01-26 20:41:33 +00:00
function addTableStart ( & $table , $xpos_of_table , $table_width )
2005-01-13 22:00:34 +00:00
{
2008-01-26 20:41:33 +00:00
if ( is_array ( $table [ 'header' ])) {
2005-12-08 18:01:30 +00:00
$table_cols = count ( $table [ 'header' ]);
2010-03-23 16:42:59 +00:00
$height_header = round ( round ( $this -> defaultFontSize * 1.2 ) / 50 , 2 );
2008-01-26 20:41:33 +00:00
} else {
2005-12-08 18:01:30 +00:00
$table_cols = count ( $table [ 'data' ]);
2008-01-26 20:41:33 +00:00
$height_header = 0 ;
2005-12-08 18:01:30 +00:00
}
2005-01-13 22:00:34 +00:00
2008-01-26 20:41:33 +00:00
$this -> yloc -= $height_header ;
2005-01-13 22:00:34 +00:00
$top_of_table = $this -> yloc ;
2008-01-26 20:41:33 +00:00
//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 );
2005-01-13 22:00:34 +00:00
//do the header first
2005-12-08 18:01:30 +00:00
if ( is_array ( $table [ 'header' ]))
2005-01-13 22:00:34 +00:00
{
2005-12-08 18:01:30 +00:00
//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 );
2005-01-13 22:00:34 +00:00
$xpos = $xpos_of_table ;
2010-03-23 16:42:59 +00:00
pdf_setfont ( $this -> pdf , $this -> headerfont , round ( $this -> defaultFontSize * 1.2 ));
2005-01-13 22:00:34 +00:00
for ( $c = 0 ; $c < $table_cols ; $c ++ )
{
$head = $table [ 'header' ][ $c ];
$width = $table [ 'widths' ][ $c ];
2008-01-26 20:41:33 +00:00
pdf_show_boxed ( $this -> pdf , $head , $this -> loc ( $xpos ), $this -> loc ( $this -> yloc ), $this -> loc ( $width ), $this -> loc ( $height_header ), " center " , null );
2005-01-13 22:00:34 +00:00
$xpos += $width ;
}
2010-03-23 16:42:59 +00:00
pdf_setfont ( $this -> pdf , $this -> normalfont , $this -> defaultFontSize );
2008-01-26 20:41:33 +00:00
}
return $top_of_table ;
}
function addTableEnd ( & $table , $xpos_of_table , $top_of_table )
{
if ( is_array ( $table [ 'header' ])) {
$table_cols = count ( $table [ 'header' ]);
2010-03-23 16:42:59 +00:00
$height_header = round ( round ( $this -> defaultFontSize * 1.2 ) / 50 , 2 );
2008-01-26 20:41:33 +00:00
} 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 ;
2005-01-13 22:00:34 +00:00
2008-01-26 20:41:33 +00:00
if ( is_array ( $table [ 'header' ])) {
$table_cols = count ( $table [ 'header' ]);
} else {
$table_cols = count ( $table [ 'data' ]);
}
2010-03-23 16:42:59 +00:00
$line_height = round ( round ( $this -> defaultFontSize ) / 64 , 2 );
2008-01-26 20:41:33 +00:00
$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 ;
2005-01-13 22:00:34 +00:00
}
2008-01-26 20:41:33 +00:00
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 );
2005-01-13 22:00:34 +00:00
//now do the data in the table
if ( $table [ 'data' ])
{
2010-03-23 16:42:59 +00:00
pdf_setfont ( $this -> pdf , $this -> normalfont , $this -> defaultFontSize );
2005-01-13 22:00:34 +00:00
foreach ( $table [ 'data' ] AS $dataline )
{
2008-01-26 20:41:33 +00:00
// $this->yloc-=$line_height;
2005-01-13 22:00:34 +00:00
$xpos = $xpos_of_table ;
2008-01-26 20:41:33 +00:00
/* Fit first */
$col_width = array ();
$col_height = 1 ;
2005-01-13 22:00:34 +00:00
for ( $c = 0 ; $c < $table_cols ; $c ++ )
{
$width = $table [ 'widths' ][ $c ];
2007-12-20 00:56:57 +00:00
$textstr = trim ( $dataline [ $c ]);
$try = 0 ;
2008-01-26 20:41:33 +00:00
$h = $col_height ;
2007-12-20 00:56:57 +00:00
$last_notfit = 0 ;
2008-01-26 20:41:33 +00:00
2007-12-20 00:56:57 +00:00
while ( 1 ) {
// echo "h=$h, width=$width, text=[$textstr]\n";
$notfit = pdf_show_boxed ( $this -> pdf , $textstr ,
2008-01-26 20:41:33 +00:00
$this -> loc ( $xpos + $table_padding ), $this -> loc ( $this -> yloc - ( $h ) * $line_height ),
$this -> loc ( $width - 2 * $table_padding ), $this -> loc ( $line_height * $h ),
2007-12-20 00:56:57 +00:00
$table [ 'dataalign' ][ $c ], 'blind' );
// echo " nofit=$notfit\n";
/* 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 ;
/* Increase the height and try again */
2007-05-09 17:18:01 +00:00
$h ++ ;
2007-12-20 00:56:57 +00:00
}
2008-01-26 20:41:33 +00:00
$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 ]);
2007-12-20 00:56:57 +00:00
2008-01-30 07:54:13 +00:00
$notfit = pdf_show_boxed ( $this -> pdf , $textstr ,
2008-01-26 20:41:33 +00:00
$this -> loc ( $xpos + $table_padding ), $this -> loc ( $this -> yloc - $h ),
$this -> loc ( $width - 2 * $table_padding ), $this -> loc ( $h ),
2007-12-20 00:56:57 +00:00
$table [ 'dataalign' ][ $c ], null );
2007-05-09 17:18:01 +00:00
2005-12-08 18:01:30 +00:00
//put a little "..." at the end of the field
if ( $notfit )
{
pdf_setfont ( $this -> pdf , $this -> normalfont , 8 );
2008-01-30 07:54:13 +00:00
pdf_show_boxed ( $this -> pdf , " ... " ,
$this -> loc ( $xpos + $width - 0.10 ), $this -> loc ( $this -> yloc - $line_height - 0.05 ),
$this -> loc ( 0.10 ), $this -> loc ( $line_height ),
$table [ 'dataalign' ][ $c ], null );
2010-03-23 16:42:59 +00:00
pdf_setfont ( $this -> pdf , $this -> normalfont , $this -> defaultFontSize );
2005-12-08 18:01:30 +00:00
}
2005-01-13 22:00:34 +00:00
$xpos += $width ;
}
2008-01-26 20:41:33 +00:00
$this -> yloc -= $line_height * $col_height ;
2005-01-13 22:00:34 +00:00
//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 );
2005-04-15 16:44:26 +00:00
if ( $this -> yloc < 1.1 )
2005-01-14 17:00:24 +00:00
{
2008-01-26 20:41:33 +00:00
$this -> addTableEnd ( $table , $xpos_of_table , $top_of_table );
2005-04-22 14:04:47 +00:00
$this -> newPage ( $this -> page_width , $this -> page_height );
2008-01-26 20:41:33 +00:00
$top_of_table = $this -> addTableStart ( $table , $xpos_of_table , $table_width );
2005-01-14 17:00:24 +00:00
}
2005-01-13 22:00:34 +00:00
}
}
2008-01-26 20:41:33 +00:00
/* Finish the table */
$this -> addTableEnd ( $table , $xpos_of_table , $top_of_table );
2005-01-13 22:00:34 +00:00
2007-03-18 05:02:14 +00:00
// print the total in th etable at the bottom of the table
2007-12-30 22:16:34 +00:00
if ( $table [ 'total' ] != 0 ) {
$this -> addText ( " (Total: { $table [ 'total' ] } ) " , 'right' );
} else {
$t = count ( $table [ 'data' ]);
$this -> addText ( " (Rows: $t ) " , 'right' );
}
2007-03-18 05:02:14 +00:00
2005-01-13 22:00:34 +00:00
}
2007-04-03 20:09:19 +00:00
//page styles: "normal" "empty" "labels"
2005-04-22 17:37:19 +00:00
function setPageStyle ( $style = " normal " )
{
$this -> page_style = $style ;
}
2007-10-09 17:42:00 +00:00
function setLabelDimensions ( $width , $height , $xspacer = 0.125 , $yspacer = 0.125 , $fontsize = 10 , $toppadding = 0 )
2006-09-11 18:05:35 +00:00
{
$this -> label_width = $width ;
$this -> label_height = $height ;
2006-09-12 18:03:46 +00:00
$this -> label_xspacer = $xspacer ;
$this -> label_yspacer = $yspacer ;
2007-10-09 17:42:00 +00:00
$this -> label_toppadding = $toppadding ;
2006-09-11 18:05:35 +00:00
2006-10-16 15:42:29 +00:00
$this -> labels_per_row = floor ( $this -> page_width / ( $width + $xspacer ));
2009-11-30 18:46:48 +00:00
$this -> labels_per_column = floor (( $this -> page_height - $toppadding * 2 ) / ( $height + $yspacer ));
2006-09-11 18:05:35 +00:00
$this -> labels_per_page = $this -> labels_per_row * $this -> labels_per_column ;
2006-09-12 18:03:46 +00:00
$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 ;
2006-10-16 15:42:29 +00:00
$this -> setFontSize ( $fontsize );
2006-09-11 18:05:35 +00:00
}
2005-01-13 22:00:34 +00:00
2009-09-25 19:13:29 +00:00
function outputArray ()
2005-01-13 22:00:34 +00:00
{
2009-09-25 19:13:29 +00:00
$ret = array ();
2005-01-13 22:00:34 +00:00
pdf_end_page ( $this -> pdf );
2005-01-21 17:01:43 +00:00
//only close the image if it was opened to begin with
if ( $this -> logoimage )
pdf_close_image ( $this -> pdf , $this -> logoimage );
2005-01-13 22:00:34 +00:00
pdf_close ( $this -> pdf );
2009-09-25 19:13:29 +00:00
$ret [ 'data' ] = pdf_get_buffer ( $this -> pdf );
2005-04-22 19:33:56 +00:00
$filename = strtolower ( $this -> page_subheader );
$filename = ereg_replace ( " [^a-z0-9] " , " _ " , $filename );
2009-09-25 19:13:29 +00:00
$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 ;
2005-01-13 22:00:34 +00:00
}
2009-09-25 19:13:29 +00:00
function output ()
{
$data = $this -> outputArray ();
foreach ( $data [ 'header' ] as $h ) header ( $h );
echo $data [ 'data' ];
}
2005-01-14 20:42:03 +00:00
function lpdf ( $header , $subheader , $logo )
2005-01-13 22:00:34 +00:00
{
$this -> pdf = pdf_new ();
pdf_open_file ( $this -> pdf , null );
2005-04-22 14:09:13 +00:00
//calculate this now, becauasae aparently we cant calculated up top in the class definition
$this -> content_width = $this -> page_width - ( $this -> page_margin * 2 );
2005-01-13 22:00:34 +00:00
//open up the first page
//Letter size (8.5 x 11) is 612,792
2005-01-13 23:59:22 +00:00
// pdf_begin_page($this->pdf,612,792);
2005-01-13 22:00:34 +00:00
// 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 );
2007-12-10 21:28:17 +00:00
$this -> boldfont = pdf_findfont ( $this -> pdf , " Times-Bold " , " host " , 0 );
2005-01-13 22:00:34 +00:00
$this -> headerfont = pdf_findfont ( $this -> pdf , " Times-Bold " , " host " , 0 );
2005-01-21 17:00:28 +00:00
if ( file_exists ( $logo ))
$this -> logoimage = pdf_open_image_file ( $this -> pdf , " gif " , $logo , " " , 0 );
2005-01-14 20:42:03 +00:00
2005-01-13 22:00:34 +00:00
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 ;
2005-01-13 23:59:22 +00:00
$this -> pagenumber = 0 ;
2005-01-13 22:00:34 +00:00
2005-01-18 17:45:26 +00:00
2005-01-13 22:00:34 +00:00
//add the stuff to the first page
2005-01-13 23:59:22 +00:00
// $this->addHeaderAndFooterToPage();
2005-01-13 22:00:34 +00:00
}
}
2005-04-22 17:37:19 +00:00
?>