<?

require_once('tcpdf_config.php');
require_once('tcpdf/tcpdf.php');

class pdf extends TCPDF
{

	/* Variables for labels */
	var $label_width, $label_height;
	var $label_xspacer, $label_yspacer;
	var $label_rows, $label_cols, $labels_per_page;
	var $label_page_lmargin, $label_page_tmargin;
	var $label_show_fair, $label_show_box, $label_show_logo;
	var $current_label_index;

	var $footer_string;

	function __construct($report_name = '', $format = 'LETTER', $orientation = 'P')
	{
		global $config;

		/* Start an output PDF */

		/* Orientation - Page orientation:
		    * P or Portrait (default)
		    * L or Landscape */
		//		$orientation = 'P';

		/* Units - User measure unit:
		/* We're going to do everything in mm and convert, even if we worked
		 * in pts (1/72 of an inch) we'd still need decimals */

		/* Format - Page size
			It can be either one of the following values (case insensitive) or 
			a custom format in the form of a two-element array containing the width and the height (expressed in the unit given by unit).
    * 4A0 * 2A0 * A0 * A1 * A2 * A3 * A4 (default) * A5 * A6 * A7 * A8 * A9 * A10 
    * B0 * B1 * B2 * B3 * B4 * B5 * B6 * B7 * B8 * B9 * B10
    * C0 * C1 * C2 * C3 * C4 * C5 * C6 * C7 * C8 * C9 * C10
    * RA0 * RA1 * RA2 * RA3 * RA4
    * SRA0 * SRA1 * SRA2 * SRA3 * SRA4
    * LETTER * LEGAL * EXECUTIVE * FOLIO 
    * array($width, $height) */
		//	$format = 'LETTER';

		/* Other args: true = turn on unicode, 
				set encoding to UTF-8,
				turn off temp-files-on-disk */
		parent::__construct($orientation, 'mm', $format, true, 'UTF-8', false);

		// set document information
		$this->SetCreator('SFIAB');
		$this->SetAuthor('SFIAB');
		$this->SetTitle(i18n($config['fairname']));
		$this->SetSubject($report_name);
		$this->SetKeywords('');

		/* Set default header data (K_PATH_IMAGES/logo-500.jpg, 16mm wide, header, name)
		 * PDFs use JPG internally, so we should feed it a jpeg, if we dont', tcpdf will
		 * convert it to a jpg anyway, and that takes FOREVER if there's lots of 
		 * pages/labels.*/
		$this->SetHeaderData(
			'logo-500.jpg',
			16 /* mm */,
			i18n($config['fairname']),
			i18n($report_name)
		);

		// set header and footer fonts
		$this->setHeaderFont(array('helvetica', '', 14));
		$this->setFooterFont(array('helvetica', '', 8));

		// set default monospaced font
		$this->SetDefaultMonospacedFont(PDF_FONT_MONOSPACED);

		//set margins
		$this->SetMargins(PDF_MARGIN_LEFT, PDF_MARGIN_TOP, PDF_MARGIN_RIGHT);
		$this->SetHeaderMargin(PDF_MARGIN_HEADER);
		$this->SetFooterMargin(PDF_MARGIN_FOOTER);

		//set auto page breaks
		$this->SetAutoPageBreak(TRUE, PDF_MARGIN_BOTTOM);
		$this->setPrintFooter(TRUE);

		//set image scale factor
		$this->setImageScale(PDF_IMAGE_SCALE_RATIO);

		$this->current_label_index = 1;
		$this->current_label_row = 0;
		$this->current_label_col = 0;

		$this->footer_string = date("Y-m-d h:ia") . ' - ' . $report_name;


		//set some language-dependent strings
		//$this->setLanguageArray($l); 
		//print_r($this->fontlist);

	}

	function _fitcell_lines($w, $h, $txt, $fontsize)
	{
		$index = 0;
		$lines  = array();

		/* Get an array of widths */
		$width = $this->getStringWidth($txt, '', '', $fontsize, true);
		$chars = $this->UTF8StringToArray($txt);
		$count = count($width); // strlen(utf8_decode($txt));

		$curr_width = $this->cMargin * 2;
		$last_space_index = -1;
		$start_index = 0;

		for ($index = 0; $index < $count; $index++) {
			$newline = false;
			$skip = false;

			/* Special chars */
			switch ($this->unichr($chars[$index])) {
				case ' ':
				case "\r":
				case "\t":
					$last_space_index = $index;
					break;

				case "\n":
					$newline = true;
					$skip = true;
					break;
			}

			/* Check for width overflow */
			if ($skip == true) {
				/* Do nothing with it */
			} else if ($curr_width + $width[$index] > $w) {
				/* Backup index, leave it pointing to
				 * the last char we print, so when we
				 * increment in the next iteration we
				 * get the next char (the one that just
				 * caused this overflow */
				$index--;
				$newline = true;
			} else {
				$curr_width += $width[$index];
			}

			if ($newline) {
				if ($last_space_index != -1) {
					/* Backup to the last space index, if there is one */
					$end_index = $last_space_index;
					$index = $last_space_index;
				} else {
					/* No, use the whole line then */
					$end_index = $index;
				}
				$lines[] = $this->UTF8ArrSubString($chars, $start_index, $end_index);
				/* Reset width, set start index */
				$curr_width = $this->cMargin * 2;
				$last_space_index = -1;
				$start_index = $index + 1;
			}
		}

		$lines[] = $this->UTF8ArrSubString($chars, $start_index, $index);
		return $lines;
	}
	/* Cell( float $w, [float $h = 0], [string $txt = ''], [mixed $border = 0],
		[int $ln = 0], [string $align = ''], [int $fill = 0], [mixed $link = ''], 
		[int $stretch = 0], [boolean $ignore_min_height = false]) */


