<?php
/*
 * Duplicate block:
 * Duplicate a PDFlib block to any number of pages
 * 
 * Import a PDF page containing a block and place it with fit_pdi_page() on
 * the first page of the output document. Fill the contained text block with the 
 * number of the current page.
 * On subsequent pages, place the imported PDF page with the "blind" option 
 * supplied so that the actual page contents will not be placed, but the block
 * can be filled nevertheless. Fill the text block with the number of the
 * respective page.
 * 
 * Required software: PPS 10
 * Required data: PDF document containing blocks
 */

/* This is where the data files are. Adjust as necessary. */
$searchpath = dirname(__FILE__,3)."/input";

/* By default annotations are also imported. In some cases this
 * requires the Noto fonts for creating annotation appearance streams.
 * We therefore set the searchpath to also point to the font directory.
 */
$fontpath = dirname(__FILE__,3)."/resource/font";
$outfile = "";
$title = "Duplicate Block";

$infile = "announcement_blocks.pdf";


/* Name of the block contained on the imported page */
$blockname = "page"; 
 
try {
    $p = new PDFlib();

    $p->set_option("searchpath={" . $searchpath . "}");

    $p->set_option("searchpath={" . $fontpath . "}");

    /* This means we must check return values of load_font() etc. */
    $p->set_option("errorpolicy=return");

    if ($p->begin_document($outfile, "") == 0)
        throw new Exception("Error: " . $p->get_errmsg());

    $p->set_info("Creator", "PDFlib Cookbook");
    $p->set_info("Title", $title);

    /* Open a PDF containing a block to store the page number */
    $indoc = $p->open_pdi_document($infile, "");
    if ($indoc == 0)
        throw new Exception("Error: " . $p->get_errmsg());
    
    /* Open the first page of the imported document */
    $inpage = $p->open_pdi_page($indoc, 1, "");
    if ($inpage == 0)
        throw new Exception("Error: " . $p->get_errmsg());
    
    /* Get the width and height of the imported page */
    $width = $p->pcos_get_number($indoc, "pages[0]/width");
    $height = $p->pcos_get_number($indoc, "pages[0]/height");
    
    /* Start the output page with the size given by the imported page */ 
    $p->begin_page_ext($width, $height, "");

    /* Place the imported page */
    $p->fit_pdi_page($inpage, 0, 0, "");
    
    /* Fill the text block with the number of the first page */
    $p->fill_textblock($inpage, $blockname, "1", "");
    
    /* Finish page */
    $p->end_page_ext("");
    
            
    /* -----------------------------------------------
     * Duplicate the block on several subsequent pages
     * -----------------------------------------------
     */
    for ($i = 2; $i <= 5; $i++)
    {
        /* Start the output page with the size given by the imported page */ 
        $p->begin_page_ext($width, $height, "");
        
        /* Place the imported page on the output page but supply the "blind"
         * option to suppress the actual page contents. The block is
         * available to be filled nevertheless.
         */
        $p->fit_pdi_page($inpage, 0, 0, "blind");
        
        /* Fill the text block with the number of the current page */
        $p->fill_textblock($inpage, $blockname, $i,
            "");
        
        /* Output some descriptive text */
        $optlist = "fontname=NotoSerif-Regular fontsize=16";
        $text = "Page " . $i . ": The page number is filled " .
            "in the block duplicated from page 1";
        
        $p->fit_textline($text, 30, 400, $optlist);
        
        /* Finish page */
        $p->end_page_ext("");
    }
           
    $p->close_pdi_page($inpage);

    $p->end_document("");
    $p->close_pdi_document($indoc);

    $buf = $p->get_buffer();
    $len = strlen($buf);

    header("Content-type: application/pdf");
    header("Content-Length: $len");
    header("Content-Disposition: inline; filename=duplicate_block.pdf");
    print $buf;

} catch (PDFlibException $e) {
    echo("PDFlib exception occurred:\n".
        "[" . $e->get_errnum() . "] " . $e->get_apiname() .
        ": " . $e->get_errmsg() . "\n");
    exit(1);
} catch (Throwable $e) {
    echo("PHP exception occurred: " . $e->getMessage() . "\n");
    exit(1);
}

$p = 0;

?>