PDF フォームの出力

<?php 
  /* データファイルの場所です。必要なように適合させます */
  $searchpath = "../data/";

  $llx=150; $lly=550; $urx=350; $ury=575;

  /* JavaScriptが自動的にフィールドの中に日付を入れます */
  $js = "var d = util.printd(\"mm/dd/yyyy\", new Date());" .
        "var date = this.getField(\"date\");" .
        "date.value = d;";

  $p = new PDFlib();

  # load_font()等からの戻り値を調べなければいけないことを表しています
  $p->set_parameter("errorpolicy", "return");
  $p->set_parameter("SearchPath", $searchpath);

  /* 所有者のパスワードの変更を防ぎます */
  $optlist = "linearize masterpassword=pdflib permissions={nomodify}";

  if ($p->begin_document("", $optlist) == 0) {
    die("Error: " . $p->get_errmsg());
  }

  $p->set_info("Creator", "PDFlib starter sample");
  $p->set_info("Title", "starter_webform");

  $optlist = "script={" . $js . "}";
  $action = $p->create_action("JavaScript", $optlist);

  $optlist = "action={open=" . $action . "}";
  $p->begin_page_ext(595, 842, $optlist);

  $font = $p->load_font("HeiseiMin-W3", "UniJIS-UCS2-H", "");
  if ($font == 0) {
    die("Error: " . $p->get_errmsg());
  }
  $p->setfont($font, 24);

  /* create_fieldで表示するために、S-JISからUnicodeにエンコードします */
  $sjis_str1 = "日付：";
  $str1 = mb_convert_encoding($sjis_str1,
    "UCS-2LE", "SJIS,EUC-JP,ASCII,JIS,UTF-8");

  $sjis_str2 = "名前：";
  $str2 = mb_convert_encoding($sjis_str2,
    "UCS-2LE", "SJIS,EUC-JP,ASCII,JIS,UTF-8");

  $p->fit_textline($str1, 125, $lly+5, "position={right bottom}");

  /* tooltipは、フィールドからはみ出したテキストとして使われます */
  $optlist =
    "tooltip={日付（自動的に入力されます）} " .
    "bordercolor={gray 0} font=" . $font;
  $p->create_field($llx, $lly, $urx, $ury, "date", "textfield", $optlist);

  $lly-=100; $ury-=100;
  $p->fit_textline("$str2", 125, $lly+5, "position={right bottom}");

  $optlist = "tooltip={名前を入力してください} " .
    "bordercolor={gray 0} font=" . $font;
  $p->create_field($llx, $lly, $urx, $ury, "name", "textfield", $optlist);

  $p->end_page_ext("");

  $p->end_document("");

  /* PDFデータをバッファから取り出す */
  $buf = $p->get_buffer();
  $len = strlen($buf);

  /* httpヘッダを生成する */
  header("Content-type: application/pdf");
  header("Content-Length: $len");
  header("Content-Disposition: inline; filename=starter_block.pdf");
  
  print $buf;

  $p->delete();

?>