	function FitCell($w, $h = 0, $txt = '', $border = 0, $ln = 0, $align = '', $valign = '', $on_overflow = 'scale')
	{
		$x = $this->getX();
		$y = $this->getY();
		$orig_fs = $this->getFontSizePt();
		$add_ellipses = false;

		$fontsize = $orig_fs;
		while (1) {
			$lines = $this->_fitcell_lines($w, $h, $txt, $fontsize);

			$cell_height = $this->cMargin * 2 + $this->FontSize;
			$label_h = $cell_height * count($lines);

			if ($label_h <= $h) {
				/* It fits! */
				break;
			}

			/* else, it doesn't fit */
			if ($on_overflow == 'scale') {
				/* reduce the font size and try again */
				$fontsize -= 0.5;
				$this->setFontSize($fontsize);
				continue;
			}

			/* If it doesn't fit, and we're not scaling, it must
			 * be a truncate.  Compute the number of lines that 
			 * can be displayed */
			$display_lines = floor($h / $cell_height);
			/* Adjust height */
			$label_h -= (count($lines) - $display_lines) * $cell_height;

			/* truncate */
			$lines = array_slice($lines, 0, $display_lines);

			if ($on_overflow == '...') $add_ellipses = true;
			break;
		}

		/* SetX, find Y based on alignment */
		switch ($valign) {
			case 'M': /* Middle */
				$this->SetXY($x, $y + ($h - $label_h) / 2);
				break;
			case 'B': /* Bottom */
				$this->SetXY($x, $y + ($h - $label_h));
				break;
			case 'T':
			default: /* Top */
				$this->SetXY($x, $y);
				break;
		}

		/* Fontsize will be correctly set here */
		/* Cell( float $w, [float $h = 0], [string $txt = ''], [mixed $border = 0],
			[int $ln = 0], [string $align = ''], [int $fill = 0], [mixed $link = ''], 
			[int $stretch = 0], [boolean $ignore_min_height = false]) */
		foreach ($lines as $l) {
			$this->Cell($w, 0, $l, 0, 2, $align, 0, 0, 0, false);
		}

		if ($add_ellipses) {
			/* Only use fontsize so the '...' is really close to the lower right. */
			$this->SetXY($x, $y + $h - $cell_height);
			$this->Cell($w, 0, '...', 0, 0, 'R');
		}

		/* Restore original location */
		$this->SetXY($x, $y);

		/* Restore original fontsize */
		$this->setFontSize($orig_fs);

		/* Deal with the border and ln, leaving x,y wherever $ln
		 * tells us to */
		$this->Cell($w, $h, '', $border, $ln, 'R');
	}

	function GetFontList()
	{
		if (!is_object($this)) {
			$pdf = new pdf();
			return $pdf->GetFontList();
		}
		$this->getFontsList();
		return $this->fontlist;
	}

	function Footer()
	{
		$ormargins = $this->getOriginalMargins();
		$pagenumtxt = i18n('Page') . ' ' . $this->getAliasNumPage() . ' / ' . $this->getAliasNbPages();

		$this->SetX($ormargins['left']);
		$this->Cell(0, 0, $pagenumtxt, 'T', 0, 'R');

		$this->SetX($ormargins['left']);
		$this->Cell(0, 0, $this->footer_string, 0, 0, 'C');
	}

	function setup_for_labels($show_box, $show_fair, $show_logo, $width, $height, $xspacer, $yspacer, $rows, $cols)
	{
		/* No headers and footers */
		$this->setPrintHeader(false);
		$this->setPrintFooter(false);

		/* No auto-pagebreaks */
		$this->SetAutoPageBreak(false);


		/* the page size/orientation is already set */
		$pw = $this->getPageWidth();
		$ph = $this->getPageHeight();

		$this->label_show_box = $show_box;
		$this->label_show_fair = $show_fair;
		$this->label_show_logo = $show_logo;

		$this->label_width = $width;
		$this->label_height = $height;
		$this->label_xspacer = $xspacer;
		$this->label_yspacer = $yspacer;

		$this->label_rows = $rows;
		$this->label_cols = $cols;
		$this->labels_per_page = $rows * $cols;

		/* labels are always centered in the page */

		$this->label_page_lmargin = ($pw - ($cols * $width) - ($xspacer * ($cols - 1))) / 2;
		$this->label_page_tmargin = ($ph - ($rows * $height) - ($yspacer * ($rows - 1))) / 2;

		/* Setup so that the first call to label_new also creates
		 * a new page */
		$this->current_label_index = $this->labels_per_page - 1;
	}

