pdf-writer 1.0.1 → 1.1.0

data/lib/pdf/writer.rb

@@ -6,7 +6,7 @@
 #   Licensed under a MIT-style licence. See LICENCE in the main distribution
 #   for full licensing information.
 #
-# $Id: writer.rb,v 1.32 2005/06/13 19:32:37 austin Exp $
+# $Id: writer.rb,v 1.37 2005/06/28 21:32:17 austin Exp $
 #++
 require 'thread'
 require 'open-uri'
@@ -19,7 +19,7 @@ require 'color'
 module PDF
   class Writer
       # The version of PDF::Writer.
-    VERSION = '1.0.1'
+    VERSION = '1.1.0'
 
       # Escape the text so that it's safe for insertion into the PDF
       # document.
@@ -433,8 +433,12 @@ class PDF::Writer
     # external clients.
   attr_accessor :procset #:nodoc:
     # Sets the document to compressed (+true+) or uncompressed (+false+).
-    # Defaults to uncompressed.
+    # Defaults to uncompressed. This can ONLY be set once and should be set
+    # as early as possible in the document creation process.
   attr_accessor :compressed
+  def compressed=(cc) #:nodoc:
+    @compressed = cc if @compressed.nil?
+  end
     # Returns +true+ if the document is compressed.
   def compressed?
     @compressed == true
@@ -804,20 +808,21 @@ class PDF::Writer
   def load_font(font, encoding = nil)
     metrics = load_font_metrics(font)
 
-    name = File.basename(font).gsub(/\.afm$/o, "")
+    name  = File.basename(font).gsub(/\.afm$/o, "")
 
     encoding_diff = nil
     case encoding
     when Hash
       encoding_name = encoding[:encoding]
       encoding_diff = encoding[:differences]
+      encoding      = PDF::Writer::Object::FontEncoding.new(self, encoding_name, encoding_diff)
     when NilClass
-      encoding_name = 'WinAnsiEncoding'
+      encoding_name = encoding = 'WinAnsiEncoding'
     else
       encoding_name = encoding
     end
 
-    wfo = PDF::Writer::Object::Font.new(self, name, encoding_name)
+    wfo = PDF::Writer::Object::Font.new(self, name, encoding)
 
       # We have an Adobe Font Metrics (.afm) file. We need to find the
       # associated Type1 (.pfb) or TrueType (.ttf) files (we do not yet
@@ -853,7 +858,6 @@ class PDF::Writer
       # Adjust the widths for the differences array.
       if encoding_diff
         encoding_diff.each do |cnum, cname|
-          # warn "Differences is ignored for now."
           (cnum - last_char).times { widths << 0 } if cnum > last_char
           last_char = cnum
           widths[cnum - firstchar] = fonts.c[cname]['WX'] if metrics.c[cname]
@@ -872,10 +876,40 @@ class PDF::Writer
       widthid << "]"
 
         # Load the pfb file, and put that into an object too. Note that PDF
-        # supports only binary format Type 1 font files, though there is a
-        # simple utility to convert them from pfa to pfb.
-      data = nil
-      File.open(fbfile, "rb") { |ff| data = ff.read }
+        # supports only binary format Type1 font files and TrueType font
+        # files. There is a simple utility to convert Type1 from pfa to pfb.
+      data = File.open(fbfile, "rb") { |ff| ff.read }
+
+        # Check to see if the font licence allows embedding.
+      if fbtype =~ /\.ttf$/o
+        offset  = 4
+        tables  = data[offset, 2].unpack('n')[0]
+        offset += 8
+
+        found   = false
+        tables.times do
+          if data[offset, 4] == 'OS/2'
+            found = true
+            break
+          end
+          offset += 4 + 12
+        end
+
+        if found
+          offset += 4
+          newoff  = data[offset, 4].unpack('N')[0]
+          offset  = newoff + 8
+          licence = data[offset, 2].unpack('n')[0]
+
+          rl  = ((licence & 0x02) != 0)
+          pp  = ((licence & 0x04) != 0)
+          ee  = ((licence & 0x08) != 0)
+
+          if rl and pp and ee
+            warn PDF::Writer::Lang[:ttf_licence_no_embedding] % name
+          end
+        end
+      end
 
         # Create the font descriptor.
       fdsc = PDF::Writer::Object::FontDescriptor.new(self)
@@ -885,9 +919,42 @@ class PDF::Writer
         # Determine flags (more than a little flakey, hopefully will not
         # matter much).
       flags = 0
