<?php
/*
 *
 * 
 * PDF/A-1 のための透過スタンプ:
 * 既存の PDF/A-1 文書に PDF/A-1 標準を維持したまま透過スタンプを適用します。
 * 
 * 既存のPDF/A-1文書からすべてのページをインポートして、ページ上にスタンプを
 * 配置します。
 * スタンプは、ビットマップで構成されたパターン色で塗りつぶします。
 * ビットマップは、透過率を構成するためにマスクとして使用されます。
 * 透過は、PDF/ A-1では許可されていないため、この処理が必要とされています。
 * パターンの色による透過は、PDF/A-1に準拠しており、PDF/A-1文書標準に沿って、
 * PDF/A-1の文書上に透明のスタンプを適用するためにそれを使用します。
 * 
 * この処理は、PDF/ A-1にのみ必要であることに注意してください。
 * PDF/ A-2では透過が許可されています。
 * 
 * もしAcrobat（または、一定のズームレベルだけで見える）で透明なスタンプが見えなけ
 * れば、AcrobatXに次のように設定してください。
 * [編集] メニューから [環境設定] を選択します。画面左のリストから [ページ表示] を
 * 選択します。[レンダリング] セクションの [2D グラフィックスアクセラレーションを
 * 使用] からチェックをはずし、[画像のスムージング]にチェックを入れます。
 * 
 * PDFlib 9.0.2において、begin_pattern() は非推奨のため、新しい関数 begin_pattern_ext()
 * に置き換えが必要です。注意してください。
 * PDFlib 9.0.2 以上のバージョンを使う時は、警告を取り除くために、begin_pattern()を
 * begin_pattern_ext() に置き換えて呼び出してください
 * 
 * 必要な製品: PDFlib+PDI/PPS 9
 * 必要なデータ: PDF 文書
 */

/* 必要に応じてデータファイルがあるフォルダのパスを指定する */
$searchpath = dirname(__FILE__,3)."/input";
$outfile = "";
$title = "Transparent Stamp for PDF/A-1";

$pdffile = "PLOP-datasheet-PDFA-1b.pdf";

/* ハーフトーンビットマップのためのデータ */
$data = array(array( 
    0x00, 0x00,  /* 30% */
    0x00, 0x00,
    0x00, 0x00,
    0x03, 0xC0,
    0x07, 0xE0,
    0x0F, 0xF0,
    0x1F, 0xF8,
    0x1F, 0xF8,

    0x1F, 0xF8,
    0x1F, 0xF8,
    0x0F, 0xF0,
    0x07, 0xE0,
    0x03, 0xC0,
    0x00, 0x00,
    0x00, 0x00,
    0x00, 0x00,
),array(
    0x00, 0x00, /* 20% */
    0x00, 0x00,
    0x00, 0x00,
    0x00, 0x00,
    0x03, 0xC0,
    0x07, 0xE0,
    0x0F, 0xF0,
    0x0F, 0xF0,

    0x0F, 0xF0,
    0x0F, 0xF0,
    0x07, 0xE0,
    0x03, 0xC0,
    0x00, 0x00,
    0x00, 0x00,
    0x00, 0x00,
    0x00, 0x00,
));

$ht = 1; /* インデックスを設定 */

define("SCALING_FACTOR", 16);

try {
    $p = new PDFlib();

    $p->set_option("searchpath={" . $searchpath . "}");

    /* This means we must check return values of load_font() etc. */
    $p->set_option("errorpolicy=return");
    $p->set_option("stringformat=utf8");

    if ($p->begin_document($outfile, "pdfa=PDF/A-1b:2005") == 0)
    throw new Exception("Error: " . $p->get_errmsg());

    $p->set_info("Creator", "PDFlib Cookbook");
    $p->set_info("Title", $title);

    /* -----------------------------------------------------------------
     * 既存PDF文書を開く。
     * パターンを定義する前に出力インテントを設定する必要があるため、
     * パターンを作成する前に、この処理を行う。
     * -----------------------------------------------------------------
     */
    $indoc = $p->open_pdi_document($pdffile, "");
    if ($indoc == 0)
    throw new Exception("Error: " . $p->get_errmsg());

    $endpage = (int) $p->pcos_get_number($indoc, "length:pages");

    /* 既存文書から出力インテントを取得し、それを出力文書にコピーする */
    $res = $p->pcos_get_string($indoc, "type:/Root/OutputIntents");
    if ($res == "array") {
        $ret = $p->process_pdi($indoc, -1, "action=copyoutputintent");
        if ($ret == 0)
            throw new Exception("Error: " . $p->get_errmsg());
    }else {
        /* If the input document doesn't have any output intent we
        * explicitly set sRGB so that we can use grayscale bitmaps.
        */
        $p->load_iccprofile("sRGB", "usage=outputintent");
    }

    /* -------------------------------------------------------------------
     * 画像マスクに基づいて、ビットマップパターンを定義する。
     * 画面上で滑らかに見えるよう、画像を縮小する。
     * -------------------------------------------------------------------
     */
    $bitmap = "";

    for ($j=0; $j < count($data[$ht]); $j++) {
    $bitmap .= sprintf("%c",$data[$ht][$j]);
    }

    $p->create_pvf("/pvf/image/bitmap", $bitmap, "");

    $image = $p->load_image("raw", "/pvf/image/bitmap",
    "bpc=1 components=1 height=16 width=16 invert mask");

    if ($image == 0)
    throw new Exception("Error: " . $p->get_errmsg());

    $w = 16 / SCALING_FACTOR;
    
    $pattern = $p->begin_pattern_ext($w, $w, "");

    $p->fit_image($image, 0, 0, "scale=" . (1 / SCALING_FACTOR));

    $p->end_pattern();

    $p->close_image($image);

    /* 既存PDF文書数分ループする */
    for ($pageno = 1; $pageno <= $endpage; $pageno++)
    {
    $page = $p->open_pdi_page($indoc, $pageno, "");

    if ($page == 0)
        throw new Exception("Error: " . $p->get_errmsg());

    /* ページサイズは fit_pdi_page() で調整される */
    $p->begin_page_ext(0, 0, "width=a4.width height=a4.height");

    /* 既存PDFページを出力PDFページ上に配置し、サイズを調整する */
    $p->fit_pdi_page($page, 0, 0, "adjustpage");

    /* スタンプで使用するフォントをロードする */
    $font = $p->load_font("NotoSerif-Regular", "unicode", "embedding");

    if ($font == 0)
        throw new Exception("Error: " . $p->get_errmsg());

    /* パターンカラーで塗りつぶされたスタンプを配置する */
    $p->setcolor("fill", "pattern", $pattern, 0, 0, 0);

    $p->fit_textline("PUBLISHED", 20, 20,
        "font=" . $font . " fontsize=1 boxsize={550 800} stamp=ll2ur");

    $p->close_pdi_page($page);

    $p->end_page_ext("");
    }

    $p->end_document("");
    $buf = $p->get_buffer();
    $len = strlen($buf);

    header("Content-type: application/pdf");
    header("Content-Length: $len");
    header("Content-Disposition: inline; filename=transparent_stamp_for_pdfa1.pdf");
    print $buf;

} catch (PDFlibException $e){
    echo("PDFlib exception occurred:\n" .
    "[" . $e->get_errnum() . "] " . $e->get_apiname() .
    ": " . $e->get_errmsg() . "\n");
    exit(1);
} catch (Exception $e) {
    echo($e->getMessage());
    exit(1);
}

$p = 0;
?>