	function label_new()
	{
		/* Advance to new label */
		//		echo "cindex=$this->current_label_index, perpage=$this->labels_per_page\n";
		if ($this->current_label_index + 1 == $this->labels_per_page) {
			//			echo "addpage\n";
			$this->AddPage();
			$this->current_label_index = 0;
		} else {
			$this->current_label_index++;
		}

		/* Get row/col, and position of label */
		$r = floor($this->current_label_index / $this->label_cols);
		$c = floor($this->current_label_index % $this->label_cols);

		$lmargin = $this->label_page_lmargin + ($c * ($this->label_width + $this->label_xspacer));
		$tmargin = $this->label_page_tmargin + ($r * ($this->label_height + $this->label_yspacer));

		/* Move margins for this label */
		//		echo "r=$r, c=$c, cols=$this->label_cols\n";
		//		echo "Margins -> ($lmargin, $tmargin)\n";
		$this->SetMargins($lmargin, $tmargin, $lmargin + $this->label_width);

		if ($this->label_show_box)
			$this->label_rect(0, 0, $this->label_width, $this->label_height);

		if ($this->label_show_logo) {
		}

		if ($this->label_show_fair) {
		}
	}


	function output($filename = '', $dest = 'I')
	{
		if ($filename == '') {
			$filename = strtolower($this->subject);
			$filename = ereg_replace("[^a-z0-9]", "_", $filename) . '.pdf';
		}
		parent::Output($filename, $dest);
	}

	/* 	align = left, center, right
		valign = top, middle, bottom,
		fontname,
		fontstyle,
		fontsize,
		border = true/false
		on_overflow = truncate, ..., scale */
	function label_text(
		$x,
		$y,
		$w,
		$h,
		$text,
		$border,
		$align,
		$valign,
		$fontname,
		$fontstyle,
		$fontsize,
		$on_overflow
	) {
		$orig_name = $this->getFontFamily();
		$orig_style = $this->getFontStyle();
		$orig_size = $this->getFontSizePt();
		$orig_x = $this->GetX();
		$orig_y = $this->GetY();

		/* Do horiz/vert align */
		$align_data = array('left' => 'L', 'center' => 'C', 'right' => 'R');
		$valign_data = array('top' => 'T', 'middle' => 'M', 'bottom' => 'B');
		$align = $align_data[$align];
		$valign = $valign_data[$valign];

		/* Set position and font */
		$st = array('bold' => 'B', 'italic' => 'I', 'underline' => 'U', 'strikethrough' => 'D');
		$fs = '';
		if (is_array($fontstyle)) {
			foreach ($fontstyle as $s) $fs .= $st[$s];
		}

		if ($fontsize == 0) $fontsize = 10; /* FIXME: getdefaultfontsize? */

		$this->SetXY($this->lMargin + $x, $this->tMargin + $y);
		//		echo "position (x,y)=($x,$y)\n";
		//		echo "margin (l,t)=({$this->lMargin},{$this->tMargin})\n";
		//		echo "(x,y)=(".($this->lMargin + $x).",".($this->tMargin + $y).")\n";
		$this->SetFont($fontname, $fs, $fontsize);

		/* Print text */
		$this->FitCell(
			$w,
			$h,
			$text,
			$border ? 1 : 0,
			2,
			$align,
			$valign,
			$on_overflow
		);

		/* Restore position and font */
		$this->SetFont($orig_name, $orig_style, $orig_size);
		$this->SetXY($orig_x, $orig_y);
	}

	function label_rect($x, $y, $w, $h)
	{
		$this->Rect($this->lMargin + $x, $this->tMargin + $y, $w, $h);
	}

	function label_fair_logo($x, $y, $w, $h, $show_box)
	{
		global $config;
		$img_dir = $_SERVER['DOCUMENT_ROOT'] . $config['SFIABDIRECTORY'] . '/data';
		/* Scale image to proportinally fit in w x h */
		$this->Image(
			$img_dir . "/logo-500.png",
			$this->lMargin + $x,
			$this->tMargin + $y,
			$w,
			$h,
			'',
			'',
			'',
			true,
			300,
			'',
			false,
			false,
			$show_box ? 1 : 0,
			true
		);
	}

	function label_barcode($code, $type, $x = '', $y = '', $w = '', $h = '', $style = '', $align = '', $distort = false)
	{
		$this->write2DBarcode($code, $type, $this->lMargin + $x, $this->tMargin + $y, $w, $h, $style, $align, $distort);
		$this->label_text($x - 1, $y + $h + 1, 24, 8, "Get the iPhone app search Science Fair", 0, "center", "center", "", "normal", 8, "scale");
	}
}