-      flags += 2 ** 6 if metrics.italicangle.nonzero?
-      flags += 1 if metrics.isfixedpitch == "true"
-      flags += 2 ** 5 # Assume a non-symbolic font
+      if encoding == "none"
+        flags += 2 ** 2
+      else
+        flags += 2 ** 6 if metrics.italicangle.nonzero?
+        flags += 2 ** 0 if metrics.isfixedpitch == "true"
+        flags += 2 ** 5 # Assume a non-symbolic font
+      end
+
+        # 1: FixedPitch:  All glyphs have the same width (as opposed to
+        #                 proportional or variable-pitch fonts, which have
+        #                 different widths).
+        # 2: Serif:       Glyphs have serifs, which are short strokes drawn
+        #                 at an angle on the top and bottom of glyph stems.
+        #                 (Sans serif fonts do not have serifs.)
+        # 3: Symbolic     Font contains glyphs outside the Adobe standard
+        #                 Latin character set. This flag and the Nonsymbolic
+        #                 flag cannot both be set or both be clear (see
+        #                 below).
+        # 4: Script:      Glyphs resemble cursive handwriting.
+        # 6: Nonsymbolic: Font uses the Adobe standard Latin character set
+        #                 or a subset of it (see below).
+        # 7: Italic:      Glyphs have dominant vertical strokes that are
+        #                 slanted.
+        # 17: AllCap:     Font contains no lowercase letters; typically used
+        #                 for display purposes, such as for titles or
+        #                 headlines.
+        # 18: SmallCap:   Font contains both uppercase and lowercase
+        #                 letters. The uppercase letters are similar to
+        #                 those in the regular version of the same typeface
+        #                 family. The glyphs for the lowercase letters have
+        #                 the same shapes as the corresponding uppercase
+        #                 letters, but they are sized and their proportions
+        #                 adjusted so that they have the same size and
+        #                 stroke weight as lowercase glyphs in the same
+        #                 typeface family.
+        # 19: ForceBold:  See below.
 
       list = {
         'Ascent'      => 'Ascender',
@@ -1029,8 +1096,11 @@ class PDF::Writer
     @current_contents << cc
   end
 
-    # Return the height in units of the current font in the given size.
-  def font_height(size)
+    # Return the height in units of the current font in the given size. Uses
+    # the current #font_size if size is not provided.
+  def font_height(size = nil)
+    size = @font_size if size.nil? or size <= 0
+
     select_font("Helvetica") if @fonts.empty?
     hh = @fonts[@current_font].fontbbox[3].to_f - @fonts[@current_font].fontbbox[1].to_f
     (size * hh / 1000.0)
@@ -1038,8 +1108,11 @@ class PDF::Writer
 
     # Return the font descender, this will normally return a negative
     # number. If you add this number to the baseline, you get the level of
-    # the bottom of the font it is in the PDF user units.
-  def font_descender(size)
+    # the bottom of the font it is in the PDF user units. Uses the current
+    # #font_size if size is not provided.
+  def font_descender(size = nil)
+    size = @font_size if size.nil? or size <= 0
+
     select_font("Helvetica") if @fonts.empty?
     hi = @fonts[@current_font].fontbbox[1].to_f
     (size * hi / 1000.0)
@@ -1047,13 +1120,13 @@ class PDF::Writer
 
     # Given a start position and information about how text is to be laid
     # out, calculate where on the page the text will end.
-  def text_position(x, y, angle, size, wa, text)
-    width = text_width(size, text)
+  def text_end_position(x, y, angle, size, wa, text)
+    width = text_width(text, size)
     width += wa * (text.count(" "))
     rad = PDF::Math.deg2rad(angle)
     [Math.cos(rad) * width + x, ((-Math.sin(rad)) * width + y)]
   end
-  private :text_position
+  private :text_end_position
 
     # Wrapper function for #text_tags
   def quick_text_tags(text, ii, font_change)
@@ -1205,7 +1278,8 @@ class PDF::Writer
 
           if tag
             text[pos, tag_size] = tag[self, params]
-            tag_size, text, font_change, x, y = text_tags(text, pos, font_change,
+            tag_size, text, font_change, x, y = text_tags(text, pos,
+                                                          font_change,
                                                           final, x, y, size,
                                                           angle,
                                                           word_space_adjust)
@@ -1230,8 +1304,8 @@ class PDF::Writer
             if final
               # Only call the function if this is the "final" call. Assess
               # the text position. Calculate the text width to this point.
-              x, y = text_position(x, y, angle, size, word_space_adjust,
-                                   text[0, pos])
+              x, y = text_end_position(x, y, angle, size, word_space_adjust,
+                                       text[0, pos])
               info = {
                 :x          => x,
                 :y          => y,
@@ -1275,8 +1349,8 @@ class PDF::Writer
             if final
                 # Only call the function if this is the "final" call. Assess
                 # the text position. Calculate the text width to this point.
-              x, y = text_position(x, y, angle, size, word_space_adjust,
-                                   text[0, pos])
+              x, y = text_end_position(x, y, angle, size, word_space_adjust,
+                                       text[0, pos])
               info = {
                 :x          => x,
                 :y          => y,
@@ -1345,9 +1419,22 @@ class PDF::Writer
   end
   private :parse_tag_params
 
-    # Add text to the document at the x, y location with the text size at
-    # the specified angle.
-  def add_text(x, y, size, text, angle = 0, word_space_adjust = 0)
+    # Add +text+ to the document at <tt>(x, y)</tt> location at +size+ and
+    # +angle+. The +word_space_adjust+ parameter is an internal parameter
+    # that should not be used.
+    #
+    # As of PDF::Writer 1.1, +size+ and +text+ have been reversed and +size+
+    # is now optional, defaulting to the current #font_size if unset.
+  def add_text(x, y, text, size = nil, angle = 0, word_space_adjust = 0)
+    if text.kind_of?(Numeric) and size.kind_of?(String)
+      text, size = size, text
+      warn PDF::Writer::Lang[:add_text_parameters_reversed] % caller[0]
+    end
+
+    if size.nil? or size <= 0
+      size = @font_size
+    end
+
     select_font("Helvetica") if @fonts.empty?
 
     text = text.to_s
@@ -1368,7 +1455,7 @@ class PDF::Writer
     else
       rad = PDF::Math.deg2rad(angle)
       tt = "\nBT %.3f %.3f %.3f %.3f %.3f %.3f Tm"
-      tt = tt % [Math.cos(rad), -1 * Math.sin(rad), Math.sin(rad), Math.cos(rad), x, y]
+      tt = tt % [ Math.cos(rad), Math.sin(rad), -Math.sin(rad), Math.cos(rad), x, y ]
       add_content(tt)
     end
 
@@ -1408,7 +1495,7 @@ class PDF::Writer
           else
             rad = PDF::Math.deg2rad(angle)
             tt = "\nBT %.3f %.3f %.3f %.3f %.3f %.3f Tm"
-            tt = tt % [Math.cos(rad), -1 * Math.sin(rad), Math.sin(rad), Math.cos(rad), xp, yp]
+            tt = tt % [ Math.cos(rad), Math.sin(rad), -Math.sin(rad), Math.cos(rad), xp, yp ]
             add_content(tt)
           end
 
@@ -1460,9 +1547,21 @@ class PDF::Writer
   private :char_width
 
     # Calculate how wide a given text string will be on a page, at a given
-    # size. This can be called externally, but is alse used by the other
-    # class functions.
-  def text_line_width(size, text)
+    # size. This may be called externally, but is alse used by #text_width.
+    # If +size+ is not specified, PDF::Writer will use the current
+    # #font_size.
+    #
+    # The argument list is reversed from earlier versions.
+  def text_line_width(text, size = nil)
+    if text.kind_of?(Numeric) and size.kind_of?(String)
+      text, size = size, text
+      warn PDF::Writer::Lang[:text_width_parameters_reversed] % caller[0]
+    end
+
+    if size.nil? or size <= 0
+      size = @font_size
+    end
+
       # This function should not change any of the settings, though it will
       # need to track any tag which change during calculation, so copy them
       # at the start and put them back at the end.
@@ -1511,13 +1610,27 @@ class PDF::Writer
     (width * size / 1000.0)
   end
 
-    # Will calculate the maximum width, taking into account that the text
-    # may be broken by line breaks.
-  def text_width(size, text)
+    # Calculate how wide a given text string will be on a page, at a given
+    # size. If +size+ is not specified, PDF::Writer will use the current
+    # #font_size. The difference between this method and #text_line_width is
+    # that this method will iterate over lines separated with newline
+    # characters.
+    #
+    # The argument list is reversed from earlier versions.
+  def text_width(text, size = nil)
+    if text.kind_of?(Numeric) and size.kind_of?(String)
+      text, size = size, text
+      warn PDF::Writer::Lang[:text_width_parameters_reversed] % caller[0]
+    end
+
+    if size.nil? or size <= 0
+      size = @font_size
+    end
+
     max   = 0
 
     text.to_s.each do |line|
-      width = text_line_width(size, line)
+      width = text_line_width(line, size)
       max = width if width > max
     end
     max
@@ -1554,7 +1667,16 @@ class PDF::Writer
     # remainder of the text.
     #
     # +justification+::   :left, :right, :center, or :full
-  def add_text_wrap(x, y, width, size, text, justification = :left, angle = 0, test = false)
+  def add_text_wrap(x, y, width, text, size = nil, justification = :left, angle = 0, test = false)
+    if text.kind_of?(Numeric) and size.kind_of?(String)
+      text, size = size, text
+      warn PDF::Writer::Lang[:add_textw_parameters_reversed] % caller[0]
+    end
+
+    if size.nil? or size <= 0
+      size = @font_size
+    end
+
       # Need to store the initial text state, as this will change during the
       # width calculation, but will need to be re-set before printing, so
       # that the chars work out right
@@ -1594,7 +1716,7 @@ class PDF::Writer
               # Reset the text state
             @current_text_state = t_CTS.dup
             current_font!
-            add_text(x, y, size, tmp, angle, adjust) unless test
+            add_text(x, y, tmp, size, angle, adjust) unless test
             return text[brk + 1..-1]
           else # just break before the current character
             tmp = text[0, pos]
@@ -1604,7 +1726,7 @@ class PDF::Writer
               # Reset the text state
             @current_text_state = t_CTS.dup
             current_font!
-            add_text(x, y, size, tmp, angle, adjust) unless test
+            add_text(x, y, tmp, size, angle, adjust) unless test
             return text[pos..-1]
           end
         end
@@ -1631,7 +1753,7 @@ class PDF::Writer
       # reset the text state
     @current_text_state = t_CTS.dup
     current_font!
-    add_text(x, y, size, text, angle, adjust) unless test
+    add_text(x, y, text, size, angle, adjust) unless test
     return ""
   end
 
@@ -2184,7 +2306,11 @@ class PDF::Writer
           if tmp[page_num].kind_of?(Hash) # This must be the starting page #s
             status = 1
             info = tmp[page_num]
-            info[:delta] = info[:starting] - page_num
+            if info[:starting]
+              info[:delta] = info[:starting] - page_num
+            else
+              info[:delta] = page_num
+            end
               # Also check for the special case of the numbering stopping
               # and starting on the same page.
             status = 2 if info["stopn"] or info["stoptn"]
@@ -2209,11 +2335,11 @@ class PDF::Writer
             when :right
               w = 0
             when :left
-              w = text_width(info[:size], pat)
+              w = text_width(pat, info[:size])
             when :center
-              w = text_width(info[:size], pat) / 2.0
+              w = text_width(pat, info[:size]) / 2.0
             end
-            add_text(info[:x] + w, info[:y], info[:size], pat)
+            add_text(info[:x] + w, info[:y], pat, info[:size])
             close_object
             status = 0 if status == 2
           end
@@ -2242,6 +2368,8 @@ class PDF::Writer
     # <tt>:font_size</tt>::       The font size to be used. If not
     #                             specified, is either the last font size or
     #                             the default font size of 12 points.
+    #                             Setting this value *changes* the current
+    #                             #font_size.
     # <tt>:left</tt>::            number, gap to leave from the left margin
     # <tt>:right</tt>::           number, gap to leave from the right margin
     # <tt>:absolute_left</tt>::   number, absolute left position (overrides
@@ -2340,7 +2468,7 @@ class PDF::Writer
           end
         end
 
-        line = add_text_wrap(left, @y, right - left, size, line, just, 0, options[:test])
+        line = add_text_wrap(left, @y, right - left, line, size, just, 0, options[:test])
       end
     end
 
@@ -2583,7 +2711,7 @@ class PDF::Writer
         ss.cap  = :butt
         ss.join = :miter
         pdf.stroke_style! ss
-        pdf.stroke_color @style
+        pdf.stroke_color @color
         pdf.circle_at(xpos, ypos, 1).stroke
         pdf.restore_state
       end
@@ -2651,11 +2779,7 @@ class PDF::Writer
   end
 
     # Save the PDF as a file to disk.
-  def save_as(name, compressed = false)
-    old_compressed  = self.compressed
-    self.compressed = compressed
+  def save_as(name)
     File.open(name, "wb") { |f| f.write self.render }
-  ensure
-    self.compressed = old_compressed
   end
 end

data/lib/pdf/writer/fontmetrics.rb

@@ -6,8 +6,9 @@
 #   Licensed under a MIT-style licence. See LICENCE in the main distribution
 #   for full licensing information.
 #
-# $Id: fontmetrics.rb,v 1.3 2005/06/01 19:01:36 austin Exp $
+# $Id: fontmetrics.rb,v 1.4 2005/06/16 04:28:25 austin Exp $
 #++
+
 class PDF::Writer::FontMetrics
   METRICS_PATH = [ File.join(File.dirname(File.expand_path(__FILE__)), 'fonts') ]
 

data/lib/pdf/writer/graphics.rb

@@ -6,7 +6,7 @@
 #   Licensed under a MIT-style licence. See LICENCE in the main distribution
 #   for full licensing information.
 #
-# $Id: graphics.rb,v 1.10 2005/06/08 12:16:11 austin Exp $
+# $Id: graphics.rb,v 1.12 2005/06/28 21:32:17 austin Exp $
 #++
   # Points for use in the drawing of polygons.
 class PDF::Writer::PolygonPoint
@@ -525,7 +525,19 @@ module PDF::Writer::Graphics
     # The +image+ parameter may be a filename or an object that returns the
     # full image data when #read is called with no parameters (such as an IO
     # object). If 'open-uri' is loaded, then the image name may be an URI.
-  def add_image_from_file(image, x, y, width = nil, height = nil)
+    #
+    # In PDF::Writer 1.1 or later, the new +link+ parameter is a hash with
+    # two keys:
+    #
+    # <tt>:type</tt>::    The type of link, either <tt>:internal</tt> or
+    #                     <tt>:external</tt>.
+    # <tt>:target</tt>::  The destination of the link. For an
+    #                     <tt>:internal</tt> link, this is an internal
+    #                     cross-reference destination. For an
+    #                     <tt>:external</tt> link, this is an URI.
+    #
+    # This will automatically make the image a clickable link if set.
+  def add_image_from_file(image, x, y, width = nil, height = nil, link = nil)
     data = nil
 
     if image.respond_to?(:read)
@@ -534,15 +546,31 @@ module PDF::Writer::Graphics
       open(image, 'rb') { |ff| data = ff.read }
     end
 
-    add_image(data, x, y, width, height)
+    add_image(data, x, y, width, height, nil, link)
   end
 
     # Add an image from a loaded image (JPEG or PNG) resource at position
     # <tt>(x, y)</tt> (the upper left-hand corner of the image) and scaled
     # to +width+ by +height+ units. If provided, +image_info+ is a
     # PDF::Writer::Graphics::ImageInfo object.
-  def add_image(image, x, y, width = nil, height = nil, image_info = nil)
-    unless image.kind_of?(PDF::Writer::External::Image)
+    #
+    # In PDF::Writer 1.1 or later, the new +link+ parameter is a hash with
+    # two keys:
+    #
+    # <tt>:type</tt>::    The type of link, either <tt>:internal</tt> or
+    #                     <tt>:external</tt>.
+    # <tt>:target</tt>::  The destination of the link. For an
+    #                     <tt>:internal</tt> link, this is an internal
+    #                     cross-reference destination. For an
+    #                     <tt>:external</tt> link, this is an URI.
+    #
+    # This will automatically make the image a clickable link if set.
+  def add_image(image, x, y, width = nil, height = nil, image_info = nil, link = nil)
+    if image.kind_of?(PDF::Writer::External::Image)
+      label       = image.label
+      image_obj   = image
+      image_info ||= image.image_info
+    else
       image_info ||= PDF::Writer::Graphics::ImageInfo.new(image)
 
       tt = Time.now
@@ -551,10 +579,6 @@ module PDF::Writer::Graphics
       label = "I#{id}"
       image_obj = PDF::Writer::External::Image.new(self, image, image_info, label)
       @images[id] = image_obj
-    else
-      label       = image.label
-      image_obj   = image
-      image_info ||= image.image_info
     end
 
     if width.nil? and height.nil?
@@ -567,6 +591,16 @@ module PDF::Writer::Graphics
 
     tt = "\nq\n%.3f 0 0 %.3f %.3f %.3f cm\n/%s Do\nQ"
     add_content(tt % [ width, height, x, y, label ])
+
+    if link
+      case link[:type]
+      when :internal
+        add_internal_link(link[:target], x, y, x + width, y + height)
+      when :external
+        add_link(link[:target], x, y, x + width, y + height)
+      end
+    end
+
     image_obj
   end
 
@@ -595,18 +629,29 @@ module PDF::Writer::Graphics
     # <tt>:border</tt>::        The border options. No default border. If
     #                           specified, must be either +true+, which uses
     #                           the default border, or a Hash.
+    # <tt>:link</tt>::          Makes the image a clickable link.
     #
     # Image borders are specified as a hash with two options:
     #
     # <tt>:color</tt>:: The colour of the border. Defaults to 50% grey.
     # <tt>:style</tt>:: The stroke style of the border. This must be a
     #                   StrokeStyle object and defaults to the default line.
+    #
+    # Image links are defined as a hash with two options:
+    #
+    # <tt>:type</tt>::    The type of link, either <tt>:internal</tt> or
+    #                     <tt>:external</tt>.
+    # <tt>:target</tt>::  The destination of the link. For an
+    #                     <tt>:internal</tt> link, this is an internal
+    #                     cross-reference destination. For an
+    #                     <tt>:external</tt> link, this is an URI.
   def image(image, options = {})
     width   = options[:width]
     pad     = options[:pad]           || 5
     resize  = options[:resize]
     just    = options[:justification] || :left
     border  = options[:border]
+    link    = options[:link]
 
     if image.kind_of?(PDF::Writer::External::Image)
       info        = image.image_info
@@ -691,6 +736,15 @@ module PDF::Writer::Graphics
       restore_state
     end
 
+    if link
+      case link[:type]
+      when :internal
+        add_internal_link(link[:target], x, y - pad, x + width, y + height - pad)
+      when :external
+        add_link(link[:target], x, y - pad, x + width, y + height - pad)
+      end
+    end
+
     @y = @y - pad - height
 
     image_obj
@@ -707,7 +761,9 @@ module PDF::Writer::Graphics
     # angle.
   def rotate_axis(angle)
     rad = PDF::Math.deg2rad(angle)
-    add_content("\n1 %.3f %.3f 1 0 0 cm" % [ rad, -rad ])
+    tt  = "\n%.3f %.3f %.3f %.3f 0 0 cm"
+    tx  = [ Math.cos(rad), Math.sin(rad), -Math.sin(rad), Math.cos(rad) ]
+    add_content(tt % tx)
     self
   end
 
@@ -721,7 +777,37 @@ module PDF::Writer::Graphics
   def skew_axis(xangle = 0, yangle = 0)
     xr = PDF::Math.deg2rad(xangle)
     yr = PDF::Math.deg2rad(yangle)
-    add_content("\n1 %.3f %.3f 1 0 0 cm" % [ xr, -yr ])
+
+    xr = Math.tan(xr) if xangle != 0
+    yr = Math.tan(yr) if yangle != 0
+
+    add_content("\n1 %.3f %.3f 1 0 0 cm" % [ xr, yr ])
     self
   end
+
+    # Transforms the coordinate axis with the appended matrix. All
+    # transformations (including those above) are performed with this
+    # matrix. The transformation matrix is:
+    #
+    #   +-     -+
+    #   | a c e |
+    #   | b d f |
+    #   | 0 0 1 |
+    #   +-     -+
+    #
+    # The six values are represented as a six-digit vector: [ a b c d e f ]
+    #
+    # * Axis translation uses [ 1 0 0 1 x y ] where x and y are the new
+    #   (0,0) coordinates in the old axis system.
+    # * Scaling uses [ sx 0 0 sy 0 0 ] where sx and sy are the scaling
+    #   factors.
+    # * Rotation uses [ cos(a) sin(a) -sin(a) cos(a) 0 0 ] where a is the
+    #   angle, measured in radians.
+    # * X axis skewing uses [ 1 0 tan(a) 1 0 0 ] where a is the angle,
+    #   measured in radians.
+    # * Y axis skewing uses [ 1 tan(a) 0 1 0 0 ] where a is the angle,
+    #   measured in radians.
+  def transform_matrix(a, b, c, d, e, f)
+    add_content("\n%.3f %.3f %.3f %.3f %3.f %.3f cm" % [ a, b, c, d, e, f ])
+  end
 end