pdf_paradise 0.3.20

data/lib/pdf_paradise/fpdf/fpdf.rb

@@ -0,0 +1,1902 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# === Forked from ruby-fpdf FPDF 1.53d
+#
+# FPDF 1.53 by Olivier Plathey ported to Ruby by Brian Ollenberger
+# Copyright 2005 Brian Ollenberger
+# Please retain this entire copyright notice. If you distribute any
+# modifications, place an additional comment here that clearly indicates
+# that it was modified. You may (but are not  send any useful modifications that you make
+# back to me at
+#
+#   http://zeropluszero.com/software/fpdf/
+#
+# Bug fixes, examples, external fonts, JPEG support, and upgrade to version
+# 1.53 contributed by Kim Shrier.
+#
+# Bookmark support contributed by Sylvain Lafleur.
+#
+# EPS support contributed by Thiago Jackiw, ported from the PHP version by Valentin Schmidt.
+#
+# Many other bug reports and fixes contributed by many other people.
+# =========================================================================== #
+class FPDF
+
+  require 'date'
+  require 'zlib'
+
+  # ========================================================================= #
+  # === FPDF_VERSION
+  # ========================================================================= #
+  FPDF_VERSION = '1.53d'
+
+  # ========================================================================= #
+  # === Charwidths
+  # ========================================================================= #
+  Charwidths = {
+    'courier' => [
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,
+      600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600
+     ],
+    
+    'courierB' => [
+      600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600
+     ],
+    
+    'courierI' => [
+      600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600],
+    
+    'courierBI' => [
+      600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600,600],
+    
+    'helvetica' => [
+      278, 278, 278, 278, 278,
+      278, 278, 278, 278, 278,
+      278, 278, 278, 278, 278,
+      278, 278, 278, 278, 278,
+      278, 278, 278, 278, 278,
+      278, 278, 278, 278, 278,
+      278, 278, 278, 278, 355,
+      556, 556, 889, 667, 191,
+      333, 333, 389, 584, 278,
+      333, 278, 278, 556, 556,
+      556, 556, 556, 556, 556,
+      556, 556, 556, 278, 278,
+      584, 584, 584, 556, 1015,
+      667, 667, 722, 722, 667,
+      611, 778, 722, 278, 500,
+      667, 556, 833, 722, 778,
+      667, 778, 722, 667, 611,
+      722, 667, 944, 667, 667,
+      611, 278, 278, 278, 469,
+      556, 333, 556, 556, 500,
+      556, 556, 278, 556, 556,
+      222, 222, 500, 222, 833,
+      556, 556, 556, 556, 333,
+      500, 278, 556, 500, 722,
+      500, 500, 500, 334, 260,
+      334, 584, 350, 556, 350,
+      222, 556, 333, 1000, 556,
+      556, 333, 1000, 667, 333,
+      1000, 350, 611, 350, 350,
+      222, 222, 333, 333, 350,
+      556, 1000, 333, 1000, 500,
+      333, 944, 350, 500, 667,
+      278, 333, 556, 556, 556,
+      556, 260, 556, 333, 737,
+      370, 556, 584, 333, 737,
+      333, 400, 584, 333, 333,
+      333, 556, 537, 278, 333,
+      333, 365, 556, 834, 834,
+      834, 611, 667, 667, 667,
+      667, 667, 667, 1000, 722,
+      667, 667, 667, 667, 278,
+      278, 278, 278, 722, 722,
+      778, 778, 778, 778, 778,
+      584, 778, 722, 722, 722,
+      722, 667, 667, 611, 556,
+      556, 556, 556, 556, 556,
+      889, 500, 556, 556, 556,
+      556, 278, 278, 278, 278,
+      556, 556, 556, 556, 556,
+      556, 556, 584, 611, 556,
+      556, 556, 556, 500, 556,
+      500
+    ],
+    
+    'helveticaB' => [
+       278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 333, 474, 556, 556, 889, 722, 238, 333, 333, 389, 584, 278, 333, 278, 278, 556, 556, 556, 556, 556, 556, 556, 556, 556, 556, 333, 333, 584, 584, 584, 611, 975, 722, 722, 722, 722, 667, 611, 778, 722, 278, 556, 722, 611, 833, 722, 778, 667, 778, 722, 667, 611, 722, 667, 944, 667, 667, 611, 333, 278, 333, 584, 556, 333, 556, 611, 556, 611, 556, 333, 611, 611, 278, 278, 556, 278, 889, 611, 611, 611, 611, 389, 556, 333, 611, 556, 778, 556, 556, 500, 389, 280, 389, 584, 350, 556, 350, 278, 556, 500, 1000, 556, 556, 333, 1000, 667, 333, 1000, 350, 611, 350, 350, 278, 278, 500, 500, 350, 556, 1000, 333, 1000, 556, 333, 944, 350, 500, 667, 278, 333, 556, 556, 556, 556, 280, 556, 333, 737, 370, 556, 584, 333, 737, 333, 400, 584, 333, 333, 333, 611, 556, 278, 333, 333, 365, 556, 834, 834, 834, 611, 722, 722, 722, 722, 722, 722, 1000, 722, 667, 667, 667, 667, 278, 278, 278, 278, 722, 722, 778, 778, 778, 778, 778, 584, 778, 722, 722, 722, 722, 667, 667, 611, 556, 556, 556, 556, 556, 556, 889, 556, 556, 556, 556, 556, 278, 278, 278, 278, 611, 611, 611, 611, 611, 611, 611, 584, 611, 611, 611, 611, 611, 556, 611, 556
+     ],
+    
+    'helveticaI' => [
+      278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 355, 556, 556, 889, 667, 191, 333, 333, 389, 584, 278, 333, 278, 278, 556, 556, 556, 556, 556, 556, 556, 556, 556, 556, 278, 278, 584, 584, 584, 556, 1015, 667, 667, 722, 722, 667, 611, 778, 722, 278, 500, 667, 556, 833, 722, 778, 667, 778, 722, 667, 611, 722, 667, 944, 667, 667, 611, 278, 278, 278, 469, 556, 333, 556, 556, 500, 556, 556, 278, 556, 556, 222, 222, 500, 222, 833, 556, 556, 556, 556, 333, 500, 278, 556, 500, 722, 500, 500, 500, 334, 260, 334, 584, 350, 556, 350, 222, 556, 333, 1000, 556, 556, 333, 1000, 667, 333, 1000, 350, 611, 350, 350, 222, 222, 333, 333, 350, 556, 1000, 333, 1000, 500, 333, 944, 350, 500, 667, 278, 333, 556, 556, 556, 556, 260, 556, 333, 737, 370, 556, 584, 333, 737, 333, 400, 584, 333, 333, 333, 556, 537, 278, 333, 333, 365, 556, 834, 834, 834, 611, 667, 667, 667, 667, 667, 667, 1000, 722, 667, 667, 667, 667, 278, 278, 278, 278, 722, 722, 778, 778, 778, 778, 778, 584, 778, 722, 722, 722, 722, 667, 667, 611, 556, 556, 556, 556, 556, 556, 889, 500, 556, 556, 556, 556, 278, 278, 278, 278, 556, 556, 556, 556, 556, 556, 556, 584, 611, 556, 556, 556, 556, 500, 556, 500
+     ],
+    
+    'helveticaBI' => [
+      278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 278, 333, 474, 556, 556, 889, 722, 238, 333, 333, 389, 584, 278, 333, 278, 278, 556, 556, 556, 556, 556, 556, 556, 556, 556, 556, 333, 333, 584, 584, 584, 611, 975, 722, 722, 722, 722, 667, 611, 778, 722, 278, 556, 722, 611, 833, 722, 778, 667, 778, 722, 667, 611, 722, 667, 944, 667, 667, 611, 333, 278, 333, 584, 556, 333, 556, 611, 556, 611, 556, 333, 611, 611, 278, 278, 556, 278, 889, 611, 611, 611, 611, 389, 556, 333, 611, 556, 778, 556, 556, 500, 389, 280, 389, 584, 350, 556, 350, 278, 556, 500, 1000, 556, 556, 333, 1000, 667, 333, 1000, 350, 611, 350, 350, 278, 278, 500, 500, 350, 556, 1000, 333, 1000, 556, 333, 944, 350, 500, 667, 278, 333, 556, 556, 556, 556, 280, 556, 333, 737, 370, 556, 584, 333, 737, 333, 400, 584, 333, 333, 333, 611, 556, 278, 333, 333, 365, 556, 834, 834, 834, 611, 722, 722, 722, 722, 722, 722, 1000, 722, 667, 667, 667, 667, 278, 278, 278, 278, 722, 722, 778, 778, 778, 778, 778, 584, 778, 722, 722, 722, 722, 667, 667, 611, 556, 556, 556, 556, 556, 556, 889, 556, 556, 556, 556, 556, 278, 278, 278, 278, 611, 611, 611, 611, 611, 611, 611, 584, 611, 611, 611, 611, 611, 556, 611, 556
+     ],
+    
+    'times' => [
+      250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 333, 408, 500, 500, 833, 778, 180, 333, 333, 500, 564, 250, 333, 250, 278, 500, 500, 500, 500, 500, 500, 500, 500, 500, 500, 278, 278, 564, 564, 564, 444, 921, 722, 667, 667, 722, 611, 556, 722, 722, 333, 389, 722, 611, 889, 722, 722, 556, 722, 667, 556, 611, 722, 722, 944, 722, 722, 611, 333, 278, 333, 469, 500, 333, 444, 500, 444, 500, 444, 333, 500, 500, 278, 278, 500, 278, 778, 500, 500, 500, 500, 333, 389, 278, 500, 500, 722, 500, 500, 444, 480, 200, 480, 541, 350, 500, 350, 333, 500, 444, 1000, 500, 500, 333, 1000, 556, 333, 889, 350, 611, 350, 350, 333, 333, 444, 444, 350, 500, 1000, 333, 980, 389, 333, 722, 350, 444, 722, 250, 333, 500, 500, 500, 500, 200, 500, 333, 760, 276, 500, 564, 333, 760, 333, 400, 564, 300, 300, 333, 500, 453, 250, 333, 300, 310, 500, 750, 750, 750, 444, 722, 722, 722, 722, 722, 722, 889, 667, 611, 611, 611, 611, 333, 333, 333, 333, 722, 722, 722, 722, 722, 722, 722, 564, 722, 722, 722, 722, 722, 722, 556, 500, 444, 444, 444, 444, 444, 444, 667, 444, 444, 444, 444, 444, 278, 278, 278, 278, 500, 500, 500, 500, 500, 500, 500, 564, 500, 500, 500, 500, 500, 500, 500, 500
+     ],
+    
+    'timesB' => [
+      250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 333, 555, 500, 500, 1000, 833, 278, 333, 333, 500, 570, 250, 333, 250, 278, 500, 500, 500, 500, 500, 500, 500, 500, 500, 500, 333, 333, 570, 570, 570, 500, 930, 722, 667, 722, 722, 667, 611, 778, 778, 389, 500, 778, 667, 944, 722, 778, 611, 778, 722, 556, 667, 722, 722, 1000, 722, 722, 667, 333, 278, 333, 581, 500, 333, 500, 556, 444, 556, 444, 333, 500, 556, 278, 333, 556, 278, 833, 556, 500, 556, 556, 444, 389, 333, 556, 500, 722, 500, 500, 444, 394, 220, 394, 520, 350, 500, 350, 333, 500, 500, 1000, 500, 500, 333, 1000, 556, 333, 1000, 350, 667, 350, 350, 333, 333, 500, 500, 350, 500, 1000, 333, 1000, 389, 333, 722, 350, 444, 722, 250, 333, 500, 500, 500, 500, 220, 500, 333, 747, 300, 500, 570, 333, 747, 333, 400, 570, 300, 300, 333, 556, 540, 250, 333, 300, 330, 500, 750, 750, 750, 500, 722, 722, 722, 722, 722, 722, 1000, 722, 667, 667, 667, 667, 389, 389, 389, 389, 722, 722, 778, 778, 778, 778, 778, 570, 778, 722, 722, 722, 722, 722, 611, 556, 500, 500, 500, 500, 500, 500, 722, 444, 444, 444, 444, 444, 278, 278, 278, 278, 500, 556, 500, 500, 500, 500, 500, 570, 500, 556, 556, 556, 556, 500, 556, 500
+     ],
+    
+    'timesI' => [
+      250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 333, 420, 500, 500, 833, 778, 214, 333, 333, 500, 675, 250, 333, 250, 278, 500, 500, 500, 500, 500, 500, 500, 500, 500, 500, 333, 333, 675, 675, 675, 500, 920, 611, 611, 667, 722, 611, 611, 722, 722, 333, 444, 667, 556, 833, 667, 722, 611, 722, 611, 500, 556, 722, 611, 833, 611, 556, 556, 389, 278, 389, 422, 500, 333, 500, 500, 444, 500, 444, 278, 500, 500, 278, 278, 444, 278, 722, 500, 500, 500, 500, 389, 389, 278, 500, 444, 667, 444, 444, 389, 400, 275, 400, 541, 350, 500, 350, 333, 500, 556, 889, 500, 500, 333, 1000, 500, 333, 944, 350, 556, 350, 350, 333, 333, 556, 556, 350, 500, 889, 333, 980, 389, 333, 667, 350, 389, 556, 250, 389, 500, 500, 500, 500, 275, 500, 333, 760, 276, 500, 675, 333, 760, 333, 400, 675, 300, 300, 333, 500, 523, 250, 333, 300, 310, 500, 750, 750, 750, 500, 611, 611, 611, 611, 611, 611, 889, 667, 611, 611, 611, 611, 333, 333, 333, 333, 722, 667, 722, 722, 722, 722, 722, 675, 722, 722, 722, 722, 722, 556, 611, 500, 500, 500, 500, 500, 500, 500, 667, 444, 444, 444, 444, 444, 278, 278, 278, 278, 500, 500, 500, 500, 500, 500, 500, 675, 500, 500, 500, 500, 500, 444, 500, 444
+     ],
+    
+    'timesBI' => [
+      250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 250, 389, 555, 500, 500, 833, 778, 278, 333, 333, 500, 570, 250, 333, 250, 278, 500, 500, 500, 500, 500, 500, 500, 500, 500, 500, 333, 333, 570, 570, 570, 500, 832, 667, 667, 667, 722, 667, 667, 722, 778, 389, 500, 667, 611, 889, 722, 722, 611, 722, 667, 556, 611, 722, 667, 889, 667, 611, 611, 333, 278, 333, 570, 500, 333, 500, 500, 444, 500, 444, 333, 500, 556, 278, 278, 500, 278, 778, 556, 500, 500, 500, 389, 389, 278, 556, 444, 667, 500, 444, 389, 348, 220, 348, 570, 350, 500, 350, 333, 500, 500, 1000, 500, 500, 333, 1000, 556, 333, 944, 350, 611, 350, 350, 333, 333, 500, 500, 350, 500, 1000, 333, 1000, 389, 333, 722, 350, 389, 611, 250, 389, 500, 500, 500, 500, 220, 500, 333, 747, 266, 500, 606, 333, 747, 333, 400, 570, 300, 300, 333, 576, 500, 250, 333, 300, 300, 500, 750, 750, 750, 500, 667, 667, 667, 667, 667, 667, 944, 667, 667, 667, 667, 667, 389, 389, 389, 389, 722, 722, 722, 722, 722, 722, 722, 570, 722, 722, 722, 722, 722, 611, 611, 500, 500, 500, 500, 500, 500, 500, 722, 444, 444, 444, 444, 444, 278, 278, 278, 278, 500, 556, 500, 500, 500, 500, 500, 570, 500, 556, 556, 556, 556, 444, 500, 444
+     ],
+    
+    'symbol' => [
+      250, 250, 250, 250, 250,
+      250, 250, 250, 250, 250,
+      250, 250, 250, 250, 250,
+      250, 250, 250, 250, 250,
+      250, 250, 250, 250, 250,
+      250, 250, 250, 250, 250,
+      250, 250, 250, 333, 713,
+      500, 549, 833, 778, 439,
+      333, 333, 500, 549, 250,
+      549, 250, 278, 500, 500,
+      500, 500, 500, 500, 500,
+      500, 500, 500, 278, 278,
+      549, 549, 549, 444, 549,
+      722, 667, 722, 612, 611,
+      763, 603, 722, 333, 631,
+      722, 686, 889, 722, 722,
+      768, 741, 556, 592, 611,
+      690, 439, 768, 645, 795,
+      611, 333, 863, 333, 658,
+      500, 500, 631, 549, 549,
+      494, 439, 521, 411, 603,
+      329, 603, 549, 549, 576,
+      521, 549, 549, 521, 549,
+      603, 439, 576, 713, 686,
+      493, 686, 494, 480, 200,
+      480, 549, 0, 0, 0, 0, 0,
+      0, 0, 0, 0, 0, 0, 0, 0,
+      0, 0, 0, 0, 0, 0, 0, 0,
+      0, 0, 0, 0, 0, 0, 0, 0,
+      0, 0, 0, 0, 750, 620,
+      247, 549, 167, 713, 500,
+      753, 753, 753, 753, 1042,
+      987, 603, 987, 603, 400,
+      549, 411, 549, 549, 713,
+      494, 460, 549, 549, 549,
+      549, 1000, 603, 1000, 658,
+      823, 686, 795, 987, 768,
+      768, 823, 768, 768, 713,
+      713, 713, 713, 713, 713,
+      713, 768, 713, 790, 790,
+      890, 823, 549, 250, 713,
+      603, 603, 1042, 987, 603,
+      987, 603, 494, 329, 790,
+      790, 786, 713, 384, 384,
+      384, 384, 384, 384, 494,
+      494, 494, 494, 0, 329,
+      274, 686, 686, 686, 384,
+      384, 384, 384, 384, 384,
+      494, 494, 494, 0
+     ],
+    
+    'zapfdingbats'=> [
+      0, 0, 0, 0, 0,
+      0, 0, 0, 0, 0,
+      0, 0, 0, 0, 0,
+      0, 0, 0, 0, 0,
+      0, 0, 0, 0, 0,
+      0, 0, 0, 0, 0,
+      0, 0, 278, 974, 961,
+      974, 980, 719, 789, 790,
+      791, 690, 960, 939, 549,
+      855, 911, 933, 911, 945,
+      974, 755, 846, 762, 761,
+      571, 677, 763, 760, 759,
+      754, 494, 552, 537, 577,
+      692, 786, 788, 788, 790,
+      793, 794, 816, 823, 789,
+      841, 823, 833, 816, 831,
+      923, 744, 723, 749, 790,
+      792, 695, 776, 768, 792,
+      759, 707, 708, 682, 701,
+      826, 815, 789, 789, 707,
+      687, 696, 689, 786, 787,
+      713, 791, 785, 791, 873,
+      761, 762, 762, 759, 759,
+      892, 892, 788, 784, 438,
+      138, 277, 415, 392, 392,
+      668, 668, 0, 390, 390,
+      317, 317, 276, 276, 509,
+      509, 410, 410, 234, 234,
+      334, 334, 0, 0, 0, 0,
+      0, 0, 0, 0, 0, 0, 0,
+      0, 0, 0, 0, 0, 0, 0,
+      0, 732, 544, 544, 910,
+      667, 760, 760, 776, 595,
+      694, 626, 788, 788, 788,
+      788, 788, 788, 788, 788,
+      788, 788, 788, 788, 788,
+      788, 788, 788, 788, 788,
+      788, 788, 788, 788, 788,
+      788, 788, 788, 788, 788,
+      788, 788, 788, 788, 788,
+      788, 788, 788, 788, 788,
+      788, 788, 894, 838, 1016,
+      458, 748, 924, 748, 918,
+      927, 928, 928, 834, 873,
+      828, 924, 924, 917, 930,
+      931, 463, 883, 836, 836,
+      867, 867, 696, 696, 874,
+      0, 874, 760, 946, 771,
+      865, 771, 888, 967, 888,
+      831, 873, 927, 970, 918, 0
+     ]
+  }
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize(
+      orientation = 'P',
+      unit        = 'mm',
+      format      = 'A4'
+    )
+    reset
+    # ======================================================================= #
+    # === @core_fonts
+    #
+    # Standard fonts will be defined next.
+    # ======================================================================= #
+    @core_fonts = {}
+    @core_fonts['courier']='Courier'
+    @core_fonts['courierB']='Courier-Bold'
+    @core_fonts['courierI']='Courier-Oblique'
+    @core_fonts['courierBI']='Courier-BoldOblique'
+    @core_fonts['helvetica']='Helvetica'
+    @core_fonts['helveticaB']='Helvetica-Bold'
+    @core_fonts['helveticaI']='Helvetica-Oblique'
+    @core_fonts['helveticaBI']='Helvetica-BoldOblique'
+    @core_fonts['times']='Times-Roman'
+    @core_fonts['timesB']='Times-Bold'
+    @core_fonts['timesI']='Times-Italic'
+    @core_fonts['timesBI']='Times-BoldItalic'
+    @core_fonts['symbol']='Symbol'
+    @core_fonts['zapfdingbats']='ZapfDingbats'
+
+    # Scale factor
+    case unit
+    when 'pt'
+      @k = 1
+    when 'mm'
+      @k = 72/25.4
+    when 'cm'
+      @k = 72/2.54
+    when 'in'
+      @k = 72
+    else
+      raise "Incorrect unit: #{unit}"
+    end
+
+    # Page format
+    if format.is_a? String
+      format = format.dup if format.frozen?
+      format.downcase!
+      case format
+      when 'a3'
+        format = [841.89,1190.55]
+      when 'a4'
+        format = [595.28,841.89]
+      when 'a5'
+        format = [420.94,595.28]
+      when 'letter'
+        format = [612,792]
+      when 'legal'
+        format = [612,1008]
+      else
+        raise 'Unknown page format: '+format
+      end
+      @fwPt,@fhPt = format
+    else
+      @fwPt = format[0]*@k
+      @fhPt = format[1]*@k
+    end
+    @fw = @fwPt / @k
+    @fh = @fhPt / @k
+
+    # Page orientation
+    if orientation.frozen?
+      orientation = orientation.dup
+    end
+    orientation.downcase!
+    case orientation
+    when 'p','portrait'
+      @DefOrientation='P'
+      @wPt=@fwPt
+      @hPt=@fhPt
+    when 'l','landscape'
+      @DefOrientation='L'
+      @wPt=@fhPt
+      @hPt=@fwPt
+    else
+      raise 'Incorrect orientation: '+orientation
+    end
+    @CurOrientation=@DefOrientation
+    @w=@wPt/@k
+    @h=@hPt/@k
+
+    # Page margins (1 cm)
+    margin=28.35/@k
+    SetMargins(margin,margin)
+    # Interior cell margin (1 mm)
+    @cMargin=margin/10
+    # Line width (0.2 mm)
+    @LineWidth=0.567/@k
+    # Automatic page break
+    SetAutoPageBreak(true,2*margin)
+    # Full width display mode
+    SetDisplayMode('fullwidth')
+    # Enable compression
+    SetCompression(true)
+    # Set default PDF version number
+    @PDFVersion='1.3'
+  end
+
+  # ========================================================================= #
+  # === reset
+  # ========================================================================= #
+  def reset
+    @page=0
+    @n=2
+    @buffer=''
+    @pages=[]
+    @OrientationChanges=[]
+    @state=0
+    @fonts = {}
+    @FontFiles = {}
+    @diffs=[]
+    @images = {}
+    @links=[]
+    @PageLinks = {}
+    @InFooter=false
+    @font_family = ''
+    @FontStyle=''
+    @FontSizePt=12
+    @underline= false
+    @DrawColor='0 G'
+    @FillColor='0 g'
+    @TextColor='0 g'
+    @ColorFlag=false
+    @ws=0
+    @offsets=[]
+  end
+
+  # ========================================================================= #
+  # === dounderline
+  # ========================================================================= #
+  def dounderline(x,y,txt)
+    # Underline text
+    up = @CurrentFont['up']
+    ut = @CurrentFont['ut']
+    w = GetStringWidth(txt)+@ws*txt.count(' ')
+    sprintf(
+      '%.2f %.2f %.2f %.2f re f',
+      x*@k, (@h - (y - up/1000.0 * @FontSize))*@k,w*@k,-ut/1000.0 * @FontSizePt
+    )
+  end
+
+  # ========================================================================= #
+  # === set_margins
+  # ========================================================================= #
+  def set_margins(
+      left, top, right=-1
+    )
+    # Set left, top and right margins
+    @left_margin = left
+    @top_margin = top
+    right=left if right==-1
+    @rMargin=right
+  end; alias SetMargins set_margins # === SetMargins
+
+  # ========================================================================= #
+  # === set_title
+  #
+  # Set the title of the .pdf document through this method here.
+  # ========================================================================= #
+  def set_title(i)
+    @title = i
+  end; alias SetTitle set_title # === SetTitle
+
+  # ========================================================================= #
+  # === set_left_margin
+  #
+  # This method can be used to set the left margin of the .pdf file at hand.
+  # ========================================================================= #
+  def set_left_margin(i)
+    @left_margin = i
+    @x = i if @page>0 and @x < i
+  end; alias SetLeftMargin set_left_margin # === SetLeftMargin
+
+  # === Write
+  def Write(h,txt,link='')
+    # Output text in flowing mode
+    cw=@CurrentFont['cw']
+    w=@w-@rMargin-@x
+    wmax=(w-2*@cMargin)*1000/@FontSize
+    s=txt.gsub("\r",'')
+    nb=s.length
+    sep=-1
+    i=0
+    j=0
+    l=0
+    nl=1
+    while i<nb
+      # Get next character
+      c=s[i]
+      if c=="\n"[0]
+        # Explicit line break
+        self.Cell(w,h,s[j,i-j],0,2,'',0,link)
+        i += 1
+        sep = -1
+        j=i
+        l=0
+        if nl==1
+          @x=@left_margin
+          w=@w-@rMargin-@x
+          wmax=(w-2*@cMargin)*1000/@FontSize
+        end
+        nl += 1
+        next
+      end
+      if c == ' '[0]
+        sep=i
+        ls=l
+      end
+      l = l+cw[c]
+      if l>wmax
+        # Automatic line break
+        if sep==-1
+          if @x>@left_margin
+            # Move to next line
+            @x=@left_margin
+            @y=@y+h
+            w=@w-@rMargin-@x
+            wmax=(w-2*@cMargin)*1000/@FontSize
+            i=i+1
+            nl += 1
+            next
+          end
+          i=i+1 if i==j
+          self.Cell(w,h,s[j,i-j],0,2,'',0,link)
+        else
+          self.Cell(w,h,s[j,sep-j],0,2,'',0,link)
+          i=sep+1
+        end
+        sep=-1
+        j=i
+        l=0
+        if nl==1
+          @x=@left_margin
+          w=@w-@rMargin-@x
+          wmax=(w-2*@cMargin)*1000/@FontSize
+        end
+        nl += 1
+      else
+        i=i+1
+      end
+    end
+    # Last chunk
+    self.Cell(l/1000.0*@FontSize,h,s[j,i],0,0,'',0,link) if i != j
+  end
+
+  # ========================================================================= #
+  # === SetTopMargin
+  #
+  # Set top margin
+  # ========================================================================= #
+  def SetTopMargin(i)
+    @top_margin = i
+  end
+
+  # ========================================================================= #
+  # === SetRightMargin
+  # ========================================================================= #
+  def SetRightMargin(i)
+    #Set right margin
+    @rMargin = i
+  end
+
+  # ========================================================================= #
+  # === alias_nb_pages
+  #
+  # Define an alias for total number of pages
+  # ========================================================================= #
+  def alias_nb_pages(i = '{nb}')
+    @AliasNbPages = i
+  end; alias AliasNbPages alias_nb_pages # === AliasNbPages
+
+  # ========================================================================= #
+  # === SetAutoPageBreak
+  # ========================================================================= #
+  def SetAutoPageBreak(auto, margin = 0)
+    # Set auto page break mode and triggering margin
+    @AutoPageBreak=auto
+    @bMargin=margin
+    @PageBreakTrigger=@h-margin
+  end
+
+  def SetDisplayMode(zoom, layout='continuous')
+    # Set display mode in viewer
+    if zoom=='fullpage' or zoom=='fullwidth' or zoom=='real' or
+       zoom=='default' or not zoom.kind_of? String
+      @ZoomMode=zoom
+    elsif zoom=='zoom'
+      @ZoomMode=layout
+    else
+      raise 'Incorrect zoom display mode: '+zoom
+    end
+    if layout == 'single' or
+       layout == 'continuous' or
+       layout == 'two' or
+       layout == 'default'
+      @LayoutMode = layout
+    elsif zoom != 'zoom'
+      raise 'Incorrect layout display mode: '+layout
+    end
+  end
+
+  # === SetCompression
+  def SetCompression(i)
+    # Set page compression
+    @compress = i
+  end
+
+  def SetSubject(subject)
+    # Subject of document
+    @subject=subject
+  end
+
+  def SetAuthor(author)
+    # Author of document
+    @author=author
+  end
+
+  def SetKeywords(keywords)
+    # Keywords of document
+    @keywords=keywords
+  end
+
+  def SetCreator(creator)
+    # Creator of document
+    @creator=creator
+  end
+  
+  # === error
+  def error(i)
+    raise "FPDF error: #{i}"
+  end; alias Error error # === Error
+
+  def Open
+    # Begin document
+    @state=1
+  end
+
+  # === Close
+  def Close
+    # Terminate document
+    return if @state==3
+    self.add_page if @page==0
+    # Page footer
+    @InFooter=true
+    self.Footer
+    @InFooter=false
+    # Close page
+    endpage
+    # Close document
+    enddoc
+  end
+
+  # ========================================================================= #
+  # Draw a line
+  # ========================================================================= #
+  def Line(x1, y1, x2, y2)
+    out(
+      sprintf('%.2f %.2f m %.2f %.2f l S',x1*@k,(@h-y1)*@k,x2*@k,(@h-y2)*@k)
+    )
+  end
+
+  # ========================================================================= #
+  # === new_page
+  # ========================================================================= #
+  def new_page(orientation = '')
+    # Start a new page
+    self.Open if @state==0
+    family = @font_family
+    style = @FontStyle+(@underline ? 'U' : '')
+    size=@FontSizePt
+    lw=@LineWidth
+    dc=@DrawColor
+    fc=@FillColor
+    tc=@TextColor
+    cf=@ColorFlag
+    if @page>0
+      # Page footer
+      @InFooter=true
+      self.Footer
+      @InFooter=false
+      # Close page
+      endpage
+    end
+    # Start new page
+    beginpage(orientation)
+    # Set line cap style to square
+    out('2 J')
+    # Set line width
+    @LineWidth = lw
+    out(sprintf('%.2f w',lw*@k))
+    # Set font
+    SetFont(family,style,size) if family
+    # Set colors
+    @DrawColor=dc
+    out(dc) if dc!='0 G'
+    @FillColor=fc
+    out(fc) if fc!='0 g'
+    @TextColor=tc
+    @ColorFlag=cf
+    # Page header
+    self.Header
+    # Restore line width
+    if @LineWidth!=lw
+      @LineWidth=lw
+      out(sprintf('%.2f w',lw*@k))
+    end
+    # Restore font
+    SetFont(family,style,size) if family
+    # Restore colors
+    if @DrawColor != dc
+      @DrawColor=dc
+      out(dc)
+    end
+    if @FillColor!=fc
+      @FillColor=fc
+      out(fc)
+    end
+    @TextColor=tc
+    @ColorFlag=cf
+  end; alias AddPage  new_page # === AddPage
+       alias add_page new_page # === add_page
+
+  def Header
+    # To be implemented in your inherited class
+  end
+
+  def Footer
+    # To be implemented in your inherited class
+  end
+
+  def PageNo
+    # Get current page number
+    @page
+  end
+
+  # ========================================================================= #
+  #
+  # ========================================================================= #
+  def SetDrawColor(r,g=-1,b=-1)
+    # Set color for all stroking operations
+    if (r==0 and g==0 and b==0) or g==-1
+      @DrawColor=sprintf('%.3f G',r/255.0)
+    else
+      @DrawColor=sprintf('%.3f %.3f %.3f RG',r/255.0,g/255.0,b/255.0)
+    end
+    out(@DrawColor) if(@page>0)
+  end
+
+  # ========================================================================= #
+  # === set_fill_colour
+  #
+  # This method will set the colour for all filling operations.
+  # ========================================================================= #
+  def set_fill_colour(r, g = -1, b = -1)
+    if (r==0 and g==0 and b==0) or g==-1
+      @FillColor=sprintf('%.3f g',r/255.0)
+    else
+      @FillColor=sprintf('%.3f %.3f %.3f rg',r/255.0,g/255.0,b/255.0)
+    end
+    @ColorFlag=(@FillColor!=@TextColor)
+    out(@FillColor) if(@page>0)
+  end; alias SetFillColor set_fill_colour # === SetFillColor
+
+  def SetTextColor(r,g=-1,b=-1)
+    # Set color for text
+    if (r==0 and g==0 and b==0) or g==-1
+      @TextColor=sprintf('%.3f g',r/255.0)
+    else
+      @TextColor=sprintf('%.3f %.3f %.3f rg',r/255.0,g/255.0,b/255.0)
+    end
+    @ColorFlag=(@FillColor!=@TextColor)
+  end
+
+  def GetStringWidth(s)
+    # Get width of a string in the current font
+    cw=@CurrentFont['cw']
+    w=0
+    s.each_byte do |c|
+      w=w+cw[c]
+    end
+    w*@FontSize/1000.0
+  end
+
+  def SetLineWidth(width)
+    # Set line width
+    @LineWidth = width
+    out(sprintf('%.2f w',width*@k)) if @page>0
+  end
+
+
+  def Rect(x, y, w, h, style='')
+    # Draw a rectangle
+    if style=='F'
+      op='f'
+    elsif style=='FD' or style=='DF'
+      op='B'
+    else
+      op='S'
+    end
+    out(sprintf('%.2f %.2f %.2f %.2f re %s', x*@k,(@h-y)*@k,w*@k,-h*@k,op))
+  end
+
+  # ========================================================================= #
+  # === add_font
+  # ========================================================================= #
+  def add_font(
+      family,
+      style = '',
+      file  = ''
+    )
+    # Add a TrueType or Type1 font next:
+    family = family.downcase
+    family = 'helvetica' if family == 'arial'
+
+    style = style.upcase
+    style = 'BI' if style == 'IB'
+
+    fontkey = family + style
+
+    if @fonts.has_key?(fontkey)
+      self.Error("Font already added: #{family} #{style}")
+    end
+
+    file = family.gsub(' ', '') + style.downcase + '.rb' if file == ''
+
+    if self.class.const_defined? 'FPDF_FONTPATH'
+      if FPDF_FONTPATH.end_with?('/')
+        file = FPDF_FONTPATH + file
+      else
+        file = FPDF_FONTPATH + '/' + file
+      end
+    end
+    
+    # Changed from "require file" to fix bug reported by Hans Allis.
+    load(file)
+
+    if FontDef.desc.nil?
+      self.Error("Could not include font definition file #{file}")
+    end
+
+    i = @fonts.length + 1
+
+    @fonts[fontkey] = {'i'   => i,
+              'type' => FontDef.type,
+              'name' => FontDef.name,
+              'desc' => FontDef.desc,
+              'up'   => FontDef.up,
+              'ut'   => FontDef.ut,
+              'cw'   => FontDef.cw,
+               'enc' => FontDef.enc,
+              'file' => FontDef.file
+             }
+
+    if FontDef.diff
+      # Search existing encodings
+      idx = @diffs.index(FontDef.diff)
+      
+      unless idx
+        @diffs.push(FontDef.diff)
+        @fonts[fontkey]['diff'] = @diffs.length
+      else
+        @fonts[fontkey]['diff'] = idx + 1
+      end
+    end
+
+    if FontDef.file
+      if FontDef.type == 'TrueType'
+        @FontFiles[FontDef.file] = {'length1' => FontDef.originalsize}
+      else
+        @FontFiles[FontDef.file] = {'length1' => FontDef.size1, 'length2' => FontDef.size2}
+      end
+    end
+
+    return self
+  end; alias AddFont add_font # === AddFont
+
+  # === SetFont
+  def SetFont(
+      family,
+      style = '',
+      size  = 0
+    )
+    # Select a font; the size is given in points.
+    if family.frozen?
+      family = family.dup
+    end
+    family.downcase!
+    family = @font_family if family.empty?
+    case family
+    when 'arial'
+      family = 'helvetica'
+    when 'symbol','zapfdingbats'
+      style  =  ''
+    end
+    style.upcase!
+    unless style.index('U').nil?
+      @underline=true
+      style.gsub!('U','')
+    else
+      @underline = false
+    end
+    style='BI' if style=='IB'
+    size = @FontSizePt if size == 0
+    # Test if font is already selected
+    return if @font_family==family and
+      @FontStyle==style and @FontSizePt==size
+    # Test if used for the first time
+    fontkey=family+style
+    unless @fonts.has_key?(fontkey)
+      if @core_fonts.has_key?(fontkey)
+        unless Charwidths.has_key?(fontkey)
+          raise 'Font unavailable'
+        end
+        @fonts[fontkey]={
+          'i'=>@fonts.size,
+          'type'=>'core',
+          'name'=>@core_fonts[fontkey],
+          'up'  =>-100,
+          'ut'  =>50,
+          'cw'  =>Charwidths[fontkey]}
+      else
+        raise 'Font unavailable'
+      end
+    end
+
+    # Select it
+    @font_family  = family
+    @FontStyle   = style
+    @FontSizePt  = size
+    @FontSize    = size/@k
+    @CurrentFont = @fonts[fontkey]
+    if @page > 0
+      out(sprintf('BT /F%d %.2f Tf ET', @CurrentFont['i'], @FontSizePt))
+    end
+  end; alias set_font SetFont # === set_font
+
+  # === SetFontSize
+  def SetFontSize(size)
+    # Set font size in points
+    return if @FontSizePt==size
+    @FontSizePt=size
+    @FontSize=size/@k
+    if @page>0
+      out(sprintf('BT /F%d %.2f Tf ET',@CurrentFont['i'],@FontSizePt))
+    end
+  end
+
+  # ========================================================================= #
+  # === AddLink
+  # ========================================================================= #
+  def AddLink
+    # Create a new internal link
+    @links.push([0, 0])
+    @links.size
+  end
+
+  # ========================================================================= #
+  # === SetLink
+  # ========================================================================= #
+  def SetLink(
+      link, y = 0, page = -1
+    )
+    # Set destination of internal link
+    y = @y if y == -1
+    page=@page if page==-1
+    @links[link]=[page, y]
+  end
+
+  # ========================================================================= #
+  # === Link
+  # ========================================================================= #
+  def Link(x, y, w, h, link)
+    # Put a link on the page
+    @PageLinks[@page]=Array.new unless @PageLinks.has_key?(@page)
+    @PageLinks[@page].push([x*@k,@hPt-y*@k,w*@k,h*@k,link])
+  end
+
+  # ========================================================================= #
+  # === AcceptPageBreak
+  # ========================================================================= #
+  def AcceptPageBreak
+    # Accept automatic page break or not
+    @AutoPageBreak
+  end
+
+  # ========================================================================= #
+  # === Cell
+  # ========================================================================= #
+  def Cell(
+      w,
+      h = 0,
+      txt='',
+      border=0,
+      ln=0,
+      align='',
+      fill=0,
+      link=''
+    )
+    # Output a cell
+    if @y+h>@PageBreakTrigger and !@InFooter and self.AcceptPageBreak
+      # Automatic page break
+      x=@x
+      ws=@ws
+      if ws>0
+        @ws=0
+        out('0 Tw')
+      end
+      self.AddPage(@CurOrientation)
+      @x=x
+      if ws>0
+        @ws=ws
+        out(sprintf('%.3f Tw',ws*@k))
+      end
+    end
+    w = @w - @rMargin - @x if w == 0
+    s = ''
+    if fill==1 or border == 1
+      if fill == 1
+        op=(border==1) ? 'B' : 'f'
+      else
+        op = 'S'
+      end
+      s = sprintf('%.2f %.2f %.2f %.2f re %s ',@x*@k,(@h-@y)*@k,w*@k,-h*@k,op)
+    end
+    if border.is_a? String
+      x=@x
+      y=@y
+      unless border.index('L').nil?
+        s=s+sprintf('%.2f %.2f m %.2f %.2f l S ',
+          x*@k,(@h-y)*@k,x*@k,(@h-(y+h))*@k)
+      end
+      unless border.index('T').nil?
+        s=s+sprintf('%.2f %.2f m %.2f %.2f l S ',
+          x*@k,(@h-y)*@k,(x+w)*@k,(@h-y)*@k)
+      end
+      unless border.index('R').nil?
+        s=s+sprintf('%.2f %.2f m %.2f %.2f l S ',
+          (x+w)*@k,(@h-y)*@k,(x+w)*@k,(@h-(y+h))*@k)
+      end
+      unless border.index('B').nil?
+        s=s+sprintf('%.2f %.2f m %.2f %.2f l S ',
+          x*@k,(@h-(y+h))*@k,(x+w)*@k,(@h-(y+h))*@k)
+      end
+    end
+    if txt!=''
+      if align=='R'
+        dx=w-@cMargin-self.GetStringWidth(txt)
+      elsif align=='C'
+        dx=(w-self.GetStringWidth(txt))/2
+      else
+        dx=@cMargin
+      end
+      txt = txt.gsub(')', '\\)')
+      txt.gsub!('(', '\\(')
+      txt.gsub!('\\', '\\\\')
+      if @ColorFlag
+        s=s+'q '+@TextColor+' '
+      end
+      s=s+sprintf('BT %.2f %.2f Td (%s) Tj ET',
+        (@x+dx)*@k,(@h-(@y+0.5*h+0.3*@FontSize))*@k,txt)
+      s=s+' '+dounderline(@x+dx,@y+0.5*h+0.3*@FontSize,txt) if @underline
+      s=s+' Q' if @ColorFlag
+      if link and link != ''
+        Link(@x+dx,@y+0.5*h-0.5*@FontSize,GetStringWidth(txt),@FontSize,link)
+      end
+    end
+    out(s) if s
+    @lasth=h
+    if ln > 0
+      # Go to next line
+      @y = @y+h
+      @x = @left_margin if ln==1
+    else
+      @x = @x+w
+    end
+  end
+
+  def MultiCell(w,h,txt,border=0,align='J',fill=0)
+    # Output text with automatic or explicit line breaks
+    cw=@CurrentFont['cw']
+    w=@w-@rMargin-@x if w==0
+    wmax=(w-2*@cMargin)*1000/@FontSize
+    s=txt.gsub('\r','')
+    nb=s.length
+    nb=nb-1 if nb>0 and s[nb-1].chr=='\n'
+    b=0
+    if border != 0
+      case border
+      when 1
+        border='LTRB'
+        b='LRT'
+        b2='LR'
+      else
+        b2=''
+        b2='L' unless border.index('L').nil?
+        b2=b2+'R' unless border.index('R').nil?
+        b=(not border.index('T').nil?) ? (b2+'T') : b2
+      end
+    end
+    sep=-1
+    i=0
+    j=0
+    l=0
+    ns=0
+    nl=1
+    while i<nb
+      # Get next character
+      c=s[i].chr
+      if c=="\n"
+        # Explicit line break
+        if @ws > 0
+          @ws=0
+          out('0 Tw')
+        end
+        
+        # Changed from s[j..i] to fix bug reported by Hans Allis.
+        self.Cell(w,h,s[j..i-1],b,2,align,fill) 
+        
+        i=i+1
+        sep=-1
+        j=i
+        l=0
+        ns=0
+        nl=nl+1
+        b=b2 if border and nl==2
+      else
+        if c==' '
+          sep=i
+          ls=l
+          ns=ns+1
+        end
+        l=l+cw[c[0]]
+        if l>wmax
+          # Automatic line break
+          if sep == -1
+            i += 1 if i == j
+            if @ws>0
+              @ws=0
+              out('0 Tw')
+            end
+            self.Cell(w,h,s[j..i],b,2,align,fill)
+          else
+            if align=='J'
+              @ws=(ns>1) ? (wmax-ls)/1000.0*@FontSize/(ns-1) : 0
+              out(sprintf('%.3f Tw',@ws*@k))
+            end
+            self.Cell(w,h,s[j..sep],b,2,align,fill)
+            i=sep+1
+          end
+          sep=-1
+          j=i
+          l=0
+          ns=0
+          nl += 1
+          b=b2 if border and nl==2
+        else
+          i=i+1
+        end
+      end
+    end
+
+    # Last chunk
+    if @ws > 0
+      @ws = 0
+      out('0 Tw')
+    end
+    b = b+'B' if border!=0 and not border.index('B').nil?
+    self.Cell(w,h,s[j..i],b,2,align,fill)
+    @x=@left_margin
+  end
+
+  # ========================================================================= #
+  # === Text
+  # ========================================================================= #
+  def Text(x, y, txt)
+    # Output a string
+    txt.gsub!(')', '\\)')
+    txt.gsub!('(', '\\(')
+    txt.gsub!('\\', '\\\\')
+    s = sprintf('BT %.2f %.2f Td (%s) Tj ET',x*@k,(@h-y)*@k,txt)
+    s=s+' '+dounderline(x,y,txt) if @underline and txt!=''
+    s='q '+@TextColor+' '+s+' Q' if @ColorFlag
+    out(s)
+  end
+  
+  # === Image
+  def Image(file,x,y,w,h=0,type='',link='')
+    # Put an image on the page
+    unless @images.has_key?(file)
+      # First use of image, get info
+      if type.empty?
+        pos=file.rindex('.')
+        if pos.nil?
+          self.Error('Image file has no extension and no type was '+
+            'specified: '+file)
+        end
+        type=file[pos+1..-1]
+      end
+      type.downcase!
+      if type=='jpg' or type=='jpeg'
+        info=parsejpg(file)
+      elsif type=='png'
+        info=parsepng(file)
+      else
+        self.Error('Unsupported image file type: '+type)
+      end
+      info['i']=@images.length+1
+      @images[file]=info
+    else
+      info=@images[file]
+    end
+    # Automatic width or height calculation
+    w=h*info['w']/info['h'] if w==0
+    h=w*info['h']/info['w'] if h==0
+    out(sprintf('q %.2f 0 0 %.2f %.2f %.2f cm /I%d Do Q',
+      w*@k,h*@k,x*@k,(@h-(y+h))*@k,info['i']))
+    Link(x,y,w,h,link) if link and link != ''
+  end
+  
+  def Ln(h='')
+    # Line feed; default value is last cell height
+    @x=@left_margin
+    if h.kind_of?(String)
+      @y=@y+@lasth
+    else
+      @y=@y+h
+    end
+  end
+
+  def GetX
+    # Get x position
+    @x
+  end
+
+  def SetX(x)
+    # Set x position
+    if x>=0
+      @x=x
+    else
+      @x=@w+x
+    end
+  end
+
+  def GetY
+    # Get y position
+    @y
+  end
+
+  def SetY(y)
+    # Set y position and reset x
+    @x=@left_margin
+    if y>=0
+      @y=y
+    else
+      @y=@h+y
+    end
+  end
+
+  def SetXY(x,y)
+    # Set x and y positions
+    SetY(y)
+    SetX(x)
+  end
+  
+  # === Output
+  def Output(file=nil)
+    # Output PDF to file or return as a string
+    
+    # Finish document if necessary
+    self.Close if(@state<3)
+    
+    if file.nil?
+      # Return as a string
+      return @buffer
+    else
+      # Save file locally
+      open(file,'wb') do |f|
+        f.write(@buffer)
+      end
+    end
+  end
+
+  private
+  
+  def putpages
+    nb = @page
+    unless @AliasNbPages.nil? or @AliasNbPages.empty?
+      # Replace number of pages
+      1.upto(nb) do |n|
+        @pages[n].gsub!(@AliasNbPages,nb.to_s)
+      end
+    end
+    if @DefOrientation=='P'
+      wPt=@fwPt
+      hPt=@fhPt
+    else
+      wPt=@fhPt
+      hPt=@fwPt
+    end
+    filter=(@compress) ? '/Filter /FlateDecode ' : ''
+    1.upto(nb) do |n|
+      # Page
+      newobj
+      out('<</Type /Page')
+      out('/Parent 1 0 R')
+      unless @OrientationChanges[n].nil?
+        out(sprintf('/MediaBox [0 0 %.2f %.2f]',hPt,wPt))
+      end
+      out('/Resources 2 0 R')
+      if @PageLinks[n]
+        # Links
+        annots='/Annots ['
+        @PageLinks[n].each do |pl|
+          rect=sprintf('%.2f %.2f %.2f %.2f',
+            pl[0],pl[1],pl[0]+pl[2],pl[1]-pl[3])
+          annots=annots+'<</Type /Annot /Subtype /Link /Rect ['+rect+
+            '] /Border [0 0 0] '
+          if pl[4].kind_of?(String)
+            annots=annots+'/A <</S /URI /URI '+textstring(pl[4])+
+              '>>>>'
+          else
+            l=@links[pl[4]]
+            h=@OrientationChanges[l[0]].nil? ? hPt : wPt
+            annots=annots+sprintf(
+              '/Dest [%d 0 R /XYZ 0 %.2f null]>>',
+              1+2*l[0],h-l[1]*@k)
+          end
+        end
+        out(annots+']')
+      end
+      out('/Contents '+(@n+1).to_s+' 0 R>>')
+      out('endobj')
+      # Page content
+      p=(@compress) ? Zlib::Deflate.deflate(@pages[n]) : @pages[n]
+      newobj
+      out('<<'+filter+'/Length '+p.length.to_s+'>>')
+      putstream(p)
+      out('endobj')
+    end
+    # Pages root
+    @offsets[1]=@buffer.length
+    out('1 0 obj')
+    out('<</Type /Pages')
+    kids='/Kids ['
+    nb.times do |i|
+      kids=kids+(3+2*i).to_s+' 0 R '
+    end
+    out(kids+']')
+    out('/Count '+nb.to_s)
+    out(sprintf('/MediaBox [0 0 %.2f %.2f]',wPt,hPt))
+    out('>>')
+    out('endobj')
+  end
+  
+  # === putfonts
+  def putfonts
+    nf = @n
+    @diffs.each do |diff|
+      # Encodings
+      newobj
+      out('<</Type /Encoding /BaseEncoding /WinAnsiEncoding /Differences '+
+        '['+diff+']>>')
+      out('endobj')
+    end
+
+    @FontFiles.each do |file, info|
+      # Font file embedding
+      newobj
+      @FontFiles[file]['n'] = @n
+
+      if self.class.const_defined? 'FPDF_FONTPATH'
+        if FPDF_FONTPATH[-1,1] == '/'
+          file = FPDF_FONTPATH + file
+        else
+          file = FPDF_FONTPATH + '/' + file
+        end
+      end
+
+      size = File.size(file)
+      unless File.exists?(file)
+        Error('Font file not found')
+      end
+
+      out('<</Length ' + size.to_s)
+
+      if file[-2, 2] == '.z'
+        out('/Filter /FlateDecode')
+      end
+      out('/Length1 ' + info['length1'])
+      out('/Length2 ' + info['length2'] + ' /Length3 0') if info['length2']
+      out('>>')
+      open(file, 'rb') do |f|
+        putstream(f.read())
+      end
+      out('endobj')
+    end
+
+    file = 0
+    @fonts.each do |k, font|
+      # Font objects
+      @fonts[k]['n']=@n+1
+      type=font['type']
+      name=font['name']
+      if type=='core'
+        # Standard font
+        newobj
+        out('<</Type /Font')
+        out('/BaseFont /'+name)
+        out('/Subtype /Type1')
+        if name!='Symbol' and name!='ZapfDingbats'
+          out('/Encoding /WinAnsiEncoding')
+        end
+        out('>>')
+        out('endobj')
+      elsif type=='Type1' or type=='TrueType'
+        # Additional Type1 or TrueType font
+        newobj
+        out('<</Type /Font')
+        out('/BaseFont /'+name)
+        out('/Subtype /'+type)
+        out('/FirstChar 32 /LastChar 255')
+        out('/Widths '+(@n+1).to_s+' 0 R')
+        out('/FontDescriptor '+(@n+2).to_s+' 0 R')
+        if font['enc'] and font['enc'] != ''
+          unless font['diff'].nil?
+            out('/Encoding '+(nf+font['diff']).to_s+' 0 R')
+          else
+            out('/Encoding /WinAnsiEncoding')
+          end
+        end
+        out('>>')
+        out('endobj')
+        # Widths
+        newobj
+        cw=font['cw']
+        s='['
+        32.upto(255) do |i|
+          s << cw[i].to_s+' '
+        end
+        out(s+']')
+        out('endobj')
+        # Descriptor
+        newobj
+        s='<</Type /FontDescriptor /FontName /'+name
+        font['desc'].each do |k, v|
+          s << ' /'+k+' '+v
+        end
+        file=font['file']
+        if file
+          s << ' /FontFile'+(type=='Type1' ? '' : '2')+' '+
+            @FontFiles[file]['n'].to_s+' 0 R'
+        end
+        out(s+'>>')
+        out('endobj')
+      else
+        # Allow for additional types
+        mtd='put'+type.downcase
+        unless self.respond_to?(mtd)
+          self.Error('Unsupported font type: '+type)
+        end
+        self.send(mtd, font)
+      end
+    end
+  end
+  
+  def putimages
+    filter=(@compress) ? '/Filter /FlateDecode ' : ''
+    @images.each do |file, info|
+      newobj
+      @images[file]['n']=@n
+      out('<</Type /XObject')
+      out('/Subtype /Image')
+      out('/Width '+info['w'].to_s)
+      out('/Height '+info['h'].to_s)
+      if info['cs']=='Indexed'
+        out("/ColorSpace [/Indexed /DeviceRGB #{info['pal'].length/3-1} #{(@n+1)} 0 R]")
+      else
+        out('/ColorSpace /'+info['cs'])
+        if info['cs']=='DeviceCMYK'
+          out('/Decode [1 0 1 0 1 0 1 0]')
+        end
+      end
+      out('/BitsPerComponent '+info['bpc'].to_s)
+      out('/Filter /'+info['f']) if info['f']
+      unless info['parms'].nil?
+        out(info['parms'])
+      end
+      if info['trns'] and info['trns'].kind_of?(Array)
+        trns=''
+        info['trns'].length.times do |i|
+          trns=trns+info['trns'][i].to_s+' '+info['trns'][i].to_s+' '
+        end
+        out('/Mask ['+trns+']')
+      end
+      out('/Length '+info['data'].length.to_s+'>>')
+      putstream(info['data'])
+      @images[file]['data']=nil
+      out('endobj')
+      # Palette
+      if info['cs']=='Indexed'
+        newobj
+        pal=(@compress) ? Zlib::Deflate.deflate(info['pal']) : info['pal']
+        out('<<'+filter+'/Length '+pal.length.to_s+'>>')
+        putstream(pal)
+        out('endobj')
+      end
+    end
+  end
+
+  def putxobjectdict
+    @images.each_value do |image|
+      out('/I'+image['i'].to_s+' '+image['n'].to_s+' 0 R')
+    end
+  end
+
+  def putresourcedict
+    out('/ProcSet [/PDF /Text /ImageB /ImageC /ImageI]')
+    out('/Font <<')
+    @fonts.each_value do |font|
+      out('/F'+font['i'].to_s+' '+font['n'].to_s+' 0 R')
+    end
+    out('>>')
+    out('/XObject <<')
+    putxobjectdict
+    out('>>')
+  end
+
+  def putresources
+    putfonts
+    putimages
+    # Resource dictionary
+    @offsets[2]=@buffer.length
+    out('2 0 obj')
+    out('<<')
+    putresourcedict
+    out('>>')
+    out('endobj')
+  end
+  
+  def putinfo
+    out('/Producer '+textstring('Ruby FPDF '+FPDF_VERSION))
+    unless @title.nil?
+      out('/Title '+textstring(@title))
+    end
+    unless @subject.nil?
+      out('/Subject '+textstring(@subject))
+    end
+    unless @author.nil?
+      out('/Author '+textstring(@author))
+    end
+    unless @keywords.nil?
+      out('/Keywords '+textstring(@keywords))
+    end
+    unless @creator.nil?
+      out('/Creator '+textstring(@creator))
+    end
+    out('/CreationDate '+textstring('D: '+DateTime.now.to_s))
+  end
+  
+  def putcatalog
+    out('/Type /Catalog')
+    out('/Pages 1 0 R')
+    if @ZoomMode=='fullpage'
+      out('/OpenAction [3 0 R /Fit]')
+    elsif @ZoomMode=='fullwidth'
+      out('/OpenAction [3 0 R /FitH null]')
+    elsif @ZoomMode=='real'
+      out('/OpenAction [3 0 R /XYZ null null 1]')
+    elsif not @ZoomMode.kind_of?(String)
+      out('/OpenAction [3 0 R /XYZ null null '+(@ZoomMode/100)+']')
+    end
+    
+    if @LayoutMode=='single'
+      out('/PageLayout /SinglePage')
+    elsif @LayoutMode=='continuous'
+      out('/PageLayout /OneColumn')
+    elsif @LayoutMode=='two'
+      out('/PageLayout /TwoColumnLeft')
+    end
+  end
+
+  def putheader
+    out('%PDF-'+@PDFVersion)
+  end
+
+  def puttrailer
+    out('/Size '+(@n+1).to_s)
+    out('/Root '+@n.to_s+' 0 R')
+    out('/Info '+(@n-1).to_s+' 0 R')
+  end
+
+  def enddoc
+    putheader
+    putpages
+    putresources
+    # Info
+    newobj
+    out('<<')
+    putinfo
+    out('>>')
+    out('endobj')
+    # Catalog
+    newobj
+    out('<<')
+    putcatalog
+    out('>>')
+    out('endobj')
+    # Cross-ref
+    o=@buffer.length
+    out('xref')
+    out('0 '+(@n+1).to_s)
+    out('0000000000 65535 f ')
+    1.upto(@n) do |i|
+      out(sprintf('%010d 00000 n ',@offsets[i]))
+    end
+    # Trailer
+    out('trailer')
+    out('<<')
+    puttrailer
+    out('>>')
+    out('startxref')
+    out(o)
+    out('%%EOF')
+    state=3
+  end
+
+  # === beginpage
+  def beginpage(orientation)
+    @page += 1
+    @pages[@page] = ''
+    @state=2
+    @x=@left_margin
+    @y=@top_margin
+    @lasth = 0
+    @font_family = ''
+    # Page orientation
+    if orientation.empty?
+      orientation=@DefOrientation
+    else
+      orientation=orientation[0].chr.upcase
+      if orientation!=@DefOrientation
+        @OrientationChanges[@page]=true
+      end
+    end
+    if orientation!=@CurOrientation
+      # Change orientation
+      if orientation=='P'
+        @wPt=@fwPt
+        @hPt=@fhPt
+        @w=@fw
+        @h=@fh
+      else
+        @wPt=@fhPt
+        @hPt=@fwPt
+        @w=@fh
+        @h=@fw
+      end
+      @PageBreakTrigger=@h-@bMargin
+      @CurOrientation=orientation
+    end
+  end
+  
+  # === endpage
+  def endpage
+    # End of page contents
+    @state=1
+  end
+  # === newobj
+  def newobj
+    # Begin a new object
+    @n=@n+1
+    @offsets[@n]=@buffer.length
+    out(@n.to_s+' 0 obj')
+  end
+
+  
+  # === parsejpg
+  def parsejpg(file)
+    # Extract info from a JPEG file
+    a=extractjpginfo(file)
+    raise "Missing or incorrect JPEG file: #{file}" if a.nil?
+
+    if a['channels'].nil? || a['channels']==3
+      colspace='DeviceRGB'
+    elsif a['channels']==4
+      colspace='DeviceCMYK'
+    else
+      colspace='DeviceGray'
+    end
+    bpc= a['bits'] ? a['bits'].to_i : 8
+
+    # Read whole file
+    data = nil
+    open(file, 'rb') do |f|
+      data = f.read
+    end
+    return {'w'=>a['width'],'h'=>a['height'],'cs'=>colspace,'bpc'=>bpc,'f'=>'DCTDecode','data'=>data}
+  end
+
+  def parsepng(file)
+    # Extract info from a PNG file
+    f=open(file,'rb')
+    # Check signature
+    unless f.read(8)==137.chr+'PNG'+13.chr+10.chr+26.chr+10.chr
+      self.Error('Not a PNG file: '+file)
+    end
+    # Read header chunk
+    f.read(4)
+    if f.read(4)!='IHDR'
+      self.Error('Incorrect PNG file: '+file)
+    end
+    w=freadint(f)
+    h=freadint(f)
+    bpc=f.read(1)[0]
+    if bpc>8
+      self.Error('16-bit depth not supported: '+file)
+    end
+    ct=f.read(1)[0]
+    if ct==0
+      colspace='DeviceGray'
+    elsif ct==2
+      colspace='DeviceRGB'
+    elsif ct==3
+      colspace='Indexed'
+    else
+      self.Error('Alpha channel not supported: '+file)
+    end
+    if f.read(1)[0]!=0
+      self.Error('Unknown compression method: '+file)
+    end
+    if f.read(1)[0]!=0
+      self.Error('Unknown filter method: '+file)
+    end
+    if f.read(1)[0]!=0
+      self.Error('Interlacing not supported: '+file)
+    end
+    f.read(4)
+    parms='/DecodeParms <</Predictor 15 /Colors '+(ct==2 ? '3' : '1')+
+      ' /BitsPerComponent '+bpc.to_s+' /Columns '+w.to_s+'>>'
+    # Scan chunks looking for palette, transparency and image data
+    pal=''
+    trns=''
+    data=''
+    begin
+      n=freadint(f)
+      type=f.read(4)
+      if type=='PLTE'
+        # Read palette
+        pal=f.read(n)
+        f.read(4)
+      elsif type=='tRNS'
+        # Read transparency info
+        t=f.read(n)
+        if ct==0
+          trns=[t[1]]
+        elsif ct==2
+          trns=[t[1],t[3],t[5]]
+        else
+          pos=t.index(0)
+          trns=[pos] unless pos.nil?
+        end
+        f.read(4)
+      elsif type=='IDAT'
+        # Read image data block
+        data << f.read(n)
+        f.read(4)
+      elsif type=='IEND'
+        break
+      else
+        f.read(n+4)
+      end
+    end while n
+    if colspace == 'Indexed' and pal.empty?
+      self.Error('Missing palette in '+file)
+    end
+    f.close
+    {
+      'w'=>w,'h'=>h,'cs'=>colspace,'bpc'=>bpc,'f'=>'FlateDecode',
+      'parms'=>parms,
+      'pal'=>pal,
+      'trns'=>trns,
+      'data'=>data
+      }
+  end
+
+  def freadint(f)
+    # Read a 4-byte integer from file
+    a = f.read(4).unpack('N')
+    return a[0]
+  end
+
+  def freadshort(f)
+    a = f.read(2).unpack('n')
+    return a[0]
+  end
+
+  def freadbyte(f)
+    a = f.read(1).unpack('C')
+    return a[0]
+  end
+
+  def textstring(s)
+    # Format a text string
+    '('+escape(s)+')'
+  end
+
+  def escape(s)
+    # Add \ before \, ( and )
+    s.gsub('\\','\\\\').gsub('(','\\(').gsub(')','\\)')
+  end
+
+  def putstream(s)
+    out('stream')
+    out(s)
+    out('endstream')
+  end
+
+  def out(s)
+    # Add a line to the document
+    if @state==2
+      @pages[@page]=@pages[@page]+s+"\n"
+    else
+      @buffer=@buffer+s.to_s+"\n"
+    end
+  end
+
+  # jpeg marker codes
+
+  M_SOF0  = 0xc0
+  M_SOF1  = 0xc1
+  M_SOF2  = 0xc2
+  M_SOF3  = 0xc3
+
+  M_SOF5  = 0xc5
+  M_SOF6  = 0xc6
+  M_SOF7  = 0xc7
+
+  M_SOF9  = 0xc9
+  M_SOF10 = 0xca
+  M_SOF11 = 0xcb
+
+  M_SOF13 = 0xcd
+  M_SOF14 = 0xce
+  M_SOF15 = 0xcf
+
+  M_SOI   = 0xd8
+  M_EOI   = 0xd9
+  # ========================================================================= #
+  # === M_SOS
+  # ========================================================================= #
+  M_SOS   = 0xda
+
+  # ========================================================================= #
+  # === extractjpginfo
+  # ========================================================================= #
+  def extractjpginfo(file)
+    result = nil
+
+    open(file, 'rb') do |f|
+      marker = jpegnextmarker(f)
+
+      if marker != M_SOI
+        return nil
+      end
+
+      while true
+        marker = jpegnextmarker(f)
+
+        case marker
+          when M_SOF0,
+               M_SOF1,
+               M_SOF2,
+               M_SOF3,
+               M_SOF5,
+               M_SOF6,
+               M_SOF7,
+               M_SOF9,
+               M_SOF10,
+               M_SOF11,
+               M_SOF13,
+               M_SOF14,
+               M_SOF15
+
+          length = freadshort(f)
+
+          if result.nil?
+            result = {}
+
+            result['bits']     = freadbyte(f)
+            result['height']   = freadshort(f)
+            result['width']    = freadshort(f)
+            result['channels'] = freadbyte(f)
+
+            f.seek(length - 8, IO::SEEK_CUR)
+          else
+            f.seek(length - 2, IO::SEEK_CUR)
+          end
+        when M_SOS,
+             M_EOI
+          return result
+        else
+          length = freadshort(f)
+          f.seek(length - 2, IO::SEEK_CUR)
+        end
+      end
+    end
+  end
+
+  # ========================================================================= #
+  # === jpegnextmarker
+  # ========================================================================= #
+  def jpegnextmarker(f)
+    while true
+      # look for 0xff
+      while (c = freadbyte(f)) != 0xff
+      end
+
+      c = freadbyte(f)
+
+      if c != 0
+        return c
+      end
+    end
+  end
+
+end