Brian Manning / PDFlib demo

Download as
Browse Code »

Commit c04bc7f0bcbd0e5f67c35b76ff64348094649c4e

Authored by Geographic Data Center
1 parent 913794bed7

table_demo: fix font search paths 

- Set a flag in PDFlib that causes it to save font info to a file, so it can be
  examined after the script has been run

Showing 1 changed file with 5 additions and 2 deletions Inline Diff

table_demo View file @ c04bc7f
#!/usr/bin/env php 1 1 #!/usr/bin/env php
2 2
<?php 3 3 <?php
/** 4 4 /**
* FILENAME: 5 5 * FILENAME:
* pdflib_demo 6 6 * pdflib_demo
* 7 7 *
* DESCRIPTION: 8 8 * DESCRIPTION:
* Demonstration of the pdflib PHP Library for generating PDF files 9 9 * Demonstration of the pdflib PHP Library for generating PDF files
* 10 10 *
*/ 11 11 */
12 12
/** 13 13 /**
Links: 14 14 Links:
- https://www.pdflib.com/developer/technical-documentation/manuals/ 15 15 - https://www.pdflib.com/developer/technical-documentation/manuals/
- https://www.pdflib.com/pdflib-cookbook/browse-all-topics/ 16 16 - https://www.pdflib.com/pdflib-cookbook/browse-all-topics/
- https://www.pdflib.com/pdflib-cookbook/tables/starter-table/ 17 17 - https://www.pdflib.com/pdflib-cookbook/tables/starter-table/
- https://www.pdflib.com/pdflib-cookbook/tables/vertical-text-alignment/ 18 18 - https://www.pdflib.com/pdflib-cookbook/tables/vertical-text-alignment/
- https://www.pdflib.com/pdflib-cookbook/general-programming/starter-basic/php-general-progamming-issues/ 19 19 - https://www.pdflib.com/pdflib-cookbook/general-programming/starter-basic/php-general-progamming-issues/
20 20
*/ 21 21 */
22 22
// set a default timezone 23 23 // set a default timezone
date_default_timezone_set("America/Los_Angeles"); 24 24 date_default_timezone_set("America/Los_Angeles");
25 25
//require_once('tcpdf_include.php'); 26 26 //require_once('tcpdf_include.php');
$outfile = __DIR__ . '/pdflib_table_output.pdf'; 27 27 $outfile = __DIR__ . '/pdflib_table_output.pdf';
28 28
// page placement defaults 29 29 // page placement defaults
$pageTopYPortrait = 750; 30 30 $pageTopYPortrait = 750;
$pageTopYLandscape = 570; 31 31 $pageTopYLandscape = 570;
32 32
// table params 33 33 // table params
$tbl = 0; 34 34 $tbl = 0;
$rowmax = 50; 35 35 $rowmax = 50;
$colmax = 5; 36 36 $colmax = 5;
$llx= 50; $lly=50; $urx=550; $ury=800; 37 37 $llx= 50; $lly=50; $urx=550; $ury=800;
38 38
// wrap PDFlib usage in a try{} block 39 39 // wrap PDFlib usage in a try{} block
try { 40 40 try {
$pdf = new PDFlib(); 41 41 $pdf = new PDFlib();
42 42
// set up some PDFlib options 43 43 // set up some PDFlib options
$pdf->set_option("errorpolicy=return"); 44 44 $pdf->set_option("errorpolicy=return");
$pdf->set_option("stringformat=utf8"); 45 45 $pdf->set_option("stringformat=utf8");
// set up the license key; Linux x86_64 46 46 // set up the license key; Linux x86_64
$pdf->set_option("license=L900202-010053-139026-P52782-GB5G52"); 47 47 $pdf->set_option("license=L900202-010053-139026-P52782-GB5G52");
48 48
// all paths in 'searchpath' need to be inside curly braces 49 49 // all paths in 'searchpath' need to be inside curly braces
// multiple curly-braced paths in $searchpath need to be separated with 50 50 // multiple curly-braced paths in $searchpath need to be separated with
// space characters 51 51 // space characters
$searchpath = '{/usr/share/fonts/dejavu/}{' . __DIR__ . '/fonts}'; 52 52 $searchpath = '{/usr/share/fonts/gnu-free/} {' . __DIR__ . '/fonts}';
$pdf->set_option("searchpath={" . $searchpath . "}"); 53 53 #print "Font search path: $searchpath\n";
54 $pdf->set_option("SearchPath={" . $searchpath . "}");
55 $pdf->set_option("enumeratefonts saveresources={filename="
56 . __DIR__ . "/fonts.upr}");
54 57
if ($pdf->begin_document($outfile, "") == 0) 55 58 if ($pdf->begin_document($outfile, "") == 0)
throw new Exception("Error: " . $pdf->get_errmsg()); 56 59 throw new Exception("Error: " . $pdf->get_errmsg());
57 60
// set up the document metadata info 58 61 // set up the document metadata info
$pdf->set_info('Creator', 'IODP Science Support Office'); 59 62 $pdf->set_info('Creator', 'IODP Science Support Office');
$pdf->set_info('Author', 'IODP Science Support Office'); 60 63 $pdf->set_info('Author', 'IODP Science Support Office');
$pdf->set_info('Title', 'Demo of TCPDF for generating IODP Proposals'); 61 64 $pdf->set_info('Title', 'Demo of TCPDF for generating IODP Proposals');
$pdf->set_info('Subject', 'IODP Proposals'); 62 65 $pdf->set_info('Subject', 'IODP Proposals');
$pdf->set_info('Keywords', 'IODP proposal ocean drilling core expedition'); 63 66 $pdf->set_info('Keywords', 'IODP proposal ocean drilling core expedition');
64 67
$textOpts = "fontname={FreeSans} embedding fontsize=20 " 65 68 $textOpts = "fontname={FreeSans} embedding fontsize=20 "
. "encoding=unicode "; 66 69 . "encoding=unicode ";
67 70
// START PAGE 1 68 71 // START PAGE 1
$pdf->begin_page_ext(0, 0, 'width=letter.width height=letter.height'); 69 72 $pdf->begin_page_ext(0, 0, 'width=letter.width height=letter.height');
70 73
// create bookmarks first thing 71 74 // create bookmarks first thing
$action = $pdf->create_action("GoTo", "destination={page=1}"); 72 75 $action = $pdf->create_action("GoTo", "destination={page=1}");
$pdf->create_bookmark("Page 1", " action={activate= " . $action . "}"); 73 76 $pdf->create_bookmark("Page 1", " action={activate= " . $action . "}");
74 77
// action 75 78 // action
$action = $pdf->create_action("GoTo", "destination={page=2}"); 76 79 $action = $pdf->create_action("GoTo", "destination={page=2}");
// bookmark 77 80 // bookmark
$pdf->create_bookmark("Page 2", " action={activate= " . $action . "}"); 78 81 $pdf->create_bookmark("Page 2", " action={activate= " . $action . "}");
79 82
// text/image 80 83 // text/image
$pdf->fit_textline("Jump to SSF for SHACK-10A", 20, 750, 81 84 $pdf->fit_textline("Jump to SSF for SHACK-10A", 20, 750,
$textOpts . " underline=true matchbox={name=to_second_page}"); 82 85 $textOpts . " underline=true matchbox={name=to_second_page}");
// annotation; reuse the "page 2" action above 83 86 // annotation; reuse the "page 2" action above
$optlist = "action={activate " . $action . "} linewidth=0 " . 84 87 $optlist = "action={activate " . $action . "} linewidth=0 " .
"usematchbox={to_second_page}"; 85 88 "usematchbox={to_second_page}";
$pdf->create_annotation(0, 0, 0, 0, "Link", $optlist); 86 89 $pdf->create_annotation(0, 0, 0, 0, "Link", $optlist);
87 90
// the rest of the text on page 1 88 91 // the rest of the text on page 1
$pdf->fit_textline("This is some text on the first page; ", 20, 720, 89 92 $pdf->fit_textline("This is some text on the first page; ", 20, 720,
$textOpts); 90 93 $textOpts);
$pdf->fit_textline("Привет! Этот немного текста.", 20, 690, $textOpts); 91 94 $pdf->fit_textline("Привет! Этот немного текста.", 20, 690, $textOpts);
92 95
// END PAGE 1 93 96 // END PAGE 1
$pdf->end_page_ext(''); 94 97 $pdf->end_page_ext('');
95 98
// START PAGE 2 96 99 // START PAGE 2
//$pdf->begin_page_ext(612, 792, ''); 97 100 //$pdf->begin_page_ext(612, 792, '');
$ssfPDF = $pdf->open_pdi_document(__DIR__ . "/site_summary_figure.pdf", ''); 98 101 $ssfPDF = $pdf->open_pdi_document(__DIR__ . "/site_summary_figure.pdf", '');
if ($ssfPDF == 0) 99 102 if ($ssfPDF == 0)
throw new Exception("Error: " . $p->get_errmsg()); 100 103 throw new Exception("Error: " . $p->get_errmsg());
101 104
$ssfPage = $pdf->open_pdi_page($ssfPDF, 1, ''); 102 105 $ssfPage = $pdf->open_pdi_page($ssfPDF, 1, '');
$ssfWidth = $pdf->pcos_get_number($ssfPDF, "pages[0]/width"); 103 106 $ssfWidth = $pdf->pcos_get_number($ssfPDF, "pages[0]/width");
$ssfHeight = $pdf->pcos_get_number($ssfPDF, "pages[0]/height"); 104 107 $ssfHeight = $pdf->pcos_get_number($ssfPDF, "pages[0]/height");
//print "Page width/height: $ssfWidth x $ssfHeight\n"; 105 108 //print "Page width/height: $ssfWidth x $ssfHeight\n";
106 109
$pdf->begin_page_ext($ssfWidth, $ssfHeight, ''); 107 110 $pdf->begin_page_ext($ssfWidth, $ssfHeight, '');
108 111
$pdf->fit_pdi_page($ssfPage, 0, 0, ''); 109 112 $pdf->fit_pdi_page($ssfPage, 0, 0, '');
$pdf->close_pdi_page($ssfPage); 110 113 $pdf->close_pdi_page($ssfPage);
$pdf->close_pdi_document($ssfPDF); 111 114 $pdf->close_pdi_document($ssfPDF);
112 115
// write some text on to the page 113 116 // write some text on to the page
// for landscape mode... 114 117 // for landscape mode...
//$pdf->fit_textline("Back to Top", 20, 570, 115 118 //$pdf->fit_textline("Back to Top", 20, 570,
//$linkOpts = linkAttribs(1, 750); 116 119 //$linkOpts = linkAttribs(1, 750);
$action = $pdf->create_action("GoTo", "destination={page=1}"); 117 120 $action = $pdf->create_action("GoTo", "destination={page=1}");
$pdf->fit_textline("Back to Top", 20, $ssfHeight - 30, 118 121 $pdf->fit_textline("Back to Top", 20, $ssfHeight - 30,
$textOpts . " underline=true matchbox={name=to_first_page}"); 119 122 $textOpts . " underline=true matchbox={name=to_first_page}");
120 123
// call create_annotation here 121 124 // call create_annotation here
$optlist = "action={activate " . $action . "} linewidth=0 " . 122 125 $optlist = "action={activate " . $action . "} linewidth=0 " .
"usematchbox={to_first_page}"; 123 126 "usematchbox={to_first_page}";
$pdf->create_annotation(0, 0, 0, 0, "Link", $optlist); 124 127 $pdf->create_annotation(0, 0, 0, 0, "Link", $optlist);
125 128
// END PAGE 2 126 129 // END PAGE 2
$pdf->end_page_ext(''); 127 130 $pdf->end_page_ext('');
128 131
// SET UP THE TABLE 129 132 // SET UP THE TABLE
$font = $pdf->load_font("FreeSans", "unicode", ""); 130 133 $font = $pdf->load_font("FreeSans", "unicode", "");
for ($row = 1; $row <= $rowmax; $row++) { 131 134 for ($row = 1; $row <= $rowmax; $row++) {
for ($col = 1; $col <= $colmax; $col++) { 132 135 for ($col = 1; $col <= $colmax; $col++) {
$num = "Col " . $col . "/Row " . $row; 133 136 $num = "Col " . $col . "/Row " . $row;
$optlist = "colwidth=20% fittextline={font=" . $font . " fontsize=10}"; 134 137 $optlist = "colwidth=20% fittextline={font=" . $font . " fontsize=10}";
$tbl = $pdf->add_table_cell($tbl, $col, $row, $num, $optlist); 135 138 $tbl = $pdf->add_table_cell($tbl, $col, $row, $num, $optlist);
if ($tbl == 0) { 136 139 if ($tbl == 0) {
die("Error: " . $pdf->get_errmsg()); 137 140 die("Error: " . $pdf->get_errmsg());
} 138 141 }
} 139 142 }
} 140 143 }
141 144
// DRAW THE TABLE 142 145 // DRAW THE TABLE
do { 143 146 do {
$pdf->begin_page_ext(0, 0, "width=letter.width height=letter.height"); 144 147 $pdf->begin_page_ext(0, 0, "width=letter.width height=letter.height");
145 148
/* Shade every other $row; draw lines for all table cells. 146 149 /* Shade every other $row; draw lines for all table cells.
* Add "showcells showborder" to visualize cell borders 147 150 * Add "showcells showborder" to visualize cell borders
*/ 148 151 */
$optlist = "header=1 rowheightdefault=auto " . 149 152 $optlist = "header=1 rowheightdefault=auto " .
"fill={{area=rowodd fillcolor={gray 0.9}}} " . 150 153 "fill={{area=rowodd fillcolor={gray 0.9}}} " .
"stroke={{line=other}} "; 151 154 "stroke={{line=other}} ";
152 155
/* Place the table instance */ 153 156 /* Place the table instance */
$result = $pdf->fit_table($tbl, $llx, $lly, $urx, $ury, $optlist); 154 157 $result = $pdf->fit_table($tbl, $llx, $lly, $urx, $ury, $optlist);
if ($result == "_error") { 155 158 if ($result == "_error") {
die("Couldn't place table: " . $p->get_errmsg()); 156 159 die("Couldn't place table: " . $p->get_errmsg());
} 157 160 }