<?php
/*
 * 様々な角度のテキスト :
 * 水平ではなく様々な角度のテキストを出力するサンプルプログラム。
 *
 * テキストフローは、３０度の角度を持つように作成されます。テキストフローは、
 * ３０度の角度や左向きの配置を持つよう生成されます。
 *
 * 必要な製品 : PDFlib/PDFlib+PDI/PPS 9
 * 必要なデータ : 無し
 */

/* 必要に応じてデータファイルがあるフォルダのパスを指定する */
$searchpath = dirname(__FILE__,3)."/input";
$outfile = "";
$title = "Rotated Text";

$tf = 0;
$optlist =
    "fontname=Helvetica fontsize=14 encoding=unicode leading=120% charref";

$textflow =
    "To fold the famous rocket looper proceed as follows:\n" .
    "Take a DIN A4 sheet. Fold it lenghtwise in the middle. Then, fold " .
    "the upper corners down. Fold the long sides inwards that the points " .
    "A and B meet on the central fold. Fold the points C and D that the " .
    "upper corners meet with the central fold as well. Fold the plane in " .
    "the middle. Fold the wings down that they close with the lower " .
    "border of the plane.";

try {
    $p = new pdflib();

    $p->set_option("searchpath={" . $searchpath . "}");

    /* load_font() 等でエラーが起きた場合、0を返す */
    $p->set_option("errorpolicy=return");
    $p->set_option("stringformat=utf8");

    /* 出力文書名を指定して、出力文書を開く */
    if ($p->begin_document($outfile, "") == 0)
    throw new Exception("Error: " . $p->get_errmsg());

    $p->set_info("Creator", "PDFlib Cookbook");
    $p->set_info("Title", $title );

    /* 1ページ目 */
    $p->begin_page_ext(0, 0, "width=a4.width height=a4.height");

    $font = $p->load_font("Helvetica-Bold", "unicode", "");

    if ($font == 0)
    throw new Exception("Error: " . $p->get_errmsg());

    /* テキストを西向き、東向き、南向きで配置する */
    $p->setfont($font, 24);
    $p->fit_textline("The famous rocket looper", 100, 500, "orientate=west");

    $p->setfont($font, 20);
    $p->fit_textline("The famous rocket looper", 200, 500, "orientate=east");

    $p->setfont($font, 16);
    $p->fit_textline("The famous rocket looper", 300, 500, "orientate=south");

    /* テキストを30度回転させる */
    $p->setfont($font, 16);
    $p->fit_textline("The famous rocket looper", 50, 350, "rotate=30");

    /* テキストフローを使用し、テキストを30度回転させる */
    $tf = $p->add_textflow($tf, $textflow, $optlist);
    if ($tf == 0)
        throw new Exception("Error: " . $p->get_errmsg());

    $result = $p->fit_textflow($tf, 250, 50, 400, 400, "rotate=30");
    if ($result != "_stop")
    {
        /* エラーかどうか、または、まだ配置すべきテキストが残っているかをチェック */
    }
    $p->delete_textflow($tf);

    $p->end_page_ext("");

    /* 2ページ目 */
    $p->begin_page_ext(0, 0, "width=a4.width height=a4.height");

    $font = $p->load_font("Helvetica-Bold", "unicode", "");

    if ($font == 0)
    throw new Exception("Error: " . $p->get_errmsg());

    /* ストロークカラーを赤に設定する */
    $p->setcolor("stroke", "rgb", 1, 0, 0, 0);

    /* テキストフローを使用し、テキストを30度回転させる。テキストフローのオプションに、
     * "showborder" を指定し、はめ込み枠の境界線を表示する
     */
    $tf = 0;
    $tf = $p->add_textflow($tf, $textflow, $optlist);
    if ($tf == 0)
        throw new Exception("Error: " . $p->get_errmsg());

    $result = $p->fit_textflow($tf, 150, 450, 400, 650, "showborder rotate=30");
    if ($result != "_stop")
    {
        /* エラーかどうか、または、まだ配置すべきテキストが残っているかをチェック */
    }
    $p->delete_textflow($tf);

    $p->fit_textline("rotate=30", 300, 500, "font=" . $font . " fontsize=14");

    /* テキストフローで30度回転させ、テキストを西向きにする */
    $tf = 0;
    $tf = $p->add_textflow($tf, $textflow, $optlist);
    if ($tf == 0)
        throw new Exception("Error: " . $p->get_errmsg());

    $result = $p->fit_textflow($tf, 150, 100, 400, 300,
        "showborder rotate=30 orientate west");
    if ($result != "_stop")
    {
        /* エラーかどうか、または、まだ配置すべきテキストが残っているかをチェック */
    }
    $p->delete_textflow($tf);

    $p->fit_textline("rotate=30  orientate=west", 300, 150, "font=" . $font .
        " fontsize=14");

    $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=frame_around_image.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;

?>