PDFlib & PHP - (3) XML it!

Now I have page groups, so it is time to start bringing the data! :o)

Using PHP's SimpleXML I'll add multiple pages. Hmmm. Well, it seems I cannot paste the XML in a pre tag w/ or w/o prettyprint. So, I'm going to just load it in. The structure is like so: (bands(band(name,genre,favoriteSong))(band(name,genre,favoriteSong))) where bands is the singular parent tag with band children with three tagged attributes: name, genre, and favoriteSong.

I will not need the suspend/resume for this example as I will have the page total for the content group from the count of bands children, band.

#...xml has loaded into string (you will need to do this somehow)

$xml = new SimpleXMLElement($xmlstr);

try{

	# number reflect an A4 sized document.

	$doc_width = 595;

	$doc_height = 842;

	# create a new instance of PDFlib.

	$p = new PDFlib();

	$p->set_parameter("logging", "filename {PDFlib.log}");

	$p->set_parameter("errorpolicy", "exception");

	# set textformat

	$p->set_parameter("textformat", "utf8");

	# SPACES are important here, at end of concatenated lines.

	# all we really need for example to work are the groups and labels chunk.

	$optlist = "groups={title toc content index} ".

			"labels={{group=title prefix=title} ".

			"{group=toc prefix={toc } start=1 style=r} ".

			"{group=content start=1 style=D} ".

			"{group=index prefix={index } start=1 style=r} } ".

			"destination={ type=fixed zoom=.5 } " .

            "viewerpreferences={displaydoctitle=true direction=l2r} ".

			"openmode=thumbnails ".

			"pagelayout=twocolumnleft ";

	if ($p->begin_document("", $optlist) == 0) 

	   throw new Exception("Error@begin_document: " . $p->get_errmsg());

	# add some meta data on file

	$p->set_info("Creator", "Neil Lindberg");

    $p->set_info("Title", "SVM User Guide (2.1)");

	# loading font (that most will have)

	$font = $p->load_font("Helvetica", "unicode", "");

	$p->begin_page_ext($doc_width, $doc_height, "group=title");

	if ($p->setfont($font, 24) == 0) 

	   throw new Exception("Error@setfont: " . $p->get_errmsg());

	# add line of text, to center of page, approximately :)

	$message = "Bands XML Breakdown";

	$message_width = $p->stringwidth($message, $font, 24);

	$p->show_xy($message, ($doc_width*.5)-($message_width*.5), $doc_height*.5);

	#

	$p->end_page_ext("");

	# make page per band... suspend to later add page footer/num.

	$num_bands = count($xml->band);

	$count = 0;

	foreach($xml->band as $x){

		$count++;

		$p->begin_page_ext($doc_width, $doc_height, "group=content");

		if ($p->setfont($font, 24) == 0) 

	   		throw new Exception("Error@setfont: " . $p->get_errmsg());

	   	# put name of band in upper left-aligned corner.

		$message = $x->name;

		$p->show_xy($message, 24, $doc_height-48);

		if ($p->setfont($font, 12) == 0) 

	   		throw new Exception("Error@setfont: " . $p->get_errmsg());

	   	# add band info in a rectangular container, align center.

	   	$band_info = "Genre: $x->genre\nFavorite song: $x->favoriteSong";

	   	# NOTE: using fillcolor rather than ->setcolor does

	   	#   not require setting back to black.

	   	$band_info_font = "font=$font fontsize=12 alignment=center".

	   			"fillcolor={spotname {PANTONE 281 U} 1}";

	   	$textflow = $p->create_textflow($band_info, $band_info_font);

	   	$p->fit_textflow($textflow, 50, 120, 550, 720, "");

	   	$message = "Page $count of $num_bands";

		$message_width = $p->stringwidth($message, $font, 12);

		# cause to right-align in bottom corner.

		$page_num_x = ($doc_width-$message_width)-24;

		$page_num_y = $doc_height-($doc_height-24);

	   	$p->show_xy($message, $page_num_x, $page_num_y);

		$p->end_page_ext("");

	}

	#

	$p->end_document("");

	# get and send buffer

	$buf = $p->get_buffer();

	$len = strlen($buf);

	header("Content-type: application/pdf");

	header("Content-Length: $len");

	header("Content-Disposition: inline; filename=blog_3.pdf");

	print $buf;

} catch (PDFlibException $e) {

	die("PDFlib exception occurred:\n".

	"[" . $e->get_errnum() . "] " . $e->get_apiname() .

	": " . $e->get_errmsg() . "\n");

} catch (Exception $e) {

	die($e->getMessage());

}